From b32e54f252c8e24a9bdfb747cd4dbd1afe42b0f7 Mon Sep 17 00:00:00 2001
From: "Reyesrivera, Jose" <reyesriv@msu.edu>
Date: Mon, 30 Sep 2019 10:54:03 -0400
Subject: [PATCH] add python/scripts/tests/notes

---
 Notes.pdf                             |    Bin 0 -> 274561 bytes
 python/output0.m                      |     45 +
 python/output1.m                      |    125 +
 python/output2.m                      |    121 +
 python/output3.m                      |    123 +
 python/output4.m                      |    119 +
 python/pv.py                          |     33 +
 scripts/FA_FC_B_T_amps.nb             |  62767 ++++++++++++++
 scripts/HelicityAmps.nb               |  13635 +++
 scripts/X_LoopRefining.nb             | 102934 +++++++++++++++++++++++
 tests/ggH.m                           |      7 +
 tests/ggH_LR.m                        |      5 +
 tests/ggHg.m                          |    125 +
 tests/ggHg_LR.m                       |     93 +
 tests/ggHgg_LR_triangle_2diags.m      |    281 +
 tests/ggHgg_triangle_FeynAmp_2diags.m |    167 +
 tests/triangle_++++.m                 |  38214 +++++++++
 tests/triangle_2diags++++.m           |   1517 +
 18 files changed, 220311 insertions(+)
 create mode 100644 Notes.pdf
 create mode 100644 python/output0.m
 create mode 100644 python/output1.m
 create mode 100644 python/output2.m
 create mode 100644 python/output3.m
 create mode 100644 python/output4.m
 create mode 100644 python/pv.py
 create mode 100644 scripts/FA_FC_B_T_amps.nb
 create mode 100644 scripts/HelicityAmps.nb
 create mode 100644 scripts/X_LoopRefining.nb
 create mode 100644 tests/ggH.m
 create mode 100644 tests/ggH_LR.m
 create mode 100644 tests/ggHg.m
 create mode 100644 tests/ggHg_LR.m
 create mode 100644 tests/ggHgg_LR_triangle_2diags.m
 create mode 100644 tests/ggHgg_triangle_FeynAmp_2diags.m
 create mode 100644 tests/triangle_++++.m
 create mode 100644 tests/triangle_2diags++++.m

diff --git a/Notes.pdf b/Notes.pdf
new file mode 100644
index 0000000000000000000000000000000000000000..59d6ae414e6bce54efba80a18eb70742912b956e
GIT binary patch
literal 274561
zcmce81z1(v);8Up(wpwsba$6@r*wCRAl)4j3P?*MB_WM;gEZ11h%`w28$8~l_naHw
z^MB7LKJ2yEnla`W?|kQ4@0bfpC2>hcAQKld0%aZOA2I?Ezyff1W{r%%&(Eyp<!Ht%
zX6$Ng>tMmGWNcyP0$>GQR$-Pmwzr@$vu9LSr3Emnx;nd=xT-munW;E9xB}QX9*Za#
zJKM<En>&D-c{nsP1%Qf~2?{bRn7JC8g4zTCIanS`YFL?hm^mvso0*$Ao7tOyIstM#
zSfL^)h>T!nZ~AD>L%+Y7^=J;Wn1h==s7q!!D^nL;0NX<?04w+72iv2m`hZ_sc_{Fg
zRzM>I_3Qe_&{WJ^9Ne5iR)7qbbg*}Q_y7Waj7gFe!1K^Hvm_e;$o}Jq9RTF~al`=t
zKK9Hk$q8V6GzBzT2~SrkRaawIGf+EHs$2lB$FfqY+<?cjpb|>X4koH*uDZ;iNHD9J
zdAc&o*nwOv`r||F$A`?rI6$s5wK5iU@YDr0!UEs~vI4kxSoHxQFW9?+M&JVYVUv`z
zgPS9$zsK-BeqmN+R&zGCcX50esfib}m@2clnY)#VnTnJss9iPVXD*;3KLYu~8!iBr
zUmf?*@K47{TG_gqIWtSzf<`57X5wIK#w>4UZ{cbQU<a~rJ=Ah>bv84$Lq_n-Y9+LB
zAmBP~2EPx3K8$j$;*@i4T4Y25_ouZRU#yF%#04B|CVM9B(8*OWav?iDzr5>l3XR)L
z)Ei8k+X$*fWeQ`<x<E=1_%6sN=zqTUCG(^#U9ooZr1ncgR}dNVs-c*rhH1(TJ$}Yg
zeHiThjZHl-KX)rXzb7X-9&PR5MHs9&3LR@Ad<Jf^MP9M9NbR5v&(4)xf?s12ra8$`
z#f--&Dyl);UHx+OzA~Trn`S4DfnH2Ooyy*V_t&2W-fnt!N+MpK*fUH)`yPAoqgziA
z-syE646C$N9G%^&({I<hw2?d=7{BHuxKGsg_wjTj#l7$P++k9kFPQp{%xjY@qLDT^
zHtN0LYpNII16fF&Jj`Bn+;t!6&!N$tLHGBw07gbtz{#eAo<y)>12i_=ZlTY^Q_Kwf
zBN*4nsBh!|6p=0XFz>h|0~MdS0i(x1PQuUiMAb65sFBSnQ`X40g%@|1l6uiX92LF(
z00B)|hehN^kG+ULojRp)Ke+nU#f$Gb{q!p1BI7(I%1!kx5=ouM_uX2f2yvC-;;_`l
z7*TfYkZuElZk51F%Qn7KXOF1e@mCsNq`7Hi%vU3;SE?OcA)>FwTfTKz9P4YFrF}Js
zYwN!-sbdY$-1G(03phx!!Vf#fFx_4vgtC5f1APUn7ry`vH)}0lIu7d@RpajLR~w9q
zV?s7H=HuxB{XBUk(R?^royUj43_`G21s=TQ0u7>?+*PnU1Ud??!%2BeTST0re8a4x
z5Yt;Pek&hv14WGPoJ*W`oG~*A&%eG6U1Gk(cLl$W`&~O($xv2T4~fx(oe!M)Z1{^U
zzm=qe;)-73#DqfjtSy{%TVmnbfq%}6+noHNIW(G_4F+^dTC4c|b#9_usFC)0b#gew
z_!>(DE{~(V6+Hg*uD5TiaX!uIWGEB5FfwmYO})9ocm^x*#IVj%|LZ1~rR~C7Tgca+
zp}2Y%UoeJR8GqvQDi`cTU3G7plfH6rFm{TXP7j(uYbyirrW(Q-(Rz;LTVoUUpWIbG
z1-wqxF_`r->Bgbuf?Whp*o46Gs)VNy2$d<Qg4$SKXdae|GDP(gClGqCitl8&GP-b{
z2d05C<EIy%cyM5NT_(|964CA%iMrpB!(K^#`ZN;Og!NN&fT!%cjllR3*obE$PgMd}
z&%g>W4nw19KD}-wm{70C%gRKH3*BNEX!2P{r&}%zY~+|C^ojHY3&3WVEmnSY+f}Np
zX?I>XRu>zhWW%WJ^1(O3(yAaDiXL5io&p<8Wy1{Vf`mfSGGU~HOE^nNMqCIY(NYTQ
z7=@_K!1oDesimt$_Cya68pX5*9zDby)n_J;PZ+X3SIYL;{ye06*cHcbfZY>$Gu+V2
zjI)hzSWbJ>m-xT)HO?5drM<?MJX&JR<8ElFwk0<we(_9eh9s5d$Qszk?5J-E$(PX-
zO476^@CDr2$R{P!ig`2R_F&8~He#8TYP&q90Zrd--tRMV)!SO;1(pMJS>WW_Od;NR
zv=#()0vv?mvnu|hkBF{Ah^05DTc!iauNC)dM}*Rd1;PfO@uJ6Cpc=vpro>4v$#;~%
zN)Zc=on$%t$|_DhkG+Ts+Hf60#zHtlDHNc`a@B(82?SaPt`W8anU2^xfm%xRZ?mu`
z*jlLaeR{hiG9b{{<b;vDKfcrwN9j|?e)r-#E#pQrTdrWr>*T5<4D_8zu+^$4yrF(`
z%C@mff&iGr-n4J{MV4dwVGAXNvN~JI6?TSwZg&lplRjkojd|A6G>)Fgof>$?3qjw6
zbXnS-tebu?v3(vQ3(zeaYA6T{XF7g1=PoR4%)GJaEqwB^uI|Lc8LT+9@_Y(45G;ey
zXkz~KHaNSnAw3stsy!lQjmW58HP9ArHdI&n74dL6TP#Kud8RXEiiLPYT#D0M9zw4)
zn|HGX?C;OL%Beq$IS+3ZVAap-jec3z4ou^yek(&w7CqSl-(X?GTcDUc^f}lk)P!Jz
zN|{&LKCgQb!W}bWmo);}6hlDT=X>R}Fv|FALudZ97Xi`wU{dtP@u~1HCvTWTpo8;Z
z68JQo$u~ouI5F^jr+|io0;7N}3(nB-7Yk;~e&>m4cRY1(?M*9IQNU&xQHm<UF599g
z(tBX3^Ttx9|8;snCo5qz1|=s!U_x(d3<4r^GtQf^?wqo>EsOBSNj8EyNV2=6>Wk2~
z!`6#z-X$tQ`6Jp;dUQ{dl^{CNAXv75cz~I1@K#yqoDF5!)+_sRa>Z~(|KL^O;#J|k
z;*#TR!bBCp8(Rn@)x6N5O4W`$vP!bz(z3maCn_Q=7xcVRJB>7H`zg+y*V^jxttv8a
zG@S$8o~ZP=l+f{ZmK<$5w^`LT9Bg5_`n_Y>wEn^qDX@Voq=pP2UAHPZPAXKCQ$LKo
zt~9u7Jb?{V_!53a<%1gZMJ%kvgL5)hI;7>DV*Q8oLj<67N^cI<{L{{>=bc$YFrUCY
zX6#8FG2=x-W@NdHW)++9*|KX$T&IX;qR@Fr*qB8PO9+DzC|cS{t)f*^-#G}+3xQG4
zAVh_4T=M{U!o($c=A~N*yw>wM$^txPDmBxg(e1H<N5SoenVC$M@Qi(IwiXyTc{yse
z%P7_8Z3CmpD4pu0JU{5&%+H^_9M(Nw=aRV9{nGiOmEB2K2SL?V*jbuTgbn>;p=1n(
zu%7K9rFUp>$&fbq3{^nNh+YjhYr4<=rI}N?suOQYsB)!-%t=FHA4~hD;xbAl*1q0S
zrl^v+tRY>Tg|+-gZ<k^=#*Gu0ref873{KiaFWxe`4vfnu7f6;hSoM2K^Y8s~AzzkK
z7E&NxZ@PouZn!@=XlA9QF7wxWW<g`pOi5WYaRtcgpNy34vAzI*9We6RgTzA*0Y6V}
zzoJiVb;xd+3s;1!`0dv9+IWT0abPs3!7Z%ky!ENVxgwK+_4jV;glQyEYRwA1yyw)L
zcI9sMUuz3b`UZI`$@hg3?c^Y5d-=RSmB??;B<4~s*?2&uj%kZIoUCq2nY3h6+UK87
z3?<5kB!{>Xb@q_u`p?ff>^Z{KT!%+*`{kQU?S@>`C2Ygd8bfg89;!gUPGQd@J#y_}
z?0rHSz=JSV*y<;`F9sKLk~NENnV@6^)cBTQNZLy5LX8jKbMzUlm!b;OiF@6M`mW``
zxGeOg7}$9H={CC2cNTD7TJN(HZuR~&IXNP7u~+&T2+VXZ7b-5n2dta=ah_V0<Iy3o
z7@QAZ7^GD7J5t)p;up1SPGKUrD`VYsmq$0L136MnWNc-3oiuTRo&}8zebxOeYibN-
z|4g{^U}UypsXb@}*Ct2T9CxhQ9Rl@5p<c$Uaf3r~IM>%mqvDjKIHtXF&fW=uMZFm>
zul)I~P4$W-E?uL5(yVIo)86{vn&+PyFPy;LDi1`-t#K3PM=<a_8g+A$b$06c7X>k+
z=6xt6ZoOQ+U11cv(d+XGhhtw2epX?`z>xE#bXkMKfrgM5@F3KRphq(Gm9g5^+nAG!
zrka=Tl+K;gxm|J6Wd0lo*YI}sW2;ov_Ye83FdVMRupcRHn62SX!(mUJMwo_K1Wfaz
zQz**rXx&b-e5R14`4si0TU3JJuw)9?a8iwylE)27n2xSQ)`I)~v}d-x`99Bt3#Q6S
zoj`|AMgl8j<(+#bUz_x+?0{lM<*sst1Zx@#JhxWDvsw$!Af=lo_u;+^v72}NYDsN&
z(J5T--<^Ahv!bTxiw66mVi@E(y$9mXgs}7R-|J^vkt+0|NH6YWcndI<G^<*wi?q}_
zc*u4@dq;&B6;^McBhy=XKOH%s#ViuA>wAUi_HqDNPVXoWnfNSe3jLJf_Jv(azmDg)
zbl7S=@0+KBvH97`1MpdxpP*e!Yo(LnckI8o`KwW~W=|$ltm6^z_V+FBOHJKI6>=%D
zmUkVWJIx;L5UO{^8MoDnh8c4RmcGYfFwzOOpC@jbT+Yp;P#D6EJ9$AR^8{wFdRU`0
zLDl$6ee9}kOkD4q*>?Eb*y%DU!b)vS%1rJ4dPAFdZ+k7Y0GpOteW>sCQ<R56*5N$L
z#bXAV(N?{L+<c*iNZI6*gJV;tK;);H3becQPjbLmV!6*F;%C^E_uy%DaH_CRDCfi4
zZ@E54slJKE;%wcL_-=OkW$X=OYhVm%4xQv0`^@L?>DQrMM39>5`BeGNHY!x6W1BQr
zI?=8>@$QJi`sc~mFk$5-!QJnNoX%QvKD|x7blNVD(9jfUCg#|E0>NzjK`1832%TJ9
zwG|dM0pYoz?=26GGNTH%w6?0Ki-<ID|GU?Kv@wqP<@6pvMk_u!lXl4A$tDKMroLYa
zgD7cJc$vdnB5!BRqI$7><171k54$zOngDU5W(DSuV&sfnaCfW{jpRalEqZA-|FO_B
zhUI{#+)k`9kb<P#&&ByWt{^#vOQXoD!u<$fpHSPPQF*2_09<Q6CZNk3hk_l(?8w84
zMt-2M5er(=#MBmjb|6Q`Z?dq@6Z++V4_@Y04m&0(D-vzl#*d0yH*+z!fD(^uY<kwU
z@GG&M8rO>fAB<=qw#<S_hY^{tsX|b#%NEv5q3h@B@#kz`4yu5gRN7{th&yp`v<cCE
z^oeN+R|1DAy!YQ<A0`5AWe_bhQ9JB!Nt4xx2J>y*C$C&*V>fdxv#Ta%ub?f>ne{v`
zwR+vtz9$IHj-gWKP*HLS5=?yV_fHHEjj|VxaBXrZNiJYRhq(Mwx>ljqtY@xo5$4vP
zyI?wb72iv#cS8lcw9w~6wf5}lG|)v)e~x;7C#ei?kfj)Fq)n~x+6$S~ne-VLFPX>E
zp|KE#si8Nl7_57~etqw)h8s|!P_E>|OM6>|9!u;&8K_*-Xgy=edDwtfPtmir@}$pX
zRYZ(<te>C0n!22H1rJF6K=9_ogA}83IUuVvmWgG(v<T5R_@fMzS94`KVwL#|u^a3j
z-l660*xC8orV#bh)+{w<eC~aVm-3<mt}yWig>?iPG&{Ex$?ijS&|d9h6bcqeFXS#p
z`3`)IYlW=M_Gt1)P&;Mls4-^;<*vGep8^W>-Exxz<ramGY-x)a%OiT!G+Iz0RG)?H
zZaHqV_157Imn`Z`wn}nSL2pZl-Ikd(&QKF})|XR{81IGQexbw)LlrjhW*OS-od}@9
z-6LVYU=622_8ri_=<Z;#t9c5uV^o@VyL|VQz_p2^;eH3EhC(Z})10+Ptcxn$mD#o%
z+cRr_{4B!3jcdrkh#@f~>q&aBDJvtEzlOrNMF9k*KL2E2y2@;qc*s5U8Oti`cXIeW
z8XCU(>rqyGE)E!}I^hQFDq^8Se+yx@=R_9%+@r|bDl&eAmXPE|6$ZTIoD0Mn-Fn91
zv>fC@ykUp$uNcq@DqPn-Me6T<PQl=<o3bj^K3YK6Y3}sWn#guQ&0kinhJ1T*N)g{f
z)iC1cH#1qKNU@O-&2sl$=u<!9^`nyWQy2It>O80_KUIZCvEo5+VODi}=K3H!se$yO
z$FqvYc4i<EhFR3u#q6<!sF=8fgao~qv8~lJXDdcg2U}BS344$dVP$W@tZ8L0V(()0
zkM9pP#LZkxoUI&P9h?Dwh&5KuF0Nvh#?AmXR*;(Y$1#u<2&!)CY6+5{*dN8IUp0`2
znt!qO&z2w6qDNEz&ODG>V&U@8nG8rxvoaB}x3Dz>urQ0bm^?^NJRGbbLFUIXBP$0B
zNOW_QHnXy@bOmsMzKOV7JemdIVB-X-X`Vm60J*q<kDY4%QIds)S?iBl4{fNrn%QZ9
zsyvnveUyzDIe<KXhYkQhR!+8uwn6IAgM&btju|Te$o7XQ^{4LkpjZ7i=zj=W%%Td+
ziVn_p#<t8RATjS(Pd&8qA1jH8{9frnS^KTh?_dBSg5@^^NIoLK4g>&W1!GssKLH?P
z3UaBHs~4m6A3ilT1`QB2NKjOND2{3l>h@L-!WAgYe^DAA%RCyQ3jjV|)d&3PkH<4V
z&HNRR|7^}r6pP7-KlJ?oWY!;w+~c@Fr_~&!WW*JW9hrX`%q*@6vJezS&_z`*7f|>f
z1XNI{K%N0<j=$p=_^2>4gKDt<p*8+u<gaS!Q)g2%XVAo;`PmIfvQ;s&umVj+FB%b$
zx@z{I;kr3G+M3xtVDUHI@3EJk!~Mq;{THDBXBYf?%(DT3T)%*xmGxK9b8-I(dQKq6
zpP*-FV`qJI#UG$&|69;={+JklfF8)s#Q{P+D=SDE=Hv!&adH2SdiF;L{|ewoarZC7
z{#VQddII}}nWX+?rav+HA4m!Khrax`ti;O3_9rVn>c_vC`nM$dFCz4-ZT~(x|1~3l
zDDxLaV*kN5|28-vu6w}pPex*4`^iWk%KZx?u|Im|w*mhx5C5y!u>Tnw5fD?@J}wpt
zYX5y?ehBuGe;XMPo&RIG_zQCa|3aO=&)`QVJgyhN8TKE-!ou;(oB{r}P_X_oXV|%T
z{tOE%C+N~c=l^1%kT)}aSUCY8oc&lc*tvd<5U4gNLLgdX1#uIAixo6`ev8Ln*#4ob
zKjZNi;+Foq3G$Pi{*JVN<XnCw?Z-UFZ$|uM_0R>G`M{UIlJ?`7pVRr*x%#Uq|9gbZ
z`nYO5y713=2msN~1C2ir_TxRsujW72_-Ww(7hym4^0TG?MA*L$|3BdFzr8{EKc|Do
zOxs@u{BPhV^C$fN>CW-rV374kX6+XYvi*gLAIm&i0>a=UZT*J9UwQgh4F1KQ|3x7F
zakKmTodfF+N&^9r?Qv%P2E<><_5Tlu|26%AZkPY!ga0Ko{-572Kjxl)L*ql9`afrw
z|I8=<nMLLTu>H7Q{Y(D&|2(hE`h$Z1cM{9LJt{o5{L^9oI<w5i4P<-3>CY!f&#WH(
zeNbi@<KDjgzRN#3(tGe?eHGJa&^;5<xe{h4te(3uVgk-FOYcj5+=n}JY1#UB8?yAs
z7Z6(7RwP2s+-x_<JR6)VH?=%M_gkAcJ?dTNwOhy5%QqLN!F5RYUQGBiPcGjXu)oGB
zq89R<UVQyZuZ>sWYD<#Sacz2G5)%ctI+RP}o%~KO>nz<ui#IB+-}hEKf4=}&&JUpu
zOn%?bPdEDd4{p^ImfH>41Td5OJXG1V*(YCTYCh)^Xo3lUp8bkY4`(Eog}@A6!ZX&_
z=c4aaUV%8RvWU2?or}!UMCU+u3|2$QL)n+!416=o$$$8AacBgIkWWbUhy*iQ7Zc@5
z;^r$pD!5)@t@rsCZ<nsdwr7imLlnNPQ?+dNoDSy<fObf83o?<$t1k@Ms2|pW1`Twb
z{L3duzEn>PT)?3lGn!ne>S7wK`9lX?-$UOwfKhLKPCqGH$q$i|37EqDoL-xWw;21h
zn@<^w&VZ8n;ER0WIss9Ita|7CGxSL|&7RbG=s8dRmOvpQ3C``$=C>56WzBPCeC;77
z_?xnv<}J2<noW1}Ig<C`B)-<vhKM)um$|F!7B{U06VACh`V1daQ@LiDw-ru?W*x~4
zP0AcXo**$7uf|x1X&Mkm9cqhfww-w+w()c&m3p0B_w`5NGNahqFId^*+*sip8x{37
z%bIyBwRNF9qoekiWaH6Z>)YR4KOK7df&?}DW6$?EM~yCRduqoKdBOE2uFJp%!FCdL
zT=JYM-=`6-uENT@0aFK#x3g;3%vzH7_idL%3#-*vcBQmFu0*cnh*tr~H+Z~fhO1vm
z-S^`rFDKWZ1sS$CF>AFfG>>Yvz^WxWcIfh7gW>w=yv3|~VLos>N$a~jxqFn=W7B=f
z;`Xh(YjXHPHMjW&M)7&@%8`{v!{^k^*9~!lsKTO$MLq(aUZ~J3{#$&Fo=&iOz4EDX
z&z0c)rbpzrlYOgi+`PA_qP`n~opEA0UIn<%B~}xD*3k@rB{ssE2(chK%5W5Ru)|zw
zS0u8G^OsZ&mh)YstI3+qCc6#2ZS#Fk%p<)@_^GE-3*Dmn<U{0;S!`=dWSqikgrr?O
z9OfrDN6fl4jM#8II0s!OIR%NW(-sH)5(z5i!=nE57rg$WwGn$)1V?e6!7$aHQTBX0
zPB#guH}o)hRRyAX5e$bUv(QMJ5-z^Ycjv^i1ZO<jL>@`6sniNwc4`nqGT(@_-n@d7
z4Faf*`##T5>2M4ktt|8I$F&;Oojy1gU5A$PiYjlo^cJgp@7>_52Z7seZs@b5KqS0!
zkE3g1_~EIkQD{S<nhYyF%rae6-eUBiLq9*P)V*4>Ia*x6^F37zTe&jQ>%ek<E-`TL
z_gZQ%)KM>?n_Fe+a?8Z&D;RjpkQ)mGJM0k51G{N-L>=Em1W(TMCilC}85EL|Z8!Tt
zWg5K8^{vdo>kP>~5QR?lh@!?hb26LID(8xz4{iIb5Y&RScZN$>Fa<#tB5LOD<R;cV
z&B2W$#IIJ>*NGTooT$NBq#5@bBDYl{4k^`?+9T?okjgc|gl+;mV012}CJen2C4OVP
zdKwlZkK+xPjJkv?(Ner@z20`<D^$~WUn3Zlt#fE7%@)lN4lPw#^4yg4X`N$N)3C7b
z+VI=n)Iy<OcQY`QELRnCodq_+Q)!Y&e=>5O64viYE<_UNw4^U^P*4W%kCwkOn)XW8
z*Vrm4i*8PB_NT|hE@ME{?HbsFq@;g~np_r*Uu<dSHJwvm!;esxvZ?H@*iI<0(9FsP
z(;@RAr5`~fRjl0DblNE~M!iplN-|pYT~(Qe5`h*@@O)bhfNywz2Y$rVV1TD=@6&lo
zSh<lAIhX_@0XR*@6CS1hUW8H+TT^JPXY}+rU)XEkP#;r9%^PFmn6TW9mE4R#Y2s%o
z&u`zbVp5q_1<&QDYt$xK2e~L8;U+4dN?7<0*o{8zNzQQNM7fKNlYti;#qf5lL3ka>
zX6w$@(~}V%#?>|YK7QAw#Nz3R<GyH-Z5I2zMj2u=eA;zUceZW)xHUerfSa!9jd!n~
zH?MS8*?x6f9z(dBAM0cwU(L&zm-3uR{b~cUWXB={EYVE}d*a*sSUcrUz<Xt~luP5*
zIby3+*Imo>#fmh0ck^E=D<IqC0_Ersn-}_svP)}@on-6$x%t&AA`_7WZaMFS;zgDm
zsH~LC%2<{LFqpJ;kX+JnRE1?G`<=*6=DzIAWbuzAE&9XPo|(E3D={@V95k0Ja_r|e
zN>;Exx!<vh3ue9*yoBXr%3+*IRT_CIuqgIk!vVnaYLA@tz-xr5fJ(fRm$ny(u?rZ!
z3T%2u^x129?-^$9!fQ-$r*Kkz_%K8-$FCn4d0k=9RI7an`Uh=T0Tp9)z=V{=O<y_Z
z&tLXlu`t4Vza@ZqDpA&8NTi7q`|{(&m9KIB9D_Vo;wcLAwiZli2%bUwfd&rYp5_FV
z|8U7Wc<+-uPVh7=HEtECrkTokq?g&`Q_|mv`-zluV`b?C5{aw@yHPaLD&^xxU{VOo
zgJd1%a{#rXc8>b;b8`k53D)+Wc;T_jc+)kBBZq}Rsi)eNmeFpo<BhpVUivSRj@(dQ
zC$9=4LlTTx3t<aF^!M?;WP#90Smnl@GZyhoh6;m4eFd9m#%&w|H^8)@sicx6O&>ji
zxg6`DFuNeEOM9iTK~EZHOX8jcg_W2{vx^+Z)RrTkd?R^IgGot*CJ0yW9TFhj58Na7
zd%X%rpKtm!qyp<@(Z*`DRE_(A)A-@t%&Ur`2KQBF#Y2Zfdie6;>{yw=DYtP!>6gjO
zkmEqw9E_U$x@OI2mGaoM$j>c@MmM>b0}@m{9EEpr9r-z8UuLk}(otxEw1GBMk^mLx
zxpB-A{xP6<DI}H^L<3L1zP{3MS-yHEWxswDWVUqbt482Ef-uAO7)PK|QxoRIIwn+2
zpop9E%L*{!Np)UdPU%bzA2t9E_YxWu;Q%2RTJdQ7whhBLSiq-yWRWT*iW!<Pn~Mu5
zV2=(9BT6A3(cO&2P2VS3sjvdk9*DV3xAZbex?b@Re4-XcNf_x1aQ%`X3u@jjIo`3_
zYYvDPbC9Mz$S+yDvrWg|Y(Ck}vR9j`f!nxHZB}0a9~b~H#7>Q#pRbY_g)6sAvON(F
zCViRY$C3Bt-f<h=Lm1W*Eb&m{ec?%%QW2oF#e8Bn$f#_zboW%m=ujl?d(I?mAp1R<
zs4G~aNO+AP;ZSF@bl#{c`X1yMtzalGU>A?_5>w@z6C;;bdbScp(^VQFFCYD#NJ$MR
z8cHLa{CmdLvGVR&e$G)rnx$_jrHt=`xnN@&kcPi7#x%fX&f;Hx!vW8yvRF(zZs+e@
z^Nez&lEUuq)0M3uCvl(!8;@&9wif3`>2y>vX`Cq!qxOU=z94)J*9F@dF$CH(db#Cv
zDeN_SC{Tsj%YF>#6JJ?^7s9kQVXVV5gOTVR4~eH$>m-eK4vtD3gd88qKci^??0;)|
zp;Q-2x4|0X9RMem75|+gt5nc_d|R2;O(YD?BKQuQ&2N!=-bkJqLqE7HrajyP%C8C|
z=o0-DJh%{b_bPO7q(rOW`g+wDR3JRa4PT0+We=!3pl$YbFj5M4vucCjTx3@gPtC?g
zTpp7!TFBK&0XU%C;S__uX>=&VDKx4o#iL_xszW|R3l}Fi)DNi+=YqgNhUx<Ib_r-4
zi(o}px1Pl>8zU@5Yb{3y#d}sq3d0Lccr9E6CQiJQJeA2mrrdNGG*wb4Tm%I=WBE$m
z9(1vdDPOqAAGaC7RdOs8YX@sOkbkVC5|#GHFFX+vl^nJgf}k?Rs2hQbetyz{iU}^t
zu)I7uFvJly@&;lI!nnu9HFqHrn}dBGM>2K2+TkptTrb)X@wQ6o(B7b6xHk((YpM+y
z(hvk%hdmMfK6ARNRFDk6KENHE5Dn&GP=Q)7(NrZSs=fPBGAVenRoYc{o2O!yh8|L#
z^OY$^+E~n(Y+}fTL9%WH3Ow1QAVrNvr|*n2J-WM+%173*Lm*vgxp451+g0<ol6r`a
z(*k?b4+O8Rksa_$38SB%hPJ@J=96zBMqn<%Szf&+St80?@>OWR-^WH>3|q}rlB}Ur
z5~N_pRr1d;68O*zvv>X#aS>_v`<C0hImU%lWTiLU*I{k{0GlJO8m^D|cGUE<hTZC?
z(8-sqOf|^yV{vI6#UFteoa`m$`U@{mj<!}U3&n`F;D#Mrji-T59b$>x8Z=xpvVC70
z4L*;thAEzs#RuRz(y;N1z0xfaoHacN%8W}jg6o3c^ez=^IC(wh9+ITaRf=wH%wks2
z_DS!PGYoE=X<9~-RiK-6i&KwRF9BgSQ?n`wrlXpM{Y0rk*7PR8+*jSSxz)&2-8N=_
zwnIp@oElxw@m%EupN=sxx_mFKV_Z`W&zkiRP3?nbf|F0%UMoTcnj*4Voo2#L$lwcd
zU$M9^9l87J`K|(y!rM>tCmQda-MFF`=+a-=hgc^gc$BSfE~ndrbvJ6n7#C?sG)>p5
z_UQ<{c*&b>w5LNW&LQzclsx1~PBB!r;IYvYXmqfKGdrw?qIH4n-9SXcW@dgUh#Ya^
zF#BUs==ThI2S@T@>PkR|9COb?r(GpqMwj6oq+1JRTh}iu$E--kw&ree7-J#ktJ77r
zBkO1|c!DiEc>!V#uhqRJq?PABN`vDHoaH9zesakDB$(V<7u_r}?GB?-ft_pbQBG#_
z_5kI`jH0xSFCNYRy5?%kNvu8*zu?LhmN$k;#_nS0Zv3l^PRwDS??}g`+Ms+Z>RkWA
zrO;~5RrA@~EmXfQKdRel(KlNnGWs%!^nK$i(e)Eo7>ki`TvaAKgab&MReq|<&Zcb?
z_SagSxkFeSei=C*HwqKUlJUbCvf-ut<<7-9F$=qT#i5hgF|o{{Ubo&05caAfW+5Uu
zAZf3?ef#a~b5tB+76xLNajNZYs#BIobJVEbomcbOz!i5njyZOb#iBr~sX$9fmM!bR
zXWcL7nAWp0DEf$o&WTL+JZ-3V_h2shz~_$%ou5y<KXay!n!wKo=6?u$f9hSoCr!Ej
zN&fyHDBo;<sF?pz`TmQD^jPyRCjKdf{*&?zvgtp_J^!uf&HhU+f|Zk#<5$u9pA$uY
z6}{Pi6TLYfQbzw$^nQG~;I|?EcRJ7Cyg=|%=J`Jtb=ZDn5dU{X9oAn}#K)F@dgtGW
zI;>oO5q0Do2>a06Fjt?auUDYQUM~p*k^#tQJHWBHS=I?niJrVngxgP$reFA0`Bd|a
z$#8PIS<jzsD{z&`Vr##&V$a+C>BUa-;kR`u=GYGcyHiQjOOr|KhabXVOEpi~EGJ8t
zHddTimbRn1f}Z<L`hi{)@OJk++IhKqEHtuANW9~lu;*%#yz94@SJN7`G#BPOe)84i
z;#|((=pt39;H+pn43?SX?d6c5*L3#n!O<$a&^MAW*k-Y!<&_RazZyKgbFmKdkH{0%
z%LKbj3G){-tO?ivyDx^y!jfk*D;rykk$F)pIiGCMrCwWO#ZLR7IoSpe$14!@PFw8I
zB76*i5urYO60%-vJDBK*VFU#|i_xSS1SyN0kR+i?Z4!0^g^7&ns>!fruoF`f9)$N4
zQ{a_-gZoYxk@A|3?pvCH%z$V5r^qwlMKtF11+=NJ$0xFVMO3B>zVCj6kIWZokmiLS
zHKIVSZoret<dwk*HDv>KaK`h8dubrI)?=ImxQ|-Tf(^KL<^<FP+J!@o9BHqct59Yt
zl-U(e&|14y)x%vPQSivwR7s;-J5@0aHrRd-m{_gtRa~2m(ZW?Dm02Si5UD0Twa1C9
zF@7cSq~=?u)RROj_^t@CCS=ZqwwL+#($F$z)obtq?O9RMXX#%{B!Hu|v#?He3qpBS
zCONqtl3+TngSs?JyHV>E&FJm>J}^h*mu30`mrVKiVqZIj0L!NvbYYfnD_B`++tDq;
ztLY-zvxMtIOO({WMYo``=D^go!v^6^Z9aiPP(ioYzz4;k;5hFQa`meQBie=Gh_sgp
zPi$O`0$gcr1KLHoP%>>r1`18)g&i$x?H!DtgjrMorqckXfMTAEgao6&9F&b~#I*n<
zs2F=N5y%d4^zGBA?7Bh;^sxmOUcL=B%QCk)bu?@oTq9HZ+-(-AnWC3ZaP^{`s<;Ip
zkz9^qY7!aQP$s8s&%|E@ylNbleA+p;7fz5&ez>m1@96It%c^2<UUR~GX?1&Ko2h1S
zQFF0JC;f3v&uDwF5FhOwcM)QIJD-tLEFC2VN)5LKjT(kyd{0xZfLP<2o-JB1!$^v>
z3<Lzuwy)|2lKjST-YgiaY)1f$dzd&Sz7e`SCY%=gAh>)|UU|qcsocScksb|v#g^FA
zentU9L1V9|`kN&q{xBBxCq~ATbUhpLf-+c19037l!lf^P`_HBiX+w0>%eMv!g)!c7
z<Khc{lwpn3ZfKx#8fRQ)o><gR+S&E;)HYV74L*P|N%u;!NsM4z7BET-_I^XL+KALr
zr_j_jN3mbrN%0wsW5%mgU)}+<HLBPQV7fz?iDhhJLDfH7fPybD+SR<XwWc5YI<qCH
z!1lOvXUj;R)^?=hJ!zeGnCw%&y<ID97riFn87YFWZY?2B$|g(QyLJuFuos$j6oVdv
z<jt4wkfJWOU#CggJ6(Oh+B=?f*7DVR--CM%lM*^UC96sT%?|%2`=GUm;94dsH$yh;
z<tw#7aPPc%z7Yd>-yljO*D++mMczWOoHl20*tCFgp7)wDS0d$%ypjnH-}gqIP|(gh
zDZ%nktKV8hOsc(k7Y?&Lq~ys}SBig-Q3E!Zx)+$3uKJdaBbCBfq;E^MX;xQFU2E_~
z%usy<M@oil@LV8msgq(>hD3E0F43*veN}YSbBlsj-)4S<sLCtmnoh&Y^1}peJ%7FH
z<Jmp^JBy~1+s!cBSInA3`uCyslDh&;HC<3^eC{kwRK>mu`%X)!Q^SRC#N#fC;o5gU
zE*Ioe6({Df#b#`Qp0m$W70`AAX(QRhzEaeBiOmaDV4JwL>C8)<%acD>pIS%csl1`y
z@7Q!Wy;`H5dNLbZOCrx`tCfA9bvDUVb0?`S^L*H_br7=cQl7jefM>ElUg9k(a%mYa
zr8CS;j`SrJQob7s9{~k8y|zvQEFJhkd6kJtPJadb8e}bZ#=bMez&sa}$Q)Erk&49z
zu_}p|a`rpK$}bS7QxiZdmx1?VGzr1A;!_>ziEyrKO07<6^fqAN3r5MgSRbIEhEy#a
zx(BdGLBf{<44@ppENEuH*CsYT_6;z^BeA#hyyp|n*QtoURAcioaxSHFEgTpvp_d-4
zXp7QNd}#?e71!F)!NM5J(s06!TZ=IXXaPr(qF|i_5qJTS3F*X^b`*QUm`@^hIowSs
z#A74~;FS~34=YOuB6iO}*Tjv52_opmW?rPjVt2O?(2*W!Tn4;os37S*vKZ`!4<hJ~
z8AQEmzGt9)>*$nCxMACMRq9jAFPlYn<$G4CK=ti9bJq1BZU2;fTh4yPmE5PpOX__{
zMUFV-bEoW`oa$uLt-a&3W9j`KAN)_enpf*DB;VmJH=h`C(|4iXWlsQrLO99dd0>1p
zS-}OR&cWH0m`WOQCWyGBm9m8&(3oX=w+B@m8fBvwSx(p1=?vvv#9#aCVf2kz(Z8WX
zTwT)?-ToGzJicMu+i?9(-bR`G{%TG3+LO#ddR^Vxh8!U8D`WRzBu=mO-cah)P$+g{
z5&D_SAa>D!ize=APpKjGxvc`cz4>KZa@mDl?k2;+cexjhdMTuOO3ngi=D6q^<KxAi
zRb1>5ZQt1<Zw*}h#f|Rkrz!I^(!P{7?%p^sxi)n(Y9?vGAvdou)tHGMo)eHeEi}n>
zr8|5Qn0lv~sijE@rycdqI7T&_Y!$_Np&cBDT;Dokk=E8<){+(+d~$5cb+*03&Se!c
z#xx>GqN+f`6J{jEZkS9d;Ov}s1p>l*dH$Ui>=&}BT!{oBnX1)rzQQFVsF@D3PZLmw
zc_lh<-%qh5mC-|K;JdQj;qJa}6?QMp_(iv=`rS!bI<)29U9(<e?c~m%EiX2$fsYe<
zppF7mW8;bv&WL9SNw{s3P3bxZ2xe-VfkE;iS^@6KCBtU~PVebKlg>~MQ#SQkx=d=K
zbw7slbB;Q@C{}_C`J*^hqM#I>1`d4b9Lsj-R>+$>n3wMGZX<;ZDM^x$srpp9@OH%S
z;EO`V1anT*ciV}J#i6F3p&U8M>SU4Z7|W6&9n(-Q#B=Ha&>8{ctAKSd<|IfYNQ|!=
zm}bZg9O+#53L~7y!?b1Sj*h^98Dv6JI5YxZG2#hp{8IoV7!w<>Ah(6={fbUuA4Mcr
z;psHtf)a!*M@~XzecN)4hn~~S45Wwa7~-cBX8YBRyp1awZR5y<!^Q<i|20~aEq~RP
zHiN9Sv-ZluCtI;^y{H<q+}UsE`@)E1<akDKpDLR!XlVKhH?2`Zx)^%;tu&;DUq;T}
z`>ek~(XXSF^TfUPRPFJ7%D6nM-fyv8d9t0UPB0c*YWu2;J-vKLn8;URn?Ft?<B&#(
zE%flq*<g=N44oY1=v)!+Gyi-iq)S|^<yA{ubL_*-wVtaz%HhL{`}~#XMb0a78B5y~
zV1{Y_xhMJeR=2y--$Oopn`0*Q8}KOICm5R6jJ(S;tlWvHRB9asGH+t==x##Sg`~$G
z5YT?L^Ad@ON&$B&IEzuz=+983*%x2Zr5WbTJ>|$1?<fB{j42H+cdIDMlIlG*;^xiq
zqV@T){2Tm`oy93v-22oSymz8%=tZjG_>05{pY3Ub@4Ga1c^^8Mp6hXNf2po#9WW^)
z2Yt}-)<QySk-t-=!2E4l&b4b}s^4=@HRFJq7Y7ByFU;y<xnEXkd?x-9kRc?i1MOTt
zfJo;}*&xONi4)}}{5HT5_MPI4tEe{hUf_8>Su!~+7DZH`_n>%T2pK|Ud)|j6ifHkb
z91QASpLsYx2Vb?dZf=RNf<=P+j;2TvY~L=}i^ZP%^DqYOTYokpDQ&!zbsKni_jE=7
z7L47iz=d$3a)MQ^?CzpL<8K7JWDRYG4a{jLaKg_j$U}IVm4#ky!)`y}^c{bHfoZ=)
zaCu9V5ldHrg&gqJ$@cSV{bae}I?d{*aK10^Bv2it(m#7lN}rfGhQXv=rxhNA*V*Z`
zr%9yZ;oF+s1`{vu?dlQm_B|{6FqTOD;Y^%bKaKlI^fp~mK#=V|8!OK@)2~$N-<(QM
zQ%w|zPf=8=%#V$V<yX(?7h~v^#@R}+m*(5rg}Afp4OZR47d~GYu0ZMndFvfjcJrBX
z2;oyyDT}({y<R371!NZNn(D#B6hl!tT|G@=YYM`#ZTy1q7M$-zIzDG>eg^E?ess?n
z{I|CVP=p()2V*&~jdV6EIj|nxh;D_0r+_rG!5FJe?rGZc+I9QGUA#0+K`z)8(Oo+9
zPcZxIbQVERN9*$mCX*DEze-n&1rcuq!Uj1UF<!T#j<(RlE{>s_i3p=_V3F*Sv7)$Z
zHE_Dpd14psQQVS<8+pL|{e%0%7LuP2MIvslmJZG|DrR10F3wi&X3oY809gkYGk}ya
zXhW-+Eoe)o80Z~p(1v9i1uGM02Nwr(SAeF2v+2(ZRu1;!p!ct7#Ccg+fIKXq^f-`%
zjg6g)o`r=P^dD4A!NK(3m-zLG?Qsj_Pvag{g{RM~RbB0v6#+b;&0r520O(zF7SPeZ
zdiNX1%ES44hJHy)!G=Hvtrhl|<eFqi?Tjl}*gdI=Gy+&p8Wtb)Y;>Nip6VlO_r1TN
zLLCv2WU6{qn0}S|lE9gPy5<M_7~azgkB(+(CMYR^W;7y+ucFS2u(&>b!1qeo)ZFIV
zs;{yHn&Gw~if=kF*D2qp>mjs8brjH%Gf{hLXu^@V(!-DTtJ9&Zb6hZa!4C>|m~)c~
z0$VU_Lv`J|iT$DL+bemG!(nNz67|fbI>=ExMGy2tpCd&#R$;HNDttsxOGc-Ld=1nJ
zU=CM>!$B2Mz;<FGFWpHFfB>Lub^G;yTm%}MTe1@B)5hYd(_z<ZgpGYsPLz!mBhfe0
z8X~D6gja<z?53c<#4ywBNMnIli(vB!Q{y4GQZmkvu7Nd9DD!5~ASs&u9N9SKv;94w
zyIQoZQl%*zy7O4+b(V#&vK)IJRs;7}pAz#p7*;aVbx7}GHhe8uGBn9Dw9hMjC8q#+
ziV>L^y(|$LXo_g>5&*gyDJ2DrOF}1WI(@##(Ft}z*F@8pk9KnaOr#hRPeM5IM`86;
zuI6?n{2AQN&JDN|)Q^z#NaNt4FsrJi#K8$>-*P)?-iA*EW1)2hv0NlV*e1Ue4x4yd
zrG<(rV%{yx3p9}}HX4#<?V6Ff!(Qu#X!V{ZLX`We_<r)Rk+1ol$F(T)Z0Txi>CAD`
z?`H4Xp@Of?)xg)_ga6eU9vUxUXPDT{=Xe%ac+~i(&!cfKT&lPc2T`j~YoG8qD87>a
zrg{OhJuvlhu<npDJ==trFcCE@nFr3br6|!22j^9VslNuLljqms{6e$%YKd!@gCvm~
zQzfC{f#;~^8sB|bVBix)g4pRh1=6*l4|y_?c#VQkbe=GUk<`H&d*UQr*c%AN`FLM!
zl`l2Z%gwcUZJ!TY33aI!-HN1Jwo^b-5wP?Gl;9}547OAz8<zX#CADG<h<frd52og0
zAcHp`3h*%xuAb%v=+zJjbX#R8U91iqiK;&jJ)_84B+!@h;2e~@yJq=G?rwe1LXn?1
zv_nBs;j{Dy^ux#ljY`cF6hy0N0vS{QQ8*vTU}}m38Jq!8#2?AvYG__CMy`5Ed~6+g
zg=_aJEkqAW;H;EUQ!373pjjow!)_w%gwS88FUhboEYSTUE9cn4x0^$AEj#nLhTTw!
zLsx3dDRB;&;nQ`o3Mc9=Ypk3G6lW*Cm$V8^joHx<i9dcMrSVCvg7X<<v}<ZiLo7n}
zzfv@1XGeSEoH5{6(&Rk+ShnPSi|nNzP)RPJlT%MEWl+~Htx+>88Bj@iIDyj?rY<+^
zT-!D`W^2pIk(sH^+vKml;92}lX+5`BEG7&em4n!O)ym6heZ99YCXRrFOVHkT@v`yT
z!-;Kz*ABjIpMAgQ&Y3n+Hr1Z7WJRwR^5Ip6jYhpz)Nfwz!Cy-*a^9pPKUTl>bh@}a
zwY;pm;$GxiDP9S(;jj-qlonhrXY%(LS-tkVna)Pp&OEF%b^?~wF{X!|hfSY3b7UDX
zQi$Ps)<SeWt0mMd|FFz(Z;%5#Ym43|S?T-M_w|5+yg{?8DuIG)X}jmjdvWjHD`d3%
zZeerHyJZodyVbw|Nw*Cj);?{&N8!TX%d3HSUN7#@-u|0CrN@|R$|i;mKL3)a1MZEb
z6WgNy^kHp%!*ccEr{$}a`Q??Ye6A0DC-**a`&0Km1Oh`2r)kW0;HsD_zJI$Wu>ZPu
z_9?SGXjA^<FGV-IXOElqnbjQ~&74&n?2PSyrE88~HxvF3>Vfvb|G5VJ59$Gb(>wo1
z6@T3Z_^($FHV%&87Z0<<Vf!E!wBWD&A#uB;5Mu2S!3>o73EZbr1p?{<Xg)Ftk<~~%
zN9T2|6eTKhMt;Xb-ctKjG#3TdQW$L+25Kych3XUSW3OYtoP$;0LS&%LMLJR4<LZ|O
zjb*&GdXh`8J_+lk*vaL?9c@k)RsJRJ2rZad@`crO1cPAYfV11oH7u_Zc?85rL~t*T
zcj=kS5;%OTowlsca_r=Uw|(S=3}l3Ws;%TH28=!;OC7IByp+3BBFUFEa2hWU!RFXu
zg;!clOBz|e^8&H_6*TwG=TY&JxNj~iVonO;4AQ9<(H8*aMB_B)$;wZ$<jmnGaI8Xt
z)oZ3yTO<eg3u@y?4-z<E)j+CrRLiYQe{f7LP?XdT-4nRaj98M$vu#^jt<*B1z#+w!
zt}a5Z?`4^QAqPgklS}Z;r&!XCEZ=f?W6yMWr5DCD()-ElJJ%NMf#f1xqoCN5&9?Ij
zvm<(Y#NXoa#|uC|?*smIxVYK5*f{?9t1m#%Hbv0RaPHsZ_az(FSFPv#a&)n|xxe0&
z%S@G1H<58S6NOedH9lCF2D~OCKo|lZ3R?saNrOS~46FL$MQcutw(tu;UY;Q0p6V1e
zr|oD4HJw)bm%EY0T6lN~Kf(LamF<g_q^$4RJd+~=Y#xWfWiU^`c8<t`-j_xWTz`9A
zp$%=jg#wmRU;1pZ7~TgW4J=b53>!x=D>3Q$Nn4&PSUrL+$MCC_ma!zCPMiQQxoUos
zb3D1S%{UHU<f>~Nu%1#L#O;v}>w}SDU|TE5Inl3t_Ox9_q&<Bg+d13=w)W?BGIjm+
zzOSo)dJXfPU?LRepiTzWqz&Wby#7iqb@{I5%4g^~3d_Z@D(;Z|@~68A?f}RIFodXW
zE@u67ZxdhE)COa}{hJxe;jhan?C76bG@G6maf~|nt?rYw!KSv6031GbLPw=RMOR^b
zrB0hQY%F&BJbH+W1DQ3BY;=j{$$%yCbXMVhGxude7mBbbx8vOPG!L^=Thp~sU#>u_
zL}~XCZ`oTYaOo=jPj;<7Eao<-2Rw}`DKuy7!WhJBsp8~%u)JCbWc5=bDD2>t{+&+H
z4A^ESA$EW;$E%oQh%XcJScV~eP;juMtnz4Ptjh5RA<^w9Rj*@~=)6|ei?qs(pt&hj
z14urNR4qUiVQU4XMeuE)-zbtw;y8UGI7b+nSwMrmkCLbeoc6OK-E_Pj#RwtM7<_wo
z;~$6h%|Yqz-aA?_p-$xZYbh7L+VlM9-z3t#hwdu6Ev$`NIf7354l2Pl2J8bv-&{9u
zI{JuQ?E4ve-8c>U^SJ9uAjf`RtR6J=X+N=9C!&4!^|QZeEcsd$m?Tl{@SG7L`<9sF
z=MQXK)#6l;MU9A4AJm`T5KG=C-1SHn^P~#c^2}kQi)%AZp&ZjA_1?X@3sH|BTiG&`
zR^o?-m!+imh(lO^pFu->>vtAQDHYrCJ&^!qq0?L#qQY-o`5?A&Hs@fmjr}{i;#GNd
z^+?n6cd=`}+#ai*Qdg{ZpIqD*uOY87?tqPkK-6Bsw=upKM$JcGRxcv;V4Z5tKHOG(
zcH6KIN8A@z_<nHRf^zLM<1qbQfUFHH^m$R+5foB_7JN@9I1TozAeD1E3it-$7Du?k
z8Z(yaN+v$Y!U4sQlFrd$*c>SJd9iOhEb25N#$N#SeC(cv*oU_(xAu3nP_rCWad+0t
zq8N$s!NKB<cz0flHC{&pPJ^~pEkfmQZkyxoXC?UWN4-$PC@4tbWu))$69nL0?j{Ah
zch>KHqPcNXS(zD#*tZm_)LN{oVxp=LWaDZCp5L^IJv8~F&SUEo6!#Y!v;Muw1NSkn
z+5UR<p>fgU4`QEUp4Y)Xe)&rS|D&^{@cieRK1YTaz+#!x*%w;)TP&0rB2>2m`My;z
zkn&gxLa-b=q@O@y8X>R?vke7>jG<U`=%iW<uwuWIEtj=<;TE!9AXXD_n)bXZM%`K!
zay`h-ysM<D_=7@jN&W|9BLW=m022$SSG{<b=u`1X9`TvBqDGuper~|~J(=6awXQAH
zP)Mlz&IFtG6ghmX&MK2-#!B)?lb(H2MCbHaN>(;G6E|DB%n_U_cXt@w5hmlbYWhzK
zwwQyaOq?0mwK_^wB>Cq;gjZZCEX+{%5J_Mkn5GgXh0fIo&$ujOX=_AyTH=gKF-ot?
z*{)TkZiTAxu6Zs;C~fYSOn5!-JFZ7>nJVvO(c`SL-19?5x4wQ&9)=eHhkOO*s5zPi
zyv?^#B_QBGQ>A)Zn#pZ^(>PykVlAnusUBPUWS5Bq=nLBREc0!QRD!4COBs7nm%Utd
zci)a%f=-<*9&us(pm?B&MoRhn{yjHNFEd451qII0g^ckr{`Rqry1Wu^N21C)nNo8i
zy~!AkZ9?Tq1&*a#j+Z06NTFsH+HY+&zE;R))@3SWPX+8wr_@WnZIF_UOPgRVN*;ek
z#e=7-^>%H6uH0b8wES4(_4thTv|7ZiTZ#G`+c!GubJ}ACDkds1v<?||#<+3>9r?lW
z8tU_u!i}k@``AS4!;H)CWsucVdN(#C`(fVXx3xqnFSC>|@ADtB=~*8P%#V9%H=vkv
zm|5%CG7eL7c=njvPSI+(xf^_$w(y>`OIbcOd)>Xx*x+4jo1(rfPvEY>*Yq50D}~RM
z(`Fl7c-v0E5Vf8imJuQB5bTKJL(d(Hv6mtK7}qJ<S7x4<-<_=*2+WOp7l0*!#~SHo
zr-6Lbwd3^c-x7)ZD65GLCdM@<R$BT~hl)x|X)paGbz2%tQaSh#-!S{}9T5zc8;sAf
z+qe^0xY!hx*CeiKtgO0eKI>c}Y?&>sSR^c4Sq$a^#)TQH1abA%j}e%>%|WoNI_62|
zDiE>8u-%Hm+YBk3>(E%vDwRD<t1GQ7NhI9xo1@~e4SdnQTp{|_Neo<2CuR|~(ilrI
zvbMA~*DQ8+!qm3ojHeH@Tj~5g0nj(5K6FM>P>wU3%a0i)jUk4nuG5Dv&)v|>f7>|L
z(I&_Ui{Q#Ow?iieSGR|SVeGT3jJDt#?5;B8AvnKj$7CbqSNKz?=Hh+D_y!cmg>S5*
z`(yekKCC4Icaj!ABa@7!p&;K1j&t|9#aO$9O_Zybr$7=CPL=TQ7*#cxe5XCqf`aYE
z`RvPUa~&xTE7)X-Sw+y_Z2?@~3*og1DxaRQ?Bdv{uvxw6HDMffIKa|9$S*;ju!Yr>
zxy>O=!BrhW?AKaMLzn!FUpB&iuJAUQgmLqGEr%3V+%A2+d+367k?Zk@T?a}><Wsce
zcbz<iR}*W+qQ2~JojhvQxfaTJZQLweJaSAlEYcR1nyN}m%9AgQ2_`43GACGuXs&ph
zjGLVBNazr(we9>Q+;I*Cu=P3XtyR)8%QIN(jH6K6-<P&^P_r1TsY;ln5e?$kYdJZj
zl|eK(laFe7g<i1Zv3*wYTgTxN4pXB`LQ?T}=Ys6VS++1?Y1Rc~R*X{RC`fWPn6AG_
z!deL>?LDX;nC~pw&g!inDU`f(3<NL2`0z4qPBK8VDrV=|3(<A;IUV{IYhCDuG#4Mx
zYPColiWr3V1SagOOtu2&Vv(Z=M?k{33YJ&e%%N~j8>v@XbrBFRZC<8Wm7rxne)0Qe
zY_*mH`z#fE+`0RZ{g!_~QD6hIOZ3a7@WJ{@u`<@)x820a9mG|VbyK0tQnu^_+c4Bh
z)+>Q{4pMI#fJvzHES1VSBfQL0pJbipOP)3*p(am$!ZRC8d!^uur4}3Y{{S;U%)dF5
z=o?IFAd3;RI9MYEDNKW&&$eOF>?SKlTL!bI;8Lf(RAnSfD{hH0XRD+tW3UkTZHW%G
zR^?T?utWUjX|;<#l5$5_V<R~)<t`3Zz_E2+HG1S65XxW!j1Cr!;lAMa#po)p`XujW
zQa4PtEybOMJ1zAThQ(g3V@xw{{?uNL7F%&&<8Z!5sDpj%Bx@MIa}CB_bkuhT?z5eh
zJV3IuZ2aZG7bY0D;KGK+&La)pX_?ts;YV7vlDV@pTzl*W6t8e?KhX$2rTEoIlQ;^O
ze3>{Bua}Csa5Jg^GBF2QP?w<YMwN-#Vg?k0Ma&8^Q_S!cTkKC@_HNXTsA6CT8f~f7
zTckviwR+@iaTpYfW#AD@ktN7t<WS@gWD&9uS%9=5Q;^9>D|jGN<d5Ph{3;HoGR&2s
z%`WCaJ*pt33WK@*s4|EVQ=t;|6I2nsPQ^N8S%P{Y>NTjlQTL;Uqw6WyV<C>nu&otq
zTd}qkd$eK;E4HwLLipKdHd(rbpM2&_#E(967UBoO0m6PN`<`;&5xyntBYZ>n7uD<`
zd`-r$2wxJuAbd{vjPOswr-V;@W+mcd%6&xm&}WK5?Dd%v5FhwVIf(ZO?-AZ5yhBy?
zQ0{HQKL~FT-Xy$1*iCqy@EYOogjWf#5MCxHb`f48yhwO~hJBuD{*CY);aS2ngq?(^
z2~QE8B<vtOL49r~JWj@Kgsp_f2wMo<gw2FU37ZHT2^$DLLYFToAK@je_azk|9w9tT
zc!;o$@Sra#5Aguuerk6g;a<W$gu4lM5$>escM#SRZYSJExRr1Vb$v78CTe~o;ReF>
zgzE^`QoCyiR}-!xTuHcsu!e9sb-kLJUq-l;&`G$2u!<U7Ojt>{h;Sj{0>b$|V<F-^
zLI+_5;atLU!a0Pq3Cjp)5tb6pB%DELCoCZ>CM+VHPFP4-;7cq*oJN>WIF)b;;bg)*
zLK|T&VGf~{&_b9^m_=wNG!bSJW)P+mP9jVrOeHk>5{4og2qzLwAb1G%geio{gh_-t
z!bHLZ!g#_sLM>q|VGN;$Fq%+Js3KGnMiD9qBMELoIbj50IAIu}j8IA_@x_-QiU~sr
zLkLBLLP7x{pO8n$l^`--ybE(VWONa-30Z_pLIxq7kVZ%)I0+74Tp7Ynu=(Qnf==<p
zl_HYKXeC$(W`c>3L@*K(2?>OFLL9+Bh@}x?XoP4oMiKM`9U+nsLC_L31T{fLP*R`a
zgfKEH2y%jqAQA)uBY*@JAovNrgkK1U2nPv26MiE6C=JVgknV^bAme_*_k`~V-xBr_
zz9IaJ&_no|@D<@p!WV?k37^q;|MVGbh))Th_zbwf*vEvAe1>AghlIU8!zjcDK0_tq
zeZqT$cYTH`#5+DiHDV9pZNfjO>$eDRQfF^aXS)fn6JDdv{!Z;)CA>m-nXrrS65&N^
z_X2hOJmGKT{Bwk7X}o8Ah6=<^YVb4-^b~phBz3lf@C0Ey;c>z?!dAj#)b$qXx|_P*
zOkF=p*hJV!18pGq2wgO+m$07j2zC81;UU60!h?hde6hIivip6pBN6uz?)AlvN8IC!
zoq)L87dsJgmoIiQ;!a<z8*v9!SxZ%Jrz*Emm0PLo7OHtO<!+*yHxh232G<j=^TpO7
zuBGPJ5UwU%MJ`=QHLswWYY3P7VkaS1Q_af=ml8UCF%5`Id@+rPRlb;$5EuJmrXyDR
zV#Xpa^2JO;Tu5aXP|fqH%6abf$bFGjmTw|zEPFK*EKi|6iMj*z3H1pUA8Hq>7j-@A
zBd8CfK7_gs^+D7JQ13^*5A|Nudr<F2y$khD)H_huqTY^ro2t!n6Y7nqH=tgRdL8Pu
zsMnxgjd~U8m8e%J+bnBPFGpRCdKv0SrSOYz5KaJ#a0uB37Pi6{%^$~eeNlXAEg>xS
z>G{%HL^z$Wkg$Mo8eu-+RKh8QlL^BJWj-B8DWQZ=Oc+WSLMS2>5()_UzDT}K^9Z?w
zD1x4#BSaD+2wERbN;lIG)C3hlNeCx|`Lukh74B)sf1&oEevSGS>X)cr;B<a~`abG=
zsPCe_gSrRxZJd^WpuUB=9rbb4ZKzvOA49zrr{WgWZq`AOUgp#DC4UwLXDQ)K!Wo2i
z!YD!o#bG4DO(-XfAPlEljwQqpqB*vRqA2*>mb<r$0{(C(z)n<A1oGu<!W5eI$>iB2
zLLFfuVFF=1VH}~BFqSZeP(v6^s3ueqDhVlsWOCk0un^1y6CsIUBqS0N2=R2AaRh_=
zW@InwFQ|u552F5z6Z{kEkElPO9zflX`aRC-cc|Z@eunx_)K5`ALH!u@Bh(LZc6Xt^
zg!&@t3#iYd{tfjx)MrtjLEVY^G-@~MW}NXyQ8%G(MBRXTGoO8-mtwq}a1LRfPmf0-
z)<&31VVOf{CA1J`6J`;b2~C8Vgc*eCgp&x<2vZ4-ga*QigcArJLOmge;G$4x6S4@I
zgbYGDA&rnqa1tCeH+F)JAScKOB0(T9dLqGnCo+KQNBtZF`zGoesJl^LM|}<T@2Ib$
zzJmHP26_wXMWVxUq3E()z+9H|YdSpVt?Tfts9EkgcinQ2dU@IM+U25pxe;;p@^#DK
zS*|#zW|`;gb;~@mWiiVH)mb%XdX}y`)1y9<Y0ju=_tdw4(!Rf4jA^fLZ)soBeogys
zG=$yVzOj90yVxDr;f`uAF01ZnzoK1;!EyoGStK_nx2q$nm((osEMB+BBU@CsNGRLC
zi0xg(gxp1}Zc)=B0c&koWKXN+wTl)R603EKau>N5iKo{r@GM-nz%y~df(0uU+`iz6
z1@aXO)+`X#V@hx@P-?4BtC{clU_OIwLI8BAJA{BwR4v#l_<_MUg5Morr(gh1#z4$-
z&Godco9mh5YVowLYw^r>&GIz6nmjXI(>*iRP4}GSn(CRhZmOrz)!;c1>!0AN_juOT
zd#1Q1c_y!$<eBK2;F*B-@vd6WxOKIjv921=m~}Otx*9gxRqd$~hgk3p0%rVPXznoY
zGt1OXriCV9p=qyapGjPpv@c0mVPuhsD-zcvijjB`=#pSbSd(yj!ukYxq?8af3!^%s
zgoXMJy^yPS>tEIH)yqJ?Rxd=ZiM%~>eWW-sa%SW=k%36r`bf4u;)#e?BE*RiGb0v6
zh>;OIFY4S8uDt3<twrk|oud_p<!H;b6Sd+REpuyK`PFW%J+-=AGf^{BBi^oIZjCd&
z`Wsb1CAd{s@QpH{6aq>HBC|5ae=%)kVmQvtMiy(S79VH)7o2in><XyQtnCg9Os@5Y
z*G==XRbIywesxcp>Q$`rf@kWqhAze~Z|q{isCsV<|F?B1f6?mIV5+F~nx-`P#I<Wp
z6^*st4xV<qrF4L&0jo4-&RE>Oc=3|V#hG|Pov|1#OWN^U0>dk^eF-mFvKX*R=5d7A
zSj^EbRa)FWvmN`u0yHm{%se+ks&c$O{;P7_JNa)2`zr_k|62eTGGEn;2QEau7;v2~
zj-N>%BMG|=z<>3C&k&r4U$?+I*aVNklkft(4&O5sG{Hsi1bhr%!gp{8pW84N%aU07
z@BhTbZ;Af``FzldJ3ztzqJ7|C;0yl)fiG}-h!|kG8gp?n=V41AD$sMJ&40DO+yAmc
z4LYf<PIwWm`&dulpis{9fgwCET+Gu_i+y3Y`PchzALPzLSOo2`6wZQWa5gN5b72Ks
z04w2QSOu40ELLFpQn(CO!{x9Bu7E4yD!3Z1fotJ9xE^kR8{sCn8RK{>+y=J?%Xt1a
z{JKsm<t2B*z3>1$guDyxhI`;XxF7QmV)P$^N6<zV%0G;jwQvVo??o%G#ck{H%L`rL
zgAK3|=Zx}wxo+42kHTi;7M#tkuniuE?KqD+aAu#9Y~0e9KYmTRJ`FqJ8F&_+gTKM^
zxH4XZmtYsX46pp5l4trYJohU69bUt=wj17nH{mUK8{UEU;RDzUAK|L|`l#}MV2wRk
z=e=O953$y#@CDZF!J1T$>bxtJelGQ}8{6)MPgpn{U;-S10H*ltT_?@ZjnX{w+2gZw
zw-jeSAL}vCXXw8Exp^34{4mZZ&++t4!P$5O>vmxT`{H-(sJ$GV9g6ohtixl$OLhfg
z@mz2wct6|w+rB83`J{GF_4j%>qI8FE42aIV17i3o{8NeyMUP4kM~~O|1ncl9^F9X0
z_9JXd(dTWsePA12wg>ZH;O_7>Mw;_0X(qmc&-&A!1<QNjU+@hakgogSTij2+hy9rU
z0WJG5ceM3L%a8c=6Z{MZaRz^Z-T}GZBT9O~k8_L%3??uU{D)JAt&+-^oGEZm3uj8E
zVj8Ap5iAmqD`7{JsQXLwN0n%fQKpnEQ7oFp;C>m$;#ndy;=XBOW@cf@EM-7hLVt-B
zOKi-}9KkY!)H0#Jtp#hu4XB&Wa@m=9<)7!u!E_!gWJPQ!D?v*(=JPRMie<SHE1(W$
z!KrXi{<-iH_8)`0O4lFVwdD^&EUXRu6sYju*}F}Al-0ABFd`8Uz?nLYxnZq*2Am>a
z82Evu1iqDz4ty;;82Fmy1@?nVTr1AO=io!xI5-DSf#6>(zJoiq2w_kH<6#2SZv!p6
z6}R<L_Tt9M%JA&4?U)t7%3g$UoW5J#(K116G?v?n6qkvU^kd4yE)(jZy!ZY0p2f?q
zsFIvrEa$zRH+yuw&+1EZdUp5Z<}rP;UecHdAuLRxu%)<!qEzRQf`a@JLQ$d9mJ%UI
zw!$GpM~DUaW<iYUvy2dUo{8`LGEuDRwF_q@mrco&vrI>vB|1D@w3xMy0&8ULc-xS)
zM7b<nA<DzUQioL7JZFwgd07>onq*3iS0PPF$lj;q5eL7MM;tm)R(WWf@OeqY2)p7e
zty+*P!*5M9$J+CfhSzE%wekpKTw+pKxIRLaQPbReW1=HYrHXSTCOLRtj@~kiNL=8c
z>}h!nq<|CN<7Z?~!xpdyKHsR0WaDhzfzRD0o^oikws<WVScJi;R@qWiAhR*O&FR3O
zI^AZs8Z<0Q)M!#ocAL$t(i*^)5+4?2njGbkdmz5NygVwdq*z~|$H2~<F})zMC!Zzc
z%$Od(E5Bg*#XEPh_?<JRQ!+OXPteA}K5XKN|6r`#yv)o-hrvK|mMSKPMToW(r*p_q
zMiUhmW)qWTT^fa<IIp0@tdX7QPn;~%nu;=Ag)s^ZTcgm~Mii7)r|K0?vCVA3EPF<*
zTvY0`Ox7C_t(Ga`GHkMQ^s#DDR2!n7?cIYvo~*{muE5CVz^=Zy<^=X`h-Bj(-9&qk
z>L67?0&*kLrs2O=jI*l|c-wIqlkM?5685cZHn>59lM}=9ks6Ce&|pXg1wp#|%*39|
za+b5ZCtpWl;9_(u|7cgad5w;~MU9U_e=@khW6{=^l&#R3^PQ;$Caph7W6n=?7MQhK
zbAdB8->hMuXiWvF&U~}huF|O#3cLvF-UEGU*|U8qzk|Kgm!_DqYcZy=klq(l5U$ze
zR_P{_uPi4KpH$<9zWgA6`#fXUYWw`L<a2)xdvSPV8clIJ?kmIKEgH?O*5>BM<>aVb
z@$re>Ld!;bo<^g>#AdJ$nUtVW$8TlX7*1DU-$tEH7?;-_*ypzLRGf}qwRDZk$<1>q
zENPQ0p8go~Ma$;~S8IMg&6vJG$1nPl;W-5b`U1SIO@HbjgJNT2{E@(igV_emD&O1i
z>0kx?Igw(gI9+YZb=Y&0G=l#US(GI=B_-DqCHk)u)aD$to76+HA97XXS~V<Q#!|GF
z^kPSsF*RX8h)st+(dt#AT&+{fk`8^`Z$GbKNTjVK<Ck8MWt7?@Bd`?&pQCPh6by$A
zGz*WWMygzqkum&tn`T!&Vk4M~C#Ul`L`6D<ap`HU6pfCjG-^d;H(S0rRh5u3DZ%67
z|J>(R)MGFbd-%F8>Cu;zWa3Uya`-99(NnN}|9O{v5vIU8ovAj1A@=C-Mw`XB0;luv
z0+n^^jE?Aqwt~#G1poG=(l|jTQyX1&n=4T@G;OuBFx?*giy<@38O20VljO3exDr$+
z#o;3z;V91+rVm+OR<mYY?=+Q8tx%{jw3p`OXw5~b{?yDVQ|i*HZ>SPxs&pE;TqCXX
z^1v73WpW3Mfh~Pc)kxv`P4;|yzQ)Ku837s>Uvoo2#j+pO55+ITu<qdgJgl2#yEP+?
z^7JVNX-hHif6jEvPmm&#DMcg`Lz0uD>(TY_AV={Ge@eH3>(A*G<IE_kvc6X>y^~#v
zU|ta$j5>cw$Htfy;$`E`e`NNk#SLYNYMC-p6;V*PU`+0~qNLpMv)X2j&#h{|z0q}2
z-H4blxgdsV)#}{plZIxxGh=fmwzRcO$YmGKxoK{p!IF}g=dxrZs*}@_<1$7#v&!=_
zbBBADOq#xWx+@~y91{^|OEje=YLb$Tv5rDhCY3M7s3+sPu9V&nODXExAVs(a;=wM|
zxmB*X99KMkfrfu1!l1@o=32KN)NY$ioj%#7)|)2l5AV+<<@h=+$VrUXz1M@^QiSnB
zu`#-j*@7?5!>>fK|BZ<2bjT1|m(l#~h;{HVn;NB#FE7p+Vu_G{|D7VjGBmreBt{d>
zhWPhJY2!we<P5cH6(7H+z<oVCzto`C`}fYaWf&APrB1_M_h)N#N}0ltVH1jkXnSU?
zoZJ2N>>+NK8#3&@`}lt;qr#YskY#}#(x7%zd|ax=sqGdfZH{xIMeW2O+_?#y4pT;I
zH`BS5{591Y)h2HPdQ0`-V~2r=-_4)Fs1l5X#N52YH=26nyI)4{{!Deap=@Ygagtg#
z(m!XooWJ|C^P<DlY=S~>A5oBAmY%4`*Mo2+bIi1*;oCnfQoFr70yi?etrYP_U9?KZ
zWMLY;<{tkzzHdzpd?j8gD}y2!?u&=it-|Y|!2?v$MyrXLQl#I>%@Mj;)T23h<#|G0
zRyRAPD{LN~L3dB@kuD66op>C=9Yi+Z5GgxiB}*$^I&5C5G!@iLD{6myWzG0Yb}Y%9
zGP*cPBM;YxYwV?yOGY$}Oi3HlI-+oVajGUvr4a8<&ow2*M^>(S>EczdT|Oov&YYB&
zZ*s<~j8<db)N{v8y<kdef+-=~kj`gjC4j6{=7cD)K<X0^E!>4?_(Wj^C?THZ`XXA4
z-7K$5J{QV+$|cYFfth=noZ^&rx@2@wUWjhn^xR`v>7;AlxWfOwIX&IXN-y7a`B?uC
z$u&!wPC2Dv(Rinja_y_<m)V`-RZhG6yr(XyUfP)7+njY`2gVgW5wp>gEEwLEnA$C@
z*sQchTcbgl*v%py)j4tfDiZi_BDF2JO7vX{@(Gv6>FC%l+B5Q{xDNJC3T$%h;iR4?
z#cUqJ-lw>uLMbL?GQ9ZDV^!f1N|{U<5$@m0E<lsK*@)+B@>ywcCK>H<s!uRsOmrBO
ze!nu#!B@q~z(G-k-rJy{ORn!0Zrz-uRvRJ7D95F+L9dUKb+e)k)|NQFrn%GTbIwlu
z5k&Ht#V7`QIPhJPoNo|SI=%l6R*A03<=nMxc=B@MIZK1iC+T(KlSM8+{s>^?uKLec
zQ8ksg&1ui(-Zccil$mA2@N_X|gV`Jz&p$5)X_4E7wYZGSSrq=TWn;=m6Xf`ntKz>q
zE}aw8&4zX5&I<;)f1k&-i%(xpa1{(%uS13w^)G028sCVDFgktot#O%Au2d`Z1rtuI
ztv#nPKlg;Cqb(K2tzj5toQ*KH%$yu+u+=xt$X@xzwRQD3zkSiTv!)Kk<M(-%)HuF?
zbEkGpI^q0=EUk8rD%PHuXpdE<CHp5NIKs3BowBC$#q%zB?W*z7Nv4?W;H=0DGXCGp
z6?XAccL$xiZ{3K8?p94Vo9|ZI?MLi21CG_d`$%lim<t?yI{ati#7HSVK@NT-zC=nD
zm^Bs^Ei4tg!Qa-G7C*y_T#i})O17*o9rT@bqVKT~%}>L(ZdB=7B`+C&$sXhM+o`e8
z&{`88+H!b6@e8GvuL!L&5P*2>_iFk5f)gIWM_nN}<AI(&VLy%*&p!nn%_9`1ZN()}
z(j}9gGkn6NQ5C^Qt3L>M74}C*_4>`}bjubEtHLp5twUY-&}{D;`Inul__W}C$)Cn2
zr5I{9X2oWw;$m!cD^s*Ns_g8PLVOjp;rlS9s3qH=7ER6;Q=2Y0IsBAMlM{tUXIzr;
z{2X0UGB6l67JMHZ>$n?T5G@^d4YBg4)y7<hGdD>k_+OV5ms_)wB1QjO0$QEU9HYwR
zT%YZBSu}6UKG0e+OH&_C%{m;+ykB0>N6NxA;o^{AUg@{`(zA3aC274og_4X?TVz&x
z-})PgQ7r>kS8^2p_*;@J7va`I(vVhlMjYP|#JSM-vLCSW6nMIHri%P<8N&m8^xYT?
zaRn}M!0B>irt|sq+^F}G-DV~TOc|e%l9HXEbU9y*vLqUmFE~b71tu`2Ovp&FWhN*+
z=~>PU_H6Z)BhA${qs@L{;LRwbO)>tHCSFxztD9VBXFKpLg-bJ1iSG;#?j{%EZW0Zt
z{GAaa+=mOvEZh$&NWiTla*mC!8~MDW-Wdb_$wYc(40zMYE*jnW;sxhDv$ARo@|>qv
z)%d?Nj%Xb-Zce$;IHG0D*tzZ`A$jHNSB)EX!QZbw@6{{EkGSBao9a5I<qn;BPL=1v
zX*ok@cJTKZ?!%jLb(tU&^17UgtwIOrxpO|y<7-2^0T0Ix&e#^sfUS6UPjDaRr}`sz
z-#D`<FLb6loxyjUxVh}~dlsK8J?RA|jmych(#F{<+G<k$-{!fZGZId2FBp~<ExbQ-
z&CFc?_JL7VgsBTBo_xa436XNSe^a8X9D+W7hCUbI{#>yIRKkNB^K_Z|LjHkhXPKUF
zTS=MvZWgwotSqhso!`Wl4LuZ+|0NjYeCYuG=76ms^?!)_4(K+{JI`-sFen3HPzSvZ
zfI;s>BS8`*B?2S?R>_hjQIxD|S&de;WGC?^Zb|G_oH&V-?Aqs)b-D^AGqGH<);gD6
zEBh|%b8d4l-sB~Be!jQ5O`K$NaV+Y-Zw8GbDapy(JL6d(K$P$M{rm6#|Azh;v1Bts
zgpt6?#Aq;Jt+-9RrEqmd!yPV~sL^&`+&A3V9*pB_cKqe;PD^IA!yNLl>a~<~;d>gc
zm_52b-5X+b5{e{5u<ZCnpulMtKG@vu3!Im&92m)NC}-4^Biil%XPX`W2V26UU-;j8
zUk9>}fouPZ2tiF60TbT={rJ7-xel&_wxdyQKqsEZ5bsC9R7zKXH&f3%CO>Z<Aj3ON
zC;<=@tX`QdEko)WC%)y%A=Go=bJLkS#tS;B7$>9(N)az_>G5@jjDh|&>(}%Jx^{hh
zJa*e)N-ZG?LL!&RL*3&EciO8B4y?U>ZGRB!8oh5_Ty3^%RgBZ%445bzYgIcVHa6*Z
z2h!zj{lkaHLo{Pn(?-^8aqFc<i&1U!8`uQL`cvht5D_cXg)LAQT)=q-h+wEXXHbdM
z^H}bjbvwl?Yzm8Cx_Vj28QP@V7I|TEvqhu6hQfe9X;)s8Dv?B#QUaGMWFq2w`RIGE
zG^Nxnu#kvB^uzD}2(;}0^jKlwy$D?Rz0k4^_=nC@+z#~)Ys;*AuQ%&fM5r5dn_mj_
z9Q*d&`@VUsTVYT65KZJLjKyNLoK5aXaKX4;jy-+k^LsnfJ3n_nzNZl{uKvx`nw-_1
z8y&%SG@gU&;~+l&9j-48)?S1a)l<L%0{B#kN}1Cs3%mguO{1F-d-F_54HO)wi0<GN
zI_C~uGsf4es%49+w$jNjX%$aIt9UZzn&lHge9w&8dc(=Qix$tzsX3CiXS~rKJ8s0J
zzt+i(JvmreDJ6eH%bzA`TQZU^=;fMsb|kzSSU_o%Sk-1*I0uV$kyzsiW0$Zmd4oEk
zg!-|=fq7{y{Ea@yF3iB4%i+#n;cKY)cYqP!e^#lmpxJk?2|y14izep|lUTb$j5eu7
zvE*uj-yb5ln^I~k0@KZH;B{AKQ!ZT6DfPu%Eay~`-zQ#z)lxc~?PL^M?7@X6o9W9g
zyw4lZlY~^ISU3vP4waN3^+6BxWaVpb6Gw?3BTt6;h3faL%m^LX#yQ~kgU)$;bxExu
zjM#6Cm~mdwfxXv(b)d-{nF4~*(Glwl&10sL^=B+b+{Zr3;w5&R-NF(o*2&@u5zC6~
z^Vfb>q7^EvYB#B|n*H6_a5rMJW$;1wFH4G=2$<qLm2f2-76{Ji>6vL%LB_+=vsb2P
zq2^xV)9wN)p;iBX7sE42NZ~jxlc~2Jklmy+_4rtSM#Ni^MDSGxlxh=4_2E!7sL4Hg
zTlv_!ME5;&$JS~5eTm*})wEi!k&7wY;N}BecRsNt^7}2_w`I-c-puVWC#{x9)O5M4
z-#4_kGJ0sln+^4b^fuN;TR5ZBYxg*G!L<)=`ia(?cIQi3-b+`Ymv$3xz*6D!b(z|L
z|3&;Tpka;ZgoR^+)Ayp`Lfx?FyI2JzA&_!8R!c^Bo+pAP6ic!i;(4xyUk}4lIQ%+F
z4lbp5#^}%dAc2t+w`Ca6zl#O;E?!hky9rWa>KtAd+x67m+`#cK-4Un_WDGKr(5p3E
zM<sQ~ZcDnB?ik5)N|{0;I&JZoR7ST&UAk}X@Pn^>sE0N=3@Vey+!=?Uedh7X{$Zb!
zb5hn&9Vv;3JPwY4L+5tQOzc65pU6!B+dMvV&hMYmzlhHODU5W7!3+pv_LBTSx#RzI
z_WmZdy|VUsxY;TwV}m7XLk-vnwn|rF!CN~+4D&7*Ij*a(U+GPwe}udW1^?8WufL8o
z3fj3~+U>a_zkf;V3686WJJIs+FpEGm7@=AUa1xB@>-`T7Z@jO@Dr`xwFKJU~xjdKL
znr%Fk+2kEVF@w!Vi3z<%&8Ai->sStFybw#Nh#;kg{LpPY@})f=S*>Pit0{Zv?1|il
z{*Z=PU+OLH{@AvwKc$3Jlftg{4QK3w16RM@ct-RHj+sLRXROPwGI*?=af{O;$iU%q
z$Sq;F#bZ<%+$LUH54>=^K$7NCr0>veNs>}%HG+i5H^^D=0dVgeICke4F^_MWtK`OL
zScc4$<mvA87`z?Ra~tOI!zJoi_4kwO-Wk5PvJXjTJD9-+&)r>1!~DZ}j_$75(D-e%
zHZYIb&PWIOe784!CDjxYUoP_jh9~{iufjYN7X46EO<-|`5rF5TxuH!EqDEln7Q2L7
zmLB$=+1RoBbGx=bJ`?*}1fgE{N~}xoGHE4ZN-C0TT(N?qy1&A1*Xa?u+jPEy&y)8v
zMz4&-^=dVnSe3la9@?#^wC4dRL*jzDFVZ(Vm56Wn$ZeyPF<{Td7iOo2Br=JF@!BE@
z4Xu!HW5;)5=i@nhz({pOS4Rv6f58*(@v4l-lA2N!EXmz&b5M$TG0KuhU~GAf+y^+A
z6MnMphve46^EjGXisN^eD4lyyUhrE*bf`f$LkB)ol9`4(c-PSZAI+8M8d*hTso<7{
zni86l5DsL2;zzXiT-yCOG@)i5L^O?$7g&yXjWPutu7Fv-`ZJq$K6-l~eaGW7BPWWe
z5#vkP6z^uYWs~JFqYbX=uq4x27b}MrAfi<AZNrme51!k0?8OHw-Cfu(8ts6q9jhwI
z$sL*eo~e|I%>@u@!w|I#Fd~OR2Sx~}ozv;u5p+^5+yN6zh?|>;=pwi^@`?yWKcf<>
z0g+mSSI0$LMEKL9(;{3Xvc(}FsELX0OD_1D_%FF()4u~+P2(DZmYEb-O=f~Gko}=#
zt9$40>oDS7sRzI5+0E18E1RcLt%9<yIFI-L)34_H31W|XMU#P#{aId065>M8d-dnm
zuIax1?L!F_^j`!nk}5kl9PU4M?s!+v(XZ|~_|(qCZ;6dFiE`YGWADZyh3P(4XVgiw
zZnME@P|+r%rg-AJ_Z@rbfx-SGPj7bZxyRc*6^CBPeC=KQvoKB+!E9Y71~ssvAdv|9
zsCmqOE?c&64He{|x4BSCR9sbcg{S$U-lb3kxRkznDSZjz2#dyBdrzyQBDj)v-_xoj
znhr-`?eNcvq!f%IX4Yu+TNGcE@vh{H3R}wSP1@xLbvhD0b--IYHsK!(pe*qnyGJLH
zNF^FyS9nrz30GqcCyxI}@B<?oAK4gFs+4BGfQaZ{$P-{I*f>`%vr}Gl95kjdAg@fV
zVYRFl6w)y%gl29-d8#soe&`+a7~*iB&lM`cs;#Q1@GQ}lR0>5)9-d3c^`?1FrOsJ4
z-R5#TcdrNn;sDxwF5_-JE&3Ow3S#48I@1stImu|h)Ch?S=N0zkB8+^sBjb@lvjTzy
z-=#IV^_?kfgsUBy2$#)rl~g49Z6Y9+iYrrVm%_Fb!u|~pZ;YwnXPN!>Bz&J_XsSH6
z@!^e8`1!OcAmAz<f||AuY@bV~b3619(76o`$ABCGyf2!AcNc2qfgL(CtTJnJyN726
z{YU|)$~hR;oF%GO>8?gA<|=e~y#l^GyfCU^@yls}cR(2P7VTR(^$?5SpVk?L5e`OE
z&uYX&Jgf<aT<b%LN3MagNFkwo!LTt}^w6IY!rT+^cfNMq1M42xZ0*U1O*DbY%*mh^
zzOVnGp-uPJSoQ|##)D#rDWUZhgDYxrZNnoQqauk+rjW^CphJFmK__G~K)_#m3hMO}
z;MCm14{!U_c8K@+gHuyIwROncw>_~9R!3V(vK~dxHh4Q2M)Gi;IDGI^l~YK^KQy>~
z-9aP=)rrcU>U6bMF<J^$Up0Y*Wf|5Cmf@?;kYzqY<dejf4Iuf{`4E(T2y+K~=_44!
z3P9f=eY}Yb--rF+zYFpr$wf>`5hk@J1HOb^(f800pJCb)LWb!paEUuI3O*p(k)UOs
zNW=gIt$Ko@k*R&U&D5@QN6VX<NQKM;%1f%0UoWp4XP#o{&j=0I75tMe6UAfX=Lo0|
zI<OXupIHr_$G;0G;DolgcEW{pBb$g!RBFfqi)9xqcARtBgbGv5V<#_=*$P)R^Je(^
zm1*^rhKyl6g}LSrmy)c+El6fjp~RrJjfhaXa=~EUtyH@6!C=m%)U~6$*sy%n!()bM
zz#*5AxLhq(F*YWXz~1FJ(ck;hPNmYB_IXn-ns%lB*l{Dgc&`P+jGQ)jED66zOhOmv
z_6mrJM|i~U1%EL&J{~=eaGHxuNA`kw{Ne>F0&fNWDgyUzilTTS8|W?^uhdaHN0I}F
zktJ;_Z>p?EKMV~<T?G_21}f=l1JGvJKqb|51J*|4>xaDUXxrOfH^le`aEq1+BTHo<
z9#Oh;p<vEU)9zd_lygHF)U9A)?j}0Fnyah4*{v_2=mJH=#QiN1+4b23_D9Zt%OYAq
zy=i($+*w9~ybmOP1!K@S7?^W9J%bbqJ>zB%QujhSJ~F67>fT%SG=sUhLN=t*)bZEr
zZp-&)M-<{$4Fn0fRPK$0nVW`=?#@tq=wScM2vLs=;yl#rV_<(tHU-Nkr&BIqvLzlb
z?vo>hJ~op;PYjldck>|4?JUn!HliP@g9%TOkI#dZY_$!srXsgs6XG)jPosTb0KQ)>
zZUQXMH(fR*qv`<Pvdi`@_SnHj=x&P>?4ReBl}q(@Q9$6O^RF-;Jq~t&nKPwf<W&?q
zJRZ=oV~1jJeHx(HZBQ#lVf|mCW@@EMy3*Nch$6|@%ELf`_yI#jTm^M`K;V1%oRk;I
zB_t7TqxXM9l-qN4_pMR}*w>ci=GCJU{t*u?B~U6a)|lN!G`xpR3OSWs(clN7#X3JA
zA>}$Yp0y!<0RQa@*}LEY+LQh7!(x;qA%@?tGXc{>Eha##l8d>q<CEAA1cW6V)c;f9
zV{<({mQhsxocC|qq})p*|85zx-1A|CJEPpEw7{GHgCH69-&5IJIdmww6Cu5}JX)#1
zAI|3nKWwG_sNzXh+*N(`At;tJk{X{A_3|^3b<f@_<V0<h%=Jl8b1LW7-T87NdVi9W
za0u(1Z3JSy@a>iD165eTiWgN_?FAV&;;SB=<Ocmnyb?JSugPt&p<hhO?ZRiZi`T5-
z>7Ntr^0=|pl#r|it7(&Uxwi3<O;IHc3k|!?ql1o6to9W{YgbkQKmhB)Cy8f>e*!&V
z6wF|tK7Tu=N=S&jXE;6l$}r&^#)g0X0|f@ldc_Z>Fvk>Tn!=`jeVM_G3<elAgR2;3
zOP=^cu@Z7c`Y-n5pdahMoF7(g#MH#b*GjH2ewuJ*^K|c(>1mh|^MpI%-r>XPH~2fP
zk>`8XwtumF7`yp*x4ydA|5`sT>c><!`ufeS1uXi0VF5fHfrdwUZQ=Z4m<Sk*e6HNe
zGIEG3%;p-5p}`0f1gwK=_5ylvT?gm)(?tCd@r*%zr$N`T^^rB<QAVLl$Nsr`Y$Duw
z_}fSB{!hE&8h64Oj%UN3Q0|V0Cqp$iX4NnYFN_cQ@;>c&nalfhU6tN*7N<_UV^d)?
zp(nN^Vy15Q=si<mhE{qFb{{S!d;^<{{YP#~c}urv+{IkVXdH`oZS{NZ7#cmfHcH7N
z3xBALo5Ka?sxeb2clEYt0w;AImqVTEFmiF8&x4xq8u4S$4fBGTvnj{;Jid7j&@>oC
zq?9sX2b1}sRL{6W<mp2fG>8t5%wwxdl&4DlyI$wj;kx;2KYLEgRCK04kYi}RE<AgM
zA67CJdNt{Ed!NU*TrW7YXf_EqHf?k%QP+3RxAu13IhD~M5=g9&C?b^|1D$KKR$pJ=
zYJY>f3zP>dLAg2LbOue-680{9@C#caa;;veHaZyx$4InBtsym0xQ$IYRih7_-g@NX
zN6Kn%XK1EjehY7|DkmqlcjWg>q*QFykFtgjz+CD_<Ux=EcQs~u<uIE{g<xU7<(wk~
ztN1ztgv$AntP~yg4)Vo2KPYaw64utI1<)w;Exmm4to`*RVYBaBuO5jXHT;*(yQq3=
z+}CTo8<gFor@?5pDrp?tb?sg3QF0V8zzqh3y}twu_)EYB7<>yVqOg<aOJ?<uu=qDD
zjnNb9cb5KY+4BQBl+z$vL)`g^>({O8S+lmQd+nNHbLGSdN`=-5_mHS|=7*|X1wlgC
z3F6hp+}4&kivQk~=eCx7Q|k-vZT!^uTqt=4^whnkO37eyIVPttCBWn&n3QZmM<xb^
zT?$7g_?F|e^<3lG<quA*yo8o4>e?rkL7N>1UlrDH2BxJj6>>OILQ>!3e;&#r1=MX?
zb#`RfJKt*T)k<`!Z@6bLnjeZ*TdIb-TLPaBaVnrmUwFq0@6Y+Ho9OOJ%FNW8<c)k*
zrm&%LF}qyj$@rq1vOGZnVbZW!Z){Uj#VJeB=?WRC;ZKg|)~`-!0=1D5|LrG6TunG}
zP4qftU;0c->bu6rjp3p%+~e03cYU<hw0|gp6!>6W0wEoO+`+p6;DGl0t8;R!#@n@`
zVb^kK*CDfas0opl2PiBIJ~d!|A8))hpTOMACo}<ja_S~NVG$@0jIGckRIa@(5<x7`
z9NK|~N6_O(_-V8wXd11qDdu_1Qj)2LJtpDg8D=|MB5U;{2fV`7{lqQ4p^Zgfah^?7
zJTZUr*y+Rh?i0_QJbwC6e&H&Un(EENpkYX^=_#zqTClh8zWDHP{|Dxe-u=Qu!+jr^
zzrX*$WGpy#pbYP$!O;V7j~`fgLImI*LoiN$s^0Z-XDK9d288hkN;1Gu*^FC6CK`5;
zn8!v+N^aOXq#i5q8z`Vl2emfPD>SX@Q*TK67yiVLXamB(jQ9ofX+R^<82J1|1Yoe-
z?C<L?x|(`m4muq{Gvyx{or>S_(RG1^cQwI*lo`fNM`lY$a&?5kt{i*m!HUWmb1rOZ
zo_~3>p%ixpx`X=KgJ+Kw?wm}*SQ%LO$-q!*Vy9p+`1AZs%Ko~=a4JN(Du6{rIjJ~B
zC<zL6nB?fB9yV2?O5tHn#khtTUghh~WCnGvF4b*?y6MZWYqTt996UN={CSa7NlEo)
zhn5LNp^02)8lIkf-llZ8Omb3$6C>W3g+lqaw-~wl`cmUKkm}=9ghWOum=N6i(6zVm
zci`TKz+0^oK(Xctpj9OnC`2(V_RAa$BGg-&TnTxAoGXVD{J9-f5i6pzQda)#&M(oq
zonct^DzPdsU}}-!orXrBbA-a-ooRj;Z)Q5IMik}rqJu#t*MIDn{R!uV@OKKkADc>T
ztRxHykyIg*hf8a-Y{swmb=M|p-M-Z3ht`C~N)eq@L=X~%RK^uX5^Tz)=6c2^#(Fr+
zQ9V5BR~b!AG-CHK60^fXTLKnG*kxlQr47BMyQ(3DmQkq~r_svlC5(xoEgroy<g&RV
zrP~D=kzXKZ!Q<f5FM&KB13SPbd==;e2l0V9Z%}vg0lo@WnN|DxcJ%2~DqY_WQSE+E
zJBcpfWGmT@4CXiO8T7vu8+mIo25;-qzvT7|uX|^(_J9h_(U>cbpn6!w*TX!amTpZ<
zq62L_R|Jb<BYX~x!U?kqZzAuY7E%`R%A*MQ^@uVzlt9}^$qL0V`2}1oRk1NdJ(N9n
zY8g_llI_;{3qDV0&|tR72&o*2q1rBn8w)YBc5hD4s?4U$ouA*i?eQ(~<;r0j%P8q)
zLEIQsSQRxeT-FuMTRMWv$glgx(jU09;v+@+0j{)vGS)sH(JG0d1{kmXEB=`14Cn-(
z5Ulh$jYioO1Rlg@pEW9@4YwRcw34S{S2mtdBKaCCNi>F1k_grTJ@aKgsHLx_E~Ny@
z54x=ApYRz%lwUfBawGBKkIA*3I+t;mFjunYdKLl=p&;1hV)8^JuDcHO8}J7_R-}tO
z4z`2M=O_F6QrpwKb&T4$6iBh~rd&U|y|Q_;IL(csjjgZb;KnXgYLTj~VnDqzak<V5
zA!Z11LJ+A-bw22Fy;F>M{>4mAy(C<LCcW|4P6I9?=c^r^<jQ{3=atID5>L=z3z(H{
zZDXE!Uf9<L(8_2MFSk1AJTIe^t<Z08C*f`YH~M=-5MR+MaunyVXJHy8!F~91psu5$
z1k}+!(0exCr$!82*x?APP`i@Ig!?M$FjB0pOhpgzKIf~+c<!_J@)dOISs3_0hj1aV
zsrIw7w+`O_2)Ucg*nu{HD6MxzfV}K`&n^!`lvx=DLCd6~pF>wX4R?$9$g|<m^+?kU
z%6_E{-asb228>qvDwRstdK&HhY^I_`Hsq^qYSE9pl3h;m#N#Ez`8G$vcq|sNjfN#N
zDa+w-6DpCE%5|Pt&WdQ;h5OrJB1nmvjV%up_Q95g@*I6T4SXUJ)6<GNR&5a4+y<4B
zUJ1nCH;#Y*eg%&w`5d(3$G}5p?>Ibw@ZEgBA1PJ;k$$xW0d3^|f}7~ia0UaH>7O9M
z?#=s8?mxL34abzIhs*a@4p#>JmdyzG-IX!|etiv!p?tnr<7Zw33m4em-uekPWa&bX
zYa@T_T6wdnnB^7qmetq2^hc58bBL`)G_JuaxPkgyO<l|PwMl`}d6$zarS;uZrr0Nu
z+woQWDj9LJ$((i*i5QwDa*LMJ5_+pUAovvVi@Z;n6MPDpZ1@!M*PxZ{0lUsRd&c-C
z%bwI8de8Lq9-6R@BDLsGqF&2cpLGhgTIlVyO0}nwtmO0IF<?c)_f<s5+?aZHBN!Xs
zY7rW^yu5iq$N65%`xn<O_$%y7?H;?y<*zIgycA+v-t4-jiy&wGw=48cRz`hgch}x}
zfym#3W+{nRK?>YiuZiS-VUW@Zg`m<!hx~HVJXF7y2pTn6H1jB&Rf9z{&!N+|@apB}
zBd<F$lFhXyC0|1Yp*v`zhM%0=bYIQQ!v>2YejsFPt}!9WwsQizAK8gFpIDF%@&p1t
z(Z-+|7M>vH;I6%3Tm6a?m`p|k3#^3t=e!omVw%Sfl~g6#;v6zlx*=*rGzLZ*lu|E$
z0^M?jKYy+*pi2p%-7A)TE!?l05cZkVahxCHI@-=%pgh>1m*5}XD;uu`5++=7Ov#W7
zmzAbMJe;!8k{=N-i*=D)xL}noTrwLZYLf;Fi_J9A;qft2LSZ&u{W`wYqLE4sJ~O~U
z7Qcw^ARQnIbI6{v5~gz=`_>#l{mOaln<bsf<+3s#kH;zNX9BaiC#b{3AwD?s!wxXr
zfwH{Zpvp0U1YO}ULMwM~KZ}6x;KEUl`}XeGXs0_cc62O5nL@5WchpH~4eEirN|jxG
z&KEOm(y0uvuA~|N8Ld>PI5uE}`E_zI%2*jELunaJB4ji>4Cc&a{^L@OS!;LL(BCP|
z<1gSA(gqSBbJhfW^Vo$FO)-D{kLbMpmsGRFmm~AnUPhgONZ_lI!+a-T(MfxZw^MFu
z2`CoU&kF{(5Tuk{UwHKK==i|_UC8e<$c1BIQl%?t&-WCIo-C)3$wU~D(V8`K#`f9A
z#*fxGs9Y+!#;B!jCY9Ktt&NY57~M*v3vt$+P%fVr%b~_)K<cc_oOvEQ4UH^{&6U&|
z=RUKH2z<jZoBF1rO(Jdc$n|l>Tbn3`V)#58H#zl^=+@$@>4L>w+R_`V`p{8zJ7<vn
ztt0ES22669(QmWnJ@_wZwMZ(LWTT1X#NJ}%&}7){#u#)30RlRrg<&se31zL0T*%6X
z8+-XE)G;6W`<7>7(CeO_vuZR}ZXWwa$q1}8EfYO@ntPeUInEUPq-$38r0H<$h(51o
zjWn=+;=MVCYhV_Ms5OO)f7EJScvj`f2ZMcSH>H$ORxUdjefp`;_@Uw9yH>d_66p?W
zz(V81@0|{N#G#TYD5J+~r=i?F@nq%5csNkrS}^9jwa$<Q>XHrrJM2}l1!O^dPOAkp
zED6q(G$D?aK9ktbe%bKl&;i>a`T(CkToD@fu#9RA{xr(~!*bIm*;Zc|dle@oq}Z+1
z7**npw2D?v%M3od-Di~b)9_)Rxnm+{PFW~1PQI)+D@jVKwHxD(P|&@wOCm=Vf?R?<
z=?;b*vFuddE|F3iEBf1~ChQ&j2x$RDPz4*o@jf}2z&-{7K#QFMVXzweOOOQJ*r^gF
z2`43zWSH>P(4Qgz)-}i%xO}3|6b=L?o?t4UP{kxf_O#+<1+GxIN}tHit~=#A+LRcK
zoLAnwQs}Lp`4<AIn&$-gLuEJZTxORvF5&-@rHxCmxc&$~Ld%PCnWwZVZw%2=%5Hfm
zGnTOgMvshE?^^AO`mJ`K!|d?&Z_3%zhKq9g?MQ%e=&6XGaq1~2=efh8=}5653nlt{
zk5ge)#VRSYR4UcTRT`YcO~Il!IGC|BT*mDiuqcu?w%e%hj>U&MtYWeAvz~yGv8z0s
zg0U`aHyAJxV^f=rl-9^!^#lJq{AsZQ`k?rkfEJmt4alMDsDMoqFw$qjv+O?OA@Yzg
zwZsp{wx1~$;vIM6)*1dZv{kzeYDge#$vB~Jx7#=aMHx7o-Di-7*2cRg(+2z(P3?&1
zvtD-LtBuEmS}a(vc;PLU_4ceSAiEud8Xtx}2=&ce7l8r$H@I|woqmpT{+n5SkYDnf
zOO9zb7nf^qiaBJApu#dEx@Tm{SYIg`@9m4WR)y=Ol!PE8l=QoqU?ANQ4Ak+%Y!E-8
zD+XN$rQXMXH5Om?YcbpP+i!hCYoGN`7HObg8U&>?Sr1b6SWzPgXb}5$Nl(#d`et2c
z3bVy*Fm*6^s3|3Z`9eF7UlE#3HxSkJj}aU~f5Xt|5{Wc2hO;5@`2*&ZvjLSaXh}6?
z>4_)U#MVsZHj_CSPnnAoNoHkvUjG<pX!u_~5le+ktWoamo-EWg^C`Ih2#B8XYFe5}
z0~>wXKkGHR4mP%|<*m8i^0~ogTbn~#`4qb9iH#Gq(gB^AP1s4?lh~FmPNj^Cc94TB
zes;-<`L*Jp0At8SxK<sEBJ4$=$1b2=4UFe9%KVgS*7HU3@Qp4SAX(I8fk{tf%{`-2
z$40%u$&*uKM@RktS#FDYoN<RrZjE`m`iS2R9-52=st1P#@1BSRst2l`u87$fE^=H~
z$XG?zu>t!X{yba}2XY{H)|sFXfDG_s-zn(<LnY!)5gGXwJ8M0tK9W8yEU%ZJF=(|<
znk^7!u^Klql+-(9jL-nVpLh4pbelsQ%;oBOA=NpJ2~T``cWGnZ@(<9uY}PF6$Uvk`
za^iPGhbAI2jYab-L{y^DAN(x|Gy{liED@jBTXtl_W;Xa~ug@InsN33`d^X6PV=X`h
zZK9;GP~Y><vMR=LkU0eE%8$jbUeXp87r#sOK)9R|_9jkJ5(%Z$D3vCQL({I&2EUKh
z(ssRsz(g-u-0+?hNwrSH!V8NPp$oo2CXz_C=&uJBp)QbcmAzo~cR&Gq{JbmTiYUzU
z*w^NOBJ^02zv{oiTuEk6nG2+EmO7;|oFe)3jz9H}vb<%^`?vAVS(vwq7Sni*BXc60
z46NQ#V0)5I1zfFEEOUf%9#6zyT-_D$mTu2F^AS6QSS%&Q)<D|MxkKHR?jUh8UQU?h
zv`S%j=u9-J($FTG(ZU#mec4EV)F_oJ<u<3zs1zyG3Y*?!VGMyjKI^!My-Gd>>#fK+
z;BoqqMASN!+<CzNWwZRtx&z^_Nd(Qm%+GCJx_arSZHa5<y5yoQ0TD7-^c?o8RB2*4
z-L5SqT1nHr$WW30nT2IIeYeGJc9Nt7x=p*CRmvpf)@|>h+~P1)B#{XIa~NeFKl6DN
zq{__e&_(=dQV(;z=oy(uNL%g5t7tqjB6!ev&~>(%wD$7hPACVjPg&cFJj0?I4}Y3X
zm|R+EY-g@GnKH_ZyqA{+L*|?V>OY^dHgeQLBH`_sDqy2X>k0VJ!jE!!FN>{fJm%R1
z>^JzMaK&y=L=onlb5bc~gxTGk+aNRO=dtHX3d&$R$jDR&Wp@)tL0eJRsOfk$s#k5f
zwj=+o6aUzw;!=?f8gO#>pD02X_OX7GLOhFa!)1m5%LetB7}sc&B3PV%1ILYawHTLa
zH4B$8Y=Bb9M5M}UKwbwBFY~i3a-aZuG$r!VoLEMn159sTt_Q@nsEa+?7(H1yBzmnr
zX|nKj^f@99J4rs<`kep5f6n$5KIdfD_;_b=e7vym02wXkv#a6%3v=*u{^zw{<AB_a
zuD=PKFh{`WfeSGBV;AJ4&stLtLa=`N!-i9?Ur>^0jm<3f(%8>2${cpOLS_oHD4dx<
zpu?#omF_HmmViH7kaa7uXB%By;^RuaQY=yGlz$ux=2?}B%?CpTk4oj?^Ot|T_BQt4
zMEm)*q5K7ZhF{w=7v$;?T-}`jE=_&u`iMca^zORVy+|2@E_cW%v&d|ja5!z3DI94(
zCrrX~{<K4Z?UX4IX`qzhuhTlXG=+|Sufr$I$osesbdUV(eb;`2eFY0Z^krvdL>2U2
z7B1Y=1pF&~Yu1$d)=rg9O_zGtZ!Y!ndP=0RuaL)q73j~X!94!hIj!7ShHr*jcvaYe
zq<-0~oUXa*uSm5v=0S<Z#9HiLHAbFLvmHK9%B>=4e_v<L{xW}c21+Bx^nb;Mj1q}4
zgqSzt6#TCLii?SjU>ah153wEp33;p`X9gF;#k+Cwg&=9=%4)cZ-peVtjyINtvKi+H
zP6%)KD>8<)SUq}~Nnwq+ToEg^uvez{Sgb4~#f%twvM)(I)*z^`ml~wiLf_)&7zU`p
zPOw3=Q8Wr9Kn0BGdUPNTqjE1OgE6oU%z$0s05}Fd2;L~|AK$%q&EEX+dyDr54jzsi
zc5T`2-7c+E6;)7LC0eCUbm%+&FMHnt7*%!Vf9{?4D~}m6GnpiC36O-4P9_gx2#AC{
zNQ`}Ra3(?b?#9}1V{dHRHZ~h4Z*1GPZEIt^v2EKMzOl^>e)+z-b#K-E=id2aaJuJA
zKRwl5({r9W4-?r5ng32v#-v>0S5(Z|6fKc$h_2Y2x@lR<rCgTUN?S&KrLYOJ!xn{;
zYDlu$3bnd;xxz$S-bP(Ba`!XmYJ)ce2OOd1{mRzukhI5Zy6x!ZAK{S$>*Syy?nC3E
zy4rG!dts5U>ZJ>(hLd_2j5dsVthLRCRyXx8j9Qyci${5hBc3~+Zqqi$w&vAbQ=$#r
zR*Ox?4xg9yEO2cYRVe<=7pOn?8S`c=L)-XKcIY~|T<iVr<n(2IM+b~GRaA`VK#Chn
zRN%ai>TiLUOm96Cg-J%KQ$1Y8$HJoec?Zf6WSViB@xz71Mb(4r_MXD3szA5jZ?h5z
z&oe`(zR&(e^_|`V>S~&r!vw{grMCIcVAVd9@?)3a_CmI&M;I6;J;C4IILVghwge!0
z-<3U1K*(9d5A0z@iCBX&$~01)@>yMgld?w9KwmE$zwFNjkd1D+Z}{v}Whn6{!y!@9
zEr9*dkM7{$C6bd^km10DV@Nw*FuEtGW;gD-I`T=1K=Wm^@Ji*l$AoRZ2b*nTUPTz0
z*y5z51l}lQ?)UperA=g@<V$%_Dnz8@%N?8^f1^37S1BKd@Hq<rED`yq_gm@CD$L8v
zviQoQE<M00WmA82cGTHZ-q)n4%T!bIuKln+5!20Ox_(?F1wehIVsXm-nEAG5kHV<k
z<?E7hK6{G?%q?0pGiS%q6j1=f=QQ;(wEZZAf|6ZcX3*>)Q_nG7q<P3#Yk)U3OJ|v%
zTzh>JzdKZS@n2T^!1>4r*`(`P`N`e3{X1z%a&)U=T9rLIp>uo-{LPvje1bK2QUI`G
zXga35GmZ@LxCauMph2+<4YBK|k!N6lIF)AY=IX+?3kRmIq5e>;eb*DB*}Ga8GfkNc
z3yRcj-c!ry>m-(>V!3@KI$xQP`=zVDJR!(Sw~%#o0FNNw>Dx0IpOQmyl!D8i#`=JV
zksWdnYR&3Kpl;TTW6bxyv=o*do$|N7<O4^IpV@TOTSG~$s+P`wA)!qOxG;A37aj}!
zZS@zIBv5_2ATuL8(E{2GY%ei#JI(2yH?w*sImi>XEc3X3)h%{j&oO<F5kE~8{nqan
z6+G4vmgXYM$l@ZUai%7e(>Q!`q}u_H>|7^!hkU8~&0mEKX*(rTi=F$zZX3#XM~Y3l
zkfB~by}S~ThfAh`<y07(z|eE(QtjbCOvHEI>=QL|z|IZB=Bwi`mj-xO1kIX=`jsCU
z`)TCGoFBfgfA<HKg$_IAnEMnSGcXJT{aVUArFUUMmSiI%Q&mI_rCm@zJMJeZoo#m)
zXHHT+#kEXL*B6PnA-Y&}opVtk>iCfO^vGojq2Q%<GM|gWxFFT#!>B4!c}xi+ap!Sl
zFazw^Uc{u7XL7961ctl7`_lTlZbk0^s_k;>=0#33WDC0+mHKs*5`+(PXnXfpHLN$B
zS5P7KTrQ=1vGoZ@GeBK{y@slWl5W*AYVbjz$nHV|))a@8>(!j`!Q@OV=0OzS15vlx
zVrl8!3DF1Y9rD4<LdKDHY4*nZ+8tfH$4eoSv+B>Nh`j=j%=7t?*7tZ0hkt(YIo-2>
z*aitCNvttmG^YgCENWNH0uQxisBE(dI;bcF8gkKb>!{mhjoUlxldu%al;6{gWmTEl
z$!^MzZ}<(nwmznrx>F7anCgcU-}|kri<#p7R!z*FEgg!dmdjg67~%SvPvbw(_3=F5
z-DTrz57QY9;}aas_+yzne#D>pb}Q*f7>m98r1KPG#ImeyRJFyt)gTw0)?YkR5<W8R
z*1V@5Y?oh?r_o=HKkAnEzJQ8G?HJI9n$qHf9B#pW9JJ%?Yge=}x8WRkN#9BZzWr@1
z(>dK+01sQsAdkF-p;%Ag;vN($eOEld+?*II^t%Nat}@YE3|S1F(8T-5vAmkaKb0F_
zvbtt*OeIbc+W}<i1LY<srmlY1WjA-zN<S({Thk<;F~(~%#Fv(mo0-{41X^cl-X0cs
zCykwtHcm#cpf(obqfsQ9TrN5J<$X$g7}rmB`1#J6jINlbLOG(W1QtOJLFv(1)4l!c
z=PXChi0sz7{~L0Ea0TVjva0>|OcF)){)u>-A}%N;E%R~qn?yGL5ppg1RzCjfgL5<^
z`OiL3`+WUVB^u7K;VA02HDlb^dt&mmqO{EK#Kf=C&oXP-L^IjX(ZRZ92P$%E>Hk$g
z_WwTp9N4GyyAbJljGUpo$BW(>GTWhyFn-3FWSg90Q(U}F8*GeTJwT4M;I12|9Bd5S
zpV0fUAY-U1^<Flb-%nGr^hd)1n7)i6+@vmN_0m;W=WLu~36MLJu3M)oL9~#0fM?E;
zcsrEP4`)=c5uhsJF098#Ti{DDJBqNtsWY}3YRo=vX!vq$Y&wInAVbB7wLnwP=GB(2
zmPB_KH`o|zY>XUbLBB$XCo73*;wSv&S?zJaa6LcKM3BB@K`O-_Ki%FDF`kvi_Q%5H
zG~Lws<oy4~A(ZV5pex79>z4-mC!0$Or#y5K7es1{Mj?zAkVl9XQqLn5A`LqSMJ^x(
z6;5!uh$a{=l>KX2_H{=W(n+_~v*3|9AI1__>c^k<f<f74p%{+iDFh$qL<2dvKTw{8
zp}sKoVuF7>6C%C|3YW2dw<%^0#x{c~_g4|7bHkwSyV02yg*}C5szDeo@M#@0t-G`w
zeGsPZ;{EnU!tBFSuo1@d%s5^Ob3q)R5`PuS+qf8_CbgLG@B^J4!#)|T^-RKt{LD6>
z*?<nmUyHCY^V@-sMsp||1f?YbQ8PlmPMV<?<MMT)FLsjFS`bxu^q+R{RLR*=fgKVL
zJ1t~SL3ldvSr%}$GEp1vvIxeKFa+P%0w|-=dxu@@z+)?-dnqp$VgB_Mru}9inn>Sp
zf8WjcN77QJ^}y3Jh;t13A<vjX1?$OgmirPVVEE*LzLpZedm*@(5wJ#m$bS!!-PZ*Q
zlbEQ{k+AotXnQH1bY!WrMfakDzKx1f#yI|ozW6B*IKr~>tofv&zpyws$^Noj`bOj8
z!uc5P|5khdwF0##$&4kWC+jd}JuG41`#szfYOZ-x!zt6DQ)1ClbT!tZ3+L7~yW?hy
zZgA_hF3g~Dz@JNY?}A=jPbk{BLhw!&yGS@viSad4!j`H8ac`A&IYP)*?3^E7iwPNV
zxO2ZByMQ%cP?*u;zyab1R_qn#NXtyE$Pyr*GABoP)N7Q7+44^rFpzNEpjsQ=>KD{L
zCS}u`Sk=MMkuW-r2a^JI#}qTN{LEhj^*LSUQ_;G0wi-=7$oy_B(zDMQ%PRTmkx#4T
zJxqNNg*X=sR^$^@J$w;K_+%mR&vd9_V(nk&t<aPbu{zN$zon3k-tG+{m3qF5Qs)@(
zkA@7(8v=dzg>d9n;$O3<B}lQ4elF%{3R_BcwS&>mEEgCwvNg!D9om#PH(It1rR3Cr
zk()zkF_KA$ztIqibU+U-1wDW;?id_~9zmXaqKG&hw);OlxYvx7>Y$?XuA#{JnF(YV
ztjP7fLSbxhF`g(m1lL;0>l_l<^{vh^8<X&k7UVeol31P&WE_rg51D?1G?&_}b}K_Z
zU{Q!&Pj;~)5iK>}+yz~{2ex`i&N*EM>#%7Co$#|}tjxD!=VvnMtZIsA(GJu(MZmZn
zeybs^iLx9woJm1ZwdRM79Bni_0n28z_PO0*IQp@Ixr|(WGP3juVjfq!@&6K{+A78Y
zMe#b_?|L5nxR6tKfv8E-Rf0Kr`>DyzTp>Hl${^<z?))mFdz5G<qBP&WGvwllkjv?P
z>~pG$m8^vD0P-BXOo{aIrLnjGP)%>0EE&F55!baPZl18XLHy(_kHaiS{>g|rm6ad;
zA{~kA>UtB^G3xBBXBn1Mcnj*le*kz{ABuq#XeYPn;5$JY)=Nm?zKp^-1E5RN9NN|L
za`pQL^bxumk+0kpF(`w|Z3qv^BtzmQZZG=}=Zrg1=^=nJ-li-?z!^UX;1Wf7^UX14
zo7Kl%El%G$5})x>Tgr{>@^0rM#DU{>kY8|cCT!v|PEPPns>w`uQzlW3bL?@f`u%xw
zM|NHt#O?!~mCL@so3KBCM#A4QXU0Z-6%!SYB9QaKy!8rl)fjHaYjYpUu_Qj6cy0=Q
zsa3gmhct^292U-8iKugaQH$B$%}BlBl{b`A)HXy|ulpo@Ra!@czFtex9L5{z4U!tk
zZl0hh+l~FpTbQO1w>EwyjQEEDNMV5CCLAXWa4;2cfw7N^cg=V%<+R94w~&{%#^`Gb
ze5uf0^g85UaY2m>HCmTsl7U#|%@W5F!17y!jel&RnD=-4D@D4$JYah=m}pA%Lm$JX
zKgT7$GHl+HiaHpV0Q4?$zv#IUmYKh$wXvr`q|mE2YS+tNlK`7u+GbVYOM5T=mm~hn
zJ{tPC8p4XF?uz}_I`|579ifd947t@$#f3_H4CB2f5!%P^b99#x(H4}+2+W8-G}-sU
z(Hhv}okTw6L7Q5~9XS7r-cFul(rsgItkE-;3uDY@8fSR)7X!Jq+A(V`egPpyfZ{ng
zf7KQXP%l|^aO1%U))-F5PnG^v{kZx?q~uFayr8vIh?p5a)%bq8vyL=r@maZJOL>W6
zGh0u{ej#+m9?ns;-mGt{MSEDzvlyzCvhM%E+{1p|Kx4{FNwNouKBJ#=J-hjErZ3T}
z4tFtc<CtW&TQsQo;Uj*P8s6<(NH|thGa_Z(tJPHIAW0{J%j}8cMa{E@ZQ~%f>b}@=
z1Nc*h$-peB!8rfkR9MQ`h|uIozaD&h8Xn_amwU4D)|x9)n#U;X@Luqx8s3xEu=heN
z7TQgl%sXBY!Y<&(g$?&87SgWIh5o&xuv@>EVe$1naAD;yRt&6y-5?&}z2|u-g`L}K
zhqyU{2Sm=mPv9&F7YRuW%CC0i2y>%v);_%%#e60fzQA9%h6Xj8!LLlw+!1O+_{o$?
zhu|CmRvsc3mY}p@1`GA==KUUWpkGF>W&6nW1<FCJ>_@P0h?G6?`6GPtC8qi+?RQAN
zty+|eJ9w*1-Vn^Zzj)#9Y4E5(_3KABFMdLx<aNXEzP*^%fo>F4<dJLlB8EIcL!i@(
z&!zzp!2tO^Oo1r&2u8RNqk&%B?B40qOIQefw|O24&T;H(mk1Z^-Ya;Q5PXG1*ZVBX
z4j4o*#FqUa1Dj+BA&`~_<xwKI7OU}E+~B+0AF=TJj@}wub=dhv=}&*bQv~6(fB;`R
zY)gqwrE_AE;C|t2XcL64fA4+tB1G8g*AHQU%d#B=SS3p<eQ0^1k#Er$=cw&IU8~G^
zRHp=yB1YS$Kpm7Nx@g$<n%>$S!f$CTTZ`UcOpdEi?ZG~%mP)`%J#5%HgZvR)s)%Qa
zd`~u5c*Nf+0C2ASycqGIk<BA`2xhxgLWDA03poRm*(*($l7bRoeOem5O=X!D-PRjq
zSH@0|`Rc*VV@H2hxybQfjqu076Vb+10!Us+@2&7IlU|+uNIFP2_{#o1{YFMy#HHj^
z+qL?kEykt>(TDkCd#Y7D*O1px+0D6JePUeH%2$|;8d%I(&xIgyXpx^i$Ry!g4G4IF
z5c=%~2Hy;+Wr|WUm7`kwMwIL#c5cK)P{t-33Tlxr+Y2JGY8b9dIXAANBnmn%4Hji0
zWovODe=*UKdmh7*W1S*_?c&%=%9;a^ME;_!OW=OPZz`TSx{NYvhJt>8+V}uVhg>)h
z0)x#U*%sjt1XYM4rx{L^{D9<#6e7cYY|}KBfzTI{@u3$-K!4FkPsewbhg+cDhqHxy
z4q{L&d;m<Upcv*OwZ>6E7yi^h;?u35s9rdF2t%WXM?i;Uu2diZ4ZtlNojr=5h?pEh
zj`Iui*if0wEs~40(1HVk0#*}$au-NNL)rCq54Ege-FkX6crk5g%QzMPx>E*$>QOeL
z3<8n@Tv_idxfW<112u|5mY;Fh?@EY|#pEH9#*u09GkG1l{*=gRFe8S#o@T>NQ_SMY
z?S!bItn1?_M$G;QU5ZmcO;6~`XKi9$h3A8x3eo4R@&vO)$EsQVovqW2nH*1x2G{Px
zfJ>B{kGEVSv^a#RmPbUVEaoLQt9Fc%cAiHsCP4_m%pfwY3PWI^k40!fW8R?hI%(d9
zaTp&i@d;T=g(BS{E5uEm72jMD1?sX%nSVo%yx$EDsp)_@-jA6TVU`gZ`2C9yRBYwK
zv~MJPCSG0-hb&qzO{#?}ZGD39s3#)Hg9zOZM!YwK#3!sFmoPyA<fVaHb;cLH_VVVs
zvD66fXb%e7YR%z9iJqq(P;<%SiqZTN-a_KzY;^ocF$qx5E;QirCWG(Whrk+Y&X>jU
zpKd9EE-0$5bMmQf5H`O=S<kUK%RIw74e4J;8pTS5J<H<FT3>dB|23fbcfC#6+zQ=N
zn-g}0qh&emi!<HCi^szg%uzbqS<+S91~#6leWta%%-K?drY6#{%(1$YWk4ZPnqvb_
z@aw#ytsuy?xuj2X1#)dYWr}_(2Tvw=_;6Zn-Hg;(i?(rvhd1kNxp|Q%<gsb`u{jnR
zyPL4x#>Uphxt|Kr3RjEQ;L0Y1rNDr|I5@UsJrxtb!j-<(jijf&`4MsYP*pxhL|I$b
z2Lipu`kQGJtv2rJuY469S)02|w1RF|`HKo@>m}$euDZ-oTOVZz%s%&~YhX=7TXjl>
z(#rDsNw77X`N?@SyUzB;+%J+vo-E!nVcZ;>S$=lPM)LuMd>t!@vye<JscTr3f|n)&
z#09`9o~3p^5NVyOyMEK2Tbt@Kt(ed*4k4DwRh^72*%OBJ0cjXxmE&u#cS-P_{^QTq
z(DU{S1N5ElX-@PaFHX4|%kL{=GT>pk8!OuORD4yErzGh^ti&ln%%{hdx%rwI1uVB6
zIq#?(qwbqA*ly%bJAz<=eR&$dwMBPEnBa1EqS}sW_Vq1tqB<`(_90Hs_C5N$mY(b8
z!Sc-H;Hw?L)+Y(>bRcC`QERlW8{hX9MYeamco2Gv8ZwKKlrum*bc`pK(v~3zk_!*#
z&@_oae-mhbVT|08;2qbIz&8#x2FWSpJB*mP(mIp4?WjlW2Xb}5cjGNRa&^MIgxTP`
zq%upZK1?02*~>Iuak8oJXnPQPQjP#{Jz+SuLA7px0Up8A{sl}J^&VL4+&b;ta@fC+
z+Gl_>@az~uGdKlA5wy~QF~sy1|7Zmu1NfMl1rrcH0r*%5_L|=SH2xEoJB|eQCtwUp
zJ1o!uSFki7MB3H2G)e!7o^NSb0TaN039k*}(j9>b6Gy$BTYp(N`*LW8hu$GLfGs$~
zd#?$4t2a`sKT#Wy+%drm)M^ZoMzZ6GVQ&G$Ah5#%39toY(1T*w{>JbL3m}AG5CmhO
z44C+8DAC5ZQZR<L-eTBR74S5koq1?L&3|wC255#z;|-Wt37GKdJ@^n~7@y=~;O;Gk
zZ)F3=!m`JKV(9RnaPyxS=sjSv_W)~sL;E7q;c@qG!n(o+5<#~*?$pD#I{&BY3!D8K
zJfIsE;QC)kMBr(q{u55U2axtJsw7xTUJigSIEeObn639<X)_RMUw%dZ>lCT=4ZgK=
zqDj=+cHa~N3&y@2ih-cl<cB>DI0LW$#Afe-b}#7Xjw5928+vOeX-6z&{h3F~xh<h}
z@6qgoL^TgkO|yF9@X7k(M5!`di=Ua98R|=EKDW$d4<uXt)AC}sPA|xt=@DqugYAVI
ztm=0+m8R?YxCYl0Se8;yI!qZ>^%T4)bNu{#^E1ro_}QU2kSZl<x!?z7XtHCWO0ap@
z&nmm(;>K(>xE!u8q1->IdFm4cI!QYBQ14VJMU)D`!(j??hEX>+((9n$P)b~VNiokG
zK#FDIV)rM!PhCM>02gHE@vPwq*<vbc@f*6;=xPo;w?g^;k*cFae*k@5+|Q<TYh-SJ
z{F(BDRTPbDzTJQTIcTx=_MP!^46mn4@gJ({|K5FT%eBVJmqy}<1Yy4PXC^1gU9d9K
zl&wrT81E}Gum4$${9w&eFCxQD(FGC}8^zG{#a0yT9Sx62vPa(Gdbq5}K@W4xK7Y4y
z;+yL?RA8w~rE>8j<P~6mL+V|RFzU0CBB13b)pBE5o3-RtqHQOWU3gs`GY>3g=PNZx
zjb&{DKu5QiRbz;WR$8)&6^)U%F%?wq#Gg}eCJh*cjj+)u6lKI0^3>2)q{J>@EA*Wq
zm-?<hz>n6|m<h94DirbGo(X=Or{wXu-G@u`S*Ym0Di>JRc1g&yos#nNPgG5Kdd8L|
zixuOpi%;=Y{I;h#ExfrY711IuRh2yq)0R;vhR({y^K+D{B-Rq21k?GYT#U;f!0;`}
zU?3ei*2+VHHjdi>@RiFWB~|%kZ`0lzUlI*ZwusQ|UFN{dT$Z~OEhoT&+;hM|2BI0#
zEnC=fX%+0uN~IE9o|5>O__PWM#-tEC?hbBbVvbUa`ym3*XQApmZr&tTxs<d<j6qye
zmnHlQgS~W#Fkt274n2u&;gs8Ey?mCeQ`a|s+$r`5{|B)aV(HSm<vB7jV-O#NBl`X*
zHm>dQM$(>{#6!n4qJ?U<8tc!g1US=Fr=2*bW6C9zrv8kdIgtw%$=A4l=9t+><y?{Q
zU2IiKiFw2yP&9%vAlg;RTYekG#wo}}8!C@KsD7`CAX7haSHLPoc^$tVUwv`c6Ar_z
zV=s|R7%byZ6L_Gpk=~1}iDA~0k9Fgwm{XTY*!=Y+nV}<(Xt^X-EFco(oPpsjUM|%w
z<D9DCn2MBBynvFUmMN^t6|{=a!&kCk&qE+fNXU!q$VCCSsXT?4&G4@BP<}dAAPv~c
zYdgyD%I!ERdnm*3%6QybaQIlD<|cT(TKvV}LVQrj%_nihe89qAi5$1f!{cm=C0FC*
zo2fMCx~G_nH($y1-pJdB)*2e9Svs7Tj=Mw~F0fUgvm?^vdA4}tB)WIh9JpJ@?R1i5
zE;ARAs5tV#R~qMb+Nw2EzM#wR;(JRUtw6z5wiq(_jla^!je=~Y0wWt2;1&5$oS&Ip
zAp4df-7X_F4RuxDCFBfLK+J-70Uqn|&zz+&%M=D-9P4-O>+|zy07*T4aHWHskW=dG
z>g%#b><F)L!~AqS=}T7>D_seVU&Yzu+-_S1ViwGD$N5uu+pHbe;6C95b;x5cdD_py
zKf-l^d-tKrwS)4mImez&XYMOvD|0oZI$??g0_?u<)t%O7KXy(`EXE0T*b(Qf_H+oY
ztO4DUrLI&hzn9o$6pCsHeIQ^vnYC<wIYC!{*Oj&NMOcn+vDJ;FeX6gvBj6VNsLV>k
zL(dk*xw>ZH-z2RGD7yq(gCDtN=)K#AeTzmrk3D@{f6*iAODl7k{M>`iWhF~D02Cdu
zos6L}?Fy09`5HF*?=PEtv87z#ov@)>2c!&`VtGWw2E_93{1v9tp+%Rh?fO^d?(&3v
zj>(*pEbdN(tB9d<Ips#g0s2(N`A~?_4p16WF=lv=!Q}jYb4Q9>d&u{ZCmXP`D+|sx
zt4lg0i-=+G<oy-3ZccC?Vc}>6Ll}sFQ^LoZ13gYbIdq0HNl4Dcz38rAalETA53QW<
zzv5Pc&~AsdN`=&b7Hh=u=8{%jLXTB0;0in2e!1c**Vaw(bRkC<?AKLY8Q!rQ3f&Uj
zioSBWB#ep5`<(mow^#dg%N+e4ykY1;9a*~(MN!XVuD2MDSlm({5q$C=DQ}UTiXU{#
zi@mE+qf6Jx_tGMQF|QtuFl||UVuX|<qq6%hw_x01?5w*U0>}y%6T6+4WSeB)X72UK
zpW^)}1b+%r_E4COhH1=*IoCe<1Oi00q-aliw~@C*F3J342`TpWxwwV5h(Co(q@Z`z
zn_Xay#lxJ)-=~OeWP99tzqP~vNnA`s9F!G6oPqrMwvfCe-6oBTryOnAC-cC|g$>up
z^Ud>*m<-5qh2q=uIR3OHYf1DP+fIVmhuLTH2<?>HBDoT3ZFuFYg3>f*(3De4jCr;l
zgI$w;jJHehBNhy{xWV@bdBe>0=JJ*>urVgfNtYG~)*@&l6tsHBxfQ=fytQ!@^hoBD
z&ZPt<F6<*;?-!B-?mVvxF|^0W_zc4+vo;NF1^BL>M^_3MHJ!Y?erR4;Ym>%bDjYR|
zuO=+l2~~gZg?b*F@tl{oC00r=Gcv|nlkFBIBo-w36!Deu75+fX{cW-;Aqp?W&L><=
z&Y1{yt9eVV5PP8ZdV%O4@+X=u;Hb;xI=Cs~d;k3>o+I81#hT(r0)F7JXF#WfFU-s)
zd_n-4Aqn205I0{|b$^eZ;-~97$E`_yoOc?Z6d|eP*vu&7*wt7b7rFWsLtLwB2kO&L
zLLt6zci0=aK_lBV!3xiSLaiu`*j7{rJP>L4Ubu$dI|;}t+>W&S$W^@a)CrxPuMn3R
z(E+m%QOUmJpJ*odpygmnIDPmT%0Cns)E3gMfL5#<k4UY+^w9Jujq{s-o=vLZv?%JN
zt|VK*t6|te(Im0Nu^!-kz86S?I^k}_TS2WbHv)qY;mD8A;0za};erz0;5XERW?uaa
zEsx@ZD=6C%-pDuj;yGx{5OaqJ&xP$T;X~m_gEWIC-BPna?TA%KW1V)jLFU1raJyfN
zS*UffglEURsGP455bv)HgM?y&hS(0U4zwWG!JLo$zrY@X8-_uzFX)$&-Y7SygCnSU
zVtk>`-aRXO3q8TlG$6e2QdCNV_}UMjK__&?{{tAdf9RLLMxaKlMocSy9iaoep%>FR
z9QN|hE&o-5!ULahut6#iEC?I)e<KUs{3zQ+9dx5A$v{mbeGKk9w&*}bCMFc&3w1}k
zVFMXM9xAN=3s**8I0*L?BQ3;G3V#Ow%2E?f9)1wM6h47^hN>?4x><1VIv5j9IQR{O
z0^%6dNeC~Zd;i}^zWo;oB}$&SH{1<-@9jM&s$bYMAqZ!XIugfGj2}cd2pD|%@|fa}
zfir=kPQvlCnZ%Xk>yNp_MliMnzVJq9>yKKNJ)}XOa2V7)A#bo7m%$d)ZQ-{cAkD}O
zNF}&dF6FqdcN*CGy$-6D<_@~|R1W!l#v{XE@aJH4_+L~vlC4;Gbz@@mu}&-pB9QMO
z3<{A1UoaQp8rsQ3w$N9z<OiRqaZ{ASg^F;Pv6zYKVCP~rA~b?p!Rt`#pyndn2|)6s
zu@y2!F!ps0KlD?WA>C6PP-@q?;9Cb<5o?#-X?JAyZ2Vn@dBM(NI>7Lvy}<Bdwh0{o
z2TUIj`WZLG`fWE#z3_W`{wc$hU|4u@U}`vdFrDMiX!=bzs=egHD_~YJb`Uje-4GgP
zZ$I?AZs_!bBEE5CCX>cmhDjr9n6iMUW>xuPl&txul)U&y$q)IfQo!t}meBNCF0k~H
zm!$YNl~DAil&JOcC{yZpS&-@nl_S*7EwX|%Kuj-S6LJQ<jteOIAr`dy#TL9fh6@V4
zGz%C0>KT{dRUDfLt%Hrowabk}_QfY)y*vv8{tqRh{)i<Gy%Gz9;YG^^g;#pl_AHqX
zs5Km1I6BCbad^9f*VJ76^G`XOATw#to6UWB`;YqpO=kbAcVFD;Xg6VABLHuCh>Bjt
zzqB&5E~@Q}RhAl-Sr!<D?$0K4m{Q<`C`R_|@xSyb`{`~>h2cglH5RAS{#SS|JenQn
zlE8-dl>JHjcE*6aRsw~*du^rh-6{aw(KZd2f!e@WEp#q*YTt_=clN5fckpZ4j94sp
zYHDA@#OD2?*BUiau5XFMG?aO(h;<L-_zoE`h%zdUcBs#3wz!r)6q9QJxj(`SHrGpH
zhua8U;a+?9jUT%7(dK%xg#hFR!>70juPE+TsPmzvWq-ZM#fl3=u|icRS^l}acRC!k
z{da_NpKGv?i!3~EP%AIkOouuxe4Tc1l6J5Y!G4OIc`x$%vmX~2e00=wz0r{ikmT_G
z?h%VV5-$<w&%GO%ts;RoKF{#OgbZO>|4dRrlW8cSCkNGoC2ij?m{zje7jA!ykL8mT
z!0q5V70st91TWC9D(#xcn5eTqvG01D68Cc^p?^Yb{Z@9L!}?|E>oSRdA20Z_DCXG@
zx9HwYS{+3ef2>>Xtu@2x&qHFmZ^*I4J+UXM7m63^KNO$vEEG=CSJZ!~5aGguD4<f*
zfpFBX>ERoQ7=-yXU<?LP2WN<5NqjNCCZ?%yqj0~VR>T{puVEw@*9viiIjD`=<KOz@
zCMx{g57r0nhGUSCbSw5brIoGWB_~`@v=iaRR;;<FUe#Y5C9C6!<bwc2IA~`t-kEfD
zIPk{tf#gf%7w;G77vPuUr#L(jUGJ^gW?ei<eU=(x^4HjH^l=PnJU70J*h}Xz7r+Qi
zcp3}aZyCQzxJnbG@ssft`DlKN7OAeKi9}zDq!`L~jJpLp*c&%X0a9-(DU{EvG^n~R
zIjUBkQm6`DC`m5;WmkyNW39+oM6(H1o8@VwZM;}#xNyA?zHqpxTz_(r$<b8LubgK;
zT|V)24r>4F;^l&T8hfH}s&F=a+Vsls&isz|N-dgMF#5};wU5cPb@RG)*JYrM&1^l#
z;;EQF`_X#c>crbq-qWm|@_qT<YyQcsj8%pOm$jW`m^F8XD@8M9ExnDQfzpY|N%C-O
z5{7jo#?z>a+4@VEv+9O@k9U|_In$!~M0nwu?x^Zgv#7y!%2SY*RCd(SxOx<K+>_}{
zV|lD<LDOtXt6>UYUBe9Iuw%1hiA#6Objw0cN6v`LP|Q@!n$c>+%qm{}ZKP?lX1->O
zQ+M8Y-i%+1Uyt9A-I(2+-DFwKVO7^O+`isE*FMH$xM{Iz!>`Y8%x}tX!EeK#RXx>g
zf@QX144mFd@1pi1^D=w9Jcn2dtB*6un-s|LSuSZ>vmR>3{cHJG;xEPDaGO$_mJ9!j
z_>1(5KNpP`*0CHTsmj^PNew(^M$;wP3E4T^9ZpF5_~YEEPAo^x(`x{m8u}Kl7790)
z%i#_AHqtg;C$}TQQT}8vx+mkylZ^(Cbv|uf2VMEC)6N)=tXqj&*Taix-gq~vD~+wO
z&IJ!MGb^*drdTsI8C|#vZ*298kTY6sWYj?U@gs@@8wU^W{V4|z@}C~^Vnag*NAS`w
zPe1-1DUv<vsbnYn(bRn++)^f;=5;vx8c6^4)&BkQLOTlaInNsLM35Bma$57p+YLZC
zO}3Q#=S$I6al3<w1<}eH^zdyfVL-t!G|3%|R;N8dCv9`2M!jdCW~C~<{4w$Z^bqf!
zW4xl}MG~c@SeV-MBjP2LtdgBCBVF&o-mu$3@wcy?VfR{ka$ZU@C*?u4^b5_X)52Tk
zCy|#rc#ZPX`^wh8Y`2~(?xRg4hmM+`1?`8-Kcy2V9bz^~;C^PbGmIt6!AXZ($(5ia
z#<yl1#e3u)Wkj#Iysxa8?d6L4d~Mrz5B#4;K2_T~W`LfiCta(H_uM<n(*<qm&7+ve
z3-oCv_xT|iFb`+UY(@3n7c>4UyR0$0`gS8z?BF>se7OKkCL+uM%T-9;UE=KED0>Jy
zY%-1rvbDvB*orem$2v!g5OqKm%jQtU3kIQcUFLkHi)vY{*U&Ew4Ff@}O6{+d7iC-O
zy8tXJHf65up>)^~2Y9<y4dsVet>*p%hULqB!yH5Sly?_15AA~7nX?DnmwPn<pISw|
zbeWN}k>%UVxQnBOADx~~+wa<tU9Y_S-ml3jJnNs+bmfvF%v3QLy6i6mI?7cl*>)$M
zM#Ds*njUDA{%!HFv<48?Vej_%i{W09O=_|gzhXw+XsJ|2ntpcyRn0=Qb*!tkx?I>p
z-Z5(2>SBJCX%)yrgq#Z4D0Hl<J;XLwEUj0lS(i@Rm0m6=to^l(UOBsn_3FCMrFgiH
z|3rQr>WVb{r%M}R=>_lzF#=fUsTy?lTQLmNGJefxbwRgUVbbu*fb%j9=Z#CyKNs|A
z`?@5<zvV4aM6E`=s^0JUsr^H`TREhEYz-qP;XDeck^>!oiTlEAVAE=PD44M)@=$iH
z9@IwZ`~aL|?isqVJ9aR-+=wo5@T+J){IYqPbMG`e_KiEo*;_b!x!1_sTAS!AGHO0y
zAN2BOeDeKHXT3dHgV?3wciOZzw1s+$t#^K2y<XaK>u0yr?PJ~J_m7I`{^at)%m?kj
zMVVlYGrzWsv*zAsv-Dr*;!~}n;K`EUjfaI$Z|Q;xkEhMf_npN7gB=qr!HdjODM_N^
zh0@oVH<cHY*|ROL?>uMxcMbCbK7lLRc?4<dNEIBdf|v(eeKd#P)tdVCmw*B@7ohlT
zcv)%{A7Ast&L}XYcml@>v+v^~<k=S^BBW2@j4BK`x$3)GSdwh6%m(REq^ga$<r4i=
z>;jUNdlHIIEsy3HX~SZ#PtoOn>=Rcgjj*1(col9w9J8NBfsul%z#bV#hkkS{N)GSq
zbZN_Mh2I}pi!xg`TP~D{-m4nvRksJ|E-64&xvb28eY|qYO?{0V@I==WjX4YoanD_t
zc{N)0?c+DwRDv_V*n8#JPfaVhxMUAr*PsGekATkQ>wwD_TVRyaB2{(~$^BF0)P@w+
zQOez`r*5_)(Y_g*;u8BEj7Qwt&$FP97vZMqK=Tk@6Xd17;m-3;X~68}N6~n$AdN4A
zDt+UxB^iX3e|xhcLtiYxt7E-=H5@`(Oln5P-wxh$;&uS}=!e+D!H4>4ktb_9U!ZI9
z(dQp(l{W7iDy+25OVICwza|xl+RbA_2ciIg5>)G9gTs&}mO7G~gDQ8=wmN~EgG;jC
zjO7;*-7e9~cj1yf|JP6q`}igMKOI0NXi6)^Wko@??6Q-gqh)AC_2%T_kDgyq9PsQI
z<e6f!QW<^UfXj=gBDbDz85~oAY^`<DHF4-H(ABC4+*`nM*LFjAm>Fv>kM!U@Wa3x#
zUY(oAYjPtS_3bmM+ys(r_*i;hs0eJ755F@k<#wq2+1y+l;&*V|7hpnrtVrlm7Z3D7
z#Het0BR(`>KFhBVLaLNGJhsJ(oBFhgimQ~e2Q=NnEh$i{*m0GwAN+}YFZC?FCH+!l
zM+Ewo=c)I2<FvkMpGaSHI=yRmbdhqdRUZwBI;tbQkQpHV;wRC3q0pSVPE4`0ZTVGp
zT91CPfUZhkQf7G{Yv?(0VF4LQoqa$eU22~`A|jIbkslI#sJ{BkfH%ZeTv|gqL>awZ
zfI^El#5PCx{uX|-RSJ9#e#xix8)56VD4g9<R8sIZ|Lq?$m3aLfqD6QzbK0t++6EEM
z-wD4ILN2)|B%nfU8;MOZu;{P<8dKY8@OOPQ)xzAUSXWVZzeg2c60r_uR?g~t67P1x
zYg1*vUf=cGBK;&0F^KLLhUfGkp;x1{*yxr!mr{iO=~`7<LhkBa;llFvrwg>SpmcR}
z(s|}eW^*ezo8;|z>O$Md_>M6HNH;FqS(tdaXVDeFk$Jhto|z0X4u3c~>+%eCD-kX1
zWal4KS@!ZSxzXjn`>ja#QxmDQVq-R!PI~KI(<YBF@6`RxSm(0KZ+Vd$3Yg|nzCxtA
z@;a?|vhY4a>G?2%>GfdU@AYZjtk~l1S*-FTDzIkx^0;z$64Uuc6nA%`+~pbTxpj5~
zIO*C_-dXtP@o;=E&@~z4Y3V0Eb936ZK6dV=IFmE&<$F0P@GcF^ZOK%hQD3b*io1R+
zeUsMh5}GYFyF20b@vLg$M_{|VuseS+3xEXbwg#yC@pP#B9k!~wsf9JEygF5PdS>+N
zcAc}^{p)V*Ed@TEGCp0OVnn{)2MD}Jsss1W6jM0eA80ZauTGaLUti6dd<A^!6!k6_
zIKAHWY&z6|2|G(x?AN(^oE?f!FO|B%ih8i+>XXu4)w=ItO64??e54h1r9HD{kcywB
zN(0`nC^PQyo)sT*MI7$0Fflx5OAV8^r)!{2&sdP|dxSBNu<HxR$;qzdo%;22(qrE4
z5)7H=gMn4otA^dbS?aK^*OsHMSMV$M;t2>{pAa|i1;n+k*Vs4RcYSG~Z$+ni4}MZb
zY(ISquKO)f*F$>?zb*TJdSK!2^F5(}PlvkV<Bha!LIqks{n*XcKT5az6NjBnucAI}
zV=6ZCqJ34ogrDuzr9=ED#QLh}wAJv2Z5njOE^^ZeQTr@yG`c8^GF{<L1evisc5qPp
zs&EKJ(Y;<=4+VF4Om6CtH{Hp~N$YGus#~6#x=Fhq*!H*c?+^Ra8mLxJ-4=6~)%2|C
z-<11aKE=&?@iqLph|mnULBBN+@v3lzs^QhXk4LJ>C#MWb>n}>2DM|yV6-Z5m-lGRo
z40(Sox)uVcU5fzpNZ_I!sZpY6>X8HCvPyy^4#iv*k3`D<;ws-MH{R7uEJQIZL{&$i
zD>FB4BR78QXf>&AxpZ}&L3^yoJ5HFknN&6mz4XZCoF=r*ynKruc(m`Fhgf1GLv$up
zB13SdoFl{aOw_pLxhJ6?>zGYzq^K?+vXBMs{Fsls4^kYnX90&!kljc7PO&n|{+zw>
zl`Sd!YsvV%7!23nV6hO>TX<o<ktthZ78YBWbxtl`$Y~azDe<tdO&^_Js&c>_SMskY
z$%PPaui<)xYan?e!Uepnh2r{;)CGY?<f?qpV-yYPo_xJt8lHel|0TLfNV0~)Dyl!V
z^;P&A1{j*+B5URxnN0Kw{}Rn#wO_UW)NYB{i9{aTo!KQ7dOCG+duaJ7`o*Cy{5`uE
zWA%jTf}pOkgS#gukIo#<+7Fx?AtM{AuTDGuw`{eH&BMCEwGsG%dx?3enDiz4g^3;)
zHKK`|AiA&L>@LFBHy>F#s7#kLO72)EDMpwOR*dx`CXgzOjsm3-OhpD?Cn>I^lq?=;
zScpAA6&VGhlSxJ=*Q8LANjA(7w@}J7K{XM>NmWh8Fj+Gy%%&QtkAN=(_X4n?AZobI
zX|S1ciz&|~AD~Z(u|5X7t9MT1qF0MsJtmveuGgE-={B0RiNVYT9AI8WJ!ulo$vYc)
z426M2Qx)&gx-@*})bCB8#02N!Fwh|ezo|)i(+HS^4CyncW1xx-qNu5S|1q$-VAzU1
z9T@?c(3^`|G)Sceh(<NifMZsOHX<K#XU^rPr3i<sN=_%Es5=@&XAVihR31`!>`Z4U
zX<#u7P4Cl1*^ac+)V#@gj_soA#@cRhG|WvO(fwk_5@~qc6g?+&(V>ZxR1&9#lUEgL
zP^8w$7=~!{(L|{lVpNhWhqG5zXizTKS%S=NSiQup(eX50Zlaz;mQb_@F)>M-BW$Wl
zR)4zIY8j@j4p~O=8zNVdB85X#)o@Wx*Li{pTSs*<(uPbhX=}o1&)FU10cO*gYgyP)
zHHl=7VW+k#1xjqZF{T&~5?^b(@+~>L(vg!JlB`h%$4E-?#!>p)$hX3LDw15xnQ%0a
z=1sQyR)h)2L`kocJTtsSTy{>T5!Hc2*BM<$+-*+z9+fES!!Z9@&YK}Ll5r50`FAv?
z(NG$QmRU&-Q!mN_gvTs9iRm;5VAi8UiOOCLCG{kay=XG*S|#R)m@=$fWpIt$H0<G`
zWeArAsXM6hU!6|=Xc%+&AeYHmq?B*;2>9DK|LH_mL^g4wuuMD!;q@W;%sq2;I$Di+
zSg|w+S4DQOJL;i8&pM{ynAHD=j9Qi^0XupzMham*)|rH#i3gbi&X_Ml#xx1am|9bo
zBWZJ=iCcO)iPrtlus+k8gm+AM!!co_cLI7&Fo6v(W>^D|omzll?xGdP@n^~$Z#}`a
zw9CSe2b*O9x{=yOe9uCCgC!oR$mp1iCuq7j!kK(isAb{(o{L`*IERj@A1Gd1MMpU?
z1rN#?lQY7UonhHa?ZgJk);U(eR}Sf##c0Z6j_@?(Rte(uOVq(x^JEQR))!l||NWMs
z363{YQom*mW~({D(Xe^W#5={%Ko(;enyL^rUvJgc)UPF7U8N=+HD}lqs-;|QQbx*j
zuL?N!iMSBWAsY@8h+qA=2*r%_c}l~~uqbc%@0VM|O#w2wE38lODq-9i^_Nxl%WC&!
z6+q(+7LbS@*?X0aM(`o2^C{~Ye4hOlK_HSx;@Z0h{U0kuosW6#m-XnYE)T>|7yqwj
z<OgvaBHZwLQS-9K&#qafp(}(TyH*gV$c^l;HwhZuB6Q$f<ch|SRW|6M7{so7^D1+b
zS>`VPyOV-eR~a1$!~j}Et~d{!;SE`Zg4mUBa0BVK5MmNKDWr6j$$@qlz_rK~x5yRz
zp);=`t6UJfUejOX$ZhbUE6E|d0#J+8jjT$i@9)l3DqUF&ph@J4<B(Mds7dBVtJ=L<
zsdJe|_Y57VnYaR2vy37KrX;S+M6N&&Srvhrq;FouZ`KRlZB#p(sdfKi00|;j7>2A`
zKuwZOe|3lK@<1(mH@x}J1S)Sx)Vh-Bz@o?%=ApAzkc-HT7NdtvYNzYC8ZVtk&hJhI
zT3s`AU_;~z_t04&$VKU<{g1njTBomSXAO<+3OevCas_edtOVpDdn2RPX-lh1U9oxD
z`u5%a1!wTU>{nV|A9_zx;)=)ES>%4oek1Pis%LzZb%_zPKv#ceeTyc-Ba&BKlNrJ4
zzbb^Y2?5jhRZ8q?X#EtAbOHm(HD=fB9DT|)>S#H$RZZ8}95bv{aaXv#Mc_Gn2d?Y#
zy;Fj`^Y_Zh3WG_j{>-|=Dguda_hr-~J@w@n7c-)I!gEp%G^5QpY%r`kvBw|Uld1aq
z+QX?07}n(4AxaL2!+kE+{QtP$8nX#7TyMd*9%%flu1I$;|1y8m8_Q6ZJ%XjLd`#x)
zA4_-J_UmJY{cdD0`;ERU6)G-jxv)>pCDbYISmh}{{>QxjzK_^KlmBp2K4!m^wPh;i
za&W3d1G`yjDR=g@>om8DmjW$f>SN#|_%s4FdRVkIT2^3!@8N(u|6~x3-{2ir)+hyt
zow8xfe2R?&kt(Z?sXu=tb(a9Sft8qrVYKy|k5B=&80aSHrWFVI;aGGXX$C&uB<Y$^
zIonQjw*SOEF5`O<mewol*1#@lo@;x9^6P%>{g@9CeQ(jMq$e%U$kS!gzmmR9$|J#`
zzH9F90R>zLE?b^>U~o)m5`E?`guPr<tHVZT^8OKAqB-A{cdW9D6oO8!5vPBffvg|2
z(-F6Ky&t^N5$^1VUm>Oee!(HNutzn5eTEu=4J#&GQ959>1{l*uE4^A8FlW1FtKaYp
ze!PKa86a4P*whlZ_A0DGbr>L@hxpVIA@vG#L5A(Z;-~bmJAy0pQ*$Aj?a*Zh-PwaN
z^pm%K@9D>Ag<sj>+3?SbhioCnu@!~i=u?n1N5mDin%8RNs1`jl<iDYbDF)81Sol<t
zZuOpm<k!Qy#qky>G*mldnk1ao1G`1F=iTat&0|s|wRvJM|8yMNwufC7|Eq215<;FA
zy=USViJLdlu*%M-JfZf?%q=j>5T2R4oBV@yEbbYhThcR6drz}WvT}mxnM5(C&6crM
zLVb?}{jHzMNF(7`qtqVL_@`RXP;F*CVfhShJ?C0S6}=i+mxkSPn9sC?z79*2&qVjY
zxUs;$02_V0HHt?BHB#+WwdNQbGu~B&W(2Dwerv|RBaaOb=fu2!_$yQ9IjpoBtJgVf
zI+{iQmS4=fT6r~gtqa)nxC-%>5zHf5Nj4U(Ghej2itv`_%qv)#H8!ksUv#<(ca-VO
zGg$Rlsy9}yvtP8kiguKfTeLJ9Uo@u{Zq5yO@_c|ZPU!6)Jj-_S`DLi@V0e)0W~lF~
zda!@M1E;O7v2~MHKusP5x@jwWz*~(ET)&)^BgALC&YylsoFKd1QaInOVMV8{z@7o^
zTQ?8dt<08P8xP(O!nnN)55B8j-rFY+$~Wgj9e4Gu7`G#$Tf#Tet)wSVmj}^Sn&0HV
z8%1|N0e|HEyj$TnR)KWC>9FepZ|u)N<RemdaH28En>p|AL=z)7j4$pV7<s*=Hz#j+
z0zotT4bLs!9G|f>yW4kd-h_EGeme-yao#`m27kOLdNb?wr`?)(bL;h~->Q1E>kX{j
zx_I+{X4vg~ML9nZwkKPztG)5Ir`@h|ys@^Yp02yRiMD5uuY=xD1SjLJi{7vWrxmZ0
z-p~c7X099F@C9cWucO}3dM53zv-l#mL1S+mio0%sC}iFwd4rU9)NfV-DWBuO>&iFW
z9$RO&ElwUBBJ7+P1_|||thvqS*<%B5<9jwwoUSS4$!SxphRU_6b6a2YM<ziQugtC~
z0aLv@qlUbfh_!8eeIzzPc9;yfLn)_Z?sa^lSoV<&z0AES;3V9km{TJ6TDGCDjRJdV
z#&$aEWX2)gowif+OAhzQ+t%9{z?y+MEpuY>;1J%axNR9=_F-+y#F?2jsW&-wi0M?>
zHnm}U$%dREIcanVcbDuj+^Mh2;>Qk5SD&&vbh!)lSde3}%NR3_^cVq;(pWT1H9h$X
zO&Jn2#cGaJ|5%njOLkf3G0JJ0);y|4SQbA^bXj{{YB$trs?l7j##@%B9cwos*KVms
zKU2W&CzBhXs|tCrC!QSWv!}8So~p$_3KQp&UqvcKEJYARQy`i~iG>x!js0%+T{46<
zgf*-oxFM7X!3;r=aGG!$bsFbObJ^J4*j>fl*<H@v+8yvbas7O)z6-Y-u`9hhwoAR!
z*+#KayRY?|lPA>>GKE%5uU@8##o9<!lYO<%aLuYVie2BXmoVezv5un(@q9$?;U~U+
z(3(D1e`v$5J-XAi6c<IqltYG%!l<>=Z__MgYlbYCQj>kb%9L3dw0K&16;9_M^hKLZ
zijc2|?DiJ)Iyfd`?Te3jwAI{K&W&J8mov{jM+jI}G271eJGzu70Ms+d8r)!SjT9K6
zP4e*<m9~$5z>c-8H8k>7OX)ESa311JKTS+8{P<GIgL=VRoW9d^Ar8logD{UaYf`Gr
zoyJr6&Lg5eDf#`OJ3R>du&|G5;~Yw*in&y_4gLVhiG5t>5I5Ot^1<;RQnKu%&hJa%
zw&{(qTeG`w<1vTaN7xB{-0EUnN0E{TZ7m0nDB~FYLTxhXj<UFIL#f*H<MauRvJ!3N
z<7<I0PVnys+sT4mYj=LUZXag#rAb7e<_d3ahXc-?%y#2hH^@vKT$(rJlVPgHB^3dh
zX8Dr=4@{rj88cH}@*n!cXK%=kn?V`2kcX}R*63XhpY0}`pIC4XJ9pEwl+8M^YU}M!
z;ae)~EhA4gR5w)Ehv=)QbcZYrqpK)~4cQZdyPA<67df+iJvbTX-MYBv>Z=>oc+OC1
zyHffhYYCf3s-xACQ^v-vP3r2k;xyN)Myk)%kZ4OEf*<}oBxBed)H@2YB|Un&GhqBQ
zfW1RDSv)~LR7sFnCAomea7k%f2aw*Ky@r{t5~LfsWq3{c90qi>sfmS4nsoC&W#K$M
z27Pr@WHiaCqKU5JR+H@~42vDRh%|KeH}M2>DaDE;t$0yiJ9K&6c#8P2PWi1+l0V!Q
zNaAC>`#SEKjTAZgTqkm&BHW2W5~2{d{A;k&US$rmA;Sv{vpKFsL?U{xs231<vvDWi
zu*C$6gAB^vpv@r(B$(G1n4P~z8(_-97-@Q@5>nK`rs7dFbXI+%GY-+<)}U*6QOlTW
z8OvC6wdrg|RXDSFXe9gHQ=&(T^MLn?h*nH_B2A|JZBv{DMgZwMu_kyPv;gHAgeb(o
zm~udHuX!RR69-cYI;<S><j)!CLuj=`$AF~(`9H4uUi!QiD61H&qFb=%2>8S?Ojp|!
z^5AYvS5G@b&ke=`ezAgzXhCg(ZDWc0Tl!%2bQ)9|;Z^XM2$-amLF9qtqnY|A`WE#Z
z8Wb9#RS2nwspMxt2SEp8GkuYLk;bC6GPUq)*i{%+;v7(C&}WHyfpvWv_1w=A*Yx$|
zt9+~3=ihf#vd>v?aqJQ{C4Lm)tXVZOfkuT%x56pSYX66+uMCQ#X}iV=fk5yO+#Q0u
zBrI;h9fG^NyW8R}!QEYhFYfNTxVtPL_w)Yws=8{fxvJ+!*Gx~#Ij4`sH^~Wu{Y%VN
z3vG5AAXY+pwSvt87vD5jW$l9g3L`&Brf|w|@fghnyD13!?zy0Jg_Ua_$CQv1YT16{
zgkP&X`-8S4;iH(@Aw!q2?e+?I<;DOXUSHrTY85nymYnsW4G_E(5fz%wu$^e!Ry-Se
zaK70Kv}cP<mJ0n9DitaeKWV*P^B@wa&X%97#+^bw4!-U6K(7n7qFe>J)CHbWw1aHw
zLQg4QKt2wB1QekleTN_d${~=wLqH})G05B@By&EssMhk7x4p-vj>099vVN5zc>PJO
z$vhW*++A-=wqjr=Pmhe0ji2^?2oLOfA^p?*soO$1r0tSU)m+YbL8fc>;?+Qki{Phu
zSTs2eefS_cR^*1YoaPR<x%`eK?lsF(&@FYKU4@rCP6DM7rH1IjD0aS3i`=caT4|=r
z_p@M6dO+aZ=V?IV<n*tGZ;ayf`Z|iZ<uR^NU4uhnLiyb+|Gt@dS)i~|;Uz>@N0$z=
z8@AQ1FX^AMy5M_8bq+%B=Gud}tq2sRUwlqo3~tszr+}Gu`?>I(2U9xmUINtQ%;Lpz
zQpu@9*}mpX6^5CHv$+Pt%EG;?b%y>Jy9r)>^hFfU;KQJHY$bJ6!XWK#l>Gv?X(kub
zYt?`am1LH<qNCleR~ZenhH?SpoU1A&HtxTb#9vUBFHKMrD9|Ik^%5o9UhgOz<7gEr
ze_&1O8I0hFQizvvdNt%&G*Ld)G5Ieth)P3?K=y_E7E0lGJ@R;USwaS(#AD}zNjxZV
zz-V{o-an><WdHSRUJ=&RNLeB4@2c#oeC2jL`)qFK!urk1FpLF*b(g@HX^;H?U+5=G
zW~sK{%pm110(%et8sf%46yGOa{g5nFfgip;Xd*0n=K<489xs0co3@}Iq3gFu)%~p9
z;e7h<`4Nz7W##{oSuH97!>m0Ke0s;+P;m@hI-sO~i0B3src&DWv5tj9FZntDqOclT
z*|J}Xy%V<Kj_LZb&2MtpV25;Lgrz#|`XVYh&kWhje{T~flus6YFHqa8kV~H2s(F7n
z?LJ*@7i9FTZiaN5zPAbDdox$@Hqs`X{HziuPU&JewBiuM!?ZgwFysh|$|!OSdDn{b
zy|)5a1e6YrCVEyrPipU<KfzyUTutf)8xTZ2vpL7zU=8Gy0xtQHt)u+5x3mMd(~!)e
zM*i7wqZDtmQf#YyiASw|9?H>Bm*pf0TsJ$jcSzQzQZHAG{ytZP&R%~*fH*E6ITPQ2
z!YE(<hq+oDe`>G+-a7CmbfN+AOd9bQQ@WhsO<V@fAo=LX3S}~9Z~n@(oSTdgZz|Q)
zl@nc-EO-{smRVJpap=;PLR3V3<n9qn#qtN*G^B@Y-4xHR<BYPEa)_NGr(a!B+rV4#
zmjSGz;tu|vM)(&=+Hl)=Fa;-BA!V0ncFIy}V%$<t2T3h0Ep;sqEpshpDMKxX`@mf#
zq$F@fTR?G#Um!nlM|H~Sw=abm&$raCDAL+kSQwar<`f&KD;P=v=9C*qMUG#=M6nWH
zg3+rXj1o+C9wJ1E(-h1j>hXH25cuDmBuno=L(;@AlKP3Z@nkgkad|YGWb*k|G7*2R
zer5k$PE2&p9wTMW^9t<<s-twrGqzNOHpW*(H`Y=_GUii+H-;&VaKI`JaVW?pqPZUT
zbI3lg__6U>F&Bg-j&S|K#Ql6sgBb{&*c?b;EcGMoTJ8rNR_pc}<s*Mu#25x}oIU(*
z*eU!AhznzrgpGoef{l`ste&Dvv@7Y6Dvhz0<w?!}lU3Yc_74u?ban-5o@lJ3Hr5yw
z3(I3m|7y?aM=N<KHjoaSzE*nv+PN``y1i3B+P9w>)ste5P0@u&J-Y_nUI31+Bxgnw
z3R8+Dn0?P4nNoE<r~_~1f^H}BXZYe~`0xr{^9o#9B`=IzIua0!8tk)Ioi}<tFft$7
zIie8orqX|M_hv2a@yjNw2&g1y0YJJ}C064S%NBTrR#dAVsW)7Z$e>tBYsHifspB}_
zf;0s*N7;%O9VF|I^U2i-M=+Kat(qionnfd80u`(qSO&jYMzM9V58~_LVgBf4WJ&%$
z8nr+8*|4y7M4hn;nJ#rIhzTYjGS_}qg4G6Zc+i@Bpv5pia%^&}=Ky^0)v<(U?6sG`
zCguk?{buax0PO(gM%?jlD@cajHN$iK?cnE4jr$zGO*XrHhUxgtf#^-$KxHm=9m;3}
z1HBazeRR^$h~<9$wHACufGTNujY>bAg@847eRgex7G*{JLcJ>O2~T;$U5Cn`M-QE4
zr&&_HE=KYvWYU@N4>f_k$QqU;SptZm?oXzVVpX!AHtDpz&2PLLXXF(OM<;^lzK*qE
z7ylZsYZZ`lEV~0oU-G7Sf$?UYEve2QlRr587^%3ah<GrIu#2R<X}f*-69mL{crVe0
zz|piL5z=~QljHaUuGD-zc31tFDuZ*D2Vs@8((+-Mw}`R1dE=rgQa0zPu{n;9h?33O
zI<52sB%`Bda_nL9`QT8E5&y=4JT0Xi)Ul>x^snO;{aPEU*0(_PT^kvqwQ^*Gj5m`(
z(uo)EBSZa`D*4P(Y?Lj}%1o8E2pqE<jwq;VH^{^HP!|-{Lt4mXK-N%t@bzVeoIwun
z2~BVH<x2td?I&+by$=VAg9^K;zHe8M74jyrpqtL9hT#vaG2>iNuUfzQB%sqejCXKm
zwxEs=<JZH`<+}Z`7k#jI3&O#5dO`9mZY{O$P(Jdn5TR#pzq1Msg@@8`yL~(3DAsdN
zxR~I6mkss#Q%d18PPFxjUQzp4E#IVewHNQ`YX!dItkDTuA#2?FoZ84$%G3CJ$NNYZ
zo)^mYj<-6Uo+>l7I{MZ5)AW1Gd;IG%!ug~KNz|hYol%d&#!G&8RqV;u<;%4aWiUqj
z7%?wh&IQfqtUb+Dtfz%Q$2H|OlM_+_xIbJ@{C~LWGIC8fnzV%f*_d}DhpeyIL@soh
zb|adf-rv9cStVW~7Di}~T>nCLigrc>oIW>y2$FHJZD%%WLR{+GV&Ut_hH5>PJe<s%
zP~rqNecs4V*ZI;sxWqx)tg~A6#r;gZU2v~{Q`i=}?q&7uZ%qSdb)p>okHaWpaOZyM
zF;78v<opD)&6`d|k(>6J=Yr)FworY~(|qI6Lv|44W$EHovFIi;9T1H$blouGFl0hz
zy-+w#YF<xkjWct=K67w8bAU2)AYty9*uazU7XF50)M@&pHgj$MyB~sZ#vE5htQ<#P
z#mC*fz}d&P15s*vT_(~NeXfa*^2I7Eu6v!-os6!Q5%U(OkM$iW_>TL2?7aRN!<1QF
zA15gDxD7&Xcs}5M+txrO1#uCFf91pZ{;RUPpXgoZd^H)fa`YL$Nnni*{1j>78<%pv
zdb9b1w+u4iU13qy1!Pmvdt~%g^ZrNQy%|^r5kq_Ci@7NCeUj+7@TS{jY!xbkq;H(q
zR(5;rL0nFFyDMgngtVF0o6EBk1&l<eaXtPC+xc)j3u!5=HB%ixXRLv{AnjHTbj;uf
zMF>%nn#JnHf{xt!<3maN>%ye?3Ff=l!i#5Y40#vdLg&Og$C23Gn6C&<`mw0*d$Qd|
z*859SP(3P{Z}&f!jk4D6nXT85G!rx^Mr|xc7YmYy)fgI$z#pyxKW&^RYtGbw`m*h9
zi5vt^?O^V1%Os*ndsWuVdhLpB0}JV?NYPxph5+s{d%3EF$&21^cPH?U`hQ<M;cKv6
z`hIewnr^eM`C;Xu2QE<ra9>1;CA=2U&`OQ~uM0khlio?d&ZIVwSWEC9$#?*}j7abd
zz<_ec75QARULTD8gnK2LoVt7kvDMb!2X&75W7goGX^3whXuOMH;?wCX&CM$OZ=4$B
zJO(q|Um75$sJa>*IAe7D)iI_BpQ4F~&m#u+Y&0LeCZEB^uyU`WCYQlnDDqmP9cx7K
z-jOD!UOJz_S}69~y&YwQ^&Xi<uVyrl!LmE-S`@!rd1#1+P)NzN6LEjk1wIk`G=hfS
zKw8oC4bj;6ly9yoz&q3cEh6q_Hofl7BEQ0VC@-o}Pvj~6jdx_RR$if9@V@lj@Pcov
zo-X<Rp+jJ<LrV_nD{0WwuTP}H|GuK5qqC4vDj&@hkVE6sr9^^?ozRb95a0j>LAs)F
z3b&e2*y!lB+5;Zwt%>iaH(f|bThyZ6|K4?PZpOCVCzsjy>iPKC+C5_;H5Zheyyzz7
z_NHi>QuoK!baYqw7te3y*op6=P{;P)+68e6<K}33A!6Ut4aQjOq6)>DYKK22$Sn8Y
z5u@`5S$13O2lpMZ9n(I3B$@O*Dzixk7Kc)<#@am->)fsZ?L~a!>r+|h6Lzk4uC5P`
zrfs3^;;ln%#Vw|-^=s1W%jdG^gy#b1o#%n)`R9h`yXR~~ImM|%w*b!_ex&U5j{!+U
zzKyzXwr6&Ib~51z?;LL*?<8#}ZGZTh;m*jD)7{1G-tFE4^#j<CagXtwaP!_U(4ECU
zi@u?9v-Ftl_|kc_fntkj`*G^AZINq>Yocp~YlJI~q<Ao6WO6n1lWKq$y-1e|$tGO9
zEp;+ndjd*(0!(|t=k^4Ic1N~TIq#*c)jzJ^d(PLO+a0M-<#^4_KDXn$6bqc9K4lVR
z9OFr|4=VK}2(xb_>`9Vp&L$j}$~O?rXYV-58_FxmBTVCXxUx>8X4_<M06gPm&Z&7p
zY-4Phhke=T+0y`V_v~vK3f^oAj=)3qNdkGC>8EVbY-2!*hpNW{x{k>8s+?1XX|XBV
zG?&1I$35oy3C|Xf%<WgnJFUD;H=j!a>gPysK?=IS?wuPlOEZ^nT{56`@m>s*@hJLA
zmE=1(`hf~vmf}kRM&)iL*jl2&zqvMr0n5A~xS4T!p&-Qu(C+5x@q&J~OSnfU#y<N}
zlQIZ@VOYR;jK9J1K}VtmP<s};gTH3&XI<z3oc_9&x>8Q>Z*XkL0=V3o-CZ%(x4may
zn5JDjJUbD?eD(zP1f*`m9`G;F0I}}ASJ@OEy`F<$eVd$7+)He7&Hf>8EbM0)JxM*3
z>6tEWJ^pE_E`XkF-f$Ohmj__h>x)-(IOlcYi{@AB1Ix1$;fBuY$ZG28^De=zp8&*1
zR&O*+@2Q7WTde80E|#t<z|b?*OA&h3amIdzyi=9!Ut8K~%C7w`4nVy(zSnA)&DGgu
zr{wLIO}?&9z~+PZ9v|Q~_af{9KTq!|=E;ZjIpHGc0%cmsCq?Mrnomx5SPo|NZ3ZMB
zkpEivW)CoYOL`3lV7?ARcmYbU<`4wH$qW9|Y&ho?*G)53`nK)G#jl2h?)Gl9=?w@p
zL?-Xyh4@xT%&En<z!znD8dCdV%uD@T{A`MzwViXKC&512-QS&g$m-kV3p?!$VT2F@
znqM|AyG5L0-@V_(0S_-|&#_+xPTxm-qYj%rHnFC6AxhA=j)?02icRxjgJI&J6G~73
zM?BNQP9&Va!_9()f03k_DUwhE#n?H13kfS2<m%^2=Hg8k`9}$R=2^pL!K{b7Am4s$
zimWi(`ELEp>x1coB@d7J6onc^`K<iM;1At2tv{ZBD*y~v2O}NE^qB$K2vY}79e3%M
zlhPm0tuJ|eu%0j%nBH79LUzDI|9{*6)Bv#vU0+@Sx1s;8{?X=9ldA{CwvzLs2a}P7
z<3s|{6#!>pho6q$(OJ;3$x7bE`^70l3xKj@k(IHc3HB9LLrQhqwcmSc+laJ~Xb}qt
zfZQbZ!aIJ6h>AoK?j+cL%20~X5~3v7{>pHQND`DJNq))*ig*&nBv-;a{{66}Fa@81
zbix>Z6i|{-ir5k=Br5(CFp_Zbp9;PMEriRUC1K*>D3BzaN#^~P5#v!P@FZA)--Rup
zN}&s=fa$^(Fs1MXI6zHdMZW?lNoYlU32Tx@|2b$yL<vF?E|^wyP_(e3e*ugnydtiI
z4vDjW0kkA+Ji;Co2^VxLl7s-so!=a+0~;{Ie+{KT5cn*74BHA1VidN4o`I5pCHdmF
z_IXd0q#4HiQvoS3MA!z_0Ux;P#||^|NrIfD8Mc)WbSC^A)*PjP1<2>O2EB($BJ0Nv
zJp(7f3v?nm5>AIUM<~Dp9tfwynxhs_0+WR`Va$;W7=cZ~E70bM1%$wR;T2eOv^^q{
z2dGv=32_oae<!#ZBnfJgEI%jc8F&d?5*>dh_!(>oE|PUWCs+q&pr`*DaseWcNZ14F
z2&sS?m@Vu9eFR^C3)~R)fIa$BfCdy4eug?iE?@?B2|vRgp%n-Lp@k8k@Su!Hfd0Y=
zFnB0NKY%^LAy9ZQMxTH(Bx%B|{wVOQSfJk|eSRpgtSBH@VIrt&C}5}`KinQENi38*
z9Ee;v1Qrj~h#M&G&;NN(fg~2zodC2eECz)KZ3G956BdKPLo&hwDhP`~yTgDmg|nep
zzk|$3^8NYY_h?Dvq20fOW`(m6SaCq=B!>P`u&k&cZjxR9C`48w5F81np9~Z$ItW05
z=`RDriUgt{N%+tlv*Ll+gtMWqQGm3<MNnxlM&E(v!bQ+&s7AcNBViM$G-x9PV4AQA
zOd66A4p2kb1Ul`D5hrk2_y8&m)(8~{_UA|2b0=~1AA@Jb1@V*I_>IA`5`(-*Zv2g)
zhhgI3ji7<>!Z=VGpNvR>!NR(5*JMCke+HPkParaqNPh-|x^Ey15@|mM=xYpMieCqu
z5iPJ#I2pzr4>T&Qi%^FGVkH^%>wwwACaH$fKsDk4?hC6zX+Rsn1CxYRVKk78uz@PV
zs?fs-@n0zLK^7$C{uKyy2%zsImVOoRbvPhRk`uoQ*g8~@2g!+l1!5gE2!RCO&kC*%
z9VAAQ;b#R?hXgVq$?&&AsDlULkZAc?!PjAj2_8QPB%6q8kV%`+GGKe=;MY=B&|3Cr
z*56ko=u-ZQ^X47!<TY4G!_3lHxKNSQ|NDmZ%m?#4ZsO4?>YZHAr8&tLbWoM9t>UsJ
z$Gd?yflhK=jFFH!+*Wg5frcNnK2N?x!x<7Ss%wIf(RWZEY=xvXQMcT7xfnSHlEaF0
zi9W?~XBN#DAon~mOEj2<#tJtPLyh+G%bVJci#>j1Q=ELA2KmkCxCJ1~+v^j%nwk8b
zbc-@U*tnHTj?Av?KF)n#+>}cjx#c3cYbMqKVd6dNU1X3l6KjxL5b{2hoWT!Fd>AeG
zR}9HyPWC=oWlr`y-Eikb-nes5_S!?oAlrMP4^eV=1<|MMykZli?6$xRC2?2vvf!&#
z4L*G*Slnqr9f}?!T#ld_2#>1_w?SwV-Rwg-mE8q(wn#WQAvS&`>UGj8;wycd@y56B
zlFR{*Hr)y*+jcE9Ou%Iej5-`_+`ia|9i;i|T>J9FuEIHg|JuqvHmYrQQ+r9U_)f{i
z6#tvysf3}9=gF1}&_u3R&d#c4%sg`BW#Q<tU=HA>c453p7ww!E@mTOxSmbY}jmqOx
z&moXoH(GS4iwgcjiVWVsOQ#(7^hH<};W96zwK6LS+5~SoNZZP~XjPNO7>xhPc|X0r
zqeEt<5AVjQf%x8I{-VDz=%oZN`au>Ov;_`bZPUKlL&8EgnF~?Pe_HkpmN@V47sNM+
zIK+M&8@f+9@H<PJVqFR>Nm5;K+kK#SaCg(YxQM*if;xC0y?^tN4FM-6_i4Rp(-!qw
zwrHM1Dy|(KErlzYitmc`RY3C&kKm-#K11`Rsmv?Z_h(?oTLrBo;33Dc@@`}?Ymf1v
z7rgn3EAajS3JI0?DLQV{zF{DbZyeFv_FQoigo1B`pF_Z&I6dMz6$0{!3#sOKClAZc
zXj+zxC!2b41a;1?K__3KWA0MGWWDq`la-#RmG0+KLpzrejY2Epv47Zo#-lO`d141k
zg5xYf$c}~$)1A_>+(#+@2Hqk3LQfs+7GhoBT4@|up8WoL#C%$;pVj+4DOC3Nz{;d0
z+q&=0$_e|9zdHmx!u;rQ|EP4gyqi7`?&wy}xv7ftxPSUcfIkww9|`2@I1dxZz};Af
z*m3JCa~1g7vLIXFeGamGlYW+?;ae+MUt^Fsn*$-Th8^6}(}4(98+1F0@BR=M%=#Ij
zP25WAkUzo6(n+uP691(SvNq~FtR#ZRz{u6PBH<hQ>m>x*JLFF6tj{vaDuQamc=qr@
z)~^2ayE>Aiar@cvUt^~)&1Ix<X>&y;!K-uE?-v$Y`xq9MtXy>_O4T2_i&MRhm$v=x
z5$6eC35css^Q&6x#1q<Z_mT6cZ_-KTyOzC`&-(S|7B9GaoAR<6yt?K>-Cn;QT;+)9
ziAaoeoF;W`aaz@Mzo^}#+tUTA#GR3_YpiGGmieMAvZvXqDUd5b;w^gVzje6vjYk<G
zTa|1%AH70+bK)xTy{8*7CnQm-u6NJ4Xe%osT0<$hr>%a&ZI<JyfgfZ&=!V7I1H&IP
z)KfikG3cW2TZGIv)eyTzh{y3}j3Ur|j5fIyV`RAGHkKtg(2**eHF!|N&}M;pAY0G<
zWU#hFc=T;RYrBJOLTk4JpHTXelluaygK>gyyMu7z!`aW9c}NFlQChpyE_!%%mgR%;
zan01y3|n>dsQ|O;Gz#OknsbEx%E{l8G1*owu^ClJYs)O;cE3x@7c6`-y1ukNM7R=N
z*^Qlja|cv&!r{K1kKM}M5-Io_R{(pY>=0j*(1Y#8KN1qEjj30goZ^;)?xlS~_h@{{
zU^r1Zku_$o%2%#|!vBgjR(`l)cUQPyJ$WreGfdb)y+pf&$5ED0EtcX@d|)VlNplr<
z%uXU$mvw4asd&U}TUpfvKx_1UOF?0NnxtjxZcu&wd(Q{Q_e(Wg-ISF1s4G%Pt6AZV
z@cOs;_;q5_HJa4T!ArE2_#@Y-#!*GTXM}bS(^|$*Z}MOcljl4oh=TfaIMTb$inoVq
znX;X%owc2gowuEcouQqQoui$!ou!@D<^0zDmSqoN&tf27V0(ZqoGagamQitt(roE|
z0e52-??g0>%3|2xrr_V?cudZ}?d&cgTfjdic4l_pmPZi-(WX^=(PBOe{=D;L<)(TR
z>M0J8pA|^Tax0EV*iv@J$g+sZE_XtgZx3HQzD2>SgK?-|qq#e0Yxa_~NvLK`sm<~p
zdAWi1A|dWaym@*0nmrtPt?%_kZ*=kM&I@)E#C0|9g}gb^e5Ll}0{On#qX*`DVuB!S
zj&EYwY@_RLWBQ<fMb87$Fhqpq<)zXvk%|7cBMri;&C3kK+!uvcP*BE56747<!vLtn
z(UgT#*q58p*kDHYpXJrIh_Iu(MmX80n9-f%i~}4$&><{5gH$(Rei|YSv`F!OyQ>m6
z8Ga_QFw=gltBO>*Y|PnynA+bRG&tdE11?wTOQgEEd;?5ZA&;6~<Ph2}?9Fh)9nY)4
zM}=1kof$@f8G7$)oMqt+I{cAUBXak4D~1c8>|PeD&IV=1NV_rHvUU@Y(Ky749ueg4
z03=|zND(ojiq;_C-`uC+QJYA(*+*uTW&$GbM>?QK8(W%XYEd_XDjoRVx<${EUiN&R
z{=Q21Frb0t_kKQ=@>2*Ugzkf{!(M+8sVI~M(UnS-nmGs3RgRQ=Q&Al#bD)z;Qo~jj
zRgoMhFQZeKSEQY=oInLTo2J|(-=KkE!6GxKUtV=LV#Rt9xf_WgI6@$suTqJ|^8n{*
zzj@3`fa!wFt8A3XL)ei4&Iuh(<bFly661#H+rZ?G+P&ZHC=I7}Q+(wTU|G(^B*9GE
z2Pm5$53;vP)@DelgLmj$`-h{1zcTi#(zMh|*5_aHF!O%3Re4zjUA?OccGABMrFmtH
zmw(G!Rt7JbSrc;iaW^412ro;^yQlhynXXx`%hVIPrp$a2j5VkkgW#*DSNQA!+{@rs
z(XKG&1L;R;FIwL;=H2SceJ^;uVYMr(uJm`1?~c%o-edQpJ%nDU$9I?dsr!l6Cp~A|
z6dp6gF1#x*=a3m8%-;a`jo}<u1W@#iZZQ1HARv{7Dt!2ZjLWS1RpWmo)CgIF`X#ca
z2<sgsdkHTp)X2#J^s8WQx-Kle@Y$UxZu&HKBb79o@?i=M9jejqbww4FN=DWi;u|zd
z#yV+Kw()m+<8@tD<etMD*MiI9_epO?zE34yGJ;IvAn+bLkIn>;ZJ&WhYa(uP6x*Rt
zo3dUdh_2vsIayf=T~S221h%p^5@nKNQC(ssfr`kyQxi`$?`jrTmTTq%;hQKOd^DSx
z_RrD%zxyA64!ovZa5BE|=+Tseqgg9r!y2aMIT|BcNHTE<CvhMGwQyiUZaeMNdi~V8
z^5HqpS#>K5m`*L|jypMaclQZSFiw6a;fc-bvv0Ee{^XUp7jI6F>9vLzXHH)Z*zu|O
z_3L{S@j=cF`75$dqVI6`j^2&!qtH|HE1yr4@1*Zn9e~=j>>7PrBvD@RA*Dy;3xN2l
z;2SwaoS!oLgY;{~BF@iz5P@w_s7_foU{Nbpfql}CXi&XGeIJQ7AiiU0FYHBz8iBdP
zWv}?El^IWIB&i`KHi~a#t|2xEs$*46POz`*s34&qk*ceUN>MQiuwrZnRn=v5sJWyF
z7|A~Yz0?KCLPxJY;Aa}@;o)mM9#KL1;*pen*1H;QCV9~2p5&9QyHs|v>7K?w;$Q8N
zO8${@uaRn)vNkCfPCl*7$_X2=HCVuOljH9Y@V&(Kx~*iQ(+mZr6Z!{g{$HOH&pHdS
zT^HZ^%otd#rzNjk=ZMydG&<N1$$X`M&VrlU#v5&gR#boMmY{Cfu|^QCsqVEkPb7(u
zT5a!Mu~=<h2NrW*KnFvtG1aSkhT8UgYG3)ycZT%E9oh<%?zrN*I{xU*{*kLyH*(eN
z&7O>!2>z_i0lFKLJ#saBIqqWhbVsU@(I1GDi2Dol{Rvqo4@P=>4^uG*Q>z22CuTu|
zL;5X~qLqKC4d<F)*oeJKQuzfFb@e3Uw_r;{0-t`oo=+E+`IHGkIO2j;Z9`P)D;R%-
zx46mA@i4o3VD}mI|KhorYe{|_byq92iMx98nO>Re(r1q}X6hIoD%`{}tj<?NSUyRU
zzN_Wh_F|jh+VUcwXx{QF7c}Lug(v#DP^7D-nK`I3!yjFUCo|L1m2Nx*>Pl|Ri?gG*
zl+AxpScn_!q~Ht?J6N%bl2U1|Emmo>=*w0TD4D~Z<8Mr5Y@*VbU6S(5>ddgN>2@8d
z6{ty%>^rNKTq<6e)R7l|I~OFZZFFcJTs$J0(}VidRGiw%B|82V2<y~O=*95(>&K{#
z?Pg$$8HtqFQ^5K#es6dDLuUCXH*a<CN$pHQtPR65&rb(ioGv!H<}=$MssMuh8&5|{
zEbQc|;O>*<ge$XM9yKiOoNhHOcKy$hx44v2KT>EYM}EXg;BaUJwI~$SlI3NWOp=Mh
zUdO??=SHVeOxDxZgHEh^q=1uYJ$b`@?$PTcdMSJw=B-*?Lk6IX)loW2-<W{}F4rJR
zU}$~h{I5OJnN7fL-n$Iap6$<!>qa01w;>nVcM*djJaeg^e=%sq_UEvIRu1*{qFJ@r
z3%k;A#&p*h!L?z-W?84|S$!8^qwHQq?P}iLD+m~BH}Qb%?!)8Lt8x9c!8O-Akbw9{
ze2384lX-XSEBx6@>D#d%Z;7Bv=sfs1jJK>yQLo%~&h;4aF8^8MEe}!{Q@%N8?wp*S
zyLy|dJ8LVJ8a&o(!op_epp-tsE;|~<nm;~cg2%SNU^<wFJtk#h%(hWsL6tT?{@p~j
zJ~<8JUjEm{f#;s(x#K+_Vy1j%;6(8RDVPmhbJOYw=Z<9UnO}SH=i2wqdHjUFK^kz8
z^evjX3v2C>DXwwOeNqzud$~(XMLyYKv4rLrx5>?N%7a5tOtdi((~z+;?h`5vYr8yi
z;f$w}d;RLo6LOET|5%cN943xSk9}Wg@*6-NKHADYGKQ<cAjN<csZOh*yik0#@3Nfi
zRl&5U_dxMpN<GRxsfoG#W7YU2>Vvt?WCeGY=fWZqry3AqjJ(QDuv#mPS9pqlIwKY(
z>nm2FGhJnnSYN&}A0_4D%(q-(uvn)QRpvtYB9@<?WwL3c+<day{Eg#O>nuc!@x`S*
zT7ho_R|RB7ph6*a_;3M!R>((IclfoK&7$LZFyCm3-gaM6QzbxOW;q$qc0V@PXxdaI
z;OKOw(eRPXx11a~Ua5EZsMAp;P+np=Nq4eRPuF(OAiJ2IUA8LwQd3!iYa<XL?$9Hv
z8<4Wc(m^1<!{KhN8@jlE_juO9(w)Gy?|M_!k&)l+ryS(<sN2DH(f4xg(`wHyI?X#o
zUzT9n1FGj9F*vi{!{!P?oW`20OeyZPX&nQ%N%ZnYnDjDIxC_nGCdXj+(Ine2Wuwok
zbM?=34wUbF;gpz2id+ipAE-XHrHklzw93*mv@J)R7da(9w&zIcG!?MSGJ3CzToR4q
zbg^%5nO->H<XTxyw#Gj@Gvix1{F72U`i<}mj<4s?h<aI4%(Oj3XZFxwvB?sD{ZyH6
zzGbn>bkoYI8Gq?ZRQA2K3weIZ`htz=8u-+~1<yMREfX!uXCib$T<pE1S0Oms-+e`|
zlRh3!M^+n`+9q6Sryk`hrQnIIN|A%BANlHUYZx6$E7#{ClDq0lcZBL_ZjX{zEuwP~
zzKW&;4-a0k5K7_q<ZXI32k${^Cx+;#TM{2%8e5sBisTA<+c;NHdz{8esP^es6`19j
zRL53@q`#V_3s~OhT*upXAJ+2H7>?4+@zkp=L4!|6>@g=5T0oy0GTbaVMnfMPyuUid
z1dfrF3I@PfQI``9H{@y%=5>^T`!)X_?BOS-=A`aPgJDw$%mp(W0CyU((9NM`Ve*G|
zSi26x{HFoyYTX@2l!d3f<yn>1v>8YDnM@ROnwL_?oWEXR@HT;|N?K;dYz6*=!F@uk
z1>XMiPx?J6BYM(Wejcf7_pz6;52|c^&i~P55z_+4U&h79hQ`qUBg;Mo@vL~w{2yT!
zb4>EU=myU*;;DjXJQKn<!z(YAIy}wD-caVy4#^_RV9m>$(gR&7A>EaNxpJ2%F+Tc6
zB2M5;{8Y|KLgTVOM=()VshG=YZ_8cdyGQk6?t_QE)0>`vPNc`@&RQN*xJ_v0HpK2&
zv^^20>=>&R^%>k{j`*GWSB-;(8(61t6v2$A#~Uvq`hv=DM>a@$y%9HsUX+n@jzW7Z
z7Wmsh6zZBb%@Bs@J+A2Wiv6MEzMPh%ian%-z&*E!yF}AHJQw2Su}=%31?q{$@$+;O
zL?om8HHeZC9OirP^D_GKhby%@Z7x<^UUAJ%Z%eDnedMRa+i?^amLfRY9r`iWg0?QZ
z?t*Gdy`=5R@eE2)H1vu9!mH#Z@(uKhh==}{)RadWero%VNyiMUSn^Pmi0jj*c}Di~
z+)D2f#?017hJf!CL?Lo6d@rfl)4`2`lO`5&ciHtCizJgw2b9(28167vblLD6i&25L
zlG#(Csoh*lYy8$nca}A%*~mkT4LJz<M?-raoP3QJu-%D0?{g(;XN5#Eor^qnJ$LO)
zExOWHIV<8AFTcHIHioH>*=Fu>kGUhK-hfGec=QN{X?MT8p^UMbjB+S~8+2~_ccVUl
zLeNN1wfx|xZ?SwXv$epc+>S4{qkM-FfjgV+XUUgaWy>DH`UY;<Xg-L`4PcN>7L|K&
zM?mLs&RlUsYLmu5h2e%-QMzlI^_b@vs{Z>{Z4KIwKCgi_vo1>_cHbrwE#wO01q;i_
z#@Xl4Mxn7qgdO^sPb76rcm&_(*y#80j`8q)gqEXauF1W<zW63sL1F`}ke?zY85C}@
z$(Lje2%cUThZi;ac@wJZqwmOU!H%52y-2(Mr0qyw5#rPRCw|-Z5QXwo&P+z|%=F4d
z;f#1zByLLd%8_Zxe9cj?5~zEx9$|FgTb0u_!EZu_oM>5ueIMLt;#$^P_WW4JoX9*3
zEN$B6x1OD%Y2s-vbw%DD$hNk5-w3JFEqb1$A~JgqyPx2j1?5kpSi*w(P@|s)-cypG
zUfvfMt`>YNl-IUdsuj2$zx|}FrovwlMKPA*r=_YNF{;frZ7ksrou75BYd_jJtKf0x
zxTr_Dw!GiX&}E817;ZZGCh#ztGu(=?5y;c{yXmJXc1yZ=GRH`|jkU>JX6$g6+;bo6
zMppqVN)$cAq#IFWdaE&#Bzml7IcM$X<1crd(k%rF*j>U*Xctog{!;{8>>6S0X~Xfk
zeI8R<<nsx)3;h_X1nrm}C$D_+LPPrbz*A#|w69%MV%BQy>hL!e0~!I|{{)4nm&{+-
z+Xre1B020<xUH8e<%EifyS(jbyZjH{w`*)K(b}lLO|W3(%fwTE6@6x+wE08j4riQ7
zZV{HwAXO02RzYFXmB(_UBG!-_#)5!us4*XPj9;$%o4LlVQJC?MN<~gZPWYy?@(Cd7
zlvYil`gcX?B9zr+pKH$^Ho1do^JsiS1FjMd(XBP`C-ay#T7yr)icnbEiTLjqdo`7p
z-zde4-%cN6D}3cHN@6$Ab0K1;*DlA-7@hQkf@Z`<9B1|S8mgmz-_;{#C(MT|_+T@k
zD<&xKBSYN14qU4bdHT2AEpx6b&6N1&neMut{~09fw=z~^>tokNXbx2Ds1{&1v`{h{
zYf$(psy3($M%0dI)~fQ*Pgq#2TXQsPYFbw`EeNP0mgmn8A6q%swrM<Q3RLK->Xqkk
zOno={(sbS&qMinRj${#(_x@besZ8}Q8cR-Zrd>fH_*Ji#cLy%o_b9d6jFC8=T;26L
zB**k^Z`6UuQzkq2%9tW=jNvZq`vgwuzQq@<yrz;$tKei(t-=ki$(ni1m_hycf>rKc
zGq>OM%)-BmOBSs?N=eUhi(NNF5la-sT;(U1UtvmePCSZ^&T&gBTH9oj4L7mNSsr~i
zmFUvZmXTiACttp|gO}*))JE4FtolW<FQbNj-Hz7Ua+l#eGaukpepZDNVX@)V=(^#u
zVedSp&{dug6R4wO#_&8pe-^Q#n5}Co^IDBlt;KlkdZzpbta{R&!W=0z{r4@evKz+W
zPlZt{`R(4?$(_^?QOAcxgrE<xdjaf|a0G4WCFz)KZF{tp4c3i8!+rR59{){bL>?J(
z7$6Qr2Ha!}dbPn4I~fUU+ubHCEW;^-x6IQlUpSS!Ye^rPVTnNNrxE;AFB8Zd{~$ZL
zE7E~Wg#E0qTyv;F2|!X!^a`7)_!j+ne0ZTrnNiYUwh~W9->Rmh314H*crV9QkNv%3
z(<CiXyiT;wk;Fq*P<1Z>ZQ*0>VWL?-k>E)k(em&yxfL;j>Ml5Z(Q=mYjwRTV2SGu~
z<VrT@B#qu-u+nfjA~WJZ??^`PR<kVmV;G=Um4Xt19vSv>(ub4^HeamLNp{n;`f<?%
zj2p^`m6QznaTSxM50<=P6&KfUtnT48D;pNq4BIqMnmpgh*MDo4=WGud#Oa7*@-)5g
zbNog=CO(!#Y~5VGoW3lv8QtmBW1C|M2Oq9wq{wk&a`C|>cEhZPnWmLjSc0L?r+__W
z--KfG(`@;bNwRfjWoBLHH)quRsx*@gqXn*vRM#}u3_KJ1J@%@m1GQC)JapMi%T9#G
zjg3cFxH}pFE=AqR7$CoHt}gH$^812;u<PY*O=g-d&Dym?!m6~|Cd5)Gmm2%?vV!`E
zR83rIO&sBzE?clOX+}d@XHg|OUm4@q7o4X#Lr^iquSG&UbBtF%3luGRi{D1J4DwRY
z(j#mn)uoSit0dcL<ZWTbR?yM`Sl@kZT=zPcTg$hTXFo5M@{rS?x07dEo5grA;tma`
zCcJ?ERr~!QnCG<u<FaOlG#IYmF5IIkS!#MiRq^~e!YR4l$I&)5kgJbC83u8_=O?V)
z6p-63>kbOhyXU8n-PHTX;Tq&!#$mRy64VW&(vF4Qy<9kJXULW|Ozd1q6rR7}5Ai&x
zYU#`;4CZrNdkR`Btys;^1@0NlZHP0Z(qEzkTvhnnfUbYSo>bJqN0(uEkH1hNya1$t
zJXEsjj8c^<Ls!z+sgaJ!%!w7HZr;9ZmoEF5+QNzMOubsPGpVPx>{VT#v-5Y%=l!I`
zfA5H{7S<erO`5@#Y6J%nzwW^z0---4diWbL`#RGF4}OPl{2q%#+$@4#rosHKK8Y7{
z&0Vt#7pXQm?f8_YKKu<}xSJgw`obDVz+_OUOH|N7p9r7mFUOtjB;`F^!3dd$(Yfzx
zZ$G=*&)xAZe4ZRO5X}j=r3Ka8PsC1`$}MfqU)WA8&-#`L`<&<4peg&DU%#;`H0kF5
zv3r|mO(C$|NU|JobO|P!>OQF!XCaQ=8SX&%Pf#|ssFr^X2+j#IvI=!Ebg9vr!4~w;
zl=ZOiPWF4S1V{BFUde>#_tt(smuk2Y6JwDhHpV3&HhxC7f07=4`n9&7lyGBWlJY8-
zG^jbteTu!{i0@%T88MJB+5bBx+)zHbKBez#EjY<oqO)p)x;wr*Zb1s@GU%uDM!53a
zZ%V07h89V=kssI2J9LtiTs3+)?oelyGgCWLSXJCQm&7-5RMLyf&jUtwnm*LC*--Kl
z?l^8P8U&856{KL5)n^ne1vUP*7V)IrJ6@|lYc;jZC*VCP^c@#i&Gu|kZS1SqJ^ryy
zRP_8s;qM!uZJ@PRKDNMj03$jdyciWR!pKF}yjHU2aDkNKDc`c@*}H$Nnpy8_^0~mH
z1WGMLun%{5*rBK?4YzikS18a~vf?v?n~M6SMa`CE&DQ+QyeZD{jfVd`^}pf|;T)bG
zBQ?mJUC^q1#G?{v(Ne~LLHcE}1hxgd)y2>f3;$rh)dlldRpJ?cNaYa*F#x)0%8V4}
zw8B^9{CY*)##lB;SYk$v=-Z*Um-?QPiZ)i-$2qrc=RZ#xF}Xv(hsDFkKAK`0Ep4U?
z4!C2yl!atMIMAKnJD?WLCih0G>zGz=?n=qwQ+T?2d4X7&j1%R!wP^5aDWmmhOw&3j
z9TM$yG!W<Z=k)g%j5EIjF2+UT7nltd$}|@wSKKwa+gE;K_{pof4d?!wl&#i?j;HSj
zJnt4~)l*eCJ<Y8R%SPU|B5N-kCJEpx+!AVrT(_xcx8Gz$48d+cpjnK_3_!<WqzTm{
zOvm8G(YyNY)-l0KHU*u#2&)K|(D+RcANTi;fa}4qTICHlmNfSp5cREKn(gw_3y4{7
zaP#M&;gehZ6+ke>sKSv4qcu|zv`<0en-KOY>%3<h&wRpzeVJ*<TMbaSDZV9$$e@Kh
zX|(j7OffYU{I2W{wZ-;OgWc$`hc^zY3!xw2jXy)EjecS-kK(1-6>l2~)gTsAfFMyh
zXHH@bJRvyVRv^)rn#%sN#cz{=_ym|pAE)W3(VVb-JpUSH#&nyE)WNn_H}dI>;1M4E
z=z6q`ZSLY7UOK7rc6E*a>D*gFpr8931DF4TJNx1DXby|Z_L&9PB+`em27LzD*4TPR
zbgwy>`B_eMfnQ2Yqk{5)kTZ^;!In5DRG#Z<Iohgb)Mkj6ml`C7GuQrA0*yb?6rDNU
z6Lzf`>H%*%U5Dlf6Q1VCJ%#iLb1|s^984*|^YPWv|B!6o|MjL?G77x6T}*1Y^6??(
zI5oztXt>*$NAiLZP;s=n6nXvXE-rMH^8-8+><-YIPH`Vd*pd9MH5hKc$2<n{J<US)
zlT~?#EUuX5d}tn%9hW_;J44mdJ0v9HDI_K0qt+bIjBQc}t<ALKsZ!##LYw!v<3pM$
zBoC=dmFXmd_p+58)P6B_H)hwHWTugJZWKJcS7%LXn&xyaS_^qrUToA)xWbbc04~$E
z*m|qnc^+BA(YlDdvfKj21H~nOT^e0dwD!|jCsK{IjI=}~vaaBrg-;&ZI8j4Cp+><)
z_YD4F$rJj+FD$bwI^C{$-N|OZbyE<<(@#KF(b<01K3r(l<6zd~W7Y#*ha1Wpglcxu
z-GT~nU2VGDl#fMfgLTiF>l8H~+GTc#4y+8$B7HB?`plVEz4Y>|SGZz4E-C32A9+Pi
zZMF8Azgn6fi>ynvLNDJi+w+<U@Z=|7*>+ZVPk6KpF0t*=W6=FjwlIsnm(g2NA9E_t
z(et*YVCQ@CC}468x)F=H`u@xwSINFk$ugdxmfvq4DrA7+A-`pH(@5G-0mq9P;b};A
zk>G<=uauj$)aAuNl4Y}Q$N4ynA_-=cn$Zgd&SnBDew;<)X3{IkE{_*lerf>Z3M$KB
z=dNTciq(Oem<Ff(HTqL(omW08rl`<E<$Ow-{E)Cxhj4Wb&1}`8c~LZ#;DxUhKP{0L
zigqM56Px1xkgq7$&{~r&1vFt>N%JAO<gLTE&$9Qhr_-iNz98Qh^91lXwQSk(D%w#H
z(sL)v^;XbI4YY_9hY83}9R<uDF<fatFjxLMp2`Q&F*iOS=^8VqIL4ekz^^V5BYWB;
zcYfYHA8IZ~7xH^F4I>7;5@y~(PiO|dh1R_5oW6g35gLNz)VvFv>V?1Q{du2U>V|m{
z>V+`ZzJFK|h`!?XFOvGeUEPHdi@wtL$C7qIU+JO0f4|xdvjx1u?PQ<}1wRtuxpstI
zi1I^URfZ|`H<O?L@<QCP>F*X@3w)I8-~IXyeTBh#-XDk!+;!bzvg2y`B5uKbg5Q6a
zy36IiDZK-UFK?dkPpK?y8IsfOP*^JB9H8M({QUy`VsDV2Q~r6>phG~{3zzQOU-}Vh
z0<V}AeC*%&$c=GqaR<2{j^A<T18#lx2P>c%aqv!lb>Dm8DeZmtDfMaTy%V3oWR2;{
z<SO$L^9u7a^4Y*W#+YpaQOC9EF0LD2o^s5W`(NUMe36C`6Tge|&L9nV$8{9=13C^K
zT~9NqirNH~N&jRl1JV`>f6P9ApDX-gqUkzl)rK|JAScd<Ff_Mw+i_+5K6?i=PRah1
z$EG`R=fxx@?^*9XV*j~;U1eU^2Vyxk6~kx<(LM_bP}HrkG|F~PuFl+CMXfh%Gw`w1
z8;ctrBuJzF(e3*E;6d&~$ZR^^xFE@@HBnPo&eF%}hu4H)vP5MNVvRRe!x)LzwEv@z
zv-Ed)X7<|{#3qHzBF+{>U!poKdBxM8_;~7l5B&mstAC61o`cK_>gPC><n!22Ptb1n
z^KArp8fyRKCEFLW&c2eF(O$a>mBcwPGkKrD7;S6*I)oZo>WRm~SrFzR{&sL1<uQTo
z9Ze|~Ib)DWgWtif&cvIbG$Dl38sU>e41RxNnAz0&#ZnY$dO1t^diK<UmbI!C?gnX@
za!jgjK32c0%&7bT9?GNVCyouA8{4!V)c;$HVbQOTv~1O<`Rcuhnet!YFlIisYqj**
zj=4d6O=E5@x^|CH=N)W%E<XF{WWMvwFkUh+zDY^P&b+`NZXr=`qM?4-!0%vgVQLwt
zF;(WU_|7HLID<AM{ZyYDN!wzCp2PK|%N>$xn{n|9pSX^x>-yZcI+41g>%!D<?T+mu
zP(69^HNO`H!k#mnvt9pK&mTK^;P}}6<oN0?n9}|4W0-vMf?(+V(>p+ZqW41A8%w!V
zd$N3Wh9LMRFz?&yL);}jyS>K*nZ%HHS_sy!xGAqx?NVP~$`&{dR=TxsSBA7lH+{dn
zclm%@=<*6L`0A@^?cV|3q62ObyyYn+j*YYKo^iaUZ>O6Ief1@BW^!GkIy$+$(RS1L
zLQGaswEncc0U7A2{@n~VIGyWpTlPC#Quy;>lvcOwiW=%_eW3Zg?rh;IZ0~ytMd|z1
zJ>F?YV#-B)>L^UW1VLB$8i~gyLP6J|e@0w}D08OF_pt0oxtZVhg9UMiv8xG#dGhBn
zHUrFZ8J|{9XpU})A8Jj@jVZ@;4zV3=lRyva<fqv#kLwAyld5h6@sp&bQqU}hGs{DX
z^~t%wW~t-WuzJ2w#0^%Wfz8FwDYWN#NyE6`@Z1<Kb+>l^y!<KtBlp1=P`(`AD%-;C
zS?>v)z@P9O7}4CxOPa@g9k~3KA8k6JUKNj9scrAi;*S<J6xBD#JfV3NrPE+^g<ENK
zeyDdlp-y)pnyJIdd+AeqO`+ZK!n(x5-S0lDL0ZwBWYoSOV_Dib+h(@j$j+#AQvGFG
z%q+jrUQ;5YY<%v(?52@&Me$6>y0A%1tJ-?O#cb2kvoWW^kZD|{cR)LYep+QhWmsig
zWmIKy9yC8U-#b4sKQO<ZbTHyz+#b>*)*{wE*jm(5)N0alt$m}7tW({Z+^X6l=;FP-
zvbA!$vc0m;d&s-PTV?5iv|fzwk*6zHovSu&dDwX8;Q`wjzM*Yf={nVZOzTmUU5Pd;
ze!P1t`HcDO<ed!36x7oz=>E$*t9D3yVtIS_Y~mf-rS&c;biS~TWRtV%kYZ2WO5a-E
zYT0Jle$tBHn$f1!vf9Si+TPB#mUa#~Cp||$7hg+QQ(9+Rb6j&=M_#LLO=%Uft9Ge&
zwRO3$yKuO0C3Ydc`TC$AJCv}6<YpzWA@444EdNEGP~Q84q|PQUEzc)UE$`aHE?-pK
zO+Cc6#x}#YfcZ<yNPM-2ZJceEZHR5L{$G86{oGBJX`yMOX{Tv9*mKfn5`A)*Tc8R+
z5XrWKu{$!L5>}3(##Uvco!??&U%AUWu#TUCzR1NS-f+%7?H~?V2KRr7#g~<<_9gQr
zG%?6Z80jGn=mw^Tm{7!rh>7Gg9tAne)kQIoXQ1@+QuqB(v%*^7N%P|}m(Oq<PXWOQ
z0_Dl1YYv8S72a9ZpNs-;!s{cv&b&hAL%W<7;u+m0o1)F+9Qoji`~{Gl)5(*OivnlE
zrHS;r1LQmZ;r*fF#`MAvzf(REo#UDQF`pgP$?VtH1HKynO^{QOiZG%`@xMpvu!hU9
zhG|4urQ)I#Df0gd>*z#T9pqIDB|eH6ZM;H+Q6iZ}QeI;gor6uZy2L4N&O8Kq3&rj$
zH(u0M2{d=vmkFD|RQ~p8-uC~Z`qiydPVWE0{0STSW4WxRu)+Y?{$_*fx5P&$+^$aK
zTIJt9p156wa(uPLS>D8{uoF-(0jziTE(qKr1nWe#SAU4@NWMW2`Q-zS19nQxmh^%X
zRJe75VMRR%`|${Yo``!J(5<e*=O3Z?-UfQBE5M3>36bEF*guxsvCjOF|G(&{`^mY!
z{Ja$W-Q+@@_&4E=hFg{3V~h5@$Npif#nVpP)RXh^BUck?rk6sY*@S$*S0+%sr6hl6
z&f5EO8mdAw+l6nsSvk>#@98j~t#(;j{EQ{`P2k1G*+tEhg&T_iy2$@J<}hN($nG0A
zK_==16ty2_kDBNR8RG}GHsiy!H}!?bNd$ErDDq!e`-2;W096oq0^y_D&$K`ZWapz0
zUUNA#?GvJw1%a>lX!p>F0qAxpG}X>%&Xt}emg^!qCq&1Z5C0k$GO-G>0veS5S1Df{
z@X=fuKGDLgycszK^Wu^QC1BHGIL4Q?MpnRPve`)X&ofz7&xG1$OEU5A>t9Forl|BQ
z=Ve&KP=;hm&5dx<q;cZ8Kn|~!zT_XS6$#|Z>P2(n)|$zxx$|a>nmL?*$IZ1?f{UgY
z#xjAHf6yP#?t5)r@!~9zO+!GH!RtyvZJ$KD^X|ufdwLA^Uw4lx>$iOtFSCpPEY4jg
z=E^G{DeoH5kb?u>3~$KyG$|1fFf@4DG%ow06HKncEg4J>DB)p@Q<COW`FOqGD#b?w
zJQ@H;9L3mzjfz9f|5xa^yRc*4S5coo%I<0Ip?X%t#t-aHeL92IKfE+Ak;=yY1-&qm
zqSe69$Q0N(5_Al}|564~@+vqIWyirv`u+uZuCl@K@nsA^_5t?a$z<P0;b(tpM6jzw
zuqTpzDU=YQo%#J=D4Rr<?wOuNEG8WnqFC@3%bZ3uolcaOA<e1Z=pv=+;~JHA1Y#si
zmf=;D5^p;ii68#Aj2AXs&o;M=$IS<8YPxlbl9}cI-@SnT(Jg@C|55jrVRZyuw_t(>
z2=4B|-95NNaCdii3+@)&gS)%C2X_eWdT^KNeBaD{?#!>5KX>lSQ|wc<ySiz*tGiFv
z+IubZ#AG>n6X?6X=1wGO$o=NdMErTJv*YNQP7d1mjgj(yR)P<eRN|XhoXo&bpihs#
zJ_H{47&4hsG*Ox*#Hcc<L=lc4a}qhpP3Ke$Gj!(Xdq|TDjS)V$Rx@IDf-`Ug2+}RA
z9|zfmj#G-QW~G1Yl`k}?-O`4>t0RLeg!r4E^HT~FE_3+kLyyjW?Q;mU|4W3ogqiQ9
z2Uyo10_x0fiR5#L|6^RUVjIl=IxeP7d*^KL=581GAD04E6r-oBpUeFxbt-WE!mmG*
zm_NA<eEN$Fj+F5g0X#Htt`~a?!k&b(GV${m0?zM-oM^ndcwu(O5ix|75n|l`$Cwvx
zstc@3!cPpe%KBH9-D?mzk)nPYefOwzns1y`SmGAfImL6SbV|f$#j-#YTMb11cUAnK
z1Kz7f>VGPAfr?3k31zg|%IdrpmUii@86lnEiTH_c#VdjyV+dn3HG$VaQ%xUwAAR}1
zJW8%Vvg`iKS$y`Jm*o8S${0erjz08+s_XO_7>~KDKR&D0ieP=x|NNmyM;D*a@PDn<
z0mefqzam&iTX|WU#NGAZMWy$u(%yU9!zDFbjNwUovYduDP_BwvaRYnjt4jzMB4>XV
zbQbcYuw2zm4a+R{ew6DFXDnwdK&CUC=`iVT7Qix-w#R!BlsP(ycBnUrI+-x3d`M-M
zUO(Wm07H5gd)`TM2P+5Z=y8QDUdz(W)c&NRfsnq1C%Kn6nueK2yB)A%!+$qaeaUfM
zO{`()XL4s#T0cqkkZm&|Im1sdJ4<gs5$}4B?y568RYft07tG8T*~CRM9^|o*UUIC|
z(sypSA(Z^wKgXcSunAd}Vh#}NUBC5~Vpb-61n8CLP6iHI?tlDST-^g%rPk5H;569D
z$$rmIt2)&KIaO`m8Hm}k;ZUZBL-(9%A=jcF9f-+Toae$uZ?A(YGKG8YHXO$Pz;s)C
zWDvQq`iOe{x`~DTXA=**B9fU|9n;%*3)2AjbvLeI7#q>oyNvIBl8*X1nZwUarn?tU
zd?k;EE%jj{7BcInn9a2DT9PSR8BVdpL~^^Fah4#5NHI8yEI(LRy(npQ#k-n0vN?%O
zcCvYGy*~##=7u@8gt?C!zBmvOHU^%3yDtoXY!{y{P^LW=C$+OeBbjte*zMpv@ATdG
zc>LFq<$hvf9DnjYPR#x3ea5}k{TlT?Q~`zsm|cKaulk)9&C2*K!mqjPXQ%}4%^>DR
zGKDdzr)>1&!fp@eO!G#xnMHgFy_t|siFXhm73<?>!!Cy7YN$R&3)cCZ?tX?ySvd2z
zc<#K4v3>@+Vn_amCqd?%y<b!XP-#@}cjU2g2F6Hf--`yl)4>Tn8$W(Oi@cHAit=oL
z-N#TF%uDYGZ^<Mol_@0Df9z45%Bq|Q7GNKfoMaHcFCeScF_ki0RCyWkn}mb%D;+ds
ztX`2@S$;{HhAn23z28xA?ZGfB4h;QbMJA+=DZd|XP)0I=jrpu6mNsiN7Fuo&5cEiS
zwNsnWDddd_#U~Bo&wO%oHE{@4!@T-dX7Wp}`Hx?k)(=XP`01!uAHAySDPBtRZ>(t1
zk}7ZU+$Rpnif#h2bsQLl)l_IoN+o6ZqaiWOzYEM|ENS#)Q-({9V`+q)8)HkL!7X>Z
zZ?Z`+oIUQczIhJ*G9|39UYR<xLtw0*@IN5B@g?!Y<)6kf{%f~~g^1lc)ITI~1C<ow
zjX;HZhcEmgd9AjY^aTC=m}+r1zHt6^>iK4Vgvx7HliKYGYV3UV{5cKDPwzt?1w?r6
z7lb8eQVg{{DP%^>Tc!9>udmw+N;^T<zPXVU#&k*2@*&~7$+V-konaB@Xf<_MzmXI7
z?3&obK`wh8%a)gdpv%}C3Q~Q|qT1WGbWx<5kFnUjk<FLOW#`{iKEe3cDAuiIf1gtN
zRY*m5u|sSOfekMYrj*3s4`~deA+<qHb5;KSs&`wyc{v9`4GNy^<Cp2RE6?k$UcqPx
z*biKSu!HF$cx85ncn1^1j*Lb(g}affk4`fnSGQ`R%^&xOG51GfgqMM?@9EMPu+LzL
zH5VLDqfy`R5WK`0u=}hB-R+!>$xCA4oMMJ8F@Z%s#fC9%6ovlF6s~o%1J#<en~lZz
zuhgd{iR*|R2@6RN5yBrDx5F+2Dwfosryl<v;$y<z<DFYnHi4}_PP%B@x#n1BRec*X
zKk(S5(ilD*$@@|yx;}KDzUi=lnD@QUQA9Kg7$RBApud`Zo&ir@Cn3sd5FlDV`s|td
zUWPo8Pj2ozF)L-2Vx`t%>$JIhu`TCP-2T!E-2z=VzPx{yQ$f-mpfg%lSH8SZ@vVH&
zvYxwwzI^zk9;yP_s;{laO9NKgsB^^!$hPT$s(V=hKNGxX#GN28h^@V{MuDrPI)h<P
zk~NxJ`O2O!Vd!Cv;1x4ra<eRbW^xa!^+(sFy1wwt<{xWh=M=v&VXgdf@fpiK*UPU;
zBfVPSkT->%n?bM0%RJYdh&{~Z95Z=JIa%pW6sKwCB^RimG#*`aEoJS<IX$>MxS7>E
z(uOCQp{tXtrl}Y#sJpnrw<qfiSDA6t;I7D?nJ&hy1Ee)x>WIl>p0zT`gU|KW>|yXm
z{TlSRgF`j7)_55s1ZD{<-OCAQR2Zhn_pDwaeB-9|e)WedaMt`<Js5SO)-YbtoukRM
z`)4{$0KlzU7rR2;lwN6|SJP<Cx7GttpIQ_0^dQvcgx?x~il{D#UKX6{24wS8ZCBIo
zr!l?c65~3<q4P7v=J@n>=Wws<rB@rXl|uJ3@H#7Wk=-gXy%=KVZKt^hz1w8Rk<30s
zd}qq6mMj|wo8bq$jL+pND;IT73)ag`%r&mgcS0jTQ!Rr6y6&i@Xd9N8n>(188zNO^
z8#ov%IFWVe8^0p$u3q5m^61T0I`V<f$>8RDv(*j;v<(p&^o=%sp0}qB60Ndj=E*vf
zEQ_0L+79x^2y3}`y3)&{6HGb=MI^QEbk|1LM)$|E!UYoLcHMT}lH4lQl$HiDP0~Co
z*~X%Q%EoC;q}WA8E6JUP_J(!|n99IK|HOH2t1QWmMd4Gy4o&$=3d!kbbDt6NtMlD8
zR15)HUo0wgfWjZ;3ZOR5Au-v>iPjSt8)gXii=2=6VDu#{#q=Y3|8l&Ie}*sW={4+5
z5r+p-25B?*@l3tIrk(kWzo5f-ad>dVlW)*%(Cw*!*g@>q=|E~P$DRwQdBbiLcLUV1
z8PCxv;O<8x-6`PdM`q{o;QkP2vf;Dgvu6YP4EkL6*K5QppktRWX^XfV<rRiqBO@-=
z9(yIz-b2WwE+NTSw=N~g5MYm5p+(NV-%FjZTVAYMUMyVxCYJnYaaI2%To2>pGZnVq
zJdKy5>|b(@FN;tKko)V<gtuLSVJSk|&wn0T_#joSWMa?9uP2oFTsuIbSFLGwT?MNY
zbc!eRR3$IA=r4BUj&#8gOs?~o7)~sSU6D0$EJ6FU;#xDHm$8?sOO+d))AIfHNwqb%
z&gvMDm>!LuxP$AHbQMMiSOt_W+#*;txK-d%pi2*Kud2Sd;PFS?HcU~gd-Czm?wkh{
zdF;R-$ei-mwOW?syxi(z!XLjv^yl&l^I-Ofxnn|(l(_>BW?G#;>j<UHx*bckrB@Z=
z9=ksCtxNmm4bLxQPFn+{y}ISJRfcp9eyr2!=D<YX4*gMCp?POR*D8@sYH~SWp6qmy
z`5YsMU3SwCFIlak%4vT3)U0OdwQBsu7|ir6wO*A$m420WeP3NIHHtry<IZ<(`z;~u
zVr@fh-&(WnW!)wm`3}=TntPu8jeqa_t<X)6Y+TOKnvyef-4vJZ+}De>JhAyCs|(cT
ztWI2Rp8@LUv<*eOVz(L40?REepB7<W?6mml?rj|X2aZ9TH0%PB1A5Re?+Krs*14tG
zr3md~t6eMMvS;o`?gY!Ob{`!{cs(~gM8&z3lX0R(pHA;iNu5ofF8+e->YQrA))kH(
zHvx+++%sGm+dKF>zVGRe1h>&d%`c8Vt$PTY5}W3;e>oO8g8v?8oMeb{KV5s<B`D{$
zO6w}(FKJxo=tI_!sKWrK=c_J^>gV!+g`V=BldT1P_)DCcZ|-#Ja2*I0@VbbLpY1-K
z25<!2^<?xsZ%ycf*AOp%>43EUx&h1n*$zA-pgC}&=RjY&27MXo?2{`5kAGHgdvBG#
z+a<xJZVhxQY?1%5KGZVY8T<ycslQK;@75<qT)Zy`U?6DdK;d44E%2?ttuKt2crY<w
z;(<oJ!#xgL?)G4u$e9rQ2q8VATWI#wk7%6mUxC+wFPz}sIGHf~;FDlCK&k`Y<>r>t
z*3FjoC8RyUBMB#=H;neDuCMeEdY>`<BYVlW%D1exPPcHkGPV>i>Flu|n+lF-Xr2*Y
z{H_SE2=54QK28KK1hxf^1@=ECKRQ34Kj=SV-`C&y-aFrY-rpc!5FQbq5k()knmMDh
zw6eZU+Q=y#x)!H7g=V%Z9;MMPeWZGRqba{$+uJ<b+}S+YJlMSW80zl-sPrrLOZrgy
zu>3H4XM3M|19B*CtM965mYX*|lKh07bCi}^XG#zM?#;W|y5excXNh&E<!G;!<lzKQ
zzWqt*W_UisTvxk<2-8sAx7gpT())g62gVVo)l<2}ZqM@w-va)M@fW5FOaM|XFvs7j
zXR4Q>hoQG|i`$;>5xqrlwiIsT%ObcP*l8d~Abd}VetzV%?#>hbU+@da2mhB|@GZeh
zq({`p`hsqTWyCW?girOo{#!(szKqa#Ut^$#f5u91C-u_wQtPYK;JBl!<9FaB5{&23
z?2ByvZhg&q(|KDTa2wdvnBE6bmqhXfSI|5a5pA|HuZ?hgGWC))5mo7LKiNrEW~$ya
zEy~=tFkGzM`jl3esY3a0N(7+G{L#z*n-}UP29gl6P@Fa+kt``<pGHlqonbmO?t6C+
z(bLA%nTe8p32o(@-9YG1M18~!(~-1n!zl>+JPFa~&Qpsq3K6=v5KYfZTn9^DLMwS3
z1}QJav$<EFOI8mskS&s%1*Dw{->SmEzNXvU$a#}#yY;&38bN!I&TLF`=PY67EtDCw
zO+UNMxa*lndxOr<d+6;KGl~_p<)m|(b81(W7wYylpT=8giq2k1J^NYI%v*4Z&YqR#
z71{H(bJKf#S0|noTZ2u2@K$T3@|@jO>xI5OYn^{40V_qFq}JHb+fZnSJe;;xIgeo`
z2TS6sZi7bPLim%Hnr~m5`~gTuevAvb^H-jW)~?huc$Py_)nNM}@#B8?$6sHbfthzF
zuP5YEro4Wh8A1BZiX-*#>j?cj^+5^v$CvLg*XGAF5|uXTARya=C7hN1a=f<pb@i{g
zEi*@k)}P7)b|<fR75*HS9FD_uhSZxsm=jM2(g0hPiBs-VMC-^uGFLq|Jr+HVO~y^u
zlytka@jrHd@DG{~<Zf(kcy7FIpq(&zeb2(Lo*YJAVSELWGeDfUS+bK$G1|Qq4*u2g
z6yQqW@{mQ4eg4P(5?jYTe}3aTi^z_LwS9wRKwLyvgz-huM%TvIMt$Xd6#bub<}O<l
z7Aeihu+gKb#Z*WKu`FfK&bc%iDOHCB+h<dglTP;}?8x8#5Kn4NG9Qwf;lD?04N2)O
zNYHgKxJKTuQm!80nvpuBS-trT@EtL8l-ak#c87<^Id^M=wg?M&M#;F03(Rkh_qgi9
zXer7^pz0Fv$S5p$8_iKF#ZCcEIr4KM7ISud;_RrRh~m7G;wP5_ZlM8{XU!vvgx2Vz
zJQu`-UwP~7krc*Poqu3jTPLawcW@1N^o9pG1_wBX2bu>4nui9O2M4;N!$DEuewe5q
z{NLV%WxUm7UWZd3FH#?~Qy(`{AG=Z?-%}s`Qy+U%A9GV5<(aN>jCMlhhqF@I9pswB
zZx^(5qgWh=Jeu5f38;qNsCIA;;yre#>B(sZT(qUxBWYSw@GzEUh0|KnpPVL7!)ek5
z4tWzy#~p+zj~I!CZZbwqm~b?U`|hY;rGjylA6<|uZ4|dn(QOsBRncvE>c36kQ@^SP
z^Qb&#!FH={BU1k@>?2fZ(F*obZcz(<QEt%-hE{g}5ge-gm;mdiy1gy*5HYTB7oq!k
z=9wyQQ&(~^%*%vlh5RDfNE!7(`scR@o+9Q-;)^t>hSC-*?&*u2u48GZfvlS^S!5Sk
zX}4T$KfA<I=8~M@|1tIJ+!FB>S!i}J9__6ij%mVI#(ev@R@A99h56tCMsoAgZ`uwp
zle6apJ58%SoJ7b|Ir?3~%c)1t9oVSIMOsGPU{vMDC|I-7%N29;5>PaSio0?!g|fS1
zqkac$8mx4wy-hsLgEVUcin4imO&RQI$t4u}qKZKs>{@wEJ#2ePO);!jX-zY1X!#{F
zdfBs9+4~|ZdRIXohf0fBu+&PjB0_A5eG}|qxqU5cO6esyx^Ge65q|Jf_LFYWAH9iP
zfWx@JV~hl&k#*eUIC<^5=RsMLX5+dK96j<%&_uoHR(Rjqp^1Af$Z#yjr+^yEW|C=9
zKT`vfPQ!n*h<Q<<qHeKJmFtulpe_DOZTB`;rmqsjQ9QPoq>BFN+(tcAKG&#9cf2yX
za^byu_I>o)r(puF11pu#ovMcD(ox?)UqQc?Y2gd*Ty&U*VkHd4n>eH)uf*uW_THHN
zc$QlYyEZxsD<P{mp!U~#(EooCI`bRyTgI>vvJ9u~PW%_8bG_ib^^A-6RwUmi>3i8H
zH+Xjm5|U&|OU>dfCY4?KDkqMIOHN&|E~QT1+_;Z<BHj|sOs5PU-uRRQlP&2xMP2&E
zoU*5?r|i}~Z^CzVwTzrJt3OkPda8gP5Ty+(lF>o=fuiE5wuLYCki9H#?fMurz_sn0
z-4A_3>`h5HM7Y)e6zC1%7j}3Z(Sgz(pmv~kP2E9VJygB3@U+kY)g7|5w{)%f%B`EB
zH+33z%g-#pF2JOgmNRrPp0K^$NNzW%b;I64*B#j$SiKa}p;XbW_J^cCi{M&KtDwLk
zTzdhETo#4xIZip?q15tT%!|}QKc_}ME+obrYIei|)Iib9nI>1{jxsagbOiqjrJJ%j
za(b2F?&Hg1*Moa4_KLBQx;d6{x#q6q%VReL+M0Ok_a-A86u)75MSiCw94Fk}eRSvd
zm)}cx<hvBe=u`5*kw3)lpa4P2H#}TbsM|H%V}x>s%SF8MVNn@qldmnc0Pzc79XhGw
z$h_)1)8^~sSBghmVjg4XUAejONAKj46Uei(^OBEtc?T$*xQh30EstmH-UoBG<gZJ~
zTnlld35dnv7T=P(stRJ8p;U#-<6R;bmfIFA4cATC8f}}?HQdxErjFLFe<s<$H$Z7T
zXmKs-TZOUB<CyXhd0t{HW~oY-CoQa6f=_AmS3*}JFAA$x-PK$NEy~?q<5$F}QrzCT
zY3WqjGV$*#R<b@ydClWk@rAtm1+dMeqwTVt!<<UGXGh-AbM$+zrd#kCP1I#KURSIv
z;+<|TIxXH@a&b&~&ZHwwIWY`BW_vAoR>pm_HdpR1@+`J5dM(19`kaEF3R@N4#osY?
z%=%bXHt`4AwJ{iW%-Pg*(eLHjw%<iJ_CGJKTKJgx*uCkW*ZDTMYI$uf*>t<~aDM^W
z3JgEGy)1Ae5ZaADu6c9$g?5i`?$SKI7+Sx?RqqjA#XeDZqkkk;V;HUDymNg7_>KNI
z1ABzsmflUYH|l>euunEm${q3mnYsD(Yfl?1yRTbkF2K8b7Wky#Vcbo^O}*1{d^yBh
zGmTBR822l*C8h8Al#hv#&rX(GWEqglph?_)aM&&Oxaso#kvsVW8n^z{{j2?8>Z|gn
zYMSRo*~%pXuOK2-dx5vAEzP_Yh|_HG!?sM{O%>-tCl75Bb)_uQ703?UGtCBX*Ixw!
zO5Pb{l;>a^j+LGVudtO(mDugzg^=<R>0djPXHUMypcY)~EFHU*HMF^3l+k3v?p6C}
zMIHuJ?W~lixHDskgwAMRSu^^}<<1Sv_2O~I(xXj5j~~H4*SZU-%X7@(?_e7U@X5qR
z76+l=%zeGe{2^EVTLoDjwz1JuleDsQQOK&?h58cmS3dlbn59vp<SOc_vrY1SCcB<i
zL1!-A692TSPKBG!XCT|nn+SpSb27wkFT^EEoPXhW0jy8((-2(dfe5Kz-oa_%bYYXh
z8NeB!#{<!O%JkVTscX31+1%mPQ9CgHy)JBgT7*3H=kRY1knLIPHPv@w#I}ZM0@Dh#
z>1o>1(dVh*TmF3Z#TASvP^ahLO9Dp?&nrCM=h%SZ9=+b(Ey>G7W0KEQCI0k3pw|QZ
zte$1k5d`Om&AB0DLw_G5vEm052~RtJ`44m6HWy8m95b@whZOZsJ7c9I2+tXqbAOc$
z&HWE^0w*LYJ?8ryvN<=HtoZNaFRb|fMWoZt5dVKVZ$E0?E|}u2%?zu1v5caanvZ+e
z7uFXRs!!DJUe<Nqe4)Nbt0$8OMSa0`SYb**`eTB;ZTN>IU?yxFiC(DQSz#!ZoL2hF
zP>{ViL^Ki(aS#%Z!OWLh)F81h(MZH!41|`Qedc^CU)`)l9}s<u%TJWEik{ud%Aa}e
z79cqJKFi7foI~BZ{eNH8<9g%CGVQT|%KVQs@6%cDKD_k|3kQc^c!YvXzFnU7(CV{a
zX7u1~HUHd%I{19!Pxu+`r}mbxK5-nPh(FkGBucOdf6gDU%HV9@>Ea+xenS05HV4!E
zsrnoI2%^oO;5XtCbjVKweKaiacT|1k8Z33N*Ww<<EyB;^KR>>zBfJ{vLte`NOzIJU
zRQ*hh%MAO1@dkx-&j{;<70efP0A_%gUlTe5`eY!GUz4MN5VyVt9OL#(xqvxIdu|vx
zir!-~&Mb)Hge_;3|19S-;=A|r!yYTV+}zfGq<Jgf>{oc?^G?nX=^9EqV7pAtedSc)
z|DKMF%N+cN1a5?Ruh#oc>tR)w)D00346y~+L->i}_Mugc1=vzNk^GC@)C!-)`U6ex
zHI_=dFXq|r32%#^hnK;>sYLp)-RN)kN?D$>v3rg`!5kKs)*p56ykfcr!8{Cq!6ZQ<
z3HyFTe6Jt090+NMxH!*~6S5gxw1QVe<qLZT=}Rb4{863LuZ$b_xe1)YUm!#?r>L1N
zUe}DIlcDQps~`9o)H@sP6Rpn2u5)L+^OF<h2VKSr`WRtd<D+HC3-+H=gZfY*T)hIV
zcd%@jsl~@>P0T+aIR-+hl&RT$OzQ&`cWA~pVsWa(%kJD@#yet;Qi5#~eljqlpmKn%
z`m;rVHs(5`<(Y8Nte)@CnR~dO&U6?Nq%5T0B#z>b;e&EnWM*v4n!}#6`3GMW-_$jT
zR~8_I1#3BBhoUA}epc%dV)2!%^S^6NmoV1bsLOr-mMCiJ-)!s=;S7W=BU9h`p%I%%
zkShlAhPd(kU`+LF7KS7pSyECGFmxg<euRv(c@RH#^&7yIzH(B3=c4_<OZLmwefO|@
z0$H&>e7yLwk6=sP)f-Hb@#IDFgxI%oAl56rMd6Q@AAWG~zbGGf?|;~o<-Fm4fPUxj
zfiL9<3V1=ionhbBn@vw;|7#2*x|YF@d|LBQ=phuYl%HEmm#DtU4La*By|(+g-qRgI
zo>O@0ms!Q}i#{dy6<De8WrgL)Yzo+%^j*DiTeNZ8{(LjnA@=<L?FgHoJg?LvV#jbz
z&Ay#!wB_&x`re-r?tgke_rh9HNb7!Dd9U(@TtU1huqXVDXn#K!T%qbW_4G1-cq731
z!E$H&q4wD;b8@RAxbrfZjdO77=O(o8=K}v6Fl_ykIg``kVw|6-Js%L-5cgmoH1ol<
zXPM)y0#LqCul$#AMDVX@BcE21>F4NlgrrlZXUQ9!Vg5(;mWQ+wQl>W+?i*YYtgmJq
zHvxvs_t-3bEor94{eYaF%zvduV`iIQk!42)f8V!#>iybDKNeLQvb=P6ATl6jghNqD
zAkgMDY9e>CD}=OXO8->AXkGT|<$K7)_9vI_pf<gtQ(u_>stBz!Y<u#DY}q^8gfg|t
z#~T=b<@dYq!o9!wnDBC#RAhTu&YUhS#2xXm%-WyNY@KhP2q<PHh2((b_|m-9wDm!R
z2>0&)@@czXUQ;aSEFpP?#{t&2_aKAe5whcXe7^k!(iq>Ym>-h4$5kJN^K&DAu;xR}
zJzt06QkQ(S5295+12$C?ctQ_M$(==8G}N-HuxA#OI@HRMQqHF<+)b9s(mI|ysv0N$
z+c3Suq4&G@W%;Dx5uVf=f>xRHB)w?O5Yp;6{OBPzM_~y;OQ{|Ld8Jn;B5-TSqSZs#
zt%buLn622KAKCbR55%~fiIvC9Y4pd=qqYm5=&)w1vGr-<Y<fRc^Fzyh@`EteVl4Qd
ziuZ`t2ah<mv!lQ+kX_#@uvgT@)%p>`#xRIX^s;^ho_Yh6!1>J04qS?b;TE_{pC?>W
z{FZUVc0eVdJDkuLO4_e;$S;I+YnJf&ZbHonJ+69)+M7*vySx@wFIwes>=<a1#eZ}U
zQJ2KUZaswS=`Jn3QNvACgUoV_t0Q0yA<;|g4ez;@HvM0?u2<T5w$6CRbhQeW;a|Bf
z8T_3}@A5kQ60$8n`64buoPB=(`e@cO_0y+jW4NPRzjzu{1Zp*%TA&<hR!wdjD-m5T
zkF|58XcgFgPvn_+qq+F{AmC{B^ugyc#5Sl~Sr_EgNOh0>o$<~o^;y^R1dehW`}>b~
zMi<qggMs;i$<6mG5MuZ1#6iCbWZ)m7o3pHE#F<d60Nw#Y%eZO*GQwXH{Jbltq^>g5
zFBLgx0^s+baDQ%sfAiNF2@ExKUw|+0|7!o`@oQ?Etx@w}_IS})?3~pHv@7fzz4xzf
zwxNfV2Pt0G?=Mix$;6Fx>~3{97E)R3bJ+J$S=9@E=lo8$r_a@PrhH><??d|R@tyY*
zV|Lkxw?1$$i;lJy7wvX#`{)M~eiZjv`L9i}*Zk>n_=NXx=`9-C&$(~gat1!zZ*Jlq
zXFjZYyFS_6H)2~FG>Am?btqH^Dpv$o1UK22=^i#6a=M7sIUK2FSDC|?MIKHaq8qSw
z(apVUJLlK;9-$pZ8&sf7x54&((pOqvdI1-#Eh9kAtDocg+&hABhvKpD71o!nJ6Uha
zZm;=r?MWvt!z)Z+jPOwY+U)V>mHeIBFROcW^8j>(_$dC0`i>2}f=+Y`vrJpFBJPt6
zz7qHf_{9nI`AwQV&b@NIllTR94{dJQUAaBIyb8ZFeI)u#cJFNFeMt{K$SV~_j>vUX
z4#ZL5k;)}z^-s=2H)qp~T+EL)hg*$t&Fwt;#2plqxBFi*nEBF2)NL`gd22@mo<9k4
zDS(tdf8BhyfUkm0MDji8zrnP>f06Ll*g|`ZGjv7(c!Z|eoWa+H+-7`kk@&>qXPj<f
zJJE>(Xa%c&l5W8;`fLA2#)5SHO#TH1B|uRy__yW{ni5P_SWSrY0D8e{{qKxqSm;r3
z-ym56JbHftKmh$Rnl;=#1atstZ}^ssJ#h<wK(GX@^zjm_g~2)y6O#p-<|-YbiUo=G
zF&h-th^bRpe~*BC2@vkB-BPxvZ$bGBi)@h0s5XLp9hCZme*R0eP<tFoNDz!cX^oIN
zT?P6g9BwdOpQ}MijT$Er9!d=CaBxB&_I8K8WDB)6rY&r9uvZ`WcKoG?`?n4xT{w^k
zcAm9Db{LJ2XiFGUJW2fs)pa;Y9*II)iJ~%T87f;?x=3Xnf<kkN{H-!;6j~&bLNcXV
z;&TL&0ZFR_DRaabi4+<NxkzCitU_ansxpHmT4UI%s7{{l%ujO(R%#qf*$7jSn>_NF
zGIN~<s#T2ha0C(YJk*)ABOzzHwtnUsYg)uzL&^{%2r)y`KjBX`UsQvV43gC0RYTeI
zWz}gG{auWFmX)lraQn@zVKW9XYD~@`6{9Q|Nlk|-X@kgX6f3~Whb(J7f%t^p)mr)r
zOx&K38U+B|A26-)0Qf%#7i(p$ao740YDmu@c>3vUtj^>zi6=1*!&?oNqatCLsMsU3
z40AY1=uuL_X$IMLxE%spB>z%hAh|`p49E}m?=UgZWur_*U=ED$VD6;ssO{iiSzX~?
zX<hLYsB05fVJt<Q4o2@_0K_BGe`yGi5W~d>cXuSOqTF>m$aK-GBRK}wcKELRA0@m=
z_)+!3st4WNp|Yb7x3%#G9Wr|)|3>jR5EAr8UNU!}RQH}<LUq8{4f0&tb|CsiAnqD*
zM#}?<0AO8F-936c)tC6MY(T7kWOx7OZptIPFT-f!p2T&$VFw&&5c-nX8;x+7;tJcF
zK(9~j$_1Fm8G5(`fBhoRJ9P;MXx}9mO8`13C{++iTPQ+8Qh!j22PncNBFIdBNl8W*
z$juU2{A!TmCR_i-KdLlZV=N;iT|`#@3v#q>FL<wTFUeT^TJu`$TJ>7)TGx@PHU6(O
zOCi^+w?(cpWs;PNV&^=y3+do5?9mQm$vSF{6l<v_a<5<Dqw#wpj^A42w52Z!uxG6;
zvJ+`U3tJN7eks<^Q{73D&XQQ9H7Ej8ED7uq83mQI2ml%+|E$bSi=Qw%OLbh~EZ9ct
zL+nH4L%ts0mE0BImDH8cm7*(USMX3LqY*=^r%H)BR=}Jj!%#o=x9%tHH=6jQ@iOCB
z<Jfq^<Luk-o@9LS*^&$eOS3#0A+%b_6uV<Tu<1#S3;xhLjd|CFRY<6QD^FY)IWdN>
z`=(J|A-qU;n!uL?KR#sKU@gT?qZLOtt~;VTraS6tTy0`!Y-a*82AQPP;jVP@DrJ*S
zrC^Q)JC<sbFO63^HuDn2j!N(CUsFGkJ{disdej5jWK^K|hjHk5!<8&v;cU981gHHH
zycASNMcZVaeSQxST{4CQwK1zbmuo1GgbtMrVo>tKXwF#ZzLBFQKY30P!$`_L!ydp>
zx5sn6bj@+yeC>Aqa4r25{i+*ZI-;;g1B)&ctemTOgsvK_h5TaxjXc6pG-)S(r*<bi
zPh+O&NcooX89gupdC&<mKUMV)6$UzuL~X#2IN18W(n~6m2olk>JVk~45+zp3bhOF{
z1kvU^`733n3M{4R2&%yfL&4e#_gwc<_rhg`4%H5Y4wVk24mE9RTeJs}Z-9(8YH(0o
z9169NygCdAGLfMOjDnmpa%|Y}0BT;EIVpEIL0%3PnON8%gs=>%(*Q}WPz5sX07k9!
z8EWVNlcG!_a*_zVf;cOZtO(7Fpfjq^fRbS<7OA;mL@GH(n8^<0)h~C^Go<QpjsY#;
z%FAvcvjtF<B4+WlYFcI3B*j9hQZ>yaTa)kDO39StNh)LFW5Z(<W2Pn<bxJGwXKD!4
z;)zp9QI48i#oEeMluL=YV|4pfj(Q#?ysFvMQ%P!LTIhLWiojE648f$iPX0-ms{&7H
zc8qGj!cnlb!aLWy)VuJnLYHcnLYGRHQkR-8wO!&vnT$#dwVp}|N?8GQl2mnF+269C
z)J4<^N#$kAvC6S3^2!rs>?*}&;tSO{%F!j+<yZ?1mU4|HnhKSr?8;hYItyJVKU^xf
zRkF&fl$$L@vI-|voaTAiijvFOEb~`m(8`OH>&qY)>P~`B3Qv+O#qTul#O_q@<nDA`
zO4}6H%UKq<PP|=mHA|AqR4hAJ%UsLBPg2`NbgHTp1r!BT1r#{S*XFZM2wb{7fAHn`
zR+-Mvop9add5U%xZTzq+bz68j5x%Q^R`#jtQrxsel1=`m)<1K}nkrT`V;+Um9x@xm
z3L{%uB&1YXDjKoCbFy^8angL^cJgo{eHZ<#n@~DBvu6d%CKRolKYPTc8m)yoJ-|wy
z?kJmd5Pwj65MHD)S9CmoYyQj@n2tQ*1fQR__{Rc+jV7IKBE(c0P}p3;17Mcobf<}=
z1Jy|L`i54`nB?NY2FFS<tNGQ&MD_w%bLmF(RZE-7Cf&6Xo0%r7c0f_}bAh^3e(RE{
zrBlPxs!-(*nuW3k&q|fkMW_ZQoA4%WtwNsyp9-Hmo5dyzo<_b^-}B$DA}`wG=EaRp
ztD@%-uCnd9>$4Y@4~?O#M(3sX+Fpg7<jBmCf5^GWVh1F+N{OQjvI<6!(ukx-Ve8T>
z$WKSb0G&CC_7Pn`S&l?}6p)zABt9G^FGx-NMXe~WDanCNWCVl~%BjZ3jtuXi)}>jK
z@{AJH<=~M4w2EZHatTg*B&|YK@wj^!t<o0>p?gdK@n3@4UM0ee$uS^G8Oe`dlyJ(*
zoj+NX?@X*Cq*hiwt#WGVa@QuN6IrFRRCu}oe-z@J-{!DhU@OK^tu<SDvgnf0X0x7s
z@!c&5?NrKnzm0mGblqqjRj0m6cB%Aq=I#{Ag|zLETa2SJV~*}b)!C{Iem&V%t+|?K
z9{*I%<*<!ry^>(Y?AYn96i%M6DCLyRGk>G1_?Fm5NUyAVTJ6;8?(SL4C$dXtvk<g^
zcoce@|LpKq;43Cjtv6eJvUHd6Z1a}={@t%YU?%67;dbenM>vESmuj*3nCFh~+4t?Y
zugHh?)KT%B)3fMXgs*IO?&d7$<l!##+32nGUE8m)n~f-hR=A4T<;tq(t7G7hKI<}k
zBC)XqmJ~dCh^264?#8saIa32}+t<#J&;4-*^NhBstbec$;H5)U`r8cVYHXHS@UUXO
zQiQPd2XC+1oBd%l#l4BrCbb-h4vJ?@k2eH2N@f3pjR8*+!qy*RFkWM|%z=j!1795C
z)StAy7=~3J)jBi}*@Db67LAiXW6q&C6vt#h%chD|9^E+PX_Q|(xNLjI42X+F2?Kgb
zEe^AsMu1u#wp#S*knC=g!<4%|FLO55R21fr)ovD5f1=G8i-T+la1Z=8Ys}6i%da$`
zY)s9fl5QDixSQ;-)MCfWN`NaLeK<t3TM5HtlIAFjhdLFMw)ZW1)VwZ(QfVZSF)5u|
zW}!$^sk3xu-q4c6CCyV7yoh+N#NscjMLN?&MzTzKk;`0>#ae?IHzR(UoQzo!++5@F
zWTwF+`(awE>3mcM42uPOMwV#~mmxiKN*c`s+X1&zVC(2#%L_)gjF&jWxuoO8sMPvD
zt)?+)W<!4*>xZma*CrCVjO9|LC(sWpohn;5fEWm-=8X0~oxm()+<%L4O{E@ANFS)&
zw0X>R*le&6rpErEIAFO6ep>Z51HLI}UDImAS@zNe1vjM9$wf|~)S_vO(IzG1NM{xH
z&Kg@ZI;*$Q`6L%78;qw0H_2$2(!oj8Le`Ja;Q$ix%|DXk$PK6(mDS7W8k0Sx^9u)O
zZIA12HKAyQlNH8WOlFyl(wb>CROwEWWyhOLrX2OT>N3?QX)%+n#<SS^(`_c|9V<)F
zn^9C}Et|M2`K<;tjp^!DHLWUK7NM*X8W&a#&YSKvax_CLjZ{~;O|ly4)l(`NDi|uO
zD|i-{7C9tp*$n6!Rn^NY8y7vT@*4+NZO`lOHKBp;0t%-sF0()$Kr_9DTIK1Y>}iwB
zl&3ylUAFpE1?HmFX%=07vdwtCgG~v1Gcx<EX%m+Xzt(`NF-^V7s-?9{6O>j$<-(%D
zY17?G_G*ZY5&J5;Nk${xa<UDBHG@sHHBZx06Gu~XlUvh6lk{5j`9^j)+M1^Ic@sU5
zAK1fgjN2H!_RWT+$z$!8%|esyT7%8ny)|?b>00>tA6J9+ru7w;vz2>Zo~4*o2Oa~8
zbJO;@i+b@h(R*g#&NifLW>*8yQ=Q}A+j`}^mHI66n--rd-D|uA_^iD5z0banbs72D
z_!;?G`I-6IbvJA-gYeU0@Wi|Fr-_{<@To%ysG4HeD9%~#JzjqKEOgm!HrTB_oI&4{
zzJ$O1@ipjf+T>!!TZ!R?Uh?O*hu$W_Hw~TJb`rr8jbRoq%pX!XG`DBv(!|G)u@%qR
zEj3zZI{1yR1jrQ!7_D6OUCmyN)$Y2VyYIT6x*xiOTAcrK0&x(NcxGMo(^Sq<S=7ZF
z7A|dBpUwVg?9jTY5)a164mTN1Ic#w{W^zvAVa8YuXR-9Bo&Rxi%ql^3Ly?=caOKY8
zHyhB{qjgf{w#sywgfdI0Us%~bbG_%v;SS9*l3V54&vc>ZOvz%%WXP({<e6NW<N%OP
zx5<Y|>BH!ojilo-hy8X~AVzY&(D7JDHDwLmeo&jd%26%pH2$>qG`xIe;o!vij%aWa
z?y&J@GHH9vb-%TRem=PU3+6F%dnSDj%?`C=QY*C%TNSrjVEO36$%#F{k)bWG(_h7e
zd7kb#(T1TtUWHkeQl(afzht$9yQH<mv*ZQb>W5rFlg@`NH|xQ+xmqWxt#`KNYv%|p
zMi(e<t?grPBX7%Z1M6qDPHt^pf8Q<yAHrT*GaTgG5916uPKMTlGMqEk<(jAP9WYzR
z|0Z4FxMj8XuJ75pxV5ye`&<-X7(AqAxXQPht;1cIJit9jKhQkHyfnT<zf`_ty>!0J
z`s{W+7<)SMK4lBVPLtl1@Os8B?A}B0GRcP*|5e)e*z-8^*s-{8@Zjd-%l4i6Z8mW8
zx8J>p&na7UD#C1{etYHm%=13pP<}vZkLpI*(~{RE8%jQ*cwuh)`2N--+cSjEh+vgv
zKkbgzJ(-Vzmw~UEmnVBEn<Kk9+b#PcTY4(`Fng@PvBbM94n<K>O7xhDX1@qbIf^=W
ztd#l$`7YH{h)u~xnPNfsPAPEy%Uz~niG^j1W`Sx6n`Pi?o@=SkNgQ{PT&dGZMB5#S
z1k-{@qawaC$AUOtVMr-cL{U+RhNZt|5kM$bsy2^sm+mRtS-7D9DwRG7X?rmBbn1B8
z5UQT0xhw1NtX??1hXSOQ!<+wV?fdNcocZk7+&6jfbn<QZf_}RVy!;(^FYa{O5CuiJ
zO|);XUtf4WbcSvifl43#dhK`K5qHt*RsCZ#X3Y6pEEv&gq`S(qpLIv?p3=$C!O&UV
z!LzZn!LiZ2;kNOxAq|Rt*ho1ZzuJF+^$`LX@ve`3RCCraF9*HJyBzhBK=GhjP<Zvq
z(!uHN-Q%-QU>EYH6X9;g{lpW74^0=_W{BN5zz6z({~Y5}+~u^H1X_%Jtbc9wjmbG2
zes$~~vb$Y-OBC3Xf0TYhm#765f|BfpA66fR9u^-aA2!^M+ppGNSl+naz5R0aj#8dg
zd^<N!++M)nQ@aQBE~>8ut_AJ|t~g%SUbEf_{JQ<71$O){%wFe!*nvF1!R~|2OS>nx
zx0iR}kJ^uUzl-kcO{lo<sze+;FqdHJ-wCE6qCR{5gbe}<|8DV{<OhBU{5&)cIGz9f
zcTB}IKT!AW<|7C^%|G+I?{7w;uM*&8Kl$~6@J#>jv_DWN5tShcAPJzeA=1HZ{3pN5
z{}y1x!h+#NWb{Ao(bi|GK~aaZhG+t7_kZg#*y6Ou;Y8Giv<;MCq)ElygYXcfr9`w0
z82Zg80V&)oQp2i_T!F9%bs8Amo2>6uL$mxZh!#>jaJP4K>#HIj?N`{q+27P9h?;>H
z`b1c8$q?g#D!t;p!@U%}2l`qyEX$}speK}gz*L}&JvS$&_SY(ir2yRC$}L-a0e383
zglwp(K(*dAB$P4O{SZ!K-7j#X!s&5L#)t~JKPZu@;Z=glgd208e;AdJ&l8-$-i1I3
z3FppCyPGq!qNXF#1*;05=1xqznj=yn0CZMABujXe(LK>T@jOv15gLQJh52&dr}fRr
zZg~fSiiDkV2dAaX=^Bt%Vb4SEg+p_9r!9_nozdIiNw+KPZBtPXf@^DdD`0T@?-|h%
zf>F0;?L}L-wQ;KuIYPAh&bO=V?c9lY(FovULn-=Mwx2E)-Pt+_0FkoLhd$`-{7cD4
zT5seogiYeXZHny!d#x6hzo-|8h#}&AQ~fgT+`O2&U#o+b`f#@^FKyigys`KZazdv1
z)wb8Zpo~WBiE$$9LPU;`riU>Z#{P)^L555ftt?VT+8F;VVN^gqOK==<D+Wa(96vMS
zZp_S#nifkds!DnqKQZEJ%;1Q`6_F`2NrD-FI-<i$nvOpa>6mYh7K<X`U`%$++b2>)
z>J&dXB4tchhrAMTCU#F68oxVYvB&F(-Wp9ZQ(<nK2oUermhhH^<K*8{qQi@#&di#N
zHgId=R>rc6Y2}^IRGHg36LF*AN5_a$<g?5?9Vt4qwGpgG*@{2pLC@qLN#4?WB6r4Y
z3^E(8)OKKTgbZC`A(I*%q_P}DiW-X6G8b^RVXTMQin`^$%=8~Q+_HKSbVh6p#i^^(
za{QxkSC=7}8;D}^ii!v}3|F_PAW_8!=q847jOc3b)zvCE*pYA}qKAfz5^B?yy{)O5
zaI|7=hMJ7LY6F)Q&d6Lb+QW2)FLto6&fIk~am9DtGs6-boc>}z43b{uxodPV>!Jd4
zO9L4@l~)J_oUS-Lu{wjcyAr%K*|>)T9uBnhu~s`nEqro=!dD_4th&h6F-t?IyU|z4
z?p_@<8@PmF0M+^K?$zj{j5j~PAs<~m%(1(6)%hs+O6iLt5UDp%z3UbpCE`lL&@1~J
zhF6emB#3KU<`E@cL?MqBm>-m!C&xjN4POMN^LS=b+|#k-qR5X1&?q9K`5e1?hX}Y<
ztk2?aWZCaWMh%Q&Gqr)r6FaWg-d=63_@vwNGU*{H;4%=uap3&7%wq&tWz)nc7LNev
zbh)xjnlTj==qLhgq~BC$h|>`0(+haT`+$DTKqJ1sR-8Q+HgxL<*jDI-Z^a?je^;#c
zYF1)p@!)X1jGYQ<T9p8Ah8rYFH8vi_a6hoJHI!vU|3S8CehoIB0L3KWfdMv0WeV&h
z%D)P*519gnfN=y`Pey<#)&J-E_g_f;b1D6E0Uhwz?XCq5m4W@3?EcpS=ikB<V23AG
z`VO3d?$)}Pa&(~+6R*{rE`Zw)`0G#qdcJA_JwG=8xrPDP15o)uv_3-?1$OoMXEa|P
zHqdxm{V)N&>+Os@@WnRs#q7G{4IewmsJPrUpMW;YyVd;4-&NN$%5`IxcCXyEms~_e
z$ig7viBLoWB#>Yf&m*#$BDdOlU3Ap6)dIo*7m1+Azn_4xC71dtj-}J}>$m<li}#=V
zirpRGSd2$x1PBvkUSBVLy}bsm2{#F9L4XMk5E9J&{o@BEB^nwmEad<C=3{mKZ~LY1
zEmlN-*^n-9zPP~$wL|skfNxj%|9^7#e&o2pBh^Yog~fv&-w;L*IS8M!H$m}WzHo6u
zzHsq`PjARnJI!C7z`Omv`|dnY6a;Oe6eMmc?qT}+3Ht6os1-zQGVgKt`U#Ic(TV@?
zRe;#V6fSs`LeA8~i@%}~Mth}3BJY+8+DiEz^@@Xx+Wl?dPc?S!rIldCt0po}w`<T|
ziU{5-Hxgzy{lG*u?$y<)Fr_aQS&!W(m}^`Sb6*RxK0Ao;8(eXe*KcuT-I8R3cCb&l
zz8_GfTg_mld(9}NJI%09TD~6`r3cM8Po&*`B9@Ppg6}b#-NKenm7?zhpqw~v-_tmO
zn-{Z!>`l)-hSzsUi>>C*Pc+?rgO5`fG(g(O19a3!P_58EL&)@wIuuc3=o|U3;@kHq
zk44k#d+=Zu^^sYt_|NDu!gQlVeKgeS{jWdq|BnIpZyZR_&W8Dly`wS*zMAd5b-y|w
zq={q14GvpD#HztOf|z1n#f`zzM2h0@`iMbs9|5mwd)>qz_!>g*6m@-mv0(9uo4k9V
z?X}nDN54hVy`1;`sV?D|ct5eHUnE&2Xm2oY*mR<Pg5*clM|MZ3Xo7{5G1NcMrGDcm
zkNbTn?t$Vzf?w_SK8QXrpP=^$<NbsPrg@d4d}H5#V&sWZGDrr6`HDzSGdJLgDtt`>
zAgS=Or|t*wJ)EbIzc&KeU)~TV#Nnn1pSqt_mD4Cjg|GKK(s`8#(heu!_6KjW4^$2p
z_Sp^^_ZkoR#=Wv1NI)hV<sC~NcGp8U8wZ`^UO5~&&4~}hc6@d$c06_*AR-Vah!#Ww
z;sz4pbZId#BcumR3}q_NPJ!7~C7EywCekXTrLfaM*&S7fPym}Cy+B0_3mqWcVY&)(
zm*S<%MrR01`NyvgJQ6}bIG$7#iKtM*$p(Mr0GeYHv4q>J!-Qn=WT{6K;WBwBZ(vJ2
zW8~c7azPRmD4}1HTF40E@oXJSws1mmF6_;>!9oda?Xb2_LNpX<EYLM(cy4t?@)4IG
z@&<NAQTF_Jb;<ncg5HpuzBFOoQ!Jw_=NS0;C-o%vzC*o0VEBs~FsWl#-~ky_K`Omv
z25dFl>NFMbiwM$v-1<5-w(5u#h{*x)eIfc5%U{mA{e57yV6-5$;9ta-HJ1f?7kl5a
zn+Wb1YT#@9f^CA{nrmchJ`kF)?>GCKdfuUz7l%bb`X8U~anA($Hv0K{-fwmdNtSul
zna<p5o@zF4Xj0$#=4ew*ds*R%G#DoWEHGs1_0u8$_jUn0tuu$snDzNT)AZhg(&Yk=
zSyTTb4P24mk~4;kS?_<OQDuB<FLKi7hW^hq0mqwc6aE$mGEVyG;B$DX2R*FNMO=*k
zd%HT0J>v!E={-kqG1mq%Hrf2#G6bGGFJ2l0o&(AWLtyuV#|2bB+;wlS5%>L48RXCj
zKjyU*6`5~X-fny?mKY$rWh6U(W$CT?`B371Ox&-TdN@6uCn(J9F4Ym*)kJJTmCGqV
z8NZDlB%D*U%Ohmt32=EiUhO@Po+o(iU0JP?OJD~OONoT4BT)zuv-T08OTa6}vJzKH
zK+gu>68VgLVh)NTG8%zk4wfOU9|5b2svyA~!Ke#7BMu#bag5O>;TXZc{&|ouYEGpY
zvqRbY@yI?O4K+=fE>u3P+3?v$Y;9Vu0ry<=MKoyy(lPok$wLViT~M{3VF}7YF2;Pg
zB4sqQIizObV!o_7&8oj^E}uCe_fLde(jzSHe^L2Iv~54>^UIH*+JY~BdmRyb24v@_
z9KnBVj)Eu0q8k*da{)mDrajiFxN!Okw81I{jq2cwQH=&!>Ku!acSeEBjO-D$%Va|a
zEO}BDU;7!!i~4C(QS%vbjA~#jpvs5SYg8-1Py0M;_^m(T_KDRnS%YQt71e53f7TjO
zt%bLSTkE~A5e8xehUsf@&k(%g4x}Rs3TGXu=*bJ9N@Y)yp$Zf%q%_GZlK`B$&}LQ+
zz^T<%8SoPkq{Ry>oE66;%?g}mMUNw#WuFzEC7(5vsR|3D8iW93JB3|Rs}O&d-XgX^
zo|_2&SB%7P0V;rPH#n=d5$PmXNpTct&Ef-K^$$-HzW;)@-DaVA2^spNuN?7)VgCMH
zv*#e_$#;jX?z6gr>cF<^=ee@&zyu9LUm19#nO#X{_M2UD0d#=9OP8^a6t65@z|*_<
z5%U%HBf<|=We49Kb0hF!8~hQ8KOlA+^%0FfdTIymk+}=V_t1Jo=nDN8vcu&YzPaW0
z7zhCBWHd=h<M!CZEF;#;&9p?3V~PNtUs)lzNNbhgGS+6&S?9a*+ghES+Q=k<S&p4F
zBY|#A)!3>owoblos?KL6{!IB^)Rp{&`sEwuDBRwl<9ji6t9BK#%Gi)GY8}-|gSBcC
zkydi$7`w4n9sWx8*$-C|o)n!iTVuC6XpgQA30-Q2lwC(5+qktoTaWJqNyU3A*P0%I
z9U2?oK#6YSUi)v?f=@Nx%9CRh`<dQi{1keL)gw!Lg!?&rIr}fyq)(-<k*`wkD(|wy
zifEJ(=&$lAu&qM*j8qcAYRHNM=<?_bc~Vbh-ojnvoAIDg#C?iur>DYKF<%P5AA2+r
zXoV4ukX1xzP{Fd>st{-jqEZTlB`N?sj&2hn2f*WMGu2qiUune9D-0ETsZ7zFB18ux
z3}vqrt|YHCYO6UFGpV~MtI+h&Hxo%r{Oi<5KN2ewY1pI^ekpq<5u0c~DFa7SiJe+2
z@qEl|>~IV-PinArN6{g_MTwX4CP{Qm(WDhc4Mi$&w#b<Ve5{1IutIT>8aHubjNPQT
zPHUz7AFLgklrN>qRl1kRGRC!^=P24*^jh*-@LKU#jetr%NiR`tta{9jI=<|?O2v-f
z%8yYMoFqxnvW~Ji>MGB&GS!7r92L4U*9DdZrv<nL=>?hvs|DPJmXpeptP(|)GHSJL
zY9W&!E6TPi-_cbHl~u|#RRYU27K%=kUCKRG-pT|QYAlrp%f6{(T8gn1YbsZkEGiSK
z<S6H;yp)kHl%7PMNZqO2MI#|YiZBrqBMHfwe?b*Q(IpWX2rm|40|0*%IuRZqNJg%M
zNEf9#Y-s@3Fw<SSgLDJ+W&q{NU!8(I+(v;MnJ7;rqJ+fq|Df(Gpz3PYEdLk;2p%kG
za0u>t2_8JSySqCVLV(~N+=9EiySuwP7w2AF=90YbneH{yJu`20ulH8gI@$G|`l{;e
zD$cEQcGY(RVg4*8u*!(rqksw2)%&RvDE6JiD1cKhQsv`JKzJ9$26MR#9%^nE)<)2^
zxQBf3)SCl6)~Db+wUU`UDKohvMgJ*Vh&(jZr}T23m27QcT7FugcAj>DcD{DuYF_WO
z_4LWq$@Ikm83Y#6;3nT(yrM{$7d~x#fB>n6&e-#<<edu|r<)HvA-~*IcngfCqs^pw
zGgIa13zVnK55f;*4n_}vkjPtw2Vr3LW5Ht%swq56_lHL;yHJhH@pzW3o<ca&jl|qU
zGpUpu*~tvkS)NIr*`~3ksiujhnWpg&^A)od(-rd_R*6L9M91MABlXHc&M`dm5f-dO
z^Wowhtxq$UW)f9~YLbQT6``aT8Oe2;8nM_X3J(VvNnOZZh+U{wmU2!co3)sfuxPWc
zRuNlz*Qk6NCswOh%49VaD^|vx=&6>0>S0`#nKi<TCBPhD2{0X)56lJ@12gewTc%qk
zTV_Yh<EjX&KnqewHP9$}zj$X-P3fy<7u1iMrHejI#q13@#7pNx!}@aNhE0rfi70<8
zm?|-uts;cRu}rJJTOfhT>cN-dcZzpX6cZSGK{rpDf(~{mBE}PuT%~kb!JyQG0!PO`
z>h_i7mBy98mE4v1mD-gEdx?9Yd#-zF(k$&hVDFE}T>=%ki?}B>_evaV8{C^!wDai4
z<MtVw<w_^j!P30hxsZ?+0qxAvS@wN(2>vY{Fg#Drx!^9NaRN9EoD2rPxz%eH3g6py
z3th>gfM@}~5YF;VD}zAb&|6Gk<72{O{iEMw_G8Rr^<$`~#*@;M^pn=J$n7;&3Sx&W
z-fBL0KdN};w2o<mtRYu0<>_Nz^(dKjV6yp*%dnGS20r6r3;Lz^e6==Vs`|k7PV)zW
zV47|lg8?>U2oCu>`3!Nva(=zfzZGt#2$<531_8LK9|{m1p;0D-)0a<&PM1zQPA5(W
zP8Uvl7_3~(U5s6<<JoC&0N68#Nk1$*OV-<LEI61ouuBkYf4FDPshH3(#^Nw$PUJDG
zg-DYaW`%~7cc|z?-zMUyhvN6p>4%q(a_HbOg<<!Gp!ZO1R@u(f>1eQ(d|(ez&k)a?
z#b)XWl?k2h;rb(Rdl-3GdFXnWdKh|Gdg$Y^x3IP_x3G`k#)S}u{L#5*p*lBPDh_?f
zY>)b8vzP@nOHBNLWW1Q^L;?+YZXnY*d5?l_0poO1qGWLnl6+i#@09Te2E+srN&OtS
z$)BbREaqwqv`I=*xH+_wVWy)FCR~guNpw=|8RGK6`ODxT@DjKKJOLg6FMxYktlZ4q
zjNPmg*=Z91@iS6MIhK<p`)v*uT+EvBB~rCH?v-;ICUlH(35=B!Ma=3$(#(cA!y)w@
zzdw|bpgxShLuVgeKgy#+z!V<eJA}SNby4Ly)1;%tR+`8@q`rfHk$N-cp$A~sPP86!
z-hq{9$?lUgqpDrY5Wg_Lz`dxuDZWX$X?9&{GI-R{Vz*AL9d6utby0pZ<e}TbwwicC
zt0$43-6dz#P9q*XqF2sA`_r$6Ar@XDG<)T5IyVh(EMV}PVIPwoPNk$u4$Wk&>fm?7
z`3kf7G7D8F8uwVi!NBb$JJb5|B~^l=n;Bwgyx656b-2QIv&x3z7v@umXo_mFG=wyN
z)b3fR+Fg^ZN=Gvrt3KGQXhB;Qt1?&=uV^~0N~@F`Q!$~`qo!M2KBJygR6K)Z9#`GF
zV2odeq$*mZKLZE)>A1jUu31K>u3U@@UDp-{6|YTr%Tv|qi`i$mK|ZvrP^G#$X3+*$
zmwC>Dt(I0NctNg)TD`cqea6DP(s7|dIA%s4lmO{)vuv(jS?sD2P!B8~`Z52LEoE5G
zet{C#Qr`jt`sTX1xPQhBROUGEW&x~uu^3_5#b%ULCN-a9Sy}UDu>vYx>n>It&0Sjf
z*Pt)fA5A#vH&*h_T^tEt%DLC$*P=W5EE_p5zPilgH7u=|UBEpYzGQRHZC+e4KdD7t
z@IT6QngLK1RADVZBS|?8l~jQaF&ihP=S{iwOUq{GKu1!SO78y6gHZXc5_!)5kmQo_
z&KEcUuuQ9_pNl&xyhOZ<1@^WW^HrtIjUL5a;@+h^cn?to_sLZxcZq#xiC~+Mg6X47
zATI1vtMIlUU+j~vNIE3D>*u$N$0Jj<i`weLflh%*mHSxFGxMSxqTY)|zf<L(iGUcO
z&x<=nXc{2Tiy}n`ZoTCck&cjueoYnn#oWOy>Uw^wNbW5H*Dt9NyIW+gf-8~8VIHE9
znNzaIZTP;OYh|2EVc$p&zHk=cRfoZdR%Q;5@9#N*xo+`&!gPD{d>kdYIC?|$N6Pn9
zY>PMnTmVi0_a(k)n0zl*Z%p3A_?C&I14jcMZy2EWn|>eT2DZH<M-JZPAA!C6V9v&Z
z(+ST#Ot3d_bIEqU&UT5DAo*s5*f_s(DUcg3x82nKSzVt>uv6kRPeB|pGES<ToIiqY
z^W}z3=^T-z03|!vjo|Di+mF|8XxMu?c-nb79dm~#=Z?^ieA-psWsmDqT%&e6Yo*0h
z<nm7@8DZS@wIAR-`lGNHjv(&F+V|G)@;Ib&jHbkm;O?eew8xx4)$xV_&AMP491XT-
zd0kkON;#%*W_r!csk)v^bGbxIxz&7(_3(pZd5IX-ZldjQJ*MWT64qJKS&CWX*%nZr
z<H7AlgB{QjXdk@v=2(yYN!`A7sn|AYDQgjgRKJ-aKKtE#zWQLn#<Jc?!@WdsHW0Mr
zxDQ=IRZp;Vb4=`<-?$Xo2v^%~Y2Uc~!g(siPPyKE8S&W2IjM1S`RLg3su6a%^H`Q0
zl<HuAjB}OjKHj{cW$)$SW#{E|(ipy!drW`)=}P&EJ-knTjq36XPk`w0xQisg#3sa-
z$97a+raE_Ia?kXv$~`rZdfERN{i^=Ax^B<sa?UH9DkoD9dxb*a)4OBq{xUU>VmtqQ
z%IyQsa4MTjZtmhFX#eURR4UITm|@;u=V4Ce9L+H9uH3oVyV<%qoWH_zmFCsvQBEyQ
zwbqKPZBsvtaX~FzDm+VU%9;fsx^AxIu9#V;)Q&H1SY81x09P%iE#Q{(mdlp2uwd$D
zXbdpx{Mw~pcev7a^NWV&7uHir=Sr^T&4?>T)=9OKi$_P0OLy4j&J|gDPzu;?1qZs&
zf4p%+^THGCdG2|6>>l2fyF$P6=|uU2J*`i9?bD^0M}W-n<h3MVVi)4)VY@1?U0pgd
zyJvn@eV2NZdZ%@*b*puwb+>Ze1GEO7c$@$)pwn*H)rPzY<BNLW3+<`6bHy7oAYzM=
zc2eo&>=6h8xq|_Aw#X8KlEAhtIIGFl<Fy;=7eFxZ9C&$j7v_=MLf`UfRe6<NTnOW9
z_fKB|O3v(b$@gNe`6w8<sdCc__|spizaC97L)SchcN1&Q(2}>#vpt}Ngt^HK%S%kb
znx!mc)#PhJKS`Q1l7}EmHvRd}x&kSP+`|+Rt7NDg4Xc>#)H_yDTDebCAE47ZAz;pB
zKFPt)TLDd3?R;y`Na%X(!?<hI)}_+3r2DK@5c19DWA39FbYsK#>W1|d-v!@Q>uD>v
z^}O}6^(_2u^>+1U^=|h;;t~1L@hQh^u@%I3N_aPVkM(H&RQv=WLV6D){?af*{OOn1
z9N&TQL$v1z-)7nc{jKu7`D6H_%;V@I@G0_X>Z#jn`|02b6Xgy3%kCFqf5G*=O8iFk
z8K%kmD-nUqhdiXIH@~&@w#v4Pw&1owXh13uH0qSgn&q128c+vN_Wl}01=#|o=2fG&
z4>U{^jSXrY(h|(E&xVd}8L0|p*Y|;6bS7|IJ_-?-iZDAbgQ2f!)z<Xa<k#$>5e}g-
zq@eMk-n789yb*5yu4DTZsyChgA~%7L;<sja9|D^OQ|RLe{o;m18SgdCHP1EiHPbcq
zHP<yc2Z0B!2bKq6GBVv8zSpxpN$p2#R;NTRcsvMNuS<Pu+wUSc6tJn`V*JV?n6eO5
z1x8RXG6W^_h!xNakXilI1o1Nl);v!sT|V5SHNkr#dLjf0yh-1PAoca#`Y6@+o>*|@
zE9HA+UPMLz1A)-=*stz;s(Y?`!h42$ihGWGQYJiLHZUC+z(S}74}4qf&nCE-zC6ai
z$Kin4@K)2`O7Ke8wvIsqjSfLy*H8tk#y3TmTGBrOs+f~&5JLA&{NV1;Tu-&p{;in9
zg$Gi1X4vr8anQh#=(?()v-$OxvE#w_cFJ^4uQ%A}*O4s|cw%}Ic%pjZcw%_sd!iE{
zw<5M8v?7oC$8`{PfYygkom|*GP@tN*AAQH{`r;`sZ4SadT0=;W30ZL_ZB=xRNutpn
ze8Z2D+@w9F2A|^$_dNh~&q{{q9wYSCNJj3ys++e~j<Rq}RUo-3J$}X}SRNYDEfaSi
zvmph#P%~G1jDBAkY<`Q#E8UvCI)1Y6>K6F;xpXoK%+@SHIMxfs0rG24)`EdTcvK-j
zg$9UKgmA`%X;6)QgT_$F<xukjr$iHpizCCnC}&YjVBrM36BZ%Xj|}WnFyLasRSlpK
zRU*NSEbfzrs`c2Mfyu$tB#x0iUnH`4&uPwi&WX>N&Z*D2&dHewTyb5oTnV4`eSpvm
zNmArdpVbzT9Uf<}hENGfZRA}ZhZ;6*U@TOwXDSF*%NU`=$j+3kB346(O7+6(nfOqt
zUZ#qk3k5$YOsE&ScO-w$!GWy-MKi2KggrxjJY`P{%;1K`8?Gf{o#8z0ui{xmsYG26
z(h|}V)DqSb7$&+ZvMRhPx|=C6jyw+8GjiZ=z~v1f5FO3H8VBuJf&t`V7(L>8hKw{h
zA^Uo<@ysIKd)VlO0n=Rv`cmaHDxyW7X3#;wh+RMQNXpCSge<7p@RLGmyJGbV%R}ds
zEGTNQxI<F9M)c##ljbxJKc*7W2gUUaJ}dUP8#Q&@1SpC<E4@4V66MI{kU1mhnm=6b
z0Q}w&J*;xjoaG^aE)1(jV#CmurX&Qk5nIPB-M!C&{`^P`+LSt*aS?^e_2?(T$X)&$
zBxmK<LLSrr{IpQ|uDH#@v(RfL4~iBnzL2!8(apHCq-)LlkCADV;y=j;&|SWN!A7g`
z<wpG?gq|;?n87w4VIo}>NWIy3=5uWe-M59>8n)VVg1#Z7n?WiY+lDsaOQ$Qwfv)gf
znjtVqNGby`{?kOtfwTdQH?XDavmPa56t;vUX%5<C;Cz>W9%p&t+!qTnCp7oK&MvVH
z9@_-ywiz;lc#oU_D#HPs<d4{|^!1k{zXdW;<pkv$euy{93EeknNYKhj!!h`gAS-LQ
zk&4RfCkZFtqZ1M}&WPF5|MlH4gXA0e&M9Uo$xoB*4vf5#gv@R47)ge(ncF29Cx>V%
z+h~{zhhQqZ4;kEtKH7IAGsg`f+V}F1UPKG`PZ+qO$)Je|PQ*G;yy`b$iYXGGA;*mx
z?yoU0uHc?eI+Q^o_m9pLW8+NNiem1s-_o-aR!Ep4qZKob5}yzwSB)$Zo1sXGD((+6
zP_CeukHh<dL?#-g-ygW8V8_Lor16E0LOB|@zj#a9j@~t%M=X_sKAOG1aZ8YzPw^+U
zR7~#a`$(oN3o2*oh@c#~`~n5bf{)Y5W)hA$4bU~ck5f8k9IT0Y^3hautkH=Qv^h$0
z=K10IGWnzV4^y%S3Ua5{6C^k5XW621*U#we8G)gQ%F|;%^8Pn+eMa}sXSbneiJy}{
zd0W6=Jl&y)=Q&9fPS1-5hMxTXY&UpL-E2yP3!OooWC2i<!m|nTY`TD&#-DQ)J)0Jx
zrmjb*=_8@G8);Z?96=xmTFl1p%3Cjwd1p!v=?<^UPnf-P*28%5R^<|NOyS?>ynmVX
z5s_*;@(0Tpioh3vw}JtLn`d(b;k}z@cMqPStEJ7C3+~0uHPG}N!6H!*iU6v>TWEv`
zfw#n;-^%)a_5J$xBRDmjmdi|b+KYN8{KCK0erLtLwD;~RX*=A=bjunS`j`mp-ODjP
zPRUG4tv|torkmXzCYi5N$E8M>oI|bLc3Qli(=E?w<Pc~Yz|gRtaJTmC1S`tUYftzA
z>hy5>obG%sgb?SsP=jZu%;$7?7}Uwr;yGRZTuAS;QyTWO)Ah4c^mC@)X`tD2rr+u3
zOoJ`Znp7`mq2~>?p)I4iOM?1W&_f#)3v_jutUNpsVduT@fg0~Ko(~((hc0NDo_5fJ
z_*fhEab#?G+RtA1qT~I80S|`u_KfyBSZjO_m(%k0T$nVRB7!19iw_pKhd6j2lChKV
zH3+)+ah9-`aPAM+uwc^g?+@14VOn{wo7)KyA01Ayd|E$vn2v7<R|c<Cne=D)i6LUr
zE>;{4=&T!SUYl2s6%Td@)Y1kcESGRQ<c6Q9DbYJzRT!naH?4pmfaOxyrl()C{!P1O
zv!YFaf?jZ4>R7a!+0;6r8*t%@bJKkEpx#g!%WVaO;3i9db8UFiS}`UZyjp#F`bh7!
z(z&s!anBvhS9=|f^)$aRO8?lgK`$dI-DJBlj2<rSG2Eq2(PFhx9_TFDWWLdizRG^)
z9f&OD;jj^no|dY@TJEH`*%ce8i4IF1CY798$AL<I-USI%N57)*^xTLe_cYv?rSLT0
zaHe?F*^nWB^w^-MXyM?DPfoob=&$cz-<p+fu{_5mZ*@Iiq*&#>S&lwQx?kJ!r{H6|
z$?qSPEJ@Yit2eb<+)C{ijHVzTmDWlPi8eg%*-Gh8OS$*!AC-PQ*s_*<yxcmGdK}+M
zlYZ>p(w6cxH9MO+oJz`xl^m97Has|zU*&+%%AX{=jZR%jHhUfT=Kz=>f%(0;N|MD1
z3k=n+X1!A_`6TkWIU_QfDQ3APQp?E=+z@;DRu0IZd@CCyNxqdCQlHP4dRv)4Dg)F#
z7@Ulrv`+TC0B25WGe6AimnL~y+~QB3Bzm5JucW+mZUrX^Qy#a#xw*<xr70^M&4zBX
zVDEkX$=qCeY5#p5An<ku{IH*v_L#k|o$v_RUrl^m-sg*djNa!<dmP-SA9-h#W87kA
zWM#y0QO#_fbn_#@I`!r<!Fkl<YUs`gz;Usj5I*c-w!_R^Xgo7&kvPv*X}mKw6qr!S
z9A~^CnNZJYZ@gn{?5Vp`$=u3yfy>;=d*ROP#d49$?8SJY%&eWL$-~WkmoraRc~NPd
z0K7Y7AMqSK<ThSqzT>StNqb124<GW>yF8o6s5CcXAF@haW^A;+>^sb#zo=9;UYs|t
zWH&w;d0aZAA9*}KEFFH_IXoHiw7Lv8ezLf{sML;sfOhQaX%BnT4PrRm{oN^s*VFE|
zCLlw#4RN#cX{;af)})W~J1oRpSi%n@NUL1ed#51(69OJykI~ajpNG!v&NLiSFS$;v
zSfK7>A*?oDN@-?ja?-deba}6AtK3syi`Y|si)yR*E*MoaLjofEV1|Fdlrrm;qn-Jr
z(W><1*CPCs-J<vu(<1d$-J;nlMmXt}yIS<5)hgVoxSGD2vs$v6elqp+>ty0&${FM}
zb+zZb?+&?x0B^Oy54W#wUp$oF@;~rDe0;FJ{rI5!Q1%F2!Q!RBSHPD;I2jJ20QW+o
zp<f50dJqF@c!~2JE!A^ru-sPWikAALbLGpMq5p8wF@c31t}&pPP1ofA=b&A>`s+!l
zRo1d&jQrjI#o?%J4C&ob+bQ2Z^pa*ypkaYe<lUL7C<Oms4xQnA$=7z8>7N{90O^Gg
zG0jYweKpNo5X5x(*XW)IP>FrtzCkr@mbO8$cHe0^o!c?)c!sw@`D)*j_ZKWAf?$Tk
zO(A^WmN%UO^0Va^^euGiw7r`a{hn}hRvaV<;F1~xQw-h7S4=*<U^=c<x*zPOsXc*v
zTd^{w431ry;l3?cnRa*6_A;6>)Xvo&wN>Ukrta0;t}Dc2KUh78gPe$@5bhB>iVty<
z?WCYxNC&#+b~UZi@1$T{j0CwFcQ;k)t*A1d6vaC$4RL?^SMxmya*cy$Al<Ymq_CIm
z!{Q#{vIqvQqJ=`aZ1+DG2ps_*q=!<o70l)7Wd{9o0XK%T?FIqm18SgvGAO!1By9q!
zI?aM68~D@4LvM?$CUzYv0j25=g;tYC4T8=Gbj!u=4yDJF4{o244?gl1iGuS8CO6##
zWDcl+{4yXM-ojmQlh#<Un;1O^qqzV%)oe^HlWoClq9_IP2$I;6Hwz(aPNxS+0fnvi
zEt@k-4>X%|uN)1aycPKWeGKx*{P8!l$Se=lf@OoZct1y3CaaU#CgL6X68FtNvVnzb
zxKr>SyNUmf%>Uwn69aImsTQ%Un$A+?rd<HB0%c1<5^jRpGfB5WD-(-uqT17qZZapJ
zK4{-|{2k2oMH~DcA02Zd`nb(V77CTJ!y>G>)Bjvxd=Iaba3RkqGcnYRtziD23&5gl
zmwa-_E}5Wks0QSlgQ+wNK@QD;Vq7rJa^C0xIZ&D%bkQJOd%*U4;(a`^+#q^&@I2uL
z|00;^bQ20cVB{^K0B5C6V1cVr$1B~WM?r6z^Wwl2TH}Rkrem-&9RK;xo9Hudo+f`6
zgMG{ffBb*{o;m7d_K8G>65|T91zEhGr>u}Q_(wKmqVoW%{;`|*@5uZwA2@1+Ji8+5
zQi;`*8O>UgSdfO6EOxMAbAIU_ZF8|RSh2bA3fvO*+_!%Zb3D9%#z&YXOU*c_O#~5_
z)ncklw)3A0gpM5Vq=$ZBGn>oP&HVAt1^%ml%b@e?1E1XG|9lekBQ(+f?_-dM{g1zq
zLFSXp6XB`}mwH@iPNn6%3EiTj|1tPXb5KNnvDt#9lvnEn;+A$i`)b8&3?#T>KL;Yw
zBAnKD(~#K{<7GWKMQ#Qh-6fw@8$*^V#xYZ_Zog|yNdP?O?@DPLEPBiFpURKsD)a}#
zXt`?+|Ea*{-jXTdLb+jYEWWyv#r!`P_^-d`WwPC_B~bjw&w`@Qya7#m$N5IJL0AxL
zu*7Zct>HtXEY|<aP;k@xll$npwJ_8Y%vC0<m)Ru}7>b5V#wKp@bB?n7AK5VOnnJMf
zkKM$7OXj#wApI;xgPig{dV^Zp6zlEJl4-{Vt+W}$+YqZMW5;MfZW6?GIYZqs$!ZqA
zLEd@aYB|&0@%a|v_7!<wmp4Nc5>GIT?j|R*kKm>@x~IyUy9;@~E4Zna?kN_tm=w$6
zT0+{RNB_h32%^t@`}Z)Hit%TB^gO>bfKIZ8L=r-oa1Gf8EPl>YR>~UvBO5ZKx%jI7
zv77ks$o%iP;Xq#xz>c>5$CE5*-~K(!@sRx)AK`zSWZ~mFT1=J8_KN&dfzXk?<MdE2
zwu8Am{mig`F7V$l$@=}2cdG+0?B1M1f8Yodv)&tYlh+<scT+#vD|Ayn*$3j!Lz(+K
zIV2hN|3f|QqKQT3tam6pE(RO5g~D83nXGPRhlt-lvLRG@_k8RhyNUmfOae)d`jWAj
z2Jy79>D#Q5@mz=El1a#ImDQNBLnfdw3Cy`%Gz!98E?9JEJRVDFkZ=YOEEnE6v=WT@
zxP3teq4NHV7$>ehHt8lZdcetBiUrQlnizBwE;Y;MHxFGfDHN-8y4At_j~?@&{mWDJ
z|KGtpIDf`S$lvZjytojHsY=;Vk$)->I<ozk9_q$+FrR0fnflKK{=4o#(CH5>dj0?D
z4)l;9JD=xe@^_Kf$E^Fu|G~>+5`j;IV&>7WpZ>!T-M!1?9!a<dNPr^lajPTziLutR
zzgP4mS%v3zXi28^5-5>+)dF2xvI}T6xFfN4Kib{#T-^n*#;aC1F)&`;NqAZGZ%Q0D
zU*d;9Uiq!+=fZ~50zFRqNMz{ddE-@X%l({7RL-wSR=Kb0$rj_fo*>TQo|93_PckR&
z7V8(K4>5RP`zFhMnRhEJ_dc-NH+@HBpRih1o7=mhMgiy7Q85UsH(pPN`lSzte5Vft
zxSn>WeSF}D9nXc*^OM%gCzn<Ir_(#FJA0aYuG~228j##rPq%#;`iG$kugX*A7TYqH
z{f6w(5ToiX)sxgz0^UJk?HH{KE@YS|bd~juZ;0@QRtEMCc80o^zoE6B86rF*Gba%P
z(Ql|u#Gp>Z%D}EkM8vF4#Kgo##Kyn|O|Y=26R|NfJ|lLho$WaT8z<Dp$_YiB(6cP;
z%uvM0#0d3gea^_l$^o@<vOGg}CMaa&c!nHM$jbce&&0v@T-UQ36DJfhGd|bE%nXGr
z?9Xn@EYBH!=VfMrR>s8gI|JKu3;sZMXd^iong1md$8+V(&($z<LeKoo^>^8<tWYZp
z1N7>cIiH)%!uSkXp4-8~3@z|aUKUo?f2o{<6<Yb93*}&auACKGt|rm{!Ws+1|77i%
zspsVX{vWiM|HGMon;**czsUz>{J9DLYJ;-<uNcbrzv6#e%5w_J`}2{J<N3m#Nq%Pc
znbzNFD0{zspa1_GeNg+KybMIltgO!@J+t#W_n*>#cgg>H^^DLWevcU*9(oZ|3kO3x
zdJzj<2SXu4eQN_ldPzeoV+Ru=RyIZe01^IQhMY?>P+_nni2-H#0z+$suB45vM<^(w
zjZF>{m}jc2i1j-8ef|rfy5M`@5#zcdT-NL1gkGF9#?9bp9#+V=duyP2D&$*<qdeqx
z+!LHFf(0zZ4QEi8-eyoc)m{l6xsW=)xxofMOlhc}xClKuZ+g6YKyS`gbRSRSc{11D
zZ?Ur4JIdw2y}KWG^nz%zzk+Wf<&SAe6i5p`mav`e^RK#+H@t_Oda!facZD10qQ1aw
zG#aRx2rr>@)MjBn!hdx^x)+~BapoXzc|T>SS+bp$;csG=;q&cvV0l@`2-*zs*M60f
ziFhAv3@zWE=(r-Tug6)iGgAno5lM!B29mtajrEB%X&;R*19%YW^v?;)ncH@RlIag*
z{VErn!0E>$HWuO}O^ZO`;4oxHdx16qr<*RggU!}6bV#!@?c)#YPD(JcT<(w!xB8_6
z5%h^g?=wZNL5#%bsVM`3y4Z7^_HSJtvJ|kSsc!=Lt5opGNu`{TqrByIVj9{vra#u$
z51Sn4yr~>~tu<^EF7oylsvT<_FEth0X8#mV>f4ja{C9glHB4KYDsZ{Hu_i8-H_+(9
zToar;=gm`^S<2y!IBuFnNd?z`#!8^w@`)jl(%6tX49Vp*c$09Xg>=mc90JN*zzrIJ
zohY9Rf|(S{SzpPUjZ8(GBBC`XDII~eOjg#btoGL>k*<cNp0U18^7DRN#qH;rC&Mtl
z#R!F?bj=OplX}MsBS!P9e0KRiUH<nsEEcB!tHH;@$jHk0w~@$5#K_3W#KiG$N8=$7
zPDf#S`l<e8I59!Y=w)=m7OG2hT>qs2d9;`S%nyT#3Lzpmess))2sju6IFw>sltLP$
zfVyeTaxWTM?Ymtv9mJUhlWCcU0Q16`M|J+LTdMaOYPg^JouTm$QBdOarcYK!bUk;I
z-H+=R>lfV(h(7<-_FeLg_d!rW&m+=<&u7eKL=^VQhK;6yE6>J!<UT+3@phifCfkFe
z22kx^s>iTzwHVE73U%xk9^n6~$2W(oqO;zQC^1EN>EQI@)VfA%f$F>o<KkGzYq>d?
zn@;U<P0O9Q&2UeD#eKYD5UZ5Nl?`XjANECTY*lUbYd%%T60^!Gc2Q{^KH`22BfU-o
z>g4{>AU8cXm-)GS{3CAL!SJ9`P0iHSuG3$P^DoGY)mQ9PMKQ~p!f)czTkD#NE6Glb
z{Vu#|xP$h4FlYxC2Tsr-pL6umis&7SG$uK#P`PY92J^gn4{E}?nbTJPvcaD*?tl3K
zcer11lpW7XJ$~&D;Vsv%s;8qx3i%uH$F$Ykywg2!*40rjV?HcWhwt`bZ}`m1xgAdh
z7dzvLyP_OaQj4tEDN$Xx9$sV@8dDf7i!O1e3MaVJf=mPMJpSAk`J;AXXMeIAY|LnW
zI&b-W*J|-j`vRX|I0fIp=_Z@ZM#0437fp#-XGm^h!4KDYu);)F<2;Y35IioqwQ0pu
zO3*=R=e4L<B`V!buSEBr7k56Fja2HZvr3&yzD9b+TPv|@+*r?q@LR00%LF@#^oOK<
z*^n064dagQ_Ef!^2+U9Oz#C<<3iQLYxL&DD=WBM+ds)f{a!|Nzh~E25>m(P7rEATq
zLh2u%>b1Rxp0sT);9VGw?s)iw*!9RZ4n`sBFO=;?iQ@R)&fn`&%D>S)*uDAaMr_Be
z*E4^A4X^TD#ot7@h+p!)K>v<yK(E!<G^~T`NJYiJVzY4ODLkqHFN=QQiA(>1N$!ZV
z*0=z>n^J`F)|u$o=cEC4^_}Tud*Vq0GUM&#mj}3|Tg|JFB8)+@A&*`p(<m;P4Y%8<
zx5yn0JFf9IGj@P49J!ZaZ7S6DAe~PV^nN!*DX{G&4M!JGVV6~0)E$mplp-WzkVbm#
z=mN04dadlnRoddHg+91cFfk!_q~AJdN<!awsaEXZg6R5RYJ!r0-Mwe=9%%hYC+5g!
zA<E-B7g7f+8$Rb#=b4puOLi^xUb|MR7?;g!nQQ8Gix=JYb?(|m>EdN8T7Gz2^?U7u
zICu<M&Caxm=~g7r0>^1uak3eXLE#GT_EXFqE5>W;`rS3rqEzMd=xTd1gF*zNI}5|>
z(6Xbd8bTQVg_r%*gjtW7M_%}HrGBc~JDInPSq1j3ODFb&#-C@gwvl^}Z0lZ)2hW9F
zGwO}Z-%qElt%R*<+`T6|BB<L0&7^BNSvlt6Y2(FtvEL5d-2w7K4-(VD#uhsoF8$<d
zBC~EkDWuA`miQP@yS{8S*ax4c{0fFGb(>Yb<Hm6$<`~I7DwR0!rf+SX;)-aM#x0Pp
z+YUa@w7pyX3^uNjO{TS0Arwk$w?5fzygw=ne|qZ_{v}So;eOHVX^|Z9X5(b9dv7(k
zZus=fdD;JW=R&*hH>uEmeum&-^jQb1?Q57h|Gw+pOY%R~XV(9g;Xi{d>T+?&h);Ji
zh&XPijfWD?rF%)peRL7x5<vWn#we_k=+7a!8cg8T<3JFQ*PUtfou%)G2BoiD{0n{+
zL~b4WLx0h3>T<!u_oW!xj!Qq;sA&yN0;+X7qEv}|5Ii~`m-n8&bhQTGP%wEhfw8`I
zb=l1R@C>ERMy!5mBV+Rf<gl3w@Oo!G%ym!GmYx#1dXV7L*S!++E<Ep)S${|`nd0QM
zJIBl};1%?PBtK5J=-264hnZ503z((WXU{-VtOv7mZ}*>a1$7wImV(Oo)oQ-}Wy<*-
zc4EO#;EOu(d;SHpbnJ<lx9CK)q(46|V74QevLm2>Ji^pP%UY(sCOTr%Wy)Hn{VA{j
z62QrN&^i?ilcDra?iYBowM3#IFw!i5v30MI_aiwCjy2*!yW@QyCz0eE63diAG`0$>
zI+2iovbrDqUXVQO7b#+**jxBNO?6MZBPk8^9rmpiB0CurEB6>91S8or)~P@8;YoP1
zifdz&-|~e@B6T_t3`{UcI#L=7>4>~0`NgY^|KcI-t&`B_yLtQ{rtkv<U0N)qg7tjw
zJZT3+QNlAG|3WIIe&<Q?U|6nus+@lK&gVox%$D{*{cFpIA6&0GZRN2KZm`3;7$jLK
zMg6=lkW8s`Ps3l{NWr}_VV0HF`^yq(Kn`XsOmyG)uVMs4#8)Q4U)h+x)u3(Py!%xw
zGT-&r0u|*h@lHAb(Gd5QiD`YzyI&xo`h*t_vzbf7e>FV8oDWFDFoX!WM!l#iedVgy
z`PV`xWi<BZyN}<zrhkmE7Aix349Y#`yCvePw5#f9=Ne4b{SbCWlNOg)a&4V}%S8!@
z%p-*<0Lz1)i3I~ec3!Ic2CG?tD^YOW!hWeQom)Oxdz2(cr^F<zOU6y$ZPb<L>-+vR
zXr%4ua#P6YPDZh2`mh1!Di$f;;Cxx%RWkP}sUVKJKjuX@rJ|UTEaM0dV`ui~jI{`w
zjNWM;z(#hS;Tw@@>P%2#L%a4wk;xXbrV(}1<h}PRgi(|(GvV#7aF%AWJOfr1PST4{
z9X6iKv9fa1Nq9*7>&e#%KUA+1R)}FR?C}@y1?HHfyc@`aR?^ue#@>>J8Eqj-4a}KT
z)ZbX7bY*i+Ig79xM@7^x#%ri%x9wRmwB&z_X-J`b@y0_uHUytBv&ZaJoPdbeuLxQA
z@{u;Ww3XMiPGws(jCn|OF$F#n3>och`SGc5MW;Ug==v%c-R(mSawtA`0Ls^XERid)
z2o`+B@XDbVXH4%GOi@N=61D`KJcmA{%L>VX{GB%OkrivVTz4zkw;%;S+s<U!Tst@a
z+nTVUmo%8uB7W626z`?7GZ38xG%~K$-_H>{?OyuTTqf$uerAKo))~Af_p|2rw^~b?
zJ_;R(UudW|>BvFxc8ZjC#?W^-?>cZ|^ff)e{Y<AgF2*-ZU}23gW+?Dd4r3>BAV(?;
zz%M4GTC8Hw?Q50uX$9^2Yc(+NOLY1ex$M06GJYiJ7ao>3ej`CaY#D1&k(=q86tvmX
zs`6<L+CK8$)@)&g225JS(&pIWamdNr1dL5>d=737K9wkp5ML&274gQVDnF!3w|wk{
ziJl(~F^Gt>g(}TeLEkaErjhN-z)Lv?PWiVAJ{&d*F1rba_()``Id25h%@(?2i7o+4
zhC>|FUJVql6Lh?&F}z67$NF~uQU}*6u!>5e`qx)s55p<2vU7J_gp~x%)QhE11b$S@
zoXHP~9S);lD7E&mvJ{kejA;`owTY364xjha&zptr>JP*R3Y6#zaEMe_W-r{HQk#TV
zeAah)W#7phUV`eSWZtT|hYY$%GRsQ*OsPN;$eR8+FWWiKJd!jq`)lnu_CX#}fW;kp
z6<?F^SF;+nPdlHv6Z(t-lqe>ul_$Rzh7_cU<`#%pSi=$G8AfFa*{J*g9suaMD|T%l
zn*_hy=?nltz~J6VF%<JX*~wrE-(T?(d$HX}!=@d);{!AF`gO`i`r9v;Sv@K%-TDu|
zl-U@HU?TIr0+A>cb*=xpGnFVM#MBkoFR+Hs6;>eye_JKn<bg4f)@JGD^51a~w*L_f
zOPb8?esoB$x=J$Z)JIGfq=gmC$L;1Lu1yklW=$4ULdpcmq)u}24mL?{lc$yL$sEd^
zGf;}?c`Y*(p^By*@xHPsk2>l0wRWXR&6=#}m~nxmGfHY6{g+V`x3CVAN&ydeu?(j+
z`xyL_rsCJk{#a2e`0zqX3w^r6bUr$F^SwU+MsWTVz7Mp4X!z?doSKBCEsYVEmA{i5
zGB&FQ<{DR`dHrNOEd4r9x*_JvU7Jd!S3M_9p^o}W@$icYrbwc@KN3vA9%_JQ4xNBO
zAPKVnCAgXma8*bLrqkF{wzjlN3#h)fw|T9H$~NdEp)XG=P9|U=I$o1Ao}Qe_hu58l
zEDf;Y@sCP755dPW3wltwm>1AmbWt-C(x)jkxHd4ckTcsd*<J^~SH(_9b`!a*GGQYi
zH23@THF7UrFrBDbdaRw^0X--0Q!UG<$}J-?RZ<D0{QOWYPA&$n53gc4(pbXeq!3_`
zN%}Xi4=(Ra-<kHE`levM6RS+}Sa<#6t0uP?kV~bNgt3e^ud#YWkz_n-xez|uy0O!f
zLl9;Y;~lhf>@Z}$5H7RpX|$ae^TAXg3r<b`6}iKZ_FOn}j3$k8_dA;91&MF-4zjr3
zGg@>O%>K9oI*2!C`_0wL7$aw*&59<IewLcLCq)6ZNcKZ4ySi<n>^cd$2QVLWypk76
zFF+3>BVD?r`T4N4$eE?7ZCWIZsOh*M3!NRUiRt1iggaF!MAT6_a8^x;F79P=LulUH
zMFeDzk$lvlgvF}aw<>&_d$Rm+Cpzxjbic^qY9+s(&9Z7vFA>1AOlHH2tsg<Z?yLY0
zPZ6UR&MHDCZC3d8o!p!1I9Yeqxsr6JVg+x1SOQvNUP{3iaL6)EEs39rhQWXRN(!|P
zY8Di9c>-@XZ+~SOxp~`^3bv~ZFm7`ICkdc_zIdNqSnYS|V`Z1R;ybAZWzfcNk4b7=
zAMy4J;+|~hz!>*?gz616^T_xhBObMe#2BLlwuLHRC8D5f7EZ;)JQJo4#{y;(!IGV?
z847K5`l0fH_Es4J;lRw<x0P?>yLu8k`6oV<?-rvORl{_hen<#aSB>H4vlW<|_%SL}
z5W)tH8yy9=e$lHFBoB54=gcxKNBCoGh%PSS9rH+7265;t8g+l;9l%B%`0^qI$w(>_
z*gi^rNbLv=QIcOpK%6ji`93aPnOGHH9G^U?c3OuN$No#0IuNs`!C^=U<U(vQJrRjJ
z5BjWsGDf#=*Za1E<W-vGp3z?@r*KQi!|BY313XPm4#sLyLwNA}lE(BXVR0iYG`oJ*
z^-4VRSd)v=S<18}>?miRJ-^JDa;hz;#Avc)uq14RB_<o|6PTiX`^Oxbtjb8=tUU5q
zQTk(B<Y=Ms9_*)I)=L}sq60MyV*H1qGpNwS{Bqf|G#uP2fE=oV{DkEf#G~N_@0`Xt
zerA8KcsFY{<u`)bk{q8M2$oCigO^EvyH<s0{eB6h4r!n5zzib^bN##*{!FP5PM1W_
zT!J(rGWI9NxvAoY^vAm7GGZ>g>_X{xEWt0DZocpWQM(=j<usNuuCp=SD5m^+eNM0)
zrf5Gl?0IXIe$VK3H?x&U>Pk)CPk0{&ILf51i2VH4FDs(M$qtcAAA;kskk=;TPg7mB
zemHU26<gC6iVrX9KSQn{QP;S*_iBigjSdyLQ}}0fh5z-N7dRxkaAZG(tluJUzcIRf
zs;WsPY~v2rk|Itzz~s-M2kw}%Oow3j;X|Ykuvgw!u@7z^zfs$zLbxmX**U_cRM@BG
z2Fjqb@Rv2jXgORbdCxM|9u0HZH!4k+Y9!NndTXm#u52W`{vnedt>~UbO(8&9r4Czd
zt{83Jc3HZj-fGK|Ra>mUGM++5r?=A+rGE|3oFa+k-cKQGNK|l7Ti}7G`1nClS}0~y
zc6(HITSbBMgW^gswY6vriR^Z9o*hR)6OJO1aEy=a_IBR6oPsN30S}>KYB2SK?Dl7c
zc~nKK0P4jIamoUVFzTd?fu1}j`huZQ>S5Vzssa{~n1(z%ErtA0>d8!TTZR5`>XJMr
zK*5#>22f#K1f$w3z!VyH_QmE2v*-7-%@9KUd&<odCQsk9T5P_d>yJH8eb=Cn)}HIZ
zkSk`-Z)e6hUO&!qalC@gD6qYf&j3BpK(_QatAj4=o9@_N-_BA(PINqQH)ok!V$Nto
z{IOfZ&JaVi2d`QC9<nF9>0;GJueo|=nOXwQ+<HLRX#*~AHqU-i{H!e)(8cTUqZAwx
zpb;t(DiU4#R)<^;d-kd8;w?JO)@pZd2i+sdT-coVR}^3X778pX1qxTuv`@8LnG*8M
zLAx5SN+GN{M5mbGw~+|x?rXq`-=60GJiJx2Q2fr0(u>MNN<`>SDM%x<lpA#)b=#FB
z#5wOA1>(Nx==Y(JNmlTCv&s(c7;8^Q7c2-n=ZHaXT=u_z)5YHf7c*(CfbRkB%EZ%$
z+s2G}^~q^XS9d3IjQhn6|7-u@p7AR2+Hg{X2wyw?Y(rDTb4YUN%?jcs3Y`#+9;V($
zfmhZ<d|}ud$Csl!s~qtLxED#Q#Es_#r0WBPQQ97G5Q$cQ3s=|*!%vZ#O~hh#F5S1&
zR4H*GHDUE8R2AJ45!Kb<m<tQ+MdD&w(GJ3f6`OWKcJ)b(aL1o*7+_rKrt7%txa%9+
z`ZPx^H?2P7Y}DAOx4(Vq3~Rx^77?)u{Y%)mdW&)O*X`j;bZ5fYX2R`dl}jxK#O6**
z5Du;DRi+(<;(&bJiM_dPkm0e}G4<C>jb2Ufa9gHYHsaDXI-ScCTP#LbRA>HhwH{Dz
zrYK5t>z0x}0HW^ggi)<sHhXk-FgRGR7!fiTdeb~)440!NdW8RaRC7=>3^nHLXv0p)
zlUIBp{1eH!-LXfk7fx;b<Dqxsd$MY6v`BMeJKL^ObTS5am6ENIlktK1ZO3@>vPe6t
z7tSARQ3O>+S#2t1N4AV?9kIn<v7^f(+b+F~_jO}Fh$E(J2W!TAqHLdh?Xi_8>*~fH
zQ!2_wH2lk4&DRd@x=u;xukycS!{Y<<Hauv|Vv^rbi1%C-+BCeMbeM|fL=Y*?SqgG`
z$=a7DV6#LzG^^KwMTWoZ8_@ddp_*kNHC0w@<(zZ`qrWe>?~Ky)RefX?UL>c=S6UgW
z(l(YCtmm*QapblHdBU$5r^SHv@FPQsbfRMB)PiD-07gCfz`l(DnxHR?#0VtYOQ;Ei
z<;J20n8rOHeFv0v5<kPAKWMx_n(vvfH%NZ}%HKMS(lI$TSU);b5S!te?XVb$qW4?0
zep`R}`qrL}odpLc*HB!UFFFMYhWQ77rZ?sveB?R;zX)d$S-gEE01IGB8u~>-!c21R
z!Iah$G!)o}@Kx>(w8idH)4x?6z$1V(5g93n>Kf71yJh=x>WR`7S^uba*N*^*XH^5p
zIIwLbfwxLrNpAr@aY}<TU{|A)K*0FZ*Mj5BbW#g4)6GErUU6A{GqWiUqoFccl#HHn
zD%9dZ2I`C(h;5#&?;&K?l0Wn-uGzM&Z%f(eciSl;GN-q02Rmh{?OI|Pyx;xhdfgsQ
z-o6Cwq)nu(T(}30@CDtkvsUx$$1EswwCXXq5`yFh_tw&ER`X=Fo|a2IPL`d~Zc4bP
z&r{e7w$hf;qfY7q;~r#o8k*Uc`v#M&n;t}@SIw*+MwPTISjlv@DK4dOcEOLz^nn-Q
zA8S{|x8Sa#2$u%>FBh5YnrapUZf2NTubgY6M87chci#z+-|#+A;}FuhA$?_R$xRcD
zln4!vxaf1(VQw~VR$GzTi4<8<hTHDXLiJyKi#Pv;t+IdKH%j{05w$*HsSVyrP;8R@
zaQRp4;6SJWEXp|^XB(5YK;U9T(-$PL$=;BeJ3M@o!r{6p_T{53O_CDyqtf&8O`|-6
zgQI}rs0SJDi9E-XNhRE98C{kHNpankiPE0NW=9Biu3N|zD&CB`Kcg)NMem~5U&>?N
zLDV~5M9k3x{z!9jP2sH)HdD8$v#On*qm9zJSE0^<PjDZn8*9~Roj1F#@5p5?FOOvV
z=}%+_-DfszAKdh!uKKmnY;hT_NvZ~DyUB_UXcL$~;_aA4?jVTS&25Bu3td*MAa-wf
z*u^<)@AUbdX0nH#zc?T){fv;75_}u3XI^z3cKf5OC>1T144{;v3oCt(%iV`WBX(4~
zcAI;->Y(dUq9wECI9FIb*TvXn4(h)}9I;JeM{z~pP_x+nAan_H^1~GOx*PY)FpON2
zw}Ayw$Lqr8IWyV{a!fUJ9wmKm#giJd^WvsKc-I+k8MH3%`xkU1%z#hKA4S7PW6&qE
zt{td!59?fPHD2Zon~kt@uB?H;%j=uyLztO>5uGU$M-i=Twv9KsQ>X2=_?)C4{jt%^
z&`-1CUn_c0JQ1GWy$*fxuIZyLn&brg#RWL-+__!zmK)6zw&$VibI4=zYwxVY!-e<J
z(-zER1tLiruRg&Z<IXXj-nSvVO00PC)Ry|faBc0|2e-iVUe-0Yc<f&x*!MRDt#>dU
zgm;e{gOKg(3J;tX2kk@|a3};0&^US^0VcZ!146^Eyu(WiFIdpX$}!DwKmC+_y?qGZ
zO)`6VuID31G)sNk;3~E3Yhf-@*kRd&znquHwh7Y9j8frr){>_e%bCaZeW+{W&quVV
zYf+7r|MXMm=rD(%rSMaAhANfL?d4IPV6oiS(zkMc9&Bopu3`!$`yuhC$eG7QA!cN`
z4Z{7!NDBS3pGYcTs16CKSZPF2W;mBdRMiO+gx~0XaF`h2%FnL6VCk)_;(y?y=r+@^
zcf$!l;@FtDnI7=S8BLMp>n{1Z{yueoOlnVKhE-uKO=_CD{fC;N#d6cPC}PDaY8m~4
zI;&JPdPSXO^NuMozPO@vbky?l*6^bp%1NRm_R{>On0EpZ9^bJ)-y@zeZj=U~2W$rL
zk%WB=BVG|~3g!6jf?$h%M!tcvL9}7mB@uvyI!cl%2qr-yaw4+&Y$522l7yOsf{S{A
zVvjl;KrTd*fn-aNfysz38`39Qhq8%U|CU!E`0HKVYd&~S6c0WZViz748W)yptJ5#1
z#cS(p>1%{OrLfuvEqI5>1aASj9^}^!r}=B>?Y%z0cI`J_I7`qVv&V1%lqH-c)FsR&
zKpkrx88*BY))Gn+n~PN0r#e6#T^(B;r3zsYf;6Ji>rEeHO~xk&vqz^yS#6ot%<R-x
zJ9{T^vh#CS)*ad|Zlpz<<}<uMMUQ+Ca~)`w5y?H7;!S9i9rs>4qYMdhi@15jUi*wI
zIiQY}M)JQY3gxIm8bl%=eacu^JEI@s<>rMQZKGfNki+-VeLWZTPG+5d?i(xMWn8%f
zGXPr?fjfdd!;ntWhtuZcUFdM34h0ViRrTAKYdw76MM+zfAeA&f=e6A}d2l0$`Dity
zxafzL#Xenp7$l}6lw(1CjqlqdQgUcKmvAYAXN0+Tb{UM5_jf~|v5_L?HM4m5i*jpL
z>}<udm+EN<?mC23{On8Km!iL398dGWbCpDoOpW<3b)_TgBE&wtXd%-aw%ly|g<kUA
zeLehJ>7z~O+NL&-yS8^t=MhJcxi0R=zJ@20b}#IY-OItfk0G=A*hzynN}j$Kw)7Sh
z(sk%;?P_|y?rW%WHfjzdegxl(*H<N3zk4FyF<K$7-CK1A6t}zHFkZGC4`q-Bcda+5
z!rP1Sc)UbtHIf;T#;?Pq>%_PMS{Sp2HNjzS9yGi*<lcx{Z+RarHy2X*=yfXTfpCOT
zhNOf7oBC6x-AK>>)7TS1)yhlcXb-UFtGh3l?{pq6q@QRFbvrKF@Hmmb9ZN*{-o3se
ze}a>`I1w53p`_S91@~Qi`_knLI{G*ldh~>HO#E_vo!;gxOki+Gd&1xkEL0iYC4wKl
z44$Inok*o<=i9(`H1#RVf-lF$ci#&iZYM`_3T<<jLhsCJOVWXLvxGiLYrB-SdS<Z4
zzZTbw>tH;6&GQlN+zOWK*Z4hAw`pL`>X>xumH}pjZnk-8)r*9*taX+uPqfE7tDBxB
zot4B;X$UiL($h`l0ft>F<rlf&NxqZ0qR&O2HpAwNr89PtR<tJ#hs%n4u}6GJYC2yb
zAwkhs^{IWILYUHy#zVzxd>&+(4qX=<<;%)b3P74y6knIuFZetbXiQb)b$&$x4`fdp
zBVYkWfs<mhS*}?LwM<IjKBJ2=Yug(a<u|7-P4S+&%FUV}rR6MuHvSgh8lUWHSa<At
zy{MPZ#_;FX!NQEy6-7%0b^**S0l<5K;#E^e3?su`0jq-c6y<pHzCq?K%z~hxkLn{=
zq+uU0tZR4cT`58IHtV^E$faN`6|}%%kO0$F(j6^<y_fe5vP}Jjn5-@pd-_j$>Y<2<
z4bEZ(1&u>0>_Jsged5$wHA|)Z02Mq;c&qQ^R20jxA4z}41>NlT-+nu37)YF%V1(Om
z(O~Q>kXn)k@aC_p186^biHqCqyf-9o<k8Bn(RFZZpF0U3mVitd82^+m!8z$09{P}}
zYWwuyW1W9|f2TLyn|A*m_N{L!=)*0Z;yY(5+%58_tPX=#fUTKbMXzbV=+<P)K3@S7
zXZw-uQ(i$I`6&TlUdu#=h#4NC*EEc5KIpouE9!lFXE-QI)8FDvpjO<l{oDG(v(E{`
zB<gMY&a%1}Drn74RgD*Kyv}ik$H+UTeefkzdFaCZFg`zdI5W5RsfdJcTPTUjQYjly
zNhTAmx6_l6rCN<_G6m!La<JqqNha}I50Bt#><zPmSYz8qSbY|0&3G%9H4^oMDh;<H
z*(xGD(pd5)5yirS4rERWX{2g#myfT(iEb5-Y;s!<Q|*LlJabpk?McL{J45-CH?apy
z{bqJv2kUqHSfg?8Qoi;dED|ARx_k=OOEs*WPcADQuz-X(&1*J+*jjn1Xx*3UEC6>(
zPaKs>m4)I6Txhi)Z5=+)kGIB-=}VI3lU{vj@9yxI^{rsS>5R0KtRel*Ui7V3KUe7j
z^@9j*jgQovW-V>!ZLi^K!#hxqTlxD~NNoR`H-@4n_wX0jLm6<XHf2>4zC$k3;)9gb
zS;6%EKfE`ySwbBhqH=#JD0UUPMAJ@Qw37~-)L-X~#(%BR3A8qr*^O3KqPghd7N^$K
z#8r0KlBP+Z>?$01xr-4hHHFpl@DP*`quT$Yqb{XjV4%qR%86jVYyq~>SZi+-e|dHG
z%Hg}do@ahiN&S4?MX&xI)4C^Sak*Ik<(8(RQz0`@S+U2;Sl}hVVSk9riltQE8OPmU
z`Wk&$OnzEqC65i{*l;KrRi|rlGKS#JXr!-sp8ox1@a%N>BJ%2Y`NN$@KP<X37ar&}
zf=&8N@`~mHARz;)%Y3~Bp`O(VA`RNoICL6Dx}Qds23+B7<c-Q6f(B`+0%_R+6-(qU
zeFN8USahYSduoRCPT4Z~U!>1nVB(B94n<;?c^{YiJ<zl{NklK4%DHn($h}VeFA9X4
z{|5j#K*zt^ZA=s^YREqSOqWep7>BE9DV{nN_%39FbSU*ZY-9K_AKLsjva8Bwka+1s
zgWnLhtID9a92++-Bl)<REfZWLGT@Mp;ZR)>&7JQF?}m&F+zsq((c*OT7VK9+F&;cP
zlBI<?W^+y<3Egwxmilbx4KFD3Q?qTqd2#W>SJ${r&hm-eyh;8HqkF=YkA*h3w`{EB
zAOG}b{`ZG|@Z@|tgKc<@)?;7YFyHS<2EWlf6~JyVIkWgU+RIGCm?V4Bt}2p}&)fBG
z!1+z#H7>{T+*}W*dEeqXL}%=fC(-7$e8D;4#2ub=D&)gs!X0iMITtho4+QR-!RHMs
z&XVgH{BfadG3OMMW|B&LWMXl4f;qQf@RCB=tThZivXAR6X>$+y*$|_{Ez2;uPcG!{
zcbhW(-jfgb{7#ye;h#wUP}Op>5oZYBepE|w)Gn9^%l##GTaMeE!{>bHce}wTaxQS~
zs!B}*qnG!7X!IKmyQ++Or(m;La>TSWpXGz1BA+|wxCRGLXAVI}%Eo_c4m~Uq;SfYN
zzSo`a7&-a^jLGPDUTeeA+vt9lGBPvsI7zb7c<`3tN#=Befk+(QzGd%ByIfZ5CwbGd
zXQ#^fSwp##W~CQT^36+h`_^yYyurV^aZWfC^JysZE3RBHeu}Rk)21I)?Z4LLN!7V0
zUc9wzLQ-Gd^h^W4eQ;*Ss=9?4^!!_Z_j4S+?TPrDy5#3-)vhY_Zf!5&{qZKznrbnR
zw~pt>|H*IdCEP=)shND{+y2yELj2Z*-6oT9SCwf%cR)<A@E%W5PJc3s3_JbUG51jl
zjf?rC$l*r=WB%v}E^@-6LC-Y03Wm?L;X}<j@=)W8xO~kRui{dVDf)?9t1YOgbk0~g
zso{os`IUJ1r;m4>zhFkakmnJN>OW0&kJIJpPiDC?1-(nVn9t9#PQP*SvfHMc5`H_r
zIDL%qn(wW<B0kNTW~F;!CO?^LQa=h#sP~)nKoa-_BPrtXNWn2aWS7!*Ri*EidI|Uw
z?U93SK=+oOI4cqlq`KZeSnvuRDqa3`Tx_U+z%$5JK%W-QIDM>VZUsDjL`{DA6geyN
z0)x{zDtAJ>IW2wgb!W0klTx(Xt)9+%#@lrFNoh$Q=a_+l42x#`czt3<F3ERirr_x4
z2<(GL$^S6(CE!g}dEfWkB{%!pB+b&SZIUKUvo%fAHqC9CZj{neXerQ^mVGG#mR)5P
zQ4rh)c`1qxDh}@8R^<~J71Yr>i^z<x<IMQZ*ui%!qO+mU+wYv4qy<!*d7k;6=X;*E
zx%Zx%bN=h^zua?Mg`LGDSUHEsO5V{E5=J1YlkjK>encdaNl_&J<kYDk=JV)3M{p__
zy9WV}{&NVGdC)9*JlY9~D{_Lc)W4{sI8>NLpRGyOtn90f`5R|Xm^cC2%L%yXJuv4W
zFdD1kR@CG4GYpR)2n+|VQtW*qK|Rgm3wTev{2n0x<f~5*lKb={@4=;CNZ*^jf-st}
z6DpK8-BZ~Uc>67?^-=@z{Kb3Do`t+sur0)sFg6odA-9s40Js4I76Qj95^)vM#|DEa
zUc#xL<p$v~niS?2#FHb1_v5Fjy%&zr)yUHCBHq9cakJ5wi&671AV*KR_~`ll(**f6
zO$+#(s7^zjA}{ZRD2B+h!e20zS)|9+@x?l7FY5*Gqu<d{?1s_v#4*x|^N21CX~P2-
zI!HP(9ahR1<m#*}4NdWB{^2C85oTG`w3vtO5Q`0Zw9c1r$WNcq>jsf5kO^_H5rTjL
zF3*af?I6A6g?MW4M~S7jVdR%n8!UQ*+EE_N2e(8hz)w`VbyO@y+a|Pw^R7Ix)mHae
z&tXUn4A?{?q{e~uGEo_ArhPP_AZXg?&}y>;xe|#m%a}#zvicdLQ0Ndi2*(2g9&O&G
zP`I)k0)bPzJ3HIuR9pslzAw)VVm{8BQA!i!Fiw#o9SuX<hsY0IHWDJNFguPQdqOOv
zb7c*eD)VT3TE54qR`J`Um%g$-+t)q2v}eYw)rK{Fr<xyq+&y)D{iAjJc~XtT!v5V~
z`~HH~CCkg(X7=_Riw4)-STcLgbrrk2p&mo*QQ{eD9^^9!(d!<@ZZtZ~fk2^D0znmW
z)6Y0bt+U_d*P01)zm_4jgmwUknS8R4DC}oQVJMggse+_L;Ba7qT^^4uup7e+s$Di)
z*tpwZ2p45|zx-Dj9nbAhj*^0Zg#Q`L&qyQSSB+H&P>E_2fj%M5Im021CI$6&dw5Jn
zK#{oa#PpiYbINMgw3aTJ66`s(yXBRp>+QYWH{A4-AGd8f(zbkY+jTkkKMC+sq}W=!
ztg-c$9+yBAp1P``@A-vJ%jw?EJ9gc3-&B74&bH<2=PttMezOyUc3RH9Mix^Y&`xKg
zvM*z|m>APz9!5(;!Spk<5K|C}eoQ6Ym6c_b>>@H*%5a+7fS<DA3J#)`3ONq4#+ZOM
ziYwlGtM~uh^z(QBo1N-i*mnK0zP{G^9yx%C^2`5R$zEhHu;<vbcz*wT%TE8#m!B_w
z4f)FvXrYfnIt*AjV^qPQsN?ele8IjXUnkU9w9q&C*bbR2$H*z-4fz}L@ADXf^B6Mi
zF|-pvhru5dnWEDtjwGf}^XVmegLzp~0XP<=098`v&<Kh8dQzgbL}K6zS6(bU0Z2Ko
zS%%){{QuKy_KbT??laf+nuhllevj8|W{*N!$au|8#(Yh$VgB<TqyJBN%bov{w-CO6
z%Uhs?(%ym@VK$$Ktzc{d+Jq_O3X6ge5(<UbM4JfHekO~ig+@KR>rm1-07Oi-O(<~W
zCGrS`Qk-?0&}4%~lgsBj9bBkFdC`}_4+go^C?1NB8*rvHM0NnLKy!w69JYo*2&IF?
zkq`~DLoOr$EA&2?ECcYl!>*F>Mn1vI?kw`>>jaJB^R&w4WmmK3z-AsPWH%BW>|cdS
zjlHz=p$4Mw(nAVY;ad-t$6b1H0I&e-`mAi^c5*kwhRqNQhN*cF8?NVKSOElxN1%P^
zumodPK-<gWYe?jkhm(8_CdpC@c$h$o?T|=PaqN@eDfub+8Qn>Eg7OK@$`QwimAs5+
z;$xo4g|f3^wY{Qj<d@w^ozY;LQse<UBfM|Ir8cdMs;CgS>Jvn{E6<Z#_gVL2kfwa7
zmKBgD7dC_OS#p$0L3Xx=pQ9o4n*B@;DWDj+s*ZB;U4-iaK1K5^w=0!yol79d-VJlo
zP{s>`oEyS4?UW}p=7`YxqMX>F2jUqIO#2|D_%a_PkPprel;^7Dt%^%;d+xqvWvC>Q
z?Vr<dta9DD_ou#mT<x9MvEumj2gOFOkNvHG(Qo%`O4Kdt^fmM)esLlidT4)m`n0(V
z*1ml&<S7p2z7F!_$2KrYnI0$zi8#;U$RqOl83(CxKo8VIcs6-8CPHWGXEZ9(O91bF
zk`(hD4!0jVo}PcZ+pSmLZnXvtyY=7ccaTYJ9CRSFzRP`&L!Ok|X*B<u+f7>ev#u47
z%}CxbJGP=dJnt8K+TNV9*4{T~%eH48o3Z_+8LL-xtu~US$0NlxTW7Xz?k-F@+{)*W
z!!7LEz4Pw=c7FSgwq<MQFM^S%4t4sVujw%xHuEJ+HhO~b3dD6X8DA(gQm~HR&nPL1
zug`{e97^gfd_pD{DsMAdtbCH9at$=HvoY5S`L1@WR6Pon3mNzxp9-gZYBX9PA32TJ
z-=QuITBQ@k=ec&%V(3uYkwdNHI!h0ye904d@8MKa35<S?T<IPZRnwjXb8#b9%Vn%u
zE}}A+il0qn_wz~7?O9nS>FwVUSq+RBQ}p+uJNtY2BuXse9+=8<5mz}Da^*^NP=s?O
z1zzx*_bXRD-1E_yPucQy8`rHWUox?}6V_N@DwqLb`{}9dQ|x2x0d^1mF8eb3b6^JE
zA&_%pOaI4c7Z~)Z_aL=;Y*wn1qtvL?+D!b_!dh9X(I8*Pc1Wd0L#m39pHhSnT4Ps5
zU;`r>`??lU@8jYd97E}N1_X#J!}E(0YeiS%NY1iZL9NkXSv{=)oR07SRa%y(7UA{v
zl)_d~LwH<yiPA=(g+KtQ-VCXJn?r(q9Mz#8LIa&nDYzCQpwDZef`Kulm*DGjH2ZtU
z=I6T}=;b58Ltpcto(T61R80L#Kyv&)10+x;cS5`S8HXgtIGH5B1tc82{69exh#;2(
z3X+#uB6j5U_d3QF_3AXH{$7m=kly{hBxl<}PGV8+`#w(;N$uZ*p$GnxFa&+K5#o?F
zjYIuNiYYAerLl;n{v&9ljAro2keWX`Gry2B?(faa4d+EULdJ(Y!6?^FN2c{dFou&A
zZpk%a40XZ37sg;du!!*DAM$nqn&^kVc0VR~7GT&nSUem?mBa=jhJVD{4oCNMqx4aX
z{u&OVu{m(;828QlGGqMASRdiXU*g8@&y1<QNspDn?_J<+fnx{8R@8l+S#c5j7XBgb
zO3^b~f~go0B!~tZ={sng#(bSC(v-2k!9T)nDazn|3PyO<Z5)m8u4CM6_g&+zKK32_
zCGM{K$L}J*M&b?vC&un7g>zlNb5eAVQN{-w`FHSfews4w8N;2BgY%da);R%2k0}Y|
z5QBMX7!!tQk9bh6&XElgM7qlPcFmP;i*boD$hxfN0{iyuoxH1a+Uk1qBkbGF(^{IE
zro`(_%TIssqmx|~%l3DE^at?rYtKCV+=+py`w&uW7<~}R=zpR0{v>7NiqStX5s|bG
zrMI|%Qe<h>Swz+lBU78zxPVZr`C1R^U<@Vc0+jq&)HDyHu|bI>9T74$8JGOU$C5wj
z)@evU0Ku6%TFL~M;wdx=Tmjb^>b+`}0yu*rl>WL$5$)tGKGO{$F3%ug^q^$crfDN@
zO_`LdP^r|@s&he?7Z5F;Jhd1w3@%dVdB7>1#_OqmLAI;}aX$xge+=rufjyPt-ZFZg
z2}2LG$PIFVilPh-jYh>cs0h{T29Ll3M+A<u`~vEaFn(zMq}2*6gK{~n@lxeoD6K5{
znIKYF)Ds`hgbsLF!TEZMb+nG{s&(KpulHtF;XBUu@)7$UIEzOSy?lnTfI@#)ZJ4f>
zU^(=SJx?Q(RZB-+u&tcbImyvjS20aHYx=#VO$#b?u9+)uEK$%>P2Nu(^}8FU&zzi}
zoRna;=bCMi3C=+4oJA{IpoIEH?}2uI9`j;DTqN;%6By>U!`PT@$tEO3cD6w*vf1r6
z!ZyU%36*`w<tN;Pdx#-CDg&VzfI7AbWOW+Dkjg8f?RJbFbUIDmKVg_wHfS>WvY`}x
zh2K{s!npDs1)?IFDUE#GgEJfEP4s@7EW2%}*A7YPB|ID*LPUqkFx0E^auEj#7DXCG
zG&7ke6?Dd9PU`dfW6n)KzPV;iU7)pU&f5AtOOjh6Gu2IrY13D)D(~75olp~N)8e^1
z5{{ON;-*rgP`<3G<~k-@eK%9u+%&blmIzHQiq#}45h9dAOT2)83TrGYwj>n^q7pfb
z1TfC%DLtVdVw7mR@q^Se6e%Dm3N!QFT6p`TNnHU7Iqw?Ge0W)p$i2F}<a{uc@}jZ0
z6XK!{^&R1Z>q--;@Iiq21ttl56WFs-?6hkIalsQ(o0EO_Fu+JsFdE`#<%b)Kal^<(
ziN)IASnO8OUcjs=xFf(mf;_B=ZGqW5>ajXG`w?QV5CnJyhkr0%9H7MO6R5(Y=seq(
zY1NX(OYiL`iqfrG5}_3DAT^7VP7JFAvs2z$1eLlKVO5d52x3)Hq_iYLL?Bj`m`fmv
zl$4aZJZ{fW(k(3|b^HV-lglhJLP~r~s`%9stt6NN8FPhLtC*<GAF-6U^KEY1px>XU
zc%`y3{tClXB{=I1r408n_)F))DLv?+BI4h#id5DV|5NHh_IJT0;<gIGWs#-`FM_N>
zxI~O{Y?ivEOG?RRS+{Jt4DlzV^h3Sh;*H~rdz=hWHA4kVCW5|BNE*5@hO$3w7~js}
zIT+4^`lIC6GMbSCwAx+CjQsj4q$YlRY4<(E%4^yb_`TJxmC@gU=TCgoKs^ub4B5(F
zXe$mZfz^NoDNBh$*?EwqMCDOvDbezHtehx^mJ&0^pnzhrxYzIV4<&ulILS98Ea)k9
z^AE)VhF?%aRDU}d)KynF!{wHkuh8jp4u-?ERj<_4Bwwk%mW^B%H{uZPzB_dMkcA*F
zt;j;6nkXKHEJ6#pjKR21x+G3=yg7b2_8`{MI}g4Ufzrluc~JgW0@AfC=FATUs}aZd
zn9VNEY<?h?;V)d<a3IPohn90cteU)7E!Koh!M^4Yt07YPZhf#QSkyY1e#<F)%LJSz
zlM@hAr?gCFir%S@#Y)1B_4UPt)hDr9P+L2>!0UCtPKc~S8|}ajLn4etudAd4(M%LW
z$P4-YHXP(+**P4Q!$Wwba~M5ciiScVAG`v5KA)1?Z6qI-55qg*VQ4sr0$q%$FM6kU
zY{lB@lf7_FL26OL{d%v+ZiPCx138geS!H;=mrzNUq*l*Hi+Mc3Oph6AmRlbljS=7p
z{<}dC{2)?5{jUGPNJ$o73o}5HQ!=^lhr{W`YXS(llv6jr?4yrUFVS6?5DTRu6W|Lm
z66cY}aajE$4RAe}^i`ZZ-ixE!9t}VV3Gk2_ZCaw8U<v2}=SH6&8R}tYA2t)mE?wX~
zzU{)Vi1iH(T(yEz_=nWIRJDSy;%XV19IKviHU1GbD^;VwQCJ0O$V~MF$BuE|ye~6m
z$c**jeEcPD?EcIckr^w6-@8D~NL3-}6=D5|R)l<a5;3xccM}%G)-htg7CWR41iXiI
zg@pqk#F$0a+(UM|KzvB66MYR6JCWS4v1xOJ8ZE4M0@MH~U?f_XTwdhz*}dMJhh4tU
zLcUN?!R2e8go3`1Z;(TYs1jK)26Ok}V8}Ndl>f;$I1C4eedr<TmHRzXg{qxE`$N9<
zP~55lA+jYuM<UK~v%hj1#XL&Do@-<I6i;k)v;S}#B=8eR{sPFadCdZ)Juq^?XU`I#
zC*$_OA37g(jSS!|<*(G9@!3^EuUDwZ_2Yc*c;qd-1pOydvK#-3HxUzHE=ElA8KJC>
zFW~LR(R*#r!xLzM1Lz&}&?!%FBsl1St_bxWv4*YAh!+3qV)((41NiI*!xyROhvhrF
zc9wsL<lKin!K);O;H+jiD~~6DIS&brQ-T5FESzgN2xWzK#s&N;D-i)|;8a=r$S*!E
z1Glkj%09iQz;6fk2)mVGw?;rN$`SXBzDdoa{u>ivGOXZPnGoX-00AQvQv@wNE~W)M
zXt^Zj3!NGXetc#azynC`DMYQpu7K1kLJF%Igso~KxqIaIxOF#fz33-@fzu-=aAq6M
zjGWj;Oxm^$(jJ8}`8Cyw6=3yDft-OsK`z&*@47<(1OiO~V+6A#%Oo2mgi&IYXmFf=
zm*-Fcp}EVfgc*B$7~vZNtxhhfUNH<~hlhJ`UP#!j1O$mlh_Is$n4Peu8)K0QBBDaT
z;*5~LuI?r^W{-<~`TAFD8yqudv}QR&Z*2muvg%mO-P3;QHj%@j*JvKo_(CG8l^vYc
zZWWFEt*VjT)Et$KyqaCyGle}A;2HeYa|nEH%$G+5Qan-pkf%82X4Iwmj>sXW{4Srb
z#7XD{JnbRAPMOk5Fb>1<u>5m)1c~OMEhkz!MWB_q;<PwLu$7h)G-18slx&gky<ri%
zJVk2D$e*W(gs#%D3y%pTka%#X$YIqR)k$2Jyy60|msK0Rd1N5P1?XdM30CHN98@5~
zR(_`e@fF}_xmvr~_dw{13s{=p?U3ID;x|?*6&)(eyIYB2;xfXgFMtl8<`=OW8snGS
zGMHimVn0y9QX6v1aYmqBNmof=oMZ48tGl}6?N+BNPXwM6x#lfoZ~VaODK8MQ8$`t#
z*%qzM;VPMOg;+QZW_ZRwH%>UUpuwy&LoRr=3)ov&tf?lS4g@HVp*jy#L<^PdE#=jQ
zak*r)n`Rnd5e(zq3wbVwJZs8LrUF~^P$}VcA1Y8Pq=)26J<Jc|L0DCCKZDRP5g4Tu
zcqL;IJLKL@IGpg4_%5ZZsF|P)Qf@G)AHRaBZN^-wc_|xRIz_3;vbpE0(b&N>!$L9Q
zc;59?Yl`Me7p_n=KJ%s<%bp)m;9GAU`opVia8~ScW<8T!h}%oW=zmI#enFaGu2P8Q
zGg*a&Zl%y>(`pUGU0%1!aF<$1BIUv#$YScjGJ2Yt=@dDfg?MIT74%9Rb&e2=sZ0$;
zde!4AR^NJ`XIjgI*`?S2;?|D)XO(o51ue-b8xl>+XD<k>`ry`%52lub$oe%ux;fU_
z8VUBSov`}3**X(D+S=nzuBvNT(U@GawrTw<3rt#|g6L&pE6EkaAeIj;)5a+2J-J4`
zTo>A-k&E4Xv3!{Zi=PT2wM66b;ecNYLj*@}am2~d6fRP71V^+4kCu{l3yK=(8F?xV
zL3jUMr5E)sy<yMdptR>u_tJH@oVz=|Jler55IOTh6W2bzioGS-02YMi^)cQ=<NSl2
z<!xH8JEx&~*+0G}wyl5oza9r=FPm}`a<(vV>Q_(QvAFcNB^{xyHUG8ay@``*A7Rh#
zT(|&oa{K6cyoyRfTQXr51_Gm6pgf?{5V%+_cvL7u7<gtdKAg5L+8!ZNHUoh!wSlcT
zqD`|D!NY||3h&Z-;-bHm-Ko(VP05Pr?DZ2XCmE^aYp;!T%?)}jcvvv9VRq1!8>lW>
zFk#k&iK~%+cZ{AVL)5*{0(^|l<#gtnsamB{pL@WgG3sRsAbnJZ(P~&u49DXkj+)_g
zyaAje+d=UdSxC&`B52iG9!*1^A1Bd?%Y<2aYxTk>0g#A73Gqnj8<vJ+%abCIR88r;
zFk7tBsr7Y*(HW~F$!0Cs?=%Tn4Y{VYQs=heMS@Fvw=ORV@B)E`x)bc)!u+g~aLKF*
zjWf8NYNO|Q_d|=AjD?w;`ntNw)dwcZ<LZFgpx0{;m^ALaP@q`JUP6u<K|vH+V9bOS
z2^TvdAE~D&>MT0_7=`|}d?Urhna%lxU3KM2I)8O$z6}OCUg+$e3)&v<=$M;RX-H|K
zZBt9-Bx^yotgy)4y|^lC=97JDS*Y02b6tgc){}Qbotdl4qwO0f#_P5C@!Pg7T_C0T
z>(?yqj<00DS?cAqHnXj>u5!bZT{Dc;vG}&loooZR)H&T!7mM%Q)WJ64>${6wxuL3(
zj@Btvk&3iz$c<1or3lGN)wy=N<$zP84DD5;J<|&6fH)--C=U+J;3pEu)hucMMacj~
znvah4jq&<y@$4gAo!>2jo}~%M_87(8lc!XLE6E+(mdv`0-;UOCeyg@`>|~n|PbSDy
zF63z<7H2Hg)pZF-P*Cl1Nqq-m5V(sqX0z2G7YT*D15%DV$P{`318u8?_Nxe`FCYsh
zQ@h}}`jXU!Dxe8#X**(vplK5|&Z)x*F<eU6ZO%vt?H$Fz$1;meqf@DEE^B3cWs}(l
zfk-P5cF#%1i+m<m4KGKKl~YoamsDDGDvefV2>B~(R!oASOkt*lix*U7Zj+iz=Yuzz
z?%v>(seD1ttS)IzVbiMk_M2il@$+t8R_WBj*6!Ooiwz?81kb`&bFywza?h3uG$@O%
zM;V=rZ6P;Od$DYojawN77Od6jJeECjATkI%dw3cwg@zElhtV#Ou|f<g3~eP%Z3A+S
zRboiVob#sQHGXc<J2$s(u3qvGaJg=McSrwEa@zJSJKX!!oGC3EA1mHY=>n6=CvTg0
z(@K13>ZhyUTW7Gc4$6J>e>dK?A+)A%wmp~M`}D#o?SKDzWS3TMaO4^04y<0WNq}+j
z=RB!~l>0C*Bl4*W#5SwdbRbWHnhOGnSe&O3?3Duqg;C#N3955LiYPQuXmt_5ZRJfH
zDKbtvLw81J;UbkCBka1ujs!RX<i<jmHCb8Iv97$a#fFo7L6%9QFY}aCZVW`r4Qe5K
zdfz*Nl69T<jq`U*b~wsPXI9qj-xKIO@X6+dtIE~(!ji;<!o>@AgDSR;y#T3SG<u$R
z3|gWUX8c+BIjfbQZ8R86=d$G@v6z1j#Uccj+#eJ>hY^ljc~|=ovO1U;q-0;HVJS+~
z+tsqBN;_lU?0paAcisKd>#MJ?u+LezW3Ui+EL1k<^{&+Fnse<>JTU3_Q#&Rp_0!Fd
z_NQ_+o*L#YVa)pyCIz28?{e{ixz+)2mJ#}GM7Ds(<7-jA7D6vGpsX!T)L7C2#d>*q
zicX8i^Ei~9j-Qb~qj}B(DJzghi?gS)?Ncv1eL(^b!9USq4fsjT_!*E|d=9shmq^H)
zd%*^Fi?wj<l!%s<W{%m{L2Udi9ryo1oQJhU1?G7P<AE=qbr`dQ1K`USb?O*aP#}yB
zfWIA)AejeY$VBX+1c1tjTQwg4#}fdw`wcafQt!P)GRT+88DLETiVW&mv-Ta0OWF^v
zSiZ6Oo{x6buBn)@yiKhrR_8hMx6EGt;OW!tZTQ>rV06ZvGd*5Udrv|?#ae1hR(%Tm
zg5?Vy-hUeqomgtluamRuy4%@vGxs-5S!J@XSW$6Z5Wj9hO?C1)_Qa<8x=7!_8<0=T
zg*n-uxtz@T90q{aGyoc3l&G|Ftwxg%kB{(3<j~L`#*+g?J#u6@j-?DA(hkil#YdzV
zDpHx^3|=5|?==5@*^d6#*&QcucxFaq^}v!~`~KD~+pA;sv1DI$M{AUk5Nt_RdGB-Y
zzsR10#{RoiXLhgq{qP%=H8r2H&+R(?sL{gIeg-_-_Z_S%%MKx`xon0wiP>RRCJ+-C
z45-Qv4Fja$S-t=zGatZICa4I(a&i!+kO*1|@l-A|<_-v6xr{RMSFuQ_%QvB9MkLZ3
zZFR*_Uqe-u%O1{ENu~I~aGg$TQqWvR<DZ~+<(8J01d?v0p)h98?TH~wymRy~q>_@s
z8rP1gkDA})4-lUpRlkW15a+n+GQH;%;UCOb(WX-b9S8$aA}hu5n&17VYTcnZYYs07
ze$Ga7VjWERj53q8d}diqS467@2~hj^H;+u7{>Zs|*=O0u@gMK`@b*N-*0*o#|J@zQ
z`d#lpnY;+=Uz*~>Tvh*^$!ay^4G_c6NrY3yCS;_X8>V+<XF8gZ@unsWIj9XLMV%c|
zAQOsR71Lsu{#@2lYL`f}#I(t1Uf(0ph;RJsO)(tpH#d9D8opQ}pun_gI3*DA1!_y7
z4Igw`n7FnuJGs3oGOfjhbag9wZyCxagjt?9=j7<$v?1Y86co-sj|e&9eCRir*}Dc^
zBtso19^O^2C{i?j##fT3S9DSW>e7*Hrg?rv*XpD$r+7+n=LY-MO}}nicuz;Z$WUO_
zHP2c&yG8#HogMJh-dS5zyr{RYqHEj2_F$;3+%~WK^|0U9yu8v`Rhh`MOzmDczuN^V
zzJK%!j^bjN#|WivkB2lF?QiO!GM|TZya`Ci09S`1x)G`kMlav?32EduesC{?IKv?m
zG2VYnC;s#ktAE+uymNjuw_#~*)yiqX^0m*b?mW@9Szb`q7}&h+=_lG3?VBIGzIWyg
zR^ro>!H}(bL6Vu>Txk-E!;=>?&9}`h$us>XSnJKY;ihf3byI;!3(LBf&7A{naWb@n
zDhgmW=+kaSsmoQXg#x!!X3Nc$T29(bQfL=gDnKiv%IF|!;0~g#Wfba&7Gn|A6HV*k
z@_iZblAVXsxX9!-N@y@LxCc1)JfO@EnbqP}Sd0DxhUNmcnf)4U!U+-=b-&tE&X*{(
z_ONqn)6c=apI`bTU+2w@^p<QbWpb6`a`30OZF3iNT6VJMcA&QxM*l*LQgO_K`5B4O
z;4+yME&#|kJuW18-A4+oR>6^u8qS>bQw==i;p07Clo~n}R<sM5wkpO|f>iPJCezy4
zTW{ID$rdRNTU&5<c8*dim?0f`A-sX<*t4W8al?^i?E`awc;2*I@7lQ?=Su}%d=((2
zI_+2NI;AEwYx~shdlyA)=zl8if<EtqR${}7FvE*>nM{Cr-_*SfJsv~mfdm{yf(58I
z=zwHtQRvN316{v@B%mco3ANnHL4kwVCe9MCd+kSajiUVKmiA!#_AY<<+9PW|`83$G
z<FQi*s#b*5S`i6A%{<1mmXb;Jk}^EG_0_eMG2b9AntOZO%=?yC0PxN7!6SDpijC~f
zHA}Ot0XKUfzi~y~Eq5btJUsdZl}|p5iC`5d!2}Qx#S$DN1T=;DPK7>3JIMfq`N69?
za75`rRsp^^2)+O#BVXateYkYwt9@ubFhb?y_rki8e*`@qMcN2k)rZMVU}WDugpG%R
zoysScac``MpT#j4P<$VsN#6%j_g>sYZo<#(+s8KU+n2@+-eH(q)L>C2hnJO=lVdXF
zN3ht*oP^Fw25KrCKB*{pQWCI?^}m$bD0&Pr2w@*qj7aX6zp;yeE^WYe2kx|+s4K^~
z*LF2ZZLu<9<sJ4G>1m$6sF3yhi?S)4<dO2Frx)Km_w~67oFoYXP`Z$hUFZ*IlT>z*
zAKcqD(6#X0h2RECC6k+(_@%>Tj6F-jFjA$RDF=OZ{X4ER{*}%7+t=Xih3pA4<}H}x
zVGoqWVSHg2naUn7Bc_#CSe5d`7p&{tIq;h=pxm~Mo+BTop2qxGB{uPhLOeibJ*VSi
zf#?9KWdsggrJt}Czv&quc`qpbs#cdDx5D^$lz&q2GAYMIBp-|a9Y&rI^p#;K8{ixE
zg+kmT832<i^fGQ<`ej_?=MelIHYcn@xR{uVQ|P5!eC+)-JWRCXI4LlMyg*U~v?V2p
z%}hO#22B*VHZ})l?CJ?k*m7h+UOZZoV~n<!-FD~No66_ZILYStM6JedQ1KGdi*qY#
z^RvX&1WCAC+&CVoa>$6PEwA3N`Q$B0N~{#KKWSf)(7pfq+b0XE+dRk?mOy{nO^je(
zEb%PNbhS_p&*r&@Amj3*SWW@tpOKkQnk>eXITlO|#9{>>UgO?`??kZ|mSTS&2B@2#
zc1Eu5QlrLh>UG+y%pflW9)slhCr_CksVLbb$~Na4bLtt7$W-KJV@{ur2HHq5;MEe9
zIKYc06spA+p#Mqon5jN?bG*tX6GO$ztxOC&Rox!R5hO*Bi<?J3p?b)dF&>t~h%w$r
z6h#93BZ43?oiCIvN7;%TDMu9sY5>$XlOJFFAJPQ=c@Vcg#g?<RPhC9+MZ$06JnSO?
z@T=y~h5-npIZSYlkIhekm%tlOjr{%~l4b%%hl`W~T2(9K#ZLMyUa#w8pUh&m;1)~X
z$672$o`dJ)$h2l{T-&52wOWbKBA2T_mJX2OqvDei_<^Om8gcIJGG8Yul(;`A&$*)C
zIMzMq8s_L^ynEhgcA0gGhlRqzn2dO>W(g%U`19FE7M*m2T-L0))4Kt!by-iZ2BBze
zS!u!28JFh9D4D0N5&y6tnO%?v;_O?cO@1}&7n?#Zc5_jgksA3%S=2p=eI&&v^;5`a
zEjIaR;$$TvK7NuxAO4d*_`yijpUH~N#dvYC*?Y1OU6KD^_PzuxuIlXnuCwn0%m6dP
z9T<jfU|<G@9fmCs0zwFcY$O?A0u$E2Kvt6&C5bU^(U@wrF16LzCe_5ms9({RqW05N
zTkG<v(KfZQX&SBCrurpw`OZ1_&M=TfyFGpS{}+A_%(-{Yeeb)S_q^wvdoJclhA~aX
zG15s11KJUT<m7;sKDi<nSwcgW5<1r$I=*~{9rgIZ3HIwKAw}2=73>meoK+%@)W<}}
z$O6BT$D1NEN>uD}X<SlVjQU}*6zBy1t~5TysMnMdjNBNbhG)J5&qS$loj%DNt4K|t
zii-s*xj46R&453*@P-|uX~~J;9IvJ1+9;@{B9S7sxq&^Kv)<onMkgf7w5EFA7wE@<
zj+(GKx7hxX4#x`?Ox8jj)lANZ8qpR_7Bcyh1q=hUVgzkWJ*k3UD<+jeHwXt@jy=!K
z$MY|k2+p%>LCT5Ll>-6~3H?ApUr}Wsx5EuOYhqG#_uke-Ynl{)QK3t5Ey!m#osO|4
zJFP0VQ(-XRltd-lsg5-!8gfNZQ4uOhR^hb%kWT^q>6mDZS}P-75h!CK7H)5^(&=OI
z(o#Z^SeDH`z^3N9t!iO$F-XXzdSg;7ZnE0+!jzSsl?zMNNV~K=ZE-`$---kxRjj=_
z8)(iA`llCx<|?rQx41k$u99ICSmm=&Czu;3PT`z%FqxBCj8ehK<iL?m0ze&sPn5Le
zqXotA8GO!_fHu&gB8bUX)Q}c83!XJ68}yoQOC*`VlUn6Wf<zi^FqjMqVN|qEtOy+Q
z-=dbp$4Y^BX{DJ3QuZdfF*z<4_>~yyW$X1s8Ga4*hFFo(+z?32Dvk|$lBA-2;|;q?
zEFJAFx=X#}QTLB_WOVoUuDV9YYa?}WBk-%LSg4Ilo5-DTPs`NrsYSE}%g55(N_kq0
zF3pgK<rpvnrptl3kdBgrTnIf6z^|~vVTd*=DmeTBT@lye09k`EnH!`8(>CqT$W7bI
zx@)Wvj+WBWwvxE=%|GZ_^@G*<eWWqFF}HAaWunGbUs%&sW~$ouMBj>Eb`|0|8+zm2
zEAo@e+~rA0^^2A{n{VuJ85uTjp);B(T$GhqQcz?`Z(QstYQ3#HKhA_J_}KUwu&ND<
zKb|&eW6WnGptnoTYQe`*d=i_E2w9m<Xf7>aml7suL8Rkl;Z~cVyHCiYEiqb+M)u!(
z%o$d5LP~7U0;*!6j}(Y#p%VD!gFlmsaY>9VK~XFaD`V1Ya>(73+LT?FgEz7F=c`gu
z5~K=^gt|1CQ5F+njF1p$tQpJpQ!jx2FdJKd*^VVyE7M;zoghCwj%nz^7qy^a3XW8c
z(;yds%sOEfic(RK;lm*>9IaE_j0EyAVSH%(&cA#kH#Fl+MMl7(atTTH<g9L6=^VK(
zxwh-to9nLGkkwun>oPEz1q-)5v+K3j)t3CE<q6S48%sJDRTgANJEf6z*A%R2E>G8A
z=jtgjXU6M4tLi8<KK5|ik#AkU(wWFqMQ;Cc`+=z!Zd;v=dwsE)wlsZ}$z{qb(4^I^
zJG>sR&F@WJSed<K^oG4<Z<N&~&#P{PvVV8#W8zMFC&(pJv6Lf8XOf=<xlRf&oB9Yr
zqyW*6DkbBQoa`Vcw4Yb~`8>az5tNUZ9{K}WUD-Kc=$o79B>J;nu%{@bad8?;N|vcI
zyQOY^inZ9LS4EqQI+`GyWimWIi{AOxTNht1oM*7cD@=BCdCvTd2t!t7in)Dw>y}}=
zNGV9N5TL^c-sA`Q+udmGHuuT+*wpbHI6YyEnT$O_3Ekq-W|c~gOV5C`PIXjn#lbij
z<ZEc&4o!}u9d!KcKb*TrgbN<QWlkW05F|1tGF%?$eE38C&wnP9$W4w!C9bV`++bbO
z+E{F1Qe}8|bg6$}pg`}4mPP6f5eieH-Bf8`IKMKXwBD6&63Qb?I{X4Fp&U8IdaXe%
z!YgH$E-+4aSwV!}M7v8|D_WXtb@$b$6eemUG3oJTne);kOGm!DMsHM7C=z@uYz2PV
zjk%B2*VR>zH^F?=GoA~~ax60imyV~ylF4Y)k0(G=sZB^~G*eT``6()AWttPfV07jR
z2sf}plb4YZg3ua4gwQ#?w-j~5Gff<N&k-dgpPf)7Sj;i1ELUcK$2F=oKe<aTE7T;W
zWSXk77S-1#*De%@WUIzI*ZK&m?F9IUFvcszQUPJ$e4;9IQGH#iwIofSppA=?+Z}Q9
zsw)f9W$ruf+PBSXDlM!TxnluqA@;f&W9BPO8F6Kf`F5SBAu2V39=oA$tynGIwt1*4
z&bM_}QBsy!ui$;iQDfH`vMQ3Bt}9#bZHOr;VDhh7-ihY9fKF*S(CGp!{g}J7v|zjn
zDDEkzDJn8jH4f*yj--u~DBI;!SIR384=RPaOe3yvm0VG`1nv2ucdbujU<?{VoHj8T
zDyXTxF3kd(gIcYL11Vv)scK$DUYcYuOo@&~3u;qp7YfD1pT=$ga`x}I(cdJQC1i4s
zo0l>!cR@>A1}h=<W;gNra?ZC$c^V>Y5m5G9ramUU)EO)ZOMFTmb5^g@DfFP}9K({5
zEW!8&Mdltrn+|U-5S4RL*n(34LNm#`g)5h&oGX?rPG3JFm8}1ML{WuKX)qWy_vYix
zI`+^SiCjcF@-us@ew5$n)D89}E=?r_^|}Z}N<l*oJHWQ3R=8~1qRQ$z$ekIq?r#Fi
zEW_%LG&MCpL;eN3h7!AFpdZf~*V(XnR9q3@@pwYQ{fT&D9Q1s-OePFyIBP-1PqsO(
zwd+gKz!kOt#}>3oL??yJ0lGnF2_0G`qJ-fs9t`5>B#=k(t3)L<q1MFeqI9tuwJ|PH
zU!PL$uFlAvmtj)Ni<VU7X6ME`QXGp&qcp~1cQ@t4CRr>xP}3T-z*gz5v{{Rylrd2n
znGly2Ev+fYE3{-MX0(tdX`~^od^LW$dCSr~vjUeI9LbL2W=B-!ie0S@{zgZvL^GKt
z(x+8*R_^)kl2}o!Gc~KcIa3{JQ0JFdmt@Hr*SF*{GR=ey7id%F_XFKUv!m3nf$oYi
z$C2FJ!V~0Qj+!uy^8}?hVx3HeHlD32IEVvUx)vxX(MoVxLP$j>8Vu=@xWFjDxIPW2
z1a)47)$B-#XUtlSiAjvDPphe}wOO)L&1!K(6v!LJ3pOmW;TbMDZcON8|NQ9uk&c$e
zhBRGSv}1Yh{JR9>c;v*U%4o5{nc^sI&WcnrPD@l%?~Ysc*R=oi=p8njm2?;Uh0S@p
zb?fqi1SKI6y(_3(2mQkccZ8C^!xFK$V-YHq^c0XrcswzYG@T+$+$tzP>4}qOAW5z@
z$&B8{rUlWR7Dnk%S4{46Upf=J`qiI4vw$MlDO*Xl!@Q=1l<3RXkBn^H(?Agyta+)x
z7h>>q_VuE*AHMg~MhaIX*A(K$qWL#$-*)4HRtm=@y7YP3u>Wjen`t%u6c&rQutc{Q
zbA4nmh%7IvPf(I4Wf?C@MW|Uh&)dV+@1lZv80cO!SZInfDKwWk-L;|>yxm(iRBk!6
zw)K|zYsc}_GCbyuma(?1)VBRSuP(o<r(kKzo}<niX>w>?<zPeFo~^_m9QXIEet1J=
zEW@VInYbC(B-O61DBIM#l(7qoJH{GXm;dpPfm_ru;_RC2_FI<??SlWM#0c8o9YB%-
zEZr?DVA4`klg3>Vi5`sP#K%C^r3`>zA>rKzEyltENZYtPn_tc2JP39i0^mr&RWdG2
z!nq<NP0^`?+jednN~1L9?8Ma8k`iZ2ZH2jdNu~-%Kca~EXhWr=yzb@#yE{oGmMV7r
zzEjDl?YBH~{P4X6p6lx3?5^63(qxT&^yT|<uiLY?ym_$Fh^IKp>Y8Iqeb?0f=9|aa
z`wpXh2kU4O_)HmQdm76IS%SimQG7bdU@@sdvM?U?3@{E&39-^(;5*N)prcnV%v{+(
zaS+YuK+Azl4-O>~K&pc~$xt^*RzxQ;M&(Zq$Yn-T!U9KCR%1<-wYE_pA_b(qrKQ!L
zGS4Da5ICv0QyHhkvwyrxBoUICS+34SZhX9a&)%D>0>e3tG1mB;yt2&7H0|<*k!eu`
zQNFs^7;ARyt}<3Il|UDCZs54ZWlM@kcNMQ1hW~D7>W`EPL;yRM{WOMCmZuu*xZNI^
zlv*aCESMEDgO;zvU|EGlaxUqBzi1ea)-|ut*TcLPKKf<l6NkOgfwu_(MGkq>=2ulG
z$GMiZE_XFwzdX~rpzr2GotBF7%A^!`S6<DI-X=X!wO$@?wJ3W10(pdDb%aqP&RlVQ
zbL+uxY;Vh<WD&}4tunP~J&OG(3nf1Xd>W4?oUvG8aF<D?f^qe9uk=P}rSs}JCw}eM
z=9~D^zarNpu)C+uQpwbtXm4KX)0m9X9EIEQPJmBRe@b|Q$~vMs6<UqL?dQ3rSbke}
za8U|w%XX<%=+P>o<%3hBKij?S`#tHOvIQgCHVhAMTHa&R;V#_uHqP9*?AxbzvCpy3
z5M%6b*{M%(A+E>en?C^BIRPSH8g&wj!BU<EMg4Jkq#ERDI>5wJqH{uqJ}2PEQRvlU
zI9e0Fe0v;@w#R)QmFeGlX=2m5oM>aLX?tf5K2=UoI92M3Qxk1%q$<u;N*u5-Wu;zR
z9QhF3{dF6Bt0&Nf70Y`XV<?SVAyBE3bx~2;Q!<N49}AViuRe(wZuQBDdKch={0v6;
z*5|8j3?P2vbTLs;-pEUjIv!iMdnk9%w|txVrXBCL3?Eo#DY)UWV@=<YL^3Y+Om5Gs
z{X1@0U(_+QdgWwJx}&i-zh?98_dL7-`qHCQ=gBVtx9M2je_=vO1JWHO;5ovS1YpOc
z=2QIR_@|<@FtlM<>M0zgd|CVgRB#>Sd_LqppL_lutw#Oz55pfn_v1B(eAQdpZ$G^D
zoo{xIH;$S7tGDeq^w^RcpI+44we;F}^3YFL=WbZm;BQG$=pOQ~d0=IN>CKhRe*fm}
zUG##{x}|GYuY!Kq0t~*GdI9ZuazCM!oS-7yF_giOAW$kL5)FM;7#9;G#wMc~-K3ro
zBQb(AM?exdbB~OG=Bcl=OE~-)eVmY#*|dR|iH3ukd}q9@O>r^Ok<S)iz()nNoZVY4
zH5Fbn*g$Fna;-h{*Mkiuv66E9^~3I;SF-|cE#zH#A$0<iV%lS3p@6_B?lI>VPMvhl
zTK-saoE73<9>>4LKM(wl&>tf7f!`fMH1N;qg~S73L@IrPz|i%fC6Gt)&kr2}-yFo1
z^jh+Iv;ram_Y%?~0u!Ae&tau+o>YY|g=oP=7ne|vMiXxyI>hE5I)oR1d)$p-LLC@M
zI<R@}<fu#?Nf}ZowLT(~lwuPOYx+cn)iRM_GEc;tqM~FIQj>TBt*e%vciKa9b8rdZ
zr2Qn?A~5Sw_L(m;y~3*wg}O?6R77SKtE$R~5Q~*;$<6F)g;*SsQN`9(rbk9(RN_zL
z*Wus8@1~_nV?pDk@6{JD%Gz33#s}`kHRYGe$XDCh{~lo<tS^XD)z+#Eg$-m2DqmVb
zK8#}6IqDMqJbH&;^%E+PifE2t=F}5Z^zmq?Dl+M;@dRZ$l0Fp)!q^d6vl5PesF!KD
z+97~F{hvd#klbR&d1vqqeTn=V`smBv(5IgHhCcFuBx5CRt`}vrvgaD5(x$$?;%&!Q
z?>x7^p}$aLDXewf@{O%ywz}r*2x`@6qf=g|yx3CjwkhkSkI)TO@f$yW<cTjfMd{gx
zYL^yfXy2N6^(9?iab7&^@jz61n=*iWF#icm0|T=u{^bP7yoEBk710xV2BV`Ubc|Rm
z1A`kATEBq80Fk)mi_p9H)R(;pG-xZ(rMxX^=<!#Vxo^=F7su5s)5YW!vc}?+NO4*#
zu4^RQ=;m6hg1wZVXK60ZV7r@23=(LjlKJ>&3*D*8dKp@0c%1f7pI`zk)-AyVXsIH!
zQUMp(R3~SwR9q5~U*H!G5{=_*G@JO`Yzj1m7AivP6d?-1bqex}OCsu2<8%1C_($V`
z#}C4GwE)BDoxtbQF!zz<WXlQii=$~qV?6kD%XKj^I-MMwNMn@B2yo_@+$x=rS%b?G
zFq)t-A^L?&5(M{P(TpXD84vWs@IsnbWM`P8AB%`^WvQsbhAo8Bm|<f#_Pk$TojTe!
z9Fdyw=?LD^w74n%`u2;T)`~0(dx=X+ZE*<^crAN4vn@}<rny?#_Uinoz^5s`UUnBJ
zhhR03qYx{1i*wJotl1MeRwWc8)@IWsow0(Zn`njRN5-EJF@gypgUy;&4=y}RKkrS<
ze6l}GLLtn3%rg#YxkTcsQn5xglyE`dP(%3fL9N#1P~*Q+IWyvQr9^Xi_%UuxFEZJZ
z@meG=-pbyaRvZ^P4#{65N^I$3Kg5&5k9j)^>Vf=KnA>elJ{5)IS!HM3){==*t8>D^
zWKLu;rU@exJ7Hkd6Dq4>LTUYqbp`lv5kzpgfcWaC{by-~DApIIWv#fjtv*_roUI}V
zbz)V+GPadX$*FMx<7tXC@%s(dl(eD-ndmC|A->Q=)~{JoXEQ|WV}Tav_`(KuAFFF9
zvy!#7WP;XNfhV|ZYW6^0PRv#G#Op<P1M&-p+Z2-@WuoNRnL?{;BG;NWk;)`bq%evJ
zIRpH9mNW42TR2Nh_{4ee;eYbVD$s&J?uRlQ47a{dktb5M6|mM_qcJgRLAggRa8;?<
z)^O2}-%G5;x6*RRe1MqY5bsp{Mo&JpG*C|LzWL-L_Ib9v*r~f*?n_I_M}X87Q)j4C
z^Z=HOWj!S}8dZrPDn3ho0q1x?P>+bv!2=EYca<~J8#JdCOkI+K@moitNH}8~K%y2W
z1iSX{zGwBF2X<ZihX-CiS+ZTU>H5)q%XVzo;=b<l`(I=)mg4nW2X_rGxVEMB2fmS`
z?G@~~b-kl&77W(U>l<6V{=a<la5KziqS<O12QfPZSSiOXH<~b$%EXvRljSVPW~Ik5
z(tcJU2T6|Wh$}$y*|pP&g0`a#@|+la3eYmW3m`Z;(@l>Kw6mWCByS#k*0*`*y}0zD
z<y+F)S3GP{nOd%&-1q)(=Qa5(F{9Uy-npuTsZlO$@ISe-ysV&itT6i1n>Ii3{e$?*
zlgTmVQ3369C7T`@F7uBTugtEomY55xYHoeuoA{H}j)n7{X5ZP`?<+ho)&-^f;nX?e
zHTnq1PU5hnBZilaa7Nlh;wB&$oQM%msW{Q#um<ESGiKChJe?g}rAl-X-*CL^)GKA>
zDb0loeD}6Ab;Z@oMJ44*Jf@jG^5KUUpQ<W1R=Z2*`&O@OS$G@XQc$F`n8<oLeD(w6
z0jKGQz}T?FEr-vLPbJx7ljQQKB*4Z|edI*c2`cW0_+<(AoP+rZe(oGjn{y8YsrX6I
z>FolE!R-RvB$1GwxnBUjyBL3I;O96g6XiFl@c6~gMXY?}W^;xd-)`R1$_7RhCQF>5
zymo=-zJ`{SmIg^=oSDE_jM|!&r%Q?>>lK%NIJngwYo==F^_M@-o=9<<)9PzH?VZD4
z8V#^d&7V3aJOzBI4s#zX$j^686~i>9dMXWS*<z9jrs81<KFBx~4N6C4z}v1iJFX2*
z+LC;6_S5rle}QxQG5Xnt$_-vmN#45A+*vX_=vMgt=iZnyV6Hmfy^9-{3gxSQ?0b)p
ztQz+X_ZzBoqVkkQMaYuf)~tk8#l7pw)kN)0RqN`n+cKXO5%&z{R=Z1Te4g%Bi-F#;
z<4vtZvSagTU;bwH!<BYj(9|o&p59Tvu4eo81sJCjdKBm+7jqo5XJn*JIe_3G;~*1F
z8ns%%WqNT_V6@{3O>m>O6+XrNRpMPiJwyc%%s*(Tij)A6ptPJw9amBUso$|<q#w$#
z)D<~XhAYX<%?qESJ_RyWV|7Q$%PXHD|Adv0AG>84>FFs`d6-2@DI8ENqcIMC7Y%GK
z5sL*=3QkCFBKQi^!b!myE4We`rE}(n?H(Y|ys!&S{ebK?gACt0;BpapjLK}VL|Tfo
zTHMQ)R8}o<Mk>6e%c`pE1vb|z%Am4Vtn)?Y7!nOJ$@YYnie-z-(#tZ9X|!~3dsAah
zp53*IG(_j`!T+?Ue#EKCX>xknlk0!jv#rsS6%p}jy1H=l=5@cQjMe59I=vo?p=jZx
z@y>no;v!GlEc;-D+0C}nTj`TnB*^A$ZW)#)u}6VuE;O7~ouHUwiD!jUsgRp_w5#}s
zE%M<rm3U<M?g2RY2#;xOy#-JlU+^x9y9RfM;O_432@V@PxVt+E?(PsExVyW%%i_-B
zZjb!__rALK)vMZ5`%Rxd{dM<DZEelW=}w_H_q-6PRwotivOkA?(Ro;M`+#WD*sA1?
z?tCU+yWA-?mACbwwrcw6^<jfbj7#CL(5h+c?xJ6wrdW{W&Q<w(uh`T@t)j5mX1!2s
z4(U}9$9v=J?A%9;-wBPUb&Y}l9^>!a6se%{Ljz-dm)$flhC+_&%XUJynZmHy`WWr?
zwk<eAikEc~kRf-@u__grw}dNzbRtCXF|5r(K99Yu&ffRqZNX-PEAX3+I&#BG10(Dx
zKLO|8o1ALEeB_r?gY{N!e&IR`Q}r9v9F+As?{W_IHnW-E6%W8D^J-xuSnw)0rMEa8
z@OCC}c}MxnIe2(E3U*sChyL5bZ_YY@1X!I=&MkEzzuH=X6|VtOA*R&Cx~lF5_ZMeK
zZiU|+72Xcsq?Z=X^*|+8SfCei>Y6i8@r25uDsxZkWSq_}dmyUq-JawCsuV3TFPOX7
z8$!{55o;g1k26E0tx;TfcD&*PwO!_((`uPB#iLu*ddOC1nG4BQ=g%S5I|SSXX+j)$
z%3aDy)Uhn^Td|u<L!Y0@4v)S@GLU=Y21d+B7^c$U4xs0obrv7tb#DQ#!E>9*KON4{
zuiTqIGAR;dF?TV!l+fzYKtEx2n{Mcw<%tM4!ZxsD;o99W+HVvkdg+agO>CAYz#HD&
znSAJ5GIN+^+{%J?n`R!%Zeed}IG%W-=4gfyr6v8V%!d(E;gl%!c&b{b7aKv|%L)+9
z@atc*<l1?;20aG{MQ#FGJ!0-vhkBaFpEz(iX^5eX`FEg_juzwhn6FT;gtsZ*nOsrY
z;6PD>UN&H!FCGnZzCs*3YszoeJ29nS0@vj!HwOMx)4EOkQ2-zPF&;)X%JW{imARGg
zkNFz^9{Y}=INNWU_!PJ0`xi>(y=b55mGQNr4dSB?XZ2>pKgSv?orU+0kdz!tiwInz
zmD|n{o-%lzhJ~{j;vbCw%-Xv;=B`(Ube~^>k=)xJftty%AXCJZ{BEDIjP&rnM}kL!
z{%vZRo0<<Bnix4YbVV}iIJG?vMaJAh43WTCknyA8x*pn(nB9f|h<nJ!UnNuyzXkNK
zUgVQSyh-2V_aCr|d-i!WurD!4LLV^^{MlEDMAI<~rD<BWPMH&uw>{i3yi$E=@vrGQ
zIHA**Ik*_7=jZD)kGlN=mA_<-kx6!&GEPxZXO2)s4~zblZNZdUtW`XNg$8Fq6D0oH
zJ@IImf3LP>1XeBEDc!EzuG|T`+>YyCOXKa4ldHrRD9aM0OPwqu(VgT#_5lO`7>a3I
z?4Qa43&5_y>hc%%KkVq&sE0-oNa`nUua{fkzP}>->*vB*_?Y5P(nTbrWOQACs|3+<
zP8b7kN#pw>_yF~4bh{|u%~}&oEM9@|LH%n}87vZ2Cpb;(i+dum?ys{6>^QDx{`Pq_
zc-atnBDO{)k*#ciU!ghB6wrI)Ab)n@7xlsXf~Kni0K~vvHZ-H=Ku9(s&DPgS_BXkw
zi&=9iLi~+wLVZ83njF}{79eq-X?u<VQ{0l95*6d|^6!YCB74FCn<(8-2NozE=@X*c
z)}+Szt1dOeX$?=t%=qv4zdL5~C}r%R)ShQ|rx~k14mF1<=v8mcDj5zgr!W@6sqx+K
z``o?^ll#X9qX9zV@l-s8k4w7)xEgn;w!~1ka3FHNS9LZkcl<m{;2(x%MIv~!+<N{X
z74UUI3;AGe_TiGzh66r+5G8`>tG9t)Vy3#&x{&L=QJfxe$R0>UXgd-*Nt<QurExdE
zq=z&`>`1zWZHvzEIz&9$$jaj0%fEl!pkyB=M(W$Gby%UVbu%%q3isEeQjTrgYtZbk
zKnU6K-6!97GUTav7Q-k_dQ-HY5({cnTr1cp*?3zb6%!2Oebvo70>EAPeFdfU5x(oA
z%aU1(Hlulv{iQ(?ZsBvL1?vE#aiO^zyGux+cuwaHzU){DkMl-Of8V`&1^!;n{E&87
zBRpXFG=y<=FN`1_X&AN5TQJf*@`$L;7lS>AKX+dxPI%R@{Dj5xase(iS_lY*B^y@?
zUK+0&XbRq5fg1Q;gR|w_Yca+)Rx3g0AdTxg*~9na%_aW)qW?T)+vs{rb7vt<W(Klc
z;YnjOM_sd!7`cz2l%xp03p=9|+q?=z_qYpQW393csVhY0f!sU&-9pL^m%0+A4e<wk
zxAx1*`1ZJZ3Psr|Nq3BSU)~3P{Zwz$JFWZXRjV-_Trsj?sna1aWGL%G#3W$_??bJA
z5<Jfw#VNJ#f8v5QI@R2oIRlIv{=c&S8-9?#LX!`Drr=Zj!S~~GND1@DdQ9ee6to|v
z7Be6Dj4I6&O=qOB=ieM=jMTu@krY{mAf4Wn(rP{qY~_uS6lg6>mrQ2F8r2i5PKI7J
z+Cb)r8V_e)Kr$Sab1W=vqgG=K^H{aX%EhB&tT|gh`=tC<Y}q4Q^vK?wcUpJwb&+>k
zzw@<Yr$Wd=9&3X)Cjk40+7n+VLqEd4?qe-nMB?dVEv|g5@IVUHUg|4RC&R$(eA#0y
zQiRII_L$=<&57NWDfGc?BczhO-1uo4y_4s`Xl8Z`Td{fNr^)Tx@g!bBCsU;<y|g)Y
z&4d5@F!^Q^Y%DYTl$B&L0ND_7ndMPG=!q33QL0+h-{3L}=M>6((f{JP#|<yH9Wzn7
z+nnT}hbwRjT?L3J^rppKB21`3kWB#QN9My^at`Zfv(=2T5Ohlh?LG*3()WTCm@f3b
zijw_1Mfjd{HE7EnZhZ}Q^2r0VicWI*9vfpoiQY~(jN=B~?g^G?mZOak--FGEGTR#O
z3NzzC)BFdLa4oizv_tj1vvJzTOdgENxcW{;nP}@G$)zzn1#=MuHXG^hCCXb>=;f}+
zOh*;;OuIFQ*lBfm=SX!zi0W5mTU_c!E~mdmSbxq^!Wvw79n=LW^N=Es*8Z~ZjTQO?
zmKdBc5Ch^4uRj*O<<;izNxPG|2Dg8=jCbrjOxyl$V3Gp<&P;=)NenI>bi^FgjI6^h
z1G{(z&Dl9Bofk4HVzJ9`(u2LT+ko^2d%YITF|pD}aO{mn-+cyliq00xX!Z<%X*DM)
z*@b-wXgwBN#e>4+3ak@-3KPW}t%338hTsX)^i(NZ^CyDR<Ed6)KpgA%9ivG~1kFiO
zPfG(}1`BeY4rwMvc>-HP;PGH8*6}~`jD_tf6Fk}^E-a?D|BkbRvFgE^&oK^6>e2Hz
z5E3C<^ylqSon+t>rK>A-dcG$mKp|7U%1>qwzI*-7*nvnCLt5t4z`KD;4!9#r%PWi>
z1K%W$UG#QNsZ>FP_jG0FVGnLEO{;1nwrGZ(PMh%J22vYZ-H<an=f8+nJcLQ^lL;Xd
z23<7sj4d3H+a8(<*l!}~PJ+#f;n2BUJN#<nYVUB)w`wr}mmAO~xvu$@LNa=ay6cXq
zZAbANyFg&Tu&^$Ata*DC;?R694sy0!!t+SXT;M3X$BO6K*Mu2F;BH>BVjuw=)6FWI
z@F+q(`pwTD%)k+>!+y9@P|}XRa7W=w8q=s!2$IxvrXbFn*L%6X^lbieXRiqTbQ!YK
zUys#%G<X~}cgTS%=-qyfx)N(;o?YF%BfWHgqX~V%(JjqdX+W}5gCjd)(a4KQALJV9
zinq7F*Lf^{4yLv(kP#6=ycN}>^S11~c6Iga-w-OE&4D?J(B3{&A#Khd+iozQ-WoS4
zPy*aq^=`(N?tc3rOt9&ORN%TufStCcx`IJnhiXxrb&(R-k%6PXFf?>>+?it)l$8tp
z^yo@3|IMmIQjfRR-a)XP$~E`1fD<gtno@N~cU$!JeGqG^=;oA17^4DUj+h;ar%g{i
zrK!|#uYe`gHME{Bvb=Y|Vsa=9ZHQtxdplFvDk5TEFNgJ<byFKXd`?t2Ik-|g!g+hh
z?D^@8KQgzh1)DF@;msYEhu<b4u(}O-;s^tGPf%355|gAO*F3}H@NSsB?McYLU~b@a
zAfm*cczUSm?`6qMz>b%24kQxfhUg0_7#+Kd+QiU$c6AxOhz*nO_G&)>XF}S2l2`ad
zl96Q@1x6h2z`1Jp3bbv5ew*}O{hl77>O1fFBBm)Kh<wfJ%!7H@tTz&7%}SIP=(*!b
zNm6?SmUHYd|Dwu_O&lOl!U?@*MRFnAse-yM&KL}T%G~F2H8mFeLq2UXv{J$4*(-Zh
zbTBS0X>9(5FBB#ecJVRocR*fG09g!>dpf5l@$Q~YytC5wgN1#M=pH4?lb>DeJ7Ow=
zGT<e4s&C%wbwhEpGR|OX+UR1Mr8&{Tbng&{i$|Z=n@EdFYlC~-9rq))cy8_RbDJg1
zBFnq29WJ82I3z{TrSp&oFt-?ZNHkeOazt`zM|jJ2^CF<%`OY*r2OQye357{Dvv+;#
zR++Mo^=vXvwRrG+NmIJ0t||krjg;fz8o@lzh4F`O9g|fRv&-}dci*BQ-LmLILS~IW
z+g_e;#a01PE3Y2YwuMm9{Fa;G*K^V?q=Th9#0l^&zLxL^938{O;}PP6@deRAa?<-`
zR|fbhGe5)3KfLgDi#82$&!3(?pcKrBBz1D;^6WvM-9nhgczSWO^}Xi>yfYE}=wCWD
zZG{c>&VYG-+uEr<Aykir*-OCaS>uLthx8^#5Hx_vge?cp059?i^LG{W2MD+S{Lzn^
zwDI6q?}P08Z79jC1N89x(V!EB1`+)84NMHK6kY5Hb%xPo+~n7syXhI)5Pf9#7Tl44
zbxn$cr#02gBa3$QZUPJZ)mN0k{=Vn0NHusFHEU2_)?qBmS3Hz`W>{gnS0**$gi6U1
zEGKV&PZm#?DzIb6N9JfxzIXh6@w40b>$`Eb&SOtvUgpN0*yFKTO$DF%(|V)Ri3P&Y
zZl&7cZKK^PV|o&My2i9miHTCB#|x$r*yS)3ddJT##bs^KW&9Q@`qLo3`4sf7Prw@>
z@(d>8-`~dV_{(TDnWz~SX4rAJd$59_si!{I;%BwrHuh06h6}%D@PwA@IVF{?Rt}~Z
z_Ug9hFY7RW!=AW3*YE;^X)35X<2=d4qSCC4rVIR|!@@JdEiU9=7t70CR*>L0COxBW
z$Vdo1)|8MC&}#?CQlO2HA+-a`-pVY!JbsF|HSV)7ne`DC{Dm|UAmDI~$+^R>ZMyeI
za?iviSY!)qy*1$;#Byu)gTvf%wdrmn@{!+<(~ULQ@c0bFmK=;2O@V6TF)$9*?r}G8
z9utmgADSi6FPp8B&E&b_A7XTC!GOMe8172oD2erYltU1I%Y;o#Ik48HfaR+a2BF2+
zr06nf)20o<MG8#4Z`kyy2Al<=TM47=&!m^4!hFM<tsk`=HCOL17k0~kUt7R!*TY5E
zE>>!UTAl(1k%KaREb`lkOJ<;s4T7=65-yWdcGy&tT_2yfk><lT(~68#!*5Q=hA3B&
ztZR`R18doNtKS1WuchrHj(QrX6p$5cH`s>Xo<XpMSH0~`4qEPD^s9NcTn<Qg7~)?9
z2$LZYcSX^hPM-)vz#sy~Y?rMI&U{Hj)RE5uJL~4{fG`<l8*C)RUfe15oP=nVk`=g2
zf!JqGXmoJ~xo9#ZR9Zx05DmKirf31+d4w=GVAi+qHjrye4~KGgf&*<tnOW!LTBKr>
z=#<agj$BWv69lmFEnfy&tIxslC$Y%IhVLhIL7NcicEeD?y#z1ZwmPWdmReoxEo*#r
zrfJgELRhVY&b1@;I`dxr@W&06D$NvV(=1Z_?ghJ_&4b(|Y@NMT<8b}9q=v%8yxZ%}
zq=s;CBCcY9M~}4XEX16<G##zDRRs#>WUnt&TuFkHe?M#F!<<7dLO4{~H&z=QqPP}g
ztb{woZXB);5IbxR-Sd8A`iwoHd96M{-wPh9pGh8)-8bG?aG7oPzgKzG9dKw`4IC8L
z<C%$N5ZErI_Y&!F54UmRG&L@Udg0qofrGx<H$gneZFLege-PN)L4!U}*8Sku0kEKA
ze=p2t02FA+|HTjTLHa;3ouHZCzYV#$E#L)v%K&yg2eMMIrJ2ZX&0ZN6q_brU12XOI
zz;C{Q04a8NAU22jzm#>qQQG^VHY<ZY2tz!qb-(4^SWG~!FLZC9tT%x_Y;?bY*<V0{
zF2Ej~TAJ^+1=eo@yx{HKz#nJ=+EAODz#eS3-r4N^kehQLK*rr!Frc|^ACzW4#C6fF
zY}9qut#>4QI~Wi%*u#>4#>f1rd`q)Fy-l+@gqxs!6Sy0<JrH620nF`7vwC+2YP0me
zcs>o_H&1~-Kp&DRLV^&sKwzMTf6kJ?fVyBns$0HT&3?%dYZx`#*~shq|H4^<cre@Y
zg=_9YTK|lQ$G!`G{V?DKn1yOVe27zDI$2y#w`Bmn{?`2_xkU^PN(p%3u>Y`X-q?n7
z<Jl69h9O23FgUn+V`~W52<;N?17yCj?Ypp6wT<tt2nq<a`*jzwr#NuoMGOpPq8!-w
z8_~wVSkwB}e53opQZ=><A0ie92UDb`RD8fGB_$;gdf-44HjsoFHLMj3&^-D@gZT?t
zH>z+b$dKv4!E4k~6B%%qNbq@E5xIYdiRf2Rd7I4Y>4HF~t?Tc*>hEX3?ewTpxkmE+
zyPw2<52e}PcL%<6az}_(RnsAr84CC3t{BCxRkU>Ex)TnZE()AvN1fVETt>5VF@^Gs
zzNq=^qd4Tq!4L+Rj8<6@Q;a_KV?{{5@!k06%6z4y>>jy(1_VglnEqWcwG{bt$VH#V
z2R>P5VIcTjrUboBr2}RwRwXPUUs5efFVCEqR<n!>>eNNNSg$%J+Dl-csrUdVJ}T;$
z?lkJktPPUhqxTm1q>@-On%xOdZF|1mnG#F+MF7Q))VH?yFxhYS8f&-NTUo4=v-GKy
zTYYXe?;BM=Sl>0vQ;KXUe^-hJqO<Xg+%fUQ{@B*!`OLZyW2ypGP<rzr_fHt-a1q(;
z2%%i|Dyrw$!d09{Nl%{>jjJY|*8#OInV0qSDU9hmLGkAM%|ou#HL89Rg1MqsW7?cQ
zPcq<okbfec)?01y8dU<Ops^nHz_9f>DJ#FL=4@Yjko!;+LR~pOpqYswifdLJ*y=BZ
zxgv_?!W6-ZBR2QX(=%lOL5PxHQu@!eN|-V6Z(cZaR#Kk1%7P=ymKRcK&Z89Z5C_OH
zh>JSVl_@b1qrQzw8`r2<3euYy-uo&HF?6L;jn~B*Z~y{q^KhyTuFcgHIQpG~g)}Cg
zwGfIj&53IH*S^IBwH~;IkZUJNisjQ|jnN?o;><_i6)p8I_6r4c5x<JE8~ZjLJcwC&
znxj&7v<}$(w0)3h;PsZ$un|o;c(8BqU|5>r9rbB$zU-(FM2#pbPNJX8DC1$Kt(2yV
z<`z`-Cs6v`qCF6RImcLRfc`+9UQr85u;=v?xq*H$q6p_vQ7!y?aT5OU<s0U&Jwg03
z6n$h5@@%c2fPE^@dgg%!oM?f?CE=YYcjhZ?z0rW)R{Cj1=fk=600o^Rrt^?07_IR%
zglfvf1QYNBg__i(Nv?%ma`BtCF@_C?{Uj{B@e3t!7h(_5ev9RF;gb54vMzsJM3XyM
z=-(>LSU=}-0ZxyM$YLR6+=%Xk(eQFe%`IO-RKHS*Mfmn@Pg$}$4xmC__VOnYS8!?W
zq1E>udX1i?Bdv1a)myNYaNxmNzUOxi%OKUnl`-7Dlu+aegIW-tbs(wz;PkJhFZ=fv
z4AD8s^S;N?8=0}O5#AK$(=vN;)KmPW5lH=YSkbHK^5>n+c*P4tEo%>bm+@$!{`O?4
zojT&@G3hbqa6LyvILKOE5QS`S`Hl{gfK98rQY%lJy(BHKX41r}_6|j_?4fGY&uL}C
zbmK81Das|?VB)rI`{LD(H@S^O%kQB&8Z-HO)nNgV&rYiePn!6UB7-R($DGVq#3_Fk
zldILAlvCX%b9BCkLZ`#Ya}4)ZT!0EdcICre8HarXWe(8j<(Jk<%qEyxeb^xV=*Nit
zx!cx{%J}rynKvt@y-^y>MU+ESWAtFhj_O5?F2RxYT{9SK16_?Zi{>j?jGl(3HgZh~
zOiM61nU++rE({Xs?Z*#1?KQY`lscX-0WLCq0WPn^i*XI8;AD9Cp*J*!6xs8DP@x=1
z(dMN>t}m&3an*7D2PkGt@C4hc10)hgyvaB%Ls~KdwXa>MLC@cizPeick!Fs#zl-aA
ze$F>-JyP7RWFW0#i$psOYUtW|k(d7HZuC0pbS`ec*m<}j(rsF}aY_yF^kuqfc^*Ew
z3tB^XKnNEKD|5rRE>Ze$xS*{d&i#n&I2DNS>Ge8uTTQTDcYrQ2KKhVx;swnFo-O^%
zkt$u1Bl-Y`Ys&LhEt_SEXjKvp6Wm7MdlsD^4vccaZBw>#{E>46L6~(R-Su_Q^`v0c
zQb@^d#Np_4!CCd8Kw$hL3!T^CrT)lo+*O!vi*R;Q<>l}TlkrCn6}GuhW0FP3F9`-1
zmrFTjhe~aX7%QvPM(Rl*6+(|sfr=8VmO?HHoW}Qaqq@}Ot$1cL12eYs#?<d^u@|G}
zOj<l$eUxV5+O{*<%RsvZZF3Mv>mx`SaB7jt3IDt@k9*}%F+;5R>#6NWgs-U8fB+K9
z$!AYfyGno-{HR)@3sfqFEUsd$O}#kmtW;a1t%kX`Sa;L!8Ttd~+0>A4L(q}@PD8Ud
zJV_xORq1k>CrWERoKYE*g?5)Oe1Qwrw?UoYtes<A23K<yNWVY(VO((Bhx0MH<9%_a
zYvsdI=$SKcsJi6*{2MbSwCnG`K?Oqn?OD2Y7rvMFgSIny)sjqiH`QNTS%7n<&J$l#
z`Brn;o?g4u<3vc*xnGtVp5Q%LaS~qF<|5|sZb_Mq#xlVWXJbj#Z(b^f4&g(M;2d5T
zfP+PHr6ccj=DIAgtEskzB0tjp>#|Izr;<}CT<7FG(KO{RTpB?!qd{Aw8-pMxhLQna
z)J=Z&kFY^#`Gb3piQi1S<hnogCRfR>78O{|>bWsKT!|U@3(fVvaj$*8!aOotE52hv
zbf@k5Q*WZC&xOHCx%WZu8H#`J4tbeO_{I4ZTl6P#;HFK>x$uCX6H8akG?-Zd0lF-^
zXC(0f3zOK6l3Rlp<Clh%4Na}_8)gF%uW8`{KyUWd)NM)~#XAnf&2rsA$&+{m;T7lj
zoX{(Oh(!vnV>&sy`FA1{c9Yi-kX(OOI%`rD{;_pi_!2#}*l<n?AnftC%daKF8eE(R
zEQXi%RCP0}8$E?e>k=>Aj8NfCK&UXUka?$-f|oDhsSC{M#UpMKVxt#b8o$a%gn+T@
zZ2_gK+E<Zno&Yw8CqINcgG3*#u_xSahuabJXk(7zoKb(hi;CywVD3&5Xyc(N3?eU^
z2Xj>eX<kX^4hqC#LC97%mA*&b6JhBafBJ;_hVy;Mze7j7c7XiOw{J`%haV2X&v}7Y
z^~i(J1lB^nn2*&~gk5sZbdQI>n4mw5z&$IM2eWAml-EGavp1+R*eRtx3tSi0$xIbE
zwUXpp!GP-z*HLh-Nwi}l+=ti<V{XC2T~hImv|I2Gw{j_PI~0(nrc6vhZFq|SfKWnq
zR4A%XY|SD2;Ht*_v+$U3B*Z&WY=nXGC5k*gVFp#ldUmFGiKgo3&F_4F;*LmbwELrF
z=0o1meRHbycIb)qKlih*f?rK*8QsqkYVDI%S`x0jiC$Z!i7G(5N<zZaSK+*Ft$>8x
zb@R+SleyfL6*`YO^q2v{E!RcI?DY%BSHh}TiYiT6yc^&1=0fRpag<4p5kry@YndH4
zu+Dq%C)^Y_<SVb>SNW?TU-Ni(co_pIK{9Rrhc$P2w5}ko%`sWn?)`N|r{|*2t&6Ie
zthFg@*K?@h$*iS*L#O?HwD}KES56YEnY-l2eo5sa0zB`#!H4a^WP6AiuAl_2Aq#FP
zN(1x21N#?&ulrS~a{OBYr{M5QV8YK1J8r_q8DnXu@LYvnC86baxDzk_gG7m)+rc?}
zEt^d7db!e_%4}ke?Y_l{2?k1@EfQ?|mr_(VlS@=U{6Q;$p#v+jM-%_P$0p{<xC^ip
z7~HeJgasajQ9m_Dn3WO~TFL{IgOKVqT9oIyDO{Bu+lGBu=?pE_8*?F%ee-(^vP`N1
zX$+cF1r-{n?nXU`V_k>#cL>SaEUDUlQsoFUtz~i>z64zx2pqB=d>#E>ifB7EIVH=#
z`<6*#8}wO1N3Fb+YTd`=V<;TxI8t|+V~E!T<$Kwi!l~L^#etC{;41L@xzM`I1<^wU
z>*E7B?WMp!$Z^h7csi{lBBXSVb&mDNs>-s8P25Y|E2yQO#6sA}_MGvY@nHMIjq=7)
zc)|B~mQzbX;1d!0kP)_X=b3lf_haQ#9Ib};&UZ51DgYPmn$bAtLCs5~R6*Q17dAn}
z3Zzs-O`_n>dPBGRp-1LH#xt_rF8rptF#Rsqu;r8u_1F+^O%pPbYX*soL)6F9hP5~5
zN8x!_SW8I6dJ407y~3#U39|@Sj`c4Fe|<=vSQhX6<c!_;P(6B3*^av%%kSvcR2ot)
z%!NJFzhZ`qLI}k@u-v%boQ_+)H+cB_^m?y)hi(`Vv-*wOB2OYntpxRG2HMqCVdl^a
zO-c2}T|(S{<H3Fxc**uq@M6N1G6H9Yn>5`);8ORYU-0>6SKt|bVyEJhdU9A2Dh&e^
zfAU}LN^pr&a!Iw^Vz3kqXpHbLgWEKyhd1@l77mACX6BQy(NdmS`#SAC!xK-fr3;7W
z4wsDI3casnrcXAGTy*qqRlbGAC&pR+S?93(CPy9Fipdo-w5Q4lbpc(MMBq<z1jwtj
z6UVg4W?cN6u+m+^*URpml#(};g)T8ssISB+=PZvXnt2kXitfE-rJX63y;$#G7P>J)
zi$en_UhzjQPCoD!3aeO-tq?vxx17+~0!1OK(@TkMs_|a|qP!w+Q@NyUO1wdiWMhYk
zF{Pd4r}1i-5`FQmiQlQL<ey9ZU>9CWd;=|yN}>4Zc;(L@N;?@&OA9kf$r51_l`Q=N
zPxwnVB{=g}=fhOtroL^ZArPtqa=F}7KfmF9X}40O<Ot-zo1FEJ4`yFf#FLArH7#0i
z6^=cUos!-S7UzbU{(M)_7w5Eg)j@*h;;+b2Z2l8R_@_vPx<>!%m2`pT`WYx0Frh@j
zH%gjP`}^#MZMd_%jX~8F=OmyOb}V!(`zycNy_k0E*#_HDMdU5#278B*=gsZ?arpfl
zS>JK4Ip0wlind}{`JX<V;y$xKeN5)0`BVPhX5CC?Kh}|k&0x-~VXUnNsRqqL%@-$w
z-^PQP$Af()gI~>z#>Y7jyzQv1D+%v4P;}|TDw2$s^rLxHqDufmfe<-g!-Nw7+4~tG
zST@+NR@g^5(E5|Ta=eJuX5fnqmqLj2s*=t5jS!D?TNqfmrABT8nsh&kv8rbfroRU`
zU`=0GlOSwONS$RMw~T|NWOJ?41vy?==PBxPGNRnM2-+u!#lf@Cr}5Ize@W(c!QJ8n
zbdqoJLIA==XwV<E_81U$q@j4|delwp9c`#~)T!L7f&m&v)>K;>otpclfwq51+vxhc
z{|aIDuh3n7gU<fjt&U|~bK=-gh3~8}RRJm;Y(6o$6JPKu%PA+W@U6tR|0@dMd@Y0N
z{I0GJIrUfjdmZ*iU?+ZmZ@Ld>m?fI9Rks_mbpcExE37MPF+B8h79=pW&U~`K>3+(?
z2<4XlP!aQzAGS3sqTIxGV|`igk{?H49J<S?#&RkII3997Az7Y-NHpb?_iel^2lnh{
zG0%U>qdLXIpBwd^AGMLquD!7k`yPP!QWaugnb3f`5V*8zZaLQwPS9{!q|;s2!2#qX
zaX$>|e9E;G+G8VeOhav%2qQiWN_n!A<Ih5EcInoK{rC$B;)|?;yl}~Fu$9*Ti{f;G
zvPe`B1XvPHcBzhmW>@)Pj)=yOGu>JP=BQI`*W-jpIt5+5291e&8uYa~%5z!`we=Ld
zjo4Kab*)@j??X>;aH)^$6ulUyHyc|@m9#9RKAN$=IYf&B=XZ1G<*Qhvm5B9E(j065
zEUs>5d}15-TEqJ7BA9MVe<Xa;Ihf%t^s7$vTdu{?tEk+Tnx?Bwso|z8f~YWp8W2~u
z?W;D$k<F|Ax0uj^xS!(n?7tsz&LeCiK)-~riGC6P7BidSE;!7O6}>$n2a+$(kuSfI
zmp??b;%wBwaaF^4Gm2U3)%(rlN#b_Fu^B*p=-tlbmnjPU>Y@#Vz)vS_q8=`Xw{o7V
zQ=~~}X@ob<0P8xwHX7QACG5iWX0kQ#KHU+r1WI$>c0P^_4B>Q9>m1^I{9c+U$Gf(z
zw6L{|{&lZEAr?J>%6)-xmuEJ;;9dJ<&Hh@3_uc??<stiXWSxrKPJ6Zk>b=cmE?!Wc
z80$QaYHA0lF7Mk2b*+8fmMk)cv<XyOgJ@|gx7A*%)vmv=!n5=!H!a*(8Do_NAX+y<
zzt*<{9X(2oOU*4x&j4}`-WJ>o@P9Az@o$-+K}9dgLN&L;vjy^V^M0Y0I?T!Mzb$oe
zbPf9|!V4-~=534cYpStoZ6(isD&}=(>uy6<gqv1WA8T~mNUqx!HE#?e{<MM2vT?DI
zFxAbsu_4G8U5n<5!>L!jpW&Ln|GDOCrf(CrDq%41T7S-SmubkWxyEmE(V%ZZU>By}
z7`8@nuI03b-nD9IcmC_XZMDbmCFs2G{POKS=v;cO$B+L<ebB`{paF0UmP15E^qpuX
zx-xo!=#-E2Bl`1!2_KprzZ4&ei^w|>vvd1qfYyRT=dLDEtTODrP*%VsUe;xh($*Q&
z<RoZP;!r;eG7Hre#m%?k<_C?D9nGan_OSpE{>jw{#I~gys#RNVsqOrk#Dy`mjAZab
zw&m^GJkyvJ4_&U>vlY{Di?JVLW4SM;)itKE=e03UhL$O1Wrbyb%NokctXyz}g-!J{
z+8SNX<DA-v&sTviC8t_TvNL>ZRM$gH^cW}4JQ2ka&YgtyjIcIi<_uN(C|-Ke>z2Gb
zFV~&>YsrYsV<h@YtJ=}-ZG^4b(G70Ax1F#0GhT+gTZ38*xIyRrCq@-DNvskH%N+=s
zNYBxtYc(A;cKs+r*-@&UXc*3e22Fz<@|-K?XM%r)!wnZAPOn(#-3P`>{<vdT72{vA
zp%6q@MFwR*Zd{qXcJkb#ILHVH1zuafY7uhuPYsflJ`V6K7TWd?fM#v&XBpdb+Zwz~
zvDMw|9yT^)9cUa^K|@Zo$G){*994&(?U7w`KvK>ZQXEGx0D6h!wm^4X^t{#{A!EtI
z-^%4^+IznhLri1+Dsc6#s!JaBZ-rP5*U?XvOmgUhxis3X?hsD3uN+WM;qMdGi-WLO
ziM&Jxi49?wk<I`(b!HC4ojRFeerlOvz`(2{oqO6ESRaGT;E%xv?#^AEqON{GzRP3A
z+gQDlFL7lB5<|D|tyVL|dVpZbL9Pq^jgRWccbZAR^MD*nAhvP3I*1|gh_S)*`vh}J
zMG`-T+SFx-21MQ4>&*%j*TpN6f;X|M;ps${M@8}hkJ2qAl%S(8Hp++e+)wVLr*SCX
zYu)&FG#&VE4Lnc6OGTkj5~a&I0$(F5{S~}x^>}YuN``W5B;PLx+F$>^?JN()!wWl&
z<We{__`jlJepYxmUwr(f5qck(+;8{u%w=!cqQ~nn{SuS~#+(hQJW{9;$t$(k&3xw(
zdXUQ=BET<d7b;x@ELiG2=27`k9?!ER=5Ixfo&iO-0xMh$B`KQkPVJ28Xpml?Q`jR6
zPODIC%I->Fuh@;?H>H=!0vOnHF&f{6w*PvJjCETa5crL@EBR#|!gpe-o$;r3R&+kM
z(XlfJtel}RL;1x>$63s!`A`obA0Lg1lMe}wt14;wdic=c^KO(^?Sa4tth-M|ZY{2s
z823RIhtw=F+U=FW*&>^pj!F^n3;Zgb$jw!gq0#G&`*<@gnGKZ_9q<dGNaD7(EMDE(
z+=DD+C4<zJO=@$<xpJ!~PmC-myh`=HSYKXG+v8Q$N-liA0`gU2{dd}Z+%NdqYU3_e
z0tRY4<dvP*s0wPcJgmUeyBJ+vNAq_wwQQ3Ccx*if0q*wqk|gOU#&#}~s<V>>E1zW-
zGpP#Jkw6v4yFr(~LL)ieinX#oW*d$ZD}Ylk7@pxpG=LNsCxQJz4O)Jp5X~~OCwM_o
zNxhNRWlP$T;Uosr0jvBOuG(q3;$!$^66tS|ac>Fb{;%o+R@wbt%a;0HE&|2m*|EE3
zCq$T50Tvdqy0>swMNBD=<uI*19pd~9!Z<+_DP|}&;kesL7fwf9%;*{eMc>G*#k8S4
z+4>5#8z8<ClGOt9GFgW+cWQWYyn>CmF)~%4(CP)G3Km{y@jp1Yoy2aFcYx$qT)!_X
z7Ba&MUo+hV;EBomi+;uFFkr{e!kbOz>LZ^dIVYZZw_~fI#8ZZX?<YbJ)L(sM=l+1%
zV<&PlkY!TBSn7b!*SoSn@HJXWHFrE=jJEUMG<lR`v4iet@EWPj>+3xTvd*(XM!amY
zg^DidouUk;)icmzUNx0D#iSp*t)ZhG;AzLID|V9o*^w$dfK4XW?m}S7C*e@Kx0_?k
zCZxPotJQ0is2QQHZ-o8XPmoymY`1RlV1)_ra{e56%@)QG{qk807poU$slPmZiWbZ6
zvD=7^Qz09wq$&Nk#CsNM-(H7<*>(~~hk|Ry-I$n@M2FPG6Ck;=*F?RKgC<&GfWAE}
zjEf}4MV)zq&%^`eNnL4@yyFO2hd&YU+?+xtEEk{1^!vd@jxkyhKjm&$eJ^667pJJc
za7oZ;8|Nat=)9nS&P%uNu143FPl(vC=oOjb3goHrr^TsIQ`RSQAoKf91*L3Oj`|&~
zZetoZ4p+QZ0u2$B18tT>w6hdrXX2qA_Js^>XQBaOj38aRsKM(4W}QbtFZsEembWrP
zRgneFu$o+=rbz9gdM%X&=SfAg^*7C8rUhPYwj3vFSU1;-IK8=S3g$K;%K_b&lP^;<
z+oDfW=rM)67Wjq(A~UsqUu3lX$R(x$)r-EjokeE-PG)eY7qWX}BOcLG^S`mmmy=`Y
zN==8H>5$1D#w&ja*mj9<eH#aIDDd>)G_6htH@hF>FPn5)S=}8RX`Oel9foVZc*+~^
zSdL51R@9o-n5}F%oUm->DK*M7Op0w;r}7YBX{gC%D#krM?j^er#5jAEw-lw8y&9<f
z{aK#_Zn|_@fNkfhtCKFiV))2dLLl5r$5y8esrsc5%Z1Ecfj>khv)*XnOCs#GgFN(r
zVV-ae{>GyGItqLaQ-}}!Z}DDF`2ox9jT%~D(rn_&xg>p%MjOHl-L=8yO4JUYCJCLv
zMG;;Wmt0-#dCCQ>X(;Vfy*1s9r~#$MCJhBq@h(~1hzzLqVkvYaFrE76PX4~SBpW{V
za-CTXAt{5mqJS&~CiXETe8grS6gQKRa_U)~O5zB>sWK&~Hq!$>x#O$RZRoI_a<~&z
zwujuWOF+ZKN*0zLu-5bQdB{cuZR;l5tXfM!R;5^(ITtndq~OQ0%eGDniDZ3XOU~<{
zqQ6G{$aUt2f&nip1(H5JMg7Q~j_0HtCpX3(?}p_lpO>~TwU&Zfr!O&&L$nWUT-1cL
zjkdgsg{q2{6~At)FLfGX)^!A-Tp%{p(iC4<WrEA<&(_dIEXC030W}nW=C@Mop4m`=
zk&OPJKMtsl>^iiyc;pmbs)uxaiFx1PCKYOKM$JkD67Xxy)f}+2(`7!lBcgPoVyV^<
zyHBpN&&aRv2`?e8ycXJ5F4^6!x>=s|i$-?Ho;y8^J#4dkSui5sJmAbprbWKm7Cm;B
zTzf`4Fi7XqCrM<{NJzjzKxWBS8gki)&nYoX@5WmF8A9pN`M&Ur7NF^z++oc%a>MZM
zYxn1SC0<K9m6dy@$v9`(S55PRc;m_rrJ9`*-Y|=azgX8<qnZcP{b#XjU#29}gBKy|
zvy<&n>!fm~0-hjdc5r}F+g$<V(&r7g1(WEgYuDs8FQDz}7KWY1@1+|3;CN%-u)A$a
z5(Q#S=kaQ%y>$jk8#n-Ff8gWG!cjU{<J$#c_tlEni3|^WnJZqIzv^JP=|3#9?3=xd
z61Ob|m#=ewy%+UWGOkK5eN^WgJE(=-CpcP9vEfav|Cx4d+Qq435^<ybhCN9chF}s;
zK04@Wa)!lG@vWF1zV>i)87iD?G(c@>oOwiC7Up-Ov2&A}=$FfwIUO~oLCO)f9e=zp
zz*JMN^m%inrF<=YMY^ujJonKK$9$8t(Y%mK$#sn!l*rf|`OV+IHpL85^h@V?0g1Hl
zZn|aBh2dW4(<%z7aKc_XI-!1JkEJ5r$u~bVV&$_~9nz_sY&rR95OiFr@5k*bsu}J)
zeGA*W)W?(9rp!WJhmD}yY3aT2_HW1zM-|3@ttoTx^apdga)ddy@K^6#Q}V5tAICi?
z6(uD0y5`q<w=khbeASPWWq&vD2#Q2LE`iov$)(c1QZxY-e0)Aapm$ozET)1?i!Gs(
zV1SETx^Yu{&om0~_fDu+*WAQ^h&Jtjzhg+wu0FI=D;rXzx;-nW>fqRLVS72Amrm@{
z;Xl+0cZ|f;pkq>Zsbr+k9}g@R%4mj6{;J_m{7&w5&(sFkqxXF$-lZVm49Fb+d{>p5
z+<cjhz2Q`2B^lqMDd9B^JpO%5VS<2`rwU9F`;Vwq=;*GC)Dy$n$fKJ~5LedUa`$iF
zW*}~;hvxaf)yY=(5U9-}Q86>giqOWj5u*<U)W5_(b;rJj{-D;0Rp+GmIVMwwz8@aK
z{gWT(*Qzkp=&qD0oT8DGR(3xeeqBzVw*-Ep?w`jqmv)CQctpvwlX@d@Gw?cH8S@r0
z<YuN?D;rISA)6fa18pDU>v~Zkdn>3PQtIGV@k`DxG}Aj6iRh==dgrmmsv<3xfR&rV
z?wjz9J&&iHpt8u9++i?zUMg%ttSOGh49_p)W)mLfp?3-uK+(0yYl%rMm);nCRkM#m
ztsUNPBx<c~v>X9nhLv7VOrvV?-+eLobJ!1f)Vuc3On7N_@sf<gxyj0>IykPp$l64=
zy{4}e-tkOU8#N~jNK@qEC5fSzNcx!X3?u?e>NF%+XJ@H}U%mj1%n{PjJV%0?gdMN(
z93UPFH!^N6Q<fQ{Sl8;xQTVmr@vfR~+`eJYi}CF}AE%LK>3MPNFF85g*8`bk>U<8O
zCbpQ{R~G{Wn0d)~5;wEFl&n^4h&f(7R!t5Kn8P)M8}`gacLa;AI+Wud7UMmce<Uj2
zFRGCtao;NqM|Cb0np}o;=#p1#{Xi*_W8<cdIPD6`cSU<jv}w#;sc?M=ZX#UxrSZ;B
znc?It!fU#jq1<8&0X?{<{flS8ePwpLp-9t;z^UUQ=j_6bxMpJ5Oz?HSJZFXZ$~KH=
zdp9K~=VpD8K=IHALd>|Ki=v}~`h12T%fgHwdAMWmH%@`~xAq0f0~BSpXBV@NL}3#@
zc2S9VorX{gW2n+;ex$vH#)p_|M{%sFez+(<b=^Hv2dh09V*Pez&XF_z<$m?;UJBH`
zvyPZipyXE`wT>ipus`ai2#8f-F@F4bFVO_K3~q&rjTi@|XIguO_#c}d2X;;@S{@3-
zp}x9h)8VJ;PhnBR2a)T_X245#FJMbx-I;c#zD~iSz$w%spY9v|pTcqFfv2ai!LBl<
zN?%U9*F$Wf5VEq}D&^dLR&XlC&IJom*|Iq9_wk+W$PnhX7`4q?&4liHrT7XTWAL$h
zN{8@L+|;aM9zIf?7&X5HXsU}gJ`Q;c23yfrR}fr8SwrMv?v>B&I2p{c#z*E9&3yYd
zJm$|6&0Oo3KLXEp1}9Zn%eAC!48sN3drMTz<gKg1PLo3_aAhZBf+-D6XFeJx+cb~6
zE8&Ho?cA(PPC2u+FWUEg0>MTH(j3-32OW=wJB2l^dgK7RD>012yi?b;jCTz3IauKR
zT^Q141wJ5}6nMm(=QGP|EE;}_w)|h~Hm|u0bVvhSn}Km%p=KWQ+Id!v2sir)>|>+a
zmNea`2{me&Xr@$DK7w-7(lmJt%=x_h=U3D?*dO}uSE^=R{W?ZLQ<@^Di6f)_bdFzn
z`>0Q>Da|Q`JC4Q%jAf6Zts3Kl2L0M7=d7ayQjG~LvtyY)OmX6<?BDk%#h)mS4!eN;
zd$O-Y98xBDJ1yZ~UQ-ln*MCn<BntGGW^U<cBgPRWL^G>frS6~d$Zs1jvP*eHB$|%~
zjyycVGN#Qi$u(Z*=d2pm5T>%J#q66%hMiLkbiqd`$<Wnl3aYz`(I05@CkjNPu)kQC
z&QIp>Ao7;*j7F5dIFi#RuvBmgzidvPo+U0$>8ub+4?9E{C+x=VQVq3Deld@@K{*VX
zgq$><bj#AbHS<aGEzX_~yM22`7p&+i08BFzw5l4dTb{8`HbYdFlr3>?;X4X~_>TAv
z`1U=ATzXsvi0tiLa~yM=0M39rD1rTK&#BzQ;HGi@Bf;%CpZ!iVpe3NoF6P1khz_I$
z4!wteV1E#QV7zm`bs>I(wuKkK<-v64XR%#OvzizhXFn+V!Lv+wh6qCLG$_Qm!zN<j
zQ@sUWti?l_$h!hSIuZvv0~|a12`3XKNmz<iExxh!Jw{&P9k2;mc_+6-+2I3Ch<9}d
zn^Kn^e_df5uruM}qypW6?m5u?Rh6lg%+17RMU^S~G%HA#S7c=@cI->FIyYqpn%Y?{
z!1XC?sIs7iav>gOo)|`?ca}%-MKl2nfj;~o^B{BW`XhcxpkYMs`S!ln08zOff90DX
zri0iE?Bgi?s_Y*t;n_)+l=u2~j+-O9BRjUL_sVysqg1PLXrj|dmvIgd2gpQpmuZ(t
z!^E1su_iW-Bfflj*#fDy`U-iMpuC^w2jLI(D4Iwbk*m~G9Bcd!Xnd{>YgXN51*evl
z%%lwZaV+a(kA?P8x<DNj<GP?`ElM6Lo{;Y_V}YjSbnZ^}SY>9M<Ga)A^g)R2egp>Q
z8Zf63@5;?xCaU(^^*DWNW*g{A8Y4$ra5VH8^cgd=<@~;QlR==QgL8u>59yhSgW_UE
z_NDJ2<Nfh{?-8GI?@_N2@7BlSgKfNzxmVjew+Zu;oG*2ml>oK_!F{i6R;QYGw08q2
zJ=Bk)uj{hSG~f>mTb<C&c95VL`j4=q5AbJYFTsPDX+M~^k8e*{lOd|`O!(ac=G~GM
z&C761`CCT(&5!K^1BZ-ELUs<@hWHFp@4mka9+#fKz8mcMyz(RF=fpggU#as#XbfbM
zTxz(M<6bH5Dh4`?1YRkEe}XGUPKd=}!`vjIu@-jU9Rs{*_l@n*{EWWubALk0dN^}D
zdcKRYGvgjc-L#u-$evy3Qfz9zEfRf{kFzj&X0uBB*rfsKZCPWK{5D_P(#M|dg1H{u
z9sm!(Fp(>EpN7uW7rHsUs_WNrW{PlI@9>r(mWP+rm-X92NuczR7qQRK%)`U{gVk+^
ze<#k2Ti`QO-UZ3@!<T1+Kb^o_=BQ51X}9=iAt@m0v>Sp?l^W1)<^lit9o?r&9cX&n
z5zxs!^B_KR7z|6WjX!LoG&7N(CFaGndQ<X-Q#os2;pXb@JHs{Oi+j#jkCTgh>d=8y
z<_WdvRHki#(&GtY&^GZ!U#zoOJU>YJ`|d|^NK7D!C3UrtwvvXj-*y^Je_FPxk*l&c
zt5)$#W=tMjv_iESj*+n><hq)f?)Nt;GRrGfC{c7#Nn;}<sgK@ZYHZc)B7c?VT)5c>
z`2gxK>LiDoS(_Wkrp5<39W;lZzwS-Itd6=2g}+_3&#X?uC<a;h>^Ma2YujkYB(c6k
z$276NkjK`AKnXsQV}vvzvbiDg*##Lpk!RULpco(QaZ{W@;4MF!euM<m6x5_x;S-++
z&M~iyCV2<iag+?R<g;L!5bfMGgS+wxqf82ER){n0Y(%U<$gN}Hm;|4gUC1G{`$10~
ze)hm+JKPk4yTKRYlua{}S$rpqjx(l$hE8X?m?xd1^JxGp_gvXDAgEL6=<jCUP_-p{
z)VWjDmtCbuzkc^FK~V1_O{8Dr(1s@mze)6uu=A-Z>4#eUxl4}a9J?y|kSq=w_sLfC
zE8;v}De4F|^E&=@(=#PN>-2$GL?|{SBR2kD>5NFV)yS5Kf%VOybw}1F##CMKgT{r*
z&v)J&%H7Hj7Yed=u>MN(hfWI-&qKXHRtrPD&{j7EWWnA`|6qpnYBTX;;%%cmtRt&e
zrXp}Mbi-p`k-4Gg8uf{dy8n*Ih_Z_N(>QMcQPEUdrMRF(y`xL%47W1A0hfDqcNaIO
zyLm*|^+GHQHC6Vp6YI3M75FvRG_{XXu4o^mb4q3>RB`EJI1&9fKdA<|s_C@8%a2js
za8wyoJA}%EL5NZbKM7@@4QtNE6SAcMTMU;e-A$XESrG3e;fNAuPb{K%n89CRfhmc&
zu2~+|ftPr`W@jo@k(aqF;HP*u_j+P!08^~ws8mX18J2{X|JGYIxlXf;(PIF2AN1oe
zP!RD<pqd2ME6#))si%@8(1$uW3+3Ku+z-KX8}GIk>B8L;yW{fbH*7)khrrP#_kNKh
z{3R=L7>FeVddN&~`#*toP?>344A6(H_6U@Rg?mu?PL!~9_8`^S<8r=V=?w^c=HF(k
z%D<f)<^iUEA9EK3GW|XrXvy?S`sIx9Z1H%yC2agsmiY9oYETXGHR_Uk<=xVhzCpxp
zflGzp)>Y%{t<N-nu3O+7bjRAFRigDtz-AeiYEDg@uX$OpuL5npa4sOw7w;MC$RO;G
zPig&(Ohc+v0Q+jmEnq)aV)yHyC7$;_8c5uJsLzLc9e$RGdE<%<)MroAn+5g2bF7pI
z>PK@UT6eII3Gga+9+Gv-biT1Wo_ReUS~sNnI%hw=n~p)7=QK3e`jG;=u%j$>f1-X#
z%XRfW3mT|26}X_YX*$;@?VxR^Z?F?<mt|V7J5I2%i;lwxB{<P9{lFR|7`Ygkf3dd9
zyG0o~IY0b>(o50Jw}bEF^dOqYUDKuO=<BZdX544r^x5&`AzIvJ)aCY%<gAyn%tWKS
z-N}!M!1fUx-e#&sH|hRJmUVxeHu|^r#UbZ{9K1MS9h{}fpP>(upp#>CuMV@bJ5T*G
z2M+$sY@r%v>&7~qSfWsC%G$m-sx+H~71y-$SnW&-DpXfYsvEv5)!e3Fiv88>g2b)t
z0*(=xHWUi+mpMPF9u)Jgx{p<qKczark1Sr~pD9OnyL4|D+L9l$ya$(Bu8j%8yc!?T
z=1(ZvCT&kd5KHdKybbaStd(q>wZAQfTTSls#~a72tz?qPPNfFyL<R&)noTv=sW#oJ
zK75`)pNkR^iUO;0NGmcv-pM?;0}r7us4u1b4-?vRo#IxospLn#wEJW82p29-9EIz4
zw{be6wjsB#^@!W7+*W6SPz=(nLvL$)l6XxX_}(ESp7=455ln4OoSYp^4Q>8|c1D)S
z2&^3Jq%5TWL0wW7T~aPi9(__$c3o07HkMDo!Nd9qSvWr-Co7vSDF^RADG$#l<mBY|
z|BlZoUQV8WMz}vAD?95aX8+s?^AB@>F5zMS4|DKx>5_7D{HMdi{z<^a_K$#-hn?e7
z&i0=U4?Fj#ocDiW-p{q1tpDk7aDGy=@&1Q7KjmDkZ2w`dPdn_a|6`Nu(|=CR|0Vy_
z|Kug*<mUKKkNcCGll|Wu8w=~dfLXZy2Y=e)Wc|m-#=`!&hJ)*$Pi(AQ|9s;4PtMBo
zkB|Ew2OHbJ#Bg!_XNQOD-&$_o|G)81mxudv{(s_PXJPq=|BHp4h3%7{lau{3hJU`X
zv#@{q#{R$NI6mX&;P{tqb{5W0E>2!nQZ9D({}nqs3-3REj(@(hv-5uHe&+LkkAE@_
zmVbW#m*Y?T-#qW<@xQ#WbNm+{2k+<E{EwG|{nICo|KphVGk$K)|G2r>KG(9d{^R+~
z$mcm^<7NL3bA9^C!OHn>=#%P`{-0MA$N#>f1O%9+EUf<@*4{Zdv*>9TjWe-r+nCt4
z?M!S;%!!>$Y}<D7#<u;&wkJCI)xF>OF6z|1f1IkWRlR%FUaPD2Q(e0k`f)XLW|FWq
zb~O_-Gj;f7#w2HEZ{ceBA3O;NAi(|?AU(2tljP$vnUO=U-(iVb!!TBdITJ{W5Flv6
z{L0pHDhPjY(Wrorl7zj#Wq7V_1t$y1%$m-4Y^SrJnRoiEaDv16x7Dm~1QKMnxINA5
z>zl3h<z#Ro|6P*jkQ4h_YQG4Y<-K-D?aOh$tcP2+!Tfy4OzqoRU69=(xJV^_zp_5h
zcpA*{GxMH#v)TD-wAetThn-JadOAV+r}MNk-e^YB&VOy)y93{9aeZ%m>vhh6Hi&Oh
zQPYyzQ&mN`k%+LI;IGoc_?`&WQf={;xU&0V%-G%TKSc9(xkE}C?fK8b)t~KPF4Od}
z^*b!hGB467L&*q1T8fjm=0!{4kYWTH2!TP!Qbf4IM@GQA(ngMu2^V?7CKsKlI`ff|
zWRcM@%)ez#(o;;6NT>>ZH*};40mugO(73Y)sR7Q&6f+z$`Hg1z5(!E{1!wQVWjSyh
zs^Nb`$mvMY0%u`FF%Ic|aG*luL&4aiOKr)b<rbN_Ld<YgDF?`zqD--m1sMn|&|#29
z*s}Z`T#BddQ%_Q&Yx$&&ozT6Ag~Ske5S3y<Dxc#QO;yM^&A^D#kB2FyMMDI&2Cwyb
zVwg0wQ-UN(UD!}r`4yNVr7#|e9aR>u$M_4s5Qeokj@|EYpV^CuWNC?8kl)f|ZWS9^
zVqyI`f7$)xgyZuQ9PC-&^M4VYIR1ZOiG_umnT!4ZL>9|;%whR|q3gmIT2D=L{nPs@
zJ3kc^Gy&AY5n>{5Rf#?!!MqQO)f@n&Lf^+YOsGOn!eX}2dAerw*O(neRo=wQ#LK~a
z$~-Zq#I8c(HOFO#8#ZO|<Ehus?W@;ww|&NC`#$G6$NP%^IEMvU3ONB18cm*lbc$)q
z|GL3)Ucoz!+EZNkYPD-yUekfx4!~S68w!)i`lf#`*83r5LZ+jxHdU#Y_GRM4JePGS
zCj3#6!q9xJ^`d||H`N(FiL}C)#o=%%`H#2&Qa7A5yYWn8aXY@pS70t1fxM&Ld__&;
z%k@+-j@S_54j~Ic@*woULTOsE{rtjHHnlc~_Zeh77j3Ge%wAaiP<SSMh}`X(95<f7
z*7>zRdif!+EH}pEtt+EAnP@YEFR<y(cCGg{`Q94U8V@SI<U?+;^}HWaHl;<!iob?R
zdzeX2ud!~RiZMG}qc>>5SK68WPeYDggPY<_^og;cQYrG^r`gm>!=(4+5^y>sLas&R
z4kn1>BBlB8?{b<Bd=G@mt4Bf5h_;AZ7Qd`bvs<JT|0dg0!ZD0!*#PC%h0uACkC&7x
zGqd(kSyjVdab5h2E+(sbMb0^3Nf_3vtTLom<h;u)&K1r&#!o<PH_1D*^~9j%g<aDI
zYk+vouDlT%+NBOZCCBKBxl|YDw!>4MIvpsXKN8JpOBqUhD)@}I1lH$Us{FTmd{`H*
z^BInQWH{^f7{;}%$d#r{gl~!UUEV43I&I{&I&J4r)v(1CSE%ymva4cEo90NXQ_isL
zJ0ivKDdT;xMcTVhGrB(0<klv1K)9DI#NN9X3Y5+pd=V<{2wG91ZB_LO-79Em1|4_U
zeL^wP30MhI&QF!NlwGy?OvJUIz4`G%pP42thrZnljMz2tQ`zI82j3fb?eQ#ZslDkQ
z^DaM>a>bRWTR(n`L=QmV`u200C2d}1WuBC%3ha=`AmAzl#oqTyfj_#$_16BwA9v97
zODxGbYma?!0MRd;DY`>jf@I3O%R>U~dkn9(bngjbuV%=dY!XkxbY&<G>5{f8p*%T%
z_rfmDmLUpC$=1mlr`it^af<EQpCLJydyD(`r&BefC#oTK;`e0pKi?H<hV6piy(>h6
z*taFqP0H`xkMc0u%MNy_#~EnN2o)tZ>p9nLJ->2aa<bXCb7c)upM2iByl63U%VJ))
zpZqQjWb9J!*<?7DTA#CTHp5xm^A>@md^^{leqGVRf=plCTxS0e7Kb*S-}x73iU|M7
zFCKFFBhm6|Gupu&+V~gq*md<4Heuq@5SG@gt1qg){W%lEP>=MizRuI5DpAe0Vl@%`
zKKRrmig!!ahIAO&eGqTg^!wLBZwb5|!|#>lM0q^1cAZn0X?~nC!KKR28BV^H)$xzH
z?jKqJFid97OCA)r`3~6iotEesEq(-lO)n|71$8Rxpzdu6K>3T>TfRGazHhX9zi&ak
zK2Zvg04%F%tG2qgDJoa;JRo^p#S5ORfoN9Gm9S0)Pt?F@d2H|dWJHFyn8h4qsh9p2
zqNrhq4Cjzi<f(H;ezy>!FVPf4q`duEK`#QKlub-p;7c@Te97MZ4K>ifh=m!h4x9sk
zBcX?$j6FKAYFnW2Z;f5uP{iyXrp$_kYH?5Y5#Di6ZsbE)IfQq31b{LRDh&o6)Esp9
z*vzp$n!Cn-OR?SGS7A}`VnQM!w?6DfCBY3TW_G)j{SuLnjOgCN`V#F$P~abqkavgz
z7LqC?@Ktl&`lnLMOW;3i3U)a>`R*I|A*+x@MY^Mzy!F#j4#ajvj+*x7lbyFD?3u9#
z({YZkD;Fqwqb~+?ulL-y);P5ECvXZI|H7yTV%n9c6VgjYph(iaa*haA1aAP=sO?~Z
zZAMs!S5@YtT1~g<iSs27kG@TwNEHGlKcW{CMLKL*l$-yX|4*3ze2}^TNO~hsxc@`_
z__DiWE9ra5qS5x9W`DT$nPxXRd)@hYcr3r)Sn}mk@*e#<qNn`-d=2vAYrN?m=Rc!-
z-pge@lx~9m-^cy$DFla`LeSyh!R7;8^VntyP7Z40RR8(=#_HfA%0W}U%;8Z(-F-YV
z7RR+NcYY?jK>xRI|2@Y4)#LxNx;fkU-o#z?eI=awk>4A_&9f?@4jU%2SYdL>jEb8_
zhD4G>KjsCp2Zt_T-_4@yNLO01ZHaDJLi>{Zvkp>WRq-l)kjF`5B{$QOskyY-An`8S
zGEuBQ-oRQ<UDI4$*_dfHOnTZAR;|2E4UAt<*rEw)IAzBbHcfEJ5G<|LpBA9`P;E$X
zc}d6`lb9}kI(%Asig|)dNQ_r)`V5#z-#ogTca-00*053(p6J#3yR`l_fneABlzdIM
zzGHVi+1>6fxYcRkhjOXk>b^B{$Fy-{sD$efEy^%e%(MR$SM|9)&{)bh-uk*m)maob
zS3BQ&Ztq)vHFy5t`_J!#?!)E-??d;4_rv=G`oneMhbm|~HPn7iIB%lD7PCb9@aVBB
zD8}5Wn#3V{c7+uuLw<3Sh@ft-o*~T>oV*xZloV>VxI2q-Qk0cRY#ADyShp7Ca`^oa
z<erFAM4QGYlUwA-(83<hZNX>bXVlAdQMzlQ^aV@0yl{z;YB<dzx;ZSC!klh2`dUHw
zpTW3cj(3lXon#U1`!5XI7{86SVt<I(&BEq?+EBTUVh4t>e@#irqMcX<VTMB$1b8H#
zpn!(h6iqo_Z$EWb{RNN68G7G#TG-_TOStrN=UQyft_0z(js)jQ*8#Lbf$Djev_ds^
zkLM|j+Fh2re_rp;rqg&Wo~qU}&eGXR6f=2>yC(M;v(;4iocdp!OrwUQ2{{_-hy|J4
zgXt_@tOi06akBU=jWo=!4RE#=7CLx3R#Ep&=;so4jq^$Rgv}FcV8*E((KS}PPcaNs
zJ4_eL3>q%Vf(sjB3j1xsD(ifsR}74U*ES?OkhQ(#ilWH$B}qeu1foM9$Lp}TF1Aze
z2%a#N4K4z=ldh>7y`S;Cvhw9mB}h<17S)>Su*j#UTfN0Yx&gXvwr-}v;sSRZVPS{d
zch>!0W=bwvT)()IT02dR8&3rEutm-dn2WRv<E1=xYI8J{v@f%@E@(zuOG;931jgB%
zJ%jGL`Xm_N@YgIl0NYvhjko=na8p%|5^B5^bfsQhUKF?-XOJ;5cwH<C4oH$cts~=#
zXij4s+whWpfh(s%4F!M6sE`d@GKP#D-UDYnM?QTo`IG$=l`;;Y|Ed`5B^Zlz&j<J9
zhqd)As;#BM>FBYeK{|-mhfTO;SUo1tEodJt(f*oJP)EB?;XtT3lDdbLtmsmQ#Q3~6
zYeeftVEaC>!TfL79k)l>;rZ+ogRRnBwx-I;_2BrvE!nH9#^;A-@s|!<#@jE_o(3>1
z7D+_W`jO02t&<p+17{F?H&3J^xjSt6_o*%?PlJlGyVg5%%!3KPH8@<lyY?W~)WX%q
zpnt7bR)j{a_Lqv_WpYmgnekzne+_0&%4;6iX{(kz1Z*w|Z7NpOLwD(1JgmnL^qsZ3
z_@98T<-<5J8f`761?qKOcfcm(PRYhIvpf4fW2V8r1YURy%uU8Z>TAm@=1xg1>5yIe
z&mZOMhr+^&6L=Jru50WLNgU1e$(KJnemy>qWgQ_{B~E~iBnaGkDy(zFrVyMNGnI`w
zEcCfaPkkc(Ys_xT&A^BIikKr6+n!dgkWn0%3{e!t9iX^2DfrG2E(s-L3MT_CMmgrl
zYUN{_o&2LHxg#Sd_=mTi1SyIyW%P2VD42>1bTFFu_<}+dDm$trJd2bCRPcYxJzA<?
z#(!AbR@o2h$_k7xn;ZXd*@iURhM8s!`~G1{pnY4TE94F)RgtB;W7dSL-{gj+Bk-WX
z<kV<s;+(X#b!*4P!c?0i{Np)yf~~)Gl6HV&&cS22r){cFGeaONUQou4Rn9(c=N29_
zG{so&q|$ByZSeLKQ%smk+0+%e*>F@-c7IW~4{7AVahj~4T{rP(QtgjOIEus8E~z!M
zwS4FRwPy1VRv(gas<H}k)7%inB>Sw<knUgVQ4uzJwCfOtKi+V;Iywb;AUH6!?}>NC
zMI<P6*~UQKLelj~YLqmCG0TmmiYK6Fg2E9nnm9znU~Sl(Q?Rcv=VtNG8m^dGlV8a2
zkZF7oBz;cW;cXIs9Ph)q6Lo{Rw_Dgikn}o<iPf<4g+w&o!teU37}ciC?3^{M#bB5@
zKjuO3RlZ;v>|!ezOtIkeBSzkYa$7rh@5bt#&Ln)|KS4|TGw1ju5IZ&=7Hnwk0z{&5
z_DL#%?IjaQPbtgGDvD>a%O7UtX|k$;&T&5%BT_TD?cnz$WYhrs^BYR)G;hN8akh9_
zoE;VL_bL=(qm~ZTtik`-hzn*d$&T@G)pxZkU9nN^=?M_bwpmO0$}JSqSqvEra1XKf
z5M++Cj$AzpCL4yeBn3@x`}B}xH;8G_eG8=tpR|+*$HqP4|B%hz(?VBN&|bVp%k}FW
zrHZE|^K)q3%b#*U^;dn${7o$`4Ur7>6!j(}=_y9MW>~>@(Q(wqao?u4yMYF7Vmfen
zC2gBie;_dPl;JYG{kcXsset#@E1|K^M;&pd&u&<dC^1s=CR>ou+`AmU9N2aGW&<H{
zMuC4mULD#t@;pSrcBhA7sCMVkC~9G;BDlMx$`x$50*Dni44V>c(@Y!Skc@bdA-J2G
zN*zSt-FSqE5gHGa7psr8f@ujj4&R$I#n;M=q?y}wEf^U)?qfr56YFF^aPsh!C{}cL
z$Vuc+pv5#_6bTo|$NR|Rjo~qfs!PAf`mo`3H?Ct@5Yb@D7_p@-XFemhp|>yZX{Xyf
zF7J-1k=(_u;$32nAcyf`$4JVk0VxU6F+JXI7ssR*l+2zd2M1z<Loi}OVw|IN)K7^x
zztX$zvoBRl41VzONs%*+Y%tFmD4W*;metU`RaC3fVvM{Qp2}loUTM=tSJ>(|S1Z&w
z$0f7sRB0N$f^JPJs;iue_7L`x>5$`kE(*s4?MByEPb?pB?^}@jq;g}ee(Iq1VDS(n
zb2!84)49)bNNk9>u3!_SPw4;wdNqL?*s}2WDLv_TN=wu~PZnsiup`ojS0&zn67+ow
zH&4vPn({S(N|~O7i{a{;rh;H$YzA2~slmW}E7thZfQu<Ui~A;EQz7BLcVJ?WXmr(y
zcEkv;atQXlbfmaK?J^5q^4*@ebh~7=YDX1e%<k{q@`mwcw_1&}+a1Ef56iX13VZCI
zK_ebvFUKnhtubCm^35i4if1De!bB|6-WuMxM0R%TY<{2d4b9J^)!lG@c<-^fJ7B#q
ze&FvsFB~_Oz!5;)A0kjeIeQ;+|6C}L;s8G}b?{bD2M}`}@N|ff!tOk-OPF!!iojyP
zVE|5jT)`FRFZ5q4(;Ju>)Wg8goXSCNnXGEDAXE#QdW{GUnJNvFWK_Cjt^7e}ifJ{I
zbks)~dUcZs)Tkt_vOzG4BRUqv2p)=QC6gLdm!!1nL3#@7<TB*~od{YAb6Vwcu@F?Y
zq_mnrc8U^O7V!vYit(fyYNrm=#AHW0<%&Ua3YjEo4U+;?v?T1>K`x46TIHfaYzhfF
z7MX|y8FX6ZJh2{BPniQ+77>_KRBjn~%{_LCP#PAs2of214N~0*VHtQeQrQSlnFq~+
zTvXrWlR~i))b8YyVzE$E1qv_PInjtK8CO+O{Rno74%%I%f+*B-nbqVvnmO$Vbc(;p
zb+idZVpJ5U$tPuEe^75_25IJmBeW<?lIo~Ys>PB}6J*4wQEJ4}Q1fMisZpxL;!({h
z<YZ1{EM<OBj53K;qJ|}N6%E$P;H&Kgp!QPVHlhmB+!mq=Qr~u?ektwoQuL_r;ZgKx
z?9ov?(bX$PFeSfqq8d`)wxjy1?y*sPRt%QPT&V9c$@mlu5>g0g?2%CjsO^DMY-{fE
zQ*5j65m0Pv>@iSmtL-6B7-;TsP#CE1VNe)on6#oY(cBiGGEv`lq0Z3UR-w*N-!`Et
z($vdFP$heaM2sY_mJgcB@Kp?w$?#PTipubn4I)zLB(2sAg3D~y4sueo(C(@hXv5T^
zKGQgTH`Mjw5tI~H8hbM`o5h3KGMo8>mol3rgVi#d1%p#Ewi<hs6!vO+P!u(qdps01
z>U+2pH5z-g6g6sluoR4%d#n_nMT5mMdIf_+GI~XWloX6=dtel}$y|mJF*3GFCf%s#
zNlF`p`7Qh+cHY73Pd}P3QLHz}7F#6C?Bf1EI!x+Ot-r_?KPAgP;*{Qq@}C4nF8zbo
zzkW1-q5SXc_@C}{66Cw_id?z{uV4OX-axT#C0n$YEZd4z>Lf^LRgc8H<TE_p<-ADu
z&E6M2c09E;JSNG5V$2?DT3+D>YYLUEOxIwk{-v`kivy~2B|8S5J=PRmo^zh!Yz4Dm
z;>LJaeDDX8mBA=uhU7l&EN%LR0xRH%b;>wnian})IW-HZVpoMj6=OlJM5Y9`1V?V6
zeT$t@-YlbEZCY*kz?kPd^H0nyPqIQ)g;8Z$5G#R^+fN^6i7}%!!QF3+g^Dr9J#35x
zjrm3UpdBRyDR8c(B%n&D%D55(bYm>RxBr=S%3flO&z)rT<0sK%(iD5R6|pKN6&_$Q
zxADRBY+^Ai(Tw%+$gMk#H7!eyKi!M@x5e3T`9k_UmxU%JwCXoe!}zabH_no2IU2b!
zIgJu>!+8%SsuD57c?c!R5(u|pwxRk)a8-I$_!aH6f;F5W^fC0l-@9_ga`}2#{pgeE
z2j}c4zn*^6LZzp<x>@U?%KeJBG~=-i4j0w?mwZaR09x}FA}h%DG5A2XfYdXnGW*;!
zD4pl;c*<MiklwS~QQQ82vEWzYtM^Q?u(S3Gxo|A!Z~8A<^mDvevAro(*5CMFuocpZ
z@8kmtui&qL0jItt&s+!kjNJndEw%fnd96MKR6*Onyn?c8*}8`xXcy@4?^qY?-FgNe
zNEhJbW?V*H<YpS~aY{<lb4=EU9>^sH`ie)=-B|gDf5)-%_fLnV6PkF%TS2SBN!lOJ
zgUda$*_p1N$&P})`oO3PP01OQyro^4b%a^LsiG}x^*~gu?9F5yGM4bRUm=!kq}!Wz
zB%flIWTtbnZ4HjuAJG3~)}Q&k!lFOnim<S>38ZDzA9ICVIMj2;v3NyWDAsd_Ss0ST
zVzD#nh$mwLs*o+b%HgGRGFLwjY5rM$-Lv>JZOXHPWeCR;_6^1^yhUKthzb4l-4GH)
zwVBSql%`9kx*VPF?NT1brVsZ*y4*zCS$Ya9!|q~K`zvWlNY4xHESLgkF4-~55=(X;
zd#V*;Yvwl?y)`DLY|<*YzxVGbRVh><7vM`yedZS0EL77=Zp2ev&R7K!!cJYUu6_w5
zWHu(T%A3#{(>@Kg3!(Ws-NB>zINjY6UPtj_u}@>Iz_F)@My3tF?A0+L7q+uUT9Na@
z`8wGML-w>G<oOtGYUlA8>VZ?QVCnwA?K?0TH^#k+8hX>u8ZI{ONn@Q=Dk15?ezk-*
zAAcH(hCsL*@(=>|WjV~FuldI94pt)Q*+_z~FUwv3zZa8(&B<S9Q&ZlzINt!ys-jXw
zQdrI|$5Z7|&0vy<Rr$v7@kKwkDtCHz<7yg@ODB5CFG@O9R8^{6GhFI9i*&@Zlg3F9
z3g#iUA(r1pk%v$$n}Ggl%M$7msgfVD@W-RfZlSCp%#du5PDSZt@)wKg?38_CHOnXI
zoDl<a>Mf#kOD%@^NMO(bhQK$Rp4<SUK%#)_-7n}Hg0mj+S3IB%kj_Z({Vjk=`Pn_G
z7eoO16UqmZW8!J0Y^_Bxup3|)pa|Rm|HOXz@q&Da1h@vj2E7Km7RxdA=546GWVp#p
z_}%i8biu9`yjHju_q3@StPB1^;zRbP8=HIP3GCs1c1Bnbk9*}w?f`#dA)(PuQGB}L
zQe=ZF;Ti_$1X$`o8yN|Z43s3rTqBItvh}7miMZ?wFK!_af~zC=gbsL9ZbkU5yL%5h
z6@b;o<P&naeUsec-LJXP5?ou)5mMW{h47Bk2G@qx2HwWsm3ql}Qw?CSbYb&wdBJJP
z%yS6t0c|7v$8*qu*<K@DQ@Ps-+lJZ()`s5(|AMxzAL)}C9Mh_g&)Mguyh^`OQnz7;
z6}n}mTUxp{z0hcP9BI43eFgQrCXaB{xM{O#leyeBuo8a5vCJWEqfu?8bN`8}X{)qq
z{VelbQIdRxamBVZkvZ)uSXN!CW0!4{=B=&Ty`e^=+1q6B)nmZE6!q>kS88CX=1|_c
za*iUq6}2Usf!S$wJ2-?8)g2`-+8y;wzie6m!^Uc>{daw{3(0D;ms3%(V}f^}xA6kl
z^ZUBzRr?7r>q7f#O}=rnd2Q(`qr}=>{YlQ<%q_%Q;)(tFp~UK{eC_axM*i@s!8Y#A
zbx?7d@%J}p$yQ=R)E0&O&=t(u{?`63QL6p{;fC4)VIu!He}`3)_b<2nP7o}`v6Nrl
z4fY8H*tyX;@#+Up^&M5-RXbYpzaDkmbskqw$aViNlXWDHX3k2}pSWt2M)97`MKDoW
z*9;Qkgv=2bUcESt)beKVwDCNh=u5$*KzRQlWU6H_*0aj*<9?m=ZH%^Qrr?@~E8G`%
z?P4&Xd*LytqS9XtAvOj*B?(`n+_MY$M<(()o0lHk7A%u3&OoB3a)6M|HAKhhwLm#m
zSlPCT*EA=4bw`t9PQpmb=119wN9A8ONL{<p6rtiA)kTxYC*XU3l(gAE>JYTZn3}I!
zOc|WSUCLB$xcAVeP?*NgvNL#c8>em1VmUWQ%G1H2<04*oKd0P6El;RZ=&Gr<BOEf9
z&?5EyMD_@wNzQlouR~mpo*^2sHN@sB>jq{wgN~1?b{1p1QgPR5rCr^CDtE2jl?QPl
zmHs#G4s~*bm$s`+?Ylt(y4kC`L(<r5=CE-dj;xVvvdgJM>p#Vxx03F_-kldJPl+b$
zW94QyMn^<P&RLKw$STNXkjg-HfQ%7j9X=PD7StlRY#;@I)QF@GBn@d2{49VipdEm3
z#K{a-25B8&od=r+qXvcnfH&e{Mo5GGuACmo3INYSl!Mw7qG5)i28|4i06-Y=F(YEb
zp@W(R%mJv4$d!JegS-k6#=}K}=m{Y*<8vWkL%~Caf&>NH8X+?ykAgvgd<6Ol8Rj9y
z!#qHFf#L+9oxnVRbbxOKxDq3rz;XpJ3eg%t+X`6_LrOta38BuyNI~#`!3gmoL%V{Q
z1Y!fg#K4t>$dN&V!HtEek-;Fqg#&PyV=RZ1q1lB%#FoGWoUpkd-eK_}5J7rD1i=MC
z1;GSCcEG<tdcb=idq8`jdcKRSf5)W2UT{N@TyTGI0q{>)AJ_}XPcR>_3s3<l0Wbjw
z0g!FzZSZZ#ZP0C~ZLn>KZ4d)!18@UK15g7fH*h9UCNL(D8Soj<8L$};MQ}yX&H$=F
zs(_KeY=9}C5I_bP0EhyD0El^ztB8Ccn@G0cEnot9I5%L=pwD2>Ai4pRKzrZ}Kp&6|
zAOKtf>;T_!1uz9L2T}qhfKWg$AP-Onhzqm^(gJ0Gus~-ZD^L+o44?oE0mK26KoKBV
z9ts!H>JM9xW$^PdFR>uNJ675k*uA0AC)}ie;42gJ7vxdz|JrE662Kv3gn+CC4zUap
z_`g;Cuemp|(%!&a42`bfCVd0jnV6p;k9q+AG5SC7yc^n^`MW}YPQ;|pTQ#yIrf`|^
zpg`_OxxO^G_1>~39L=Lz16I7&#Zu=?9|Wd~T=Hx3r(B^w(z_nG_$3{3@2+RF{ty@#
z=SZUbbAv5F6sv~Tc_!)sw`7rQzSRp=flmA=D_xrZx5Uy@i)grP&Ao|=E^92YA$7^&
z@kN5zObDREI$REHsIm))<<#-P^V#2hL)`J4#70-;md`I|kD)C?U19P!v_O<Ng0Cp_
zWZ$8llH8)lw^7arq^4&I6~Ju{zyyo3qFGvC^<fA$*kc;&5SM7rnI2qm))A(&!l*9c
z_}otqwcxPUz&$(!=<vX~AKCJZC`GQhFlI}hJFalfO7MLBlszU=j&TLm4}bGP(f3j5
zF4sRr_0gB{@4t8C))&^CU-DqADLjw6H86XrEyg>g<YQ~Ng7vUxO{(%u%PDy~HRy;V
zWFBsSEgU8*7%pDM9tgn>T59We*?34Bxt=5|Y{pz+tgW8&FP_*HER~Nk`*cc5I41qu
zc;g$dy^PO>nhM0#BI+h()Hl}qQg+x-er2e|jXU3np8PE#U18cywV*kVkQVrJpITDA
zLN`x)>(@!kCtlp3J?D7qyqzoW)lhb*%4802-gQwYbL({p<@%r6!j5W_p42OrtE|+F
zF-cu3ysHE7rfePfFNdY<(cY!&XM)>{Jm^yrK9ab3g(`MMpsXih;5AFHd+P4~9ohr=
zIBTS=;sTpieoiUYiMUsKj)+yOlMiOG<_U*a_BLjMQtdnz7h!?sWUdN&3}EC7nq_)r
z!8POa%lS9&@}xAnVy3RYJ%8h)g)jP2q>3$ZE0EEy5bidjd+NFh7B3|IQ^cvM`ccxC
zw(Twdd9o2{XZ{~Ydc8H{oZ$d%sVXx<i4%KH&0UR)7h#Fig$k-=c-z<K%lmu0L0_B+
zbU^}vcN#J(=?sS5JZUQx#UWRV1*F})sYGkI!G`mnpT_PvE+>Veooq<HO@eNYM}7&f
zyHrHJCa-SplfcQ(+^$>c9RUqZJ(Yte9`-3`+uDiwAkL*z7Vd^_x+cbvVn~My(Z7TE
z7W4MUS8~VpRP$VK4-9B5<t$Kp1x-L;8?j{SwvI;YL*U2TGhU4uf|R>!#60{?Kwwbl
z`N!Mu<p-`qoSLzQS;Mzxy<A6XDc$qY^v#`3ZW<m&*3l{os^KTx6!Ua;3OlXqBqM$<
zsh?pG?nFr&#bq^l6W)C+G`BD`^&}+qG%&X`EPY|yKP3rXrtyC>&#1ZIIP+VcEN0dG
zTQVlep!p_5cQGl=5ml8`jJ+~q330C*BoBrd85VP$$@Q}I^=X()z$cn%M~oS8<k3M&
zTh7=ogDYNucHVSXT3McH71tWnl8iDeYHjjsWWXoYi(vkt`B%*f(=(bq7G-#DNxx|9
zEZUK!rjm^R@-6%(e2|eQwoWR+C^GMdY_MDIKFi1i;ugwoc(^=G#P7_lq{KutUJpm}
zqb4gB0_YK;;fL0XYpjJ{2cq4qBmXzvYz<9|qG+kNo*KL97Ee_50y3+t(Lb4~De=g^
zHtX%ZDhP{tJBmt?@X22|f5W?-l$ZQNHkNK&o97A6z{LM&TSK_qmyq=rlR+eS27Rqu
z*TQ?Ih<btcw%%i}3Bo2x8Y%V%hA5IC7A}r8tE4uXT+dAzvOZD-;*P5&M$Qp~7-isb
z2OBp{rr%%FbD0JTok6Zl3LQdHC#h&aUu?qPufwe+ewyu&e;!z8`}+fIzZ^s1r{nu@
zSh+-@Ecn8a<`z5d{VZj!<KCJu5`YdZ5^vn|K%!O&?DyAY$FYndjCO7xi#E)h#ml!I
z-=I$1uVq8NJn`V4(5WiZpZKQ3@R;cf0xY3jJ9rA1&QM&?jVWl<^yLn%*XQy5q%O9V
zjp)!5^gTR9eS>2xxbP`1l#JsCQkQ>oFxZTYzSN?BcV+Qq|7OW+{Vqp3n!d1G#tx(V
z6kH)*h_tg&FBun0>U(;q{(+iB=4CF=aN_r(q~i99y;IZmH!yp+G={Ix<2f)tr^~he
zph=rzz<YS3BYpbRe1ck^yT<)=^kTKH>hEjDD1K(Lk4J{-Nw6pp;w^k5!L$OQ8mWI}
zN5dnYYH&N-GM;JmT85lx_NTJzKS`7>#aPl8I_^k?FKQm5rGKW$^62SFGN+^iE5?6M
zN#+t8%HmG8@Of~eX7Ju9#3+$c53BXD>yH)(F%#OG8Jk7DqDEIWR*Y3r%Eccxby6|b
zB|jxgd71_Rm(DVyBOHvhWmDrQ=+}nQ2e@cNE82;L6h!)}!RCk&E>l_@UYBrKaha}%
zl@?|*3`|X-X}?vaJfzgVueeakZL9H9SDyW)*-t@73P(hQn{U-cH7(rpa&1i6e!4{X
z`Q^2<=;5tsqZU@Q+IE1Lzs1^#QRVORSRpx$n~?J=SmX=ifp^$`b-^|t&CZ6)Q0Uu?
zIniP}R!`>emte%Li@ZK@m1Gb``XV@h7)EyBZzzb>dILJOEL`!1oviM<Z04W>yj7r!
z19dUOv-6C!qJu7wM4vcp89%QyDPD{F>uW|TMgAoJd3eS&Mv|@Yb?5q{_xhvfnuub2
zRN!R`Hh$t6gi)7S@JW2|mjh!sU3@O=L8%F(6b&XwVgXom5?Xw2nylzzG1=L?=jne0
z<##smuSpPOjM%iWEjEt_=4z+<U|>1w_3&2M6o`azg%M%NZh|Ci)AY|6>p`%JdW^vi
ziw9i?K@A_cxr#Ghiyl6{t+w-9Q9-V*>sy<KL9!k0=W3J~A=4eM`<v<0ppWCjSnw~1
zG%yK;D{!*fzMO!4fs4pfzKGMp$p0x*$j;kFN?<Y|@Y5VYE}jd4)StHK{xp%2h0$o7
zJ8}aoH_mA^Gu^lRD*?u(@z9A6+&|XP#Ib;I0ZwkHS$58(*m48#U4R5IHo;3y2iz4H
zF(1plkf6H)d1oRsb|;r-QKRt7tcXIZo61q3Bo}an8hq728kjXE^{BInsQ@0)*jA0%
zI*C!sEJZl9_jlC<oT_to^516&(r7bCEw&qPf0Vjw7diox_=xP>t;)9=u+lUZ_1Z;`
zJ*O=0#LDLJZfUs+6BI-^rb=~a3rP#h=h^`hi_jNT3VULS3^tDPCThwEd4NiLpu_Cf
z@&kV04@<!%p9MnOVtg`q_(NVd6$TQvEfHP2U8FAO<VONWJv)M*vZ4@km(gabfk#wF
zAfgfX1%{oU2VVi~aoB(4qtzN6h>2YZ+iu*S6R{hpCE%tV9UZ|VQxN;N%$rF0S>Rjw
zkxM7Vu@_^6i(M*`Z(FesVGlt&9!?eeYeg&2fjbK~#1@QDYFTK(_qF`?Hqp!iaSpD}
z2A>WPHA`T0Zy7j^YjHEEM$$<MS?gL9kGo{~o0UeBv;%;|!7&kUKC4KQWp;9V%#S6$
zCFBG~N5AFz7D`9-C1(FBzmsj-=_!4iM6U{kEZjS|!5|?!F<gy?fb{W-SGfOuv!nH^
zW$ciVtXcY&R<DV%<1V(;{nGo%sC6Z32Rjl3+%fB*9vwq-5l<!L_PX~2Kt}ZL7)6)m
z7~%@0QW;nvZCooVD|d){Q<pbDcX9*E0|S{I{0FfX1YzGv%)^qKP$xDlWk3JW<7CYP
zTa-X+8w$+9Ah4GlhiLE)=sO9TsR~4R@q+I<E+Yi(tEXfVpaU|&wACq{2b2qB4hXC9
zL&_H<dijmVb;fDL{rE1%EeFzQpjG5FD>jpC&a>xA(cOGw1pX$IxoAC&tELZ1_tPES
zmYZaV+eYd)R5d<JuoO~@9zZK#15DC&@*{4Z^D%RNc@r8!b$xkmcm=%4ZWS~9={CzW
zc^?`Pbpdq56~IE^C<l%It>%FB?0D?1?SuR*Wd8#I&70(XFSMk>zWo!J5*l2~gfM6X
z$CH)ZD(F7}WL$%D*!2f-#~HC-W@mgt+RVY)%!x+woZ3YhfZ>awAy!)=D0!4Z%2IiC
z+mak0i!_E(Bx0a$itOjnhdsY{38OIsr?yKYnjqra>XhJ{`c0Bk41+4>FpX1lA9e=*
zms4se;2EA^b=C;kOgKIplUE8-EQ)#s!TqmcAX(@={DSE+2zIq><5*&vJYKat(SHkq
zKvWRUAj$@O&SDU1j+c|4>)sFW9on$W5aW_bt`iMtp%doGY*%s__yNN|BA$RV4S3>k
zK4sSF_FBAOal>SkFnbbsPqm}|GO52Wu88FxA7j<VwMr{$(&K0-f$&e_xDb6mj_XjS
zjmfeGB)Gz291-#Il>@z|dGkZa<OjOWn2Q%fd4`FIo@(jj=dvJwA>)7uNrMORiO@QX
ztv#txg5M`P#VZ&*;GVsUW5)lC9(VvJC-v|U<`PN&krT)b1NK+iS)+FWMUAT<jl?r^
z#rj^`vtTtUsQpY099DO~hfj$}8R5kMS8%ZNUHMqOKo{lc7!d1%R40*A6mSM!zBh3A
z5vMK*p}Fbn7wt2td3k^kxl-ai{m~TNY#K+Rj*li@iOB1P@u-RB<%`#EzhvA>y6QXJ
z(ZL?fUmbaa#l_43;|PcUH#AHt&EYh>ULjgp0lSi91X%+42q`~n9H2JPbpoL-SQuOm
zWyX#Rw{h7L1#(74kZuVnSpGqoIk9*V88XnacNnOEB#fN3r>Wi>Qt1@qVd_^K-RhA!
zk3fr<6u0NT4vtx~0{houJ2Mug)=Y41{aNYjwKqu|uzwprmvA%l(d4vYwqLHkqbtsb
z;4Dg<18^m;v%@kkXLChvi@|;}V}NTCiLQ#z(4fw$R^rlCM;MmdMh2YKgA)fmoC4om
zr{7$afeYe+iqJdmU`6B-lQ84~ZItlGjQkx+LUF0bH^y@jB3*5vh=t{Hag6A*7)!84
zxpa33XL4U3wE{P<hTCgfUw}%aO_#H)!-aa;-Zt-Nte;c`cs-6&Ig*@15n(+(pEpPK
zBinE514Qpe_b08NcUzVIKF8zD?%AtOQ;qJ3)!oOE)R`c-x1P)^{90gdv?>uO5=69x
zNXc`hKMNHdzIAZvgZOS_Ats1fIv7fyS-3_MCcV|zF?FSJ=4g=65u#=UIE*{xLapK&
zbKu+pq+=Tbp`f}D6}?9M?odNQg%rc+@xAxg+c$${QXbmBc55vAO2T!|B_orL-?m*x
zm4-U)g;XNjy@zv^8<D>cVSZ2#@Hpc+;OqVtFZ8^!?Q+L6k)isq0wiHCNAg#fOPS81
zhMC3;)DM$r@5R$QNu_XMJ8XwT@;&B&6V4|tlgOPTm;7!i`j7lrxWQ4Eowck85p%36
zFUTM<lZ$69H3(KRJN8u7h}I5RM&}v>of*f21$Ob7v2u_hrXz<Hsn%eT*fU?2{sx%H
znPFB^eX;k1YZ)y{1lAikZ}r87hP5RBa69hZTqq^ysnFEh!fJIMx@J0B=RoY8gmA%I
z_u(jv`?$1;%L)nhex4XW!r#>2XrU*kHQsBk^mjcT=WrMN{mL=33Ay@gn(d2@w7L@f
z+f-13`mKnkJso_OT{I~Zr7(l!Yzq0vJYeM(qH2QNnRO7;c8q7ZK|xi!w7klcejp5q
z?>DN{dhF%&{%cnuL7fc`*TrlQ-1wvUgplT<Hu0?F+1<_JDHs>aj~PCVS;dg)T0LEw
zkR)tvNx$$yx3IWH8wSK7`w_gtddsFHg!^cYJr~GozUCE;jrx|ybyRO*w<>nm4yYP^
z95{EoNhn;K{pIsXJ*OJ)X13J!Yu>Gmj(6fNkZNO)*zSBMdaRtc-|0)lcm>i6^K<$W
zJnmK2^%;qFba;`yaUNre2v@Fka!$;v9k_$(+i;BsoPc`_54{DdY^-Uy2vmX9@`1JT
zfz5KsbOnOtX`BMeT)ATmI)SulaCuB=$@xFJA;%rY@$Ryy?~n>kq6_W0q_{>!f@czc
zuht3`K9(xF3DNSu^9uzaOBGI$(i|TXbjIxw9}_T$RWH>%Sa-^~(bgfT+`KeXp{hOz
zC(m2Us74#-=xpqujh#*yi>>yEVIA+jrnMch29t4=cr22TDX)?eXcmVx``gN6x8XZe
zp?Z{^=`^<vbhV|I9UD3%3Egb5y<QpNb&qN0@gRodb}@g<`7GX_AU#dU)-)9OYqjOM
zvwpCul-aKYF?K_rdq(JBrL%P+Q`^3GMz{RyhK}iDv!#h2S*7ybtu_Q<XrSk4Dg7w9
z8X-Nl*;@l)hgFA;=L43hGIFR8o6oqmwWqSe%1oDMp~oCaEuZw}t{3c{KA1o#JuoAT
zyAIwd_m9e(X{QhM$^qPr!hq+nmXR``()*EJ3S(RNMj$mwK_ohk*#NEr!b8@NkKYg~
zZ6;BM5k`8+FrRh=yjTv*_Ea7Dj<_N)@8WAybDVx>e2h?h&iceCD=z58k4$Mp+E(X&
zEp=%R^n@R5HWPxF0bI!&ikNIy^~$rI)gOX>_<{%BjR3Y2F+@MCzed#9KQi8^1)@=|
z4V}{gB$Zi0vIymwk4jmk{O$Tz18H(bD0F|r8sC_6va-KHpDxxh<zmbP(xjgMA=0zE
zO*2YJrMAmQWZ-#N;*VxxDS3mB!9?f|9(%r)RQS|*p0BG=(bUD|s$RQjSGA*P5?~+`
zbhvn(D6R?0iO)XDCZu5@Bi|LEkg{tyVx_FjMZz7?61>B_xe40-fWa|U^>@V_?N_*r
zZWI3e->ET7y-Weeht(G@0Re#=e8rBqR3z0or`ZHjVFh7~wM8|Ofdx0-0n`ziMz*77
zXmxF)u{{cW`-m_;;i$m=+M(NQa%jDBK@(DLqN=ZbbOhF)XFtx69Vz$QEz0mWk$52-
zFD{8^JQ1S15jw%GE-dj7!S3H)&1UD+Kt)^}$#VKD$(u@Hk;)y(Q2LiZHp}b)Hs`nN
zKMe4OGbJk|`yctVwY5OTxuB~MKKq6vKKG}iqT(3FPF`;Zf`jSp7$i(cC?7794y0e+
zrQ_0RdqjPNGV~*a>W0bw4vpaG#X`NKgizct$LdN4HIE;|=pc~i5IZuBQ5)AX(eJu0
z(u>B>XO4Zj2&k`@^c;UPj8DF|C#u0Q^%rRz%zOk}bNsPezi<YDKM%C<L{j(Auzr^=
zx)CEFRKG0)k6XLt3Z;_h@46sJIM$T~K_3OVnaMt;+gaw7Xout{#b;^_r_G~|Bcl2;
zDqx6EA~xAC-?JIgwCuyYg)Ahs>u*K(C$2-iNmcGl=(}u7=A<R56{J)ZxeX(5OO*=R
z+!l&=aUm8Ywwg1eT1MvX)Gd<2d?7*lgq|KG?V03<evE{Wc!Q>eHJ8QT03YG4<}ndj
zWETZ`29e={yuFq=g<3+6sW*-55_l77L{c)OE~K6(Q)>Mf%%*u<v_e***G_$iYyoYg
zgUKQp+-920E!0dk8gc+7uP5%Tvy;eg!Fk0?Nh;_wN=_yliF`#FFB9Y2u1g2rWGCef
z`%Kqa?{eQI4kFzU*tuEiOE6D<ju8W-ck2^oZp~8$rE$f|!Ntkm1$JwL40rOtypC;o
z$B_%t(I6sj({k&GLaOU=3J9W8-G}^EW&s-AjPk!e$FIsRjIwzUI2B||7j$}CNuGEY
zYbw0DiRJ6kdoclXM3u_o22IN1eglcxJ@&d5xBfb0D0GB7UH(lH5$qv}qHD9g8`i0<
zzV195IIYbcnJcb>A7_8BqOoS!V;L30$Q|O}&1dn>wwH0v?aMh_mL`_><AQbfp7z+T
z)?4<38Y&eS{1$R90=D-m;2aWLRUcPTFJ!{|Q81#WkO@2sjRaHgj=F+>vIpq~Sgt8_
z5m}Zw5aU{#-%y0DW!JHD2t@gTMtH(<=EZtm9>W^oWE;_sZs3JK!y(Y~eM*65eV1}<
z%KP)C+)Z`oHoeql($(&Gkdm_vE(up&|EZB0Xc9wDG!=8~T|-bK9do5WC$LQTlLcSi
zZw}8Dl3(W9!m#af+0duP@D4(MH*bi-<ukn2b3}AsmndWOrC&heNoZRXGYgtNfWH*c
zPCP*5m$7a{-4O!RW0hyWZ_2i^jBE37kCDa<<|JCvo9#D2Hgi3KVHcZNj-k_t;<Z57
zB=yd%VypWXbI;X6$lKMH-^pLxe*YCF#NXDKx_&q5A7t*AmfT+&0|!`ncEFGHzK<oN
zbJ=VXM^g<^AsFhkzQ>=d`<^@ODBij0#}qkU%I6ov8nntQJFsQx_kMlseF55|YVmhO
zC%b7hDHccD0j9+C^fM~oOI{v0Jwb=YlDM{l(f)X4d=+?kQ`Y;&6s<#h=<Rz<T4Tkd
z3K0x`QOQ|1x>a+dC;pTLtEnKH^q*K4JIw5Ra74%sK`3GMOO}I8@RGK-H(hx5ZKsV5
z7kSf=l=!JkwyQ~@bmI?eU|f_!*>rh@m_=)oJLe0l5v}6&9%Mb4C_o@Yi3d}u(5~@e
zz}j>q>Fb769@mhx!q6U=sm_EIvE#wapKao<=l+n^(bh8dlo7YWw)6W4S|0=as3^9<
z`7S5vms$nf_eH#2a2JM+YNH(dnw@f8#C5q$X@E=rk#vrG=$DQVRTF@%1eRgre3x4i
z_K{bXGx%)3P=|8Y69%?Y1HKY+dp?P5r$8H=f)n0=gUf3qW%$T0m!M_?_046h<;C1v
z=x<QvN-U+l=WY!~<(2R5k=aU>O$+W=Cwl9kXJwb2CZEUHa+n)^{e~kE^EXxS`6E`V
zc6ZfK@lBBX$3cni=Sp{_tzYlniXB|ABl_SX!f1;zsDRpa_{~jaCbQ(@F9;sQfiMv`
z+Rb7PIHKwtbkYp}S4XZ_Ngj-YS}wdgd%!rRZ`m?VaCT(g8N3$vyL%N!9#0VGw6erL
z)lkYj=c|4C*TxM~YRe<a9=K63Cw;*)2w*gNo*WmhjsYL!-#J+(0(h}E3xF5oS)~X3
zjw!lj2=Gc4q_{5S4?CGl1?VykFN^LO`{>_z(d;`OsULowdCnL}q<vU>P^ez7*^=}?
zZ9xjKC~;4Lz5Eit2UgY;XL{>D!Z5Yr#LwYqO`pZK`8b8401llY(GhF$y1mR0CNe#R
zox|O7Ct(YuW1Eg53{xEp_WQPgjHxD>O`Y&)sq#z9>#62Bl<UHbBWN0vu{aTSo@nNA
zilH8BY&5B_c}q^k?(^R}2mcBpR6Lc6muWGWZlaWgQ?sZc_PKuaySvD&o<?xVxjKD?
zVb@2YT!JoPsK65^bD;OeT$^!)s%Zo1q*h1&9)D)P#pg%L-sA>$lW$Jkn5Q!t=(0PS
zCn`T*4%ULgT90YKesAGgp~^Yk8(T}3vw_)}WfTFo$snyqe7@I6r4)l-n#nOgmPg-x
z2W*`^Av~z>u!=W${ORaAIe2Fi0V|9{HA4E6xVm=mN_!&P$gIWD&CU4|Wbd-WBC?d$
zmwcx&3LZ?UuA)hFXI8Q;1dNm*_o@=f#a(SLH!7(nPH_d~!Cwk-{q}`a+7v)XD0+J3
zu0+@oJHn_ydI7n*lz@fP);i^8U@c4q6rb>}RUeL=M+-06eWUsHYtSE%(ee1VY5$h4
z=T{{VPO2l^h}?e_`aZ;JcZv?+QB5X6qk@nOH{UA>Y9H{QE<)mp3*?5E0m>np%F^On
zY=^Jo&scTwf&D_~L|V;Pj|FqIZk=SRlGAvJKD-AV%S6eM7JHRK1wz28i~33fu65sr
z4O*9>1D^P^0RQNreWh;J1q|4iAPB*mQKK^dJVEwn*F!CC<>bhO-P*Xpm1?}0egDHI
z1wv?!*(W#$<t;VbN5p@?w%oodF*-+Dfg3!H_aU;qryF?2v(G~MV5M}!EZXo5<8(uM
z-oJ6`N7q+fhmt?HT;GpcYQP0MPXC?yzLNEQ;w{(qIuYYzgVg>+fP&ev`+Dn1-pc)4
z%l}~7?reCQRlL&n_s?hOJ^$R5CF-bXws{Ux>IIF`2gSaCr1dK<*-b|Sc#i^)HUh>D
zRt>Fm%DiScN%Rb~3z*6wd7!}PM=L9~>GDKBD+~DOJsOhL749O3?VjZXl$^1M`PoA{
z!5LDIL?t_UY-!$(d*?d}`lR2TrtDHnBA?YWf{jBa$HzW<s#)c+YVUp`S+=Z7@q^nc
zhnUq*#D_9N98kYA5>DzP^$MyWVh58$Z1niT_~b(vB_=i&NAk=fdf^b@TPTv=ueQS7
z%oaj=RAum{XVvDO-(QnHx&S1#X7qnGSzxm<?X=mcQ#%=*l<faZv9l<*hGl5aU$ABT
zlwFIY1DsC<<;QU5R@d-jxrucM-rtM9`6JT5o*pAHcD{}yBy=d?sfxo_`2%T<mS$?V
zUqVE5SFYZER|>#ZWq`_9i`>UZ^m8r|QyfaXJc`X}ki&{As`zy`FD3XQO><AtC9^gz
zSfyo}ePM(^%QmR{b%Vsh|JtED88PS@CFqn&=*%kS1|i2t$9<)?sJv?n;w0myl{n+Y
zb5GI&IVd=9P}JAC)@NM>)>OmFq++iLZk$2iA^Fvqnyr`D0dNwa*uLz4yN|2ushbbY
z1Z`W+#44l>Nc+?Y5PkhjP4wW{OmW4`bu0n4j@7o^U^)@rn1b+@?aqs9l@!LzNi<^l
z;h~vB)r=?o{KY%%l{z<e`OOzU0w&WfLJg?RoQ05(#tVR|CKMyK@&Y<yX4}yIN+hs=
zJ8^}~sbykgPA++tuD11IeO30_y;h5kxUb$2Y^7}Ubc`6BhX8G2Gu&t_u6C<i%e`1*
z?#XZMaN6(bIZH4@Fn{O?<RD*{WUcp!(OKv;UI^XB<y-dOs=$rfAiMo5-{4gZ<*;g_
z*d&2=Szd8AdB>3bn*9MYc7^V#os1s;+}_2gt3I50Q5H3{u$7sY`wZgu8^jN?4)cJG
z8Fu!xOuvX6*)*<$DmwK%WGC^O5Bj`239pAmUFdpp#XCKY@!2i>XwNE$;>7i}TJP4C
zMx1n7NH?*!8aAi5+V=4y3%-H8b+TdotfjVqo)nf($6!JVJQ%F2KD$l<uP|}G$a@>(
zSf<7Uw+D2h=HB3CKSh76b-ng;e0eJF${O@RU0*l^j%g=r%Ki+|Sw`sb9|orXK?l=?
zUPijl4W@~^w8$iXhgkzJ`q_3%&Z>I;#UGHh)V}VpI#4xP0Db_^mjHn?L^L9vRLGsg
z_HK65LI-I}07#^@gihZN^{Cj?9YZyqZmB-xWQE$2=-4trwQ5+kTUmGt39!$)WQtpM
zQ1rk)+&ixz%E(76xY8-G*Q_l&5xB}3|Ljdm_ER%ee4Cyd(1AbR4g>aL7=ohX)JArX
zk0M@B{=5#hX!sT7wD_1JY{C3Yl_K}Q9)I~_WAYv+VrZSy$Bd@`d1O+bZ(-1mVvNPi
zb+0F-@k}5s|Ev5!THXUGso1TMuIFS(U4D09b3h}bwErnI51IGUOK%?m<s%$I@fGyK
zHm3c@KykGH@AZB!6*pvo2_-fGhBUE2S|OwpipcPNT%wH!+NKR_)>lr8eEL?Mz&ZrI
zub>cJkbZ4Fy9oV|o>ms%Zn%jp(Jhc@626yG9z$tYX*gKue*jBBw7)be)J{eP#XqT3
z%6VrhlX9tm0Eh$Gl%^&nP1;wUaM3a<8Dq(d6jBvOvoc>wy;USF3BNyTH`0IP`9D&;
zHSF@oEu<N*DgIudE%C57WHZvg7KKxkQ2}Z>Dl&ZW_Z=?PM3X=$;h%IkinnvHo@i24
z{1yD?sLBY$b@6L17rqHr8X2?8TFe4$U^VqxR88&GytIQ*j+g`&{Pwnpiow`r5d4!W
zW0_=1(;)Ru_Lp${a0Zm$D$jt5{N+Q0K$E~}P(ltTn7qX)ffb`6UzN>3ohSYSOn|T_
zRAr`l{J~<`=ivK^Ra%u4q%!sROB~Nol<0)Bpd0>wV!$^hv>g3OOd_@%3s}Jq7KLA+
zXbd1H>6|b|kspF-N*X!K(|Xwnddz?m9yMJ6htW~ZE1|?Ct@+M!%?WzUW_-cYPAwk;
zQVZM$xYfC9RX@c^Cj58Bpd>-fN)!Y|U`S3Bia`Q1i_0x;iSzq{qTS(Eh!=x!^(M=T
zR#QT>*__H;LkKFXjTdIg9QiY(Dc(c#J0N!XyHZ^wZ*VjU0zT9TyJ(HDfz~L&&QIeE
z{<pjti^W6?7ckgo!&>xSaf`k}sYUOZwUoL=Ei(j{x5|#^utuqoXnnR3#~Sg*#=6ex
z85~UgmqK_bM0ww=>u-Nq7^1LLX+<_#MmxS|(|Bn)&B^4Z@vOc&I}QBCrg3-P#5?dt
z$8!aEy%4&fy?}*qI|Z&;=Y6wK*DticT!7bAQx)s9(W=^UEe~PfG+DBwLhxml=ps+w
zL!qF+Y7yHG%SdES^0-}obL)M>z1I%cc3k(Jo%`$!E3@reRx}8lV4zrc*XZ`fEuUE%
z{pQ`>6J7pGR(I}dR|SD#1Ytw2r>bXr=iu)Cs-DKxOWYt@bCOeZdR<|!QnPOV+LMmj
zT%u=9S2wWH!@x$rr1xOeSUYwMbs>N^H3pmX4rP<xv24;&hkql~n`ZF$^KM%bu3AY3
z;PVvFib>cXO-kr73&NN;U^ZjZk|0F`nL{6o_Pcwe!7SK3Ob?+@3Jl@MmRE?)BR}pw
zuALW!C*}<W?Nl0`3ury01zUi&BU=%1W3~^6Ud?-#G9gyB+mVd?WoFyG<H;30Ju%MW
zwpl$E2IRXSdAD%!fxf=@);q`IPuLnq^MQ{1@>uu2WgY9Ao%kEqpE%efM_UqCb6T~M
zqnDPFy173lmWHL3xBu|^<+n|=TdKR##fR67wQai@s*4Q(;{f>rwgmer(mo!vRzX{)
z`kKBx^~@Apw0Mz+5Z+q&@WF*QwTBW2K5t5yakKLcf8J>7^G9ZIVoK>J|I`5c@CH*K
zY#A_z4MR|UCTG#F@{;kB`ZB4!;CH@J&@Q0BD;zH<{SD-w3h*M+@FE6yl_LeikS0S>
zC*k6cu`rtGWEM0M0tC%E+XmLBwmdYsq;t>1mn4U~m#7AYu$aVH+q#y$w*>R!ZQ0RW
zQh@6j|C{WTP0lK>C4ckL>p%6(O|6nEq?#4g67vV+!Q)Si-M&5<NrpMatD(yLmc9YI
z9y^7ywjG;?uYljcUf(>7d1mmlM`N+g))V+yj01|D&$~7!XLt4HT2{3X^@I6AqGhmU
zus3%mJ<-<-hL|^Q7{WYcXwW?9gt(FYh@dd=&E_)NT9EN^Jr9Q^u=J~^PMwyuURz*S
za<;ImS8VaO5ZItJNC+gl`b6$b0bG9r`T(I&{shvAKn0(Hcnm)znagOaLV))e*Rpvn
z;#3wc5WejEj%ZXD`P9YXw=FP|-4TuI<|1v>4ZZgaY`A$KWUzqz$!}#H^}P)pH!tT<
z*+=2{u-HDf)E%iswlY;^hqJn^*5#^^t)OLF2gZ<P^M%i?wACmMYs2<Ob|#iLg-m4A
zz>4<mpWQO|GVGeeN0tb2Xj6A&{kpk3OM9q)CJ291Um`bDZ<bwh%<qf%H5-SKjct<C
zA~>r&hz$pSd_$IHJ<Dpku36hav%J})&n#vda9}U?8^nRpmHA5`2mH~z{ko@#7&eIs
zfB|-FJ5e~c+YWwK8cz_zK-xC|O88e!^7NG}T(g^cbBR?6qP{iXN+enntxa`jf@}JK
zi({r&49SD^AWCy9d63g{|I_*tJ<>br*Q5$cRG}+xa?KVt^@<69g1}m(R=^8%^)+>8
z3gG%H;0GKl=%0X+<Ap59X*Gk3RaE~!Og~?Q1tJXxN@kk12HozkYG#TD7ui3Qnz#S;
zxBdh6$JenIXGnDdfoB$rPvN@+BU)ZYvL*xmZqc-u154MX{$Dt7{uTTaMw5XgS>7P1
zQt_!`m2A^^K|e$9!uD&=zD{9#cdjBKG5VTU!6(hm=J`x}W)=9^YmIJz&eXm)H?nGk
zsGrDB5F-;K6Pw50=-=138O~h8HA5M7*4*9)yb3j4JG5+;>p?|1K!|iDEl@E?dq_1S
zolZ+XIdxh(DI-3(#1a1pflWvgfCT9J`^MfVfKRvveT1n1KBHZoEr3s{g&zZAUhNRK
zY_<SC3f1=jGtvwB0ewW-tU$x*Hifkmdj$<Bz3{8+y|VWB*xVtS?bf<WZ(FnGlOxI3
zq4toa*PDAB5s!_dIfi7-o><!5yDjhAD_SUniQVh0?MlSE>YToM15H>2Q`OS4^C&s`
z%CG>)v&xnvr`+Aiu3aN_b)&bg+r-K)B@!t5_G~s74YXOc_(CQV&sGgwyA}T+5K&w*
z+ut_U?DnL4s+SI@%@$`Rb+iy+tqdlBI!hU-NiPGj_)+>QEQ)2ZA0bWZ&$Z&bI}4R)
z7Ov;Y!nKB3s9~~D(qv%>!LXDTsZ)A@PU!(UrK{7F9-vcD_JCxjhtI~`l(`xT7PTM9
zTI#5I2>Fp&Bzkg-o`KX<Pu^HMQH5tt71Vw+Ja?*qPKIR=BzhLq^edGmnCbIHhO&=9
zmTe{<Wo3^QJ}ch)@TJ@C8jGj5-nV(x?RnPfhswwB*s@P{=YY-ux~DVPp6`h{OEPEg
z(CE<ZhqqpL;$ZLcWdvVZA3wJoD4ebP^4+&h0>!he0iZh$(0v#v{v_6jy@}ARPBrD4
zb~TX-)QCy|J}9UJYv4-G8i=m;05sD6Kxv$v?oNI)Nx(;Sr=f;yq;!Eq={gAg&7)UM
z{8JF`V6f)-1Ju0~@hpYEMBx<WNxdBHSKqwMyxUBe4R3me^b*|slbD*+d?l#~BJ>nA
zGC+u`dA{%obd6~0WuQCF>YD}3ESU+BG<yth7Cf2~LeFTy^Tx|v?vI>7;O|%yvIR>%
z9COYc@%8K;&QGjJ2`tZ$1n^x=qkHnZzI{zg+n%p&yW+viY9AwS+}pmfBSa8HEI4q(
zXr0YvW6e&BNf8C!sVW^e&D?a|leaGKzV=J&mD?Vu8=P#0{YivAeG?JIeW<_xE}lXC
z{i+Ke5QjjNY{Nc-Dnxb(3Qr_B-MYSamvp^b7yfRY&~ErO=JnN8GZ$XUTi`QsRmRz-
zURQLszArE+^`XF+hPo(uGV_k6Ei-UgN?vX<&KAIt_0idaek=-c>D-5U=asIj+^CxO
zS6b(sI79(=!`gfacU5D+`~t@tXp8s)ESRYvVBMl6s<(vuuIdkWMPSiDR2*j7z#G)e
zaLZQBqn!U!De#as&5ew2`t)eRBnpZfdWR~YCt3hflh_T~s?VwFYFi`))nwMVaX0+G
ze}-+g>~<J2c&xi4YuvMYBSl{cvlQ!={?Q)aY=3WE%WQXF<6xvu8oaJD*+D>+a-NeJ
zq$4w@(^?Y`E<QM}U2O}xoT~t@*YBGxfGc*l%oa-5q_10;1tCcPUNXcm{}|E^T_1cz
z^2D?N#{rY4<#Eme9g56S2F8%7Z*X+1u9KhCLd27c4O2aKXxz0llW>?xoRtGE_+FyF
zZ$)hD9b@tD+hMZR-nl%sY+rZB`lT03wy5Vw5*W|fIP#yYeF=0NXO(U(z3*%FzVGV2
zwYDUyTbA5iEwv;|vST^1WjnSLW0!3ywiAf`fb0na1SfVv9$_Y&!vo%V%p^A6NZ<|c
z9Fs?eaSkvc5VlFq%!5Eq9mtzEldwd2|5DZ6l3HGpu`IQ^RrOcZ-Tr(3d++!6uF1`v
z+aKJVkjUk7l|rRaT`Mv}{8k*3evB{?&k%n={62N+@H3Fl=TGd|F}8I#{Oz#$a4D&V
zPJ?pHKXw>=oggkz?y|4@!B3uehJBj<bY)@p3I0L$&iY5{TiFful3JCN<aCft{S#8~
zaxn)&@mbzcMS>vA09YalIOE(Yc#_C*D59UZz(y!b@jt_U`e~knS9<US&#k;xzYa|o
z{S!HOxw4vr7j(?>9JnNs5@FuJ;!+SQ4^}XiYzV-L@Y#C9G8I@;ym0$M!|kxjzbCRj
zI)dVC=bw9^sJMWrFggiJI0H$EBS`^ac_)&+4b_<33<Gy0dnzD%43It3^S~%bjQZzA
z*<0dPN@18iP))73s(^h^X%$v~+&MN#zOq6xsNk;c58Q<1NV!UmZf!`W5-;s3B`;#h
z?4Iu3y;?F?OX+4fx?U*(M#t>;01I{7!WO|!OTGi7aTl(iK3A;<XT#9`W;6^GKi{UH
zDQF^!of!pxb9I)T;!BkfljVzSqVBG1kTDiS3R>jLotL3Vb)sasAV=<-6+8#eElu$p
zJiD0XxyJeSrhJsdc}-;0hvIUe`LX0Xknlc0_;oK~Q}NObvg=d?e3~4wDq%UT!S7Z;
z0)Ak^?`nP~@IWR5Gr&ROX~cuh&R$p?^2c*Gd%Yvj2%J5b?gcLwCaNQQ&2Y(8R<`aN
z+fj+}v(?@aeu7<BPqPjoW^CGg7%pDv#3@q965OkQ4h*pmjp5|rAhR)^1H*t2gKHVc
zUTQV-%VNSds{$X`+zSg1G8yKAMb0$V1Q1g`sFkliI==OIJ>a;?O27v-?Rb$v;G3ch
zbmuf)4LbMm!@E!If!2Frc6MlD3!K4spWfYttoV>-XgBy;NWwKtkMHiI3#Zu6@t>^h
z*|Naj&F-&nuTQWxXR#is=KyOiI>(HaDlZj{H%t$#Wx7`zZtp4flb_=`IQZQQJhyy!
zCmbJGYj_1|mFJ`lYb{))#a6F0&DUNY`cJdb0cxp@Nv=LRw)Mn#Kw-iQr}j)OH*|ay
z2n1|xMlM0R_d}WGQxbbSGkhHjOTZqhlpod}L+{{E^aUVOW@0n0E<Lk>c!4@Zs0bgh
z1DmJ)P@1egxzsc}!4FpbDZWQ9?O~&J2U7l5t{8YxM&2m=^6gjNco|9rGtCZ8@Ekb4
zC&hF6vUmp6@>iT!l7(e;fsGh~z7EDMTZgs63RL=nl8JdeF`G(di+Q{;MrpbV7pfl_
zWl~|6N+zKID~!&FdqY1ZcRD2h=#Ih>qHcG@p;S5|f6iZxo_O|DC{=2M-RO7A6>?yo
zU3N@S>D!2+Cy291Pd9E%e-zU3TxxrY18&vf3#t_OD*B+QJ+Uo~=Dm@1#gDRjsdVHh
zzq`7Po#Shjw7<xYu$^_0*o}D)7}hHy$;H*Vmyup#lUojfp~_&a-A8#2j#iuFIXK=(
zk>?sCE}IF#iOwt6&6BIJN780aT+K7-+e%w2&uoZiNUN3(TuX<1q6#G(XsWCLmZn31
zrBX_zm75$<*M<SWQs;HEbS-t!u9`&KbA0J>L5FT9o<KUZMbM!<FwVCJgSYQ4KpxxK
z^+P$!M|MLtvpe|7YGH_H*}gik(ULQcDQtTS0(*^}otVQ{fT;y~^&;e}3!e^H%TDg#
zIWPh{#B*>A2OQ)q2S&lxwIH$-jI%aZg^C*N8-Hl6a}4d9vLwQ8wUnkLGL=l}NccQy
zkN(4G;h+Ap?dWU<oTOA63<i_SAXlo)=~|5*ydj-jdR)-SM~UwuoxJzn`Oofv`gb4*
zcy$=?Y8t#LWM&|v{EyBL&kq-l9X_zJ^W<mQPw~eqJ7x~>$Mn);?B4oZeH_sGV&7DT
z?P$h3f-Qs!DzNT~=$S(9wYaBf%;TTpIXLRE1IRw&ar@xFV6KEiJ33k;8^LTsU2V@$
z=^AV@wk^H>Aga7tW#7|6)w8F<4#Y>T+~@#&M5+fxfr(>Lpyfam^tOQ0llJOwK)Zzr
za-~H4pgouWQfEa$(VO&8P-Jo$kd$tE;|;4i_O+yM03Z1<#uGU=I+`6~|0nrJViRGd
zqJ)eH18*yPAS=H_aTknP@U<y)iJB?99rJUW`uIInb`w9(PS%Imj=C(Y@zympq9RtN
zG!~Q^jumpN-Y&e+A|`wKcn%CRzlrBo4`gqSB(63sFFwb4k498Wekk9Wo`!6K`3`%~
zVGlAe-|<ayL8DTbQC3ASTY5lbCZ&+8bKN=S+8%UwOz@zki}2IG{HRTyL)kW=a^tSF
z;61y64S0fh4OgH%Kyl|E-LYffz##OY*<_N5pjEH|Zs7430FUn{)X<Y=KE@1yFIENF
z8zE-u?EPx#r)nRs`1m`j2iV*BxyoRc<!9LS_3nCvH8#Sc#&lgO387Kbiw3M-?nmQ>
zgP1V%9X_6egU{X0b8z?>mgkmT0EbJB*}HU=G};Gtk=sw@E$;aWVN<vj=Ag4F4rn$9
z;-JZ5aky?Dd4&bQetCC{(bJ+|PHuv!Hz0~ul}-ml@vuhSKK1s2RxOs<0w72${qwex
ziY1KxGO!sNiG9ds_<W&?3eGVb9U(ZaSc;w5@rs!*RYQ0|!@){L$FAW+ztXS(*6~Wo
z%yZyqaRCDzZ*K(3%VOjY8WPiA{t%jrVqeFH&`Z=TfUWI61Kqp}W9pQZv$MIZ&!<Lo
zJHIoV9XyEECGOghgM{={%7b?RLf%&0!QR5xE4k1hUtxRdEfj4kUxTc8Q34RxD0s>K
zJ1VyU0>e@2x9}Vsr!vTMEhE{NYuSwu{DbS2^q)oLp|SE<Kcw;ihQ(WgTE~B)cC=YU
z#48oQmwX-N7#>IdaCr<aLumGfLPXczy_(8gCjl)jW6(@OkH@-WqRe)({ryaucUQ*<
z4bQMLlt?UKceqr-vnAl;WynU8*qC`{2O7Z1HAZl!c@B=jXm}2dViy>Qhe<B4dThg*
z)})QdoNK0@$^EO6G}VJ+k&0I%r)il&s<6PEPN!c_KB0isD1MXT*AS}1r2kD1%S7B(
zIXFn7G<XwPrn;x>p)+fwaWMH?vp%nicwMgw8D-UWF{A7W8gxooWc<h^rNdm2{RU{+
z=ZJqq_GxIyISF%L=VRNpX*nH?P@PlGkKG4VtV4TH>jYo1PZ0TJ>|-p)9yyY~jo)0I
zWLdtqa-T~V<MV8wZmB;6qZheY>{e)os3p8|)KV?5dg&-EjJ)|ao`Ylef{6}|o{#Yy
z9$)?tifrVKinu~EWEHy|B{vwMw&U@Qv0nBYrNIZ7RoPSaUd^Y4xw_b>7bxYj)E;>%
zT!l%zkQT~^QYN=}&>w(&z!p(B0<1%jnhd{2@?in;A(PzF%FwIp>P%Z<*)qTVp)CoW
zPWTv{fIi;6whTc`gKiMtK0<$w7$PQ#9VCM+wAGZZ!uo-#LIZyI4Q8@l?JQk-|6Q0^
zEeVwa;Pv$j@J}WA6!^8Q)tkurluM$|(VcQR%yS!17WO-3E%+tfDR;T#ooNZo+?Kmw
z>UIuZV$N>>r_FUl%4+Z$(dXoJ-`LMIvu|3hJNxM04zeBo^{@4f-SV1$N@#g5Vfffr
zaT+q&c?G6yZ9obkq>2%IXt<ID|C8bm<a(iTHDf>HG*;{En;aZ`kp3+Phwoee8rL`G
zzvVT~KP5Iumv8~B;l)N$5(tRsaYth^5Q#B10mn)V)OukpOHZ#@(Zbk3ghqBn8%41Y
zrXd=O>1g2{{fJqAPsm-^{>jPS-7b@DxaX~rg_%s(fv+qceCpPeA&~dyvxSH++_mkV
zdZOwh4MyYA(%$X4YSy;*mOPua&F+}~tv_K`-hb!#-XRx#G~^3!$xeQBHsxVV8E+^<
zsi?rZtph^~oAZ(K)~>)%U#G)SPp#V-jci{(ardUQQW02sd)w{)zFK_iZN6Uiz4`tU
zrEsJZaqIAiCpU!ZO@MqnP5%S24tPEfq3nCXyAfIwLZ>4tuzEoo_YgCEwZhOwuOu`K
z_g+npfmoM5AFA8ml47>uj3J7h-?)ry1ga|1ww#%Ur=H`|V<C8QS;>X!Qu|w+RA36u
z|Ka#J(k|}pUe>5i*%~Uox{jom`x2MmJ=<eZz_kpx&|CY+XnEIqe`2g!jftftiRy-G
zLd+1aDlUl}d}?P(ZL(_h28#yf@yrghbKTzh-b691pSbVYTaP?{U)2~HNE}q+MjqwT
zJE+{GwBg=8gQmnt9?qpt0k85I=^|0U2#n`SU1UcScv>iFXhEbF5URm^Yx838Ujze;
z5P(q;iW>e+g>iqq9VoqXF+CQpG!i;MgBr-NxL~=6L46%*l*dtWjl;1sYPv?cX61rD
z{milz^%J9bPBhEK3gznOYByg!ozhyCEM`b3;(_=7L{3Yygp~*oU&WZdp{dZ}5X}gc
z^~+GH%;@#?73ftMt?C78k#G~%wZLWtvReTuFQ|NQ&jYyK^Erp1hG_UIpA_nEgxV(z
z0PlbYo#*gTfOIb=bM2b-&CorBmI9ava%d%O%&CF?B>ZkrhrVA#&?R&I9f>0N#&QD!
zv~RUw29WQbQwcXHVg?8|(jGHl)umgm2!xfUf!M<N;bEZvPXemfh|R<<ET!Kh#;Ap}
z8{^w9ftQ=SLx4`m8ldEq8d!tfL*CG6ZO1I6+SZ9ot+>(}yjlQ35!wW!X%Jp{!+@bu
z)Qtfq;0PBuI7Fz})+oGKNQwhp%Py>HXX|YeqlG8Zmfz{W>e~0$`||Tsd7GS~BvO@3
znb@#rw6txVH@KlP7TtPR)ho{EmgM@ZtGI47Cc1#{eGl-lBRMe8L5;$n@EtZ9MvGCe
zv*?U2U^HyVXxtj<2^$A)dw7EC6lwq7zx3}I2^$lo9CcLutRVs7H$lDs<E6*RJ%B%9
zB1b%nYKW%_aGw)YW)EKfFO=<wSZ)S4K!HLYfvihv2;sOEcxf#A4V-DnQkBC&6f#f`
zGJqf7i2G_5=oVsT0&T!tM72{`BcMK<1LwpuNF~4tQVa6)1irnP#Qc&j0}o`D_ZTiy
zlxc5yPt~8cD<vc?SIT7}TOjMziT;>bq_lp|@l8pEN^3M}A^5-4l4fi4|5&X+1c~T2
z4Kyf>J0{O);G<puPa0kJc!GpNoFeq6<qvWlk8zD#zxo{uGsFonLv#_}K)#u#)I%on
zWWH=7C-Rrx{{doGUMMrnLw;(|D=IV0zd*%^AfXYsx;DBzm^7SBI!!<(<H>^ws-^Lo
zyV6+lLd#s2!E})|pgOt2>!R(0z-6sR+l9lg8%zT)G0`WQOHB8#v`*wEg;0;J)WUk~
zL)!L>Ld~h8{X&jtI{`(l#B>80{xCv@Zx6NJ)Cpu`E252UBEeTan4xXnE50k~4}hPw
zk@O-yyG(FH2DEEQ6d~@#5ZvCv3|U#dLj^`9ZQ04<cMU(m>t!G^v$ue8#u4H;0vku}
z0$jnmxDjGKZX8;@Q3xJ()rKN3knaMA#X!o=j*o>=_4n}DP$k`0OV=GO($Wg_ToiC*
zL1ZWZKSHkq?RxDxGY%b(bKLmYFd9wAEgw!4CjlkmYOcsyzKK=neiQ^w`UC8u0IQuE
z%@mKI3K6&_!=y$s#iI?61;S)79)rC8XsvJSXwHzH9<PSC+*$KAeV0&ih3~TZljeMS
z*XAi_b~v6N?JxtUrY`z_fa?X~65_fZa~=K=T)~x`U1N_D*v#ft8w{dHh_;Am*&Tv>
z_oCnwA}>#s9_w&~Ya+W~RMp%sz_5%%t~1y%RC6uo;1tC*`LUe*YrBRGLO(fi4cBlP
zF#!>GLeCKPr~L|05u%a2gy`rlCCIpmOc)_vXH-K*6=YOSb|9$7Ht6NAw?!|9!HqYo
zB2_K0=>Fxf=+9Fsh~s-vPfRQTb~-MR<XQb#=n_c@RkN^XO(1Kw0d~G!{D<LC$a9>2
z48oyMjjGt|fkUBx)qmt~?>PM54)qj|eEkS`?fpB~(Ece9$^=}c{Zs7zQ9t>A4t?{%
z@%0}+cL#VK1Ft7)_ug9U+Hvp1*uA@oUGw)s>OHk|ivBU69_*kzBX&>*dQ^g}sRUV5
ziFQyW&_{*B5G!t;L~WD^?-=({w(Xv*8K&0kp1gYVBslY0&691!ZtdpD$L8as!{u;`
z{8_9nlRQzMm`=lb-oLYUqUOm;Z1nDtp{>16^0#+>>%OWX*cDnD60Nr6w_<4bv5ujH
zwSNDz$2Q!vXV45{yQTj+J2$xJ1d5+eq4*h6_ae6JfV@6+5~^uZr4buXkvUGnUX2c-
z6ANO?zG=S`_DvJ_Qxo@1Q<YWLNKL&i>5~{TkUq|_KG>^an1Jp}`(6#PRYN?_nL)L;
z&M`wDYSlpJE^F0jLPA`BjID&4?z6}nCDMi6CwIgv8>$^}r$0-(kb3EyNLlhqq8QSP
zJsZoT=zqse8@S}P5k*s9MSa@1?sTD>jOqokZEjE`h_7CdYdsWSQw!KJlw-mPq&iYo
zCdZ<BtG{Ng6T(!6T%Tk!UOtmV2dcQ{k#=F0TG1WQ&K@Gclu=)$WJ-m?<_TLJx$geZ
zN^2My?k{?@fv`s-p-K8y#%ok6l?qFy-uvEjtL@=^J)<!_tx&0yI*8LX{XS2<3}{j#
z4cKqYj+e%##y>Is?6|ZA&ip?F7;_|O!?3N_yaMJN!JCu6DEly`IYKjsVk<zJ!xjr@
z8C}nl|A96yQ9&0{Q$}tjcpC-dl{C+4C{5;<y{fm28;v`S3q~44m;W5%i;ppHVuR2C
zEf*lmw?m-l7Rd6JXuBNg&HR!xs@~!VqrvDm(mGmzE&n;fEFY6HZ;Ga(0ay-uUOotB
zIrVbq{JoR8EgN!-N&+#-lck&bIz|hwSb5{->2fSFb9^Su_9v`znnv{y!Jb;SqnxnD
z%QKs2%P~^7fdf)vb6CPYGjQ@<ewQiK6Nz@keZl0=O@rOLYAKD$YS8Ez1H`*z9E>@X
zbH}>l{$R)8CIWL)dQf_pc#QZrjJDNB{({&`Yy&hOCKkxo&xI4_;}5`KtzYlZ9~|C0
zY}V_|!+RwY_Yf1uSs#C_(zk7YW&Ev~jWauE7G~(oOlD?F=S$K3V_V*=Ogy0H9qc18
z>QUlZtF<lA02f?~DB1SPWfNX$HQ^F}!>=GL76#quI?f*R@f^O;%sAl8jA6z<12}`O
zwZHQv4qUCW<xLJ;&!Oiz2djJp1yf34&RgCem^5OaueDjbZ5JT5l3&)V^0%dzbdBYI
z=|M^&*ZATnTjM>hH$lwxyB(SJiTFs)8S*G#9H$I+kF_%S>LQZfcwoqpG%>c^w)-~C
zoY>UyYlz@3CWwRtfRQn()p{`n(Ap)KuO!N2ZojvUbo5_cw)%H%h{|MkHoE@s^s?5(
zW)c7*@cf=SDEV8WpLhh>&jeu%r3IUi7HmaYuoY=x5=skpHI0&gHf@>@u^ugNWAn|F
z5q||5&Q762@XBS>vJZylIdH74Y}4|bjg{wHQ$R_l;Yw*4*6*qm&l+5#4k`@(M8;Ox
zQ}%ou^X$KfA=htU#v4$(w`vQ!Eefepx;)*2X?>MM38InY&(e<)dx%rWN17QPF6`-q
z5AT?CM+-zD2)?v)lY7|td0A(4lAmLHVfIqRPNeE?mf>Yp!Rdi{G??B3l({Tq&#nj^
z4k&G=7lxRd<heN(kD}%9FfxYcWL41vg6T3i60~W{6J5e|yhiT&>g}~6k?H;rd$1N9
zfxT!b&6&)hEY?dnxA_m^bhVUhA?w;apf5IC)lk~Xq+X-3tu@IRFs{iY*f9vWLjPWx
zrK055V8<X8q5c|m48qTU0VH}DS8JTj4jW+fp7eT?dT1pzba!%?H6;0gZWgZSd?PZU
z#LcZ&fbAo*sPq=DN+OPE!J*wro*O84vk?n&lF;$UNkSFRs79-Gm#6Ee^4GkK*tEWs
zy-rHHoPT-p#_1(U@ed_G1yjdY1iI(|UCt&a=TM!pcD>dOzKHJRCSsBuW(NlRY>uVa
zIbD+PW=&90BNN+N6dcO(<?T2fd>N+h8@=NK=^S_%f;F&|nr6G_bdZpMj3$AM@@>o1
zABwaAcBi(>|1zukQ`=Fr3D;|EXD1{-R2Xq4zT{mRZXq~D%k|!Pdy<oXFD}@j4sw(3
zH$BxxX8#sXz@SqJRBvI1(PGqUwQI41B*m>Kmfmk~Z{$0Hz4<KhGUC*&M@Jy1=I@EY
z<lFjV>kUrGvS{?)==A#TD8od%*H24{ee=f;9Y3^B#XnrVhds)U#GLc|K8O$^IXgE2
z%ZSepPBi*nG5-oUD+D+PEfSvJTT=QWC!J{EhgCe+7<%74&+TL9s)&_y6N7O43!HEP
zj0cg#DgBZFJAFN!v+Y&qx)rL0{f+Fue5XXJl*z3q5AV}AdT&huoY_yca8qs!#M(%Q
z!VtKoY>=<Oih#&)P<!p}-8Gc<I(4~Kc#v5|X@9{Y%4U&8Jcli!loBnXY#3<%e!Px+
z);BbT4B`I5e%=1<+xP2e*CedMTAzpOoM$7hSvc?5_Drz#AvVt@lm5P3AJsQSxcCSw
zfhNEzxQc=SDB-ytT23TGNO;hGu6xi>UamP7(P!ub=AbV!MMPXY7h$auWCg6EC)l(B
zjjEm-=l*pVWO8pSi;ccDEN+v<)QHE1D!3p9c(z4snns1rtWl+NH72fY(Ob)W03T05
z{0I75jTJ**sf$#{U{n@^QCSS`R1-ss2{8j&#3lcD0mrvK!ISd|o*a067e&PImv5l0
z-h~j^C&Ya|)NN)?*J5g^qZYnIN}C`M7|2)%$zEw$)OD4W!U?)CT3Bd8KdeC5ZXiFb
zNX_*$GjsIQa+Aku^B83lPoSkiG2Ld%vbmw-8{`%rOtvW-D~5M%o*caWkz1)?Baim~
zrgn@(<~CEunpsV>(+_<dP%%Yn1vK&Z-!0qV0=p0Ga})8AUi^!fWCUthg;z^+*&V%_
z8hfj~|A%rf+?dTsMvY|5K*ptHFb+Og7bL?$G5~)q1;}uK^rKJxWY|x}^yHlZG63NT
zltwEX@Pl|c0QV140w+5F@h0Fq$gcn#Ujt4I#A^Yyv!<?#Fo1~mL~=V?Sxn;pXipi;
z9k|m@(siB)kOnEbkQ!X5F$Ts9OagTijI+G44QR_skBE%urRd`%MN>;x5Qd~T?$Ak=
zUY1DVev~#($gGqsN$5XQDs#YP^BU#!-$;}yjr=eF9b!gG6gm~XMPpLZK<+8<L;0Rl
zqoIBcaS$nm8uF$4{Xa?X2YlH;<}qKY?|-Mf4iKRamLetk$X@sw$&k?i8TFG<9~t$M
zQ4bk&lW_@|pvnFLa-g3aNRxvp(%`p}69%CO0KS%0K>Q7UFoHoZd<<X98n_$;Kh_V|
z&~cFLCBu~Au;CL1iJ@#_SVLzmQtSU*icG=3rQphj!OXC?r|wEo8^EWwI`SWX3~9do
za;bC$&>VB7xzQ8e>IwftEGc`2YkGsv052uc;Omspg*K*08ePN$E)q@kq$moAssvvK
zaO}qrKqt8aUJ3Z0^V{(%ovgt+5#JJnfwtjd%dgV=CDNsLXss>o^>sKj^tUPMSz7B%
zczrSOZt0J}wgLat9R!Z&YZUdrDWwVMoX@17enOG2Qc82cY4<=*%PsmQpQ+C%mG2#C
za$RqcE7gGMaxGxGQVEz2i{s$F&35q}rBDG0NC3?o2NIAazKkUx52#>-$TZNhWuQ$P
z$dGoR3l|{jqMft}){7B8Vn`*_ln$7?gXatqWM7EvQIl#vOpic5tJV2jq6W8Gsu>$8
z5WF*2wy`T0R2-~3Nw_mp%i+r)MMXetx-Fn+3!LbP!W{E?Lsqrqr$3RXtwFaZVkDKM
zed!$qX^#0lA&W|K<p&a#(dY6+Oq6ozk13s5Bc&ns=H8_*K-gcY#;hYRl3&%CwGvvU
zk}sVhr(|#+UA0BOG!O0C(kc1`%4#oS>bU?Vx}i;SkqH-RN9ja68P)aZsF;#;!ezRC
zC+X;eWOb0fnnPu-sm3K!#JG^ggL`%*u{nWe1w!t%9wa2^ASnVgrbMqf3UTYZ8nC-&
z+=gb6Q=K1`<qJ-~k&>NI8tA3JR~W)xZ_uKYk|h1E%oy~$!$#TCd4o}^vFOO6#H6CP
zS?xM0t<Y=V%TTYH)lxVoLQAogAgG_v7l|asJpU$P08h%mJ=daWpUf;crb{`hq?8fk
zC6fAvgVo1ST4uZfKDzx1u$X|kXCn@H$axMNBaPuS%=ir=k9sNUCo+Xj@!qRe7nFGN
zGfST^nBiX2ltgXR$l+&8$H=cJKs-=^V59CpP{%M11GPU8fk4hO9b@$C>^7(2y(i=b
z7eNuD)OV?})J3F;e&W-}XOmm|FOfH$BVeWVC30)oqmP{S`(4(P{tTJRlrvN&qjH^&
zFZMpJI!YfA*8kCl?nZ=R-&%SX@kdT`;N*<;Bu8WnnLlJ`4GqqZyH0cQMOE+P92!H&
z0|=;~%{_5~Ya)U+7uQ+=L8-FK8*oOp_ov2teDQH^WRup{8I264y$Y>KH?U{j==P%X
z!I}6#)Ko~NN@40>G#a%w7fCRwQb%S(nhCi&+**^>7;>8}Uc0AfBKt`V<7Z;Aa179j
z1GM_0%uGayUSb=fmCBcUf!qR9g5;;lM#Ah<=~B-H7aa$6M>@|)kBSMXVo`whM?`@~
z1yj#)_&90j84esNrkjc@;AvL+E?C~>LKf7DlTFkYA#RwvkV)HJK?9?c$_!46#c7Zh
zwsw|p?sI-t>nnsKm2AA42o-z=`kl(+#-xe~*#|XRSei(?r4ZE|{8)M^9m#IoKN=bB
z_9uG2ok{z;Mj-YscyhbcLF9-TVJEK0CGf<0mGwza@bmgb`l(d>Y57sSCp^M$$J=g|
z8IScz&Z7^0p3^U;=%=`pJpME%Ke}wgEwuMogQG1A<1)-v^u&~%lE{NM4?Os(<oLcJ
zOEMm{sbw@YPjXef6sXq6$CATQwOkG&>@KZItFi~4_{`Li@vuy7G^%tao!VkjNdmT=
zyLR5<2`P=Rr;`Owb+^n2>{vI(6h5nTbiY8(flww*K2kOqeFq&%I{qB9SongbMb?WL
z-CX1*Jcx-u$1#hV!WTGAt3V5hE!i?h^r{eKK#1>l1dNPcmfbbD{+6QCKfI%qpNY%$
zh@-NH<JEW=M3)+GAsVh_sDH&A9M0ymQy&?u9GOZ+qhv;^kkDXGlrGI?GXAcSP`J_^
zNOr?KY!y87A)xOOB14=&HAxu|6+Lv$Wi+~?m&h$;8{sma(&?0$lYR*BWlucjUsRs9
z9~F1;S`@ab5ZA6C4SYKDDGr<?$pAH%kS-dW=TAJw`4{cV)13WiV_Pq%->rLIHPFBq
z>oOr|Vu4YIoaUvIro{Suv{VSFR0>@%neX+VJ{=o7Fj@hD&_j|9qoJ;_nUWArM{HdO
zqt<K8PPap+QA!^>U0Iy$h*#!&jFoX)yvqx1dYJk?`Mk_c^bj|pb!d}`&@q?Dxw5e%
z8dN-yI~079d9vfM`-tu^TEF0N<H*~E%edjdl2bgv<qmZOpX53i@Qsf|3lXg;^~TyL
z)2@%Ir`bzDK2J$xv@B_Z(cUqQPOH94rgK@WfZ3C3V4o&!`LTj6Z&gYu=|AaADoU$y
zb$I&hZjXJb1XwSD{3rjH-Q%|R^v-lU6-tHHLeNA9`3|)g=<Fa-CvG8rjWasa<R}p*
zOymrh(l(H@7xPK*6>+V*M9!X-6BE#wxrj~VP33q*a;kVZK7Fce-Dst(>`8q_PWJ$}
zMx*hUPxdVOw~$*-mi?q30_iH$tp84;l-$lQVi^I!IsfW*z9>M!zVZu*_=zDv-#|#>
z<$O_ciUSw0PM_iks{vd>qhU{S=qj(HtMrsla_~Apr2M3oZn=;h1rh?X9Jo}{@Z$Dl
zv4O>N^&0w~RVDP`TfVx4UM3UXQG2z@ag#1EbW^vl&!o~u{f}qrUG7lr@Hl(hus0QR
z`$JB~5ggjm>CRd&sMX)@?{y_y+Wszg(xuIGXCDgL$48U>A-&}14#u3cXV`*Mt5Mku
zCOajgtkJ$;e5A|6M7#a*VXrpp3=P<rVlvBix@1!O-{g9Yo|q-qW$=WT_ItgQ#1&&g
ze!bm~_I0DaPkkKBNP=BH6E{H)x(PK9XFcII#%;PY$;IG7+Y#vzu`s*Xy3GtYBB?vW
zHI5Ohv5U(R@{l@LtH!224x9;#8B936eIYg>#j}r0oP{zs=lZ7$4E3)KY3*aH+4RzB
z@qO$3(-993%@%>B+6DBKlKvT0VwbV>GUU&|!x7*SA-IV1oWrnyp6gf5oqu3~wDSVz
zD5F1t$8o+4<-)w`-g{drKmT2-cUr|ewmS7vZ7`P!1T(on^PVZYOd+Ev@Z(~K*PH0@
zc?s(MpOWv88gP$6U`@w`7@z#v*@T9G(})d3{>}?g&w}MC>7CGiqWipzZ#0^^1U+Le
zTJ|hREl+V$B-g_2Hj~FaIJel-{>DkdlxBOF3<K^@t&l18R%0YA*SpN{VKl*PHW12W
z1Jp~o$sVsvF4ve1ZW}G7(?zOl)ze^U+6APki`WXEWmrw*$-jcTo&kb0;K9xVFHuEa
zf_tCAO3VfKL8B;Ff>`0*&rp4J>k%!rnhn>6ZX-^;&00;lnPI41a+8~3+(xDJM=NFO
zoJ3`EqH-Fg?#tg-D_Vprz4T9Q1S|NOOeLe?6DusH=a$|w>G2a2{|278rNVv7IhElc
zdMdHP{UCmVwo>$OEAOj$AI)nEno9o;%)1rh5Yp715SVPwW(JK=P~1cX%)Azr?#%F_
z|4ealuqRPiNF1@XP*<pP%)U_s{~>{G!$5C`7mNNg-0~AvR5D&gi&wsf5{1j?m_~2!
z@4$m0Y3l0skHlqqr`hV#%M0DX^$j(5ghIB$e7?5X?&{2D?fsK^%i5~G@;znOfPd>d
zGrd`N)S(Wqo9PoI@i?GXO4vIqY;4*!9pTnJ7h4S5{0kz1aAhI1YKSztnC>~Q<%pI#
z!mCiD`Sj4D9fu4xgGcS@3svJH5geg_qp-7cU?#uJn$_SVom%xs=wW~*+W>s7FM+2q
z1FuWi%hf_Y0{1ZkUZzszctXDz`aF&nTK00)JDvbevo!R1F+8|-xn2+TrNq=7?9@Un
z7^@$f96MBtd`2Hxm+4p+x4_rQ&Gb7X3p43h{a|(E@N_CMey|p=c6;4j)l^5N%QFw}
zmLuP#z6kCXMme|QRs5U^lHZD=91CHEA&x4S^+}|z1;epMpabi;_|`y&!BI~0(AHQ7
z9^LvxD@*GdyjUIUl;+ntQyp=eD1cHOV+cAscMUdU9X1`W#KWC1)~PN|C6#86W$8UB
z+}%nB{3sr(Cty)Nmz_F*Vx45yx6>II>wu^LJpbLo^P{N$tVi98qk=5?aM^5D_r^RD
zU1*`>Is0PQ7j#FZ$8ca!LWPEnz<?2tvv)kl*%x(PU*OQOI5sFPFDw+B!B-T$F;@A?
z-~byMpn`MV<*j|r!0^r?M>>^p%k+#f;K1QQK&J+AFANX#;xm&95ZDP30*d@F3BJBO
zK0umB{t&GPR8XHs&`IcFSfFvLF2@#wdaHNAdZbye_V#6r<gSgWE_2PlUq_W1RyVwr
zHu*yk+({K`Fn#HPH^sDC7JElDWYz^3IfzDnWVGw#Qkhh3k9(HBwp`z;zPL>xQOI;~
z51{qbcS#;RMG0g1ev>GYo6h@F{*=aXiQHWF5SosYujl`er}90IIf~NA;{PY@OW@-u
zuDrYYoavsKK4zw;=e{J3G?GT==$2+Qk}T`6Ey=cQ%aV22manlTA7Bi@m|zpmKn#Jz
zNtS?F6G%90%eFrJBe1_EKmyLU@B@;~2Vt`u*^qUP?+YQYc=T0u&x}UGPRK68>aOnU
zR`sh__5SbGtM}NiJtzK)h>P-3YF}<9vXO<U$m01G;jbmNWYhUIN0aKaBKtMfK@858
zA|)S9bGR1#SWQSaa(RESnrL;lNG{NNAw@3c#nwfAjS;VbCMbqv-Gw#zr7hu>u2_+;
zzQ58_6>@MCyhG7)UYWNNsvh03FtNWlQL1n}Z?IX7W&<Tid?4iV+iZpLXsD@J)*Fm0
zydxSYqhKs@c!G+YuV&f~LV7((J&09mI?-t?=nbJ>7tB28oeJG==k7O86@Qb_=BNv5
zNQCGA_@g&e9pCDmGKcO@+Rbq@cYo46#T0)tt>UYWHkmkWs(QCr`&pnNA!Q$315eVd
z?D6wstCn*dXIMt3b>G`ziM!nwb`;PgP2q$fD-iUM!y7;W(tfU|bQDR#U)QU;(eElM
zd6JV<p8gSjkg`CGre$u{2esksM$$wK>WQLh+qCbgtcssaTcD-IN>?!Wp2|_~vv6ji
zZlANrBrjNF!VlVmlFdk!Z?0<WuaIeomo0XIuC4bkEy{?RtTJDziVo0AYlD|gz0}!N
zRtl1tGW;el{tDFYELbR=&rI?|;CsuA*{}0MWHA)y7@yy7bW9ufV$+(41okqAg0%K*
zKC|q7O+cnY073ATvFZ~A1q+S(xYy$3bp-h|!CC??SJ285=P61rxGb_uqKTt8aSN^!
zoRkIPECX*$nRF<6fsWIG|7#EpIto|6X4Gs34>CHMfZtJqze4;o{Ejy48g-wH&tD;z
zm03#R$HY0mMQXI@nC50n3|S&Y#!@p~)@&i1h11TxnJ?4Qy=GIJsp-rzxy?|XGqn#F
zKbM>Lb@4}suKfKur^G?Xk_<sUOz6yhhtqG><GTR9nb2EM$-)v3kpv?;EH;<O;0JL0
zYQP9~tJQ9zi9<NP2k1nNOdM~@A=74qA@!|!qL~CPOEiN4Jg6~%j!unm=@J^fg%B;R
zhBPe0_G;)N0A?@+%Y)KdA5q{BX5$RA;EoxYE92N%a1QE*z93gL9potYw3r1^Dj9#2
z!z5XqT}AY{^>Y>{fSeZKAx2x9sIE1K3ese=r6E1T;C&Pjd=AB9*5TJ&Pv{}CclZSQ
z@#8e$eGa=@)Dipk5<1>#b$EH4egOZi-oTJJ9L_Jl45vBOEgKk8IwQPDGt@IbB$17a
zG3x&djRx>BJ_#w{&*TQfz}eF}9c!Bfx1RCKKD}(21-Hiytn8Y$>iKE?9^&dWa9o(?
zPn+f0oLWkD=^>pIxVDy<UwO&N<hGnB4%^&3AeX(x0F%d|K)r>$7rz;&MYp1OctGL2
zkt20R_9QOz76XYh1}=3K4(?=FIHWkUfT@z}Rq!Xu1jlt>dc^_!{H(_Uf3UzT_}4h6
z_lw`OPw~NH)E+3Po`e4{NN^T6`R(F2lduLAJeGuY;57Uk{68asvMUVcV0MK8%3;L+
z>eTxuls!9j8xL8NWiGzUnN);3Du^uq;U{W(P#teEGO|@+d0yZ^ufu7AWyxkYyDX_0
z%4k6t5+lxm*QjeDWR$Tc)q}u@#km`VcLZEGM9E9B*e@LyMnIWE4V+-)g(-N0fVbi@
z^67EFyXmFkY%;yje2PWzB13X^+2Sypm@_)u6m%(mS<t0^Ozz?YsN^vQ_BVRbh?YaR
z)Wj9q!^W*QQ14JUbx8Ppd#EW2wg=w&TzfLz&1BZ$7~r7=TR?FIO}Ori&L}!9vV$X-
zJE_&2Nk=k9QU4nj4rrPcxN~Y-NFVrr)N5*6;@W<!bX$H;p+6~aTG$#MwdMwjNVjLx
z-)v8f9!0it2TdgV6TM(@T4g6oF?Ugqb8za`872KYXdx7}=ZOq$(2jQwGhl_8-0Zt&
zXgz^qW&iSmrUuXGiMT<d#fACR8O;a*`ZF8KQ%{l?(%WBCC)3~BLmgT8?)~b!H!XVi
zrYpR=r=-3vTwGsQoH|40*A^Gm*1>l_kKurw`!jfp+5qWTgypN=vQ)lvnSes%y^TW1
zo~82RY8e@U-u`JW*d_|H+kY3TQ{Wj!a#^h|i4lR$8gw~>R-H+2FZ6ng6un+4@_GyH
zdT>={2MO`CK{8M@6m9=i?=N<8oU_>PFST==y%bUQ;@m~>Bsr?KuuhwqWqcFn!>oAy
zSxyMU_HM&qV}<84THjf8G44cpQXS~}0)t8Ql^XqZhDV(&&_JZkc`j$b%;@!Up4(Mm
z)9Y;oE_a@+2T_z!hJe5DIfKAb6vrDr^SMI`$0;GVyU@<E_Ch%Sgj2r+d$E7RoS0k1
z6`ak539lnYJk7=7Ih3r93+d%bjp@)@Y_=(TA^sL`rHp2~S+uc$Ji;k?4tt)ByUSZ0
zDYgF;O?7BN9+(d~eaLF!gLFDS_c6GW_`15Yu2Rc;YnjEbJI8v0_FjsITzDaNL3R5=
zBtqBXyvmC3@?~^laWQ@FL_O#$L_JvOLp`{-O!#~ysP{^Ifl_oVy;SJeF2L?|7z~b5
zNSXU#D|bQ4a9EMnMtXMcxw8ha403ZXh8kG>Pl!zVIMJ&%PD^Y!&&s>XTACv0-_Fjm
zNC*6fc;pshKM|p>f%LA$g6et%9gr(Ku~^jw^tET`KpYj7Se4^~n%s9mG?<KZz06g0
zDf|Ry3o1%L=4hi$_zGo^?2;g}fJ)gebHmD!WamMLPoinb=kQd){<@%J87-IS#Vg!E
z-%w2K$6sCW4P3}pHUAA<D2|Hr-;m`U6)a=}kY1Lh@K;e2Zy}A6f|^JiW^F;cEhuxT
zV>vhAN0I6s^i5RA3)`q%(4myZI)fgFH#mGy!4`dvE8UozgFW#&?1?vUn%IDiz;ZG1
zI{YeB9>qpr|AW-836}aH9L+Yh{{;$DUFp$@qB@=0(rr&~IcL5{8ZB<C-7k?eK0+GJ
z9;@9ak<=fJJdz7$BYmBb*Fz#&)GTe@xoZ40`NrSz{^tk|zF+Z)Bmw>a0fY<wEs>xe
zL#cylq~)zplL*5(3cerQmbwSer;fq*+traRpv`;e52$BKEZ1#zUXQ`^8OdXlJrV<t
zvJD<nr!&(Z{ZclB0BnB;n871>GX}AxmQ9S|E|M5pDnzr#49Q(gqWquPwLfiKs7?(L
zNla~!;D6vDol#GLPeLAVL4k)B9k3rd@OJp#3phjUfjZmW7?}Gcbq|TnDVPx}QRjV(
zVShuSKnmKQigOq%u(*w2<Kzl;Bxc;sa{j7JVuJWtvnWX-@y~*odNb(r1OoweRpm(P
z5h$T=$Aa2y6t@z{A&5X5&<NG-gRpwJBanD-PEy^joTpGZO+p&CS|nQ*w?qhaOln;Q
zem^=gx}E|iw_S3W4MfdAoy%K4Pz9h0CEHvAPEGtcweHQIrG{QMh#Upg18VZspTE6(
z_gnw^+7^<gk<>;lycV|b*RX|ttWA@ulIArirT5dI;~CUa2_?})4ojGW)mmI!nQk(=
zFyHH0{7@rBtMM#;mnHCPS6zP%VK6%+hua9K;SC!$khtKoSzV$I-*Odh-~IN_U!A0M
zG){4%;V0mcpS=kl`LP}WF`6bXq*lQ8KAU<DcT)Q?uZ9B7*k9ruFCykByQt!A-u_aO
zCmk<p9FoH$8CLXXJ-F35!O5HEFoP^{oFp3nMsqrnHyuBYj;YW5PP7_D7b6E42+c&F
z>(eHhx2c&BQ_q33IqeW$vhy#}^X;$;FD30X|6-EPwnL4(k@W$d_XbwOE}Z2gn_<qx
zqZI1Lk88&{gH7T-wKxUF=@)H0O+D}Oi8g^|M5h_G;qV*}ULa>6ca>|aS_1ekMq>{6
z8)7k>I0cytLvHeaeDhatssK?yuD?q~u&hl08Q!v7mbd<?x4XBCG<p=tZsv%RM5(Mq
z5@8%Fp;oAukmOg7r@r^($<+7%kri1A=}@bF@Z{;?k(sByzlwtMA;qEyf7im+J*~E`
zQsXQyxc-!t$IjytCSepT@D5gO9&DVTwGUoU%Kio;c?j^dtt3%`b5PVcJVrovcP;HD
z3EpjkdbAD?Cn5^?)$r*je*hZ;SqZlBVK8{|NwD^~-o#P_37h-<r)FRapPKW5_sJ7b
z+C;TX?jqFkUOB6i&vW)?G@gRA(@aw=C!bGpr2Uy3#zL`oR8tf(Lsh0X_94EK!TToe
zJvk7N--9|3geiLZ@L|q$!sBxLC_}(Wn`D8vndtx8q~<``0^4y+ZAVSo3l6*zhdQfd
zIB(;!4S8N$?q+R<^GO@YU9KUh9pb!`6I92*v4G`$&S>Orx(V&sBjK<2ErH`cx69*q
zlHZ0Hix*@Q?F=Aa{3CNDoUQ%?%Bh2@+`1N)f322pP|MHGx#8G*9hMKN<)Jw@90RC)
zqbk?7<F&+BDF+tF$Zkq<4?sMlTCvZ-QXCf1ELvH=Kp`V?lAEV3BgA1HE(F~UD4ogw
zApQ@*$$p31&jTHB5rREWapWliiBFqt1_Grnhwr%b7J|`)Q8weZ=#5C281)cQ+)hm5
z$Ed4vvAwgPQ-F{nrb3FdlryfD5w_1_3Ju$5Rz?<Gk*)Yma5j)6g{N(-#cxym7ClIP
zWx=)b0^;WE_VE9mIZIV6ye0?;_2kWcO8ktnVCx_i52$j&-8V4U-1W{-lpd;P*1zKk
zi=H9)lh-zox7xNkZDT=u7OGH~_w*sAI?$jehq~TLs*ifszmr__tdjF^vHC2ENSgWX
zAfb8CptB5q@@LPoQ<gcyZRX7Co<Dttlz*9mMfgQfIlQTGA8)30M&?Ku&~U1^d7y3)
zPJI~0Dc)sMP^n0*VbI-NbbvRT`CEzrBYJF#izmZC4gsCuQEYA#1q%1_=1V6Ffi+BA
zEh;>dn(+kG<73FxRCPNY%sqFbyE@S8@dZ7gHJuioPW>?V+&h+<0llaX+^`S+L>6Ex
zu$9=)P#>Ii^!K%rapx>}`CNWMq^y?AuY<G0xww%cd&wRXx~|v<RwhWL4W7qKd#du|
zN{?ROqr~&8Xe_*Bb8l_ydwpeOUxey^&rx7>^uZrr<7VGh^VTbMAspuE9Ze_<yRClF
zFSUo!i~CyNOR8^n^uL!}^y<IT!*r&D;YkJ`*ZQ+(*<Q_@)M{P>4CAj&FQGA+?){U*
z-y1lBdh9+gpheWR5)C}5U&E5%)=J)+c}e2$58Q^T9rO6hATWVff!&RJ%WQ6e1g^up
zbm>?CIQ;l81FqB`T>gOn(@Y<JI)CQ(2V6ivcRw_lNT_>$_@R+kkN(lrAAkURaCGh>
z86~S!-EXNT4=wl-v^ENVvzQ&or}*LEERau9qYD;D)u1NwOp+f)K~3aSNqGN@1~nn0
zP1l`2_~mm~*P`Q%vsc%i%Im#m<+8mi3iEpRuUxioMImn9`QkT*2JU(Bsw6rdees4h
z_fN;0b{t)^=DywVcn?}Nnfnx{$wG+2RGZRC8#jwPPGh2hn+1u}uJzOg$S{{KpcN!E
zX`MF2UFgnCQoV(i5wfbZ2D%xV*4&b6^V1^~r&+7dCi|@1r)Z}aL34T#CJiE#@m`6s
z>kTTUSz_J29FqK^T{O_o;uH>$rjMl51jH1#Li)B~`!p#f<J-<w<-;GWeilDG!})ym
zaJ1CN^>w05(2-%Geik&Gq(@W-X5_~u)|V}?FwVdyBI+YtGV=_L9y*nTPpJ;g$R`Uv
zHt*G(R!ren&Aafb*XWD{hRlk#ecVd1y#7+XQ8wvFJ#Pfo&Y>!^Qqfb@vZ=eAL->xM
zbYkP0J&Dza*Oxik_pbddUZLYzYN_Ou^l%DNtUkM0|6$WuUxz;wk2riGADqEtD7uY8
zUO)-;PA#dP*mm`jXZ2bpv;I_yH~{H0gx#glrwZ?i8~aul_9Y7Y`U(?-$vum2JBOLf
z&E{qW&Lv8m?O7d}3k0a1VPzKBPg3JrSc$TW^@0}6KwUD_wx>z;D$UNSPxq*g8<VR8
zk-4P$0t&qWvhH{~hD2F$I*P=V;tV3{<v@k>mCMo7>LG{&je8!O>e#!c&cHwfMeAv<
zdSI#}v9Uc+vhqOhwFX{KQaYZSPHgK6Iih{h#)<Aq7GfU~Cw11w)jMNDw+xl~TGltj
zcC9Qs*nj)hCfV!dj8>0qw)3>Vz!zv4tg2ZX3owGiYPJh>Ft)CysH?^sEDBPBQ|4vS
zWXTWOBCD=i(!6b;&VW;u1H0g;56rP-C7idzSR}p19`OsaI6V_0Nvw1hr_Ra6f`5I)
z8JY#QGr|ZvMvh?VknAY5C}c-u4nm{qoK{glHP0r~Rh4wi^>kQKIB#YRB+)E4W+KC>
z&@Tx5WTjbpMTfS2`OVCwSxz$2C>aR&3uW<_dV>`n(<{83+KQ)2!5f`{{5PTUOHoky
zeG`dDi`V56h*mvPxOKe#vpa%B{%0vIss=`ECw*`PCN&PL1wT7eSXo$UaL(eLr!a$W
z7GS3v8mO9C(0Hn3NS<e^w5x5-0`$oSRQpU4Rxd&IXObmDl$^^%8UNb+%g3k4`p=7L
z<r_&Af7+3c*xqsd<6G({`=b_?LIEc76PvqZJ64nidafDtmWA@nF2(D{J$e&IS<I;>
z|I)mvhqhIn*>QZTj<+h7kYBJ1dc|e)wQuW+jkI_Oige`Tg3qTjyUclosjrhn&G;=y
zavz+#Nc@8GVU^etY>PU37B$b}?K1|4!%#Jgcbvlvk-54$Di40{Df7C-EU;!Iz&ueh
z{>S<{IG|u<Gpaq4G_Rvj{dtj)bve$GgsfT=uA5mD#wip2>KD;nkL(`!(nzd8G?%S7
zaAH@ex3x^v0otHv3+k6wZMb=`m~bSPuPxtxbbaV4rEVyZ-`g2;_~WDT*0B~3`0ncO
zT+>z9oxJVg4J#k}hugO_=}nU8hRU>{GYO_;hrTz=dlbHY^X+5Jqluu==9LaTvAwjS
zZ!?OEx)D<8HOdcVV-)Mac4#)_2yVwLSRrnYvmQREt_`s@=kazZG~;-C+`v{fQpK0-
z>)I}538pP)t6T(sWmfcfSkYd5DQRCvwOz^~R{bIoTC3@q*{KE2EUNbu5~sGB8Z)F>
zCgOAr@mlkq6WcdFu)Dcv+0G?RBXNJl=5J0;+%*#Mw{B?cobD<7#op~Z_B!j=G;iKj
z9PHTA5gUtnzjEY;n?djDn}$k@`mb5hJUQ4C@OJbK*R<^)sw(T>*-|sQYN<Eay?PWM
zUo}3lI@H!&@2NU;>A^@(yv6TpPIQ%wZ{H5NY8Z~SSvZ@QV+m}t%2n<P#8oJ8Y$N2V
zv!Qq@5MXK$Q<b3U+j^489ck&kD=JR~;wd;uGiaDWo+=q;6qTo#@x?qvE*@sJ3j<g!
z^3ft@Efp)Tdu+O>uf4*|lC(jmFKk&E9lv9!6nC`t4wmn{cPLbyJhAt{cP9#;4782M
zTQ@Yh><#M^y?26FR{r3DJ0_c0!EAOrktd#D7J3ez80Ouwv0?I#{=skWUo!O2yZa73
znJg<`vAMc&ye(f{i&zRd>BYr3t3$<E9V*VUX*kPvS)66d;4ItUg|mnkE0T{Nyz$XZ
zMddpmKX~ZT%|%Zs&D;9Bx3;>KCiUpSrDPgs?R){@td|b1y?-j!u>GF3=_8y$pMXQ*
z0kR0nihgYdEy5jfUi63@{J|8n6kJ~<&H_sYwY&`>S0?BQ`h;_4DGsa9sLnh{alCzD
zF+i#EUj~Ay7AN8Xnl&<)h8Y7#({PdprUiIRQY6JE(I4teda4~o$bkaUEIC9y{#zB8
z*+fO;=;t!P?6WWFMF)}%d*GLS8}>?r=4pq}*^aYiLHL73XYm6woLojj^4FgZ4-3&8
zT$UcvIiL(y45ON7lCUZrT>!^&v!O1;Vg)(Sfm{T|zD?;N6pNayJVUU&0Vv%=6~g$&
z=8Zj-MvBu@tQ;HK8(Vi|U5UMY-_S+88X}3sFf2CSw<K@bkgw3M6J2J9U(O5K3wx4@
z+RfY35DZ{jAObrIX|Ohfz$)<WxN-T)g5~jo<;x4=gbB*Y?GS-AijAUNqav`bl_hgN
zAJsK1e_;fsKHXKLA+VLclDVY%f`!8KN(ijxzX`yOw(NUsN9*pj4ZMyfOh$cl<y3oO
zQ+uFz<$-0_L3%MXXVULh;a7Ekv|+rrl2w%_iZL~;+S@jC%X$dEh8o+Z`brP4y?aZo
z)#Kq!7PmFe=`HXET2@!pteXd4f%v-GqNO$700dvWQx<KK!IYQhoCjY_b^i`D7x?B_
z;@{KgYr{PHvZc`%_z0pe*1taFjG&QEB1{FrSJh>~ms$@+1+<+>YBeGDs`|UJ7xC{F
z>8Q@^M}ZLZmtNtZ8iV3rfs3TYSL*ebd-<b+ocb<EHGv;3!d@Pm#p6(nL@#4d_W|oZ
zyETiwHbZ%EpNhS%U5LF9s$Y5rqI$DZa~?EeC0GN5RS=Vx3@rlnf~ElFV6YkZkP5y|
zB?ApmIGjtW&wU=t=juS01M&g-ia_kXC5KKXo06-d0&;ZIaSR*o+_toBx<3-?|I%Rd
z+5#1bH6zW(BBk8HuJWl9Q}w5|J~-7N*%hNvbcm8u)Y(0DZ(?hA%V^ANSO~-@JUV_G
z<b@qjE<6KqST(j3dm$ZneeSuqjmMXbb%WxoVqh``+G3zO2J&JcHjB5#Ee4m%aBUQ9
zkAj{kXo!O1D1ft7+u3Oh_#n~IrgvToZF~;C1}irJ!|dFraTXQ~4Rht?RDlNS+CK;C
zibq~AE*=^AmAZRf#dqpiCE6YgMRIw=ToOKRF37;V_AdbQ=r02Eo`C{)cmJ1$oAU)J
zvSR;<UHQH75))K}0K@6If|_MjDC-pAXk9i~vF+}41y9&&AkgdXfIu&{Ar{}z;s(c8
zKX70n(Bmb}$eT?n)Dum;haOEsy<5i`MiY4m>fQLnw$k$c%@FAgz<zjIMS8VZCrIx~
zuR)<QM9^D<VrHP_oak)&N;Gq&I&-Bub43m4Db5G>>_RI*s5`qrd8STzCJ0CF6*ZW5
z`7Fehc1xkU&Q+*}_(-4o;N8MmT!}jn>VzMH!qcK(2!Gb8b?Q*u2df(_t5Y9LUqlbq
zJ&m_v*xc)<5kt%~$aAMH>7$T7YO%4On?Xxf3ADqWMej(I!<Qy9jZS15ok%x2f!I=H
z(LQrF+Dw%~@Y}Hf{H7y^ysm|+$cgr-9)z6Ou!z&J;`DzIBE#3&OI3*6@%KXHj5F`&
zG4j(*yHD)c^bfll3VU{SGz~+Hyivu-C1@LO=TuMV=kB_d(c~0F$xWM+;Xuch_Sk5%
z_sHQxH-X+&Hw{I?1J^7|qvZbKn)dx`AxhpAtJ<)t%cr8`(QtdY9pU7rdT;f?OAkeQ
zTATge78NJ&fTMl@&Wk5hoZPP2g%;xEwwZi1F~U(6*N5X!(lX&(u$(h3&I4vND~8oa
z3`t)cNmuyLLd={qCtemdFK~e;KL;jHSjzjadlcg4M43egk(Z7Q$NDSAZ(m!2NADd=
z-m@-Lx&7fi{nro2L*kQx#8|9#xY1>Y3RyvSTQhiN)%P{zY_a$)5Sr-(iSNGQABVl=
zja%**82r}NOQ6DX+k;CWaxO1hv8lRgqAj13JxE?|fn)Qn#n`!4#m==Vb~c^jCm}dC
zousyX9y^;LcAiAo*#u{*ZC@Nazg55Iv8kQMlhKCh$EMNoiNel_hW5>Efl%i}BRb;B
zjX%A+xApMLcii~XyL#h?U%7YRcg6}Ew%<1lk425!??b_&=RO5*ks-{FHDqm+=F@)F
zM%jAWwV6Uj?MpA9{k*6bPZ^MjvUMh@-a#hH7p`ET%<R<yZ?P7iV)I&c?+I1|MUbrS
z6V7aNN{Uxx6xEd#3FfgIS={Khi8j$dev8p-POY$g!w>-%la*K#HkCoZ<MZ~(FK6tN
z)n}_@Ix>ljlhKp(7R@+We`VujbzGm+o<OF_D8#~B(x%D!%bO-^|GH^XhK<x2b(d~2
zS&cNsO2*gP*H&3<rEQU_Rk30{3Xg%4I<aQ?cy#dkfg(rizV(lQw<K|i=#ca@L}ONu
z-DZ5XeQK!JA80I5oB;<Tx-3SEXcRndYe~<h`sz)4Z(Z|H2t}QM{FbjG;+ryvxbAa^
zI3AZXkoXe_hu=kLc2fRC<G{a;h2!=#82$tS;dfOaJW0u)WY}{d3I_jU6rA6XJT_jt
zp{s(20@c8A;lxOD!@4GquYKE+JxFCDS)(ply(ShghZAL0YdcC&s8U2wp%xN!`TqVQ
zPqeqRX)KWk!b`6nC>3lD6yVX~vqOO6C`%NEJ0f=4WVc9m6XhuHDDu@7DUN`HGTF_%
zRWR}%mnGOX(Nej(t&}CGaAF-C)dh2(5l6^82>r^_Hpp^6KMUq&LKKCS&4Necyc}|t
ze@vG81%dT%X1A)_Udp6;goGEs;J5%WaQVl{oT^HuE`-9FMV!BmgFUzkgpWx4cNmLT
zMiIeMB~bCAkj4mZr7hlKPaxtkeg_UGI`sga`Ucnz8vTJ^WgPo{MG0<2aw#?w-p`p>
zE%42LMzG_3m;Mc*;qkfO6ADDb32ZvEE9OKN4L4|LxNa5*aYISV`;aM0HYqv$bOj)+
zJ|HB0E$=7QM<`_hAI;DAm%+dVpEpLLF)5~FKq(!2j}4X&wv`%bQk^f@P<>xjVl3{x
z<7P);&@0$14hQ&86y%oF8}zB&Mw`Pe4d1;n3I^9487|{Q3(JWPvtTnZqAdFAR+Nqn
z5fq_#!T)kOb*hSP)~Egx5C9afn1(#DYwmZ%RyZ3~Lb;gKtddY1S~6BiOWceZYCecW
z%#_y~&->Us8UJ&7%1<W+U1XTFMQT1srmLItK2Dk^sra9>QXu`z7dA~6EP$+AD>vRX
z+_igULr@Tlmu$Oh)YIBfEa-5W)v^AHM0ojBXArm6wsnWr-Y^h)Y<!Emxv|>nsqL?>
zUS6qyRlSEtYyGjI>6^Pdzxw6rmE{b_3w8x<N?{Fb!}!5=gDkRT1N-`hx9COLwDCxP
zAkerRStWZQm9{}DA*|YiU8Pwi%W+(_O5!<I$-48n6^h9OE<<!ymuQZb7t&Pm8}`Z0
zH_~LwY?)hZnzUqU+l${w+9#>bH?mY)v~ljr_DM~a=7O&@<+jyq{l>(^(TQ?ze6$q;
zEqm$k?W047*Ay$&D;wjGy<Q&MRM}l_vy`uBoLJ+t*A68Tt1BQN8f<P`7qtSeb$fSV
ze#cl-q;F~5Yp;*@l+<nPF3wL3*A;gs8eOiYB`d)1V#}=g)m~3!Nr}C5eM%^(t0;H4
zYpbhWzPdu2t3-{)F#svq3n^KREzx4gp7cUZ$~=P!0v1F3CKXw&j)spSi4XGfn8>8#
zV`lMq%rRNYux_N`qhwy<gQQxWaeSO)E;km*#ba@y$ub9fX~_(FO`*1J_iPF;ZwZ-b
z8YdZ+(ihY(EAQFaosY|PiLU&0hgOEl$L=0mGPSZPUwqV4-&a|^tlB=Y+0)!qjn~J%
za?@37qXt3XSY9$(9VXH!8f(W6bs8a)MF#dQS^DLPdT-O3-M7?Cd}SaQY+PPEGRg8X
zq){KF(F#Z-<O|Z0@uIGQY~{nPalOI$u{fFkmqoxUZV;UxC&fuB|1X!pT;vro*NX7)
zz1ur>t!ge1i`L(}W9!$3iXL~=^w-4t$|PsBzc$t%5pn6dpWM9ys(lCU8T`_Z?_SY;
z`%iA$``wL^mgLvhz+-81^6PM}y%P?U5{SDZ*outJQaa}mMNHw$(kzId4Q?(HKT0DR
zv_|~ADo)Tcu{j<@HR5a%)}h6Zve+eOxj1XFth%DbvV_ue^rfdM4yA?VsCV8Ktp*a!
z4nRjiom5gh68$U#@3u;Io?&>qB-sT9|MQpifcM%&ndhkE1WBME0nBH6p%|H)!_cBc
zHS7zT_!m9$J(_?>B?6HOO}wf{{M<12DUtmAx*o__mL67RYUE?G_>0NZ2$ZSC{{xw-
z*_M)K{zkpoZ&SQxCKclZ6iG!-gD=sNr^Ji$WZh`Are^WfBVauU`~9z`Jx!QbDc+@6
z+=^_#Cpb|PGMBdb@SaO=sQzESCrWdrX(N=T;p%WTlBRW<G;L6&X{6=dK!A#DQa<`y
z(lpYbNz*{fyGivCO8MvuOVi7(?Wy84ZBr_3+<9!gX>>`LLqU>AC{6=S>suQ}5_z7)
z<Wg@%Q4k4K1xLB8RIlFDu%o?j!`-9hVAbG}^<^fDMQ;!t7G5?o7APpH`|HY<l-o&?
zkbPhl3REa+MW>`s{SL>A`=${;jHkyglBa6Ktdqr1o)R<2f&}F$7UwZT-TRRURqzp%
zr5|L3!sq0uIa2pNl%tfn;3HLrelRZ$zJSeV;Xd;0STEgh*I4)TK%Ji#LTy{`9?$Qn
zEilj&fXu-#zG!F3@?D)iB7F1U`s;dq4_ivRYdZFZoi+W@+T|58ScQ_?1Y_%W-_+H1
z+f92`SLqBq#~RHBvxBEOBUe9hXsJD1wt8P*q^sH$vQOMRkeA=I49U-aNR?%fDnYCQ
zYt6{dFqp$6EDzFzbs4=b3I6CR&*KD~=$ddMF6t_qYRkfTG!c5kHW_=9_#5&wQ`;7L
zBWar?Vs9piMe>urtoWq=`s&`Y7oJ^r$5^GeWu&F1FX}8_bMx@fp@Go$oh=(;-WP{9
zjI6gtdTIs-ea^bU#%OPavVCgDc3{2xet%+9TX}zHvs0;W?Ja5CxHMeQJ{%o9QvUym
z`w}oYs_NgmRb9PQRoBwhOZC2Q)6>)YOwZnv%p{Y^zV8VkB!SQ-1OgJ4gg|fu!3B7T
z`l-)P){vMD2Er<h3K#{6h}(z$RYX7YMB&L3N$1^rtGcIW61MmG-iy*zb^BJ&t#i-4
z_jm3&b$*_{;d$VV!MSrQzCtGDh@D@zg}d`vmm`z!4b5J-KwAL@G%Z@D?p8qMu^i@!
zexyTueA*vFAw&7~_RY%chE^5&-N|lEe?rs#h@E-m*Q@QD4a)0{W$~lC@pMz&cmrZ`
z<l@`TPtNL%i6&CdqHwF(xrLXGhJm#>IM%j)&)i^o?JXO|E?LqQ;_r1sd6nnoY;tCH
zdB%3Kd)iIc?_8EQ@uJ!3wK@fw6U{vvt{Xw1t7FM!GiL3@+O>UOZX;X|qkZ!d=~)F&
zxDhc$2NBpJ##G(0kr}8aell~IU|i#XIV>!Wz{4SWnYJp{ey2tc2<Y3RRbesmt22kI
zu)_Q8N7&8|ni|~w__fy@yQ18``>{RO!sFq#`8&r}Tsam@F1T#=@+)Tt$-TF~y?_0(
z``-E1o$nl6zwG{ZzR7*z`Mte!Kl}I&?bwK#q8&t#D5&#hkd!JWhs1KMXAzCUB$5B_
z1YQdt;@Ao<#P4wZM}nm|lWxXsEXDa8791=E?E!$uG#ar|P_hHW)s4M~)f0OW*FDTi
z<!*I5q62S7EJoWAi9`A&t=kb(J#!DMH=#|54sBCnG2WC&9InDUTQ?=n<))KALdX>I
z)0G<`Q}3?0s7vxdl;3mSXoi8$Op|(()U#~cz`D<`?Xb_>_lXl^2D$3SEFRfp5Pf#5
z&*3lwX3dwbJU^A1+Y<`KgGR|~;~f$&MkB7$nyW?zuKB`&9j}-y8s`tS3reZQUspV9
zcVbnGzmCQJy0_3S!(uzU)YS5$`s-NLU-uT?rdW*pb!<~{|I<4aySjHguw&?w<=v8z
zrp!EBT(E6MBV1}%!(X?(87{S9tYFr5D&*4g?L(_SI}t7gwl4hKmR_qbz?-c;d)V!t
z8Z9LlLX{O=C|W9%45AbVW`{+v1S9UulASaAFIw2ml5~EF8ZGs%PDfiYs@gn(s>}^k
z_3tBg?5l%<*3i--X6gF^t0Stvj;*lOmfGjSRxNqW-#2DTXSF<Uv|_)V@$~D>n5pM!
zYp}x?&iVQ0Wf{dxtp@jiy$OH)HHa%9xZ;c;hyqS!zsD_+{}Y<<YS`2-g5)cwXKPxv
zmF6M3x}vdHQEQ^Bd~>g&y<+MZcnd+Lh00{rdLMv=@8KZ8dJ6-rg~)3+S)V>O#?nvh
zSm5}n!L9Q%JbIx5&MHh|`lgv55J4sR15pLVP=Rk>{O#@CqQk**vd1bqMWe%`gr;vD
z8(7!x*WoZKAs8@Ou=nl`k_4c1{%0Tp*W##1J@piU5V;mH1h2nG5I7>{uhcjkttcX9
zDUMRdKF_z?EB`?2;bQpsrbC9wQbQ}I1v@$4u7)cAzzgSMw3Tl<Ts53aQ2!4jV8}-o
z@Bik_Tl!ehX7RdgZc&dTVD4EXdQb$+O^a{@%(s7k*`DvJ5iorlrbi|sV4x&qA_Z71
z3Fj2@#%P1QF^!U9N0HAg4O(a!5yz<&<-fNgmzGsQXUEAjGDTIoqJZXd3us(=0WAqW
zJidY66pf&KiDbHBVgj&3Dg=e-4l5>jM~0ctkOa=pE@0YJ>?V5(`%DRjVAAbwbzP6P
ztm`O~H1=Vk1k&Q~*0%C$Vn<dB1EjmL@JByv;fI~2YgzYo)DJSB`0n1T?%ABmR=<1Q
z)$sUT-ks{3n_arK-|idQG+JKTpHNKX=WhS!p$*ILd*_?Cy@QYYH{5l_(k|zMn;)xw
z@rCPpBGcDhdLz+@=7H;f2jFloL?S*A@q&m4gxw(G0ud)b$)g=0iF?O_@@Z$0EX=4w
zvVcIsCz2XNR8kXpQsW&+Y9dc+3A>Zy5MA&-1>K~u=#!N+|06tNf25@OA6v?wLO+31
z?VI2o-;{uajP}7J;YCSt92go)KC;`j^!F!HwNwF97N?%ooQM;7*w;3U`oUvW_!D~c
z8xyPlxy<_icpwt>>g|jgh$JG=qtgNOF2%oZMS)0K91=!8&#T!HlAR#s14%E+d|w%F
z1O!xo9gPM%_UqaMI3GHhZbBrrN4g&+_YkZqLKfw@XAw*6M}|(wJ*%OohC3E#wEw>k
zq^1Ns{d@UE-4;)2L9u_stQ?2-1W4Mb^sc<PR|Qg^+J1s8d@ztogp3xSO|Xl+EfQ8R
zkh=QTgO_3;g?A86QC~tx3d~g3xK&Wl9wg{hAZLW4%%N!~hozlE($0;Or3!<f);vW9
zb1R6!AqK0&5M4kMeHq0DTOz*GjqY@7!vR9G^f8>Up1^GFaCYG}wdb{w#G~$(VdwF^
zh^V`_f)kzh0z53V;h}ovKL)_VY3?yo!O5oo9pgPj*KFyY@V%qNcfEk6J}&&5V3zp*
z60t?<jdIV@?UmMuEpX||TQ_&vynY^sY<U7vhya)7yH-?M5a7zL1d5kW;E*i=LT(vq
zO2?ARH3VoVEkOSI?3s6|msJD^@cVF;9z;)(2Jv<fiGxTCL_Hwp24OsXMimfsfS4V`
zY#?R@F%du|iO?XT11UGabE!q0OVf4*p4ib8YuD5O9Uq3hZ})U`h~sD8t9W4z5e<70
z>6C~_U_`VCis+?i@i-|FaYCogq&m2Op<%DXG#Kz}oi3aCU}&nbA*3|^zEoZ+oWRG4
zkw4|%e-^+}FQdRSt4cC=`Y+H5r%~n`@Kaj$wfllOpZF!oR{xd?U@r;A>TfnkU;u<3
zK1D`;UCM&qVx%F8eee5W^3SJx)Y!9A)EyAP4iN9Db85T`#5*xbG==BXhtw&xOPe>l
zP*e*GhgH|3P^JmkNeNh*Kw~h$&(Ckq@5xhnFX{*{>Ig3$++H-ey^oRw2>#yCf@_{S
zhJtG<@;IW57Qq}flmnvP_MW!`A%KF_rhw(OD(*`G@fB@!*4Ca>2ddf)s2`efZ|xPS
z8tQqwN`&Az#lLnIh{hzSABLkpJo>Fu_&CvT;F}lz_w7BBQ{g$uWsy+$o7WW>-qH+z
zn*h*S_#4E_TKpTt%g<x{ti@r$>mL!ShvpP@w}zkpg!@rWc7Qe-Bry|ATMWb)FpP#&
z0CnduoVd-6Ioo?x4s_>c<u1xmsT_clH?&p=o(~Yn)rg0i8Vq$5^;a*Nq2aB)2z6M{
z?U(n0&fXcln|rB9FX$a7Qx!fF1<}es0s%wk+ieKC8#U;z?RVk8IoNq{w$)<i@~u4x
z`>-MeAfQLFIS|{oVNh>ug8C2K4EvzqoX$pUPHN#$yVZnZbJ#@xqQXar&6#~O`RJ1U
z-?-_*URJbN{4TqTrv;0EV%q)L-pw~JJ}WY()O-GLG>!Udl&q1zr2j-3bTq^-Uxg)M
z@&#}?{Rdd0*GguSFOget9fMXf1n*jjON?4clzf3aM!yD2Oj^kZth0pvB`jgIlGU)}
zE_@f;{N);XCoVB-CBv{}A1>jwlI7HHa+mH^SR!d9=aFMzqy7?DV$n)gz>+n%L`Egp
zQc04(B<J9Gqh`L?BRF5|VU#cS8DUrW8Ty*D^2I(=6?W0#XR7e42Dp!&4elpx>XE;U
zFS>Tw(yJH55)09Be*DX>%y4^tq)m2bhg13Cl;yECw{7h%ZMl8@s@u2rbZ)tQ)8g&Z
zz46fthv3l@8@&+ck35qFmy@#^Z$dso1i^u$cuQ{_$VWU^(pPJ5LaN((+MAH_(JKC`
z`6eX&L2*Wx8!c{>2GVdlZ()!J$M7h{LTqJqnsws_6Ajm3lY!j1z(6wSwKFqAZwERO
zpv(cVg|p9el3SomJJmhYN1#OCK9&xqgG6DRoK|5>j#m@AxZ*R^Rce5JV-F9@)|_y>
zT7_Rz#b>Ipf{NO;H~1$<5WR0ey`9{`@%1)VVrj}~X1<c|4>6VAXm2`T)S2{@-qO}P
zniyO^;5T<HpS2at<AhtiJ{@P5M7u1pcVy>PI+aYH)o#@b4$<zmIBk5OJTDy{S$g5{
zCd_Lv1hr-*e8PE+sG&6YX~jHaR%AvwGGj)hO!3Zf@K(h|@MCQiyKA)V;ETTB`beLT
z&OSY~%l<u0q408$>OM!*kbBJ6cCbqLL?3CV;B7<Mr>jG|X#4k?3a8Ed-Pv=*&Ua1)
zVx2AVA59ddM<9$`nVNsujLe*_0NPt)IDH^LJvnEQk{ivAqP#=s4dRi-EBg8)gSj9y
zd`ODs+IvT118e)e^X4W-iXK~eMPGoEBm*lrEOw8@D)n`FGXW8$aNw<+ep+uwr|ggw
zui0WYaSki*Db7rdULcZ`H&=lpFnT6S9wUdR_%Xo)jUBh^ksnj(cv{0BS29<BkRMYK
zJD#q#RGk7<K3a@CRUnUX<|~XM9t8UOgD6uDNgMRQ3wt)=^dy|z6)azWoqYE_hs*Po
zMy}AW=-~4SPMehh59<wjoYtbA2!OBFu{AydwPp!92vN$KMuhy{MobWRsUi@3=n3?0
z;?L8cRGywtktu0$<(|+J=$*uL=g+I@PtwZMttyeqe!LiXE$=hAB)#~u8R4N)jMM2T
zlt<m*Ob%w^Lmi4WHM0;ax-5ch2bV##rsK`^U&$THj0;CXxyt#|!$w|W7--0uWwSxB
z@It6F5y<*^qs0#9I;=+C!FvNoN#O5Yiq`nmPzHCwk<&p`)cw^%@vd?3-J^`6Fqv_1
zu;L&Xq9_*0H;bTnpskG#Jtghxd$L6uYj;fXSGE-oRAEIa^i);aMfW}VKJsWx6S@!g
zSCV%{#;T)BwpHAmuQ>mb*^W$GfHR^w&*+R~z2*4@1q4?0&RE~)x|I(UW9hj*Inou4
zmqJ2E*ZP@>u8p5rklnOl=}?q5a-7{J+03-jXowCi&sn{Z%F6ywDJ(12kyV`zJGACe
zluwep6H3KTv=e>A9(5gxfd>hZ2!IDGjEnWUMEE~r`ZzcQ7pE?8sNylE@)Qvk!{nP`
z5Z-UwCG_}v$TK~lXFr9cwRQ*k?|t7#gg4v5`>VEHRL}k@)s$G{MG}p_W3s!_Zf|v0
zPV!cgcYfoRX&28<tXvW8idjR$TZV@>4*KTITDtcBfx*gv5X?t+I^}qOB3cTGv*ym3
z1up&sB3qfcF)1Z8<zV~llFyYJX&c-SNp1ksJKD2JdpO_|%k{^d@o-3%1Ch9+n9Cp?
z8ivx^2c?B@;suR}YN$gflBXA*RP1q~;;)crDxh)zy@L2u`!3~4!(<g|iRF<)l>_SQ
zhfh`8cNvr?tA?{QNH@jQox1DVLA9oa-^clj3%1Ypb#(+;y^dr#y)#*kb}cNrC^42U
zcxP<rb4O=wLn`L_0%?twBGFP<;Dg0jYR)gRo6lQ16oIxc!*Bu{va=i$tt`u%B(pI*
zw7k%D-ppiq<7aw?R+XLhc)=4ahGhqo%JMV6CwGB<!c4e{B1X>)!5eJM0iESRg~*(G
z1+lr}j4l;c#~i5Y6vgsjRY56o#P6S#Da<ZSx*~VMVK1|S*$hsZ`POq_@VZ=Hr`KD5
z7oE7=$ZvIC{UF##{;ZMN2<2Vcjq@&Dhw?6g2aeeM>^@?!Hj#MgFe*?6YijOS#3a*5
zbvrrn(s{i-ePtbB6`NoaOk}temMoEC5E#u4$>QWF^5HAqz5a%O??RR%siSoRyZ7EO
zJiKr3o<S0#7HHqV)~$f8TZ3CyY~)?qjq@(S0f+J~U3WxqF>3Qr;w6mv4x<vaebI@`
zOU15Ew6wNnURq-bmqL_Du=93>rFy%&dr6X0WXaC!L8ugwzc+lt-rWPRWh63eulm=%
z>)*WsQN+T9l^oo&cOUG@@|nMro5(vRFlohNC47wN1kQuP9zPuI2kGmfGQ$B575V9t
zPivU;U{%;dhYwcammf9qo!k_faq;M^3#a*m!xzt*e{scivl#4*hKoT_hR=~G_|0JE
z+}$hl9m}s>FzcFC#m?1N%_=YN@p{UO%fqWnHec^zDAC-Rcfk$hmmnrBH!$hJ3WGuE
zd!9Y?-bskG!XQZcUKM}wftfj)c=QIN<hG$4V+fDx09<O1>r7^wXmbj*gwoQJD0A-r
znrEO)Rtc6fx@~|204e~&qkVAFa6x%?5=$C*^yEVbkERhI)m223=m3s`i9KdNTyzdn
z*CE;Fv2a_n{X%4VunH?t#e-E?r-@9X9|xJb%uIbFC!nNYEPG=#?=yFHgi3K2w2)|u
z=HsQIFqEuYO3vz954^m&<Z(h|DhoD?V7e+?>}Yq!^P-Hvm1MPwRtx9O4=00z)90oa
zU}Tzxx+B78T}XVfflQB7%%gK7qdk$)(MS)4vhx3|5+JxzDJf<__WtSqBuL)t7X+){
zPfy?Dw*u<}ntEa6lo3zufd6lJ_@+d+!(W-6y}#;D-dk<_0&RVup@QlUOnEs^_W?VG
zos)$(v0n(0s+btvJP;ZzMg_geWc0N4wS{wj!4e;6pJrfGdV-;uW5sT7G3nLoAe;ph
z%|tq<$I6Sk+;X_!OY|r0kEF+nUK1~gPM6yvNWAC_N{)!jjQA-9nbj52;fyE?I!@+U
zfip6)WOk<dquzYdYt*?CIFi(Q=3TO%{5(di7fc}5Pc;zho{GgDcl$d)$Nd@--OcQs
z0IfUD8GUzuwWaPyM6GfQYNZfr?dRCp8a<Su{$I%b3v>qkUn$-ZRy=VhGn+C0mHfeT
z<1Wt*<V#2C&3EYF>?GPPA_KPS3@U*|eWwGA)PIWfDG&8YCO=J-)tK2wh#c5+EYcon
z=iK8^vlN0uW9A-cqKHsG4kWMj+kyT5=JbSC+Z|KztFL%Z71mE?4pfuZ()RnC^VJ7t
z(}+!iul7mkRZh;nsM0pn;enF?t=F3zv7WTQ7_*Pg>gaYzf@}p#STo1f|0QR{zO_T4
zmx_yf{3f%RaVRJ?C?{}ccbhj~GzwPWk|o9Kb>9SlGdoJ){oucoX*i+~GE?J*qXlH1
zFm^iwJNp4B0|pJGyAugo41mBraEdO2@_px$K@)K#vUgWueIalUnzPIIy^jo<dqC&J
ztg%+enhs4{-#2_-zt=bGs@2w1%*&xr31s6XUAgIPGVsq!_b)0qZp!rehdhEW?eV7E
z{Lj*h2cxM4J7>+k@%(Puz_OAkS~;D;p!XF=Viv2vG?puM%R+uE<FEu$D55S3<&lT-
zKoND*8(Hw%z&^rCM8G~2kseed((}i`11O>n?5|jubQdkgLHs+;J^mpuba#tz-Upw;
z8=Ud)RGoY1p}Sk8(>+Bv?~70ot<t1m^iDD#n0CSNv<;PjEmjWuvLTDRcir@%)n(Uc
z-^k*xb@cV*N`2O-Ta?65A>>H-C6gzgm{!`K7|DC=sY;tC+ZGcAf4svR8q9i?R8P1#
z&+A_Vbm6vS*q?SXHmAG(yzFzicusNqEt1c{r=SLfp~M1EVr@`^RGY_{8VCE25*$aA
zkOnz|ehAy|_IPNdNcYC@Bz*5w1!_gCo}Rm_uzD<eZ#4!d+<T|$&sn5qQ+E~5VlxW(
zN3UGrDYkhyXtS7<a3+u*YLm&p-1h#(1xIM;yus<~`#m>{{*=en<`r0H!snX~){X7k
z)MH>dv&09S49h^RiCe7R(r8<Us#x7!V;QRyNV(ieuUSGniDmLiaue+(4LX#*{?o7|
zNA3kT&`wxl(@OftPm?ZO$F7y6;awswacCu0axd9WTVaW!mE>U^nT7*I=hRBFuq2J|
za%m+|Sdzyj9<3w{O9HsWi%JM^X7-t1Q`_hgVQZin`OH)JWms8zTUIuroqrL`HR8m<
z0414BO-di!%*@$L8Xuy0tH)}0vy_qANAotf&F1DPqtRqCP)0-`V=}UO%D`J$s4?q6
znff|43uE~KHN!82^6X=PA#{WUKPLnFLpm0R96(4fp_qk_it4GaJA~7mV7E%-+ZJo<
zIYlM>{zN1csxL>J@X=5Rd0B{c)VMAPt<)f9uCaJTJ&`$qGnOBP7ZsGr)djB`=}AEo
z$pL`IX=kV10pJiF*XbGkdw*j^lMW(jmb~%w9<yL1btaLetc;l)kla?5s_#U}dmWyT
zjiW(7DCt>y*z59|Nqzk?Iu1?a&BQ9*YTZ1-KnR2bwkl3!h%RD~m`ThhmJ{oVEyQ->
zlf)h{2V>}M3ofiKsg|$2rtg}>B|F=92F|-6a)EJl4mXFW4C{u)Y|&b*UbFLpIm5-`
z@SF>FUQ;!AR;*DxW0zhr?}}+x?Vhnazja&ZHrJ|kzIB#G%k0a@o&o&;)7HUvT(NuG
zx@7|$9RthOZQFf?A-4JaPz(wtb3$sQDn#i~PUJuM1E4!BALkA<6_o$a+E<C;zWSI=
z#2p(Bm5POYTsz9z(V-n1-y5b}Pd!fk-e8}69i8&~jlV~o%odB;+t9~5g<K&QL1*=@
zJpA`yA(tzVi_qt37b+lcXx2S_AY07mBOq5S=D-iom-RL1^Bq+CHgrbakw;)FSE&EI
zP{_RoFTj6;C(F>UT@63L<M~YK^e8;LJ)13(0j*Nq08idPxBa4+Eq1^YIH!2X6XZ$y
z&!paX1bez}AzviFLH_|>A0u#XWb#?^A^J_CpdyOHgc3s>&!TyLZhh{x9OcfrbID-M
zGERQ#NU~<!slE0FdulDnoKoqYWg+L!eIrMi)!LR|t%~X&GbU?Q<IcugZ!PY6y`go_
z0vgyDM1`RB+DgcZ(^%Tchah-t8(h#n@4D56;@a!y4ee|bO+0IIv92Y3nFT$;OE!7C
zGEq*nnOKfm67X^cheIk{@a6UAf3?~j3iBarz$Y5SKy-BL$W5OznMDJ`*;QG*ME)Ji
z;$fn3y#im4W7*sSWj93s0nU6XgA{E>d_<hpL|EyX*(~X5$~bxBAqn$GY1^YU@idkR
zXQpdaSVz&-s*PI8;NT=4<Q5XFRzOJ(F;e~SXGF7EJmZVU;35t#kQn-2um899pf^;1
zm6v6ne8z9}qP)Ijjr<M$CT#Pg+B2LWPvHJO-na$|zJ3f})8zA@A74M-eC8qgFYx+F
z?fNIwYbcMfQH?D8Jp8>k@b%O9dKLLY%1!?dc>Ro4{{?b4mf5q|bGnK=pSqI%8zDoD
zT94O@c2CGk90#9+po0N7Jrrv9_~}|4>c>%sQ1c^&`jM8e;nc}fHF$!;r(vZy6d<Zr
zF**Ddzfi0Cu`0R5A2m}kOxZ$^)!o9lUf<-DhVq3-%mHn-o2}Uey?qPvHaR=LuWw=A
z_E#IvmPY190t?HB@9S9onN{~axTb4FHcKW-x2A9N?6&mWO<nz4&~bD9s)!;-N<q=_
zd~NNWTYG-|#N*piQKR0-TamvH%3v3k!S}J=%z$I62g+bXW&L~v0?!r4BDqM;>>3B3
zu9yk4P!I}^?n8YpI*A6BLnBjEBcjyE=u;Sno>G}<Q1xW@p{jPnG1}3jR8)hXT0@~@
zc%ur9D<7qKVB!<l6c4t>SX1{;p>%rMW^L;2TkGL1Cd$FOIMyG}dV5D5v4T4?+8c>Z
zTh-|<bwpUkXy+WPbs*hYa>VnV$XHL5I?}ze-|t3=?d;NY$zTu#rnl&d`&^t9E6wgK
zF6i_a1({*&)?uDzy``8d=6AyHI>(^wbWnDSu<U+-^=Ubj-2tqhKg6<h!S8=a{|T<C
zJt`}u$puH#VJpR>K}D&ggeVm+6x1WIcI#Kl6b`3&3x(4JgVVEyVAA2Uu+%$7Jr@dC
z6~RP3_Y7qaTn@LFr48g?WDYs+$S17|%3y6~P9G&_GrW<aIK_tA93o%PW#~V_Ha~~k
z?163m3T$&m<!62flX2N$$KCi4>&S$4k{6yHX)<s*aQjgg;%7*nqngsfTQ-r3yP1hw
zKG%a$<UY>Cg@X>4VAOr*ZrUU`ZGj-ea4)~WF)W;YoFb$D`qybAuh{%y&SZXpGTEK*
z2~i-7yZ%Q5qo-(Iv4W*wmepydDFbV){|lH55FF~@J@rS?c-Ph!B1A-qVa(+gsfE29
zXTgoPG+D-=MWrU&=OVT0lnP3tMrzXY#e<WvD||WwRUm&%1J<V~5b^1z)nD%;jgm)E
z{4AgWLz*PF&F+&Ja>?c&lmFyJ6A5U8{>UN3Q$QIdGx-|>1bU>7(ce}73A7-!)sXNJ
zDWa@$(H(ISvBDEzIl&Ts@L7nw+u?G^6Ray%dod64d1JIDpq3YE#!Dw$r^s^(r!P49
zOE~ef#g&iMsze^xDR_$ztyR%Y$BYHIB3^oy+Z2ahOwCT;$R-oEsqEy<Q}P>fINvw3
z{ilM{#gC7!?GNy-gfmc1D36)l?cwF?0|}S8!xHICT)5kp3dz)=$Ur{kGRq42gd)2O
zvooGTD$FAPD(JR_6z)eBe_Q==Ps%I&j`t=}uWBnJVS(drnrc_ea0Vv`7g%}3<gA&I
z1Y9-!rCKxsd~}4o%}%)Hq36`QYE}KEllOjGpAVaSDEmHqn!gt}e|giryxYwm-F)kL
zxm(;lD~4CE9$Mb(({0)Ol}&lr?8g<kbiwD>bZs0>oc>*C<U+hQ<F%S-*X&qV9Iefw
zDIgOjSM9|Zh{g0;JL8RZ;+_JT-!vC#DF)j~#9$}E+7peBPc&ZZq{cG@&w9<$HbEv}
z!>lGN@V3<_1^7JRM%qN9v~G0$7w=*=JNWS~Xs6NU7Ax3!gZgX+!66EE!SH<}r|_b}
z>t8pB4vfw4+79gqoR#2+$0I1?VAWwFAs~##6=|ALYN1eusdb}e#9GVjY<iX~XqOZM
zv_@#Z04s--S`}9BW@=S*!?BFDR?Y03FxM@uv0JS+c~@zIHxAQWVlPy4Pl)^tVk<R<
zx)*fytf_>eL#sP|eXjisL&1RuSiQjO&5?3%zYk?;=-%?h73ui{ZK9rD!df_;!{cZh
z+tNFI%V>n>$3r2(%Hmur_2(qTVi%0v7kz2<x;roK6Yb7OR6}JD;lSBd&D9X*kW3sA
zXm~>S>S%*qSTTibFLK}<v(Q>ZVtVqlrT~u+ZLqSL3qvj7pcb5KR>Fj?t^Nxscn%Kp
z-~@Hf34@?=_10h3i*DKCLxfj8i;S4M(v9!P-y-r26r}>@)Q>jK$$vJ^>Mw(I<6M1a
zgyP_A)TWL`0<0n!LWJv_Mp}LfKaN(Q@|K@X>jRXjEt+V@#NUR0PeX}BOk?IkM#0Ks
zY_KL?MneH1ybCf|gb#@j?Q5k7-@?BuPq3kCj<c9XhUHMnoJ&Xbq8I;pOLBV7o(MX0
zMuXYRN=C+G<!xpI{Ys-Pr+=JV*zGqm9L-o=F}IPXIin-)C$t#=B3Htt`pym+z;Un=
z+TwQDfuLr_LmtZI1QrY|JZ1)PfUDygNk^I(#CTL|v|$clqZ^ygw+L>d;I_h+()7<y
zUj|2|q>b8NX${2fz=)aXRbxgDrJYC-!&wIFW4MH-lnw_=`4Z^NcbU}WcgG9=$y0gp
zR3107bgr6{I7^#7+T<z?x3JTzbE`wfOb;s6!)u6sRCe=*KLZn-VnjP{0>1{pASyP*
zJ?oQaI08;l{~YzQ!D4e-#u%A1k-vuz2me8xsGNR`Lcy3iy$+r~(=30*WrIH<o&E=D
zwzvd6%}HjI{Xn%9h<??(b%-sDgJp;N6V~HkDO_U9uw#S{X9$fjXDj_^=2ZTqCW5o-
zv{H_$tB8u@;$etmrL&*iM>z_yVhfYi8zzWpV-~lf2rr2d8K8Y0I0hBo;FHQ$x6R6a
zOYpdy5(El@%O;|+`5t0nGDv;}e8xN6UR;={uci_0sLn`}uPQb@@09B=d7wh43)B5z
ze`99H)(^Ih2!RMU)=g1cH*Y#(w4wFrQ%C%@ChL1+-L&DQ2jY5v?QGunhADGa-U@em
z)u&e-z6X6Cc;MEl_Kj}idT6Pf_}<z(;ODbb3>v(~W6O>35J|1SB6>7}B*F_97lx1`
zHN75AjW&d)xmFwZRKv#ALo5gD*x>xxs5QyPMg29kk94hT|L*9_^GB8#d6x}MiZ1DX
zcXnuI#(9f3mA22D6Dx!)y3+$2N8<IrHC69br&Y(t%44NyK{3?dvqg(2;y|^)h)!Zy
z<^Dd>F-Ua5Me<0}GbkZspm;h4YlH+4Wp_aOt@NfuOOj)t7C@Tj(6kXFgdGUX!4(1;
zqbip3c1VM8ftYl!iGp_r25Qxb`*HSpb-~z?YE4!Xht}6wazMtJhVmQ^>?=S9nFjE7
z={UPZ^t#RZF~;F-^OVuDVS^HK3lI2`LS{6lNYQfG>h~z-87BJsp*ZJr&Ri7C1qAXn
zRUH}Qqn>P7u0PQf+^-Z11&pE6a56rajc`VHB<p+7Zh?J~V=3ySgpeO-*kcgS_cZtp
z;mof{dP~hap$K_su$(@DnF_s@TGiXq`T2A7d=o2RgtQ0|oSmR0G_gwbPmsGA;shNT
z#cX1C3l70>`toM8Z-VGZkQ6uriwbO?W*<VlK7!ge#1H|fvnj$3KUpFMS0T6t9&u|!
zY_KuJjyJwKM!TCs3{NWBPE-qpx8~=Ym_iPaZS!`_9IDP~*NYyT1+E5;RBtTan{?2U
zOSXETDfrgtCG+FavF)SaFOBJ--dCJkbh+|#^5D7V6ak+=vlfXyVlH}u<3ty18N?yS
zvSF5*0$AX*KZslZK6M&)Vat=iC834Lx?vR-nl#ph2?KEz#mZj0%_p<u7s%^L#^QB2
z{P5yM9T0p@rxya2yQo`9Jr8F|MbML9qwb(+!RJ7Xa1{Bvi9yj0j0x21WaFHC6&YQm
z&SW_K1G0=V{-KcF)6bH9dX)XoDDoQj>_Ph5aHg@SjBF1{M(#S=q7w3|bbiNRLB-Ob
z;cYx#tV`BhjsWzNti@yXd+GW5L{{;OI$eFKZj}M*kRSq|RnVDurru4Q^Y57m`Z{j%
z--88IePvV~P0(hr5Zr=8aCdhI?hxGF-Q5BNzqq@*LvXi?yL;f`esO1czdgHWcYaKF
z&pB1yT~GC#ndzyg65n$OR30eJI;^ATP>x*-3`Qw$Z>(y!PwMMT-<EIfL%EKjZQgps
zAj~G7IM22t0v_chx!yI~SfjL!A)K76FVG1TgKxwVm<Y<@T_3rhAeBPOPD=-g&EZ~V
z4AYwe)A_I%S2%YcrdR4M`|i;`7Mt($@B4qr)wL)F4^u1VXnri7zwMtabG|#=PeBV-
zG;VxYWD2}UV11(^p+l4=Hnm6}{ehmqPNzeXm@duAoSr_F5GON^YKg>PCtAJMKBxWB
z^w2&#wB+67I{#d&-=uw4yFBLBrD26{<AWr#^S<?v#fAVK`Mx-<XZ}O#v-Qw<dE=YA
zFA$a<7mw1xwRG_@^1d17tx=7iVZG^A)?&Ch!yYk&*PKy_nYEIYDuC5PAI2pWd8HbE
zx1TJQIJ3^aCqzgZjdx6Be(dw6YuC9WQYpyNceP5znsDpHWYySs%_?XZZc(jeWu>)x
zyfGrCyEbNaoRJBB%?~IQB&@`0aMLYij^=wzj->=Yl_!Y^_Ha5oT{EM%c`poWNg2HN
z2EICB)vyWfh^RYTi>w8!RTq!y@M+j-x5%W{NY5lMv?QlVHdo12ZmfF4`lukEPE1G}
zq<7HnC#s3sA@R6nA8Q?Z0s-?yrBnyYZq+mwTWvkZIDhGlZ(5Q2#$B25iL_c~rIKx@
zrhy(R6>Ka4X8vC9TfQFMv_b|=EK12Gtyg?W1gla@3-QJy5?jz=g5UMNKNC8pzW#2r
z)e5~Xw9*}3doQmpwrdK(>!KCUG+1qSpFZmT*+arJI@8f!?ChoNucoAAVivfR7u-~Q
zcU}x@Kf!8Gqr0rq6*OM8X+|5aC_isGpHeG7DR<7%;#O*IQDXjmdC#JDQgM7_Olnj=
zC4bqxhytJ!nOOn<H!DtKRm7MhRd4(b0eOQcT&}NhmF8=FT8+y!9V_Bj`OpLD-O}rD
zl(0Ihy+V@PZT(8q()xTUVYM;PbECJ5M%75S<62zVVm)}RV9`d_r_p~x&k&c<<UDxK
zV_P6Cp{0R1{mseQSGk|>aCIJA?$%?ok#w0-cUqOTxOB`VZx}Rn?X0$gcakKc=1u<U
z{PZ5&wRcP=CU`xMe{8igZU48LFl|eFNxuy}qH6XuC6y!j(rNWA1Ye_sytuTk#nepC
zleN)bJgl-XuF{skhJl@&9KK>=e-t-jG-CPu<Yczkw0_g-_;l%wZg}4T@9O~l-V5rr
zAJRpHtRiM@VFosKWrBwCWTKkeY&ubO+iiOF%sQFITh`S~Mf2zsL@Es(V@tzwmm7#v
zv{S<3m&JE=Oxsoc%t>rH&gQe~@oNffj;iwYE?THX<MWh+?=>}3Yi%X|yET1dZ};cX
z;xu@6tWTJ^-gZN7FZitR2=eP(*ql{UBYI09TiqO;`Vij>(&))U_kjw6l0U1xRh-8S
zu0ul-WVM<@wHmBEd$BUlO!xWQU_BL8*CxdqEX;Wn{R9-Kv-e(s;Vp;8bDS|7JO?}6
z%?4x3;k5Iq>h<>Z#3)YO%aIL1)(wGHpO-JCPKwd79v3<~who-`OEtRn-AzSSwr=U!
zn@vXJ2PYGYAu#172&L97$yoPGw$|3BWghV59x~uFb+DAV0->9tLQF;7MpY@+cjs+0
zRXOWFu|*y0yhGCB@w0AERQLr#QG7{0o1GqdirO*+=+u?1B_o}cBw;#c4%S4~(_;=U
z?#S(Ot17m}Mk;RU<=i~wjxJi83KzByZ<4U+@dcj|!QR2$1<OjQDH?`r`f8#A9u_KZ
zn#*e&k&|99NH!@EgEf;AhjmYvg&lx!Jqb?A_!km@76tx|pM>{_=W=xkcd3zs3aIA!
z>@4&&6Th~0`iCM-8KbUV7pq`#UWudpoeUKAwu|S(^EF}Ei;wx}!z!WP3!aPYTJ@bC
z^0nW0+|Dqs$oVVxGj^WR-4ub*w}0{Bn+KT6Y%PW@G`^{up|2RXaC*8~_U~Isp3yrh
zCuUZ3%E;D87ITRzb8&@-p@=l;Rx~GY!ZX&}UgRMQF+UE*H(31>XiOrBWcO0`i=`?L
zoP>PEhH;CLsVeJA63%!-td?7k>Bn2^gh*!Nd?z$hbL*^J?9E2u?HbndMr$ocDle+X
zWV9Qb{3AD$z^9AStE=M}vDJ3#t&D}fD$d@{R?Zm;*$D)xDn_&;Y;Lx-H_GxK@#Fs<
z*yQE*$x3Ybp?Yp%EZmzbI{oi7%2MtY0<AV=WB=vsNbmNIaj5Qx|Lz=<Q0clAEL<wG
zFm=QYVJOVJ!5?#Ra>yyu>MrT7ducyUG1oKh+}dat@NZMn)oT1o)x_+eHU#8fUukCW
zTW*{;%U+~Ij2QLQ)mKkT%2?3cG*p<7lC`cFr`FC%O2|n_i%+OfE2YE_^}%bQa$GwP
zpJqL9stIkG%PtN-qc5`O&$p#lbP_UTA0*PL>24{KxL`=ul?V1VoMqi22yv2I{*BVE
zZzXpi22tGKajldWm}qzD`_MaisoO*P=mbHu(7&DaAxIuy9vi<0%7Q%DFy)@g8*H_|
zjE$+n6r+P7kDPhH6!)o>_DrYJM<tle+FY1iRa5F#3vd||1#7z(dT%Mo$>|YrG!eEc
z-p?T+e<LT-@mD*nzv4T)ft@;O-O_PVQI{8*hN`6HEYNm~D|2@VZV!>;cDzQeluKf0
z_|#fcPV_X(WOUJzPt}y#{8tb9^}Jjno_`u_MTY8S>UgM?T4cN}Yp`40;Z-XnXLL}u
zSlg_!a(ZaU>v@PjONsh;Ek`Exp9J++bc)?yT))f1V2Y~PmFQ6EBrKc^n({9lvr|m+
zEfrTyR9}>BEaYU*wH8vcHM&Brs>p@Ek!mIleMdD&b8R=PR8LO2l8zLYt_!yq+lxeN
zIBJNd=&Tj<gJ$y9plN@Sxa@lm#NaX1^UzZ}i0FGimM>w*<Z_3e<Mm#fw96)}t}=Nz
zn)!FIL)zHrD68duaPs^r?J`SDhsR~hoWdE7&-mKxJ6@4|a6Pt$H%gTY_f+(%svz&l
z_7vHf`ub~4_J<QCJ)!JnL%P`eW!2)ROUwrfR8Ee<c~>iB=V&xHv{xGAwiuUrgWOK%
zG}zBJHrhLQH}R;J@S-ZN(NFm3c-xF`suQch+DI~H=<bgRz@5mwtc?m}6Ri*PN9*=x
z;~CX7wFVN{Zj!b>-7KuFKa#s?dn!&FsjapBk=z&TqRr8_wCJ0+!36!&7;fzaJ7_PV
zCMc#97B>;b3akVAuSqA!B+_@3Ib#?K<w$u>W98;$_16~WqhXehE$COz^DU`N8eQq#
zzC#Ue_>TK386B<glk1Kx_uqRHhEWBX1ZtBry$?Aj*G)VdytUDnyeM`~+ENGlA4aZE
z$HnU^WJIo2NKfu$#|9ECAHR7CpGL&F$VOdYZ8AJ-zwt;TS`46bk&d?&ll$|M(2?Jy
z$`)KiI$J2~{y9t8KaJBUplD-#;t^No{N<!e>Q8GR`=ouMK5}j(Ei2!_CNjmya10ek
zWV%AGRT2?LqV+>ZhE;`?NS(Zr^7Jjzw6VeWK_<av{5rC(N;9{^%ZzF-HX+>LPbVsa
z7vIf``ld$R=Urz+xvEE3=8<C0hhm$~&+hIa8V?klP$i(xDOa?i;UpICb}D*J8h^K$
zIvRf`N&7;#y)pyMBU@BKNxyhnX%LZw_c5p30e>yCsV{w^Gcbo5XIdzclFHTXU2eP9
z;x(S4rvqfdR4G0FWHNqL1*LwsT3fwk5YLcTx_(P}PpSR;8CXznXZJF8&$kw^HoFFP
z9oErt*nT#*kUU)OSnGIq(wT3TY)|!o^||&DoUJ_H+<vi?n$oj)=L>&nj|Gxb2Ecd;
zC_k^6rH6FRO^c0KejvPUp9PrF;Qm5VMOrcAVY$kue(Fg;JV1Q@nv26PX<FuY)SaJ;
zc!-pWT>BZMz-d6)qVhEQk!$<$cprQD?ZVT|VrXi<W2^DhqXR`h_w!9^I#j^pvaR*u
zO6qOokiJC8NVSer)1X;xCCI(&ZQNwh!~lOAu8rHtc(=-ArGA;^;&D{)p<C$U1@zvL
ztu=*vs6pk?s;oP_S<nHkyyL&Y<{~<egza12z5H7G#w5~B_^A0WzxNQz0FfWxljf?c
zSCO~}zEjxDDKdLbQLFSvCS#WW@$ci_Mz(e0p4M6UeelD#OI*)si!GP;yoZvYOhH$d
zsma{dCyX%8AKn);T*zI{M~k98f`1*4bmM|?f~@-bgme_ft{qsOYKa@wE@?B(b<A@!
z{jBagB;jML1eD!O=i{+Pn#qDCYlMu2SiSa^CAYY}$7lIsx<8I;W4oQA1SnY|q~(m!
z6F-WtUm2#i*AUu1y2|5XC(WkrrUbq`E!MvcPyOKY(IMMYX>sUyD{L{~_NV^8LT=ZC
z;AN9*A*rch^8a%&ZE&xa%!7T~=_n@k@~q=#i*LK#hH0<u>DnVc{fQ}yIg8tMH>6{z
zBUae|rrV!ZpVnjO{}KMbRUuJ@cSY<_qb293z2)w>kE}r1f)7b3#gAbi^cv{+!!U!`
zSKt0dF7OJojX?~c#PZZXz1PgU+Zvj#4CkyfUZp-cYDY+B9W!nx;K9ni)r)8)$j|~x
zThvytAEqj6l4#5B<z`!=`>2GjoP12%Fvp#2_#kWHkw|<Za?Z41W!sKl7a7FCOw3AV
zY*|Db=8zLrkKb5gJ;u#VTIZ#t87FPIvvsiS4Ae?=3*Lw^nQIgzZ2@ukF424{R*i}k
z#z=WJ7iScAE8IxombHs$T==gbF$N53Syz(9$YvEcf7bs0VwlP_vL}8W{V)tSUTa#F
z`7}-YZ!-%raLf~z3pB9J0*p10xAekAd9&_AgVkm%LA00vV34x<adS?|{mY8IKYO$v
zKBDn$GBV|#k6EIQSxL779DTBjOtAD$%%qIC8Xe$H;OEit&f=A3gg>4F({Obwt4Km!
zYYb^er{_bxIRNoB4t<C}0GRbPFsE@mRTKVRXX>|<j!9WaKZOiFHzWx>e&J_nELZ@X
zQPU-EC7nVEnts90a?0Gan#qc{%Y3n@UeFJ@V6VBGBZB}mC|Q%nD9)Iyry(DS9dRGI
zF^)9_>N}K@olTH0ktf;RR#Mv(0Wgo9i0;av+Nrk?)`h2D@<X6Bo`2>?XoK=nxJBGG
zuRPE-r0`_!HIMKL&TL@K$s4tqV<tF)x7fA)Phg48@Wt1q-L93f2K8aPW5$b$wB8md
zt>m$rMr1hLX4QNb6bTpTOt?jMS$@JjA9cE~Vk2884)#kH_J?UPICrAQdhLP6XcN<h
zrJp=a8T7bWr8SZdZk3dckVYbZSVtw{!|O<UP(|aR!(lk@p;uF~ECt=Y{XHz`R^Qb&
zrmQA?nx$CZFR_(89;pMyW1(5Y9=RnfzRWTew&5R78uPA`XB&k&e;d)l8`X&rOeGi{
z^dDu?$3v0<td-YF?|F+XN%6*voA@4WQcqumVJ3u?i0C)W;E>=l<C>)^dsWR0iY&K`
zou<y7uqyb8PwDE{o-j3fOT`dSTvxJ;doOf+UC5WYt*Al2@o#UB29j$z1dQPC5Oj4K
z$Bd(0z(rHC&_8X3fZg%L19HbIV;8qRIGb7!GBnfCGaQPqz2dD3m3B%po=AQSdh(cN
z$lzAD%*Lxw4(sr&v9bFDt)S6*CjL>6matSHL}VUmWvjv#2z&lv-BxBfDRjEXZ<hU@
zbQ-SV@#|W7GCjYDg7rPFC3#jRq;5<tYp)}ol^DeDtSY8%i?V-`Ko`OurFWsTcVb)G
zG$hQB^cTO_n_9nn!NmUwp2oj3l@J$U)v&WfhWH$Xb8La>QdHSr<`hr#RM$FCRk4(Y
zif*#BI8A;$h1ar#$4WsuJ%Go@Ir{H#lA*7aDm0ToN6~=67$>Vxk)M8&hqcgM7Kin4
z=R(lcyJxvR5*o`-`gq&;3;ZPQW2DXCl_SQp0=GeDaoOUPMltbZRg{fujZxZi!n`Na
zMJoKwSpsLf_yZEM?7z<jJQBsU7YPCwIeMe0l7nwU(A6Hu>1^dE;J^B7X81`yNFmOy
zs`%v=^ndM4lK84+PdAFwe>qF*)y?w?$X_xLEW8X>ViA!20a^(pOeK%ITyzz=r;M%Q
z*I@0uK#FGyS$MPqH-GB-j}qvO5$s0(V!s?<8C8^7kb0m|@WO_Zd{}hnrl76u97mhJ
z3uPU~cG4jIr1^vF=uA;<(reg`UNEoie4&28oFklTJ+q*QDQ>+U@erJYxA%s%&v&Pd
zH#X|;crCs=bNCm9N`lao?dUSnv_*MXq1JusuB1oyAP3vU^f0@U<ks2XFnbZZb+~gr
z_f4WX+#+PexAovD?dm3))%*CwytAmC=8UOpO*$8aAa$ks2(ud&!9w1XO4--aH0hB2
zn!n`s91U$ZU(r|r&jACCud3*ddU1&HQZ+D+iOeQqZ@_sKB$z=l6^AUNFF8Edq!PWc
zLqSL8k#UrUoS0TZK=mOaMB5?!ThKzr^b8Ge<w&E!JZ)SMP$zLl_+GhSQhvQ&1~V3;
zL8LaskTxq%H#O(6$=EJQ-66M^n9-m}uclH^dp)a7@?@>r>~k!z><km@ExPn#nbdxC
zri`Wcj`*4?@w=g?iH+gb7G*wii`ji#(7Om~SWI<RFbh|t7FROUsR)PcdH-f;L1n;|
z$a=U{xP4gK<#xx0>zU6o+Qv+5jjBrla0%4iTf;Kv(<=;l$Hp=>CCc`}k8$7eiQ<pZ
zo&7@=e3a;pUmY~(z1b?`9eNb^ASOKzL4YlaC1JBDtf9)j9;#1t;E+0<!Qug%9ebp>
z<WPKm5tmclP+~q7J|TBt8ziCkS26~9*M|vsH-9&|U@pCGZ!JnUCENV>7t+X>Swr<4
zcfW;{ps26d?P<`TYF3r6=c<{^J(RweAqS@KoLPi<d}1gywk0X|D&7pNY{quj=ONVz
z{EK4MB&u-1=6_pu9CX6<h~8+A=df9H*gK581^Hzfrs)Ih3iiA$6|W^Q&XIl@#5YQ;
zrur?!$Z8Ol#IJ}*rk4-B<$tp(o~5&@6)XKKq4<Y#&U>&WzMWc$L7zghNGs_kxS^Ek
zP^2uA2BSbDz;d5%QqK9N_U=2Le>Z*UUD)e-{;h+f+3kDp0D-5bu0ef``o=+>_om=O
znt`pekAQvc(4}L?m{{XH%{>p0>Q%6Q`l8XN^sKqz(fy@tS&-r0^Q<NiH&*YgVWJhv
zfA;u?ho*StIva>WBi!^LQl>uKw~{5&53AHd#I~ii%Kp@!VDlu$G2$E|Gq#G2dFLu(
zYQzh;p<h4Ca^kAVprE9WX0oBFdi$9`u2PTuL_w$1o#kJ{YF9x(KcoFA4r&L1ddIkh
z!)JJAhh;87)4HvD=222iBxlF;iJND*mn%}{rh^l=pP4*Xsma1Av5n@SG#BL{FIFl_
zqbH%sZkpNLP8M1z;XB+cHqIU2dBJkD8)1zTbx6Md3we#}>X+WrhEG~d<1hn)Mx9rP
z+D$6&^Sb_>VLbI*rCWLJ-bHJ0o;+hZBKI3IN{K5B<+(oKcJ<8_GWQ7FzJpZ2VD7=Y
zIll}2FEU0tcIX6~ka1Q~Q<O~?5?@bqT!1o$7kE54C*uDCA;jo@){+|0kUk{nG`E|9
zRt@o)A}I5p3q->*q)sO?5s7t+TqFdF)>pO|Q24YHS?J3qvt?wODca6&X)6YF{w265
z?8wzFGrxQA@A+M%A+@dsSAmGI3KC*c#xh2oo|^p9hIZP>o^6}@RVs$9w?Ukf<zJpL
zP#s|e&Fy`?`*km4?T}08QMKP|zOQ%Mw*>TGJ}jiBDk>_b%F`|<8+o<`06{+<wD~dE
z_SHYq*7qMqMYAC)ha^$roOXtMA!3J*f8NHqnC&8ad|5Fc{IWZuNSZ=G$zF9;yKVp7
z4mlTAiQa1w<o2%$Q}pxcCy?oUOFC>j_E^HAOie~E2s>!_Tn*2}6b7{4Oon3%QMoN;
z><qt*H_9;v={R@$XMh(if0Z4}t+i_E3p#OC*LsK}jZ>0L8yX7%o36YLO)~10WB2r>
zn`UvDDpp=!*~H>cxFqg6c=X@}3?^x!OrN!VR~_5gTY7ZbKiCt2FH&Ux9`e4goDIsc
zn)hGaieZR5iF}bAh!7=U*P<jSL>8h^21EVwnvhoxEu$~wj4Z?=a&_wv*%xsVi6B65
z*I4~)(lcPv!b5Lnf9c6{oNThE-&U8@-^EUENg8LBQu9YvtuA#RP0w`D1Ma}jeno7C
zI6te*{=0{3H92)*g_*A}lT%ErIqKP0NWK~o%V5AHb&QwNlT;)z{;(075u*APH6!+B
zVVNf*<d8^Z6S~E+J&e-G?oC@YGC~AO=6YoN{<Tg~!HHv#99%lfn0CDZ<MK8`G2W`B
zbkb|x9=Epb=uWsJ+t`l8UkwF5!f+KUJJwW<wVFCec~ay2`0uX6I8XMaKlveW_A>L}
zqRJ(q$i4jb@(3vE>Igz#&WaQ|1dz+C^p(_TcIu0g*jcSA25<lPT+?zUuz&N^`vp{>
zs%uk{DrbB-Q}01H+~JnES|?x!pA@6E0NP8>&^l_y&#7q0)Lg@|fXYQ9rM?)ZDmYD&
zW;GQ3znHYP4kej+{uRvJyKsCV-(J%he9u`5G;%SBTA5|KzrRCtV{c)P8anX5jf&oN
z9RBGu{qJ`;n%}`iAfd5hrRBvIiMzWi7yeMnd6yr<+ncds?n-@iOJyO<FmHQi``1jq
z_Vqyt-Q~^T$u6k$aA{a?v4%W;HAz{abXy%+0~NmZ17J)|Odz2|eUnLE=EQ2G^rUfZ
zn?qiqRo(ao)jjh4-TiHg;gh-C`sVEBT9}%4bCWBI;r2O@rQYltVSUf$#-eyCD~iaA
zV1<E-;$=*CO!GZNeOGB^8w@PIPF{LjeWkcIyab0^I$tyHkogU#iw;6p1#IK(tWkse
zz&XP$>Jl4BasH>IA{R?xd8tnxiXK_j8U8mt-i_I9<L{Gxgm2JNHU=mqRNPMDDA~}<
zZY@%cs0+qPlFWZ@VPACm+u2*vI+!(t+PIw^wO*TS^Id!BTULkZTm5JnANgU8FZBnv
zx*pk9fS>2}E}#6;0Fz6@*9Tu%(QExPJ-|u_PQ3?<@ujh@_N2+BsaQ{9{!BzyCYlcy
z*}Xk5pv!~pc5YgNd16TJK;66?o9Y7^Vj$&TZS*^N|Dt}-3_A9(F`~z-_VDm<BKWnx
zDMnF_9Ha)d%qvI}0niZgss<${j(VP7+YshvM1miu;&RJSk36qcNZxL3SgA{ySLG;A
zR-DbDRG^=SuA<^sL*6_feWZS`PE7Rsc=S;b32%Di{CI{ec;+#ux*;@2xuK<fc3^Ri
z2iMaAr%RaGY+1(Z@mIv$5i$qe>sQa1Gso97<J}r5&g5;GeDFIG--vw#UWiW(73&r5
z*{6IHk?MquOIHkx2O)g`Zx}v&rDm}%$7lRh4Me+3b+IlSXI3@wexd6?|K#-n|7e%G
z?SCaJ%dG=vnHvN>$sJKddxHHaE-2UQZPQ?%*5RkFjZ`nH2gu7^{hh82rbqm??JF)9
zgjbRaQldSK$AMS)_a9p$0dcjvx&OGp7Ejf$Hm}Sdybhr4e-8h!A2Xk}!7Voq*ALeY
z;M~3K1EQUeUZF{*Yo_bN$IEZ#?~)=2A8doetCm1={dZCzN)VWa`5hjo2O9W+0tkQs
z_E=CdSI0)ff^3-?VL{P`8()FJhWwB~M&=v{&_fXTrSB1f`JEpp02j~$0ThA+1wete
zgTXNOIHgb^L}q;$pqZgAEU?<pmk{UjD@dAI@C&fzH~3Qk6(IB#nEMqp-1}(7><<Cx
zfdkh51~c_N+A+Ull-0kI2;u^6dOZnoGW%LF055%>&;Y8wM+s(sCY)_3;6pIjqVG}G
z@Rby&2NEa*0}6osuV1e})w~(?2STJcOi&;Z<{D@dHk^mw;5)-kB7jBjW0&EpKl3{@
zjt~rxDG2<~_lRxyirg5+!OY2t0Ep^qg$H!>uD}DieuL!=eF*@UFrcvBM<r%|EI<zw
z@KYX%*+0z98Llc*r|&B_8Q+kdk;5);pC=ArxR?72Fs$zpnfaX=M+h1i8wA$qdo*Ky
z*I@QX0&GKqguua_Ka|qO91b<EeI7~unGB}*p0u|@9&fLggR?LJgodv_n7g4qZ4#La
z1^OIZqv5L^vp*(aItWbk1S35Dp)m4q`#bz&%b&Z~^`MB4;F(D#`1L23{xU<XERiVG
zFCfub00<Hd&^Y2i{}qJCY!3qxW~Nk(-qYLFVitq|QjIzULxHgS9$^hTzW}k*v%^;f
zY-w<ogPibjPy*}m0f)Vh!G^DJ%>Lg2pRhOtf@Aw0TMS>R+^I?}Y7ZN<U^O6tZiX8W
zK)&7;I3R5ABQ;JB3V`Sf=yQlF{{azz0+{{{zU+G>eL)fo^oyQ0-`=|scH+QU4tB!$
z4+d16Pm97accTF=dzT*q!G4CXpU~q048DR4g20eCxu2?zZTeZ?-SWc&M9UyS=FAtc
zASLE*2tcr*FE&m94uA*}B-!_v+xs|V2^`HN#X0;9{+#L;kOK1-4Diz#)tS4A0E&TN
zHp5p!X2EgS20Zh$NelP7)4o<%z(dgIG*JS<VZDz|%<r5yA6NkFRq{PwPG`YXI&*P*
zD4qVMx~>gWoY+7xJI*#d@YBHu3}3(F1RwxDU;rP4fa&^SFG9X)i#noRjr!P|)7AM`
ztb5$<s5e>%qaI*K@1r?$Hz8mf7D)8fWC8x&>3>`Yxt}TcKV!OW(K)_G8+taz^%9|9
zKjr<JB*JRGe)#6|hysuN4%deOY&7)c!V&rcjQ#x|{;W73h=A?AZFQ$tB2}8#0@_re
zQf-DbwMCIAYlQplDN7)(3mQP<w-YXoM-Uhq=hOIhhOekNLMZ>Oq}tv`6gh;<ufWq@
z9FJhbjzpv&@TciM^|Ir9AmHShnD-_@&5PB*1J-*zQ31n!pB`K`yzz+%is7rG;p?>F
zs|&M#Cejt2d*rm4!*28$OLtCJ_9ZlE)36f-fbttmfD`ZqAOr=R4rZ~2`S^;{Gtf;_
z_E;^#FGO9n7Z#%I-|=hU5{>i5C&Yb=<`&Fo1PO3}1d$o~;^PDm0EnPKwZY&@!&iJ}
z|0tnKnF9lr{hQiK+9xj6$=4w3xR30y@t$(t{+{A?Sbz{5(BKQ`bH(TO;rQg792&mz
zIe!!{{!>&|mX^NhTh*$LT(q8=m}Z)ooMecLS!2T<w3#YYYt%mP-%#pwl;}+lF+>dr
zQpzSKR9`1R^xv~|VL1O6bhAgxFm4@^_d0hCP)99ZwqgyG5v<Q!Y|wslnf61keYq&a
z;Qx3HM%i+i27~^({G;|G%xhO-aEe#JaFUR>%PT!NJScM}yAe)IV;3q=W6{1V=&UNp
zVkZn_=3C#;RZd7M;$YSuPy&~=F8*C~B@{!9WJX;6Vdqd=X6YbQp<Zu28Fb&fL7*lE
z)pa-$WF4qh$v=pUB2Ysi${Zf^Fv0LO7}k|my;QnCk@?&T#<7f<A#DU9wQLdg;7~H?
z2b|!++iR35WCS4@$=nTgQ|E}-oC<944V7XpKMxU%R<+sUGn4Ndj=m~{6{8k*XLyWt
zbP<oP2ya5Wc6EluVn41G)=JSmw4w%i_Ut!+L|jsJ-hABbgF=}aK%0YWd7UoOny_$b
z66P={ct!V`WR556ID0-cEM3kNViA`;$bvg&5l$H6%^Y4rvlrSc#>fkx)L4~)l7PQU
z9ECl`1DC#)Nab~<a(AD@UWSt`Qz<WlKDuW(=nNfsZS19*$X1onRwh_`SoZ~2^fMLd
zdBRt(9g#VKYF!WQlZ?G(t3c?um36-18_kcs(L{Dy85!i1TgLnQxvK(G8XZ>&1!W?J
zF^jxBOL#Ya?P~t2f`S$gf3!eJP$FfZZ^@Dv*?6JcdBj<-lC%YM%<MH~8FgF|<Sd)=
z0C~=V8bGFNgudd7J|V#<0h~U?ay$}VLQ7v>R!cyv?sC2M09&6$5X#Ssz_^i!DKFFJ
znr1I7CVDg(+k~67tMuqs1Bycs<G2@Z0dA>mh6R~(&VeH{>+z!U+&sqGucbr`vKxfG
zKfNal1rbW#0A#Hm)ipX51Cq-S$E|sqV42-h%>=Q4=m{!{vzt<;QD5y+IoZ<gXWH^w
z<j+D+MQARx@~~TB%5PJ-&B2gIPwYaHq9?G1oJuGm=RWz2YB|B5`YpJ$xSK}xi>eF+
zG3L(}F_@n?p>$t(ci?|cQ)B)-8NvLL?FjReN*6*(A(ZwvdlOZIDBbT!liR<LX{!8%
z*b2e@xNR_K-=4)O8{m&z0ScvNbHsy+<_D<J%-I=>R-@WcBQfG<<-F%WiO75>vg2c{
z*aX|mAs+OiDB*I%KR!{eSgZ-U9*1XDzJzT@kWc7@MdS#o($}Ym=@ffS;@LTiL)pMn
z|M|C)j&g!9;$ydGi;JF*!FrRH4d*}ioSZ)>ndrqAN-O3~XX9Pu$XvL|qg&}rgLjNv
zs2x>3oTEhb^5>a(Ct<{k<1YR_{<1VRXZww23!R%Xi>s-}Uyk20nrxyMr;7Y<(F%nN
z>$@q|clIAkWtvFf2MAMu{^Uth+QH~y{=ki5g36r0QdU?FI&@zEL21kjhqb!sh4mC{
zFzhkS1_!lX;B2J`%;29!yh&kn9AQLm)Fx=#qJ@1@bO4Cyq+bo%O{~`Vu4s26UW8Ss
z)I!T|MN&9AW^qtp%r`j2T)IsEdLuGMve;}NG%X~}|FgY;hFONJ4zH~SS~^p80&Uj=
z9VU_j(^Zg{@Qi9fYWC;i%n@#M;49Y3qA=;G=eIZo5P5?V5zBXu-%~wtVikRm)=~Pj
zEZ#{t8`ww5=dfaRUe1uxzDVQNh8#4k!ZBt%e_<SzTBfI`$%1Dr9dcte*uFLqizQ`1
zr*K&YDKVv3z%1hOFX_$bh97Em$pEOiNCiaj<`7DEN8;IbPN$_{Mc&b-%cKBv8D!sn
z!QoBL|74(UZOhAh^Y!T<7<69E7ic^C%o)j3(MYqA*iTrVH%d=q<&eu)yGUyVm@7=S
z5I&EORJ4S7PSvMUBPxHzfi8dj1`u}pdP+Z1jkb|viPLldIiULs4SV*waGAw>PqOt3
zp@_t6)?%GEp}f4Z<<x1@kv*rZ=0v8nMu2~c`HN8&g|NSVIq#v>_pr!camXdhTW*ha
zz6@;_q+QPmIHjve-z&sS59(B=Pm!tw-)~2b(Z0VVQVn8^+^&lyfL)c90Y%n-A`7`}
zQ{<KO%@+tNXjo(`<i5TofUYKdc%i=x9UskVS!0wVkx36ycq0`qhgPU4k5HDsDpjN|
zQ!$9%Dst1(K5*{f6%X^2OGt~$$e8UAD^KT{BNYXSsnbO379a5#9kYs0i!abXML;c-
z|H_{;Jew@igm!}RX7*0^s8;=oNoSU+TY*S#6YdDwE>lOFN0~t~-f_^YbW}9@>4tjj
zF)MaqiYU|69_nm1BefsN{yyPcY{qEGL@6~+yC0cU4lPYqtRJ6vJCi=bGbI%^7`}|l
z0jGYQH_IPYVV0*B^;Os3|9$B7AZl`QlAUR<)O{BnvvfH!zn>zv_&KWNCjSEBQF3dS
zRkSI}9VJL^a5b8erv~{C7Ox|Fg{*J2-prL;7BN#4><0G&!xbw7wOxaBex%jkqDZR|
zDCml`-@N8CY+wBd5=AIbjNyO48!M^In9kIF<%zeVVY8f_Zjv&UPtl!QX4;~~Y+TjB
zwjzx)rqpP3%=L%Eb3F@4@OXz%`@T6K#Mk(M`~VB3|DCA^Ff!pg5jFw<3@0rtOdwWI
zOuz<SNrp$3nTCozl96$+vZ=7Kvi;8?%EC^@MoYm)_Sq(5XXALy5#Sr!T=cGZ@cQuV
zx!iot@^QEDILJ!p@iA|EI05TIm&0U33`0z?)~dv5JEG0x1G~8~W|;1ugd17@vdrK%
zK_iCE=NL|6C?7E0Fxhvt-ktqu^uc*Zq!CsLf)6fBVST2Gv;c8-<$Y@r+4#Y}j)iob
z621g;XZg!MFDu^s?~6wy(C~^+V+GMaWG}dr^e>y>$dPL77sa2C2u-+Ko^1+01x#+C
z-ZdOq?xJTU^*2U<B7e(t%G#PZ0eS>$JbxR9L#Egn4JD@YT#oCtkCkl)g+Z7Zsif!a
z3=-C@X4z)va+0{+yzX2v?w4iiqZ0gsg$k4SMX(|LZG^}KW)ab7b2z-h(IgFy3DwR0
zA~y$aQ-OW206u0JV2TnUkOY%5sx#vNi2xQx_y>bjx0X7Z&iA@m<riCu6t|XA@HcVU
zx#^6slsRvmka5T+c9sh*&v91gvZ-vvv=WLrwMqCHrq)*E_J7wewhKkFvju1aB~*3X
z3cp;6znjV}24UbZchNd}NB15trnNZ1eS?T+lQIF`z}AH*T&~U>7theZc*2-i1ec<r
zi?Z8$bNmbGn|I>$3{6vmCHKiT5uGrHDe}oiur!F?XXQBP?tPSoSeVE8+139oFNb(T
z5@G?6$8I*E&%3VlL&JA_)jE_tE=S{!UJ<_VU!`H{F&qUNGJ3B}PP^46n^{~ymg@#$
zAs`079aj>+)?s0JQOx8G$UUQINR4EVSgc)lqf5=P{b5gi=iPf6PfQZoOoveOnMyko
zAe|cT;T6nY`{F7tK9n+#xxc@US=z<8;e-ZYlnQD1&4Br!3yovax%HKrX+`xH*43Ko
zFa4P>?CE%jZ|vuGmK(E%DTVV)v^blqo%iZ)-qx!}4N>q%h9Hh<X!TzQX50t#e2&(9
zZ-@Ff68On5FyAe&WG3;oG4wF>QvWvExv9G?HE$&+>qNF-rTUC_scOk<>8(yRSZ~le
zRrcDsXnC!cu+~c6d^LbJNs5}XFE=w8n}I1A7|~FTzkT;VhAa#8ygsrj`|Z3&+w19I
zoe4i8DV=U+#^E(PcU(1b^EGhUtz?$9XObzpmIP)Q>aJQVyB^oi=DuNedkb}P-89i9
zvC-Gs+sWI>+|1l8?BpIQ;rbQ)?%7b-$<M|%dZ{=zLC;i*`BVg7%GOh0JpA~Nm|?|k
zq2b|Y8<@9l+1ET?TFruT)+wg;G;|J}zl@85IFk?we|E;sd*ST;Hq$yB0b-}&;J6d3
z@b-#kqXex~rm3dHE|0WmXzTx&_-oizg?MRbVUYivZYb%?|I-&#NvUaQ2b_%@J85q}
z85@IlGwvPVU(_Y>vFVPkt+Tz&`iww1P>GfE&Q0G#;&wNzWjO&59@0ykTAi!wxirIr
zz>-^7g-l&TUJ?@Lw(MN-HPt7=9=NgmfZ@htLt8?}DBvUoSjgm0$xGPOc-peRnsPSL
zvfJ%QFz@&g-DSx19S93$A$(rHN9YIakd?hySi^#60=V3)4*&xzM}AuwY%>vfPDj_v
zS2=FPjgJ_B-=eiZaI}`!Ix#jT6ZZRG-o(Vj*s(mc)Q+onmuA%V(HGEd!!O{Z!Z%;5
z_5;TyD@IGlY?^Nz_(tD34IViK7i>woRhU5B=T(jR6;m6y4ql6JCXf`A=4NJUs@#s@
zFlu;Aw{gp6lvEbf($c_lIbl|5yyuF<>HEgz>@*EO_p$7J!bIA-;8_`0QxLL60>*>7
zT!A!0KFpuO8y#Uv*I^pJl3qBVMDb0uLT-@^KA-llFje*?OLmgPHMF`y{x|Q!IgB(C
z+2JEKQ}R&H<0=+i6?Kn$fp&y}E=paARu5booeB8P3H%IgL;v>UGmBhp&<8ykolluJ
zk-(Dg_M+!Dg@u&%`U?KV_^36$kI9t4Lvt|`S#$Kc06Eu7Y|QN9W)-I|5_hN}Pq_TB
zbA|(T%Dg(tfb&`)J^gSeH{;!fp0aWN@?_T~AY{YeuN~N5u&x}3`Nd+&kd&GjoiXe*
z4|W5wrMK$}bt07NpW4co^?w+EyzO3yM_dJEE25GZrJ1h@c~rMU9m-hW`%IXz)d$wE
ze)z&0^f_@C%e2>B1oZagVQ;_#nFJLA(LK@igQM#R-Gv!mgW^}HSD`o3$XkXs?kS}L
z*+)Xluec|IJ^uNvAQ=q6Jw}g(1j6#Y!ngkL79~28%$>~s>hh09GuWe1rY!XBijMs!
zb={uM^N`4)Kg}qx)H&KEdiw@RLdPUufU?V@Ux4}RMR1rA34LIyA%krwVI3@Te{85p
zc_%ot%g7N;7be^2iz!YI?U#8Y2!7b{9k&%|qF#$D27*Ag3jTrcZA8iEMecssIWA1f
zend^^=>d38s7nr_{=+N61uML_>}~!q(QnBAxC#2Xdi8F7N*)Htt`O-%QjG|01GDR}
zk^2<!L{Y2+E_?NF=hJz0A<qqQCN#8VAE^+-O2OKl7Tetdc^YF3T*D&TA4!?Uv#}EC
z2b#3sy=dNcjWv!?f{C#ycf2ccum%w7(6|10?2tV|c87UK&+{;5X-3Q-*#~zR5%7PB
zwdOs4!0(BZ%f;zHuNjK);6n^WWBzfyBb){|-OuU?vjjS-2=a5piLpjrgrtgz_?86)
zH-l#XhwtAuGX$k5$wZK{Cz^VnP93ITDANuscL`5Z%`u$G{E)9PjT4U(hm(L4o0HFT
zT$Qep8S{v|95FIE7Wy*!c(|(I5yr0IuCTG+b6oucbT;Ra@gQ*lIVXh#y2<>!WQ=<g
zDJ6PhL{~%$Mi|;KMpQV(;Lu?9*Ug_vgO<jbfT|tQO~UZ(h_3Lrh~S8U@YO-xT`^-}
ziTkqni}FEZV>qWDPH0YWpF>bPxH==bXc|NsoE)?pBuwWKo!iVseLzD&KaD8;WUU(f
zWxRKFw$qlAGRQgTX$)&TcU525z&|?pV`YUTM{p2w*Lv4Kc*~JA8LW)!5U|@@b>>9Y
zRX!+ZjKva`COJWcg=S$IEi-*RML9*mNSuP6il%|KjLwDLg4%-N5z|R!(&~Zj#N;Fd
zMy*Gt8wLNM%HhPB2p1NUwv_>p17k$cHX>J2(tgU3yOX+8+>_oDCMU)d`tmuUve^Bt
z55Qr`Oq0!$q9<0Mz`~FXzX^{Dmkl3}sC1rdbPirdkHtya8B`dYAaHHZQq)z@Roqb6
z5ak!E!jE#1{6WQugE$+ZUl4ml1&krg$;O@ge|y5?WA$^DGT8lT{PnXBNqTauSVH^&
zvk~20$WQEWohY0boXF~fT7z4oT2azboqv0#X)5vy+cM)+U~~<Ze8M1WtYhr6r<N~0
zXljgNOk^DJsSD2unk9@oUQ;S7(3VJBgr1^?(w<Ts%_agiLNa_foC=8(q5#9o4TFg#
z<8#(xXVGUfrl_p-(xKp?M@pVSeq+J<aPDC4Om2^})>)HG`u}ZE^kvj#jB%g>4quft
zj1xBa3%FG{mknDok0}dB9zfPi*-X|<<xcKS=}vV|S%M0S3abdXoY_hZ>|Eo5T<zn+
z^NM!hXPxDO^Qx{zT^-^gOh3zv=<MTyU0viNTAggcS>0@LHGbs)cVmvw`Blclb-RsJ
z`r^l*`{~4Kyfl;XJ-U<Dg3m=LpYKU)?-ofr9+62C{UqbK9%D#4o)t(tLLeG^(p-#v
zjeXOwz0A@+?R6ljkGTZ7Dp*BveNx9cf@}mHvFYa}#u!M5TMnfl>-cl`lQQg1cnfuj
zXqCg3xIssgw!ug9VDQlfG|&*I5xP%|(SIGM5wcIV9)?L$i<}vFhRTWWCBLF;YP<ru
z*JM;Y!e}%eH)=!|&-JHT*d0kH_6$os^z4T^3rn}GuV!)lw6XcZt;2}a1mL270%Sjd
z^B%og2+po`y~9@!J<il6WB!=v*Ja7<_Tc#H0&MflVfxqEXpzMb(0uk0?fkxNcNwB>
z)0|wGtd#cjp4&Cg{POJbJuM%1o8%<I>s~$$7hi+rLHBX<X`e6+pBE5t4C(UHQxIa}
zzKwMQc2D!e>ygO$-RA5w5x{2{njW5RB&n-HZuGtl$96vzQ23hb5TTIqlmlAZmnJ)X
zo4;h&ePh2axWReFUVT6rVM%=WH@4ezr!e3)Lj+E7v5nz*^_*zEaol7>TgFXfE}Z5P
zBn;N_A*p$abbM79x?6D7#hfJRd3E3s9Z&;>9KS@JiO5lI{XCPIjV=$s57T0gUg7=y
zvol#{Gty?WF(dh+XM{2!p5+jHAY^)Eu=|0+vK4W9xbC>=1B>{Z?*pOztKHNrjzE3U
zP)=#~CTxn|wPJ!O8=&vK=dFgPYyMw3LPFmV>H}BNSH%wqTwO?pkI;pMvvy`&UHIzv
zP}hD$Pv}S^tclR!_fJ)+Z_;=cg79p|6T=?}yuspEh&T_k7q>o;ZNSE&9_AGG@W;eg
zhZfyn!GMvto)OoAC%Z+T@btm_L8HN)L9{`i2(7{RLEByGUCUh@V`L|KmQ?N-?i}vG
zG|A3b?s!ijCv-4`v7i%c{qINO`nX5b&s7w{oy;B0o&Ct{^c9R|%mP;0mD{D?wcRy=
zxRlSGCJ_|QlJ!ln+%lM?HjE*5xnLw_BxfWQENn9NTQN+Tyk3=S4zD)FUqx<?B{V|P
zy~gS!yc~SF>f_Hmyh-;(GZ^K%CIq%X-w}5O=j0!rh(8nfMRZGS7X%bsF30k?N~%c8
zO8Q7@NXEEyyR^A<xpcV1-o)J$IYvp%O1OUS8vMyZO3h*E`YW(9)+UW^+HJ*c?c7bW
zW4%3bqiZvG1Lh+6!tTP_qbtnIH-}p>h-x))SNdkpGg1J7pN=0hM=u8|2c%!>5!ceM
z0}{YJL$=4=5cK?cRrGK7-(BBJkm87-bF(hJ#^||otnIgB)HyD4jv{JPg^`3`0)O2s
zosaTnkn)rBeKN_}rR@{u$g8Cl68k9;GO8>a`mpy-&&KZ=?yB$99^IdiA7jFJ1`a|P
zY}V?nYD;kCT{16hybH8`u>~|PO)6(j+BCPX9+<05T4yeXH98u2>UxTJI(y1^YI`bp
z8hJ{4T0NdzP41}eH0|6?YPlHPv>w1sCT5nhE867Dch-4H-^?9UW;)pGFLpM2b>%+!
zy>kZy39aVtD&8DEBD_(&D}Pvjm<J^HEEy2>k@})Jp~0bzqS2sPq4A)Fpi!U|qg9e|
zN~(%4NGwP;NEw*wnu?e@o64AKn<|(ZnM#{l?VXHF#;e6Q#osB>k6~kCC!;14B%>!|
zC1a@JsG+OjHSt=zsH&;jsrs=;-HQ*4Q;AVYmWq{%ABtg1q>80V)W&QP=wa&N>k$nY
z`?5H(z_E<7(6Css@UVoiP_PuURGM%Os}3yy7g`J%eACYH3u(VmPe)e#J?^l57S8l1
z{<*AFi!_t{g+*T262kk;=#%r={Pf9*V(HYteWRi!$E54s>seXn$?ii~$Y_!2(qta{
z6^3yAW13+J1jeuOHulNfBKbM&OU^Ru&L8Fqy2KKk@3)CfYcLTcoCPzY$7p%dxm>!P
z%cUn-j0M<n?%&BXskYyIp|GHB8%okkYr@n+uU2<YcUbJ$v}f41%TeobYFE3AH<@>_
zdxprg$9EGzUcDVq?<&Q2tFHGG;9I*jowM6ITGbmpma+fkjFKGF_qlVg>x108;g0i$
zS^4D>zLCY5Db%bEen}YDHaPni5{Dz|$v<dyoT3nGe+G3ui)<Pnv$Si<#X>GSHnU4e
zm92>+U6V0Enajk2BHCq(Tp9-_S{}_&Je7Mjll)6!3X8PsC31?WWPa1Jq#rWs84bC3
zgm3qm4Ilg}TT8=9Egi|K=RJiZYY0%b`b0B*B~<ITa+!jkY-pz_wsr!7j&<_W%_jqP
zcPQI7i<e!SC5rGf^=}VY@fTspGjNR^g0~NCaudpco*DU}jyK&-GNzE^IxJ2Rn6uw{
zbtuTcGjbm)w%R>XX&M&*1h~~j8R=w-8LS<(3FC4+GI!5q+!QLwx>cstG?JD2IN5nc
z6&AM=DltlhCV-PBmJ00QvKtpw0iKF39v=1D!>Sf<n$nEhl9>y|=b_HX26x+rgd6#E
z{BqNngu4=gW!cg55`x-J=5AH#{U$h!<SJIPoCZ>dHkwPDLeqR2Dq0&VWYxK>bqMg?
z`;yF5{hHqg$(#Uc^l3r!%#VaTy4#YT4|78-o18-PxuWb6U&Csen?`vaE%A&|>jSI_
zj{V>Y2Y59D%!+Ow%g-nqYl3+3YFlre%&n=Cho&{dS+G5uSz6QU_eMcv{WAj&h0-!G
zyIFZcSQ&u9T|w=QP3<Y*GZ{qr%lUhD$yD0XHt$qP@{Ajl>;=pIEwPPm`VWVBJN=CA
zr4om_lh~C`)z0CPOZb^t8#V-C<|rh##j>1a^j~u`^S0jIZxdQ$OpTyww+Y6^oTs$u
zlFv`KcPrlQpR}>Tz&6VtYAlB=m{Bqdt+ZCm`yeVg9x7F7j)UA4;igs+^xZrpziwh&
z?;V){;-Ykl9My*eue?1{6~Sc7u_rRQr@xWvik0bgKPRU{DmMBdeH@rnove0@UgE_W
zlCmuCM%mcTxBMhl-)w7|_FT4ZhVNYX<l0OVXmT9_{L>E?`SmJZTiDaB`8_s^t*|o?
zWEbDALwHpfRanl4LT_v|{U?%`+|;i5dpiG$jEV*<fap|FYJNRDrY7fVR1o~bTx`}*
zCD1LtxT|zS-S9j_IC9~=UZbU0r2kBlc#CH?c^W4F6uNzK%H_Rsi`XIVP}XU#7uvMf
z{(SRxQ*x5crI_jb29KAI{B7u^0gR9XK6r0g*t}sd+y0u2VE3zSE_CRg`>*h7Oa2t^
z%Qj~tqAcB(`s}$K=J58GadajAx|YQaaA-lJ#>GyKKb3Fp3BOYQDW*L&HJWpu(rl7)
ze|?fRk<P$)jA20T$)5h(<`U3jTuv+hLR{y~y~jbXb`R|(-p*RxK}ST=zh!e>kY(S8
z*1ofJ?QP4NLalSP=AwQ5CRvrkLCF3b{9t0|?Qwm22>?I%(3Kx(6h{^ll}#K52bXLp
znU0|>N^SA1X^%_V*gflK`p;EpAT{6HFDk!eoXx|OY$TieMpS|)HuIOtx;ikT5rn&z
z(!|q-Rn7nEY`#=3j(o_Oo#vL;w@B{$<i1!P<Zxl!KPRi=PGPqv&?;Z@`RAvp6&l-C
zpRB%B9CqW1F$mVCI4lre{chhT`sI=0peEr`C;oeyd7fL-dhv9(>RFNP=ZsJB$4PU|
zsp5gA#c{dRbya7tpEb0faUH5EIe)RlG)*#1j&fy=3T;8wMQzd8uK<<z7x`+)02P-y
z;mujR1?xk=NiEyK2KzfJ=86bt^k1$`{#P@ZAL?_r#U*BRR?pfd=gF#vENrk#o{<R$
z0_yX8v{pc^NwgaBnziicLM0dW72|>fRf_DTm(m0JCls&11Kqr$wu+fQyefM%RuVc4
zmURi{<g>awG8t$}F4*hqd+J+Pf3)9D;b2K1tH6I-2ruQ^{r0SLOev^n+7w1XCAaRa
zS6*92GAXoH2Vb=v|0V>}D`76<_PNN>q-tJZW&9P~oDtFNWn&TDww$N4+izLFjr_=S
zs6P&z-l+5Ij!to_#X4v_o-5JGt+6yx$oyfaWoBu_VE3$Bxy8P==JJlIF3@koKooDb
zNEXFVFBYYZ7FTTKQ_#E;b6I~fn+-Jv!V;L*4!E_IeO)eys(ug8G2shnmTyVTwO=$b
zU%9omd1LXheP*oODzN(LXQ>#4)eLgt?5bXTkK$du)vfe*%DQ`YYOG$iY1^zYSlceS
zY&@ynI6Mt}w@!9gWRflT{KvR^+56oL*0!CaaDMI4?%AsHJr?iO)4F4*L}T?<l=CfI
zt*4;4NvKw;j?ls4?hq4KU7)*3O_AGnu~y$~5yOQBpTE=~)pGH}ZLPwCvGM*ANu1NK
zM(uKGy@X5i?gGm8S)y`lfHTK?s_~ew%DeW5`Wxl?<JsnR$#mT@o82?y{{p2zTEDCR
zdoQ-?w`5rLl-Abs`yaOIx7qx4Ta8t}eJTV#9oKGOWYyou49F7k41YVzcwznw%lK#h
zRGU87G9O3}7|+Z<&oVxkf2~!InrPKqbh7FfGpl|{g{A$h)eMWjSW%r-p9)remNkB}
zd48+@to8oDmd9K5*OILIh8|Y^?EzN3!rGtg!_ii~dXiQDYPwZFG$$ZW!aYX=#|zqj
zbdlBHN0-}<FSY5bZMt>!$d37Ky3L+rD*`ed+;eQ5wf<x4ZTea;zC)u!y7mNQY76M9
zY1$k|sG|uU@qyFZQ&xC;$Stx=Qr4^epw(&h+Rw6!yn*zqjO#ETGrsNPq^oK?7#WUr
z82O*^JL+ej`eMCIFb@l5&Ai>cH_|mZ9!~+oj>c!hlQ84e&;8XzKlhxN!xC5yt5B|l
zHLxD#I@kzXP;Q28u)}*RFmDfU3bLoSAF`J`2%Lpt>%SveArGN!hWhs;E95R<s8u5?
z<R0WUSpyu~wMBkKvO?CP+>H9yBrD{8b^IH3{D3<Ct$Eyg6Sbi?wc%!?4c<Pq=N8)2
zms+)*YOSPNcTlZ6X-^gH`NY_RHW{CQ)42J09e~ByABI;7Q4P^TV6qme#Xy19T5AnO
z+CXg(OwqEmkuY5wrHz6a+88Yt9?@oKGhmiBPkRbxYd>i}L5X%;I}VR)r?gWr$N1PB
zJi(mI33Hj3dErUcgf)SAES!bIQ!I)_!F+ZJy9AzQm$S=Z0gGpSVIj+9<6tA3z$QQ$
zo5&`@CiVc!hs~^r6~PuZjZK4h*&H?pD%g|kN!ZGku-&kY2XhIhd3)X-8hA4A3TJpv
z-cw_IAz!F*Jy(BL(;exKbS=SgkK-QgD#uXAP_4aVxMR3>wPUPftk%IX&M{8A#xcP$
zK}&Re?3}J$>+a_sqW$Qe=FzkUZ>YB$yU%-<cM*FfI3sujI~qJWxR{-kOa}2Fd9l2h
zhsaChB|KDKDlg?t<Yn?Q?vt0x%Xygmhx`X`DzA`N@MiL#@}E3hUMa8S&1HMpp8I77
z*?~vMM48AVWk=bON693a#G_>=*@?%<&ayLaA(Le?zeskKU3skRA$#zP<zP9O$H@$t
z!7q`SGLyHI!{ji2sT?Us@>X(`9K|n_W8@g#T8@+B_~mkfoWR@2`{aH6A9Avs%-hNb
z<%9eRIYmz4?c{Vho&QtLkTZC^d{jQluavXoES?}sWC_1Y&XIF?dpTFm<yXsjavtv>
z=gay08o59&;E8gPT*R-Hi{)b8QI^V5ew|z*m+&OHR4(QJlFQ^W-bpT(%lY+kg<Qcq
z%aw8^?;>B7ukvL1ntYAlAYYfS^RDs@`3CPM-;{6i?(!}97Qaz$lpA>uxk+x~J!QEp
z=e^{+@?CzD+$y*7-ts;99=}<>FW={V<OlKtevAB2e#raEkK{-ER{62~n5W23<)^%#
z+%0$W{_->V8NW?_E<fkD%P-}Z{0{kp{DBXUb+V4%DeGlDA1IH>WBe|8T>iq1=TJj1
z7X7T9)Xp%68C6&$i({>M4@a6K!;$G2=E!m6I>yUb87EuHR<gBhBiqV$GG1OKua?)y
zYvpzFU-Eh*mdP9C-7;O?BZtZ?nJq`lTsdCm$$VKLi{v!<uq>7{<zw=3`GkB@J|&-)
z3*|HNS^1oNUcMk-lrPDb<tn*au90iyI=NoHZNxU5(G@tix64YoL++GS@)NmBR?9td
zpFAvolt0O%@@MtARbw3(OY{6$q(i$~yGMV+`CCw@Kd`dr|C3fml9k5Fm}$eEpZ_nh
z&-fg!18wV%_o{805m+_XSeNm6vuG_&YojG-9kpbwmzIK&I!zm)<!BSNLX6HO+I+24
zTdu9v)@z%!?OK(#N2}EiYDctVcxIWlP1~teYc;s1PCJ2@4MP9;SuAUfu{e=+W<6M6
zHh`tFVQe(ZV+Cv~D`q7S%?7hfmd(bqeB3jW&1H+&Qnr$<WgA%q+rf6Ree3``!j7{B
z?&Ok(^A@}%Z^Ps9%+p-wUfz^P<DRw{uakIJ-kbO5gLnqd;<<bhFXF{~4qw2R@D+Rw
z-@rHXZF~nr^ZC4#FXyZIdfc;}SMfc(mLKBv{G`rwx9-y;^*Ftao}hQsll5MDiat<J
z)id=hR~~TmRj%tklH*(xNsf2jPjZ6m0hGD;E}vwsYck1kt^$(dT@R9+;Ccw<I4oC0
zGS@YQ<T%$<lH*;|NKSA)jB-4dn?W+y^$5vvu40noU5}ES;F^VU0+yRiGS~GO$#Jd{
zlH*;Elbqn11PqTBBFDL=BgeaDA}6?>p!Sb-%~ke2sqCAl?0ZVtH(%NJw6be~vTLET
z>ltO&VrAE}%C1sn*K^9Q=apScm0d3=yOt@tUQ~9yr0iOu?0Q+*wNlyjin41CS~1qO
zi0oQIb}c8nUR8FjR(8Fn>{_GjdR^J|hO%p&>bEzQee0EdZz=mWDEr=4_H9&ly`${f
zr0m+P>?&7wZBcf;tL)mU?AoU6dQaK4UD@@%vTGIDwU&CVjO?l)yFO5M?ND}osO;LQ
z?D|OA^|7++6J^(@%C23?uHDM6&y-zzlwF^ze%q_;`$E~bPucgSvad$j_m#5iYh~Ad
zW!E>#t^>-hZ<Sq@WLFj0RZYECOLl#y>^h|E`d-;}SlRW1vg=1>SDmu!CuLW?vg@d_
z>t|)xab?#p%B~a2u3wd1r<7f%m0iCnyBbu#oiXimgK3{zGwpLT(>^y>_8la<j*wl)
z$gYz{uVIWG0GDf3>=}$txA06pl#k%|^09mzpTO_q5Af;yVLpRDg3;<x%ra~F*L*+!
zh9BVH@`L<4j7;D2!~6$+g#XCv_)i$8j`Cyt=im+)%P-e<vPJwR-UnmeJ$x7+&T}yG
zjpun7{qp%_UcevZh5RA@G{(BOFao~KH}ZFQ8Q+AFubgk;@A3-16{F&N7zf|ymHdO?
zt7&zVVB8n5)}H|=zxTu0Z@B<GM=Pf+qlDf<zf6@d?wDu4$AWVZIL6>C0KKUmgXLQ5
zt-%v;hEYfBfI1kogb<9pVY)+i>Ov3FT^NZyx>pa@r5>V(>c%QhH*7Ng#Tq<^>HpF@
zfmiRMcfoZbgG7knOZhU4^sijVt_yiE;w?N+@aOsSc+D613)q^M_)Ea}N{$f*Jywo2
z*7EN`My!umk3L|~0sL701uVDnf*!p<-{DzKY}rz*V;NtDb*$hku#Q(aMlWpX2Uv$;
zk2HL8rkZ?GOFn7z(RwU}K5}HUHMZ|Cnco;V`w95RpadR=Iq(FoLXB^)Jq7dOX;=UY
z>GS-HF=H#m-dh6C;|lc!SOzcR8ucYu0Wae!^%Y#Lz6z`1HC(U04r}2JT(Q21E7!MR
z1H6rE*LR={HsR{E99OaLLIrHab?kev9o~mZ_yBgmhp-bqf-3kJK7mhR7wm>=_zd>I
z=dc&PfPL^K)WBCz3tz*2`puAU;UIhmhv0iS3_rjT_z~*hC#Z*`a14Hi<M0cdfM4Mx
zoPyKv8#KTf9CRAHm8GzLtUtSr-Old7eBw?vkln=wvAZ#k_%~)3Ls%M1XBq4s%qoUr
zt}&dAVE3{tHWG7;QJ8s*VT)Nc`;6^jpR>K}3(PLQWHsz7R?EI-``I^`YkbQNvhUa-
z_B}hy-RuW;gnQVJtd9M}>e*3tjQxzc$S>>!`<0z!r`T!s8*5-^FaT(ragG^@1M?KY
zgSd;|%2Rkh%17?zseA|@$;V(uGKEj&)A-~3Da=b&@mKk4n3=5OZ}J`dL%x%LgxSc)
z{1g5u-^F+HYW^AKCZF@Y{0qL1f5~h3SNe5&l3t~Mtbd|^s_)Ww>(%;a`X2preXst7
zzEA&BuhGBKYxS@7{rWfh0sUM3p#GhHNdI0xtpA`N(SOwI^q=&4{iuFS|5-n-|DvDJ
zf7MUwr}WeMZ+e4%#u4oBi7p~p+#tG&Zlb%mQS=Z!MK5ua=q+v*eZ(!IueepDh<>8K
zxJ}$H?hpgSonoN4OAHcsi^1aGB2^3#X(AoBdvF_y+i)>L+$*xgNRcf@iP2(=$Pr^j
zt{5lAiwPo6+$SdDHc31n^2KCPARZKj;vrEariiIxnwTyg7Bj>nqF6jCW{O#2ws=gG
zh{weo@r0Nwo)q)MQ)0e&S}YI?#Uk;HSS+3urQ$iUM7$(ch?m7m@rqa_UKOjwYhsOf
zU91&vh;`ykv0l6-Hi);yM)8g)6Pv_lQ7*QKcSVKRDz=ID#CGw%s1zTF9pXc=Q+y<<
z#K+<j@u}D)c8hB9nb;#f7kkAQVxRa@)QGP{t@v8(7vG2j;#+Z0d?yZx@5N#9gE%67
z6m{Y!Q7=x2U&TprN}LwIi3V{d2!b^6yjUt;5X;1iV!1dfj)|Yeaq){g&wZbJqWgaL
zB=-aEeD`E`f%`#sq5C0sk$Z}Js^@;sB+mn$e9vT0f#*R_q30n_k!PxBnrFJ_Vb2WD
zBc5W<qn??bS)SSd!`^v-Nl|QjysFdmcJ~ZDT{X+jf{2JqUZU#~1Vki*NEXQ%L<s_-
z0xDM#6%Y}*NLUbXi6SB_L82mJxajjL3Mghwh~at_k?>CaXBHO26%~E(zWdF`IlVu+
zdrqCIu5+roy2qX2&U9zFv)vqbjyu<V*q!IjcNe&ixVi2^cagi;UE(fvA9a_zkGU({
z$K93g6YeT^wY%Bf;%;@Ha-Vj$xzD)U-RIpG+<&+`-Iv^#-T!f4asTPQ>b~aga^G;@
zb>DYCbU$)GaX)jvaKCc@<$mM-+x^!4&OPLQ?;du4aF4jh+~XeexTkr#XLzP(dGC84
zcprNEy^p+)y-&PPz0bS@-sj#y?+fos?<?<X?_b_G-oL$Xz3;q3-uK>N?+5RQcho!P
z9S^fG4{KpPY=q6Q6%K{%a7x$-yJ0UJ4oAX;!hSd!4#FZV!?AE`xNtZv91o|5i-e1Y
z&kGj|pC2wBz93v8d||j`_@Zz|cxHH3cy>4^JSRLi{BU?)cz$?6_>pjKcwu-EQ%|5_
z4hwThw`y}V>OnC>^swGUZ^~ZNo9ivu>v~818n#>SqIYF`5%J#A2kV2`K8jSgv$ypr
z`V{uQK3$*AKA;#plYNM2vmepsBSf2z5p6!v^Yk_BQ}p}?jOs=W&M?!YnU3l3N~Ul6
zyfWsJs#xz@`}xPAN}+1}Am)|+<=o}W)HLT2XR}t=dCobcRl)3156mm&B6_E=Op57Q
ztS+n1+9mJTbC!a!Sxv2h)>ymJdB9oYsMTF+?M4GCdn5dgqgrv%j@gvKbYZ>dsKLou
zPxYjd&PK8^6pwWJdpyM;onp}xHr>6GX_4pLWsuL3eBIqaa<}^&$-VB2;IEV1>h6Zz
zOY#NxEt3Cm-zNEz`?=aD5>v-UQq{4M!Z`LQcnZm9A`Z!CBQ8iG5FaE8k_Hk7Nmqp8
z=MwFeKPi5m8a@Ai$IibddaC$%x-s$3jE6y}SEx^@U+5N!E-ETsLGiE|BGpwCbtWMO
zcA)sDB3~lz^*+srH|ken-A^OkLlomqMz?~I<7|s`Cn6ceyy+C13r4)lD6>#`MIx(E
zIYmp#D!xzV6hBZ#aW!QVImjpGP&RRxT5UUOsa;jO%#VxOb*IKe&-bEU;0aH9F)!6C
z?4@~eFWoER74^>Zih1XI#k~u>65fSgN$(;r!z<;L_R4r=e>Rfd`SY<fk`i$u?rBBT
zWj~FnkwOta68%YJeb(LKK8N`F;?G9d*D1#CcK5n(xo_vk+DK}oFyig!zZh|k{xs%B
z(jxIl`tORor^H?F=$VMT{?oq_d#~ggkI@h)otI{kx8!Zug}8H6ns?#7SvlU9_hnUi
zf8L)}<Ja=**u{JhznNw8QT#zxpU>d4Sr@*Vzr=cIL$zUSv^GK;&2H0f)oy3wwZCb1
zv3s?<wTW!9cAqwdJ&1ci4{6gh>hHB2Er;dko*u9{y3{4h)l>DdY@uFWugEs&mG$~;
z3*z~!i07|iY_`joXS~EdHKS&fr<vcH-}1P5$UMZ;&BNwlUc@4Y@uJq<)<k}ub)WSB
zFJV1sP3NVo8P;rG&YEK_;T5fA)+%1p%Colf`qmEXW!~1>W$of!tlidL-qm``dYkv4
z$bXdgwvJQe9~;UF)#PhKmxk)_O?DZ(EZ=IEw=43e?aFp#{;Zv4XYn0&b-Ox$&aQ3O
z=Fi)8?YjI0yPjQ-zi2nG8}NVFjqS#Kr`^nM#$U4A*lqaBc6+-${~x=f-I2dyceQ)+
zf7<=+{``#;8jSPZP7kLi-{bUl`tdiN0nRY~jx)j;!9SzCVJ1I7xx;4uZ|6(r5I^Q>
z?loG-?d;yHb@%3Y?`gM&n}(ZePlqRlXK357noOe+=W@)fcjkSPB(DHb^9dF!LE~Sw
zUN*U&l$Ya~JexP<P5E@%{}K8qNn>?vFUMaSlYecbzuuycMzOZLnQj&_i<;+|#mw`~
z;^qZr3G+g;q<N8<VU{vWn`O+hW;wIGS;5RSE1H$e%4QX_D*q>cmA}S!@z?nqd^g|2
z_wqOSTYMjXo4>=~<?r$L`3L+%zMp@@KjxqCPx)v3fT0_P{;mF<en|gbKdk?tAJLEM
z$MoZWgc;1>hI+!MJLP0i@=F>k$};fl?G;%K@=b00LUmKto?T7Zn#$7p;hBB)29#Ur
zIx56{x{iwR(sUhlB=7d;1L<lR&PVXk{BC|PpTH;66|<Ue;amB3{;c{XO#Rl=oi94w
z*(x<#V_bG(rf70<rsxrpmui)@EUmuQgz}U2lzm+5jCbyK?r|nK6P-!Uea>Vj*IDQ+
zc9u9xon_80=XGbdv&Y%%yy?8{yyLv<yyv{1?8Q&^;i`|$@1a$Xn%|$Qe)Qys<#VhE
zsHt^2Vb`XlT`FsC1G}n|Wi4S@N3w0mf3$76^O&>3S?N6Cta4U6d8gR=k@K<hiSwCr
z!1>%c=zQ@XElxy~g7Kta84~?{f!-daXsiuL-n*)iEDNI?Rbv+A_(K>|BL!AZjV9Su
z>OM4U?cU;D!FEzqJC8p^`(;vTE7NEvOUq)MN?o1KSxc+MbSi&+W>D=kVJ3N^C7rRA
z){2G5Bkh?@Ug=2Vh|XGP=8%7SGnaD4Yneyc;t&>gu6C|w5gNgcVTEXvGKKlhRA(kD
zN@JBgR?=DPY-U+BV)=sAcD`~BvECGq?_$?c<ekiJrbxStjiorcnmtHyb2pn!wf7cV
zOEvg5TSw9GUACU;@_qIs)#rz71J&tAY$Mg{Cu|ed?PqK=Maa+D7K)Nzu&op+zhX~O
zv^>h5rr2n)os=)6v0aoST)_5GUQm|pCttYiAVumZ`-<XaI%U)O?V?7qUHsRhf83+W
zll90yGI@t}A=cvP|Ml!2_H4dS>z!z=|Ml#dYqO<K^s6dE)iE!W@aP5bWhF(OS<V8Y
zTbvy%#rfV<NBsEi$ZtJb9aX8o^|I(ht^Ss?<R4$@gcZO2EE@HL>Axp0QmZL`PbNag
zd1PZMn~vv5bUJcIA;#*mJ?uU9Df^lorn5RcptGL-+Jzl_CzW6iS-YPf;9qmfST#d)
zG+#^AimLS-TBcS_tD)7^8feX^m3Pp(XuY%n+F%+*jMBzx<F!ewj22++M_H{3?O6}G
zOGm8-?KM=pnfAFyo1)Fo=4nf`mD*ZuleSHJUVB;FrM;=Wr+us))V|RU>rA)QI73fM
ztZAU@?M+@5Wh}%iKzHQX(4Bd8=q|hlbXQ&zx*M+r-JM?w-GkSL?#b&w_u_S-d-Kbn
z`|$eE{doiEfxId7Abw@Sw`O6bjXX0AdW{)ZI`V_<Ds2keQ`%Z!hoLvx5$H{JA?TyF
z4}HvzLLavSrD+5rpz9P$)ZqYLhN;$2j$~<Go@7U!iOjzu$u6AQAC<8($!@#~$?m)=
z$sW8K$)5aTlD&8q$=>`Dl6`nRwL*tqPV!oQ1<8TDA<03!5y`>4G07pk3CW?n8Oa&E
zImubP1<9GFWEzz>Mskg*W*UF6HKtKX>B^vT8YDN`Cdo~<Me?W}B6-ZVNglUTm_}uz
zv5Q@YFQJmnpwcXb?#!1#cj1phcje2WyYa`Md+-&|J^AC%-T6xBUi=B@-h35wANxF|
z$(~|LlSSu4Z?ua;Z?Z3dK5CbMK4xDCecUdoG+B2MbRC`pU(bP;=fcYm!^`vF<@xaM
z0{Hh4csv(gUI;HQf|nO7-`Nu0iNQOm@J?ZPCk@_-!#nBlP7!#gsPaxBhTcZ4-&Idr
zWia(Dr9r(xjI5bVSGek%)T**#$<<{gcq&>&Vbo?CYAp`g4|P3FZPULrb~kU!+w-e=
z2i}hNb2?D0>6o}@q7B!^(6#!YK0{xuuZ$dt9E}`{9H(Awwv*$`appP?JM*0R&I0P;
zwmMHaPdnS3XPoWMv(AplcM&b3M~sLWu_B>}?R@VXc7AY<I7gjh&T*Hy+`ZqO;y&O`
zbsu!6xqo-3yAQc}?izQkyUtzjKIv|7H@chLJ?@+CKKC8>J@*55zx%QKse8aZ=zi&b
z?S(wsOYt1f^*k@^MZ7{@Ij_7|!OQe2dX>D&UKOvZSIxWF%knPqvc2kF4X>tG%e&O8
z?bY$>dY5_iyvx1%-W3rq5{^V7K}1Ak<WS`M$l*wlNYTi7)K6z%&V*r}#H6u7Q;OFE
zw1E_(hiStoE|1nmvoKb`MlkzP2y+@f?n^}V$MwfqU_EB7V8U8stzj|iJL@}^sz&;(
zuo~&J;?6$jLsmwO_gQ6kJVojn?xPf=FL!rSjBe)cb@#I7h}10*sjoz&Ziz^J6(V&j
zMC#Uv)NK%{+agl8L!@qxNZr9bMlt$o&!@QD195pY;__{g7{%qkQ90MMj;B+jzpn=W
zlzPgqAqU=M@Ma497{HH3;K!0Ec?Fa_3njk_C2xa_q<vz>#B|IsR?|0O&ylRhiWO}C
zKW@dp+#VBcM_ql?QkrN@6Z8I5!zaeq&IitiKc0s?IR{C#k*e;`z$Vv>oUkc>oxMS=
zZZx&FsmXmjvrqxM(^$&MYdHTpRd=VT4PQmEyfts5+9I{Y?`ZEzEOxs01^lPglLm>^
z6KV#EdYQ!Y1j<70t7l&ge=F1c!9UCOa5eg$ME+I(MDDkkWMRLgU&hb$FZQ$iOZ;rV
zx?jV;)W6)X?_c3J@EiJ#{KkG0zp3BCZ|z^>cg0ypCeM_GGRPC>@_zPQbR3RqcFM8E
z>DcrF$8x{!Y3)_vM|)}PX3VuM!qX3Gza_+cGsR3{%<rZ=;P>!*lV|$+1DNFx^si%%
zKgb_K*52UXzzX@p{hOHY-{RlGV*Y6VR+j4D?vG`0{|^5SR>U9Yk7q^wiT*TpzCXiX
zz{>c!<j-nqwGEZF8GT0!zXj1&ers0NZ|k>Z<^7I+XI8=QO5UpMPw*$ODzLUZq^bp-
zjiQfw;&w@LJ<_>iwR(%zxni|O`?Wn`y}`!NXC+f_I#_mMMfAC2zk2hfdP62pUJc6f
zXwq_JGl$J4Y)*mAE^Lm#=0dPp!sZxkPJ_+qu(^nTuYWHqcEa-cuzV@2>OV^MS1-^G
zn&FDOjj1Qsm!ERQ{Z+R7-WJ>pK5T;iPh%|$SpIv@m*`)0^!n<r2DH_xz;*FQ&zr~~
zY4k!FW+hfKdEOuI+3G|;PhN*L>3APUBiioBy0JEA#GW62%Sqcxl6A#?!M2~bO0C0a
zafZBf(w?*7>S%t3+gS4gZJ}g=w(v{-ZvGRm{O1<b{1;l#xp;jyKjT;8N$+cT#^mHR
zb!J-ck8A5pU%9_ryW^O82lHQ>FP*fj1LRm_6yw=grrvEj>MzbHPFmCICpIP4f1O=6
zsmx2gtMJ^&yb9W$pLeOe@!ZI}er)|(vVPM!Wc`m@kBMKKUyt98O!VqS&%sg{$yRjk
z*Mxe8{@kqzH4lRK82IYxnv*jP>aBK$Kam;XYGkp>ff9E+(vgGciTMQ3#1X!KC6%zX
z-xBgFCI90w>b+-@j!`oi>ZpXiDxnKnLSC%O`myWTFp6<1)?pnl%Spb)AdhWGytjb8
z%J#5#*nW0^ea#NBW8B~l_jxK;&yJSnnY<dW!Rzt{ycuuBJMb>N7aza}^AUU$AIrz{
zNqnkblB_Q2UqtdEKZ9h3Uy5WYzck6xei@Qw{IVp=`sGNLBY$dsdA|b53VtTZOur(@
zihd=MmHf&iEBjSQR`IKntm;#p`PInJnwn7|ndM(X@)AFrWVTPalA2*5S;MbMvZh~)
zWG(+vl9&3mN!Ir3kgVg^C0W<MjO1m0J(BhO%Sm4DQ<kcHOj7w-Q}aC}8~Tk%Hu4*j
zY)mz&sret0O{wi@elu!28nvKS7@xLA?X@M@*6&ENqkj#_Yy3_mJ5ig`{La*-G-_EB
zNKPp5L~<gEEoJ$4?tWX_JlXEl6KNJ*8C{rW-l=4mA}ROS->8PB@f@DZm-9TniErmS
z`7XYX@8<{kxBQr9X%Q_|E2d>=nOc@sTWg@T(AxcuCwMdTOg&4ltvAqH=<W0_dLR9I
zeS|(nAE!^!r|CI*uD)E)(>Lkc^_}`IeV@KxKd67JA2Tc?Vx$_yj0_{w$TDgh4U85>
zJEM!y$GF}YVT>`x8Iz1@MvjqdEI0CuO~!U(r?Jb}XY4l)8s8enOv{Xzsb(=V!^||Z
z%-UuHvxV8t>|*vYuQx}SW6W{pBy*aXL*9ucdluzi4*!;gf6KwY72w}Y@^3d*1^rGn
z^gG$;cWR;Esf~W;GW0w3(C;)vztaf)PE+(d&C&0)pc<OSu0p@l3H=V`oJJazvn1&f
zMrk9Hba|tSkxe?wsAbe6U6)Ev<8z~l(b8x~x{Z2DnRFMUmob2JKk~^i(nF1r#u(D0
zjIqXe(&LN?#uU<%$y2jP&oJg1xuh2uON<qymm8~$^`zI5|F)5S%GhD-B>kfCitz^N
zUB;Wnd!*kXuO1-%sqv-pE$MHJ!zLqr%rs1g>84G-mZSqS%`8T`s9C}+O*+FYZ&o2)
ziE5x0=^AETvjOS)W)qWoD5{Y*W=GN;s9t)J?qT*buO~gw9BPgvJ;EGiQd}@^quQct
z!@S3wY)&IR)tq6@C7oj~Fqe>CWG**XkzQ%8H8+voU_NE;Aidpu(R_vU%jPcgP11YJ
zcg+2yKQKQvza)Lo{Kh;?`jC0dGMH{@mTg5ydsbl4sL)EaidrQ|7q>F3@}$dJm8>k%
z)vOv;UDCC!`c@OtjjR?{8`7<;4ptY^ova>KKhk}yf!0vcgRK$PDAG4uw^`#z-(lTj
zO(s3bnrh7;J>AN&7LcB2EwYxAUS_Sd){@S%Hds%Q-ePUHUL^gz^|G~#^sCk$>mAbj
ztPiYDNq=k|w7wzzwROlkM*2ud3)xH$Ss^bJkoH5Vp`xVIL&ZZGq)Ud%hANTH3{?x&
zAe|km9jZ^dUZ_#11?gs?R-q20+l4xXdXVlG>Ju7BdO&D!XawnDp_@aukscGeBXkex
z@u5kfsidcbriXG!&kD^8Eh3#8S{7PKdPOKNw1M>c(3a44(%VAMhh8SVGxTa`59v2T
z`$8X(elPTK=pg9>>iH?s--eFZ8q;lNTk3AK?byDZN?O|K>Yk`w%r0q{C0*Liw5yS>
zVrSd6N!POL*)&SD8`#b4R-{|n?d(pZJKEjsKBRlu1MI=1ueXQUH<KP|kFoC{J=Pv?
zPa-|Ro?=fYJ<XnF&m%q8&b613UShAX^GL6<*V|i2Z?d=9&y(I^@3dbf{fhmDy^r*p
z_Ivinr1#qg?5|0GX@6@UA$>T7rC3Z)F;biqpL8TerlgZjODUE@*MCZhl+r15{il>q
zsgjaSeG>K9N`|XJR#owo`tXv9Kvq?;mB>XP7lCAeWPoIVlmaOQQVOIrNNJGLAZ0+x
zfRq6#3sM%OEJ!(!av<eE%7c^#DGyQsqyk6<kW7$FkW7$@AQeF>f>Z*j1X2m4GDu~R
z${<xhs(@4hsR~jRq$)@?kZK^+KrRNk802D*ERZaaERah;E&;g&BpW0fBpakUNOh3v
zAT>a0fYbn~2~rcJCP*!iS|GJRE(N(1<Wi8@AhkhigVX`315yX1E=XOFx*(T<Tn2I(
zNIj5xAoV~l2e};Na*+BU^+D=`Tmf<g$Q2+BKpKEF0BH!)5TqeUBalWQjX)ZMGzMu5
z(gdUlNE48zAWcD<f;0nZ2GR_q1xO2!79g!aT7k3zX${gEq%}xekhUOgK{|qT1nCHJ
z4ahYh*MM{a=>*aVq%%lokj@}oLAru;1?dLT4Wt`L50D-pJwSSb^aSY%(hH;)NH37y
zAiY6)gY*UI3(^;)A4ortejxop`h)Zb82~Z>WB|xOkbxirL9PS24&*wJK_G)b27wF)
z84NNQWC+L*kRc#9fZPCb1ITcY;UL37Mu3a}83A%5$c-R3f{X+i2{IDoCXkyzZUVUl
z<Q9-yKt_X%1{n=924oD#7?4{*ZUwm&<aUtTL2d^b3o;gDEXW-ocYxdhG7e-M$T*O@
zK<)y$3uHXVc#!cR6F??_OaPe(G7)4V$Rv<SAd^7u1Gx|6K9I>ElR+kf+z)a;$o(Kw
zK&F690eJxA0gwkkrh-fbnF{hC$b%pcf=mOM1~Ls~2FMJM86Y!3W`fKFnFTTnWERM5
zkl7%!L2^KHKypClfXo4z12Pw6F34Pvhd~|&c^G6K$UKmFAoD@ygUkn60I~pN0Z1-L
zE=VrOLXd?Z3qclvECN{svKVAB$YPKsAWJ}&fGh=B3bGVr8OSn_Wgw4&JPPtC$a0Y7
zAj?4>19=SOF_0A?D?nC&JPz_W$m1X@K~{pS1bG7F36Lj1R)MSnSp~8hWHrcYkUWq)
zkUWqzAZtL@fUE^s3$hku9mqP6bs+0O)`P4Ec@pGFkS9SlfNTKS0J0HeBgjUOO(2^<
zHi2vg*$lE7WDCd^kS!ovLAHV@sowiooP}8>R*hw|T6hM!5o^X;vNo&(>%_XLRU$O9
zZ$aZdHDXpXCu(L{y<a7pC7!2H@2gjDI8*B_)VsD5&q%BL4vBkL&Hm8rKy#AKlXC<Z
z`O_JzuvFHA^<e|qP&{QlmW^Zgut}JgnZ@R^1#A&p##XXCwm$ibM5%r^8jJSyd-=U-
zG}_M}phlxK79C6@(GmWQ{!KIr9pm4s#-F~r^GA^ZXV>rz8oout^W2F$gX)gQc*gNY
zcj~$5yVbkD)j#z<{OL^nrla~TM-B5t9RJjFGnD0H)`(h%ntN3J1&y6&Le9dh$82op
zV0#X>=VJR|Y|q2?d~D}JE`(eJxfpU8<fGVgIkq2%TnYIE<SNM3ka^g14Yt=pu7g|;
zxsmC9d(t#c^gEE=47x=f!#JKz3o!Shk>}_LY9T>_skTf<Qv0RjHe!2|+CF8rr7vdr
z7O0w5Gl9pCv;2E+>b*C26u1Ms>@U6p+YDtI>@QE+G7q(RTk;;)Uulg-9x6#WD)U=Y
z{&v294dq(JF>`g{&sw^G+MK%UG&VUWb~f9ZOINEw^{hVWXT7!Aj7Dwfeex~Usb9;V
zWpvO(x+jiI+$Ak|d^_q7b*hz?=tC1{_+<-z>)AU{zpd5~r?Xb*pU?F9)hY{<6~(6w
zdjB*14T+U`C6Z@8wFcB*GfvcldIwi3BF?Yb@XKeZLA9W2BMnjO_n)U0c{}0vbi}^j
zf2I;tCXKvX_D3El=qdHrg5S9R{N(<1lO?W!*nGNn{?fOfnX~2FR_}xtYawg+qt>0N
z^X1!DpITjh>#vPfA%E1uGk3;(8;he4&5xI-t`8}AowX#7sO#rsYyJJ}P70p)r{90s
zpY;7dJ+HbBO5?2g@7jKpCGOs-JuioB2s!4I4CK1x{hlSrQJ1RB6K89}l#kVW?fN8p
zYvt=-UXh&W>zXFZkOGU<FE^zmS3aLy_ncVs+>>M>WTYw|9jGE0#jn}^9DhE=s73x-
z%EEL+8+CQ5h|}UUtoYC07owb(qNcytU*a#N957MNvB`3F`xDCfYb8{c%}$oHW3rr$
z{y;f@T*8y*|GzJ1-!odDeb3tZoc|}+=lrvzoCD8jeGWWp>vPecT%U{1l5&ptlgl~c
zEGg&8Ke?PM&ysTXJEPZUzq9uG%>9$=GZ!mH1Nx}nv9He<@~hweoLA%*j%bp!$Wk*%
z{*(R&f1{dhV(O`Ul}k2A=5vqzDc_oy!BT!xtBus}QK;O|R$Ewa)G4{fD2+xFudo^P
zc@fsEI15(7{Jy8{>Y`=zOtz}w{s?MQImtG)^8a0FE1X7YQ<;ugv*~A1S@WM?yy~2_
zzrs0gf5QJ)p0oB>ILGZz_`l^jYk!4v-2N*dTc5M`*FVSYZ*Us+tNU$wTDP?BX+3B^
zJvtydI;!qeQdX1JGfm}dTC{)kI?Sy*ibU7MS4Bt0hQx-;b#hJYCY1rHJ)$>7$4Bpx
zH_E@sHF907rpm`c>K&3idS`SZyi}CAlx1e)or+CZOV*C{VFU2SYszVZXpqKOkRB9a
zc90QdAg@yI$ky<DriLfbRF2#SGivG=GSvOmQ1TA$9qb-98TU>nFcWuEXRx^}m-d>A
z`=+@8<zhkMpexDrpgp#`W4i;kdyy;>T#fB6;2p8u4cpgXyC?Qh#|Ah`V1J1{W7sD(
z=tMFD-xUpd;MgwMrz=P|?AaY>Q2(2TbEe|k1&%GuPPr!<bVz=;fJ{x)mwuJ{y#rNW
zdJ}!1o_HENlb!q(k;m06aN^fLqC=y%Pz~Kdbs*zq<5ln^gBHC#Jq;Oh7JjW-p5}2p
zdb_Ht=tt4xjK!~rH)rwqn)n)40vUcb?yIP);g6r~)bgzSl{4wl&e3ks?kG`>Q%ZEY
zM=CpZM)#8)wc_>3j=XqYvQ)L`Q?OKj^o$0zfAy(`Ecwiw^Hgs=@vF7pCE69fs)ThG
z^0bco`R`V3lm}Y!Y^@5MZPl-w%{=A*sP9PrU*Y(w_$s`oNQ?Fe%mO`ZaeUOdSD%JY
z@<$;hlAqH%PTiF{FS<6mF1kMYWOPGxV{}t=b975|YxJq;)6s3wXQJDq&qjAdpNl>p
zeIZ^oUM+rcJS%=lJUd=JUL#%;XH_L)D6NAM$>dpwMsJ7?iw=*Dh~5|-N&V%`(OYP*
zJEP;GcTxH8j@}c!H##9Yk&Y=BFCVWE&x}`$SBh7Tt9z9i+4KV0T9v*-CVBz6S#Ff-
z=`&qEDxZ>1GmUR!ZwG^d!NHJVXmCR?EEpb)2yP5U25W<L!TR9IU_-Dm*c5CIwgg*)
zr-G-0ZNW3a_TbrINAO(meDFf>qR@pQOks(Tutkb+geyD|77<ZM_#!F-A%qkq#YG}R
zloF*y8Btc06Xit(ktr&QN}{r;BCZe(L_^U?G!{)nQ_)N`7cIn<qNTV>v=XgF8_`y@
z6C=e<;%0G+7$ruFG2&Kno48$!6%UGO;_qU*cu33;3&kR_SS%4wi*4c=v0XeXc8KT1
z^WqcnsrXDB5TA>K;tTPm_)2^&HK|KOn$nV&%lh&P*+4dwjbvllL^hSpWOLa<UMXA3
zt7I$LTDFmGWjonX4wggYP<ewKCWp%r6tnJ-cgk^co}4ci$VX(ZTqqaG#c~P7vb7ZF
z*2^t&tK3Haw#Z%bb@_(eE%(U1@=f`c+$Z0b@5p!Md-8qxf&5VJkEO?o#EQnwixrEV
zA1fZaAXXxFVXS2AqF6?(RIGHYOss6Ie5_)uQtXmgcKn(6_V}~$=i>i}|4;n2_-?A%
z^Ml^O^%Mzj3aI@A{|NT6^F>Tt$SRAfqCTrD+KcY2mH3+&&pL~lB8T-9OT|joSG*uz
zWrM`O#CPl_8ItL2jBGF4vnlc#*_}N=artI8L*6CtV>xoET+SBCC*=mVl-kf{mS{c8
z<umd%wnBa+zhhft<znU7E3pc(O!m)M<yaN=T6{x%6MH?rBff*}i9a8Ip6!kAjPGP`
z#$SoQ!rqGSitl3ks0G$wGlKcSg5Z%LH&_@f3Kj=Tf~CQ-;L%`t@K~@Scsy7cJQ1u4
zRtI^(n&7M8>)>C(H^IMyZ-eiGL&5jK;oyhhNN_Yb791B$aG{Co#Pwp37%YZ}q2dNH
zObizz#Es%UF<IO%ricf`R54#H5RZsl@ub)wHi}JRv)CfGil@Ze;vMm>cu%}9J`f*@
z{o*6>u{bJ@iQ|$<E-T7Pva+lqtIBHfVwoi`k=e4ktRZX4TJlm^Th@_v<z=#-yju2`
z1LU=GpuA3AF9*q6<!$nIIaWR-XULgymYgkf<QzFyJ}jS*tK@2#7fXpbF*oML!m&uK
zP|S}-V?j*BWGog-jTMfi#p1DxV_EU1;!nr7#b1oS9Dg;gewiwU8fU2S7;3o`YPkw(
zIUBWH3$<JywcG-=+#0pq7q#3EwLA#5d;@BE6l(J})ZqQ7!3R)x(@=MRN8L?F-94o8
zH68a{<rB$zoD|#_Ob+f3rUVZJQ-cSCX~Exv>A^$6j9_LkE0`VR1apG9!NbA4;O*d@
z;N9T8;Qio(;KN{l@KNw_@JaA#@L6ym_&himd=Y#pdWfE)m*_3}h`yqq=r0C{YsElu
zx41{#D<+7EVv?96=8A{KJn@8BC02_(u|}*F>%@BTn%E^?7jKB&VvpD>-V|?%ed3V#
zUK|!bh$FIyEGo~F#pL<2xV%7?kQd65@*<fbOUcr*j4Uh5$?~#-%#<Bu57|@plD%ag
z*;n?Hx5!a)v>YQR%lqXN`GA}%AC%MN-{o}qm|PJXC0EKr@_Tt${veOYqw<(M9%C^c
z(_(teh?y}f7K+)is<CSE&G9Yqt??J)FU9{EfBmee$3*_9p5)c2%>5|_Cf)#;foQ1S
z`d%&8isJU5SZk7lW0YeDLkb^ZTH)ETcHr&7JAfZmJbB-J0@f}1*cO2mI8;tAD8x+4
zZ3C7<d2Wokl&7Y%aByC50gDC~1|?Z4^7*u&LQt8-gQ~&BtXObKkj*X#Y6i8~g+cA0
z4!bC57&Ky~f~G+;Rwif>T*=A>ttdyX5I+<@!fMBlrJD@*;Dezj%9XGw?L^*__cQ;W
zc%nJ+cCj^TG(z!lB#zUlHS}YQuI)k0LJn1;Kn|tWSCS`!AymQ}f|2-tL!C8teQXf^
zn!*yRHxsKB*8QJ(L<{<%%muAes~DzYER_FFjkC$V{C8EV7Fqt3|53H6a>HV*B-8LF
zA5Fa}CT%^PWoX)yOp6Un+l1}S*xrEcjo99T?X7B?<-ZkpaI!Yly3#@vSE=SHmbPP(
z;`$oajw1Uy)}A8aR@Q-{`+nAy;$9UtmLhX?c2BHUtRb5iYZ3cj_Pzzcr)v9u?el%i
znD01d&if3BNs=TXAxV<D{axdocM;}+G2<~@N-9@$3yB^QBEv1cMD&tM@Apf3DZT4f
z(#vqeZ|%?7^Yxt>$|H^bH^;2AzvrC2_u6akz4mAAz0N+p=q5XxQ(a;&w(p=j-0R%A
zw9<Rfd!8Qlw)n@=OVFBksP@=FVQQK0Lrmq~ebQn(KhzUnsT(i90Fd67ZRR|-nn$D;
zNQ*mtQu>ngVy~~)4|Y)@QoOsu+sO~ByNsUWby=6gCmL<27T3ohYU-D;+`Fil8S%FN
z2x=nTK>EhuxP&s4geu;bt0yzj#!H{5ygolzYBbX^U9P_jvpQ+!QD$uln@!DTRK+~a
zY)z?V8?!B?ne7-OnT$ZsC5w?~Cvq8ecBATyIeSn|MmSH>(bm(}GgQlZ-g=!f8O?2=
z6C|Fa28`xDp@xibo~2V^`8j;dLNEH?lt9@Qw6;tO8Bw7HRlF}HSOarnvl5;O+HYma
zQEH!Qz%>%pNKA7hqZx^17BY^JxK*N7iCOPtv?{UcDr0p5MhFnX9_$w&zfzpAn-PLU
z2ND~UV!$*;e-img+{bu9Vn2JM{hqza{=ojo{@DJ+{>=Wu{?h)+{>J{!-fI6~|7ibY
z|7>r!ciOwT35J}o6LFH9Do%<Mb95)&F&xXW9mjE<45y}3%c<?uagKHBI`y3T&IwKf
z=Om}G)5JN&Y37{jG*|c}K%1{K)_lv~=)dQ`?{D%y@IUl7`ycrq`=4N5Lh9a{c<*5L
zU-fmw*H`eCh<sOKD!%wqdE>i<SxY(Zc`Bcif#caGV`P4k!eJWY##stERvxEeqmP&7
zb@ICGgG+&3w&cDpQz})S`<7$y&QK{veYBEz)aWRMrRK3kV=<SDc$B%#ET#-|nRz=M
zWmUD>^7!&Mt2bk;fsC(n7(eAuk+a*KMdLipi;7e)*^7yEud1gDn`<RqxSr`b!uNdd
zC~=f`v{y@HdVGjF-tpdv;#lt_?_^QmYvMH(CwixP&BaMxOYbysve()>Lp1T)dS{7K
zytBRb;#BW%UN6xiBbt#S&dW&6Fy;RHaU3<Zk|k%#(i6$jQ$&`Ys>sq)OqQOi%F<K1
zEIm20^yJCXlP^n8HD&3kwk$mzBTG-m%F@$uvh;MkEIpkdOHU`t(o<_$dd^k0o4!g{
zv{9|cHqs2!aE$6k4I|Sy)@W=rGg=rejnj=b#@~$djK3S5jLybI#vosQ0V$O+e6Epa
z3^Rrs`Efg%t!O#NYc^qIL5wUuqdMN>jEdU>L3BdCZ4%n+x&zEtV+l(un#_=CG5Tr3
zwsakH9NW@e%{k^=8U$N9&wRpsjz(IGtlMckbFq!CurnCN-!JFa=w*AnJ%L`eFS8fX
z>+TKi4*JPU^-@JIubNj)^!5zT5Pdw?^F&{-rdLz+_iB5!#RXnNuc5fmYwR@^1H4nb
zW@4b%!fPQ0d9A!wVzAf7J5vnt+Ij6nj(3iCuE_Ozdws-E|5^W8G2DOCe^cc9Z~O0v
z5gD<Jm?%tWe{Bv*68toCU5&YAPMOcz%wJ>47jxB0a>KkZACilV803DgvO(G&WPZYE
z0XurEbwvXA!5dbO#gU%0k)a9Dzb*A-k2q$0oM|o0NRKo|2lK|P%TBdUx6ZQupVb*N
zYx$Uq9b;F=Y-#46xly}^eZJk3tuN-rzF4K*8g@yec<QMMvyIDnoWGgJaXIUj&i5ji
zi|)uR<F<Gj!CR*W))spr#dKpjX18ttTDaFLv3A*%FwesnKw5C|R{jRnVa)s~_Ae9W
zKyw&U372v$^AH;BZjD-rz;1hDKl2eZV6U^MtKu`Id*(??XGnwDPdWD)%y)jQ<~UEX
zn#SiePgk>;`PQXUMsXZ;pS2RRm5^A%93^8OXQ(sG8SdmeBb)-K&>88Baz;CsIFp>q
zoypD==SpX)GtIfmneNPRu63?+W;=77>zx~%xz5e|kXAVvVI@bl(7>y5y}ZwsO>Ogd
zQ+^>QiBo9HJ-;2>E@`k`Y9qBwq}CYyxh-p(r{Gf<mNV6u9jj=!KKU1VJp$2dMeF*n
zdO8y8DcG^ObOe72C_391Y7`n{<UAegwCP-5tk+nIHyAfiNUjg?GxLlE6g6%&7E_AU
zVqAC2jpbC$xXV~cX>#p{5u?-*KFjc0I$g?;TC@D-(wS0z)E0Q+Y}S$`l+AMdg>tN2
z)-D>#I<pE5V<}dpBGy{f=pU@Pd>YSEY{n!1Hm5mVDN9Gs%F@yEz#=co^3ls&!cXW`
zHIk&kH{^DN+n4I*a;qD+8jDQN^jR;}V9k_i9%D8)TbeJLFPX2HubHo#Z(v>G9knL$
zi&fLAWo25&VZ~vHbqSX(SXGePK4=TO_P&Z>kFqaDojmWqMRG+K+Pa+1l$^?U&gLJ1
zJZltT)K#C6Km)r0rAw~K0N)lPp|`PqFKAIhTYCBkEJL{BxP|u9PDwvAj%=Qh*ax_j
zfIsEch`oV(F!x^ny$a7iTj6;rvA68ESYmJ6?=m`h-`>o%{i*#kRgwLWs#EC~M@rLp
zPUeAC#`~=`mYmbpILDufxLt3e+UohH7y%m~#`8>5qy{y58NH4E($Zl2x3kwB2<~K0
zdKflR>wLf+tkZ5{y|t6&6`+C*_J6ofr8=H-qSMkj&1vOiIlY{IPJe|DCMgUs&$-um
z#Cgrx<ow_+aF@FGxU1cD?lbPI?ncGe!^~HjNQPxyBfT(PuB<RJlq)vIXx1A=j3cAQ
z8si1l`CCoaEsPf%QzLV@c{!b7&S1RXow3gCG=Q<r<CM#2=VK}~KQ%w4BJ*?e8yahF
zF}Kh}=@CGenma8)moWzFK~uOd4Wqjl`xMa%#y?Z&A<X_iVXd>)(|Sgkz35rs*B9+E
z_BeXkTkAbWulrB>Pm}D6b@tsx<L&G>S{Yi{TYKrvYvXnM!vCyP{_L$|F;M#Qa{diG
z!trPZ-vCC~!I)p|S3ChW{%Y%Z@qbn-AvNZmt7Z<XaLTJ$hYmEyl5I{iXVVF+v2LYP
zIX$1+$e7fb<F2Q!jB4JX9*k=?;+tL?TZ63IrHvl{@@LbygkQp%S}@xnXB7;4F>BTg
z_h$D|%J<)8{d(PRrt$KAr6Dk`P{Md#2PF$x)h)Jo><8?%RL_3SewiBX*Qg3C5a;0)
zj*}d$aib<vxF(CJG3u}l>g`-RhwH6_Yr1vm@2Ix{`^bF{hvx>ex2jqV)ias)diz<b
z=j?V3YUsV^y~ozrPH!ij<-5L1?fhPTFFM=L_w(`Xi~Yd{lK+bpHh7ieq^mhbW|S;O
z0vTN2N0~>H!-$|Z`Q|BRGs-YqnWs|?tbEnP%2#c(8(WN-uo#cAyKs5y*h}ms)WBY9
zFQpUR@7*7m-v_zWjWDt|KZJ4xwx;v}Sf9Xm<;*KqiLY)S!_tx{<`^L8b0C9UtXvnm
zTe<Y(v2uM0N<ZU}N*~y8(#PPb|H<-~_Kvpb9m(9^IAr~ed!2>emFaErHc>Ngx3`;4
z_4yw)_xt#LsD)qP7f{Rn>=*45F!O5%l@D`R&iAQ|N1OeO{jB|l{iaK<a6@jyt>UJ*
zRbAb!=BBynuHjm)?Yb<0quiQqZ8y_B#;xNX>(+HUxt-mvZg;nr+uQBu_IEFEFLVdE
z1KmOHU^m;%b%(q8ZlOEU9p#R8$GAm%`iq#EP@c+ZFDEd5k>kjHJTBHZ-!#9VmSzc$
ze;u)2(bJk>T~0$74c|)n*4@?$nq-ym_%az*X0d&VJ&|s=SJ-Q4xxLPQjP8>%q*eAC
z&MsOl<tRR4NruEHEX|1cR7zBQ#xga;7gCzyTb8FQzGIpCVyl#^_?{(OSNtetDt53`
zyNX{}vfaf_DP6IP<vUO#DOoMbvdz|#S-!bi6)9sag{54ir84gRP&3@^?hdURW2^OA
z54LJv(E9o>`>$yIrIoK;DD7ZvAdf}cv_S{emJ)isnDtjJ{%LDb?zK~o_IT^RUS<}R
ztwZnMp8N`kz*tG~5qfs~dFknxZDezu4>g7|A}uru*`^$0jG++Q?jB}yGbn=5I%*zg
z9!E*$@#gWAY&J3*Q5DSZreJ<I1Eci`u(}%n9ksH%+1;pv-P7(#f448Q7gI-!;)NK+
zM`D#})L!O&J0@U=*VU+yk5R$pysDeksVZZLTBP%+(3N#<ce^`F>}Gc!*%%vKF6|?f
zaRBqr&+m2qS?*@pI6<;i)f$NO$%jWiW3XI%n0t#mznt7JWQ+SPd!zj}W&l5D>-%f_
zTYC%U0Kdl!;5NI&-fr)}>|Zil=2e|)P8#O_Ow9gyj_+hR)iLvTJX`Gzokq^dnEPug
zXa3kyzr~sFEO2gjmOFQ{)xN@6>8x_@cUC)VoQIr;*@|E5JnF1-o_Ah!USf;>b>~fI
zgY%ZN(Rtf>&v~CM{12QDoz2eI&bQ7M=LhFU=Vxb|Q{rrQb~rn^=L8y}DeYhlQE$Ix
zFd)I#_<Ca@_t{yPQ{8Uu<gxoUuKi-J`(^gO54rqu4&!vEwR48k*6HA6Ih~yz&iR<r
zIMk9KYOARUYhq8-y@gX;&AT<4gx~=JK@v2$LvV)>+zIZ3ySr<UK#;*5f;+((Y(gLm
z?l!pF;5ImS-uImEch6V%A2@ev&F=1}ckQX^>Rq*W_j=ZX5iI#$oVH`Y89=<Q*#=}L
zJ}m1-s=R^YLU!fzPQ6yqTDovQqQk$<$tqsm4Nk7gj3MOVB~>_NPz=F(aA&uTGLkO6
zh`frtgJhl@mL$MT^h$rYG!V62Rxf)iwUyQ-OY(R;MLKCn$DyZq2F0(M@UUsqq_#=2
zL+jUqa^%b`iq>L=pD9&bEI$wKE=|qujyvauyLk3-)Kt%NluzQdk*jf~iQ)W<(F*Ku
zGcVMv(MW2529?_yGz+$*@Y+4u;-@SUd{lM@?1Qi{y0v^Ve(Nz(VI}CAF+YDlDk?Sh
zclg^w{m=l|XTffLqeSLgg0B6wV^&SK7*#jEdUJ(C^HGT!n%rKV-N}J6gn_qP{DgfC
zXl@^+2Gp`AT>~0%pQ1b~Gg%2SzF4dn6?%pH?j{r~`Zfw*r$Cftf(xW6Dyy3=!@v6B
zU`a6m1UM?Nd#HVI+Gj(s*GX0+gmk)|h8=3{j~pM!?zX$rKJN3G4lW#oE(ii_YTI;}
zF)qgzU9rN>0PKZ0w7%Q}UZ1z_h0m+wKkO(HG#Gsu_8RPcGmxIUWY*^N;E+6db+(rC
zt|}(YSAKm27lcRN!GTv5iRu*n+HPYoDcWVdIDNk>OMkOsHT^`ibLodyV1~enk}x)c
zKj)F{mzlL~gr9f6au~?Sk?j@2RA_)+_H*!t&D_*)QbruH$6=AlGc^!xcQ)DbWi<)D
zJy*zJYyMs-R{h6QAF}l6)y$9Am8XxN`;1O`ErV)>#BjHlGF@sM$|<ks*vP)~QL120
zqln<v5&O&oC$cHadEQ>CB?6+Dv*h=QHn3T8CUY`)U?lB?{z|Y7LlaOl<(w90*-JCJ
zFM`<C*eP8@l*5AClX$6@mGOE2okh@Wh1-z<vhuc<^&)59)z9yLG$MU!zk@18I>_x0
zIAevGaxCtHZ5|)5N}+%;vLGwzsxPC(fc(nuPXwH<!+aUqAUj*SA(q~&$?PFgQ%28x
zN6(WrLkv3);YLw%-;X`Jsx=)XIMwly<iGBXXIz>DYqhOF5*nwXKzo<WL6O*?nRPeA
zQLwJGwD9r|@3s$T?)T;Y4GU(rfS?^;*{dG;%Qrb@OO7MWjzB>-_BQ>|vES_9mA|2g
zp%XutTc7rguPF^CTZs-ffF=i%?3e6WIFC8B^yl>4eEhv1-VQZMr@$)YS<`yw7?4`|
zem`=obz!&GVjjanPBtx6I8ig8J7{i2KCwQA8F#uG16N6={#Ld-k2`v9g`k0l{)ayg
zfAQ`GD0K89AYUWmnX2D>==0wch56cv{~AnN+r+DaX`DK}<h>2Jn`23S+?2nZ==!VU
z5@n$aC{YPe^WoY>)kR4S1&;=qvfuqYA9OXo6X%Ld5BIatPWcPA*9H(jFRO@rymcUh
znB~1PoN3WJkvSZ^_`*JPVYLPdnb}e4z1Us5m4ppbr|;IUECBKim$B^|f+`0%9sPPA
z@hS&mVriG&rPhnQ4;8WQCKtxIHkO!Ah&7hr4Z(t5CR`Q_gOy0Ff;@r)^hPBOX+-Lw
zeWXLJP5!>m0#TPWoTYBQTq96?xdfG8dBbxWPa@|?X=i*1XYOWnL*A)%Q5Gz_t}Mgb
zq~W0Kh;*>cx7#c_MB)4Sc3MJob<l^lIa6%Sf8NpZeiv0;J<$3-OHK8F^|w~H5!SrV
z=Eq4iODye7oO*i-UW(EpB>6(x$@xK-0-Y<$=5vMqL{Cwu{VwMDb_M!OLM2_dqXcUI
zD!dFz>}oM@Yu-eA@p1Cz<*dQ4q1V@M1oF8<`A`GDNwsYRo1#2E(OXyCJAktETNRhk
zuU~V%9jZ!L9qT_aViGc|GVy8>sgzn|a`=XyYVVMlb|msS*~FrCnt&PGPUjWg44>@U
zr(RNQ)1ykCfW24XZ%t+vN1-2m7<r>Jhz43-tS)QVFv+(R;T5-ggNyXf>4C?lw98QR
z$z>y(Ni5x=tz(sY+V!I#Jan^@fC)v)J;Z9EG|vyaSUUmjfyz&!+@j`N7oBG!v+5{n
z^Q4a0rBMPS*?pURZ`@GKLXdY}$@3Cr#e8U3vRaX0+>zLkz~^eoT4bDAvN$fN(DJAh
z+@F=3mD3nGu(>MWw#(;9cq0IoD&gtQ{9SleJX>t8@71v5zLm{+J3m$w5l|PvK@Gy}
zz}&O$uOUPvz0~kDBG>p$oT1g;ixp}N)kGc}6LUmotga95zNz}v#MjQ@m|)j96MQ?#
zGz@;$Zg$qStO(6n$GZ+U8`isXSGl@mSF~#=iq`$InzqxMs56Y`9i`BPS&3sXd4tir
zJS#HW+09hVLX>uZ$M*G;-rUwi8(|tvD2EVMp@*;VSR9keZHZ-U*ns*`&pS2hj?2@k
zSVQ$~$MT{5Ks}kU36e|ffPSroxgQbo)@f)l_&_?+uM+0bz6C$6ne?J(3#zTz1*6ys
zBKHFJ@SNkrUK{<y`q9ic?stj1$c_g>xzz8IFnL<+CU{r;Yh1E^Jp3=^U!q9cXu*Om
z>t4O`5bNQ_I_uF!knvDD$N|!r!ymuzQ}Av|xd3&FynubG%k<+^2vwv_T)$N&yEGRW
zYabUGI~_+3P06Pmsv1k*rgUU>21;*#+_{SslE3~X7k?cd^q*W7afdpHK$_%74ko^d
z@YYMp>s-r)WxtR!sKbgv>pj_VSLmtMH-OZQ-?zNaRaS3dJO<A%=jJx=8d{$OYo4QE
zDjRohtxqU5&);Aw>vtEePjofUKVT$pS0YaJ(b7J4;I1E`fn!gxzpaYjfYHD)r|f9p
z$W!HSe3Ts|>rUqL@stm&f6CE<qJDk8q5dX;78L6IdR+xKj_TpVA33z3@6Ppa?iuqv
zfSbGdfRI3}wht<{QCA#)*1zqpqCS36yJWxRnYEbbu|q7N*T_$`o2YodGCQWF=}_o|
z^@rsOeLY}zir@=78A;u&1B{8~#v#=tfYHIQ0&Z-1YLS@KpWN+1)XRhEb@P5UH1H57
z5qGjD?TZ??<Ei82j_*Y$^2!${pjV_<saK0vZOf$oQFRD7a|u{E-7ebY2Yl;lf2wsi
zNw{M*=$DO|x=gX-!Y1Go?>9jHeAa|+prNd<5V6bM?bb#tT$+{7vb-*^jI-h*u_llc
zqoyd!@RwZd)FbG?Rd!{2^i>GzkP~!K*w;6!W4VjMNx@BXfBS^GXHyUeQCo#g^QWa~
z%3O<fdKQBnRlM5`(1MnMr#_6KV?(j0b2+F%%eSX<hNe!=o)c>O9Lz=`kgAvQx|rk*
zA5PP&U&cc-5e0HQbeK~Ox;awyOq=FfEj8*rr>TanE|q62ZnHw@R0$7*C$)?$9zV`4
z?jN0p*WTia4X9kJKj?HgDaM!fFg}|E_QaG?!*BA+Ux=nj-4E2U_|XS?ntp-Woz8#y
zc8h)8{ek%KTTffx`b2?XJRZ+T;fP*{Rmmm&j)Cq;JGd3~n4k?zdY;avN9%k8duq~t
zxIU(~4<dD3-6T|2D2;V1aZ8<=*+0H?zY`)7M9PWD79TaXib{fQk$IkMJtjG=bwBVZ
z@SA~Ym+rNN)1RNubXQKu*+su5#(a7derk5!_xnj<TxtzcX<VZ8jj1CLT1-B+qaGID
zLAzjeYtS4LoUpac`L4wbpJ{EGt^|F-tWk5s$(l6eVQZ#n$m4&dcddF@z(w4?t614;
zH@fb4>xk46zS#FD6pw+qtiLREYzpV~`mTS-=8*<^_H^<(aZYRZYV!hlwZmKCZOlve
zODV@p@IXX<cVEEofboF-fcb!4LzpN=&^gnJ*9!It5jkr=&aH{qfp)jznk2}m!Z2MG
z4o|7Q|JJtjEcj6Q6j-RGGf92j<%JK=Gd?N(mXmi4f=xLM?B{!h-;JF6+<*NO&?xBW
z=K6G*;$1n_Z{griX7&RX3;WQ`%1vlm?EKEI9q)ojzNJDRYry13uEf;`L#3i5UBFn8
zx{lRYfu)+$RCyJsMIF<wv?-~G{`7-8vE6F(bOetxs$f!+Ghvg3(o)7~;zIgDo#?UD
zkuE*F(CrjuAM~TMS$!30w(g$ELga?(jl!P(K(XK1r{n$a@bs-fI|~S<O{94xVZtZ6
zBR@qbJ*tIg9{z;<<!rXOu<awJot1@;d<Azdi&?Zw>{-!SD0Jx1E{>0#qn6u=6TrFp
z3Cs)TYtj8`SJ5;dG#^y|YHT27FPwkGyRWTJ&+^gUA?af038mS7=t8>~uk&XKv5NK@
zeewB14iwTcAJiKZJu%{T37i#&6<kf<*&!h^bpa&RhE;|&N;4&P4Nag0Du)cu_-1MS
z%Idk?DWfS~+pI>FM)pRhCW<C9O4el3NeL|mY7J%$_UTX4EYpJ1Z0<&7>Sb1CLDt3$
z^cruOFbqlCgt>XRMcf0djjT<|_}#UwE%v&{+s4&@5`A&{wu0_}5rB8cbQw@abE%+%
zNgp}&M~k1@fZ2d=>EjarlJJt?60g4_LO@Hu)$8WZX@YZLD}ykHFs-nNFtfjzci>I)
z>Cw91A9y4Mb}gnDK_KOWp0}B|`c2a5+&V=MSn>~WT2`<3`*f7K^nnzybf$EsjGoMb
z)M$)*^kvj#?3*83Qs>l#)I>6D@dgAL1Q{f{?{x`v$#rpkKGn0GD{iIq_w|?b(*tX%
zR;2>t4x`kzcCEQHiFpc)8Z8@@8v`3%8Z8=?8Uq?78WkF?8lBufPGwsMy1TpkyQ{g&
zUmon)_ZKiENVprhe|6V&_i>kUS8{i754Z&FF;B!!;1mKR!7-_lUbNv!iAk3<%#76K
zT58KhC~`_kdbCXn2MN=x<xZ3NMIA*zxlP@+3msS5;rsd`IXQKkF}UE?q9SkC(AU+6
z$t7te){(*dhN^}t@@b;gZH8YMRaC?=C$5U$oTgH4*dU6-_{+BJEhohU$2wkw)!lr8
zD`?je-D!w@5x^y&!0S=_tSOuC5$p2h4v;r#$LrEEY$v#0>Cj8kn$wzX&mUuezC-hd
z=Z!n%9{;#he#=JrPo_>}CS~W*Ysc;xA#wVUl@Ot{wObY`x6iahx@bx$WXMdQel-L0
zkQf$cATnG1Zz;mof7+CAmcLS|8&sJ8-BsMWw`1Wpy8JeCWbU@5O%&zdpAg8$Je__o
zJVRF3PEBLxrHv>&y?T%1=9h8Xg-j7`KWAw8D$-B;aSs2q+KuDeRzJ}%(EM{mh4~@Z
zzqnKzO_1E3(i*$$$Li1!l3~9J{EIb;HRYbpICB2f=i065jC1vFpGLveg3*f^AC}U&
zEVD~#`A(pp)7A<J2rhjbkl;tLwSxNdLw<O^nK)6fGExc%{`LO?*Pk;~-?R|IP<b0T
zGEP8eP>9h8!oy=+%KMl~*b6row#$nANVGSjc;DbJk@%(l(Z!;^tsVm$Q2}ssCSQM4
z&#_n_`go1ZbdB7~scWbk4v?6s72rp$V^^(XztjpddgUvC_y>o$L{!|U?o@j;<G1;k
z;#Q$Xn0GHqhixcJF@c3UIG?eR5_(>2eR?7A22p*Bk(-4ki0+QQr#7CEKNmVkic<D3
z3TsdipyozueCy7#_iEfGzrF^wvW>jz!1q@Lth?f$Zk`~tN%GLf$dCV=#qDkSa*taz
z<N9sN|3J}5CPUAc+7zq3<~RDbC>}fth9iGwFu9iUhxv#2M7ho!#{G$9lGe_+;vEaO
z8xzS(Aa$va<N?yFU%wmo(oTM(w~cN?JloMNM7c@HOh{Z3Nl3mFM%v=bLc3Rl{2Ft|
z8f{7fC%D13u(sXO$ClcrQ^F4h$G@rWclvvbYVI-~2rJ~U!!5oG-m95;?ld}W-{b&2
zoh^R0adJ~?__70X+-7{D1;^A7;&N5Dh6(CK?D{#oWp1i*Y-g_SFX5T11mL!c-S+=N
zU*1Xd?(-k<p!NJ!98_d858g(TfAA$q+)cc=t6vL^h6DjUN|Hif-nX&{G=KRBeZSd2
z@M_?{`xbZ*XXsNVkp4UK#jQE_7*q$O;x?#I4Yq<~NS%R5Y_7lmY4?jjm_`0a5T6M2
znG=L2ca&C{pvcxYY_OFYv*h~o!VTzH^M%tVDkn1GM^35fE~O{=e-63PBKWda42YSI
zxBo_y-}?PAwgdx-#tK=9^SE;tCuw1~^GD!%za4*(0O{EUN9dN>>j9bnG4Hq05^JRs
z{CPsRDsgE5u^(?SzW-QzPn|G{wk7%s6#w~{I>GOyEBohTWVDeNtgp#1+g`X6mkoD*
z-Zsj2Wmg3el`Uav9COCjea1EG{K!&lh(?YP;)D?rChclXnoAP7+qVt^zF(Hv00DoC
z7Y3V4GtzKjXwy|PSDxCH-SMFAz8LtSCTq!U8n0C+vpHz)VL=dxr3v0yBkd)xHjRHN
z{{bnP6NSOzO%Xqei0PXzZlCExm0#uHw7qqw+iS|lEB^77!Q#gkMydXvXae|@kyKl%
z-$<kXzjHoX16ztI@~jN@5B}$0se+wV)Ibo^zV^VkqXKq@fvWU*;a$S@>u;99grO)Z
zEH83Un5J^`C;tbWRhz#ELov?Gk<PZtDg_Q~v1{VK@|W%5^oak(KqY{<sMh@v|La1k
zK??adz)Y%9<@|39(VNsOu0VjTM-2H-vB_^;{^#FTh4Z*tcvvbEDUH4Y(H6~rUFSbn
zOiZh}nb8zk{V(u5`D+UUW}V*TB8X^`cd;o~Z<7GsWt)IQz=p~t`xX6d+HKms_D#}b
z(4G1N^JDoF_cPNo;A!TG=gB=NLTm~=o3{<v9lPGWnY-t^;k)Czb$iTu^m!tFe)&vT
z^b`tbEj5~}Re&(WXWqHQXF3<Ca6NcZoGNe{0GR?X(qr^D0`+ZdYibY41jYct_+jmu
z@O^r+#ko0LUCyru8?=5I(^En#c2b2Mv!oaD&JC~C7=gmwW;&akD?i$fGCn=)TzRR0
z{Xv&K25hO;;cEL}w}b5=jiX<4Gqg_@1oE0k|8`GeyMfeNWt4Y}ygf{Ds#HfCdvXD{
zuB8+^uJnwt+$l{X!q2G~w8~;X1X9>5UDAg#2L<`YTc>mujgXEomi2y4_faJ50!0yP
z5`uI(DV%gVkpYUom`xOa;asGzX$+>XkzR9ji%|8whT~AY>yRgZ*CFPtcp9J1(fu5D
zt~l?aY|Q?tS*!F+;Gpy5=p6N4;^E95UBQs7#L+&?ljc@5U8<Y>$Nh#%%!QZe4GH>F
z$>+=)+q{KhrDHy777%^@ujfM7a`CJAl|c<*&F7TTu$DyyP_1}3Q4=!lP(bju7fNSj
zhfIe|Cq!e=q5MNm4B5%6ry!UejI;B^X3Wv`U77o{aE2b8n{KT;T+C&<Ry3zqjpR@L
zu@bdzL{HfznRE!RH-qa#@b#ga_KP;+^ZnxUk)nuUGrA^oqZziwf|9}8mdz}89HkOi
zIS1<o80b!*ROG^)v_t!#7ZI?M`K-K+etmlX)>W9q-TPH!w{oC%Fx#uVdLG-!LZv5H
z@~;N*h1k=1Ls^g@RuJ8yI?1tN7+xR&Vhxg5hF*3P-fvjyuh&1B`!}f2MtE6Po!^~j
z+u0jWZ0-~eOh(Tgw#kQwlrFt~QjM8aCjecFsu}Q_#T~fCRE>!gu=;ui9Iwan``08Y
zR*NJG^e!nnGQ!=mfG1T-JJ)WAoL8#GpC4)TXHKATC?{dC5Y%ozznw0|mh_UP3STwc
zg|Fm#YHt%ADjRubl&zJ(6gb^PjG=sI;juT@QrmCcOWI27w5m*r7O0QDUR(S9Ff@;E
zf<T`?-gaH+*kxbg*mZb>^FZ%PdH#wj6;lEoV~vB}xx7gUq}1AR3LacmEc`l9oZ3ax
zsS}&6mc*+LngiZ(UwZ7(7hD4O-!aez*xqTH-(EfTZQU_Hrpyy)6tTZ#jRO}>2^#I9
zCPh57bqX&eEQ#zGtAGDxiH&`0xU7Ym6StJpbZIT~<tV`S6C*B-K9d<9<k$-1Z&`I0
zQ}_-#r|3MlUMldcyJWH=`v(qh&Mbks{~Dv5V}%=gS2|m1xwlYYjjvcBa`n%q#@yVV
ztb<~w@=ExmR7FC-Pr=O|N^byzx0QLre!9mn-3}D7e3WI0z7hhS)N>HA@TwPDTs{(}
zpYa(<aXO25Sd`<62;K?a2_+1UdrgMi1_j4(Po1T4Rd22iG@}2p3KM;OR}zFeg(p`X
z!kHRAUBzr+VAtf|=PR$)p48#!g>uApvf#scSQOetSMEnD#t76%_V^qy3t<JNjwS`H
z%p(M&R&U|=_l2!n`j71o?Y9pS&b+7<7pH5(D$Coe)Y_Fd{_H8o9L!c@Joo<kcOU7K
zB#YoK#IbLN0OBS+XM!frD-7JbFV1pq<PP7qH$@RnO>*lGjdM2n{&b^8q7I{ypb`KA
zffGQg&eYuUxe3_8)#aTpQs>VVS*L=$g1m~Bag`~Rxv}xF>9NVNiTiz`{je+hfb`s2
zqP@Z^s(@_KuX#l(v$fNu``WOnE4wS$rNAB5ozmUN9qZkzN3DRmE=fSevp!e?tPYj|
z{H&cmnVZ|gIf&nbT|%y|?$qzN?%eJ$?-cHs@9geK?oa{>pW?dYp7mA>oMwW?gQ!3X
zK9X;~r{4t?wkM9QsYywSaqxEtwsC<xI*Ky;W4mGiI76$H-!Tf?gHkU(u4k@qj;|E+
z@rsq_lw2v@T=B8Sn?1`eHcBrr>bZ6K5dwxL1?@x{jr0Hx38|$7MVE@8Zzm^LvY?v7
z?($@jOl@H`tuzt-xlRhJ6rlw!CyV&1XqiDT3mmo~(YX2Pdek(~;e?%&%;9J~szUkU
z1O+5_HEfU!>c4fg$uPf&yQq0BtHkVevmG~FAISvx&91h#;8d1Vl`~wTz*YSLy*hk0
zR9}L*njpN<Q%?xPZr5h_t0b(*qo8b73id^A;dbFRx$0`xSDm0bZ#G`7v3tQd+D4-3
zXL1FBZMX(cv9>(>q&i)RVv#MQcFAx-V=|PHPdzr7mJzO=lgz^yuhx)krQWOxORi?5
z<>u$5^rXd#SBe=aI;#WKZM*v%*32_yzVqY0=3U0~6T23z{vPo5KA1epA<m%$)r<ln
zS`ulR*C$#WX_f~OEtN3^^mP?A)jjt<NyPVceGia;Asn9c_v+?n=e2x=uO;m1MQ|5$
zh>O$Irqo3i5;B2$S-i#MNqTvrQ<ZxhcUrY2rBhnVQ(V8&GN<<pnMg&LNgtU>tJ2hW
zikGC5>)EzHR3z4mM4a@yu?xi7xQ(-v)Wc2E&Kh0Nv?X+oqse0>H`Ce0SBnXXmWwY9
z<rkJ8+9ei55-aTR#=grEl&m+p-P{S#cnzsoj4Vc+S)w|x=ABuPZz>CD)y*naCVBen
z^)#waW)|mU&I(sc=?yhbO|_L=t<QT@<PKkYk4NN}2J<3`5Ht!{V~(fhmxg&FAN6P)
zJC`CodzmZb^J!&Aa!6A^ZoKLjMif_>iL8oq;6l!>gnK^QAiQ$-@N_oI7?9~t2Ew7g
z82=K3|GI4u)QNY{i{b&Ioc_j}MoQ~xD9pSWnX<KghO9s#GGCXU13eogKmWMrj=z84
zzULMqVN?rDr;3e|O;D4J#<!7YEJ9<XGLC+0mRTapNaMbyHYgmGtX3q8OD!eOSe&dD
z9mTEI8x<9W&nTTqp{96}p@L$-((<^xG6%B)fQKl2g2skNM-N9k#tyRwGETlPa&0kO
z(_R%WiS~*viAGO{%HPx6Yuvx_i|w3UF$NeTgk2hHC7qhFu1Bt`ugR{LuLHF28giQR
z8ocJ&4QKL{SQ4XsiLTlw3mx1i_%Amq*fMpwOUr7?>a0yB5(~Da^d=4pJfuis^rD*y
zj#w7d8z}-7;s|nRw3#gPnw2AaCZ^WiKVgHZ4`c<*Whi8VAfF+|kWUa<$a{!4L=u7z
zafjGL3}iaZy3BwQF6mxp`;H<}Joo|_y)?Vd^fpZbGJ+??^`rOM@UH^9I=e{8hYyJj
zi3dm7YY$8_5CNz__`z=WLAG>?0QlHHiWsq1a{K8@cb8?CugrC~a8#zeJ^La%{;NcG
zyb!D$!z!#HqzwYy%T~eiVsmFJ6g@FmH&BXot8sZs%v6N7U$vIwL!job@VjZ!UriaK
z42R;SBUyaHNex8^EOe`c1pL<T?piDD4qOWge(YZS&3VeT_TtnNK_=JzMcRQx`g#Q&
z8|CCxWUyD5L^p=>dwx<<^cBn%)Hq}?S{xF^3-D{L(09LUgWq-6h9-40o!YJ8J2UZP
zJqYrX`J?&2&qf|ap?GQc+bK9c^y0VPDaWbHFLL`AB;8J77v14&Ufoh_roYhbQPP4}
zkqDd_Ti+PGe0pJkUXhP-kpEH?z2;TkEA245-xMKs-4tQ4-=*DGYbw97*0|QBPfOS6
z5Ttjm8`Ak#qBxE(gHRli0WVrY#86wpz%RUl!Q67ADRSD8Ffl_S1BzC*wx@%(t-JA=
z{ktrf!yMzBP|Z}07-+P0#Usb#5$bU~*a0^<s)4ufoOzvx-L~IQJ}f_|c7;;(t(rZd
z9#s%3g~8gjV(6?LPI$DlU><WEb0jsJHGGEj22LR5w(E8ycQWVBEx|oss7L=5s&*wT
zh4})z{b^5dk|&;hQ>+JP&1o0)Ja2pGR_I3j+1YPrk4Fxsy_eUL&Nc?K74R5opA7s0
zE^1}HhzI8_9{Xb1BLPt3L!5#kh<u87Yx-+)&SE!I-Y@*oh0(g+kiU9<(HvSE9N8@v
zDx-LAv1axAB_cK8^J#;zfHx}t-n)4~(G_MFW-jvcn_Q$-q(ww3#>E;yvCT3VCyc9G
zcg_A3_ZP|o3O}kpem0KiOSVq~R=-&oLIhM%E{qwyF|Bug9S~y{!=BWEu$S7!u%RuU
z!K)W0z{<pN@f`yX4~ymoc7WjoJmbjfE--0UGx>*5XHXFBm6uP>zHI}5CN{9*Tf;C<
z*5fG}7>SMMV!|s?8b{-c+lR|(+6Qdw9odaCa*czNX1lo3D-XB?{&wKJq1g&gVW}&x
zbMCDTh@w!K$p4L-GyCsD61g4jkP&lMOS(o>n}%>}FYR@G!p(A%EcpH(nA{21&J|6D
zm6yo3*{#Udix5{J)bp^7Uf2Hlg@qe;Ly88n)owID>Rc@IPMe!ZYwl94WyB{gvG=>{
z9i$^1q+{sW@fU6{xn$lGZBH6R47uW^ZJrx2dc|Z=4iDp4TB35fg=J)P4|f<ZEib9o
zgp%|v_h9XcLSolM$6~jRx20X+E`=a=XS3G(aMN{^pY7ukdyJQOj(GClvXD#H@RmY%
z-@&Z3<tLtJ>H<F1<2(Y$IHI0^!DJIVg)n3$w*z0u>}xH7a$>By4WEURkaQQW#xA-N
zno?A;w<>L{MjpnnfAFMVCleBz2_odf>CzRl1RSd-nAyd`l#O)1V09&yucJLO1tbT?
zIu-&-<0qWPA!597n}T;Xz9NtBe32gCbON6kJHH2}t|*Ghw2Y5U>F?!D=<gHlIb4qI
zA6>HVkzHn8q9Yz|XdV^r9PaQRu>*(&KCZC#zd92QAkX;dISJl~Kd&|E@F3y2k-z?a
z(yrYav}UxgwVbK%CAM$0y)G<#TM~F~SeTn$npX<mh37sZoXf&;(?lYLYrV1k;=JR0
zjV>B}*nGlPe(@bB`O-R#3JnO2Eh=8`s@cVxKD;~B*6+^ck@>=Lp)IU9wjI=cvK9mZ
zhx(l^e@abKy!yL5>u4TCMti@b^u(Yk+0sT%<?$;@)b{VDmVX2Dx#7jgkL#DVuQZiL
zei9Fe&Xsv+U^XQ!sF3|sRy)!ttuBqNlX9r920Q$6D01j<h<0eM&Tagmm7w)io9#?{
zPn#i{v{?JQO6`P`Dt5h>P#L*7xCuze>9f3q*E}2hWF~$qD}Fl@dTxij-5h!jL*6z+
z-sZy?bRtMrAxvInW5{D-0IREt8md02i{C1W-!6xqLqpH=Fb8)r22Ti*7cmD<h?2*M
zlAqO7k8jF`i4NaA6$Y4EI>jcferSllwx2X|qygU#^>Y|VIDC|G5o*dJg=kg8k`6Rz
zpbDh^ZN_uuW`|Fbe~#PRHd>fzhVGo8aFm4=L|r&&6#f3GUFAI=9n`pi%iMLxF=y0Z
znneI;+2COAa&e&Ff2ZX?6ir`!(@dbEdq&2b+q{ui<=q#3qIXtB@NECrP0N2Q`bf)v
zHF~%DhKSkIKvO%~8|LRh_Oc#M54^ZGI`~-53@M)~YBp$u$_2PAzE(5iY+flEO<s&h
z)Z?1v4VljR&@522!}5!j(!(mnA;%%fq0*t$q4p^MDC(&7sIhw4bHcF&PDA9rv%LGG
zv!xTf`~a3J=P{z>tT(Re4iX+*n=yMs829PMZ6{w~a4iLh?DflUK5f271L*g4j?ay~
z*))kDuYSXp`RNz4Z}nW~YRd+y*28#o&Mf(%&0jp`75l%l@noRq!)QfzW>>9Y-8wLV
zQ-f&+ftc0b`|6uu0*L;ZIJ0uo1~>Dpu1g3(^~spdYM!pm-#opuT`gg2sUiD5&d8bS
z8)|09#*GWDC6m7*TK)skhCCRLH0--%1<&$;0<j{YeJ}^Unc1Nt?xt}Y$KQVG>9GBQ
zrKoI4T4det9d8^g={5kn@n=qN%{HEQ0Ts+(-si0r6fjq<dq6#NhW~?NFghnC-LPaj
z!#lGL#ZcS~n)7?}bQWsLA(gI=V`J5d0IoTlpzNR|u@Dtc0lPUAIM;FPab6oAD9^*m
zv!yi;UUOPuG*USwQuP%){Nu}UX!e(#8^F#yK<E}=a>@Svd^~>Y>XL6C<xbz7`q9Bx
z^zn6P@Dp}t!V_C(l#wFe#K<MyQ<RS-jJO;b3R-SWd<5MFVQmfnlr7IZ=y|{r;6Ad)
zg&DWk{XN98_cEXA03La0N-N>G+H$fCxw4F5RK;IWw_8SG5n0X`c};*zyr#h75u-?#
z3YX${7F_D3KJYmhmy9mGHr--5erH-B@F8MRF6M~s8n-#(5k)96AUS7f)XWYFnHRiv
zY0gEM^8BWQ;%8ZM*{7z=lQK8>G$(h4AB_Y?AN8yZUR#KbT$??I9jVO1g%I*Ye!gOl
zrt6;2G0NRt*=r+Dd_M}I%*R(kC{QtQe;o7hi)c|D(r3*J0s4waIGx)Pp8q7ntu(k;
ztzU-5O$Jn`Apoa@Q+lAPcp~vcf%Cw5ZArB|m2wKb$_ogxc1xYbq1F7$!=uB`*A4ap
zeyBoGok?WFD}S*~PAntq2@XG9lY8>tvo-@Cd4=)<LJfZhMjG}9rWy9KS!T^!dZOPG
znA7C+DqB|0*Vd`eqe9F3mF_$|eN6(@jy-ZWkOLEMU(bL)MF-5K?7?-y4F@wtzK9az
zw8K)K|FT(u$7=F1Ae?oJY^oFnAD}bCf##NvOjgInC>&m#VHxe|l*7xzswJTx`j&d$
zfGxW!b%*VDa7!X?QMe*~k~4;e&1^Fu{U7{aU-($kxUq9ZgK$8}2kDRu-<>Q)qzhJN
zzS;M#sT4#0zz>mbk7?=hJ4492eRN!!{kd0UmXsHU+0R+&mX>nj<kj25a9~W;r`7as
z;ejgCT!egunEC7{G1FO2G0RyF6>3Z<%FYK%YFD6$enRY_)$nX3XX0Zbbl@Qx`u8Cd
zI`R+!?RiLr4n4#{BZV#4IZ@No5~>eX#k=aMhby(WS%gMA2C|J;OqDsExJuK#(x-;=
z(z%A)`!7A>eBy0nx@y7r<_~wwZs@vT&tG73uX==LZXMXts{u?2b^u$z>%nI5I<OVI
zfxRBJ-)UL=+T!}{J!*4GK)A^86Hw$&*C4qCz-)1T4r=zG{~-6|fLP?De|i%X9h4Rn
zDK_++AqD|MS}sm5c5lI_WE}#;!_P3CLH+W&XCmH*$GYcTndVOl3*Zi!YLPQGC}tY?
z7A%T!d3Eye+~d{d5B|~9iQ-n}*j~B78k+ZXW5{PGdHjbKjYAqP1IKVIJ|qnXR=4{`
z`@4f-n`XLML+Hj7FcCUP7~mDN*wbxmnVdF{50AXH5s`b3mfPIQismNcVyD%T=pP)V
zNm}E6nu`~${SMdEMsk||?kY1{@(YF*MViK<6hhIBm`rkuc1$)Orsr)Pu!<bU&Gjwy
z<@8YP97yc5<nE0l9a<bHY$!>ao1n@Gynh7rBaiTGXx&@V<~xgW-Zsa0es9FTgQ6m)
zX5@m*yv!oRa3GfhVr1on*sNu*V{fs$p1Jn8j=d(l=e<|HC%=DEIWS6VpZB+13P74C
zJA8Tl+AoAJgm!HtAJaX|C;>$`0m(=81(NaGHz6jUUiJOvX9)d2PmVW?zi_;nZ)|>1
zc$4U$V83ue{pan0VC|DL|BZk%jW;_#Mh6ZlR^Urgq!pb1^A_>%7<IFUy*vH(gnWv0
zN_C@siZ_q`G*a|Agm)a9Fa-M-$+|~r?RMj<QUd<!-!{m~%+7itQyAG=YyZ1L23~iW
z%9YM~;Zsc6TI-D%rJDTJe{2Z;cZUuTL%rXKUFyMK-D5+h40G0toD$5QUH{)50{k=7
zB+d)LQz+TIYmF~UvG^T++aUe#4)uZCr}BCk9L=+07#kv^<WT3aSWw!-M1JS4#jYtC
zqwl>o%tyTp<?as_W(XD?$3gl1_B~3WG4XJ)uIei{V{#T`r<Y>L*DuAeu95D;T0)S1
zFLt}0VxKBIfAZ$z$FF)383GUP=^hKA{yi2(-R;-?buD1c`V@2R{oC6x<U{>+l(&95
zzsU)IMTQ%Fy#5s|!m{+nR19-|ER=*Be*Nz)_y3PM`=8tE(J4se5nZ6V+XhS7&RH*P
zia2|Atr4Y^hyQ<fNc%XF8Z*)_N1I2+YPX`5uy=rFp=^J;dfL{OtO;l<z5@}_7Aap4
zH>?+^xg;TUNK`7)vkxfK;%ph_McWjJr}QWs<Xt9xOn;aGdNeNVB;D05Stb+@PwFj7
zFA|;~AMFG=EvtZnWNQk7wgOiUO*R4&&o{*0zI;Ia()Ua*e+G_JSr5Vq=%)vS-G8wg
zuFCt?@EhgSM75!7&MiF?i`W>e6~iA-VWfVxSpQ_AI-m~UE$G#3h{|S)&+K_p^)@~;
z!fYTR1C!v)h2=_^ALrs=#6N4kPt9&ffkVC(Bsn*0%K;ws?Hq_6(K4{zVfst|+g)2r
zMbe)yq+3IqS0&?I4XI3gk6Ji2^RwpHnST7Qkw#{QAQ5&7vj%Xlwy-+mp!$(dFLy6j
z_wcEF)DoEdf_OgL_f-BcQy(i3%l>s*@YT1eUlBI5#3k!FQ&l{Q4YQxH?9wB66nltE
zOt7Z<iHEB=M9SZ2%3l=^_QT)H$L33`Z<c+(X~Yzc=`VFSXVBo|y!w`*l<v%E?FdJ=
zYgcg|LMPh1`s*FQVFa-6>`L!=lDpb@I;pjaSyC#>Wp%0L^mF$~Q#U$6ZWAiEvQ#n3
zct&=L<9gtH<}A0WJ*~~p<>|SyoNoBPkS#V`4$Xf#8(jIDzHXYu&amw&w<gMdmgebo
z6;fUw^F`G*z5WoRmc964h1H0bh@JGmpu19RYW}IGPY2#Pwq%)TYSJ67Z7_1GH*Fx$
zoaVZCXT0#Av!8Tkmn!p2xcw{$$rtTJj^fXD9YR^{$ql!@`7S>S3Wz$ju2Sb+2gLj2
zHn+zk>`1t<=(15o->@O`I1^e2Z|!9c>8oqzV~Zj=z9RXZXQFGq>)E28{bm%20wpb!
zm>-k-vzx-vZ0bT?v8R1GnZ7OLzpI_hQ}CvzsRIsS6<;kMEx*7$%3X>0IO57IeQFxJ
zYvFJK6_ZhQOL7-snT4zanNe5mIp`3iTUf>Z+MagzyF+fyG?w{+Zq=qP7pzsc@57pI
z)uZl|;h#wHp5fqN3&8JscAcTF|Ed^6iN<p&6vJIStHtw{!l&_U1>(TBOR+u=n0bE%
zlv3@v8yJ$by}ssbiLjcF`kvdwa5%DWgVsQweME>vDAXEvos3BSW|^I+1-cy?UdWM-
zp;|_Gj-fI<2Kx(gDisLuU~>N^Rz>z;;lWh!*jUbC$T&G}Tv`6^wW*9^f>jnOn3`$f
zP>2Dms9#YJpBrW*5qM?VeKM?w2kZa(Y1e%wD!yJWs8LK$PFOjoH=9dC2+FMO%epxX
z<MS)@QRv)Gj#RuIzF=IZ&VM=jdf>WKG?_3=@aFZ6L&LM7_LF^YhL%QkneK#v9l3tL
zz6DY?dZvDVVdMMhZu-w|m_By@FK%lTPv#CSKFtY@>BFioM2~5~*()+i7ia|I4@cf_
z+{k;fA^q8ZN?l~hE*yJLEW}k%oiGg*TA>fLCA;f0@hfNQ*)RE?+gqG!;F|e}Z|jQo
zx-TFc7C=xV6wp~4D*rfkP?=C*&?@EvG89{vC(Mk`wE|c)M+=9E6!vS@37nsec<1)m
zh%SdzUI>jeBb$)jklr9Ui}<YOEX`GyGo6b6BCbNsLk6RaB9WYR4J`4EForbcf_Q6Z
z1{137U)xw{s9C}aBfV1Kj3+pqb{%5pHCIpb?QzdYpbb5TW-TSeu}Q!dyCk<~I&5}Y
zP4Y)(*bP63iHl3#vj1ukaw2BXWi>TZ@u{q78s$PRKrcTGUn+9{%}i{n^><fO7M3(9
z{fs^4yHO+<VwGB471@rFgzQT>_Vi~Y`&U`wla5?-7Dhvf{7_#we3&uhFR-H`{$$&V
zc2BrD57KsSZfLo)&aJ6bbIjuhxPK~;lgf#+Sl)7MkAV<*E&VEMpAYbhpAZ?nw(sEZ
zHdClw?^IsV(EpQc-|BNZ;xG!W!J8v?4Ya<}@QdjrUQSyXQ#2KXT4djnD&e-I8~CWd
z&*_cm=#{GoCFzOXrE^tp-CweIWYZoS*(C(hYB{5{MCgw>Y&1JBf()08j$h0TBJvmA
zN?RM2e2%G9&i?wd=Vqhae5Bar@@HI4W8WOQrF?J>#1~7g-J(BJzy08k1&A4*ReInI
zqy<L<hMd;;F7$875Z)OSK?!2REobyMQx5`NVPKm1@Z&Gv*NT~Ld;>+nQQ9{I9o@C-
za~D}RtPh@nMBp^B-!11dw+OqiCzhaGFoWusx^ab%rBsv*z2QGpnJx(izqy)3eKL4Y
z`-6ZfT<(vCNrWo(GzQk6S3l)+=&JCw(Cxyp{#cq+{*styJ$#3a5gE?A{>@pBpWYoU
z&EFH?1^7M&d*^SGx0mGK8Sv<jREA;F`Acq|%AUv*-7g&JOQo|0KU+55D8_DhjOd{D
zA#B_2o*yty1h?=n?&|8|1c02PoLZfdovLal`3CrA_<FQAE3bHN2yZg|hy0lXD*f#O
zNc^(`^aF(a+XL?XQ3E0a9J=0hO?A0-VXxAHmsgho8}K{ipn3K?+90POvF8`hAD>m9
z(GZ#${Lin02sGF2uE?&);5p|xS2=LQOZ6wyAa?NL*lpNTtJo&{75pmgcIZ*!q35yi
z!R#^RN$#oq>BAFoP&K$4{Cjl^umji!Yy)7cYpaK=2dnF=N2|MHdt!%97kQ_7*LfFS
zH|)rVA;%$!!F(TI|9Q#r5!n~@4jJV&3UUOB^lNF<K4iMr6|ZJOGC~AG+CG~Zn;4^O
z;^x2l8)EeG{2eYD%0`G{KKD4EDj@^T8}v6gKQMk^X`s*{m!Md_wtdwU67f6qv%0aa
zv4ydwv4gRMv751-v5c{oF<{Mj%{iadnaWwvnQa`m6~7U+9ij8IlK=J%>fe0)L$X66
z(zm4eq{O7Sq-3N-*>C?5e6m8>eGLnZ?GEpz?cNq=Z53=~Yvq{7Tawm%&DA|=ylSlb
zOPHUAUzneXpI7HYHhwm7Hf|OAEDA{|W~frPMR!WKW_MFJR`*DEbvIe}a(6&?7((Hw
zdF}h!{u&4&K&IADen8HI?j!MqffP?dt<0+oVEx%z)!N!x(%RkH!1_xWlLlGlhs<{s
zm^=}L5vku&BOAvL5ZvKDRRwE(Yb$FN>!3Z=J=r~-JsM41Vgh24iZ@CaN?0RkGv90_
zuzn){EE%sK9~`e3Ul@-V-x;4Bj~hQ8?;7tOUsu)NliYLPGbp2WXSB!h!b$tqX+lYg
z9b>|{B(%gX{85-em|K`iSWuWvn9_it1{-0JhCUZg(u3Kf@Mow;&)dV>(A%t)wu7~U
ztAoBn%%8!Z#-GKX)1PjMyzA}p4}K~UYUK(l0}@9xb~L{5v~cYR?eMt>zHfYyEfHSd
zydvS@I1xCJi+||<l=kfYAzN3#^(*o#qS=T=13F9okOi&)1A#Ar;=rFkTm;p@1&9u;
zko7RPG*>QSn|zO;DC6mpPf%4-!>CB8S%D6~9H0pB5hwwq2ATnrfLy@q{%~2VY22d^
z9?}_QV#Ki}1+EC*wwNZaE(!E4loUz~#f6eVi3HvYklMs#M`g!l$GA(fNgYibPb8M{
zF-i7(<zSNXlew2dl|+?_l$Mc{k%36jOI8-lOk_+5Ote{>xtqAlx%+6u)Wp@qIR0ps
zY?1PkhD*X_aHQfT<E2!j$0QdEi3)N!WU8!&KbV<5>2Rk;57dd)J=KNOb=R5H0qZ#G
z&g#BvNL?CVIybWVQuzw{vMu0t;x|CrAo8Xw>2EP1z3KQcG8hrbTM~Q{ViH^uG7_S!
zx0TVF5X-)u-UHLvy6`&Mx@`{DX2E8*W{z3BMZ(1oi|-aGgz$y%gb0N`2)(n5H;nS=
zBRk7=vC95_zd7N}#0I(Vy@#Oop+X}6%Je~cArSh$(%w>t6=b&$wt2A`Qx-j6+$ypn
zVuT0p3-{({>nrv?@dn=n-{jwn-$dQ)-L&3(^VaMT6y*}7M+j>DVE@7Xoju;}Z05}4
zEcPt*ruk;{Cimv)=I0IYrtW6oCd1qB;Y$bCy6mMQ|2xG$c~Nv~=mHb;6Ji{nIQThO
zI5;`zI7B%(IA}RUID|O(zUHOp=_IS-G2=;_DwzhDs+(eJ0^hz<EAT1+n0_`@HMKUC
zG<7#MF#S@%^ff0vBR#21ft!wyE|n&gzOnb9x2?BNQUSqvurgIK4cbuMkloPPFyBxt
z5OJZLU=-}lEl@X?1ivRxFJQUGy^lfq+r9D0rHEgelwBFWG-~QEbi<&|D4U%PkH96|
zI?As1YJ<)trqytX_Lu-Cs(Rz=8NViF+*_HL&0ciV6dhKC3`vxSX<@6X0Tmk&k4sal
z@)ARH)M9VW2DuB^TUMBg{GCd)6~YEFbUwqK#*Z#Xj&5H?I;p%U`!MM+k2IY$n>3X)
zgEWaWFFQRuF*`RqCp)W3WmJVto@szUjv7P<5(P1WXh9+%W)PpxM`)&Srf{xsig1>2
zUPpR?+TU^`4JlXUdNydfLApVrLGE;7WfClrB#CvvVIXHfWZ-c?Vt{(UY#?cXYv6h-
z+}vsqc#z>*lAbI^pj52pTA@-AWNU2eY^!5yZmVePZ)<8RZ|iI8Y3o=a$|KgqP+X){
z^kX`6`fj>pI(7Pbx@LN1Iz+?n!1}=ZK;yvv!2iHBQ=X{QuXx#pjZ6_TmEmsF#;ys}
z%h5|)NVk=9P&iUNk~>l%lP8lSQ^--wk!vbtD-xWFb02Hu8Yz0*w-!uEoeG$IoI;uk
zo9daQo-&)<oO(B<J~=hjFy%INwST)WWkcIZ<xn(NG*`-3+)~t1>QxLc!70+8l9_@`
zl}=hs?M@MKX_W9!F>j7KXBgAv4w%bx1#nqpoDU}qpAMG|&nwbu0$1`xlSLCnQ$;gG
zlN?n5vR;;?8Mz;<A_i`_CKQ>dt?tb4tWYdbtRgI=E&I&-tmrID%uB2+t#&LAxGuP2
zIOQ#+`ueK|s>bXG?Fa0~4hIiMNc$Tt<1FK>lr2UrN3GZ_%k5p7wP$m->$~lRvj$Qv
z?=6Swx1p5Kb?8@U9dz)p=y3Y*hrLoW?_z@CXH9c9bHRo<`>`snA@fJ5HE&8vLqPpw
z15!g+Lr*<5LR5CM;a!7z{ZvCkgImKD^cE_mOWRImXFg{>XT@jHV%}oqWdXOuG1qU9
zX@E48)>}2~HW1OuGo|{<Iet$HRWlfrEmi}RD>9`;$o3R}ozy8;%cN0Cv6SUetDgSI
znvhv!F)448(x|oY(V>K?s4O|rygYsyK+J%Z8X-qr%rWV0Q@|~i$u^R@BY!pNZv!ln
zWu}qPqpnWlmD4Xenq;%7b^mOe5+@HSR-e?}?{Mdk*^YMWbS;`l!`#^bDb{e$@oA?r
zk6{g9jl~Yej%e=CZI|p=ZrQpvfg+Yd4b&ZV9W5L+9UUAc9Nir49AzB690AA1$Idme
z75!L4vBR+gv13ZZN&`w`BcmfDGrK#xgxkqW(b+)#B>lX_<i*6r+{Ki|ETIIu5wa1o
zv7Eu2k(@EZWJZwAF>O*rDQWVit2A56{h);_NLZ4bEj|%4m~u|zQz0zzk5M>^PskDt
zdy@8G<yO-<icdp_<_hIWDtrKSyT>)l|BEPVUXsw3f{$O9kS66=>h9pxxxWvvs-M|h
z!ic&yjc-7I>*$=#r`G?oV@muWWLq8KM&9Aip|Txw(Rp5UmW8vkd8^pPy~+njWgo*C
zz!{4lj33e7q2DguvD&gbZ@P_m2=!MF)D5%<)C_b8ln8VSv<s98^a=z#89zC9u?A5E
z2?nvP0>K)#>_<j=Y6q+Y^3QyJ@H;%Y&>D2%;byYMItQVJW-2NtU`zjS|NUbinEZ;L
z9O6P654n=1r26L*E=#Evg-->niAoP?t!Ztl(QkD`^o0LIMWT|TltR?W=R6D{XZ$3$
zf&6(pI6By8+xrK7CG8it9?-8U@7QfhhJ70d%DL-Gkf(&E{H9Q+O7;tF#@ww1c>_2C
zxD3;4l)Or0xJ=nT5oLi;of~?qxTh=|pf=Z8g*%O)1p_Nb?w0h$;hY_EH?YsRusu0X
zd=~u(*N(tNfe*C9)`-t3!)y3{hx+3C?X<roV!YB%MpOtxipSMV85`abPJYq7B&_`F
zfUdWZilGo&yfXPsBNILxxnp)gbisEKe!Jjr71;PO^_4;$a+5LPcPX2ntd=oT8!eKo
zHVRF}qm$M)b&a}$tRks_L-`i-oVFiY6!k1w+)|~6>MdsK9ijDyI@hc+sqco$w})MA
zKy^#{xmB<1em3>$S<+S&rPLo(YgH~1H}+K%%o5vmHVrJ;I<$D|`c)&%Qo_*GY(Ndd
zdboBWP4m%u9F@HljgwjpGd5THg|m%K3wl-#jm<iXRft_&JFv&NpgmbroIZUu*Q@}n
zzysQ5YuMtb>s56>OAY&eHSKHJ*|?%}Qmw)pQa!F^%G`j<J1Gsl<gFZWz+Bj9#?X(g
zUYRwwYie3-v+rzvxtM_PxVOyur3AHfxM-$b#89(Inos6kuxu7^2-KfWZPr{ou#asf
z)X%D(nl*#9U@b&A6gImo7CH3sTIn~kE^0Zznpqd)99BKeh3aw^M(xv@NftYg2H1WP
zEhrpXc>YmdU~FG;Y-&Fe_ggYDsjZt^%sQ;T_Vi2ZoD(&ssE?nA9KJ)C#Z?8YbeRL{
zYN33Gi`RztA&*IqTxvEdi<L(n*V2ghz>yW3lRAWz!%@%m*ZbChNl~-B2KI%tqsnWK
z`_uqPmy=k1-n`0@)wRNX?BmMQ)?0oIGTJy!)b)>K$r2~O1efCSsgKK?r}+=al;X5x
z+6#v!VDFvZ2uPEf#i2uz&1N}HbX=?WXGuxo93VBDzt0BFpl35K$E~hQg5;!Qqy9yc
z6PtTpZv-RA3gcWLMP_{*yE^VHLRw_7I95oU*{aJHze~2@C}~<838Zs#fYF&yP$Anw
z`H!3+W9f>GM_Z1#)spUdmCLM9R(AEMr&U_RoWL5XYaBl$``swxZk5{#Xv@H*Mu0DS
zanx`(<Ra;!;iB?l$!EL6LzF+y@V16ZyS#FV)^)&;I1RVleUyJUJ7&~kx58~1w7ukV
zEEJzjKdQc)aWUz$+2JJ$LYRPSf3F;tYL!KBb=s@gTA25u+nEe_YJ9bmDraVn4_vR>
zPz)q$aOcwP{_t#PA}Cd<2Fx`)a}jonO)x>{0M`J|0FRvZ8iSS^)VT(sRl_Yr#%a5h
zBS?Rfx9!NWR_IW<t#Ya97^P_P|7q_%z?xjPh2d>42q@T*BA|5A6FSm6NLQ+q(3=o?
z+hU;!NEZ;0Za`^L1OzOAfI{dfB`Amx5m1N_`ajX_K6?xIe)pXF{O8;Idrs!bWX+m2
zYu1`s^S;wEQ$9A}$y}vwlvjx8&zWj+pY?I28M;2h;F*--66@6Zz|(Np$+LsmQ~#0u
z(ASx>o&`0-!{amV^pApvIA&mr*L+*Wr_wwjRr*8rGqj5pzWx4h*Wa&yTK_2F35KY{
z^fT5Pb$QL&A9)r-#9X7AEXc3LO*CG|l6Ac8#A(y42r3%Ed4t^(-s9d8I@QiYi!)qN
zPqZg_zQlR&r6*;G`9$@OE$kG(tZ_ZBNqg3IuFPjZ+&ImI@T+w*V)Vqks#mVq!!&O~
zjCJF~4{ts@_<D%%Nz+Ipq!p#P5#lHM=HGfReDDo_oI`XiYUW$Cdn{ixJoWWPt&($m
zW#8ai$AvnwhgVIlKT)6953V(?G-(o@#@5mhJr#2jKgXD~7AzXnIyrYRE$VsMKmJNQ
z>s(MdJUBl6mCh^pF$WPgd(E>|bSiaG&|CkpJ&|^{!n5D^?b`dbPir5=7frmKYw3yB
zrgcTl`XBigL;YOSo2<!i{7p<>Cz5rS?EGo#tVUE!gNp|HCw#|!r+vqKr!4%sCHgAg
z`cC-HuDl&2`;(`a==@(O=0Ii&KKD{S`m5FHnbs7&?4M%#OuHoSXHmCrB+j`HGix~a
zfYRs3ROdKSIQwL=W%12oujfq7-0(7sA7R}uFuK0SbmrL7ctFI+WaUcjda)#_Xs&;m
zX|-)Vah)!(vYxQfx-qcPw9!YP<gMKge7e!TLELy+PuiFqnP**&S~Fc8Sv|IHzmd8D
z`;{$zT@c(D_C)eM>zAk{u2t>ziyMyvTk1zm=bb5)Yc=aTHn=vdH}p5EHd+Ix0zXUc
zncE?ErR$vcxx=^iAh%gOVfnoK*%iyXyyuy0_9FL~>=xNRe5LM5!IP;cDNhD}VZ2RO
zeC7I+nkOqyf}dEuwYUTUdok(!_W98m?JV5kdF2Hg1OMKmdpg;U#_f!kI*C7^y31<E
z{FR(1%9jL+551=Qw3`m>rA*&px?|!>!4t=~r$3*1MSpac%GGfx&GRfhJ0qlgJD3ja
ziG7-X$+7tK>r;LwKJE3`vl3JkRCLuj$oZ<Oi%9eCV?nb)vsYPzQl3UVt$l0uS%`9m
zBH(rCF&%LitBm43Hl0(_G8YsXv~En^5`KSRNv89>hz@hU4DZ#!r^9chK5Kt=`)vPN
z%<ITwT8W+MGD{hm=WXwaaqe%CNxlWMr1zG2cOI^DB%c;_Em;O4!<;d5-gHuT(tT2G
z(lKP8TJY-*=}BX7%!7;#f($D=CUSr|xb9lrbwTNVu<g#`_`YM;!k^n5r%`#<3S~wI
zr<w%{om3Alc<%nL$wlRnz|e`AeT%_+qFXz3C(-1CK6Deo;m>m3%@uR=)7w95Di;4l
z8~nV*MfVYU=%5o_{Q=KwHP8Lu>A&lLhj~|Nc2<np>N(9j&v%RO=-;({e(~9a0`)t!
z&ai&8Zm((Z?6astoLUEYBJUpJXAkA(z%`t@EWa9U!^w<~?2$VO#^4o-*4bQLtS4?B
zP>|;si*9LFwG=E3(UEWE$P5w73_Z@V5Q1Td<mAwe9#E9Y7M_E59U?`N<xJ#E6o|4!
z`P<F7YZ3giL^+~@ge;namBTmsdGqD>D(?;7v%4}^g^S5Y+enoOg~^xP<IKO=rRmml
z;;TYdC$3Dy;Fu#Aeh+4*cBa_`;-Dg@m?I(;xUvwPRg>m8;p&sdQBHE6nJb+f+3=H*
zXR~xW2W(`@gqPt1ho&PJ<V@vE6-H!7<dY_GaS?*DBXT1OlCqdA)-2!7=aZMg-XB9U
zyAN}1xJ1*f3sU!mZZs9&=FGj>33GdOV*W*D3GTj#-ZA@|<qZSosU>L_0v({}Q%n&N
zFV0#ZN~&I)I|x^tG>md=^e|s3$$G8y3F&dP=H_t2jD?0G_C7}+^Hg|kSZ!o&Xl(?n
zgmj$AFr+rTHp)N5u}Pw7!92KR4D1uDd@c7$#N(LnO^z=?UYAcrSX@>zI*~W_;Spjc
zN@0xT<^EWZc-%R(vQczQ{L4D!lAn;oN!BQhChJkRFO3veKU5vdNZ4${;+VphSc>f`
zf53_Q(2*DE3_-GHnVgylYz&q`(!67;ej@En$3|yIXUAAaQ@%ufsil~$3ay`67YI01
zA34&<%BYyhrg`Ta;|1xM^Jgco3BOaNFm}p{Xr@v}-v$hhq3yC7nUb*E$JKA1ZDNcK
zO=>VQhn3v9pmv|Df<ZKNtwD2?^K!C~iqTmohQ-jlY_^NH`IQpRgmNZj$1G=~Nb0*|
zzgWtZ?#8P+oRv7czz`fd){xjx*&sJ6ayijUmAxg%@-l;(xssArQg-ZzYy@=_O|o>S
zj(i=ID$a<;inpx4zvL<;oP0_{{j7D2TTA16S65V3+K}=L=VGivOYD2wIezb?$4W%5
zbgdvAvwTk71a>XUFlCZ<U!3R>)kf_j_+%abe4gH9I}P_7AMG8A*g1CZ)W<3kxwmwr
z@`bMF7RPbssCM$WwI<EwW#V!9BD#ros^!@OTB-Onoj^M%>dr~Eh`h7f2z*tKxt(x%
zvVn$Uj)&F?KC4IRBho#gT6H*kMq9&Hsv2q>BdEe?3s=keYHL4`N|!rE3d5;YOAN<3
zsa59Hbk&lskk9*YiYKHgYUEgV&)Y~j`N{^y4zhGU8(IiizXgCy034mDP$0hmK*D<f
z<WZyUfT*F3w%|-`)%2k?RHb+(#C4D(Y`j9@Fu^gZYBA~VPTqFMD4UrFFBx=_2U#@X
zfTR?p<OO8;uc##V?jE*lrjks*knf43@*9k5qlS+5Bn+~+%__Fkik_(y|3IwS{<7c~
z_pCaQ`UCOYw1V4gTKj|I?Z|7nfLAg#7c3CF00azD0h<vZL>U@nR}UnyF$Pf^R7IAl
zV#5HM7D(Jyi&@gJv7p9LQEF5rfL^zKtyN}H1*@iEizdg)cD2=}ETwn$frOGk@l^t#
z3Iw84OhH!bK;kbGAZi0B&!Fh!%Q*+Ir-4EZo>kM)%^>fFMF2S8`ir>FBMMhnjd!dU
zZVT-Hwch^82<q+Z$<Lm&l$zcD9C{;=h<dU!<QK+EBbS$$69`y|1@XiYi(N)XFI_h}
zYA)%rv_r1}duYK>Ffe?rc|7XEzQi*ZcoK776O7hxu00!vTsV=4eO+X<9v1I*G4h?!
z=<%m#uI#HiY|btycl)*q?CiK!ShP{h?K>*Mx#L>lokm@^BUPAlC$yqYJVIVNE2wrm
zNd;l`t}E!xqcSrO!Rg!KD#t#2=!)>JBAZJH`d_&9lI`dy{F+?VO>>x_#f6}kI}_f+
zL)VzW&NW?^i&u1AFNW$~zIc62JTWjz*X?4&TI9<SGn7%^rHv=!l9$Sj`poMm<`yq7
zC%V68eYCnmkAM|lP!QY*LAkv7buILz<e?#JmBR<?-_2omF79KzPW2=Y4sod-KGbM*
zlo0@{iZ1C;P3hH!agCje!i+goPm+;4k^8CtKm)|@>R-ieNSu`28N#r%Z$;zv_J#D4
z#=w<nQHK+TPl*$Shu#-5xR}C1*AyJ~r!-lW@Hd&ey$*c3&bKg9yb<}pe1mc2iND-7
z_V;l5m17jxBFD_^SDJ;QjRoHkv%J@)mkX7yNh^P0{gVD!Yt{NxW8l-kM$@;)1smiZ
z9Zr1bY7|=Vs0h-yzH7zw^+wY={X$@gqy^x9#J6eQW!t*=I@9BWkY~b5dvC1%n)nv$
zB^)`nQ?TibP$=Ic$;CaNcKbG@J*sC33JjhY+eM)tVojCeo$nCi*NDk`l{Np$yIm~M
z1PMviPt{NCzuh0xpU|JwAKRafxsADlNyemMk}$ED#LC;1cPf)B(<<XDV=L1=<2++L
zlRXnWlRRTR(-%1p?%luZOb~qAX|`Q)=OD%Vhl1|13En%{v-jgJwIDsIn!73;e8&$S
z*eAc!B52>!xJ!Ca$OVS`d;4}W1vx$~eEaJP*U~P5bKwVf3djda*9E7rN<Jx%8p(v5
z-@bI{NEZCP^&_HYq!#z}OZT>wvkBSBFo*1Pa&3NlGI;xp%e}YTgHJj++r0aDgYJQx
z;h`Ptze=8#0#~1~gpLcwT-xC9jNVy#aBfdCd$V~n>uD9Xz@XI=4A=Rut{$1&#ko6F
zhT)dE;=b&|G1uaxc-i7_9nRj?wbwQXDPzFqc*{d^Pc}^#E$J#*X7_2CTRhE3%QKco
zEK%=g+3ZgT(qG)Ow5QppSyCE(Zhc?rp*hymDQp}2N>9v5o~t;wj<B>B{IaK6Qbt00
zeb?N+xf63mRh$Q##T2)__q?@qYs9T3W!*6M1hnl}+uf>&OUc{158SqTg52@fM%}=y
zVbrXj;C8G2Ej_R9z;4`8RqLmJOD}<1_zy27@9O5iZS@pMlY0@`7G!%=^{<Vxu4d_E
zb8L1aW<TM6y;QhVv$9$_qCMh#wC9-7hE?`?tw#$oU+E|0uGR}|OuJq#rI26L#l*y1
zPY;r0PV`ta`aIA7QI<Zyc4fTEVNQRnNOZhyd=WxquQKIm8D5ZiTfur=r|z{+$-MbS
zV`q5mu{=n-iBa7n@5>vb`(CaYDDBg`ap-uc=53aT=1%+}jV1f<?=E<eT&#DWdFq)@
z$u@_*Oi!DN_sw|w9Zh+W@QCXx%3;S~lSj!8Fr9W{B`noK|Fyuv6LG|Z8=*C4h_N)p
zx3urA{7@t~Fe|O0;IqNwZQ$ynQD!d;F}Pluw?t*8YKg^nG_928T~+eiv^*Z8D8tJb
zmWDB}T_#ui$JD&|h>@P}YAL@+T#I^ZLD?yBoiI92VW<l#ddEaT*M+mbP5(@w=&zot
zf96~jsF4=xml?u+rgh(;(_F}F(Z!4=?5dohyqO6$Y{{XCvU@t!$cKtT`Wu)=1)d)4
z-l@XR7B723>L91oA)jZ;k3!iFaq)(n%uKUkHwg8}44*u+JLI(awc{LTLwL*+ZgVAs
z95Ii0%~la=Jo+m|*6(Z`!$iZ8%PL|A3D5k@qKkDd2p--yE*;UqT}D&;tQg93pP_F*
z)3vr|iO=ZFDvLEJ$`k{NJVmd0Z{GF$E>aYAiU~#P5zi|35F-nF{Ik1I!TSgM_D)?_
zd!}brQ>^lu@6<uMeG1nsp6z=V=b|SBF=8m(+kcJend7^{&*vygl#3KyFTuwQ#Qm(-
z2$_DG(f4$81Q|l#vqv;@mxe#iEav9PXXp((DchErm`SHuc~66^Og13Pll2-xa^>#Z
zNRidaCS<8Ho@MR<M&__cIaApY*<+dZovD+D@Q2I8t7U65w{_mKkwu<OKByLIB{!dW
zrZdb&t?cx`(djTc*>u@-F!r3t<m-GeDMjXQKXxosrE%Om`hs9zNQ8OKYd*U0*iqig
z4<1Pk@dxnC9P|udX((zaYIJUJZoKJb@G9(B!)(KBBWpv-Xw<0qmki2<Rk>9)zteR`
zM?zW8gk+!7;(r&AAEU^roUJ8xI*ox4HqodudgM#8m&{`U;t|#m$xzAg`Y=MH{;1)X
ztCWi|5T2Mg<<>Lop+=d}$Ip0#>N6y8p3#jlP`a9ZaZao2G%10sWCCsrAu1A;kGGUv
zi|1D)DiKvA6wzl`&-lj3w3NILf1mPR+Et(`R!sSj?Uk|%t!p@*c*S@v1G@x~oB&&$
z<ODsA_!!!j3QK)gwk6Ib{v}@FL?b1qGxRamwsmES2D}1^VcD*DdAqoQ9246M$#Hs0
z_Bpg&RwNbM;4;GjF8?$B0{$HSeAw)6Exl?se=dK>8ryJOK-`QHea?$6NSAXL4XK>0
zzO2Y@x$UB=t0Xp-K})GCI|&yP09Vd!u`7*q;52MTm&SfNy%McVsv;}<@cG}8h+VQg
zbWu4WmR(ETPLacwtJd<iYK*R>0Jw537Scjjn(~RmG`gq-^WHG#be>Xz5!*=gYzzJS
zvrExK9P}*~b2Lj4kJ*Y^MCUYbH1D@;gwG7#P-WL{wMn}8A#Mq)dC@>mpdc32YGCPD
zs(vx*zA2iUDIub@2^(8_;>{^79=`bam$L9GRSrb!CwLJ*ze;PqWqIlDiw{5L+?VMS
zn2N29sZFSju8oJ4+MeJuyj2@po9KVbu~njV!7{ki;?1!)m^ary8F+B{#&OJT_bxdV
zZ{Zqh#FIB}Ri!<Xs4#BpUH({|$PJc?T13ai=K_}Q`dyIVWlhv*wSMn5C%07Ur&}jD
z5;NPp7_D5T&yv73t~+Poef9Chb*=BKVx}#oFGre3T2CyM-HC@ZkF<=ulx)U~vx2+g
zWR^-+!&g&Qr2_=&V<mYH%3aC4@YJ7CSMjj&t_M)QJNxU|^A-8>kGO})%Y|pEb>b&A
z$$YzyJP*@sd}OW#%et-2&zo?hAk4in!CaxFNJ#4rxB3z5FqOuLQ5L+;V;vlK^%4It
z{jmNpOjzZ9dDw$XM`*%4!xqEn!_*oT8q-G4U%pStq~wAXc)pp#QOdFx@AB)pjx@(J
z<Y+1JwJGOy72V|RZneXvmTJDqbkO$T^^IF=l^QR0)e$bdqtnhk5f|Qy9nW_)uF4tG
zoZ*X#<7(9&2OD+0vmWb9;CJRr>xSm5%H31U)>_hQ;m(V{?<%#VzGSi_RfS)@H>AzN
z8x?OFHxhTO)qXs6PV@S`{W^`jI@j@>yg6ZdNxJIsrbl#hbbG;EK~}z8Z|+B(ulJU9
zujZTe-m^18;gdDn@JDrD=Ii!W+o_ai4d^rD)phdn5xqGd<=u;XGI#2n)|HOe+$pDZ
zI4AFZT*`i}%lX^!I{xP!^Cj{Zbb|9OdXM#Ddar*paL@C}KA8V2?}v3a+APkvm`onT
zc=oDJoU(SW4s)+!`FTeju3nk1+E;s^DCG$4*q#F@1p%#>J-p@Wj+&x967I68=kt0_
zxGN2xU+jrBxGSiWc<*J;wPYP_yV`+#kAkZoA5}{mXBFyW@P@t99|heZT1x&|g7@q{
zM*8S*eBAC{a#GjAF4O>@+iO*>J*}_MYwKQKtv-CuNwX3!+AIDs;OkwV3*z}K`WpGx
zJ#HW6zLxsv))o@AX74TbDtu)8ieFas$Jc3&6r>}!t7YWMYUiFtX5Z+VMCnBsGWIl}
zjwGK{tIbvF&bRHy+4`V%B%f{zu~J23Bz3)Fk54wI&3}qyh|rR;e|0jisVLO0E7?vh
zHCMAc)3zID=Yw2JmTD`u(m@m^^}MqAfDBK@w&jEC>2uz6g5xBST*=yPNguSp>DK*X
zwz~$T9YZTrRcw?5a(e9_7*wL~McDI|p$2>$W5LQ=;dIx6-JUWTFnxI2Ls~Q^wYS|q
zv5ap3HGRXwuqIr`F4dqOov&tJQ0_h;?-*X8Hi)0@T(I9${(L}l`jLm0XjW>spj~2l
z!GQa8f`>v)k$6{{jYhfkfXZ~lg2{?3&7^eoHNmWX$=N&x8iuwQ=Ik-tE@PSgZZ#a=
zu)1ewE%_I5*{BW+@=kF%Lf1T*p;o#G93hOZRblN&pCpj=m+#bNI!7y4Uw6t9C9zbe
zvt$R8G=1)*Wm``Q`$U`M>XY1k!igD+B#z~45;=rPmE{|CdFi<A#u<gO`nepq?8q*X
zyI!i{v7ScvBVhWpwos`*-@f0S<m0}h`t)#!lPV@7rK|1Z2X~d~Bg4r~GL;VodzmLC
zND@<ZAKTsas||;*&Rk3{f^;Q*eEF3<TMLuV)UWo@3g=cWH(ctZTUj{RH9fiDu29W5
zjGs~U#Mg8VPo<H!`)7c2XL7m7*=b!<U-fDYS$kf5J+ge#zqU?kB;UE;ljQq#$MWg5
zkN{Q5jPx$T$BC~h%SYCd17zwSjP$ZjN|Gd}>OT^`>Mt9vU0r{3%b6P<ce0h1{p!$N
z*l}8qtNjPjoYBf_`2oiDIU}93Q&D8DW$m@3b*;dx`hLk1J8wwKgl4=tcU*A?wu9;Z
z?#k0PAxyjnP&a&JVl#R>oF?Jqle-Vd+&J|7w%Ic%_BQGjQ^Enh8>r_u%m$0?g`i;T
z8`=+bhpF&D<&8bhAHqg1Sn{J1nB?TEG%b)Pr{#-a4yq>$Zk9Lgws`m@r{wwT2%VGa
zwAMFNo=3bRezrV(oF?K-6P&}0Ga^pYx$NX{(_NU;eQ4kDsR*?uJ&T%>m#^(lLFrB?
z+_Y%gHx_rfPsrH_UU<C!CR3B+SmBo^V4u|+O0SpGV>t07>rFzgpLR69N5_dF>HXP=
z7Ms$P$GOEkw)ybh<ddpxxrw=S+Ld?$xs^OXZX)+J+|G?w*3Q5;=vc9<W{1K_YI?DQ
zhmnnHM{-YU*Wz2i-!m}oNj_>ja>0oxYcF2=ZG^H&TD9L1Hno2sJ~ie0s=UuY-_Q8v
z(%Q;mQTd}j5Ck!N`QJa?BwT(sUOi7+H+7MaMaAjK{`fS6fxQSJ7wo6MddI9xtj${0
zgFgtTty#hcK0G#ABWDyLAKEHU#Le*3YFDVAxNV;IDY?|M^$JgL-l-H<*VZJSi9DlZ
zSNGNkp31zTlsT8y*k47VLQsAvJCqlShMtBBAKaI{{rWipC<jy&3Mqyba~6vg^A@9v
zPj|3P?kDeD-afb;Ud&M}S`2Z4x^TJ-p~MgF=iFX(?hI4_$_K?1vlR;!^B2R5&lXD*
z^K_h;q$BUH*u8r@x|pvR<HF`5<ihU)cRA}K;lksBa^Y|hb%A__e&(E{10R~my^;GP
zY1Q|t)5!<nFP*+X)4sQzuAN5kfZ#qs`ojH%v`%{~_S6K4gVRYW?jD%gJ3}`^!*YOS
z9}9ij{xn*Xy(V-fG{ghM%WCw3dj;tPX$lV%?kl8s+V27WJyi>KlwP?@JF|a=mSrys
z9Scp`fwX;T^d|dFXo-7?bVM470}}hHWUk6Qm*$YplD3dxl#Z2&KF_POw^te={ZM9J
znnp%N`lU>Pw7m?I^mInyd5wFJG67B*QRy0)73n=P3eqoR@}#Y0j!7rV^h;x8Jf#<9
zqMj8NbBS@Tk}DevNg3_uJ?~-4P{@O&8O9m489OqbXINy!W*{==GgLAPGMF+3Gki0G
zGq}t=y<EI5c*%O{csY1Ud$|fRs9&dfXW%98<>6)GW#*;i<?W^G<>)2zNPOrBSi!np
zc^&Je;N|IMO1VT)q<B$uC=L{9iYw^;TY+AG07bLm$QRigvT5smVsH_-ARNXJ(!idi
z*n$#&jPYah6Z*an)lb5Y#}DPl;V0?`S%t20jz%7cJP>{}<Yw5-2-OhPNLh9~*dG)A
zD&$q<t8o6C{Gt5d+^G8z4k2X<)$HQYb<GtaH$R1Ziu@FQ>gK7?Q&D%q?nD@c7)2U|
z58WIJ9f}eIhj^w<-ns|*7!?^A8LobFcV>yrS%Wb3i1wT9q3uzEVS*8bE^1LmVMY-{
zAw!Wv;bJ$%LaVc`W<Ag3$jr*L$YRWl&58y`yodB<A~GLl&1ceNsbs#)D#*0YV#=KE
zEVKa!4Oa{BW{GCjWUXZG$x_ICk(HNe4R)0#X7y)cvOF^vv!cukZ*!qJKZGw?WLb=v
zGg@4^z@HErZ?0{Duy8Y<w+J^^vEVZ=u$VGuvS2Q0D-kFO=qKM6MGK+%(d=kmG#Y&x
zEqpXI$Nc&Q0W=3%6b-3>R&Z8`Rq$4zD^B;ZOoe@IST-LthgWb^h*m&6pdOqaVjjF6
zXphq#!X5%12oEj~$p!A2FyB#`(Yi;H5+V|U5-^sK7o$mDJQ67C9#IL&I_^4T9ebTf
zonRe|cxdF*2*YfYbJW!D`$RSS$&~kAoM~alM$0KTDW52hDbFY|lsRxG^#J9Dm+xaf
zBI9hhbNEY2BxQzDM|lc%mVTk&!4vN~Wt>t@X``f4)+kxm_}(cUP@*ubH%vA>YG{yU
zJEUUCkkio9@T%cX!)iljLsvuCZyQ7v%-zgYG9^pIGZ;k~eHm65gBcVUxft>oCm4<~
z>NE5+RvL9P&NI+3sxZ7{EMTx_WMY^OEd(oEkP?B@jG_!Rj4KR#7!?>^Fy=8>Gah3|
zWb9|aFnTg9GDgJ|W^)O1l2n#svtq|$7-O$k@+T=J#AwGNV%=iqW5Z)qV)=gCq{-aU
z)*=9wtroJ?XH;jDW;9roS=7=L)6~;cOjN;GOM|FPRFhDYP)FrF#%JK)6_Q#OEcHvd
z-Xsns#I-QD47d2VTm{=Z$6B;o9=6c5ylk;=Nof&nS!q$=(Ql1C88er&itof<#)sn1
z@g}rpE93F_B)l+w2``7w!5_i*;@$BPVEy((PXbuJ@>S0B$X&=@$fL`N%vH};&uh;S
z%q`3=%yY__$z{oA$xG=Xk~_$safUvsK7Kx0B5~^3ZiOWLFy0@370-bm!)xOo;%V?N
z@%H!>yeNJJuVAY`5X%y?kh4bWBwZ$jlFo@Fv}dc3@T4S?Fm-DuDTj1~)Jt+FMS!K?
z599<~ppUOXo@ef2_F^7=PE@W&wniQy2a;QqU6kjXGn>nr&1#(tC%)=<^;y->O4Z8G
zO6zQ#lBH{svXz0Ao|Ti8l+|UcBzvD_>1EetgJr8__2qzN&8GM-mNzW@P6S%vtc<M8
z&)y2f!jrVD?5wP;)U5)nG_7o{<gDDSjIAtkIUWi>Jky>2Cap6mHAy^aElDORD~U0w
zJIO66Jc%!9D#<XZCTUO7i#NIVF``IOvB3o9SmyN9I9e>@8>5Pt)P&Ud)D+`e#&?Vp
zjFXIGjnjwYreAqj`x<vYEWFPp$~pCN`C-<>u~No|R~-1kCec#uhlq!6rSlKNOI057
zl@>glDrI`e{HE=Vz?=0?3-{Y+Ud^=35LjAS+R~cS+S6W|yfSGqArM=MZ4%8A?Wpm`
zRT)+9sw#$V4^f7)jkpt=$6e!x%7*R_4GjeijSiI#wGJf@Ef3`ySr>}-rwk@DHNP1u
z93l=~88Yi94>cIE9eas&%^B($dNp)sXmu!asB0)}=;KiJP?M1Y*p{hMC|N0<=O*gr
z>$>6=?5g0#<(lU<;d;zX-?iVZ($&+A-Zg4o&D%M^CcvvsK=Q1lgd`7ZE7x3=-x)~(
zNj^zTJzKp{J%2sC{%pNOJ<mweZ2RJe$`5<y(Di)vm_W8bp+NpXc;MMUi9nt}RN!-z
zxFnaPWIcC1vYx$Oq+YNdHWEE@2aHS!&V;Ge_SLl2_0^2k&ehOW(rVRe<7)is*VPB$
z6sxPNW767B4UZcfH?iTn$#WB;%6n~psC40Z9#y_qysrfKx%mb8`R?=I=eZAY;Kd!S
zrm4OD;QEyyfls`j1Ws|E5<JCshyM=G9f%RHk-!l5kl+xX7{3@#b@<ir=SJN$Of<~b
z+pY^-Uw^g`B>0K{6VE5eDc(~8cew8e-r+OiH{vmZ4Dk*LfWJ%#qL0)zW;DKQtQfsL
zN*T>IzjvGaLs<N1+35Yzq0ykx(b3Y;*3snA<<VSo>ynz+hC>FYxCcfHM~S0XM&FH=
zjJAv>jV_JmjP{O3j82c%jy@lajj2ICLf%JaBJ+_I$P8rFVV)eL?r_m?->{YN;4p=7
zuCToDiLhhgV2m7I8Ri*I9~PyecE;J(#?}k}0GW%dL*ftfo>8vS%0WIr79cCj?v_0&
zyI)pXmRnX=hVQxfQSfU*MZ#|7in4;TO59!CBiwylDJ~aRhr{E_aap(;ToJjLoc&3V
zUXY$IiaUxoN<f2KLr|d=@0wx6N8lz168IqekjrY2R6b*VV;*D3Fz>K{IJdYUCcbt&
zWBlEC#oTRhac#Eiy*u0!U=wcH-2J(sxuChxxzf4Tx#YR!xm;K4s+u7~q5%u{;9TJx
zaqi08ySb9Nmbs+4rMaBB-nodm>ABju=X0@PHSkC9`|wP7KD+{+0S9OLW%FKFegMyc
z*T9QPi%YXhAD8BrR+MIRnUM0yk8%@P^^<vttsSkOl?}0~SU;@R8671Z*LY>D0ag#|
zgq6Zx#$Lo?v1(X<tai@BE@RRIhX)6A9I*OW=kasnF5?%*Eyq>I{l>M%?Z)NDJ;qJO
z&Bm2_jhT&@^_Vr8b(sxQ&!-wi=xFy!m+Pf!rW&W}8(%QiGBz>RH8vbR?^xua>znW2
z>!^EiSaaBTSYLcH*@W3NRfkrWvDc_vD^)L5H`UPiys?q7p7BLvZDZ46o$31?`o0B*
z1v_*NhjoVy#m|cyiR+196xS9vt<|YDsMV}BuGROy;IHM@zq|iNuY8YuZ&Tmdp0oYz
z<vI_}7xY^7SoMGCJ=&MhlhCi%+t-Kg8L&4lPXoti8mjeq^mz0y^wRZ3_C)rp_qO*5
z_6YVDE{V10yy*XE<l|>D(KWUb??(DU>mev!cN(A<gMo+XsUlO>o2lMw;Q3KeLjVYv
z25IUq3yMqBgESF1kOocVpbb1GYFyw4;91;JiJB#(0uKTp=Q~tVPe58vrEj6~Y6QHt
z1K=1HQw-we03n1b&}G0$MJSQQbO4aR0ZF18AbAW()~I5txq}di%HlbQw-QNY85sf8
zBMww441t$2MwMa$cy3eyW`XCNMooPccx_ZEMuY+Vb}GFB@C+vb>Bf8Dg;S+Yr_z_W
zkxndiRFQA4VkWu}bJ5h`Y<rINdkbnXlp0KL&&g{WH}V<SEu5HEadx7syYCYS4FU86
zpd9k->)V$sf+F^z|6+hd%3b?g_R045?IZ2$?4#}R_Sfyp?NjZu3Z9q0DR1nZ9hm7V
zOf3{ITq~3*%qnCACknb1h8OY`P8Av!))ek3d~r2-xAz`eW~5(7w^G&ah#}~leSdfT
z$8O26Jb&M8zkvvjuibSrm`=|npB2TgWwQ}Tjlrk$D`K8q^ft#vHck^#meQiUW<D%g
z49G}k7*6Ju_2V~8y=TS<^TPEN=>ag;x3-mYt7nGg>qn;sm)48YJ<e-?Bn2;SP`v5Y
zCQ<}Z#*WpUxEhj4_w!t?wwVu4+ny&YAfxP92E{VGUEQ*UdyQ-gQ3RW`VX-1_v-y}0
z<81}W{b*+!C+8Wv8QU3qVjq8sCvw(_*zZ@oq&WZOgLa#B3Iu8DRM+SCa7lfB?Sq0-
z;@}v|=t9-nOy|tynb4VEML)DZQklWeB+UrVEX~Nx<jfqI>78*02U^jAYf_JT*8A2N
zf(u^2<t{b!RZ-O%k2GosRgmhUM@2QxRkPKsk60^_<z9w2Dh@c?+Mno#*I~6(?w#q3
zvB#IG+9&nGE3r~9M-#9De1?5x_nqJLbiL^s?iwsD$KGwM_+<BH(Dm-P%gd64SOIH;
z_DUnWssY!magUd^3BdvyVoroh1SnxIcrafe>?BxfG{nvw7DIvm?>P{}2+{-wf-8ZS
zU_jWdQIq$wdyF*iFt13UBRCNx2vUSYgv$gT!bQR^0+xUxs1cY6{)8+&{enDq#e$;V
z5s_+lqp60zbN2U9-3E5410oOI)u&eb<Q}LP>X#Kd8TVJ0lxMlSO(pcL_f0>jcDJ5N
z>sxyeY!FqEW+OiAQ~1?<D!y;(0l3etLc+%XljEFEtxWCnT1O&`_ysH`+`_zT^X4Pk
z5-$>~h`Wf5L@Y6$h$4O^su9(}RjU0py`pc+iN?fQ;tt|-q6IOQh#<}rRfq*dCgLE`
zml#ass(0P6`&@Km&90$4kY)Yt#`>vSUkVfQoU?=MUv+ynGw3%+HqTyeTku`8FrHtn
z|7vYiwB)uvQYG=Z{_Vyw{nYfH&o1wuSByMj5uVkz=J0>eqY@~$r~5RSo^*a$0e5`O
z;$v2zba1z6_aQQ-M?;|ty*x6>y_|<bt|3HjtP3-%Yy?GSZKOu#1uAiM^B~V%Man)$
zN@pSE$B<I7NV#sL%tNHYeA&5;F!h{3wY*LeZueR`?(7<qNccKLBxPM7Rc0fyJtt6O
zqBHRBJZW}v`*IZS^cq)n$U4GUbpvDk%-8yfWb;x|Zu`Ufq-t9lEaU2@U(=aCKish{
zdDkH*UG4M3eF5mFgtL@4J0(-zS~ITx50M)JsfrtWQf2>%WZNV~-&*fkl{3i18f54i
zWPJ)v7yt5*D`264kVbjKDCs+Dt+D!lKyK7bFa}-`%z|`{lh0HK)v4-t=}+=5^BSv}
zX4y|p;RO7z7G^njeI*N2U#U~Wba_smT^4lAo9(1qmYB|F?GRi(J*+C3IZXcj0g@OX
zzcM*dmL4Eg*##k?myZmq*XI%>G^Ebx>S)UdJm_X7GgZe1sCahHPC6}%56cAJ^(95&
zSl2>l@+7-=kdOJ?S`Y7zW}I}sJoHN>)04|Pgq(hPA-qPvd~H3i8-0vf)?20QOM=aq
zKxdO-W<;ed(?*@mm~m%QO=g6r9MfzVns~(VG2eife%Y78e?$zXiw$;Fyd(GHcCM*C
zm#1Y~OB__Z#Bn8JCz|2)-wT*X6-@h^%ARHY@36KV<TrV|_{`*!cDAWAcSkx>$%fV8
z0Scbovm}<~9m6Vt*(;M8ILWmnmb>*GS9?mLpU96^{qGDxLc@Wx81Tt7%eoN}K<~g=
z65Sxrz@+py1Lo0*1joOp?41uo>(3>29wWIfGZ;&m=JJvFa7X;(3v-J)QDpb(ggUAI
zP7KLs`RMSukz6K{D2~xTv7&p?W{-cm2emh}cFQT3wbN-CHl2~)Awbq1P?5~?C%X-3
z)ZaBECE}RY!kqF<ySMR9J|yUAs?nC0se5)fPpU5q49nGL)sPl(^lMjUawNO_$z0Xx
z>#Fn}rjt@1Un`n(EDimy4B=2ZCpw18=S{KZbNTu`Xsy?ZW*pZe4*$J?X78wiiNBY~
zzZdi5n+DUnFDJus!v3L!cOl*J<RjH#b;|nP{gWq`MT}KO?oLgn;KcpIo$fk!N06DT
zL+exqNxo%Q>oi13d&<HC6fxaVHkh^B3mqDhN0)h~bJ9B{mW8MDOgkQsRjMNb<SM(1
zNWUD>>9S5Q&b?t^kS98c!Evo6%w&#q4wHSWgV)b3cCnHqmKldN0(19FLdb0H4%x-g
zK2HBDLkJ-pWa6Rnv3q^bENf&3ldVH`NpzF^$-fuy{_)eVZhtS4e=laT!ziQ!OO~s?
zQzxt6kw{Wr-ft{tno~fs$I<$y7Unp2xRceY)9U0f9hD^cWx8S6k(_C=_<+<%UMhLV
zfShD@3Q3_XB|z18k_$((7Prtvuwh-hv(OEh)LW(w+cF19{kUKEgV!NJ!uo&K{SrZU
zy;hX0{9hSDLtbzMlFA3;&{NzwdnMuk8veTZ635lQ7vM@9{!sPz68ZOH_CbF+HVI#5
zH&!>z<ePknJL7-7FtezumyD{uQK#PDg_#stK5MKolF2kVh~w}NcFLUX@>ph>zB}8k
zzPxQZleMdj%rT%QnJZ3atiB$g>`SsPiwaN&H`?I%)?&bE@SW3Sdy#Xy;&n9D()|Y#
z`bc!kw8KjEIW?1>ILunwOon7fEm@&DYF&1*JDs#`nMPcZndyXsW!m8X$`D4~p3Cp1
z@;Su>?i$;m+#x*{?@DTKif%U|W~5BkfP<Z~5#@{WBJ&^LF8QZ@djijH+?r_fBPfV@
z&aeLdf}iTyC=y%zGO={WbWo%IILV<?FRea%a8lpTUvy;SYd8AS>*BG%a%KUKve%vF
z3gLe*07n#EsQP<}{ChF`{Toe})_)<X|9@h-q6VLA(g!=2R+cc!A?u?4svB1&GB!wL
z{6AC360lD;C0UJ;6<<brPokH_i#3^<dQ1LhUgw7GNS!-UrS+Esi=_qI4&851U9@Y_
zXE$dkyb}IP_O9ItUx>c5wTl5C5o2oyw((S!gv8zCySqX<dh^nbXS8R9imGcqN-E?j
z=Lf_D7I$9CdMbZ4VmA{l`lJK$wM}v7D{t`+-=R%We^G?Ti(^v^#`!OCRfQe#)yn!)
zCyfiHaJ5by5!FhVsiVXBgSeWRj?`)u&ncGSf)!jnOUG3oMf#~j;`uMgkJ36~eUvq(
zPKXywkRO|Lg!?E#rjFF+_miuM9VtF4&Qr{_1&ic5iH<k%^lAc*{`aEDB@&%^%c|*9
zH2(M^a(P{6<+A$7)J;%`5yJl{$A7l4nhi?6RmNCWgv7w4@1?B2zDtS~`QUK)FYk~w
zW8v<hg1y*kBmGHb<D3Hbh{9g?Y7@+){BU-Pd$?1tW3{p8r2249jeFEguYa{E{iKw5
zcJS8_mR<`VBaKNV@tnM`H`99Ed`uvda<$osU&Bm#?R|`$C)H|mD!)b&dwqROStmQ*
zeAW1G4J0VSyj}k3zvT2nBZ7b%{b3xIS$}nxgb<l<i2KXCf17c1yfNnf@17np5w7j>
zE&r113yz2ZZtjP1m}mXfT~c?|2M3+My!-bVN6(vDoB!t35*A_CF5mbsIlUVZVZeR-
zVH{Rje|4ASRyE<!^Otx3M&syu!|eTE^*hq7Tjj;A|Fufxuzx1s2Hdo--+XRS664fo
za(f{BOBQKrKB=Cc(uk8xSzaT5jar&I8;C&6ceB2_`D)|CbMM%}wiTbzhf5oGhHBpy
z(7*T)X#dHRQSy!v;tOfjIWGWJWivM%jHsi$ByYU-W~9kGs>Xkz*wuBTAy2zLEv?GZ
zwKK@HePi(bOpEWv(sX#b#>__j2Z1{*8=uu8eVX*O>r*MKFY5^bu1^bEa=I6NF<(gU
zO^@*>8;ST&Y_J$p-c5QAIloIZ)!?TTuC#458LqE9+(0<L^CYZ%KG8iZ>}=QB!<xG;
z^tG)gJz)7EiEG_!bdR=u9=iQg?|Z9<6KyFMUup!vB`Ct{yDs0<Xs6web+UBBxnj*6
zzk$x?cC`CpNHiOi?Hg#w1~p_uK{3W`YzRX(I2_G}!U%%^3<J<eBpV8W03kTikPQt(
zQ6V8iHl&acm7EHpgxSyt7ziP$6mTjn5~PHq-~d7a3IvSG4Gjmha3~c5I3W~@4UI&D
z5C#QOp{cY&)cjynF@%Hx4ub%>Q@IHPz91I>!Jt4=q!5(^2BqePq^5(x01Ffv1CmkM
zgM&w@e5mwrYWB!)%D^#HEF1-7_@<2z5C;UQL_%mlBuv!@E<~mO4hjP-0!k%7AgBZw
zs)`6C0KX?gAc2r@1T{wl8t{fAs5v6g--P{^3{5SC?*tf7uoz+CA4!G2$?~nhg+a`3
z427v`00{wSzzIp!6(RhsU}01cL1l_WPz&js+(;x<SQMNM^Q~5pC~D3K1VDYO0`#}!
z-_lU?fPdp8grb5ds?eYY0Eia)t)hg!)elUF4GE)`gb;?Rz7Vy7gfP^6(BINfOAP`2
zh83n(#kZmoqE-+Biumn|0l!q$gkjWT`$i#*0t$ZzK@|dOU~T`^7o-FS$Wm+PJI%K+
z)gXSPr)u*JHfH;yIb;4|&QueI0tcwR{Zio{@=;+>03eK}YEIShM^0P*LVw3n%jyT$
zADlr$`O!qEjf2`Oel!SbQ}~_(Oc<mCrvJm}spd{K^dBbvEd{V@syY9#W2ymv%MFwz
z_@(;PJgHw$lT@4jW-7p#zyAU}FjlISehUM$qZ%aOjG~(058DHApxl9p{bpuV`=T1w
zxA1SK^uvZg9EvJ8nyT~vn+}xbpKXX*!M{Bc;h3M|sMYab!~t{qElx}fqT}s?g{Wb1
zW|n3+Gl;gkIgX0Bpr#5@#X4EzY(PE1gd`+r_y2ezi%EL9m|56kact&TYg;FA_Su?x
zb~al}adv%_8dS|i25V!h=;Mmj_EFcd@UgcLwq%!-5c3l8a&&P7*|2#zIykwBc!{%{
zSvs3zMF31iL)h8Ak>Kpb*%5*;0SpwzF0o(C)zV5tOIH53L?9&2ZiB<Qh(I8oo}Pl9
z2tj98YY0qOSQr9@L*Q@$Kq27f?SwP)5^!?k_`yLI>t^9<>w>d&c4DJ)G&6U0$BDDE
zv;D@`<qv$F+yuV~CTQX82muigm>>c|Wdxz7`~#=or27MAOWu|izl-eR?&|POU`q=K
z)&c8?b;7v;_ONg4EiFVWz$*{u>?-k1Yi;c1?|_4?gcjBt>*i|ffps<GXH#}|!?G!u
znY-Fz9li?%D82*V(m?*m>0cBY)Yb1&|EWN{%v^xP&~Fk0A`zMIBI`IiJ4mS6TDUs9
zIa}e_^qpNT#UMY&i~Wwk%9`P@5^yL?SO6*{07K}&P$CF~2ol2wg^EC-e@ObB@>@zZ
zXG>cv@Bc~4KT!UwwFX30Q~U3Wz|rwXDX6K5$U0lNQ|nVnR>Ixg)>1@R3L_0(;j#iy
zq%>3jDTNRc5R#Eb2%s@S(g-*VDUT5TuI8W9QWXUlB_}tWnUe+fU*YzLv|A|8_HX#?
z|2O2p_Mc4tsZ#z=as8*b{;3l9r-=V!UH>Vrf2sujDdPWF*FRTW-(UNn*9>}vzjwPO
z{?Tm*vn%54o}g2{^+XE__J`4dtgV}igPAwz-ssrk9I$LSS9dIRFaUUbpOyhb(x1i>
z7qqZe5N%r@EE^03hv*x!f#Dw;nD>BaIXmM(0LrEXQF5|!2J;5rVOc{lm@FKFkrtMc
z2BU3+5K@ZTSNdaDN#g%Z0Wy%cb--a=A@UBOcPWdtaJIz$K8C>{{y2p3x`XPjLda+y
ze(@!d%Y(r?^a6X!!(Anu3upQcN`GQl=~KpA>sWCkZ)={&>C~LmjXN0_)K~w+cVcRI
zG~h$~osn0<ZnL_FE!NftZVu;gpN;y=aZfGCgZ+`=t|+<_j}Et@LY^hQrQLtT#EX&F
z^jf}Sh6vs4X8}t4JMDX?Cp4Z$A9Q(^aL|Z>j5s~VFWW6`UEd*BV{y@f*P^btlvcEu
z#<zIaM*NDrlh}yJn{(Gs70c9VCJB}E&a)lcfA?V6-JS!F4X!Y7@7^Pnalq*A6(+Is
zbSC$HRlXNwC-e(z&$*6I<1ap*`6Zwu<LJk`EGO?ClJ3~q*0J5p<~rIYm@eepVUY})
z>Wn=;8T89$zw9>KYYsiY0o@-A-8}}~cKP--9>pifSLYb4%;>bB^fbkLRf-Sr74Nq%
zb~1W_Yp#wwkZraD-4?UMyI(0dbXtUONNjKA;<HqOEOT7c-6p|nhn6xu@*1WMg5L_?
z;PYZ2)5|UGfIgOs-qPB<T(MTP`=P*85a8#x4;bL1Q7GV3qkj8<>4$F+o73+&7<Gb!
z`uPJ6j@XPtQ7!t<bVv-Cc={P9Or5&;GaU+;@FpA_OkDg-2WIXz;Sj>Wz<=V0gm1>7
zguqz+Cpt8GlYA&)7#O$znGOvV+N2vA0pBDu8Y#RvEoKWk>OAMqc?bz@!eOA)>DWKZ
zf`Nf4qn~kLs&Nwz2__bQrbEFu<IvOzouBf+pf}M8LBT}UPjo_vO|rn?aOlrzVQ>WI
z=dyyqQJdt0fr-|i^MHZ*vQ2dfg(A?KZ5IKi%6_(IV5ggLU}pMfIwW)p9Bd05d<z_6
z3mkF_+!pN()bD0lw$KClv&=9IX0xq9p<vEw6F<-{H{-U@1GR-7s4etB{VX#KBedC0
zfh=3-0ow0oS$@_HSQ(gJ+(ZX#d^2tfJwTh@Ot*y|=q>64{j+XVS+>vvJQFwPv4tL(
zE%X4Bv76F@_OThag&vqK^uYWqGYpu<&+QH9f!RV2%ocipN#sqk2yLMUcqVS9+d>ba
zE%XrDLJ!dPH}m^hH=qY~O8n>c3nth%<F?QPw3$tGV6uBNZVNqxx6lK;dp4)tLJ#3B
z^bp=c4=`cBncrqTz;ekZI<P#l1#Yt*Ft8-^a~@#XYzy3GJz!vYWOLfhdcdHY^?-r*
z!lty~UAq~#g&wdi^nh)l2W$&Hz<X<R9$V-^U3&S+u3%v0Ycp;OJ-~Z#6CHdDJwRVz
zGu;+?fd0#7x-IkoOIn-hw$KB<g&v?UuqiEA6xxj2LJ!cd`!gMQ=4|epL1EzC{bxET
zz-^(&R`2soHV)gO4+0ZH{`~F%1`Y?$N${ljN1qkoP~e&KGfwE|ek^DRNX$=t5Ev4L
zp)R}qi60UyZvWJG1Z(HQpbh?s4vt1c!SnQI90s)WpKuricozSRLxT3U3HNh<2#$fG
zK>7Wd4&a3T@D9Man%O#FU1|4&rKsNqjfnr>M~dIaf@ZF`@52u;Q4d22(e6KU2HclQ
qyZ^_S1WLRA|B7^w^R8GAw(mkgsH16ZoFfQQ%Wae3V150E;Qt?2^qs%}

literal 0
HcmV?d00001

diff --git a/python/output0.m b/python/output0.m
new file mode 100644
index 00000000..86d444f2
--- /dev/null
+++ b/python/output0.m
@@ -0,0 +1,45 @@
+PVB[0,0,2*MH^2-S34-T-U,Sqrt[MT^2],Sqrt[MT^2]]
+PVB[0,0,MH^2-S-T24-U,Sqrt[MT^2],Sqrt[MT^2]]
+PVB[0,0,MH^2-S34-T14-T24,Sqrt[MT^2],Sqrt[MT^2]]
+PVB[0,0,S34,Sqrt[MT^2],Sqrt[MT^2]]
+PVB[0,0,T,Sqrt[MT^2],Sqrt[MT^2]]
+PVB[0,0,T24,Sqrt[MT^2],Sqrt[MT^2]]
+PVB[0,0,U,Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,0,0,U,MH^2,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,0,MH^2,2*MH^2-S34-T-U,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,0,MH^2,MH^2-S-T24-U,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,0,MH^2,MH^2-S34-T14-T24,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,0,MH^2,S34,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,0,MH^2,T,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,0,MH^2,T24,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,1,0,U,MH^2,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,1,MH^2,MH^2-S-T24-U,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,1,MH^2,MH^2-S34-T14-T24,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,1,MH^2,T24,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,2,0,U,MH^2,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,1,0,MH^2,2*MH^2-S34-T-U,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,1,0,MH^2,MH^2-S-T24-U,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,1,0,MH^2,MH^2-S34-T14-T24,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,1,0,MH^2,S34,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,1,0,MH^2,T,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,1,0,MH^2,T24,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,1,1,0,U,MH^2,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,1,1,MH^2,2*MH^2-S34-T-U,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,1,1,MH^2,MH^2-S-T24-U,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,1,1,MH^2,MH^2-S34-T14-T24,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,1,1,MH^2,S34,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,1,1,MH^2,T,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,1,1,MH^2,T24,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,2,0,MH^2,2*MH^2-S34-T-U,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,2,0,MH^2,MH^2-S-T24-U,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,2,0,MH^2,MH^2-S34-T14-T24,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,2,0,MH^2,S34,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,2,0,MH^2,T,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,2,0,MH^2,T24,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[1,0,0,0,U,MH^2,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[1,0,0,MH^2,2*MH^2-S34-T-U,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[1,0,0,MH^2,MH^2-S-T24-U,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[1,0,0,MH^2,MH^2-S34-T14-T24,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[1,0,0,MH^2,S34,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[1,0,0,MH^2,T,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[1,0,0,MH^2,T24,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
diff --git a/python/output1.m b/python/output1.m
new file mode 100644
index 00000000..73bf1c42
--- /dev/null
+++ b/python/output1.m
@@ -0,0 +1,125 @@
+PVC[0,0,0,2*MH^2-S34-T-U,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,0,S34,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,0,S34,S,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,0,U,0,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,0,U,T14,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,1,2*MH^2-S34-T-U,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,1,S34,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,1,S34,S,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,1,U,0,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,1,U,T14,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,1,0,2*MH^2-S34-T-U,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,1,0,S34,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,1,0,S34,S,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,1,0,U,0,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,1,0,U,T14,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,0,0,U,0,2*MH^2-S34-T-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,0,0,U,T14,MH^2-S-T24-U,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,0,MH^2,2*MH^2-S34-T-U,0,MH^2-S34-T14-T24,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,0,MH^2,S34,0,MH^2-S34-T14-T24,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,0,MH^2,S34,S,2*MH^2-S34-T-U,0,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,1,0,U,0,2*MH^2-S34-T-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,1,0,U,T14,MH^2-S-T24-U,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,1,MH^2,2*MH^2-S34-T-U,0,MH^2-S34-T14-T24,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,1,MH^2,S34,0,MH^2-S34-T14-T24,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,1,MH^2,S34,S,2*MH^2-S34-T-U,0,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,2,0,U,0,2*MH^2-S34-T-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,2,0,U,T14,MH^2-S-T24-U,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,2,MH^2,2*MH^2-S34-T-U,0,MH^2-S34-T14-T24,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,2,MH^2,S34,0,MH^2-S34-T14-T24,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,2,MH^2,S34,S,2*MH^2-S34-T-U,0,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,3,0,U,0,2*MH^2-S34-T-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,3,0,U,T14,MH^2-S-T24-U,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,3,MH^2,2*MH^2-S34-T-U,0,MH^2-S34-T14-T24,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,3,MH^2,S34,0,MH^2-S34-T14-T24,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,3,MH^2,S34,S,2*MH^2-S34-T-U,0,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,0,0,U,0,2*MH^2-S34-T-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,0,0,U,T14,MH^2-S-T24-U,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,0,MH^2,2*MH^2-S34-T-U,0,MH^2-S34-T14-T24,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,0,MH^2,S34,0,MH^2-S34-T14-T24,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,0,MH^2,S34,S,2*MH^2-S34-T-U,0,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,1,0,U,0,2*MH^2-S34-T-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,1,0,U,T14,MH^2-S-T24-U,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,1,MH^2,2*MH^2-S34-T-U,0,MH^2-S34-T14-T24,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,1,MH^2,S34,0,MH^2-S34-T14-T24,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,1,MH^2,S34,S,2*MH^2-S34-T-U,0,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,2,0,U,0,2*MH^2-S34-T-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,2,0,U,T14,MH^2-S-T24-U,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,2,MH^2,2*MH^2-S34-T-U,0,MH^2-S34-T14-T24,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,2,MH^2,S34,0,MH^2-S34-T14-T24,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,2,MH^2,S34,S,2*MH^2-S34-T-U,0,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,2,0,0,U,0,2*MH^2-S34-T-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,2,0,0,U,T14,MH^2-S-T24-U,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,2,1,0,U,0,2*MH^2-S34-T-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,2,1,0,U,T14,MH^2-S-T24-U,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,2,1,MH^2,2*MH^2-S34-T-U,0,MH^2-S34-T14-T24,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,2,1,MH^2,S34,0,MH^2-S34-T14-T24,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,2,1,MH^2,S34,S,2*MH^2-S34-T-U,0,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,3,0,0,U,0,2*MH^2-S34-T-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,3,0,0,U,T14,MH^2-S-T24-U,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,0,0,U,0,2*MH^2-S34-T-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,0,0,U,T14,MH^2-S-T24-U,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,0,MH^2,2*MH^2-S34-T-U,0,MH^2-S34-T14-T24,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,0,MH^2,S34,0,MH^2-S34-T14-T24,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,0,MH^2,S34,S,2*MH^2-S34-T-U,0,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,1,0,U,0,2*MH^2-S34-T-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,1,0,U,T14,MH^2-S-T24-U,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,1,MH^2,2*MH^2-S34-T-U,0,MH^2-S34-T14-T24,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,1,MH^2,S34,0,MH^2-S34-T14-T24,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,1,MH^2,S34,S,2*MH^2-S34-T-U,0,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,2,0,U,0,2*MH^2-S34-T-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,2,0,U,T14,MH^2-S-T24-U,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,2,MH^2,2*MH^2-S34-T-U,0,MH^2-S34-T14-T24,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,2,MH^2,S34,0,MH^2-S34-T14-T24,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,2,MH^2,S34,S,2*MH^2-S34-T-U,0,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,1,0,0,U,0,2*MH^2-S34-T-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,1,0,0,U,T14,MH^2-S-T24-U,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,1,0,MH^2,2*MH^2-S34-T-U,0,MH^2-S34-T14-T24,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,1,0,MH^2,S34,0,MH^2-S34-T14-T24,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,1,0,MH^2,S34,S,2*MH^2-S34-T-U,0,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,1,1,0,U,0,2*MH^2-S34-T-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,1,1,0,U,T14,MH^2-S-T24-U,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,1,1,MH^2,2*MH^2-S34-T-U,0,MH^2-S34-T14-T24,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,1,1,MH^2,S34,0,MH^2-S34-T14-T24,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,1,1,MH^2,S34,S,2*MH^2-S34-T-U,0,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,2,0,0,U,0,2*MH^2-S34-T-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,2,0,0,U,T14,MH^2-S-T24-U,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,2,0,MH^2,2*MH^2-S34-T-U,0,MH^2-S34-T14-T24,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,2,0,MH^2,S34,0,MH^2-S34-T14-T24,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,2,0,MH^2,S34,S,2*MH^2-S34-T-U,0,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,0,0,MH^2,2*MH^2-S34-T-U,0,MH^2-S34-T14-T24,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,0,0,MH^2,S34,0,MH^2-S34-T14-T24,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,0,0,MH^2,S34,S,2*MH^2-S34-T-U,0,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,0,1,0,U,0,2*MH^2-S34-T-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,0,1,0,U,T14,MH^2-S-T24-U,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,0,1,MH^2,2*MH^2-S34-T-U,0,MH^2-S34-T14-T24,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,0,1,MH^2,S34,0,MH^2-S34-T14-T24,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,0,1,MH^2,S34,S,2*MH^2-S34-T-U,0,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,1,0,0,U,0,2*MH^2-S34-T-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,1,0,0,U,T14,MH^2-S-T24-U,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,1,0,MH^2,2*MH^2-S34-T-U,0,MH^2-S34-T14-T24,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,1,0,MH^2,S34,0,MH^2-S34-T14-T24,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,1,0,MH^2,S34,S,2*MH^2-S34-T-U,0,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,3,0,0,MH^2,2*MH^2-S34-T-U,0,MH^2-S34-T14-T24,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,3,0,0,MH^2,S34,0,MH^2-S34-T14-T24,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,3,0,0,MH^2,S34,S,2*MH^2-S34-T-U,0,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,0,0,0,U,0,2*MH^2-S34-T-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,0,0,0,U,T14,MH^2-S-T24-U,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,0,0,MH^2,2*MH^2-S34-T-U,0,MH^2-S34-T14-T24,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,0,0,MH^2,S34,0,MH^2-S34-T14-T24,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,0,0,MH^2,S34,S,2*MH^2-S34-T-U,0,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,0,1,0,U,0,2*MH^2-S34-T-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,0,1,0,U,T14,MH^2-S-T24-U,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,0,1,MH^2,2*MH^2-S34-T-U,0,MH^2-S34-T14-T24,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,0,1,MH^2,S34,0,MH^2-S34-T14-T24,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,0,1,MH^2,S34,S,2*MH^2-S34-T-U,0,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,1,0,0,U,0,2*MH^2-S34-T-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,1,0,0,U,T14,MH^2-S-T24-U,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,1,0,MH^2,2*MH^2-S34-T-U,0,MH^2-S34-T14-T24,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,1,0,MH^2,S34,0,MH^2-S34-T14-T24,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,1,0,MH^2,S34,S,2*MH^2-S34-T-U,0,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,1,0,0,0,U,0,2*MH^2-S34-T-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,1,0,0,0,U,T14,MH^2-S-T24-U,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,1,0,0,MH^2,2*MH^2-S34-T-U,0,MH^2-S34-T14-T24,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,1,0,0,MH^2,S34,0,MH^2-S34-T14-T24,0,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,1,0,0,MH^2,S34,S,2*MH^2-S34-T-U,0,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
diff --git a/python/output2.m b/python/output2.m
new file mode 100644
index 00000000..efa9b97d
--- /dev/null
+++ b/python/output2.m
@@ -0,0 +1,121 @@
+PVC[0,0,0,0,T24,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,0,MH^2,T24,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,0,MH^2-S-T24-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,0,T24,0,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,0,U,0,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,1,0,T24,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,1,MH^2,T24,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,1,MH^2-S-T24-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,1,T24,0,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,1,U,0,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,1,0,0,T24,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,1,0,MH^2,T24,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,1,0,MH^2-S-T24-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,1,0,T24,0,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,1,0,U,0,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,0,0,MH^2,T24,0,2*MH^2-S34-T-U,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,0,0,MH^2-S-T24-U,MH^2,2*MH^2-S34-T-U,0,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,0,0,U,0,2*MH^2-S34-T-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,0,MH^2,0,T24,0,2*MH^2-S34-T-U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,0,MH^2,T24,0,0,MH^2-S-T-T14,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,1,0,MH^2,T24,0,2*MH^2-S34-T-U,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,1,0,MH^2-S-T24-U,MH^2,2*MH^2-S34-T-U,0,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,1,0,U,0,2*MH^2-S34-T-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,1,MH^2,0,T24,0,2*MH^2-S34-T-U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,1,MH^2,T24,0,0,MH^2-S-T-T14,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,2,0,MH^2-S-T24-U,MH^2,2*MH^2-S34-T-U,0,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,2,0,U,0,2*MH^2-S34-T-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,3,0,MH^2-S-T24-U,MH^2,2*MH^2-S34-T-U,0,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,3,0,U,0,2*MH^2-S34-T-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,0,0,MH^2,T24,0,2*MH^2-S34-T-U,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,0,0,MH^2-S-T24-U,MH^2,2*MH^2-S34-T-U,0,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,0,0,U,0,2*MH^2-S34-T-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,0,MH^2,0,T24,0,2*MH^2-S34-T-U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,0,MH^2,T24,0,0,MH^2-S-T-T14,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,1,0,MH^2,T24,0,2*MH^2-S34-T-U,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,1,0,MH^2-S-T24-U,MH^2,2*MH^2-S34-T-U,0,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,1,0,U,0,2*MH^2-S34-T-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,1,MH^2,0,T24,0,2*MH^2-S34-T-U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,1,MH^2,T24,0,0,MH^2-S-T-T14,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,2,0,MH^2,T24,0,2*MH^2-S34-T-U,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,2,0,MH^2-S-T24-U,MH^2,2*MH^2-S34-T-U,0,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,2,0,U,0,2*MH^2-S34-T-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,2,MH^2,0,T24,0,2*MH^2-S34-T-U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,2,MH^2,T24,0,0,MH^2-S-T-T14,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,2,0,0,MH^2,T24,0,2*MH^2-S34-T-U,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,2,0,0,U,0,2*MH^2-S34-T-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,2,0,MH^2,0,T24,0,2*MH^2-S34-T-U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,2,0,MH^2,T24,0,0,MH^2-S-T-T14,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,2,1,0,MH^2,T24,0,2*MH^2-S34-T-U,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,2,1,0,MH^2-S-T24-U,MH^2,2*MH^2-S34-T-U,0,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,2,1,0,U,0,2*MH^2-S34-T-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,2,1,MH^2,0,T24,0,2*MH^2-S34-T-U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,2,1,MH^2,T24,0,0,MH^2-S-T-T14,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,3,0,0,MH^2,T24,0,2*MH^2-S34-T-U,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,3,0,0,U,0,2*MH^2-S34-T-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,3,0,MH^2,0,T24,0,2*MH^2-S34-T-U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,3,0,MH^2,T24,0,0,MH^2-S-T-T14,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,0,0,MH^2,T24,0,2*MH^2-S34-T-U,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,0,0,MH^2-S-T24-U,MH^2,2*MH^2-S34-T-U,0,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,0,0,U,0,2*MH^2-S34-T-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,0,MH^2,0,T24,0,2*MH^2-S34-T-U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,0,MH^2,T24,0,0,MH^2-S-T-T14,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,1,0,MH^2,T24,0,2*MH^2-S34-T-U,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,1,0,MH^2-S-T24-U,MH^2,2*MH^2-S34-T-U,0,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,1,0,U,0,2*MH^2-S34-T-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,1,MH^2,0,T24,0,2*MH^2-S34-T-U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,1,MH^2,T24,0,0,MH^2-S-T-T14,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,2,0,MH^2,T24,0,2*MH^2-S34-T-U,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,2,0,MH^2-S-T24-U,MH^2,2*MH^2-S34-T-U,0,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,2,0,U,0,2*MH^2-S34-T-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,2,MH^2,0,T24,0,2*MH^2-S34-T-U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,2,MH^2,T24,0,0,MH^2-S-T-T14,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,1,0,0,MH^2,T24,0,2*MH^2-S34-T-U,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,1,0,0,MH^2-S-T24-U,MH^2,2*MH^2-S34-T-U,0,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,1,0,0,U,0,2*MH^2-S34-T-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,1,0,MH^2,0,T24,0,2*MH^2-S34-T-U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,1,0,MH^2,T24,0,0,MH^2-S-T-T14,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,1,1,0,MH^2,T24,0,2*MH^2-S34-T-U,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,1,1,0,MH^2-S-T24-U,MH^2,2*MH^2-S34-T-U,0,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,1,1,0,U,0,2*MH^2-S34-T-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,1,1,MH^2,0,T24,0,2*MH^2-S34-T-U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,1,1,MH^2,T24,0,0,MH^2-S-T-T14,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,2,0,0,MH^2,T24,0,2*MH^2-S34-T-U,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,2,0,0,MH^2-S-T24-U,MH^2,2*MH^2-S34-T-U,0,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,2,0,0,U,0,2*MH^2-S34-T-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,2,0,MH^2,0,T24,0,2*MH^2-S34-T-U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,2,0,MH^2,T24,0,0,MH^2-S-T-T14,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,0,0,MH^2,0,T24,0,2*MH^2-S34-T-U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,0,0,MH^2,T24,0,0,MH^2-S-T-T14,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,0,1,0,MH^2,T24,0,2*MH^2-S34-T-U,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,0,1,0,MH^2-S-T24-U,MH^2,2*MH^2-S34-T-U,0,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,0,1,0,U,0,2*MH^2-S34-T-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,0,1,MH^2,0,T24,0,2*MH^2-S34-T-U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,0,1,MH^2,T24,0,0,MH^2-S-T-T14,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,1,0,0,MH^2,T24,0,2*MH^2-S34-T-U,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,1,0,0,MH^2-S-T24-U,MH^2,2*MH^2-S34-T-U,0,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,1,0,0,U,0,2*MH^2-S34-T-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,1,0,MH^2,0,T24,0,2*MH^2-S34-T-U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,1,0,MH^2,T24,0,0,MH^2-S-T-T14,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,3,0,0,MH^2,0,T24,0,2*MH^2-S34-T-U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,3,0,0,MH^2,T24,0,0,MH^2-S-T-T14,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,0,0,0,MH^2,T24,0,2*MH^2-S34-T-U,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,0,0,0,MH^2-S-T24-U,MH^2,2*MH^2-S34-T-U,0,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,0,0,0,U,0,2*MH^2-S34-T-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,0,0,MH^2,0,T24,0,2*MH^2-S34-T-U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,0,0,MH^2,T24,0,0,MH^2-S-T-T14,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,0,1,0,MH^2,T24,0,2*MH^2-S34-T-U,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,0,1,0,MH^2-S-T24-U,MH^2,2*MH^2-S34-T-U,0,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,0,1,0,U,0,2*MH^2-S34-T-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,0,1,MH^2,0,T24,0,2*MH^2-S34-T-U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,0,1,MH^2,T24,0,0,MH^2-S-T-T14,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,1,0,0,MH^2,T24,0,2*MH^2-S34-T-U,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,1,0,0,MH^2-S-T24-U,MH^2,2*MH^2-S34-T-U,0,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,1,0,0,U,0,2*MH^2-S34-T-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,1,0,MH^2,0,T24,0,2*MH^2-S34-T-U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,1,0,MH^2,T24,0,0,MH^2-S-T-T14,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,1,0,0,0,MH^2,T24,0,2*MH^2-S34-T-U,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,1,0,0,0,MH^2-S-T24-U,MH^2,2*MH^2-S34-T-U,0,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,1,0,0,0,U,0,2*MH^2-S34-T-U,MH^2,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,1,0,0,MH^2,0,T24,0,2*MH^2-S34-T-U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,1,0,0,MH^2,T24,0,0,MH^2-S-T-T14,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
diff --git a/python/output3.m b/python/output3.m
new file mode 100644
index 00000000..27f41cb9
--- /dev/null
+++ b/python/output3.m
@@ -0,0 +1,123 @@
+PVC[0,0,0,0,MH^2-S-T24-U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,0,MH^2-S-T24-U,0,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,0,T24,MH^2,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,0,U,0,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,0,U,MH^2-S-T-T14,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,1,0,MH^2-S-T24-U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,1,MH^2-S-T24-U,0,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,1,T24,MH^2,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,1,U,0,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,1,U,MH^2-S-T-T14,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,1,0,0,MH^2-S-T24-U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,1,0,MH^2-S-T24-U,0,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,1,0,T24,MH^2,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,1,0,U,0,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,1,0,U,MH^2-S-T-T14,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,0,0,T24,MH^2,S34,0,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,0,0,U,0,S34,MH^2,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,0,0,U,MH^2-S-T-T14,T24,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,0,MH^2,0,MH^2-S-T24-U,0,S34,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,0,MH^2,MH^2-S-T24-U,0,0,T14,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,1,0,T24,MH^2,S34,0,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,1,0,U,0,S34,MH^2,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,1,0,U,MH^2-S-T-T14,T24,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,1,MH^2,0,MH^2-S-T24-U,0,S34,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,1,MH^2,MH^2-S-T24-U,0,0,T14,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,2,0,T24,MH^2,S34,0,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,2,0,U,0,S34,MH^2,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,2,0,U,MH^2-S-T-T14,T24,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,3,0,T24,MH^2,S34,0,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,3,0,U,0,S34,MH^2,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,3,0,U,MH^2-S-T-T14,T24,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,0,0,T24,MH^2,S34,0,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,0,0,U,0,S34,MH^2,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,0,0,U,MH^2-S-T-T14,T24,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,0,MH^2,0,MH^2-S-T24-U,0,S34,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,0,MH^2,MH^2-S-T24-U,0,0,T14,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,1,0,T24,MH^2,S34,0,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,1,0,U,0,S34,MH^2,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,1,0,U,MH^2-S-T-T14,T24,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,1,MH^2,0,MH^2-S-T24-U,0,S34,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,1,MH^2,MH^2-S-T24-U,0,0,T14,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,2,0,T24,MH^2,S34,0,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,2,0,U,0,S34,MH^2,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,2,0,U,MH^2-S-T-T14,T24,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,2,MH^2,0,MH^2-S-T24-U,0,S34,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,2,MH^2,MH^2-S-T24-U,0,0,T14,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,2,0,0,U,0,S34,MH^2,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,2,0,0,U,MH^2-S-T-T14,T24,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,2,0,MH^2,0,MH^2-S-T24-U,0,S34,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,2,0,MH^2,MH^2-S-T24-U,0,0,T14,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,2,1,0,T24,MH^2,S34,0,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,2,1,0,U,0,S34,MH^2,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,2,1,0,U,MH^2-S-T-T14,T24,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,2,1,MH^2,0,MH^2-S-T24-U,0,S34,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,2,1,MH^2,MH^2-S-T24-U,0,0,T14,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,3,0,0,U,0,S34,MH^2,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,3,0,0,U,MH^2-S-T-T14,T24,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,3,0,MH^2,0,MH^2-S-T24-U,0,S34,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,3,0,MH^2,MH^2-S-T24-U,0,0,T14,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,0,0,T24,MH^2,S34,0,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,0,0,U,0,S34,MH^2,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,0,0,U,MH^2-S-T-T14,T24,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,0,MH^2,0,MH^2-S-T24-U,0,S34,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,0,MH^2,MH^2-S-T24-U,0,0,T14,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,1,0,T24,MH^2,S34,0,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,1,0,U,0,S34,MH^2,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,1,0,U,MH^2-S-T-T14,T24,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,1,MH^2,0,MH^2-S-T24-U,0,S34,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,1,MH^2,MH^2-S-T24-U,0,0,T14,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,2,0,T24,MH^2,S34,0,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,2,0,U,0,S34,MH^2,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,2,0,U,MH^2-S-T-T14,T24,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,2,MH^2,0,MH^2-S-T24-U,0,S34,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,2,MH^2,MH^2-S-T24-U,0,0,T14,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,1,0,0,T24,MH^2,S34,0,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,1,0,0,U,0,S34,MH^2,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,1,0,0,U,MH^2-S-T-T14,T24,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,1,0,MH^2,0,MH^2-S-T24-U,0,S34,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,1,0,MH^2,MH^2-S-T24-U,0,0,T14,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,1,1,0,T24,MH^2,S34,0,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,1,1,0,U,0,S34,MH^2,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,1,1,0,U,MH^2-S-T-T14,T24,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,1,1,MH^2,0,MH^2-S-T24-U,0,S34,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,1,1,MH^2,MH^2-S-T24-U,0,0,T14,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,2,0,0,T24,MH^2,S34,0,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,2,0,0,U,0,S34,MH^2,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,2,0,0,U,MH^2-S-T-T14,T24,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,2,0,MH^2,0,MH^2-S-T24-U,0,S34,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,2,0,MH^2,MH^2-S-T24-U,0,0,T14,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,0,0,MH^2,0,MH^2-S-T24-U,0,S34,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,0,0,MH^2,MH^2-S-T24-U,0,0,T14,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,0,1,0,T24,MH^2,S34,0,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,0,1,0,U,0,S34,MH^2,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,0,1,0,U,MH^2-S-T-T14,T24,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,0,1,MH^2,0,MH^2-S-T24-U,0,S34,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,0,1,MH^2,MH^2-S-T24-U,0,0,T14,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,1,0,0,T24,MH^2,S34,0,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,1,0,0,U,0,S34,MH^2,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,1,0,0,U,MH^2-S-T-T14,T24,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,1,0,MH^2,0,MH^2-S-T24-U,0,S34,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,1,0,MH^2,MH^2-S-T24-U,0,0,T14,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,3,0,0,MH^2,0,MH^2-S-T24-U,0,S34,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,3,0,0,MH^2,MH^2-S-T24-U,0,0,T14,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,0,0,0,T24,MH^2,S34,0,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,0,0,0,U,0,S34,MH^2,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,0,0,0,U,MH^2-S-T-T14,T24,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,0,0,MH^2,0,MH^2-S-T24-U,0,S34,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,0,0,MH^2,MH^2-S-T24-U,0,0,T14,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,0,1,0,T24,MH^2,S34,0,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,0,1,0,U,0,S34,MH^2,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,0,1,0,U,MH^2-S-T-T14,T24,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,0,1,MH^2,0,MH^2-S-T24-U,0,S34,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,0,1,MH^2,MH^2-S-T24-U,0,0,T14,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,1,0,0,T24,MH^2,S34,0,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,1,0,0,U,0,S34,MH^2,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,1,0,0,U,MH^2-S-T-T14,T24,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,1,0,MH^2,0,MH^2-S-T24-U,0,S34,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,1,0,MH^2,MH^2-S-T24-U,0,0,T14,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,1,0,0,0,T24,MH^2,S34,0,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,1,0,0,0,U,0,S34,MH^2,MH^2-S-T-T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,1,0,0,0,U,MH^2-S-T-T14,T24,MH^2,0,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,1,0,0,MH^2,0,MH^2-S-T24-U,0,S34,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,1,0,0,MH^2,MH^2-S-T24-U,0,0,T14,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
diff --git a/python/output4.m b/python/output4.m
new file mode 100644
index 00000000..071530ff
--- /dev/null
+++ b/python/output4.m
@@ -0,0 +1,119 @@
+PVC[0,0,0,0,MH^2-S-T24-U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,0,0,MH^2-S34-T14-T24,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,0,MH^2,MH^2-S-T24-U,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,0,MH^2,MH^2-S34-T14-T24,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,0,MH^2-S34-T14-T24,MH^2,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,1,0,MH^2-S-T24-U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,1,0,MH^2-S34-T14-T24,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,1,MH^2,MH^2-S-T24-U,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,1,MH^2,MH^2-S34-T14-T24,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,0,1,MH^2-S34-T14-T24,MH^2,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,1,0,0,MH^2-S-T24-U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,1,0,0,MH^2-S34-T14-T24,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,1,0,MH^2,MH^2-S-T24-U,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,1,0,MH^2,MH^2-S34-T14-T24,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVC[0,1,0,MH^2-S34-T14-T24,MH^2,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,0,0,MH^2,MH^2-S-T24-U,0,S34,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,0,0,MH^2,MH^2-S34-T14-T24,0,U,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,0,0,MH^2-S34-T14-T24,MH^2,0,T,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,0,MH^2,0,MH^2-S-T24-U,0,S34,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,0,MH^2,0,MH^2-S34-T14-T24,0,U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,1,0,MH^2,MH^2-S-T24-U,0,S34,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,1,0,MH^2,MH^2-S34-T14-T24,0,U,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,1,0,MH^2-S34-T14-T24,MH^2,0,T,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,1,MH^2,0,MH^2-S-T24-U,0,S34,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,0,1,MH^2,0,MH^2-S34-T14-T24,0,U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,0,0,MH^2,MH^2-S-T24-U,0,S34,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,0,0,MH^2,MH^2-S34-T14-T24,0,U,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,0,0,MH^2-S34-T14-T24,MH^2,0,T,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,0,MH^2,0,MH^2-S-T24-U,0,S34,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,0,MH^2,0,MH^2-S34-T14-T24,0,U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,1,0,MH^2,MH^2-S-T24-U,0,S34,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,1,0,MH^2,MH^2-S34-T14-T24,0,U,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,1,0,MH^2-S34-T14-T24,MH^2,0,T,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,1,MH^2,0,MH^2-S-T24-U,0,S34,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,1,MH^2,0,MH^2-S34-T14-T24,0,U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,2,0,MH^2,MH^2-S-T24-U,0,S34,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,2,0,MH^2,MH^2-S34-T14-T24,0,U,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,2,0,MH^2-S34-T14-T24,MH^2,0,T,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,2,MH^2,0,MH^2-S-T24-U,0,S34,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,1,2,MH^2,0,MH^2-S34-T14-T24,0,U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,2,0,0,MH^2,MH^2-S-T24-U,0,S34,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,2,0,0,MH^2,MH^2-S34-T14-T24,0,U,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,2,0,0,MH^2-S34-T14-T24,MH^2,0,T,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,2,0,MH^2,0,MH^2-S-T24-U,0,S34,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,2,0,MH^2,0,MH^2-S34-T14-T24,0,U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,2,1,0,MH^2,MH^2-S-T24-U,0,S34,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,2,1,0,MH^2,MH^2-S34-T14-T24,0,U,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,2,1,0,MH^2-S34-T14-T24,MH^2,0,T,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,2,1,MH^2,0,MH^2-S-T24-U,0,S34,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,2,1,MH^2,0,MH^2-S34-T14-T24,0,U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,3,0,0,MH^2,MH^2-S-T24-U,0,S34,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,3,0,0,MH^2,MH^2-S34-T14-T24,0,U,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,3,0,0,MH^2-S34-T14-T24,MH^2,0,T,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,3,0,MH^2,0,MH^2-S-T24-U,0,S34,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,0,3,0,MH^2,0,MH^2-S34-T14-T24,0,U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,0,0,MH^2,MH^2-S-T24-U,0,S34,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,0,0,MH^2,MH^2-S34-T14-T24,0,U,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,0,0,MH^2-S34-T14-T24,MH^2,0,T,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,0,MH^2,0,MH^2-S-T24-U,0,S34,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,0,MH^2,0,MH^2-S34-T14-T24,0,U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,1,0,MH^2,MH^2-S-T24-U,0,S34,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,1,0,MH^2,MH^2-S34-T14-T24,0,U,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,1,0,MH^2-S34-T14-T24,MH^2,0,T,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,1,MH^2,0,MH^2-S-T24-U,0,S34,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,1,MH^2,0,MH^2-S34-T14-T24,0,U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,2,0,MH^2,MH^2-S-T24-U,0,S34,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,2,0,MH^2,MH^2-S34-T14-T24,0,U,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,2,0,MH^2-S34-T14-T24,MH^2,0,T,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,2,MH^2,0,MH^2-S-T24-U,0,S34,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,0,2,MH^2,0,MH^2-S34-T14-T24,0,U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,1,0,0,MH^2,MH^2-S-T24-U,0,S34,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,1,0,0,MH^2,MH^2-S34-T14-T24,0,U,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,1,0,0,MH^2-S34-T14-T24,MH^2,0,T,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,1,0,MH^2,0,MH^2-S-T24-U,0,S34,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,1,0,MH^2,0,MH^2-S34-T14-T24,0,U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,1,1,0,MH^2,MH^2-S-T24-U,0,S34,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,1,1,0,MH^2,MH^2-S34-T14-T24,0,U,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,1,1,0,MH^2-S34-T14-T24,MH^2,0,T,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,1,1,MH^2,0,MH^2-S-T24-U,0,S34,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,1,1,MH^2,0,MH^2-S34-T14-T24,0,U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,2,0,0,MH^2,MH^2-S-T24-U,0,S34,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,2,0,0,MH^2,MH^2-S34-T14-T24,0,U,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,2,0,0,MH^2-S34-T14-T24,MH^2,0,T,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,2,0,MH^2,0,MH^2-S-T24-U,0,S34,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,1,2,0,MH^2,0,MH^2-S34-T14-T24,0,U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,0,0,MH^2,0,MH^2-S-T24-U,0,S34,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,0,0,MH^2,0,MH^2-S34-T14-T24,0,U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,0,1,0,MH^2,MH^2-S-T24-U,0,S34,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,0,1,0,MH^2,MH^2-S34-T14-T24,0,U,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,0,1,0,MH^2-S34-T14-T24,MH^2,0,T,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,0,1,MH^2,0,MH^2-S-T24-U,0,S34,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,0,1,MH^2,0,MH^2-S34-T14-T24,0,U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,1,0,0,MH^2,MH^2-S-T24-U,0,S34,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,1,0,0,MH^2,MH^2-S34-T14-T24,0,U,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,1,0,0,MH^2-S34-T14-T24,MH^2,0,T,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,1,0,MH^2,0,MH^2-S-T24-U,0,S34,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,2,1,0,MH^2,0,MH^2-S34-T14-T24,0,U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,3,0,0,MH^2,0,MH^2-S-T24-U,0,S34,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[0,3,0,0,MH^2,0,MH^2-S34-T14-T24,0,U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,0,0,0,MH^2,MH^2-S-T24-U,0,S34,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,0,0,0,MH^2,MH^2-S34-T14-T24,0,U,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,0,0,0,MH^2-S34-T14-T24,MH^2,0,T,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,0,0,MH^2,0,MH^2-S-T24-U,0,S34,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,0,0,MH^2,0,MH^2-S34-T14-T24,0,U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,0,1,0,MH^2,MH^2-S-T24-U,0,S34,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,0,1,0,MH^2,MH^2-S34-T14-T24,0,U,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,0,1,0,MH^2-S34-T14-T24,MH^2,0,T,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,0,1,MH^2,0,MH^2-S-T24-U,0,S34,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,0,1,MH^2,0,MH^2-S34-T14-T24,0,U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,1,0,0,MH^2,MH^2-S-T24-U,0,S34,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,1,0,0,MH^2,MH^2-S34-T14-T24,0,U,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,1,0,0,MH^2-S34-T14-T24,MH^2,0,T,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,1,0,MH^2,0,MH^2-S-T24-U,0,S34,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,0,1,0,MH^2,0,MH^2-S34-T14-T24,0,U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,1,0,0,0,MH^2,MH^2-S-T24-U,0,S34,T14,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,1,0,0,0,MH^2,MH^2-S34-T14-T24,0,U,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,1,0,0,0,MH^2-S34-T14-T24,MH^2,0,T,S,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,1,0,0,MH^2,0,MH^2-S-T24-U,0,S34,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
+PVD[1,1,0,0,MH^2,0,MH^2-S34-T14-T24,0,U,T,Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2],Sqrt[MT^2]]
diff --git a/python/pv.py b/python/pv.py
new file mode 100644
index 00000000..252697ef
--- /dev/null
+++ b/python/pv.py
@@ -0,0 +1,33 @@
+#!/usr/bin/env python
+import sys
+pvs = [ ]
+
+state = 0
+brackets = 0
+
+filename = sys.argv[1]
+
+with open(filename) as f:
+    for line in f:
+        n = len(line)
+        i = 0
+        while i<n:
+            if state==0:
+                if n-i>4 and line.startswith(('PVB[','PVC[','PVD['),i):
+                    state = 1
+                    brackets = 1
+                    pvs.append(line[i:i+4])
+                    i += 3
+            elif state==1:
+                c = line[i]
+                if c not in ' \n': pvs[-1] += line[i]
+                if c=='[': brackets += 1
+                elif c==']': brackets -= 1
+                if brackets==0:
+                    state = 0
+            i += 1
+
+for pv in pvs:
+    print(pv)
+
+
diff --git a/scripts/FA_FC_B_T_amps.nb b/scripts/FA_FC_B_T_amps.nb
new file mode 100644
index 00000000..b08f6c43
--- /dev/null
+++ b/scripts/FA_FC_B_T_amps.nb
@@ -0,0 +1,62767 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 11.3' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[       158,          7]
+NotebookDataLength[   3163881,      62759]
+NotebookOptionsPosition[   3072186,      61787]
+NotebookOutlinePosition[   3072540,      61803]
+CellTagsIndexPosition[   3072497,      61800]
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell["\<\
+(* ggHgg.m
+Process: g + g \[Rule] H + g + g
+Model: SM, Last Modified June 2019
+Created by: J.G.Reyes Rivera *)\
+\>", "Input",
+ CellChangeTimes->{{3.7475001495063057`*^9, 3.747500188326548*^9}, 
+   3.747500222198135*^9, {3.749992173192234*^9, 3.749992175553384*^9}, {
+   3.750161038046422*^9, 3.75016104023641*^9}, {3.750695442757999*^9, 
+   3.75069544293856*^9}, {3.759670690846567*^9, 3.759670702233974*^9}, {
+   3.7694115610493517`*^9, 3.769411562407401*^9}},
+ CellLabel->"In[1]:=",ExpressionUUID->"5ed94a23-f6b7-4858-b120-72e0fcc40a50"],
+
+Cell[BoxData[{
+ RowBox[{"Needs", "[", "\"\<FeynArts`\>\"", "]"}], "\[IndentingNewLine]", 
+ RowBox[{"Needs", "[", "\"\<FormCalc`\>\"", "]"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"SetDirectory", "[", 
+   RowBox[{"NotebookDirectory", "[", "]"}], "]"}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{"NotebookSave", "[", "]"}]}], "Input",
+ CellChangeTimes->{{3.747500229738134*^9, 3.74750034701593*^9}, {
+   3.748007453439774*^9, 3.7480074777837*^9}, {3.748345619897317*^9, 
+   3.748345630982637*^9}, 3.7483457593416777`*^9, {3.748345821770327*^9, 
+   3.748345822068489*^9}, {3.7499921801836987`*^9, 3.749992181270163*^9}, {
+   3.769407892261169*^9, 3.769407910721567*^9}, {3.769411544693427*^9, 
+   3.7694115449136333`*^9}},
+ CellLabel->"In[5]:=",ExpressionUUID->"62f164f9-a9f7-4648-a8a9-d72d44fdf7a9"],
+
+Cell[BoxData[{
+ RowBox[{
+  RowBox[{"process", " ", "=", " ", 
+   RowBox[{
+    RowBox[{"{", 
+     RowBox[{
+      RowBox[{"V", "[", "5", "]"}], ",", 
+      RowBox[{"V", "[", "5", "]"}]}], "}"}], "\[Rule]", 
+    RowBox[{"{", 
+     RowBox[{
+      RowBox[{"S", "[", "1", "]"}], ",", 
+      RowBox[{"V", "[", "5", "]"}], ",", 
+      RowBox[{"V", "[", "5", "]"}]}], "}"}]}]}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"name", " ", "=", " ", "\"\<ggHgg-SM\>\""}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"SetOptions", "[", 
+   RowBox[{"InsertFields", ",", 
+    RowBox[{"Model", "\[Rule]", "\"\<SMQCD\>\""}]}], "]"}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"$PaintSE", " ", "=", " ", 
+   RowBox[{"MkDir", "[", 
+    RowBox[{"name", " ", "<>", " ", "\"\<.diagrams\>\""}], "]"}]}], 
+  ";"}], "\n", 
+ RowBox[{
+  RowBox[{"DoPaint", "[", 
+   RowBox[{"diags_", ",", " ", "file_", ",", " ", "opt___"}], "]"}], " ", ":=",
+   " ", 
+  RowBox[{"Paint", "[", 
+   RowBox[{"diags", ",", " ", "opt", ",", "\n", "  ", 
+    RowBox[{"DisplayFunction", " ", "->", " ", 
+     RowBox[{"(", 
+      RowBox[{
+       RowBox[{"Export", "[", 
+        RowBox[{
+         RowBox[{"ToFileName", "[", 
+          RowBox[{"$PaintSE", ",", " ", 
+           RowBox[{"file", " ", "<>", " ", "\"\<.png\>\""}]}], "]"}], ",", 
+         " ", "#"}], "]"}], "&"}], ")"}]}]}], 
+   "]"}]}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"ClearProcess", "[", "]"}], ";"}], "\[IndentingNewLine]"}], "Input",\
+
+ CellChangeTimes->{{3.747500353923358*^9, 3.7475003987048273`*^9}, {
+  3.747501202527136*^9, 3.747501274219995*^9}, {3.747501456168948*^9, 
+  3.747501498501958*^9}, {3.7475016411192837`*^9, 3.7475016416147757`*^9}, {
+  3.747668840862981*^9, 3.747668851467557*^9}, {3.7495750507409267`*^9, 
+  3.749575054371243*^9}, {3.7499923429753036`*^9, 3.74999236369555*^9}, {
+  3.750171453707425*^9, 3.750171462665347*^9}, {3.766143695796837*^9, 
+  3.766143701796813*^9}, {3.766143820264229*^9, 3.766143850794642*^9}},
+ CellLabel->"In[9]:=",ExpressionUUID->"6c1a13cd-8d6a-4aec-be74-43041223224c"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{
+ RowBox[{
+  RowBox[{"Clear", "[", "triangle", "]"}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{"Print", "[", "\"\<Triangles\>\"", "]"}], "\n", 
+ RowBox[{
+  RowBox[{"topsT", " ", "=", " ", 
+   RowBox[{"CreateTopologies", "[", 
+    RowBox[{"1", ",", 
+     RowBox[{"2", "\[Rule]", "3"}], ",", "TrianglesOnly"}], "]"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"insT", " ", "=", " ", 
+   RowBox[{"InsertFields", "[", 
+    RowBox[{"topsT", ",", "process", ",", 
+     RowBox[{"InsertionLevel", "\[Rule]", 
+      RowBox[{"{", "Particles", "}"}]}], ",", 
+     RowBox[{"Restrictions", "\[Rule]", 
+      RowBox[{"{", "NoLightFHCoupling", "}"}]}]}], "]"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"Paint", "[", "insT", "]"}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"DoPaint", "[", 
+   RowBox[{"insT", ",", "\"\<triangle\>\""}], "]"}], ";", 
+  "\.1c"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{
+   RowBox[{"triangle", " ", "=", " ", 
+    RowBox[{"CalcFeynAmp", "[", 
+     RowBox[{
+      RowBox[{"CreateFeynAmp", "[", "insT", "]"}], ",", 
+      RowBox[{"SortDen", "\[Rule]", "True"}]}], "]"}]}], ";"}], 
+  "\[IndentingNewLine]", 
+  RowBox[{"(*", 
+   RowBox[{
+    RowBox[{"Keep", "[", "triangle", "]"}], ";", "\[IndentingNewLine]", 
+    RowBox[{"Export", "[", 
+     RowBox[{"\"\<Abbr_ggHgg_triangle_FeynAmp_38diags.m\>\"", ",", 
+      RowBox[{"triangle", "[", 
+       RowBox[{"[", "1", "]"}], "]"}]}], "]"}], ";"}], 
+   "*)"}]}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"triangle", " ", "=", " ", 
+   RowBox[{
+    RowBox[{
+     RowBox[{"triangle", " ", "//.", " ", 
+      RowBox[{"Abbr", "[", "]"}]}], " ", "//.", 
+     RowBox[{"Subexpr", "[", "]"}]}], "//.", 
+    RowBox[{"Abbr", "[", "]"}]}]}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{
+   RowBox[{"Export", "[", 
+    RowBox[{"\"\<ggHgg_triangle_FeynAmp_38diags.m\>\"", ",", 
+     RowBox[{"triangle", "[", 
+      RowBox[{"[", "1", "]"}], "]"}]}], "]"}], ";"}], 
+  "\[IndentingNewLine]"}], "\[IndentingNewLine]"}], "Input",
+ CellChangeTimes->{{3.7694087865438004`*^9, 3.7694088245751333`*^9}, {
+  3.7694094570452623`*^9, 3.7694095184068336`*^9}, {3.769409791549564*^9, 
+  3.769409804100452*^9}, {3.769419316635501*^9, 3.769419325376972*^9}, {
+  3.769419619172256*^9, 3.769419664695341*^9}, {3.774370726518683*^9, 
+  3.7743707511228867`*^9}, {3.774370817690271*^9, 3.774370821533065*^9}},
+ CellLabel->"In[15]:=",ExpressionUUID->"a2cef43b-ff41-41b9-b41f-7c91f647357c"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["\<\"Triangles\"\>"], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821520244891*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"95be2bdc-98fb-4c01-924c-ea01198ee41b"],
+
+Cell[BoxData["\<\"\"\>"], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215205772142`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"17cab7fc-b6ba-408e-aecb-ebaf93897053"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"\"\>", "\[InvisibleSpace]", "\<\"loading \"\>", 
+   "\[InvisibleSpace]", "\<\"generic\"\>", 
+   "\[InvisibleSpace]", "\<\" model file \"\>", 
+   "\[InvisibleSpace]", \
+"\<\"/Users/josegabrielreyes/Documents/Higgs/FeynArts-3.10/Models/Lorentz.gen\
+\"\>"}],
+  SequenceForm[
+  "", "loading ", "generic", " model file ", 
+   "/Users/josegabrielreyes/Documents/Higgs/FeynArts-3.10/Models/Lorentz.gen"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215205942783`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"eb19a6d8-7700-4e54-96ee-7332537315f8"],
+
+Cell[BoxData["\<\"> $GenericMixing is OFF\"\>"], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215206054163`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"08716a53-d1a2-4287-a12b-7c2cc8366651"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"generic model \"\>", "\[InvisibleSpace]", 
+   RowBox[{"{", "\<\"Lorentz\"\>", "}"}], 
+   "\[InvisibleSpace]", "\<\" initialized\"\>"}],
+  SequenceForm["generic model ", {"Lorentz"}, " initialized"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821520619944*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"79041dd7-30e3-460c-b096-101d2fe6c2a1"],
+
+Cell[BoxData["\<\"\"\>"], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215206347017`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"a5fc149b-1939-45dd-9a92-6e6df4b4c4e0"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"\"\>", "\[InvisibleSpace]", "\<\"loading \"\>", 
+   "\[InvisibleSpace]", "\<\"classes\"\>", 
+   "\[InvisibleSpace]", "\<\" model file \"\>", 
+   "\[InvisibleSpace]", \
+"\<\"/Users/josegabrielreyes/Documents/Higgs/FeynArts-3.10/Models/SMQCD.mod\"\
+\>"}],
+  SequenceForm[
+  "", "loading ", "classes", " model file ", 
+   "/Users/josegabrielreyes/Documents/Higgs/FeynArts-3.10/Models/SMQCD.mod"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215206496887`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"d360cb81-67dd-4acd-b071-c1f757c38c1f"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"  \"\>", "\[InvisibleSpace]", "\<\"loading \"\>", 
+   "\[InvisibleSpace]", "\<\"classes\"\>", 
+   "\[InvisibleSpace]", "\<\" model file \"\>", 
+   "\[InvisibleSpace]", \
+"\<\"/Users/josegabrielreyes/Documents/Higgs/FeynArts-3.10/Models/SM.mod\"\>"}\
+],
+  SequenceForm[
+  "  ", "loading ", "classes", " model file ", 
+   "/Users/josegabrielreyes/Documents/Higgs/FeynArts-3.10/Models/SM.mod"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821520661491*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"9e58d0f9-7d30-4c82-903d-a612d33fd86f"],
+
+Cell[BoxData["\<\"\"\>"], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821520673935*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"72db1fe2-2d37-4a0c-872b-3cc441237082"],
+
+Cell[BoxData[
+ InterpretationBox[GridBox[{
+    {GridBox[{
+       {
+        RowBox[{"$CKM", "=", "False"}]}
+      },
+      BaselinePosition->{Baseline, {1, 1}},
+      GridBoxAlignment->{
+       "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, 
+        "RowsIndexed" -> {}},
+      GridBoxItemSize->{"Columns" -> {{
+           Scaled[0.999]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}}, 
+        "RowsIndexed" -> {}}]}
+   },
+   BaselinePosition->{Baseline, {1, 1}},
+   GridBoxAlignment->{
+    "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, 
+     "RowsIndexed" -> {}}],
+  Definition[$CellContext`$CKM],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821520687132*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"5a609188-42ff-4b27-be41-fd6ff76b1515"],
+
+Cell[BoxData["\<\"\"\>"], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215207003202`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"a0ef6b9a-d2b7-479e-8137-1c407834661a"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> \"\>", "\[InvisibleSpace]", "49", 
+   "\[InvisibleSpace]", "\<\" particles (incl. antiparticles) in \"\>", 
+   "\[InvisibleSpace]", "18", "\[InvisibleSpace]", "\<\" classes\"\>"}],
+  SequenceForm[
+  "> ", 49, " particles (incl. antiparticles) in ", 18, " classes"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821520714211*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"395f68bb-da38-45e3-8e4c-7524d4a51f64"],
+
+Cell[BoxData["\<\"> $CounterTerms are ON\"\>"], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821520811702*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"104e0f63-359b-4f00-9f36-f293c8583cf6"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> \"\>", "\[InvisibleSpace]", "93", 
+   "\[InvisibleSpace]", "\<\" vertices\"\>"}],
+  SequenceForm["> ", 93, " vertices"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215208260517`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"d13e738b-3631-426d-8bd1-24a66c457cbb"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> \"\>", "\[InvisibleSpace]", "121", 
+   "\[InvisibleSpace]", "\<\" counterterms of order 1\"\>"}],
+  SequenceForm["> ", 121, " counterterms of order 1"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821520835772*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"439c6887-602a-4183-b232-e3a67fb8e791"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> \"\>", "\[InvisibleSpace]", "6", 
+   "\[InvisibleSpace]", "\<\" counterterms of order 2\"\>"}],
+  SequenceForm["> ", 6, " counterterms of order 2"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215208924847`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"48ada3e2-6b47-48a0-892b-cc88328d16cf"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"classes model \"\>", "\[InvisibleSpace]", 
+   RowBox[{"{", "\<\"SMQCD\"\>", "}"}], 
+   "\[InvisibleSpace]", "\<\" initialized\"\>"}],
+  SequenceForm["classes model ", {"SMQCD"}, " initialized"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821520899065*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"927779f6-d08f-4d39-a6d0-830a34216070"],
+
+Cell[BoxData["\<\"\"\>"], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821520984041*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"6583a4e9-8f50-4e53-8dc5-040d440c732a"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"Excluding \"\>", "\[InvisibleSpace]", "18", 
+   "\[InvisibleSpace]", "\<\" field point(s) (incl. charge-conjugate \
+ones)\"\>"}],
+  SequenceForm[
+  "Excluding ", 18, " field point(s) (incl. charge-conjugate ones)"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215209908133`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"c4684f77-a5af-498d-831a-f0ff3c4e1201"],
+
+Cell[BoxData["\<\"\"\>"], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821520998866*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"6a429f81-07ca-4ccf-80bb-9a75f25f1846"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"inserting at level(s) \"\>", "\[InvisibleSpace]", 
+   RowBox[{"{", "Particles", "}"}]}],
+  SequenceForm["inserting at level(s) ", {FeynArts`Particles}],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821521005288*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"389ba7bd-4cc4-43db-b5f2-79bd9caadb5d"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 1, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821521011943*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"61464dd7-6a02-413d-a317-aad1778ec51f"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "2", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 2, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.77582152107311*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"fb0f2e26-5c6b-4dd8-b109-5041729eaa3a"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "3", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 3, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821521127699*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"196a4738-ac75-4913-809d-c38dc4f95dc2"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "4", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 4, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215211387033`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"cdd6ea88-0d66-457d-9308-f6a096862ed3"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "5", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 5, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821521198863*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"80fff600-a977-44ed-859e-766002e860a1"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "6", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 6, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215212586393`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"a3fef4f5-5b1d-46f5-a0c2-b5ab178429e9"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "7", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 7, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821521265595*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"e0abfbbf-d83e-443b-b002-febe2931f7f6"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "8", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 8, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.77582152131539*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"9409c4df-2bdc-4cd1-aea0-e86608e6c22c"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "9", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 9, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821521375615*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"37f8b566-f4a5-427d-a780-b172e0e9ed0d"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "10", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 10, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821521426969*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"95cef3b7-252b-473d-8be6-83ab00891d73"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "11", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 11, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821521489283*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"2c83028a-01a8-491c-913d-ebe3b9b372b9"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "12", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 12, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821521554887*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"017df86f-f278-4438-abc4-8b8c6678129c"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "13", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 13, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821521644156*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"41c0f1a2-034d-447f-ad92-6d0cae8393d0"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "14", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 14, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821521709709*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"8f567853-5358-4ce8-b9d9-add48f5cfe7c"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "15", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 15, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215217981977`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"d94aefd7-5ad6-41e8-94bf-82f1a5da8e87"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "16", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 16, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821521928403*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"a1667e62-53f2-4568-b952-d91a76d0b6fb"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "17", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 17, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821521989687*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"fd2d9ffa-0c9f-4edc-9ad4-3963eea69b87"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "18", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 18, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821522046685*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"0cda6289-833d-401f-9877-358fff7212cd"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "19", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 19, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821522112061*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"1957d743-de80-48f5-a636-21f1f1aa7501"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "20", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 20, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215221830053`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"44b3f181-2e51-482e-affe-db86b44602ac"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "21", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 21, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821522247364*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"ff3d11c0-d301-4777-a1f2-a610d7d9a675"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "22", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 22, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215223095818`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"ba2acc4a-b13c-40bf-b0b9-bd894d26274e"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "23", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 23, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821522376569*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"3b804754-f313-430b-8cb0-31b5aaa5f215"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "24", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 24, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821522443722*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"f1228fa4-8234-472f-bad1-73814621aeaf"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "25", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 25, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821522506212*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"74498276-21e0-4a9b-a0aa-ad268e15c133"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "26", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 26, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821522574318*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"a439ca59-412f-45c9-ae09-c5ef0adc59fa"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "27", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 27, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215226363287`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"2b52cb8a-5a2f-4c20-8a6b-559e2885c512"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "28", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 28, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821522700251*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"0caad15d-e43a-49c7-acf4-a07620c1df9d"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "29", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 29, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821522791025*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"0dde48d4-1c15-4904-b19e-6d02a168b3c3"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "30", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 30, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821522857422*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"f7321913-10b3-4f6f-869a-662bf0274289"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "31", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 31, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821522952284*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"88821906-7f24-4e37-aed6-ef83b5c08ec5"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "32", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 32, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821523014319*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"db365a78-952e-424d-a8c5-1c60cbbac3b6"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "33", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 33, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215231071043`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"95aa9915-8995-46bd-b083-d8e235103da7"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "34", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 34, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215231984377`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"8ce667a7-d620-46c8-9048-19164c2fe9fb"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "35", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 35, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215232623*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"047f977e-13ab-4375-b19b-fc301e804f04"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "36", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 36, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821523352088*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"1be3ed47-0bb8-43d6-94fe-f97fe2bb5ba7"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "37", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 37, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821523415745*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"94eb4d28-ed47-4ba2-a1cf-599a36a6cafc"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "38", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 38, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821523510915*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"a3db7988-d6b5-4f5d-972d-952a01edbb0f"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "39", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 39, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821523581208*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"e7aca9d7-b34e-470f-a88f-b624d7e0e958"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "40", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 40, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821523644973*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"291a47af-4dc7-4de6-b36f-8d881b917536"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "41", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 41, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821523711895*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"9872fa25-a27c-41a0-b138-6214eff0560b"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "42", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 42, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821523770302*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"0ed85b66-aeb2-4a23-860e-f055e412c19f"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "43", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 43, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821523829897*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"4c61a78a-0e05-41f7-a835-002d535416d4"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "44", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 44, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.77582152392986*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"3c180812-a089-4b46-be4b-38556662b73b"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "45", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 45, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821523996532*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"22ea50da-a3f1-4d7b-aa85-0b749fbc73bd"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "46", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 46, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215240936747`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"3fd81227-d5ba-480a-886c-3882ce6b38a6"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "47", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 47, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821524187068*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"956e5828-589f-40db-83b8-f309955de8d0"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "48", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 48, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215242545137`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"33dfe8b5-d0e8-4b38-b3b1-27debdbc6e62"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "49", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 49, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821524353867*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"c8d217fa-58f9-4618-8910-f102c2b8e99d"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "50", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 50, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821524418827*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"08b7c85f-5b2b-4689-bedf-181e4692099f"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "51", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 51, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.77582152448173*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"ef12fc61-9bce-41da-a8e3-c99e218aaeff"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "52", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 52, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821524545789*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"ee7502bf-f9d9-4ead-8a35-caf262094785"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "53", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 53, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215246378193`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"2ff486b6-da1d-46c6-bace-b35ed8fb0a0a"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "54", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 54, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215247289333`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"20b0e1f7-d69f-4196-a238-5db1d7b3d5ef"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "55", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 55, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821524778552*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"807a10f5-c9a7-43ce-9e16-d429e391910d"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "56", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 56, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821524785575*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"69cb4ac9-1b1a-4d6a-bf1f-f9b7fa878a12"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "57", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 57, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215247935658`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"f8f509e1-588b-4ed1-a98a-8ee71cd1cf2c"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "58", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 58, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215248037777`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"69a96cae-392e-492c-bd26-075f6c5a193a"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "59", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 59, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215248109283`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"77fee6db-15a5-4a26-9672-1e7d9aadbcd0"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "60", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 60, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821524819066*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"64834d2c-1e4d-4442-8bec-675be74e7dda"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "61", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 61, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215248280497`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"59971e47-1616-4a22-a721-c533bdd96860"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "62", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 62, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215248355093`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"daa6c0b9-88af-4140-84da-b05c30c5c32b"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "63", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 63, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215248432837`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"66621e56-80bf-4370-a9f5-b1e47c485242"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "64", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 64, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.77582152485423*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"5a491c83-6c7a-4929-82a4-1a5a5645762e"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "65", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 65, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821524862764*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"2b0c227a-7d7c-42ee-a180-4c2a2a146ac2"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "66", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 66, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821524869915*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"ccd6cff8-1b8a-4d01-b010-ead3e010e3fc"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "67", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 67, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215248774757`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"a7a10e1f-072f-4c41-8ee4-241f3ad842b5"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "68", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 68, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821524883623*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"7fafeb15-f4e7-4947-b398-febc44282cd1"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "69", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 69, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821524890019*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"1332cbbf-fb62-4dd6-a3cb-cef8d1e70dc5"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "70", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 70, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821524899111*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"310bd995-8600-4e80-97b1-81840494d0f7"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "71", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 71, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215249079933`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"f6b1e272-4cf4-4247-a1de-432525a6e121"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "72", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 72, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821524916655*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"79c37aac-8c86-4c0e-abdb-183d9fb1748b"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "73", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 73, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821524927713*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"7507a970-75c5-44e9-ab07-38d61c1ccb9e"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "74", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 74, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821524939447*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"e09d7b62-45f9-497b-a6e1-806796c1ffa8"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "75", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 75, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821524950326*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"29257eb8-2ebe-42f4-bd66-df00a57bb73d"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "76", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 76, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215249611683`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"b6a82730-c91c-4d73-b34c-8c6ce612fdde"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "77", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 77, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.77582152497258*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"c524cf2f-3e9a-46b4-be86-f9444ba98e88"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "78", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 78, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821524983777*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"c10b4522-2c7b-4642-82d5-c6e8a6d01dba"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "79", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 79, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215249958363`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"68081a7b-576f-4936-a3c8-1c9c4d7d25c3"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "80", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 80, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215250116262`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"b6894ac0-5f23-4353-abbf-a94d55e615f7"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "81", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 81, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821525028082*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"9488c342-c8ed-449f-950b-ed0982efef33"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "82", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 82, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821525044083*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"32ea0167-2716-4f66-a451-150d2ceda811"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "83", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 83, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821525054821*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"08d33716-31b1-4e5f-85b6-bc539ceaa0cf"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "84", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 84, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215250655823`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"ddcc7769-8e24-4e3f-b2af-2af53a5bdc11"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "85", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 85, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821525076709*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"f994c345-6b06-4ec0-9d0b-63703d71adb1"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "86", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 86, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215250868483`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"64721b11-69e7-42a8-9ed4-2fb8488cdff6"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "87", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 87, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215250965767`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"03689c0b-6996-4dbd-81a8-1cad70f362c1"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "88", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 88, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821525103999*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"808878f6-7af9-4107-8aa9-978f16ef4b35"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "89", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 89, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821525110635*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"aefbf6f4-2a0f-4015-8c5e-607e24212b32"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "90", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 90, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821525119246*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"c486abb2-c049-400e-bdbb-9ecfaede817d"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "91", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 91, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821525126441*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"da0741dd-0830-4119-9805-31582a2367b0"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "92", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 92, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821525137515*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"1cb27c93-7715-4dc7-a6d6-cfae5c74839c"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "93", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 93, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.77582152514504*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"ddc5cee1-b4e7-458f-b4ba-89d60a849bc4"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "94", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 94, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821525151367*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"be030525-a4fc-4e6b-be42-d477d055de13"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "95", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 95, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821525158676*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"339456c2-a58e-4741-b4dc-96df6abdc7c1"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "96", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 96, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215251668787`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"89cc81e1-b55e-449a-a3d5-f07c46b2c5cc"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "97", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 97, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215252290287`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"6de19c82-34c9-4ba7-9b48-226b86e19b1e"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "98", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 98, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821525239696*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"899465f8-5f47-405a-9c5c-e10dc8e90f10"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "99", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 99, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821525250952*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"9e4f3248-4f2e-4577-8a3f-d5b2860efa80"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "100", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 100, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821525259357*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"2a9ba662-3fea-4229-abd4-39f05b296228"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "101", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 101, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821525267342*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"0531799e-f502-45d8-9e0b-c29dc4b1ce02"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "102", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 102, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821525275188*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"91b0a278-0a06-4500-808d-22396119acfa"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "103", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 103, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215252836742`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"605fefa7-a214-4a78-b7d0-790e17d495d9"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "104", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 104, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821525345201*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"2443812c-7ab0-41ea-b494-512b76e3e44b"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "105", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 105, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821525352449*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"aee94a92-c972-4419-9c21-64f87a8cff0e"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "106", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 106, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821525359831*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"4c579a5b-81b4-4170-b71b-5c94acdfbcf7"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "107", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 107, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215253662567`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"1e982064-f679-41a3-866e-cef41c13f58a"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "108", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 108, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215253733263`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"89af9e07-74d9-4f4d-afec-8066c5f45c01"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "109", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 109, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821525379627*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"36993d8d-616d-4d86-9f6c-858eb5133544"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "110", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 110, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821525428071*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"0ed4f5d7-298f-4112-a687-d7ae34364518"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "111", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 111, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215254383287`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"3c56fdcb-54a0-42f0-8fdd-22993d28b1c4"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "112", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 112, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821525446269*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"af574732-863b-4bf1-ba16-cc81168c3f4b"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "113", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 113, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215254527187`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"e2000529-e736-4802-98c9-b5248025406b"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "114", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 114, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215254592047`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"9bf2fd19-4359-42ab-a02f-08ef0f78ed75"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "115", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 115, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821525512397*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"a76e94e5-2295-4f2a-9002-293e7cbd3393"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "116", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 116, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821525518751*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"95d2486d-e076-4d22-bfb7-9b81ed7bcd17"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "117", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 117, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215255299377`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"32a278bb-960a-461d-848d-3ff674c51c0d"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "118", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 118, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821525541224*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"2cce181e-b2fd-442b-b6fb-6788c5d3f819"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "119", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 119, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215255951633`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"9f19765b-5e37-4a08-a19d-0f77a87ea7ad"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "120", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 120, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215256058683`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"021a5bc9-a07f-41b0-978c-00b32d99d8d2"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "121", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 121, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821525615521*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"1b5b7e7d-0ca2-4f6f-9b7e-4e0ff4c00ffc"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "122", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 122, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821525625033*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"9fbc67c5-9eab-4cc8-a3db-d13e16b9f9ae"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "123", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 123, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215256787443`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"b8d15074-3bd2-4255-a41e-00fb85ec4123"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "124", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 124, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821525690011*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"a47967bf-9a66-429b-b544-46557b2de0a2"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "125", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 125, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821525699597*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"090ebba9-cc4a-4511-9768-a733b7a777c5"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "126", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 126, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821525710155*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"84ae8ec3-7115-488d-b483-04729cee5d6d"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "127", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 127, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215257191668`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"24ab1ede-3197-4bc8-862a-0b94e96991e7"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "128", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 128, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821525730124*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"ced0c2c9-1571-4682-9592-559792ab4bf4"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "129", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 129, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821525794838*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"be07c732-6e96-4da3-a616-3ad93d10fd62"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "130", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 130, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821525805936*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"6831d176-931b-46c0-b567-e713e97875b0"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "131", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 131, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215258170147`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"7fb81ab2-416d-4c75-a415-964b1d7d0163"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "132", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 132, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821525828352*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"8a93f0dd-659f-4fd3-87dc-dd119ea79669"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "133", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 133, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821525838872*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"abde7d00-2771-4d96-a125-f3d7c67acbed"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "134", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 134, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215258493137`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"6984bedf-553b-49cf-9011-d5ef08ecf363"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "135", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 135, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215258556757`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"3f432ed5-3b6a-481a-996c-82534394b528"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "136", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 136, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821525910555*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"ffafb3bd-9f6e-4112-99a5-c126e2f337d6"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "137", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 137, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821525920577*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"954f9671-78c7-424d-9918-3ebdd3c28d18"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "138", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 138, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215259298897`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"e3822845-ba7d-4cf9-980c-f50dbe4cb81a"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "139", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 139, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.77582152594055*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"6bb844ed-20f0-4ebc-bc72-72b5bea41a46"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "140", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 140, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821525995332*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"bb38afd2-c413-458f-9160-aefbd0d27927"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "141", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 141, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.77582152600434*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"6cb9f6d4-6d01-4a77-accb-65e87470338d"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "142", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 142, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215260155354`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"f3fa80e3-6cc5-45fe-a17d-46970ef94b0c"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "143", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 143, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821526024919*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"09d65ed1-715d-41df-8c94-a39bbb3280a3"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "144", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 144, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821526032736*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"a0d3ab8e-de70-494e-9f5a-07eda236d43d"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "145", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 145, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821526094782*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"155ec573-fa0f-4f08-aef8-e6cc269556b1"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "146", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 146, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215261048517`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"95024ab4-7fb7-4ea3-a213-40a63fd51d4c"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "147", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 147, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821526113327*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"90a53c5b-8c35-4055-998c-5ba3df1e4595"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "148", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 148, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215261241217`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"f8e33bf4-1816-41d8-99d7-edbf10cd5b8c"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "149", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 149, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215261327467`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"62d77045-93f2-456c-afbb-f57e51e00cda"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "150", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 150, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215261435013`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"33fb272c-39d5-4195-a5f0-03ee79c2d273"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "151", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 151, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821526153228*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"cea3e22b-616d-4e17-94cb-73db0a940ddb"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "152", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 152, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821526163458*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"d1d62de9-2394-48d9-9cd1-1c560ab9737d"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "153", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 153, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821526230135*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"30a06b84-dbda-4151-9e85-77ae4f184488"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "154", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 154, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215262402287`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"2c6607bb-6df2-4411-ac6b-aba394a7fac2"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "155", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 155, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215262511463`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"e9935d4c-9424-473a-bdf3-c0d3396da9c8"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "156", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 156, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821526262554*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"d7e337b8-b3da-4537-8114-35051760aa0e"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "157", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 157, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821526273388*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"44245045-7776-4e4c-bc3c-9fbe9a8c8638"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "158", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 158, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821526282921*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"8329a41f-5e59-42d6-b164-4077b17d3c7d"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "159", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 159, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215262937927`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"c835d743-48ec-4a7e-a931-ed53a089baf1"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "160", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 160, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821526303382*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"e0c5b3db-7b63-4519-9049-33e98a77bf63"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "161", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 161, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821526361039*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"f4064934-b056-4b88-8ce6-ea4a63fd1832"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "162", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 162, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821526371428*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"c60ae536-341c-4231-9d7f-28ed6fc010d0"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "163", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 163, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821526378848*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"e1e5312b-95d7-4fea-9a9b-f750ec126cb3"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "164", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 164, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821526386921*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"4d16f65d-d7c1-4206-bb12-ff0837d15035"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "165", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 165, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215264460707`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"b1399836-b8d5-4db2-b11b-46c5231dfb9b"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "166", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 166, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215264570923`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"4cbd66d0-9cb8-49ef-a05e-7b1fba13693d"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "167", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 167, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821526466371*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"4664d10a-2aaf-41a3-b1d7-406a84cb92da"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "168", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 168, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821526475224*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"dd2827c1-ec77-4ed3-ab85-e1f6d405724a"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "169", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 169, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821526482832*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"493bad0e-e393-43d4-89d2-aa227afa1bc9"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "170", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 170, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821526493754*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"975eef16-8958-44ef-8f6d-309b76e6fcb6"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "171", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 171, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215265027933`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"c71191a4-2459-420c-a874-0dac3fe7d4de"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "172", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 172, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215265124817`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"a6f5e445-32f2-4aea-83e9-93ca8df8d6db"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "173", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 173, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821526579625*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"b4a75642-2447-4ced-82d1-86db37d81517"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "174", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 174, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215265862226`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"4c0ca0ea-884a-4e8d-bef1-f9a7e1e00b01"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "175", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 175, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215265948267`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"c6ac1b97-da77-41a9-9a18-d87e11a03c9c"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "176", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 176, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215266037273`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"cf11aea8-37d2-4e13-ab17-38ac36631409"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "177", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 177, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821526614345*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"1d1f0596-37d2-4424-bae3-f9d8723fbb21"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "178", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 178, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821526660656*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"d41e0ca3-ae48-4ca1-b913-aadf4832f1a1"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "179", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 179, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.77582152666984*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"ebb75367-3c3b-4676-ab05-d1d33225bee4"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "180", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 180, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821526729123*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"d3a6e521-3690-45a5-be34-d4231aa5eb9a"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "181", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 181, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.77582152673628*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"8aef0c43-d5e4-4cc9-9ff3-cd86cafbf836"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "182", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 182, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215267466173`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"a9649bc8-ba1f-436c-96d7-4716a68f04ed"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "183", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 183, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215267562923`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"647d230d-aa92-4fc6-819c-15a1a8f7ff74"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "184", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 184, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.77582152676569*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"f0751fee-ff53-4e18-b36d-7f75c709e7a8"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "185", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 185, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821526812277*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"ddcc4f61-0f11-4432-8853-080322aa71cd"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "186", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 186, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.77582152686161*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"1bd8f96f-76e9-4bd0-8d64-71e88ca761cf"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "187", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 187, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215268710213`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"a5769f72-16ca-4d1b-9e68-10da2ee9401a"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "188", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 188, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215269286947`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"23e19ad8-482f-4e50-ac7d-39b8232d54d1"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "189", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 189, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821526939129*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"b396acfc-b6dd-4e10-84d3-91e0b4c17af2"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "190", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 190, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821526945877*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"d1c39757-fcd3-4738-9147-a54c82f2dc93"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "191", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 191, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821526953973*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"2cc5187b-ef54-4224-8ec7-2cc447464207"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "192", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 192, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215269642*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"aeb24872-3606-402d-bbda-f6c728b9bb4e"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "193", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 193, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821527014145*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"4bd78b51-7c87-404a-b69b-7459e440f961"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "194", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 194, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821527023696*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"8ccee7c5-67af-4cda-8aa6-c2d372a73e4b"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "195", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 195, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215270331383`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"769dea9d-4765-4d2c-a9d6-c4a7cece7d7e"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "196", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 196, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821527078951*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"58dfd25c-872b-4c1b-bf35-7f0696ec3833"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "197", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 197, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821527089336*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"7364e8b2-3b44-4871-bf2e-1dfb4fac6b94"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "198", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 198, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821527097932*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"0fa19433-e542-4831-b249-2050001498d7"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "199", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 199, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821527105485*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"401c4d7f-9f77-4706-b2fc-cf7dc6e60182"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "200", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 200, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821527161327*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"2dd4dd1d-2832-49ce-b177-772408048ce2"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "201", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 201, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821527167902*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"9c299cbb-1953-4763-a4d8-1a1ddf1b74c7"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "202", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 202, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821527174798*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"92ebb414-1db2-41fe-9fb3-b8051b930d5a"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "203", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 203, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.77582152718146*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"3968ce77-2300-4fc9-96da-7bef7eb6671f"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "204", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 204, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821527188382*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"7a4465fd-45c5-4d98-a323-6049149a8e54"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "205", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 205, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821527198029*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"69b9eb90-1ea7-4481-a9ef-9e8c36143262"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "206", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 206, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821527262559*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"b0ce2cdf-180d-4fdf-9972-9ce1b75a530c"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "207", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 207, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215272719803`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"07166acb-20fe-4ede-8c32-81341c882703"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "208", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 208, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821527281766*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"05a04342-318c-4657-98d8-6aca8a9570f7"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "209", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 209, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821527293262*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"39f94024-72cc-4937-a438-898c257f9156"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "210", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 210, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821527302471*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"bb0adb22-a3cf-4d8a-910a-8f56400743ff"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "211", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 211, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215273118467`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"7173c062-f1e7-436d-8179-73401ea1ad4f"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "212", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 212, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821527318412*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"44f71b4e-a2e0-4cc3-8299-a02bbfa171c5"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "213", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 213, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821527363357*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"1d350dc6-1c0c-4c30-8619-e7d194714733"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "214", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 214, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215274286413`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"176b288c-d940-4433-a10e-451843ae7b98"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "215", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 215, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821527436612*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"675db820-1b9d-46ed-b802-1795d97d1f0b"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "216", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 216, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821527444222*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"e3a16c03-09c4-42fa-acf2-fea690c9104f"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "217", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 217, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821527453343*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"f61ba134-5255-4ab9-978d-dc2089383c82"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "218", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 218, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821527512639*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"ee96329c-ac9c-47bd-af53-6fc826925d8f"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "219", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 219, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821527522331*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"95c79809-e754-4130-ab17-dceb7573247b"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "220", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 220, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215275325737`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"1d355b9d-2eae-4454-8082-4376c420bb52"],
+
+Cell[BoxData["\<\"\"\>"], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821527542314*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"b39ca931-375d-4b2d-aa49-91576fa9bb33"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"Restoring \"\>", "\[InvisibleSpace]", "18", 
+   "\[InvisibleSpace]", "\<\" field point(s)\"\>"}],
+  SequenceForm["Restoring ", 18, " field point(s)"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821527551634*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"6eb627fc-fa88-452c-9d88-c3f31c1c84f5"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"in total: \"\>", 
+   "\[InvisibleSpace]", "\<\"38 Particles insertions\"\>"}],
+  SequenceForm["in total: ", "38 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215275602283`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"718a1971-cda3-4d74-ba2a-27db0d2f64c6"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdgeg/igfhfihi.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 1, " ", "afbg/chdgeg/igfhfihi.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821527569398*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"bcc765e6-b684-41d4-b9f8-923331f59a3d"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "2", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdfef/ifghgihi.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 2, " ", "afbg/chdfef/ifghgihi.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821527578225*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"f0cbd9cd-a4a0-4e56-a52b-2eb7516c790f"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "3", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbf/cgdhef/ifghgihi.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 3, " ", "afbf/cgdhef/ifghgihi.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821527588231*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"e4d778a7-9906-40b2-b654-bce0089e11ec"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "4", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbf/cgdfeh/ifghgihi.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 4, " ", "afbf/cgdfeh/ifghgihi.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821527595903*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"39b2a992-ddd6-4ea7-9374-1b16f1397123"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "5", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbf/cgdheh/fihjgigjij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 5, " ", "afbf/cgdheh/fihjgigjij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821527605875*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"52384a5c-f1c8-42d0-bcd6-8e8cd626659f"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "6", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbf/cgdhei/fhhjgigjij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 6, " ", "afbf/cgdhei/fhhjgigjij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821527615673*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"178cfaf5-bf53-4494-92a1-a5bdab70dbf0"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "7", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbf/cgdhei/fiijghgjhj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 7, " ", "afbf/cgdhei/fiijghgjhj.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821527624481*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"97b5cfe9-e4b2-4e92-b61c-106983bfe7bc"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "8", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdfeg/figjhihjij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 8, " ", "afbg/chdfeg/figjhihjij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821527635745*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"d3789ac3-2228-457f-8442-9773a5a43aa9"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "9", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdfei/fggjhihjij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 9, " ", "afbg/chdfei/fggjhihjij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821527644804*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"ed577c22-5047-4a2d-8548-4bf0212ca75c"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "10", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdfei/fiijghgjhj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 10, " ", "afbg/chdfei/fiijghgjhj.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215276548653`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"fda0b7e8-d98a-4d92-8a41-bbc92a48a775"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "11", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdgef/figjhihjij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 11, " ", "afbg/chdgef/figjhihjij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215276653557`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"07023e78-bec9-412e-adff-24ae67e50a70"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "12", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdgei/fgfjhihjij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 12, " ", "afbg/chdgei/fgfjhihjij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821527676903*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"eae624ab-9dd9-46a4-bcdc-976378a6e5e9"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "13", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdgei/giijfhfjhj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 13, " ", "afbg/chdgei/giijfhfjhj.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821527686001*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"a85ef80c-90c0-4f4e-aadd-1aa9f433e969"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "14", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdief/fggjhihjij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 14, " ", "afbg/chdief/fggjhihjij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.77582152769508*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"cbf1a0e4-3403-49af-825e-450c3f6f8381"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "15", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdief/fiijghgjhj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 15, " ", "afbg/chdief/fiijghgjhj.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821527702964*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"138bdf87-1a59-4b02-9eaf-70b0ff56842d"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "16", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdieg/fgfjhihjij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 16, " ", "afbg/chdieg/fgfjhihjij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215277126837`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"3261f4eb-fa53-4023-9f9d-bbca25c6af57"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "17", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdieg/giijfhfjhj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 17, " ", "afbg/chdieg/giijfhfjhj.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821527722855*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"da794422-3495-4a87-a565-cae13288169e"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "18", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdiei/fifjghgjhj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 18, " ", "afbg/chdiei/fifjghgjhj.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821527733171*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"25b9f2f3-ee95-4804-99b9-9bab630b9780"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "19", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdiei/gigjfhfjhj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 19, " ", "afbg/chdiei/gigjfhfjhj.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.77582152774305*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"97cb7568-d31f-47ea-a799-30bf15fa2357"],
+
+Cell[BoxData[
+ GraphicsBox[{InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwt1gtQU1caB/AjtjwEIshDtlAQzAKuRUOX54rJpUKxksGAvCqMIiOIGiVF
+aYMiG4Uqsm4LiDa6FHkEDUIhIkKwyvAqRJYuEW1BsBApICLViFgDIuz/dDcz
+mczv5jz+35d77sQxPjksQY8QkoU3/STqRbz+xJA/XhyGjPyrNboQLu755pBq
+PUOazpZyXOBV9iuCLsDpaYrCMhuGmI2djjgMbw8uDbGCxS3EOAa2bKkVSlYy
+xMfqt/AQuIj11e4n1livwFlK/TDQ6/twWNpVVEXHd6RPDnZYMSTa1nKYrld7
+0XliE2x4t0onhVPO/pDTY8mQzdku/A446aqbWghry8xVc3C7p/e79rDqaZH+
+e8ivb+FZNGrBEGXUpnZvOH2fm0sLPH8hPigCtkv4beN1uPvFmN9nMCfV+3wj
+LCs5F58DW68aMuiFp+62FVyCB+Tul2dhxXeVAzUwd65l+AO6n2hBdBMeXWZX
+vgfWPF7b2wRLkoYKyuGCEya3bsE7/vPx2hHYJKvmwzo4x9rzpQ3q8xtbJymn
+eWe/rg+EZaoc9zy4UL5QuRtmX6w2E8MaG4PiFNqP2xrbGJh/rHflAZhzY/bI
+Bjjfz14YBgvu96XQ+rd87DHoCGt81tdMoz9TBi55g9hf/At/vha+qP69XAL7
+REljxLDcqc7cAm6W57ED4bkAh2/OoV7pgu8OW7j+TVW5MazOZVXMr0OOpV4e
+aSsY4toZ6zYJ9/ePnxsxx/2gqPlqFO41Dgjmw4rDw6NPYTud/92bZrh/uKzv
+F+H0rkzRh7Dg628tHbC+X8OV9w8uZ4jOffyLzTTvxiIjKQv7eXEX0mDxC/uX
+j02Rb6Qo6Roc+0vTP3bBYvYynylYZLqzWR9WcLeNWqD+OBlf1meC60LPBg5s
+Kf1C1AvLDpl/EgyrvDvPv4TnD6oS4+HmhMYJT8y/df62Xiqce1Lekw9rqgOZ
+E/CUJrxAD3lUU3rHTsMzaypq0+H2js4oer+0p7l56WAP3Y26LNjPiWsrRD18
+/QNN9Pdjm00oemB26obRRPiZvPSoKepvDk78aStdn7gdXQ1rHG6mecCiyEfv
+uMAmofWPrWCB9SLLGpYEHLk2iXpNGpQPh7CeujPPW077Me7ZkQA3PxOy9sCu
+se1ercgTPZRxfw2sjl6Ieo164pZkvp1G/038P18wok4bbGiHmRWbUgn6IRVq
+7hfDfJfLviPLcF4vOt7IhsXziooGI9wvXSLfY7BrxM6K04aYdzWqMQPWueh9
+tMuAIRMDcYtnYJsyKyZIH+OzYoOv0PkV393b9C7q6ju1vZuObz/lveMd9PMB
+N3UO5gxnxxcuxfWSsuPrkTdr65sOPVixVfTeXjj3QbBTgR7ytryRy+D+a4Kd
+obDP9sjjw/R5pIk54wt337z8d2P0K2Bf5tgnsMbrn6Fsen6Cq6ePwcrhj6x9
+YSHLQdkDF/ZXPtgMk0zha2/s90Gh/lAYnR/oklENy/6qK4uEmc6fM/6CvLGP
+pp9vg5PasrWlMP/Kre4tdH7NuJaF+nQBczn0PBZnVbATYYms7bYzrD4RsaIE
+5txL9DClz4eQhEONsKvwb7/S/HLDQ+KrsKKN7V8MC1qPvBXBZlF7zHbAhg1v
+K41hw09lc/Q8svn5Rkexv/hkjPwh+qfm+ae0IK/GykRWCscNPl0YQX1aq0Ku
+CBZtVEePLUG+Rc7nQXBSKCu9h2D8nRzNGjpfnN8XtsgjysruCzawoGFD/et5
+HlnVcNDHElYI/L+9NMcjuSGDHXaw9ssfD8fqeEQ+8bbVna7Xd9Kf9zuPKKY7
+V4fBqtr6/VEzPCL6OXl3Orzq15mVtdM8YvbkeUE1rIz+TPrpCx6JmzVPHocl
+4ifz4VqM73JKdkR9zVXLz2x9ziMaS//nsbDGoD+j7BmPiOMdAs5TlzxeWgRn
+7yUDXbBkIdyPg/Hq1dcFOtqvn1gHnLBedkLNFhb9/dtaMjVwVkzmPH0+KoI8
+f2jF/u2apBJH+vzPrTZWIp/4wJUhakY1FV/9kkcMD1pcsoWzS8z/fRb1qJbP
+WCyHlVqj+chXPMLZ358wi/3IvXWOE/DmU3O7aB7lubVf+qIfTOf1V/mw2d4h
+ZwYW2CkjIqgvj3BmMF6ZZz1nQfPPKkJCYfGf92Xepf3Krx+MxH7Ni6FFubSf
+jrsmDZBH2ZU4vo2ev21qp/3ILzk9ced9en7MXV9Zon5BTnSy1g3rSUzzxiZ5
+RMq1L/oR1rrXpSSO84i2xaOyHubcOR7R+Aj9Yl3fV+VG+z2gXjqA71d3O9dQ
+L6krUKmxnlZe2AQzxvf0Wc3oZyB38YHb//8nFN/+3+c65r9ilhyv
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.907871335428632, 17.11903631971389}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt1wk81HkfB/B/jpUjR+4RjeOpRO1UK6LMn4gtaqhcZc0KW4ihrKdc07Ll
+KhN2i20zZTt0aFRscjRSrQhDJKuiErrWIDnj+fye5/F6ef1fb7/f/3v9/jP/
+Mg6M9AyWoSjqIX7JlRqbxY8pTf33R4empvxz02phzsFFpce1afELE2leAsz9
+IbTcVpum86PFBSyYdmqMm9WiqXEr893dJjQl+st67BXsocmayISZ25LS+7Ro
++o7QYs9amLNNtk9Rm6bWnPEulRrTFMu7U20T4tcIbuddgTmDWxLPYz1SITY8
+Gqb3Bbno6tD8p+tjZtbDPceKA0/AvvaKySYw/7Xb5EJdmm5K7UpShQXVuQ+K
+dGn+AbsP9xVg9aqyyGV6NNU6oLJ/HizJtJUW6tHi9+evyRjB4jnmI1/p0/ye
+leE+1jDz7egSD32aaj63uM8Llrr+eSwRTjMOfniAxMsYLMzUp8WcrJHhU+T+
+2/qZB7E+3214SxWp13M141t9mo7ZoTDSQerrrLo/qUfz25gFdu9I/uijaTmo
+Z2vN4okhWJidWqyHeiw/RqZ+JPdrVqQIUP9mjYK3XTAvoURVRpem1N4UNFaS
+eW3/sXC/Dk1PVLjmC4gHmJmDmFcsQzHYh+R7ZHj2AFxntatXm8Rv3jKih/le
+ujri08DEfmknr1WLFj/2souMg0XL264UwWERYgNzWDIVdEmI8/sQ39JXvBB2
+vnv3TziQ7SinCXOyUoQf4fTtU+tTjFDv83QPtjbN1xr8p0gB5nsmRVyEXY1y
+NpwxRL4577ab4rxGb3CpbTBfqTy2CM+XXdNQuDEs5bpeXYV+F2XWVSiS/ZOb
+8m7DsdadN5RhXukvStaYn5fPWK0ZzLRM33kWHtBw/ZcHLJhdLfmMeX736t28
+TJjjwu38Gufhs2DFUDOJ5xG/YyPOV4+tUK+D+kS7wx87wcZrLof5kXpza8MW
+wvkHf2zLJeu/Z0x2If78sZBEMUxtPD+QAGusZRU9hXnXteSUkO/85EheJ3F4
+Gvswzsc4Y1Mj2S+WPRc4gX67b8noH4Ulw4rXQtGvDLe6wp5YUznpJc6nMKrC
+twP1iTLmvQ7CvJ5mSvp8YcmbOscpLZpv8U9HYv0CzCdhp8Il+LI0Z/lymK9Z
+4RmD+TNshq6lG2A9z7YuAO6qXGXYx0C8MNaeUOx/4ahTsAHmje8/kot1l77F
+jOuYi3QmuakLfnqoqnsZLGqrDlyL/CuDT4VUoy+m0TLtEtQXc8tA7QdY5CZf
+tAr1/x7WPWoOcy94L66C200yOhRgyvjA2g04Lzq8/ysKFpxzzf8L83AemYpR
+h1llS/xsMb9eZmGLFcwLzfA9CV+kzYrDSD7KJvMZruKwhLtXcBUaTbFlcR6v
+HBy/HiF/z1+9WQl1bij1bbTBVXj8ls0Q7q9hxfNjYU6EN6sc+7rNjNOKYIn7
+pFwwvPJEdstDWFDxenYc9Q18NlzZBvdo2lw6CCePN1+8T+I11/wkxXm5VzUf
+OgXzbj45/z36mzfXLsIHpk5/jG7HfK78siV1ktTr2LtwK8y1uej0MyyZYQa+
+xLzP+nt6TKNvickfaocxX3bK/qAgmLv1Tosz1pMdDL7cRdyegqN9prBbW7y+
+ESzI2jdqjP2fXI73xWHufMbgOBvrfu9W7yXfoxTvpX08rqajdg7euApKNic9
+xlX7aObqbk2cp0PgXAfcpxMTxUyE+U27v1TD9UudTq+GhY+iz21Af0rdLuOK
+MMeMf1+CvEF3ElTH56Mei7g5XpgHx8/XbxbmTH20b4ajJGtlDbGftt8gtxp9
+SmsuyrmTeEaXmlMwf13GwqB0WGTdyv0Tdnv+Zl8zLLmuNFyP/ZXfWCzUQZ28
+ggB/8lxt+/2YnQ+pf4+MZTb2+y9t6MqCWeaMLFf45ImvC8j3DKUX4PgG+UPT
+KybqYaGast9ezPF8uEHUAxLvfdVMH+qfHuU0XCDxCvsYvuhPufcXywiYbys3
+U4/+v3vSZ8KAJeN5k+txXtly+aevknk1TMg2kHmW7npqAYs1lTxC4EcvTRfl
+oX/W2bdzDTB/xr074kkN7D8k+fIB+8pCNBO9YI5d44EXmjR/PPfCT9fVEf+q
+KlMKv4h3GdQirvfqZSLeiprjhgpqmJ+Coj6p67h8sbqCKp6HNt0ccn5XdC58
+s3Ie8nf88xLvP2rsbefdYyroxz/spATWN2jwZ8IikVqhH/o9c3JfT78y8l/+
+cP4V+fztfeL5Gu4xdw36HvMxr42RU8X+Hla7rgTe/m+HBi6xakj7Esz/mXPJ
+rlbiZJ+OELi4l/rojfw8Tk71YbgtXiXuDSzMqrhDnKNjURaBeoXqThVkf829
+In4/LHLXYpN4AlN2nhP64/eKopqQL4UaWxEPizun+/3hjCfX9h2Ghfce/vAM
+9VqPbej3J+sOEfkc2H92sHoW8WgO70YN+vW9/3wqDKbsh9SsyfvsFR1xjtS3
+7N1j8lyIWk5mlaB+Tmtw+kb43bHNa06if5FNZeMnnM/TmEi7XUqYr03o9G34
+9IRyp6EivC5mpgDe1shc0aaAePoRRufgH9XGfsv+CvU5G40/hGdPJMsHy+O8
+l9QlqCB+ZG2Mu5cc5vXuhuYeeFOUb2mkLPLN/Cr+mzyHvVFBt2SwftGNtwP1
+HmluUrCC1WW4zr1wSbYwp38Onqd1xqN70e+9aQ3zZuLKaPMheP9aWZMBWCC/
+/HUI5vXsgbyjJe7nKk501MGNT+SVcmCh4MwDDcxb3sl+6Xzkl1C5VevguqhE
+ldPE8lVbNsLmDj9HLkW9dKxGKfm8Cvu2KF+GRSfmtsvCi57VWmmhP5Z7vO1N
+xLcK1UnaAfc0HR/aBH8xu7vu3zA/f58H+X445VMmEwRTKjdvusCZfxQNMmBe
+tJ5ZOfpTOTj3/W+Iz3nmOG4Bt7DvFQ+gHk6cRSz5XLKOrimRh8WD2dEr4Roe
+9+0E+qXU0j+0Yt6nRkOimijsD/j7wVHyvRS8Sn/BLJvi1aUeCoFtRqnladNs
+ShLzUjmAnKdZ8qPpCTYlskq+FAsLVri6Zo1hvf7BSDF8sUzs5T3KprhJ11/N
+QT6/x/kvdo+w8b6Imw2DPQtaPjweYlP82pjf+uEI+4jnhVLEy3IzjED90i38
+w1WD2K99xHccpi/JL1OCOXNvDCeif0tzf39Tsp5iWTkJP9r5k9onWPxxOyMY
+82Mp+TQXI57whNWOW/Bk+arrp5CPa9MuI4VVRgMCrg6zKeneXQqK5N+jz/be
+qEN9nMShiTmwklh3uv0Tm2Ltuqzfhf0RDgHrq9BPz5lUzq+w7UirYPdn5Nt0
+Vt8afpJroX4f5qod9iTvldaQtnn3YOHTsYl1sIhlVrkDFoVmdovQz4J1g2VH
+EI8u8HQ1gWfc0+y/RT7151uP5mEeS5UZiy+gPtY3CuWGsMlNw4Sr6Ec63LOk
+FPNlVYv+6vyAeV8esg6G/6gICB/phz1Ux1bAqftt37e/ggucP5P3Bt/EwCuo
+i00xBxJNlsK8eY2PoltQT5ta+Xa458B3O0PFiP9w0OO05v//35Gx7n9XLfo/
+Yw2y2w==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.077403306263033, 4.30673387473934}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000002274`, 17.}, {13.500000000002274`, 16.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.552325660469876, 17.180083206945802}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwl1ws4lPkeB/C3miJsOwkhakS55DIJsYVXsbkU4xanJJWkVpnSZrZSUxGl
+llp3ZSeVW9g52Fw3kyJTsxqlci1Jsi41KnFQzvd/jufB83n+l/f7+83/fXl1
+doZ77Z5JUVQnvslvikl+6NHU/77UaCosaOflpTCXPhgQBzv+4qPDgWUt81sY
+C2lqSiB/LZbMb819zIU/m4ekPIBZi05wG+FGjyz9ectoStRQUS2vTlM1UW/Z
+/4JZXqXVZvDGtr0BOTCnZyR5Ldxq+8vaT8TqwiQyrs4pCbFdTlNBrGxdBTJe
+/X3CaThxi5KoCftLK7OuiWBhx5tOPlwzLWobhbt12DV6cEDP6DOWPk3RtwPt
+a0k9Bzbl0jD/eZbQFx7qbu3wgQWW+bHDqvCsG2e2wYlfzxtfgNM0KPZWmPLS
+qbaC4/gGw+4wM3dAPKJCU/2b46x+gGV1RVZ3Yf8ten2LYc4ji8lcOCmqZ8k0
+8nA3UEp5sOxFik0XLPspZF0dmZ/zWlANU+sWeH+Br8TNFF2BpY+9m9fhesGv
+pD2k3qA9cvY3YediOW0uqa8l2kAT+fNKGatCYNbpNW5X4bVLp2OIu5OD6g1R
+f3fVb4xDMEd6eWMVHJfuzToHC/rn73VBP49PPGy8RdY3fyxphnsnVoe1wfy2
+6/PcNfD5pvzzlYl6RCaL+irhbuH0DE9iL7OA+ZrIFS+flQpLee2RnvDa83eL
+ekj9b8848WCldOUOMwPUG9o+FA03Bq+uOA4LBlyrImG9lSPtDTBzIG+RF8y6
+lDimaIj1waaJanCoYd6ECywMPnuhEdcvEzuzTsLcS4t8wuDPvXVyBbD0xwDx
+HFgWzbwnhoPmKK6+inqCYte87oIp8bSKJayktTGiD5bdGHn4FP2Q5cYp9pL5
+ql8iTsDM0u/LX8CCeVtv2sAXshZ8rCP7c7aumQtbP16TmkvmNwyYyNBvkf7b
+h7Ekn+qJcOLP9w3f7Cb5n9IvFEi/31dvciTj74oW2sNl5yoOL4NZ9p/uxsPG
+E4LrpF7pswnf9zCrvmB4nPRLujtwF/LKn4hW+wCL7tOpfaQe/aQTxAI/kXYE
+6m09eGHBJJnvJ8uZhX5Z18/+UZnkix2pukzcl8CwJPWvNfuouQg56iJqdsL8
+v16tTIUZRtpBGSSfnNHbmVrIfb/3UDtZ/4nL3gJrOd3W0DHCessYrQw41LnV
+LAwWmbeXi2D5waHASlh40cX4b1gyf7HNnBXIF3qwsRYWMDg+HJgT6DiVDl+4
+arg7GaZujDgHwq3r7/k/JfOL2/SYMG3U9ZO8McZ/F7eUIl+ZZrrdKljWYbbW
+HW516HjjBYs8d+T0kvrMcgZDjMn+PvHHYd7hb3vCYfayvV6LYBX+kqEwmJ8z
+pNqAfjk+VzgbBAvTJveegis6KkvcYFrV0dCTnO9NRzax4USPNy7WpL83Fhxj
+woIqhxriIMHIpffISy8P8vUm+5m0TEtgbnBcfSwsZf5pWkzq5YszW4g9a/cm
+wawY9c2rkUckyL53itQbtSOqEJZqBU5HwonP3SVmqK9w+9njPLL/CdXtNbD0
+zRv9aJhpZDawEf0RuqkdzFxBPt+s0Q7ifqHTHVhqulwzWBvPm8tyykNk/ap6
+225YReP6A13SL+0Widti3N+Gqv/sgqXV64azYYZ1bkYBGb9bkd8Dqx8yLB8l
+9cvfVp67BM+3uPF360wwf7m9jypsMG1cmwALubq1crDK2aYnbbBg5+H611jf
+mNX+YrEp8s3ePHAT9hd/qA6ABQVdN/3gG71RNZdgyv4Hu0nks3blHa2BWWFt
+qcmwf3jR3E4y/49r31bA0Tnqkx9g7mDOwD1yXl5W7RiHhQdH6nbCjMj7zaMw
+5zPj2nfEdRpb/oH5ppKFYvQvqf8orwWWftxDpcN6JU/lK4kdFnvw4cTm/ex0
+sn6u20di/w3vnSLJuNn9mkxY3d6o3Jfsdyw7QAob/2ds2Irk8XgeqI3rpdWu
+sNQm9awIsufD0oUfshTgxPjImFFy3nddGqZIP4J3D/BQj1Lms5MzYHbZ9nOz
+0Q+DrnSH72CRzF0tBa4Zjb6mB8t+U9dYhv6qPzC5sIHk8XthVAQHGX8K+5ns
+/8UwXYWFenSPWRTB479dcHeFjbMSg4dh2tJL/DPcubiDZWGG59ChqoRkmH23
+bP1J4gzFW3kw19jyiASmY7aVFMMpn1beVGKjD1z241w4w9rq1krY4MCV6iSy
+Pr9Z3wemqkyqjsDUX2rKEXCanjjWA1YKVD13ER4vsXLWIfm0hV3ZMPu9f2fn
+EvJ3b31GCRy0UGIfAQu3iWNrYEHImLkivC+FFoqIo85rFaAfT4RrAmth6bCd
+qi88Uz9LoxLmVEqKmXC2x61rxSSPpEFEznvfYH6vAGbyMm0b4dD6X0YTYVFL
++nwxfPhRwvRJMr867Lte2I56ZRNO5ssmO9Wx39CvdNt2mA7VUAyBXed9mulN
+5kc1zxfDW6jGWhdYVpB7xA55nygnyBzhbs3okbtwawvt6ETq9/Rw10f9pqp+
+bDfigtzkcFi+IW9wM6xe+IdyOUzrzgoLhbnmOsqTcL9BZgjJJ2yql7PRoanz
+Z7y8M0n/wqcKDsD9B24dqib5XrkyM2CvdoPnL+G8ks47lXD3WM0+xkrcV/e+
+iSSwcEMzYwWcF/uy+AmstG7Hfk+Y+0il9BFcI0oKP0Lc2hhXAX+pcuhLgxuH
++RFkfwXFO43lsOCvSXYEGa88aPWE7B/977eOcJN/Hv8dzDN+wVCG+7JXmY/B
+BrTMogv1vNQ+rzLDHLl6lprnw1OpBuazYfXFGX/wyPlT0Ho+C5bSm2zcYTXD
+yrivK8n/AScWGsPjYTlzP5HrO7AtyXkP3XRsw1tYGFKkIA+XbfbyfQaPj6ld
+JJ55uy7wPswRF+qqwbKcBxmlMH+d63U2PMfEwO4GGV/vwvEj51dnbH8q7Kx+
+uy+OfD7pdea/wuoNvLx7sPuimfvPwf7ez7izSb9MnB4RM6dCJW6wxC2xLgHu
+n5GmkgQLBm3PZZL+2dtc7IAptasqRaQfp1edWbIU535nqAbJ5z/5575tsMyB
++X03nHi8cvIynPek1JJCP5zXxLvdgbW2xGTpwnzG+p4u+OHWtVYucNxui0cy
+uMCS1RwOi2Kyf/9C5jvrWacQV9jFf4BdK09bVcONO+1dO2H+LtvcLphK0tMh
++/cUD5+agmVpZ5tS4DvvvPvUVuF+vngxMhQ+XK233BjmNw8lWMINDrmSNXAj
+N/wOBfcdbbruBHOnnWvJeaO2Jd92gWlOpNMVuNf8DMcZDn0c33kQNnq6bcKB
+jOebSjzgkErTw6thXlTGt9Xw0cGuQkPYeZ7p4AqYGS8q14BbU2adNYZfNieI
+5GER7WT5A9w5w+PbGPILv/0p8YGP3C+52Q9blwoSjsE8RnZHB5z2daFNEWzh
+sCfvCak33Eihn5zXMp2hv2F6S1iXIeoxF435NJH5RVN2XLiQx/NrMSfvK+Ox
+FfC3x6cMu0n/2w2mpuGArN7aEZh5KLt/vS7y675uIvkqfCfunoJZhUf+1oPZ
+affocjjbf8ekIyw1WHCsB7YeOr03lPTDbfg/M/DetHGvP+NXWBhaKFaBFWzl
+BGVk/r78aE3y3tVzdHYH6bd+sd8CMk7e0yxwbv//3vZfCgDy3g==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.318520523989797, 6.302976613356011}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJwt1gk01WkfB/A/UrbJbSbLyHIlspMtpqG/JYQpW1PWsYWxhDaUqRtmDJP1
+teRa0qByUZYiMrqiV6GUUXJL7lCqmZabrqik9/vMeZ3Tuedznuc+z/f3/etf
+6iFxnrtFKYoaxh/ySS19xo8GTQnIpxxNLQ4JdzmvoylK6aaPgzxNObcrMIth
+fmxp4R7Yodf25AwctGFAMgUeuPr4k4UmTeV9cfJINKxdI7U7HXYXdptaw3tN
+bTWGYPqt+NQszmcfrr8lrYXzM7tqcuGh4MxQW/i2u9uIAvxM0BIQDefFhl7L
+W01TMXf7Bn+FqySsSylYkCvtVwrTXREPY7/CPTPFfhVk/R7PevJLmlI8atdV
+BDNU91n6weWhM0tpMLNZrOfpKnzfb4tmFMy6vPxjJtzZwylxgeNHaue3wAcZ
+ycu1Yf7MtlRVuMVY11kcNk764dNqeMEozvwJ5mFF1LjrwI4VZj8PwMbZv/3t
+A9u89+C0wwzGwp/VsGpu0YVzZP+qK3dFkSemutWiGY7XetuYQPI5h5hwYe6W
+AM+/4aVdFdIPyX7NB9+GY77Cu61py3C/e+fEH4/gR+cCuizJ/A+F7t+hj+Jf
+Wu0SYcHUN6/rYTevI+rdpA9Ott8czOHNv5dajzynb4dpot8c9151P5g6/kbJ
+CmbqV/fVk/VahtAQbmm1lfgA58W9m1wOl3s6Gdtr01TTTr7zVZznPDzHTYep
+A2yRMPi6bkFlF8ycv64uIHmjZLWfE/tojkTD7J6zrpI62H/YRnoC84WxwguV
+4SbXua0ucJfktJEGLPBIsO5EX4p2K16okPV+9l5TeG3jA/2VcJCMk0gXg6ZS
+Sl7z5kieVMPNPrDnTnPXMTj+eHKKLLx608/qF0m+9wnsXlma8mZ+a1QABwnn
++qphi1Nl2xNgLuP28yuww9+N9jtI3qh3PVL4vsPWA7k0bOwxVrYdlldU8zWH
+b3d6/8aBu6oGPYkpE+ExefL8R+3KbMm67JPSbPiEaHWHL8zyLwiSxHy+N7rz
+WSTfTR3tNDgl/Uh4C7lfZ5W/EL6+02z6FcyQVR39Hn1RSbH6ZpjX+Oi+tbUw
+Lz9m/igcr6x/nwdnXVt3Zpj0aR7zhxBOn3CMZerCK+Q/kP6p6u7YOJi/UsVg
+GOZoTU51kHVDj4Q8+JbIfvoTLJDZvX0jvJj+0WujHu67yK/oRx7e1YSgcJix
+vtjdEW763c0sE84LXLLqwHxKvALLk7AgvKRHC/5ebXvSWZjPeFpQhH76uCJV
+tXBQ89qtMqQ/C8W5Erhqzm3jWvQ9oje25RjMkuxQ9VpJU+c+p46EwtxHz4Mv
+fEFTMjNPje1gaq6nzQ1u4NXpqZH9Z4aVmHBM8ftKkp9W4FUZwcKDMd58mHV9
+W2gy7CLOnbwBV2VsKl+AJeQcj3TB3Ie1f9XiPs/pwg+kD3pmS1oi8kiM8Yt6
+YYZ1qugG5E3SUF0Yh4OCFHc1wC9Wt64n97mLqiutx7xdoesy9Uk/l9hn2PAh
+S+4M6YsbXNZJoa+c9KdHOcQdte1eMP3GTG2O9Lu/UJgD36v/0cJBH30Vlb49
+R/avubJUCBuHROQ2w4/blpU/hpkfveSL4bzcm7SxAWzB9AqA2QXTHgfg21Wz
+qeT3a1np5oxmWFAmblWJPPJ3HktMw5Ri3AYmed/pm/wiYYjnuMNGjjyfVzdS
+HdWJU56YiME2Wq4mBjCr+I3/FPrRtaJH9Yl3RvoNor9LPxzyJPvpEN6KWzLw
+sX9+kIEpf+O+OWm8P8f5WgKS7/JpFTdYtLjKYJhYIOV9XwrnD/1k0QBzPeSW
+KmF9v3fKWcQtu4dPwQWp/2mOhoPKPqdOwv9N3lHsRSzz/T9eOG9mR7SKA8y3
+UV6/ALtnPtDbTNa96YWryLN4Ilfdkcyrc82yDnm7O970+5D999oiKjGPw6YF
+p0Mw65iDUxGed8ussvYZ2D1S0Y7G/AcnfD0n4fhPOufr4JbRGfV/55V/tU4E
+/e0JfpcYRfrayOHawnRkzr1LZH6LCm4EHPVsOUvSCOuZaa3xsO/mi6U+ML/t
+cIkfeZ+5LHc/DQsGeme0yb8vgZs/vIDzus7l83CfWwujUs4Y/kZ1Zh95fzGm
+8o1g/tiewVnkPTiqcMoeprz6v/4L86iFdAd6wCzZCaUrmFc6cbBxF7FeIMVG
+H4+0j1/1IS6w0DiKvupFVzJ3wFzXG76H0e+TbTX5rsR6Bb5sSZpK7n/AtCH3
+hZipzkjQVNE7PwlDsn7SPjocvr7dv0aZrJ8UjWPC27ISgqVhZqkgRR4u1vx6
+xzzmqfIPeuME5yxXOTcBs0aPWzXDni/PmA4Zkb8HfZQb7nNsXPO4D6Z+3c+S
+RR4X6W3WN+AgpsJrARxo36DDg5l8tsRj5G+yqxWS81lLiXUPMN9U/UGNVeR+
+99H9A5hfJWO3nD5c5XHkp2r0o922RsaNuCb8uS/6O/+j8rJ40p9yesYMPK5q
+119M/NpfWw19R6UxFrthgXVTuCG87Ok1i6dwULJFI1m/4uAtvXID9ocMuJDv
+XwsNVDMhjqSnveEMlx2bPOEqc6UN+bh/3mXCJxZm8Uv/qEa+F13tF1LJ/kVq
+bQnyV89n38qHuc/SjyViPvsm9WQ2sdjwaw/MP3SicKwcZmZVDpqiL4sajn8p
+Oa++XU4Xfb63UbmWR/b/kjxEr8Dv229OK9PJ+YlW3qnLkWPk1I/74SBH/tt3
+4jRVVsExCIXptC0xNfBL58U+D3I+c9/5bHjpr7ByW3Kee+TlFrg2bYphBvP1
+TdgMnOd4MSJQl8wn7pNxCuZE2eZpEvffsAzA/VmN0/u0yPejfneyQr68tt4c
+A3Jf2MVWHeQv6rmisInk13U8rI75MtdECreR7/NZm7/C/K5zrp2RJP/N7Jdv
+4Nd/Wl3IIPfvnwltRl/1qRv+4ZDzv+qRdkKfA5xikzvEoZ8COXDCouTG92Qe
+SaHXXbJuaJCrboL5zUfr+mDjrp9uOsPcT9dXJcH8gLCCWJjfMGEyi/MPlRdW
+5JD1l3G/WsL3DvInOGS9874yef80drQf6YGZ4x0abshfa3h29g5MSc0nGWE+
+p1s+Hx7AVY2XpaQw/7H2c2cmybr5O/Pn6GuifNJ/AmaxA1R46DfAoKr/LnGR
+j9jzZTT10DTz/g2S10XkPBNWtjVv74TpkrHpTDGaGg4+3VpHzhMuzerCKkWN
+5idI3lH/6BVwyqBmfQbJl1XxQg2mX00dSCZ5RDzU9sLVKla8PeQ8vfSRBZjX
+v/Aqktg+2LoB990Zr8v911+yg1PJ819o9SD7qQFuZhzy99xZTDlELPCcCMfz
+tn7pI5FNbLhezA/zhuiKsWtJX/mWAzbkfZJOHe8leXqTboujr+hYP+ETkkc7
+Wq0WrolsaJI2Jf9/H2wjzz9sae9+U5ipErHkApu2pY77mZL3QdrXTvBWj4sJ
+acSbLimsgK9/Jzp+FmZl3aGycd7hWvn+AfJ9Z5XLE7j/o2iO2jOY+rj3JgX/
++2P2/08J+n/oho2Z
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.45429484366825, 2.671979374673003}, \
+{0, 1}], LineBox[CompressedData["
+1:eJxFlHtMU2cYxg8QkFERSFG59dDTc06lMCVOqsAQXic3I8xKQoqT65RRhImM
+gVoYFxGcCgPSIPwxucwLpKNctYMRZIyrDLlGbmFQjJAKbOpkOrPR7Gs0H01O
+vvzypt/lfZ/noT5PCok1JAjiJPr067sfA2quft0BRNXpgbbfaPhzTvt34UXE
+5RbPm27R8LS8t8HIeCcQlm2FJtdoSKwM4rrfRCw5eoibTUPniHVMqJcNEDYJ
+vZH5NJjFN3k7zSGuTZtQfE/D1wakOiXNFojom3fyumh4VPPVT37GdkD8sqzx
+eUVDdt2LHwJy9ZyyjXJloEWTWmayhpjYfVCXzEBkRnKTq5c9EIFGz4JbGVgi
+5WYdyYhb055IdQw0W0/aWBUgNj2vigMW4jtzNnTXEfO/VOnkLNTz+o93piAe
+2H7e6EdUHy00H/dHnF3av/qIhZkFV8eRDxBrBrTziyxIDn9xwOlXdH65rGl4
+iYWejiLuQiri1rbhvBkWivOaXdxcEJ/LuKHsYEErE1mGaNH7il94qhUsmJ+6
+/vxtM+LR9SlNBAvO1oMqcTFiS1GckSMLJ/NzldzLiC/c3Zs8ywBb8c9YUom+
+P/YPBxUMNMhmNENtiBv7nw19ykDbZLjWZwPxdNg8z4KBb6+dFSV9pj+f4DpM
+05DUbBR2exgx/+PUxjoaaoUNkpeh+v7IzHYV0eATf1wSu4o42nvCIoeGyZbv
+fj921QEIUFeLcmkYr8ieKRTx0P2lRFgpDSfKDG/N9SLmt7TcVtNA+/ot7Qkj
+kT6UXUFLNFzYUq3QzSI2XQmeJhmIX9/aXnbEEe3/oalXNAOtBU77wqoQa7zj
+DO8yMJhOjmrmEJvaXZKvMaDsakgX6xBrz2xdcWUhf3rtUKwhH3HeWGciC2t+
+UYmZf6E6382wp5KF8lR5efagfj9Z/+E+Fv7YRrLCEsTTO4bE8yyozGa9Go4i
+HlCOhC6zULBdr+fN+hm+sFtyj8T/d3Z4MjtzlsT7Z93Pi8sSk/h8l6UqRY45
+ie/HkQszxP/y8P0jPpFcHjQg8fuCGxZdHWkSvz+6YmqoJmqzP/X7X/nK1Jv9
+q6SjEg1YR9zf9eWf7cZqHHH/Fx5m1lvx+Hg+dJ8P1yOBj+dX3e5uFdbOx/Nd
+i56SBptReP7ul2qlW0IprI8hJ92EqpzC+gkcDUwYGKewvlyVY5xoAwHWn1uM
+osiWFmB9Xuwz2hl4QID1GxnywPn1QQHWdxrHXrSkr7/Xv/FpT9NcoQD7wyZm
+9c0kR4D90zMuXIldobC/lPvd0yx7Key/cE3Q09UKCvuzkpWds0mnsH+luz3e
+3ginsL/v5ztI+f4U9v+U2CeH8KRwPuzjlKa88aBwftiadMupAArnS7g0YJc2
+hsL58xHrd++/qxTOp6DOK3vCH1A4v+50+TMRGxTOt3Hrl0yfrwDnX1ZwjWa1
+RIDzsU6VeuzxogDn5+PeE69P7aVxvtod4TllfkPj/LWu4Rh7dCN+n8+NnHfr
+//aCKUQ=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {9.0548, 7.75}, {1, 0}], 
+        LineBox[{{6.4999999999976925`, 16.}, {13.49999999999251, 16.}}], 
+        PolygonBox[{{9.4, 16.}, {10.6, 15.6}, {10.6, 16.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 16.9452}, {0, -1}], 
+        LineBox[{{6.499999999996362, 16.000000000005457`}, {10., 
+         10.000000000003638`}}], 
+        PolygonBox[{{8.552322615314452, 12.48173265946094}, {
+         7.602165824326175, 13.316718930329426`}, {8.293188945044921, 
+         13.719815750748694`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.515942703607428, 12.823799910437668}, \
+{1, 1}], LineBox[{{13.500000000007276`, 16.000000000005457`}, {
+         10.000000000003638`, 10.000000000001819`}}], 
+        PolygonBox[{{12.052322615314452`, 13.51826734053906}, {
+         11.102165824326175`, 12.683281069670574`}, {11.793188945044921`, 
+         12.280184249251306`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.484057296392571, 12.823799910437668}, \
+{-1, 1}], 
+        {PointSize[0.04], PointBox[{6.5, 16.}], PointBox[{13.5, 16.}], 
+         PointBox[{10., 10.}], PointBox[{10., 5.5}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T1", " ", "P1", " ", "N1"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdgeg/igfhfihi.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdgeg/igfhfihi.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {0, 44}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwt1gtQU1caB/AjtjwEIshDtlAQzAKuRUOX54rJpUKxksGAvCqMIiOIGiVF
+aYMiG4Uqsm4LiDa6FHkEDUIhIkKwyvAqRJYuEW1BsBApICLViFgDIuz/dDcz
+mczv5jz+35d77sQxPjksQY8QkoU3/STqRbz+xJA/XhyGjPyrNboQLu755pBq
+PUOazpZyXOBV9iuCLsDpaYrCMhuGmI2djjgMbw8uDbGCxS3EOAa2bKkVSlYy
+xMfqt/AQuIj11e4n1livwFlK/TDQ6/twWNpVVEXHd6RPDnZYMSTa1nKYrld7
+0XliE2x4t0onhVPO/pDTY8mQzdku/A446aqbWghry8xVc3C7p/e79rDqaZH+
+e8ivb+FZNGrBEGXUpnZvOH2fm0sLPH8hPigCtkv4beN1uPvFmN9nMCfV+3wj
+LCs5F58DW68aMuiFp+62FVyCB+Tul2dhxXeVAzUwd65l+AO6n2hBdBMeXWZX
+vgfWPF7b2wRLkoYKyuGCEya3bsE7/vPx2hHYJKvmwzo4x9rzpQ3q8xtbJymn
+eWe/rg+EZaoc9zy4UL5QuRtmX6w2E8MaG4PiFNqP2xrbGJh/rHflAZhzY/bI
+Bjjfz14YBgvu96XQ+rd87DHoCGt81tdMoz9TBi55g9hf/At/vha+qP69XAL7
+REljxLDcqc7cAm6W57ED4bkAh2/OoV7pgu8OW7j+TVW5MazOZVXMr0OOpV4e
+aSsY4toZ6zYJ9/ePnxsxx/2gqPlqFO41Dgjmw4rDw6NPYTud/92bZrh/uKzv
+F+H0rkzRh7Dg628tHbC+X8OV9w8uZ4jOffyLzTTvxiIjKQv7eXEX0mDxC/uX
+j02Rb6Qo6Roc+0vTP3bBYvYynylYZLqzWR9WcLeNWqD+OBlf1meC60LPBg5s
+Kf1C1AvLDpl/EgyrvDvPv4TnD6oS4+HmhMYJT8y/df62Xiqce1Lekw9rqgOZ
+E/CUJrxAD3lUU3rHTsMzaypq0+H2js4oer+0p7l56WAP3Y26LNjPiWsrRD18
+/QNN9Pdjm00oemB26obRRPiZvPSoKepvDk78aStdn7gdXQ1rHG6mecCiyEfv
+uMAmofWPrWCB9SLLGpYEHLk2iXpNGpQPh7CeujPPW077Me7ZkQA3PxOy9sCu
+se1ercgTPZRxfw2sjl6Ieo164pZkvp1G/038P18wok4bbGiHmRWbUgn6IRVq
+7hfDfJfLviPLcF4vOt7IhsXziooGI9wvXSLfY7BrxM6K04aYdzWqMQPWueh9
+tMuAIRMDcYtnYJsyKyZIH+OzYoOv0PkV393b9C7q6ju1vZuObz/lveMd9PMB
+N3UO5gxnxxcuxfWSsuPrkTdr65sOPVixVfTeXjj3QbBTgR7ytryRy+D+a4Kd
+obDP9sjjw/R5pIk54wt337z8d2P0K2Bf5tgnsMbrn6Fsen6Cq6ePwcrhj6x9
+YSHLQdkDF/ZXPtgMk0zha2/s90Gh/lAYnR/oklENy/6qK4uEmc6fM/6CvLGP
+pp9vg5PasrWlMP/Kre4tdH7NuJaF+nQBczn0PBZnVbATYYms7bYzrD4RsaIE
+5txL9DClz4eQhEONsKvwb7/S/HLDQ+KrsKKN7V8MC1qPvBXBZlF7zHbAhg1v
+K41hw09lc/Q8svn5Rkexv/hkjPwh+qfm+ae0IK/GykRWCscNPl0YQX1aq0Ku
+CBZtVEePLUG+Rc7nQXBSKCu9h2D8nRzNGjpfnN8XtsgjysruCzawoGFD/et5
+HlnVcNDHElYI/L+9NMcjuSGDHXaw9ssfD8fqeEQ+8bbVna7Xd9Kf9zuPKKY7
+V4fBqtr6/VEzPCL6OXl3Orzq15mVtdM8YvbkeUE1rIz+TPrpCx6JmzVPHocl
+4ifz4VqM73JKdkR9zVXLz2x9ziMaS//nsbDGoD+j7BmPiOMdAs5TlzxeWgRn
+7yUDXbBkIdyPg/Hq1dcFOtqvn1gHnLBedkLNFhb9/dtaMjVwVkzmPH0+KoI8
+f2jF/u2apBJH+vzPrTZWIp/4wJUhakY1FV/9kkcMD1pcsoWzS8z/fRb1qJbP
+WCyHlVqj+chXPMLZ358wi/3IvXWOE/DmU3O7aB7lubVf+qIfTOf1V/mw2d4h
+ZwYW2CkjIqgvj3BmMF6ZZz1nQfPPKkJCYfGf92Xepf3Krx+MxH7Ni6FFubSf
+jrsmDZBH2ZU4vo2ev21qp/3ILzk9ced9en7MXV9Zon5BTnSy1g3rSUzzxiZ5
+RMq1L/oR1rrXpSSO84i2xaOyHubcOR7R+Aj9Yl3fV+VG+z2gXjqA71d3O9dQ
+L6krUKmxnlZe2AQzxvf0Wc3oZyB38YHb//8nFN/+3+c65r9ilhyv
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.907871335428632, 17.11903631971389}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt1wk81HkfB/B/jpUjR+4RjeOpRO1UK6LMn4gtaqhcZc0KW4ihrKdc07Ll
+KhN2i20zZTt0aFRscjRSrQhDJKuiErrWIDnj+fye5/F6ef1fb7/f/3v9/jP/
+Mg6M9AyWoSjqIX7JlRqbxY8pTf33R4empvxz02phzsFFpce1afELE2leAsz9
+IbTcVpum86PFBSyYdmqMm9WiqXEr893dJjQl+st67BXsocmayISZ25LS+7Ro
++o7QYs9amLNNtk9Rm6bWnPEulRrTFMu7U20T4tcIbuddgTmDWxLPYz1SITY8
+Gqb3Bbno6tD8p+tjZtbDPceKA0/AvvaKySYw/7Xb5EJdmm5K7UpShQXVuQ+K
+dGn+AbsP9xVg9aqyyGV6NNU6oLJ/HizJtJUW6tHi9+evyRjB4jnmI1/p0/ye
+leE+1jDz7egSD32aaj63uM8Llrr+eSwRTjMOfniAxMsYLMzUp8WcrJHhU+T+
+2/qZB7E+3214SxWp13M141t9mo7ZoTDSQerrrLo/qUfz25gFdu9I/uijaTmo
+Z2vN4okhWJidWqyHeiw/RqZ+JPdrVqQIUP9mjYK3XTAvoURVRpem1N4UNFaS
+eW3/sXC/Dk1PVLjmC4gHmJmDmFcsQzHYh+R7ZHj2AFxntatXm8Rv3jKih/le
+ujri08DEfmknr1WLFj/2souMg0XL264UwWERYgNzWDIVdEmI8/sQ39JXvBB2
+vnv3TziQ7SinCXOyUoQf4fTtU+tTjFDv83QPtjbN1xr8p0gB5nsmRVyEXY1y
+NpwxRL4577ab4rxGb3CpbTBfqTy2CM+XXdNQuDEs5bpeXYV+F2XWVSiS/ZOb
+8m7DsdadN5RhXukvStaYn5fPWK0ZzLRM33kWHtBw/ZcHLJhdLfmMeX736t28
+TJjjwu38Gufhs2DFUDOJ5xG/YyPOV4+tUK+D+kS7wx87wcZrLof5kXpza8MW
+wvkHf2zLJeu/Z0x2If78sZBEMUxtPD+QAGusZRU9hXnXteSUkO/85EheJ3F4
+Gvswzsc4Y1Mj2S+WPRc4gX67b8noH4Ulw4rXQtGvDLe6wp5YUznpJc6nMKrC
+twP1iTLmvQ7CvJ5mSvp8YcmbOscpLZpv8U9HYv0CzCdhp8Il+LI0Z/lymK9Z
+4RmD+TNshq6lG2A9z7YuAO6qXGXYx0C8MNaeUOx/4ahTsAHmje8/kot1l77F
+jOuYi3QmuakLfnqoqnsZLGqrDlyL/CuDT4VUoy+m0TLtEtQXc8tA7QdY5CZf
+tAr1/x7WPWoOcy94L66C200yOhRgyvjA2g04Lzq8/ysKFpxzzf8L83AemYpR
+h1llS/xsMb9eZmGLFcwLzfA9CV+kzYrDSD7KJvMZruKwhLtXcBUaTbFlcR6v
+HBy/HiF/z1+9WQl1bij1bbTBVXj8ls0Q7q9hxfNjYU6EN6sc+7rNjNOKYIn7
+pFwwvPJEdstDWFDxenYc9Q18NlzZBvdo2lw6CCePN1+8T+I11/wkxXm5VzUf
+OgXzbj45/z36mzfXLsIHpk5/jG7HfK78siV1ktTr2LtwK8y1uej0MyyZYQa+
+xLzP+nt6TKNvickfaocxX3bK/qAgmLv1Tosz1pMdDL7cRdyegqN9prBbW7y+
+ESzI2jdqjP2fXI73xWHufMbgOBvrfu9W7yXfoxTvpX08rqajdg7euApKNic9
+xlX7aObqbk2cp0PgXAfcpxMTxUyE+U27v1TD9UudTq+GhY+iz21Af0rdLuOK
+MMeMf1+CvEF3ElTH56Mei7g5XpgHx8/XbxbmTH20b4ajJGtlDbGftt8gtxp9
+SmsuyrmTeEaXmlMwf13GwqB0WGTdyv0Tdnv+Zl8zLLmuNFyP/ZXfWCzUQZ28
+ggB/8lxt+/2YnQ+pf4+MZTb2+y9t6MqCWeaMLFf45ImvC8j3DKUX4PgG+UPT
+KybqYaGast9ezPF8uEHUAxLvfdVMH+qfHuU0XCDxCvsYvuhPufcXywiYbys3
+U4/+v3vSZ8KAJeN5k+txXtly+aevknk1TMg2kHmW7npqAYs1lTxC4EcvTRfl
+oX/W2bdzDTB/xr074kkN7D8k+fIB+8pCNBO9YI5d44EXmjR/PPfCT9fVEf+q
+KlMKv4h3GdQirvfqZSLeiprjhgpqmJ+Coj6p67h8sbqCKp6HNt0ccn5XdC58
+s3Ie8nf88xLvP2rsbefdYyroxz/spATWN2jwZ8IikVqhH/o9c3JfT78y8l/+
+cP4V+fztfeL5Gu4xdw36HvMxr42RU8X+Hla7rgTe/m+HBi6xakj7Esz/mXPJ
+rlbiZJ+OELi4l/rojfw8Tk71YbgtXiXuDSzMqrhDnKNjURaBeoXqThVkf829
+In4/LHLXYpN4AlN2nhP64/eKopqQL4UaWxEPizun+/3hjCfX9h2Ghfce/vAM
+9VqPbej3J+sOEfkc2H92sHoW8WgO70YN+vW9/3wqDKbsh9SsyfvsFR1xjtS3
+7N1j8lyIWk5mlaB+Tmtw+kb43bHNa06if5FNZeMnnM/TmEi7XUqYr03o9G34
+9IRyp6EivC5mpgDe1shc0aaAePoRRufgH9XGfsv+CvU5G40/hGdPJMsHy+O8
+l9QlqCB+ZG2Mu5cc5vXuhuYeeFOUb2mkLPLN/Cr+mzyHvVFBt2SwftGNtwP1
+HmluUrCC1WW4zr1wSbYwp38Onqd1xqN70e+9aQ3zZuLKaPMheP9aWZMBWCC/
+/HUI5vXsgbyjJe7nKk501MGNT+SVcmCh4MwDDcxb3sl+6Xzkl1C5VevguqhE
+ldPE8lVbNsLmDj9HLkW9dKxGKfm8Cvu2KF+GRSfmtsvCi57VWmmhP5Z7vO1N
+xLcK1UnaAfc0HR/aBH8xu7vu3zA/f58H+X445VMmEwRTKjdvusCZfxQNMmBe
+tJ5ZOfpTOTj3/W+Iz3nmOG4Bt7DvFQ+gHk6cRSz5XLKOrimRh8WD2dEr4Roe
+9+0E+qXU0j+0Yt6nRkOimijsD/j7wVHyvRS8Sn/BLJvi1aUeCoFtRqnladNs
+ShLzUjmAnKdZ8qPpCTYlskq+FAsLVri6Zo1hvf7BSDF8sUzs5T3KprhJ11/N
+QT6/x/kvdo+w8b6Imw2DPQtaPjweYlP82pjf+uEI+4jnhVLEy3IzjED90i38
+w1WD2K99xHccpi/JL1OCOXNvDCeif0tzf39Tsp5iWTkJP9r5k9onWPxxOyMY
+82Mp+TQXI57whNWOW/Bk+arrp5CPa9MuI4VVRgMCrg6zKeneXQqK5N+jz/be
+qEN9nMShiTmwklh3uv0Tm2Ltuqzfhf0RDgHrq9BPz5lUzq+w7UirYPdn5Nt0
+Vt8afpJroX4f5qod9iTvldaQtnn3YOHTsYl1sIhlVrkDFoVmdovQz4J1g2VH
+EI8u8HQ1gWfc0+y/RT7151uP5mEeS5UZiy+gPtY3CuWGsMlNw4Sr6Ec63LOk
+FPNlVYv+6vyAeV8esg6G/6gICB/phz1Ux1bAqftt37e/ggucP5P3Bt/EwCuo
+i00xBxJNlsK8eY2PoltQT5ta+Xa458B3O0PFiP9w0OO05v//35Gx7n9XLfo/
+Yw2y2w==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.077403306263033, 4.30673387473934}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000002274`, 17.}, {13.500000000002274`, 16.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.552325660469876, 17.180083206945802}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwl1ws4lPkeB/C3miJsOwkhakS55DIJsYVXsbkU4xanJJWkVpnSZrZSUxGl
+llp3ZSeVW9g52Fw3kyJTsxqlci1Jsi41KnFQzvd/jufB83n+l/f7+83/fXl1
+doZ77Z5JUVQnvslvikl+6NHU/77UaCosaOflpTCXPhgQBzv+4qPDgWUt81sY
+C2lqSiB/LZbMb819zIU/m4ekPIBZi05wG+FGjyz9ectoStRQUS2vTlM1UW/Z
+/4JZXqXVZvDGtr0BOTCnZyR5Ldxq+8vaT8TqwiQyrs4pCbFdTlNBrGxdBTJe
+/X3CaThxi5KoCftLK7OuiWBhx5tOPlwzLWobhbt12DV6cEDP6DOWPk3RtwPt
+a0k9Bzbl0jD/eZbQFx7qbu3wgQWW+bHDqvCsG2e2wYlfzxtfgNM0KPZWmPLS
+qbaC4/gGw+4wM3dAPKJCU/2b46x+gGV1RVZ3Yf8ten2LYc4ji8lcOCmqZ8k0
+8nA3UEp5sOxFik0XLPspZF0dmZ/zWlANU+sWeH+Br8TNFF2BpY+9m9fhesGv
+pD2k3qA9cvY3YediOW0uqa8l2kAT+fNKGatCYNbpNW5X4bVLp2OIu5OD6g1R
+f3fVb4xDMEd6eWMVHJfuzToHC/rn73VBP49PPGy8RdY3fyxphnsnVoe1wfy2
+6/PcNfD5pvzzlYl6RCaL+irhbuH0DE9iL7OA+ZrIFS+flQpLee2RnvDa83eL
+ekj9b8848WCldOUOMwPUG9o+FA03Bq+uOA4LBlyrImG9lSPtDTBzIG+RF8y6
+lDimaIj1waaJanCoYd6ECywMPnuhEdcvEzuzTsLcS4t8wuDPvXVyBbD0xwDx
+HFgWzbwnhoPmKK6+inqCYte87oIp8bSKJayktTGiD5bdGHn4FP2Q5cYp9pL5
+ql8iTsDM0u/LX8CCeVtv2sAXshZ8rCP7c7aumQtbP16TmkvmNwyYyNBvkf7b
+h7Ekn+qJcOLP9w3f7Cb5n9IvFEi/31dvciTj74oW2sNl5yoOL4NZ9p/uxsPG
+E4LrpF7pswnf9zCrvmB4nPRLujtwF/LKn4hW+wCL7tOpfaQe/aQTxAI/kXYE
+6m09eGHBJJnvJ8uZhX5Z18/+UZnkix2pukzcl8CwJPWvNfuouQg56iJqdsL8
+v16tTIUZRtpBGSSfnNHbmVrIfb/3UDtZ/4nL3gJrOd3W0DHCessYrQw41LnV
+LAwWmbeXi2D5waHASlh40cX4b1gyf7HNnBXIF3qwsRYWMDg+HJgT6DiVDl+4
+arg7GaZujDgHwq3r7/k/JfOL2/SYMG3U9ZO8McZ/F7eUIl+ZZrrdKljWYbbW
+HW516HjjBYs8d+T0kvrMcgZDjMn+PvHHYd7hb3vCYfayvV6LYBX+kqEwmJ8z
+pNqAfjk+VzgbBAvTJveegis6KkvcYFrV0dCTnO9NRzax4USPNy7WpL83Fhxj
+woIqhxriIMHIpffISy8P8vUm+5m0TEtgbnBcfSwsZf5pWkzq5YszW4g9a/cm
+wawY9c2rkUckyL53itQbtSOqEJZqBU5HwonP3SVmqK9w+9njPLL/CdXtNbD0
+zRv9aJhpZDawEf0RuqkdzFxBPt+s0Q7ifqHTHVhqulwzWBvPm8tyykNk/ap6
+225YReP6A13SL+0Widti3N+Gqv/sgqXV64azYYZ1bkYBGb9bkd8Dqx8yLB8l
+9cvfVp67BM+3uPF360wwf7m9jypsMG1cmwALubq1crDK2aYnbbBg5+H611jf
+mNX+YrEp8s3ePHAT9hd/qA6ABQVdN/3gG71RNZdgyv4Hu0nks3blHa2BWWFt
+qcmwf3jR3E4y/49r31bA0Tnqkx9g7mDOwD1yXl5W7RiHhQdH6nbCjMj7zaMw
+5zPj2nfEdRpb/oH5ppKFYvQvqf8orwWWftxDpcN6JU/lK4kdFnvw4cTm/ex0
+sn6u20di/w3vnSLJuNn9mkxY3d6o3Jfsdyw7QAob/2ds2Irk8XgeqI3rpdWu
+sNQm9awIsufD0oUfshTgxPjImFFy3nddGqZIP4J3D/BQj1Lms5MzYHbZ9nOz
+0Q+DrnSH72CRzF0tBa4Zjb6mB8t+U9dYhv6qPzC5sIHk8XthVAQHGX8K+5ns
+/8UwXYWFenSPWRTB479dcHeFjbMSg4dh2tJL/DPcubiDZWGG59ChqoRkmH23
+bP1J4gzFW3kw19jyiASmY7aVFMMpn1beVGKjD1z241w4w9rq1krY4MCV6iSy
+Pr9Z3wemqkyqjsDUX2rKEXCanjjWA1YKVD13ER4vsXLWIfm0hV3ZMPu9f2fn
+EvJ3b31GCRy0UGIfAQu3iWNrYEHImLkivC+FFoqIo85rFaAfT4RrAmth6bCd
+qi88Uz9LoxLmVEqKmXC2x61rxSSPpEFEznvfYH6vAGbyMm0b4dD6X0YTYVFL
++nwxfPhRwvRJMr867Lte2I56ZRNO5ssmO9Wx39CvdNt2mA7VUAyBXed9mulN
+5kc1zxfDW6jGWhdYVpB7xA55nygnyBzhbs3okbtwawvt6ETq9/Rw10f9pqp+
+bDfigtzkcFi+IW9wM6xe+IdyOUzrzgoLhbnmOsqTcL9BZgjJJ2yql7PRoanz
+Z7y8M0n/wqcKDsD9B24dqib5XrkyM2CvdoPnL+G8ks47lXD3WM0+xkrcV/e+
+iSSwcEMzYwWcF/uy+AmstG7Hfk+Y+0il9BFcI0oKP0Lc2hhXAX+pcuhLgxuH
++RFkfwXFO43lsOCvSXYEGa88aPWE7B/977eOcJN/Hv8dzDN+wVCG+7JXmY/B
+BrTMogv1vNQ+rzLDHLl6lprnw1OpBuazYfXFGX/wyPlT0Ho+C5bSm2zcYTXD
+yrivK8n/AScWGsPjYTlzP5HrO7AtyXkP3XRsw1tYGFKkIA+XbfbyfQaPj6ld
+JJ55uy7wPswRF+qqwbKcBxmlMH+d63U2PMfEwO4GGV/vwvEj51dnbH8q7Kx+
+uy+OfD7pdea/wuoNvLx7sPuimfvPwf7ez7izSb9MnB4RM6dCJW6wxC2xLgHu
+n5GmkgQLBm3PZZL+2dtc7IAptasqRaQfp1edWbIU535nqAbJ5z/5575tsMyB
++X03nHi8cvIynPek1JJCP5zXxLvdgbW2xGTpwnzG+p4u+OHWtVYucNxui0cy
+uMCS1RwOi2Kyf/9C5jvrWacQV9jFf4BdK09bVcONO+1dO2H+LtvcLphK0tMh
++/cUD5+agmVpZ5tS4DvvvPvUVuF+vngxMhQ+XK233BjmNw8lWMINDrmSNXAj
+N/wOBfcdbbruBHOnnWvJeaO2Jd92gWlOpNMVuNf8DMcZDn0c33kQNnq6bcKB
+jOebSjzgkErTw6thXlTGt9Xw0cGuQkPYeZ7p4AqYGS8q14BbU2adNYZfNieI
+5GER7WT5A9w5w+PbGPILv/0p8YGP3C+52Q9blwoSjsE8RnZHB5z2daFNEWzh
+sCfvCak33Eihn5zXMp2hv2F6S1iXIeoxF435NJH5RVN2XLiQx/NrMSfvK+Ox
+FfC3x6cMu0n/2w2mpuGArN7aEZh5KLt/vS7y675uIvkqfCfunoJZhUf+1oPZ
+affocjjbf8ekIyw1WHCsB7YeOr03lPTDbfg/M/DetHGvP+NXWBhaKFaBFWzl
+BGVk/r78aE3y3tVzdHYH6bd+sd8CMk7e0yxwbv//3vZfCgDy3g==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.318520523989797, 6.302976613356011}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJwt1gk01WkfB/A/UrbJbSbLyHIlspMtpqG/JYQpW1PWsYWxhDaUqRtmDJP1
+teRa0qByUZYiMrqiV6GUUXJL7lCqmZabrqik9/vMeZ3Tuedznuc+z/f3/etf
+6iFxnrtFKYoaxh/ySS19xo8GTQnIpxxNLQ4JdzmvoylK6aaPgzxNObcrMIth
+fmxp4R7Yodf25AwctGFAMgUeuPr4k4UmTeV9cfJINKxdI7U7HXYXdptaw3tN
+bTWGYPqt+NQszmcfrr8lrYXzM7tqcuGh4MxQW/i2u9uIAvxM0BIQDefFhl7L
+W01TMXf7Bn+FqySsSylYkCvtVwrTXREPY7/CPTPFfhVk/R7PevJLmlI8atdV
+BDNU91n6weWhM0tpMLNZrOfpKnzfb4tmFMy6vPxjJtzZwylxgeNHaue3wAcZ
+ycu1Yf7MtlRVuMVY11kcNk764dNqeMEozvwJ5mFF1LjrwI4VZj8PwMbZv/3t
+A9u89+C0wwzGwp/VsGpu0YVzZP+qK3dFkSemutWiGY7XetuYQPI5h5hwYe6W
+AM+/4aVdFdIPyX7NB9+GY77Cu61py3C/e+fEH4/gR+cCuizJ/A+F7t+hj+Jf
+Wu0SYcHUN6/rYTevI+rdpA9Ott8czOHNv5dajzynb4dpot8c9151P5g6/kbJ
+CmbqV/fVk/VahtAQbmm1lfgA58W9m1wOl3s6Gdtr01TTTr7zVZznPDzHTYep
+A2yRMPi6bkFlF8ycv64uIHmjZLWfE/tojkTD7J6zrpI62H/YRnoC84WxwguV
+4SbXua0ucJfktJEGLPBIsO5EX4p2K16okPV+9l5TeG3jA/2VcJCMk0gXg6ZS
+Sl7z5kieVMPNPrDnTnPXMTj+eHKKLLx608/qF0m+9wnsXlma8mZ+a1QABwnn
++qphi1Nl2xNgLuP28yuww9+N9jtI3qh3PVL4vsPWA7k0bOwxVrYdlldU8zWH
+b3d6/8aBu6oGPYkpE+ExefL8R+3KbMm67JPSbPiEaHWHL8zyLwiSxHy+N7rz
+WSTfTR3tNDgl/Uh4C7lfZ5W/EL6+02z6FcyQVR39Hn1RSbH6ZpjX+Oi+tbUw
+Lz9m/igcr6x/nwdnXVt3Zpj0aR7zhxBOn3CMZerCK+Q/kP6p6u7YOJi/UsVg
+GOZoTU51kHVDj4Q8+JbIfvoTLJDZvX0jvJj+0WujHu67yK/oRx7e1YSgcJix
+vtjdEW763c0sE84LXLLqwHxKvALLk7AgvKRHC/5ebXvSWZjPeFpQhH76uCJV
+tXBQ89qtMqQ/C8W5Erhqzm3jWvQ9oje25RjMkuxQ9VpJU+c+p46EwtxHz4Mv
+fEFTMjNPje1gaq6nzQ1u4NXpqZH9Z4aVmHBM8ftKkp9W4FUZwcKDMd58mHV9
+W2gy7CLOnbwBV2VsKl+AJeQcj3TB3Ie1f9XiPs/pwg+kD3pmS1oi8kiM8Yt6
+YYZ1qugG5E3SUF0Yh4OCFHc1wC9Wt64n97mLqiutx7xdoesy9Uk/l9hn2PAh
+S+4M6YsbXNZJoa+c9KdHOcQdte1eMP3GTG2O9Lu/UJgD36v/0cJBH30Vlb49
+R/avubJUCBuHROQ2w4/blpU/hpkfveSL4bzcm7SxAWzB9AqA2QXTHgfg21Wz
+qeT3a1np5oxmWFAmblWJPPJ3HktMw5Ri3AYmed/pm/wiYYjnuMNGjjyfVzdS
+HdWJU56YiME2Wq4mBjCr+I3/FPrRtaJH9Yl3RvoNor9LPxzyJPvpEN6KWzLw
+sX9+kIEpf+O+OWm8P8f5WgKS7/JpFTdYtLjKYJhYIOV9XwrnD/1k0QBzPeSW
+KmF9v3fKWcQtu4dPwQWp/2mOhoPKPqdOwv9N3lHsRSzz/T9eOG9mR7SKA8y3
+UV6/ALtnPtDbTNa96YWryLN4Ilfdkcyrc82yDnm7O970+5D999oiKjGPw6YF
+p0Mw65iDUxGed8ussvYZ2D1S0Y7G/AcnfD0n4fhPOufr4JbRGfV/55V/tU4E
+/e0JfpcYRfrayOHawnRkzr1LZH6LCm4EHPVsOUvSCOuZaa3xsO/mi6U+ML/t
+cIkfeZ+5LHc/DQsGeme0yb8vgZs/vIDzus7l83CfWwujUs4Y/kZ1Zh95fzGm
+8o1g/tiewVnkPTiqcMoeprz6v/4L86iFdAd6wCzZCaUrmFc6cbBxF7FeIMVG
+H4+0j1/1IS6w0DiKvupFVzJ3wFzXG76H0e+TbTX5rsR6Bb5sSZpK7n/AtCH3
+hZipzkjQVNE7PwlDsn7SPjocvr7dv0aZrJ8UjWPC27ISgqVhZqkgRR4u1vx6
+xzzmqfIPeuME5yxXOTcBs0aPWzXDni/PmA4Zkb8HfZQb7nNsXPO4D6Z+3c+S
+RR4X6W3WN+AgpsJrARxo36DDg5l8tsRj5G+yqxWS81lLiXUPMN9U/UGNVeR+
+99H9A5hfJWO3nD5c5XHkp2r0o922RsaNuCb8uS/6O/+j8rJ40p9yesYMPK5q
+119M/NpfWw19R6UxFrthgXVTuCG87Ok1i6dwULJFI1m/4uAtvXID9ocMuJDv
+XwsNVDMhjqSnveEMlx2bPOEqc6UN+bh/3mXCJxZm8Uv/qEa+F13tF1LJ/kVq
+bQnyV89n38qHuc/SjyViPvsm9WQ2sdjwaw/MP3SicKwcZmZVDpqiL4sajn8p
+Oa++XU4Xfb63UbmWR/b/kjxEr8Dv229OK9PJ+YlW3qnLkWPk1I/74SBH/tt3
+4jRVVsExCIXptC0xNfBL58U+D3I+c9/5bHjpr7ByW3Kee+TlFrg2bYphBvP1
+TdgMnOd4MSJQl8wn7pNxCuZE2eZpEvffsAzA/VmN0/u0yPejfneyQr68tt4c
+A3Jf2MVWHeQv6rmisInk13U8rI75MtdECreR7/NZm7/C/K5zrp2RJP/N7Jdv
+4Nd/Wl3IIPfvnwltRl/1qRv+4ZDzv+qRdkKfA5xikzvEoZ8COXDCouTG92Qe
+SaHXXbJuaJCrboL5zUfr+mDjrp9uOsPcT9dXJcH8gLCCWJjfMGEyi/MPlRdW
+5JD1l3G/WsL3DvInOGS9874yef80drQf6YGZ4x0abshfa3h29g5MSc0nGWE+
+p1s+Hx7AVY2XpaQw/7H2c2cmybr5O/Pn6GuifNJ/AmaxA1R46DfAoKr/LnGR
+j9jzZTT10DTz/g2S10XkPBNWtjVv74TpkrHpTDGaGg4+3VpHzhMuzerCKkWN
+5idI3lH/6BVwyqBmfQbJl1XxQg2mX00dSCZ5RDzU9sLVKla8PeQ8vfSRBZjX
+v/Aqktg+2LoB990Zr8v911+yg1PJ819o9SD7qQFuZhzy99xZTDlELPCcCMfz
+tn7pI5FNbLhezA/zhuiKsWtJX/mWAzbkfZJOHe8leXqTboujr+hYP+ETkkc7
+Wq0WrolsaJI2Jf9/H2wjzz9sae9+U5ipErHkApu2pY77mZL3QdrXTvBWj4sJ
+acSbLimsgK9/Jzp+FmZl3aGycd7hWvn+AfJ9Z5XLE7j/o2iO2jOY+rj3JgX/
++2P2/08J+n/oho2Z
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.45429484366825, 2.671979374673003}, \
+{0, 1}], LineBox[CompressedData["
+1:eJxFlHtMU2cYxg8QkFERSFG59dDTc06lMCVOqsAQXic3I8xKQoqT65RRhImM
+gVoYFxGcCgPSIPwxucwLpKNctYMRZIyrDLlGbmFQjJAKbOpkOrPR7Gs0H01O
+vvzypt/lfZ/noT5PCok1JAjiJPr067sfA2quft0BRNXpgbbfaPhzTvt34UXE
+5RbPm27R8LS8t8HIeCcQlm2FJtdoSKwM4rrfRCw5eoibTUPniHVMqJcNEDYJ
+vZH5NJjFN3k7zSGuTZtQfE/D1wakOiXNFojom3fyumh4VPPVT37GdkD8sqzx
+eUVDdt2LHwJy9ZyyjXJloEWTWmayhpjYfVCXzEBkRnKTq5c9EIFGz4JbGVgi
+5WYdyYhb055IdQw0W0/aWBUgNj2vigMW4jtzNnTXEfO/VOnkLNTz+o93piAe
+2H7e6EdUHy00H/dHnF3av/qIhZkFV8eRDxBrBrTziyxIDn9xwOlXdH65rGl4
+iYWejiLuQiri1rbhvBkWivOaXdxcEJ/LuKHsYEErE1mGaNH7il94qhUsmJ+6
+/vxtM+LR9SlNBAvO1oMqcTFiS1GckSMLJ/NzldzLiC/c3Zs8ywBb8c9YUom+
+P/YPBxUMNMhmNENtiBv7nw19ykDbZLjWZwPxdNg8z4KBb6+dFSV9pj+f4DpM
+05DUbBR2exgx/+PUxjoaaoUNkpeh+v7IzHYV0eATf1wSu4o42nvCIoeGyZbv
+fj921QEIUFeLcmkYr8ieKRTx0P2lRFgpDSfKDG/N9SLmt7TcVtNA+/ot7Qkj
+kT6UXUFLNFzYUq3QzSI2XQmeJhmIX9/aXnbEEe3/oalXNAOtBU77wqoQa7zj
+DO8yMJhOjmrmEJvaXZKvMaDsakgX6xBrz2xdcWUhf3rtUKwhH3HeWGciC2t+
+UYmZf6E6382wp5KF8lR5efagfj9Z/+E+Fv7YRrLCEsTTO4bE8yyozGa9Go4i
+HlCOhC6zULBdr+fN+hm+sFtyj8T/d3Z4MjtzlsT7Z93Pi8sSk/h8l6UqRY45
+ie/HkQszxP/y8P0jPpFcHjQg8fuCGxZdHWkSvz+6YmqoJmqzP/X7X/nK1Jv9
+q6SjEg1YR9zf9eWf7cZqHHH/Fx5m1lvx+Hg+dJ8P1yOBj+dX3e5uFdbOx/Nd
+i56SBptReP7ul2qlW0IprI8hJ92EqpzC+gkcDUwYGKewvlyVY5xoAwHWn1uM
+osiWFmB9Xuwz2hl4QID1GxnywPn1QQHWdxrHXrSkr7/Xv/FpT9NcoQD7wyZm
+9c0kR4D90zMuXIldobC/lPvd0yx7Key/cE3Q09UKCvuzkpWds0mnsH+luz3e
+3ginsL/v5ztI+f4U9v+U2CeH8KRwPuzjlKa88aBwftiadMupAArnS7g0YJc2
+hsL58xHrd++/qxTOp6DOK3vCH1A4v+50+TMRGxTOt3Hrl0yfrwDnX1ZwjWa1
+RIDzsU6VeuzxogDn5+PeE69P7aVxvtod4TllfkPj/LWu4Rh7dCN+n8+NnHfr
+//aCKUQ=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {9.0548, 7.75}, {1, 0}], 
+        LineBox[{{6.4999999999976925`, 16.}, {13.49999999999251, 16.}}], 
+        PolygonBox[{{10.6, 16.}, {9.4, 15.6}, {9.4, 16.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 16.9452}, {0, -1}], 
+        LineBox[{{6.499999999996362, 16.000000000005457`}, {10., 
+         10.000000000003638`}}], 
+        PolygonBox[{{7.947677384685548, 13.51826734053906}, {
+         8.206811054955079, 12.280184249251306`}, {8.897834175673825, 
+         12.683281069670574`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.515942703607428, 12.823799910437668}, \
+{1, 1}], LineBox[{{13.500000000007276`, 16.000000000005457`}, {
+         10.000000000003638`, 10.000000000001819`}}], 
+        PolygonBox[{{11.447677384685548`, 12.48173265946094}, {
+         11.706811054955079`, 13.719815750748694`}, {12.397834175673825`, 
+         13.316718930329426`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.484057296392571, 12.823799910437668}, \
+{-1, 1}], 
+        {PointSize[0.04], PointBox[{6.5, 16.}], PointBox[{13.5, 16.}], 
+         PointBox[{10., 10.}], PointBox[{10., 5.5}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T1", " ", "P2", " ", "N2"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdgeg/igfhfihi.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdgeg/igfhfihi.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {22, 44}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwl1ns8lNkfB/BHQ27TppIIRcktNGFF0UxRaQmlorLMMlsTilAuYUdXxbYq
+onaTXDKVJLeQy4gy5DJJ0ZaioiG5hBq6+H3O/vzzvN7Oec75fr/nzDmPtnfA
+lt+nURS1WIqiyJMam8LfYhalSjCbRVkap+sWwy6O0/OVYWFBoux+WDxVuJJF
+HH2i2wDmGXquOQJLL/1R/2ER/r/f8thz2HG0KrkI7ji1u8d2DouSa6loiYVF
+PDGvEn533C1pN8x/eK5hnTL6G5xJdYYFXm35T2EdnywjOzg2tFm0dy6LalT+
+Q55Yv0ou4TtMZTeecoIZl8Ve8Sosirt66rw3aZ8/9WbWPBY1dj/3ZjQs52ar
+cRreuktK6iqxwu8pI3BhVPDROhKfbtzZdarIQ2DzZQgOLKPTj8FjRyLoqshP
+qX2y/yYsjFIPtYFZ+tlfy2HuWPF0T5ivkvflLtz2/eeKUFjkGxWVCnNkw9/G
+wl3rDk8FwZFvNdQTSP2+Cm5YwlQ43z+evL/IcP0o4knzSNgcBadsslDMhiPz
++aXesH2wXYQ7nPm1UZHMz1AfWkqH3b8Wa8+AO3b6X32I/HmFy5htiN9S5vVc
+Ug/q/Lh0IlzSG7mFDds7vvYi9VLKdzm5HnaZ7AuRIfnnmRiugeMHqbh72ohP
+zaxzMyzt8ftoEFzyb+uv4eR95xsjxrBlsUnUXbj2tU3moBaLSjgu0VYk8bwL
+GiyG+QrtrkEk/rFBTizMYLQ698M5lRtsOKR/w2hmAPK3Kwtf40D614y6/YAZ
+TmV1NrBqfBT9nBrW65fJ3FWkf463qe587I9ea7YdXFLUY14Mi12K2rbDkrVm
+N2zUWZSWg1/aAThthmZMCczaJKHOk3Z3m6WLNbAvWLVDJbDIvbk6ArZPlF7R
+DbuzShZXwKwvGbHyyI8/larYB5eYLrmwDA5MVdT8AQtundLfDMsZGIi/wYmT
+tiv8YSX+4NteuLzF/ns0PHzxk2cl3LiNoxhL6id1fM8JmKOo4nYC5m2VzVlL
+HLFjXTjM6qrf+gXxCvQG8tik/68THXy4o6nlgzUZL2mnaBfsbjNx7ycyn2VB
+jTKcssTJtR3xd4kbv7ejHsILdrYpJP/wCc/rsKpdpr8raY/uMY+HG9NnDSjA
+4okdqkdh+zR3uSMLkZ+fS+tfsKRgPX14AdoFgRsLYMZ8TjAH1nIrDfsIu2/+
+dvqtJuI3zg/4r95jKcsPwPxtBh5XYZ55b64SLHdtzmUVUu/c/LO1eKY0N3Ve
+xJPr6Zd0Bk++JN1SD/0k/boJAXBXvqlXGcz+c3LvHjhQYU6dE+alTn/SPAh3
+vH/d8RqOVcisvQDzqloW7kXc/Lj+7HqyjiFdob2wsI/mpYBxRDQvDUOy7za+
+H9kKC7hPbrnBgabcaVlwTox3UwRsaXl4Ypzkc9qj9hwc1v7QwhbziFrynK+Q
+fXLpPCsWLhnKSE+DWT2GnwRw4v5yTjLZt4a11/pghuHXG8fIPjOx85qC5Z5l
+DeyFtVI2dBM3xswbsyfvX1rRTPpvdTRvXAxz34bfKYc7wnjbJxA/67O+TDgs
+SBbfvQkzZHSMteDhwSgHH2KX69xCxJuW7uirQ/L/d+Y9S1LHbJ7CKPpZWp9t
+zCN1Vtx+oRVOiNldq0XqU5wvfACznQSaf2KdJJMdCc2kvcMtfBLryst1//GR
+xP0gfN8+so/UZlqQ8YU9h7f343eopcwPDITT7p42OAhzxbenPYaHt2c4zIKp
+ZSPF2shHn+ezv5qco5kxNt6wXKFGyEn4mMUlYz4s+MXRgwNLc+7uGYEpHVsr
+d1j0cu2NVeR3YMdd5g2n1Y7zj8GML5rRPLjW6LpOA/ndKX48mwebD1+epoBz
+SxxhtXCInMtlv3ivhd1d/ewsEU+ib3PeAXIPeBvkn4TDQm1KL8AuXOmODlj1
+jvadPJh7u2aOHvItl73JqoLDHnC7Sf5aRdYn7sP2IxJ58juKVzGdew/WatRr
+aYONZMRD1+GugQWzB2EO1z4qgZy7qx4Hf4KHzewiAsk9yInb1wXz1VvfO8CU
+bQ37Lqy0zeizDrnXzh+5HAqzN+gMfifnTpyh1yKYGjmk9pycOzfuVJUiXobJ
+vJslpD3n9VUWLH3Wh58KJzzkni8j9ZY1b4sn9dqnyV8Ku8Sl/EPql1d10zkF
+567/6un0k3DKZLaeDDwsiq9MhMO0Sh4dwjn+0vrYi1tk/IjWrBHcq8PHx+a0
+knuAFi0IhwXzhVkUuTf1h/6ZDfOKsn0sSX47C36qwj09ttykOpTcm6GcBTGw
++O74m3JS//HzYzvgHH77HRlyjxYKmzbCicnJw86w/qSixBnmxKm6XoQpyYJ/
+fWFu99ILr8m92DtDOgVuk6Ula+ng/fQQ+zaYobN5707YPmh/pzriKfRb4RcH
+S6xfHPWFO/qNt+fDlNC74B4sLLdybIYFN/fVKyBfO3lx1ys4Qc3YyhUO/Jin
++Y70F1WVJZB7TyophrRrjcWFVpF7lTfx9b/3L00zfQknbpe8KYZVucv3vIPN
+7WJ7kmHLzofcZ7CYS58MJtaI3H8HFmZMbdykQ/bLstSDMH/NGXVdks88LwUd
+WNItU0bB/Ab57ErEq5o+05Pkn9Id9rM9nNN5Q6UWdjcp1KtF/h067QV5pH3B
+40gLmJ7VUHCNfIepxSVn4LtKdSjULJvUz7VVSQlWukt7m0++4+7rxfLId5tP
++o96Uu/OguCJWdjPJ/UcB8h3xiO5T9Ew4xpbUw3xpBwPuKIMd/UtcnOGSxoi
+AiuUMP5f9yP//K/enPOHYUflqKrHpH5xB3a4wOLlFrPmL4GZjgbWcK3JAysO
+zHjzPGI1nHNp/OMtWBxb9XIbHNnt+H4M5u53o/HIeA6pXy10kY99VFcpLFIO
+NwuCXVgra6bIeA6xrzJhbp9s9CbE5xgxK6sJjrXXPJcK68/uTPoAq36Q9hyE
+dYoky37AosUXN1kif//gwT0yeshv1UH5MDhHdRVfCtY3Gs64Dte2/mgcRf9A
+w5bqelinVVm9E84rVKh4CsfOGzStgsM2rxY8gjOD7k79DbN/yn5+A36nFp5x
+EBZbDEgHw/GJ39lOMGvUcekSMn8N55g+6f+OMb8G8QVmbHOYTmwTFegMcwMe
+NPWhHvy9AUebkG+eyE7cBofNVbFeAxtpFurXw0pdf3f+OpOsm25lHSwwfORh
+8RP2g8tl/8fEJ4Ks5s7AOI+Vj/fCLtXeB2l08v3KfEPm0+oyDJZXxD61l+lf
+Dis9MbliogBH1Z7fDXf5Fi4Kl8f5UCoTnAGn9UpnfpRjUd8amA97yfq8slL5
+Cx6wUzxlgvoxiq9f8oQtNymeCoPZPYyDu2Cj7fmR92HB4cdzjsL+uZ/nK+hj
+/L93GDyG6dpSZpvgPJVvz5lkvlVd908RG9IldbDH3G30StJfa7fTb4jPcfmb
+a2KY3cQbn4b4xZd/OyNngLweFd3OgD0844w1YVEDbeNK5OvvOOWjCyvl+H6u
+gN/JJp7UIf2TZe7ooj70yE62KnGJ2al9cO3ET4tpcFpF0GA83CaO9+rFfFQI
+rY83g3yX547XwEqTNNsNpP8396nLsMvK7VdeY3z+hOW9QyT+y79HOcCUwZGD
+LrBWXabBGcRn57sw0JiMd87n7xzkUzLd6dFMkk+655pbyDdQLylgAvXSSteo
+Sib1Wvpj4gPxo4bLIbI4n6fvuimGh6cejTpOx/mzyn7XMCzyPzPdUAb70+5A
+AI2Mtz60X1maRYWYBbVrw4E8oY4KjUUps2JmOMACbRfXn6ehf+xz9WiYsfJg
+Z5gUzjdh7rVSeDjq6Z0eCuspXDv5lcS/R2fOHzDd7bSGLerTtcfz0HpYVH2j
+Ox52Gc8NXgWLjQ9Payf1+5bVsAv+J0TLfKEh3h9MCM+ArYubmT5wYJP0ezrm
+EwSVqV2FlWT61c/CGocdPj+D2UdvK+ojPukVxR60pZhvbsl7IcwqXWmxBFaq
+SYvwRT4db/2er4JZ3bdO0pDvyy/yszbAadJHDONgQanBAmL2SqbZBJw4drbI
+mvT/w/3wetRrIMdXog+7eGct2weXl53iziDzqZbS98Ia3U87PpB4r9DjVsCW
+o7/tfAiLXphOtGM8dhJN7wrsck72qAMsZNqeDoPz+GeWJCG+ErfE+q1wgpxU
+Qini5xc/oluQfFU3jFYi34F44YYFcFrVs+ocisS5QncmTJmqPVCZYlLDcqxJ
+edL+yaag7huTKjn0NJe08y6xn0VPMqnIFYxKLdK+5+whJwmTYlW+MLIh7TTz
+Vxs+Myn9BydOcWBBvfBaxBiTamy6OJJExn9tNW/sE5MKk+PMF8GsK1aXKkeY
+FN3vD89ZyJ/yXb+le5hJ2dG6m91gQXhhixcsd+Dd+qukfhYVH6zg2AtHjnwg
+/ZlzGvzgnLlNP5sbYb3Z/dQgbK9zTyecOONJTxHGH5bZvLIEplydvxVhfrqj
+aeoQsc/FmFejGD+kqk7TGM6SUVowzqQY0hN/roG7Tmxy9UY+8dVHzXbCacMx
+D1O+MKnEos379xBXDwffRv6cJ2m+e2FWu9XtpAkmZe3KqGfD7AT6fWvUS7ij
+KsWJjOd59lgKvNVO1cGctL/d9uIKXC5RuzYH5gVlzt0Ei2bvvDOI+LpqD+mn
+YjwxbcHVOjit/GpNIuazFx2rSoNZQ54sC8Tj8qZpayRpNxbvjUP8rPz8vzxI
+e/1vi9KQX8oW4X5b4lvV74+gHgyvJzdNYZ7RzsOxgxg/7931paS9uUJ6oI9J
+aQRIdi8j7pX229bDpFTLcw6shgVrpA70dTEpqjnirTt5f50c68JzxB+R6xX9
+n0NKzVuxPyi9ebmkvt+3BDXUMal/tMtEvcQhFhud7jGpwDNvxnVJvWOftozz
+Mf80iwx/Yq3ohuHT2G8bJPeKiMkfr+L/TxPW/wCX74+H
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {6.573901114580226, 6.782664290660753}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwt13s81Gn7B/B7FDmVUWJINcphpAOySgczu6UorSmJpKcpKomlZFHsM0mF
+ECHVpiZhC63DI6kcxqEQamxOUQyhlKSoCPl97n395h+v9+u6vvd9Xdd9D746
++7y37Zch+DAI+ffn4CQ+mjzSTX8u4xHmkdAJNS0eWaPC9rkL8/1SnWfCtjGJ
+HodgCev50m/IF+8xtZwHD271SCyH+1VyjZuW8ojw1xP5AbCnc8SBOOr2rDQW
+HFNOah1hnuNztzQW9hu4SfTgQZ3+LD04fsFXq/ElPCLqXN15RYNH2OumHm2H
+2TfqixRh8ZWA3hqYP5K07rg6j3CKwyIrqGUMjw3M5pGCob7GSliotHC+J5xX
+UFrWAEs2KWZ9U+ORqUXb+vtgEqnwPR5mTh+Ok8X+gnA5zY3wpX25d2k9vIvx
+G5iwZ0jDXGuYPWlU+WkW6mt0EXrQeu/cbHsP8/hRsRGwyDK4eAI+puY+L40+
+78DO1MPzAf4Gug9p/yfufBHAPsv+11MJM7uuz82E+W+X/HgC8yuVJ2RQr3ZQ
+o3c5HOMw9FEA2y5P/DsbFrtUyJXCi1e9Sb0AS/1VV89D/2avr94/BGe7maT6
+0nm4PSk1p/W+vZpdCEsWFzLG0K+xVqPtF9gp9b9aBbC0qoqlhXleahOOesNM
+m74zHNjTc6RcF/bR8xqZB4dpyIpbFqM/m6Sn43g+c8/+NdEwu9j3SBlc4NXg
+v5HGl1ltPgIXClTD5WCScfO+EpxiHmtdZ4S4tvZwPOrnZ1WvSYKlSS/7mLC0
+9U24P8xMztUIxTwq9ol6XGB+u47TEObpU/vn+S0wLyMuyxVOSXj2qw318ir1
+1pk8sn6f1NcOjjF4ZLULTonylf6Hxh0DTr5XxXkV6cz6HSbHDX6LhtdcjlgR
+R/dbEvd2A3z10SuLPLpf2OE36nCLm/yrJlgyuuvAJBPnaXPlnxHYuCRqF0F8
+sMb1uQb6EzQzC1hwZNqjeyawWNnAl64XGpkVvR4WFo9cPwNXODjl/krnI1cb
+2QhLXv3zgtrY+8i7pai31qhC/9/8up+/R8E+ubeWLqXxrDLxB1hUbDWpDEtl
+G1fZoP/hixrzOlEP28887k9Y27QsJIP2q6i1QwpnXi6J9KJx5xzRLMxTIrk/
+zIEH16RvMoXJ9sUPOhbhvtT3TFsFGyuozoiHBX+Qk4awmU7Qamsaz03ZS+j9
+jWOf/2GIebmouJRg/e2ZZZb3YZ/DIh13WPnLta3HYfLlMX8C9YbdLo1YBws5
+ijtDYE8L8x3qMF/JeccY+h8Zar4/xEE/Y8t6PGH5xQc2vYT59+w/tWHevBC+
+ngQW5m07uQXOPhX88SnND7/LiFLBfT3HetEM81YeYiXO4BHd6ZZpfbDYY+4f
+pdOx3kHDQhnsJ2BuVp0FK69zNNWB2ZstZsQqox/nnt5fYJHm/GZL2PizQ8J+
+Wu9seclc+KVsxcAZmKczYbcErqo7nZtC4xtVbnnAbq3mjwupC0e59fCIu6Ft
+HV3vmWGlM/YbzrC710D3X7ogYBLm11S11cPSXo/D+ai3Sn/vWDldv/TyVz/0
+k3dBWJcOG0cVK2ih3/EekxC6v4gbvd8XFnkvFDvS/EPK/DJY2eNu0ny6nv6P
+QBnMj20rSOig81sgMjGGid+A32VYUs+KsIa7HUzs7ODsqLzjNnBB7eSuKbAo
+N2nYBDY74/7ungHyRZwBBl3vhPo6b5h0rHJ9QPcXDMQYwT6q1Zt2w27n+6oH
+9JFnXTClDfWvLNe78gCW1o7tfIX+pgYrbIuBBS/+WvAE/Rd+Xt3iA5Mk5tN0
+zEscLCdyofHUp1vClXCem86k2MPCNZfSvRWRd7bT3YHmL9G/fFABfd0JnhDA
+4ll/zjwuj/lOmVTwo/vdKh7+exqes01rO099UfFvZVgyftQ/i+bryI8myuH7
+aWydVU/X8229bQ/HnDC1GP7XKjE8OFOvqVIN/QlGR7x2w0IdxkITWHjunexf
+cMFtZ+5GWBz/dA0L67d8Xb7dgfpoMj8dbgiMHdgJS8Pi2Q6oj5N3g2ynccfy
+Uyqo/2rNeP8vdJ6BJOMZ/PaNWZQ+3e9EaPg59KvGO7J8EvXw9przLJTo7zeZ
+v+qoT00/+0yJ/n2drR1H553MYW7A/AZlWvW30n4f+EsTYFZbRroCjbtbXbkP
+r89596hYD+tzT+XfgbP/u/vhUVhcfyzdB27pUGk1gEma/ogMPFyb4SbVxTn/
+xDA8iP0KFBwDr8G8gZzcG6jPU0F9zBUW95yrLED9DWppwaY0f+1utTz0m8dI
+M1OCBR5Bv13FPKrOlvYOLMTzQwF+JzC/FFv3nlewWGvP4l2yeH7+IYUW6nPN
+0VZT0X9EQt5LWKR0SX/9FHhiV8s7WOp9MXWPDH7vdKsyGLSesdXh1xn4vpUe
+2z+X7jf5+xMFODKxcHQtjbMmk5IJ+ivxPS2g8WjfjZ7wyMSihyG0/s2mjIMw
+J195azLN//Z2NAa+yrbRLIKlut8P9sKS7zs062H2wJucvVjfrI55/SWNa8xO
+H4PdM+u2tVNX7WnLQH2DsXlWjdTtbq/dUX9hRM6YmO7/0+0mDvrbHpbscwMW
+GgWld8LrT4ey/GHiZSgKxzx0h6+1/kLzExh3NDCvlnLpNDmaX97VegqWj260
+LaPzem+RVAk7hVZdD6TzKhhUb4fJhedGS2H2NZdfK+CRGQ8suhYgzpy6JZDe
+f9UzGpdgqVWv4Q/sF1naP7kVZqc0TzjA7FihzEyYZ+tddhr1ZednfXihg3yn
+N9rx6KdC5/jqDFiUZqARTs9D+w7jLEyOfKr2wjwC5mzp9aL5teKxzZhffMJt
+lgAW5nf57PrBJTH33Ox2w2IVRq3FOJe49J2qcaNeWXvX6juXVBi5C/yotzYO
+nx/hkuxhJ2EUXX/UKl//G5dYO87ZQvcX9l78qvaVSwo0uzNqadzdXnnfFy7h
+iZ7t+kidVLNTFXYv+ThdFf2ITUY4C+CWwoHgZTCJYP7vPJyZwYuwhoXhIfZb
+sV7hws5NzjS/enG3M/arkqbrudK4wlRuEurp9/Lp2Evnk1/UIYd6C5Ln33ag
+67mUXwsd45KV/7hyLGn+cEqwzASXeCZ4nJhD80NCgzzRv+6L5BUDqI+3KME7
+axLef8r1HixY/LrHBfOqmvLn4QA630R5k2LYp/g/s5bTeaTXCL/ArNlO+/rY
+iB95E/QDHm49EZ0EC3TSHjbBooaY7q2wdHZqWzBMxm9kybPp/wPVKu+x39vt
+sj+HzUd9HQM1IainxaPBUxnm5eq21+E8quR+sb8xD/Fppodb0Z+AsSHXhrpj
+xfL76D8s4Zv/NFj8raU9CPMSqny+0zYX+xC5lRbDXCL6/vNvj2HhuqIdMp+5
+RPqe30VNerQSmj9iPgvbNtN8YfblOJV+zK85WoNB15c52l77lkt8WqJGzKjd
+jbUX9XKJ0+oMJV/qAiXr1d2oL7Cf3IPJYMZL5ddcwoq6YDNO44nE7mYX1rtc
+Ym1J++vOaf8OrxzJCQ2AyXOD4mn0+dNnm9JoPDQoJr+HSyTScxcf0fjVOSs/
+vOES5nqL8nrqZ74fzr3D/TOz1amm+WvnX/jtA/qdFW+fTueVZay5YpBLOPEh
+fceoOX7bcj5xCbug3dWQ2vXRnJlDqOel+7JqWu/uoIwNmM9g2q2EHTBvckzF
+EveP430mpYHOQyOhuw82lsmbvpHayvy9Jb3f6rzJHG3M+7Z/6E+wddfIV02Y
+7CCMJ8gP6A28cGoO8j06qsaxPutZ9+4hvJeJd5g5/oP9nYrtb3pp0e/fdkV7
+nAepUVr7lb6nuXs/iUD9YRY7PWM06XlJ1FRpf8Z1+ZYwKTnGf4jzIAH8Ghka
+d9c6uArzWznFyOcV3svIwudhnh34flmIjz+lbj/ef6cJ/Ss41TdQR++dqlyH
++7On8/cBauYKzkAhl1zqWyai731k8EiIOAb91dfX21EHhO7J/7sE7zWWsrQe
+Ytt6QLeohHDUJc8bqKV+tZ5lJUQQWJKqqUX7d3hlVl5C+CLO653UaTEZMqUl
+RPiKqRdLbZ0frl1QQphee90eUg9KbuYll5DBzV26jdS3Xms9SuYSeYXDV9qo
+Mw81M0swv3lFj2upzVs+ratBfWHV0X9RS8wnk59jXpV/PD5MLXe+6/cXmI/2
+DVMt6inm85614/u08LIwj9ZrFLEop5NLRrLOm62l8zscnO2P+2q9KSH6HuYh
+rJ8rK8I82Y5DBw3ofIpsUmfjPlrHshRj8Z4ltL96sgZx3mgTGcV7E/ncFV6I
+592vtPW5Uj9c8vo91r+07cC6Jrw3ET3fyGrsL1Llr9lOPWmmcqwF98NYcLaT
+/p/fYJekWI/zdXi6/CR1k+WMS6V4niRG/kT9/x8pfd+fxfs/aePoPA==
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {0.4875589769853401, 8.878318388907438}, \
+{1, -1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000002274`, 17.}, {13.500000000002274`, 16.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.552325660469876, 17.180083206945802}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt1ws0lOkfB/A3USpqcp0Q41YaYhKbrNa4i1wrUZRKKalmc881bOWSJImi
+HZJLWaTkkrYhogs7CSG1UymWpYmKJP7fZ89/znGcz3luv9/3eWfOeVX3HHXd
+J0JR1Hv8kf/U5Cw+6mzqv48Um5KJzjmppMGmhOpWM6dhz5bjVyxg/phKj7g0
+m/KOlU0KhAUfa7eEw+wr25ilsPP8Pff74NTBTdRHMj+1VJ4pw6aKksKsDTXZ
+FE0yQ3s3zO3Wn4mC+XsVymJg6oyJ2GPYe7x842m4fGuntswKzG/ozAqFqxMd
+7XfAfP413c3w7XNWnjmwoKYhRAHuN85K6oY5G1aUPMP5jFxzh0UrUY/KUFEE
+zPvm6G8Al7/e8UiF1PfbVvnNMCXzreY++uvX/mdwPxl/qGm7G059Wjp8FPZu
+OMtaANPtR7OOwOwo09G7S9HP57zuvXDMrFNyJKzl+MuoM/El7QgXWKkkImgd
+TCuZ/tUYZoQ/37QMFtjW2xJ7r9CIm0S97GnVj2S+aN1x8xdwufkzrxNwI/dW
+TRXpR+LFxWY4W+SjWDbsbdh0Ww31mLyqVToJO18/9PksHEHvrAqBGR/ZLxeh
+v8bPbhbHSD79Hm5p5L7URP4KJvOvRL5XRl6ZOTZzyXr+YN6jEpgzFqbAJU6c
+MFwni/GAX183knq6gk/UwM4TtdfHST2blmzTk2NT7iXGAdroh1+77206zAqf
+afODU/V8Jz7APov588rJ+FnaWnV5NpX8+OOKbySPXrqMLcy2M5O21MK64aiF
+W2HhH/ScFJjR5xFpBwdaNmd1EbeWPVwFd+ybmVy2Cn2oR2l+wf4dmqq9bjCr
+Mq6gDA7MLfo9CeZ8rRP1IvVUtM/eIeNS3bFzYI33o0u7YeFpvfu56EfmHG/b
+KOy8VyreHC73udDwDU5l2mQMIg//ZX23puCYLy1xmXDLfsNvn2Da3ruBbrDO
+0MpGAcx3CqdWwO6VT3NayHj8KfGFMK1y3O0GOU+Ld0mU5Juw90siGZ/D6pMj
++Zt9vXKQ9GNh/INNnu9wv7iNxFThulhYtLe1SYfMN8jr6ibPt/DgflkyPrPd
+ltRbUiKvK0b6XXvG6K4s+V60Xf6BvJwD31WYol+uAatzFo6ZbLN/At++ef2S
+BKk3VM/RA3kqxVaaasDlPePD/bDM75xCa5KH772jB+k4X7/NKgBmv4o//BY+
+YLxes5jked5OaL+MTaVLRQs/kPGz3/Ly4Gq3C5Q2E+c96Bp7B3vW/XE4AOZ7
+0pmLFXBf2gNqf8Ic6bQTDLj6IH9cXBvnFd/XUoT7nr+qcIFpu3otZrE+/ss/
+NhmwQEdS0Aa3eHU3dcCMB2avk+FkvfCoRTqYn7m70wSmvo1Ir4d5Rb+MkHr7
+qipOesKc4Ku34mDWiVnTIDJf23pEHS7ntsvHkfm6v/m0oH9BQYrbSZgyGqoK
+gjkTkhXRMFsigMmC3TU3WXPIfuXJId+Rp9KwMMEDZkWeKumFtWb0TTfA3E9L
+F/DhzBulu5eT+XGzA33kPi4PL51G/bx59jfnYD/+rE/0S1g43d+5gXwfBF+f
+3YP54mGdZ2HbhCzpa8RTow5fYEraRfE8ccx8mUOovyWXeTwBZsfJbRmhk3oW
+HSJ2DkuoCUEeEsemm8h8bl3uZTHka6ngP1FEzlO8sDqN5B3y7HsLnFqmXk5X
+xO/Z9tZd4//Nz8tLhwUu7ZYrSV6jJz7NUcJ9qDD89pJ+lvgxvGC61Z31BbBz
+t9mRq3AMr6p7BPZ2yv/UTsb9M4yNVqO+XXklQ7BRpelPcTBtw9yLxN25R7Of
+wsKkrCvP4UBHC0cpXdxLc3FOITkvWXWzKxzDbrI5CPdZyY8kwsKyvyWVyHyv
+zuu1cKoKb+oB6q32zAgWkPXdJgn74NtWrrnfYb7eWJAYTMm1/rNID+MXXVOK
+0H+m+7ropXqk/wXRm+HsF1azEjD1vOLqQpKXVcfRWaynXnX2PEOegpwtBkMw
+o2fKvQTmuYTOtpH6qjjnsmEZZmF9GSwQLJfOhzXaJtNTYG7kzsgHcERcdOFh
+Un9fRugUXLeyUcMJppnX1djgPEbbDhVDmJ1XtqQYFgZGhavCrJOCMEXUny8W
+8VKW7B/raHMZ7sjrSZEm9XkUm2ggD//+pnhFmLN+Hu8mrGPEMdcl+8/sFzdd
+zqY+Hyt8ZU/yOKPl1AzfPjjxPYDU1+cxx1oZfbxx7LpG+uH9GL0DG20QNyN5
+0n5yCpZTwe/NuznVqiSvVtvi3bCz9cYjB2CW7vChDFgYfMe7AhakLEi8BRc9
+rvL7Qcbzax9Uw5uMfi5VZyF/m5G/Csh4VJW4DcxVm7c1Gu5aZffAF2bVtL+w
+hNtlkyfi4RiD2Nwp1FNgfeJdDixk3MzJh3V0/D/dhCmrgTU28NvyF/d4MM2H
+SRtAf9c7shQfw+z48HkJMHXqmmwbOU/UoHUNnC+VNfqUzHez6HqPvA40SCo3
+w4x/LVWK4bSkRvt7MOe4rXg0/PbsG9tyMn/iC8uPPI92EfNzYT4jyMsf3h/4
+MjWVrFdg+ZyE0z3qp6LJfIvVmtWwu/w6Tw7pJ84jicL5JrvtGvbAzpWVF73g
+jqX6mu4knxfjQU/h9JKNO13I+bvKsjaiv2B3exUnOFVZ+h0f/rBYffi/8eRj
+j7yQV+yGa7TtZP9y5cRhOPHyrkKS54G0RyXGDHwfja+lHIer86PtwmGF+38f
+SSN5jMmGVcIxv9DvlcJGywe2DsCXdM7zSF6huqZblqiyKTs/q0ufSN6TOx10
+4DTrTge5Nfjdm78neQM87fz4yc9wkWJypzlsnh077Q2zzlUcMIEvKUU8iYeF
+D4tmmHDDr5H6BbDRqsf1ZH+5FqZlI8xf8NHsX5zfEpdl+Bo+3W3r0wCXdkXv
+H4e7C546pcOJT274ztXH+qCvbj5wgUr0rCTM037ytwHsftdMRxqm6y+1F4cH
+h/U1iJ23RVfVIx+DevfNi2GOhqXpCZi5XmObGCx8bn7bFbZeLz85ifOoZUr9
+RvCRt3+oDsG8H/YPDWH9m6+7e2DvXb2+duT59ju/5hHMvh8jCIYzAk5Z1MDc
+HZUutXBU2IzyDTimoj1kAerZP9hc/zvJo0ewwBQevUlJZpLxTUt0IuBQox93
+02F3pvWrP2GtLTWeGTBt7uxbUeQ1Vqpkl0PW924U2MPJnY5FxfCg1E9HzpF8
+Jcz23oVbFK4aPIczGJF67XB5eqjIEjU2pfaedWYE5uTZ95vDrhNurRLoP9Tu
+lNFhWMa3ma4HcxNseMnwL4YDoZthrftGJVxYpDX7TSjJ0+FrfhHMjFAzuULW
+d55ry4ftflgfa4Anzyg3XyD73y0M6yfj95y4EbDWA87OuWtxP57+HdthXbe1
+DspwqNrCdfpw7anDlw3gFuHqt6Jw5hu/NiuYX5XO6EQ/GurruC4we7eY2zXY
+WZUj4g6zQrkfQmDvph5lDzimSEfZCWbZlW7dCmuZ7qKvhm1ZdesdYEGa7A1p
+kqfI8UQzMl/TezPJl7nEQWctqUddfQUFZ9e6qqjDjHdDjfNhiYRFQVKweK7v
+NkWSt6+rlQicWv48wZh8H5ZLXR1Hv6dzt6T6wPRjq88NwLRIA71M2PK8xORr
+8vyZXmkm96Nb93N2L3n+Vmw/IIt+g+dHyL2Eu1VfvSH5uCdltgpgyqmvL5fc
+zwXTsWHYNiJ8bABOWbgocprkPaTUxMR7nO2ep7qkPmfJdvoB+PPaZed14MEK
+zlAOzJSeEbUn+dJ2xj+GJxmFlf6k3+tGqf/C6SE1t1NhXsB1jbl4j/u6eP5U
+JcnbsKNNEk6uM+K8JPnVCzMk4Bny/rj2/++PGuz/AQ7UGzs=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.479517186987348, 5.883314205477544}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJwt1wlUjfkbB/C3tN+0oGPmKm5TUkKFQQpvJYQUZUmr20iNVEyRGrwto6SS
+GoU56hYVow1ZC7fFMkq0GEupG2lPm5RC/+8z53/Pwfmc531/v+f5/t73Fm2h
+/6ad0gzDVOAP/ctI0V+6LPPfZxLLfDc2ybOGC2qd9znAJdFjZomwsfBVQyy8
+eI1mzzuq7yzouwi//7m5auFM+EK7JBOO/OdjYyTMnvp+MAIuHaub/xwWRMXp
+WsGGKT7Tp+jh+sRHNW3qLDOo3LtlA8wtvvE6CI5SMlU/BLMX2VsDaizjomf5
+YxrV4z5U/QIHRn9tvgYLnO9NzVJlGUl7XGwR2VBacEyFZXQcTrfeIGeOpXMT
+WSajJ8s9m+6f+yT0jDLLDHFrP8eTffgvGnks05nZqBUAizceiXWC5z22T7Wl
+euCrUlXYPjvBfzbZsyRGBq65G5OoCHuUzBEvhudPye3owXyizGVKWbDp4NdJ
+b2Buzmp5G+yX5JBvTfMzjgWiqehnW6f8zzWweJZfuBz6/TXp2xcJ5RU8kK+A
+eeJ1nsh8gxO+B05VwLzsS52petjPuDbcPQr2aPVd7Uzel792DNbkFSj/RXbu
+inZFfuq8p5vew31f4q9ehFccrjxlMgv9rfE/8Qq+WjQoHQGLC5w3dMKrWz+c
+q4PVumf/3QC3hXXs0tHH/g7+o/mw3inbKF9YXPF5nhcclN7mmwtzZzfekIb3
+VRUPvYclwfn2Mehnv8m0KBUD9Pnxl2ppODviis4cWGSWeuED5p2jmBBsTn7D
+u1OKPHga3s0rYObcBc3LyGtfZ43nYpjVddibgzxLnzSm68KC05+n1CqxzMyc
+pHJFqqe8PmgA9/4R495B/Ti6pN5UZJkv3cp2D2EmqPF8ONxtF5J4HmY32x6P
+hXUaJLqR5CeV/Dp46OizF7/S/QfrehyxnuCap+52qi/9mCeP/W+nHZjuSFae
+EfwO9rglsqY6x1fY/Br9Nt3xCN1D9TF1SSPmCbWPH4qDPbITBlow75fhOLMi
+qtfUub3F+a734eZ8onynbdjsinw0mjVUaF4mUs/jFjx5wsrzYXDC2b6HozAj
+KLSphiWel8sFyLtRZpemzmyWCbDvUtSHd2Q//DEQZn3M61VhfrbxuhK4L6CM
+/xr3r1Dr75I3hG3SzI/SeQhy4qzhANF5vWkwL3vrkmCYXW44aor+JuvPiEw1
+pPeHf08H/Q8ua7x8E5Z87jSUwnw1ActTymBx1plgCfKQ+T5YXwpzMw6JnyG/
+pn7FGzfIecW2DchX78T5YRHZN7lDHX60SLE/gtbP2W0RooDnl2++SUj1udG7
+NOF/akTyK2DRFcP9X+XxvCw/OVmL9rf6y2ka6gd8q7zGMZ+o4nvZfnimxpvb
+7bDA++91ilhfXmOBTz0sfmN99Qk8nLF2y2u63tlwYwH6y534pOo95cX3y8xF
+/718v9AxmNm37VMhztPlutNWAe3f2jt+E/Ouj9pUsJHyaTItvYg85Cd/MIqn
+fosyZoYgr1WPR7pr4QTpqG1qyLMzoidSMAee5XLCBm47ObJ0L9xXMWX3Tjjm
+ua5mGdXFB7WFcLStpt7kuXj/ut6FrYAbKov93GCuek/vN6zvyfdbmwFLQg/3
+roLlXC38G2DR/birQvQzwuNN5s1DPUd2qQv6Tfbukp5LPuFtw2KeGapq1yxg
+0U/B9zQxb9X9Jmsb8qOmN+PIZ9mF+TErYY9H96OHkaf67Py+hTBjf+e8Gqw6
+/jJYk+r6bXZbcB61deXJ32j/eudd1XIs41XcNKmePOGpbDSsbmX34SYsyLZY
+cgiuUvyokgIzGcN1BXBbxPO9oVRXjj40g9azcL+8i+pnjSpKYVff4X5Xmt95
+KOMk9tdrqRt2h8V73HI59FuyqLzOj/ZrPdYVjvMsE5cMx1A+kROFMZiv3sdK
+u5DWc3n6PBrz83OCvTrInKtfAPJZ8nbLMgPKJ9P23ELk9/dIbcJeWGygkvgE
+Dti9quE+za/cLjFA3sUG4evVjbBfV1H3eng0YbxFaETv97/GJvALY53sK2RZ
+NeFL3B+xI/32KMykHNlpRetHjD3UMsb61pZav09kuSPqslKmsODDwMTj6E/+
+wbTlG4zp+T7UHIr+FzrNY1xhj/Y7T50xn+cfv0zfCYtCi1qXKLKcVeyiR14w
+J8ncqY18ZEMUDgth1q2w5yd5lktt8Z7iRPult76ykWO5xQ7r09bRegdST4lk
+WSZEq9bbjOp2h7SM4HPdjk0GVOdiY0dlWG793YTwH8jX1BtlUNePGXmmQP19
+C6tZD9+tWOQ2QvN2d4w/hbW83O61weLpg7wwOXo+tj1thjmnOGUXnGfL4Sxe
+O+W3xFrJAf1yqclOY7CkP+XcNpxnTEXT0ETKI944zU2J5fz1dS/okgel3m3h
+sdyl/Ul6FjDTnNezAHlVFYal0bxcaE5+hzLLVcZ8642ifl1l+X4436yvsQ/z
+KY9Df2bfRt6fXCIKXlF+o133HqE+N0h5rpQJrl9b8zEZ9R0rBsSzYKbUVMoA
+/u3dD0rryJ9uvQ/H+v3CgmofWHLlthd+HnEDh+doRlC98dq/+ej3bIzxomQT
++v2kOPAMzkfL6cHdDKqL3F/g+4kLNPHIvgiL/uHNw/vDbRoMXk7mKpadtcb5
+HFO8qE3XS5ImCDchT6OkI0tTyCWu66Jl8L2x/PiVaFhwdf943wSWy6yb0nSA
+1tdMP54EC8RBpl5k2fMygXDAt7cWm2FWTnUj6kx2e2zAKlpP7KvVi7pqzhFt
+M7reuHI0DOsfG0kMX0h12/lZVrIsZ3RFOnIB3d+wMMgA/XUbT65cQtf7z3+n
+h/5nCo/mraR+Fn8ynofzdJxuq7+V5qu01jHB/L13cpv8ab1W80JtPL8ZMxr1
+48khic8HkFeW2QuVK7C48E/pM8jzrZHE/SW5s16Bh/Nteb/57jjlUzDB3hLu
+STqbqz+fzkvPxgznsdvxaL49LPG9eHoI70vJXKMN+8n7eviBWO+jxaSFp2HG
++sa9YuwffTXN/DrM2vIXv8LzZrXGMqKS1jusdawa/SdN0fJ/S/erPAi5juc1
+LqflThssvqTVdRLP89IB3+AuWi+vbloQzmfXSLFqB3lr2ZAv3pc9IddNm+n+
+WOVNR5G3dnLC5zpYFGCysVKa5RpHb3IPqH7z8ePV0vg+eJhqXkh1dedn36VY
+xn/nb1kZ1E/Ydt9PUiwXNHJmeSJdr28foI/r8/N6gyLnUx7rDqRgPcWlb86G
+wIK9gRpm2M9LQ/NxEPWr8JuhEs7zksDuX8pD9Lub2xfYU1huf5jWY2Vzx9D/
+Pktnv1i637WdPwHn+T4+TyWd9nfQ9pZCHsLbxUVFNN+kksp2uLx+KL/+v/UV
+8nKQn6W5h2Scrq+etdIS+aos2KA0awFcpaifjvP9cXV/mR0s2FBdUob69qN9
+8cGweOzXxGz4OTexO42uP7HD0RZ+tfaFXzksKl49cAvPj5zF9uctsOTSzw79
+2H+cPgv+//8TBfZ/11uc6w==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.666233980906949, 2.1296932060463307}, \
+{0, 1}], LineBox[CompressedData["
+1:eJw9lQlQE2cUx7dQaURsyx0NJNnsrhU0ioBAKcWneJRDRUYq5VA8oBjEFMMl
+Rm4BE1shWEQUwVbKIai1pANoS7QEUTEYFC2HDqZaREektCgFRvptdb6dyez8
+Zr+8753/R26TBkUZEQQhRT/2/eahIWRqGj3mQNxK/Lm+nQKJq1mRONMC8Yaf
+4sspOPT90qxgG0sgAuu4bbkUELVp4cImxF/t9J2XQYHsafLQjm1WQHDD7MeV
+FHQ9Dw8qNrVG5yuvHKihILbfx9ejFjG3pJZzj4KVD+qWBHnaAJGv72k1pyF6
+CTeitwFxxbJXzp/TcPyZ9omFtS26/4LKrYIGvbS9qmsT4oLOLRHPaFg7cKRR
+vY9lVQnlwoDDjYx+50zEKYrYj2UM3E939T8iQRxp6aetYoDe1bPnzieIhQt4
+5TcZkCVaaiMn2PuftmYYGGjbbr6srQ5xRoPI4TEDpIPv+YBQxPBwnbSbgX12
+6hu5pux5he2qBgbiZz1pvt+K4rl1KaU6m4FXx95fLChA7LF4Mmc1A5N5nVqr
+PYiFDrpcggGXD/xnLpCy8RetM6hpCNcqtosViDXOWyxjaWipOWvHY+0JZyWU
+0DQsumYyaWuH7pu/NLH+T5SvuwbZ3sOIY5wrTNUUkDVlp1/MQfGM5G04o6LA
+8+Kx8qtqlsfnVWRS8PJxtIVPOBf5v9zrRRYFJRM6gjCZg+y5xuYUU7DW2CpE
+cgZx5NlM54sUZPUePOC0ai7ixlDtMAXuUdzZDR2ICZ9WahENJQNmoVIvHorv
+8kfpiTT88Jo+41eA+ImY+42GhvPi6uleLWJuDuhMGfjizm3vvH7E+TGXrq1H
++WpxjCzsZs8nnQ9TMiC/4G5q3IA4JMF4pImBEzG8O2lyxJr2Hc2/M5C9d/fE
+uCtiTnbQQ1SPmA75rbBHyJ/5moOlAwwc3RkaZ69iOXWh+zUGlJyQlx2s/4Fz
+DfxTDCR8WRtz0gTxQN2nzRIGrGZY9032onhHStVrHRh4vuaXflE74ozxqKsD
+qN98h/tv6xFzlaeyvqUhVxEm404gdkobfTeAhqY87Tv0cmRP01PQyKFhf1VG
+UWAl4g958upOCsZit4o9KORv5NaAFacpaCqYNh1Ss/womTxIwbRZRNWSTXao
+P+09BtMpkA+z82aHv493fheiq7bH//cOIMZs/PjYvnH8ya6r/Xx8vyI8fde5
+UAH2b73c83XfrwLsv8YrqO1vIyGOz+1+vrmNrRDHP3vzqcJhnhDnJzU90SLL
+Qojzd+RE8NGt/wpwfvdPVs10aRbg/MeXVqoMcQJcnwr37MWneQJcvwOKwhnv
+3eDj+sYef7QgM5uP639oQ/vYlD8f90fxyu7y3Y583D/lnIWXUyg+7q815zYR
+jCcf91/Qg96Naikf9+eWqdHKgt/4uH81yYOj/i4C3N9JRkmpnf/7/6b/I4iX
+t/0chXg+GnNKpqflQjw/Mw93JD3QC/F8RdMuTnYMiedPJv5RzJGReD4Nxe+v
+9mkk8fzGlcmN/vmLxPNN11fHj9qL8PwHl3uuG/IUYX2QpIbuk3wmwvph4s0t
+G1stwvrCUafEjLiLsP74TylFhay9t/rUJmNKL02QWL9kcX1VPV0k1rdjXskD
+J2pIrH9XXJLKOrNIrI8Sj6I2620k1s+vz0b1qv1IrK+D+S2F0ctIrL/BaWqK
+WUFifeZd59XZbCSxfruZlSmTEkms74FDMr2qksT6/1DlMHjXQOL9oLPc3PeH
+owjvj7lK/d2GVBHeL9fNVipv6kR4/xjXa/RSisL7ydvpsXd3AoX3l25wr9vO
+FsRv99s94zfv/wC2rKt2
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.844981764589882, 8.25073156171056}, \
+{-1, 0}], LineBox[{{6.4999999999976925`, 16.}, {13.49999999999251, 16.}}], 
+        PolygonBox[{{9.4, 16.}, {10.6, 15.6}, {10.6, 16.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 16.9452}, {0, -1}], 
+        LineBox[{{6.499999999996362, 16.000000000005457`}, {10., 
+         10.000000000003638`}}], 
+        PolygonBox[{{8.552322615314452, 12.48173265946094}, {
+         7.602165824326175, 13.316718930329426`}, {8.293188945044921, 
+         13.719815750748694`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.515942703607428, 12.823799910437668}, \
+{1, 1}], LineBox[{{13.500000000007276`, 16.000000000005457`}, {
+         10.000000000003638`, 10.000000000001819`}}], 
+        PolygonBox[{{12.052322615314452`, 13.51826734053906}, {
+         11.102165824326175`, 12.683281069670574`}, {11.793188945044921`, 
+         12.280184249251306`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.484057296392571, 12.823799910437668}, \
+{-1, 1}], 
+        {PointSize[0.04], PointBox[{6.5, 16.}], PointBox[{13.5, 16.}], 
+         PointBox[{10., 10.}], PointBox[{10., 4.5}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T2", " ", "P1", " ", "N3"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdfef/ifghgihi.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdfef/ifghgihi.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {44, 44}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwl1ns8lNkfB/BHQ27TppIIRcktNGFF0UxRaQmlorLMMlsTilAuYUdXxbYq
+onaTXDKVJLeQy4gy5DJJ0ZaioiG5hBq6+H3O/vzzvN7Oec75fr/nzDmPtnfA
+lt+nURS1WIqiyJMam8LfYhalSjCbRVkap+sWwy6O0/OVYWFBoux+WDxVuJJF
+HH2i2wDmGXquOQJLL/1R/2ER/r/f8thz2HG0KrkI7ji1u8d2DouSa6loiYVF
+PDGvEn533C1pN8x/eK5hnTL6G5xJdYYFXm35T2EdnywjOzg2tFm0dy6LalT+
+Q55Yv0ou4TtMZTeecoIZl8Ve8Sosirt66rw3aZ8/9WbWPBY1dj/3ZjQs52ar
+cRreuktK6iqxwu8pI3BhVPDROhKfbtzZdarIQ2DzZQgOLKPTj8FjRyLoqshP
+qX2y/yYsjFIPtYFZ+tlfy2HuWPF0T5ivkvflLtz2/eeKUFjkGxWVCnNkw9/G
+wl3rDk8FwZFvNdQTSP2+Cm5YwlQ43z+evL/IcP0o4knzSNgcBadsslDMhiPz
++aXesH2wXYQ7nPm1UZHMz1AfWkqH3b8Wa8+AO3b6X32I/HmFy5htiN9S5vVc
+Ug/q/Lh0IlzSG7mFDds7vvYi9VLKdzm5HnaZ7AuRIfnnmRiugeMHqbh72ohP
+zaxzMyzt8ftoEFzyb+uv4eR95xsjxrBlsUnUXbj2tU3moBaLSjgu0VYk8bwL
+GiyG+QrtrkEk/rFBTizMYLQ698M5lRtsOKR/w2hmAPK3Kwtf40D614y6/YAZ
+TmV1NrBqfBT9nBrW65fJ3FWkf463qe587I9ea7YdXFLUY14Mi12K2rbDkrVm
+N2zUWZSWg1/aAThthmZMCczaJKHOk3Z3m6WLNbAvWLVDJbDIvbk6ArZPlF7R
+DbuzShZXwKwvGbHyyI8/larYB5eYLrmwDA5MVdT8AQtundLfDMsZGIi/wYmT
+tiv8YSX+4NteuLzF/ns0PHzxk2cl3LiNoxhL6id1fM8JmKOo4nYC5m2VzVlL
+HLFjXTjM6qrf+gXxCvQG8tik/68THXy4o6nlgzUZL2mnaBfsbjNx7ycyn2VB
+jTKcssTJtR3xd4kbv7ejHsILdrYpJP/wCc/rsKpdpr8raY/uMY+HG9NnDSjA
+4okdqkdh+zR3uSMLkZ+fS+tfsKRgPX14AdoFgRsLYMZ8TjAH1nIrDfsIu2/+
+dvqtJuI3zg/4r95jKcsPwPxtBh5XYZ55b64SLHdtzmUVUu/c/LO1eKY0N3Ve
+xJPr6Zd0Bk++JN1SD/0k/boJAXBXvqlXGcz+c3LvHjhQYU6dE+alTn/SPAh3
+vH/d8RqOVcisvQDzqloW7kXc/Lj+7HqyjiFdob2wsI/mpYBxRDQvDUOy7za+
+H9kKC7hPbrnBgabcaVlwTox3UwRsaXl4Ypzkc9qj9hwc1v7QwhbziFrynK+Q
+fXLpPCsWLhnKSE+DWT2GnwRw4v5yTjLZt4a11/pghuHXG8fIPjOx85qC5Z5l
+DeyFtVI2dBM3xswbsyfvX1rRTPpvdTRvXAxz34bfKYc7wnjbJxA/67O+TDgs
+SBbfvQkzZHSMteDhwSgHH2KX69xCxJuW7uirQ/L/d+Y9S1LHbJ7CKPpZWp9t
+zCN1Vtx+oRVOiNldq0XqU5wvfACznQSaf2KdJJMdCc2kvcMtfBLryst1//GR
+xP0gfN8+so/UZlqQ8YU9h7f343eopcwPDITT7p42OAhzxbenPYaHt2c4zIKp
+ZSPF2shHn+ezv5qco5kxNt6wXKFGyEn4mMUlYz4s+MXRgwNLc+7uGYEpHVsr
+d1j0cu2NVeR3YMdd5g2n1Y7zj8GML5rRPLjW6LpOA/ndKX48mwebD1+epoBz
+SxxhtXCInMtlv3ivhd1d/ewsEU+ib3PeAXIPeBvkn4TDQm1KL8AuXOmODlj1
+jvadPJh7u2aOHvItl73JqoLDHnC7Sf5aRdYn7sP2IxJ58juKVzGdew/WatRr
+aYONZMRD1+GugQWzB2EO1z4qgZy7qx4Hf4KHzewiAsk9yInb1wXz1VvfO8CU
+bQ37Lqy0zeizDrnXzh+5HAqzN+gMfifnTpyh1yKYGjmk9pycOzfuVJUiXobJ
+vJslpD3n9VUWLH3Wh58KJzzkni8j9ZY1b4sn9dqnyV8Ku8Sl/EPql1d10zkF
+567/6un0k3DKZLaeDDwsiq9MhMO0Sh4dwjn+0vrYi1tk/IjWrBHcq8PHx+a0
+knuAFi0IhwXzhVkUuTf1h/6ZDfOKsn0sSX47C36qwj09ttykOpTcm6GcBTGw
++O74m3JS//HzYzvgHH77HRlyjxYKmzbCicnJw86w/qSixBnmxKm6XoQpyYJ/
+fWFu99ILr8m92DtDOgVuk6Ula+ng/fQQ+zaYobN5707YPmh/pzriKfRb4RcH
+S6xfHPWFO/qNt+fDlNC74B4sLLdybIYFN/fVKyBfO3lx1ys4Qc3YyhUO/Jin
++Y70F1WVJZB7TyophrRrjcWFVpF7lTfx9b/3L00zfQknbpe8KYZVucv3vIPN
+7WJ7kmHLzofcZ7CYS58MJtaI3H8HFmZMbdykQ/bLstSDMH/NGXVdks88LwUd
+WNItU0bB/Ab57ErEq5o+05Pkn9Id9rM9nNN5Q6UWdjcp1KtF/h067QV5pH3B
+40gLmJ7VUHCNfIepxSVn4LtKdSjULJvUz7VVSQlWukt7m0++4+7rxfLId5tP
++o96Uu/OguCJWdjPJ/UcB8h3xiO5T9Ew4xpbUw3xpBwPuKIMd/UtcnOGSxoi
+AiuUMP5f9yP//K/enPOHYUflqKrHpH5xB3a4wOLlFrPmL4GZjgbWcK3JAysO
+zHjzPGI1nHNp/OMtWBxb9XIbHNnt+H4M5u53o/HIeA6pXy10kY99VFcpLFIO
+NwuCXVgra6bIeA6xrzJhbp9s9CbE5xgxK6sJjrXXPJcK68/uTPoAq36Q9hyE
+dYoky37AosUXN1kif//gwT0yeshv1UH5MDhHdRVfCtY3Gs64Dte2/mgcRf9A
+w5bqelinVVm9E84rVKh4CsfOGzStgsM2rxY8gjOD7k79DbN/yn5+A36nFp5x
+EBZbDEgHw/GJ39lOMGvUcekSMn8N55g+6f+OMb8G8QVmbHOYTmwTFegMcwMe
+NPWhHvy9AUebkG+eyE7cBofNVbFeAxtpFurXw0pdf3f+OpOsm25lHSwwfORh
+8RP2g8tl/8fEJ4Ks5s7AOI+Vj/fCLtXeB2l08v3KfEPm0+oyDJZXxD61l+lf
+Dis9MbliogBH1Z7fDXf5Fi4Kl8f5UCoTnAGn9UpnfpRjUd8amA97yfq8slL5
+Cx6wUzxlgvoxiq9f8oQtNymeCoPZPYyDu2Cj7fmR92HB4cdzjsL+uZ/nK+hj
+/L93GDyG6dpSZpvgPJVvz5lkvlVd908RG9IldbDH3G30StJfa7fTb4jPcfmb
+a2KY3cQbn4b4xZd/OyNngLweFd3OgD0844w1YVEDbeNK5OvvOOWjCyvl+H6u
+gN/JJp7UIf2TZe7ooj70yE62KnGJ2al9cO3ET4tpcFpF0GA83CaO9+rFfFQI
+rY83g3yX547XwEqTNNsNpP8396nLsMvK7VdeY3z+hOW9QyT+y79HOcCUwZGD
+LrBWXabBGcRn57sw0JiMd87n7xzkUzLd6dFMkk+655pbyDdQLylgAvXSSteo
+Sib1Wvpj4gPxo4bLIbI4n6fvuimGh6cejTpOx/mzyn7XMCzyPzPdUAb70+5A
+AI2Mtz60X1maRYWYBbVrw4E8oY4KjUUps2JmOMACbRfXn6ehf+xz9WiYsfJg
+Z5gUzjdh7rVSeDjq6Z0eCuspXDv5lcS/R2fOHzDd7bSGLerTtcfz0HpYVH2j
+Ox52Gc8NXgWLjQ9Payf1+5bVsAv+J0TLfKEh3h9MCM+ArYubmT5wYJP0ezrm
+EwSVqV2FlWT61c/CGocdPj+D2UdvK+ojPukVxR60pZhvbsl7IcwqXWmxBFaq
+SYvwRT4db/2er4JZ3bdO0pDvyy/yszbAadJHDONgQanBAmL2SqbZBJw4drbI
+mvT/w/3wetRrIMdXog+7eGct2weXl53iziDzqZbS98Ia3U87PpB4r9DjVsCW
+o7/tfAiLXphOtGM8dhJN7wrsck72qAMsZNqeDoPz+GeWJCG+ErfE+q1wgpxU
+Qini5xc/oluQfFU3jFYi34F44YYFcFrVs+ocisS5QncmTJmqPVCZYlLDcqxJ
+edL+yaag7huTKjn0NJe08y6xn0VPMqnIFYxKLdK+5+whJwmTYlW+MLIh7TTz
+Vxs+Myn9BydOcWBBvfBaxBiTamy6OJJExn9tNW/sE5MKk+PMF8GsK1aXKkeY
+FN3vD89ZyJ/yXb+le5hJ2dG6m91gQXhhixcsd+Dd+qukfhYVH6zg2AtHjnwg
+/ZlzGvzgnLlNP5sbYb3Z/dQgbK9zTyecOONJTxHGH5bZvLIEplydvxVhfrqj
+aeoQsc/FmFejGD+kqk7TGM6SUVowzqQY0hN/roG7Tmxy9UY+8dVHzXbCacMx
+D1O+MKnEos379xBXDwffRv6cJ2m+e2FWu9XtpAkmZe3KqGfD7AT6fWvUS7ij
+KsWJjOd59lgKvNVO1cGctL/d9uIKXC5RuzYH5gVlzt0Ei2bvvDOI+LpqD+mn
+YjwxbcHVOjit/GpNIuazFx2rSoNZQ54sC8Tj8qZpayRpNxbvjUP8rPz8vzxI
+e/1vi9KQX8oW4X5b4lvV74+gHgyvJzdNYZ7RzsOxgxg/7931paS9uUJ6oI9J
+aQRIdi8j7pX229bDpFTLcw6shgVrpA70dTEpqjnirTt5f50c68JzxB+R6xX9
+n0NKzVuxPyi9ebmkvt+3BDXUMal/tMtEvcQhFhud7jGpwDNvxnVJvWOftozz
+Mf80iwx/Yq3ohuHT2G8bJPeKiMkfr+L/TxPW/wCX74+H
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {6.573901114580226, 6.782664290660753}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwt13s81Gn7B/B7FDmVUWJINcphpAOySgczu6UorSmJpKcpKomlZFHsM0mF
+ECHVpiZhC63DI6kcxqEQamxOUQyhlKSoCPl97n395h+v9+u6vvd9Xdd9D746
++7y37Zch+DAI+ffn4CQ+mjzSTX8u4xHmkdAJNS0eWaPC9rkL8/1SnWfCtjGJ
+HodgCev50m/IF+8xtZwHD271SCyH+1VyjZuW8ojw1xP5AbCnc8SBOOr2rDQW
+HFNOah1hnuNztzQW9hu4SfTgQZ3+LD04fsFXq/ElPCLqXN15RYNH2OumHm2H
+2TfqixRh8ZWA3hqYP5K07rg6j3CKwyIrqGUMjw3M5pGCob7GSliotHC+J5xX
+UFrWAEs2KWZ9U+ORqUXb+vtgEqnwPR5mTh+Ok8X+gnA5zY3wpX25d2k9vIvx
+G5iwZ0jDXGuYPWlU+WkW6mt0EXrQeu/cbHsP8/hRsRGwyDK4eAI+puY+L40+
+78DO1MPzAf4Gug9p/yfufBHAPsv+11MJM7uuz82E+W+X/HgC8yuVJ2RQr3ZQ
+o3c5HOMw9FEA2y5P/DsbFrtUyJXCi1e9Sb0AS/1VV89D/2avr94/BGe7maT6
+0nm4PSk1p/W+vZpdCEsWFzLG0K+xVqPtF9gp9b9aBbC0qoqlhXleahOOesNM
+m74zHNjTc6RcF/bR8xqZB4dpyIpbFqM/m6Sn43g+c8/+NdEwu9j3SBlc4NXg
+v5HGl1ltPgIXClTD5WCScfO+EpxiHmtdZ4S4tvZwPOrnZ1WvSYKlSS/7mLC0
+9U24P8xMztUIxTwq9ol6XGB+u47TEObpU/vn+S0wLyMuyxVOSXj2qw318ir1
+1pk8sn6f1NcOjjF4ZLULTonylf6Hxh0DTr5XxXkV6cz6HSbHDX6LhtdcjlgR
+R/dbEvd2A3z10SuLPLpf2OE36nCLm/yrJlgyuuvAJBPnaXPlnxHYuCRqF0F8
+sMb1uQb6EzQzC1hwZNqjeyawWNnAl64XGpkVvR4WFo9cPwNXODjl/krnI1cb
+2QhLXv3zgtrY+8i7pai31qhC/9/8up+/R8E+ubeWLqXxrDLxB1hUbDWpDEtl
+G1fZoP/hixrzOlEP28887k9Y27QsJIP2q6i1QwpnXi6J9KJx5xzRLMxTIrk/
+zIEH16RvMoXJ9sUPOhbhvtT3TFsFGyuozoiHBX+Qk4awmU7Qamsaz03ZS+j9
+jWOf/2GIebmouJRg/e2ZZZb3YZ/DIh13WPnLta3HYfLlMX8C9YbdLo1YBws5
+ijtDYE8L8x3qMF/JeccY+h8Zar4/xEE/Y8t6PGH5xQc2vYT59+w/tWHevBC+
+ngQW5m07uQXOPhX88SnND7/LiFLBfT3HetEM81YeYiXO4BHd6ZZpfbDYY+4f
+pdOx3kHDQhnsJ2BuVp0FK69zNNWB2ZstZsQqox/nnt5fYJHm/GZL2PizQ8J+
+Wu9seclc+KVsxcAZmKczYbcErqo7nZtC4xtVbnnAbq3mjwupC0e59fCIu6Ft
+HV3vmWGlM/YbzrC710D3X7ogYBLm11S11cPSXo/D+ai3Sn/vWDldv/TyVz/0
+k3dBWJcOG0cVK2ih3/EekxC6v4gbvd8XFnkvFDvS/EPK/DJY2eNu0ny6nv6P
+QBnMj20rSOig81sgMjGGid+A32VYUs+KsIa7HUzs7ODsqLzjNnBB7eSuKbAo
+N2nYBDY74/7ungHyRZwBBl3vhPo6b5h0rHJ9QPcXDMQYwT6q1Zt2w27n+6oH
+9JFnXTClDfWvLNe78gCW1o7tfIX+pgYrbIuBBS/+WvAE/Rd+Xt3iA5Mk5tN0
+zEscLCdyofHUp1vClXCem86k2MPCNZfSvRWRd7bT3YHmL9G/fFABfd0JnhDA
+4ll/zjwuj/lOmVTwo/vdKh7+exqes01rO099UfFvZVgyftQ/i+bryI8myuH7
+aWydVU/X8229bQ/HnDC1GP7XKjE8OFOvqVIN/QlGR7x2w0IdxkITWHjunexf
+cMFtZ+5GWBz/dA0L67d8Xb7dgfpoMj8dbgiMHdgJS8Pi2Q6oj5N3g2ynccfy
+Uyqo/2rNeP8vdJ6BJOMZ/PaNWZQ+3e9EaPg59KvGO7J8EvXw9przLJTo7zeZ
+v+qoT00/+0yJ/n2drR1H553MYW7A/AZlWvW30n4f+EsTYFZbRroCjbtbXbkP
+r89596hYD+tzT+XfgbP/u/vhUVhcfyzdB27pUGk1gEma/ogMPFyb4SbVxTn/
+xDA8iP0KFBwDr8G8gZzcG6jPU0F9zBUW95yrLED9DWppwaY0f+1utTz0m8dI
+M1OCBR5Bv13FPKrOlvYOLMTzQwF+JzC/FFv3nlewWGvP4l2yeH7+IYUW6nPN
+0VZT0X9EQt5LWKR0SX/9FHhiV8s7WOp9MXWPDH7vdKsyGLSesdXh1xn4vpUe
+2z+X7jf5+xMFODKxcHQtjbMmk5IJ+ivxPS2g8WjfjZ7wyMSihyG0/s2mjIMw
+J195azLN//Z2NAa+yrbRLIKlut8P9sKS7zs062H2wJucvVjfrI55/SWNa8xO
+H4PdM+u2tVNX7WnLQH2DsXlWjdTtbq/dUX9hRM6YmO7/0+0mDvrbHpbscwMW
+GgWld8LrT4ey/GHiZSgKxzx0h6+1/kLzExh3NDCvlnLpNDmaX97VegqWj260
+LaPzem+RVAk7hVZdD6TzKhhUb4fJhedGS2H2NZdfK+CRGQ8suhYgzpy6JZDe
+f9UzGpdgqVWv4Q/sF1naP7kVZqc0TzjA7FihzEyYZ+tddhr1ZednfXihg3yn
+N9rx6KdC5/jqDFiUZqARTs9D+w7jLEyOfKr2wjwC5mzp9aL5teKxzZhffMJt
+lgAW5nf57PrBJTH33Ox2w2IVRq3FOJe49J2qcaNeWXvX6juXVBi5C/yotzYO
+nx/hkuxhJ2EUXX/UKl//G5dYO87ZQvcX9l78qvaVSwo0uzNqadzdXnnfFy7h
+iZ7t+kidVLNTFXYv+ThdFf2ITUY4C+CWwoHgZTCJYP7vPJyZwYuwhoXhIfZb
+sV7hws5NzjS/enG3M/arkqbrudK4wlRuEurp9/Lp2Evnk1/UIYd6C5Ln33ag
+67mUXwsd45KV/7hyLGn+cEqwzASXeCZ4nJhD80NCgzzRv+6L5BUDqI+3KME7
+axLef8r1HixY/LrHBfOqmvLn4QA630R5k2LYp/g/s5bTeaTXCL/ArNlO+/rY
+iB95E/QDHm49EZ0EC3TSHjbBooaY7q2wdHZqWzBMxm9kybPp/wPVKu+x39vt
+sj+HzUd9HQM1IainxaPBUxnm5eq21+E8quR+sb8xD/Fppodb0Z+AsSHXhrpj
+xfL76D8s4Zv/NFj8raU9CPMSqny+0zYX+xC5lRbDXCL6/vNvj2HhuqIdMp+5
+RPqe30VNerQSmj9iPgvbNtN8YfblOJV+zK85WoNB15c52l77lkt8WqJGzKjd
+jbUX9XKJ0+oMJV/qAiXr1d2oL7Cf3IPJYMZL5ddcwoq6YDNO44nE7mYX1rtc
+Ym1J++vOaf8OrxzJCQ2AyXOD4mn0+dNnm9JoPDQoJr+HSyTScxcf0fjVOSs/
+vOES5nqL8nrqZ74fzr3D/TOz1amm+WvnX/jtA/qdFW+fTueVZay5YpBLOPEh
+fceoOX7bcj5xCbug3dWQ2vXRnJlDqOel+7JqWu/uoIwNmM9g2q2EHTBvckzF
+EveP430mpYHOQyOhuw82lsmbvpHayvy9Jb3f6rzJHG3M+7Z/6E+wddfIV02Y
+7CCMJ8gP6A28cGoO8j06qsaxPutZ9+4hvJeJd5g5/oP9nYrtb3pp0e/fdkV7
+nAepUVr7lb6nuXs/iUD9YRY7PWM06XlJ1FRpf8Z1+ZYwKTnGf4jzIAH8Ghka
+d9c6uArzWznFyOcV3svIwudhnh34flmIjz+lbj/ef6cJ/Ss41TdQR++dqlyH
++7On8/cBauYKzkAhl1zqWyai731k8EiIOAb91dfX21EHhO7J/7sE7zWWsrQe
+Ytt6QLeohHDUJc8bqKV+tZ5lJUQQWJKqqUX7d3hlVl5C+CLO653UaTEZMqUl
+RPiKqRdLbZ0frl1QQphee90eUg9KbuYll5DBzV26jdS3Xms9SuYSeYXDV9qo
+Mw81M0swv3lFj2upzVs+ratBfWHV0X9RS8wnk59jXpV/PD5MLXe+6/cXmI/2
+DVMt6inm85614/u08LIwj9ZrFLEop5NLRrLOm62l8zscnO2P+2q9KSH6HuYh
+rJ8rK8I82Y5DBw3ofIpsUmfjPlrHshRj8Z4ltL96sgZx3mgTGcV7E/ncFV6I
+592vtPW5Uj9c8vo91r+07cC6Jrw3ET3fyGrsL1Llr9lOPWmmcqwF98NYcLaT
+/p/fYJekWI/zdXi6/CR1k+WMS6V4niRG/kT9/x8pfd+fxfs/aePoPA==
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {0.4875589769853401, 8.878318388907438}, \
+{1, -1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000002274`, 17.}, {13.500000000002274`, 16.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.552325660469876, 17.180083206945802}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt1ws0lOkfB/A3USpqcp0Q41YaYhKbrNa4i1wrUZRKKalmc881bOWSJImi
+HZJLWaTkkrYhogs7CSG1UymWpYmKJP7fZ89/znGcz3luv9/3eWfOeVX3HHXd
+J0JR1Hv8kf/U5Cw+6mzqv48Um5KJzjmppMGmhOpWM6dhz5bjVyxg/phKj7g0
+m/KOlU0KhAUfa7eEw+wr25ilsPP8Pff74NTBTdRHMj+1VJ4pw6aKksKsDTXZ
+FE0yQ3s3zO3Wn4mC+XsVymJg6oyJ2GPYe7x842m4fGuntswKzG/ozAqFqxMd
+7XfAfP413c3w7XNWnjmwoKYhRAHuN85K6oY5G1aUPMP5jFxzh0UrUY/KUFEE
+zPvm6G8Al7/e8UiF1PfbVvnNMCXzreY++uvX/mdwPxl/qGm7G059Wjp8FPZu
+OMtaANPtR7OOwOwo09G7S9HP57zuvXDMrFNyJKzl+MuoM/El7QgXWKkkImgd
+TCuZ/tUYZoQ/37QMFtjW2xJ7r9CIm0S97GnVj2S+aN1x8xdwufkzrxNwI/dW
+TRXpR+LFxWY4W+SjWDbsbdh0Ww31mLyqVToJO18/9PksHEHvrAqBGR/ZLxeh
+v8bPbhbHSD79Hm5p5L7URP4KJvOvRL5XRl6ZOTZzyXr+YN6jEpgzFqbAJU6c
+MFwni/GAX183knq6gk/UwM4TtdfHST2blmzTk2NT7iXGAdroh1+77206zAqf
+afODU/V8Jz7APov588rJ+FnaWnV5NpX8+OOKbySPXrqMLcy2M5O21MK64aiF
+W2HhH/ScFJjR5xFpBwdaNmd1EbeWPVwFd+ybmVy2Cn2oR2l+wf4dmqq9bjCr
+Mq6gDA7MLfo9CeZ8rRP1IvVUtM/eIeNS3bFzYI33o0u7YeFpvfu56EfmHG/b
+KOy8VyreHC73udDwDU5l2mQMIg//ZX23puCYLy1xmXDLfsNvn2Da3ruBbrDO
+0MpGAcx3CqdWwO6VT3NayHj8KfGFMK1y3O0GOU+Ld0mU5Juw90siGZ/D6pMj
++Zt9vXKQ9GNh/INNnu9wv7iNxFThulhYtLe1SYfMN8jr6ibPt/DgflkyPrPd
+ltRbUiKvK0b6XXvG6K4s+V60Xf6BvJwD31WYol+uAatzFo6ZbLN/At++ef2S
+BKk3VM/RA3kqxVaaasDlPePD/bDM75xCa5KH772jB+k4X7/NKgBmv4o//BY+
+YLxes5jked5OaL+MTaVLRQs/kPGz3/Ly4Gq3C5Q2E+c96Bp7B3vW/XE4AOZ7
+0pmLFXBf2gNqf8Ic6bQTDLj6IH9cXBvnFd/XUoT7nr+qcIFpu3otZrE+/ss/
+NhmwQEdS0Aa3eHU3dcCMB2avk+FkvfCoRTqYn7m70wSmvo1Ir4d5Rb+MkHr7
+qipOesKc4Ku34mDWiVnTIDJf23pEHS7ntsvHkfm6v/m0oH9BQYrbSZgyGqoK
+gjkTkhXRMFsigMmC3TU3WXPIfuXJId+Rp9KwMMEDZkWeKumFtWb0TTfA3E9L
+F/DhzBulu5eT+XGzA33kPi4PL51G/bx59jfnYD/+rE/0S1g43d+5gXwfBF+f
+3YP54mGdZ2HbhCzpa8RTow5fYEraRfE8ccx8mUOovyWXeTwBZsfJbRmhk3oW
+HSJ2DkuoCUEeEsemm8h8bl3uZTHka6ngP1FEzlO8sDqN5B3y7HsLnFqmXk5X
+xO/Z9tZd4//Nz8tLhwUu7ZYrSV6jJz7NUcJ9qDD89pJ+lvgxvGC61Z31BbBz
+t9mRq3AMr6p7BPZ2yv/UTsb9M4yNVqO+XXklQ7BRpelPcTBtw9yLxN25R7Of
+wsKkrCvP4UBHC0cpXdxLc3FOITkvWXWzKxzDbrI5CPdZyY8kwsKyvyWVyHyv
+zuu1cKoKb+oB6q32zAgWkPXdJgn74NtWrrnfYb7eWJAYTMm1/rNID+MXXVOK
+0H+m+7ropXqk/wXRm+HsF1azEjD1vOLqQpKXVcfRWaynXnX2PEOegpwtBkMw
+o2fKvQTmuYTOtpH6qjjnsmEZZmF9GSwQLJfOhzXaJtNTYG7kzsgHcERcdOFh
+Un9fRugUXLeyUcMJppnX1djgPEbbDhVDmJ1XtqQYFgZGhavCrJOCMEXUny8W
+8VKW7B/raHMZ7sjrSZEm9XkUm2ggD//+pnhFmLN+Hu8mrGPEMdcl+8/sFzdd
+zqY+Hyt8ZU/yOKPl1AzfPjjxPYDU1+cxx1oZfbxx7LpG+uH9GL0DG20QNyN5
+0n5yCpZTwe/NuznVqiSvVtvi3bCz9cYjB2CW7vChDFgYfMe7AhakLEi8BRc9
+rvL7Qcbzax9Uw5uMfi5VZyF/m5G/Csh4VJW4DcxVm7c1Gu5aZffAF2bVtL+w
+hNtlkyfi4RiD2Nwp1FNgfeJdDixk3MzJh3V0/D/dhCmrgTU28NvyF/d4MM2H
+SRtAf9c7shQfw+z48HkJMHXqmmwbOU/UoHUNnC+VNfqUzHez6HqPvA40SCo3
+w4x/LVWK4bSkRvt7MOe4rXg0/PbsG9tyMn/iC8uPPI92EfNzYT4jyMsf3h/4
+MjWVrFdg+ZyE0z3qp6LJfIvVmtWwu/w6Tw7pJ84jicL5JrvtGvbAzpWVF73g
+jqX6mu4knxfjQU/h9JKNO13I+bvKsjaiv2B3exUnOFVZ+h0f/rBYffi/8eRj
+j7yQV+yGa7TtZP9y5cRhOPHyrkKS54G0RyXGDHwfja+lHIer86PtwmGF+38f
+SSN5jMmGVcIxv9DvlcJGywe2DsCXdM7zSF6huqZblqiyKTs/q0ufSN6TOx10
+4DTrTge5Nfjdm78neQM87fz4yc9wkWJypzlsnh077Q2zzlUcMIEvKUU8iYeF
+D4tmmHDDr5H6BbDRqsf1ZH+5FqZlI8xf8NHsX5zfEpdl+Bo+3W3r0wCXdkXv
+H4e7C546pcOJT274ztXH+qCvbj5wgUr0rCTM037ytwHsftdMRxqm6y+1F4cH
+h/U1iJ23RVfVIx+DevfNi2GOhqXpCZi5XmObGCx8bn7bFbZeLz85ifOoZUr9
+RvCRt3+oDsG8H/YPDWH9m6+7e2DvXb2+duT59ju/5hHMvh8jCIYzAk5Z1MDc
+HZUutXBU2IzyDTimoj1kAerZP9hc/zvJo0ewwBQevUlJZpLxTUt0IuBQox93
+02F3pvWrP2GtLTWeGTBt7uxbUeQ1Vqpkl0PW924U2MPJnY5FxfCg1E9HzpF8
+Jcz23oVbFK4aPIczGJF67XB5eqjIEjU2pfaedWYE5uTZ95vDrhNurRLoP9Tu
+lNFhWMa3ma4HcxNseMnwL4YDoZthrftGJVxYpDX7TSjJ0+FrfhHMjFAzuULW
+d55ry4ftflgfa4Anzyg3XyD73y0M6yfj95y4EbDWA87OuWtxP57+HdthXbe1
+DspwqNrCdfpw7anDlw3gFuHqt6Jw5hu/NiuYX5XO6EQ/GurruC4we7eY2zXY
+WZUj4g6zQrkfQmDvph5lDzimSEfZCWbZlW7dCmuZ7qKvhm1ZdesdYEGa7A1p
+kqfI8UQzMl/TezPJl7nEQWctqUddfQUFZ9e6qqjDjHdDjfNhiYRFQVKweK7v
+NkWSt6+rlQicWv48wZh8H5ZLXR1Hv6dzt6T6wPRjq88NwLRIA71M2PK8xORr
+8vyZXmkm96Nb93N2L3n+Vmw/IIt+g+dHyL2Eu1VfvSH5uCdltgpgyqmvL5fc
+zwXTsWHYNiJ8bABOWbgocprkPaTUxMR7nO2ep7qkPmfJdvoB+PPaZed14MEK
+zlAOzJSeEbUn+dJ2xj+GJxmFlf6k3+tGqf/C6SE1t1NhXsB1jbl4j/u6eP5U
+JcnbsKNNEk6uM+K8JPnVCzMk4Bny/rj2/++PGuz/AQ7UGzs=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.479517186987348, 5.883314205477544}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJwt1wlUjfkbB/C3tN+0oGPmKm5TUkKFQQpvJYQUZUmr20iNVEyRGrwto6SS
+GoU56hYVow1ZC7fFMkq0GEupG2lPm5RC/+8z53/Pwfmc531/v+f5/t73Fm2h
+/6ad0gzDVOAP/ctI0V+6LPPfZxLLfDc2ybOGC2qd9znAJdFjZomwsfBVQyy8
+eI1mzzuq7yzouwi//7m5auFM+EK7JBOO/OdjYyTMnvp+MAIuHaub/xwWRMXp
+WsGGKT7Tp+jh+sRHNW3qLDOo3LtlA8wtvvE6CI5SMlU/BLMX2VsDaizjomf5
+YxrV4z5U/QIHRn9tvgYLnO9NzVJlGUl7XGwR2VBacEyFZXQcTrfeIGeOpXMT
+WSajJ8s9m+6f+yT0jDLLDHFrP8eTffgvGnks05nZqBUAizceiXWC5z22T7Wl
+euCrUlXYPjvBfzbZsyRGBq65G5OoCHuUzBEvhudPye3owXyizGVKWbDp4NdJ
+b2Buzmp5G+yX5JBvTfMzjgWiqehnW6f8zzWweJZfuBz6/TXp2xcJ5RU8kK+A
+eeJ1nsh8gxO+B05VwLzsS52petjPuDbcPQr2aPVd7Uzel792DNbkFSj/RXbu
+inZFfuq8p5vew31f4q9ehFccrjxlMgv9rfE/8Qq+WjQoHQGLC5w3dMKrWz+c
+q4PVumf/3QC3hXXs0tHH/g7+o/mw3inbKF9YXPF5nhcclN7mmwtzZzfekIb3
+VRUPvYclwfn2Mehnv8m0KBUD9Pnxl2ppODviis4cWGSWeuED5p2jmBBsTn7D
+u1OKPHga3s0rYObcBc3LyGtfZ43nYpjVddibgzxLnzSm68KC05+n1CqxzMyc
+pHJFqqe8PmgA9/4R495B/Ti6pN5UZJkv3cp2D2EmqPF8ONxtF5J4HmY32x6P
+hXUaJLqR5CeV/Dp46OizF7/S/QfrehyxnuCap+52qi/9mCeP/W+nHZjuSFae
+EfwO9rglsqY6x1fY/Br9Nt3xCN1D9TF1SSPmCbWPH4qDPbITBlow75fhOLMi
+qtfUub3F+a734eZ8onynbdjsinw0mjVUaF4mUs/jFjx5wsrzYXDC2b6HozAj
+KLSphiWel8sFyLtRZpemzmyWCbDvUtSHd2Q//DEQZn3M61VhfrbxuhK4L6CM
+/xr3r1Dr75I3hG3SzI/SeQhy4qzhANF5vWkwL3vrkmCYXW44aor+JuvPiEw1
+pPeHf08H/Q8ua7x8E5Z87jSUwnw1ActTymBx1plgCfKQ+T5YXwpzMw6JnyG/
+pn7FGzfIecW2DchX78T5YRHZN7lDHX60SLE/gtbP2W0RooDnl2++SUj1udG7
+NOF/akTyK2DRFcP9X+XxvCw/OVmL9rf6y2ka6gd8q7zGMZ+o4nvZfnimxpvb
+7bDA++91ilhfXmOBTz0sfmN99Qk8nLF2y2u63tlwYwH6y534pOo95cX3y8xF
+/718v9AxmNm37VMhztPlutNWAe3f2jt+E/Ouj9pUsJHyaTItvYg85Cd/MIqn
+fosyZoYgr1WPR7pr4QTpqG1qyLMzoidSMAee5XLCBm47ObJ0L9xXMWX3Tjjm
+ua5mGdXFB7WFcLStpt7kuXj/ut6FrYAbKov93GCuek/vN6zvyfdbmwFLQg/3
+roLlXC38G2DR/birQvQzwuNN5s1DPUd2qQv6Tfbukp5LPuFtw2KeGapq1yxg
+0U/B9zQxb9X9Jmsb8qOmN+PIZ9mF+TErYY9H96OHkaf67Py+hTBjf+e8Gqw6
+/jJYk+r6bXZbcB61deXJ32j/eudd1XIs41XcNKmePOGpbDSsbmX34SYsyLZY
+cgiuUvyokgIzGcN1BXBbxPO9oVRXjj40g9azcL+8i+pnjSpKYVff4X5Xmt95
+KOMk9tdrqRt2h8V73HI59FuyqLzOj/ZrPdYVjvMsE5cMx1A+kROFMZiv3sdK
+u5DWc3n6PBrz83OCvTrInKtfAPJZ8nbLMgPKJ9P23ELk9/dIbcJeWGygkvgE
+Dti9quE+za/cLjFA3sUG4evVjbBfV1H3eng0YbxFaETv97/GJvALY53sK2RZ
+NeFL3B+xI/32KMykHNlpRetHjD3UMsb61pZav09kuSPqslKmsODDwMTj6E/+
+wbTlG4zp+T7UHIr+FzrNY1xhj/Y7T50xn+cfv0zfCYtCi1qXKLKcVeyiR14w
+J8ncqY18ZEMUDgth1q2w5yd5lktt8Z7iRPult76ykWO5xQ7r09bRegdST4lk
+WSZEq9bbjOp2h7SM4HPdjk0GVOdiY0dlWG793YTwH8jX1BtlUNePGXmmQP19
+C6tZD9+tWOQ2QvN2d4w/hbW83O61weLpg7wwOXo+tj1thjmnOGUXnGfL4Sxe
+O+W3xFrJAf1yqclOY7CkP+XcNpxnTEXT0ETKI944zU2J5fz1dS/okgel3m3h
+sdyl/Ul6FjDTnNezAHlVFYal0bxcaE5+hzLLVcZ8642ifl1l+X4436yvsQ/z
+KY9Df2bfRt6fXCIKXlF+o133HqE+N0h5rpQJrl9b8zEZ9R0rBsSzYKbUVMoA
+/u3dD0rryJ9uvQ/H+v3CgmofWHLlthd+HnEDh+doRlC98dq/+ej3bIzxomQT
++v2kOPAMzkfL6cHdDKqL3F/g+4kLNPHIvgiL/uHNw/vDbRoMXk7mKpadtcb5
+HFO8qE3XS5ImCDchT6OkI0tTyCWu66Jl8L2x/PiVaFhwdf943wSWy6yb0nSA
+1tdMP54EC8RBpl5k2fMygXDAt7cWm2FWTnUj6kx2e2zAKlpP7KvVi7pqzhFt
+M7reuHI0DOsfG0kMX0h12/lZVrIsZ3RFOnIB3d+wMMgA/XUbT65cQtf7z3+n
+h/5nCo/mraR+Fn8ynofzdJxuq7+V5qu01jHB/L13cpv8ab1W80JtPL8ZMxr1
+48khic8HkFeW2QuVK7C48E/pM8jzrZHE/SW5s16Bh/Nteb/57jjlUzDB3hLu
+STqbqz+fzkvPxgznsdvxaL49LPG9eHoI70vJXKMN+8n7eviBWO+jxaSFp2HG
++sa9YuwffTXN/DrM2vIXv8LzZrXGMqKS1jusdawa/SdN0fJ/S/erPAi5juc1
+LqflThssvqTVdRLP89IB3+AuWi+vbloQzmfXSLFqB3lr2ZAv3pc9IddNm+n+
+WOVNR5G3dnLC5zpYFGCysVKa5RpHb3IPqH7z8ePV0vg+eJhqXkh1dedn36VY
+xn/nb1kZ1E/Ydt9PUiwXNHJmeSJdr28foI/r8/N6gyLnUx7rDqRgPcWlb86G
+wIK9gRpm2M9LQ/NxEPWr8JuhEs7zksDuX8pD9Lub2xfYU1huf5jWY2Vzx9D/
+Pktnv1i637WdPwHn+T4+TyWd9nfQ9pZCHsLbxUVFNN+kksp2uLx+KL/+v/UV
+8nKQn6W5h2Scrq+etdIS+aos2KA0awFcpaifjvP9cXV/mR0s2FBdUob69qN9
+8cGweOzXxGz4OTexO42uP7HD0RZ+tfaFXzksKl49cAvPj5zF9uctsOTSzw79
+2H+cPgv+//8TBfZ/11uc6w==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.666233980906949, 2.1296932060463307}, \
+{0, 1}], LineBox[CompressedData["
+1:eJw9lQlQE2cUx7dQaURsyx0NJNnsrhU0ioBAKcWneJRDRUYq5VA8oBjEFMMl
+Rm4BE1shWEQUwVbKIai1pANoS7QEUTEYFC2HDqZaREektCgFRvptdb6dyez8
+Zr+8753/R26TBkUZEQQhRT/2/eahIWRqGj3mQNxK/Lm+nQKJq1mRONMC8Yaf
+4sspOPT90qxgG0sgAuu4bbkUELVp4cImxF/t9J2XQYHsafLQjm1WQHDD7MeV
+FHQ9Dw8qNrVG5yuvHKihILbfx9ejFjG3pJZzj4KVD+qWBHnaAJGv72k1pyF6
+CTeitwFxxbJXzp/TcPyZ9omFtS26/4LKrYIGvbS9qmsT4oLOLRHPaFg7cKRR
+vY9lVQnlwoDDjYx+50zEKYrYj2UM3E939T8iQRxp6aetYoDe1bPnzieIhQt4
+5TcZkCVaaiMn2PuftmYYGGjbbr6srQ5xRoPI4TEDpIPv+YBQxPBwnbSbgX12
+6hu5pux5he2qBgbiZz1pvt+K4rl1KaU6m4FXx95fLChA7LF4Mmc1A5N5nVqr
+PYiFDrpcggGXD/xnLpCy8RetM6hpCNcqtosViDXOWyxjaWipOWvHY+0JZyWU
+0DQsumYyaWuH7pu/NLH+T5SvuwbZ3sOIY5wrTNUUkDVlp1/MQfGM5G04o6LA
+8+Kx8qtqlsfnVWRS8PJxtIVPOBf5v9zrRRYFJRM6gjCZg+y5xuYUU7DW2CpE
+cgZx5NlM54sUZPUePOC0ai7ixlDtMAXuUdzZDR2ICZ9WahENJQNmoVIvHorv
+8kfpiTT88Jo+41eA+ImY+42GhvPi6uleLWJuDuhMGfjizm3vvH7E+TGXrq1H
++WpxjCzsZs8nnQ9TMiC/4G5q3IA4JMF4pImBEzG8O2lyxJr2Hc2/M5C9d/fE
+uCtiTnbQQ1SPmA75rbBHyJ/5moOlAwwc3RkaZ69iOXWh+zUGlJyQlx2s/4Fz
+DfxTDCR8WRtz0gTxQN2nzRIGrGZY9032onhHStVrHRh4vuaXflE74ozxqKsD
+qN98h/tv6xFzlaeyvqUhVxEm404gdkobfTeAhqY87Tv0cmRP01PQyKFhf1VG
+UWAl4g958upOCsZit4o9KORv5NaAFacpaCqYNh1Ss/womTxIwbRZRNWSTXao
+P+09BtMpkA+z82aHv493fheiq7bH//cOIMZs/PjYvnH8ya6r/Xx8vyI8fde5
+UAH2b73c83XfrwLsv8YrqO1vIyGOz+1+vrmNrRDHP3vzqcJhnhDnJzU90SLL
+Qojzd+RE8NGt/wpwfvdPVs10aRbg/MeXVqoMcQJcnwr37MWneQJcvwOKwhnv
+3eDj+sYef7QgM5uP639oQ/vYlD8f90fxyu7y3Y583D/lnIWXUyg+7q815zYR
+jCcf91/Qg96Naikf9+eWqdHKgt/4uH81yYOj/i4C3N9JRkmpnf/7/6b/I4iX
+t/0chXg+GnNKpqflQjw/Mw93JD3QC/F8RdMuTnYMiedPJv5RzJGReD4Nxe+v
+9mkk8fzGlcmN/vmLxPNN11fHj9qL8PwHl3uuG/IUYX2QpIbuk3wmwvph4s0t
+G1stwvrCUafEjLiLsP74TylFhay9t/rUJmNKL02QWL9kcX1VPV0k1rdjXskD
+J2pIrH9XXJLKOrNIrI8Sj6I2620k1s+vz0b1qv1IrK+D+S2F0ctIrL/BaWqK
+WUFifeZd59XZbCSxfruZlSmTEkms74FDMr2qksT6/1DlMHjXQOL9oLPc3PeH
+owjvj7lK/d2GVBHeL9fNVipv6kR4/xjXa/RSisL7ydvpsXd3AoX3l25wr9vO
+FsRv99s94zfv/wC2rKt2
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.844981764589882, 8.25073156171056}, \
+{-1, 0}], LineBox[{{6.4999999999976925`, 16.}, {13.49999999999251, 16.}}], 
+        PolygonBox[{{10.6, 16.}, {9.4, 15.6}, {9.4, 16.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 16.9452}, {0, -1}], 
+        LineBox[{{6.499999999996362, 16.000000000005457`}, {10., 
+         10.000000000003638`}}], 
+        PolygonBox[{{7.947677384685548, 13.51826734053906}, {
+         8.206811054955079, 12.280184249251306`}, {8.897834175673825, 
+         12.683281069670574`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.515942703607428, 12.823799910437668}, \
+{1, 1}], LineBox[{{13.500000000007276`, 16.000000000005457`}, {
+         10.000000000003638`, 10.000000000001819`}}], 
+        PolygonBox[{{11.447677384685548`, 12.48173265946094}, {
+         11.706811054955079`, 13.719815750748694`}, {12.397834175673825`, 
+         13.316718930329426`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.484057296392571, 12.823799910437668}, \
+{-1, 1}], 
+        {PointSize[0.04], PointBox[{6.5, 16.}], PointBox[{13.5, 16.}], 
+         PointBox[{10., 10.}], PointBox[{10., 4.5}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T2", " ", "P2", " ", "N4"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdfef/ifghgihi.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdfef/ifghgihi.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {0, 22}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwl1ws01GkfB/B/EuM+shjlMmxCSSrFomaEciuzIdNd7ktphFJrmRchEkq9
+FBltWxQx7WxU1JRLKlpKbql3WvQS1VC5Rb3f57xzjuN8zu/xPL/v7//M/xyG
+/ge2BMlQFPU3fshvavI7PgZsikZgyKZc7DOn9sDmH4XXvzPZVKtCjvl9fTal
+3Dgbr4J6ky7johkc6uIYbwYzYn+RL9JjU70OiXJesDTaJngxnBZ4sjENtql9
+11+ny6ZkM6qfNcFcLZ1TR+FK/wW1dCM2Ra/rW+tB3MkR7YKZP8oG/ARPOjCv
+lMFd9bVMB2IWK3yarN/+1XkvXM/bNeD4I5syDVTcfxa26g63TIEH555d3Av3
+e615cBdu+kW8Yhn6sUxNyBiGOTm5d5NgWp3CfKVF2O+X1Kpu2GnWMUkXzi4O
+ViX5pKYVdw1gKn6Qtg+OvRHrqwlX0jWPF8Jpo6szv2G/aqPxTbeIubr2r2Cb
+xp1mNfCJK781/En6ydE0vQT/oCkcTYYFj7Ou8uC8owPNXjBXXrzPCBZN5/F/
+hFsP9MTdQT8cg8KlE8hr6bjNkEXm+UVwuw2utPl3hRD5ythWdX/BaatoPgzY
+tE474A/iefUvYhci17ZY44twifsFx+4FqL8I+UjmGSsTJGTBnPH0zw2waQ79
+rVAH/UkyRCOw2ESosRr+fCRyDhP9MLffPNPCwLzDMlR3w9lKbbfi4cBbq1Mv
+wfQ8s7NusN8zrzIpzAv5+mEFPCNSOczCvMTTfeZWcE2e9r1MmDm4J9ATdrlR
+5N8F+53QiuDDIvrQfl1j5NsuVq2Dq7svsH1h3vrr5vPRj7kJrSIFLnH1oIfC
+yupH9Erhwb6Isrswl3M5txam7+p6p4Z8/d09LXWw5LHFlA+s6xuzpgbmvjhz
+KgOuPvKvd1fg1li39WWwX4DwchosPTRxXgTLrgu94Qc36X8Nvghbeg4/WEn2
+m/71djSc62fcPQcWXxuimcMz88oXtiFPSRh3wWP0Q7v6/vrvcKvSty8/w71K
+4ZlxMH/HyJ2HyOddpem/m8zj4TDPEnaanxnsTupi2r0cbZyrPL3BGeaEfSkf
+1WJTcS1vlTeR/Rqatm6F6zkG8wNgSeV/zjZo4rmvcZhJgSf9Kxqc4BNzV92v
+InV7q8iuHzDHzW6iT+R++3ovSoZrvI6etyF5uGq2bjDjVvyTJJJX+c97S+Hk
+V4Wuz+BQaWaIKRwY6jvKXIzvQ9/DE+tgj41GBftgm3fLXcJhfqCj6w3YZclE
+7lW4ekeD40fY8lxq0gQschc6GZqgz/yxwx7ob9KvK2sDsdEb3u8wL/mBwm7Y
+RifZaxz2cCh3DoE5EfU2LOTl275L9zch75e+qljY6uC2Ng6cl9C75ALMHVz6
+1ypSVzMdukbW6x33V4FNk6djimBxPOOoBP3EOt8sOgy35j76WEG8WTbLiszz
+bPxAPMw3aa/vxPkFppFJHFJn7ZQPhO0/OLeawDyGIusV8vQ/f5guD3NLdZ1d
+4Fjz5fJj5D4WcC9f1cB855epD5H7W9m7UxHmyJZ2vif3WyUzef98fN8qBroo
+/D2T06bSo86moosXvzEk+6ccOugDe/Q9UiTnt74M5/XTMfdWg8fHYU51Y0s6
+3JQ4SbXAk2/mmbnDUtsIHW3kFTClnYvhwMT8xUEwr0vYoQdH6+YoiODJ1WpN
+FjDt2Js8yhR1jRI5X5hRm9a0ER5MO9h4CmY+iWtNgWN76pxewYKxF553YKln
+quwK9GezRRLWB9uISjTSSL+M/H9m4crFTlt7Ye7NiEWKZth/d/9zE+R1Yv/2
+Mw3OG/smE0Tylw7bT2E9t/2zahbslx2/9zXMvm2keREOdet/egu29P7mcx72
+8LysdhL2o7f7HoHpixQUdpN+hBFTdrBuBq/DHA79UBPVj/OlOVoXZ8n9Gt3j
+FgP3Ksr99hz22zGwdAx5uo5tsRHCg+lr6/bAn3fEOuTDlaFRUylqmN+FK0mZ
+MKU2nrhBFff393jPLJhfH7ZNUQX3KTPErQi2lHkf91oJ+8eFB9fC7LFkg6eK
+2IfW988gzPwjQ7tPAfP3+OrDJPk07AKMYfHM2bt7YUlaTt05Gt5vuqWFV2H+
+m7SoDXCZU5PmJMmrb/fdFNb9O0xtI+Zn6T9lz4Z7nef45RJblIWmwoIIaqwX
+pnsb+k3Aeaclw3pLULd3n03BeftUjdu9Yfaa6eNL0R/19FJlAiwRbd3YDYuu
+pBkUwgK5MJlk5LnUUxdaBvP6dl83UCb3ZklqOVxZ83JGAAdaC02LiVNGR2bh
+zxNdf6TB4oAcVwvMhx1QKg0i1vFQNyc+tiDODpYuW/vgE9ZTifp6ynC21D8l
+GY5zbX/bg/4FOqvWSXC+KODK3Guw5NFAqBIssHDJTCD14OJhZTLfG4eCdsB8
+I+/b75FX+WuWugMstkgNrpbHvTS+dm4l8ZA4P1YO38eG7qgVcKWPaqLtPDY1
+Ut4Wsg5masxYK8riveU1eHIbnE07b/xJBu//xtebEkn9APPQ9zlsqj0hc1cV
+2a/a6Yw1nDes+nIc5szW1hdTOG/o/J51yEO/s6DFAZ4xH9HPIPNl/reFAfMH
+8xV7yDxyjy43hj06miZNlmK+55hV/rBLsUlzJMxXKqx5DMtW/HxeBHO0g+K9
+cZ5yeNGL9zD1bW/2F3iw43TAQnOcp1a35yL6vSTadN8O5udub9g8F8/d77r6
+Zjjbx63oA8zIcDLbAreWhIYdQl66VmS2C8xOf/L8Jcybcy1uJSyYcrPTwnxm
+kq3vq8OWvulMA9jeUbt6kPTbYhIzhvXsKfdFt2H62NzWkzBl/EH1OOm/QSfh
+C87b9+CJgEv6tZh3eAkcaB4zvRSWGMobWqFf0Wqhshyc3TWrsBB5BJc9ooYw
+H6Zr0ciz7ywqu3ShdxeZV5Kt2GeWRTU1PnVsJ/fTZmNzxzSL8g77tOI1uc89
+HwIjJlmUzVq9XeNk3pPb7q8aZ1Htm5966pLzzFQ67D6zqGYn57ebYeaDTve8
+MRaVqzm48wQs3scTbB1lUV3VucHPYD+75l8TpCzKZW2tqz7yi12L12vBBTdf
+y+wn83ofP8yA855cCLsD+5XnM/iwVWH5LrllWN8sE8PCftLTUf1uMNOtnLMB
+55kGnuGmwPy9qVH8TyzMKzrlJsx2tNbrRH/JdjKPumGBeseilejf6Vym/key
+fnnkkiMT6L8zdvU4TP1t+yQXeT1S1/NInVmw8tGBKdTnlEhewpJ5FdqT8KSG
+oW0tqYek3jPAvOJYe2rOkPrDwqxXqDdpS7RCyfk983OWwTMPpzZYk/NCQn9S
+x/6fr6oeJHkENAY3C/3Qihtqu5BXsuiY+E/0WyC/zlRIzEgVnUS+wKI1/qfI
+PE4MaVlhHpPWcuXxZF5sJUn0MIsqaf7h7mHigqriqLd4Pux1paQuVk5wPvMG
+zy/a8vlpcn89oh6r9+D5B0eO3CROCdH91Maiao54fHkLU9LIRMtG5DWMcTMi
+82jaPzh8k0UJvt+9FUysqxitLmBR0fIDhUJi8slb+///c5ax/wedUK1J
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.6273814311035784, 11.151823299819789}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwt1gs41OkeB/C/O60YGbfKNi5dFpVKUWimTdOFahYt9lgGFZ1aplUd5DIR
+DyWJCieH2YTQhVJRYlyKTTQuleQIjVxSTTEat+z3PXs8D/N8vP/3fX+/33v5
+j5FvkPM+eYqibuKXfP79h8Gi/vdjxKLoHc9e3l3EooT1cy/cw/8VV4UYuMI8
+F9rZY3BisH5B5/csSjak0cSEK+oCL+6C07VS8nRgm2nrgVJDFtVjxMsYRb/2
+wm5XbVhwtMK/Ey6720/xFrIo/lF1jR6YlSQ1aVnAouKprFw59J8uKH9gB+sX
+1hcx4KfOjbZl82GFUkVHeFvPwy3bYIa+oXIkbNkpd0hiwKJUnxxNvUueb66T
+vw3TzsywP8NOpRvkzsH6DRlZZsiv9I14LIE8n2Vq5g2LOBEqmbBNe1PZaVjR
+11qvDhZNrYu5Do+E6fTMwIJdizg18NjJ1VYOmH/wwoNzDbC7hgHrHLxtuXVY
+FdzAznnZTeJ7sVs5H+aEBNYvQT7Fp/gzUfAhheIlfrDAtHzAEfaMs8pNglUP
+m02ok/6imJYrxLRV0keIXxR82uUy3JHdrRYGq2Y36MfCyxbK51nArgYFQU4w
+1/BWWg3qOX25jDaB+VktkY/WwbJghs4ZWHQxml6BdRq5IO38jsQnqep1g20i
+aztCkR+jzdVHAz5kneXbpc+ikv89ub+PrFv/Y7/1sKXmLdZz2Cr7JC1ND/V9
+G5/7Dh6L3HB+Shfr6e9ZTkf/Ora06hAs6vZf7AmHO1x5+EkH+2nUw6EM7pIb
+bYyHLV8XepsgPquHbGVbmHVPdeoiPDJdbatKLJukKyO/9OEDLyV0FnWVmya1
+h9VV8jtHYZ7gbE0QXHojYFgDzzOqnIPSYdkB+8CNcLH9Y/87sDDlUVUE3LBy
+5606mHFRI6AeLlvRoUbqa/Xtur8O4uXF5X0kz3NF/bE+MFXz+loaqfdQ5eVc
+mPs8xf0g2U/53SpdMOP65arV8OCxD7dnYUladg7Zz+LRwkx11KenbLvcLtim
+mS0m7byjVqtKkb/dGvvZl6R/voH5fNj0RnXDeVgQEDsUh3ralBSctCbjrS6b
+KweHxFU015D6fTGKT8K5sfN3CNkA88omtlvBRzzz9+SgHnzBjMI4OUev/vgm
+DzOUyqXP4fDx3056a2O9etuftcMWP+cbVc3DfI8nCz+Tc3ZQY3ApTI3VaJth
+PP24A7xsLdTvvaZ5GLz3fm6yGcxStnjVBYuClBc20fD8eSUtJ8TH23q9OAEW
+7tZiVMMWu7Qv+MCc8dvKa0l+A+vzXWEWP6ddAF9T43mRdv4/wxW/wWOJqW9O
+wgxuawsb9VKtrDF+QPrfd4o9BtPHEpfNwlxJ360E+GmT2NYR8TAcFP0jSX3b
+A+0zYJ63G4vcU8I2x7E+Em905RF1+EjFWq4xyc/Kq7oA87nqlqo6wzzjULYl
+TO9y3vIbTCuZ4eQi/nQn4+M8uNgila4JSwxcnDxIvQyrPY4g/4Y9ofeWkHa3
+ANMu1I9idJi+wnyWSuZuO2HXACWf32HRgwT3ZpyzihLzWCnJJ2xf5V7YU2bc
+vB8W/PKjog58dXii4aIm9ouKAacP57DHTWTprIF8P9dta4YDtLt+UJ+LeC9Z
+Ua9g4Uolw5bvcD73hn+h0J8rXNN3bQ4+6R0Gm+GO+ZMmhWpkvVN0L8E2Mc2t
+Laro/5/HAQrknsjRuWmmSp7/WnaU3EszNEmZCp4/8MT8PZwcwVaPhBnViRWe
+yFfV2S4vBE6mt2fUwunqsVlX4B6HiCgDUq8Aix1TMH/aS82D7IfxO0+CMT5j
+T9BkBCz7fnGMAuKx/FxyJBbmCFSuZMFcrbmLAkn/VKd6GxL/+3nWNnB8fm/q
+I1jY036mH/NRhgXc9ci3J3I4KBQue+fbnEDy3zcYKkO8jKQMzg1YtCD2HwFw
+SHR0lgDm70xKfIb8k4dnlH6FeZaJX61gqvdgZh/GtzQLzcom74FXz3asgYvt
+ftyoC/PfZJe6ID7RiufSLNx71NCpyR3Ih2p0lm6EOzhensbIV3Ioef0kzrmg
+or9SrITxyg+7tcGySO2FWYrw+laPRphT0i3+RQH70a/6dq8eOWfUr0vlUW/d
++q10jBcvrzGhIYf5TotivOFBP2b9AgrtT12TK2GROOp50TcmRZVsSjZHfDyf
+S9y4GSZV/GnvRxI/JT4c0zTNpIQZzqV05MdR4MpOwKzQne+iyT3vP/4iC5b0
+BL95C9MOPm03QH+eG69gFeolzHdpegsLdX5w9If5jUUJQ5iP5c+dcwJ2H9Dx
+noN4uOHizHCYtnJ7eh7MsHzM9iDtLa+n7BA/j68q1oNlL0x9q+Eexvb/3sd8
+MkZr8jLkK3zwVYUN8/wMnwWQ/GWVwZVkP99dvD+MtO+5v9QMlhk2K7vD3Lyh
+1rPI3928W3OWjH9gKngc9eP51hUHwZLWiem9emTdlw9cQzyiwcyvvbg3e/7Q
+uxkyi3rJplYEk3t0zF7JidRr3jw/Q5ijm3hvYBLtLSpzxLhHaSm2p31lTIo2
+GGn8J3kvbXL72i6FL9gaNJH3StedXrdRJsVVjq/9CIsMt/ys8Bn95TMDzcl7
+74x1aucHJiVi2ytEkfkP+n3kDGM+cbWtGBZyPdvjBphU8ljhkCviZR3TPH62
+H/VlsLY+gRn0og3BYvRfMM6xR77CfxUuWkl8VsE4H+b7vde6Axdv9toth/pw
+U2qTRtC/uDbIjk2+l1gcH7mN8SWjJvsOwyy7E7p9Q4ivmZ8RRdr5oUXbRpgU
+I+zO0iBS78wNPnc/Yr13HfvCJPu9KLM+XIJ8FaN+HyX7LVHidRj50XYvzUkk
++//dqUSTL4hHqvZak8ST9afzCZhn/iglmqzHRkojgrTr1y98T/IXpC/TIO2N
+3T9xiJXDE1dhvGST7nXlqB8//2la2yfMv0SabUHea2KV2QjExws986IY7y3B
+puX3wgeZlKWhE9sRFuqyFUbfov7RJ9ZSMGWa5qXbDW8uT2zFe03o+lPtYBvG
+2+FSXAtTy67e4tcyKf4Ho8A27f9/r+U9/PuTzvoLN7T2Kw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           
+           9.996694214876033]& ], {4.016469192730548, 5.934756130901607}, \
+{-1, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000001556`, 17.}, {16.000000000002885`, 17.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18., 17.6952}, {0, -1}], 
+        LineBox[CompressedData["
+1:eJw91H1ME3cYB/B2dhtvS4skDhtmy93JcMy2dwdFMJsPZWKJIOVFrcjkpUCY
+lE3n2Ox8aZMFtqEgiK7qCiumgQoaOoowDS91dkx5ETWYoSJ1sgaJojjE4SRl
+v+6P3yV3l08ud/d7+T5PaN5naQWvcTicVHR67+8vQReODDj/HxQcn4V102Jk
+x0/hizEUmOy9Z9M2IPvs9yfyKRDTr7Ym70bOiU817qPAqZPMdZm8Li4cOkiB
+3fV4fdHvyCcyt1aWUCBLKFxNPkVWbTvgUVKgv1UzMRtIo/+ldB8NokAwXH81
+UoIsHmgeu06CVPqmyaZAVv+YlVZGQrpFL+rchLxmxI8rJyEPpJPhacg+NUfl
+DwnYq8oo1iUjQ741rIGAsLulyU1xyGbuYE0BAU2PMlIiZMijcc/2xBCwoOoT
+u4Te72dtcojQ82a3/d4SZIPPuERIQM1mXVT2tHc+kXMrVhHwHqchsPa2dz4l
+E9UbCVDfXVn1dT+yYcEvWk/Aw8FhXd8l5OqMpDoHAfZfLWsvOpDnTxH5/iQc
+Pv8xvewKspV/8FAmCSdutw77jXpt3n7FSgKXsy83asb7vivHNUPCuEFb38j3
+jmdziWc1BaHLQ8/8HYk830jysyiYFh3RJO5Atvm6F76ioPKjPN3x75EFSdVT
+egrePmwKMLcj7+3bn7yHgjB9SIP8HnJwXCUnnYJFOa9bxWWAsyu9NyKUgnfe
+8L3AiJDNLRLqTxImDULtoShkzvzrjJGEwUJFR0U8svqFZIOSBEFd8CdPlcjW
+gjPNLwmgn6nN/gnIskam3kaAJYcf17sW2XZTyfucgG9vFXmKIpBVpsoABQGl
+Y7Hua8uQ4bLoMUnAA543d8jB/ucblxOgDf9NSE/R+Hmm1Mg1jtD4/Q8sMz3g
+pPH3bUFN2c8v0Pj/du3kD4JOGo/vn9PdiaVdNB7/v9+4a7/op/H8nJ4XCUP3
+aTz/B0OvFK0eGq9PXcXEjqsEg9fv7AHNbPZGBq9vhqOufOeXDF7/53/tMnU0
+MHh/Lj0a3/LWAIP3z/1dbe62GQbv72Xfsvp+Pov3PzFCJZt7l8X52JJy+tpU
+NIvzI1Fsd65fx+J8vYyWlcd8yOL8FUvu7C6LYnE+O3nZT7RhLM5vamt5v3kp
+i/MdmylMIhYYnH+3PcYldjO4PkJWtNhGhhlcP12rKtrUPQyur53tLcfK2xhc
+f3rn9eA/zjG4PqtyDPeVPzO4fo/dmdekdDO4vttjc+UDNxhc/xrppyEBTxjc
+H9p6Tt4cE7C4f0hWBl00rmFxf1k8csMvXsPi/mMZ5VnbqljcnxJSIf3cLyzu
+X0mBvY6lLhb3tw6uN3+RuP/9B3PT46g=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18., 8.354800000000001}, {0, 1}], 
+        LineBox[CompressedData["
+1:eJwt2Hs4lGkfB/DHkgYlp2QrGYNyikEaEU3IKZVNMlpq8o5TVCqVsFFUEkKU
+YzsVosQkCSmULWWsKZPklWar3dSmJskx9X7vrrc/cn267+e+v7+vx1xddAN3
+rg/6iaIoBRmKIl8pGvmLzqZ+/NFlU0xu+841MEd+/pQ6TD3e1V4EawVMrpsL
+R46Vsj7AXOE5UzW4OM+jxw5fy+YIYyfx7zXei4YTYZsstb5uWHhgSrMVZp80
+zi8hz5kymROwW95FfhisIs6u0Gdg//XpXAM4VJWR4ghL+BHcGzr4+uUYz5vY
+U36TDsw00YjxhamurAXHF+Ac05KydXBzrJ/CpDabGp7fFWgPJzjcmxULz1jR
+XcSAM5JG9ynDX+tm1svAKmffZNbPZ1Ntbznc5ySfNOREPFxGq91WBwssMhwC
+4R6T+7U5P/Kf1CGWezwmHw17zZFZehCOiFZ4sRVutlc0qoHp2/k8H9LT6gp/
+Cve1imOdN5D1F70LNsPJp5KKtpDnW/Vf3oej3DuG9sMJTWqJLMwj9TUxKCK9
+6/Vml8Jso4aoP2GpYslVZcwfZbc0RRH5vayOPAyDaRk3j5H5qYXGe6rh5Eea
+9ALSh02ZwWvY2e3otXfEHVTsJJydlxhpp4d898t8RmBO2dd9KbB0+fhkFxzh
+4vRVDFNXV+jmwH2rhrZr6aOPqK99dvD7X9Wz1sNeTxsz2pFPnP35/CFY5N1z
+y43k1/EIKoYzInU76jAfzb+Q1UDWcz3adWG5lgVz78L8NZ7aKehLvEVQ2QRT
+jb8xx+bh/sxPzKtwpKuL8W6Ys+RZcB45z9u7YGou5i8/nhJD8gSq2v4OJynF
+mvnC9GvCi5uI72zUtiT51nOcLGHPxZosZbJ+dZfSInhAQ2vNB8zH91qfZQNH
++A5++zHvDUXZIJijl53XCme8/Y9NOVm/0jBxG2a/N3pNIc8wFXngD+LB4dZg
+uK8n6EkPLKp89EYMC/OzF4/D3MCcIWfMx06u/WaA+1UKlu8RwO+jrxhtJn3c
+3stURR8qVxJl+HBzROj+rbDXaj/uW1iSORhYCG9IXnaHZYD3o/yW1m047ngy
+LxkWULnjd+G28EOhPTC7gnanAk71nj2qvxD5WVb50XDCyDZeOOx1rE/dCM7N
+cPylHGanCjVbkMc/rrCtD2Z6/NZI8laEmXPkFiFP5vP59ZhnzDiOoQML/MuU
+9eFWpaK3psSSiP4T6Ieqdlczg/kFT7+P/Ez2vzurR5430LgVDi8xGmXMgtma
+rIGPWmzK8PaqqiHcJ8k7kpUM93hY14lgae/CjmVwdNVPo5dJ/kKfffJwrnWz
+6zFY5JA6WzoH5/AKjgTB1OZtbSNw3yuzEHcyX4Ljyp+x37+ryN8apn/Y+nQD
+HHFMZ5cJHJnnWlYCU3X7LRbDKqdN2uSRj96Ql2tH+gg+EL8bVkkKlfWFm9Ps
+s17CA6dNTeNJP6GK6V6Yd0P72OJrcILVsbm18NcZ4pOfSL4rDW4z0U+cqrav
+Dealm1k+9yL9PXSkH4EpneDMOLhmXtHyJ3CGhrF7GkxX/dRlYIj82qnLDsEi
+8dT0KJhNs//uS963Xh+tWzDXL+yCGiz+927SN0Py83Yv/RruL7yRZrrUCPuZ
+e8MdYJFwRlggzHWzHr1B8hv+wjgMS6wYbQawhkd7XzYsHXspn44+UmW8m/LJ
++rJruqPoM0q6IpOsM7fT4kJI3/9cFiSS8+2aFvytyabquH4y28j5FrURe2Hp
+Vo0n7mQ9JPHFfHjA9vqfBmTdNa2zfzY+jx6at1CwwI/tcQvW6vZIfY78zKrw
+sTpik7qx23DzZ1nNR7Bbx5qci6QP2ZpYWZwnZKmdyYMjr9+t94Sdwy7dOk36
+sZzmVEbu++OQPd+QfD5eLVFB3rjYRkEtLHAK74yHk3YJZvWSvqQ6fh9hqZzT
+VQXkUemRfcrB/PO3LPJ2JnmTHhnWwoX/njZKhvljvvdk0NcGheYvj0kfn4rk
+WKQ/Rpcuwxj7jZZ5rYdDP6/7azcsmfju9wtMxX33vgMnuPxjZQUzOX+XzzTB
+/txC/zGcL5wZ4rIelphz68/DA4c+SdJMyPvnftCavK/zks7dhvnDbPnryCsM
+b2S9gkUzMgsXwjQ1x38nYOmCm7YZmD/1xB/F00zxPpV32I+hP1ql7kdZmB73
+QjMI1pfLko5gv4pl1kSfBu719/aXwM3Hj58KgrnXAgPumJDPE/5NWdgtkRf7
+O8lX77nipjq+D/unx8bAlJN5ZTrMLdput5Gcl6FqFw+3sjyzrEm+gx8rUuEN
+9MOG88h5d25vvQ4Lm/o5CiRvjjhwBJaa16n9RCx4d3w17hNnNrXIw/SULzVV
+sHDlyuVapI8OZ3lt5F+SVlm3lKxv6VicBvs3fn64lfSTp1A3Ppt8HjWG5ZL7
+Np/e7I8+MpwCJ3tgZmHRxiryfj54H6aLPiRKtnmDcOTkPPudsFR1NUMdffrn
+rKpvglW+lzK04cIHsTIqizHvM5aeIuxl5GMXAKvsWD2nF8/TvudUF8OCCxYB
+6XCc3NTEK1jio3vFiNyXnqr8sxncu2y0CvmG7Z4EO8Kiwx6WC2FR1TSVLXBz
+633tLMw7JveoZgcskBkZH0c//s5nzu+C2Z/bl/FIfzaFf4SS/foBlk/V2NTr
+zXFFPuT8gJvtHFjUEGlsC9N9TFgfVDHfEk+xFkzZuFQWwLywcM9h5OMPWTjw
+4IrHyhGdJL964jl3WHT5rsoVMp96sbEneV4td+wkzEzrbNoGt9k8+z2GPF/T
+OXAezrWYztgJZ8Q8HZTCzS2HdIhVYoaneSFPT+PS8liYPfQkqwHuy1lnlQNL
+k74FG2MeSUHSyZsw12BYLQ+OowV8HIRFtEvWFPrQMGd/MEZ+/iOW0E+DvN+9
+5yPNyOf3eBwfju6fqm0kfZ7f3tsJa+1+nDTDHOcdOZH/mqzLDrICYFGZpIm8
+7xkDl6WXYYlwZ/UNmOanO/AFFhyY77oPbujiuc9n4uf11Krrc+E7WYslNjB7
+qWpsGfJtfJzx33Uw/XCrhT4sd+F+MReW/ua+4RTmU4yIGdoG8z9fnZhEH2Mv
+Nwh3kP0XZqWTvp3NS1IiyPn3/KK7VDDvQqXHPPL8OzfxWthStP0EB+aW6jvW
+zWJTjz8V9LiR5/v2TX5XZlPLJwzkWSRP863+WPibAyNWn5x3IWQbEx6LKL2o
+RnxrjKMDp2o8GvoJlkztPuEKaxkfWz+IeemhG+eUwD3L/3z2HOZzT+y3mEXm
+SV/zDGZni5+/gpcoBo9KSH/fQkQc5CtbGZhM+kp4l829Dx+VM0tWwvnMuS0r
+WJivNevMQQbJX9g7dQ6eGHyvsoLkEb7YJoN+9pXlBP7o64Dl63Ww6XDxr0dg
+L7dpBcnwnZzDtRWkv/Ldooswe3bnrCck/9s1cpfh/rLG0a+w4BpPIxO2lZeT
+07PA+6Z8yWMTXJyW/dcquJmf50eDLVMYQTyYe4hyPYs8KdzWvN9gkaK1Cx3u
+6XwjzIDZO08nnsI8MZcVzhSR/fsf3J/E/JUz7kouwJIKq73t6Mvr3ftXxAnx
+dV/Oz0SPckLDszB/YWdH+gw2VXojNP4UWY+6lpivxKYcrYK/JJHz6eGzRIps
+Stmup20P2T9gt5kFL2Q2craS+/5T8vGJAhz1VH0dTJ2szqiE28wfBTuQebZ/
+tWmBbb4FX2KS84PVlJTwvENBvtoicl6MU/RReOLgpd8ZZF2scNQE9zt/ylDV
+J8/711pIYSa/pN+E7LdLGGxDXsWa7sW2xL39zHLM45/bIl5L9l/Qm52EeWkh
+d/3CSB6zqhFP9BEY9GY8mewPfqU2BlveDKuuIF6anmaP/qo7fdd0wXSPlt5g
+2LBBEDkJS9nXh6Jg5T63Kj1LfP9GNEzI+trTRfkeMHePv6MtnGXdIN4B099p
+3nuN84WOa3VPEvfrGTPglzt09l6Cm/v9li9Bvn+6Z8s2k+eT40v0kd+Nu8Kl
+k+zf86H6G+Y1++RJ64ETarwf/Il+eJE2vF6YihQ9OIc+TbOHWrthiaviriQa
+m/pgYyTpIK6Rrzs8HXk6Q66Q8/luOQ4X5TE/TWaTgJz/NfvexDTsn+TYniW+
+m3YvEea0uNafIHnUh7Vc4GoVnksMWdeWFzrCdfPUncNh9vECjWhYMc1+ZAtZ
+35HK+ws+Gn9otx+5Xzn3wn7cV1xamsUh3jgt2QJ5yqqn3gaQPIOXFOWQtyzf
+/HYYuc+rVvoSPsrvlo0j58Ud4JH3JbJCaUs2eT7uYU4W5m9d89eiatKfhu4m
+D/RTfTF7t5js9zrX+hwWWSvPmyD9rCitdML78f4f/AfHCvtDdI33wkk5ryw9
+YHq0Tc92OFjT/OEuWNLwt44pnGJz2fIMzP72ceVVnLdc6qRbT9Yt2e4yMP+B
+z75umPuG08NAHsGv9as/wAnjId0LkPfHLyGW/P/3DzT2/wADNNc5
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.667326901390272, 4.30940414848786}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwt1Qs0lGkYB/BZRUOqySWztQZjjJHFnHJal40vK020LiVyTUVmp8aoHFSa
+ynbshJzaVtFFOklDZSeUkVwWue2k0bp201LbSCtJbYrs/93tO2fOc37nne95
+n+d5zztjsVmyNkaLRqNtx4fE/x9ziqZHogVFo87IbzebwT3yoLWwf5E/qwxm
+uJt0y2GFR8SmRrjGLNt7Gh6lDKUf4cgTCw4GsCmacHLdp8XI927+3ozTxCKH
+47HwB3sJ7T6cn2poo4B/GelfomdJ0eSJYjnZl7Fod8RiWCky3x0I35Bsq3WG
+KWe7O4XwgTeFcifY37FxZAyO3tuQwIPVW1SZjsi71Xk4YTZMt9H+QgiPH3Fo
+e4qYvM0vIx3xgOTqEiWivCVMegqxPOeW6jAiP0UTehJR1KvdGYHo1N7Zc5BE
+99pwJ0RqIK07DNFtp2i+KWLUwihPHmJqqOCfuWS93mH4BeqZmyxYziD9Pbm0
+lMxpGfcok032Tah6FA179/cpPGFm2o4yK9ijddg0Cd4waOD6CvNg1/glVrDJ
+fC+Ib8OqicgRLdKPcUDiZZgTWKwdBCsevJVeIOfl9bj2Cnw062VmCezVkvZM
+i4P807vjVfBN6QlBILxhblfzR3hBZxD9LEz5nDV2wf6TfRJ1H2yeuHboRzho
+o848uhVFk11wMemC+Q37WVzY/KXNJOk30NMzainML33UsgdWGtzx4sPMCrb6
+Nuk7OcyXBStWqO9po67HJeqn08j/xL7J8xt4ZAXfoxeOP3EkLRhuGvZzvAyP
+7hifFwOvuTTrzxRYc25UthG+Ed+eGgDTfZbdXQWrDPU4drD8NVdjBnfTxBGG
+MM99qv8F9i9enrFoFukvxTvnCmwfEyrRI+srh2Q/kPMrPLedBfP9Y5K4cBxN
+zPyOzCt8l40G/Z5StgmTYNmbaJMy+Ezm8fWV5P2wQ5YZMHP2rglt9KfMfhu6
+C96z+lVdCPFzVqOYnL88tUABC2Jrl++F9d8ai3S46FfTFn8aHq8oHQqC6759
+3aWCC1IYAXkwryaxXR/1FNqXbuqDmQOt7cFw4sP8i9rW6MfSIqcIHpshOmkB
+965K3jcFf9Luufk13BKX8asv5vFwjarAGmboTKXnwOn0jteGcN2EYrAb/ivv
+vu048su42QId9MWmzTr/O6yOTXflwG7yZ3akHvnPAyEOcHuT8pMEFhoN7LQm
+52BU7LOS1Nvfkz4HDnSijNhwTnBu2yDyl/qKH+vC5q5x4VfhzKjAfdNW5L5d
+dIqDPQ9sHZxJ1vtMnpF7Xv99ndYiUo9dka0G/Rg1t1avgJWHUlTFsPo3g6Ek
+mFFaxyf3JOG5b2QVmWeoliX5nTFf6Gami/7U17KOuZJ5hfqkRcAKXkckubfv
+je8cLIfj60s9BOT7sZxuXR7m6fZ3jQjes1+2OQSOfzHPOg8eEJlFnyM+WVbV
+D3NPmZf1wv7zLXtsUa+XlPVOywb9VpznSUn9aseWr2Dm6swPHfAtRcldK1jT
+2S9lYz7L1OUNLFjI8jHdBhdS8ihdYrPu6kvw+yiNjwb5eZwts7vgsbG7mhpY
+VtBRNAqPBF+0OAb3Tq8Ln4CdXKest8DC7sNfviL3xDmX70zqvcLU/wPm3DNy
+MIFzDCr3k/wbjl3PpsHyxuEqCaxnGG/6HvMQTpW1k/ONdi7JnSbzU1d4v0T9
+hakF98n7oy7jk0Xk/iUx8yk4v7IqTwzPvC45mwzTh8dkrvBYdVNWNannkUhs
+AksDbkbooz+BvGvhTLi8NWvdJphxy8pvBsza8dN6Jayc4XbaGN6ZlWs9ZzHO
+Jag2xAWuGXS7FgZH1csqJbAwgE7lw/nN7g9KyXra9YYe+L+H8/n/ypb6F1+a
+WGI=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.165661129127848, 11.57565554834886}, \
+{1, 0}], LineBox[{{16., 17.00000000000231}, {16., 9.999999999998607}}], 
+        PolygonBox[{{16., 14.1}, {15.6, 12.9}, {16.4, 12.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.9452, 13.5}, {-1, 0}], 
+        LineBox[{{16.000000000007276`, 17.000000000003638`}, {
+         10.000000000005457`, 13.5}}], 
+        PolygonBox[{{12.48173265946094, 14.947677384685548`}, {
+         13.316718930329426`, 15.897834175673825`}, {13.719815750748694`, 
+         15.206811054955079`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.823799910437668, 15.984057296392571}, \
+{1, -1}], 
+        LineBox[{{16., 9.999999999996362}, {10.000000000001819`, 
+         13.499999999996362`}}], 
+        PolygonBox[{{13.51826734053906, 11.447677384685548`}, {
+         12.683281069670574`, 12.397834175673825`}, {12.280184249251306`, 
+         11.706811054955079`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.823799910437668, 11.015942703607429}, \
+{1, 1}], 
+        {PointSize[0.04], PointBox[{16., 17.}], PointBox[{16., 10.}], 
+         PointBox[{10., 13.5}], PointBox[{8., 8.5}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T3", " ", "P1", " ", "N5"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbf/cgdhef/ifghgihi.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbf/cgdhef/ifghgihi.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {22, 22}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwl1ws01GkfB/B/EuM+shjlMmxCSSrFomaEciuzIdNd7ktphFJrmRchEkq9
+FBltWxQx7WxU1JRLKlpKbql3WvQS1VC5Rb3f57xzjuN8zu/xPL/v7//M/xyG
+/ge2BMlQFPU3fshvavI7PgZsikZgyKZc7DOn9sDmH4XXvzPZVKtCjvl9fTal
+3Dgbr4J6ky7johkc6uIYbwYzYn+RL9JjU70OiXJesDTaJngxnBZ4sjENtql9
+11+ny6ZkM6qfNcFcLZ1TR+FK/wW1dCM2Ra/rW+tB3MkR7YKZP8oG/ARPOjCv
+lMFd9bVMB2IWK3yarN/+1XkvXM/bNeD4I5syDVTcfxa26g63TIEH555d3Av3
+e615cBdu+kW8Yhn6sUxNyBiGOTm5d5NgWp3CfKVF2O+X1Kpu2GnWMUkXzi4O
+ViX5pKYVdw1gKn6Qtg+OvRHrqwlX0jWPF8Jpo6szv2G/aqPxTbeIubr2r2Cb
+xp1mNfCJK781/En6ydE0vQT/oCkcTYYFj7Ou8uC8owPNXjBXXrzPCBZN5/F/
+hFsP9MTdQT8cg8KlE8hr6bjNkEXm+UVwuw2utPl3hRD5ythWdX/BaatoPgzY
+tE474A/iefUvYhci17ZY44twifsFx+4FqL8I+UjmGSsTJGTBnPH0zw2waQ79
+rVAH/UkyRCOw2ESosRr+fCRyDhP9MLffPNPCwLzDMlR3w9lKbbfi4cBbq1Mv
+wfQ8s7NusN8zrzIpzAv5+mEFPCNSOczCvMTTfeZWcE2e9r1MmDm4J9ATdrlR
+5N8F+53QiuDDIvrQfl1j5NsuVq2Dq7svsH1h3vrr5vPRj7kJrSIFLnH1oIfC
+yupH9Erhwb6Isrswl3M5txam7+p6p4Z8/d09LXWw5LHFlA+s6xuzpgbmvjhz
+KgOuPvKvd1fg1li39WWwX4DwchosPTRxXgTLrgu94Qc36X8Nvghbeg4/WEn2
+m/71djSc62fcPQcWXxuimcMz88oXtiFPSRh3wWP0Q7v6/vrvcKvSty8/w71K
+4ZlxMH/HyJ2HyOddpem/m8zj4TDPEnaanxnsTupi2r0cbZyrPL3BGeaEfSkf
+1WJTcS1vlTeR/Rqatm6F6zkG8wNgSeV/zjZo4rmvcZhJgSf9Kxqc4BNzV92v
+InV7q8iuHzDHzW6iT+R++3ovSoZrvI6etyF5uGq2bjDjVvyTJJJX+c97S+Hk
+V4Wuz+BQaWaIKRwY6jvKXIzvQ9/DE+tgj41GBftgm3fLXcJhfqCj6w3YZclE
+7lW4ekeD40fY8lxq0gQschc6GZqgz/yxwx7ob9KvK2sDsdEb3u8wL/mBwm7Y
+RifZaxz2cCh3DoE5EfU2LOTl275L9zch75e+qljY6uC2Ng6cl9C75ALMHVz6
+1ypSVzMdukbW6x33V4FNk6djimBxPOOoBP3EOt8sOgy35j76WEG8WTbLiszz
+bPxAPMw3aa/vxPkFppFJHFJn7ZQPhO0/OLeawDyGIusV8vQ/f5guD3NLdZ1d
+4Fjz5fJj5D4WcC9f1cB855epD5H7W9m7UxHmyJZ2vif3WyUzef98fN8qBroo
+/D2T06bSo86moosXvzEk+6ccOugDe/Q9UiTnt74M5/XTMfdWg8fHYU51Y0s6
+3JQ4SbXAk2/mmbnDUtsIHW3kFTClnYvhwMT8xUEwr0vYoQdH6+YoiODJ1WpN
+FjDt2Js8yhR1jRI5X5hRm9a0ER5MO9h4CmY+iWtNgWN76pxewYKxF553YKln
+quwK9GezRRLWB9uISjTSSL+M/H9m4crFTlt7Ye7NiEWKZth/d/9zE+R1Yv/2
+Mw3OG/smE0Tylw7bT2E9t/2zahbslx2/9zXMvm2keREOdet/egu29P7mcx72
+8LysdhL2o7f7HoHpixQUdpN+hBFTdrBuBq/DHA79UBPVj/OlOVoXZ8n9Gt3j
+FgP3Ksr99hz22zGwdAx5uo5tsRHCg+lr6/bAn3fEOuTDlaFRUylqmN+FK0mZ
+MKU2nrhBFff393jPLJhfH7ZNUQX3KTPErQi2lHkf91oJ+8eFB9fC7LFkg6eK
+2IfW988gzPwjQ7tPAfP3+OrDJPk07AKMYfHM2bt7YUlaTt05Gt5vuqWFV2H+
+m7SoDXCZU5PmJMmrb/fdFNb9O0xtI+Zn6T9lz4Z7nef45RJblIWmwoIIaqwX
+pnsb+k3Aeaclw3pLULd3n03BeftUjdu9Yfaa6eNL0R/19FJlAiwRbd3YDYuu
+pBkUwgK5MJlk5LnUUxdaBvP6dl83UCb3ZklqOVxZ83JGAAdaC02LiVNGR2bh
+zxNdf6TB4oAcVwvMhx1QKg0i1vFQNyc+tiDODpYuW/vgE9ZTifp6ynC21D8l
+GY5zbX/bg/4FOqvWSXC+KODK3Guw5NFAqBIssHDJTCD14OJhZTLfG4eCdsB8
+I+/b75FX+WuWugMstkgNrpbHvTS+dm4l8ZA4P1YO38eG7qgVcKWPaqLtPDY1
+Ut4Wsg5masxYK8riveU1eHIbnE07b/xJBu//xtebEkn9APPQ9zlsqj0hc1cV
+2a/a6Yw1nDes+nIc5szW1hdTOG/o/J51yEO/s6DFAZ4xH9HPIPNl/reFAfMH
+8xV7yDxyjy43hj06miZNlmK+55hV/rBLsUlzJMxXKqx5DMtW/HxeBHO0g+K9
+cZ5yeNGL9zD1bW/2F3iw43TAQnOcp1a35yL6vSTadN8O5udub9g8F8/d77r6
+Zjjbx63oA8zIcDLbAreWhIYdQl66VmS2C8xOf/L8Jcybcy1uJSyYcrPTwnxm
+kq3vq8OWvulMA9jeUbt6kPTbYhIzhvXsKfdFt2H62NzWkzBl/EH1OOm/QSfh
+C87b9+CJgEv6tZh3eAkcaB4zvRSWGMobWqFf0Wqhshyc3TWrsBB5BJc9ooYw
+H6Zr0ciz7ywqu3ShdxeZV5Kt2GeWRTU1PnVsJ/fTZmNzxzSL8g77tOI1uc89
+HwIjJlmUzVq9XeNk3pPb7q8aZ1Htm5966pLzzFQ67D6zqGYn57ebYeaDTve8
+MRaVqzm48wQs3scTbB1lUV3VucHPYD+75l8TpCzKZW2tqz7yi12L12vBBTdf
+y+wn83ofP8yA855cCLsD+5XnM/iwVWH5LrllWN8sE8PCftLTUf1uMNOtnLMB
+55kGnuGmwPy9qVH8TyzMKzrlJsx2tNbrRH/JdjKPumGBeseilejf6Vym/key
+fnnkkiMT6L8zdvU4TP1t+yQXeT1S1/NInVmw8tGBKdTnlEhewpJ5FdqT8KSG
+oW0tqYek3jPAvOJYe2rOkPrDwqxXqDdpS7RCyfk983OWwTMPpzZYk/NCQn9S
+x/6fr6oeJHkENAY3C/3Qihtqu5BXsuiY+E/0WyC/zlRIzEgVnUS+wKI1/qfI
+PE4MaVlhHpPWcuXxZF5sJUn0MIsqaf7h7mHigqriqLd4Pux1paQuVk5wPvMG
+zy/a8vlpcn89oh6r9+D5B0eO3CROCdH91Maiao54fHkLU9LIRMtG5DWMcTMi
+82jaPzh8k0UJvt+9FUysqxitLmBR0fIDhUJi8slb+///c5ax/wedUK1J
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.6273814311035784, 11.151823299819789}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwt1gs41OkeB/C/O60YGbfKNi5dFpVKUWimTdOFahYt9lgGFZ1aplUd5DIR
+DyWJCieH2YTQhVJRYlyKTTQuleQIjVxSTTEat+z3PXs8D/N8vP/3fX+/33v5
+j5FvkPM+eYqibuKXfP79h8Gi/vdjxKLoHc9e3l3EooT1cy/cw/8VV4UYuMI8
+F9rZY3BisH5B5/csSjak0cSEK+oCL+6C07VS8nRgm2nrgVJDFtVjxMsYRb/2
+wm5XbVhwtMK/Ey6720/xFrIo/lF1jR6YlSQ1aVnAouKprFw59J8uKH9gB+sX
+1hcx4KfOjbZl82GFUkVHeFvPwy3bYIa+oXIkbNkpd0hiwKJUnxxNvUueb66T
+vw3TzsywP8NOpRvkzsH6DRlZZsiv9I14LIE8n2Vq5g2LOBEqmbBNe1PZaVjR
+11qvDhZNrYu5Do+E6fTMwIJdizg18NjJ1VYOmH/wwoNzDbC7hgHrHLxtuXVY
+FdzAznnZTeJ7sVs5H+aEBNYvQT7Fp/gzUfAhheIlfrDAtHzAEfaMs8pNglUP
+m02ok/6imJYrxLRV0keIXxR82uUy3JHdrRYGq2Y36MfCyxbK51nArgYFQU4w
+1/BWWg3qOX25jDaB+VktkY/WwbJghs4ZWHQxml6BdRq5IO38jsQnqep1g20i
+aztCkR+jzdVHAz5kneXbpc+ikv89ub+PrFv/Y7/1sKXmLdZz2Cr7JC1ND/V9
+G5/7Dh6L3HB+Shfr6e9ZTkf/Ora06hAs6vZf7AmHO1x5+EkH+2nUw6EM7pIb
+bYyHLV8XepsgPquHbGVbmHVPdeoiPDJdbatKLJukKyO/9OEDLyV0FnWVmya1
+h9VV8jtHYZ7gbE0QXHojYFgDzzOqnIPSYdkB+8CNcLH9Y/87sDDlUVUE3LBy
+5606mHFRI6AeLlvRoUbqa/Xtur8O4uXF5X0kz3NF/bE+MFXz+loaqfdQ5eVc
+mPs8xf0g2U/53SpdMOP65arV8OCxD7dnYUladg7Zz+LRwkx11KenbLvcLtim
+mS0m7byjVqtKkb/dGvvZl6R/voH5fNj0RnXDeVgQEDsUh3ralBSctCbjrS6b
+KweHxFU015D6fTGKT8K5sfN3CNkA88omtlvBRzzz9+SgHnzBjMI4OUev/vgm
+DzOUyqXP4fDx3056a2O9etuftcMWP+cbVc3DfI8nCz+Tc3ZQY3ApTI3VaJth
+PP24A7xsLdTvvaZ5GLz3fm6yGcxStnjVBYuClBc20fD8eSUtJ8TH23q9OAEW
+7tZiVMMWu7Qv+MCc8dvKa0l+A+vzXWEWP6ddAF9T43mRdv4/wxW/wWOJqW9O
+wgxuawsb9VKtrDF+QPrfd4o9BtPHEpfNwlxJ360E+GmT2NYR8TAcFP0jSX3b
+A+0zYJ63G4vcU8I2x7E+Em905RF1+EjFWq4xyc/Kq7oA87nqlqo6wzzjULYl
+TO9y3vIbTCuZ4eQi/nQn4+M8uNgila4JSwxcnDxIvQyrPY4g/4Y9ofeWkHa3
+ANMu1I9idJi+wnyWSuZuO2HXACWf32HRgwT3ZpyzihLzWCnJJ2xf5V7YU2bc
+vB8W/PKjog58dXii4aIm9ouKAacP57DHTWTprIF8P9dta4YDtLt+UJ+LeC9Z
+Ua9g4Uolw5bvcD73hn+h0J8rXNN3bQ4+6R0Gm+GO+ZMmhWpkvVN0L8E2Mc2t
+Laro/5/HAQrknsjRuWmmSp7/WnaU3EszNEmZCp4/8MT8PZwcwVaPhBnViRWe
+yFfV2S4vBE6mt2fUwunqsVlX4B6HiCgDUq8Aix1TMH/aS82D7IfxO0+CMT5j
+T9BkBCz7fnGMAuKx/FxyJBbmCFSuZMFcrbmLAkn/VKd6GxL/+3nWNnB8fm/q
+I1jY036mH/NRhgXc9ci3J3I4KBQue+fbnEDy3zcYKkO8jKQMzg1YtCD2HwFw
+SHR0lgDm70xKfIb8k4dnlH6FeZaJX61gqvdgZh/GtzQLzcom74FXz3asgYvt
+ftyoC/PfZJe6ID7RiufSLNx71NCpyR3Ih2p0lm6EOzhensbIV3Ioef0kzrmg
+or9SrITxyg+7tcGySO2FWYrw+laPRphT0i3+RQH70a/6dq8eOWfUr0vlUW/d
++q10jBcvrzGhIYf5TotivOFBP2b9AgrtT12TK2GROOp50TcmRZVsSjZHfDyf
+S9y4GSZV/GnvRxI/JT4c0zTNpIQZzqV05MdR4MpOwKzQne+iyT3vP/4iC5b0
+BL95C9MOPm03QH+eG69gFeolzHdpegsLdX5w9If5jUUJQ5iP5c+dcwJ2H9Dx
+noN4uOHizHCYtnJ7eh7MsHzM9iDtLa+n7BA/j68q1oNlL0x9q+Eexvb/3sd8
+MkZr8jLkK3zwVYUN8/wMnwWQ/GWVwZVkP99dvD+MtO+5v9QMlhk2K7vD3Lyh
+1rPI3928W3OWjH9gKngc9eP51hUHwZLWiem9emTdlw9cQzyiwcyvvbg3e/7Q
+uxkyi3rJplYEk3t0zF7JidRr3jw/Q5ijm3hvYBLtLSpzxLhHaSm2p31lTIo2
+GGn8J3kvbXL72i6FL9gaNJH3StedXrdRJsVVjq/9CIsMt/ys8Bn95TMDzcl7
+74x1aucHJiVi2ytEkfkP+n3kDGM+cbWtGBZyPdvjBphU8ljhkCviZR3TPH62
+H/VlsLY+gRn0og3BYvRfMM6xR77CfxUuWkl8VsE4H+b7vde6Axdv9toth/pw
+U2qTRtC/uDbIjk2+l1gcH7mN8SWjJvsOwyy7E7p9Q4ivmZ8RRdr5oUXbRpgU
+I+zO0iBS78wNPnc/Yr13HfvCJPu9KLM+XIJ8FaN+HyX7LVHidRj50XYvzUkk
++//dqUSTL4hHqvZak8ST9afzCZhn/iglmqzHRkojgrTr1y98T/IXpC/TIO2N
+3T9xiJXDE1dhvGST7nXlqB8//2la2yfMv0SabUHea2KV2QjExws986IY7y3B
+puX3wgeZlKWhE9sRFuqyFUbfov7RJ9ZSMGWa5qXbDW8uT2zFe03o+lPtYBvG
+2+FSXAtTy67e4tcyKf4Ho8A27f9/r+U9/PuTzvoLN7T2Kw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           
+           9.996694214876033]& ], {4.016469192730548, 5.934756130901607}, \
+{-1, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000001556`, 17.}, {16.000000000002885`, 17.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18., 17.6952}, {0, -1}], 
+        LineBox[CompressedData["
+1:eJw91H1ME3cYB/B2dhtvS4skDhtmy93JcMy2dwdFMJsPZWKJIOVFrcjkpUCY
+lE3n2Ox8aZMFtqEgiK7qCiumgQoaOoowDS91dkx5ETWYoSJ1sgaJojjE4SRl
+v+6P3yV3l08ud/d7+T5PaN5naQWvcTicVHR67+8vQReODDj/HxQcn4V102Jk
+x0/hizEUmOy9Z9M2IPvs9yfyKRDTr7Ym70bOiU817qPAqZPMdZm8Li4cOkiB
+3fV4fdHvyCcyt1aWUCBLKFxNPkVWbTvgUVKgv1UzMRtIo/+ldB8NokAwXH81
+UoIsHmgeu06CVPqmyaZAVv+YlVZGQrpFL+rchLxmxI8rJyEPpJPhacg+NUfl
+DwnYq8oo1iUjQ741rIGAsLulyU1xyGbuYE0BAU2PMlIiZMijcc/2xBCwoOoT
+u4Te72dtcojQ82a3/d4SZIPPuERIQM1mXVT2tHc+kXMrVhHwHqchsPa2dz4l
+E9UbCVDfXVn1dT+yYcEvWk/Aw8FhXd8l5OqMpDoHAfZfLWsvOpDnTxH5/iQc
+Pv8xvewKspV/8FAmCSdutw77jXpt3n7FSgKXsy83asb7vivHNUPCuEFb38j3
+jmdziWc1BaHLQ8/8HYk830jysyiYFh3RJO5Atvm6F76ioPKjPN3x75EFSdVT
+egrePmwKMLcj7+3bn7yHgjB9SIP8HnJwXCUnnYJFOa9bxWWAsyu9NyKUgnfe
+8L3AiJDNLRLqTxImDULtoShkzvzrjJGEwUJFR0U8svqFZIOSBEFd8CdPlcjW
+gjPNLwmgn6nN/gnIskam3kaAJYcf17sW2XZTyfucgG9vFXmKIpBVpsoABQGl
+Y7Hua8uQ4bLoMUnAA543d8jB/ucblxOgDf9NSE/R+Hmm1Mg1jtD4/Q8sMz3g
+pPH3bUFN2c8v0Pj/du3kD4JOGo/vn9PdiaVdNB7/v9+4a7/op/H8nJ4XCUP3
+aTz/B0OvFK0eGq9PXcXEjqsEg9fv7AHNbPZGBq9vhqOufOeXDF7/53/tMnU0
+MHh/Lj0a3/LWAIP3z/1dbe62GQbv72Xfsvp+Pov3PzFCJZt7l8X52JJy+tpU
+NIvzI1Fsd65fx+J8vYyWlcd8yOL8FUvu7C6LYnE+O3nZT7RhLM5vamt5v3kp
+i/MdmylMIhYYnH+3PcYldjO4PkJWtNhGhhlcP12rKtrUPQyur53tLcfK2xhc
+f3rn9eA/zjG4PqtyDPeVPzO4fo/dmdekdDO4vttjc+UDNxhc/xrppyEBTxjc
+H9p6Tt4cE7C4f0hWBl00rmFxf1k8csMvXsPi/mMZ5VnbqljcnxJSIf3cLyzu
+X0mBvY6lLhb3tw6uN3+RuP/9B3PT46g=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18., 8.354800000000001}, {0, 1}], 
+        LineBox[CompressedData["
+1:eJwt2Hs4lGkfB/DHkgYlp2QrGYNyikEaEU3IKZVNMlpq8o5TVCqVsFFUEkKU
+YzsVosQkCSmULWWsKZPklWar3dSmJskx9X7vrrc/cn267+e+v7+vx1xddAN3
+rg/6iaIoBRmKIl8pGvmLzqZ+/NFlU0xu+841MEd+/pQ6TD3e1V4EawVMrpsL
+R46Vsj7AXOE5UzW4OM+jxw5fy+YIYyfx7zXei4YTYZsstb5uWHhgSrMVZp80
+zi8hz5kymROwW95FfhisIs6u0Gdg//XpXAM4VJWR4ghL+BHcGzr4+uUYz5vY
+U36TDsw00YjxhamurAXHF+Ac05KydXBzrJ/CpDabGp7fFWgPJzjcmxULz1jR
+XcSAM5JG9ynDX+tm1svAKmffZNbPZ1Ntbznc5ySfNOREPFxGq91WBwssMhwC
+4R6T+7U5P/Kf1CGWezwmHw17zZFZehCOiFZ4sRVutlc0qoHp2/k8H9LT6gp/
+Cve1imOdN5D1F70LNsPJp5KKtpDnW/Vf3oej3DuG9sMJTWqJLMwj9TUxKCK9
+6/Vml8Jso4aoP2GpYslVZcwfZbc0RRH5vayOPAyDaRk3j5H5qYXGe6rh5Eea
+9ALSh02ZwWvY2e3otXfEHVTsJJydlxhpp4d898t8RmBO2dd9KbB0+fhkFxzh
+4vRVDFNXV+jmwH2rhrZr6aOPqK99dvD7X9Wz1sNeTxsz2pFPnP35/CFY5N1z
+y43k1/EIKoYzInU76jAfzb+Q1UDWcz3adWG5lgVz78L8NZ7aKehLvEVQ2QRT
+jb8xx+bh/sxPzKtwpKuL8W6Ys+RZcB45z9u7YGou5i8/nhJD8gSq2v4OJynF
+mvnC9GvCi5uI72zUtiT51nOcLGHPxZosZbJ+dZfSInhAQ2vNB8zH91qfZQNH
++A5++zHvDUXZIJijl53XCme8/Y9NOVm/0jBxG2a/N3pNIc8wFXngD+LB4dZg
+uK8n6EkPLKp89EYMC/OzF4/D3MCcIWfMx06u/WaA+1UKlu8RwO+jrxhtJn3c
+3stURR8qVxJl+HBzROj+rbDXaj/uW1iSORhYCG9IXnaHZYD3o/yW1m047ngy
+LxkWULnjd+G28EOhPTC7gnanAk71nj2qvxD5WVb50XDCyDZeOOx1rE/dCM7N
+cPylHGanCjVbkMc/rrCtD2Z6/NZI8laEmXPkFiFP5vP59ZhnzDiOoQML/MuU
+9eFWpaK3psSSiP4T6Ieqdlczg/kFT7+P/Ez2vzurR5430LgVDi8xGmXMgtma
+rIGPWmzK8PaqqiHcJ8k7kpUM93hY14lgae/CjmVwdNVPo5dJ/kKfffJwrnWz
+6zFY5JA6WzoH5/AKjgTB1OZtbSNw3yuzEHcyX4Ljyp+x37+ryN8apn/Y+nQD
+HHFMZ5cJHJnnWlYCU3X7LRbDKqdN2uSRj96Ql2tH+gg+EL8bVkkKlfWFm9Ps
+s17CA6dNTeNJP6GK6V6Yd0P72OJrcILVsbm18NcZ4pOfSL4rDW4z0U+cqrav
+Dealm1k+9yL9PXSkH4EpneDMOLhmXtHyJ3CGhrF7GkxX/dRlYIj82qnLDsEi
+8dT0KJhNs//uS963Xh+tWzDXL+yCGiz+927SN0Py83Yv/RruL7yRZrrUCPuZ
+e8MdYJFwRlggzHWzHr1B8hv+wjgMS6wYbQawhkd7XzYsHXspn44+UmW8m/LJ
++rJruqPoM0q6IpOsM7fT4kJI3/9cFiSS8+2aFvytyabquH4y28j5FrURe2Hp
+Vo0n7mQ9JPHFfHjA9vqfBmTdNa2zfzY+jx6at1CwwI/tcQvW6vZIfY78zKrw
+sTpik7qx23DzZ1nNR7Bbx5qci6QP2ZpYWZwnZKmdyYMjr9+t94Sdwy7dOk36
+sZzmVEbu++OQPd+QfD5eLVFB3rjYRkEtLHAK74yHk3YJZvWSvqQ6fh9hqZzT
+VQXkUemRfcrB/PO3LPJ2JnmTHhnWwoX/njZKhvljvvdk0NcGheYvj0kfn4rk
+WKQ/Rpcuwxj7jZZ5rYdDP6/7azcsmfju9wtMxX33vgMnuPxjZQUzOX+XzzTB
+/txC/zGcL5wZ4rIelphz68/DA4c+SdJMyPvnftCavK/zks7dhvnDbPnryCsM
+b2S9gkUzMgsXwjQ1x38nYOmCm7YZmD/1xB/F00zxPpV32I+hP1ql7kdZmB73
+QjMI1pfLko5gv4pl1kSfBu719/aXwM3Hj58KgrnXAgPumJDPE/5NWdgtkRf7
+O8lX77nipjq+D/unx8bAlJN5ZTrMLdput5Gcl6FqFw+3sjyzrEm+gx8rUuEN
+9MOG88h5d25vvQ4Lm/o5CiRvjjhwBJaa16n9RCx4d3w17hNnNrXIw/SULzVV
+sHDlyuVapI8OZ3lt5F+SVlm3lKxv6VicBvs3fn64lfSTp1A3Ppt8HjWG5ZL7
+Np/e7I8+MpwCJ3tgZmHRxiryfj54H6aLPiRKtnmDcOTkPPudsFR1NUMdffrn
+rKpvglW+lzK04cIHsTIqizHvM5aeIuxl5GMXAKvsWD2nF8/TvudUF8OCCxYB
+6XCc3NTEK1jio3vFiNyXnqr8sxncu2y0CvmG7Z4EO8Kiwx6WC2FR1TSVLXBz
+633tLMw7JveoZgcskBkZH0c//s5nzu+C2Z/bl/FIfzaFf4SS/foBlk/V2NTr
+zXFFPuT8gJvtHFjUEGlsC9N9TFgfVDHfEk+xFkzZuFQWwLywcM9h5OMPWTjw
+4IrHyhGdJL964jl3WHT5rsoVMp96sbEneV4td+wkzEzrbNoGt9k8+z2GPF/T
+OXAezrWYztgJZ8Q8HZTCzS2HdIhVYoaneSFPT+PS8liYPfQkqwHuy1lnlQNL
+k74FG2MeSUHSyZsw12BYLQ+OowV8HIRFtEvWFPrQMGd/MEZ+/iOW0E+DvN+9
+5yPNyOf3eBwfju6fqm0kfZ7f3tsJa+1+nDTDHOcdOZH/mqzLDrICYFGZpIm8
+7xkDl6WXYYlwZ/UNmOanO/AFFhyY77oPbujiuc9n4uf11Krrc+E7WYslNjB7
+qWpsGfJtfJzx33Uw/XCrhT4sd+F+MReW/ua+4RTmU4yIGdoG8z9fnZhEH2Mv
+Nwh3kP0XZqWTvp3NS1IiyPn3/KK7VDDvQqXHPPL8OzfxWthStP0EB+aW6jvW
+zWJTjz8V9LiR5/v2TX5XZlPLJwzkWSRP863+WPibAyNWn5x3IWQbEx6LKL2o
+RnxrjKMDp2o8GvoJlkztPuEKaxkfWz+IeemhG+eUwD3L/3z2HOZzT+y3mEXm
+SV/zDGZni5+/gpcoBo9KSH/fQkQc5CtbGZhM+kp4l829Dx+VM0tWwvnMuS0r
+WJivNevMQQbJX9g7dQ6eGHyvsoLkEb7YJoN+9pXlBP7o64Dl63Ww6XDxr0dg
+L7dpBcnwnZzDtRWkv/Ldooswe3bnrCck/9s1cpfh/rLG0a+w4BpPIxO2lZeT
+07PA+6Z8yWMTXJyW/dcquJmf50eDLVMYQTyYe4hyPYs8KdzWvN9gkaK1Cx3u
+6XwjzIDZO08nnsI8MZcVzhSR/fsf3J/E/JUz7kouwJIKq73t6Mvr3ftXxAnx
+dV/Oz0SPckLDszB/YWdH+gw2VXojNP4UWY+6lpivxKYcrYK/JJHz6eGzRIps
+Stmup20P2T9gt5kFL2Q2craS+/5T8vGJAhz1VH0dTJ2szqiE28wfBTuQebZ/
+tWmBbb4FX2KS84PVlJTwvENBvtoicl6MU/RReOLgpd8ZZF2scNQE9zt/ylDV
+J8/711pIYSa/pN+E7LdLGGxDXsWa7sW2xL39zHLM45/bIl5L9l/Qm52EeWkh
+d/3CSB6zqhFP9BEY9GY8mewPfqU2BlveDKuuIF6anmaP/qo7fdd0wXSPlt5g
+2LBBEDkJS9nXh6Jg5T63Kj1LfP9GNEzI+trTRfkeMHePv6MtnGXdIN4B099p
+3nuN84WOa3VPEvfrGTPglzt09l6Cm/v9li9Bvn+6Z8s2k+eT40v0kd+Nu8Kl
+k+zf86H6G+Y1++RJ64ETarwf/Il+eJE2vF6YihQ9OIc+TbOHWrthiaviriQa
+m/pgYyTpIK6Rrzs8HXk6Q66Q8/luOQ4X5TE/TWaTgJz/NfvexDTsn+TYniW+
+m3YvEea0uNafIHnUh7Vc4GoVnksMWdeWFzrCdfPUncNh9vECjWhYMc1+ZAtZ
+35HK+ws+Gn9otx+5Xzn3wn7cV1xamsUh3jgt2QJ5yqqn3gaQPIOXFOWQtyzf
+/HYYuc+rVvoSPsrvlo0j58Ud4JH3JbJCaUs2eT7uYU4W5m9d89eiatKfhu4m
+D/RTfTF7t5js9zrX+hwWWSvPmyD9rCitdML78f4f/AfHCvtDdI33wkk5ryw9
+YHq0Tc92OFjT/OEuWNLwt44pnGJz2fIMzP72ceVVnLdc6qRbT9Yt2e4yMP+B
+z75umPuG08NAHsGv9as/wAnjId0LkPfHLyGW/P/3DzT2/wADNNc5
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.667326901390272, 4.30940414848786}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwt1Qs0lGkYB/BZRUOqySWztQZjjJHFnHJal40vK020LiVyTUVmp8aoHFSa
+ynbshJzaVtFFOklDZSeUkVwWue2k0bp201LbSCtJbYrs/93tO2fOc37nne95
+n+d5zztjsVmyNkaLRqNtx4fE/x9ziqZHogVFo87IbzebwT3yoLWwf5E/qwxm
+uJt0y2GFR8SmRrjGLNt7Gh6lDKUf4cgTCw4GsCmacHLdp8XI927+3ozTxCKH
+47HwB3sJ7T6cn2poo4B/GelfomdJ0eSJYjnZl7Fod8RiWCky3x0I35Bsq3WG
+KWe7O4XwgTeFcifY37FxZAyO3tuQwIPVW1SZjsi71Xk4YTZMt9H+QgiPH3Fo
+e4qYvM0vIx3xgOTqEiWivCVMegqxPOeW6jAiP0UTehJR1KvdGYHo1N7Zc5BE
+99pwJ0RqIK07DNFtp2i+KWLUwihPHmJqqOCfuWS93mH4BeqZmyxYziD9Pbm0
+lMxpGfcok032Tah6FA179/cpPGFm2o4yK9ijddg0Cd4waOD6CvNg1/glVrDJ
+fC+Ib8OqicgRLdKPcUDiZZgTWKwdBCsevJVeIOfl9bj2Cnw062VmCezVkvZM
+i4P807vjVfBN6QlBILxhblfzR3hBZxD9LEz5nDV2wf6TfRJ1H2yeuHboRzho
+o848uhVFk11wMemC+Q37WVzY/KXNJOk30NMzainML33UsgdWGtzx4sPMCrb6
+Nuk7OcyXBStWqO9po67HJeqn08j/xL7J8xt4ZAXfoxeOP3EkLRhuGvZzvAyP
+7hifFwOvuTTrzxRYc25UthG+Ed+eGgDTfZbdXQWrDPU4drD8NVdjBnfTxBGG
+MM99qv8F9i9enrFoFukvxTvnCmwfEyrRI+srh2Q/kPMrPLedBfP9Y5K4cBxN
+zPyOzCt8l40G/Z5StgmTYNmbaJMy+Ezm8fWV5P2wQ5YZMHP2rglt9KfMfhu6
+C96z+lVdCPFzVqOYnL88tUABC2Jrl++F9d8ai3S46FfTFn8aHq8oHQqC6759
+3aWCC1IYAXkwryaxXR/1FNqXbuqDmQOt7cFw4sP8i9rW6MfSIqcIHpshOmkB
+965K3jcFf9Luufk13BKX8asv5vFwjarAGmboTKXnwOn0jteGcN2EYrAb/ivv
+vu048su42QId9MWmzTr/O6yOTXflwG7yZ3akHvnPAyEOcHuT8pMEFhoN7LQm
+52BU7LOS1Nvfkz4HDnSijNhwTnBu2yDyl/qKH+vC5q5x4VfhzKjAfdNW5L5d
+dIqDPQ9sHZxJ1vtMnpF7Xv99ndYiUo9dka0G/Rg1t1avgJWHUlTFsPo3g6Ek
+mFFaxyf3JOG5b2QVmWeoliX5nTFf6Gami/7U17KOuZJ5hfqkRcAKXkckubfv
+je8cLIfj60s9BOT7sZxuXR7m6fZ3jQjes1+2OQSOfzHPOg8eEJlFnyM+WVbV
+D3NPmZf1wv7zLXtsUa+XlPVOywb9VpznSUn9aseWr2Dm6swPHfAtRcldK1jT
+2S9lYz7L1OUNLFjI8jHdBhdS8ihdYrPu6kvw+yiNjwb5eZwts7vgsbG7mhpY
+VtBRNAqPBF+0OAb3Tq8Ln4CdXKest8DC7sNfviL3xDmX70zqvcLU/wPm3DNy
+MIFzDCr3k/wbjl3PpsHyxuEqCaxnGG/6HvMQTpW1k/ONdi7JnSbzU1d4v0T9
+hakF98n7oy7jk0Xk/iUx8yk4v7IqTwzPvC45mwzTh8dkrvBYdVNWNannkUhs
+AksDbkbooz+BvGvhTLi8NWvdJphxy8pvBsza8dN6Jayc4XbaGN6ZlWs9ZzHO
+Jag2xAWuGXS7FgZH1csqJbAwgE7lw/nN7g9KyXra9YYe+L+H8/n/ypb6F1+a
+WGI=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.165661129127848, 11.57565554834886}, \
+{1, 0}], LineBox[{{16., 17.00000000000231}, {16., 9.999999999998607}}], 
+        PolygonBox[{{16., 12.9}, {15.6, 14.1}, {16.4, 14.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.9452, 13.5}, {-1, 0}], 
+        LineBox[{{16.000000000007276`, 17.000000000003638`}, {
+         10.000000000005457`, 13.5}}], 
+        PolygonBox[{{13.51826734053906, 15.552322615314452`}, {
+         12.280184249251306`, 15.293188945044921`}, {12.683281069670574`, 
+         14.602165824326175`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.823799910437668, 15.984057296392571}, \
+{1, -1}], 
+        LineBox[{{16., 9.999999999996362}, {10.000000000001819`, 
+         13.499999999996362`}}], 
+        PolygonBox[{{12.48173265946094, 12.052322615314452`}, {
+         13.719815750748694`, 11.793188945044921`}, {13.316718930329426`, 
+         11.102165824326175`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.823799910437668, 11.015942703607429}, \
+{1, 1}], 
+        {PointSize[0.04], PointBox[{16., 17.}], PointBox[{16., 10.}], 
+         PointBox[{10., 13.5}], PointBox[{8., 8.5}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T3", " ", "P2", " ", "N6"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbf/cgdhef/ifghgihi.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbf/cgdhef/ifghgihi.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {44, 22}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwd1gs0VGsbB/BNqiFFSVFoCA0mDVHqqBlS6WoqNJxC5dZ9KjoKoYhKRe66
+jVBKZahVyGU4XYg0J5RqymCKk2QizhTx/d/PWq1Zv9n7fd7n+e93k+H2/Rv9
+lCmKGsI/8kkpRvGjz6FoBFM5VM2O32p74GLbig4TuOUyv+GjHofiaXRm7YA1
+Fc8stsKRTu22xbCdIPtE90xcF4ZdNtTmUOJ3C2LOwnbPFvZegnUW/Tl2Bay4
+f+2o6TQOxX+u1zqN3H/Y7XsJXKOq30rB1KKnqRunY7+qwtIxcIvlp6BuWJBr
+pGUA07UWJEXooN7Jtuh1pJ7hGEs1XfT5Qav6HBwY6NR9EvaJXfHwA1k/Q67W
+B9ck3Cu2Rb/yVxcTnGdwqPRPRg8SYYZylm8cHMIzOfQVDrR32y2Ei30XVXEw
+v8LELVEES4c3lZyCI8d61pfArAfr+6phKZWoeQUWrG4t7IJ9Ar8s5sM6tj+1
+FbBz3obv82HN/Q02vTBnk+XRHvRD36tu/YLU39gbn0X6l+x0vgALz97Vd4MZ
+rJnP2LD8nZXpRF3Sx+oxLejPLiF/XwPmF2+3WuoFFyuu8i7DLRZDka8xb2T0
+krvh5PqX/v3LSR5uTiEHYcFhpelkrhazDRJy3VmeWTgTFmUoj82CRSYF/LPY
+p4uprC0h9TJGOCRXxt9RJpb4lEfvTE4l33sv5abAwlOJrAUwbWHG40moE9jY
+r/IVz4n7l+RzKpwXsE6tlDy3WdwQM/TR5XifmQXnzdv2tIo8xxc8B2KfnoaP
+npiDm7KNVgLbLct82gvTLtYv/kzqPXMtDCXnsPpRtgmZS2vngl8wpaXldIjM
+IVE/HmCA7wslx57D6ZnlESI4wTxmrSn6TE/hDyvPQv5XHxyMgrmrhirmEm/z
+r3hN5qvLTeHAfMeEJYbkuY5yefaw8wODw1tgmoZuqxGct/tKWjQsZkl6Bsl+
+Qym5ZE6pJE67DOaNv52eANs1x8YfhjVNmcEHSL6DilFzWPhL7raIrN9T6/0R
+/Wv6LN79L3muxh03Usi5iQ/rOUHOQXVznhuZ16dURZ08jx3er4xggVFYbgzm
+446aKiuRc2ja6TuAfAKb63j95Fwc+LDcB053mTN9GE5/5RFVh/eKW7EsRg/3
+c2kH19rD4qsGMldS/+XxKw/xXtboNO/KIefYivbLAaa7e7qoot/AdycXt+K9
+5jE2v4uEWcx7Oy+Q9/6HW8x45CENKLq8FdYJ7zbMgFn0njYHuOnM1GgdOvYp
+CbJgw5xuMxM/uIUK93CFmV/EAwUw7YTMIYKsz2s4MwjLHTm1ZXDQ3I78BYbI
+Y5P3WFXye6Th/PZ9cGDS00BvWN1cpHsJVpg6DJTC6WF+typgfsWmQ9Mwn/Ns
+h53NMDfX/PYeOOcs11IKF7MjsovJ/JFx7q1wnE1fwwD8+FJ9ZSMs/u+QM52c
+x0GXSlJPwY//aQMzT9VOuQbThFnlVnBOEv1FBLmeUnVEG46fG8D2hAW3PzOk
+qDfV36h1PiylsyQXYF+r3+Ya5P7dagXz4D1a2ue/YV5WZ11BCfqPVpm6ugkW
+JtWU28D8lY6u1TDPwc0rF3nkWeauKiX5tKWe1oRdVQ145bCga3VIqBbOhxbX
+uh6Wxvd4d0/Bfvat4zuJ2SJHP1iq53ViIvanL7a51zOZQ9VvVm5YSuYvNLoW
+B+stHUw/YkjqjJ+/CA60lFqUwaJ2wwwlmE8f+UvFCH00jx9t10ReMmoeF46b
+fOfIB1jYnye5BLNiwsbL4T1TacpdMD0q5qIO1v8YsLOaNxu5Wi6zcYVb/uEx
++DAVR/2+AsuS077kwdIzfiE/YKcdzq/fwF2prkUuZJ6Hvx8MwbzKnsP5sL1b
+1ystY3jINV4Z89t9lfXNguP4JV9d4GLHVl86HJmvO3IOZqbzFdowp8njySNY
+2PJxQAnu0gye0gjrnZRqfEZ9QUdr9itYxfZv7mNigyR2CVyW9WTMVdJ/+U3R
+SS3yd0VwMQTm3/ilYw8zhLy0TTA9+dKK9+hPJI71tybrnWqWBMBiscv66TCH
+M6mmA/NR7cZcFZiWv8bTDQ4LPak1hLyKT7E6RMhvy/srjcOwwCss2QLW2Zey
+QQ33i15kbbTVwFyuzPrZMCt7Ac90EurvGvfbGZbPsw6fPxHzOt+feQTWrK+v
+91XH++Dv/7kI5l7OFokmoP+GjoIfsPBZnWINvFbV/KA98pAbHqCpwny7Tlks
+rPnsDw+FGqnflNoEJ2SVmurgep77axrdBPc1jr3gC28ZflAbAEsTK+rfwHFW
+Tok3yXWzcx67sP9jea5HByz86e6thf6SbRuDtUzRT+zRCbWwYiUzxw4WH5CP
+RGIedds9ehthAedgFUuDnB/3dG84UlZm2wA7WTx230ac8k2FQfJqkenw4HQf
+V43NsHFou+5yUv9tv5wPC47YKJmTesbZaw7Ba4OXiWlwnPmhp1tgTSPTetKf
+IixHby4cFLXPtxymNi53eI798qhZOulkvge1fhPh+BP9HodhlszK0wz9tiis
+gj1hzZej0SaYh+/OClpB1r+7f0cN8/uOyVe1J3lEe15sR557UjvDiaXf+m88
+VMX5KggWOJN68vh1yTT8PySEWekDC161Fx4fjzz0aq9Fw5zyItv4cfh+eFPi
+PXK9PlG9ZCzO8Qxr96+waGNTmwacPvGUy1zMx5eFnEtR4VDDuT6RQSRf2fqO
+tXBgdvH1SpjuVXBqAfxDdslVfQ7OxcjsYS7MWGM4gQeL29alpcNOvrruApiu
+z60ej/qRA5s722HOsWFmGvy1dqVQnwFP0zBciv64N6sU62Eq6Ht7H5xHNzoY
+DAsmv9LPxzzy8LrlCbBI2dt9C+Z1/uOQwVWYft7Me5j4baPFNVh6+HptFPKJ
+35xJz4Q1s2XrZbCN33XzOFi+nW+hjzxDVvV/2gv7/Buwaw45r0Wlq9fB4oBI
+PQruOpGWxiD93coIuY71xlMv2imT+0cOy2bCNQ47b0swjzzL/tMO7H87Pyaw
+FBZkblWcQL/R4WMrLsORk/PdT2Ae2UhTZRzM6mDk7ML8ZffuWoSTvM7SE5Yh
+L7HmY/cwOOFG5k6dMcj37TeDWHLdvOt2vxLOa5dGG6lHrbI+30oh79RxwSJY
+WvjHjLpRNsV6uXfeN1h09L2y3gib4iZO+NeE5OOyL6FymE0ZswUT/Mk8/l6f
+KofYFOPP2OzbJE+9av3Z8HCuX/B/JP+F4RO6f7Ep9bP905zM0P9bVSNtXKe5
+iFUTYGlP7YVMeGrR/DctsM/n3HQ+6lMXV1vomaP+3YLeuN9squzWpN7NsMg7
+7dAr9OOqctT7NLESrVcP/X/9R9uwCBZq89c3wzn5ai4NML3X7H0s5r3fOyHm
+IyxfoOVhrow8rYUd7f9f77f0HhwoGqchIZ6aoT8DecnHHJ1TZ05+3/xU5sE2
+devKC2Gf5BdVAbCeiVNlIhyZVDt3BRy02sxvL9m/zHlpH+oFHbWZvpLsn/RU
+dy8slq7fZEj2b5yhWop+mL8DE0cwL+eGyqaP6DcwfTKjDRakWo+pRv7cy8es
+62A6i81IwfzDjowjFTA1FOywCnkpYn5tLYNFvYrGPgWbqmH+rH9C1pv3vL0+
+iHyWKFm/J/d7nX575AebkvfqBg2TfI8wlSL68Dy8Tw0ySH/H12x8JmdTa9Wz
+rnqTeeqsaqu+san4h4OyKySPO90Xbn9FPzlREhnxHIO5W7rZVI7Sxw3zLFCf
+tn9R8xc2JVR6/jEUjjT0uqSF6zbb6sfWEEd03lLDeuc5knWTmVi/cunD3B42
+Fe3xeqsbzGk/PljTy6a25CdMuwD7dJR5mn1nU3GPAm49gaWcvQHn0K/o+LLC
+bzCdE2o22o88fs63U5+LemrmN/wH2NQeuaJOH6ZPql4nxPzcA9Sx2bBP1Uhz
+zX/IKyqng1wXvZw+4yry4v0t1JhEnGjQZPyTTQna/jo5QPafzLd3gWt+DzNf
+k/1XeUVNJ67tnl9E/KRtSijWx511Hj1D7rdXrwxF/celnyb4k/mqqCuzsL9m
+xJNGR3K/r0sDH/lLXmcUGcPUpGsq4ZjHlZ9cNxEW/Ezrd0X+jzk3v48iL5Fl
+g/F05FV8ZU3SMMnPMS15VyebCmLE3lIheY3Uz2lox/u2w6RIh9QrDln0WoL3
+8RNPYAdHuvF3ipuQT5hZ5w5yPbRwmqAOz7/60tEM4kcdnfoivG8F7pI3xGWz
+ftTcwfPsYzFJPhRX4zTvLPZL1VwSQCwYtV8YVEnlWU+5c4+Y/CSUUyrk05Lz
+P4Clt9A=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.1148, 9.674800000000001}, {1, 1}], 
+        LineBox[CompressedData["
+1:eJw9lglQVFcWhttmkwg08F73Q5QlEhgkstgYAZF5Z3ASFBEQo4IK1coqBEFF
+NpE0AsqA7IM6EEOjAyIYNtkUhBaEFIvQamQUrQpoQkBBGmURWZz7ku7bVV1d
+X73X955z7zn/fz4/Eubhz2axWJfQl/mdevsJffSA9eeHhKvG2prLyYirwnpf
+5BPwbrdxEX9hLbCEa8edXQiwcO76ZqMfYsPyr010CKj5kGD2t841wBqCE8ss
+9H78Gel/TBBn6aTMqhAQW7/DcV2aLlov5kH9BgJ6LyoEG8+vRutprDweSoDd
+wSMR2acQhx/kz3USwPpR1apQEbFVSsyrTSR8dAzkXbmhAyxN/oX+ahIOdA/f
+7ghALNh79rINFxK5xe1GDojdp1VutnIh63joUNIGxELJpwPbeFB4MY+Os0Y8
+NJNh3swDnmdvYoQbYtG34Zu+oEDtUL+jJA6xISdnTyQF2qmSWKqB4WqPsxUU
+pF6vu2c5z7zPsVnuoqBiF/HdDw4oPlZFQejPFIzGLiW3xyPW7P1JWkJB7GSu
+/aYGJv4/BgyCKUgX6zu8GUY8dL5ijqDAIm+kPfsjYsnOY7dKedBmpmVYu8Tw
+q9ZL5jxIC+n+fGIUsSAgoaqUC3b8XHvFJoZdxEmGXHh7c+XLxZPM/jkl9wtI
+sM6qCeBxEYs6D88YknA7VejaLELxSuONDeoJcPYR/xGoy+S/zz1BgO5j2zdX
+Is5RaL3GUPcvCDjdU/Tl2BgPnVedR4IiARl5hUdtnRFbRU5eYxNgY9rcuniT
+i943u9GvT0CCeP9P1RRiUbf11f0ELNUbPT6WSaL1DT66lxFQ/4+Fkes6iN2X
+bXu1SYifdmmYRnGw4CXxLo2EkL6jy6++Qyw0MezncKH+bJzDc3vEkpYtY5e4
+kBpbx1dCcbGGtBay9Hjw4gav041hYUbbV/k8WN/VnhyzBbFgzqlRhYKuWFMV
+C1/EorKsBgEFdTvpny1R3bLE/lm/iCgoJXVOpw8i1qzRG7tPwe40X/6QPorP
+MDbFsoeChce+dOZhxKyjw563KGjSjs7kXWGebx7MiqfA6u1LlksvYsl6jTBL
+Cn4tNnUTvUZc1RQy0MUDjklkgOc0k2+V530PHiRB2a7mEeY8cme1JFxQXz3r
+aSdGLB4qMNvOBXvvgNlTQsTwWq/pHgmibl/dfaaINY1fem8j4VyKCyG9zeS/
+dsDpMQH/qkp0O2HL5LPzyMdIAnTnnvssXNdG/VVgvswnIP29xDhAHbH4R52y
+z9B9HFfqUzumhdZfcJj/pA0prQERyf2a6LwurDxBENAniPrtoA1i997LBv8k
+oPKmRvmlvRyUT1HvlUwCnPg+VsuHNND+Jh427whQzHEeLr6gjvpz0pkMJGFx
+tuiT62s1pl43RY2SMPmU3BoVg1jqrqsUzoWkvqFBc3vEQqUz3DkuBFqtD1W2
+YN534ihH8YC0zm43c0U89FAvA9XdRhf25rQ8xCJejvoOCtaFVf9qtojYsLL8
+cRYFceOPOEnRaP+q1R+87lIw9gujV4ilA9fCeynYd3eD9PR5Dfy8eour4RMF
+Dv5/kfdSV0QwB6/fEnls65NqDt4/JGYgZ/4hB8fn9lzf+NF9Do7/N8nr9pRz
+HJzfQI03q5rLwfn3U3X6B05q4PNJiyrqX3FNHZ+f0ZL026AyNXy+m0c1bbZn
+r8Lnf8+MT80IPsP387Rj2nfESBXfX0Obd6317yr4fgubnBxVq5Tx/Yu3fxCs
+yVTC9dFxOeCZwQVFXD+5pG3PnkoFXF+HJvkE+YmN6+92FOGa/j0b12e3abnf
+eT4b12+tN2HtRrFxfZM+FYdbzdi4/iMe2C0HBrJxf/gkcYYfdbBx/7xYYZsw
+vFUB9xc/17aAblPA/Zco7Ff93VkR92eQdsJxUY8i7l/H2oqpa3ZKuL+FVPS0
+WpoS7n/dfY9OChqUsD6Ia/+dP8OwTD8C/6ucvCNFCevLotoGBVsTJaw/A2L/
+bF6OItanIBNVflWfAtavZ/aNXuuG2VjfJKbuxT9IVmD98/c6L1QuYWF9DFsS
+eun/b5mW62eDcfTug56LtFxf73w9kmo+Mk/L9TducEkguDhHy/VZbLrUoXFm
+hpbr91Ptr/xLyt/Tcn0fL3wRpWb1jpbrf1tqjdYkMUXL/SG2+En0zkNSWu4f
+otI731uqIpb5y/iyn7SRy/Bf/hOxO2nVnmjEMn9qyavUsjRC68n8SzlIdXRK
+Ee0n87fgvbfcMlRRPDL/i68znYc107TcH32+vEteNULxy/wz8tW96Ra1WVru
+r67vH0jN2xDL/Ld0Y9kKDp/J/y9/9kvfET++C7HMv/OXgqfCVyGW+fvfzaJ1
+xvzQ/2X+3+J0pCTNC+0nmw9MyEE6cQLFJ5sfxCOnLO6sR/HL5ouID9L9wWtQ
+vrL5I+J91cREyRtaPp+IK7XjrHpGaPn80ugxVd7ZN0zL55uq8qDcN83PaPn8
+E25ZOvHERULL5yPxw5CF08IWWj4/MVOVUCX/rny++j9tFrxA
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.75, 4.0548}, {0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000001556`, 17.}, {16.000000000002885`, 17.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18., 17.6952}, {0, -1}], 
+        LineBox[CompressedData["
+1:eJwV2Hk81PkfB/CJbRLR5JzkLFeuxlGr09eEVY5GK12Sm9VhEJGEqFiRYoVc
+STX5ReNc2bZEjig7OWJlmZRSW9skJMTv9emfeTwfn+v1fj8+Y77fNL2CdvqK
+0Wg0mQU0GvmkTc3jnypFE5FPOYoW0Xp+iaManDpyPUmeoqlkb1Yqh1nXW39e
+qEDRAr62nlmtTtEKezYyjsL1zb+0VsDUsp6mB3BVnQdbSwPzE/Yc+wqL1muO
+hMCx1f0ucooU7eTlnhsNsChc55MsnG/v1c3QxH4VPupkvvts+dN9cNrgQ6kG
+uDmMo50Pc9pTJI/DGoxrf/aR8RzpE8owR+A+LLES+8++Si5HXlNxyQNGMMc1
+ic6GL728FG8Dcxc3zT9DfcVqDpQznKZ3JN0f7qv9JEvMTR7MloBbbXIlbWGG
+c5FnnSxFm7ZXuGsCe/hdCIqDP2gL1RVh/qEAO0/YJ1MjawJ5hBIJtm7wFLW7
+phOu7z4ZHQrfLt1lwIe5hptLb8CBsv9cS4Njb4rZjMOyG4/wwmHWoHn4Xpzf
+0NZ8ygcWTBq6dsLDTy7IuJH5rbul96Ge24t82txJ/Y+ilv0Lz57wzT9C+tfo
+GxCDfvS7q48kkv3y+z8x0F/RiJU3OV/jn0M3s2HOhcDtr8h8Yc2UnBLm9/ay
+NVCPRilv+gQ8VZAe5Uv6w8m93QYLMp3r+bDgj2QdGpOitWlOp8+T/hyWubcc
+5nVdddqxiqLRtGMZSrDt5oTNeTDV5bbiG9b78GMb38CC2VyVBtgj5WLEai3s
+/yU/LgzmGzfaesMC81d/KME3eh3jL8Ee2ilSZcjLqC8Wq4HrywypLXArK0nn
+KbFeW0gHuS8NESO9MG3u1D0feF+zavtzWNgu85EOV4zd+9wGa0SPW9ehX1qF
+n8arYRbDaF08rHFw+2A2HHuo1tgXHsvqWxJJ8hX/HOQFT06nM12JZ9xEUbDP
+LeNKM5gbrOtK7pvd4Zvn5Mm45fYJGs7bVG6kPEP6saP2jT/5fhT13noHe8iX
+6Q/DDUOZCsOkH0+e9QWing8J5U0jsHDv1v2zcIPEXzkTMMOtpzwN/Zj28321
+jOzfY1unif6u9KDv2QAzNjNP3ILL7t9VO0r6tTPeb+Vy+NKmnv/B1Gazm+fg
+tlUlVz/DhaHZnB741y9Ndpu1keueRrqEMkU7at5vdx4W5Sz8Rx126Hvz9QUZ
+X7fpozJc5V19bbUO6pmNeT6N9aljThUhcOFn/7GHsNt+x4dVsChsRVMozHRJ
+bfgIe9jPdsrD900+yavoYj+GdWAJyfv07eUtsGi3lvcGeN8c864LzPgz8G9y
+306KDKLcyXz7qWFP2EWTH+YGUyfjbBfC+qJvT3cQB0usqyN/P/7avXoDMc2V
+cYbcF0XrbFWyX4Wn4S9wd17c6VmS30qzPAB28XOK/ZvkExRFJcBsLt3mdzjN
++Jb8Pbht6E5kFsz5ZlsjjfNyiifzYsh6k7We4bBeB/P9UVhY8Jo2Rr4/F4zM
+A+BYr6zcKNTj0ibRf5isl9yYLo369fOb+NFkvEJt6Cr8w5X70zkwNRHhbor+
+Ui2HfR7BGmdNVe/CxRk/S3wj8xdcymWtoGjPu9sif0Q9aQxvhQy487XW82jY
+wyS6fAgejvF68RgWrJy4y1CBi7zEl+uh/oNPfteGee22RQFwfU3GGTV42iqP
+XgPTAsycZ7E+4PHT7DmY8ilLeQiLqbHnLVdj/86ynmDYTqqLFQEztFTql8EV
+dK3L12F+dj/vBvK+92xVaYFFL2256+AfpB02DsAaX46bt6De/Nj4BSPE4lcW
+HYRPOvTKDsOUqfCGOPxGM6Ogm+x/xH9tHfpXtzTX9T7Zv+Tw3FnYdaW281VY
+aH3F6gjsMxPxLYbk+2dCKgjuG3v90Q2mDeqpp8B+TIuXG2DBBu5oMywY3HZC
+hZzfFX1OGed1fllq/gM5nys9kgC/Nm+0HEf9HkOKfQuQP0ItKvA/WDQ8uPs8
+8eXoRWS8fuh8rRrqz0+0Ey4keVIPf6qAR18oGGiRvOduvGCjv0XJDolOMCvp
+h7RWOGfyOz2BnJexLWcLfme1KtazGuG03gbrQngq7Q5TUh85m2c63sFVEe3H
+XWGhzfscJn53c8+ZN16H+TkhDgawjLKP4wRMcVr+1oR3Tr/yZRvgvl0bSv6O
+9QmGdyJ/hfndc//Vw3Pb15i2G5B7Rq8Kgq2dPC+KGSJf6qIEGZiS/2vxGph2
+YFVrEfJe2r/54g7ijsAAU3iuxajUGxYqNSQ0ol7zwfyIQ3AsV9fADWb82FTk
+D3ONOmXE4E0FT/32woxHl7fWoX+nT0tFs+E0LQEtCRZN2NC1yX6xWUeDYdlt
+KiHiMKfieUwYnDFe7Skkeaea+n+DZazUEu/DgjGdZ8/gXJnWpELiGm6ALs4b
+96kfSIQ1ggqD02GOv8z/ImHG+qQ7y5D/ie312mMwK7F3cR68b/FKpyi4/pJX
+2xrUbxG4a3Uq6d/69y8b4ZJAl2OlcKE33eRn9JebG9XYB4vU+p/1wktORCsv
+RV6+m9xBBzz3uK6xnHKCC4OF5rfhEvmJgExYNPuE9wU25xerviL9zh9TZuC5
+R+0/0TlTI4x/O+PIhI2jX07FwRbXJcNkYfYu04cdsMdp0dk5rOdJ3nBWNEa/
+094r1sOpGT17XWHB1i6PI/B0kuTr83BaZ4K6FDx5p/twLUzxPrfmI6/5VsuJ
+XjJ+0s/BGP5g1S7zLyxMZLY/QL069ALhZ5hl6Oa0Fz5tUar9ERbZzZ6iwXpl
+71YNwvWdKp516B+XNZnbTMZVBpSSYb/M+Voe7KGYVBkGC3c//nCW5DNpWnIS
+bs1VH/CGOZaOZflwiZTcBjY5z/JYxwD5flid5GmRfPH5e8xxnmKhY5Y0zJez
+pxeR+5vNMpxHP+rZp86S+96xQaA2A1PRleWlcH8WvUwM82lXRloo1D+4fjSZ
+9IuW3FjdDa987/l8Hcw7MFpmgv5ShzoUSB6LK7TgUNjil9/YOcbk98Jo4jb8
+5qe0Z/1kfdSNsRdw4tWC5pVrUJ+Sa8EczPzt4pMgWHDUv0kOz1FH+y2cH8Dc
+d73PlOGOBSY7F7EoWtZDzxdknPWaed4Ibj0feHUe68d1KxnOcGKXWPwQrHt8
+po4Laxh5H62GZwScjGSY2Vn6OB5+4iMtLCTzq5a4OsJCbR8tPpwmkyijANNz
+lrPukvXXtkncQ70MdpfKPZglNRnsCofShx3JOOsTbWoO/ZpwzzxUDlPj4al1
+8II41/3XiXtGt6bA3W095pkwY2E24wQco/DJ/AzMpz+oOA3PTT0oCyXnrUrN
+vkneCyRrZ7zI+JWZobewZe3+Qy6wBzN+txXOr5A/ZbYN5nb7F/HhXM4dTzas
+F7CijNx/Vc6FDgrmHHfWPQg3LsmTs4F5hep9PPjp1e/xO+DCGNnqMTiEdUnP
+A47ILOCvR3/vfE1+EA4HfH49dAIWvYp/cInM39iaVwmLnRAdqCT9cu8oeQmX
+7Lud1Uvq1TW0E8dzrHieMnuOjL987KAEO/Ncl+qYID9/k5kqGT//6KYjPGou
+raEAl2+xrQ6F9frnh+axX0vYzvFM4qDQwUF4zTaDrTUwn7ldvgr+Hhl9RwAz
+E/VFcXBc+KO4Edgu9cf19vDB1e9txuHYjvyPsrD7XJ1gFk7ce1FtAPWO/v7B
+ap6sl9jTfgtWGC0QI+MUnfrzFMxjHa3/AkvcW+Z3AL45QPm+JU653vATHLBw
+55I+Uo/DFNsSlooYGG82Ic8nQ7XWcKSPcmg13Gqm77QHTln7k7CY5LtQdjqS
+zO/3+ZXUx7ljb3oT/lp6rjiZ5PW6WUTub9Skr8UZuHDBt8sayK/Y0rc8AQ5I
+eR/kDxsOvB5IJPvvdrAqh89mNHakw30vVeen4Wuq1Bg5ry/ANs8K/a3qzpj/
+g8w337r2NKx9u82f5C9kyq6ug3cphez/RuqvqmS/hUPSfLpVTXG/Jh53LMJz
+c6Tx8iJrOEBbtlwZXlP29fhheE9DY7A67G39fTbdlLwvmm5VhO1vT764C+u9
+CZkn7zVq/yZ3DcDMLjm1QXhxvFvTDGwRFVlUAVcahTcqmOF7WJMnHgvLrUxY
+oQ/rDXnLbIODuKyDFrCE/XAjA2b9tfMXCtYY+3FtP+oVry47yIY9yq6682Dt
+7wblW2BOXLL4KbiyuICxjqx3cEo5ADeEeR9eDceq6f9nB6c3ab5aTs437U+y
+ghfP7q+RgHmbBrTIuPeg48avJL+8+Qvy3rjG9lXbG1JfvbJ6DPl7pR5X3gdL
+lPAelMKr8N7dAdM69b++gX3Zu5Rb4b7b4bF6yL/IxiW4BaZMNlUEwTuihRVP
+YFacdMFd+DvXSofsV/s6x0Ic/XyrY9j6juynG3VsG5zU9W77AuRj8pq4SbCK
+YG65GsyPb8qsh1981/a0hGsnVtV9gN3OOSj6wFPZsmZL8N5i9rsCPZnUa79h
+TJW8ty3hDFfAo9xTKZpw6E+lzv1wWt+0tRI8S/4fg6wnn6uo/wPv2Bb8
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.502886362674069, 4.972562773393563}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwl1gs4lGkbB/DRN0kqTTk02tmJIlOpUEkO9Va0oxymkSUmjRArNGVrbfQ1
+4nOISq1Escl5Zm05pEbJYRsbkUaIYjOWighJPruLvv9zfXNdrvf6Xe97P899
+38/9ztA/dJTvN4tGo2Xhj1z//zGhaHRyNaBojIm8RStgVvx0X98KiiZsany8
+E87s9bpQCcse5fwjhCNCvOTn4UKb0sIf4dTnnjUusOBI1bzzsGD0mMFiuGJQ
+GnUNNtCv7n6ynKL5tjVV3YStxZwVYpgTl3o7Cy4qPmK7EZbLt8ZmwLY++bkD
++hRN6RD78DLM9XS6ngWP+pepRpH1z93le8Pusg6Ho3AXw+W+EdwVrsh1h4dq
+MoL+q0fRTPxE31BwjnXKz80wI4d7yojke+LK4nuwLOFmwkJSv+VsRgHMG4z9
+96f1WP+ZqzAHFtq5RDXB/dn8vb/AajXu5iWwbVhFxQM4M/eMfSas90+bVivM
+rfWeToOth/afGCM+e0OT3Oc80ZdpIT8TnZ9/J/F3Wq8nWsDi5eqPm+HUaMYl
+T5hRtGXbFFxXlx0UDid6GoQwkZ9ox0T/FTg6YNewOWxc5KQugTmW3pdIveM3
+dhqWwpTtpZUR8FTe5GgJbGBZ4p9J4qVGV/JhtcPcOXLSv3RBaRJccPx+5Rs4
+OnomMASedKQEdFOKxhT/5bYdNh4bfsaGOSuZieqwbxx/80a49f2+qAbUl6jN
+fLcTTl+frRkDizUOHHeErR173K3hvp59t3nw5NMMq55lyDN3UTm5z3urGrMb
+jjgsGLYl9vtgX86maGGlkg/mcEFdMN0MLpJ+e8EAdu9prJV9jbyOhLVrwB2e
+urP3wvTArPEJ5G9S4nZqmoV5FLBXvYZlrDZaNWzho/9bLdwx0nc2DR5dfkXt
+Nhz2pW8kHrbVYGy4DgsjPlsnwfK5Ke4JZD0dgUgK16mW+IphZb/2vTY4Ojhw
+QTgc11wYpYH9G4dONxAnvfxyhwcr3W3azsLUY7dHV2FZlSUrCVZb1/XxNdw/
+9tYxGxbHOp7VR32UQqf9Adw/9KzfA07ttX/fQfJnX5qOgaeGg+P+guvy1qzO
+YpP5q0pgoX7h6vYkCVwo5d+hYPHJ8jXX4ehXZWW+cHWeSu8J2EKy3C4WDnDp
+TN0Cm9DSjPKJi++ufod81B44b3tE+m/T7i+Gg9a/vfoKrnt7cXoO7JvWLBoi
+65fQPSJR/1BIst0kzD1fHDP6FUXbV+vXMk3OYylvaj/M/aTOIraonzn221KK
+prVT7jdBnt9WJVkH82IcLd7DlNEZ62xdnDNf0+0leX5Fr78BHGbTJZOTebOb
+7C5jYr/t20//SuqNrM3zgOVBAcpkuMjs5KAWzByIXRtBns+KGnuzhKIpGuVF
+pH4Tq545TXDH33MkznBcU014I0w1+1huJfnImNJuuF/vhrcpia+Inj8b66UL
+gwdWkX7MKF23wA7l9d4cePSgc0oYXLipRXct6a/ZhsOVsFA9mGVB6kn8RkcV
++edUP15vT+Ifyv/cDSv3drQfhPuHDxvFwfS9WZ7hJH4J+3I5PP/YV0+vkf27
+bPidcJeAr/mQ3O9cteM97KAfOKEk+b6/O7cPrg58ZzzbDHOyqn7zY7jVv/I7
+DhyWpsP/CWYpYwPtYeFB71dcuOLbHbP94QLzUe4A8uVOqG0SwzxO5NRJONl1
+k2Eyud/pp/cZ/dgYcNwyC2ZE9sX7ww5+B3SlcNIHtwvPddBPTpD0F5j2oqPF
+Eo72H16aD9c1nGDnaiPuHrszHVYuM2TpwEkX3NPOw0UJEtPLWvheyMi3PEXi
+e6/u/hpuVKg0+5B8suJv3ddE/3pTLu6BLfyc/wiC1czLHprBmcWS0E2wA6el
+YCnM5BfrasMBZ1xT6CS/8lvh8+Ap41tlH8n3BfOW4xKYmnVEs5fMe3XBfnPY
+OKnmPJk3PSPJVT/itdoNbeR59p9ON+FE8WuzDlgk4G19Q/af2D5A+l+3ZU2D
+MfKVm//n6QjMMFq9IRSmvv8+nOyv+OFUdSkscihwZpP8I9dND8CphadDrGHu
+pfHeRdrkPQp9eoDUI1WZz4FHveK3RpLzYvKaVsE5OstO55L45GuHtOEwr2dW
+9bDs1Ysxsl6HNN9skPTL2SMnHw76bLhWfQPy3G2b4gwrdh1aYgjzVLe19SJ/
+sU/rXCu4v51l5w/LP2502QPrOe+K/GMx5m2JhtgVHj3FL9sNF70sOLgfVm4O
+O1q6CL9TLvqqbjCj/EkIC7bQSmhwgt29vI+eY2D/8XXc7XBHxM0JFbgxfp7T
+erjaoHKnxkKch013ty7ZT6t7zFID7yWdvXIWrFCYJl9cgOv+PYcGUI+JOn0B
+A77TsKNHQeZD2eNTOR/7dNI/lJP+jJyWXoPTPbIrSX948vGpLFg0+lZ0hfRz
+5HhKCxwQt208nsTPeP69EutZ2EfRo83IeZuapMCtI4N6xElu0oW6yKfwgyTm
+HCz69VFaHpweyl13lczrlnGPTcg/tWumQULiq7yeP4BlM4PPa8j7sqshiIl6
+DQyY4a/hyQE7+i641XCqfgYOWHFLzQdOyjbJ0Ee9wlCNuCBYVKe4a0f643rN
+Twhrhc5t+I7cnyUX2cBD1dSFRJj5wub4v2CByOpRIUzFFgsOY//MtFxuPTkv
+lT3l6ciX1hNo2AMX8f1X30Z9NCu3nz6R9Y/+EJCDfgxpJc6hbUS8fUtg9Dys
+FxBsoQorlpcy3NUx/4O1esTKCttqzlyc1xd8yHmT/wfVqP8BWpudvQ==
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.57964504524893, 4.283992682631731}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwl1g041NkeB/AxtxUKs0iIjCivSUxCrcZL5KUoTDbqqiyjuEaJiUIScsUo
+yYZ2vFRTVFLKSlJUREVYE2rH646yGkIKu/d79s7zeL7Px5n///z+v3POH519
+4Tt+olIolAr8kPz/ZzmTYkBShUlJGKGvfazFpBwbVbE9B7fKtawugN03R3mZ
+LcF4mYidA89V/3K5jbhkhegG3HpoYn+EKhyUrTgAm4WPtMkuZVLq2hfNWOD+
+MhXbeOfh8qs3rApgvbGmPkU1XDcna6Ohjfkk/n9EwgGsO+zLcKRuU9tj2FfO
+3FaTjvkPB383BXMVlAOD4Owd10wV1JkUWl/t8xuwVfsPTsR1RSamn+CkkStJ
+X/B9/v5agb4Ok7Ig9v3mlzDv2dVqb5huFPX+HCwTKeBGkvF2n0BPUs/QqcJT
+sMr67jAZMp61+GYK7H8688Vj1M/jtHTFkPE8FetEWCS/QTUANlvTpeUBc5P/
+rWQNe09ss10NCwsvfy8DJ9joJtFhtY4h4WvUJxyzbzaG2eHKp8/BAdUHHnrC
+VSyvaBbcOPyhJhNuNeFSyfPT19b8/geZv3RB6yv0J91Dd5ZF+jXIWxcNM/s8
+Hr1VI+t3y8YSriu40HcQ/Qgw6a1XhPMnLbxkNJgUibbjfmlY6NV44hpMi55d
+vwxmDB+95LIM99Eo+30rPOkmL+6HJXHHY/Nhycudk+GaTIrgt68DUqjHbODH
+qY9wVbxr8SZYwuBN78C6i/wKHyTB5cMHFYtgmjpD8RU8WBqW2gV77mG6qpH+
+M+XGJ2DmhTh50j92tN3KKdiXqq9eRNYjqdBeBHOZgVE9sFqbw5n7sKBtRYHs
+Cialw1HLKR4Wsv2yjWDRg3uRG2Hx4Y2LfoC9W6hXJ1EfT2sihAknRJ68foPU
+P2j5lgE3rHS2D4Nndrozl8Hl4aHvrODUZ0espzCfXnHH9iWwpDRlvgE28OJe
+koYbvXnOZ+DGuPAqRZg5RzXfTiy9/idzuJyro6gCd1Sq6JF+0T0KbN/i+QXN
+1fpPYY4gnVoCq2gdDzBHvQa7hD7RpF91OTl3YLX/rnvmAzuyzM854pyo7eR5
+2cHe4UYsEcyPSGFtgA0kHT4nyLrn2YY7wiWtnf00ZK7d/uP+xFKrJLuRFIum
+wkSkzb0MtctIbn2aSyX5vdfM6ABZN/vl9hPIBS2ZbLIuag4BnZbIoMrTcnZk
+XYpNRuOR4p89RvyRMvda1r1AbulfUXsQKdrksEMJ/TurUigOI78v2TXvDV+h
+zocEkuupnlaZ8EaOkdATrutdyKmFTaP5LutgmuFQgYisF7vShvTNU4e/dxKW
++IrDJKiLH9Ou9BUumS1rbIF93QOaxuCxshjTMph9+wf/32CblCm/LNJnZj3r
+Nlw7KN0QB4tbpgdPwIcoRZwoWC1MeN8Vni55Ij5KzqFYfkAB7vcb10yDPW2K
+K9vIeS3Z7HeVXH+5IzOH1LUv3q2NfL9j7j7Zr5wHIZ+lkTPcFjMLZJKMZ70T
++V6l6CwNaXJq+FoGuc+loo/fcJ2/2zXTXlhSr1r8mdRxdG+WCebl638MmSXr
+EWH75zG4qllgpkSus6rf/QIWbj5qsB5eHFSuq6SLfRIR9ZJN5ldXbtwOt6ZQ
+vpXAFVq/bkiBKSW61BGYF8wdL4fpQzc71+I+7j9+G38JCydc9Mk81xkK4new
+r0pOTgP8rWZIrw+mOdv1LET+xZbOFyI9e4bG7JGaibpdT5FVGXyLw0j+s2P9
+15E8vYjzOciNp2rM05Bqcw9KSpHJH4tOBSHFzy4KbiPTtio8IvfJ/VNJIECy
+PJY36CAFFjUhWcjIF84saWQqtTckDOk9tEYygbrMgg8/t4XvaihcGYG3rFlr
+KAN3yBgsGiXneo6f14IMmK3SmiUOczpA9lvosc02S0k/WNlTXrD06zlVJmy1
+VpiiRfbLrf3PI+G6Q5uMP5F109NovEP6GaFwshl+0bZKaZb0gzpz7S78RP8N
+Y4se6uE4LC2Da0efR+bC/IdL0yvI9+UnxsRw6pdu2UbYqMvjoeVK8n6jv/kI
+axh/XhYP0x/rczQxf6u1W/ojuFGD07yT7E/R18kpMj4UbZ8HC74rqKGvQr7f
+2jIAR4nWvbeFPf1ctU1Jn54YTnvAqSypnig4+46lszfMd2DdqSbro6h13x1O
+WJJ+cRou22ZYbwPzZK3F+qjT/5VZGLk/9/TqWHd4VeWkDgWmjRd07INN5M0v
+9q4kfWUYH4BVRCP3q2Duo2VHyLhEOX/vBTK+J5pNrufdc9kdCwtUWYcMYVdl
+1dXBcB0rvoT0scbC5ZM/bJWlkEf2UfJeN4c9sIRp6Ef2jdH8OCOU+ATXZCvM
+ubJyTQqckLg9/HvyPIz06ZuwTHxRRDf6wZ2PKeuHzYRNjqXwcNDibvI8YueI
+nGTyPpluTgwm/eoJyPgPzGMssr0L10n9VREI087n+yzQx3l439kZAmuGh4q9
+YYm/sWwc7Blnq1hMxv0UfuHDGU+rpUZhGm+heStckSuxXm2AurZ8uCdH9pV2
+WnYgzEkU55D6aydVQnkwxTm/9TycfuRfN2/BtKyA5SL4Jn+X+DGc6kCjk35Z
+mu/xeA4LTqgmh8EVUp+r62Bf2dIN1+HBs2/z/rl+QDujF47scx05D7ducvOg
+og/Dqf0Lo2BJE2tcHc4vVy3dAc+MZl1cAXfvqq8wNSB/51zNNOG05ARpeVK/
+to7vQjj3aA5HgucLyGgKH8L9NRzYMT0we74gtgrOeK3u3gozY4YWn4TzH8pn
+EfNpKjrkXPSf/HnfO5h37sqsHNwQ+7f1F5i+K2HuFVn/d3s/aGE+9pd3kRfI
+uXKaK/KE68yox4PhuPGUr2fgqm2/ttjBiTVOc+2wVcv1XAMy7vDalW6I+fUZ
+UVpkPxjuYXBgNTOGM3mPyIkMu+tgg55GUwY5D11Ub0Uj8v9kZqYPfCA6tNMX
+zi0/ppxE3mtUn7aL8JY3H2oekveQRolGO/zPB/UrkTRm/g8iD+gn
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.867783472564531, 9.687357802186902}, \
+{1, 0}], LineBox[{{16., 17.00000000000231}, {16., 9.999999999998607}}], 
+        PolygonBox[{{16., 14.1}, {15.6, 12.9}, {16.4, 12.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.9452, 13.5}, {-1, 0}], 
+        LineBox[{{16.000000000007276`, 17.000000000003638`}, {
+         10.000000000005457`, 13.5}}], 
+        PolygonBox[{{12.48173265946094, 14.947677384685548`}, {
+         13.316718930329426`, 15.897834175673825`}, {13.719815750748694`, 
+         15.206811054955079`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.823799910437668, 15.984057296392571}, \
+{1, -1}], 
+        LineBox[{{16., 9.999999999996362}, {10.000000000001819`, 
+         13.499999999996362`}}], 
+        PolygonBox[{{13.51826734053906, 11.447677384685548`}, {
+         12.683281069670574`, 12.397834175673825`}, {12.280184249251306`, 
+         11.706811054955079`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.823799910437668, 11.015942703607429}, \
+{1, 1}], 
+        {PointSize[0.04], PointBox[{16., 17.}], PointBox[{16., 10.}], 
+         PointBox[{10., 13.5}], PointBox[{7.5, 5.}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T4", " ", "P1", " ", "N7"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbf/cgdfeh/ifghgihi.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbf/cgdfeh/ifghgihi.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {0, 0}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwd1gs0VGsbB/BNqiFFSVFoCA0mDVHqqBlS6WoqNJxC5dZ9KjoKoYhKRe66
+jVBKZahVyGU4XYg0J5RqymCKk2QizhTx/d/PWq1Zv9n7fd7n+e93k+H2/Rv9
+lCmKGsI/8kkpRvGjz6FoBFM5VM2O32p74GLbig4TuOUyv+GjHofiaXRm7YA1
+Fc8stsKRTu22xbCdIPtE90xcF4ZdNtTmUOJ3C2LOwnbPFvZegnUW/Tl2Bay4
+f+2o6TQOxX+u1zqN3H/Y7XsJXKOq30rB1KKnqRunY7+qwtIxcIvlp6BuWJBr
+pGUA07UWJEXooN7Jtuh1pJ7hGEs1XfT5Qav6HBwY6NR9EvaJXfHwA1k/Q67W
+B9ck3Cu2Rb/yVxcTnGdwqPRPRg8SYYZylm8cHMIzOfQVDrR32y2Ei30XVXEw
+v8LELVEES4c3lZyCI8d61pfArAfr+6phKZWoeQUWrG4t7IJ9Ar8s5sM6tj+1
+FbBz3obv82HN/Q02vTBnk+XRHvRD36tu/YLU39gbn0X6l+x0vgALz97Vd4MZ
+rJnP2LD8nZXpRF3Sx+oxLejPLiF/XwPmF2+3WuoFFyuu8i7DLRZDka8xb2T0
+krvh5PqX/v3LSR5uTiEHYcFhpelkrhazDRJy3VmeWTgTFmUoj82CRSYF/LPY
+p4uprC0h9TJGOCRXxt9RJpb4lEfvTE4l33sv5abAwlOJrAUwbWHG40moE9jY
+r/IVz4n7l+RzKpwXsE6tlDy3WdwQM/TR5XifmQXnzdv2tIo8xxc8B2KfnoaP
+npiDm7KNVgLbLct82gvTLtYv/kzqPXMtDCXnsPpRtgmZS2vngl8wpaXldIjM
+IVE/HmCA7wslx57D6ZnlESI4wTxmrSn6TE/hDyvPQv5XHxyMgrmrhirmEm/z
+r3hN5qvLTeHAfMeEJYbkuY5yefaw8wODw1tgmoZuqxGct/tKWjQsZkl6Bsl+
+Qym5ZE6pJE67DOaNv52eANs1x8YfhjVNmcEHSL6DilFzWPhL7raIrN9T6/0R
+/Wv6LN79L3muxh03Usi5iQ/rOUHOQXVznhuZ16dURZ08jx3er4xggVFYbgzm
+446aKiuRc2ja6TuAfAKb63j95Fwc+LDcB053mTN9GE5/5RFVh/eKW7EsRg/3
+c2kH19rD4qsGMldS/+XxKw/xXtboNO/KIefYivbLAaa7e7qoot/AdycXt+K9
+5jE2v4uEWcx7Oy+Q9/6HW8x45CENKLq8FdYJ7zbMgFn0njYHuOnM1GgdOvYp
+CbJgw5xuMxM/uIUK93CFmV/EAwUw7YTMIYKsz2s4MwjLHTm1ZXDQ3I78BYbI
+Y5P3WFXye6Th/PZ9cGDS00BvWN1cpHsJVpg6DJTC6WF+typgfsWmQ9Mwn/Ns
+h53NMDfX/PYeOOcs11IKF7MjsovJ/JFx7q1wnE1fwwD8+FJ9ZSMs/u+QM52c
+x0GXSlJPwY//aQMzT9VOuQbThFnlVnBOEv1FBLmeUnVEG46fG8D2hAW3PzOk
+qDfV36h1PiylsyQXYF+r3+Ya5P7dagXz4D1a2ue/YV5WZ11BCfqPVpm6ugkW
+JtWU28D8lY6u1TDPwc0rF3nkWeauKiX5tKWe1oRdVQ145bCga3VIqBbOhxbX
+uh6Wxvd4d0/Bfvat4zuJ2SJHP1iq53ViIvanL7a51zOZQ9VvVm5YSuYvNLoW
+B+stHUw/YkjqjJ+/CA60lFqUwaJ2wwwlmE8f+UvFCH00jx9t10ReMmoeF46b
+fOfIB1jYnye5BLNiwsbL4T1TacpdMD0q5qIO1v8YsLOaNxu5Wi6zcYVb/uEx
++DAVR/2+AsuS077kwdIzfiE/YKcdzq/fwF2prkUuZJ6Hvx8MwbzKnsP5sL1b
+1ystY3jINV4Z89t9lfXNguP4JV9d4GLHVl86HJmvO3IOZqbzFdowp8njySNY
+2PJxQAnu0gye0gjrnZRqfEZ9QUdr9itYxfZv7mNigyR2CVyW9WTMVdJ/+U3R
+SS3yd0VwMQTm3/ilYw8zhLy0TTA9+dKK9+hPJI71tybrnWqWBMBiscv66TCH
+M6mmA/NR7cZcFZiWv8bTDQ4LPak1hLyKT7E6RMhvy/srjcOwwCss2QLW2Zey
+QQ33i15kbbTVwFyuzPrZMCt7Ac90EurvGvfbGZbPsw6fPxHzOt+feQTWrK+v
+91XH++Dv/7kI5l7OFokmoP+GjoIfsPBZnWINvFbV/KA98pAbHqCpwny7Tlks
+rPnsDw+FGqnflNoEJ2SVmurgep77axrdBPc1jr3gC28ZflAbAEsTK+rfwHFW
+Tok3yXWzcx67sP9jea5HByz86e6thf6SbRuDtUzRT+zRCbWwYiUzxw4WH5CP
+RGIedds9ehthAedgFUuDnB/3dG84UlZm2wA7WTx230ac8k2FQfJqkenw4HQf
+V43NsHFou+5yUv9tv5wPC47YKJmTesbZaw7Ba4OXiWlwnPmhp1tgTSPTetKf
+IixHby4cFLXPtxymNi53eI798qhZOulkvge1fhPh+BP9HodhlszK0wz9tiis
+gj1hzZej0SaYh+/OClpB1r+7f0cN8/uOyVe1J3lEe15sR557UjvDiaXf+m88
+VMX5KggWOJN68vh1yTT8PySEWekDC161Fx4fjzz0aq9Fw5zyItv4cfh+eFPi
+PXK9PlG9ZCzO8Qxr96+waGNTmwacPvGUy1zMx5eFnEtR4VDDuT6RQSRf2fqO
+tXBgdvH1SpjuVXBqAfxDdslVfQ7OxcjsYS7MWGM4gQeL29alpcNOvrruApiu
+z60ej/qRA5s722HOsWFmGvy1dqVQnwFP0zBciv64N6sU62Eq6Ht7H5xHNzoY
+DAsmv9LPxzzy8LrlCbBI2dt9C+Z1/uOQwVWYft7Me5j4baPFNVh6+HptFPKJ
+35xJz4Q1s2XrZbCN33XzOFi+nW+hjzxDVvV/2gv7/Buwaw45r0Wlq9fB4oBI
+PQruOpGWxiD93coIuY71xlMv2imT+0cOy2bCNQ47b0swjzzL/tMO7H87Pyaw
+FBZkblWcQL/R4WMrLsORk/PdT2Ae2UhTZRzM6mDk7ML8ZffuWoSTvM7SE5Yh
+L7HmY/cwOOFG5k6dMcj37TeDWHLdvOt2vxLOa5dGG6lHrbI+30oh79RxwSJY
+WvjHjLpRNsV6uXfeN1h09L2y3gib4iZO+NeE5OOyL6FymE0ZswUT/Mk8/l6f
+KofYFOPP2OzbJE+9av3Z8HCuX/B/JP+F4RO6f7Ep9bP905zM0P9bVSNtXKe5
+iFUTYGlP7YVMeGrR/DctsM/n3HQ+6lMXV1vomaP+3YLeuN9squzWpN7NsMg7
+7dAr9OOqctT7NLESrVcP/X/9R9uwCBZq89c3wzn5ai4NML3X7H0s5r3fOyHm
+IyxfoOVhrow8rYUd7f9f77f0HhwoGqchIZ6aoT8DecnHHJ1TZ05+3/xU5sE2
+devKC2Gf5BdVAbCeiVNlIhyZVDt3BRy02sxvL9m/zHlpH+oFHbWZvpLsn/RU
+dy8slq7fZEj2b5yhWop+mL8DE0cwL+eGyqaP6DcwfTKjDRakWo+pRv7cy8es
+62A6i81IwfzDjowjFTA1FOywCnkpYn5tLYNFvYrGPgWbqmH+rH9C1pv3vL0+
+iHyWKFm/J/d7nX575AebkvfqBg2TfI8wlSL68Dy8Tw0ySH/H12x8JmdTa9Wz
+rnqTeeqsaqu+san4h4OyKySPO90Xbn9FPzlREhnxHIO5W7rZVI7Sxw3zLFCf
+tn9R8xc2JVR6/jEUjjT0uqSF6zbb6sfWEEd03lLDeuc5knWTmVi/cunD3B42
+Fe3xeqsbzGk/PljTy6a25CdMuwD7dJR5mn1nU3GPAm49gaWcvQHn0K/o+LLC
+bzCdE2o22o88fs63U5+LemrmN/wH2NQeuaJOH6ZPql4nxPzcA9Sx2bBP1Uhz
+zX/IKyqng1wXvZw+4yry4v0t1JhEnGjQZPyTTQna/jo5QPafzLd3gWt+DzNf
+k/1XeUVNJ67tnl9E/KRtSijWx511Hj1D7rdXrwxF/celnyb4k/mqqCuzsL9m
+xJNGR3K/r0sDH/lLXmcUGcPUpGsq4ZjHlZ9cNxEW/Ezrd0X+jzk3v48iL5Fl
+g/F05FV8ZU3SMMnPMS15VyebCmLE3lIheY3Uz2lox/u2w6RIh9QrDln0WoL3
+8RNPYAdHuvF3ipuQT5hZ5w5yPbRwmqAOz7/60tEM4kcdnfoivG8F7pI3xGWz
+ftTcwfPsYzFJPhRX4zTvLPZL1VwSQCwYtV8YVEnlWU+5c4+Y/CSUUyrk05Lz
+P4Clt9A=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.1148, 9.674800000000001}, {1, 1}], 
+        LineBox[CompressedData["
+1:eJw9lglQVFcWhttmkwg08F73Q5QlEhgkstgYAZF5Z3ASFBEQo4IK1coqBEFF
+NpE0AsqA7IM6EEOjAyIYNtkUhBaEFIvQamQUrQpoQkBBGmURWZz7ku7bVV1d
+X73X955z7zn/fz4/Eubhz2axWJfQl/mdevsJffSA9eeHhKvG2prLyYirwnpf
+5BPwbrdxEX9hLbCEa8edXQiwcO76ZqMfYsPyr010CKj5kGD2t841wBqCE8ss
+9H78Gel/TBBn6aTMqhAQW7/DcV2aLlov5kH9BgJ6LyoEG8+vRutprDweSoDd
+wSMR2acQhx/kz3USwPpR1apQEbFVSsyrTSR8dAzkXbmhAyxN/oX+ahIOdA/f
+7ghALNh79rINFxK5xe1GDojdp1VutnIh63joUNIGxELJpwPbeFB4MY+Os0Y8
+NJNh3swDnmdvYoQbYtG34Zu+oEDtUL+jJA6xISdnTyQF2qmSWKqB4WqPsxUU
+pF6vu2c5z7zPsVnuoqBiF/HdDw4oPlZFQejPFIzGLiW3xyPW7P1JWkJB7GSu
+/aYGJv4/BgyCKUgX6zu8GUY8dL5ijqDAIm+kPfsjYsnOY7dKedBmpmVYu8Tw
+q9ZL5jxIC+n+fGIUsSAgoaqUC3b8XHvFJoZdxEmGXHh7c+XLxZPM/jkl9wtI
+sM6qCeBxEYs6D88YknA7VejaLELxSuONDeoJcPYR/xGoy+S/zz1BgO5j2zdX
+Is5RaL3GUPcvCDjdU/Tl2BgPnVedR4IiARl5hUdtnRFbRU5eYxNgY9rcuniT
+i943u9GvT0CCeP9P1RRiUbf11f0ELNUbPT6WSaL1DT66lxFQ/4+Fkes6iN2X
+bXu1SYifdmmYRnGw4CXxLo2EkL6jy6++Qyw0MezncKH+bJzDc3vEkpYtY5e4
+kBpbx1dCcbGGtBay9Hjw4gav041hYUbbV/k8WN/VnhyzBbFgzqlRhYKuWFMV
+C1/EorKsBgEFdTvpny1R3bLE/lm/iCgoJXVOpw8i1qzRG7tPwe40X/6QPorP
+MDbFsoeChce+dOZhxKyjw563KGjSjs7kXWGebx7MiqfA6u1LlksvYsl6jTBL
+Cn4tNnUTvUZc1RQy0MUDjklkgOc0k2+V530PHiRB2a7mEeY8cme1JFxQXz3r
+aSdGLB4qMNvOBXvvgNlTQsTwWq/pHgmibl/dfaaINY1fem8j4VyKCyG9zeS/
+dsDpMQH/qkp0O2HL5LPzyMdIAnTnnvssXNdG/VVgvswnIP29xDhAHbH4R52y
+z9B9HFfqUzumhdZfcJj/pA0prQERyf2a6LwurDxBENAniPrtoA1i997LBv8k
+oPKmRvmlvRyUT1HvlUwCnPg+VsuHNND+Jh427whQzHEeLr6gjvpz0pkMJGFx
+tuiT62s1pl43RY2SMPmU3BoVg1jqrqsUzoWkvqFBc3vEQqUz3DkuBFqtD1W2
+YN534ihH8YC0zm43c0U89FAvA9XdRhf25rQ8xCJejvoOCtaFVf9qtojYsLL8
+cRYFceOPOEnRaP+q1R+87lIw9gujV4ilA9fCeynYd3eD9PR5Dfy8eour4RMF
+Dv5/kfdSV0QwB6/fEnls65NqDt4/JGYgZ/4hB8fn9lzf+NF9Do7/N8nr9pRz
+HJzfQI03q5rLwfn3U3X6B05q4PNJiyrqX3FNHZ+f0ZL026AyNXy+m0c1bbZn
+r8Lnf8+MT80IPsP387Rj2nfESBXfX0Obd6317yr4fgubnBxVq5Tx/Yu3fxCs
+yVTC9dFxOeCZwQVFXD+5pG3PnkoFXF+HJvkE+YmN6+92FOGa/j0b12e3abnf
+eT4b12+tN2HtRrFxfZM+FYdbzdi4/iMe2C0HBrJxf/gkcYYfdbBx/7xYYZsw
+vFUB9xc/17aAblPA/Zco7Ff93VkR92eQdsJxUY8i7l/H2oqpa3ZKuL+FVPS0
+WpoS7n/dfY9OChqUsD6Ia/+dP8OwTD8C/6ucvCNFCevLotoGBVsTJaw/A2L/
+bF6OItanIBNVflWfAtavZ/aNXuuG2VjfJKbuxT9IVmD98/c6L1QuYWF9DFsS
+eun/b5mW62eDcfTug56LtFxf73w9kmo+Mk/L9TducEkguDhHy/VZbLrUoXFm
+hpbr91Ptr/xLyt/Tcn0fL3wRpWb1jpbrf1tqjdYkMUXL/SG2+En0zkNSWu4f
+otI731uqIpb5y/iyn7SRy/Bf/hOxO2nVnmjEMn9qyavUsjRC68n8SzlIdXRK
+Ee0n87fgvbfcMlRRPDL/i68znYc107TcH32+vEteNULxy/wz8tW96Ra1WVru
+r67vH0jN2xDL/Ld0Y9kKDp/J/y9/9kvfET++C7HMv/OXgqfCVyGW+fvfzaJ1
+xvzQ/2X+3+J0pCTNC+0nmw9MyEE6cQLFJ5sfxCOnLO6sR/HL5ouID9L9wWtQ
+vrL5I+J91cREyRtaPp+IK7XjrHpGaPn80ugxVd7ZN0zL55uq8qDcN83PaPn8
+E25ZOvHERULL5yPxw5CF08IWWj4/MVOVUCX/rny++j9tFrxA
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.75, 4.0548}, {0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000001556`, 17.}, {16.000000000002885`, 17.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18., 17.6952}, {0, -1}], 
+        LineBox[CompressedData["
+1:eJwV2Hk81PkfB/CJbRLR5JzkLFeuxlGr09eEVY5GK12Sm9VhEJGEqFiRYoVc
+STX5ReNc2bZEjig7OWJlmZRSW9skJMTv9emfeTwfn+v1fj8+Y77fNL2CdvqK
+0Wg0mQU0GvmkTc3jnypFE5FPOYoW0Xp+iaManDpyPUmeoqlkb1Yqh1nXW39e
+qEDRAr62nlmtTtEKezYyjsL1zb+0VsDUsp6mB3BVnQdbSwPzE/Yc+wqL1muO
+hMCx1f0ucooU7eTlnhsNsChc55MsnG/v1c3QxH4VPupkvvts+dN9cNrgQ6kG
+uDmMo50Pc9pTJI/DGoxrf/aR8RzpE8owR+A+LLES+8++Si5HXlNxyQNGMMc1
+ic6GL728FG8Dcxc3zT9DfcVqDpQznKZ3JN0f7qv9JEvMTR7MloBbbXIlbWGG
+c5FnnSxFm7ZXuGsCe/hdCIqDP2gL1RVh/qEAO0/YJ1MjawJ5hBIJtm7wFLW7
+phOu7z4ZHQrfLt1lwIe5hptLb8CBsv9cS4Njb4rZjMOyG4/wwmHWoHn4Xpzf
+0NZ8ygcWTBq6dsLDTy7IuJH5rbul96Ge24t82txJ/Y+ilv0Lz57wzT9C+tfo
+GxCDfvS7q48kkv3y+z8x0F/RiJU3OV/jn0M3s2HOhcDtr8h8Yc2UnBLm9/ay
+NVCPRilv+gQ8VZAe5Uv6w8m93QYLMp3r+bDgj2QdGpOitWlOp8+T/hyWubcc
+5nVdddqxiqLRtGMZSrDt5oTNeTDV5bbiG9b78GMb38CC2VyVBtgj5WLEai3s
+/yU/LgzmGzfaesMC81d/KME3eh3jL8Ee2ilSZcjLqC8Wq4HrywypLXArK0nn
+KbFeW0gHuS8NESO9MG3u1D0feF+zavtzWNgu85EOV4zd+9wGa0SPW9ehX1qF
+n8arYRbDaF08rHFw+2A2HHuo1tgXHsvqWxJJ8hX/HOQFT06nM12JZ9xEUbDP
+LeNKM5gbrOtK7pvd4Zvn5Mm45fYJGs7bVG6kPEP6saP2jT/5fhT13noHe8iX
+6Q/DDUOZCsOkH0+e9QWing8J5U0jsHDv1v2zcIPEXzkTMMOtpzwN/Zj28321
+jOzfY1unif6u9KDv2QAzNjNP3ILL7t9VO0r6tTPeb+Vy+NKmnv/B1Gazm+fg
+tlUlVz/DhaHZnB741y9Ndpu1keueRrqEMkU7at5vdx4W5Sz8Rx126Hvz9QUZ
+X7fpozJc5V19bbUO6pmNeT6N9aljThUhcOFn/7GHsNt+x4dVsChsRVMozHRJ
+bfgIe9jPdsrD900+yavoYj+GdWAJyfv07eUtsGi3lvcGeN8c864LzPgz8G9y
+306KDKLcyXz7qWFP2EWTH+YGUyfjbBfC+qJvT3cQB0usqyN/P/7avXoDMc2V
+cYbcF0XrbFWyX4Wn4S9wd17c6VmS30qzPAB28XOK/ZvkExRFJcBsLt3mdzjN
++Jb8Pbht6E5kFsz5ZlsjjfNyiifzYsh6k7We4bBeB/P9UVhY8Jo2Rr4/F4zM
+A+BYr6zcKNTj0ibRf5isl9yYLo369fOb+NFkvEJt6Cr8w5X70zkwNRHhbor+
+Ui2HfR7BGmdNVe/CxRk/S3wj8xdcymWtoGjPu9sif0Q9aQxvhQy487XW82jY
+wyS6fAgejvF68RgWrJy4y1CBi7zEl+uh/oNPfteGee22RQFwfU3GGTV42iqP
+XgPTAsycZ7E+4PHT7DmY8ilLeQiLqbHnLVdj/86ynmDYTqqLFQEztFTql8EV
+dK3L12F+dj/vBvK+92xVaYFFL2256+AfpB02DsAaX46bt6De/Nj4BSPE4lcW
+HYRPOvTKDsOUqfCGOPxGM6Ogm+x/xH9tHfpXtzTX9T7Zv+Tw3FnYdaW281VY
+aH3F6gjsMxPxLYbk+2dCKgjuG3v90Q2mDeqpp8B+TIuXG2DBBu5oMywY3HZC
+hZzfFX1OGed1fllq/gM5nys9kgC/Nm+0HEf9HkOKfQuQP0ItKvA/WDQ8uPs8
+8eXoRWS8fuh8rRrqz0+0Ey4keVIPf6qAR18oGGiRvOduvGCjv0XJDolOMCvp
+h7RWOGfyOz2BnJexLWcLfme1KtazGuG03gbrQngq7Q5TUh85m2c63sFVEe3H
+XWGhzfscJn53c8+ZN16H+TkhDgawjLKP4wRMcVr+1oR3Tr/yZRvgvl0bSv6O
+9QmGdyJ/hfndc//Vw3Pb15i2G5B7Rq8Kgq2dPC+KGSJf6qIEGZiS/2vxGph2
+YFVrEfJe2r/54g7ijsAAU3iuxajUGxYqNSQ0ol7zwfyIQ3AsV9fADWb82FTk
+D3ONOmXE4E0FT/32woxHl7fWoX+nT0tFs+E0LQEtCRZN2NC1yX6xWUeDYdlt
+KiHiMKfieUwYnDFe7Skkeaea+n+DZazUEu/DgjGdZ8/gXJnWpELiGm6ALs4b
+96kfSIQ1ggqD02GOv8z/ImHG+qQ7y5D/ie312mMwK7F3cR68b/FKpyi4/pJX
+2xrUbxG4a3Uq6d/69y8b4ZJAl2OlcKE33eRn9JebG9XYB4vU+p/1wktORCsv
+RV6+m9xBBzz3uK6xnHKCC4OF5rfhEvmJgExYNPuE9wU25xerviL9zh9TZuC5
+R+0/0TlTI4x/O+PIhI2jX07FwRbXJcNkYfYu04cdsMdp0dk5rOdJ3nBWNEa/
+094r1sOpGT17XWHB1i6PI/B0kuTr83BaZ4K6FDx5p/twLUzxPrfmI6/5VsuJ
+XjJ+0s/BGP5g1S7zLyxMZLY/QL069ALhZ5hl6Oa0Fz5tUar9ERbZzZ6iwXpl
+71YNwvWdKp516B+XNZnbTMZVBpSSYb/M+Voe7KGYVBkGC3c//nCW5DNpWnIS
+bs1VH/CGOZaOZflwiZTcBjY5z/JYxwD5flid5GmRfPH5e8xxnmKhY5Y0zJez
+pxeR+5vNMpxHP+rZp86S+96xQaA2A1PRleWlcH8WvUwM82lXRloo1D+4fjSZ
+9IuW3FjdDa987/l8Hcw7MFpmgv5ShzoUSB6LK7TgUNjil9/YOcbk98Jo4jb8
+5qe0Z/1kfdSNsRdw4tWC5pVrUJ+Sa8EczPzt4pMgWHDUv0kOz1FH+y2cH8Dc
+d73PlOGOBSY7F7EoWtZDzxdknPWaed4Ibj0feHUe68d1KxnOcGKXWPwQrHt8
+po4Laxh5H62GZwScjGSY2Vn6OB5+4iMtLCTzq5a4OsJCbR8tPpwmkyijANNz
+lrPukvXXtkncQ70MdpfKPZglNRnsCofShx3JOOsTbWoO/ZpwzzxUDlPj4al1
+8II41/3XiXtGt6bA3W095pkwY2E24wQco/DJ/AzMpz+oOA3PTT0oCyXnrUrN
+vkneCyRrZ7zI+JWZobewZe3+Qy6wBzN+txXOr5A/ZbYN5nb7F/HhXM4dTzas
+F7CijNx/Vc6FDgrmHHfWPQg3LsmTs4F5hep9PPjp1e/xO+DCGNnqMTiEdUnP
+A47ILOCvR3/vfE1+EA4HfH49dAIWvYp/cInM39iaVwmLnRAdqCT9cu8oeQmX
+7Lud1Uvq1TW0E8dzrHieMnuOjL987KAEO/Ncl+qYID9/k5kqGT//6KYjPGou
+raEAl2+xrQ6F9frnh+axX0vYzvFM4qDQwUF4zTaDrTUwn7ldvgr+Hhl9RwAz
+E/VFcXBc+KO4Edgu9cf19vDB1e9txuHYjvyPsrD7XJ1gFk7ce1FtAPWO/v7B
+ap6sl9jTfgtWGC0QI+MUnfrzFMxjHa3/AkvcW+Z3AL45QPm+JU653vATHLBw
+55I+Uo/DFNsSlooYGG82Ic8nQ7XWcKSPcmg13Gqm77QHTln7k7CY5LtQdjqS
+zO/3+ZXUx7ljb3oT/lp6rjiZ5PW6WUTub9Skr8UZuHDBt8sayK/Y0rc8AQ5I
+eR/kDxsOvB5IJPvvdrAqh89mNHakw30vVeen4Wuq1Bg5ry/ANs8K/a3qzpj/
+g8w337r2NKx9u82f5C9kyq6ug3cphez/RuqvqmS/hUPSfLpVTXG/Jh53LMJz
+c6Tx8iJrOEBbtlwZXlP29fhheE9DY7A67G39fTbdlLwvmm5VhO1vT764C+u9
+CZkn7zVq/yZ3DcDMLjm1QXhxvFvTDGwRFVlUAVcahTcqmOF7WJMnHgvLrUxY
+oQ/rDXnLbIODuKyDFrCE/XAjA2b9tfMXCtYY+3FtP+oVry47yIY9yq6682Dt
+7wblW2BOXLL4KbiyuICxjqx3cEo5ADeEeR9eDceq6f9nB6c3ab5aTs437U+y
+ghfP7q+RgHmbBrTIuPeg48avJL+8+Qvy3rjG9lXbG1JfvbJ6DPl7pR5X3gdL
+lPAelMKr8N7dAdM69b++gX3Zu5Rb4b7b4bF6yL/IxiW4BaZMNlUEwTuihRVP
+YFacdMFd+DvXSofsV/s6x0Ic/XyrY9j6juynG3VsG5zU9W77AuRj8pq4SbCK
+YG65GsyPb8qsh1981/a0hGsnVtV9gN3OOSj6wFPZsmZL8N5i9rsCPZnUa79h
+TJW8ty3hDFfAo9xTKZpw6E+lzv1wWt+0tRI8S/4fg6wnn6uo/wPv2Bb8
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.502886362674069, 4.972562773393563}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwl1gs4lGkbB/DRN0kqTTk02tmJIlOpUEkO9Va0oxymkSUmjRArNGVrbfQ1
+4nOISq1Escl5Zm05pEbJYRsbkUaIYjOWighJPruLvv9zfXNdrvf6Xe97P899
+38/9ztA/dJTvN4tGo2Xhj1z//zGhaHRyNaBojIm8RStgVvx0X98KiiZsany8
+E87s9bpQCcse5fwjhCNCvOTn4UKb0sIf4dTnnjUusOBI1bzzsGD0mMFiuGJQ
+GnUNNtCv7n6ynKL5tjVV3YStxZwVYpgTl3o7Cy4qPmK7EZbLt8ZmwLY++bkD
++hRN6RD78DLM9XS6ngWP+pepRpH1z93le8Pusg6Ho3AXw+W+EdwVrsh1h4dq
+MoL+q0fRTPxE31BwjnXKz80wI4d7yojke+LK4nuwLOFmwkJSv+VsRgHMG4z9
+96f1WP+ZqzAHFtq5RDXB/dn8vb/AajXu5iWwbVhFxQM4M/eMfSas90+bVivM
+rfWeToOth/afGCM+e0OT3Oc80ZdpIT8TnZ9/J/F3Wq8nWsDi5eqPm+HUaMYl
+T5hRtGXbFFxXlx0UDid6GoQwkZ9ox0T/FTg6YNewOWxc5KQugTmW3pdIveM3
+dhqWwpTtpZUR8FTe5GgJbGBZ4p9J4qVGV/JhtcPcOXLSv3RBaRJccPx+5Rs4
+OnomMASedKQEdFOKxhT/5bYdNh4bfsaGOSuZieqwbxx/80a49f2+qAbUl6jN
+fLcTTl+frRkDizUOHHeErR173K3hvp59t3nw5NMMq55lyDN3UTm5z3urGrMb
+jjgsGLYl9vtgX86maGGlkg/mcEFdMN0MLpJ+e8EAdu9prJV9jbyOhLVrwB2e
+urP3wvTArPEJ5G9S4nZqmoV5FLBXvYZlrDZaNWzho/9bLdwx0nc2DR5dfkXt
+Nhz2pW8kHrbVYGy4DgsjPlsnwfK5Ke4JZD0dgUgK16mW+IphZb/2vTY4Ojhw
+QTgc11wYpYH9G4dONxAnvfxyhwcr3W3azsLUY7dHV2FZlSUrCVZb1/XxNdw/
+9tYxGxbHOp7VR32UQqf9Adw/9KzfA07ttX/fQfJnX5qOgaeGg+P+guvy1qzO
+YpP5q0pgoX7h6vYkCVwo5d+hYPHJ8jXX4ehXZWW+cHWeSu8J2EKy3C4WDnDp
+TN0Cm9DSjPKJi++ufod81B44b3tE+m/T7i+Gg9a/vfoKrnt7cXoO7JvWLBoi
+65fQPSJR/1BIst0kzD1fHDP6FUXbV+vXMk3OYylvaj/M/aTOIraonzn221KK
+prVT7jdBnt9WJVkH82IcLd7DlNEZ62xdnDNf0+0leX5Fr78BHGbTJZOTebOb
+7C5jYr/t20//SuqNrM3zgOVBAcpkuMjs5KAWzByIXRtBns+KGnuzhKIpGuVF
+pH4Tq545TXDH33MkznBcU014I0w1+1huJfnImNJuuF/vhrcpia+Inj8b66UL
+gwdWkX7MKF23wA7l9d4cePSgc0oYXLipRXct6a/ZhsOVsFA9mGVB6kn8RkcV
++edUP15vT+Ifyv/cDSv3drQfhPuHDxvFwfS9WZ7hJH4J+3I5PP/YV0+vkf27
+bPidcJeAr/mQ3O9cteM97KAfOKEk+b6/O7cPrg58ZzzbDHOyqn7zY7jVv/I7
+DhyWpsP/CWYpYwPtYeFB71dcuOLbHbP94QLzUe4A8uVOqG0SwzxO5NRJONl1
+k2Eyud/pp/cZ/dgYcNwyC2ZE9sX7ww5+B3SlcNIHtwvPddBPTpD0F5j2oqPF
+Eo72H16aD9c1nGDnaiPuHrszHVYuM2TpwEkX3NPOw0UJEtPLWvheyMi3PEXi
+e6/u/hpuVKg0+5B8suJv3ddE/3pTLu6BLfyc/wiC1czLHprBmcWS0E2wA6el
+YCnM5BfrasMBZ1xT6CS/8lvh8+Ap41tlH8n3BfOW4xKYmnVEs5fMe3XBfnPY
+OKnmPJk3PSPJVT/itdoNbeR59p9ON+FE8WuzDlgk4G19Q/af2D5A+l+3ZU2D
+MfKVm//n6QjMMFq9IRSmvv8+nOyv+OFUdSkscihwZpP8I9dND8CphadDrGHu
+pfHeRdrkPQp9eoDUI1WZz4FHveK3RpLzYvKaVsE5OstO55L45GuHtOEwr2dW
+9bDs1Ysxsl6HNN9skPTL2SMnHw76bLhWfQPy3G2b4gwrdh1aYgjzVLe19SJ/
+sU/rXCu4v51l5w/LP2502QPrOe+K/GMx5m2JhtgVHj3FL9sNF70sOLgfVm4O
+O1q6CL9TLvqqbjCj/EkIC7bQSmhwgt29vI+eY2D/8XXc7XBHxM0JFbgxfp7T
+erjaoHKnxkKch013ty7ZT6t7zFID7yWdvXIWrFCYJl9cgOv+PYcGUI+JOn0B
+A77TsKNHQeZD2eNTOR/7dNI/lJP+jJyWXoPTPbIrSX948vGpLFg0+lZ0hfRz
+5HhKCxwQt208nsTPeP69EutZ2EfRo83IeZuapMCtI4N6xElu0oW6yKfwgyTm
+HCz69VFaHpweyl13lczrlnGPTcg/tWumQULiq7yeP4BlM4PPa8j7sqshiIl6
+DQyY4a/hyQE7+i641XCqfgYOWHFLzQdOyjbJ0Ee9wlCNuCBYVKe4a0f643rN
+Twhrhc5t+I7cnyUX2cBD1dSFRJj5wub4v2CByOpRIUzFFgsOY//MtFxuPTkv
+lT3l6ciX1hNo2AMX8f1X30Z9NCu3nz6R9Y/+EJCDfgxpJc6hbUS8fUtg9Dys
+FxBsoQorlpcy3NUx/4O1esTKCttqzlyc1xd8yHmT/wfVqP8BWpudvQ==
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.57964504524893, 4.283992682631731}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwl1g041NkeB/AxtxUKs0iIjCivSUxCrcZL5KUoTDbqqiyjuEaJiUIScsUo
+yYZ2vFRTVFLKSlJUREVYE2rH646yGkIKu/d79s7zeL7Px5n///z+v3POH519
+4Tt+olIolAr8kPz/ZzmTYkBShUlJGKGvfazFpBwbVbE9B7fKtawugN03R3mZ
+LcF4mYidA89V/3K5jbhkhegG3HpoYn+EKhyUrTgAm4WPtMkuZVLq2hfNWOD+
+MhXbeOfh8qs3rApgvbGmPkU1XDcna6Ohjfkk/n9EwgGsO+zLcKRuU9tj2FfO
+3FaTjvkPB383BXMVlAOD4Owd10wV1JkUWl/t8xuwVfsPTsR1RSamn+CkkStJ
+X/B9/v5agb4Ok7Ig9v3mlzDv2dVqb5huFPX+HCwTKeBGkvF2n0BPUs/QqcJT
+sMr67jAZMp61+GYK7H8688Vj1M/jtHTFkPE8FetEWCS/QTUANlvTpeUBc5P/
+rWQNe09ss10NCwsvfy8DJ9joJtFhtY4h4WvUJxyzbzaG2eHKp8/BAdUHHnrC
+VSyvaBbcOPyhJhNuNeFSyfPT19b8/geZv3RB6yv0J91Dd5ZF+jXIWxcNM/s8
+Hr1VI+t3y8YSriu40HcQ/Qgw6a1XhPMnLbxkNJgUibbjfmlY6NV44hpMi55d
+vwxmDB+95LIM99Eo+30rPOkmL+6HJXHHY/Nhycudk+GaTIrgt68DUqjHbODH
+qY9wVbxr8SZYwuBN78C6i/wKHyTB5cMHFYtgmjpD8RU8WBqW2gV77mG6qpH+
+M+XGJ2DmhTh50j92tN3KKdiXqq9eRNYjqdBeBHOZgVE9sFqbw5n7sKBtRYHs
+Cialw1HLKR4Wsv2yjWDRg3uRG2Hx4Y2LfoC9W6hXJ1EfT2sihAknRJ68foPU
+P2j5lgE3rHS2D4Nndrozl8Hl4aHvrODUZ0espzCfXnHH9iWwpDRlvgE28OJe
+koYbvXnOZ+DGuPAqRZg5RzXfTiy9/idzuJyro6gCd1Sq6JF+0T0KbN/i+QXN
+1fpPYY4gnVoCq2gdDzBHvQa7hD7RpF91OTl3YLX/rnvmAzuyzM854pyo7eR5
+2cHe4UYsEcyPSGFtgA0kHT4nyLrn2YY7wiWtnf00ZK7d/uP+xFKrJLuRFIum
+wkSkzb0MtctIbn2aSyX5vdfM6ABZN/vl9hPIBS2ZbLIuag4BnZbIoMrTcnZk
+XYpNRuOR4p89RvyRMvda1r1AbulfUXsQKdrksEMJ/TurUigOI78v2TXvDV+h
+zocEkuupnlaZ8EaOkdATrutdyKmFTaP5LutgmuFQgYisF7vShvTNU4e/dxKW
++IrDJKiLH9Ou9BUumS1rbIF93QOaxuCxshjTMph9+wf/32CblCm/LNJnZj3r
+Nlw7KN0QB4tbpgdPwIcoRZwoWC1MeN8Vni55Ij5KzqFYfkAB7vcb10yDPW2K
+K9vIeS3Z7HeVXH+5IzOH1LUv3q2NfL9j7j7Zr5wHIZ+lkTPcFjMLZJKMZ70T
++V6l6CwNaXJq+FoGuc+loo/fcJ2/2zXTXlhSr1r8mdRxdG+WCebl638MmSXr
+EWH75zG4qllgpkSus6rf/QIWbj5qsB5eHFSuq6SLfRIR9ZJN5ldXbtwOt6ZQ
+vpXAFVq/bkiBKSW61BGYF8wdL4fpQzc71+I+7j9+G38JCydc9Mk81xkK4new
+r0pOTgP8rWZIrw+mOdv1LET+xZbOFyI9e4bG7JGaibpdT5FVGXyLw0j+s2P9
+15E8vYjzOciNp2rM05Bqcw9KSpHJH4tOBSHFzy4KbiPTtio8IvfJ/VNJIECy
+PJY36CAFFjUhWcjIF84saWQqtTckDOk9tEYygbrMgg8/t4XvaihcGYG3rFlr
+KAN3yBgsGiXneo6f14IMmK3SmiUOczpA9lvosc02S0k/WNlTXrD06zlVJmy1
+VpiiRfbLrf3PI+G6Q5uMP5F109NovEP6GaFwshl+0bZKaZb0gzpz7S78RP8N
+Y4se6uE4LC2Da0efR+bC/IdL0yvI9+UnxsRw6pdu2UbYqMvjoeVK8n6jv/kI
+axh/XhYP0x/rczQxf6u1W/ojuFGD07yT7E/R18kpMj4UbZ8HC74rqKGvQr7f
+2jIAR4nWvbeFPf1ctU1Jn54YTnvAqSypnig4+46lszfMd2DdqSbro6h13x1O
+WJJ+cRou22ZYbwPzZK3F+qjT/5VZGLk/9/TqWHd4VeWkDgWmjRd07INN5M0v
+9q4kfWUYH4BVRCP3q2Duo2VHyLhEOX/vBTK+J5pNrufdc9kdCwtUWYcMYVdl
+1dXBcB0rvoT0scbC5ZM/bJWlkEf2UfJeN4c9sIRp6Ef2jdH8OCOU+ATXZCvM
+ubJyTQqckLg9/HvyPIz06ZuwTHxRRDf6wZ2PKeuHzYRNjqXwcNDibvI8YueI
+nGTyPpluTgwm/eoJyPgPzGMssr0L10n9VREI087n+yzQx3l439kZAmuGh4q9
+YYm/sWwc7Blnq1hMxv0UfuHDGU+rpUZhGm+heStckSuxXm2AurZ8uCdH9pV2
+WnYgzEkU55D6aydVQnkwxTm/9TycfuRfN2/BtKyA5SL4Jn+X+DGc6kCjk35Z
+mu/xeA4LTqgmh8EVUp+r62Bf2dIN1+HBs2/z/rl+QDujF47scx05D7ducvOg
+og/Dqf0Lo2BJE2tcHc4vVy3dAc+MZl1cAXfvqq8wNSB/51zNNOG05ARpeVK/
+to7vQjj3aA5HgucLyGgKH8L9NRzYMT0we74gtgrOeK3u3gozY4YWn4TzH8pn
+EfNpKjrkXPSf/HnfO5h37sqsHNwQ+7f1F5i+K2HuFVn/d3s/aGE+9pd3kRfI
+uXKaK/KE68yox4PhuPGUr2fgqm2/ttjBiTVOc+2wVcv1XAMy7vDalW6I+fUZ
+UVpkPxjuYXBgNTOGM3mPyIkMu+tgg55GUwY5D11Ub0Uj8v9kZqYPfCA6tNMX
+zi0/ppxE3mtUn7aL8JY3H2oekveQRolGO/zPB/UrkTRm/g8iD+gn
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.867783472564531, 9.687357802186902}, \
+{1, 0}], LineBox[{{16., 17.00000000000231}, {16., 9.999999999998607}}], 
+        PolygonBox[{{16., 12.9}, {15.6, 14.1}, {16.4, 14.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.9452, 13.5}, {-1, 0}], 
+        LineBox[{{16.000000000007276`, 17.000000000003638`}, {
+         10.000000000005457`, 13.5}}], 
+        PolygonBox[{{13.51826734053906, 15.552322615314452`}, {
+         12.280184249251306`, 15.293188945044921`}, {12.683281069670574`, 
+         14.602165824326175`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.823799910437668, 15.984057296392571}, \
+{1, -1}], 
+        LineBox[{{16., 9.999999999996362}, {10.000000000001819`, 
+         13.499999999996362`}}], 
+        PolygonBox[{{12.48173265946094, 12.052322615314452`}, {
+         13.719815750748694`, 11.793188945044921`}, {13.316718930329426`, 
+         11.102165824326175`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.823799910437668, 11.015942703607429}, \
+{1, 1}], 
+        {PointSize[0.04], PointBox[{16., 17.}], PointBox[{16., 10.}], 
+         PointBox[{10., 13.5}], PointBox[{7.5, 5.}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T4", " ", "P2", " ", "N8"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbf/cgdfeh/ifghgihi.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbf/cgdfeh/ifghgihi.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {22, 0}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwl1gk4lfkeB/C/rmTJmj3pdAnZxjVpyqj3bbG3nETpxtyTaCrkmI7BRDQo
+y0myTCrLYWJaEC22yOnGkEqHkSzTHddWo2UOI1nH/f6f+z7Pec7z8f7/v//v
+933f8zxW+YV4BCwihJzFh37//9JgydQCLiOWrE9+9PG4OktISu82JWOWvHH4
+QX5AjSV1Ra7vVsGxatX3fOEh8YGarbBN3uYtT1VZsv37gNkQWKq0+MW8CkvW
+/sMyqwiWBO5W3QvHZoTLD8Lckm/de5RZIphMTzBZjb97uK1OhkX2Bn8Fw+Iy
+tX8dhTv9fO2r4DSTnJ4wWPOZh3QB5gdM5JfA3sPH+xxNWKKmt1ROAfW9U4w7
+z8C854498fDVZ1tHxHB5yHORLvp7M84GjMM2e754ex9mv8+Y1zPF+mOKv9hi
+npbPI/+9Dm4Z0N90hs5nk/qFC+x9grnyC5yz5aXXTthstOWcNvJJbFUQusKx
+cxar3WGfmyq19rDo5uBimp9/1QdTI7q/yEUYBbvcPxMhC3cHTLwWwL/OCbP7
+0U/ahkzrvXS9VfaNGpidOxLAgeWHJ6UXYJGW+ulOnJ8o2FgZCEs78g4IYIFz
+tJ0rPPXgYMEiOKLUIM4SJrqexxZjPv8wJlwH7l/irj+GvMR5ostKdP/5+GXt
+S5Gv4VVtRTg2NS6tTAk5eTldXwaLQ4uH0xVZ4lB6ONeM1gvZwTmrwJLGy/XN
+LjAn7bdrGfJ4HuW5iSdof/dPvW1YQusEd/xE65V+VNSAS0Ivrh2i+/tIQaoc
+SzKLokZNML84LjF1PXw1qv19MMxJr3ulBj8dL1SqgrlzLlXaMC/JYnaBrm/V
+CHSGs9ckhzmZoV7934V5MGnx35FIbXrFUBvnOQSdTngEx+r0vSiGPTmBAZMw
+p8eF54J+M4u3p6xcgzntyuvHYONe55mNsGjLnZxLmG/7invGu2F+WNz9dZg/
+vrR/zJtaOukshmUjFRu8YIm61pfWyEtgnnfABZb+4F8SCTfebCW2MPe7K3q5
+sKe7ZJsmrLb7cX4mvNYgSXEM/Ygv3DT6Cq5z7ApuhUUPkr6eRv1q6/rSQtim
+uVL5COxzSkcrClZLyT1biv7im5oHvGHuzJLxNvRfIj5q+yXc/16jvwPz8mz5
+I8Z0feiE9kPkU16QkalD85Ds21i4GOe7+4ZpwvzbGadjZJH//sh9BnD5A197
+v7/hvWM9L35G7/+3O2HPIuyL+OfynbTeT+9GD8jgnEoZr3Daf3sdiSOYbyDN
+6QbNf7CCyVtgMMexc8M0b70yNvkvhhhw+XxTzM+JWrpLMs+Qtd8MjwVTxyWq
+nICv/rhiqJK6M50XCjda6xNijnqvxkN+hrPLreed4NjnUwNHUU9NUHktCea1
+2dlycV73qaG5JljioJ9mh34MMh/azcD8ghsmL2CfoFODxhao/2lEGo3+Hax8
+prdZ0N/HiR9NMF+QKK17PywdnvyzCebvvbf3EBybLJz2QB5mBjENB+l+dkNS
+EzylWNLuBfO+qkjWRn5mWi5VrAX9XU1tZmEf++xpI5jvMJi8Ce4XrQmVgVlD
+VVlVWLPjum0f+uNcuGhagXqxt3dG3qH9xsdxTeBrq8rOC6k77pWEop+c7z5W
+HaHzWo4tz0b/uuJwTTfYZp/jfD7mk+9KuGALi4oGe1YhD7b/23YjmL3UNToy
+h7zty5evpPlVBwcXzDAkKMh312pYvDNA1X+KIb9u8OtdR++XOZpvnmTI3OzQ
+3T1wf/OArNsEQ2Qb8g+epO6dXZk6zpD1QxPjJfS82i1Z+mMM8UxI13xN908U
+G/75B57nEVbPjOZXuE186AMs77r0OM0n2kNw7j1DhHdbmipp/lqBhiHw3VpV
+GWIJu/lYEqzPVP5M4AyzWlZ/2KAe72nt62SYp7yQFyZliA95uqMFFmctK0vC
++f5PPF7Ow/3FOcJG9GfW1ydnbgXrXj6vif7fnZQTu8M8v1s2X39kiFRZaY8f
+vX+J33Yd8/qH9cYFw+yTR8GtnxjCeSwUUoskMYJq5MNdIbf8EF1fWu0VMM2Q
+nJHfXXfB4pQHZk2wUMUk63NaX1xh/BzmRgtb1WHOqxuz0XBnrf6nt+hP1Nak
+LkG9zrqK3Y10npgX55pxXkuqvnEunT9dY+sx9BO/zulOBJ3frkTwEP1POTWY
+7qfrVUvDejBffNHmcJbOb6S75iHyiLA7yLWh+591tWkgz3KJhoI5vf8qIz/x
+DUPEWs/SrKlHf9ZRGGKIt0v74U10/eDg+m9+Y4jufpksWj925rBb+Euc1xVx
+K4a6N6yQJ8HzUXnffYuuX9R6sqWRIduHi5+8oRZezL1diffFqGbEDPOSbsMP
+NYV4P/7z+6bj1JzHNeIo9GuSf7uSml5p9WSO/n9hxf4PT74hSw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {1.7026940733168927, 12.067904665985203}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwl0w00lPkeB/A/dd1pZZJG5KVGKsPZJrfSmXTb53HlrYhSim27k+rm2lCb
+rBDTOzXLKLUVjjlWm5abt6Kd2hoW11u3oS2TIVNGXnMnidHqut//2ecc5zmf
++b/9ft//wyE8Zut+Y0LIOfzR9x+PBUumpvE4sqT0u9YnhrkskSzLK6+EfWsc
+pR2w68uBL6Jhkp/mdgM2X/LzGwGsLXF4EAr79v7Y3L+YJaJ89YdJc5bIuW/V
+JfAhWeiFVJi0x5ekwMrqw50c2DrU6HIoLPbiKj5x8fZt/ccXsIRjq+4ywzzL
+xzIhrPff6H9/NkseqCxmucD8kSNf55myJNZtT5Ar7Brv7HXpM5Yk3fD4loVl
+vbe88maxZKbPIye6P78q7mUTB7+v8a6Ih1nWcq0dXJtusySXzre2n/j+zyxR
+PSjbUgvLM12MPeBOhc3EEK130c0oa9j/uLRpLvo1V8i/todTucsur4KVhY7b
+A+DTbwb8AmGZlbLuBzrf3sR2Lyy2Wdhog/PsGqXSKJpv+b+ti+Cgox2nqFWb
+Cw/4o95+M9PgcLrf+5X3PsCGRBPlJjiouOznXPTH02hMXGj+buOCdehf3Ly1
+/RPN75jEtY6atAQ0wFrF6tpVyOtgi6LvPM3/bf9YCiwzWxHrA5e67xcVwKWK
+OUaEWjyUn0PH7zTUVTrQexqZcwDO4vjNjoblfwsRzYClEewCAazK3333G3re
+mYu8Pj7WWxjr76G+Dbqx0WJYlZ3+qQP1jz3M25MI6wVdkd3olzOluxMMa3cG
+GB4jn7G14R1r6HpHP78SE5bsO/hV4FJYXJF1XvonlnzuXmq7iK7/nDsvZiZL
+BNq4VkfY/JbCWDwD9/r8TOZKWP6UqztgjN+V3/I2wuzyjcHpRrifhA9VEfS8
+xKSSFwT37XA7Qwq7xkSoN8NZ5ZuPVdDxX19NvJpmCL/t1koNLDm7dvAkrJI7
+HzZCv5IablIKvMv96qQjzHrmDrbBqy19q1iax6P6OHfsZ/isuHU7HT96xORf
+sLldyqM9NE+bWbPdUU9EyN2QvbCyT7rrBbxLLlOH0vWcBXNOon7R8l2TG2DZ
+7u0vXNBfxMHkniV0v197Y5pgQVa120eal3Xvmx3I47dk3VQdzef7U9xmmMRW
+FqbBskyTBjvkV1Aq/OQNkyuVgT5wi9CGENr/w/vx3jDfZ11D1CLUWXNMbQVL
+dE09moXI831htwL7+cq12s2wmOukdYVFx5/ZNNujHqHndBLqkdc6fLcNNg+d
+Z1mA+lVRM34asUN9C50SitGf9bs7a3Jg1iO/Lhd5xEsKhX+HSbZ6iiA/34rR
+2yJYuzvozP0phuy8ohgUwEp7q7bjH2FPJ+cVdP2SDibMwJB7+7QtfnTcVG8b
+Ps6QiBNP98XR8cFafcEY7u9CRl0ZLDl8UbfiPUMKp4QuBlh+ctjVbJQh4q8S
+vvRCvfyuwnue7xhSeqFYkwWLd0cpn+sZIhdZWL6m/Zk2ttTBV6/I0wToX9m6
+5uZszBfvuGy0j+bR+SztB1i77a9VMliyyOJQCvbnj/KSi2AtbzL1Is7nfFnd
+U0bHE67Vt6A+mXukXz5dn5V32g71i+5kjCXC/IBoJmaCISTg2nyGjrf6bStH
+v0r2edMwrae8sebpJNarjU3PweSsoq8G+egzGq+b0/ojO5wP/84QQTBvSErz
+NInObIPlFjvGp20xv/Pshpdwaa+XVTSsnRh5nU7nT+ZrNDZY7/e/X15jP86m
+yd8CYPkN3qAG56X2CP/ZsADr04ydJajH2l5TEAhLutnbatTPF6+b22eN9Yv3
+P3qH/uRuiRmZMN++YnUH8igNe+y+BWZ7DC/zkeehIulWJ1j58G3Z/WHsv953
+OY+Odz+9sq4f+a73cLOCJXklIYM96H8weURIPUc38KybIf1ha01CqVUW3go1
+8k//GHmRunBkpKqNIexAwsF2mCRqt75vRn9Nb1850vpV8cvd6zA/zHX7EWrv
+I0Z7q7H/5IK/VFPvHIqLVuJ7iTN7x0H/JP28J1OD+dFdgd7UMZKw7Hp8fyH2
+sUepq157Cx+jnqx51peomzn+9Tg/6MztohxY0rZlYU475u+xi5FRh4Y+aetE
+vwdGT0dRVywONn+F72um0++rYKVHTVIu+tX2nmjS0Xpq+q8P9+L7yD7XcgJm
+s5/0afqQ73y/QjNYGSmUBAwwpKGpq/IC7X9/xjXBIPq9fkM7bYX1G345FQan
+1ilio2FlxfPIdswnR0VTmvnYL3Bp23XkrR9eahoAK4MUNTffMMSw7L/m9ZZY
+3zpUxNExJD58p8sm6tTJ8f9ocZ8zm8e7ebAhuQD/kkR5ouqbc7BkZU5cdyu+
+z02X1J50vCrdxwH56S3vps2nps/V9X+8eez/AXlZLnI=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.7973059266831077, 7.067904665985203}, \
+{-1, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000002274`, 17.}, {13.500000000002274`, 16.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.552325660469876, 17.180083206945802}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwd1Xs0lGkcB/B3rVDUiFnr1hj327YplyXqvEmyJTRsLusyQksZZMXslEiy
+gzG0FdJU09aRVJJbqIOlyyyJYwvt2tKNzoakRBrs9/HHvM/5nOd5n+f3+77v
+mddwZzwnSoGiqD34kZFSIRcbmmKTUZemdGUGXYtgFZdKexF8YdHsR3XYx/lN
+GFOPpoqZyUGGZN56b8RxmHl4wyUHuOV8eZKKPk31qs3v9IE97rW58OCcJ6wB
+Hvx6G2emGZYZxbuJ4UGVzZI5mFvDuFYJT7ONe81X0JS24UG9h3A9ffkbZ7gx
+OTxtCk4Ilcw4woWKdd06q3G/jh3PCDY6NclYC5ddr+B/wn5n5vq3+8Pp7tZ3
+WuAgR19ZAkxlXz++f6G++PYjcKWe//mV8Mz9P/4+Ab/m3lL4B/0IjtldkcI+
+g5smfoWf0JMmpeT+9UW1jvC0MDFswdJXu98hn8q0wEvn4Jb2+ue1sFvWmfRi
+WKh7QZANN4oqxLlkv8gIeRyZL5w6t5+c/0iSEQ0rnlUujSH7tW2PTIEzO8Ul
+O2D1pffMJXB6oyR7I+wxGpnaC3805Keuhh0dWlxNUQ97bVKyIUzzr+VlkXrV
+zMOZZP27+aYp2COLu1SVrG/VlOxDv43Fa82U4GlufJwcdjEssCbmOylYCJGn
+h1CXR9b3s2Q5TBZNWXyMUtYiDqE5p2HFyYbnpnC3pWkIy4CmlJy+qCH580Ud
+j47B6TcuzvuSfiak/jNw0zyHtReW37MWmrNpSnTOfeNROOlQ0+hm2ErdIbOa
+5CGuuxwCT6d897wX5o7G/BIN90ym+c6Q/QxWLHj6XXan/hq8J8PVDqHwQLCr
+9zqYtg38fQu8y/vxf0FwQSZHeRV8y6z3QRLcfz1gXg3W5Wl55RDffHHnPuob
+OhgzVAKzxR1xAlgeJ9xUCpe9/WRvDtdUOXlegVsWF3P70P/Y50OMq7BQWK6R
+D8vKe/vK4PG+k2YcOK46kCUlzshRNoEj5U7CY2T9vsl8Zbh3R9TgYbje/e7o
+HPK2OPUnIxHm3mDkqWJ+Z1YCMwxO32C25Fv4jFnn1FZSX2CZ9S64THTythPs
+U17xsgpOb714wBIeVGSEaaBer7zFDJJP/7NtSzPgVue3XhqwNDG/bQ4uuF/4
+Ro04asseV+ThGlQSQyzz6jAQwnLfpyuWw9EVXeEP4ASDACs9OMkycZmmIfob
+u3HACqZkbhp+sEamadd6kvcqSWo+3KQ7VO4PV5amFrXB7pyhWJJ/UlXy2Bi8
+pO3D1uMwP7Vhl7oRTU2s28utg0Uj793M4dIM06uPyX6bUuxtYcXH4xazcHDo
+bm87WPB+WGZgS1OejGFNa3gNMyuHhhNOqsZow7E9uamhMJdjc3QW57GXWHfy
+YXZZEWsAjgwzk4lhidLyl7XwE8UTw2dh2bTJCxFc0Kzy8DKsPcZ3jIBvjb2I
+roIVeVbKznD78ubaalie8SZCC66y7Z69BgcXXqGnkNcMM6j2Ipl3Lwl8St5f
+I5fUU3C/gqVJN1yc90BfBOv3/9XSDrfy3AUCuOCqzngX/NBl5OhPcGaAieog
+XMETxPrBNd+HU59hIxuFr1xhqepKPzbOL9FtEK+GY9VzTb1hNa5mhzHpp/Om
+QxY87Zcr1SH1h4Z8Is+D+3NCqybc7SU9rYS8Pny5rFEDDjCTG3vCLH7sMy24
+rL4u4Tc4uGcwjA1/yEzj9sGNPbkWq0i/9T/8q22M3Ev7Zkg9tzNHJvzg135v
+I38k54fffZYNB8m+lqWQfrd62tTBzFfNoUWwX6tTQz8s3qHm1gC77emuG4fv
+2p84MACPnI5qn4UXvk92+D8kown9P0h0WZg=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.876835367704164, 7.161502436909525}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJwt1Qs0lGkYB/BvbTZDGJJGW9LN5SS5FVvH9tUpTSJ2CmMrlEtyqZkhl66I
+I7cZS9nZCtOWcsuO6rQV1USmabXW7ro0ExbRkmKQEl32/7bNOTPf+Z33e9/n
+/zxzvpkFu/dzQjQoiorAm1z//7ClqU+vOTRF/xZ+fBEsW91wcsqEpo6WjlW7
+wmGtkqhuWD2HPhcGl6REC6pgqVO/0wmYmS8OjIQXljPPXCD312XVzYTFfpaa
+t+FEhrKvlEVTW5bFtDXBYl75LTu4bNl8yT9wF+OjrHI2TY2m5ZkOwJb8qO7F
+sPG7kQ0vyf3uExvFxqibJXJ5AecU0Kt1YePymIBnsLr61mjaLPQheeHYTuqf
+iYuaAYf3ufIb4cdmxpsLjWjq+R/vn5M8rNnfl9CwT25qXjnMzaulXs+kKee6
+mfvE5Dwp21gGs3NvpqaS+Wx36CqCeQK7p9Ekn/RS0il4VUddcjDJp8lhS2Cj
+wWI3Lukn2/HqHXjHo+UaXiSvtV/SELx+iHZzJ+uabQ+sUX+LwdwfPeB+5Ta9
+WDiefrN0G5ln+whPDltPhbMCYd7IJrkJ+vlZonTiw7a6CxUR8PPxZvs0ksdr
+ucsN+OyymORzsPRC4MIpWDWYcOAurLCf/Zct5pUzg+XUBcebNlr4wJSFfpuG
+HeZa01wYBoceUXHMYa3MofBQ2KhWWLSJWPlv+hZyv4vOtQhYNin43QyWXTbJ
+y4Sbgl+2d6CeW5+JdwlMe0zZkO/j3SGV7T14wt95ypTkM2Afb4G7ROmLS9Df
+2a5LLb3kPE7vXHPYsMKsZ4jk2VFUdxbzul8ckj8Gxxfkr2HCBx32GhGzGk62
+phhinveZVS/hHIGo7oMBTd0QvFY/Jed1e+gmwxku3OOtsGKafoAhvCM6dLWc
+5Cur7L3CpCmB0l7rGtzPLVkaCpcliAYlMHetubYN3B68Up0Ns3/Vz9aBV5ae
+nn8YNsvOevJeHzm/lMdFwmEHxkXTsV7ofrE7gNRLzpi+GF7nbWXpS9z2kzkH
+Zk07qubAvBNlhiKY6yG/uhUWM8SBbbD2D3G3/Eg/w29XWCDv3KR8kxBST9iw
+7yD8Oneg6gAsrX5a/wj2UlrZkfmLg6o+mGAeF6Xms4philGs5w/bnr8trSX9
+hF5Zfwpm6sXak/mwGvdE1cCrtBMrNO3xfLisGm2C9U4o5lnBUtXfn9w7/PCQ
+O8yeF+VbDR/1v1mzD1ZoHHkigtnU5W4h3C/yZXrCGWwuVQF3jUh8J5Hvqwcf
+NtfD3KyGljyY0nGdpyL7rZbsNIV7GacnBki9nTSnAP3XxvXlviLrpooMI7i5
+c3/zW1gimObFxLzd99QriWX3OtsndHFNKBol93ulWDgPzqApm7HHhYPEPR+P
+DOvg+ajPTO8kVvt/rQsbd6YlN8JmkYmpbtrIuyEotoasqx5OVjBoKsWeH1JK
+8psIPZ1hjV0TfvlwU+p5xZAW8u3V8k+Bbcu/0fwT9or+jh8DByrkEx3w/YRd
+x/aQ/Y7scUPs5yZe9PEn55/i10fAxnHZEj/S75qGlh7Y+q72E2LZIZsIPvII
+Ixu2BsA8WWavPvIaOny7JBxOvBeveR12HMtZcRCmnSpdt6Pf6w8qnERkPgZB
+Vm/g8C8sKktI/SyfjCTMpydYW03mTwftHBmFY6Y2LX8G5ziEqdbr0RQnvTBR
+ywGucR7nw686k3qXwnSSj18sfGWz2suTrK91rfCE13XkVPMdSD2h83ucl7Kg
+e1EunHjmwqtjsP0YVfALzBOmJaiQZ/TwHZ+HcOBG7wEmHDuYXtxJ9nv3yC3R
+z+5JDcYwOT+29a4l+h/Cr9MkLIsLjGAxPv8vOX6+atH/ASL6aNo=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.123164632295836, 3.6615024369095255}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwt1A1Qk3UcB/A/AjlexFHIazAUkJERxEENAntADpUXJW68nHgMZtRQKIPV
+ASoN2nByunjLKEYspGMIcYsY7tJiFHnzRFkkuHlcIpBwNAILhUCi7/+u5+65
+/33uefl9f7/nf89O4btp+VsIIYdx0pWYNnF4M2SOrlyGGF3GzDNwe2xrVQfM
+M/T2tsGSr9M/48Oq9HESDc807wlxhEPV7wxrn2cIKy+ieDSQIdzqDb4bPHQ4
+RX4ZXjoxoijwYoiN47GMi/DkK1cr+z0ZEs7JyaFmWUkbWXCoaU3bCUuKGn4p
+8GBItHOC22041yYybNqdIcr3FXYE9SR2/hun4NLFOc5rtP6H7+2LhLvjHxwo
+h+UlEpk3bJn+LkgHm9r+knFh+cHxikVYvUYOZcInZSXlXkEMYTuNCdvh8C6u
+Fw/WGQO5LNQX318tiYMNVbyCMljXsz5Jr4emnvl3AWY7TPnT53nPHJdmI/9c
+VELRPJ3fNbGrDtY5lMV00nrHw6zW4aecg7HZcNaktcAb89BxHtnbwiKP5EZP
+2H3QqO9Cv6kZJ9uWcH9pi07Pp/OpNSSpYEeflNdtYd7qE9tgmFlImh/cjfVG
+81Ul8liCkxsVsMTekLeCfriK2cUimARrRAnwzNYAQR4s79E6N7rB/nX3RPDS
+yA/9864MuaMfelQFm8z3tvPh3JbU37upCw9JTTuwH6KjTFOwMZbfUAEn913Y
+4Ys88tIwQSLMlfnkC+DaNbMwBn4qlRQ0w+7X92dmwP7nlGQEJm/JEuvg6KOu
+qsewceflh7OwTmrb4YB5sNiT02+gvmXbvlYn+r19TrT8DLdz+gs2cL9vXdQA
+D/kJ+SjNBOsjf91Uwaz6bxy+hNWJleZlWJTcpThC52m6GfEi+leb+x6y4KZx
+j02G7o+agDkN+pls368IgSfKysyZcO2fYssTPC+NO+JiDWsi355pgoeVSV9d
+CUA/FQlTHrRe/o9LZXDTJ6uXJMjHuunwZgrM5lwZGEM/Bq+Lr4bDoqZCOz9Y
+o/o7IQT2tb/2oNiFIaerRVZ7YbUn99TIcwzhB3mKc+AsS8WuONi0HFh0AU6t
+Kvl09FmGHDCHa6/D8rPcymrY4MjPtkU+vVUpKw+Ov02c4qlHvVqF8HLNb+Vn
+qGu+XZHDXIGsh35P34GIkBE4+e4XRbdgXeC0/0uoxxvfXjlB99MLijUl7Lg0
+tngXZjeG9zkjr2bq7K4BOp+PtX9UwvzZtYV6OCvG+vw03C1MkabTet4d1cHo
+V/35sRR7+v7Hdz7IgsUNyk4t8s+9XL9bAA9v3XbpKJ2XuM6yF2ZH3ai3gXMj
+AiZW8L4hU4u+158hq4OzP52n3rNhXQgTVcj6FjjUaCwMp9dd7lsJkff0rbQ1
+J1j3Pf+fXvSnKXbJ3/D7/7/mjH1OVz/mP8lKx0w=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.16438510075492, 12.373697879094095}, \
+{1, -1}], LineBox[CompressedData["
+1:eJwl1AdMU1EUBuDnQsBSI45UaLHuAZYqEFGoPhSwisQiEjWiVHBgBSxqFKmD
+RK2ioDWGpQYbqEnVxjgogiuiKHVECeJi6Au2igmBgqtiLf5HX9LcfL05955z
+8s4bm7x12Yb+DMMsxI/W/48/ywykdRzLhJYnauRw5MGaQ71jWWbCD73yBMz0
+VjJfYMf9rsgGmOMdKXwKc+Z+X/gBiNNs7CyD3ftK4xbATpd9qhrmeQa3psP2
+XO5tMCwYUJiQDxtD3Np7xCxTkR7yRw9XrI7PM8GRVkmREVZm1k9bT/Zu22yA
+rWVH5gph5Y2esAKYu87TXB7DMlXbGmP2wMx7L6cEtpbI5q+G60u859z1Q172
+EeJgWNBW/DwJVseem+IBu49THxsFW/jNlhbUE/rJPdEqYpl7DSP3XoUd+Trp
+E1gnbTHnwu3OW1/rYKeX6s4m2DL+yrEWeHn57dJYWJnksg3CefdSEobKYH3M
+TH4EbLxwLnEWxT/5HXsUNmU+WEP78gNFCa2wYfF+1VI4NeWuKgT51zrSVqTD
+RoPobD5coXq3q5D2F03+ycG8wcLzj+l+k2PtSPQjr0AUM4jqKU+LDYJ36LW7
+F8K67JZNctiU0+SgfocfSAiMh9O0JcmvqZ9dioJlcJUhJcxvOs73nDU4GpaL
++7xSYGnW2R3T4fBuobYMXrnt+1IPWCG7kdsEX8nOGG5GPsvpfwnL5LTN5kXB
+ARQHF7Mu30eobz2dC2ctqtsZDnN0L9zOC3poQv+klBes7Gfu9oXzKG/Yznp9
+PS7Ee0l1wWL/sEJPuJbqJvNDF5/yRR6GUxo78sl5da0rAFY08J8/gnXd7y43
++WB/RpL5NKwocDWWwvqapxczYOVH7a1sWG37MymK6oufV50BP5s4+rCY4usu
++tG+KbCvpz/VG71bdgbmhr2N6qT3TdiY/YLiXa2/PsJT1lVtGY77v0XLBTa4
++Lx/bzIs2D5Q0kMWVZ6shplhVVFDcF776blx3qjHPXPJ50A4i5vKpsLWJR6i
+JLg+SHOwEnZ0uu0rovpsxiIH3LFKK3sDWzJsu6ahXxzNBfqhm1D7Ug4n0tyQ
+LWskcbCR5gpWN6t6I2ADzR3MugVc8oE7aC4D0c8RqTeb6T6aW1jgkpVr4WCa
+a9iyZUCDCG6kuYcZ7YdcA+px/sJ3AVZ0RNT4wSx9N+Cs6OofOvTn3yNFnbT6
+sH8BRImRiQ==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.763809742330267, 6.7638097423302685}, \
+{1, 1}], LineBox[{{13.500000000007276`, 16.000000000003638`}, {
+         7.500000000005457, 12.5}}], 
+        PolygonBox[{{11.01826734053906, 14.552322615314452`}, {
+         9.780184249251306, 14.293188945044921`}, {10.183281069670574`, 
+         13.602165824326175`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10.323799910437668, 14.984057296392571}, \
+{1, -1}], LineBox[{{13.5, 16.00000000000231}, {13.5, 8.999999999998607}}], 
+        PolygonBox[{{13.5, 11.9}, {13.1, 13.1}, {13.9, 13.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.4452, 12.5}, {-1, 0}], 
+        LineBox[{{7.5, 12.500000000003638`}, {13.500000000003638`, 
+         9.000000000003638}}], 
+        PolygonBox[{{9.98173265946094, 11.052322615314452`}, {
+         10.816718930329426`, 10.102165824326175`}, {11.219815750748694`, 
+         10.793188945044921`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10.323799910437668, 10.015942703607429}, \
+{1, 1}], 
+        {PointSize[0.04], PointBox[{4.5, 10.}], PointBox[{13.5, 16.}], 
+         PointBox[{16., 6.5}], PointBox[{7.5, 12.5}], PointBox[{13.5, 9.}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T5", " ", "P1", " ", "N9"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbf/cgdheh/fihjgigjij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbf/cgdheh/fihjgigjij.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {44, 0}, {0, 0}, {22, 22}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["g",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {21.75, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["g",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {26.25, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["\[RightArrow]",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {30.75, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["H",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {35.25, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["g",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {39.75, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["g",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {44.25, 69.96}, {0, 0}]},
+  AspectRatio->1.0999999999999999`,
+  ImageSize->{288, 288},
+  PlotRange->{{0, 66}, {0, 72.6}}]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215283621492`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"6751841f-76ff-4ad2-97b9-dda1369270a5"],
+
+Cell[BoxData[
+ GraphicsBox[{InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwl1gk4lfkeB/C/rmTJmj3pdAnZxjVpyqj3bbG3nETpxtyTaCrkmI7BRDQo
+y0myTCrLYWJaEC22yOnGkEqHkSzTHddWo2UOI1nH/f6f+z7Pec7z8f7/v//v
+933f8zxW+YV4BCwihJzFh37//9JgydQCLiOWrE9+9PG4OktISu82JWOWvHH4
+QX5AjSV1Ra7vVsGxatX3fOEh8YGarbBN3uYtT1VZsv37gNkQWKq0+MW8CkvW
+/sMyqwiWBO5W3QvHZoTLD8Lckm/de5RZIphMTzBZjb97uK1OhkX2Bn8Fw+Iy
+tX8dhTv9fO2r4DSTnJ4wWPOZh3QB5gdM5JfA3sPH+xxNWKKmt1ROAfW9U4w7
+z8C854498fDVZ1tHxHB5yHORLvp7M84GjMM2e754ex9mv8+Y1zPF+mOKv9hi
+npbPI/+9Dm4Z0N90hs5nk/qFC+x9grnyC5yz5aXXTthstOWcNvJJbFUQusKx
+cxar3WGfmyq19rDo5uBimp9/1QdTI7q/yEUYBbvcPxMhC3cHTLwWwL/OCbP7
+0U/ahkzrvXS9VfaNGpidOxLAgeWHJ6UXYJGW+ulOnJ8o2FgZCEs78g4IYIFz
+tJ0rPPXgYMEiOKLUIM4SJrqexxZjPv8wJlwH7l/irj+GvMR5ostKdP/5+GXt
+S5Gv4VVtRTg2NS6tTAk5eTldXwaLQ4uH0xVZ4lB6ONeM1gvZwTmrwJLGy/XN
+LjAn7bdrGfJ4HuW5iSdof/dPvW1YQusEd/xE65V+VNSAS0Ivrh2i+/tIQaoc
+SzKLokZNML84LjF1PXw1qv19MMxJr3ulBj8dL1SqgrlzLlXaMC/JYnaBrm/V
+CHSGs9ckhzmZoV7934V5MGnx35FIbXrFUBvnOQSdTngEx+r0vSiGPTmBAZMw
+p8eF54J+M4u3p6xcgzntyuvHYONe55mNsGjLnZxLmG/7invGu2F+WNz9dZg/
+vrR/zJtaOukshmUjFRu8YIm61pfWyEtgnnfABZb+4F8SCTfebCW2MPe7K3q5
+sKe7ZJsmrLb7cX4mvNYgSXEM/Ygv3DT6Cq5z7ApuhUUPkr6eRv1q6/rSQtim
+uVL5COxzSkcrClZLyT1biv7im5oHvGHuzJLxNvRfIj5q+yXc/16jvwPz8mz5
+I8Z0feiE9kPkU16QkalD85Ds21i4GOe7+4ZpwvzbGadjZJH//sh9BnD5A197
+v7/hvWM9L35G7/+3O2HPIuyL+OfynbTeT+9GD8jgnEoZr3Daf3sdiSOYbyDN
+6QbNf7CCyVtgMMexc8M0b70yNvkvhhhw+XxTzM+JWrpLMs+Qtd8MjwVTxyWq
+nICv/rhiqJK6M50XCjda6xNijnqvxkN+hrPLreed4NjnUwNHUU9NUHktCea1
+2dlycV73qaG5JljioJ9mh34MMh/azcD8ghsmL2CfoFODxhao/2lEGo3+Hax8
+prdZ0N/HiR9NMF+QKK17PywdnvyzCebvvbf3EBybLJz2QB5mBjENB+l+dkNS
+EzylWNLuBfO+qkjWRn5mWi5VrAX9XU1tZmEf++xpI5jvMJi8Ce4XrQmVgVlD
+VVlVWLPjum0f+uNcuGhagXqxt3dG3qH9xsdxTeBrq8rOC6k77pWEop+c7z5W
+HaHzWo4tz0b/uuJwTTfYZp/jfD7mk+9KuGALi4oGe1YhD7b/23YjmL3UNToy
+h7zty5evpPlVBwcXzDAkKMh312pYvDNA1X+KIb9u8OtdR++XOZpvnmTI3OzQ
+3T1wf/OArNsEQ2Qb8g+epO6dXZk6zpD1QxPjJfS82i1Z+mMM8UxI13xN908U
+G/75B57nEVbPjOZXuE186AMs77r0OM0n2kNw7j1DhHdbmipp/lqBhiHw3VpV
+GWIJu/lYEqzPVP5M4AyzWlZ/2KAe72nt62SYp7yQFyZliA95uqMFFmctK0vC
++f5PPF7Ow/3FOcJG9GfW1ydnbgXrXj6vif7fnZQTu8M8v1s2X39kiFRZaY8f
+vX+J33Yd8/qH9cYFw+yTR8GtnxjCeSwUUoskMYJq5MNdIbf8EF1fWu0VMM2Q
+nJHfXXfB4pQHZk2wUMUk63NaX1xh/BzmRgtb1WHOqxuz0XBnrf6nt+hP1Nak
+LkG9zrqK3Y10npgX55pxXkuqvnEunT9dY+sx9BO/zulOBJ3frkTwEP1POTWY
+7qfrVUvDejBffNHmcJbOb6S75iHyiLA7yLWh+591tWkgz3KJhoI5vf8qIz/x
+DUPEWs/SrKlHf9ZRGGKIt0v74U10/eDg+m9+Y4jufpksWj925rBb+Euc1xVx
+K4a6N6yQJ8HzUXnffYuuX9R6sqWRIduHi5+8oRZezL1diffFqGbEDPOSbsMP
+NYV4P/7z+6bj1JzHNeIo9GuSf7uSml5p9WSO/n9hxf4PT74hSw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {1.7026940733168927, 12.067904665985203}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwl0w00lPkeB/A/dd1pZZJG5KVGKsPZJrfSmXTb53HlrYhSim27k+rm2lCb
+rBDTOzXLKLUVjjlWm5abt6Kd2hoW11u3oS2TIVNGXnMnidHqut//2ecc5zmf
++b/9ft//wyE8Zut+Y0LIOfzR9x+PBUumpvE4sqT0u9YnhrkskSzLK6+EfWsc
+pR2w68uBL6Jhkp/mdgM2X/LzGwGsLXF4EAr79v7Y3L+YJaJ89YdJc5bIuW/V
+JfAhWeiFVJi0x5ekwMrqw50c2DrU6HIoLPbiKj5x8fZt/ccXsIRjq+4ywzzL
+xzIhrPff6H9/NkseqCxmucD8kSNf55myJNZtT5Ar7Brv7HXpM5Yk3fD4loVl
+vbe88maxZKbPIye6P78q7mUTB7+v8a6Ih1nWcq0dXJtusySXzre2n/j+zyxR
+PSjbUgvLM12MPeBOhc3EEK130c0oa9j/uLRpLvo1V8i/todTucsur4KVhY7b
+A+DTbwb8AmGZlbLuBzrf3sR2Lyy2Wdhog/PsGqXSKJpv+b+ti+Cgox2nqFWb
+Cw/4o95+M9PgcLrf+5X3PsCGRBPlJjiouOznXPTH02hMXGj+buOCdehf3Ly1
+/RPN75jEtY6atAQ0wFrF6tpVyOtgi6LvPM3/bf9YCiwzWxHrA5e67xcVwKWK
+OUaEWjyUn0PH7zTUVTrQexqZcwDO4vjNjoblfwsRzYClEewCAazK3333G3re
+mYu8Pj7WWxjr76G+Dbqx0WJYlZ3+qQP1jz3M25MI6wVdkd3olzOluxMMa3cG
+GB4jn7G14R1r6HpHP78SE5bsO/hV4FJYXJF1XvonlnzuXmq7iK7/nDsvZiZL
+BNq4VkfY/JbCWDwD9/r8TOZKWP6UqztgjN+V3/I2wuzyjcHpRrifhA9VEfS8
+xKSSFwT37XA7Qwq7xkSoN8NZ5ZuPVdDxX19NvJpmCL/t1koNLDm7dvAkrJI7
+HzZCv5IablIKvMv96qQjzHrmDrbBqy19q1iax6P6OHfsZ/isuHU7HT96xORf
+sLldyqM9NE+bWbPdUU9EyN2QvbCyT7rrBbxLLlOH0vWcBXNOon7R8l2TG2DZ
+7u0vXNBfxMHkniV0v197Y5pgQVa120eal3Xvmx3I47dk3VQdzef7U9xmmMRW
+FqbBskyTBjvkV1Aq/OQNkyuVgT5wi9CGENr/w/vx3jDfZ11D1CLUWXNMbQVL
+dE09moXI831htwL7+cq12s2wmOukdYVFx5/ZNNujHqHndBLqkdc6fLcNNg+d
+Z1mA+lVRM34asUN9C50SitGf9bs7a3Jg1iO/Lhd5xEsKhX+HSbZ6iiA/34rR
+2yJYuzvozP0phuy8ohgUwEp7q7bjH2FPJ+cVdP2SDibMwJB7+7QtfnTcVG8b
+Ps6QiBNP98XR8cFafcEY7u9CRl0ZLDl8UbfiPUMKp4QuBlh+ctjVbJQh4q8S
+vvRCvfyuwnue7xhSeqFYkwWLd0cpn+sZIhdZWL6m/Zk2ttTBV6/I0wToX9m6
+5uZszBfvuGy0j+bR+SztB1i77a9VMliyyOJQCvbnj/KSi2AtbzL1Is7nfFnd
+U0bHE67Vt6A+mXukXz5dn5V32g71i+5kjCXC/IBoJmaCISTg2nyGjrf6bStH
+v0r2edMwrae8sebpJNarjU3PweSsoq8G+egzGq+b0/ojO5wP/84QQTBvSErz
+NInObIPlFjvGp20xv/Pshpdwaa+XVTSsnRh5nU7nT+ZrNDZY7/e/X15jP86m
+yd8CYPkN3qAG56X2CP/ZsADr04ydJajH2l5TEAhLutnbatTPF6+b22eN9Yv3
+P3qH/uRuiRmZMN++YnUH8igNe+y+BWZ7DC/zkeehIulWJ1j58G3Z/WHsv953
+OY+Odz+9sq4f+a73cLOCJXklIYM96H8weURIPUc38KybIf1ha01CqVUW3go1
+8k//GHmRunBkpKqNIexAwsF2mCRqt75vRn9Nb1850vpV8cvd6zA/zHX7EWrv
+I0Z7q7H/5IK/VFPvHIqLVuJ7iTN7x0H/JP28J1OD+dFdgd7UMZKw7Hp8fyH2
+sUepq157Cx+jnqx51peomzn+9Tg/6MztohxY0rZlYU475u+xi5FRh4Y+aetE
+vwdGT0dRVywONn+F72um0++rYKVHTVIu+tX2nmjS0Xpq+q8P9+L7yD7XcgJm
+s5/0afqQ73y/QjNYGSmUBAwwpKGpq/IC7X9/xjXBIPq9fkM7bYX1G345FQan
+1ilio2FlxfPIdswnR0VTmvnYL3Bp23XkrR9eahoAK4MUNTffMMSw7L/m9ZZY
+3zpUxNExJD58p8sm6tTJ8f9ocZ8zm8e7ebAhuQD/kkR5ouqbc7BkZU5cdyu+
+z02X1J50vCrdxwH56S3vps2nps/V9X+8eez/AXlZLnI=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.7973059266831077, 7.067904665985203}, \
+{-1, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000002274`, 17.}, {13.500000000002274`, 16.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.552325660469876, 17.180083206945802}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwd1Xs0lGkcB/B3rVDUiFnr1hj327YplyXqvEmyJTRsLusyQksZZMXslEiy
+gzG0FdJU09aRVJJbqIOlyyyJYwvt2tKNzoakRBrs9/HHvM/5nOd5n+f3+77v
+mddwZzwnSoGiqD34kZFSIRcbmmKTUZemdGUGXYtgFZdKexF8YdHsR3XYx/lN
+GFOPpoqZyUGGZN56b8RxmHl4wyUHuOV8eZKKPk31qs3v9IE97rW58OCcJ6wB
+Hvx6G2emGZYZxbuJ4UGVzZI5mFvDuFYJT7ONe81X0JS24UG9h3A9ffkbZ7gx
+OTxtCk4Ilcw4woWKdd06q3G/jh3PCDY6NclYC5ddr+B/wn5n5vq3+8Pp7tZ3
+WuAgR19ZAkxlXz++f6G++PYjcKWe//mV8Mz9P/4+Ab/m3lL4B/0IjtldkcI+
+g5smfoWf0JMmpeT+9UW1jvC0MDFswdJXu98hn8q0wEvn4Jb2+ue1sFvWmfRi
+WKh7QZANN4oqxLlkv8gIeRyZL5w6t5+c/0iSEQ0rnlUujSH7tW2PTIEzO8Ul
+O2D1pffMJXB6oyR7I+wxGpnaC3805Keuhh0dWlxNUQ97bVKyIUzzr+VlkXrV
+zMOZZP27+aYp2COLu1SVrG/VlOxDv43Fa82U4GlufJwcdjEssCbmOylYCJGn
+h1CXR9b3s2Q5TBZNWXyMUtYiDqE5p2HFyYbnpnC3pWkIy4CmlJy+qCH580Ud
+j47B6TcuzvuSfiak/jNw0zyHtReW37MWmrNpSnTOfeNROOlQ0+hm2ErdIbOa
+5CGuuxwCT6d897wX5o7G/BIN90ym+c6Q/QxWLHj6XXan/hq8J8PVDqHwQLCr
+9zqYtg38fQu8y/vxf0FwQSZHeRV8y6z3QRLcfz1gXg3W5Wl55RDffHHnPuob
+OhgzVAKzxR1xAlgeJ9xUCpe9/WRvDtdUOXlegVsWF3P70P/Y50OMq7BQWK6R
+D8vKe/vK4PG+k2YcOK46kCUlzshRNoEj5U7CY2T9vsl8Zbh3R9TgYbje/e7o
+HPK2OPUnIxHm3mDkqWJ+Z1YCMwxO32C25Fv4jFnn1FZSX2CZ9S64THTythPs
+U17xsgpOb714wBIeVGSEaaBer7zFDJJP/7NtSzPgVue3XhqwNDG/bQ4uuF/4
+Ro04asseV+ThGlQSQyzz6jAQwnLfpyuWw9EVXeEP4ASDACs9OMkycZmmIfob
+u3HACqZkbhp+sEamadd6kvcqSWo+3KQ7VO4PV5amFrXB7pyhWJJ/UlXy2Bi8
+pO3D1uMwP7Vhl7oRTU2s28utg0Uj793M4dIM06uPyX6bUuxtYcXH4xazcHDo
+bm87WPB+WGZgS1OejGFNa3gNMyuHhhNOqsZow7E9uamhMJdjc3QW57GXWHfy
+YXZZEWsAjgwzk4lhidLyl7XwE8UTw2dh2bTJCxFc0Kzy8DKsPcZ3jIBvjb2I
+roIVeVbKznD78ubaalie8SZCC66y7Z69BgcXXqGnkNcMM6j2Ipl3Lwl8St5f
+I5fUU3C/gqVJN1yc90BfBOv3/9XSDrfy3AUCuOCqzngX/NBl5OhPcGaAieog
+XMETxPrBNd+HU59hIxuFr1xhqepKPzbOL9FtEK+GY9VzTb1hNa5mhzHpp/Om
+QxY87Zcr1SH1h4Z8Is+D+3NCqybc7SU9rYS8Pny5rFEDDjCTG3vCLH7sMy24
+rL4u4Tc4uGcwjA1/yEzj9sGNPbkWq0i/9T/8q22M3Ev7Zkg9tzNHJvzg135v
+I38k54fffZYNB8m+lqWQfrd62tTBzFfNoUWwX6tTQz8s3qHm1gC77emuG4fv
+2p84MACPnI5qn4UXvk92+D8kown9P0h0WZg=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.876835367704164, 7.161502436909525}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJwt1Qs0lGkYB/BvbTZDGJJGW9LN5SS5FVvH9tUpTSJ2CmMrlEtyqZkhl66I
+I7cZS9nZCtOWcsuO6rQV1USmabXW7ro0ExbRkmKQEl32/7bNOTPf+Z33e9/n
+/zxzvpkFu/dzQjQoiorAm1z//7ClqU+vOTRF/xZ+fBEsW91wcsqEpo6WjlW7
+wmGtkqhuWD2HPhcGl6REC6pgqVO/0wmYmS8OjIQXljPPXCD312XVzYTFfpaa
+t+FEhrKvlEVTW5bFtDXBYl75LTu4bNl8yT9wF+OjrHI2TY2m5ZkOwJb8qO7F
+sPG7kQ0vyf3uExvFxqibJXJ5AecU0Kt1YePymIBnsLr61mjaLPQheeHYTuqf
+iYuaAYf3ufIb4cdmxpsLjWjq+R/vn5M8rNnfl9CwT25qXjnMzaulXs+kKee6
+mfvE5Dwp21gGs3NvpqaS+Wx36CqCeQK7p9Ekn/RS0il4VUddcjDJp8lhS2Cj
+wWI3Lukn2/HqHXjHo+UaXiSvtV/SELx+iHZzJ+uabQ+sUX+LwdwfPeB+5Ta9
+WDiefrN0G5ln+whPDltPhbMCYd7IJrkJ+vlZonTiw7a6CxUR8PPxZvs0ksdr
+ucsN+OyymORzsPRC4MIpWDWYcOAurLCf/Zct5pUzg+XUBcebNlr4wJSFfpuG
+HeZa01wYBoceUXHMYa3MofBQ2KhWWLSJWPlv+hZyv4vOtQhYNin43QyWXTbJ
+y4Sbgl+2d6CeW5+JdwlMe0zZkO/j3SGV7T14wt95ypTkM2Afb4G7ROmLS9Df
+2a5LLb3kPE7vXHPYsMKsZ4jk2VFUdxbzul8ckj8Gxxfkr2HCBx32GhGzGk62
+phhinveZVS/hHIGo7oMBTd0QvFY/Jed1e+gmwxku3OOtsGKafoAhvCM6dLWc
+5Cur7L3CpCmB0l7rGtzPLVkaCpcliAYlMHetubYN3B68Up0Ns3/Vz9aBV5ae
+nn8YNsvOevJeHzm/lMdFwmEHxkXTsV7ofrE7gNRLzpi+GF7nbWXpS9z2kzkH
+Zk07qubAvBNlhiKY6yG/uhUWM8SBbbD2D3G3/Eg/w29XWCDv3KR8kxBST9iw
+7yD8Oneg6gAsrX5a/wj2UlrZkfmLg6o+mGAeF6Xms4philGs5w/bnr8trSX9
+hF5Zfwpm6sXak/mwGvdE1cCrtBMrNO3xfLisGm2C9U4o5lnBUtXfn9w7/PCQ
+O8yeF+VbDR/1v1mzD1ZoHHkigtnU5W4h3C/yZXrCGWwuVQF3jUh8J5Hvqwcf
+NtfD3KyGljyY0nGdpyL7rZbsNIV7GacnBki9nTSnAP3XxvXlviLrpooMI7i5
+c3/zW1gimObFxLzd99QriWX3OtsndHFNKBol93ulWDgPzqApm7HHhYPEPR+P
+DOvg+ajPTO8kVvt/rQsbd6YlN8JmkYmpbtrIuyEotoasqx5OVjBoKsWeH1JK
+8psIPZ1hjV0TfvlwU+p5xZAW8u3V8k+Bbcu/0fwT9or+jh8DByrkEx3w/YRd
+x/aQ/Y7scUPs5yZe9PEn55/i10fAxnHZEj/S75qGlh7Y+q72E2LZIZsIPvII
+Ixu2BsA8WWavPvIaOny7JBxOvBeveR12HMtZcRCmnSpdt6Pf6w8qnERkPgZB
+Vm/g8C8sKktI/SyfjCTMpydYW03mTwftHBmFY6Y2LX8G5ziEqdbr0RQnvTBR
+ywGucR7nw686k3qXwnSSj18sfGWz2suTrK91rfCE13XkVPMdSD2h83ucl7Kg
+e1EunHjmwqtjsP0YVfALzBOmJaiQZ/TwHZ+HcOBG7wEmHDuYXtxJ9nv3yC3R
+z+5JDcYwOT+29a4l+h/Cr9MkLIsLjGAxPv8vOX6+atH/ASL6aNo=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.123164632295836, 3.6615024369095255}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwt1A1Qk3UcB/A/AjlexFHIazAUkJERxEENAntADpUXJW68nHgMZtRQKIPV
+ASoN2nByunjLKEYspGMIcYsY7tJiFHnzRFkkuHlcIpBwNAILhUCi7/+u5+65
+/33uefl9f7/nf89O4btp+VsIIYdx0pWYNnF4M2SOrlyGGF3GzDNwe2xrVQfM
+M/T2tsGSr9M/48Oq9HESDc807wlxhEPV7wxrn2cIKy+ieDSQIdzqDb4bPHQ4
+RX4ZXjoxoijwYoiN47GMi/DkK1cr+z0ZEs7JyaFmWUkbWXCoaU3bCUuKGn4p
+8GBItHOC22041yYybNqdIcr3FXYE9SR2/hun4NLFOc5rtP6H7+2LhLvjHxwo
+h+UlEpk3bJn+LkgHm9r+knFh+cHxikVYvUYOZcInZSXlXkEMYTuNCdvh8C6u
+Fw/WGQO5LNQX318tiYMNVbyCMljXsz5Jr4emnvl3AWY7TPnT53nPHJdmI/9c
+VELRPJ3fNbGrDtY5lMV00nrHw6zW4aecg7HZcNaktcAb89BxHtnbwiKP5EZP
+2H3QqO9Cv6kZJ9uWcH9pi07Pp/OpNSSpYEeflNdtYd7qE9tgmFlImh/cjfVG
+81Ul8liCkxsVsMTekLeCfriK2cUimARrRAnwzNYAQR4s79E6N7rB/nX3RPDS
+yA/9864MuaMfelQFm8z3tvPh3JbU37upCw9JTTuwH6KjTFOwMZbfUAEn913Y
+4Ys88tIwQSLMlfnkC+DaNbMwBn4qlRQ0w+7X92dmwP7nlGQEJm/JEuvg6KOu
+qsewceflh7OwTmrb4YB5sNiT02+gvmXbvlYn+r19TrT8DLdz+gs2cL9vXdQA
+D/kJ+SjNBOsjf91Uwaz6bxy+hNWJleZlWJTcpThC52m6GfEi+leb+x6y4KZx
+j02G7o+agDkN+pls368IgSfKysyZcO2fYssTPC+NO+JiDWsi355pgoeVSV9d
+CUA/FQlTHrRe/o9LZXDTJ6uXJMjHuunwZgrM5lwZGEM/Bq+Lr4bDoqZCOz9Y
+o/o7IQT2tb/2oNiFIaerRVZ7YbUn99TIcwzhB3mKc+AsS8WuONi0HFh0AU6t
+Kvl09FmGHDCHa6/D8rPcymrY4MjPtkU+vVUpKw+Ov02c4qlHvVqF8HLNb+Vn
+qGu+XZHDXIGsh35P34GIkBE4+e4XRbdgXeC0/0uoxxvfXjlB99MLijUl7Lg0
+tngXZjeG9zkjr2bq7K4BOp+PtX9UwvzZtYV6OCvG+vw03C1MkabTet4d1cHo
+V/35sRR7+v7Hdz7IgsUNyk4t8s+9XL9bAA9v3XbpKJ2XuM6yF2ZH3ai3gXMj
+AiZW8L4hU4u+158hq4OzP52n3rNhXQgTVcj6FjjUaCwMp9dd7lsJkff0rbQ1
+J1j3Pf+fXvSnKXbJ3/D7/7/mjH1OVz/mP8lKx0w=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.16438510075492, 12.373697879094095}, \
+{1, -1}], LineBox[CompressedData["
+1:eJwl1AdMU1EUBuDnQsBSI45UaLHuAZYqEFGoPhSwisQiEjWiVHBgBSxqFKmD
+RK2ioDWGpQYbqEnVxjgogiuiKHVECeJi6Au2igmBgqtiLf5HX9LcfL05955z
+8s4bm7x12Yb+DMMsxI/W/48/ywykdRzLhJYnauRw5MGaQ71jWWbCD73yBMz0
+VjJfYMf9rsgGmOMdKXwKc+Z+X/gBiNNs7CyD3ftK4xbATpd9qhrmeQa3psP2
+XO5tMCwYUJiQDxtD3Np7xCxTkR7yRw9XrI7PM8GRVkmREVZm1k9bT/Zu22yA
+rWVH5gph5Y2esAKYu87TXB7DMlXbGmP2wMx7L6cEtpbI5q+G60u859z1Q172
+EeJgWNBW/DwJVseem+IBu49THxsFW/jNlhbUE/rJPdEqYpl7DSP3XoUd+Trp
+E1gnbTHnwu3OW1/rYKeX6s4m2DL+yrEWeHn57dJYWJnksg3CefdSEobKYH3M
+TH4EbLxwLnEWxT/5HXsUNmU+WEP78gNFCa2wYfF+1VI4NeWuKgT51zrSVqTD
+RoPobD5coXq3q5D2F03+ycG8wcLzj+l+k2PtSPQjr0AUM4jqKU+LDYJ36LW7
+F8K67JZNctiU0+SgfocfSAiMh9O0JcmvqZ9dioJlcJUhJcxvOs73nDU4GpaL
++7xSYGnW2R3T4fBuobYMXrnt+1IPWCG7kdsEX8nOGG5GPsvpfwnL5LTN5kXB
+ARQHF7Mu30eobz2dC2ctqtsZDnN0L9zOC3poQv+klBes7Gfu9oXzKG/Yznp9
+PS7Ee0l1wWL/sEJPuJbqJvNDF5/yRR6GUxo78sl5da0rAFY08J8/gnXd7y43
++WB/RpL5NKwocDWWwvqapxczYOVH7a1sWG37MymK6oufV50BP5s4+rCY4usu
++tG+KbCvpz/VG71bdgbmhr2N6qT3TdiY/YLiXa2/PsJT1lVtGY77v0XLBTa4
++Lx/bzIs2D5Q0kMWVZ6shplhVVFDcF776blx3qjHPXPJ50A4i5vKpsLWJR6i
+JLg+SHOwEnZ0uu0rovpsxiIH3LFKK3sDWzJsu6ahXxzNBfqhm1D7Ug4n0tyQ
+LWskcbCR5gpWN6t6I2ADzR3MugVc8oE7aC4D0c8RqTeb6T6aW1jgkpVr4WCa
+a9iyZUCDCG6kuYcZ7YdcA+px/sJ3AVZ0RNT4wSx9N+Cs6OofOvTn3yNFnbT6
+sH8BRImRiQ==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.763809742330267, 6.7638097423302685}, \
+{1, 1}], LineBox[{{13.500000000007276`, 16.000000000003638`}, {
+         7.500000000005457, 12.5}}], 
+        PolygonBox[{{9.98173265946094, 13.947677384685548`}, {
+         10.816718930329426`, 14.897834175673825`}, {11.219815750748694`, 
+         14.206811054955079`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10.323799910437668, 14.984057296392571}, \
+{1, -1}], LineBox[{{13.5, 16.00000000000231}, {13.5, 8.999999999998607}}], 
+        PolygonBox[{{13.5, 13.1}, {13.1, 11.9}, {13.9, 11.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.4452, 12.5}, {-1, 0}], 
+        LineBox[{{7.5, 12.500000000003638`}, {13.500000000003638`, 
+         9.000000000003638}}], 
+        PolygonBox[{{11.01826734053906, 10.447677384685548`}, {
+         9.780184249251306, 10.706811054955079`}, {10.183281069670574`, 
+         11.397834175673825`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10.323799910437668, 10.015942703607429}, \
+{1, 1}], 
+        {PointSize[0.04], PointBox[{4.5, 10.}], PointBox[{13.5, 16.}], 
+         PointBox[{16., 6.5}], PointBox[{7.5, 12.5}], PointBox[{13.5, 9.}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T5", " ", "P2", " ", "N10"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbf/cgdheh/fihjgigjij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbf/cgdheh/fihjgigjij.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {0, 44}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwt1As0lekaB/DXuDZGKjTOFLnsQ27RkKOi79MuNuM2KoRmqShEzDkOKp12
+LQ3nRGl0IbLcRqYyo6HGbaKxNbvk0lRnq8SOQmVcdyWk83/OOd9ae+31W8/7
+vt/z/L9vb+Mdcf4RHzHG0vCh7/9dGjyb/YDLmGdhz6v2K9R4Vtl5Vc/QhGf8
+7ukPs6o8S72mkesGy0Mb3hjD1cVR15Jh1lJWEK2CdZm5jlWwOH1Q0q3MM6mN
+xzEFrTcfS0uBJSquvWtMedb0VaW1Fxx0M8oiFTbyU1UnO/mOurbDYev8E/fD
+Q/HFU4sFsMuuN/dgL6UrVqFwofcH4SbcT8NS+iSPvCsuexxeKqj3vA+LT1nJ
+ytCf6JOud8p/xv653TrRmEdaYd1mQV4bWr9SHfdlBlobycLdugo4I/Be3BbY
+6ButvAvIozDIZWkI3NRSEyGch/kHE8sDYHG/0+FGOPRClY4HrX++Uaj3Mc8c
+3Abq7am+49IJDk4YzvLVJ+v7aa2Fy/u/bJhCf/zdSZEavCDk6WcymKWulRTh
+vPBq39yrVL8RN6YNd7+ICD9DHjXV24J+En5YdPIA2brNNAn9Die1q+2med30
+9h/EfHzjv/cEw0abok7HY359iZZuIOVzubtuK/LZfMtuchvVAyfOrEeeclvF
+t3G0X9v+ocNHqG+P0cqgvM2KO1Yr8UxF9l6ziva/EKgFM/SZ3Hu7H24KPfF4
+9QeOKWY/Njag+YQKw4VzHFs6KsrYBvNOrefWv+fYgk8f8yVUD74bfW+WY37p
+Js7D5AnjNgncFXtoq6MZHOijp4v13YUnIw+RNxhJ62C72xPCFrLdQM8POH9q
+4uCgqjnVj9v24/5eFi5HOZhXvjRdgv78lAQ58bD8L651EehfVHF/8iy5xWWr
+DeYL//xOZzVc+H2UwTicXJZ0/6Y5Pb/8hAvIg3X16LbDTaOLg9yRV+Tx65+2
+0v7EFRelsKJ3Sdt1qkdk/EuAfDVm0o9epH4OpZ/fQr+HYPGzE9TP4WZhEBzT
+s7Pjv/1sut5oCYdpdG71pfr5Ifc2nCcP1K60gVnOHpX1cIp5JptP530mncpA
+PzEjKyMmML98wPZRFfrNacxu64Z5fc/7v2A+tuvJy3Y4rFe6rgrzD7c7G96m
+vI6VZ65BPjW+J6I7yIKcZZrI83KjPKqX9o/sK3g1jefzs6X7NNx0aEXnyBTH
+lpucblhG86XvX2T2lmORRzwXU7/scV1Z4WuO6Rb9ujqN7CnW2aPgWI6K0xXK
+j42Li49Pwkvu1mkux/7tZmwhbJ3RG7wZFpuXMMUEx5ynkuILyCaKjFWoz1pk
+tA7CzD27pgNe8LZIuMIC+7+cnqvB+UY9a9rjYLFTYtkz3D+1UvnURbJQtEGI
+/jZsH1N+AvO9P4c2o3/n+oP9qpbYr3dG3x/zbUiMDxGQvR5odM/g/SvMZE4w
+b+I25o08FAYTMh5mSl8cO433S/+v3QEcLJZEeRfT+23zapsDXLj2GzV75Juf
+omRnDMtvurRGwwmedhHqdH7F/KwEOEti9WgI/RhdL/b2gZ0vTOX/Rv3t8+kZ
+xXnOl3Nl35FDPMoGcL8EwbnaozTPrZXx6ehnrPir7VHkOScrOfrNmWd+05/M
+ef828w752JeVCMnhiaWvML/IWDnShc7b2T90A/mIyuYErlQ/f0xyEnkqJmWp
+vlRfo3Zx7zjuX76zORJmRZvnyUY4FhRw/lIGrZf5DNm/4hhTacuto/qeJVY6
+QxxrSLI8Mk52C//1+HOOOSXVzthSXimqorp+jpULRnwSyHOp9sV96M/7cFoD
+5XctP+gLOGZTfbqaFerKf7r6E1wt3WHqR+7QzWrDfvGNaOuzsLjP58U/cX6Q
+8O/ZD6m+Q8ehY5BjoUp8sp41rGYacOglxyRKBus8yI6cPOkPPE/zivy/kfse
+1HqMceyUjW1FNswHLyp5gHnH7B9OlpPTNgZ7IY8s3e7wKlqvPR2Vh/druPH/
+XhUzdQX5lfb1SL6HxdaxiYffYL1/a+1ZsnqK4xzc5fiy4x90Hv/6+TLkr3Hr
+90dhcJNffP9T1K0dk/o4qmve2SuEu/UXzjckV7+tdMf5yz+5lfke8/Gi5Xmv
+0U+nplKq3Ir+b9oKAvH7UFlpMyqlPM45uB7APIofjU7XkCW7DJ8Oc0w+991Y
+JeVTZP/Ht3g+NaHGJlVUj1+l//kzjj37+kl/I9UTZ3VbeznWJD1wREaOLaot
+kyFvuezhO3Kn6NS6To5VRh4MMKP513dMlDbjeRYUz4SQw+bphf2E+e9ExuaS
+jdRfaKVxzCFmaq6b7LfPcFFeIxN7DjQLbGCN5OyW0kYmemRdupfcZRGrXdiI
+//+XX9eQ6cr6hanQ9wr+PwSlKl4=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.5944997717265688, 13.169947406655712}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJwt1Q001WccB/AnoXtauM1NuMrl1qgktVhW/P9JEV0RRTi6Mb3S9DqsuKVJ
+7Za7jVBebmrFUZFsySHXKLJR3bFipRuSMK6XoYR9n23/c+6553N+z/P8Xv7P
+OX+z4C83hWoQQkLxo/9EPYlnGkv+fcxZwp5XKfU4LCk9OKTxsxlLuOeScnoR
+r9IQduyFxQVdxRdh+Rl9/jyYvWERZAgfLW9+pxKwRLB5kfYubZbMuxZ47QrM
+iqpnyLRYoqhRjEfANtteS1I0WRL4xjjShdpH82n8VJZYvrIwXwAXbN8m3amB
+/2NPpAaw4mDpvTVTWDJjx0i1Hqwm/mXzCUt8vqnYzoPlxyVLlkwwJMEybq+Q
+rr8hD1r7gSFW70fjVsKquRflme8Z8thsf4c/LD6RdMP1HdbX2sXE0vqi7z0Q
+jWJ92t7xq/S8ffVri0YY4kl8hutpPz0i3xh4xSUyPETPc1O05sINXJssA/RP
+HmVfssH+Io5T1VJYZef+BQfnO+82jXWm8cRbx4XIX9TKXSeCBb0B4fvHGBLW
+kPXBDZbPIeEvUW/7pprJVTTupb9jK/rxyxy2EsKSR5EltZMMWe4T1zaO/I87
+wpIT0b/JQAah9ckHIpvNMB+1h7IxifZ/WFj4A9z5UGbsA0cUL9Jugdvv+Dbp
+0PonBQfG4BpBWmGCKeImF2M64eL5h6cPzYVrNlRfhmXJH2cHwzJr0XRruj4r
+3aFpDvKEq03PIL/rHOf1gbA4ZOadKNTHrruZ02eC/K/qr6eNM2SX2FF6HpYr
+az1Ool9uj56HN6wa4/M2YD4FAeZ+FjAbeHRAE/MkDkqePo3rmsdVDjEkco9b
+1yy6f8EFQfoAQ2Tmpqut6fkZftOy1Xg/JrXJW6mthFp1fzHEku+SlET9kTJQ
+3cUQzvJLq/6EJVNt86s6GdLZ16K7APWSod4JvzcMEXy3Z1UULKk10C/qwPrW
+p88f0HjtM6sGWGBRJdRB/5J7Wcb5WM/VPp7sAiuaBq8te8sQRa7rigPUd5xD
+13YzJPX0y/LT1JHc8mrUIzt6/9a3MEm2v+6Gegvcd0uOwGJtoaiyH/fv9PL0
+9dQuzcvsBxkiySuK0qJ2/r07Bf0LcjOkeahH4KPU/O1vhhjGP//MkVr4dUvl
+MENG+btuK9CfWKrcF4H5yUd6O+3o/BaHdtyH/cJeu/7IR/6rY0tLYcsXtWlc
+WLzDzXsj3PmqtPKYMdbr1EtjcZ64IeVCvxHOv9sf5IV83J1DORGwJDlzSx3q
+Sy10nZgwxHkuPvmTqJ9VemrIqd9eSevrQ3773I1bYPaBzbxEzCOhxzZFSOPN
+I/ZamJ+kV3aWQ+0gfRHdinreu7dpUgtFVsueM6R4t7/rbOriaH/dBoZEnDwW
+7UDdoTt++SHO8+UFHaKOCJR1lzAkR9dRUEydOt/2ShbmG/lUrIl6iefcosak
+csJdGh/sQ61urNuQU05SCyocL1O3Jx6oyS0nbHcmv4da5Wz9UybM525faExd
+XjN0Cu8vwbN7K3WrU1VIIe6jn/eKr6jPTtn88BfMY/Wac7HU1YR3tw7znBlu
+tB+WHPm1vRD113BExJ3Go45onG9Gf4ZtYTo0vn7qIyMV7nv6mzN3kZ/d8r1d
+JubxuGUw2ovO+6Zv5e125PuwcOUz9Cfh51Z8jvtoeTM43gtWuLZdMMI8Of2f
+5lXMxn7j8F4HWBVSFLgYVqRLAzKwXjHREpNmAJ8KHrR9jXkdalVPh8mJTzx0
+2xjyrDHbN34W9ktLnGxRj8K8pEsPlkSFnDrRhPvHWK7L49H8SU8yn6Af73yn
+AB5932VlHPQ/Gib7w4z3/3cjtey/74g++w/yhW0e
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {0.30479999999999996, 7.7452}, {1, -1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{19.999999999998543`, 17.}, {14.999999999997012`, 17.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.5, 17.6952}, {0, -1}], 
+        LineBox[CompressedData["
+1:eJwd2Hk8VPv/B/CxJCqSGzeUkAoNKWuWa8oSskzIlsrWj0q2XI31zi1JlkxJ
+TdahCKFJKVGyJURGhEIpQuWiRVlavq/P74/yePqc897Omc85Q8Er0P4gP4VC
+4efDP/ykKJH/5GgUcfJzNY0SOla+xB0eYnTxh8Gxni0urTDvM9N5EFZKWmNj
+sZZGoaW2a29dQ6Mwfy8ueAYzK+MuBcNede0dW+VpFI8Aa5fL8H5mVnIMzLGQ
+si6E01NDD7aS9TundmXDIdOmm1cqYF0xVjsKzrud2edK3CU7agJbzR+NuAwH
+PfmoOIv8fcOiRzth3k7BmExY/AbblaJIo2h47tfQhq3kBS3Ww+JJ4f81ydIo
+EWnWRcYwpe7TTSd48k/7fXZk/YVkynsZGsVCTvm2I8yTzf87Fn56svUwncSr
+G+ajwqwktysmMG1u464RaRqlqVj7xWbYI2Sgkguf0PbulIJrx6tfpcLLLv04
+PY/65J0eeKbAyooOsoMwXax99Aps5VtWUQvTFISXdZLz85LCrsHMJXX+ksgn
+vtTRPZX0G7KOGwDH7TiwOY70azGY+wLOnqcF/kvim7U62KOf1Q0CJmSdZkjb
+2Q273Fh6NA1mnbPKdMM8hEOkTW7A4ldHTIdgukZDcRc8JCit74H5iofEy/Cj
+fo5xL/c5fFY+LGcbHDTiaG2I674/Yu0Yg3jL+C4WfMfopE0NzNSMKH8KD0xb
+TS5eh3qYnw7OwG+7yyodYLroLjMB3Bf3NdVO5cDMIobWLNZvR2pQ38NB1Pg1
+z+HCZxWZ6ko0yrTm4rEM2J636PNR2IMp7GEH902ln86Ha6WzFL+gvtAEnyXd
+cFDn96OJcIHIzbhZYpeWudVws4VaiMR65N9X3FiCfv32sW4qwCzRrNfGsE9M
+5eUNMO1Zu14/5jV9RW2CrA+9q/c9CbNa1DtWwrV6stGG8IfwrDoKOZ7V2ysC
+779snjiGfPInJvkmcT26w9VUn8AU85y0DzAjLetBKcwJyKBScPzhnFeB5+Ah
+y0pXdTjpY+gBBulv5eHSYzB3fiDeB2ZOvGhshy8uXL/pTOLJzHptQ73Z8dN7
+HGD6oZPny+EIz0tsF1jDhNOhhX6X2TF0/Uj8CivdamKRMydPkHmsuFlFw/z+
+Ohy/7xqZL2uvYy2caWam20Py//vZUBvX5+zdY9Ji6I+jxViTASd1dpXawNPV
+o4aT8NDvv2xSyfrrwi5JfG6/+gmvGCTzCWQUKMOsv+dGlTegfrHRpZthuc2r
+roXChatTF8i6l6W9ag0cz5CaloL7dsl5CmxE/qaxhi+I39qkdGgHLG/UEVEA
+zz8SzQ2HubrDBZbE7nn3rsHiqyKT36D+brezDU/gWkvPDyGwafOWbe/gIWuJ
+Gn642UpW8CuJ56UqfRHzkNn0OXqWxItRHdsC+3Gb/L8QzzVUvcQ80x9PzZPz
+6UatWRfggPNPijtJPoeGUS9YPm3YvJKs/+yWtIA5y2Q7Mkj+0pgqM7hmtsQ7
+hvSzRcvbHWY69ah7wUzqqUuJsOCMlK0lqe+B2GAnnFDyvVobnnYSeExFPY1u
+xgYqMK8ifznZL/klg03XwxrB16sk0M+G1U7fVEk9AnLGabCPvs4SA5gSw39X
+FvOJSNdv20Pqc+mSyIU5/rtWRcIWtc4bxTFvqYwze4vhyonTDlawDn1P+luY
+ddb/XRRcsyEvQlEZ9/fbfYIFcH0s1d4PrvXjN2iEaVXzuuWwR86VuB44oip4
+1S9YubHdcwCOWqP6xFIF83zV2vKcXN/8HJVUmObx8K8G2DSlbX0fzFT2rcmH
+1TvrX0upYq7mxffIc4Gq4XHPBmYvPb6IDt9fZOsbCU8/ZT6Whds00n9lw+Lc
+vQ+b0Z8g0+3XXXiIa5LtAn9LnXFsgikVPQYTmI8630uPVph+p5MZD1PCMyca
+ST63+fktsPXv/A3kfO4B09IJzNuwquVCHszyL35HPj8lz0wFz5B8X0Jl8uCB
+w7wwf7LeuZfHge09k0TtSP7t5xMq4SElzuetMC/F59E4PO8btUMGrpXgLGxG
+vtiQkhkhUl9O0p1Esv9R5NvmMQ/x8o5rZD8cNX+s/53M65RKWwj6kTq6w/0n
+PKSfkzZD9s9cs3ei5Pyi66J/YR5iwtQ1KjCNxy5gwtavFvfbkvp8YlbWwrEi
+dqdjYGWB5O9zcGi5hCLpd5ZPU5WKfb+qiWnznawLl/Y6wnp8292NNsFJZikh
+cGiQlPdpmP2I4RAL/1pYatMF09r3XT0DD2Q4f5Kj4vp4jcWegN+Oiar6wazl
+jyICSXyZux9KYO7wu/jd8MuZ3j0fYcbZHiVVOEAsiaeghvvp6uGNC6hvJNL7
+DzuYd9T+XhNcVfdMNwRmBB4yTIGtZq7VJcAau0u2OhMvUrzKhpl+g+sUyDy+
+hu7IhDlTLxa9xrxi31QcuQjTDcOVz8CNc6728XBQM/u6KRzVkPvPMZjmcql7
+Jawj8HeDK8yt71r+gzzPbrooGJHjq3R6F2D3N+bVa0m83dw8cnx6unm1ADwk
+YD1sRu6/oTJD0h9zUkzkLFyZLKDTB4uf8Ur9AJeHO/q0kf7rb0hSUa9F2Xe9
+FjjePcT7EPn8VOxv7YCVebHvi+GCjILmIdjF9s+tk7C9zN6wHzBeWG5rYH7u
+tvfyFZG/9n7aJzLvTImUKntYbyY6oQimXrjCTSTrD4T29cMTUwc3tKmRfdeN
+LYDnthsn+IiEOuIZBfDk4QIJ+nl3mB72bdlWWCf1fmwhPO1/qUsH/mGdJv0V
+bk6eoJL3nvqg85uMNuP+eKt2VRbWi+y+8S8sns/Y/hP5xm3cnzyEGW++xTyH
+/Z0SR2eIDVy2FcD7fKf2r9DAPkw1zgyGc9Qz7irClReDlurDid7JderE7AoR
+fniqrpOhDWvcOS7XhnkMCvms0IWF66jV6WT/ml42ownTe4oUgmAZ5SUPqfC4
+7hFrW/jXozJtEr9WrfWFDvl8BBrvkCTxLRbmVeEk5oExIVg+47TvJlg4fsx/
+GvWyjjTu0YPTjbvju2HlYDZjN2w7ddfwPsz7mc8fRuKrLYougvX6Ksuuwv5G
+wwLZcPyOte398LJGIeMMcvwirz3S6KfGqJSWBwsH5S64wVbrXW/fgsff3bHI
+hguZj3o74NrkNbeHYDmtvYxvMHPwXM1azHvnudyIP1AvzZy+zBU+1/ZbUQPm
+KLyOToDj3l85QYcLTQ6Yl8PC9S8eHiP9JjB+PYVrVjx9y4bFvWVvvYYHJ6pf
+18DNAlFTw3DxxMfcEXjowKu6ftjIacWfIlvQvx2l+jHsWpCsvwmm/6E8Xgi3
+8CvJW8Hi1ZLNTHj5kpKfPrDerV0Gu+H/JPZrRsJ9zx2CVsOSdzztk2BOBK9t
+BP2197gqsGF2uVV3CZwaV5OdDVtcaBI9DkfpTlA4MNde870ZLFM/disTdtn5
+NF8W/vh80jGNnC8Wpz+PeRfFCJQkwKz6PduH4dzzd65Ewxrrg0d74QHD08aB
+8PiRz/19MINreM4D9hBOtB+FuS1FpfYk/8bY77/h6gR6rjk5/+W6WSXkE7nn
+ftCI9GvqsITsnz7Oh57rkvUZ1YhEuCs0qkCHxNfsNWiBE2TYB/RhebtVfEvR
+/7pz6o4mpH7l6N225Hr43ebshguPuV5lwdXHQ1UOkvrH/y+yAz5gUZ5B6h9P
+nIsSxntzvsry4HSYcvVW0jbY2VJspgquzKl44wF7vo22fgUL53pIR8PlrOMx
+AlsR323ULBmWkrwcowJXLhedZcHt30X07GDeTK1J/Dry/viSfQyeHtnx8Bi8
+e832rDSY/vFHlCMsWmbpdpusFxpRqHCzVtjiDpg9T1f7gXrDhxaE3sEuhlna
+5H7x0zOcmIE1LC8yU2DHB9uYfJr4fRbjvDOc2t/XsBget+j5pAB7X3s+JQzz
+KpeKfsL8tn0NCFkE021vyT8m8/V6/eEn4sVrKsmT/WSnULfiF5jj9IWTAvfY
+rBcahYM6bFrJ88t8rcrlXtgjst+CfE+SrBKYbIYpfEU7L5D9NM5XuhoWz/AO
+KIM3j2zbeIP0s2VuhHxPOqV5YXkBcWmYO9k/hc5eKOGQfnwfrzaAb2gdupkD
+M+wfSYXDgi++5l0h9RkMzFXBNuquz0q2kue1u/Uvsp+a5rqSfJVf/jlFw/y2
+j5TJkPlZiIoo/wMn2YXVjpH6AwIH7sLRuZH1guh/1bPIM+PwD4Wjh9eTeag6
+H16O9/hV93L6LWBKs6LCJti9QW51AMywdHqkD6tPT8ldIOdTrf8zgl0V13bc
+g4Pi2eVa5HvDCjnZV2Td5gd3LbyE/B1AC/fP//9xgPY/mqO4+g==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.0723744310654, 6.280370328210516}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwl1gk4VekfB/BDhmsrdBMSyhITum0yBp1QabNniRCKtJAwikSZukq6leWq
+JqbuY4ksIes/opFUY4non61Edjf7UJrv+//f5/Hc5/Occ97f8v7ec63y8LM5
+LEhR1CP8kW/q2w98dOj/f6vSFMe9VsZSl6ZUNraqDsHa+c3eSbBhDWvwBUzf
+XPHyAyw3pc5KhNte/nNs6TqaCvl9Y/QB8rztgKwxnGI2qsWEKXPO1gNw2229
+uprVeN70hrI3sXF4RBAcU7Cowgtm1EhxVWGJM8KTtnCgxi2v5lU05R8b4KAH
+MwuXLrsKp9fsWLcYputEo3fD7p58y07kY14VrbUMvvtjyXQG3LBQXDusgrzS
+Km4Hwmqj+tFNcKBsxvNtcFxQ8981sNrI4TYmbKZg/MtLOF3i0SAf/agMV89o
+gzcVFyW0wXZebpYTcPn8kg9v4NkU279kEU9T58FCI2wW7q1Dww1VF8/3wnI7
+c5yOw7OSphIMrD8p3jGdCIdcMWTrwyEWWiUVcEw3VyEIfu3Wyu6G+T8b7yyD
+2+lvmTOwttpBKQbqlYu2HRJEf9zj3yk5wu2HWLkUHNjuMJYGC12bkufjfjb7
+jcAkzG35KtoIt/+5P0qRhT5qUuo8WHj1X2IGcJtkS50vzEg+5G4Nx02cXLQG
+vvfrNO8QLGTM8/yAevV3VTn4wtp2JoNXYMPvZq7H4Fqv+FZ9+AL7wU+HYU2b
+WcFGZfQ/NWHBAVZpe7zXAJZ4Kmu3HWZ5si/kK9EUr8LsoC7xmZjqbXCtvUUm
+E56t5MgMrET/L0X1TyD/Yr0F5Sw4S7RvpgJmL45Wj4GHbehZDuxukt7ChkNC
+rBR84XTVHLcU2GdmXsWC1C9rza6HFfVEDLfCuWFmLdKIV6B/fZDMp7ti8ctD
+MN3Q3LcPdrx6jFUCM98cVTxO5lflop808u9+bJbBJesfyfroCTuezBpohDUH
+u9Y9hC3SdF6IIf8QX6G0TtjEufUgi9QTNhr1DRb0UZZzhPsH9ytS6NeVp776
+EXBKcsHNL7h+83LJfCpMpwR/yoPjRgLy6kh/xjN+uMHB3fpNA3B6KN94Evn5
+OF1nLlqP+Yx1sgmAnw5vDV8G+1ufXt6FemMux55SgYsNr+2nYcf/xBSqwuld
+PL+7ijiPjBVnlMnz1YqL51bg3Oz3s2LCs+Kvn7vBBq4mOmR92kqj9K0C5uUP
+SZsRxO/uXGvnDMucEt7WDFNtF8fm5NHHW+VpJTDnTSKvEN7g6meeTPKVfbXy
+Gjy3ee+nS2TeeqnISNh+/p18AMy9n3ziBqwgV+bhAReXrF1SCpdyWcOkX9zY
+cNMZ4q7vHHvYfCy+yRTxNZ6MvHIm+RiJFybB5i7783xguebQw+Pw53GB0TAW
+6RNXfyfqMSm68yqRzD9Pr+gGPNpvalBM8lNOnXoFZ6cPdbbDUszMHj657nlf
+XQj1s/u/cL7B5a8+22vDDQbLPYbhDeWvs21hVtyOTRWwnsBAYAgxb9PxILhq
+6OzSJFgzXPCrFCyY26VdQPZnxXmZeOT3cJVQdi1Z/6KPizBcaTXQ3gJz8384
++qLe1Jwgjw/Ekro7XsjRVM2MpOV74oesZ6qw3b0i+QY4t9noxKXleD9xGpIq
+4e6j7UlTspizjXnzmSTf0PSRYPj+6abcW7CKspDCEjhO28LlDMzZVXrn2TKc
+pz+elbvCIV6DVzmwRml53HY4Yk3RxTC49sm3m+vIvIjoxUXBCh8f/6pE5stN
+3DYVzjor1ixD5uc5Y74DpqcFrBeTeXNclqyBeFXz4bulYSm3vONnYe75PRMr
+YPOpW3NN8IE5b1ldUp+TcbIW6unseSe/E7ZiT9b9BltUlwkfgRn3XdyL4Gwr
+94RoUv9mOZEe+Kmov2kuqWfv/Olp2Lws0rWN1N8q9WAU1n37Xo3agPW5zlQd
+fFd/Q5s6cfXac2w44NyOdzthuTX9nLXwuGlfthfMTtmq/gT58dieW0Jhd++/
+T2rDDYr2t6/AlNWegluot0+ty+MmnBJvJDLOxHuebr5A3Ob64+s+2GQ03PYq
+8eNDytlL8Tsh0sc5B1vZ3qXkYb76R0tfWCVgd3CcDE35aoaN2cAMf/FIdZhz
+2l/4F7K+yMz3emnE88vep0TyUQ4MSIANnOSjhWCfkPWDZ+Du8hy/EdTvniQ2
+QFye4RH3X5jPSTgVB0fQzVZvYMd4EZUa+Ozvivk1cEo530EM8XT9r/i9IPtp
+yb7gDGt4rWqtJ/s/q3QgH862t33bRfanrtFYHPl3mqz/Mk3225PiuMAbegX0
+mKTe1Pqf/oS9+npj9eDZfZTwW5h9ejjMheSrlTw2AgfbVRyIIv1sv+40Cpcy
+Onyy4IbVPLoJfty5qbcJTn9ZvzoJzmL1rZ4m/SthCJvBTf98TGFuhKOCfFuQ
+36UhQyUd2KePp2kNx1goZxrD+vwEo3LUq5F+otAcZuTYX1aE3UfCpfbAnKH8
+oBApmgqf+G1mO9ytdvvIoyWYT0NtMQO48rNAYuhi5Hkw20wTpnJkeN6SNPVu
+peC4NByh0LgqTAL7v513exb50dz5yGfiOO+7msc6iEMY943guZaigmqy30fn
+QifEcP5Ur6VmwhyW3sInWOiOzuFEcl0sWEIU94+OrTzIJs/nv85wg3Pf2xac
+J/0pi9jVCQs3FRiEk+c3nzM5i/hNYspupJ+cNBO3Nchv+hxHi8xjRFbVhTaY
+mio1SIMrJYOdIlBPXJlYYxWJ5+0gKYN6Dbe0N/UQ7zabiIR9Cu07GKhPqv6e
+Zg18T1LNgQXnSnbItcJ1bMYlx43k93i2Jwe2T9ySeh5OOWmdYgFTFj8L8sj+
+zMcGFiBe7MNC0eekf0ZMdi/yiUrX9O4k94/01PUj/+I8O+lxmC/5OfEF6otI
+iHFaIPFbgvWuoT9R1e2TgpvwPnWWNdkhSlP/+8B88v+rCP0vmGLqoA==
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.28233829669103, 4.3021661698002225}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwd1Q1Uk1UYB/D3oM6hk40Pa8R0I3FNAwRkOgXhTRZsKLCQD5EUNPBMhISD
+FB+KJAOmWE4OJAnogqBpM2d+AQ3BEALF45LpwbAUlUaQSk4UAbX/bee8u+e3
+3fu8z/Pc+57XdcuOyGQbiqI+wUVGikO+5tPU6Bt8XGjKV2aQ7phHU4LNByJv
+wT2Ltaf6eDTVZo3b1QGXi6pWfAAbqtgzrsOGooLBkxgFrZZgK8aopS+LF2DU
+UMdTvDFPnS8rbXiHpuiVQRklsIpxqnMl8Yna0KdwtbxO9sAZ6x3Ojqfhvrou
+s6QW1vBtW8bgy/b7L2bDhucOESrkyYvKtG6FCxqKuU58muLeKrm/HVa8lmQd
+g52aJsqK4LahqzkcAU3949w9/zSsfLyjWw6bRv7sHYYla9zyc4gZsZs8kY8u
+c+3vNTB38unLz+DE8BffnoMNrApdKyzyeSlqg6WmsO3TUB+9qGpDC8zszMhb
+BQ+1lDSfhN3c3/9iG+lH8/CmMrhP6NxRCHOGGA9TYae7HRv2waKS63GB8PRH
+dquzYaU61p1F7ldmkx9B4seEcPSo594edwEbpujlnwcS15tCGpFP+g+PPfrI
+vkXz5obB2scelXnww5C7GhPqo1JTjnnCXO+BfcHwqIcul/RTk5Kw7QwX/WkJ
+ze+FmVl1FA/WKqc/vwKbo59+VPQ25u88POsP2Dc2NPbZW/ChirO2iFfulN+d
+BnP454wRMKtr+fDYXOSV1tith6Oawtdp4HRzSN485DveWXUtEKZDSjU1sHKJ
+mzcDNlmSWE6oN/EXhuKhE+qO+fdmPNy4hvfoNly5cE5UHayyOX9xEPby82+y
+wD2v43bPwPpKTmq80JWm/PeaX4lhZuzWGx/DibGZ0Zmw4KtIx32wLq+H0QQn
+JrPUx+F7A2yxDfLP3i51bYHdtd/0y+Ehx+ot7fB3R+UzS2GvGz5KI9zztz37
+Esy1JA3qXMn5EHdb4HH3K7z9sMy7v3kSplaZfttM4tdcDZyANR+W+/rAGv96
+3QCsPHa/6xXyv3eHF34aXt+QI/+VnL+i7MptMHN+n/oQ6UfGyMRsEu/gpCKB
+nJ9pzAdHSD2yPUFLyXkTTq9xJs5W/8yGp7xYngfQH0XDj8mP0N9niZHCF46I
+07Alphc251hSE+DRwbCVxKpaw8wrDtifKettMn90xeSAHyzIXbDVHvGiVIHl
+TfY01bVBv0oCK1sqloTAErcAlxRYMbCMPcRB3ecLRfUwK37eT0dhdfBiIdkf
+Sr/raCos8S8r8kD90o0xikgOeb5nFWfBKh/r0ggy/5U0ivTXqNij3wwXnKhf
+/AY283cLS/7/fyTd712sD/ATG8n6of7bn8JKxlTTFNx3ZP/uw7B/oZ2jFPlx
+Lyx8coZ42UXFl/B6s19YO1lfY0zrhbUZPWs6YF+7ArU96jWl65c3w/oupksQ
+bNjItdbCxuqDnkkwXV01UgCvpU3qDNjL2GobA1cnD5uUsMgroMoN3lnke0IG
+NyadlDxB/sqxa+0ceH3/ze8bYVoQcOcS6afYxlhI6n39vHEjsfyseB2czndx
+sJB64r3qFsGj2rRM0o8+YXCQLaw1VL9Xy8b57KkfsZL+hruGZtnBYX9Zh2FZ
+cIN/8Bycs2wP4ROYvpzL4LNQj0V0nsJ6aiIu2nY2fl/XGsCHu6TtdnazsI9f
+l3fKifWrh31tEeeC+9V8cr8xsbOKiecm1zOS7A+XvB/gcfJ+cKX/A1GYJ70=
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.225285377617156, 7.188392099638602}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwl1QdUU1ccBvAHIo5qIIiUImCQsFQkzGLV8CpTBKTWSRFTZZWhyWkUtCC0
+IsMqBhRKiZYhRQqKESUgRUTZGGhEiwzFNAeRikakDFuw9Ls25+S888t9793/
+/e6Iyb6DW0PUKYpKxpdc//+soKmF5LqKpngHL19kwTsSJ3+/tZKmShauFzvB
++c/KGg7DIkFvGw0/7j7fuRrW3vMknQu7eVcYKK1oKqciUmYDn3tX8SAHztcv
+H9aFa3K+1PscFhnmtalMaMpryLlPB367OfNeHey/4NrjXkv8bvqkIhlWjxhO
+/wWmtJx/9IJrOwSax+H6PvEjTfhAx/M3obBiJOlVA4umijTrMrbD+hoFod/B
+rDRxpR/co5q57QavWBVQ9xlpvyLzXQxHfZlVtAeW5zS61y6nqTHH43MEMF9c
+NiGADzQXWZyER11St3Bhzs7rrEvk/ur2+aZw0tzF3U3ERz/qZsHHxtsMB2Ge
+sXL/xzA7JqNzltQX17Y7BDb4k6vQw3jlyu7wEjhXFRZjAUs2NO1/B3ML/3hn
+A1NWGzgc1HfeLcaOmP+wgB8Kr49d4cSGSxKXqOfBtbK1WQzy/LTVF49gg1oH
+HxX6s4yTjS9CPh7XuloayPhNHwZvgE/aXFScgSW98TGhMO+pUdfnMO2e50Hy
+jppXYs2EwzeW+orhfZNa7W0WmL/msiNF8E+bV0sS4LepFxwK4KOekXMd4VSt
+s5EZsNLWYWLEHPOv9u2ZQ7A0ZEFuMVx9OlvkB9/9NPB5KMyf2P3QCM5WzZxb
+A88/M2r+DPXnv/l30awZ8oqxLimGNVPvB/bCOdI1lcFkPscsV9bBsR3C30xg
+1SHry1dgSjSpcYfk1/bxL5dgjtr9DA9YKrQ7UgbXrxsY7DFGLvLkRdWwRDas
+FwdXb/KZugfLpVPp9rBOv2viM5guPTygBtdcVLuujvokOZbFw0ao2+mE0ARO
+FKidIF4hCfvRhYwnQ8wk929dIp0JIO1Npwc4MC8kJVsAj24Sph2CS5W8jG9h
+7ZOMh/dglmPKnjS43vWrZhvUq7dPcCcFZgVf6TkP+7hLhr4h7ZJo5jyMV7f4
+7r4QYg7XywX+rjl2nRsc7q/7vRAOHq8e0ifPn935dRG80O2S+yDJz+tRlwxe
+bb1fTPKhuhvbR2CZX21CMMmr4Kuns3AOJ6LTEG5tbZ03H/PD+TXmbBcb8/1b
+SvUceLhSMpECixzK/hzD/W63x5e7wD38F3rdsHw4aOU/pti/Uz98Ug4zpu00
+foXzh7c2xMF23kf2Hoepta+TXOFuLitvGzwqsP9ZAy5cwGu1gf29Dyw8QeYz
+/Z+YpaTds8B/FnnduNnaPxemjznYx8NjjF4JBddb+hTOgfmv7TxIOz9hwv4H
+zE+Fs0mSDpzY9/tf62BDRtWUOWmPPuU8YYj+bJYqaVixPSWxCW5s7fQOgrW5
+dTvL4eKBMt140j87zFMCD95QLRGT+rr85e0w/7qtmRRmCYz5M/C4xStXGanP
+1fraRvRXr6jK6yfjZce75cJKzf1XlaTd9Hv2LGywzPJTxfvxXr0dRdbjLW7K
+A+KDLpYDMOPKdlYtzDGO8/JDHv6ZWctySZ7ZbP1qOMBkzttouKesLvwD5JdZ
+55HnbErmsYNpDwft0g6cxrnrnPrK5jOyvyLiZFVwjmagP9lPh30X3D8IhzPM
+hJHwkKc81gzWf3vRgJw3B2RdI32Yd7q502Mb7FdMb8uEq+V6CU5kvciKW3zh
+nsqnLeQ89c+a4mjBkjenbatQXwVz2/oe0m9DQK4rPPQo0r0U5oV5mzRhfDJj
+603J5Dm2hYiGM7UD+6Ng7cCXozXIJ3PkGCsI5ruU71oLcx8EyXbDot2LK+qR
+d6xstdleci58FJG2HdYQWn0QTd6n+vvx9DKsw8PHNMj/gFwsHZPC3FKZz3lY
+Uax0TIN1Gtuf3yTvf3naSAh78zhSUq8i39woFv7EkHlqkrzf9mbeOVi0t9aT
+ifEl6jAZrTBvue2wOczSPPpUC/077Vpb6EjaEwQ3wuFmqy1/rSPnrJ3N0U64
+szLpmjPJpyI9az3GY+zX8uEq8r/nmb2kHE6tnenQMSH7U/zECHm8UP/55Wv0
+LxErVckkn6V903dJPjVxaYNwfnvVq1Mw5esabod8RYWhulvgUY/ukSg4QsNO
+l6wLRUkbnQGPS2KLyL4aPR4dfwHXqI2MO6PkHLo5WSmCLzNd5V/AnMf2mpFw
+Y1cz+x7qUvwRJrIm73+3aZCsa1bNDkEf7tOnW/qbyT54oVYqhJPshTsD4Pcf
+eBG5GtL/AZvf91E=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {6.662419809687106, 10.755933890072207}, \
+{1, 0}], LineBox[{{15., 17.00000000000231}, {15., 9.999999999998607}}], 
+        PolygonBox[{{15., 14.1}, {14.6, 12.9}, {15.4, 12.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.9452, 13.5}, {-1, 0}], 
+        LineBox[{{15.000000000007276`, 17.000000000003638`}, {
+         9.000000000005457, 13.5}}], 
+        PolygonBox[{{11.48173265946094, 14.947677384685548`}, {
+         12.316718930329426`, 15.897834175673825`}, {12.719815750748694`, 
+         15.206811054955079`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.823799910437668, 15.984057296392571}, \
+{1, -1}], 
+        LineBox[{{15., 9.999999999996362}, {9.000000000001819, 
+         13.499999999996362`}}], 
+        PolygonBox[{{12.51826734053906, 11.447677384685548`}, {
+         11.683281069670574`, 12.397834175673825`}, {11.280184249251306`, 
+         11.706811054955079`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.823799910437668, 11.015942703607429}, \
+{1, 1}], 
+        {PointSize[0.04], PointBox[{3., 9.}], PointBox[{15., 17.}], 
+         PointBox[{7.5, 7.}], PointBox[{15., 10.}], PointBox[{9., 13.5}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T6", " ", "P1", " ", "N11"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbf/cgdhei/fhhjgigjij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbf/cgdhei/fhhjgigjij.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {22, 44}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwt1As0lekaB/DXuDZGKjTOFLnsQ27RkKOi79MuNuM2KoRmqShEzDkOKp12
+LQ3nRGl0IbLcRqYyo6HGbaKxNbvk0lRnq8SOQmVcdyWk83/OOd9ae+31W8/7
+vt/z/L9vb+Mdcf4RHzHG0vCh7/9dGjyb/YDLmGdhz6v2K9R4Vtl5Vc/QhGf8
+7ukPs6o8S72mkesGy0Mb3hjD1cVR15Jh1lJWEK2CdZm5jlWwOH1Q0q3MM6mN
+xzEFrTcfS0uBJSquvWtMedb0VaW1Fxx0M8oiFTbyU1UnO/mOurbDYev8E/fD
+Q/HFU4sFsMuuN/dgL6UrVqFwofcH4SbcT8NS+iSPvCsuexxeKqj3vA+LT1nJ
+ytCf6JOud8p/xv653TrRmEdaYd1mQV4bWr9SHfdlBlobycLdugo4I/Be3BbY
+6ButvAvIozDIZWkI3NRSEyGch/kHE8sDYHG/0+FGOPRClY4HrX++Uaj3Mc8c
+3Abq7am+49IJDk4YzvLVJ+v7aa2Fy/u/bJhCf/zdSZEavCDk6WcymKWulRTh
+vPBq39yrVL8RN6YNd7+ICD9DHjXV24J+En5YdPIA2brNNAn9Die1q+2med30
+9h/EfHzjv/cEw0abok7HY359iZZuIOVzubtuK/LZfMtuchvVAyfOrEeeclvF
+t3G0X9v+ocNHqG+P0cqgvM2KO1Yr8UxF9l6ziva/EKgFM/SZ3Hu7H24KPfF4
+9QeOKWY/Njag+YQKw4VzHFs6KsrYBvNOrefWv+fYgk8f8yVUD74bfW+WY37p
+Js7D5AnjNgncFXtoq6MZHOijp4v13YUnIw+RNxhJ62C72xPCFrLdQM8POH9q
+4uCgqjnVj9v24/5eFi5HOZhXvjRdgv78lAQ58bD8L651EehfVHF/8iy5xWWr
+DeYL//xOZzVc+H2UwTicXJZ0/6Y5Pb/8hAvIg3X16LbDTaOLg9yRV+Tx65+2
+0v7EFRelsKJ3Sdt1qkdk/EuAfDVm0o9epH4OpZ/fQr+HYPGzE9TP4WZhEBzT
+s7Pjv/1sut5oCYdpdG71pfr5Ifc2nCcP1K60gVnOHpX1cIp5JptP530mncpA
+PzEjKyMmML98wPZRFfrNacxu64Z5fc/7v2A+tuvJy3Y4rFe6rgrzD7c7G96m
+vI6VZ65BPjW+J6I7yIKcZZrI83KjPKqX9o/sK3g1jefzs6X7NNx0aEXnyBTH
+lpucblhG86XvX2T2lmORRzwXU7/scV1Z4WuO6Rb9ujqN7CnW2aPgWI6K0xXK
+j42Li49Pwkvu1mkux/7tZmwhbJ3RG7wZFpuXMMUEx5ynkuILyCaKjFWoz1pk
+tA7CzD27pgNe8LZIuMIC+7+cnqvB+UY9a9rjYLFTYtkz3D+1UvnURbJQtEGI
+/jZsH1N+AvO9P4c2o3/n+oP9qpbYr3dG3x/zbUiMDxGQvR5odM/g/SvMZE4w
+b+I25o08FAYTMh5mSl8cO433S/+v3QEcLJZEeRfT+23zapsDXLj2GzV75Juf
+omRnDMtvurRGwwmedhHqdH7F/KwEOEti9WgI/RhdL/b2gZ0vTOX/Rv3t8+kZ
+xXnOl3Nl35FDPMoGcL8EwbnaozTPrZXx6ehnrPir7VHkOScrOfrNmWd+05/M
+ef828w752JeVCMnhiaWvML/IWDnShc7b2T90A/mIyuYErlQ/f0xyEnkqJmWp
+vlRfo3Zx7zjuX76zORJmRZvnyUY4FhRw/lIGrZf5DNm/4hhTacuto/qeJVY6
+QxxrSLI8Mk52C//1+HOOOSXVzthSXimqorp+jpULRnwSyHOp9sV96M/7cFoD
+5XctP+gLOGZTfbqaFerKf7r6E1wt3WHqR+7QzWrDfvGNaOuzsLjP58U/cX6Q
+8O/ZD6m+Q8ehY5BjoUp8sp41rGYacOglxyRKBus8yI6cPOkPPE/zivy/kfse
+1HqMceyUjW1FNswHLyp5gHnH7B9OlpPTNgZ7IY8s3e7wKlqvPR2Vh/druPH/
+XhUzdQX5lfb1SL6HxdaxiYffYL1/a+1ZsnqK4xzc5fiy4x90Hv/6+TLkr3Hr
+90dhcJNffP9T1K0dk/o4qmve2SuEu/UXzjckV7+tdMf5yz+5lfke8/Gi5Xmv
+0U+nplKq3Ir+b9oKAvH7UFlpMyqlPM45uB7APIofjU7XkCW7DJ8Oc0w+991Y
+JeVTZP/Ht3g+NaHGJlVUj1+l//kzjj37+kl/I9UTZ3VbeznWJD1wREaOLaot
+kyFvuezhO3Kn6NS6To5VRh4MMKP513dMlDbjeRYUz4SQw+bphf2E+e9ExuaS
+jdRfaKVxzCFmaq6b7LfPcFFeIxN7DjQLbGCN5OyW0kYmemRdupfcZRGrXdiI
+//+XX9eQ6cr6hanQ9wr+PwSlKl4=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           
+           9.996694214876033]& ], {2.5944997717265688, 13.169947406655712}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJwt1Q001WccB/AnoXtauM1NuMrl1qgktVhW/P9JEV0RRTi6Mb3S9DqsuKVJ
+7Za7jVBebmrFUZFsySHXKLJR3bFipRuSMK6XoYR9n23/c+6553N+z/P8Xv7P
+OX+z4C83hWoQQkLxo/9EPYlnGkv+fcxZwp5XKfU4LCk9OKTxsxlLuOeScnoR
+r9IQduyFxQVdxRdh+Rl9/jyYvWERZAgfLW9+pxKwRLB5kfYubZbMuxZ47QrM
+iqpnyLRYoqhRjEfANtteS1I0WRL4xjjShdpH82n8VJZYvrIwXwAXbN8m3amB
+/2NPpAaw4mDpvTVTWDJjx0i1Hqwm/mXzCUt8vqnYzoPlxyVLlkwwJMEybq+Q
+rr8hD1r7gSFW70fjVsKquRflme8Z8thsf4c/LD6RdMP1HdbX2sXE0vqi7z0Q
+jWJ92t7xq/S8ffVri0YY4kl8hutpPz0i3xh4xSUyPETPc1O05sINXJssA/RP
+HmVfssH+Io5T1VJYZef+BQfnO+82jXWm8cRbx4XIX9TKXSeCBb0B4fvHGBLW
+kPXBDZbPIeEvUW/7pprJVTTupb9jK/rxyxy2EsKSR5EltZMMWe4T1zaO/I87
+wpIT0b/JQAah9ckHIpvNMB+1h7IxifZ/WFj4A9z5UGbsA0cUL9Jugdvv+Dbp
+0PonBQfG4BpBWmGCKeImF2M64eL5h6cPzYVrNlRfhmXJH2cHwzJr0XRruj4r
+3aFpDvKEq03PIL/rHOf1gbA4ZOadKNTHrruZ02eC/K/qr6eNM2SX2FF6HpYr
+az1Ool9uj56HN6wa4/M2YD4FAeZ+FjAbeHRAE/MkDkqePo3rmsdVDjEkco9b
+1yy6f8EFQfoAQ2Tmpqut6fkZftOy1Xg/JrXJW6mthFp1fzHEku+SlET9kTJQ
+3cUQzvJLq/6EJVNt86s6GdLZ16K7APWSod4JvzcMEXy3Z1UULKk10C/qwPrW
+p88f0HjtM6sGWGBRJdRB/5J7Wcb5WM/VPp7sAiuaBq8te8sQRa7rigPUd5xD
+13YzJPX0y/LT1JHc8mrUIzt6/9a3MEm2v+6Gegvcd0uOwGJtoaiyH/fv9PL0
+9dQuzcvsBxkiySuK0qJ2/r07Bf0LcjOkeahH4KPU/O1vhhjGP//MkVr4dUvl
+MENG+btuK9CfWKrcF4H5yUd6O+3o/BaHdtyH/cJeu/7IR/6rY0tLYcsXtWlc
+WLzDzXsj3PmqtPKYMdbr1EtjcZ64IeVCvxHOv9sf5IV83J1DORGwJDlzSx3q
+Sy10nZgwxHkuPvmTqJ9VemrIqd9eSevrQ3773I1bYPaBzbxEzCOhxzZFSOPN
+I/ZamJ+kV3aWQ+0gfRHdinreu7dpUgtFVsueM6R4t7/rbOriaH/dBoZEnDwW
+7UDdoTt++SHO8+UFHaKOCJR1lzAkR9dRUEydOt/2ShbmG/lUrIl6iefcosak
+csJdGh/sQ61urNuQU05SCyocL1O3Jx6oyS0nbHcmv4da5Wz9UybM525faExd
+XjN0Cu8vwbN7K3WrU1VIIe6jn/eKr6jPTtn88BfMY/Wac7HU1YR3tw7znBlu
+tB+WHPm1vRD113BExJ3Go45onG9Gf4ZtYTo0vn7qIyMV7nv6mzN3kZ/d8r1d
+JubxuGUw2ovO+6Zv5e125PuwcOUz9Cfh51Z8jvtoeTM43gtWuLZdMMI8Of2f
+5lXMxn7j8F4HWBVSFLgYVqRLAzKwXjHREpNmAJ8KHrR9jXkdalVPh8mJTzx0
+2xjyrDHbN34W9ktLnGxRj8K8pEsPlkSFnDrRhPvHWK7L49H8SU8yn6Af73yn
+AB5932VlHPQ/Gib7w4z3/3cjtey/74g++w/yhW0e
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {0.30479999999999996, 7.7452}, {1, -1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{19.999999999998543`, 17.}, {14.999999999997012`, 17.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.5, 17.6952}, {0, -1}], 
+        LineBox[CompressedData["
+1:eJwd2Hk8VPv/B/CxJCqSGzeUkAoNKWuWa8oSskzIlsrWj0q2XI31zi1JlkxJ
+TdahCKFJKVGyJURGhEIpQuWiRVlavq/P74/yePqc897Omc85Q8Er0P4gP4VC
+4efDP/ykKJH/5GgUcfJzNY0SOla+xB0eYnTxh8Gxni0urTDvM9N5EFZKWmNj
+sZZGoaW2a29dQ6Mwfy8ueAYzK+MuBcNede0dW+VpFI8Aa5fL8H5mVnIMzLGQ
+si6E01NDD7aS9TundmXDIdOmm1cqYF0xVjsKzrud2edK3CU7agJbzR+NuAwH
+PfmoOIv8fcOiRzth3k7BmExY/AbblaJIo2h47tfQhq3kBS3Ww+JJ4f81ydIo
+EWnWRcYwpe7TTSd48k/7fXZk/YVkynsZGsVCTvm2I8yTzf87Fn56svUwncSr
+G+ajwqwktysmMG1u464RaRqlqVj7xWbYI2Sgkguf0PbulIJrx6tfpcLLLv04
+PY/65J0eeKbAyooOsoMwXax99Aps5VtWUQvTFISXdZLz85LCrsHMJXX+ksgn
+vtTRPZX0G7KOGwDH7TiwOY70azGY+wLOnqcF/kvim7U62KOf1Q0CJmSdZkjb
+2Q273Fh6NA1mnbPKdMM8hEOkTW7A4ldHTIdgukZDcRc8JCit74H5iofEy/Cj
+fo5xL/c5fFY+LGcbHDTiaG2I674/Yu0Yg3jL+C4WfMfopE0NzNSMKH8KD0xb
+TS5eh3qYnw7OwG+7yyodYLroLjMB3Bf3NdVO5cDMIobWLNZvR2pQ38NB1Pg1
+z+HCZxWZ6ko0yrTm4rEM2J636PNR2IMp7GEH902ln86Ha6WzFL+gvtAEnyXd
+cFDn96OJcIHIzbhZYpeWudVws4VaiMR65N9X3FiCfv32sW4qwCzRrNfGsE9M
+5eUNMO1Zu14/5jV9RW2CrA+9q/c9CbNa1DtWwrV6stGG8IfwrDoKOZ7V2ysC
+779snjiGfPInJvkmcT26w9VUn8AU85y0DzAjLetBKcwJyKBScPzhnFeB5+Ah
+y0pXdTjpY+gBBulv5eHSYzB3fiDeB2ZOvGhshy8uXL/pTOLJzHptQ73Z8dN7
+HGD6oZPny+EIz0tsF1jDhNOhhX6X2TF0/Uj8CivdamKRMydPkHmsuFlFw/z+
+Ohy/7xqZL2uvYy2caWam20Py//vZUBvX5+zdY9Ji6I+jxViTASd1dpXawNPV
+o4aT8NDvv2xSyfrrwi5JfG6/+gmvGCTzCWQUKMOsv+dGlTegfrHRpZthuc2r
+roXChatTF8i6l6W9ag0cz5CaloL7dsl5CmxE/qaxhi+I39qkdGgHLG/UEVEA
+zz8SzQ2HubrDBZbE7nn3rsHiqyKT36D+brezDU/gWkvPDyGwafOWbe/gIWuJ
+Gn642UpW8CuJ56UqfRHzkNn0OXqWxItRHdsC+3Gb/L8QzzVUvcQ80x9PzZPz
+6UatWRfggPNPijtJPoeGUS9YPm3YvJKs/+yWtIA5y2Q7Mkj+0pgqM7hmtsQ7
+hvSzRcvbHWY69ah7wUzqqUuJsOCMlK0lqe+B2GAnnFDyvVobnnYSeExFPY1u
+xgYqMK8ifznZL/klg03XwxrB16sk0M+G1U7fVEk9AnLGabCPvs4SA5gSw39X
+FvOJSNdv20Pqc+mSyIU5/rtWRcIWtc4bxTFvqYwze4vhyonTDlawDn1P+luY
+ddb/XRRcsyEvQlEZ9/fbfYIFcH0s1d4PrvXjN2iEaVXzuuWwR86VuB44oip4
+1S9YubHdcwCOWqP6xFIF83zV2vKcXN/8HJVUmObx8K8G2DSlbX0fzFT2rcmH
+1TvrX0upYq7mxffIc4Gq4XHPBmYvPb6IDt9fZOsbCU8/ZT6Whds00n9lw+Lc
+vQ+b0Z8g0+3XXXiIa5LtAn9LnXFsgikVPQYTmI8630uPVph+p5MZD1PCMyca
+ST63+fktsPXv/A3kfO4B09IJzNuwquVCHszyL35HPj8lz0wFz5B8X0Jl8uCB
+w7wwf7LeuZfHge09k0TtSP7t5xMq4SElzuetMC/F59E4PO8btUMGrpXgLGxG
+vtiQkhkhUl9O0p1Esv9R5NvmMQ/x8o5rZD8cNX+s/53M65RKWwj6kTq6w/0n
+PKSfkzZD9s9cs3ei5Pyi66J/YR5iwtQ1KjCNxy5gwtavFvfbkvp8YlbWwrEi
+dqdjYGWB5O9zcGi5hCLpd5ZPU5WKfb+qiWnznawLl/Y6wnp8292NNsFJZikh
+cGiQlPdpmP2I4RAL/1pYatMF09r3XT0DD2Q4f5Kj4vp4jcWegN+Oiar6wazl
+jyICSXyZux9KYO7wu/jd8MuZ3j0fYcbZHiVVOEAsiaeghvvp6uGNC6hvJNL7
+DzuYd9T+XhNcVfdMNwRmBB4yTIGtZq7VJcAau0u2OhMvUrzKhpl+g+sUyDy+
+hu7IhDlTLxa9xrxi31QcuQjTDcOVz8CNc6728XBQM/u6KRzVkPvPMZjmcql7
+Jawj8HeDK8yt71r+gzzPbrooGJHjq3R6F2D3N+bVa0m83dw8cnx6unm1ADwk
+YD1sRu6/oTJD0h9zUkzkLFyZLKDTB4uf8Ur9AJeHO/q0kf7rb0hSUa9F2Xe9
+FjjePcT7EPn8VOxv7YCVebHvi+GCjILmIdjF9s+tk7C9zN6wHzBeWG5rYH7u
+tvfyFZG/9n7aJzLvTImUKntYbyY6oQimXrjCTSTrD4T29cMTUwc3tKmRfdeN
+LYDnthsn+IiEOuIZBfDk4QIJ+nl3mB72bdlWWCf1fmwhPO1/qUsH/mGdJv0V
+bk6eoJL3nvqg85uMNuP+eKt2VRbWi+y+8S8sns/Y/hP5xm3cnzyEGW++xTyH
+/Z0SR2eIDVy2FcD7fKf2r9DAPkw1zgyGc9Qz7irClReDlurDid7JderE7AoR
+fniqrpOhDWvcOS7XhnkMCvms0IWF66jV6WT/ml42ownTe4oUgmAZ5SUPqfC4
+7hFrW/jXozJtEr9WrfWFDvl8BBrvkCTxLRbmVeEk5oExIVg+47TvJlg4fsx/
+GvWyjjTu0YPTjbvju2HlYDZjN2w7ddfwPsz7mc8fRuKrLYougvX6Ksuuwv5G
+wwLZcPyOte398LJGIeMMcvwirz3S6KfGqJSWBwsH5S64wVbrXW/fgsff3bHI
+hguZj3o74NrkNbeHYDmtvYxvMHPwXM1azHvnudyIP1AvzZy+zBU+1/ZbUQPm
+KLyOToDj3l85QYcLTQ6Yl8PC9S8eHiP9JjB+PYVrVjx9y4bFvWVvvYYHJ6pf
+18DNAlFTw3DxxMfcEXjowKu6ftjIacWfIlvQvx2l+jHsWpCsvwmm/6E8Xgi3
+8CvJW8Hi1ZLNTHj5kpKfPrDerV0Gu+H/JPZrRsJ9zx2CVsOSdzztk2BOBK9t
+BP2197gqsGF2uVV3CZwaV5OdDVtcaBI9DkfpTlA4MNde870ZLFM/disTdtn5
+NF8W/vh80jGNnC8Wpz+PeRfFCJQkwKz6PduH4dzzd65Ewxrrg0d74QHD08aB
+8PiRz/19MINreM4D9hBOtB+FuS1FpfYk/8bY77/h6gR6rjk5/+W6WSXkE7nn
+ftCI9GvqsITsnz7Oh57rkvUZ1YhEuCs0qkCHxNfsNWiBE2TYB/RhebtVfEvR
+/7pz6o4mpH7l6N225Hr43ebshguPuV5lwdXHQ1UOkvrH/y+yAz5gUZ5B6h9P
+nIsSxntzvsry4HSYcvVW0jbY2VJspgquzKl44wF7vo22fgUL53pIR8PlrOMx
+AlsR323ULBmWkrwcowJXLhedZcHt30X07GDeTK1J/Dry/viSfQyeHtnx8Bi8
+e832rDSY/vFHlCMsWmbpdpusFxpRqHCzVtjiDpg9T1f7gXrDhxaE3sEuhlna
+5H7x0zOcmIE1LC8yU2DHB9uYfJr4fRbjvDOc2t/XsBget+j5pAB7X3s+JQzz
+KpeKfsL8tn0NCFkE021vyT8m8/V6/eEn4sVrKsmT/WSnULfiF5jj9IWTAvfY
+rBcahYM6bFrJ88t8rcrlXtgjst+CfE+SrBKYbIYpfEU7L5D9NM5XuhoWz/AO
+KIM3j2zbeIP0s2VuhHxPOqV5YXkBcWmYO9k/hc5eKOGQfnwfrzaAb2gdupkD
+M+wfSYXDgi++5l0h9RkMzFXBNuquz0q2kue1u/Uvsp+a5rqSfJVf/jlFw/y2
+j5TJkPlZiIoo/wMn2YXVjpH6AwIH7sLRuZH1guh/1bPIM+PwD4Wjh9eTeag6
+H16O9/hV93L6LWBKs6LCJti9QW51AMywdHqkD6tPT8ldIOdTrf8zgl0V13bc
+g4Pi2eVa5HvDCjnZV2Td5gd3LbyE/B1AC/fP//9xgPY/mqO4+g==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.0723744310654, 6.280370328210516}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwl1gk4VekfB/BDhmsrdBMSyhITum0yBp1QabNniRCKtJAwikSZukq6leWq
+JqbuY4ksIes/opFUY4non61Edjf7UJrv+//f5/Hc5/Occ97f8v7ec63y8LM5
+LEhR1CP8kW/q2w98dOj/f6vSFMe9VsZSl6ZUNraqDsHa+c3eSbBhDWvwBUzf
+XPHyAyw3pc5KhNte/nNs6TqaCvl9Y/QB8rztgKwxnGI2qsWEKXPO1gNw2229
+uprVeN70hrI3sXF4RBAcU7Cowgtm1EhxVWGJM8KTtnCgxi2v5lU05R8b4KAH
+MwuXLrsKp9fsWLcYputEo3fD7p58y07kY14VrbUMvvtjyXQG3LBQXDusgrzS
+Km4Hwmqj+tFNcKBsxvNtcFxQ8981sNrI4TYmbKZg/MtLOF3i0SAf/agMV89o
+gzcVFyW0wXZebpYTcPn8kg9v4NkU279kEU9T58FCI2wW7q1Dww1VF8/3wnI7
+c5yOw7OSphIMrD8p3jGdCIdcMWTrwyEWWiUVcEw3VyEIfu3Wyu6G+T8b7yyD
+2+lvmTOwttpBKQbqlYu2HRJEf9zj3yk5wu2HWLkUHNjuMJYGC12bkufjfjb7
+jcAkzG35KtoIt/+5P0qRhT5qUuo8WHj1X2IGcJtkS50vzEg+5G4Nx02cXLQG
+vvfrNO8QLGTM8/yAevV3VTn4wtp2JoNXYMPvZq7H4Fqv+FZ9+AL7wU+HYU2b
+WcFGZfQ/NWHBAVZpe7zXAJZ4Kmu3HWZ5si/kK9EUr8LsoC7xmZjqbXCtvUUm
+E56t5MgMrET/L0X1TyD/Yr0F5Sw4S7RvpgJmL45Wj4GHbehZDuxukt7ChkNC
+rBR84XTVHLcU2GdmXsWC1C9rza6HFfVEDLfCuWFmLdKIV6B/fZDMp7ti8ctD
+MN3Q3LcPdrx6jFUCM98cVTxO5lflop808u9+bJbBJesfyfroCTuezBpohDUH
+u9Y9hC3SdF6IIf8QX6G0TtjEufUgi9QTNhr1DRb0UZZzhPsH9ytS6NeVp776
+EXBKcsHNL7h+83LJfCpMpwR/yoPjRgLy6kh/xjN+uMHB3fpNA3B6KN94Evn5
+OF1nLlqP+Yx1sgmAnw5vDV8G+1ufXt6FemMux55SgYsNr+2nYcf/xBSqwuld
+PL+7ijiPjBVnlMnz1YqL51bg3Oz3s2LCs+Kvn7vBBq4mOmR92kqj9K0C5uUP
+SZsRxO/uXGvnDMucEt7WDFNtF8fm5NHHW+VpJTDnTSKvEN7g6meeTPKVfbXy
+Gjy3ee+nS2TeeqnISNh+/p18AMy9n3ziBqwgV+bhAReXrF1SCpdyWcOkX9zY
+cNMZ4q7vHHvYfCy+yRTxNZ6MvHIm+RiJFybB5i7783xguebQw+Pw53GB0TAW
+6RNXfyfqMSm68yqRzD9Pr+gGPNpvalBM8lNOnXoFZ6cPdbbDUszMHj657nlf
+XQj1s/u/cL7B5a8+22vDDQbLPYbhDeWvs21hVtyOTRWwnsBAYAgxb9PxILhq
+6OzSJFgzXPCrFCyY26VdQPZnxXmZeOT3cJVQdi1Z/6KPizBcaTXQ3gJz8384
++qLe1Jwgjw/Ekro7XsjRVM2MpOV74oesZ6qw3b0i+QY4t9noxKXleD9xGpIq
+4e6j7UlTspizjXnzmSTf0PSRYPj+6abcW7CKspDCEjhO28LlDMzZVXrn2TKc
+pz+elbvCIV6DVzmwRml53HY4Yk3RxTC49sm3m+vIvIjoxUXBCh8f/6pE5stN
+3DYVzjor1ixD5uc5Y74DpqcFrBeTeXNclqyBeFXz4bulYSm3vONnYe75PRMr
+YPOpW3NN8IE5b1ldUp+TcbIW6unseSe/E7ZiT9b9BltUlwkfgRn3XdyL4Gwr
+94RoUv9mOZEe+Kmov2kuqWfv/Olp2Lws0rWN1N8q9WAU1n37Xo3agPW5zlQd
+fFd/Q5s6cfXac2w44NyOdzthuTX9nLXwuGlfthfMTtmq/gT58dieW0Jhd++/
+T2rDDYr2t6/AlNWegluot0+ty+MmnBJvJDLOxHuebr5A3Ob64+s+2GQ03PYq
+8eNDytlL8Tsh0sc5B1vZ3qXkYb76R0tfWCVgd3CcDE35aoaN2cAMf/FIdZhz
+2l/4F7K+yMz3emnE88vep0TyUQ4MSIANnOSjhWCfkPWDZ+Du8hy/EdTvniQ2
+QFye4RH3X5jPSTgVB0fQzVZvYMd4EZUa+Ozvivk1cEo530EM8XT9r/i9IPtp
+yb7gDGt4rWqtJ/s/q3QgH862t33bRfanrtFYHPl3mqz/Mk3225PiuMAbegX0
+mKTe1Pqf/oS9+npj9eDZfZTwW5h9ejjMheSrlTw2AgfbVRyIIv1sv+40Cpcy
+Onyy4IbVPLoJfty5qbcJTn9ZvzoJzmL1rZ4m/SthCJvBTf98TGFuhKOCfFuQ
+36UhQyUd2KePp2kNx1goZxrD+vwEo3LUq5F+otAcZuTYX1aE3UfCpfbAnKH8
+oBApmgqf+G1mO9ytdvvIoyWYT0NtMQO48rNAYuhi5Hkw20wTpnJkeN6SNPVu
+peC4NByh0LgqTAL7v513exb50dz5yGfiOO+7msc6iEMY943guZaigmqy30fn
+QifEcP5Ur6VmwhyW3sInWOiOzuFEcl0sWEIU94+OrTzIJs/nv85wg3Pf2xac
+J/0pi9jVCQs3FRiEk+c3nzM5i/hNYspupJ+cNBO3Nchv+hxHi8xjRFbVhTaY
+mio1SIMrJYOdIlBPXJlYYxWJ5+0gKYN6Dbe0N/UQ7zabiIR9Cu07GKhPqv6e
+Zg18T1LNgQXnSnbItcJ1bMYlx43k93i2Jwe2T9ySeh5OOWmdYgFTFj8L8sj+
+zMcGFiBe7MNC0eekf0ZMdi/yiUrX9O4k94/01PUj/+I8O+lxmC/5OfEF6otI
+iHFaIPFbgvWuoT9R1e2TgpvwPnWWNdkhSlP/+8B88v+rCP0vmGLqoA==
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.28233829669103, 4.3021661698002225}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwd1Q1Uk1UYB/D3oM6hk40Pa8R0I3FNAwRkOgXhTRZsKLCQD5EUNPBMhISD
+FB+KJAOmWE4OJAnogqBpM2d+AQ3BEALF45LpwbAUlUaQSk4UAbX/bee8u+e3
+3fu8z/Pc+57XdcuOyGQbiqI+wUVGikO+5tPU6Bt8XGjKV2aQ7phHU4LNByJv
+wT2Ltaf6eDTVZo3b1QGXi6pWfAAbqtgzrsOGooLBkxgFrZZgK8aopS+LF2DU
+UMdTvDFPnS8rbXiHpuiVQRklsIpxqnMl8Yna0KdwtbxO9sAZ6x3Ojqfhvrou
+s6QW1vBtW8bgy/b7L2bDhucOESrkyYvKtG6FCxqKuU58muLeKrm/HVa8lmQd
+g52aJsqK4LahqzkcAU3949w9/zSsfLyjWw6bRv7sHYYla9zyc4gZsZs8kY8u
+c+3vNTB38unLz+DE8BffnoMNrApdKyzyeSlqg6WmsO3TUB+9qGpDC8zszMhb
+BQ+1lDSfhN3c3/9iG+lH8/CmMrhP6NxRCHOGGA9TYae7HRv2waKS63GB8PRH
+dquzYaU61p1F7ldmkx9B4seEcPSo594edwEbpujlnwcS15tCGpFP+g+PPfrI
+vkXz5obB2scelXnww5C7GhPqo1JTjnnCXO+BfcHwqIcul/RTk5Kw7QwX/WkJ
+ze+FmVl1FA/WKqc/vwKbo59+VPQ25u88POsP2Dc2NPbZW/ChirO2iFfulN+d
+BnP454wRMKtr+fDYXOSV1tith6Oawtdp4HRzSN485DveWXUtEKZDSjU1sHKJ
+mzcDNlmSWE6oN/EXhuKhE+qO+fdmPNy4hvfoNly5cE5UHayyOX9xEPby82+y
+wD2v43bPwPpKTmq80JWm/PeaX4lhZuzWGx/DibGZ0Zmw4KtIx32wLq+H0QQn
+JrPUx+F7A2yxDfLP3i51bYHdtd/0y+Ehx+ot7fB3R+UzS2GvGz5KI9zztz37
+Esy1JA3qXMn5EHdb4HH3K7z9sMy7v3kSplaZfttM4tdcDZyANR+W+/rAGv96
+3QCsPHa/6xXyv3eHF34aXt+QI/+VnL+i7MptMHN+n/oQ6UfGyMRsEu/gpCKB
+nJ9pzAdHSD2yPUFLyXkTTq9xJs5W/8yGp7xYngfQH0XDj8mP0N9niZHCF46I
+07Alphc251hSE+DRwbCVxKpaw8wrDtifKettMn90xeSAHyzIXbDVHvGiVIHl
+TfY01bVBv0oCK1sqloTAErcAlxRYMbCMPcRB3ecLRfUwK37eT0dhdfBiIdkf
+Sr/raCos8S8r8kD90o0xikgOeb5nFWfBKh/r0ggy/5U0ivTXqNij3wwXnKhf
+/AY283cLS/7/fyTd712sD/ATG8n6of7bn8JKxlTTFNx3ZP/uw7B/oZ2jFPlx
+Lyx8coZ42UXFl/B6s19YO1lfY0zrhbUZPWs6YF+7ArU96jWl65c3w/oupksQ
+bNjItdbCxuqDnkkwXV01UgCvpU3qDNjL2GobA1cnD5uUsMgroMoN3lnke0IG
+NyadlDxB/sqxa+0ceH3/ze8bYVoQcOcS6afYxlhI6n39vHEjsfyseB2czndx
+sJB64r3qFsGj2rRM0o8+YXCQLaw1VL9Xy8b57KkfsZL+hruGZtnBYX9Zh2FZ
+cIN/8Bycs2wP4ROYvpzL4LNQj0V0nsJ6aiIu2nY2fl/XGsCHu6TtdnazsI9f
+l3fKifWrh31tEeeC+9V8cr8xsbOKiecm1zOS7A+XvB/gcfJ+cKX/A1GYJ70=
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.225285377617156, 7.188392099638602}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwl1QdUU1ccBvAHIo5qIIiUImCQsFQkzGLV8CpTBKTWSRFTZZWhyWkUtCC0
+IsMqBhRKiZYhRQqKESUgRUTZGGhEiwzFNAeRikakDFuw9Ls25+S888t9793/
+/e6Iyb6DW0PUKYpKxpdc//+soKmF5LqKpngHL19kwTsSJ3+/tZKmShauFzvB
++c/KGg7DIkFvGw0/7j7fuRrW3vMknQu7eVcYKK1oKqciUmYDn3tX8SAHztcv
+H9aFa3K+1PscFhnmtalMaMpryLlPB367OfNeHey/4NrjXkv8bvqkIhlWjxhO
+/wWmtJx/9IJrOwSax+H6PvEjTfhAx/M3obBiJOlVA4umijTrMrbD+hoFod/B
+rDRxpR/co5q57QavWBVQ9xlpvyLzXQxHfZlVtAeW5zS61y6nqTHH43MEMF9c
+NiGADzQXWZyER11St3Bhzs7rrEvk/ur2+aZw0tzF3U3ERz/qZsHHxtsMB2Ge
+sXL/xzA7JqNzltQX17Y7BDb4k6vQw3jlyu7wEjhXFRZjAUs2NO1/B3ML/3hn
+A1NWGzgc1HfeLcaOmP+wgB8Kr49d4cSGSxKXqOfBtbK1WQzy/LTVF49gg1oH
+HxX6s4yTjS9CPh7XuloayPhNHwZvgE/aXFScgSW98TGhMO+pUdfnMO2e50Hy
+jppXYs2EwzeW+orhfZNa7W0WmL/msiNF8E+bV0sS4LepFxwK4KOekXMd4VSt
+s5EZsNLWYWLEHPOv9u2ZQ7A0ZEFuMVx9OlvkB9/9NPB5KMyf2P3QCM5WzZxb
+A88/M2r+DPXnv/l30awZ8oqxLimGNVPvB/bCOdI1lcFkPscsV9bBsR3C30xg
+1SHry1dgSjSpcYfk1/bxL5dgjtr9DA9YKrQ7UgbXrxsY7DFGLvLkRdWwRDas
+FwdXb/KZugfLpVPp9rBOv2viM5guPTygBtdcVLuujvokOZbFw0ao2+mE0ARO
+FKidIF4hCfvRhYwnQ8wk929dIp0JIO1Npwc4MC8kJVsAj24Sph2CS5W8jG9h
+7ZOMh/dglmPKnjS43vWrZhvUq7dPcCcFZgVf6TkP+7hLhr4h7ZJo5jyMV7f4
+7r4QYg7XywX+rjl2nRsc7q/7vRAOHq8e0ifPn935dRG80O2S+yDJz+tRlwxe
+bb1fTPKhuhvbR2CZX21CMMmr4Kuns3AOJ6LTEG5tbZ03H/PD+TXmbBcb8/1b
+SvUceLhSMpECixzK/hzD/W63x5e7wD38F3rdsHw4aOU/pti/Uz98Ug4zpu00
+foXzh7c2xMF23kf2Hoepta+TXOFuLitvGzwqsP9ZAy5cwGu1gf29Dyw8QeYz
+/Z+YpaTds8B/FnnduNnaPxemjznYx8NjjF4JBddb+hTOgfmv7TxIOz9hwv4H
+zE+Fs0mSDpzY9/tf62BDRtWUOWmPPuU8YYj+bJYqaVixPSWxCW5s7fQOgrW5
+dTvL4eKBMt140j87zFMCD95QLRGT+rr85e0w/7qtmRRmCYz5M/C4xStXGanP
+1fraRvRXr6jK6yfjZce75cJKzf1XlaTd9Hv2LGywzPJTxfvxXr0dRdbjLW7K
+A+KDLpYDMOPKdlYtzDGO8/JDHv6ZWctySZ7ZbP1qOMBkzttouKesLvwD5JdZ
+55HnbErmsYNpDwft0g6cxrnrnPrK5jOyvyLiZFVwjmagP9lPh30X3D8IhzPM
+hJHwkKc81gzWf3vRgJw3B2RdI32Yd7q502Mb7FdMb8uEq+V6CU5kvciKW3zh
+nsqnLeQ89c+a4mjBkjenbatQXwVz2/oe0m9DQK4rPPQo0r0U5oV5mzRhfDJj
+603J5Dm2hYiGM7UD+6Ng7cCXozXIJ3PkGCsI5ruU71oLcx8EyXbDot2LK+qR
+d6xstdleci58FJG2HdYQWn0QTd6n+vvx9DKsw8PHNMj/gFwsHZPC3FKZz3lY
+Uax0TIN1Gtuf3yTvf3naSAh78zhSUq8i39woFv7EkHlqkrzf9mbeOVi0t9aT
+ifEl6jAZrTBvue2wOczSPPpUC/077Vpb6EjaEwQ3wuFmqy1/rSPnrJ3N0U64
+szLpmjPJpyI9az3GY+zX8uEq8r/nmb2kHE6tnenQMSH7U/zECHm8UP/55Wv0
+LxErVckkn6V903dJPjVxaYNwfnvVq1Mw5esabod8RYWhulvgUY/ukSg4QsNO
+l6wLRUkbnQGPS2KLyL4aPR4dfwHXqI2MO6PkHLo5WSmCLzNd5V/AnMf2mpFw
+Y1cz+x7qUvwRJrIm73+3aZCsa1bNDkEf7tOnW/qbyT54oVYqhJPshTsD4Pcf
+eBG5GtL/AZvf91E=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {6.662419809687106, 10.755933890072207}, \
+{1, 0}], LineBox[{{15., 17.00000000000231}, {15., 9.999999999998607}}], 
+        PolygonBox[{{15., 12.9}, {14.6, 14.1}, {15.4, 14.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.9452, 13.5}, {-1, 0}], 
+        LineBox[{{15.000000000007276`, 17.000000000003638`}, {
+         9.000000000005457, 13.5}}], 
+        PolygonBox[{{12.51826734053906, 15.552322615314452`}, {
+         11.280184249251306`, 15.293188945044921`}, {11.683281069670574`, 
+         14.602165824326175`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.823799910437668, 15.984057296392571}, \
+{1, -1}], 
+        LineBox[{{15., 9.999999999996362}, {9.000000000001819, 
+         13.499999999996362`}}], 
+        PolygonBox[{{11.48173265946094, 12.052322615314452`}, {
+         12.719815750748694`, 11.793188945044921`}, {12.316718930329426`, 
+         11.102165824326175`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.823799910437668, 11.015942703607429}, \
+{1, 1}], 
+        {PointSize[0.04], PointBox[{3., 9.}], PointBox[{15., 17.}], 
+         PointBox[{7.5, 7.}], PointBox[{15., 10.}], PointBox[{9., 13.5}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T6", " ", "P2", " ", "N12"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbf/cgdhei/fhhjgigjij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbf/cgdhei/fhhjgigjij.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {44, 44}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwt1Qs01FkcB/DrtU3eCnmlSYxHapFoO/L/yyNKJSShktgUbW0R67XDVEaZ
+kJSNI6FY65GpRMRkh2NFrcfBSmuOPCY9tsN4JLK/356dc5w5H/fe3/39vuc6
+1gad9gyRJoREwg9+E9ESfJbRhIEwpAmJtYhq+wa+P94K0gGLXDpNyuVoslBc
+Lu8Ipl0o+UeyNPH1s2+PBjMv+Sl/kKFJepViSy2ed1riHQIHJN+IlTGC/ckJ
+PQrg4K7EWU8ws8Wn97M0TQYZaZIicODMOk0WrDNKB+Vn0Nr2tVfArnOMoe0s
+mrBzxG0GcF/+rrseXDCpOl0qAkczo+/+Dqbt7fNqoL/+FNvKSXCgyiwnF/oP
+5fDfrjSG/Z/lr8fDfAHs1jQWWPTjlo27GVD3tdI9M3THWOEi2CLn8jwTTI+c
+mk5aDr93v6mtAGZWqEZ3gwNCz255h/f5PPQXg4PlqjWFYFG97vIGsKGyd382
+9nssw8sbHGHAGgjHfvL3xVZA/fToExxHMLMzk3RDP/X1v2oycX/7bbfn0K+v
+2r0Lclhfvo1ZCPOIXfMdMQ9ywF8tFOd/4LZBAmZnW5WZYD43jEIInk+gGqak
+aDJ3Ruiqi06t5fQRmtyf5Z90wnomO1ueLVEkOPBYdgxY4PZL5OavFLkf2ThR
+h3nWlV/XWaRIqlKCSA7nr7NNjF2giFj7JXs/5vfl5bg/OO5j/IViXM/TzagB
+hw7s5czhetPeq8lwfq7EbJ2zCaw3/9ZUA/UjrM67XAaL+uyO6kI/C6tsbZtx
+vfTZ4hQ4NPpq+xSua/+k0A/99zhmc9VNYV2uTlAD7yPgtkI5C8wcsk9Khnm1
++GxnM7Bg1rLcBvIo83/BYoLJmkGvJ2D2EvfNcjz/TcEwA/IzLHCofov3ucYV
+6eL7VeQHNYFJcP2af2C/t+RnlZtgdu9qFw5YNaJYJwwcuONK5Cu4T7RpfMIB
+zNzEc/sK/Yyo8QX64PykUWoa+lVfZZkii/XGXTa3wzxCR+GjachDUBuXtBby
+Dh+20pFgXpSPpADycv/zSDfB+0wHfLbOU8QuWmSrh04PUpOdo8hIuHs35keG
+/+rSnqGI77Lk8Di0+56NGRKK1DuXaTbgPG/9z8RMUcQkp3oXA+dlZT0dmqRI
+DS9cxRddqX9JCH5oydcqxXxstHyMYD+9QnppHswuCpGbA3Orbp7YYQb7H293
+Mp+miF5mw7ZUMPugXHwZ3G/9SfhHC9qp7+th6M9amZ6QgAUR244aQ/+09m1j
+jfWwnmmlJP5CEVXZiDYWmP77Wi8H3oPsRb9RUzAxrkkbgvdQ0iHxWoP7+88n
+voF8PIIUKxlg5vEbB+0hP/bRWBsx1o/NmtsDDkhT4QvAzGvFDkyw+QqNXVlg
+QqZSguE81yE38ATu9zBfUIX66t29vjRaeH6HF+QdqKl2djXOFzKfZQ/9DuZ2
+ZsngecXI5olZyNMx1WIa8zqlufoczF9yS1NVgnmlGvRIID9RaMVOKaxXUR/P
++0QR77z332I9snRsiP+eIgv5kU6YH9tBGDEipghjXaFrAlppkjcwSpF8znM3
+7J9s/e7wozfQH9f2qTzm8cK8njtMEa1Jj0I/zCNDVcUfbJhoUFWGLto8Ywj7
+GScn4hfRLZqVnSMU6VFy5buZw/nEcmt6HOZ7EmVzFcz+/hzDeQLe0x29Q624
+ftI7tewDRdib3Bgz5vj3yh7Lg/7V5VpaNDbA/h+W2g7DfIM90mIW+nRYF74H
+u/S8i6ZgEpU+vg/y4KrKJOmD6YV3UZ7wHoosTeKW4XqOoHYcrHjHuHYM73s3
+UykLeQbv75NtxH7WC18XwHo/R+9KJq5HBOc3Qb3sGKWy4+hXqmZh8J4tcukO
+e9zvGaVfCv1cn+ww08N+T63svQb9trrySqVxvXXD3RjIW6y38ECCeWwtGU2B
++UOLZ5TR5LHVJx7k58RQey6F9aWamjmvKBIQNmahj6a4l+u7KCLUM2twRZ+p
+Fh9ogfrRVeZsdM3rLzkPIc9LGhea0IIjiSU8eM9Gc9ZKOK+FzL7irEZiwThn
+dwhN75FyvtVImLzm3ZXo/z///f/cSP8LkEup2w==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.8245590828532245, 13.052815449711932}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJwdlQs0lGkYx193RdbEMDKuJVQTjksXl+9ru7iXQjnKLiLpgopNmzS5NONS
+LqGUGJuk1opSR1nNbItVjprcomwHuSUnQyPXap9nv3PmzPmd533/z//5zzMz
+RsGRu0JlCSEx8MJ3IvoOjxJNBvB9OU0MC2RTbZRpIklv8LyLrPjb9tXA6son
+HAKAe4vi9/TDecmKGZslwCKGkeFeYMvzzKSnxjQh+dHnrirSpDq2ag0XWDRd
+EVGmQJMS9qonLsC00JmXIQ+6h4cs9bG+83PiPjmaaCozmmWwPpF7Xk+WJn63
+vqhJjaB+oXp3H6FJPXvhPjLJHjM/+p0iZS4X7sji/XJ+n+9XikRNtqxiY/8V
+4x058xQZu0a3OGE97drPjnMUSfp1SXkYcpu9ccAsRWoS2WmXsJ/mIq/5GYpY
++r6WFwJzQ6htLKiPCUwfDaGenCb/D+BoK7M4JZiX8CNZFaDnpy6XoI/zZ+Rw
+lBYows4sTDbHehaxLQY/Te2yIyuRg87qBIFfqXxjIxPzHBztyYF5Aq1dlb+A
+fq/J+7oIGZrMCNgBTeivqH3SAubf9/ik3UXsv31jTjNwyRKXe67AgrzjT+0g
+r4Hw0TNfIQ/Dt/YO4cBSrnFVOXBvs1QcANw+4XXDH/OqOla2FFjMW1e3GJiO
+S9yXAnrcxGZXkSH4GH/R3wj9B4xvuMQDE2Lq0gb+egQxW5yBuV6bE46Df5vC
+MQs95BP/rlaB+f48WOEmg+ezP/SnQx4jNhzDEQPQl6ZuZEKesTxW0Cgw96rC
+ob+mKCIueJUrB+dFG1Nqyj9TxEGLcRz1RBVtcuMTkE9rpx+Net9Vf7kmoYjP
+poLAcOz3MGg2fpwiykuZ7rnI6nf06j9RxCPjh3vonwSX5itC3SPotN0I1k1T
+4tlw3yFY9a4yztvlHGUI+tEtUm8DZKOj5nGTFBlI8h80Rz7SMqktpciCXPTz
+lZhX2tPCLvBro1NkygTmPjaTKZ6miLwaPSpFvzfnErxhHxbG6581IjvX1bbB
+/GPZTxzTgem9V+dwH2KrLodjfqJnw7ffAB9cIf9tCvPx6jtlD/mZ7Q+x8kHu
+PvSjIbJut36lPvTXKslIhvMS26OX1ZHvV72KgH1mpflx4vRAT28lZwj6Z6qp
+dc+wgSOuf5oHf/zuK6VpwKTT5HYD+LeUiCLXA3OFt1UCIG+WQFgqA0xvTTzz
+DvKJqg+1GdGF8yEDq16OUSSQxz/8EZgrDSerR+Dz5AQvXYT3rZu7FQcoIlge
+cs4R9ftazbN74XzYi45EZFfGy8G38H0a3m7bidzDluV1UcRw5Lv+WvBL6vR6
+jF9TpEsnpCEJuXl8tAa4d3PikTZkJYMgzhvo943xjwbO6xSV5/YO+GGBJw3M
+TZCf7uuDPPbLpPkgj2p8ZQ/C/E7a/p54/rJuaxH4deFZMsyRd88qW8I8mRJ2
+/jDqF6mezob9uGIREZEKzN3g4+gM+xAYMpauCUw7Vh6LhX3g7/Tdlor5BA1E
+OENe/OoixQnMQ96SVQJc0zOvvAOY3tIUn4R160KZ35ch7zo8CPfFyxZEKsCi
+BwdSn4M+62N8x0kd6N/1YIMT5C0WNVpOsUCvRWeiGPzR46EdfGQFWSUr8C/u
+42fZAZPrtjsC3lPEa437c4K8zSRG2EMREnbJf0Qb+M7d2aFWmDeL5o0hr5c7
+4P43+DP2WKSC5720H57No8j6U94cGpllc+jlAyHplbQq8pCdtDZsbRAS/haP
+6m7k1tqs3mYhIeyySiv0e2BrbfILISlbfITDRx5afG5di5DEigeiOpFd3u22
+aBISbv5aay2Yl4i646qFQuJix5zahJzJvuh+Q0gyH+t6+CK3C+I9K+H3kmQZ
+eCKrZojWNcI+KIa2mf7Pamr2ME+URuRPg6gfk1A+B/tTRkvceMjGtWUfYB9m
+8tyK1ZHzlXRfwT6YSRhPktG/SdStMMir0vsRE/PgDpeUsmBfKxn6H1wxn36F
+CjHU+SVy4ze1gD/JNqX0Q35qnGlFYO5QbqM77HNvsE76CSbup0LFHtjHqOq4
+KxOawI0xj/LAX+WOvczzyB4z6X6Qt+itbYMNMj6COiLG/08N+j/4tL4C
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {0.17544091714677545, 8.052815449711936}, \
+{1, -1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000000416`, 17.}, {15.49999999999958, 17.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.75, 17.6952}, {0, -1}], 
+        LineBox[CompressedData["
+1:eJxFlAtMFFcUhoeisYKCluWhVh4zI9BIKcywsK2UHm2KUA0KLBZEZXWBWooV
+2fAQEOVVd8lCjYq81rIoBeRVUGK1lZfQEhYEUSuSSOVhk+Vhu0UoCAvbO9bc
+nWQy+XLvnHPvOf/57Y4cD4h4iyCIUPRyX56Oe5yBeP3Q0CCeWfjN8wMgRMUe
+3m401LSNDqSlIz6qWed3gIZGv/LVil7EGu/YV3E0yJ0/CzY3dQGivrF56jQN
+bSE1pkYeiNUXPyo9SYNV/NkXioOIg2VO0WIaeoqeHvNPQ6w8sj/Ji4ZXm+6o
++5WIYYNN6xoaVLFDPxj8wrH8nz/uU9AYcmDKuA8x8fCuQS4F+9K/33H8KeJb
+WovrOymozuR7rxhD7CPbXGlAQUKUqEU3inheGlDQQoJ904lHf3P7h88HGGSR
+UCgRZzT2IxZMSLVCEr7QdndK7iI+EyXgMSTw8wbXZtcjtvWwtLMmwWRirCPh
+MuKj+X6uG0mwyZ8yupfN5fN2TbInYUBolMlLQnwu46ugHSSk9o4mN0cjjjH9
+1TeaBFlm7NdrwxG7GDvaXCEhYEA5seIwYs3jAu0wOh+ZOhPKrUtDenO3UFAV
+4i6QfMPV57k7P5qC9/mWC3tOI94rsGAbKDCsCFUVX0LsWGE3qqFAqyEsrt3g
+8uumxhxoiGjZKkz5nbtvR/aeQBpeCHnCwQXuvPmzT2JoqL8ingskXVH8NidN
+Kg3+pChe/DniVt9Dj1NokChbHRNOII6p1FVE0SDd63/b+BLi4d27Q31pSPZU
+l7XcRCwK8rqxkYafPNr/iniAeN78usMIBbWkao2Fmov/cK69hILvCle5CeYQ
+27YVLIVQsGpy8lCOjtv/56ksMwqGI/9VMgYMEFZ5L83vk2DVY1lcokXrVknO
+cIEEuwvW9sppLn/30jYRCfEnd8p8n3Px8gV3PiQhMtG9b5LL7zjOquzI/3Xc
+ilgQ5FK1AfX7bJcLr1a/Lvv2VvzNYv3/S1+ODIbl6OOrWXW4KEOf37Zwddi9
+VFd8vnkerzT2jP78MZHz3Z1S/f0Ch/gvx/P1949s91xfVKuvT1a7ZSh06euX
++GOd98y4vr7ysE8GpCYMrn/dUIlMwWdwf44FK96uOcjg/plVT1bbZzG4v8Xw
+qDqjisH9NzTVje/rYbA+loLL+OHjDNbPA5V6ZT3BYn1JSrs65etZrL/BoTTj
+sk0s1medY5j5ojWL9RufnHNxmlt/o+80182Z281YrP/3qmeTJ1eyeD6WxWaz
+zCyD52fa/N1t0lEGz1d3lP10XB+D56/S0E0gb2LwfEbKFSm76hg8v3Mf525d
+d5XB8y3NKwHiMoPnX5isur2oYLA/XDt1uOkct/+Nf+wqv2o2U89gf3HPIfcv
+dzDYf7Y8+9TS+RmD/YmNoM7XLTPYv9SyxHfEJIv9zas8UDPrw2L/k/T/XDER
+w2J/LH/itNhQwGL/9Cky4bU0s9hfHXqz0hUjLPbfuNeCdsP+/B9S6DsJ
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.75, 8.354800000000001}, {0, 1}], 
+        LineBox[CompressedData["
+1:eJwt2Hs4lNsXB/CX3C+FijBpdCIiplCSNGlcKjEkl1yanEguNR1CJU1CkphK
+JVQTFUo4pahUQyoj50RyQhekRIcaNRUiv+8+z88f1vN59rvXXmvNfkdP+kHb
+PYKlKYrSlKIoEikZ8ovOpP77mcOkhMFj/i6wj/JsjjIsWCvtmAM7TykzUYKp
+on0WH2BBNb33529MyiVGrpihz6QUtDwKu+C2gVT3aDh1C1fnFll/8Y92OZz9
+PCgmBa7WMnd+C4t//dq+GqY7tWcqzmZS/PhCQ3lY5kzfLAPiAwyV+4iv1vNK
+LBGr7tNE0Yhx3ow/rBFTayP1TIiVWBYLiAcDH71D3grb2eZ02Lo/cv0FONSH
+Pk0epszVZkbAY/ZhAx8QZ6gEqduRuhXb5B4iCkpGrukiSnKqXgkQu262j8si
+qjnd+baX9PMPK3AcfYsbFz0JJPsGxVekEMslU0scSD/rmkw0EG0X5+Rbkn0S
+/+z5iEUnnAJIrDKRZ3iQ+hbe1l2AGNcxR0Ty0vWSBEzEtn0JH68iNmqmGfkj
+cvt//9CJKFzmFnqA9PGX4i819DF20iXzBjx88UWMHexy1cx9CLbeaP8gGI4X
+8SVkXpzQ1pwkxPr2jJAExPJV9OmnEZnGbI8niM5aQffPIwqa9y3VxtyFUWMl
+Z4gjUnKC4T69r/vT4WlRrJGrsOAmFbsNtu2UmyKGjVZqeLNgFjuuwxj3wmeh
+Y8wUuOT+lipfmGvYmt+MupKebopJgJvm8dWOkLnbruKcgqvCXy9nkXkNrnO+
+AIded+sewXyHJeqHLsLiSN3Kcph7fotUHpyqW7czHK4/XaR0CG77J/iiKbmX
+1ayt22C29mfFwVn4/GbesHYl+9Wzu0/AjRFHWubBama9OV4w81JNlRzM2/f8
+MwOOuOK2/R364XUKYg1gmn/G1kdkHnZaAgtYKNzSXwqzZVQrfGEO61bvObI+
+6cGnLDidPzacAzNWeeR2w9F+ixzOwz5/bjw3E/V5Kg5zr8OhceHBrnDbIfnc
+ZpizTBTOI+uvqQ3kPeLQlolJv/wxqsaczOfgxRWvyfNcg7BI0k9p+htpzKvu
+8daUa3C2zpmjs8h9nWn+ZYzMx+xmGrlXvB9Ja1cbYC7pB6IWw8z2WVrZcCjr
+agJ5Ty0PPqnvgXkmEi6N3KOG6ZJ5hji/+lnBT5yXJD0QEA6nFiZJPSX3PX1I
+qwBuW5w/egqult5+somsVz/c6QOrtXTVfIGN3ktuacDWlwMmKc7FPPpTio9h
+Hj63ndZMhbsiLo+O6+E9/DqmrgHzTNX/jYDz0hI85GCxCrv13UzU0eGybwj5
+KE/l0jD4VeT3Ha2wMKTiiTRs6jHdqwJWc3W5UU7DfUos5vNhQZbvaAxsG9N3
+IYL0k/Niujdcdeqm1hpY/DU0wB2W8Zm8zgzmcw6Pb4ZLAk+nzSD5Qoal+TAr
+61q+MtnvWM99Cou3Degowrx1/kGzcH6q1JRxdZgrx1+8B04qdW02hLtyl4pe
+wzI2K7KdyP6dFQUr0J9aX2tDFMnvdZ11HuZbu3Muw4z6bt8f8OZ8hY5+Yl/n
+cTtyv3b6ejIwj3LrzwNRsFigk7cH5pguuUPmWWd60klE1lkt37JhmZFPzZpG
+yFuZsCIZZl2/U7kJFgzFbfWGu1SOHS8k6zeebVIj+5uXLemFqfJc22s4vyRh
+29+6xji/NECDCQtrajsdYU73lzd30Y9/rv2OEFgscfRkwOlN6Yq7Ye4S2Yt5
+mI9CmXXlflit/ugqBbiJZq6WAJfPHaiJ08X7lSVtwiXr7bbeX3Vwzvejx3xh
+wZ1nnfGw+EuipS3Jx1mSqg1nBfqt0TEm835R0KiNz3PjQofvqJfeOv9gNiwZ
+nlH0DGYYhEQmwHOWRX37E+au8gkjdnY8eOQksbB46ym44lJSViLMnD156WOY
+YbyoI5b0/0jvihLOa0rY8ZCYX1tWGEAsa8Y6QPLby227Awtm/hDmkHzDPUI9
+9GP91wK9e8SHpOckwpZJ4ZUDsFjkp9MFC/0KQg1Qv7B2z2YLzIMevTSXzE94
+a4ZtLNzWPuFdSua90iWtEH51JiZglMxriaxmDSxUil/iPA/rlflFxM5rFYJP
+wMzPWnOLYMbCHk4nLNTaczYazn4/0fybCfaf4q40IvtD7PI4cJfers0PUQ8t
+JWj0OCzcfM/NDWYOmR+rhhmxqfMb0J910aMD7TBnk1yzDWy0/GjUR5Lvr8T9
+l8j89DwzPhMvi7qnASuIzA/2w+wbSlLJM/B3bKIkk+xnC6clSMNVkfNX18CU
+U8fHTC18PhZ+lfkwf7jUaQFcFx42iwc3lSRf69fE35cl5sN+sOBzxso7cFaB
+mcia1Dv0x7dLcETsh8naMH2nZU4JWf+WrTdB5lFp87oBTt3/WHmQzIsV7jEB
+N+Ve4b+DufFFRx1xHo9zcrQXZk/ZG5AHX+g01v0Gi9uXtfyEk76qLJ+C/OJ5
+vPyNqN+WnjTPClbT2b6qFmbaa9JCyDznrlunh/6FLrNaBaTehSknt8FiXXFh
+D8zVn7a9lHjDyzRTU5y7dNvXdrgxxdt8F1zu3EH/RO5zvjntMczfdmG8jzzP
+Pi2aOh/rqpllIng4aOiuP8xN3p/Mh9vc2orPETfIS+zI/dbbntgBq11qSHqB
++sQRadnKZoinq28FwNyWlisL4C6Dle9b0V+bDjWyBha46I+wYO7DOPsNMJ3h
+7lqOeUWnarb4w+xbq0NnwnN6/trtSfbLbr15dDo+39dRyfYwL8bKSwPOpsmU
+GMHUU8/2gmn4vnk7RUoRLg8vVl8NG8Vatr+fT97z7+/lYcGuC+U1MD30K6Nz
+Kr6vzosnk374LTYlTfDz5ewwHsw+M63vJUz3L1MOhQW7t7AnYMrrvsQbFqte
+sLNGvldWDJE7zJF9qXWAnN8zrdoLpjKKd76EPZ0dErfATWMmPraol9fmszqJ
+7FcQBgpg2rGs2yVkf4qGrDT6HTZ8J+kkz+c+6PaDy3f9KaCReTI6eorgd6om
+oxzSf55L+jvYyM+l9zLxRzV9Zcxz+E2d0jB5fiv3hTacXl3a52COekLufp0M
+VxS/Hz5q/t/3xWty32mO1fXtMG9m429XiJ+/S1NlYB6/7u7xhBPSRV+NYbHt
+8qI+1PtM94fHCljNWisgHD6WmDF9HdyksmlaN/oNGwnrCyTPs6+/dIVpn5rv
+bCbP/3tX5zbm56VjUEfM+dG/3gi2682I3UjOe1Lx+awGkzIsfJC6Hi4POPLv
+bHg0bmqnE8n3o7+iSh3/nhwwTF8M05Vpg7/D6TYv7xvAbBdd+7nwvIHHt6fC
+VKwuWwZeJCcvlCbruQ6ZP9Xw+VrUqvaRfq02u6pgXXxswreZeNe925ZwX07K
+ugdwV51IsgOusjqRch/mZD9iCOH6yeuVH8NspxfdOqiPMX37rg6YX1A4GA/H
+m7p3j5D9Z/16u2D+slvBGqTfaAvnFeg3dNtTvfmkv1zjqmzYpVXudxeYue8B
+8y2sYNTjsJ2szw1K08b8GqIb/8yCubLHVZbCdUcCo++Q/v0Zi1iwZvfEmrdk
+fgsOpVnA06INvssvIN/nDtcUyH38fn6ZCcwcY+2rQ/429wCFNTCH494TCjc8
+afs9BOa2ynYMo97VIUOZ8TD72yfHOPi2WYj8EZg6vlH0L/o3yqhJPkXyjw8d
+9IEruEFKeSS/rNL3B5hvY0tiWw7c5SQ+YQHnH14anQULlx+O9p2Cc10L8w7B
+PJHx8dDJeP/qt6zcQ+op3KR6RpWcN7g/jDwvvCwcV2FSlxeNpvuQfEuCsjLh
+YZsvlxxhgZ2+/Xr4D9oR9UXkfPHfi9zg3drHJ+aS/Qsbj+yBu2LtD84k+Wdx
+Df+BNZxGTmiR/endz3xwnr9e2XtNmB5rc/YnPGp6U6JL8g22G95AfYZ0fYrk
+4/3qUdiD+m9yVaWsybzKdOfpo7+sD+ISV7hcyk2GB/NkP8SR+rsi/ETP4Vcj
+befSYLGifL4O5kVF2ZiUwvzeg5y18L3lw+MtZP/rkbKtsNpDWvcomf9hK5tI
+OPrvnKP6C7HfakOtF1xKy//bEeZ9ebXQEM740LFlK7Hp3rOvcJ7t8d7VqTD7
+9lTLePjyjPTMfLI++7GBAhxYJZtYCQuVExQV0Y/k6ejlR8RXew0G0P+FuU+e
+PyW+56xTh3n5H/+s2gIzVR68yVVmUpcknkVNZP1FUmSCEvpUvWUlggXmJo4x
+ikxqw9mF++/CnLX87+kKTConzCyllJxfvL60QZ5JxZQ5BZ+BKZ8f3VawULTb
++zDcdT1FqkUO3/f7Vgp2wfT1axwvwKZJrH2kP2Zs8uli2EVJd7Y/2a/KPdEF
+x82aOOlBzteKFbCQbzS1XriW1PcwUv8prCDpdHEl+T2jG2JRj1xqxhVPYnfb
+H5aod3TKJOVNpN6Pe3XGSP0rHNZHkXWvOqta9Fcdbbbg8H/zWeEVj/6/9PnL
+FZF+BujqdMyn6a1kEumf5/ZspAA2Ne4xHiTPq2uoUpjnzfeLPadaoP7QfmUz
++C1N29kGprzP1RrDm0W3ajhk/csf1kPYryBTmZgMCwKpR0kwTc6aUwjTf7mr
+f8D51F4G+yHMS234TINP7jDb+YbYys58PuoNSZ9v9IXkW3TFma74//9Hsfx/
+VGD+D6J4HSk=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           
+           9.996694214876033]& ], {13.471090192570806, 5.161297472978525}, \
+{1, 1}], LineBox[CompressedData["
+1:eJw9lXlQE1ccxxcLNYCYDSErJgri7lKtyGWHVDvVn+JBCw5gsRILSCkEWxA5
+goLgBRJxMAoZ5FIGGSynpam24oEKapCrXqhUUauIFKIVi1Qy0EJf+sfvzezs
+fGbn7ftd3+9ziti6LmoKRVFR5DG9C0cnyXIE6v/FwcZiv8LQQ4RbNZ4Jt1go
+nOI2cc+GMLzIPVrLQsHAqklJhgNQ9t9sc8hloXT/zNJVQ7OBis+sn5XBQuV6
+67iHCsLV58bd9rIw8jqhQtkyC6iiKbsjNCzkPV9+X7mYsLHWx7WSBaNY1kw3
+yID6TTgjs52F9gilBe9N+Knc/I6RhRy9dlT/VEp4uNzBjQNoF8jXawlTma12
+MRyoVPtzFArC2Uvnza3l4JzTduc4LxMHZmkHOfBs3DH5yXzC7nnRPzjzsE+7
+IX+nO+GUWGNXGA97PYJ6p31u4lnXSw/zsDphdGIs0bT/K/nbMzzccj7lp6si
+PHAkheviwefS5UFxH+GPj1n+08tDe3Nq9VmWxBtw8d+OFzyMHXtTYRMhM+Wf
+kNzDQ/Sf00JySwhntzz59hoPuk7DoolWU77STyvLechb2rgoc5Cw8esF1Soe
+ak+m2/QZCdtbaUOX8SCtTCwsHyFcZEgWmvOwpGPcy67HdF5Br4+eA++q8Om7
+6gjHF02ez+Jg+7vdvFhJ2H08w9GHg4UN9KJRa1M86XqpkINneZSDRxmJH940
+OTxmgUtLupw/l3D8OnnAzywcnit9UFE8k+yPmb+1gIXlC1T50QLClKbs6j4W
+XI23PVYm2QO1+WChcA8LH9hNvdH6ZAZQc3JOqbNJf42vA3b6Ew5+f6KjlIWb
+H82v07UxQOXuevP3JdLPPRL1Z4GEdQNbigwsOMVaxx0dlJB63Iu668BB+GT8
+2hVHCNNnN8UqONB1l7dZfEnYXS1+XMhBT+/1C3oXwgFaKrWbg+HurKPxMwnr
+tF1ZEh5W7DR4m8sIC4SKjf48hGnUlsVupv1xp9MyeCi74lK1LYhwk0X+2ZM8
+hLjJZZ5qwgOxfss7eeiOcV3Y1UT4uJnuwu88JBtM+iBsn/UysJ8Hj4bbd1yW
+Mfhd831r36+pDO73te0KPlDH4P9z1qS+U95i8PyqDZLG8T4G45vhuyPycD+D
+8U8flq9c0sVgfgrfMK+xGgbzP3Dv0KmL3zFYn4EzI3mRDIP1CwsypJ6pl2B9
+pcfvB/l7SbD+wY/oHzN0dtifK01GD7mTHfav50PXGxcOirG/1TU5MUWjttj/
+HVS/c4jSFudDrzgIMY9FOD8C78lnN8JFOF+Ns4c6BSM0zl/ik90PXxXTOJ8t
+aWV/7Q2icX51luZtLzka53soXbM5zJrG+Yd5mcOyqTTqI6XPuzOdoVE/iwWS
+TjM5jfrK/GO4YmsUjfoTqoUhw6U06nOOWL1hzSMa9dscCcwrmQj1La1fe9o/
+WIT6v/qTwMxCI0J/2FxRN/vtLyL0D+WK6piMmyL0lwb7LOrafRH6j/vp7Ad5
+bSL0pyP1KarKShH6V43VaGvtFhH6267QLYIljiL0P8fE4rGHjTT6o63wxdIh
+Hxr9U9eb9oWnRoj+auiQnfNMmo7+21IyyPr62aA/F5d06lVO09C/+1Uqs7vj
+VujvJ06UvxfUZ4n+v0kcfXvlcwHeDyfOm/QxFe+P/wBzMXw3
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.5, 9.0548}, {0, 1}], 
+        LineBox[CompressedData["
+1:eJwt0w9Q02UYB/BXioG38WcxYlDSEISBKOgdCfLHn2ODAc6I02utEJLoAE9F
+0LH4szAFByVDizI5Ok7GEgrYIjzDi6vAThDYFKgEzoQgVwhbIPEnjL5v13v3
+u/c+97zv83uf597X5/DxlEw7QogMH53J8jrGZobY6BzEEFeyb8DNlyGaptWP
+u+AHr060boIVbF1JIcysOxPqQ0nRRWGw3LG3hAuP5x/J+DOQIVlFvIS/kS/l
+XCoxwOEzI9Oj8OMi5ql8OHTN6UUjLI+9/DgSlk+3nXgHFtc/78+h61Wpz8XD
+uax8/ZSQIfV/5M5vhIdTi3f9ACdXjEz2+jBkyi0p3ghf6hQvaGDnsOBHjTSu
+eW9nApy7bfTXBjh8uEzHgZ89PVnTDJMldciIgCF5AqHn17BhrKFSBxfvfSlq
+EGa+EW4vhtM7eqot8K25rySpcJdutYCF8wm5Fxul8Lui9J3+cP0Fu+4Y2Mar
+tErgb0NYhj3wW1WL9zNofXXtXkkwz3uAUcNXI7clp8OhVq7yA/hng3usGq7y
+/8jlCl3fJa1pgKWp0WNX4epatW4QznLaaNXT/D6ZnzyBP31UaayFiaJBtR31
+GXYc/6Wc5hMFhaXBwZqZ81n0fxcDu8/D+k1rgXthjWQl6Dqc03zqJBcuFSTU
+jsO7a1yLRlGvo/3c2yuwKLmlqg5WtRjznND/UOPWXa/D/KHaMx5wZYVkCx+2
+cGNZ1LsDrJuHAnB/XjN1sGk8cNBOCycrlMZF5POqTtPK4NA7iqIR2Pwwq9A1
+gN6vewufwzyTTHbPH3W6HXu5EJb2jSqaYBKmdhfBpbOO7adhi/joP0/Dy9qt
+nhkwv1291IN+xM1Mrsng0t/5Dmdh3RBPKaL7h52ixLDXNVcxA9umay470H62
+/WaKg9O/U7jVv8CQuZmxHQfpfndyJga2XOuNyIEN+eyCWW+GHGjyLDwLV//U
+k9AGJ8avHLgCM2qXz8rg8vlE9vdwaPxy8Qk4hdPXP0Et8F7Ig/sDB26tww9u
+x2ZXwH3vs/d4of5chl/SDidzbmtD4FIx8bDCfPeJxBjaT+ZISQTOc0i0FiWh
+/btLjmnhVduNwljY8EVX5Cz8ZVpIdjiN71OpAlBf1MOj3b6wOXsqQg7f1fDq
+7GHVK74/lsOVNy68cZ+eT8s6aKRxk8TcCgs6M6fo+zCX1S4W0HrNC5Z5+l6U
+cp9IWLjf08kB/d+vU4+ubMH5+YkyLqz0CLnTAV9ffnMDtWXaxZQL8203J+3h
+5vGb+mAajxhytiFf6yUv3xk/1H141t4Mq2w5f7XAUlm/Xk+9YalZCcufOel/
+Cha6NH4YBwv8OPbR9D0+6ezxhv8bgv9nP+ZfkwGqQQ==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           
+           9.996694214876033]& ], {7.286723682459369, 12.031518421803128}, \
+{1, -1}], LineBox[{{15.5, 17.00000000000231}, {15.5, 9.999999999998607}}], 
+        PolygonBox[{{15.5, 14.1}, {15.1, 12.9}, {15.9, 12.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.4452, 13.5}, {-1, 0}], 
+        LineBox[{{15.500000000007276`, 17.000000000003638`}, {
+         9.500000000005457, 13.5}}], 
+        PolygonBox[{{11.98173265946094, 14.947677384685548`}, {
+         12.816718930329426`, 15.897834175673825`}, {13.219815750748694`, 
+         15.206811054955079`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.323799910437668, 15.984057296392571}, \
+{1, -1}], 
+        LineBox[{{15.5, 9.999999999996362}, {9.500000000001819, 
+         13.499999999996362`}}], 
+        PolygonBox[{{13.01826734053906, 11.447677384685548`}, {
+         12.183281069670574`, 12.397834175673825`}, {11.780184249251306`, 
+         11.706811054955079`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.323799910437668, 11.015942703607429}, \
+{1, 1}], 
+        {PointSize[0.04], PointBox[{3., 10.}], PointBox[{15.5, 17.}], 
+         PointBox[{15.5, 10.}], PointBox[{8., 10.}], PointBox[{9.5, 13.5}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T7", " ", "P1", " ", "N13"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbf/cgdhei/fiijghgjhj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbf/cgdhei/fiijghgjhj.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {0, 22}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwt1Qs01FkcB/DrtU3eCnmlSYxHapFoO/L/yyNKJSShktgUbW0R67XDVEaZ
+kJSNI6FY65GpRMRkh2NFrcfBSmuOPCY9tsN4JLK/356dc5w5H/fe3/39vuc6
+1gad9gyRJoREwg9+E9ESfJbRhIEwpAmJtYhq+wa+P94K0gGLXDpNyuVoslBc
+Lu8Ipl0o+UeyNPH1s2+PBjMv+Sl/kKFJepViSy2ed1riHQIHJN+IlTGC/ckJ
+PQrg4K7EWU8ws8Wn97M0TQYZaZIicODMOk0WrDNKB+Vn0Nr2tVfArnOMoe0s
+mrBzxG0GcF/+rrseXDCpOl0qAkczo+/+Dqbt7fNqoL/+FNvKSXCgyiwnF/oP
+5fDfrjSG/Z/lr8fDfAHs1jQWWPTjlo27GVD3tdI9M3THWOEi2CLn8jwTTI+c
+mk5aDr93v6mtAGZWqEZ3gwNCz255h/f5PPQXg4PlqjWFYFG97vIGsKGyd382
+9nssw8sbHGHAGgjHfvL3xVZA/fToExxHMLMzk3RDP/X1v2oycX/7bbfn0K+v
+2r0Lclhfvo1ZCPOIXfMdMQ9ywF8tFOd/4LZBAmZnW5WZYD43jEIInk+gGqak
+aDJ3Ruiqi06t5fQRmtyf5Z90wnomO1ueLVEkOPBYdgxY4PZL5OavFLkf2ThR
+h3nWlV/XWaRIqlKCSA7nr7NNjF2giFj7JXs/5vfl5bg/OO5j/IViXM/TzagB
+hw7s5czhetPeq8lwfq7EbJ2zCaw3/9ZUA/UjrM67XAaL+uyO6kI/C6tsbZtx
+vfTZ4hQ4NPpq+xSua/+k0A/99zhmc9VNYV2uTlAD7yPgtkI5C8wcsk9Khnm1
++GxnM7Bg1rLcBvIo83/BYoLJmkGvJ2D2EvfNcjz/TcEwA/IzLHCofov3ucYV
+6eL7VeQHNYFJcP2af2C/t+RnlZtgdu9qFw5YNaJYJwwcuONK5Cu4T7RpfMIB
+zNzEc/sK/Yyo8QX64PykUWoa+lVfZZkii/XGXTa3wzxCR+GjachDUBuXtBby
+Dh+20pFgXpSPpADycv/zSDfB+0wHfLbOU8QuWmSrh04PUpOdo8hIuHs35keG
+/+rSnqGI77Lk8Di0+56NGRKK1DuXaTbgPG/9z8RMUcQkp3oXA+dlZT0dmqRI
+DS9cxRddqX9JCH5oydcqxXxstHyMYD+9QnppHswuCpGbA3Orbp7YYQb7H293
+Mp+miF5mw7ZUMPugXHwZ3G/9SfhHC9qp7+th6M9amZ6QgAUR244aQ/+09m1j
+jfWwnmmlJP5CEVXZiDYWmP77Wi8H3oPsRb9RUzAxrkkbgvdQ0iHxWoP7+88n
+voF8PIIUKxlg5vEbB+0hP/bRWBsx1o/NmtsDDkhT4QvAzGvFDkyw+QqNXVlg
+QqZSguE81yE38ATu9zBfUIX66t29vjRaeH6HF+QdqKl2djXOFzKfZQ/9DuZ2
+ZsngecXI5olZyNMx1WIa8zqlufoczF9yS1NVgnmlGvRIID9RaMVOKaxXUR/P
++0QR77z332I9snRsiP+eIgv5kU6YH9tBGDEipghjXaFrAlppkjcwSpF8znM3
+7J9s/e7wozfQH9f2qTzm8cK8njtMEa1Jj0I/zCNDVcUfbJhoUFWGLto8Ywj7
+GScn4hfRLZqVnSMU6VFy5buZw/nEcmt6HOZ7EmVzFcz+/hzDeQLe0x29Q624
+ftI7tewDRdib3Bgz5vj3yh7Lg/7V5VpaNDbA/h+W2g7DfIM90mIW+nRYF74H
+u/S8i6ZgEpU+vg/y4KrKJOmD6YV3UZ7wHoosTeKW4XqOoHYcrHjHuHYM73s3
+UykLeQbv75NtxH7WC18XwHo/R+9KJq5HBOc3Qb3sGKWy4+hXqmZh8J4tcukO
+e9zvGaVfCv1cn+ww08N+T63svQb9trrySqVxvXXD3RjIW6y38ECCeWwtGU2B
++UOLZ5TR5LHVJx7k58RQey6F9aWamjmvKBIQNmahj6a4l+u7KCLUM2twRZ+p
+Fh9ogfrRVeZsdM3rLzkPIc9LGhea0IIjiSU8eM9Gc9ZKOK+FzL7irEZiwThn
+dwhN75FyvtVImLzm3ZXo/z///f/cSP8LkEup2w==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.8245590828532245, 13.052815449711932}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJwdlQs0lGkYx193RdbEMDKuJVQTjksXl+9ru7iXQjnKLiLpgopNmzS5NONS
+LqGUGJuk1opSR1nNbItVjprcomwHuSUnQyPXap9nv3PmzPmd533/z//5zzMz
+RsGRu0JlCSEx8MJ3IvoOjxJNBvB9OU0MC2RTbZRpIklv8LyLrPjb9tXA6son
+HAKAe4vi9/TDecmKGZslwCKGkeFeYMvzzKSnxjQh+dHnrirSpDq2ag0XWDRd
+EVGmQJMS9qonLsC00JmXIQ+6h4cs9bG+83PiPjmaaCozmmWwPpF7Xk+WJn63
+vqhJjaB+oXp3H6FJPXvhPjLJHjM/+p0iZS4X7sji/XJ+n+9XikRNtqxiY/8V
+4x058xQZu0a3OGE97drPjnMUSfp1SXkYcpu9ccAsRWoS2WmXsJ/mIq/5GYpY
++r6WFwJzQ6htLKiPCUwfDaGenCb/D+BoK7M4JZiX8CNZFaDnpy6XoI/zZ+Rw
+lBYows4sTDbHehaxLQY/Te2yIyuRg87qBIFfqXxjIxPzHBztyYF5Aq1dlb+A
+fq/J+7oIGZrMCNgBTeivqH3SAubf9/ik3UXsv31jTjNwyRKXe67AgrzjT+0g
+r4Hw0TNfIQ/Dt/YO4cBSrnFVOXBvs1QcANw+4XXDH/OqOla2FFjMW1e3GJiO
+S9yXAnrcxGZXkSH4GH/R3wj9B4xvuMQDE2Lq0gb+egQxW5yBuV6bE46Df5vC
+MQs95BP/rlaB+f48WOEmg+ezP/SnQx4jNhzDEQPQl6ZuZEKesTxW0Cgw96rC
+ob+mKCIueJUrB+dFG1Nqyj9TxEGLcRz1RBVtcuMTkE9rpx+Net9Vf7kmoYjP
+poLAcOz3MGg2fpwiykuZ7rnI6nf06j9RxCPjh3vonwSX5itC3SPotN0I1k1T
+4tlw3yFY9a4yztvlHGUI+tEtUm8DZKOj5nGTFBlI8h80Rz7SMqktpciCXPTz
+lZhX2tPCLvBro1NkygTmPjaTKZ6miLwaPSpFvzfnErxhHxbG6581IjvX1bbB
+/GPZTxzTgem9V+dwH2KrLodjfqJnw7ffAB9cIf9tCvPx6jtlD/mZ7Q+x8kHu
+PvSjIbJut36lPvTXKslIhvMS26OX1ZHvV72KgH1mpflx4vRAT28lZwj6Z6qp
+dc+wgSOuf5oHf/zuK6VpwKTT5HYD+LeUiCLXA3OFt1UCIG+WQFgqA0xvTTzz
+DvKJqg+1GdGF8yEDq16OUSSQxz/8EZgrDSerR+Dz5AQvXYT3rZu7FQcoIlge
+cs4R9ftazbN74XzYi45EZFfGy8G38H0a3m7bidzDluV1UcRw5Lv+WvBL6vR6
+jF9TpEsnpCEJuXl8tAa4d3PikTZkJYMgzhvo943xjwbO6xSV5/YO+GGBJw3M
+TZCf7uuDPPbLpPkgj2p8ZQ/C/E7a/p54/rJuaxH4deFZMsyRd88qW8I8mRJ2
+/jDqF6mezob9uGIREZEKzN3g4+gM+xAYMpauCUw7Vh6LhX3g7/Tdlor5BA1E
+OENe/OoixQnMQ96SVQJc0zOvvAOY3tIUn4R160KZ35ch7zo8CPfFyxZEKsCi
+BwdSn4M+62N8x0kd6N/1YIMT5C0WNVpOsUCvRWeiGPzR46EdfGQFWSUr8C/u
+42fZAZPrtjsC3lPEa437c4K8zSRG2EMREnbJf0Qb+M7d2aFWmDeL5o0hr5c7
+4P43+DP2WKSC5720H57No8j6U94cGpllc+jlAyHplbQq8pCdtDZsbRAS/haP
+6m7k1tqs3mYhIeyySiv0e2BrbfILISlbfITDRx5afG5di5DEigeiOpFd3u22
+aBISbv5aay2Yl4i646qFQuJix5zahJzJvuh+Q0gyH+t6+CK3C+I9K+H3kmQZ
+eCKrZojWNcI+KIa2mf7Pamr2ME+URuRPg6gfk1A+B/tTRkvceMjGtWUfYB9m
+8tyK1ZHzlXRfwT6YSRhPktG/SdStMMir0vsRE/PgDpeUsmBfKxn6H1wxn36F
+CjHU+SVy4ze1gD/JNqX0Q35qnGlFYO5QbqM77HNvsE76CSbup0LFHtjHqOq4
+KxOawI0xj/LAX+WOvczzyB4z6X6Qt+itbYMNMj6COiLG/08N+j/4tL4C
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {0.17544091714677545, 8.052815449711936}, \
+{1, -1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000000416`, 17.}, {15.49999999999958, 17.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.75, 17.6952}, {0, -1}], 
+        LineBox[CompressedData["
+1:eJxFlAtMFFcUhoeisYKCluWhVh4zI9BIKcywsK2UHm2KUA0KLBZEZXWBWooV
+2fAQEOVVd8lCjYq81rIoBeRVUGK1lZfQEhYEUSuSSOVhk+Vhu0UoCAvbO9bc
+nWQy+XLvnHPvOf/57Y4cD4h4iyCIUPRyX56Oe5yBeP3Q0CCeWfjN8wMgRMUe
+3m401LSNDqSlIz6qWed3gIZGv/LVil7EGu/YV3E0yJ0/CzY3dQGivrF56jQN
+bSE1pkYeiNUXPyo9SYNV/NkXioOIg2VO0WIaeoqeHvNPQ6w8sj/Ji4ZXm+6o
++5WIYYNN6xoaVLFDPxj8wrH8nz/uU9AYcmDKuA8x8fCuQS4F+9K/33H8KeJb
+WovrOymozuR7rxhD7CPbXGlAQUKUqEU3inheGlDQQoJ904lHf3P7h88HGGSR
+UCgRZzT2IxZMSLVCEr7QdndK7iI+EyXgMSTw8wbXZtcjtvWwtLMmwWRirCPh
+MuKj+X6uG0mwyZ8yupfN5fN2TbInYUBolMlLQnwu46ugHSSk9o4mN0cjjjH9
+1TeaBFlm7NdrwxG7GDvaXCEhYEA5seIwYs3jAu0wOh+ZOhPKrUtDenO3UFAV
+4i6QfMPV57k7P5qC9/mWC3tOI94rsGAbKDCsCFUVX0LsWGE3qqFAqyEsrt3g
+8uumxhxoiGjZKkz5nbtvR/aeQBpeCHnCwQXuvPmzT2JoqL8ingskXVH8NidN
+Kg3+pChe/DniVt9Dj1NokChbHRNOII6p1FVE0SDd63/b+BLi4d27Q31pSPZU
+l7XcRCwK8rqxkYafPNr/iniAeN78usMIBbWkao2Fmov/cK69hILvCle5CeYQ
+27YVLIVQsGpy8lCOjtv/56ksMwqGI/9VMgYMEFZ5L83vk2DVY1lcokXrVknO
+cIEEuwvW9sppLn/30jYRCfEnd8p8n3Px8gV3PiQhMtG9b5LL7zjOquzI/3Xc
+ilgQ5FK1AfX7bJcLr1a/Lvv2VvzNYv3/S1+ODIbl6OOrWXW4KEOf37Zwddi9
+VFd8vnkerzT2jP78MZHz3Z1S/f0Ch/gvx/P1949s91xfVKuvT1a7ZSh06euX
++GOd98y4vr7ysE8GpCYMrn/dUIlMwWdwf44FK96uOcjg/plVT1bbZzG4v8Xw
+qDqjisH9NzTVje/rYbA+loLL+OHjDNbPA5V6ZT3BYn1JSrs65etZrL/BoTTj
+sk0s1medY5j5ojWL9RufnHNxmlt/o+80182Z281YrP/3qmeTJ1eyeD6WxWaz
+zCyD52fa/N1t0lEGz1d3lP10XB+D56/S0E0gb2LwfEbKFSm76hg8v3Mf525d
+d5XB8y3NKwHiMoPnX5isur2oYLA/XDt1uOkct/+Nf+wqv2o2U89gf3HPIfcv
+dzDYf7Y8+9TS+RmD/YmNoM7XLTPYv9SyxHfEJIv9zas8UDPrw2L/k/T/XDER
+w2J/LH/itNhQwGL/9Cky4bU0s9hfHXqz0hUjLPbfuNeCdsP+/B9S6DsJ
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.75, 8.354800000000001}, {0, 1}], 
+        LineBox[CompressedData["
+1:eJwt2Hs4lNsXB/CX3C+FijBpdCIiplCSNGlcKjEkl1yanEguNR1CJU1CkphK
+JVQTFUo4pahUQyoj50RyQhekRIcaNRUiv+8+z88f1vN59rvXXmvNfkdP+kHb
+PYKlKYrSlKIoEikZ8ovOpP77mcOkhMFj/i6wj/JsjjIsWCvtmAM7TykzUYKp
+on0WH2BBNb33529MyiVGrpihz6QUtDwKu+C2gVT3aDh1C1fnFll/8Y92OZz9
+PCgmBa7WMnd+C4t//dq+GqY7tWcqzmZS/PhCQ3lY5kzfLAPiAwyV+4iv1vNK
+LBGr7tNE0Yhx3ow/rBFTayP1TIiVWBYLiAcDH71D3grb2eZ02Lo/cv0FONSH
+Pk0epszVZkbAY/ZhAx8QZ6gEqduRuhXb5B4iCkpGrukiSnKqXgkQu262j8si
+qjnd+baX9PMPK3AcfYsbFz0JJPsGxVekEMslU0scSD/rmkw0EG0X5+Rbkn0S
+/+z5iEUnnAJIrDKRZ3iQ+hbe1l2AGNcxR0Ty0vWSBEzEtn0JH68iNmqmGfkj
+cvt//9CJKFzmFnqA9PGX4i819DF20iXzBjx88UWMHexy1cx9CLbeaP8gGI4X
+8SVkXpzQ1pwkxPr2jJAExPJV9OmnEZnGbI8niM5aQffPIwqa9y3VxtyFUWMl
+Z4gjUnKC4T69r/vT4WlRrJGrsOAmFbsNtu2UmyKGjVZqeLNgFjuuwxj3wmeh
+Y8wUuOT+lipfmGvYmt+MupKebopJgJvm8dWOkLnbruKcgqvCXy9nkXkNrnO+
+AIded+sewXyHJeqHLsLiSN3Kcph7fotUHpyqW7czHK4/XaR0CG77J/iiKbmX
+1ayt22C29mfFwVn4/GbesHYl+9Wzu0/AjRFHWubBama9OV4w81JNlRzM2/f8
+MwOOuOK2/R364XUKYg1gmn/G1kdkHnZaAgtYKNzSXwqzZVQrfGEO61bvObI+
+6cGnLDidPzacAzNWeeR2w9F+ixzOwz5/bjw3E/V5Kg5zr8OhceHBrnDbIfnc
+ZpizTBTOI+uvqQ3kPeLQlolJv/wxqsaczOfgxRWvyfNcg7BI0k9p+htpzKvu
+8daUa3C2zpmjs8h9nWn+ZYzMx+xmGrlXvB9Ja1cbYC7pB6IWw8z2WVrZcCjr
+agJ5Ty0PPqnvgXkmEi6N3KOG6ZJ5hji/+lnBT5yXJD0QEA6nFiZJPSX3PX1I
+qwBuW5w/egqult5+somsVz/c6QOrtXTVfIGN3ktuacDWlwMmKc7FPPpTio9h
+Hj63ndZMhbsiLo+O6+E9/DqmrgHzTNX/jYDz0hI85GCxCrv13UzU0eGybwj5
+KE/l0jD4VeT3Ha2wMKTiiTRs6jHdqwJWc3W5UU7DfUos5vNhQZbvaAxsG9N3
+IYL0k/Niujdcdeqm1hpY/DU0wB2W8Zm8zgzmcw6Pb4ZLAk+nzSD5Qoal+TAr
+61q+MtnvWM99Cou3Degowrx1/kGzcH6q1JRxdZgrx1+8B04qdW02hLtyl4pe
+wzI2K7KdyP6dFQUr0J9aX2tDFMnvdZ11HuZbu3Muw4z6bt8f8OZ8hY5+Yl/n
+cTtyv3b6ejIwj3LrzwNRsFigk7cH5pguuUPmWWd60klE1lkt37JhmZFPzZpG
+yFuZsCIZZl2/U7kJFgzFbfWGu1SOHS8k6zeebVIj+5uXLemFqfJc22s4vyRh
+29+6xji/NECDCQtrajsdYU73lzd30Y9/rv2OEFgscfRkwOlN6Yq7Ye4S2Yt5
+mI9CmXXlflit/ugqBbiJZq6WAJfPHaiJ08X7lSVtwiXr7bbeX3Vwzvejx3xh
+wZ1nnfGw+EuipS3Jx1mSqg1nBfqt0TEm835R0KiNz3PjQofvqJfeOv9gNiwZ
+nlH0DGYYhEQmwHOWRX37E+au8gkjdnY8eOQksbB46ym44lJSViLMnD156WOY
+YbyoI5b0/0jvihLOa0rY8ZCYX1tWGEAsa8Y6QPLby227Awtm/hDmkHzDPUI9
+9GP91wK9e8SHpOckwpZJ4ZUDsFjkp9MFC/0KQg1Qv7B2z2YLzIMevTSXzE94
+a4ZtLNzWPuFdSua90iWtEH51JiZglMxriaxmDSxUil/iPA/rlflFxM5rFYJP
+wMzPWnOLYMbCHk4nLNTaczYazn4/0fybCfaf4q40IvtD7PI4cJfers0PUQ8t
+JWj0OCzcfM/NDWYOmR+rhhmxqfMb0J910aMD7TBnk1yzDWy0/GjUR5Lvr8T9
+l8j89DwzPhMvi7qnASuIzA/2w+wbSlLJM/B3bKIkk+xnC6clSMNVkfNX18CU
+U8fHTC18PhZ+lfkwf7jUaQFcFx42iwc3lSRf69fE35cl5sN+sOBzxso7cFaB
+mcia1Dv0x7dLcETsh8naMH2nZU4JWf+WrTdB5lFp87oBTt3/WHmQzIsV7jEB
+N+Ve4b+DufFFRx1xHo9zcrQXZk/ZG5AHX+g01v0Gi9uXtfyEk76qLJ+C/OJ5
+vPyNqN+WnjTPClbT2b6qFmbaa9JCyDznrlunh/6FLrNaBaTehSknt8FiXXFh
+D8zVn7a9lHjDyzRTU5y7dNvXdrgxxdt8F1zu3EH/RO5zvjntMczfdmG8jzzP
+Pi2aOh/rqpllIng4aOiuP8xN3p/Mh9vc2orPETfIS+zI/dbbntgBq11qSHqB
++sQRadnKZoinq28FwNyWlisL4C6Dle9b0V+bDjWyBha46I+wYO7DOPsNMJ3h
+7lqOeUWnarb4w+xbq0NnwnN6/trtSfbLbr15dDo+39dRyfYwL8bKSwPOpsmU
+GMHUU8/2gmn4vnk7RUoRLg8vVl8NG8Vatr+fT97z7+/lYcGuC+U1MD30K6Nz
+Kr6vzosnk374LTYlTfDz5ewwHsw+M63vJUz3L1MOhQW7t7AnYMrrvsQbFqte
+sLNGvldWDJE7zJF9qXWAnN8zrdoLpjKKd76EPZ0dErfATWMmPraol9fmszqJ
+7FcQBgpg2rGs2yVkf4qGrDT6HTZ8J+kkz+c+6PaDy3f9KaCReTI6eorgd6om
+oxzSf55L+jvYyM+l9zLxRzV9Zcxz+E2d0jB5fiv3hTacXl3a52COekLufp0M
+VxS/Hz5q/t/3xWty32mO1fXtMG9m429XiJ+/S1NlYB6/7u7xhBPSRV+NYbHt
+8qI+1PtM94fHCljNWisgHD6WmDF9HdyksmlaN/oNGwnrCyTPs6+/dIVpn5rv
+bCbP/3tX5zbm56VjUEfM+dG/3gi2682I3UjOe1Lx+awGkzIsfJC6Hi4POPLv
+bHg0bmqnE8n3o7+iSh3/nhwwTF8M05Vpg7/D6TYv7xvAbBdd+7nwvIHHt6fC
+VKwuWwZeJCcvlCbruQ6ZP9Xw+VrUqvaRfq02u6pgXXxswreZeNe925ZwX07K
+ugdwV51IsgOusjqRch/mZD9iCOH6yeuVH8NspxfdOqiPMX37rg6YX1A4GA/H
+m7p3j5D9Z/16u2D+slvBGqTfaAvnFeg3dNtTvfmkv1zjqmzYpVXudxeYue8B
+8y2sYNTjsJ2szw1K08b8GqIb/8yCubLHVZbCdUcCo++Q/v0Zi1iwZvfEmrdk
+fgsOpVnA06INvssvIN/nDtcUyH38fn6ZCcwcY+2rQ/429wCFNTCH494TCjc8
+afs9BOa2ynYMo97VIUOZ8TD72yfHOPi2WYj8EZg6vlH0L/o3yqhJPkXyjw8d
+9IEruEFKeSS/rNL3B5hvY0tiWw7c5SQ+YQHnH14anQULlx+O9p2Cc10L8w7B
+PJHx8dDJeP/qt6zcQ+op3KR6RpWcN7g/jDwvvCwcV2FSlxeNpvuQfEuCsjLh
+YZsvlxxhgZ2+/Xr4D9oR9UXkfPHfi9zg3drHJ+aS/Qsbj+yBu2LtD84k+Wdx
+Df+BNZxGTmiR/endz3xwnr9e2XtNmB5rc/YnPGp6U6JL8g22G95AfYZ0fYrk
+4/3qUdiD+m9yVaWsybzKdOfpo7+sD+ISV7hcyk2GB/NkP8SR+rsi/ETP4Vcj
+befSYLGifL4O5kVF2ZiUwvzeg5y18L3lw+MtZP/rkbKtsNpDWvcomf9hK5tI
+OPrvnKP6C7HfakOtF1xKy//bEeZ9ebXQEM740LFlK7Hp3rOvcJ7t8d7VqTD7
+9lTLePjyjPTMfLI++7GBAhxYJZtYCQuVExQV0Y/k6ejlR8RXew0G0P+FuU+e
+PyW+56xTh3n5H/+s2gIzVR68yVVmUpcknkVNZP1FUmSCEvpUvWUlggXmJo4x
+ikxqw9mF++/CnLX87+kKTConzCyllJxfvL60QZ5JxZQ5BZ+BKZ8f3VawULTb
++zDcdT1FqkUO3/f7Vgp2wfT1axwvwKZJrH2kP2Zs8uli2EVJd7Y/2a/KPdEF
+x82aOOlBzteKFbCQbzS1XriW1PcwUv8prCDpdHEl+T2jG2JRj1xqxhVPYnfb
+H5aod3TKJOVNpN6Pe3XGSP0rHNZHkXWvOqta9Fcdbbbg8H/zWeEVj/6/9PnL
+FZF+BujqdMyn6a1kEumf5/ZspAA2Ne4xHiTPq2uoUpjnzfeLPadaoP7QfmUz
++C1N29kGprzP1RrDm0W3ajhk/csf1kPYryBTmZgMCwKpR0kwTc6aUwjTf7mr
+f8D51F4G+yHMS234TINP7jDb+YbYys58PuoNSZ9v9IXkW3TFma74//9Hsfx/
+VGD+D6J4HSk=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.471090192570806, 5.161297472978525}, \
+{1, 1}], LineBox[CompressedData["
+1:eJw9lXlQE1ccxxcLNYCYDSErJgri7lKtyGWHVDvVn+JBCw5gsRILSCkEWxA5
+goLgBRJxMAoZ5FIGGSynpam24oEKapCrXqhUUauIFKIVi1Qy0EJf+sfvzezs
+fGbn7ftd3+9ziti6LmoKRVFR5DG9C0cnyXIE6v/FwcZiv8LQQ4RbNZ4Jt1go
+nOI2cc+GMLzIPVrLQsHAqklJhgNQ9t9sc8hloXT/zNJVQ7OBis+sn5XBQuV6
+67iHCsLV58bd9rIw8jqhQtkyC6iiKbsjNCzkPV9+X7mYsLHWx7WSBaNY1kw3
+yID6TTgjs52F9gilBe9N+Knc/I6RhRy9dlT/VEp4uNzBjQNoF8jXawlTma12
+MRyoVPtzFArC2Uvnza3l4JzTduc4LxMHZmkHOfBs3DH5yXzC7nnRPzjzsE+7
+IX+nO+GUWGNXGA97PYJ6p31u4lnXSw/zsDphdGIs0bT/K/nbMzzccj7lp6si
+PHAkheviwefS5UFxH+GPj1n+08tDe3Nq9VmWxBtw8d+OFzyMHXtTYRMhM+Wf
+kNzDQ/Sf00JySwhntzz59hoPuk7DoolWU77STyvLechb2rgoc5Cw8esF1Soe
+ak+m2/QZCdtbaUOX8SCtTCwsHyFcZEgWmvOwpGPcy67HdF5Br4+eA++q8Om7
+6gjHF02ez+Jg+7vdvFhJ2H08w9GHg4UN9KJRa1M86XqpkINneZSDRxmJH940
+OTxmgUtLupw/l3D8OnnAzywcnit9UFE8k+yPmb+1gIXlC1T50QLClKbs6j4W
+XI23PVYm2QO1+WChcA8LH9hNvdH6ZAZQc3JOqbNJf42vA3b6Ew5+f6KjlIWb
+H82v07UxQOXuevP3JdLPPRL1Z4GEdQNbigwsOMVaxx0dlJB63Iu668BB+GT8
+2hVHCNNnN8UqONB1l7dZfEnYXS1+XMhBT+/1C3oXwgFaKrWbg+HurKPxMwnr
+tF1ZEh5W7DR4m8sIC4SKjf48hGnUlsVupv1xp9MyeCi74lK1LYhwk0X+2ZM8
+hLjJZZ5qwgOxfss7eeiOcV3Y1UT4uJnuwu88JBtM+iBsn/UysJ8Hj4bbd1yW
+Mfhd831r36+pDO73te0KPlDH4P9z1qS+U95i8PyqDZLG8T4G45vhuyPycD+D
+8U8flq9c0sVgfgrfMK+xGgbzP3Dv0KmL3zFYn4EzI3mRDIP1CwsypJ6pl2B9
+pcfvB/l7SbD+wY/oHzN0dtifK01GD7mTHfav50PXGxcOirG/1TU5MUWjttj/
+HVS/c4jSFudDrzgIMY9FOD8C78lnN8JFOF+Ns4c6BSM0zl/ik90PXxXTOJ8t
+aWV/7Q2icX51luZtLzka53soXbM5zJrG+Yd5mcOyqTTqI6XPuzOdoVE/iwWS
+TjM5jfrK/GO4YmsUjfoTqoUhw6U06nOOWL1hzSMa9dscCcwrmQj1La1fe9o/
+WIT6v/qTwMxCI0J/2FxRN/vtLyL0D+WK6piMmyL0lwb7LOrafRH6j/vp7Ad5
+bSL0pyP1KarKShH6V43VaGvtFhH6267QLYIljiL0P8fE4rGHjTT6o63wxdIh
+Hxr9U9eb9oWnRoj+auiQnfNMmo7+21IyyPr62aA/F5d06lVO09C/+1Uqs7vj
+VujvJ06UvxfUZ4n+v0kcfXvlcwHeDyfOm/QxFe+P/wBzMXw3
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.5, 9.0548}, {0, 1}], 
+        LineBox[CompressedData["
+1:eJwt0w9Q02UYB/BXioG38WcxYlDSEISBKOgdCfLHn2ODAc6I02utEJLoAE9F
+0LH4szAFByVDizI5Ok7GEgrYIjzDi6vAThDYFKgEzoQgVwhbIPEnjL5v13v3
+u/c+97zv83uf597X5/DxlEw7QogMH53J8jrGZobY6BzEEFeyb8DNlyGaptWP
+u+AHr060boIVbF1JIcysOxPqQ0nRRWGw3LG3hAuP5x/J+DOQIVlFvIS/kS/l
+XCoxwOEzI9Oj8OMi5ql8OHTN6UUjLI+9/DgSlk+3nXgHFtc/78+h61Wpz8XD
+uax8/ZSQIfV/5M5vhIdTi3f9ACdXjEz2+jBkyi0p3ghf6hQvaGDnsOBHjTSu
+eW9nApy7bfTXBjh8uEzHgZ89PVnTDJMldciIgCF5AqHn17BhrKFSBxfvfSlq
+EGa+EW4vhtM7eqot8K25rySpcJdutYCF8wm5Fxul8Lui9J3+cP0Fu+4Y2Mar
+tErgb0NYhj3wW1WL9zNofXXtXkkwz3uAUcNXI7clp8OhVq7yA/hng3usGq7y
+/8jlCl3fJa1pgKWp0WNX4epatW4QznLaaNXT/D6ZnzyBP31UaayFiaJBtR31
+GXYc/6Wc5hMFhaXBwZqZ81n0fxcDu8/D+k1rgXthjWQl6Dqc03zqJBcuFSTU
+jsO7a1yLRlGvo/3c2yuwKLmlqg5WtRjznND/UOPWXa/D/KHaMx5wZYVkCx+2
+cGNZ1LsDrJuHAnB/XjN1sGk8cNBOCycrlMZF5POqTtPK4NA7iqIR2Pwwq9A1
+gN6vewufwzyTTHbPH3W6HXu5EJb2jSqaYBKmdhfBpbOO7adhi/joP0/Dy9qt
+nhkwv1291IN+xM1Mrsng0t/5Dmdh3RBPKaL7h52ixLDXNVcxA9umay470H62
+/WaKg9O/U7jVv8CQuZmxHQfpfndyJga2XOuNyIEN+eyCWW+GHGjyLDwLV//U
+k9AGJ8avHLgCM2qXz8rg8vlE9vdwaPxy8Qk4hdPXP0Et8F7Ig/sDB26tww9u
+x2ZXwH3vs/d4of5chl/SDidzbmtD4FIx8bDCfPeJxBjaT+ZISQTOc0i0FiWh
+/btLjmnhVduNwljY8EVX5Cz8ZVpIdjiN71OpAlBf1MOj3b6wOXsqQg7f1fDq
+7GHVK74/lsOVNy68cZ+eT8s6aKRxk8TcCgs6M6fo+zCX1S4W0HrNC5Z5+l6U
+cp9IWLjf08kB/d+vU4+ubMH5+YkyLqz0CLnTAV9ffnMDtWXaxZQL8203J+3h
+5vGb+mAajxhytiFf6yUv3xk/1H141t4Mq2w5f7XAUlm/Xk+9YalZCcufOel/
+Cha6NH4YBwv8OPbR9D0+6ezxhv8bgv9nP+ZfkwGqQQ==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.286723682459369, 12.031518421803128}, \
+{1, -1}], LineBox[{{15.5, 17.00000000000231}, {15.5, 9.999999999998607}}], 
+        PolygonBox[{{15.5, 12.9}, {15.1, 14.1}, {15.9, 14.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.4452, 13.5}, {-1, 0}], 
+        LineBox[{{15.500000000007276`, 17.000000000003638`}, {
+         9.500000000005457, 13.5}}], 
+        PolygonBox[{{13.01826734053906, 15.552322615314452`}, {
+         11.780184249251306`, 15.293188945044921`}, {12.183281069670574`, 
+         14.602165824326175`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.323799910437668, 15.984057296392571}, \
+{1, -1}], 
+        LineBox[{{15.5, 9.999999999996362}, {9.500000000001819, 
+         13.499999999996362`}}], 
+        PolygonBox[{{11.98173265946094, 12.052322615314452`}, {
+         13.219815750748694`, 11.793188945044921`}, {12.816718930329426`, 
+         11.102165824326175`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.323799910437668, 11.015942703607429}, \
+{1, 1}], 
+        {PointSize[0.04], PointBox[{3., 10.}], PointBox[{15.5, 17.}], 
+         PointBox[{15.5, 10.}], PointBox[{8., 10.}], PointBox[{9.5, 13.5}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T7", " ", "P2", " ", "N14"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbf/cgdhei/fiijghgjhj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbf/cgdhei/fiijghgjhj.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {22, 22}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwl1gk4ldkfB/A30c1OSdas6dqvLUTuaynNpAkjLmWZwpjIUiglrmhki6JJ
+EpUWKkJlFIosoyRL0hXFIG5GISPbLf/vO//7PB7P5/md95zf73fuOe9V2Rvi
+7MdHEMQz/FH/idklfNRI4r+PPkksemYl1cP0zZlvm/XI2veqkxeOw6VGD/Zc
+0iPJnIO1+QxY+epITaweScyZaAb0q5IEZ+jisTDYaTVjPhWWuMXccgjjn1zW
+/s0Spt9aNp2AuPkVtweTKiSRfXs88Trmr8t4dOEOXDi7gfkK8RDa4aCD8GXz
+8gJhfZLNsY34bguH2ruVbYfdrQTjVeHaMI1v6fok+fJUb6wYvM37x6EuxKMs
+xhtpsN3dT7uFGSTRyRUJF4WNC8R4dAZZ+8+Nu3zrqPnI59XWDJI9YBjEMqWe
+P7r5RxeMb7u+YcQVtuwsLvCGk1T8nkXBDYOL9H143jF9+ksuXBq8osAL8VUO
+X3bWwBlZaVudGSQZsZs2/Qb2iQwps8L8Xcr5FmPw/T37BtUx/ue6DfNTVL3q
+V7VXYD6dTyGnPlH1JnnaNCP/nyTzP/bClY9ZtDjsh/iH/NZqql9aVU6bUO98
+1bacDFgmXKJpFv06LCfox4LJEbGOarjZZN/wGrh99GZUKvp7q3ia1aKM8XNB
+Zr/Br1wtQo7BrLX7u13gwOBaeU2Ye9xwlyOeH4/uGClRglV/+Xs3vJdpw78a
+LrS3aY+Ek3ct2iasQ77BjYX5eiRbauJzEQ0mi5imXfC2dZlbrygiX2LmliTq
+mbnnQ7jA5Mm+KhfUY/FyKkgFPsK41n0BcY3U5ipBWObbdYd38GHTnnvC8J4D
+15+Kon+urNl6dXhliup57B+bK7ltvRM8/ET0/mb002twTDQV7pJkfd0OsxQM
+ptpgB6n+P7AfbBkm7bk08tOR6zV2glXMbwd6wMofJt/awzlHI7uy4KDRq983
+wqtm/WNqYfZZzaNKsKQlo4gD5+oIxPFh/hsL0xd6YLOKBqV61KOSsr2VGj8Q
+51wWjfz7K/lk0+CA+QQ3E8T5fB5XWcHcpJNPJtG/grAq9zfIj9P4e1g5+sVJ
+bR9xh7kHfa8ch7U/v4l5roBzZVWyfBd8ezJTTw+uTfIs2oTn5cym7ibLI+6g
+OKwP91YbKY7IYT6TbGMTjH9vI52/FTaLfmT7I+L2IxvkymXR7yXr0QMwJ66m
+Xxdm7fc2yMN4Q79c/8cyOK/pfyRzEI+olBf/FWbdONEli/wvBfbPaMKlr25n
+esGvVVPe0GB2huW6AtRLBo2uIOBmZ/XWIcS3TC9GSMCpusl/iKF/w8oFHSZw
+7tu90hpwIaleEgivJMTUTNHP2sDjT+/AhX99byMRH7S20Z+m1ruRlmmD+NYH
+7q1myDdAXe8nS8TrGNHsw3BW7xoHPcT71VWSiuDwTCtrWdjw/NmOZ3Dzu6lY
+HvLjflU07IInBRV21cDxc22FjbLU+fCxPgLvqGmLy4XNPAJfMZC/6EqLYBZM
+tEU+HEN/7pzbeWqB6o/Kl/Qi2Mes0O4kHBArURYKX/V0duKthSU7abboHzMh
+3NcXLi3q56oiHm8t/+2pNNZv2zotCTt0Rcuug5v/ergggfH/2p8ZObYG5yPt
+ME8JcY+xjQcGpbB+ZaiSFeJqMxbWbnAz6+YTnF9iTVrqxv7V2H9lg4TLsHRE
+mHIMTP56P6Yffq5ll7cRdvR/6KyG+oT67ecEYfqq2r0BqM/3yXGxuVXI51wN
+cRtxRw93jyW48Ftk/igc1m65XBHjM9Il43D+iMm6Qv4dcGHimJEK+r9WTsk3
+GR5PM+bowg7vPhxqg+/fOVFtiPHVxtpK0si3b9TtvD7scum0BQv2zSFScP+x
+PbVaetNhh+QmtVVw9nn9/D+pelP1r3zB+vuTq+afw+2JAsUVyPdGkHxYE1w5
+4xV7CObNOLbcpPrhdChNB+OFh8/pBMOkIl/sB9Tv1T2iKgcH8By+XUE/z/Ln
+5BVT/frAi/Oj+vlgH0cbHhA8STeCX/ytpnEB9ct0hCeIYrxcw5PaBUmMJ7kx
+X3VJosJ/dYwrXHhpxHJCl2TPZd08US6B8+pKk5iD30fbT0jBAX7aB6n9NKg7
+o0gTx/0YnyBiCp8RKJGgiZEEYyzlGbV/d6RvGhuKYv3A2Um8/4jZjz1PT4ug
+nhITBy4sK9/iqQyzOIlOuqj3SvahgVFhrL8r8ucw6vwd6HYegiel1MtLYc36
+CH4xjA/NHhPmwruOWLf4wJXx7iZC6H/flrJ9nSLU96X7AXU+SoaJT25YX6Hr
+2l3sJ9EVLXLsA8wd+vyfM6W1K4KRL52/o4QaX9dQxB6Fg1Y3ilPzZagxL9ih
+PvIgxwzfFyKBmDWIhgeCvk+XwCnddw/9DjsODhsFw6azW0c9qbiy6Q467Lk0
+8XgJ8ynTK3sGUK9747vFQJjIn0u8SL3PBsng68inUnrmI/X+Ke3ITi9D/vSP
+hlvWw2OnfzLPFqbu+ff+C9gfTkSIxT4h9FfBJOYdnDcv3KMoiOfyNi21wS6t
+ygZdNMwnYpreCUeKz148uwLfL1Vx3jC8dD5ewE8A96PUsNUK6vdHfcQOV370
+c6YnyRjeHub+IGQ51ovd7kPdn6HDYb6VfPjvolFZDCe2vaSZwCuXlap+gcvO
+Xs4cXYb3X17GwkbU28CT1GyDZbweZuG+IcItl6ty4Wa+82H34L4mARsdPF+a
+wAschlu7BYQyYbpvYRg/+i1gZ6W1CusbE34h4nBzWIxIHhxuPZGJ80NoWp8M
+0UK+7Z52xdR5vTyyU/g2PL7eZoaANfrqTaRQX7aGleJbzG+yXzp2Nxw62jx3
+Hf6m/nTzEZhsfUin7odcVgWfL0ys8HiL+4NIvVY0IQebmYuc7UN9IkdX/nMR
+89ODVXjn4A5mQwkX+RTWnKv6GWakmZcJwAOHfzCXhetCfT7Oo142bUvkR/Q7
+d8Y/7CWB8foHhppgRz8jWYUlJmHm20Deg81mCL0kHpPgPpo8eZfaT/X4F7x5
+JsHJsX5dBWcYbNuWPsvEeRuKegMXVtS6us0wiVKm+xSB9Txe5bwPmGYS7c01
+S3gfEs75HeOvpphE7d+PWvF7lAi2Cn5XMIn57G+I/QlP7mT/XjOB8cn1OjyY
+vCWgKwTTE9yjmKhfR9PTUw12tJH2Og6/2HNC/F944KtWWjnMEGK1lWC+9pYc
+3T544aFReS7WY+TuXzYHi8x4exd/YRLRvRxr6vdDZ9+Be83IL8s7OobaH6Ha
+tbzX/zKJ7LLXqZ8wPtja27YG9Uw62tFb4E3TnRkBX7He+o7Ui3B3lrZEI1xK
+s9X8Be707xJtgB3HF3nr4FKGevVumGXSFEK9zxU2T1QkYr7LOzXVz8DfdyRZ
+/YD1Tn0uanKAtYTlNtxEfjI58X1isOp9xePFqOdIVGjWW/SX8bj0r55x7Mfr
+uYvl8LUq76DpUZieuJgNnwrf9M/rQbhNdfE0zFaVd/XtZRIS4UzJc3CoaOuL
+gx3IZyyx7xY8EOW1Z38tk5gbnqVT5/O/T8rm///XI/8Hiw6/aw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.887640361876243, 16.89239276247515}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwl1QtUzFkcB/CLDmMrJk30ovFYBtWOShI786dWD5XZ4eihGKm0s8XUolCM
+yqNTalLJsxI2poPRklHZnaI8wrZtJ4Me06omRNNDjVft97/bOdPvfOZ/7+/+
+7u/O3JkZul0YPpYQIsGLjmQK/W8qRZh0ZFLE2SX3erQZRUThGabrJ1NEuHFE
+/5hFkcKottTXkyiiDNx9dw6sGXRTVsHik9HbE0zhngld7XBZz9SQl1MoQj69
+sfTCfB7LdL8nzLZ5YNcPGxRs7XtoQhHuGo+JYqxX+6fj2TBYsT9+UR+s/z7p
+vRUs0L40OozoYHu6kH6fKWh0nY08c46+Ot8Jsxf7fa6E69v+mjEEq1RvSlej
+jkse3ak2mFfvMxJ1H/6VZdgZDDNDb62dT9ftZTTuEp2fFzAtClZPGer6CLOr
+onjpcP78bLvVyCtYuDLoCJzg9SUhB9a0HbHeDB8vyRt4CiuKnvtYwBtdiWyQ
+fh5UmX8T61nOu5lGEKWFl8XLEX32LT3fi+ciibPfTURhTaiHClEay7zNQXSY
+8+5GLN2vZdnRBajDMqxXx4B1RXu+zIRZNqHyQ4iiIqmbEvtsWpIylu6HIjZ1
+KBLRuiKU74dISja7LkX06Vnwwht9FtUx/G1h9+OZXZ+NUV/HjENucLrjVe/f
+jTBeFapJhJW8H4oLDCkicwn4WQ2Hddg9LPmGIhKB5yo/rNsdxhp+OxHPU/sH
+1HCKMDA8gnZsbqUEdcZfEamn076cMssY+2XsbdxjAnOPiUMvwkyt75vlcP30
+C8NcFn0u53afgAUZWutLcHNc2wULrKdKL1hhgM9dwm6u4jeYvJ4UTcGVi+dF
+BqA+KicsNRD2dFis18OkWnjMDyaLTj06hP3ojMUX2LBg1tmwQZjdJOhpQH7r
+iywHZ3r/ur93ieGOcsrJDRZ8Pd/xDvXVmxWnmsEqe974cFjt/b5WjvmCLdpw
+NX2uQ3FWBrAs5FqtAN4Rf5Q/F+szTcwLm9APA2OOHV0/xeHmx8DWt5OLtQyc
+z8IrdhzYqTTnRP4ErHO/2XIU/U2x+eDrMx71OXO8PsLdUU8LRw3g9JjD0zA+
+uENqdn8c5ue0JgfAleHeRDEW37/ih21K2LyuvaJmDM6nWx7qiHrcH/R8ZcLM
+mXrPKtjoWMzaPIJ8L4XyIOxnh2TCkyBYt+mLbgiW+ZS1BcLc/KQNR9GPS+f8
+EzLhwtERqRn6Z7DaNHgArm+3qD9M9ztXkrgH+XX/rBvTCjcfzHs0DfWwL7fu
+NMW9YdTX11oJU20Bid/CjT+laIJQv070yz76ud7wO9ErWHRveJSer+QUOHph
+v1RJZVYa3LjJcvkBWJbefHwGzOVETUqGBekbBvNRX1Tk5Fh6vNSGcZkFC7xN
+FQ3IR/HK1x3BfnRJJlfYsGY9s2ws3DhV/tgF9dR7B85NRz9utNgXzkb9oppd
+Vrb099ow45F6lE9kyfNvdaOfslVrldRXPuE+2SauhamQzpHTn/iE6b+19D4c
+uapWyNDziaLlTn8PHND9PqLoA/y8ZrsT8pmftV2WMoB85iWRp2DPPt/su318
+InKaK7Cg6/Nbe1Wi45PCjGC2HBZIrIoW9PKJSjt8zx37kZR7h0e+x/j5Drka
+WNYcXZwF63zPNe1AP2QVDSmZGK/IM1zxkf68q7Z5FCAfZZ+4NwL9VXeVxiix
+nuYIL60MjnTUSvT9fCI5ybbvhBW34xasHOQT8rzOUgcrDRh9caiffcVj9jOY
+U5vpnjiE+hnXl5yBddXXpC7DGO867OkGm1e82pRDOyTAuAHrx/f+sfwArNlp
+I18DS929Rj5gvtSk3OMe6o9ct/OcDvm5cUnHXWCOr8J/F9avf5a0mr4fqVvZ
+LtmoT5rVe2YlrDi4JS0Q+1HEWNVq6XtPaB1R9Rbz/V1Oyel7tqXr5OEujP/R
+3zYTVqll9lQ7LH6RlQdTVZYtPmr09+Kn6rv0PSrWP6x7gvMbwzttgvxEulVQ
+XY76I5o+0r9T//3l3Pn/945F/Qu0rYWt
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.472727570790026, 3.579801639345143}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20., 17.00000000000182}, {13.500000000003638`, 
+          6.500000000005457}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.644786852214096, 8.754409509855492}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJw11wk0lVsbB/CTIZIylFJcUTJXh+i6kQ65hlC4J1SSRJHhGiJl6FTK0eTo
+Cg1kdpKKhi9JOiQUlanbIWRKkoRK6jZ8/+d+67OWtddv7Xd49n/vd7/vUfP6
+09lHhMFgvMI/tf/7U2cxJKldxmK0Hjm5wBYerBxNkYYVe8emJ8M2Rq1PZsBC
+2RMpXXBdWKG6KCxWUZKssZjF4BQa84aXshg32kQn/OBGWY+4R7B02uO2fHj0
+WvBQOhxgsjP7Bew4o1nRFxYOvRGX0GAxGG+VH+jAjc84SlqwTXTU+OslLIb9
+myfeZtS/vqMjC5Yck2ixhbvVOns2wZnx3Nq18KjGJl8FOKBtQMYCjlydUdui
+h+sr5XUyYdkYw2Vp8Lf7L24rwrwsNs8bjmRuDv8H9aQVtySshDveDSpQfbJZ
+O12V4Oqjmypvw6p9Q9UScHGPT8EZOHLRIg0GLPt1+ttomLvY8w8xOPhC/HEf
+ePCUwqVZcLJ/DnsDzFy9VXEJbBhuX+VAx/P1VNbD7LsL/lkPG0dmDuyBc28n
+3XOnfLaJu+TBjaY623dTnreSVZ/B0aPqD1Ng4eiSXjGMN+2PMz73Kf+FUr8a
+wOf3qqz5Amu5B7RSPo4JxdK/Yrycu+szo2E38VClKMrzpErtaThX4k78fcrr
+WdKTXJixo8Z0pibyd5jI5cPRp/VnboSZ94yLMuFW/ZAnWXBmgrXgOGwp5+wz
+AHPXxhsHwgKjjFfqWsgh267fAq6rEM/aDJcmR4rI0PwMxPyWAAvn5xjS/HSw
+va4WwaPyK4KSKM/sGv8H8GS7bbcdXOR6wqoFVhT92Uv5SieKc/+G3XSsOit0
+WQy98z9ePYU59jJ60bDWsuBoAZ3f1j1tNTwqLVp1EeZea94zDW5QHIs8ATde
+btfq1GEx3HXbzgfC/K2s4DtwZrrFOnu4eNm75XmwokluuS48+GNx31nY90ST
+zEy6nvTM0PN0/IlbTp8wfsYutU0X4eSYdRv7YGP57AsC2FDr7K02mH/p3otu
+2DIhuoCsaiBnJ4l6ygVTpvTDpbr1Lw3hbl8+8wvMCp9w8YbTnBnL5+F+3fkN
+65Nh78mG5DUwT2jjXQU3/lm4Zw+NZ9p782E4Tln83HXYWPtRpQzyqquR8Jug
+PGr4P3RofdZ+nWqmjf6ka76m8Mct/r5cuFjp+DMLel5CN3i3wEwJr+OrYF/d
+8Hpl1M2Y9HDQg2/kt8V6wdylq9l0/W8Hnx7Ohlm/vN7wGvevPsBa+ALmjyvs
+vUl5H7vZK4VWkLt/bRRaYR2rhIk2+NTDopVov8Xd7LJDy3KTefAJ56n23tZ2
+J1vd7r8CS673q9wGOyYmhPjCHfkBa7bApVefN6hTnh3nbq6n3N5+WTmAuqNX
++UfRdYvb2+uvwJZNSdYL4LrKot85cId9jBQD5malyLvDWnNtu7ponmcoGqyB
+Wbskxu7SPPPKlq6gHLpNgy7AvH/2KRrBrYMRvodh41Xqcavp/Kj++yF0fkR2
+Ihsuan+8cAcse0ntbSj8bexG63bYUeTsQBrMd2mo84e1qlYdqqbzMxzjYul4
+AwXuBzq/QPMXWlec7A9pi2h9hX43ribzhOuc0bq1vpadoLznVzrGoDUt8t9L
+eWa6v/GneSgSSRoJobzkDhXeg70TE3JKKfeciZ0tsL2RzWkRzJuqc+e2Dlg6
+wfaCA+2DtWIP2nRo//lPUir1p34yqqe6lX9Yd9E+tCO3tRgWVH2uWIDnWPac
+pskxWgcqJdq0z7C6Y/dsprpSJMVoX3AbKWJQ/ZPH3RbegEetkgv6MD5hbeLd
+JtrH9y+PuwAnK62M6odLlUW73SiPLRohwzC3iK0iDzt+PaQ+BEeaF+Q8xjqW
+PXYgrgtWXDNaTs9xnX5u9yOY2fQ8nk3rXmjyopjqU+vqWETPaTTH7RSdH2Rn
++l2TjpfwD4G7za5W9MCDz9zMHKl/9OS0Ztj0SjxDn/atzaU2T2Blr0v19F7h
+BcTo/Q3nlunyGOSRoeFB2F2rjPEB+XD82pzEad8rqOOM0HP3PO6eNjz8xmDO
+R3jQTtua6rMpu+xB+/bo3C9lB2HLHL8EytMzIKP6GtWbrbPhd7q/jOf3Htr3
+ygblw2lfFr6fOhN5RIZ1FV2mvDN7cwxhTkl5yTsaT1/rkz/g2R687cvxHmXU
+2D/1gxvWCh5Gw9yMA3bhtP7/8ntQC/OXObmQd6+20ZTHe7xUszmSjm8ts63Z
+CBsPq95yovt1vzx9nvoljHhLYeUrS+4IYdnPgkkGnO88z3EqE/Pt4eT0iObH
+cu5BJSaNX87tONw8bhunC0uefDTH9t99aMovK2DHrsbHIpSX1L61JnBxeXXH
+HeQ5/+qQBTnTfHphBHwwwjWUjvcViB41gtkmyyOWwJExn/O/4r3Vmyg2V436
+48qHauk9z3FgycPc2PGhDJhpIPV5CvUfyhNyYHe2U0Yv6hdU/gwLglunPBZU
+wY2TXDFfWDhbJiIfzqxY4xII57Zfv51IebjV3ImB4yTHHTiw1pHfFNLg2RtD
+Lu6FJZU/vSiDLbcuGYyGfVMtDPrh6liG4CjMU8iZkEP9ejYOe3Poenea2sxh
+MQn54RrYk30hIgT2bIw78JG+uxqKd2VQHk2z0hVQP69H9c8a2Ex8eochjT9l
+avBreOacJA1XGu+yd1k/4YX1c49EwfzWrckzkO/sXcdHMuHSaQ9ZsnCDmrZt
+DRy8VFpBAs5g39w/RPO1zf/LGL2HIgTx0voYf220UxMs8NoeqEu2XTyZB38b
+UNxiBfODqlZQvbuLrYvc4eLrXbcM4Y9mi7sDYeHwl/BxjF+1oPDaXji4fG5B
+EeX5aqcCB3aMfp3nA59KVTQ4ADPLQtoWUL/2R98YWHDG6nwnvmN4EvX24dS/
+f4l6FjwpPy/dD5ad7+QfAKtUrTXbDBtzWpTMYYOXcUw7uFQtPVYVNjNZd3gl
+nMZQDJoOhy4+wtaBObM9HUTgdXnzSpToelVrxMThYanhdBl4sGAVYxacYu8j
+KgHzSras1IUtP8jli8B1+/rN7WG+w00VUdjm9CI7+k4LvrWgVZLy0J9mQfUG
+n5D8PAuOrE592Qj35s/hqMOq0wIqGRgv66ouk+pjRXkcXArPDHx/ik35tpu3
+uNL6eswRDaPxyN07tY/W0xbl68lUz4BrXzI89WJYSSnVP1JklkfPw6atE53U
+H776cCF8Yz43QNQA/YHSUrlw3WTqN0141Jp7JgneUcVJWwvXpV6PCqPn4aKX
+1S7Yt9MghL6rneOydY7ArPz4S3NhHataXjr1+98RdGA8VVPvj1+Fgx/8c/Yc
+bKjv/qOcvLvJ2wVuHolNq4a1nlaEysDnD7O7aqh/XE/3IX5HVIcpqFM/d0/m
+u8Owd1L2GJ3PfGb01RouipX8XgKXnvXaJAdnLtNYlAsbH3lb37cI6yGryiMZ
+9swavCKAm4cDKw7Bqj94n/nwLouUjWFwZK6nejo8etH8d2/Kw+WHMXlI2M11
+pfE9Vqig47MPX5m1Dm78qVlTAQe1S163ofrvLfjcCV87oyVFNu6xThNDPdK7
+jh2zp/v3yecyYYNVG3a7wJJHv3VshecfEj70of73l/sT4aCrHhv3wcUy4ewK
+mOu1vOwvWKAy6+9BWP3XTica76R7j8kM5HW2zG1TM+U16JyqDWtsUBj6RNfv
+GbI3hffd3vZ9/nLks1eobglf+WuAw4JH9U+4smCdlffdfWDe1PrTTOo/1raf
+C0faPJ+uAHcwW4f4MF+0ZOsI7t9gFl72gM7fs6XwLvlcFbMLDv6SGBAH72aV
+lI/Bk0kL91vC//6INGT9/3fkfwHRDx6s
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.31544096567158, 14.714519496373413}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJwtmHk41d3Xxr/GSDpJNFBRUiFEmky7QUmGEE3ihDIVQvPgoBRCJQ1veI5o
+okGJkuQICUUhPUllKEmhVCpD/e71XG9/1PW51tpr32vde+8vqbsHOGwU5zhu
+shjH0b+cLP2lzLimv/jDY9w6n2CFPWC1wT6flSMYN3XHQU5iNONEF3rSE8GK
+IpsFJ8CCt9EdInBPreUHrTHIH967qg58bIlk1QNwoEOYWDVYzJZXsmos40aE
+TRzIAnv6BeW+Bwd2xLvsofq8Tw3e47C+cLqOPnjcwKwXr8H8FMHFdOhpqS9v
+XaCCuFZvX8VwxukcudZ+HCxIuvX6lTzjahQ0EqrBoh+td5qGMc6qb63HT+Iw
+66BWOcYdXpF0Y6gq47g1pVJdQxl3/cXNDGJBauH4oeCJoXcX/ab8mAnXmSzj
+VnXWTXlJ9c/7JJ2RYVzFy8TjV8GsZJynClhrpsXC3eCm006vK4Yw7nTKStNF
+YE5YJJUJVjh56uYwWp8V23IPnL2uq7KB+vvxettf8KbdGhE3wFy5QnkA6l3/
+I9p5AixU3yEni/3X3A2qiqT4rRklJeCfJ5OlY8DM0UjpLPTW8dZ0nKN83a/D
+ItDfQZ/O7dVgUUGteDD6F3saXzuC9IYE9/MxHyXjR3abaH7r+3mLMD8v++O+
+VaS/sKyOh/kWSH1pXoJ5MLsh+ffBzxRtKh6D+T65szTgR4h90RWX8dDzSueA
+I1if/yujB8xeGJn7gWcfsLoYPYFxKwr22viCswo3BahNRH0Zj5MrwOGHaz9c
+B4v8/opNBJ9wXnB2nBr0aAe+vYb9Vlm5bXMGi5ZnW/yGPsMVPiOiwQLWvlwD
+/Cbgj90tyn9gYz0X/XSuz9tZR/muWfFmw5jg26TSOR1gvptBJ5NjAsc8ows/
+wMJX9p7LMC8VU3HLn2CuzSZnA+b59mSm9Beqz1cdOC7DBE5ryqY2g9mSIQ7v
+4Y+j/DPzx7TfqOJdbmCTCxXq2bTexeOMNFi20unxKcr/V1zqjTQTnL0p67QX
+3GS3VPUDuGH/qxp30rNa00Qd+cVHdlraUD3b/aVR4PaCoHhT0m9mPlcV/t+z
+ULYwovyzQ91roGc9/3oesWBgU0o69JrN7Gwxp/Uzu6dED2WCe++67FeSnhhL
+n13w39PefUYw1TM1CPGG/3pLv+ol0fq4zJU2mJeU5vDMKtIrIRk+YTgTDJOV
+iJNVx35+l81rwXFpfYHLwYL47J8e8MP34tG04+CmkvCoCrDnSwez1xRXSl0s
+Bv8SPPbNnj4J93n361zJEUwQmDslOATcFJic8Qb5ui6/Wu6BheZ6uRE8Jrg5
++dIxbjL0Fkzu68d+CbP175mC+R3GWdbwt7VDuTUILLqremUv9A52fHuZQvGY
+2FEn4G9Q2elaEVgYNjA8Cf3aybj6/gtuenSLn4J57Go3S38PFlgny57HvH5s
+PtPTDlbzPdOYh/kuvp84o5XWuxeMbcP832Z5xjyn+Kxtww2GMMH47VkJRRTP
+3l+YDv8KREW8y6SnfqZwEfhc1uDPWIobyKwdKY33YvZeN9LLeV65QPzcPNp1
+NdWbPc5sMThKrXdgAa1PPPyS6j0USY+fCWZ6f630sV+31U+vqZR/PO1SEzhn
+TZGJJnHsYNQ1+L+x+UOqLtX3uLPyGPqJHlE//796faWJoeh3wxa2wJXyKyw9
+AnDej0o/CT9I89C0LXaG/+WWKh65xPH6ijqYp0Whcks37R8W5NcmzwR2+x0v
+6GtgfZn0wD7M34UnK7cDLDy2bP1n8kNJZWYRcaZ7jQ78TJ4UOlJ+Cp0X/m4T
+cEj07FOrwYIRw/3HgV+cF89MBauNWVFeBn81WY9DG+XvPP/PUnDrsfYiDU30
+I2HRmIL9wx9Z+q3TpPdRnVcHvadCJBWjiM+0TeuGv7bemxquUP5g5rTf6PfH
+AaVlD4kT797vxzxKWY/9c7CwZnI7B75QkOTYAFbLMj80EvPLWZEyqh7c9IAN
+zqP3OdY1v5zq35EoD4U/vf5zHuRSPSlZvU9STLDZVqM9BSzaNq0rDOwbmDHh
+AK33GippKYU+onK3eWvS/amOMEd8/k1zaVvKj48XeCMuaj/SOBvMDz49rAjx
+i72DLdSv8K2HjQX2C7UxrBpL+W6Rad3gTFN3udFUr6f73R3433jgyI3xpC9c
+8+JpnNdit1nbdamf0btOHpRlAr6V+IVlVD86vX4b3jPp+kvqAcSXOR83zMtg
+7FQ30s/xFE/MxX1p++0SQP2LXJ0tf4FrHt8eojwV/SxR338S89/AEuLXgfmV
+bw8Pg9875Ev0z4O5z+YuTuAUsdSOL2DhsgOiLfDP7m/JBZNpqDflTfBK8JyU
+m7aRYK4mZM5Q5Lu17GyuBPO3JpQdQ32DoJ2H5aaDZ9oWdmN/sbKtGYuIVUu9
+teD3ravKA0FgUea3PctwfpltcOxpsHDqjSon+C1bmVabDW5ymvh7Nfr/yQVd
+K6H8MpMeF8zHLyTVp5Ly3VMv+WF+xUsb8x6BuaUJZ+PofnptyCkAC0JSdlbB
+H3lp0aNMyj+VUWQAf5ZuULp0AqxmYxBaJInvxcONprup/roisVBJ3Lf7ZSdc
+qd70BTlbwBuydctIv2hWy5A4sObRrHfaVN/jwsY3lG889e0YMFt413Id6g/I
+y20fRnGF7+v/grvLnTVkKJ73J78Y+hxP6yvIU/29P7SEOJ+Z33slVKl+Y/Su
+GJxf/+AZLkakr9qycQ/6/70gWX4NrY/gOXphPrzyZ8JI4vm3RyzG/PpyPs+h
+foUGaU0ymO+kq/+c6qd467TIq5h/1NsuQ6aF/fZ0KWjjPRi6eS6LAov2V07H
+eyuoD2koqgMLpy1kyYjXx+amq2mDZznkHUE8I6/gqa82vV9T+60Qt/M4b34D
+rLbkh08D6h9WfKfQQ/kxenbmYOnxque0dcBPx1wNhb63T7VOuoBFvXu4NOj3
+W6XdGQFWEyp8u4H76/bnlWwquKnrtlgu+j/m0Xcnm/KnThyXB38fVq00vEf5
+/m2GpZhfy5k9KvlUv9nhYyv8XfVaa8cNYodqxQmYt9enrHQhsZNx4B748zOt
+0Dqa6vsV2oqDHa4b2wdS/UOe9rcl8PNOXn7eSso3HGWSLIHveXpYyjywYE3P
+i1tgT7uykepg/rJ5nwbAw+PMefJUb/lniyCcnysFl9f/Rf9NDq9beNhfce3y
+yN9gwefrKtXQV+DGEw3QvHrvd17E96D2a3erLO2fqmJzDP2tKNXxpPoiE6vw
+MPSfG3t56SLigq9x/phP+ZX06QFg7rtvoi3uv9TmctN04ll/zMZgvhWvglc3
+03zqMlWL8R5YfnvapzED++uc+LMU52EgYL37FuIXIWap8Gfs50ln74D55bP7
+KhAfOao3QVIX+r/NMCkGO0m8M7QDc7I+vGjkL9n+JeAkcbZZqDp4UH8R/1+w
+WpdqeCz2j2tod1TUQz3n7U9r4W+v69oWCzAL2HGZ3usInlKfP5h73nFIHqy4
+6MqnWLCa7qoKvNdc++vmwHNgkUybvRLuw8HAvdevgJumi6tOxLxm1hTMuUrr
+PWoa5mG+qcHRf9LBgtNFR/3hp6HlfsfE/+prGJbCn+uLnWtDqZ7zw1WLwUqu
+xqs2Ub24zC9fxHH/NJOarfTovP47pkqcCaY4r4vSo3orJ39vBHuVaHkqUz/2
+nmmqOB+qlT2BYlSft98mGvX0T06J6KH+W9+YqMN/A6c6vU/EkstHvAJP0bQq
++AwWfvgxcB16t0XVK/3Spe+v2cRT6Ofi8hX35Unf/Ir6SPj/np/9dAbpS16s
+tQ3zkLyn0L+K2PKuLt4/Ltm7JTzmv3nx/TXhv+LnI9ZlNN/OZKsXYOewrd8k
+9el74u7kAf+rB2SeTNOn3w+mpZTAn3X+d0xswU3Nod29cky0b2uecQixVE7f
+TznGXJJ2FJwB8ztzAsqwnnct8G4BWCTlwHmB/bSb5r8Fq02/bNswlLH8rDL+
+IPGt8DLoYbItnwJHz0S+hKKvoyxjag+8G3TAgsjtod4yTBTbHGdiCuY21iwO
+GMJYWeZjX0twk0pizFbc5yzPPf62YP6J2467MC/3Ffsi7Sh/0XjPo5KMjZt8
+Q8Oa6itbvC+EHx8tnT4upvxqT/ER8CO6KzppPliYUXriEPz1GG2iqUv5/VWN
+2uJMdDHnzgE1sNq25OUceHaf34ORxJFr3aSRL+E16pMU5f8qSTAVZ2zxnC6u
+n+bxO9orDfFBY9bTQzzZbLuhBBN12N+O76L+O+rOf8D+jQu/RxA3GbdsvCPJ
+RHbRadbfyI/K74NJuP/7EjYZ0byYa8+HGGnGIs2KVw4jvcZlBntoHkfmxZA+
+vqvfR74MY5rKUQfmkb4ehd2G8P/MwrH5zsS3ncZ24HvgrLph3w6aj4Xr+H1D
+mehMlfKP/6N6821s2uDHg42NeiKKF+arq8Pvf97zprdRf1GZ37TAXl9X18kZ
+gE9JjpEAnz8cOU0fzG0Jb8tAvYjR1loOYDVeeeYUnK/Lfv69gWDBeINDO2WZ
+iNfXWxEDFpbeMsrAeb0gM5x3DsxMeY8f4P42OGmtyaZ8TtqjEuddR8c5uBDM
+nzs+7wnmEZC3fv1D4pTkJ7XwV9fgqfUj4rD+nZinqL6xNqOU6u14Jj1SgjHt
+K608Wi/Mi3++DvezMPOcaQ7pe1/6t1IM+q2lRl8m/VOjRnqDxz1TP3WW4nJf
+aw3BRf3SZbHUr/cflZngOCPxbAHpMw4rchNj3FOdErdtxIbFZwvEGHu0tK5w
+M7ip6P3pJdjvlLLoshfpURrW/h3nZ7TL5upNpCciyagIep+fac71pf12Tf95
+Dv2ICt7cCqb4s+7io1Lw19T3Y9h/epxzBTjvRfYHzRJJj83uGm/c/xftw32u
+0n5XLm0xx3257fDkUznNwyvqeD++B7EWoaodtD7/1/pE3K+gV4Va8ob0823p
+Cmn43a+9fZoBWFgok4Dfd0WzR+1SXA3GSdF0QVxkJNG0D6xm/kjSFH6+z4+O
+OAfmTzqp3Yl6JR5H/paARZ71RwPAH8te+r0jPlwpWQ49YvT/Q7P+//+HhrD/
+AfsDqP8=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.595195293865398, 1.860131761048288}, \
+{0, 1}], LineBox[CompressedData["
+1:eJw9k38slHEcx5+MdmRhKP44sud5lh/P41ey5uenOVTKr+RX4Xal4SqrrqXp
+/LgsxqwzoUJnYmWGW8NIawonhFPikunc7CRb0dQRo++t9n22Z5+99t3zfD+f
+9+f9dhBkRqcaEAThj159/fdQoLXRVycgpDdMa4dI8CrwOCDxQxx/8nJPHQlm
+y1YfWyWIVVO8rkISGseyHEvGEZuHjxvlkZA/z6W77Z2BOCbcsC4mwVi2LG/K
+RBzZMXS6kYTc2pLAiR7EdfbbLkoSZkpjI2cJFyCKYpIpDgXKoPstal/E647p
+xAkKDLKjy4syEOct+a+WUWC61RtwuATxyvzm6GcKOkTN2n21iG3izkSRNISm
+a18cqUOcFaeIv0BDl8LYJ68Csbxz0KGahoXh1K+yHMQgFeX306AU9LPbSYgJ
+I6HlHA07tZVjZd6IVQOeSVoauqMK9nbuQayc4i7M0iB7ctRoQ436B4Lv9YYG
+/3ETw8VuxHKzNVUVDSMeydZTD/Xz9Sp4fBpU3hxZ+x29HrqsVjsazqVdI+Zu
+IV6JmFBPUUC161p1YsTSnBqDUgpW3ionVVLEqhmfhGAKCIH5rPg54mfCNGND
+CgrCODKORn//ocVP70iYbIj3G+Xq5x+r2qwnITbx5UTGecRdAX4zRSSIq7jy
+722I3aV167kkhNvp98vg88oyTYRFJIO/D9EEuVbUMPj/gQVP+zw1DL7fZlXH
+13FZ3J/l4A9ScorF/Tdfd3M5mMni+VZEnCiOhMXzw2TpjsNdFuvj91PHD7vN
+Yv2UJvXfnC6yWN/phF+bNiEs1n/rwas/u+1ZvJ/E6ezV42sM3l/N43SPK0MM
+3i9P4ft+Vz2D99919dF+fj6D/XFW8HsgN4PB/on5YBs8mMJgf6W0x9guCRjs
+v3sQ+HpYxGB/WrS2XLpZwWD/jqwLo+37Gexvn+qmNnKHwf7nykS9rjwW58Ok
+2CoiVsri/JSHamZC1CzOV2Zi4bTI3RXnzzBg2TlK7IrzqW4Y+yLuQ/w/v6y5
+vrrBX/TafLQ=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {9.0548, 14.}, {1, 0}], 
+        LineBox[CompressedData["
+1:eJwl0wlIk2EYB/CPeZCmNe9pHohFORPMIsycfpKZqHkfiZozTczSrbCmUTHy
+jOZtLUxIY4WkxnQJZeXZMTBrc7NATWdLmZQwdGoeYf+XPhgPv+19n+f/vtvc
+z/HizjMoijqKF6n/Hyea2trG40hTwvyq6CCY+Tp7PBlmfi5WJcDGI5y+pyya
+0kSxVziwWrCUvOZAU7XB2pxNrOsINrglwApVo30drL6z2vHBnqYGjLK1JrDo
+od96EnFq4Z4s9NFZpIyYw/pR8YgM+5jqubA5O8yPX140gm2fDPfOwzSbVZGB
+dZHX1BUWqJQ4bUiJ91v2B+XEwi3aCNds2M/3eX8nzExUvXSBj8zYBbPQZ4BR
+JGfAlaGpd8thH7Eo0pb0VcrXFslcxumNaFgSI88MQS5q4mSuFFZo/swLYalg
+rNAbfV9kFdQ0w3Sxq+YNXHqrXVlPPHVqVzz6WNxs1GXC/PBQrZbcy85tgzks
+XIxrI+cVdnJ1deR+er4ufISZMi//v+gTE3CZswP3U7qQmp9IzpdeMOsKPxgN
+5EmQg2s36WkGy89kTRps0Ze9T0b2y6uafWPhlp6ypLMwy2vdZtgGeZqtZ1WY
+E5LCK4+DqSvT9YdgiVk/1wQWDnbzbpP8QYqJaWus784oGMMcn5q+mBmYS9ve
+94YjBTYBxlivjy5zeoQ5tLgjK4z0M+uv8IGpL28DJTBzI9ZyAVXnIy7ZRfJM
++q9+gnP1Td9uwMyuxuTvZJ91esNPWGpw2HJA5XtcFB3HHKnlryoB3HZQOV5E
+7t2zc3MZVmS6X7gH81tPWJWQ73tQ2C4iddrlmCPy7331410ayT0lSX4Gq69v
+D5nCtVebpGyc94DgUlk1yenGe18DG69EFG4gR201y1kJl65umsaT/A7SGR28
+1dXr8Rjn14QtR6lhXbxz9pIVzp8n0DeQzzmHI6NgPtVd6QX/Dgsv6Wfi9yVr
+GGvFfEmewTkK1pP/EXIMkLqb/gf1UjjI
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.515727445508166, 6.085629021796733}, \
+{1, 0}], LineBox[{{13.5, 6.5}, {10., 12.500000000001819`}}], 
+        PolygonBox[{{12.052322615314452`, 8.98173265946094}, {
+         11.793188945044921`, 10.219815750748694`}, {11.102165824326175`, 
+         9.816718930329426}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.484057296392571, 9.676200089562332}, \
+{-1, -1}], LineBox[{{13.500000000001851`, 6.5}, {6.500000000002592, 6.5}}], 
+        PolygonBox[{{9.4, 6.5}, {10.6, 6.9}, {10.6, 6.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 5.5548}, {0, 1}], 
+        LineBox[{{10.000000000007276`, 12.500000000005457`}, {
+         6.500000000003638, 6.500000000001819}}], 
+        PolygonBox[{{8.552322615314452, 10.01826734053906}, {
+         7.602165824326175, 9.183281069670574}, {8.293188945044921, 
+         8.780184249251306}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.515942703607428, 9.676200089562332}, \
+{1, -1}], 
+        {PointSize[0.04], PointBox[{10., 15.5}], PointBox[{5.5, 4.}], 
+         PointBox[{13.5, 6.5}], PointBox[{10., 12.5}], PointBox[{6.5, 6.5}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T8", " ", "P1", " ", "N15"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdfeg/figjhihjij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdfeg/figjhihjij.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {44, 22}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwl1gk4ldkfB/A30c1OSdas6dqvLUTuaynNpAkjLmWZwpjIUiglrmhki6JJ
+EpUWKkJlFIosoyRL0hXFIG5GISPbLf/vO//7PB7P5/md95zf73fuOe9V2Rvi
+7MdHEMQz/FH/idklfNRI4r+PPkksemYl1cP0zZlvm/XI2veqkxeOw6VGD/Zc
+0iPJnIO1+QxY+epITaweScyZaAb0q5IEZ+jisTDYaTVjPhWWuMXccgjjn1zW
+/s0Spt9aNp2AuPkVtweTKiSRfXs88Trmr8t4dOEOXDi7gfkK8RDa4aCD8GXz
+8gJhfZLNsY34bguH2ruVbYfdrQTjVeHaMI1v6fok+fJUb6wYvM37x6EuxKMs
+xhtpsN3dT7uFGSTRyRUJF4WNC8R4dAZZ+8+Nu3zrqPnI59XWDJI9YBjEMqWe
+P7r5RxeMb7u+YcQVtuwsLvCGk1T8nkXBDYOL9H143jF9+ksuXBq8osAL8VUO
+X3bWwBlZaVudGSQZsZs2/Qb2iQwps8L8Xcr5FmPw/T37BtUx/ue6DfNTVL3q
+V7VXYD6dTyGnPlH1JnnaNCP/nyTzP/bClY9ZtDjsh/iH/NZqql9aVU6bUO98
+1bacDFgmXKJpFv06LCfox4LJEbGOarjZZN/wGrh99GZUKvp7q3ia1aKM8XNB
+Zr/Br1wtQo7BrLX7u13gwOBaeU2Ye9xwlyOeH4/uGClRglV/+Xs3vJdpw78a
+LrS3aY+Ek3ct2iasQ77BjYX5eiRbauJzEQ0mi5imXfC2dZlbrygiX2LmliTq
+mbnnQ7jA5Mm+KhfUY/FyKkgFPsK41n0BcY3U5ipBWObbdYd38GHTnnvC8J4D
+15+Kon+urNl6dXhliup57B+bK7ltvRM8/ET0/mb002twTDQV7pJkfd0OsxQM
+ptpgB6n+P7AfbBkm7bk08tOR6zV2glXMbwd6wMofJt/awzlHI7uy4KDRq983
+wqtm/WNqYfZZzaNKsKQlo4gD5+oIxPFh/hsL0xd6YLOKBqV61KOSsr2VGj8Q
+51wWjfz7K/lk0+CA+QQ3E8T5fB5XWcHcpJNPJtG/grAq9zfIj9P4e1g5+sVJ
+bR9xh7kHfa8ch7U/v4l5roBzZVWyfBd8ezJTTw+uTfIs2oTn5cym7ibLI+6g
+OKwP91YbKY7IYT6TbGMTjH9vI52/FTaLfmT7I+L2IxvkymXR7yXr0QMwJ66m
+Xxdm7fc2yMN4Q79c/8cyOK/pfyRzEI+olBf/FWbdONEli/wvBfbPaMKlr25n
+esGvVVPe0GB2huW6AtRLBo2uIOBmZ/XWIcS3TC9GSMCpusl/iKF/w8oFHSZw
+7tu90hpwIaleEgivJMTUTNHP2sDjT+/AhX99byMRH7S20Z+m1ruRlmmD+NYH
+7q1myDdAXe8nS8TrGNHsw3BW7xoHPcT71VWSiuDwTCtrWdjw/NmOZ3Dzu6lY
+HvLjflU07IInBRV21cDxc22FjbLU+fCxPgLvqGmLy4XNPAJfMZC/6EqLYBZM
+tEU+HEN/7pzbeWqB6o/Kl/Qi2Mes0O4kHBArURYKX/V0duKthSU7abboHzMh
+3NcXLi3q56oiHm8t/+2pNNZv2zotCTt0Rcuug5v/ergggfH/2p8ZObYG5yPt
+ME8JcY+xjQcGpbB+ZaiSFeJqMxbWbnAz6+YTnF9iTVrqxv7V2H9lg4TLsHRE
+mHIMTP56P6Yffq5ll7cRdvR/6KyG+oT67ecEYfqq2r0BqM/3yXGxuVXI51wN
+cRtxRw93jyW48Ftk/igc1m65XBHjM9Il43D+iMm6Qv4dcGHimJEK+r9WTsk3
+GR5PM+bowg7vPhxqg+/fOVFtiPHVxtpK0si3b9TtvD7scum0BQv2zSFScP+x
+PbVaetNhh+QmtVVw9nn9/D+pelP1r3zB+vuTq+afw+2JAsUVyPdGkHxYE1w5
+4xV7CObNOLbcpPrhdChNB+OFh8/pBMOkIl/sB9Tv1T2iKgcH8By+XUE/z/Ln
+5BVT/frAi/Oj+vlgH0cbHhA8STeCX/ytpnEB9ct0hCeIYrxcw5PaBUmMJ7kx
+X3VJosJ/dYwrXHhpxHJCl2TPZd08US6B8+pKk5iD30fbT0jBAX7aB6n9NKg7
+o0gTx/0YnyBiCp8RKJGgiZEEYyzlGbV/d6RvGhuKYv3A2Um8/4jZjz1PT4ug
+nhITBy4sK9/iqQyzOIlOuqj3SvahgVFhrL8r8ucw6vwd6HYegiel1MtLYc36
+CH4xjA/NHhPmwruOWLf4wJXx7iZC6H/flrJ9nSLU96X7AXU+SoaJT25YX6Hr
+2l3sJ9EVLXLsA8wd+vyfM6W1K4KRL52/o4QaX9dQxB6Fg1Y3ilPzZagxL9ih
+PvIgxwzfFyKBmDWIhgeCvk+XwCnddw/9DjsODhsFw6azW0c9qbiy6Q467Lk0
+8XgJ8ynTK3sGUK9747vFQJjIn0u8SL3PBsng68inUnrmI/X+Ke3ITi9D/vSP
+hlvWw2OnfzLPFqbu+ff+C9gfTkSIxT4h9FfBJOYdnDcv3KMoiOfyNi21wS6t
+ygZdNMwnYpreCUeKz148uwLfL1Vx3jC8dD5ewE8A96PUsNUK6vdHfcQOV370
+c6YnyRjeHub+IGQ51ovd7kPdn6HDYb6VfPjvolFZDCe2vaSZwCuXlap+gcvO
+Xs4cXYb3X17GwkbU28CT1GyDZbweZuG+IcItl6ty4Wa+82H34L4mARsdPF+a
+wAschlu7BYQyYbpvYRg/+i1gZ6W1CusbE34h4nBzWIxIHhxuPZGJ80NoWp8M
+0UK+7Z52xdR5vTyyU/g2PL7eZoaANfrqTaRQX7aGleJbzG+yXzp2Nxw62jx3
+Hf6m/nTzEZhsfUin7odcVgWfL0ys8HiL+4NIvVY0IQebmYuc7UN9IkdX/nMR
+89ODVXjn4A5mQwkX+RTWnKv6GWakmZcJwAOHfzCXhetCfT7Oo142bUvkR/Q7
+d8Y/7CWB8foHhppgRz8jWYUlJmHm20Deg81mCL0kHpPgPpo8eZfaT/X4F7x5
+JsHJsX5dBWcYbNuWPsvEeRuKegMXVtS6us0wiVKm+xSB9Txe5bwPmGYS7c01
+S3gfEs75HeOvpphE7d+PWvF7lAi2Cn5XMIn57G+I/QlP7mT/XjOB8cn1OjyY
+vCWgKwTTE9yjmKhfR9PTUw12tJH2Og6/2HNC/F944KtWWjnMEGK1lWC+9pYc
+3T544aFReS7WY+TuXzYHi8x4exd/YRLRvRxr6vdDZ9+Be83IL8s7OobaH6Ha
+tbzX/zKJ7LLXqZ8wPtja27YG9Uw62tFb4E3TnRkBX7He+o7Ui3B3lrZEI1xK
+s9X8Be707xJtgB3HF3nr4FKGevVumGXSFEK9zxU2T1QkYr7LOzXVz8DfdyRZ
+/YD1Tn0uanKAtYTlNtxEfjI58X1isOp9xePFqOdIVGjWW/SX8bj0r55x7Mfr
+uYvl8LUq76DpUZieuJgNnwrf9M/rQbhNdfE0zFaVd/XtZRIS4UzJc3CoaOuL
+gx3IZyyx7xY8EOW1Z38tk5gbnqVT5/O/T8rm///XI/8Hiw6/aw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.887640361876243, 16.89239276247515}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwl1QtUzFkcB/CLDmMrJk30ovFYBtWOShI786dWD5XZ4eihGKm0s8XUolCM
+yqNTalLJsxI2poPRklHZnaI8wrZtJ4Me06omRNNDjVft97/bOdPvfOZ/7+/+
+7u/O3JkZul0YPpYQIsGLjmQK/W8qRZh0ZFLE2SX3erQZRUThGabrJ1NEuHFE
+/5hFkcKottTXkyiiDNx9dw6sGXRTVsHik9HbE0zhngld7XBZz9SQl1MoQj69
+sfTCfB7LdL8nzLZ5YNcPGxRs7XtoQhHuGo+JYqxX+6fj2TBYsT9+UR+s/z7p
+vRUs0L40OozoYHu6kH6fKWh0nY08c46+Ot8Jsxf7fa6E69v+mjEEq1RvSlej
+jkse3ak2mFfvMxJ1H/6VZdgZDDNDb62dT9ftZTTuEp2fFzAtClZPGer6CLOr
+onjpcP78bLvVyCtYuDLoCJzg9SUhB9a0HbHeDB8vyRt4CiuKnvtYwBtdiWyQ
+fh5UmX8T61nOu5lGEKWFl8XLEX32LT3fi+ciibPfTURhTaiHClEay7zNQXSY
+8+5GLN2vZdnRBajDMqxXx4B1RXu+zIRZNqHyQ4iiIqmbEvtsWpIylu6HIjZ1
+KBLRuiKU74dISja7LkX06Vnwwht9FtUx/G1h9+OZXZ+NUV/HjENucLrjVe/f
+jTBeFapJhJW8H4oLDCkicwn4WQ2Hddg9LPmGIhKB5yo/rNsdxhp+OxHPU/sH
+1HCKMDA8gnZsbqUEdcZfEamn076cMssY+2XsbdxjAnOPiUMvwkyt75vlcP30
+C8NcFn0u53afgAUZWutLcHNc2wULrKdKL1hhgM9dwm6u4jeYvJ4UTcGVi+dF
+BqA+KicsNRD2dFis18OkWnjMDyaLTj06hP3ojMUX2LBg1tmwQZjdJOhpQH7r
+iywHZ3r/ur93ieGOcsrJDRZ8Pd/xDvXVmxWnmsEqe974cFjt/b5WjvmCLdpw
+NX2uQ3FWBrAs5FqtAN4Rf5Q/F+szTcwLm9APA2OOHV0/xeHmx8DWt5OLtQyc
+z8IrdhzYqTTnRP4ErHO/2XIU/U2x+eDrMx71OXO8PsLdUU8LRw3g9JjD0zA+
+uENqdn8c5ue0JgfAleHeRDEW37/ih21K2LyuvaJmDM6nWx7qiHrcH/R8ZcLM
+mXrPKtjoWMzaPIJ8L4XyIOxnh2TCkyBYt+mLbgiW+ZS1BcLc/KQNR9GPS+f8
+EzLhwtERqRn6Z7DaNHgArm+3qD9M9ztXkrgH+XX/rBvTCjcfzHs0DfWwL7fu
+NMW9YdTX11oJU20Bid/CjT+laIJQv070yz76ud7wO9ErWHRveJSer+QUOHph
+v1RJZVYa3LjJcvkBWJbefHwGzOVETUqGBekbBvNRX1Tk5Fh6vNSGcZkFC7xN
+FQ3IR/HK1x3BfnRJJlfYsGY9s2ws3DhV/tgF9dR7B85NRz9utNgXzkb9oppd
+Vrb099ow45F6lE9kyfNvdaOfslVrldRXPuE+2SauhamQzpHTn/iE6b+19D4c
+uapWyNDziaLlTn8PHND9PqLoA/y8ZrsT8pmftV2WMoB85iWRp2DPPt/su318
+InKaK7Cg6/Nbe1Wi45PCjGC2HBZIrIoW9PKJSjt8zx37kZR7h0e+x/j5Drka
+WNYcXZwF63zPNe1AP2QVDSmZGK/IM1zxkf68q7Z5FCAfZZ+4NwL9VXeVxiix
+nuYIL60MjnTUSvT9fCI5ybbvhBW34xasHOQT8rzOUgcrDRh9caiffcVj9jOY
+U5vpnjiE+hnXl5yBddXXpC7DGO867OkGm1e82pRDOyTAuAHrx/f+sfwArNlp
+I18DS929Rj5gvtSk3OMe6o9ct/OcDvm5cUnHXWCOr8J/F9avf5a0mr4fqVvZ
+LtmoT5rVe2YlrDi4JS0Q+1HEWNVq6XtPaB1R9Rbz/V1Oyel7tqXr5OEujP/R
+3zYTVqll9lQ7LH6RlQdTVZYtPmr09+Kn6rv0PSrWP6x7gvMbwzttgvxEulVQ
+XY76I5o+0r9T//3l3Pn/945F/Qu0rYWt
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.472727570790026, 3.579801639345143}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20., 17.00000000000182}, {13.500000000003638`, 
+          6.500000000005457}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.644786852214096, 8.754409509855492}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJw11wk0lVsbB/CTIZIylFJcUTJXh+i6kQ65hlC4J1SSRJHhGiJl6FTK0eTo
+Cg1kdpKKhi9JOiQUlanbIWRKkoRK6jZ8/+d+67OWtddv7Xd49n/vd7/vUfP6
+09lHhMFgvMI/tf/7U2cxJKldxmK0Hjm5wBYerBxNkYYVe8emJ8M2Rq1PZsBC
+2RMpXXBdWKG6KCxWUZKssZjF4BQa84aXshg32kQn/OBGWY+4R7B02uO2fHj0
+WvBQOhxgsjP7Bew4o1nRFxYOvRGX0GAxGG+VH+jAjc84SlqwTXTU+OslLIb9
+myfeZtS/vqMjC5Yck2ixhbvVOns2wZnx3Nq18KjGJl8FOKBtQMYCjlydUdui
+h+sr5XUyYdkYw2Vp8Lf7L24rwrwsNs8bjmRuDv8H9aQVtySshDveDSpQfbJZ
+O12V4Oqjmypvw6p9Q9UScHGPT8EZOHLRIg0GLPt1+ttomLvY8w8xOPhC/HEf
+ePCUwqVZcLJ/DnsDzFy9VXEJbBhuX+VAx/P1VNbD7LsL/lkPG0dmDuyBc28n
+3XOnfLaJu+TBjaY623dTnreSVZ/B0aPqD1Ng4eiSXjGMN+2PMz73Kf+FUr8a
+wOf3qqz5Amu5B7RSPo4JxdK/Yrycu+szo2E38VClKMrzpErtaThX4k78fcrr
+WdKTXJixo8Z0pibyd5jI5cPRp/VnboSZ94yLMuFW/ZAnWXBmgrXgOGwp5+wz
+AHPXxhsHwgKjjFfqWsgh267fAq6rEM/aDJcmR4rI0PwMxPyWAAvn5xjS/HSw
+va4WwaPyK4KSKM/sGv8H8GS7bbcdXOR6wqoFVhT92Uv5SieKc/+G3XSsOit0
+WQy98z9ePYU59jJ60bDWsuBoAZ3f1j1tNTwqLVp1EeZea94zDW5QHIs8ATde
+btfq1GEx3HXbzgfC/K2s4DtwZrrFOnu4eNm75XmwokluuS48+GNx31nY90ST
+zEy6nvTM0PN0/IlbTp8wfsYutU0X4eSYdRv7YGP57AsC2FDr7K02mH/p3otu
+2DIhuoCsaiBnJ4l6ygVTpvTDpbr1Lw3hbl8+8wvMCp9w8YbTnBnL5+F+3fkN
+65Nh78mG5DUwT2jjXQU3/lm4Zw+NZ9p782E4Tln83HXYWPtRpQzyqquR8Jug
+PGr4P3RofdZ+nWqmjf6ka76m8Mct/r5cuFjp+DMLel5CN3i3wEwJr+OrYF/d
+8Hpl1M2Y9HDQg2/kt8V6wdylq9l0/W8Hnx7Ohlm/vN7wGvevPsBa+ALmjyvs
+vUl5H7vZK4VWkLt/bRRaYR2rhIk2+NTDopVov8Xd7LJDy3KTefAJ56n23tZ2
+J1vd7r8CS673q9wGOyYmhPjCHfkBa7bApVefN6hTnh3nbq6n3N5+WTmAuqNX
++UfRdYvb2+uvwJZNSdYL4LrKot85cId9jBQD5malyLvDWnNtu7ponmcoGqyB
+Wbskxu7SPPPKlq6gHLpNgy7AvH/2KRrBrYMRvodh41Xqcavp/Kj++yF0fkR2
+Ihsuan+8cAcse0ntbSj8bexG63bYUeTsQBrMd2mo84e1qlYdqqbzMxzjYul4
+AwXuBzq/QPMXWlec7A9pi2h9hX43ribzhOuc0bq1vpadoLznVzrGoDUt8t9L
+eWa6v/GneSgSSRoJobzkDhXeg70TE3JKKfeciZ0tsL2RzWkRzJuqc+e2Dlg6
+wfaCA+2DtWIP2nRo//lPUir1p34yqqe6lX9Yd9E+tCO3tRgWVH2uWIDnWPac
+pskxWgcqJdq0z7C6Y/dsprpSJMVoX3AbKWJQ/ZPH3RbegEetkgv6MD5hbeLd
+JtrH9y+PuwAnK62M6odLlUW73SiPLRohwzC3iK0iDzt+PaQ+BEeaF+Q8xjqW
+PXYgrgtWXDNaTs9xnX5u9yOY2fQ8nk3rXmjyopjqU+vqWETPaTTH7RSdH2Rn
++l2TjpfwD4G7za5W9MCDz9zMHKl/9OS0Ztj0SjxDn/atzaU2T2Blr0v19F7h
+BcTo/Q3nlunyGOSRoeFB2F2rjPEB+XD82pzEad8rqOOM0HP3PO6eNjz8xmDO
+R3jQTtua6rMpu+xB+/bo3C9lB2HLHL8EytMzIKP6GtWbrbPhd7q/jOf3Htr3
+ygblw2lfFr6fOhN5RIZ1FV2mvDN7cwxhTkl5yTsaT1/rkz/g2R687cvxHmXU
+2D/1gxvWCh5Gw9yMA3bhtP7/8ntQC/OXObmQd6+20ZTHe7xUszmSjm8ts63Z
+CBsPq95yovt1vzx9nvoljHhLYeUrS+4IYdnPgkkGnO88z3EqE/Pt4eT0iObH
+cu5BJSaNX87tONw8bhunC0uefDTH9t99aMovK2DHrsbHIpSX1L61JnBxeXXH
+HeQ5/+qQBTnTfHphBHwwwjWUjvcViB41gtkmyyOWwJExn/O/4r3Vmyg2V436
+48qHauk9z3FgycPc2PGhDJhpIPV5CvUfyhNyYHe2U0Yv6hdU/gwLglunPBZU
+wY2TXDFfWDhbJiIfzqxY4xII57Zfv51IebjV3ImB4yTHHTiw1pHfFNLg2RtD
+Lu6FJZU/vSiDLbcuGYyGfVMtDPrh6liG4CjMU8iZkEP9ejYOe3Poenea2sxh
+MQn54RrYk30hIgT2bIw78JG+uxqKd2VQHk2z0hVQP69H9c8a2Ex8eochjT9l
+avBreOacJA1XGu+yd1k/4YX1c49EwfzWrckzkO/sXcdHMuHSaQ9ZsnCDmrZt
+DRy8VFpBAs5g39w/RPO1zf/LGL2HIgTx0voYf220UxMs8NoeqEu2XTyZB38b
+UNxiBfODqlZQvbuLrYvc4eLrXbcM4Y9mi7sDYeHwl/BxjF+1oPDaXji4fG5B
+EeX5aqcCB3aMfp3nA59KVTQ4ADPLQtoWUL/2R98YWHDG6nwnvmN4EvX24dS/
+f4l6FjwpPy/dD5ad7+QfAKtUrTXbDBtzWpTMYYOXcUw7uFQtPVYVNjNZd3gl
+nMZQDJoOhy4+wtaBObM9HUTgdXnzSpToelVrxMThYanhdBl4sGAVYxacYu8j
+KgHzSras1IUtP8jli8B1+/rN7WG+w00VUdjm9CI7+k4LvrWgVZLy0J9mQfUG
+n5D8PAuOrE592Qj35s/hqMOq0wIqGRgv66ouk+pjRXkcXArPDHx/ik35tpu3
+uNL6eswRDaPxyN07tY/W0xbl68lUz4BrXzI89WJYSSnVP1JklkfPw6atE53U
+H776cCF8Yz43QNQA/YHSUrlw3WTqN0141Jp7JgneUcVJWwvXpV6PCqPn4aKX
+1S7Yt9MghL6rneOydY7ArPz4S3NhHataXjr1+98RdGA8VVPvj1+Fgx/8c/Yc
+bKjv/qOcvLvJ2wVuHolNq4a1nlaEysDnD7O7aqh/XE/3IX5HVIcpqFM/d0/m
+u8Owd1L2GJ3PfGb01RouipX8XgKXnvXaJAdnLtNYlAsbH3lb37cI6yGryiMZ
+9swavCKAm4cDKw7Bqj94n/nwLouUjWFwZK6nejo8etH8d2/Kw+WHMXlI2M11
+pfE9Vqig47MPX5m1Dm78qVlTAQe1S163ofrvLfjcCV87oyVFNu6xThNDPdK7
+jh2zp/v3yecyYYNVG3a7wJJHv3VshecfEj70of73l/sT4aCrHhv3wcUy4ewK
+mOu1vOwvWKAy6+9BWP3XTica76R7j8kM5HW2zG1TM+U16JyqDWtsUBj6RNfv
+GbI3hffd3vZ9/nLks1eobglf+WuAw4JH9U+4smCdlffdfWDe1PrTTOo/1raf
+C0faPJ+uAHcwW4f4MF+0ZOsI7t9gFl72gM7fs6XwLvlcFbMLDv6SGBAH72aV
+lI/Bk0kL91vC//6INGT9/3fkfwHRDx6s
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.31544096567158, 14.714519496373413}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJwtmHk41d3Xxr/GSDpJNFBRUiFEmky7QUmGEE3ihDIVQvPgoBRCJQ1veI5o
+okGJkuQICUUhPUllKEmhVCpD/e71XG9/1PW51tpr32vde+8vqbsHOGwU5zhu
+shjH0b+cLP2lzLimv/jDY9w6n2CFPWC1wT6flSMYN3XHQU5iNONEF3rSE8GK
+IpsFJ8CCt9EdInBPreUHrTHIH967qg58bIlk1QNwoEOYWDVYzJZXsmos40aE
+TRzIAnv6BeW+Bwd2xLvsofq8Tw3e47C+cLqOPnjcwKwXr8H8FMHFdOhpqS9v
+XaCCuFZvX8VwxukcudZ+HCxIuvX6lTzjahQ0EqrBoh+td5qGMc6qb63HT+Iw
+66BWOcYdXpF0Y6gq47g1pVJdQxl3/cXNDGJBauH4oeCJoXcX/ab8mAnXmSzj
+VnXWTXlJ9c/7JJ2RYVzFy8TjV8GsZJynClhrpsXC3eCm006vK4Yw7nTKStNF
+YE5YJJUJVjh56uYwWp8V23IPnL2uq7KB+vvxettf8KbdGhE3wFy5QnkA6l3/
+I9p5AixU3yEni/3X3A2qiqT4rRklJeCfJ5OlY8DM0UjpLPTW8dZ0nKN83a/D
+ItDfQZ/O7dVgUUGteDD6F3saXzuC9IYE9/MxHyXjR3abaH7r+3mLMD8v++O+
+VaS/sKyOh/kWSH1pXoJ5MLsh+ffBzxRtKh6D+T65szTgR4h90RWX8dDzSueA
+I1if/yujB8xeGJn7gWcfsLoYPYFxKwr22viCswo3BahNRH0Zj5MrwOGHaz9c
+B4v8/opNBJ9wXnB2nBr0aAe+vYb9Vlm5bXMGi5ZnW/yGPsMVPiOiwQLWvlwD
+/Cbgj90tyn9gYz0X/XSuz9tZR/muWfFmw5jg26TSOR1gvptBJ5NjAsc8ows/
+wMJX9p7LMC8VU3HLn2CuzSZnA+b59mSm9Beqz1cdOC7DBE5ryqY2g9mSIQ7v
+4Y+j/DPzx7TfqOJdbmCTCxXq2bTexeOMNFi20unxKcr/V1zqjTQTnL0p67QX
+3GS3VPUDuGH/qxp30rNa00Qd+cVHdlraUD3b/aVR4PaCoHhT0m9mPlcV/t+z
+ULYwovyzQ91roGc9/3oesWBgU0o69JrN7Gwxp/Uzu6dED2WCe++67FeSnhhL
+n13w39PefUYw1TM1CPGG/3pLv+ol0fq4zJU2mJeU5vDMKtIrIRk+YTgTDJOV
+iJNVx35+l81rwXFpfYHLwYL47J8e8MP34tG04+CmkvCoCrDnSwez1xRXSl0s
+Bv8SPPbNnj4J93n361zJEUwQmDslOATcFJic8Qb5ui6/Wu6BheZ6uRE8Jrg5
++dIxbjL0Fkzu68d+CbP175mC+R3GWdbwt7VDuTUILLqremUv9A52fHuZQvGY
+2FEn4G9Q2elaEVgYNjA8Cf3aybj6/gtuenSLn4J57Go3S38PFlgny57HvH5s
+PtPTDlbzPdOYh/kuvp84o5XWuxeMbcP832Z5xjyn+Kxtww2GMMH47VkJRRTP
+3l+YDv8KREW8y6SnfqZwEfhc1uDPWIobyKwdKY33YvZeN9LLeV65QPzcPNp1
+NdWbPc5sMThKrXdgAa1PPPyS6j0USY+fCWZ6f630sV+31U+vqZR/PO1SEzhn
+TZGJJnHsYNQ1+L+x+UOqLtX3uLPyGPqJHlE//796faWJoeh3wxa2wJXyKyw9
+AnDej0o/CT9I89C0LXaG/+WWKh65xPH6ijqYp0Whcks37R8W5NcmzwR2+x0v
+6GtgfZn0wD7M34UnK7cDLDy2bP1n8kNJZWYRcaZ7jQ78TJ4UOlJ+Cp0X/m4T
+cEj07FOrwYIRw/3HgV+cF89MBauNWVFeBn81WY9DG+XvPP/PUnDrsfYiDU30
+I2HRmIL9wx9Z+q3TpPdRnVcHvadCJBWjiM+0TeuGv7bemxquUP5g5rTf6PfH
+AaVlD4kT797vxzxKWY/9c7CwZnI7B75QkOTYAFbLMj80EvPLWZEyqh7c9IAN
+zqP3OdY1v5zq35EoD4U/vf5zHuRSPSlZvU9STLDZVqM9BSzaNq0rDOwbmDHh
+AK33GippKYU+onK3eWvS/amOMEd8/k1zaVvKj48XeCMuaj/SOBvMDz49rAjx
+i72DLdSv8K2HjQX2C7UxrBpL+W6Rad3gTFN3udFUr6f73R3433jgyI3xpC9c
+8+JpnNdit1nbdamf0btOHpRlAr6V+IVlVD86vX4b3jPp+kvqAcSXOR83zMtg
+7FQ30s/xFE/MxX1p++0SQP2LXJ0tf4FrHt8eojwV/SxR338S89/AEuLXgfmV
+bw8Pg9875Ev0z4O5z+YuTuAUsdSOL2DhsgOiLfDP7m/JBZNpqDflTfBK8JyU
+m7aRYK4mZM5Q5Lu17GyuBPO3JpQdQ32DoJ2H5aaDZ9oWdmN/sbKtGYuIVUu9
+teD3ravKA0FgUea3PctwfpltcOxpsHDqjSon+C1bmVabDW5ymvh7Nfr/yQVd
+K6H8MpMeF8zHLyTVp5Ly3VMv+WF+xUsb8x6BuaUJZ+PofnptyCkAC0JSdlbB
+H3lp0aNMyj+VUWQAf5ZuULp0AqxmYxBaJInvxcONprup/roisVBJ3Lf7ZSdc
+qd70BTlbwBuydctIv2hWy5A4sObRrHfaVN/jwsY3lG889e0YMFt413Id6g/I
+y20fRnGF7+v/grvLnTVkKJ73J78Y+hxP6yvIU/29P7SEOJ+Z33slVKl+Y/Su
+GJxf/+AZLkakr9qycQ/6/70gWX4NrY/gOXphPrzyZ8JI4vm3RyzG/PpyPs+h
+foUGaU0ymO+kq/+c6qd467TIq5h/1NsuQ6aF/fZ0KWjjPRi6eS6LAov2V07H
+eyuoD2koqgMLpy1kyYjXx+amq2mDZznkHUE8I6/gqa82vV9T+60Qt/M4b34D
+rLbkh08D6h9WfKfQQ/kxenbmYOnxque0dcBPx1wNhb63T7VOuoBFvXu4NOj3
+W6XdGQFWEyp8u4H76/bnlWwquKnrtlgu+j/m0Xcnm/KnThyXB38fVq00vEf5
+/m2GpZhfy5k9KvlUv9nhYyv8XfVaa8cNYodqxQmYt9enrHQhsZNx4B748zOt
+0Dqa6vsV2oqDHa4b2wdS/UOe9rcl8PNOXn7eSso3HGWSLIHveXpYyjywYE3P
+i1tgT7uykepg/rJ5nwbAw+PMefJUb/lniyCcnysFl9f/Rf9NDq9beNhfce3y
+yN9gwefrKtXQV+DGEw3QvHrvd17E96D2a3erLO2fqmJzDP2tKNXxpPoiE6vw
+MPSfG3t56SLigq9x/phP+ZX06QFg7rtvoi3uv9TmctN04ll/zMZgvhWvglc3
+03zqMlWL8R5YfnvapzED++uc+LMU52EgYL37FuIXIWap8Gfs50ln74D55bP7
+KhAfOao3QVIX+r/NMCkGO0m8M7QDc7I+vGjkL9n+JeAkcbZZqDp4UH8R/1+w
+WpdqeCz2j2tod1TUQz3n7U9r4W+v69oWCzAL2HGZ3usInlKfP5h73nFIHqy4
+6MqnWLCa7qoKvNdc++vmwHNgkUybvRLuw8HAvdevgJumi6tOxLxm1hTMuUrr
+PWoa5mG+qcHRf9LBgtNFR/3hp6HlfsfE/+prGJbCn+uLnWtDqZ7zw1WLwUqu
+xqs2Ub24zC9fxHH/NJOarfTovP47pkqcCaY4r4vSo3orJ39vBHuVaHkqUz/2
+nmmqOB+qlT2BYlSft98mGvX0T06J6KH+W9+YqMN/A6c6vU/EkstHvAJP0bQq
++AwWfvgxcB16t0XVK/3Spe+v2cRT6Ofi8hX35Unf/Ir6SPj/np/9dAbpS16s
+tQ3zkLyn0L+K2PKuLt4/Ltm7JTzmv3nx/TXhv+LnI9ZlNN/OZKsXYOewrd8k
+9el74u7kAf+rB2SeTNOn3w+mpZTAn3X+d0xswU3Nod29cky0b2uecQixVE7f
+TznGXJJ2FJwB8ztzAsqwnnct8G4BWCTlwHmB/bSb5r8Fq02/bNswlLH8rDL+
+IPGt8DLoYbItnwJHz0S+hKKvoyxjag+8G3TAgsjtod4yTBTbHGdiCuY21iwO
+GMJYWeZjX0twk0pizFbc5yzPPf62YP6J2467MC/3Ffsi7Sh/0XjPo5KMjZt8
+Q8Oa6itbvC+EHx8tnT4upvxqT/ER8CO6KzppPliYUXriEPz1GG2iqUv5/VWN
+2uJMdDHnzgE1sNq25OUceHaf34ORxJFr3aSRL+E16pMU5f8qSTAVZ2zxnC6u
+n+bxO9orDfFBY9bTQzzZbLuhBBN12N+O76L+O+rOf8D+jQu/RxA3GbdsvCPJ
+RHbRadbfyI/K74NJuP/7EjYZ0byYa8+HGGnGIs2KVw4jvcZlBntoHkfmxZA+
+vqvfR74MY5rKUQfmkb4ehd2G8P/MwrH5zsS3ncZ24HvgrLph3w6aj4Xr+H1D
+mehMlfKP/6N6821s2uDHg42NeiKKF+arq8Pvf97zprdRf1GZ37TAXl9X18kZ
+gE9JjpEAnz8cOU0fzG0Jb8tAvYjR1loOYDVeeeYUnK/Lfv69gWDBeINDO2WZ
+iNfXWxEDFpbeMsrAeb0gM5x3DsxMeY8f4P42OGmtyaZ8TtqjEuddR8c5uBDM
+nzs+7wnmEZC3fv1D4pTkJ7XwV9fgqfUj4rD+nZinqL6xNqOU6u14Jj1SgjHt
+K608Wi/Mi3++DvezMPOcaQ7pe1/6t1IM+q2lRl8m/VOjRnqDxz1TP3WW4nJf
+aw3BRf3SZbHUr/cflZngOCPxbAHpMw4rchNj3FOdErdtxIbFZwvEGHu0tK5w
+M7ip6P3pJdjvlLLoshfpURrW/h3nZ7TL5upNpCciyagIep+fac71pf12Tf95
+Dv2ICt7cCqb4s+7io1Lw19T3Y9h/epxzBTjvRfYHzRJJj83uGm/c/xftw32u
+0n5XLm0xx3257fDkUznNwyvqeD++B7EWoaodtD7/1/pE3K+gV4Va8ob0823p
+Cmn43a+9fZoBWFgok4Dfd0WzR+1SXA3GSdF0QVxkJNG0D6xm/kjSFH6+z4+O
+OAfmTzqp3Yl6JR5H/paARZ71RwPAH8te+r0jPlwpWQ49YvT/Q7P+//+HhrD/
+AfsDqP8=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.595195293865398, 1.860131761048288}, \
+{0, 1}], LineBox[CompressedData["
+1:eJw9k38slHEcx5+MdmRhKP44sud5lh/P41ey5uenOVTKr+RX4Xal4SqrrqXp
+/LgsxqwzoUJnYmWGW8NIawonhFPikunc7CRb0dQRo++t9n22Z5+99t3zfD+f
+9+f9dhBkRqcaEAThj159/fdQoLXRVycgpDdMa4dI8CrwOCDxQxx/8nJPHQlm
+y1YfWyWIVVO8rkISGseyHEvGEZuHjxvlkZA/z6W77Z2BOCbcsC4mwVi2LG/K
+RBzZMXS6kYTc2pLAiR7EdfbbLkoSZkpjI2cJFyCKYpIpDgXKoPstal/E647p
+xAkKDLKjy4syEOct+a+WUWC61RtwuATxyvzm6GcKOkTN2n21iG3izkSRNISm
+a18cqUOcFaeIv0BDl8LYJ68Csbxz0KGahoXh1K+yHMQgFeX306AU9LPbSYgJ
+I6HlHA07tZVjZd6IVQOeSVoauqMK9nbuQayc4i7M0iB7ctRoQ436B4Lv9YYG
+/3ETw8VuxHKzNVUVDSMeydZTD/Xz9Sp4fBpU3hxZ+x29HrqsVjsazqVdI+Zu
+IV6JmFBPUUC161p1YsTSnBqDUgpW3ionVVLEqhmfhGAKCIH5rPg54mfCNGND
+CgrCODKORn//ocVP70iYbIj3G+Xq5x+r2qwnITbx5UTGecRdAX4zRSSIq7jy
+722I3aV167kkhNvp98vg88oyTYRFJIO/D9EEuVbUMPj/gQVP+zw1DL7fZlXH
+13FZ3J/l4A9ScorF/Tdfd3M5mMni+VZEnCiOhMXzw2TpjsNdFuvj91PHD7vN
+Yv2UJvXfnC6yWN/phF+bNiEs1n/rwas/u+1ZvJ/E6ezV42sM3l/N43SPK0MM
+3i9P4ft+Vz2D99919dF+fj6D/XFW8HsgN4PB/on5YBs8mMJgf6W0x9guCRjs
+v3sQ+HpYxGB/WrS2XLpZwWD/jqwLo+37Gexvn+qmNnKHwf7nykS9rjwW58Ok
+2CoiVsri/JSHamZC1CzOV2Zi4bTI3RXnzzBg2TlK7IrzqW4Y+yLuQ/w/v6y5
+vrrBX/TafLQ=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {9.0548, 14.}, {1, 0}], 
+        LineBox[CompressedData["
+1:eJwl0wlIk2EYB/CPeZCmNe9pHohFORPMIsycfpKZqHkfiZozTczSrbCmUTHy
+jOZtLUxIY4WkxnQJZeXZMTBrc7NATWdLmZQwdGoeYf+XPhgPv+19n+f/vtvc
+z/HizjMoijqKF6n/Hyea2trG40hTwvyq6CCY+Tp7PBlmfi5WJcDGI5y+pyya
+0kSxVziwWrCUvOZAU7XB2pxNrOsINrglwApVo30drL6z2vHBnqYGjLK1JrDo
+od96EnFq4Z4s9NFZpIyYw/pR8YgM+5jqubA5O8yPX140gm2fDPfOwzSbVZGB
+dZHX1BUWqJQ4bUiJ91v2B+XEwi3aCNds2M/3eX8nzExUvXSBj8zYBbPQZ4BR
+JGfAlaGpd8thH7Eo0pb0VcrXFslcxumNaFgSI88MQS5q4mSuFFZo/swLYalg
+rNAbfV9kFdQ0w3Sxq+YNXHqrXVlPPHVqVzz6WNxs1GXC/PBQrZbcy85tgzks
+XIxrI+cVdnJ1deR+er4ufISZMi//v+gTE3CZswP3U7qQmp9IzpdeMOsKPxgN
+5EmQg2s36WkGy89kTRps0Ze9T0b2y6uafWPhlp6ypLMwy2vdZtgGeZqtZ1WY
+E5LCK4+DqSvT9YdgiVk/1wQWDnbzbpP8QYqJaWus784oGMMcn5q+mBmYS9ve
+94YjBTYBxlivjy5zeoQ5tLgjK4z0M+uv8IGpL28DJTBzI9ZyAVXnIy7ZRfJM
++q9+gnP1Td9uwMyuxuTvZJ91esNPWGpw2HJA5XtcFB3HHKnlryoB3HZQOV5E
+7t2zc3MZVmS6X7gH81tPWJWQ73tQ2C4iddrlmCPy7331410ayT0lSX4Gq69v
+D5nCtVebpGyc94DgUlk1yenGe18DG69EFG4gR201y1kJl65umsaT/A7SGR28
+1dXr8Rjn14QtR6lhXbxz9pIVzp8n0DeQzzmHI6NgPtVd6QX/Dgsv6Wfi9yVr
+GGvFfEmewTkK1pP/EXIMkLqb/gf1UjjI
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.515727445508166, 6.085629021796733}, \
+{1, 0}], LineBox[{{13.5, 6.5}, {10., 12.500000000001819`}}], 
+        PolygonBox[{{11.447677384685548`, 10.01826734053906}, {
+         12.397834175673825`, 9.183281069670574}, {11.706811054955079`, 
+         8.780184249251306}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.484057296392571, 9.676200089562332}, \
+{-1, -1}], LineBox[{{13.500000000001851`, 6.5}, {6.500000000002592, 6.5}}], 
+        PolygonBox[{{10.6, 6.5}, {9.4, 6.9}, {9.4, 6.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 5.5548}, {0, 1}], 
+        LineBox[{{10.000000000007276`, 12.500000000005457`}, {
+         6.500000000003638, 6.500000000001819}}], 
+        PolygonBox[{{7.947677384685548, 8.98173265946094}, {8.206811054955079,
+          10.219815750748694`}, {8.897834175673825, 9.816718930329426}}], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.515942703607428, 9.676200089562332}, \
+{1, -1}], 
+        {PointSize[0.04], PointBox[{10., 15.5}], PointBox[{5.5, 4.}], 
+         PointBox[{13.5, 6.5}], PointBox[{10., 12.5}], PointBox[{6.5, 6.5}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T8", " ", "P2", " ", "N16"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdfeg/figjhihjij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdfeg/figjhihjij.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {0, 0}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwl1gs01GkfB/C/uxrKZdx2ZN1y2wbZVRTNX1FCkq1t3Daly3RlX/ZNN0Qb
+YuWSxjrE6YZyqbPjTSWXUkwSXqphrEpu8+besEPS+33ed85x5nzO8/x/z+/5
+/f7PM0z2hPvvk6coio8/8k0Nf8VnGU3JyLctTd1uOPkuFb5j5HFKCGd5lMWp
+wFzG25J8+Eav2C7KEOP7Cwti4MqM6yNvWBifK289CvubsC2c4OLmTXOHYV5F
+0/Hcb2gqYt0WsxOw+S+/7FGEuda6mZdgn9g0lVMGNGW8Ka67Gq71OTosD4d2
+dYyNwypNuWUF+jRFB/Kdv7PD/Ef9sh/hdM6SmsOwUaSHuwls/EnoWg4HlnJb
+VWCN8Kjd43Cs/vo8ZTiq6uCkjj1NHZq2Oc2CufOzgfbw/foqmw1wNaea7wHz
+xk2Pn4AjHJlZ22FxdV/0fTg6Vj0xGBaoHGj5Ag87M5VD4I65BjGNfAXHf6J+
+IuZrs87AnqyUhk1wcsbCzjL40mbmvAOs+dJi5gWcp1p+VZ/kY8uyEcEaWmbS
+T8g34YuGNRnXF/tJ78B1dxV8imDeD+wzZL8r8s6aH4SLzZUGLOCuAaN4LThJ
+2/H4IOq1yWQz7wby8xt86FUGu7nOSc3hOkYoi/RLcW2Sc7Ye6rVqq2UQnLI0
+RuWzLp7nSLQ2wpM2coIguNDaoJMDtwXVdFbr4P0woW96wrLUW7NmsFW+l0oo
+vLuPceAyE/1wZ9acgy+ru3Tow1XezyUCuKRg33cV2uhnxgWDMfi3V8v3BBN7
+6x5mI//2Y7FeprDGZ52KcFi9bTxODpYds8i4S8bjn4bNaiEP9Xv1pJ9FtB5L
+FeM+Ua8uaqN+8atnKmzgaL4o3AYuUbi3MgTmOv+5cy0ssT49lAv3568/SPrr
+vj4rpRfOywwy9IRdFz383RT55jie9NgARylqBeyG1Wb69VbDW/mc3Gw4WGZp
+Zg7/Frs//gEsjVP1YcBdj/gKL+A2SUa8GPnt3fJSoRGm2dldf8AhEVMJJST+
+tYtPtsONEbNV/4B579Uyl8If+/p1zOBC/2l+C+pzKMF0YzXy4+U9/poBH9uc
+qe8GF4srru2CXWKcgytRj6SYbokTzPX7+c4yeHhB9+a38AfD/V6xmui3wbS8
+DvzmyzbBWw3Mr2VGGsCpYVqJ7nBO8LnbK+AVE66e+5cifnB40RY470bmh9Al
+NDXBHxOchIMrXdaeVcfzYQEX7sLG3IetLWo0JVJkhJHz+dhy9bQXbBznYLoS
+++l+tix/joF8hDMnIuHqPbWuPTBXTkHnT7jN0ahrBG6zj6gbgY01c0wt8fze
+5wvCJajnrei0+gRYVeKbYgLPqT0rm1Uj5+FZORv2e/qpMAb5mI+uyiTn6bnx
+AF8F+Ubb5ozZwUYWo8HJcKFPsng5mT/XzJyFUwuWv2TCnlcsG32w3/SpZIvP
+JN9/fxCfgq2mRBceww5mDomxxIl/nYmHR/Yzvv0Rzhnq0FwHCxhvd0gRL11h
+6qKM3F8hl3aGwXS27tZK+GTnscaryE/W05x8HH53ZPTKPeRvpVTuuP5/9dww
+Xoz9R7d+36sHn485kxS7GPUWlJ2bY9PUntBbFzwWoX6mSxI/wsH8hEElVdy3
+7Ko0YiO31o5mZezDgJ1E5vtWe7hfVaIp+5Ny10m8S08lAVmK6M8H9d1ucK9P
+zlCRAuIPBBb8Stav15Yfksf6a7ofkH4q2y/c3AGH9uSVTpH7YdA4ZkaOpuJs
+++0dyfscyawSwtztdhO/wrTufxgtsOwIXULO54XUyY7PsJXfosABcj//bOe5
+FfE6i2ocVFBvxXXXOmpgwbZVgeT+rWtjx9HIR+QzeMAQpkaEkUK40zpjlgVn
+7pBG+yL/np1MBulXjEZGSgPcpp83owiPqOwLM8F+6fbD73qxXtosdzoIpqST
+s8XwP0vYA0fg4YcHXhyyI/ewWp8v7NQb528JX3fYJ1lAPI2oTOF78j5ve33k
+NMz7/U0S+X3jOvwQQPIJTQ9/EwJXae9ekCB/XprFk+XwVDurqx/7VR1Vn/sb
+9e8dCXd7TGG9yKbi13Cd7kUF/a8cKrRp5a4nsLk47d4f8xyqKfz+fA1cnK0k
+bzzHoXjZvBtC+JxiiFr93xxKv9awrg9eIXe2ImOaQ92pVl9QJed9c+nR6584
+lIYFfXgNsXFRsuoU4h/SSYyCJ8RDG4UTHErEbQgj9y1VJFfVPc6h6qxtm2fg
+QsVcl9ExDuVZSh9wwv6trs28egKr3pZ8JP2MqLTK98V8aiGFLoUNHZUOrkG8
+Cc3RmyJY9fv1ixiTyPfy3b9k5H2wEMuUsH6ONOiKEulvWPyoDvJ7tzC9l/Rb
+Nn/7krkU8VMar8rBhmXmpSzsJ44RwJaQ+M09BoNwjsj7X/XwRAt7OmIG6306
+/yiN/L5pXY4qhWXGXXf8YdHsOkEq3KS3OkIDLk1I9V4M+z24bN2M/YkWBd0y
+Rbw2nWn78+Q8xvs7i5BP9N0zr92JvxGsdUC+hd7vXRbDTkYGUS7Yn/3I0Mou
+1Fu/cZWJ+gie59gyBDBX6te8cQj96BQm5cHpmrvk/fo4lFWBR20WbP/FKfFW
+N4dKEjMW58KUJuO0cjviOw8rV8ChV+zOatXBk9257WScfDIe/f//Kzb9X7fX
+dwk=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.6003322263215085, 16.89021660517737}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwV1QtcTFkcB/BT2kw7qcmrIjVhLXnksZVHuVfWSDamVh4rzCbbQyr0ksVk
+bJtYOxLVpp1BqNg1KjVKGonQO6/S0EgyUUxEg1b7O/fzmc/9fO8595zf/3/P
+5zP2/uE+mwwJITvwo3fSNIDLgiU6erdnSfaDtGYt3OXdOuMiLP9pv+gSrD+f
+u2ETzLnmFf8L3N4yU2YH8+9WJn3hsSTCv6aojc+S2Hx/Xjw8PM7/iwKW82Qx
+z81ZUl/n7nIQrg8NsM8zY4nfiaV7omBhzTHPyCEsCVoc77YF1umiz842Zcm9
+zEdjtsPEPL+Oy2WJKEc8IgGW2h3I+GjCkqx1SyOyYE3a6SRTeEpxdUcVPF0m
+dPXiYFxRXfIR5h02IeWDWZLIUbY6IO/0qJeSMLgi2cXKj9Y3Z9TpH2GrkDeT
+kmDFtNMB4bDGw9MwD9bYeBmUwqHHv2utpx43yMkJ669uvrGtHY7w7kmuhaev
+4hq8gkV+vga7kUffsj36GV2v3HiJy9eYJyyOqoGFY0Lyu+HzLRl+OTBvb9O/
+KahPKLZhYmE2Z+pWPupf7Z7aPA9WbRRIE2B1gVfcB9oPl+LEq3DKubRnuXAE
+l0wph7ts5k30o/1esln3B7VjlmQI7c+rXlt7WLXle9E+O+TL363eRfu5XBD3
+yRbPn1ma5SCPXORWtxfme+Ra5yI/J3ZFtz0dj1mYkIT6dHpD15YxqOddg9gX
+/eBYGdYrYE1A8lJLY5Y0KUXCU7C0/FeZ2gjf+cDQ1xdhXdOlwXmD8H3PBIY9
+goVOK5lThhi/377YGusrApXpxQYsUbYZ1wfDZF3frwSu/yCLuQmLqta8jyM4
+l+JrQychv7hyfOBUmCj/nHgAJvtv+lvBqhfvBR2w5sKhzDmwKJpMHkX7tcrb
+/CB8fKzvOxdY/CBqFgfrTyk66OpJ+/VgYkgWLO0JXLucOvROpC/yGTlqlwlg
+ha33YHPkVxp71kyj5y9laWAFfMW1bLEJLOLG8YJRr6Yo/PY/2F938sLKHli3
+ntM2E1YV1vT7fIV5n20Pn0E94kMul3+DtQaqcDO4Pot7QgLLHasvRKA/vHOX
+IpfAJFddddcG5+qz/vYDrCffETtrPix28rGYBscaP+y7NBrjecHRK5BHfiBg
+FwuLjR0zvZFfJyDObaPwXDMw3xH1CZN2Bv4Ns2UFa3oGGCJd7m4QA4scdDsi
+/2OIttBbEkrnm21bafCZIUE5qr5dMHHQaBV6higWTBvIpvOdK4P/+sAQj5rI
+N510fLfv+MZevH902CBX7C9/3Bce9I4hwh86j6XDmrGWj4Pe4v1au+39NN+p
+TFlzD/YPSx+9HvXwF9bOL4G1/LpxSmpJ9CEO5nu8a4s3Qj/4bGNPIRz7sEDt
+BhN/VXsh1g8q4DRsoA72q+jF/ppQ1iGQ2vBJ9Rrk00yo4fpQS98wNX0MkWew
+JnxYZX4iy+kjQ6zSKic3Yj/R2npe3CeG6G7dbA+BWdOAzRLUr/td8LobeUWG
+Fqlu/QxJFNwYJYLZ+dLoNFhb8GRkJern29mUJsK3jLrtJsHi8GwxB54Yvjr/
+oDXeHx6WYIn10sZkz9VbYVzWuagE+8tNkpVbYXnq+JNfkG92+9ydXyzhLLVf
+z3uG8NelPDwJa45ne55Fvdkin56fYTZxs48L+sXheCW7weSyXVJkN0NWL1k3
+zBlWuQ6Zc0SLvKaaVZ50PGN/QP8zhpAsa3UMLH6b2lfSyhDWpux+MXXqVUVZ
+E1w3EGCGPKS1NmrhXYbwTFPuhlL7HynvqMX39Jc/qaNuO9dcdYchqtkXB89A
+fWSHLNMJnq0v1O6ntnTqf1+N75VbkXCP2oyo1zSg3k0bZVx6XtQWUTH3UZ/7
+kS4H2q+utyWSR+i3L9fPkZ7PtEmeFhr00/aNsyWsmvDWVd+GevboXdqwnrjo
+2PXrz+Gh+kOHYRVzyssd9Yoidjd8S138YargJfohjGzORl6V9ljn2Vc4TyXC
+I9a0//owZ48uhogXRFzdQ/tlPl5qAcuTrp98OhL5qiTLPuJ9ftHRskWwKnG7
+I+nEeTu7LyZvBLxyo9fMDuTlvCydCotTSveeQT5RxdPbV4bDW3fu+6RmiJLf
+2LiROkTQUYp+3prc2vwNTFp6019cx361XIkRNb2kpURP/3+Hsf8DvRPe+Q==
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {1.3599813626326804, 8.076870967038232}, \
+{1, -1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000007276`, 17.000000000005457`}, {
+          14.500000000007276`, 10.500000000007276`}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           
+           9.996694214876033]& ], {18.003845503734127, 15.345156917263754}, \
+{1, -1}], LineBox[CompressedData["
+1:eJwt2Hk8lGsbB/CJsmWZkC1lTXZDNU1JiFASKR1OKltO2ZoTMcm+nMaSo5LG
+UqFIjuRUMpyspxCVeEuWbKUsiSkSKt7f/X7e/uj+fD/3/dzPdV33Nc/zfKh4
+nHA8ykehUCSXUChkpAiR/9aYUf73z8CM8pTO5qTDI+aWB6ThUqOPm9YrmVFo
+MvWzq+A3ax5VvoBtRqYUZeCSLblzG5Rhe/F0PlhoR8+XMJidu/z1oL4ZJTne
+Z0k1mQ/0/XQfjmqO1Z+BGZHvgsLhIR29j2oqZhSmyIU4E1g7J1jVCm5qPpf+
+Tc+MUqCuZOUK29A/+5TAKdclnbzhzg/3hr1gxd6gHi+yfknzzGpYXX3zuDPM
+Kljp9UYX67dckLaEhTy5D/Ng5fRnOzXJ+tjthoGwQHRAuyCsHK4YZg/rf0nT
+eY/4Zrc7PWPAugrDH+tJvL/UPTSAdyXszb8Oy2WJWmyAk00WGxLgwlaJyh2w
+4+aRqBCY9uHokAecWbC9KIDslzPyPQGe76QUM+EXv/k2cOGA7b8wI0h9rOvv
+jMOUZhFnDrHa+2FV5FOdsJRO6ucm0RrrDBf3Ht47CVNLM64lwvdVX/prk3os
+7oh6AG9bptftD/NCb97rgsWVBeLKYZr/D90v8A9dAeoyVZzv8JDrAvxw4fjX
+fTBjSY7FT7jT8UZWLsyargibgBMly1kf4VRWnkU7bDX3Vt9ADfW6/pV5C166
+1bHQB7ZZd5l5Cu44EmqQDRdWSxky4GP9srH1sPOW5WLTyG/Dk66hN7Bb2F93
+/oL7/l2h+hGeNYv46k68lD/9E8yKn2mWh2Miy9a+h0vTLEU6dMwofGERG/8D
+18pTfs2APxys4FTAtAo9cW9YdcuJsEwSj7iI2Da4aMOwHQtmt7zmqsJyr22u
+OsG8dff7pWGGbvbSjXCOt/5d4i8f4hfl4NS91DoVOEZYpZOfxJ/yO58xXLlv
+19lvqAftUnfvYdjN4NLVr7DmtdFtSbDrym8bF0m9Bq7droKNQhb7pHF95w5j
+3yk4lG14lU5cZntBC/lpNDwb8yReTGYcgkuFxMuyYGrHXGoSbHUr6SSpl3Jk
+guhduNrUlKaubkYx85RnPYe/zFnfYsLcDHWZfrgkjeleA5dmKd57C4+t3Fov
+thbz4qfudcK8Ao3NLvCx3dUKdbBzKdfpGhyVeCYpm/we9oh+6CW+9MDUj6y3
+C6FKaSBPvsJ5Q9LPTnrHTWBu2arpSeQTzNfL5wrL9cdUF8K0ovjTATC1+q3m
+EThzteC3ILL+5eJqGZjpQDdkwkzPHTEvtHHOt8+5u8M5D76tOA/rFnXTd5H7
+WW01/xXmC0it04U1lf2V9GGv4fyDy2FWpICpOEy/LH9uBPEq/219/bsW+vGI
+60QDnFN76P4MbDT1Q/gWLKeQt2UR5qnPbDsP826pu0vj+tTS+RvRMKvbs2YD
+3DCxZPoM7MBfd/wwHNpqxCTzDNpnwT/hLRdley6QejK8eP/C40qNPqVk/SoP
+63k48YBvYxcspBiobIB8OzLMJcQR74hFcg6pR47K8IAtqVczUykBTtM57Xue
+5LOq3uoWvDD3NPYN3Enfp1cNe483VmmvQ37cSP8GmJ53h30aFlofvbEOvmu4
+zq4Brq3l31tC1leEJolr4hxuJuikwGZdHbP28IBOTIs7qb+GTCYb5qywa9Am
+9x8a634Au4mW631E/OljTjldcFRbY0g+rFh0wYkHy/3nh7srLG05+GUeVtYy
+b5Mk+Qb1/5yDKRvkS1tQ38KLfrETcKH/uacJcHCY2/JuEg/Xo9we3u+Z/0c1
+3KSmVKAEB2z8g3GVxHNks8t3MgoZZ58h++3OERzCuDA4Yu2C0ex+ggPZp7j8
+t+ebyf5Dehv6MGpUGOQqYWR+eyQ1iXHm59MpUYy8xcfc5dh/uksjjx+mRkt5
+GsHbqI0Ky+DSf070usE/WGv2SMLH+HddTiP9E514XQdOfVRe3wzH9WRNO8DO
+isanKMh3zYtXKdGwjVDnEyNYeUW78UOyvm2U7wjpDy8f+0VSb3W9ohi4hGLx
+jw32adJi386ChbLaNNLhYzzTkEI4J6JJ5D1MXYikEIta5T8n+/K0DvZmkH68
+KDwcpk3ePxXmERh9noRO1WIc8JpdcMK4cEW3+wdGjoJrqCrGedvzA/o410L+
+qmyyb0rnnzVOMFVn48NcWHoi8C4T5k60RrnABzgjkZFwqnfYYwl4Dd+lsBji
+uNvBjeScPm49Gwpz5PWZsfDumAsLx+BSNe5BK/gtn+Hf9vBA7avzpI77u840
+0UifOYYsjKIvmyNc7oiTvp+NEHkOq+Z9/kr6zC3bOqkGLn3DXd8Cj3QPc6vh
+A33rRktgM3aeTgvp+/uRHqQOtHt5A+/g3b687GS4drxlhyDulxh80CARZk9I
+714PK6yu23SRrHdJjzxKzrXNcA+pKytzg3oWPE95E/4EntVPd2qDS+6etZwh
+8y94msuQf4ntHxw9xOvAVm1dDz+MbJv2h5tE2GW/womGT33KSD3dqDdCYNra
+Du4SPBe50vqv2XDlSJGXA8wJCpY+Bze3/9J5lTzXE35yY+EP0cFRY/BsV0Ot
+H8zeuWuMhvckq2OqgfRJh67bwAk4Z+j2ghzs7OkRlw8zp9es7Ue8d1d/9noB
+O79S9L8Ce/dFpUzCqbqnjh6AHSROp/PhO2qkSqCH/A40B6k5wrBcxTLuv6hf
+Suvfvy6DmY9HB8PhsCVTczO4fkQgTXYbXFyctG4Apt1htAmQ89AenKwn899i
+1LrxXMrzlC7Khd3SLW9WwCkPCt5EwIzMp94F8C6lGaVDsMPlmrYcOCZ8dHEb
+yU9osbwQ1lAz6NMg+QX02FbBV6nHO2Rg5dQQnV7YpyQpnwpTd04yyf0zY1Mu
+rYTNDsU30eESftcAcj1336skX7jSp9TPglxf1TKQCzuccDT1gzmy37s7SL/E
+N4jkwJTWxiukXyzb9wb2ku+SsZ5wQzhtW2exKuqhaXVQ2ZE8Ny6/+dMfZvv6
+pv8GH869ffcfmDH/NJBJnj+zGfEi+M5t2hrR7wtnag4yf4HlLG5cIc+pxCr+
+qWsw85yV5BbYq1yiepB8RztWbSXPZarxzuNiNNRzULD4NeKrcQttUYdzci/6
+ceDgetlTdJg3asNzhKtokXLbYebHr5+F4WXvQkusYcrUUada1GvtRFow8YBm
+5rLTMD3MYNocTr1Z0k6HdSdiRzbBsxHzDj/wXnpg27pTG2ZXjFW2wAOHpBgK
+sGbUbEcBvFOENykEC/0+9jYFDvA+xJpE/Jpe++LjYA/pvc9ayXf+t2+Pz5L3
+7DGmYxnMuxkoxoFnZZ5tyyP1KFbRvU/em75TJznE/bO/dcN04+8eGbANf0Wq
+EOIT+CtpWQE8UhsuvxVWX81pqib14ibTT8KhX12S38GMaL6Fm7CBmHu7MOIr
+rBtIIP1Y8qqQpwG7uU/KC6I+Tx0j7WxI/A+G1uvA7aZ17/xgxnXXWks4g8th
+XyTr+2zVSH3VvqvMVcIs27Y9xOxXWqODpB47ElrJ+g4XF0lBQ/Qbp71Ni/jI
+agstuDO1UYkPlvTL8rOGR1r55FoRz+1c6h03uEko+8oF+K9pYa8gMj8ny2cP
+By5dWBsD81rtxgTgx9zJlwlkv7kIgyrURzvs3eUkOKpfpDoIjtaU6TkLUx5Z
+BNLg+vsitpGwpt709y/4zuMrLnx6Ei6kKJZVwyL1jSc9yXycY+olWGow73dH
+cn2LxE8W7B76mGpO1jd/eH0cFr4km02DnccD3Y7BZTvL96vCA7dO0YNg50sO
+HrLEKoaHk+FnV64+psJyHpO2d+DO8Xu7JWCGndhMNxx//EKCFEw1aRkXRbzM
+oaiW1WT9/obg7XC4vN8qfZgz+ryUBSckhRtbkvWyhXeKYWvdT7eOwOzFtXk9
+sOuKTwUk3xezq77woV7TW3xMrsOssxkeynCQ/dY9T2BanLS2EXyq1PwKj8zv
+3yO4CT748Hm/rBH68uGivT45j7DGFhPYOe/arCyxyj0Nd7izajRtGverGZJ7
+GQUPqCrtfQynMSLeZsHcdPuhJNh7fUD63zBn8+6wXbCZsnBgHXxMTf8GP+xG
+5Zq2wKyZTI1K1OPRkzqRVrJeVe0T+U43+Zmn+Yzs77GpTxv25hjSGmCmq8U/
+Y/jOf3aOO1UJy4WcptyDNV+7hhTDhZpNjfFwk8bW9ySezg+2pV6wtvmLyETY
+LcK1xQFuUKZfPE3yWy6Vugtmfljq7QOPmHa/2guL5h/VPgw7nLLpOEosqcBz
+glMn9ehk/6ObVnIcyf7X/VeWwI0T9Ob9MDV2WL0P9lqa98mV5OcVVCeJ+Kfi
+BdR9iY9zJXfCIY6yNpEk3yZP3QjSj2ImkxyY4nuIRvpFoeFkQDlZv2DN7IIZ
+NVJvu8j5nO9Knocf25gyFuEcg8vnqain+EkXE4316Aex0uUKsFaUTJEd7Pxx
+XEEGTl/ibxQEdwZ/OrOU1P9BTRqHzA8bJ73HfvuHzhVWwIyXkubkPEQNF3w7
+YLkmAY042C4qX2ICZlnIme8gvyfyd5AN//97iLrZfwF22yVu
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.246230799468776, 14.874866310565288}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJwdlAs0lGkYx79hxp2WqFhKS0p2SMbmkvXKJU1FozK10s6gclQutUesar46
+JZeSUHKfqNYlVMqti1mxbZKEOqodjZI75RabxT5Pc87Md37n+b/P7f9+s9Qv
+xGuPHEVRIfDFJ82AH4pNqG8fNUI/KJoOcQWW6TaP1gH7+picTQaWJN4x9VAn
+lH562Wg36itODSapE7q2LuyzvTno4zpzEiC+VuVuVQKwYEhLzQni957eu/oW
+mPpRIChRI9RLY2W/JRaEEkfdHO1QJXRgM8+CDywJ9qrpUCH08IEBxglgoiW+
+eV+Z0JqOltczgA3nUqpilQglHJt+cR1YFmD4gq9I6DgLTdM8PL9OKrVRIHT/
+u/VWScC0fEOuA4vQ6d99dQkHFmyPefAbk1B5sRY+XphPnFPfJ0+oirr8IdNv
+cZJ+FThl+GwVhfnN7fvygdlew2feYP8moV8mgAUrLo9VA5MAvT+imYS+n5Rn
+eQ3nLd/YzIN6DqMmsgxgSUPnIy70o+kxIRUDiz1F8/2g31fF7ey7eD6p7Vg0
+zFO1Ra6nHdl+avIazKs9J7ZShfrUSVltCeyje/cdXy7uo5J3NFGVUHG2O/uS
+sb+ut3oOsE/dZdPVXTjPodr6AuBE98Q8/VXAx1qjnqOfUxFdbsAyxnJREfCC
+nXo/hwBT4RtFjsATF7MHkpEfeosuqBIyk1MsKAOmW4Iii1SIZGujg7ARuc6h
+Pl2ZUAZ2idodwALyjhsC/Z+f5Wj1AkuaNBPsFAllbOEZ2I/5JgbEGjB/61Bl
++kfUl35Wn4H9T7vpZLxBvQKvQYdJSOY+bnUDxllxZK88kWT0OqdUfDuvd3JK
+jhDjNM5kLjKv/EaLHKHsjdseJwATns3ZL3KE9lR37jqK/TGVREI4b2qwTRHn
+E0fGZ6uBP5m248V7sV6Mk+kQ8CH2BmoPntc1WjHBgj1RPTVBWD9+t6u2IiEH
+YthrIzDfaMxjGyVCz/x+YvM5jF+2yN0C/hSPF/ILMF4YFM9VIRTrhvXWp5j/
+30esheCPt5GzdATrux3xKIB9ynW93fS9JdQxr146BffdaeZIoyswreG4YRb0
+DTLr8BBgQbhwsBr4iYN62CXU66/MslQlEqs1a9WrkA39lgbBfSizsu14CSz7
+SX46BPy41p7WPAAsWWZdwYN+d5hl231F/eujGoaKRLIrTthNrYZ+5l34MMgi
+xMRYRweZHnFf1cAkEmGbVtSUJfZrNvI33G86gGWN+QwX2hrC/iW9oc/KX2O9
+3XlN/uBHtOfKu/XY/xHH/doQz449rnoL9blSogF+9Go452ShfjGXwwO/+Lff
+rTsHTLqH69tBH1OWn3YC49oz3pnyhDY6Uzobhf2fniw+D/dj4dO+kGOon1d4
+Ow/80e0ePh6N/MTF+7ECoULN1rinYr38orRemK8zwT+sFDnFNncC7mPL53zz
+Jsw/7t0oVSaSEmc1z1FgSjOgKEmFkMrXZR56MD9hXOpRAj/GhZxgF2CJaeig
+DbA7+/Cz4NV4H319l4B/x8dEManAlNh/wwPwu/Gfgrb7yB+leovAj8Pj8/Sl
+qM9a6WKrTIhWEnPBJLAs3reEDf3wtza+UbaCfXELR5nQ743+mBFtYDIVGdQM
+fnAmI/mLgAU6qca5MD+7xZjGuFgn4nk8+NF/WuihgvE4fkEW7L/Tr1JhGvIb
+xgRHf2QQemzze/terF+/5b+DDCLJbE0tb8V5EsxrHBjgV+8Pv9TgvIF/2vEZ
+hDJ5vkOxGP23n3+wEuJmQ1WibJxHbRfLB/zJVDnMvYj3ZbF+PQfqu+V2ZCah
+vjTbwAben1bPT+txH7QslNoO/c+ZXSnKw/Nf3F9Fgj+bRFa3KnD+wLhzKfB/
+p2lwqrEF9b8uv5msRIiSUQRzHOMf2KH74P4W7Rxh6OE+CqTpcrDP2tggY2dg
+mUWhvw/se/PATPpBnH/5xNf9wE5XttGpwBQnrGc18F+cF5MPUe/6TL8M3k+X
+T1bc95ivcGPTGLwPs3PwwTg+Fcn/B32cLQ==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.04629457140433, 1.614040285447666}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwt1n04lOkeB/DntITlYvIWhYQJa0ajRByrx9shsY2SiIPEQaeikzphGlbe
+s5ntsirEbN6mjW1qy0ursxMrytsQ0clqLuqE2po08tbhfO+9zh8812ee+75/
+39/veua5ZmNUwp6YVRRFCfBHrhSD/NOmKVVyNaMpmch1YXANTYnu+QbshqWh
+afs74YLY9mvfw8KFYukzOPMryU8fiJl7wrWw/9eyNmN3c5oyze9yPQhH+53q
+zIMT2S0avXAuX/q+A5Zrn3zL1aGpeWWP0EWY++PcyATs0toWt8GCpgS7CybS
+dGlK/B+GowPMuRZQa6xHU0oGc7WuxO6l1Xdgbo/8kBMsfl58g9anqclVav2W
+sLylYmcTLFpJW1GHTQvGldaupSkjkes3k6gnSUx9FAxzxiq/lpC82pRuKixa
+EJpfhGU34zTPwJG/xHUnwNRnp6ojYOku82Z/kpf+eIoJW1VvGtsKi10v/ziA
+ep18k39ZkPNXe3cfgVle+73NYOkZveBF5BX0qDezYUbHXE4GXJCx6YI3qV+m
+MqoBK/Ki80k9gW1XgxD9C62ci6vgSE3tOU+Yw/aYfUHqq7y9tIJ5bU8+7WtL
+5jU5HTUEh5WMtpyBhcvLlQ9hluWoiZT0L3mgPAb7FbutM2Pi/u6sk9o4T14R
+Fp4ISzhWzBg4/cRYTyOcqEVXDRA/fXdtFhbfKdIKQj6fUlaT5SZ8fvB+4BSc
+ZHfqoB8s5dtlZ6Ffnw8zHVFwYtQHZ3PMxyJK7fFhcn/71tm78Av1W5wYWFg3
+mOdlQFPB7pp+e4lbL5xtgTNzHjg5woL6Xbx1hpjnDF2qA8vO18SGwmEHXFNe
+I4+0Tb2LB8teDJm0wulZ08/PwC4s3fEScv/IP8ojYA365sppWF7NElvA88Z/
+jY8g6wfYu/pRz0dHo5xL+p8enTsMJ1mezPkK5sac8JxH3jCLiogDZL9o/+F0
+uOr6VEUSTF11mP4c5s3zFstgU6GbRQX6NzqSGj4AMxJsZjxgQd7Pq0l+xlis
+zwrmFcfbcSGM9DPaPTEEd+YbMOtg2lNNtYs8zxx54TJZn8/bI4ONInR5XEt8
+Xiir1MN5RdXVl8thTvvixnh4xCyu5yUcafxlwDBcsNASam6F/f0fPEORz8Dm
+uOY+WPgseuLtWjLvoL3JMGWwxfkc+mWw/xtQCEuZx8asMJ/cor/NFRPf2bJX
+Ahu5qMwJiP3Zx33X4fs8on2fD0fezn8ogQuCi45FkfPLp5aN12NO9bFVrrA8
+PkcrHLbfVHtMH5Yp1xTwYZe8bP3fSV4Ju4V4++S4oh2Whty9GgFbOC15VMF0
+Su6sOfzGrn8mH5Y/Up7tQ703zSU8Hum/VXVLPHxaN+lBCtlvPEp/RF5JPks5
+hzjaK5wPK0ov1n0Pm/YkqKvBTYd3xj+CKSfzmivo3y9ej0mRfGXjqzxg6t4a
+fTdipxOaK5iX5Ax3OJ/0o3iV+gT2rF3I+zecaFFxtht2+frTJ5Y11nc0NIzD
+cdKtT/nE4xFTBjjPiC7p64YFql9uOwqPXtDq0PkC+TnXdUbhN+/sVQJg+a+5
+5yORz+qBZngGLM4ezlTAYuNDrjVwuunZFQH6ZT3fPPQzLLNu/NYW8xHqM/Ta
+YPp24S/tsGf3TEMLzNC4FLPbCO/ztes4PxBXpK9vh31O/37lGzixsLFgozHe
+lyGNonhY8t361kiY9Wk83I3Ue9cbnA77XWr83ACOXLSvTIOjQ54qvUc/9L09
+tyJgWkc5uw9mtDO8zWHBUlZKA7k/bl3Xi3rBFd0hItI/fzAlFs79Yp9SLSz3
+OuCvQN5o6va1n2DOza5DPFhht7mpF+YG3duhAkuvdzyZI/O0SHYpQ/9ShdI0
+m/TrsMPaHQ7uczNPgKUSvdfL5Pv+tsawGRae32EzDPutTn2taoP8mff1e2F7
+g08xobBk5MSWlzBLt9SuHhY4rngZ4bxJZQdqCTatnww/Drf8qf+uGwvrdTNe
+y8jzNhhYx4epyZ1vYkj+zM9qb8DyDk2nRThXUWr2GBaXGT4pRr91YecCJmFa
+1BZoj/lY7FdhvSPrHWjnLlhs989Ecp/zZ43YQBOs32d5eQiOLD+a/BCWyYc6
+msh5EjGTuQHPW7K9qIi4MTLtEExf/Oh7hOT5IXtzBhzcenTJHeb+tuq7dJia
+WFpjBMsu0z0RcGD1QPsi+uOWdVeZkfWFfGrchryPrib2oJ5wsnLbICw38B2I
+gcvSDd0eE/Pn42eQl8fb5i8j8/GYTUmBFR43Wsm8hInWOcpwWdqsOxP10rP9
+XpWgf93f/lIfCjN6fGLc4Pk2b9srJI/avrFlzKvF2TXkFSz9+OT9MDzYcnGn
+Ixv7HY/f74M1FFOP8mCh2q32V3BBkFfWM+L4u80bcB7j2yQba1vML2iu/CTc
+eUskSoC555pHXsLidsNddbAslx3+d+SryvKfGoX/+L1j8v/rZvp/iCs6Xg==
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.1974629540243, 12.294740175065709}, \
+{1, -1}], LineBox[CompressedData["
+1:eJwV1AtUU3UcB/AbI0EZMd4okMMItnAwjoWTwCYCEfFSTB4J0RJd1kGcr2FH
+JFDP1JQpoOMhrCAeKTRFEljiOrOBrzYwaB5TlsgOosHFI7RDjfX9cw7ndz7n
+3vv7f/+/+78LEO3cmG9HUVQ2/kmlaBv+2EKKReAnpIS7B0ovwarDrQVGXyHF
+XBcjzYPz9rKL9LDfW9y1LJhd97jBDDs6ziTLluP5Z9eb/fG8Jl5/buF19CkP
+UEhgmdSqlcEsBs/0Fyw9FsoNgWnthuJt/kJKXtfw2wQqv+F04jyqShsco0VV
+xmsTz+K+zJErpb0wdSncfRXWUYznUndhoTaHdxPWrGdd/ofcX9t2nYNc9FDl
+exF4TrzMOiKCOe0D0WWwqvB4pBwu2ddYZITzetwtHbBpByslDH0M/ryJazD1
+4ZStBC4RRPT9DMt/j/bth4XjxcyLsOXbvXf+hS3BuVEnYSOj0scZVXyk9QBZ
+z2LSJ7uQPrMV1aGoEwKziIFq6Eu/9xTP8Q/20YOocrPOW4Iq3bgwRdaTd40U
+W5FLyQlb6gVTjdKPK2Aqo5pXhWqwDe+MRDXxt/gxUPmeneUW7FsR7a7NJ/Mp
+6U0dIvPkK2u1mDMd66S7BRc2HhS9AauYRZ+MwbKv9/ScwHszcPW3fdGHc1dz
+2w6mbcF2Eljq1GA5uQw5yvxyHsNG+zFZOGyYj727neRva9hNL8X1gZTl/8FK
+rdc7d+DM539zkrBPfgG39wZsuh/zVQ05J6fzPzXCYp4oaRxW3Fe62qOfdLrC
+jRuAeV00b11P+g+3fC+CaU7+uBzmjLTtKIfFAmaWGaZmXuxvh2V6nXc08mpS
+G39Uw5z4pu2nYMshb30PbHp37v49WG5XJmmFpfrsJgdyLlOLmcdgSjdGB8IK
+Z+tgDlk/elEAB56Q/1JL8mRu6rK9BltCXvZNI+9A1YtR8h2IS2yPOsn+ZlY2
+HyX+iK8uIu+785l6GXHC0Hws3Gq/c0qBvD5/npv3Id9VgVvkIpi9zTNqBvNi
+n0k4IsY82G+7pd6BBVWTKTof5OubC9fBpsm4TUEwa9d4tAl2jNStKvdGjqB0
+B3LOLC0Jrg6w4NfFNwQkX5LLugovrP+grWgXOc/OtHU1TDsFVV+BlVl9oRZP
+XKfWMch3Xrjgu3YYdtx8a1Uy9ptmeLhIDyta0iS1ZF4r3UfG4LTA5lfNcPea
+ilIW+rFjC7ZzV2D99AFFGmw0T+4RwcaLWYp6OOFAfs0puJWxRfgSLjz6YO4C
+XHjh6Xgi8irffGVfD0yrJYZaWHwhfPQncr+u/6zJm5yLQ8YmmDP9x3537L87
+Sv3wMJzmkfFDGEwPmkOyYNXlhfpwOG066rtAmB83HO4NG61f1kwir/Hzof5R
+9PNxW9PbAQvj4jK+gbs/mNXsgRVMWfZymF7SlC6ES8qvttchb57q4C0PmDX1
+ftZimK+ut5vFvGSqzKQvMA9BZm7EGPmen59YctMD+Z9IHpnI+e4Y3MCFNTz5
++Snyvicdr51xR7VWr2ain3ysTOwECyafVApgjcvW8wo3zCsjc3AXOe9un8nW
+wsKrDZu7yHXye+yK/OT3eIXwf6LyDKI=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {6.411618926975065, 7.21843785395013}, \
+{1, 1}], LineBox[{{14.5, 10.500000000002307`}, {14.5, 3.499999999998608}}], 
+        PolygonBox[{{14.5, 7.6}, {14.1, 6.4}, {14.9, 6.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.4452, 7.}, {-1, 0}], 
+        LineBox[{{14.500000000007276`, 10.500000000003638`}, {
+         8.500000000005457, 7.}}], 
+        PolygonBox[{{10.98173265946094, 8.447677384685548}, {
+         11.816718930329426`, 9.397834175673825}, {12.219815750748694`, 
+         8.706811054955079}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.323799910437668, 9.484057296392571}, \
+{1, -1}], 
+        LineBox[{{14.5, 3.499999999996362}, {8.500000000001819, 
+         6.999999999996362}}], 
+        PolygonBox[{{12.01826734053906, 4.947677384685548}, {
+         11.183281069670574`, 5.897834175673825}, {10.780184249251306`, 
+         5.206811054955079}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.323799910437668, 4.515942703607428}, \
+{1, 1}], 
+        {PointSize[0.04], PointBox[{7.5, 15.5}], PointBox[{4.5, 9.}], 
+         PointBox[{14.5, 10.5}], PointBox[{14.5, 3.5}], PointBox[{8.5, 7.}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T9", " ", "P1", " ", "N17"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdfei/fggjhihjij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdfei/fggjhihjij.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {22, 0}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwl1gs01GkfB/C/uxrKZdx2ZN1y2wbZVRTNX1FCkq1t3Daly3RlX/ZNN0Qb
+YuWSxjrE6YZyqbPjTSWXUkwSXqphrEpu8+besEPS+33ed85x5nzO8/x/z+/5
+/f7PM0z2hPvvk6coio8/8k0Nf8VnGU3JyLctTd1uOPkuFb5j5HFKCGd5lMWp
+wFzG25J8+Eav2C7KEOP7Cwti4MqM6yNvWBifK289CvubsC2c4OLmTXOHYV5F
+0/Hcb2gqYt0WsxOw+S+/7FGEuda6mZdgn9g0lVMGNGW8Ka67Gq71OTosD4d2
+dYyNwypNuWUF+jRFB/Kdv7PD/Ef9sh/hdM6SmsOwUaSHuwls/EnoWg4HlnJb
+VWCN8Kjd43Cs/vo8ZTiq6uCkjj1NHZq2Oc2CufOzgfbw/foqmw1wNaea7wHz
+xk2Pn4AjHJlZ22FxdV/0fTg6Vj0xGBaoHGj5Ag87M5VD4I65BjGNfAXHf6J+
+IuZrs87AnqyUhk1wcsbCzjL40mbmvAOs+dJi5gWcp1p+VZ/kY8uyEcEaWmbS
+T8g34YuGNRnXF/tJ78B1dxV8imDeD+wzZL8r8s6aH4SLzZUGLOCuAaN4LThJ
+2/H4IOq1yWQz7wby8xt86FUGu7nOSc3hOkYoi/RLcW2Sc7Ye6rVqq2UQnLI0
+RuWzLp7nSLQ2wpM2coIguNDaoJMDtwXVdFbr4P0woW96wrLUW7NmsFW+l0oo
+vLuPceAyE/1wZ9acgy+ru3Tow1XezyUCuKRg33cV2uhnxgWDMfi3V8v3BBN7
+6x5mI//2Y7FeprDGZ52KcFi9bTxODpYds8i4S8bjn4bNaiEP9Xv1pJ9FtB5L
+FeM+Ua8uaqN+8atnKmzgaL4o3AYuUbi3MgTmOv+5cy0ssT49lAv3568/SPrr
+vj4rpRfOywwy9IRdFz383RT55jie9NgARylqBeyG1Wb69VbDW/mc3Gw4WGZp
+Zg7/Frs//gEsjVP1YcBdj/gKL+A2SUa8GPnt3fJSoRGm2dldf8AhEVMJJST+
+tYtPtsONEbNV/4B579Uyl8If+/p1zOBC/2l+C+pzKMF0YzXy4+U9/poBH9uc
+qe8GF4srru2CXWKcgytRj6SYbokTzPX7+c4yeHhB9+a38AfD/V6xmui3wbS8
+DvzmyzbBWw3Mr2VGGsCpYVqJ7nBO8LnbK+AVE66e+5cifnB40RY470bmh9Al
+NDXBHxOchIMrXdaeVcfzYQEX7sLG3IetLWo0JVJkhJHz+dhy9bQXbBznYLoS
+++l+tix/joF8hDMnIuHqPbWuPTBXTkHnT7jN0ahrBG6zj6gbgY01c0wt8fze
+5wvCJajnrei0+gRYVeKbYgLPqT0rm1Uj5+FZORv2e/qpMAb5mI+uyiTn6bnx
+AF8F+Ubb5ozZwUYWo8HJcKFPsng5mT/XzJyFUwuWv2TCnlcsG32w3/SpZIvP
+JN9/fxCfgq2mRBceww5mDomxxIl/nYmHR/Yzvv0Rzhnq0FwHCxhvd0gRL11h
+6qKM3F8hl3aGwXS27tZK+GTnscaryE/W05x8HH53ZPTKPeRvpVTuuP5/9dww
+Xoz9R7d+36sHn485kxS7GPUWlJ2bY9PUntBbFzwWoX6mSxI/wsH8hEElVdy3
+7Ko0YiO31o5mZezDgJ1E5vtWe7hfVaIp+5Ny10m8S08lAVmK6M8H9d1ucK9P
+zlCRAuIPBBb8Stav15Yfksf6a7ofkH4q2y/c3AGH9uSVTpH7YdA4ZkaOpuJs
+++0dyfscyawSwtztdhO/wrTufxgtsOwIXULO54XUyY7PsJXfosABcj//bOe5
+FfE6i2ocVFBvxXXXOmpgwbZVgeT+rWtjx9HIR+QzeMAQpkaEkUK40zpjlgVn
+7pBG+yL/np1MBulXjEZGSgPcpp83owiPqOwLM8F+6fbD73qxXtosdzoIpqST
+s8XwP0vYA0fg4YcHXhyyI/ewWp8v7NQb528JX3fYJ1lAPI2oTOF78j5ve33k
+NMz7/U0S+X3jOvwQQPIJTQ9/EwJXae9ekCB/XprFk+XwVDurqx/7VR1Vn/sb
+9e8dCXd7TGG9yKbi13Cd7kUF/a8cKrRp5a4nsLk47d4f8xyqKfz+fA1cnK0k
+bzzHoXjZvBtC+JxiiFr93xxKv9awrg9eIXe2ImOaQ92pVl9QJed9c+nR6584
+lIYFfXgNsXFRsuoU4h/SSYyCJ8RDG4UTHErEbQgj9y1VJFfVPc6h6qxtm2fg
+QsVcl9ExDuVZSh9wwv6trs28egKr3pZ8JP2MqLTK98V8aiGFLoUNHZUOrkG8
+Cc3RmyJY9fv1ixiTyPfy3b9k5H2wEMuUsH6ONOiKEulvWPyoDvJ7tzC9l/Rb
+Nn/7krkU8VMar8rBhmXmpSzsJ44RwJaQ+M09BoNwjsj7X/XwRAt7OmIG6306
+/yiN/L5pXY4qhWXGXXf8YdHsOkEq3KS3OkIDLk1I9V4M+z24bN2M/YkWBd0y
+Rbw2nWn78+Q8xvs7i5BP9N0zr92JvxGsdUC+hd7vXRbDTkYGUS7Yn/3I0Mou
+1Fu/cZWJ+gie59gyBDBX6te8cQj96BQm5cHpmrvk/fo4lFWBR20WbP/FKfFW
+N4dKEjMW58KUJuO0cjviOw8rV8ChV+zOatXBk9257WScfDIe/f//Kzb9X7fX
+dwk=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.6003322263215085, 16.89021660517737}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwV1QtcTFkcB/BT2kw7qcmrIjVhLXnksZVHuVfWSDamVh4rzCbbQyr0ksVk
+bJtYOxLVpp1BqNg1KjVKGonQO6/S0EgyUUxEg1b7O/fzmc/9fO8595zf/3/P
+5zP2/uE+mwwJITvwo3fSNIDLgiU6erdnSfaDtGYt3OXdOuMiLP9pv+gSrD+f
+u2ETzLnmFf8L3N4yU2YH8+9WJn3hsSTCv6aojc+S2Hx/Xjw8PM7/iwKW82Qx
+z81ZUl/n7nIQrg8NsM8zY4nfiaV7omBhzTHPyCEsCVoc77YF1umiz842Zcm9
+zEdjtsPEPL+Oy2WJKEc8IgGW2h3I+GjCkqx1SyOyYE3a6SRTeEpxdUcVPF0m
+dPXiYFxRXfIR5h02IeWDWZLIUbY6IO/0qJeSMLgi2cXKj9Y3Z9TpH2GrkDeT
+kmDFtNMB4bDGw9MwD9bYeBmUwqHHv2utpx43yMkJ669uvrGtHY7w7kmuhaev
+4hq8gkV+vga7kUffsj36GV2v3HiJy9eYJyyOqoGFY0Lyu+HzLRl+OTBvb9O/
+KahPKLZhYmE2Z+pWPupf7Z7aPA9WbRRIE2B1gVfcB9oPl+LEq3DKubRnuXAE
+l0wph7ts5k30o/1esln3B7VjlmQI7c+rXlt7WLXle9E+O+TL363eRfu5XBD3
+yRbPn1ma5SCPXORWtxfme+Ra5yI/J3ZFtz0dj1mYkIT6dHpD15YxqOddg9gX
+/eBYGdYrYE1A8lJLY5Y0KUXCU7C0/FeZ2gjf+cDQ1xdhXdOlwXmD8H3PBIY9
+goVOK5lThhi/377YGusrApXpxQYsUbYZ1wfDZF3frwSu/yCLuQmLqta8jyM4
+l+JrQychv7hyfOBUmCj/nHgAJvtv+lvBqhfvBR2w5sKhzDmwKJpMHkX7tcrb
+/CB8fKzvOxdY/CBqFgfrTyk66OpJ+/VgYkgWLO0JXLucOvROpC/yGTlqlwlg
+ha33YHPkVxp71kyj5y9laWAFfMW1bLEJLOLG8YJRr6Yo/PY/2F938sLKHli3
+ntM2E1YV1vT7fIV5n20Pn0E94kMul3+DtQaqcDO4Pot7QgLLHasvRKA/vHOX
+IpfAJFddddcG5+qz/vYDrCffETtrPix28rGYBscaP+y7NBrjecHRK5BHfiBg
+FwuLjR0zvZFfJyDObaPwXDMw3xH1CZN2Bv4Ns2UFa3oGGCJd7m4QA4scdDsi
+/2OIttBbEkrnm21bafCZIUE5qr5dMHHQaBV6higWTBvIpvOdK4P/+sAQj5rI
+N510fLfv+MZevH902CBX7C9/3Bce9I4hwh86j6XDmrGWj4Pe4v1au+39NN+p
+TFlzD/YPSx+9HvXwF9bOL4G1/LpxSmpJ9CEO5nu8a4s3Qj/4bGNPIRz7sEDt
+BhN/VXsh1g8q4DRsoA72q+jF/ppQ1iGQ2vBJ9Rrk00yo4fpQS98wNX0MkWew
+JnxYZX4iy+kjQ6zSKic3Yj/R2npe3CeG6G7dbA+BWdOAzRLUr/td8LobeUWG
+Fqlu/QxJFNwYJYLZ+dLoNFhb8GRkJern29mUJsK3jLrtJsHi8GwxB54Yvjr/
+oDXeHx6WYIn10sZkz9VbYVzWuagE+8tNkpVbYXnq+JNfkG92+9ydXyzhLLVf
+z3uG8NelPDwJa45ne55Fvdkin56fYTZxs48L+sXheCW7weSyXVJkN0NWL1k3
+zBlWuQ6Zc0SLvKaaVZ50PGN/QP8zhpAsa3UMLH6b2lfSyhDWpux+MXXqVUVZ
+E1w3EGCGPKS1NmrhXYbwTFPuhlL7HynvqMX39Jc/qaNuO9dcdYchqtkXB89A
+fWSHLNMJnq0v1O6ntnTqf1+N75VbkXCP2oyo1zSg3k0bZVx6XtQWUTH3UZ/7
+kS4H2q+utyWSR+i3L9fPkZ7PtEmeFhr00/aNsyWsmvDWVd+GevboXdqwnrjo
+2PXrz+Gh+kOHYRVzyssd9Yoidjd8S138YargJfohjGzORl6V9ljn2Vc4TyXC
+I9a0//owZ48uhogXRFzdQ/tlPl5qAcuTrp98OhL5qiTLPuJ9ftHRskWwKnG7
+I+nEeTu7LyZvBLxyo9fMDuTlvCydCotTSveeQT5RxdPbV4bDW3fu+6RmiJLf
+2LiROkTQUYp+3prc2vwNTFp6019cx361XIkRNb2kpURP/3+Hsf8DvRPe+Q==
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {1.3599813626326804, 8.076870967038232}, \
+{1, -1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000007276`, 17.000000000005457`}, {
+          14.500000000007276`, 10.500000000007276`}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.003845503734127, 15.345156917263754}, \
+{1, -1}], LineBox[CompressedData["
+1:eJwt2Hk8lGsbB/CJsmWZkC1lTXZDNU1JiFASKR1OKltO2ZoTMcm+nMaSo5LG
+UqFIjuRUMpyspxCVeEuWbKUsiSkSKt7f/X7e/uj+fD/3/dzPdV33Nc/zfKh4
+nHA8ykehUCSXUChkpAiR/9aYUf73z8CM8pTO5qTDI+aWB6ThUqOPm9YrmVFo
+MvWzq+A3ax5VvoBtRqYUZeCSLblzG5Rhe/F0PlhoR8+XMJidu/z1oL4ZJTne
+Z0k1mQ/0/XQfjmqO1Z+BGZHvgsLhIR29j2oqZhSmyIU4E1g7J1jVCm5qPpf+
+Tc+MUqCuZOUK29A/+5TAKdclnbzhzg/3hr1gxd6gHi+yfknzzGpYXX3zuDPM
+Kljp9UYX67dckLaEhTy5D/Ng5fRnOzXJ+tjthoGwQHRAuyCsHK4YZg/rf0nT
+eY/4Zrc7PWPAugrDH+tJvL/UPTSAdyXszb8Oy2WJWmyAk00WGxLgwlaJyh2w
+4+aRqBCY9uHokAecWbC9KIDslzPyPQGe76QUM+EXv/k2cOGA7b8wI0h9rOvv
+jMOUZhFnDrHa+2FV5FOdsJRO6ucm0RrrDBf3Ht47CVNLM64lwvdVX/prk3os
+7oh6AG9bptftD/NCb97rgsWVBeLKYZr/D90v8A9dAeoyVZzv8JDrAvxw4fjX
+fTBjSY7FT7jT8UZWLsyargibgBMly1kf4VRWnkU7bDX3Vt9ADfW6/pV5C166
+1bHQB7ZZd5l5Cu44EmqQDRdWSxky4GP9srH1sPOW5WLTyG/Dk66hN7Bb2F93
+/oL7/l2h+hGeNYv46k68lD/9E8yKn2mWh2Miy9a+h0vTLEU6dMwofGERG/8D
+18pTfs2APxys4FTAtAo9cW9YdcuJsEwSj7iI2Da4aMOwHQtmt7zmqsJyr22u
+OsG8dff7pWGGbvbSjXCOt/5d4i8f4hfl4NS91DoVOEZYpZOfxJ/yO58xXLlv
+19lvqAftUnfvYdjN4NLVr7DmtdFtSbDrym8bF0m9Bq7droKNQhb7pHF95w5j
+3yk4lG14lU5cZntBC/lpNDwb8yReTGYcgkuFxMuyYGrHXGoSbHUr6SSpl3Jk
+guhduNrUlKaubkYx85RnPYe/zFnfYsLcDHWZfrgkjeleA5dmKd57C4+t3Fov
+thbz4qfudcK8Ao3NLvCx3dUKdbBzKdfpGhyVeCYpm/we9oh+6CW+9MDUj6y3
+C6FKaSBPvsJ5Q9LPTnrHTWBu2arpSeQTzNfL5wrL9cdUF8K0ovjTATC1+q3m
+EThzteC3ILL+5eJqGZjpQDdkwkzPHTEvtHHOt8+5u8M5D76tOA/rFnXTd5H7
+WW01/xXmC0it04U1lf2V9GGv4fyDy2FWpICpOEy/LH9uBPEq/219/bsW+vGI
+60QDnFN76P4MbDT1Q/gWLKeQt2UR5qnPbDsP826pu0vj+tTS+RvRMKvbs2YD
+3DCxZPoM7MBfd/wwHNpqxCTzDNpnwT/hLRdley6QejK8eP/C40qNPqVk/SoP
+63k48YBvYxcspBiobIB8OzLMJcQR74hFcg6pR47K8IAtqVczUykBTtM57Xue
+5LOq3uoWvDD3NPYN3Enfp1cNe483VmmvQ37cSP8GmJ53h30aFlofvbEOvmu4
+zq4Brq3l31tC1leEJolr4hxuJuikwGZdHbP28IBOTIs7qb+GTCYb5qywa9Am
+9x8a634Au4mW631E/OljTjldcFRbY0g+rFh0wYkHy/3nh7srLG05+GUeVtYy
+b5Mk+Qb1/5yDKRvkS1tQ38KLfrETcKH/uacJcHCY2/JuEg/Xo9we3u+Z/0c1
+3KSmVKAEB2z8g3GVxHNks8t3MgoZZ58h++3OERzCuDA4Yu2C0ex+ggPZp7j8
+t+ebyf5Dehv6MGpUGOQqYWR+eyQ1iXHm59MpUYy8xcfc5dh/uksjjx+mRkt5
+GsHbqI0Ky+DSf070usE/WGv2SMLH+HddTiP9E514XQdOfVRe3wzH9WRNO8DO
+isanKMh3zYtXKdGwjVDnEyNYeUW78UOyvm2U7wjpDy8f+0VSb3W9ohi4hGLx
+jw32adJi386ChbLaNNLhYzzTkEI4J6JJ5D1MXYikEIta5T8n+/K0DvZmkH68
+KDwcpk3ePxXmERh9noRO1WIc8JpdcMK4cEW3+wdGjoJrqCrGedvzA/o410L+
+qmyyb0rnnzVOMFVn48NcWHoi8C4T5k60RrnABzgjkZFwqnfYYwl4Dd+lsBji
+uNvBjeScPm49Gwpz5PWZsfDumAsLx+BSNe5BK/gtn+Hf9vBA7avzpI77u840
+0UifOYYsjKIvmyNc7oiTvp+NEHkOq+Z9/kr6zC3bOqkGLn3DXd8Cj3QPc6vh
+A33rRktgM3aeTgvp+/uRHqQOtHt5A+/g3b687GS4drxlhyDulxh80CARZk9I
+714PK6yu23SRrHdJjzxKzrXNcA+pKytzg3oWPE95E/4EntVPd2qDS+6etZwh
+8y94msuQf4ntHxw9xOvAVm1dDz+MbJv2h5tE2GW/womGT33KSD3dqDdCYNra
+Du4SPBe50vqv2XDlSJGXA8wJCpY+Bze3/9J5lTzXE35yY+EP0cFRY/BsV0Ot
+H8zeuWuMhvckq2OqgfRJh67bwAk4Z+j2ghzs7OkRlw8zp9es7Ue8d1d/9noB
+O79S9L8Ce/dFpUzCqbqnjh6AHSROp/PhO2qkSqCH/A40B6k5wrBcxTLuv6hf
+Suvfvy6DmY9HB8PhsCVTczO4fkQgTXYbXFyctG4Apt1htAmQ89AenKwn899i
+1LrxXMrzlC7Khd3SLW9WwCkPCt5EwIzMp94F8C6lGaVDsMPlmrYcOCZ8dHEb
+yU9osbwQ1lAz6NMg+QX02FbBV6nHO2Rg5dQQnV7YpyQpnwpTd04yyf0zY1Mu
+rYTNDsU30eESftcAcj1336skX7jSp9TPglxf1TKQCzuccDT1gzmy37s7SL/E
+N4jkwJTWxiukXyzb9wb2ku+SsZ5wQzhtW2exKuqhaXVQ2ZE8Ny6/+dMfZvv6
+pv8GH869ffcfmDH/NJBJnj+zGfEi+M5t2hrR7wtnag4yf4HlLG5cIc+pxCr+
+qWsw85yV5BbYq1yiepB8RztWbSXPZarxzuNiNNRzULD4NeKrcQttUYdzci/6
+ceDgetlTdJg3asNzhKtokXLbYebHr5+F4WXvQkusYcrUUada1GvtRFow8YBm
+5rLTMD3MYNocTr1Z0k6HdSdiRzbBsxHzDj/wXnpg27pTG2ZXjFW2wAOHpBgK
+sGbUbEcBvFOENykEC/0+9jYFDvA+xJpE/Jpe++LjYA/pvc9ayXf+t2+Pz5L3
+7DGmYxnMuxkoxoFnZZ5tyyP1KFbRvU/em75TJznE/bO/dcN04+8eGbANf0Wq
+EOIT+CtpWQE8UhsuvxVWX81pqib14ibTT8KhX12S38GMaL6Fm7CBmHu7MOIr
+rBtIIP1Y8qqQpwG7uU/KC6I+Tx0j7WxI/A+G1uvA7aZ17/xgxnXXWks4g8th
+XyTr+2zVSH3VvqvMVcIs27Y9xOxXWqODpB47ElrJ+g4XF0lBQ/Qbp71Ni/jI
+agstuDO1UYkPlvTL8rOGR1r55FoRz+1c6h03uEko+8oF+K9pYa8gMj8ny2cP
+By5dWBsD81rtxgTgx9zJlwlkv7kIgyrURzvs3eUkOKpfpDoIjtaU6TkLUx5Z
+BNLg+vsitpGwpt709y/4zuMrLnx6Ei6kKJZVwyL1jSc9yXycY+olWGow73dH
+cn2LxE8W7B76mGpO1jd/eH0cFr4km02DnccD3Y7BZTvL96vCA7dO0YNg50sO
+HrLEKoaHk+FnV64+psJyHpO2d+DO8Xu7JWCGndhMNxx//EKCFEw1aRkXRbzM
+oaiW1WT9/obg7XC4vN8qfZgz+ryUBSckhRtbkvWyhXeKYWvdT7eOwOzFtXk9
+sOuKTwUk3xezq77woV7TW3xMrsOssxkeynCQ/dY9T2BanLS2EXyq1PwKj8zv
+3yO4CT748Hm/rBH68uGivT45j7DGFhPYOe/arCyxyj0Nd7izajRtGverGZJ7
+GQUPqCrtfQynMSLeZsHcdPuhJNh7fUD63zBn8+6wXbCZsnBgHXxMTf8GP+xG
+5Zq2wKyZTI1K1OPRkzqRVrJeVe0T+U43+Zmn+Yzs77GpTxv25hjSGmCmq8U/
+Y/jOf3aOO1UJy4WcptyDNV+7hhTDhZpNjfFwk8bW9ySezg+2pV6wtvmLyETY
+LcK1xQFuUKZfPE3yWy6Vugtmfljq7QOPmHa/2guL5h/VPgw7nLLpOEosqcBz
+glMn9ehk/6ObVnIcyf7X/VeWwI0T9Ob9MDV2WL0P9lqa98mV5OcVVCeJ+Kfi
+BdR9iY9zJXfCIY6yNpEk3yZP3QjSj2ImkxyY4nuIRvpFoeFkQDlZv2DN7IIZ
+NVJvu8j5nO9Knocf25gyFuEcg8vnqain+EkXE4316Aex0uUKsFaUTJEd7Pxx
+XEEGTl/ibxQEdwZ/OrOU1P9BTRqHzA8bJ73HfvuHzhVWwIyXkubkPEQNF3w7
+YLkmAY042C4qX2ICZlnIme8gvyfyd5AN//97iLrZfwF22yVu
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.246230799468776, 14.874866310565288}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJwdlAs0lGkYx79hxp2WqFhKS0p2SMbmkvXKJU1FozK10s6gclQutUesar46
+JZeSUHKfqNYlVMqti1mxbZKEOqodjZI75RabxT5Pc87Md37n+b/P7f9+s9Qv
+xGuPHEVRIfDFJ82AH4pNqG8fNUI/KJoOcQWW6TaP1gH7+picTQaWJN4x9VAn
+lH562Wg36itODSapE7q2LuyzvTno4zpzEiC+VuVuVQKwYEhLzQni957eu/oW
+mPpRIChRI9RLY2W/JRaEEkfdHO1QJXRgM8+CDywJ9qrpUCH08IEBxglgoiW+
+eV+Z0JqOltczgA3nUqpilQglHJt+cR1YFmD4gq9I6DgLTdM8PL9OKrVRIHT/
+u/VWScC0fEOuA4vQ6d99dQkHFmyPefAbk1B5sRY+XphPnFPfJ0+oirr8IdNv
+cZJ+FThl+GwVhfnN7fvygdlew2feYP8moV8mgAUrLo9VA5MAvT+imYS+n5Rn
+eQ3nLd/YzIN6DqMmsgxgSUPnIy70o+kxIRUDiz1F8/2g31fF7ey7eD6p7Vg0
+zFO1Ra6nHdl+avIazKs9J7ZShfrUSVltCeyje/cdXy7uo5J3NFGVUHG2O/uS
+sb+ut3oOsE/dZdPVXTjPodr6AuBE98Q8/VXAx1qjnqOfUxFdbsAyxnJREfCC
+nXo/hwBT4RtFjsATF7MHkpEfeosuqBIyk1MsKAOmW4Iii1SIZGujg7ARuc6h
+Pl2ZUAZ2idodwALyjhsC/Z+f5Wj1AkuaNBPsFAllbOEZ2I/5JgbEGjB/61Bl
++kfUl35Wn4H9T7vpZLxBvQKvQYdJSOY+bnUDxllxZK88kWT0OqdUfDuvd3JK
+jhDjNM5kLjKv/EaLHKHsjdseJwATns3ZL3KE9lR37jqK/TGVREI4b2qwTRHn
+E0fGZ6uBP5m248V7sV6Mk+kQ8CH2BmoPntc1WjHBgj1RPTVBWD9+t6u2IiEH
+YthrIzDfaMxjGyVCz/x+YvM5jF+2yN0C/hSPF/ILMF4YFM9VIRTrhvXWp5j/
+30esheCPt5GzdATrux3xKIB9ynW93fS9JdQxr146BffdaeZIoyswreG4YRb0
+DTLr8BBgQbhwsBr4iYN62CXU66/MslQlEqs1a9WrkA39lgbBfSizsu14CSz7
+SX46BPy41p7WPAAsWWZdwYN+d5hl231F/eujGoaKRLIrTthNrYZ+5l34MMgi
+xMRYRweZHnFf1cAkEmGbVtSUJfZrNvI33G86gGWN+QwX2hrC/iW9oc/KX2O9
+3XlN/uBHtOfKu/XY/xHH/doQz449rnoL9blSogF+9Go452ShfjGXwwO/+Lff
+rTsHTLqH69tBH1OWn3YC49oz3pnyhDY6Uzobhf2fniw+D/dj4dO+kGOon1d4
+Ow/80e0ePh6N/MTF+7ECoULN1rinYr38orRemK8zwT+sFDnFNncC7mPL53zz
+Jsw/7t0oVSaSEmc1z1FgSjOgKEmFkMrXZR56MD9hXOpRAj/GhZxgF2CJaeig
+DbA7+/Cz4NV4H319l4B/x8dEManAlNh/wwPwu/Gfgrb7yB+leovAj8Pj8/Sl
+qM9a6WKrTIhWEnPBJLAs3reEDf3wtza+UbaCfXELR5nQ743+mBFtYDIVGdQM
+fnAmI/mLgAU6qca5MD+7xZjGuFgn4nk8+NF/WuihgvE4fkEW7L/Tr1JhGvIb
+xgRHf2QQemzze/terF+/5b+DDCLJbE0tb8V5EsxrHBjgV+8Pv9TgvIF/2vEZ
+hDJ5vkOxGP23n3+wEuJmQ1WibJxHbRfLB/zJVDnMvYj3ZbF+PQfqu+V2ZCah
+vjTbwAben1bPT+txH7QslNoO/c+ZXSnKw/Nf3F9Fgj+bRFa3KnD+wLhzKfB/
+p2lwqrEF9b8uv5msRIiSUQRzHOMf2KH74P4W7Rxh6OE+CqTpcrDP2tggY2dg
+mUWhvw/se/PATPpBnH/5xNf9wE5XttGpwBQnrGc18F+cF5MPUe/6TL8M3k+X
+T1bc95ivcGPTGLwPs3PwwTg+Fcn/B32cLQ==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.04629457140433, 1.614040285447666}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwt1n04lOkeB/DntITlYvIWhYQJa0ajRByrx9shsY2SiIPEQaeikzphGlbe
+s5ntsirEbN6mjW1qy0ursxMrytsQ0clqLuqE2po08tbhfO+9zh8812ee+75/
+39/veua5ZmNUwp6YVRRFCfBHrhSD/NOmKVVyNaMpmch1YXANTYnu+QbshqWh
+afs74YLY9mvfw8KFYukzOPMryU8fiJl7wrWw/9eyNmN3c5oyze9yPQhH+53q
+zIMT2S0avXAuX/q+A5Zrn3zL1aGpeWWP0EWY++PcyATs0toWt8GCpgS7CybS
+dGlK/B+GowPMuRZQa6xHU0oGc7WuxO6l1Xdgbo/8kBMsfl58g9anqclVav2W
+sLylYmcTLFpJW1GHTQvGldaupSkjkes3k6gnSUx9FAxzxiq/lpC82pRuKixa
+EJpfhGU34zTPwJG/xHUnwNRnp6ojYOku82Z/kpf+eIoJW1VvGtsKi10v/ziA
+ep18k39ZkPNXe3cfgVle+73NYOkZveBF5BX0qDezYUbHXE4GXJCx6YI3qV+m
+MqoBK/Ki80k9gW1XgxD9C62ci6vgSE3tOU+Yw/aYfUHqq7y9tIJ5bU8+7WtL
+5jU5HTUEh5WMtpyBhcvLlQ9hluWoiZT0L3mgPAb7FbutM2Pi/u6sk9o4T14R
+Fp4ISzhWzBg4/cRYTyOcqEVXDRA/fXdtFhbfKdIKQj6fUlaT5SZ8fvB+4BSc
+ZHfqoB8s5dtlZ6Ffnw8zHVFwYtQHZ3PMxyJK7fFhcn/71tm78Av1W5wYWFg3
+mOdlQFPB7pp+e4lbL5xtgTNzHjg5woL6Xbx1hpjnDF2qA8vO18SGwmEHXFNe
+I4+0Tb2LB8teDJm0wulZ08/PwC4s3fEScv/IP8ojYA365sppWF7NElvA88Z/
+jY8g6wfYu/pRz0dHo5xL+p8enTsMJ1mezPkK5sac8JxH3jCLiogDZL9o/+F0
+uOr6VEUSTF11mP4c5s3zFstgU6GbRQX6NzqSGj4AMxJsZjxgQd7Pq0l+xlis
+zwrmFcfbcSGM9DPaPTEEd+YbMOtg2lNNtYs8zxx54TJZn8/bI4ONInR5XEt8
+Xiir1MN5RdXVl8thTvvixnh4xCyu5yUcafxlwDBcsNASam6F/f0fPEORz8Dm
+uOY+WPgseuLtWjLvoL3JMGWwxfkc+mWw/xtQCEuZx8asMJ/cor/NFRPf2bJX
+Ahu5qMwJiP3Zx33X4fs8on2fD0fezn8ogQuCi45FkfPLp5aN12NO9bFVrrA8
+PkcrHLbfVHtMH5Yp1xTwYZe8bP3fSV4Ju4V4++S4oh2Whty9GgFbOC15VMF0
+Su6sOfzGrn8mH5Y/Up7tQ703zSU8Hum/VXVLPHxaN+lBCtlvPEp/RF5JPks5
+hzjaK5wPK0ov1n0Pm/YkqKvBTYd3xj+CKSfzmivo3y9ej0mRfGXjqzxg6t4a
+fTdipxOaK5iX5Ax3OJ/0o3iV+gT2rF3I+zecaFFxtht2+frTJ5Y11nc0NIzD
+cdKtT/nE4xFTBjjPiC7p64YFql9uOwqPXtDq0PkC+TnXdUbhN+/sVQJg+a+5
+5yORz+qBZngGLM4ezlTAYuNDrjVwuunZFQH6ZT3fPPQzLLNu/NYW8xHqM/Ta
+YPp24S/tsGf3TEMLzNC4FLPbCO/ztes4PxBXpK9vh31O/37lGzixsLFgozHe
+lyGNonhY8t361kiY9Wk83I3Ue9cbnA77XWr83ACOXLSvTIOjQ54qvUc/9L09
+tyJgWkc5uw9mtDO8zWHBUlZKA7k/bl3Xi3rBFd0hItI/fzAlFs79Yp9SLSz3
+OuCvQN5o6va1n2DOza5DPFhht7mpF+YG3duhAkuvdzyZI/O0SHYpQ/9ShdI0
+m/TrsMPaHQ7uczNPgKUSvdfL5Pv+tsawGRae32EzDPutTn2taoP8mff1e2F7
+g08xobBk5MSWlzBLt9SuHhY4rngZ4bxJZQdqCTatnww/Drf8qf+uGwvrdTNe
+y8jzNhhYx4epyZ1vYkj+zM9qb8DyDk2nRThXUWr2GBaXGT4pRr91YecCJmFa
+1BZoj/lY7FdhvSPrHWjnLlhs989Ecp/zZ43YQBOs32d5eQiOLD+a/BCWyYc6
+msh5EjGTuQHPW7K9qIi4MTLtEExf/Oh7hOT5IXtzBhzcenTJHeb+tuq7dJia
+WFpjBMsu0z0RcGD1QPsi+uOWdVeZkfWFfGrchryPrib2oJ5wsnLbICw38B2I
+gcvSDd0eE/Pn42eQl8fb5i8j8/GYTUmBFR43Wsm8hInWOcpwWdqsOxP10rP9
+XpWgf93f/lIfCjN6fGLc4Pk2b9srJI/avrFlzKvF2TXkFSz9+OT9MDzYcnGn
+Ixv7HY/f74M1FFOP8mCh2q32V3BBkFfWM+L4u80bcB7j2yQba1vML2iu/CTc
+eUskSoC555pHXsLidsNddbAslx3+d+SryvKfGoX/+L1j8v/rZvp/iCs6Xg==
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.1974629540243, 12.294740175065709}, \
+{1, -1}], LineBox[CompressedData["
+1:eJwV1AtUU3UcB/AbI0EZMd4okMMItnAwjoWTwCYCEfFSTB4J0RJd1kGcr2FH
+JFDP1JQpoOMhrCAeKTRFEljiOrOBrzYwaB5TlsgOosHFI7RDjfX9cw7ndz7n
+3vv7f/+/+78LEO3cmG9HUVQ2/kmlaBv+2EKKReAnpIS7B0ovwarDrQVGXyHF
+XBcjzYPz9rKL9LDfW9y1LJhd97jBDDs6ziTLluP5Z9eb/fG8Jl5/buF19CkP
+UEhgmdSqlcEsBs/0Fyw9FsoNgWnthuJt/kJKXtfw2wQqv+F04jyqShsco0VV
+xmsTz+K+zJErpb0wdSncfRXWUYznUndhoTaHdxPWrGdd/ofcX9t2nYNc9FDl
+exF4TrzMOiKCOe0D0WWwqvB4pBwu2ddYZITzetwtHbBpByslDH0M/ryJazD1
+4ZStBC4RRPT9DMt/j/bth4XjxcyLsOXbvXf+hS3BuVEnYSOj0scZVXyk9QBZ
+z2LSJ7uQPrMV1aGoEwKziIFq6Eu/9xTP8Q/20YOocrPOW4Iq3bgwRdaTd40U
+W5FLyQlb6gVTjdKPK2Aqo5pXhWqwDe+MRDXxt/gxUPmeneUW7FsR7a7NJ/Mp
+6U0dIvPkK2u1mDMd66S7BRc2HhS9AauYRZ+MwbKv9/ScwHszcPW3fdGHc1dz
+2w6mbcF2Eljq1GA5uQw5yvxyHsNG+zFZOGyYj727neRva9hNL8X1gZTl/8FK
+rdc7d+DM539zkrBPfgG39wZsuh/zVQ05J6fzPzXCYp4oaRxW3Fe62qOfdLrC
+jRuAeV00b11P+g+3fC+CaU7+uBzmjLTtKIfFAmaWGaZmXuxvh2V6nXc08mpS
+G39Uw5z4pu2nYMshb30PbHp37v49WG5XJmmFpfrsJgdyLlOLmcdgSjdGB8IK
+Z+tgDlk/elEAB56Q/1JL8mRu6rK9BltCXvZNI+9A1YtR8h2IS2yPOsn+ZlY2
+HyX+iK8uIu+785l6GXHC0Hws3Gq/c0qBvD5/npv3Id9VgVvkIpi9zTNqBvNi
+n0k4IsY82G+7pd6BBVWTKTof5OubC9fBpsm4TUEwa9d4tAl2jNStKvdGjqB0
+B3LOLC0Jrg6w4NfFNwQkX5LLugovrP+grWgXOc/OtHU1TDsFVV+BlVl9oRZP
+XKfWMch3Xrjgu3YYdtx8a1Uy9ptmeLhIDyta0iS1ZF4r3UfG4LTA5lfNcPea
+ilIW+rFjC7ZzV2D99AFFGmw0T+4RwcaLWYp6OOFAfs0puJWxRfgSLjz6YO4C
+XHjh6Xgi8irffGVfD0yrJYZaWHwhfPQncr+u/6zJm5yLQ8YmmDP9x3537L87
+Sv3wMJzmkfFDGEwPmkOyYNXlhfpwOG066rtAmB83HO4NG61f1kwir/Hzof5R
+9PNxW9PbAQvj4jK+gbs/mNXsgRVMWfZymF7SlC6ES8qvttchb57q4C0PmDX1
+ftZimK+ut5vFvGSqzKQvMA9BZm7EGPmen59YctMD+Z9IHpnI+e4Y3MCFNTz5
++Snyvicdr51xR7VWr2ain3ysTOwECyafVApgjcvW8wo3zCsjc3AXOe9un8nW
+wsKrDZu7yHXye+yK/OT3eIXwf6LyDKI=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {6.411618926975065, 7.21843785395013}, \
+{1, 1}], LineBox[{{14.5, 10.500000000002307`}, {14.5, 3.499999999998608}}], 
+        PolygonBox[{{14.5, 6.4}, {14.1, 7.6}, {14.9, 7.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.4452, 7.}, {-1, 0}], 
+        LineBox[{{14.500000000007276`, 10.500000000003638`}, {
+         8.500000000005457, 7.}}], 
+        PolygonBox[{{12.01826734053906, 9.052322615314452}, {
+         10.780184249251306`, 8.793188945044921}, {11.183281069670574`, 
+         8.102165824326175}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.323799910437668, 9.484057296392571}, \
+{1, -1}], 
+        LineBox[{{14.5, 3.499999999996362}, {8.500000000001819, 
+         6.999999999996362}}], 
+        PolygonBox[{{10.98173265946094, 5.552322615314452}, {
+         12.219815750748694`, 5.293188945044921}, {11.816718930329426`, 
+         4.602165824326175}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.323799910437668, 4.515942703607428}, \
+{1, 1}], 
+        {PointSize[0.04], PointBox[{7.5, 15.5}], PointBox[{4.5, 9.}], 
+         PointBox[{14.5, 10.5}], PointBox[{14.5, 3.5}], PointBox[{8.5, 7.}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T9", " ", "P2", " ", "N18"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdfei/fggjhihjij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdfei/fggjhihjij.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {44, 0}, {0, 0}, {22, 22}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["g",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {21.75, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["g",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {26.25, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["\[RightArrow]",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {30.75, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["H",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {35.25, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["g",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {39.75, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["g",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {44.25, 69.96}, {0, 0}]},
+  AspectRatio->1.0999999999999999`,
+  ImageSize->{288, 288},
+  PlotRange->{{0, 66}, {0, 72.6}}]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.77582152863533*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"306cbd09-abac-41ee-9f6d-4b5ec83cf29c"],
+
+Cell[BoxData[
+ GraphicsBox[{InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwl2HlcjGsbB/BHG6JMReZENSlpc1qElGqoiLbRLi2jQiRGhYRMTjQSRvKW
+QYaOSuEkqUlxUlosaRzJSDItElFRjorq/d3vO3/U59vMc1/LfT/XM590Qnd6
+bpKhKEptEkWR35Qi+WHMpIYn8DJgUtIPPtxyIybVU3dY7Q0czWoz2wVPeT9R
+/gBWjDwdqAtzdu7wvAP/47Zib5Mhk+IerzhXAl/W052UDNPUR+7UwF7q9Vtt
+4WHHW0YdsEDv1eAIfmeanZUq4u8ax8SC+yRuiY6FHbxs27RfqbDkYsX4PviI
+7ojDZpglt6m6HBZdTWa4wOxdr0sp5BEmZpbZwHFz2vucYIuOxBtLYeG1FXE8
+eMDzHd0O9vd7dbgG3pqbeNEN5vU7HByFg4UyseFwD7ds0Xz04YS3KpdL1nNL
+/ugA1/CGIi6R+H8xo3xgtvbdYpKv2D1dfz1sOTTaRfpkYLlI0wPOMa0+M0Ti
+5+8dXgrnNoefUkDelaONP2bCTMfewRlwfYtj1wfEHzk1dQWxwcbqn0Xw7ewj
+kbJwXrrGqzj4bLfPx16Sz5IWl+XwnoddpfUwcynHhdS/SdE8UADTfGUe1OG6
+7mWPWjfCdEP+zrNwnPmHOww4L6v7eSTp7/3F9ZIF6O+4ZMwVnrg/2SEVFh1T
+SrWG8w+MpdjCzLI9RxbDCcfttPr1kf8alh/Zn4qSlL3ZMD/F+Jk3qUMr+msg
+LIxxpMfBY/0yBZowO1yuMQfeaWC088N85KPsOPkdbB/7/lI57FxyaosW8i8v
+Wap/HpYuj3QIhau2CrYchfO81t/NhRvnbl5xkFx/1/Z1L7xSboviIbh+ekaF
+Mfo571mKIAUWKsoWhcOzLd39s2AGl+eXDhfNcncRwezvNqUi2GaX3qJmmM8f
+DxLDkV3Jl7+T66M9trfAxrcT1Gcif6v07cJm+NPuYE1TWFzstr4Gbvdy3uoI
+5z3xTcuF3e+96l8Hm70cfJVA1ot8RvmS/ihcWewGFzgXrPcg/chZojULrpq2
+xtIW5l7Y4/Ea9cxsavHQhuOMnYsuwOLlbYMkn7iqfivSj6t+0s8P4IhL7ypM
+YLkM6z+SYOak3Lfj6Oe+Iovt9jBNxO1ogb3qDUuG9PD5Qx2XquAb+ysLc2CW
+HjO0lJyHT3L/+MEi9ZG2Mrirrf2cIszjaJs8htuU5ux+oIt+9+39+wNMT1hw
+OQFmc+7HqiC+0zxzVUe4ckm3gNxvu2u2BKrBcV3lkw+TuXH55uUv83C/u8ub
+P4Tveu5LegEz1/9cM5XMmSgOowbm5deFucM7Wi2mVsH1806c4sN/D63weAT7
+MzhUAxz9pC3lNcyoVjOZZIJ8rAM+D8B0b7UeI3iJgsY6JcSXUvP+cIZDtEIC
+TWCu4IbEHy4+dCPNheT/FyN4A/xSJnNPBExba2TIgreuvnKVC7OSqvqWwifU
+Pg2ehiPW/hhVg9Uz/Y4I4EI/qU438llYZNaZCYskEfmFsEBmllIqWV/YtWgP
+3Fh3MSmG9GdVdsYy2IOj4eVB+qnWUTeGfvB+6k9lwHzDCzfIPMo6yhB1o57C
+GzUK6WTOHq5+/ydsVrNvVSTsJTkcHwhz2lLj3GDvgvCCGXCma4MhmQcnYzZJ
+K3WYFPVT3tcKLmhIyYyGmbrpgSvh766fXBfAEf+Z+Ws9PPRhyKudgX4/DvBJ
+gPWPe9degeOsTn2/Ab/UyNgcBTvvnejuhhOSH6SuhMWS1jp91NM6X6SuC5sF
+tb/fRubbAvPgGeR9JUEQ6cejvKuWk+G8I702Q/BWBc77qTDruotwEfqpnDBu
+qw4Lj+q2RcJlh+6eN4IHpC/PC2BNGdkJRxL/p0zfPdguKmheGMymNUQ1keu/
+N6YfJvF5c9a8hWNqFzULYakLw1UCHy5eEltO4r0u7KyB+Ssq9MUwX+JHz4U9
+DX0+tZLP+/kfPgjLlQpmS2HRpYVLXWCmccgeCUzRg2+pwolZTS41sOR02W0y
+D/6YrRCWAzN2swwFcI8tc8YBuHBrhiwbDl/nZrAa5q5n0sl80s3+iyL11+v4
+UOPo52eljOtHtXH+6lVGW+C4ovADA1q43rL1WTWs+PIr3RuOKE2+XwYnscOi
+SzQRX+8l5x68Y4KXPBeuH3j15RkcvaPd+PhcnI/0zItf4ED3s40KMHVg2J2O
++L/HDbqcmYNzFZnsRObRSruakkVwYf41txSYtT/R7pMG6h/Xa34KV34co4lg
+6k6vEqm/3vCh20WY2f9Ezg/u4+TJnYN7niY3ZMLTt99iXoPZTY8vkf0J7n6u
+9QQWZkcPT16Ic3o1sn8UzospLjGDh7TUN1oiPj+ywdINFvqKiqJhNld7QyDM
+rSn8VAhbOb+9HgSzRcdpn2Bpyy23dbCyc8Hm31Afw0iXsoKLHjtetoYHkh/M
+VYPjjy6hr4UliSmHu8h8oMd+dYSdaZaJN+HPWZorDeGe6g33Y+CA2gd6/2J9
+7nuxOrn/vw3VVRfAnHtBB3+iHxcWHPNzgVmepyXVcGi2Cf0V6uFfUG9Pg/3z
+e3U9YQOJtkwkLJrWHVD5G/aP721L5ptGpZGFPsz04KnZwZ5W44d4dMwBf+cY
+G7I/NSUOn2djfaVpN1fBJw3KI31h7smE2BBYouV04Yk69oOr05JE9ks5ccQD
+Zmv+CrkDpz498KN7FvpMG5Pvh6Vv1CzOwJxQs1BTsn+78919Yaq/qoLU+yte
+/aMZzJx3wrQM1gs6kzoPFrWU1P2CtWRVywzhyul9uTboJ08nZ8gBdjbLNoyB
+JV+ceqLgiP5HP4VwQMeJo9mw1fYy22rYzrfWWgpz9w6lS+DAtVO1tJEv3eTt
+cim8WZ5htkGdPC8uzmiBs3yOnD4FS22lybVwvtXn8lLYeaVdeQ5MvS8vaST1
+69x0OwDTZXWcmuBMh/jgNbD6tKxp1bCQfWUnDf59zpYCATwsX+1MzmNKuss/
+AbDB9JfNGbCiR6ydHDxFxUYxGHY2enwnk/TnTU6xIez7YstXDVJfVGjEGPpp
+ESuXcHIm6j4WF/AGztKoSfuhhvxnzl5Dvg/ER3lKA+CBR95bKmD+2m0B91Tx
+vqmTxwPyfAjfNK4LC7f9Gn0Bjya5njujAms2PRyE54Zp8WkqZF737dAm+Qoa
+rmfRcL90XzT3IefTe/U3Jjz8jSZOg5tKZQa/zcD7jauKXsKt3muL0uCBbCPZ
+Oahf1N1pvhGeYrnreQjZv55noYFwZeU988uwlL7PlAuzMxLZrfCBGuOCWpgR
+oNSh/DvW+TPCeCbisWawLy2BlcUjNu6wpH3T+DrYX2XS36k08n3vxFAIfKAz
+W/QYjnBvVWXDvy46LZJFPeLN/6Z4whZ7lPeZw+yQNhMreGbdybXrYOdMXpAq
+bJ0iTwuBaWtuKnQiH/EbZVl/2F//Avc6fMX+lbs1bNAxtmcXXPIzaL48nDep
+45ElbBbZWC9CfOn2oO0jZD9np/B8YYPKdSurYJOD0rAHqG84uXP8NGxguq23
+WBnOnS9Pnj/U1TtHTimRebXJ1QMW/jnXImA67puogDVMWPR7V57WNJy7Yru3
+dnBFz/ZP3VNxXYfAhTwvzFbPfVIxBXlzFi/dRPZjkUPitcnk/nHLOQ6zJ0yt
+7yigf5xeJfI8a/3XqbxbHvu9oyHsB1lfZ6uaAzysT1tC5plrmDu7QQ77dpxf
+R847v8I//yjMKrptWkX6M3ZVEiVHvncvOCCP/iXJNN07BEe4qLxwgHtSe5aX
+wvT6+enxcP2NG0lKWD9vmebeXFiSJw6OhyWtpjn1cMQmk1NDcOYfIS9aYfHj
+L3bRyFe6VLC6E67cU7rjI8yfptD7Bh5uOreNhfoM3s9aVQc/PXvJOgseKA/Y
+nwPzY5oVn8DDH/yt98PCVK2jYpg3f7RgNVmvIFs7H+aOJ6wn5y3d4vpqH5g9
+X3XGP6T+jf7HniPegKxX+Vm49faPUwyYI8tyI8+Hp2XFaquQL2fd/jQD+PPA
+7purUW/c0vnqY+gnbVW3wEQW9fG+y7bCko6z7LFJmE9f7yrXwZbfJjjVFPLJ
+Lg78m+z/SGeMyoQ9xfOxiSffF7jG58Nv/rKnCneFe70m50n1/lPOqD1lFvbR
+chT2l6iobhu2pwZ2Ozfpk3mUm6l57V979LMymDyvmPwjN5d9t6e44v0nz8Nx
+Tl+e6w7ZU/5TvzxsI/tZvfFI5CDWW2dlqIf6DZRu82gw3cPmUQScJ9/LVoZZ
+cyvKr8FTOMGpgbA/Zbayi3hezPs+mHcorWeWKc7F+izTEqwv3PHm8nLYucmy
+Xoj4jIlH73xhbuKUmPPIj9E58GcYTNM/uSzthz2V52rBD4V5ShzPXaiHfUW/
+3QuurFWZrD+CeqTWu62It15OvQRPmZJ3TwWmZnXWNsLid6U328l5qO3qLfjf
++79dy4fNtplNWghLTdcE74RZvc9MWFifs8HnlgXMfrmjWR3xB64FnP1Bnv8p
+RhlHka+VnWtvJexskDuch/oYscfZp+E8jX0Kx79ife1mj0gyv0YvRu3rs6dE
+hwavskg/Z8eHCj9ivyyDnqyEOUlzhm91IV7ahzPE3JH/bL7+DtebLFhMPs+U
+mZYY0WxPGcyUdSTrVWbI3Kl6Yk8Ny/HL0sjzhmUzFlRmT9XL/Bp/SExeqbb/
+///IQuZ/Af+ePk8=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.82330080216169, 15.930190164263845}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwl1AtMW1UYB/BDwY1HxjoQChOEMhM6XE2XgDJfPc4h4yFUxmubKYUI81FG
+EwJ0Gy6dDALZBgVxRfagVg0D0UGN2i28JY4hSosZdAisbCyjMKCAIEJh/o/e
+pLn55dzvfI9ze/kZOQmZHEJIJH7sTuxPcLlRYmN3L0oKE5aKKLPAv7YKbnWq
+flvqSgnhJe99kZlfr0tzocQ405A/9zQlgpyxzRhnSlTXp/a1w52ZCd3Pb6VE
+dtkzph4O/eKdoa1b4Oi6rEb4rCIi1uqE+NnjwluwfNq2ZnakROtlEdjh/hMh
+z97jYL/hmyNvIZ/fAdEGB7YZUs1fwj7vH7sU7YA8x0fm3b0pCfd7mH+TUKJY
+GUoqgvuny1KSYG5k1d112PBut8gP7uz5xD+XR8mr3mE8d7Y+1GZ6ACtjf4sW
+wCLpwOxBH0qes+oTs2Dt4ZJHV2CfQOtL3bB6Z8bkOFzTckYfivzql0seOPti
+X27d+R9gVZd83BdumrcuvIJ6tf2L41xYEPmtqR2mYwMuc4gv7Sp6Iwz9ytaf
+uqKHLcWZ4xeZvz96X8by6VeCR+HA7bnedtTX6x42uMnmU3E+ohTuaXFzXYON
+5/ICXGFjzkRDH4tXnekpQb+2PyaP5sCKuhsXHGFy5+q1KZb/Bd1gMebH3bVn
+IZzVp9t+3QN2ungk6T3Ub5s5++t3mL/5859LFGxed5QhUjh1TuN1e1NMiOAb
++y7YmJ46qraLCU3MPM2BRR8Xj0StiUnnEf69NU/kCTbv3rIqJqJYbeg2rPc+
+/rNjeFlMmndvnAhn7ws3oXFgCfERv9SeZOvleUkbC7DwqzIjrPJ3nsy2If6g
+Jp29b5aVWpoyJyaSiXR1Pau/wNPn1GPsVyhxDkB/xq5SQdwM6vPYX6CBZZ08
+88C0mAQaalRumI/sQE3AKixpu/R3Hiyq49//iT2fN8AbZPNTNlT+g/0s0jHD
+M5g/Xb3hq0M+kX74VDw7Dw3fMQr1qFtn5j9k5+9Isg+hXu3gUpMc1r62sF+6
+iOd7b2UksvjkPmUK+pNIvx4NgpUf7O0W/iUmqsvnVu8iH/1oLs4EK/iPqgph
+4s0rCMV8aKX8mDuscOiJj4VVT3KnPkU/XNE6fwesrqxw94BL9R3tpxGvFcqD
+yjEPUW1zUzXyWWKiirbBxuo3hcmopzn8pPwzzNMgT/PtQ/2qH7NbQ2DJYqNw
+eRb5cq91mHBenUG9h6xWMeFOLjmUw1yNNa7ioRj/347gDFjh8bqfywT6Wzts
+ioct/D2hy2bE/76vLIU5P43DNWJ/r53tSlilzDLp2vE8R3C7Bf7v0rX9/33x
+pP8CT+Wxpw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {1.9692031021678298, 4.320378284825192}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{19.99999999999727, 16.999999999996362`}, {7., 
+          11.499999999996362`}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.754949725219685, 15.745496856246135}, \
+{1, -1}], LineBox[CompressedData["
+1:eJwt1gs0lHkfB/DHTLm/uWwiShhF2Iz0jsva3ifeiuhlXWokl2jQIhLOMCXV
+1nHLLVrRa2ULq2RWuWyFWbVWUTuxnR1yGbdcs6jWaNn2+3/PO+c85zmf81z+
+39/3PPOcxzA42pPHoCgqExvZU8sf8TOjKRnZm9KU848lIe7mNMVmxMbqbaWp
+dU+M35TBjcOqTBPYwCxcZRHmt1XlGsIL/Q3GzhY0NfdaeVEZNm7I6siDnbvV
+FEZxv75c0Vw3rHj7+ld3YM4lR3WlT2nKY3pMIQqu3fCXDxtOjd8jMYKDBJcb
+nWGRcdzDbhOaimk6r+gJSy6xHp2HVw2OLrjBXGa1gg089Ya/aA+HP30XP7+F
+ptTt73vqwzkNyrn18EKTfv8S1g+KbP9XGtyWEzskJnkv+5dFwHc+uzVTDgt/
+5rwNgJMH3l09Q/zD6vgQeI1kzj8ALnWfP86H2fpbvffA/ITNNtfgWKpYwx6u
+DDR17YSdS+eTP4PZqblxq5Gv2arwoSus060kc4KlfAfNCFiWMNZB5plTuTtV
+CHON7LpF8LYNSX2kL3pGSXcRNjUKbF6PeRQdTNRY6KfdUffnMNLf48DGXTDj
+gUb9fbh9k9aAByx2nWeobcP8r2rM3eGJf/trHIFT83WcHGB7h05eNezxRqdV
+B+a6nZXMwdxvfOxeY70dvz94ZGqJvqZ4WhWw822+mRfcrsAVBMCHetJfHodl
+IVW66rDInccTwDE3/RZbMH+KfNbBRFjHwsQyFhaGRH08Bpuu39dkBssOj8S6
+w+wtjvSbzTS173xLhAXxsd7HD+H0vFebVsEiv8yrxXCSxECzF/kq03+0yIDt
+P5gMfg+zbUcWiW3PBStmw6bKX/L/C8eVd4nitpG+vGyaYVXRzmYeuT40a2Aa
+nvXO1DhK5q0182Mhj/3Gi4on4MZBd+Uj8MxKm+4lWOfrE7OlMOPA0HADLJmq
+nRyAn/uZGJO+CiWsD+sw/5onoj5r5OXah8XthjPN5UNSSH8VoXZh8E5WfGYX
+XPlebjQRvqPCOP4JG3ldN84I4NxnX/c6wDJX1aZIOFI9oj0EnmNqNrvBdqNR
+hRfJ8bWJbhvhth7x+LewWFRUIUWehltuN+6T808u/XIVniwX6z2FSxs8/Nzg
+JDOhfBfsLK9PL2P+g4fuZxC3V5UVV8NFwdTOTpg6XxN/FE7dG7FWBHMLbl0w
+hu9Jr/nVkPM/3bE8Z0xTnZrTZcVwSv0J70742nDGzf/lq+iwbIQfn6OtYmHb
+HWt21sF94/MqQSTP4QDrR7Dm96KeL+CJg9mdUlj1NHO1C+zBKBpSwXqKgrzv
+9pA8p0wv7IJbn2d95QqnDoRbJsNXZvMmD5J5f7833wQPbJ9qioCFoXpCMt96
+sVYSydOoftafg/lHwtKsKkhff05ywuCMhG2lZF7pbxc/ZMChnpMO7+GgjCDt
+MlikpuGxyQrzDo53VcCrS3JVXWCJgVMw+b8X2jlXxcA5quPvz8Dlhjop+TBt
+/6LeC67m2224CweVZ9ath5c3Bfh2wOqfL3X8iny1LQnRfXChXu7JVFjma/Rx
+DBbWZ+XZkvxqhtoTVuT90uc4iX5OZiVZj8CKWhpXSuBABR5HAstkr30Pw4wF
+b7922ENQIN0MJyW+Na4jXmUvXmFhnl+Ye0thcaL28hhcwBBcyoCptGGXQZiq
+5bTyYTbr+o1JuEWuO+8YXKndv8LE/Ry36/MDYZGvjr8FrFGSU+oH6xhdXw6E
+77UyBwNIX5kGscWwHvNmCble1pYn7YWL437tE5D11J+zdTHfi6suWwtIX0L/
+/T6wkeep2/fgCa3dAaSPiap31j2wwVFaTgi/HXrmJLcdz+P4PsETOPpupIU5
+LNx+RdoFM0PNWT5waVYluwPmn8o7fBo27ZHn1ZLnV6NkSxmconn5RBpMM7Pl
+WmHx50UcT/jQ3r66V/DEe3+eGqw9yQidhRVVb3MfI//Th5bFS7CU99NIHOwZ
+reS2AgephuiSvp1abfrJ8coJVa0e9FecX6o3B6e6mdflw9wzNewh2ECLjvSD
+bSnv3Odk/ZcXlNjwN9E1Ez/A6vUvc9bCBrNVH2/AOdMWG5Xh1pTeslySryVF
+rA572ZinnoUbM5+9MIGn1vb/MwGm9E/77ocPRHJmYuDw/0R3JMMjWZzLsbAs
+0LS/EY7y9KoWkD5e//HTIpwUxPTIhJ05XyTYYB5u8Tkjsn7hRbr7JJz253Aw
+6YsbEbdQCbfYGcyPwZKwbK9ueFdVfuA/rJG/jfcJeT/Y9g8o2MCV++l1K7BP
+jDzrCCycatiyBM+IkkfS4JjdoQqj8IEb6dk1sJQdntAMGxYkF4lhWUGyUTr8
+h0P0g2nYwyoqzwWWIx8tO/7/vcKi/wZ+uCyP
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.306417572928748, 12.091885689614742}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt0QtUzHkUB/B/Yaep6SWO5PQWopgeK4/kl5BnpJFtt9lGr+khpTgbtVt6
+KCLTS8VKtoNaKyOnmmjHtKtkW0mkKU4Ny+koKW1rnWW138v+z5nzO59z7+/e
++7tjHRy7LUyb47gQ/Oj89C1in85pjHv66IJ4HawpS7hkD+cOLqosgJngfPoy
+WBntHNJPDh39RwiX9J05NE3IuA5m2iCA7a56WrjBcRP+Re0mjIvWOIr94fLm
+xtxEWOoh8tkDy7eLa/XhQsduxyxYM7yRlz+VcT13fttTDEs0b1bpwsVJ4o6z
+MOMPy5OMGfd2vq3XeaofsH9gyIhxh3S/5p2DZVq3jkjgX309T5XBqsAOU6Uh
+4441bFYU0P21rFdtwLhpa3Q2ZlK/zt08M/gLj6iIvRR3aj+Rrc+4FZ7pnsHU
+v8Um0R5WN/ZO30p2mxU4IWDcSI6D3Uq6/2VBkS7iabm2Z4V0X+fJ9PXwhGvt
+GTvyjO0ZdXBgXYOBJZwa9Cx2E/qty/apMqf4H00l2pjv7urkEWvYqu+sz11Y
+9FWKlQPNX6UY8cN79DTjbu7w6I3WbBVc9FDvlS/VExl3zsU+8gYV13bBW407
+pRmw4cLWRzmUX1AkuQffupolroa5zh2ZtE+JXaXdfVi4qvagA9xk0z3xlu4X
+v+N/DhdEpV+0cEJ+TsRfNrBblOPgKvLuqI1vUG/4QPmxUFil2eAlh3UN4jPT
+YKN878V+8GVfh6FTsGyBIuMp5vUzKBXIYblib2wwvHy8LkEJSyS72i/jvQe2
+fBhqofrnllXKsB+zYUXGbTg1su1yPPYnTdkmo7iVieGsndi/OLWq/OP9n7fk
+h+sxLqv/SGoN5VeE1x3VZdyy+RXzK2B2q7bmEZ9xFk82KfMoP6q9PwCW8Rrj
+U6jftlcH9GC9kpmHY6i+/Pi+MR3GhZY4eogpXu8aZIB4Subyxi303pBdUYHw
+0oM1+mspf1P30W74kst6Y0/KF9xQJKJ/iql+HFn1otrRDfO1yx8WedN8afse
+62B+ZWviT35wefjM3qdwTt+T0jBYk3XmcQPeW2m7RutbqnfTuDEN+9CaWOFd
+Svn92mPO2FfcG2VJA9myz7gJVvyZPP6Y+gX4npyK/TZJoxdrOyMecLrKAU6z
+bpk9DzYyq2km+3ebfLeZ4pMEcyg/y+kgbw8smREvvYZ6gxajJ/NgTaEP3xK+
+KDNzrSbv5hXswDxXvJ3fN8OqOa/F0Zh3SVWin5riz/2lIXjPhwcS9TPYyrD+
+xXq8vypiMHoITq3vHrDHfgJcJrm8pHz+y2ra74MFmsIBmPOP3D4J+zdRSBb3
+UX3+VvepPMaFCa+MddC8QbKS1Z9hzg+p91Tkwi7+D1MYNy/I/R3Np7KN9BLC
+cfEdF7+neLVR29hkxtWoZbNzqP/S9o5BOOl9/+kksruP9Qzkq++sWBpL8x4u
+c9kLd5kGjofTfLl5vu/hgZG20yEwM9TquYD+peHNbWG0r5W8ghjMV9EX3xVD
+92M2mHth/nNpgrsf6+dXSszxvuffjGYfp3rz/jZ8DYvYL3mVNK96of1V7MNm
+yf7lLZQv80gIwL5uF8+uoH2Uhw6M9cJvIwXX9VxQ//cIXyH2yx5e93eCJa3h
+QhHs4ha9ZAesMd8g9YIzLggtkyl/Z+Dcf3H/pkrUVQararSnpMPRxXM9lHD5
++UvP1eif8GN9cA/ZZvP9ybDIsyd5BGbT19bT//Pxc/3/1GH/AexNIgg=
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.77471462238284, 4.811607900361398}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJwd1gs01GkfB/A/IS1ZSWNclnGJURRFDaZMXoVdMaZYlcvQxoQyyi0p7BES
+XpFWKLQqly5zrFRsmWpdqgndhIg0Gwpp69XkUu/3Wec4zuc8zzy/y3MxhsGR
+vF3yFEWV4Jf8pWTf8LOCQ1kQaHIo2dM45m24TdhpuR3ublaNyIRTTXxp92D6
+52cLAmDlqoAqtyUcijPzpWUdrFBxVKkbthp40rMMdp9RromkcSjh7uoXS+Ex
+9VvnVbSw/lz57RVwJTO86zzsGsjud4YjzrMZbDqHYuzjS0PgZOuhKy2wzPcY
+lQ8zVu5f6aTNoQofxklb4Cxa8nQ1LBKyh0n+XMvPrl9hcWi5scNKzHv52tNe
+B5+fcSiKgd3r030C4Latt7ZehE0Ez26FwQLui4w+2ObdWyoITm053idnhXVE
+4lP/IfN9LEa/h3P9e8eXwOKOiXIt+E8ez7AP8ShDjaN0eNaTNlwED94ziNKA
+ZdI8t59hPeMFSYqwJMs3kkbmZ45wpYinfCE6oB/1cbTP+dXCnPcut0Vw5WuK
+GQdL7+ZdOQFTzpdNbeHJbesPZ8HqhfF671Fvp5xuYRHcZlI3ewGWJgQHieHk
+c4dag+HJVg+zrzD9TnCIERzflK63BfG5tYszRy0x3zMv+CYsYNdmNsBlU48N
+SL8Yqavdf4NtYhjlzXD3Kh1mCvyJtePIDl3kmfPf/njYPWH+hylYLPdbxmE4
+Puloa54e8n11t+w4XDHEHzb/Aft7NvmbiMSLKwm5Bk/mnB7vhUWKtyRr9GHN
+9LULkV908k6XCjg+0tZlI6wa5/Z8Fr7+9nenZFgoPbF/vQHqEQksG2FZeLOh
+AGY5vlL5SM5f3xq5BDjD2ltpKfrlvK3GLQZOjozK9IApu0m2HywsOL57D9xm
+5qK6Cq6U7fsnCWbIJLXTiCfuNFI8AvtdK2xpgGWzbEYiTC9pcIoj4zkDIbvI
++dI66W4LC3QXlm6AE6Wun7+gvsGXuUwNuFNxZP59mJJ2jHWT8z2Pd7MKZpzb
+6FpI7kPP8jMlsEzn6gSP1N/v7XkOFmR7P1CBy4LuRDfDyp1RL5vRL7aS/pk5
+mNmgppMKW4Sv4GxGfMZqO0c3WOK2prEWds05cVML7gvR3Lsc9fHTLpz8YMGh
+NJPZz/6ArXTsN3XDq2rVeo0Z8HCvSAJf1EwzjoL5etu1O+BY6R/rmohp9T8M
+wPoHrxSoGKKuD6cbZ+C0gp8ubYE5Y1v9jBGPehHNKoBFEWHDW2Bf6w2sdthX
+IexFJhy8OEpjDo7n88NJPb2WHhUMI/TfsaeUQr3THgu4LFhQ+uiAHexzbnqe
+M8wKlaftIe+Tf6QDMfXydTvpn8WJGZkd7OrXs6OBvDfP8xtMYWVH2lgH/DV2
+OlQV5mZ+cyD9byjxZI8jPr9EreIxPGIqqXkAV0qOMJpglnffpmr4Oq/E6wzJ
+x3yi+BgZjzeIjoLz6n2098GFzwd49jCnQDQZCNMZJ61nUI9TqcKcD0w9XVtb
+D5e4jl/0hXN7/nc1EqZtq/+wC1Yf8XIwh/OWcWyS4EFmr/0b9JPeas6tgCd3
+LUutgvu4Bwueks8rdpTEwBoJNzvVUA+fyj3rDjOm9Ld5wSPvU1ZZwZVcOZMi
+0k/DeT6G8K0bSv1vYFl3aiyD7KfuETlbY9TXKvK1hP+6pvM1BWbNMzFwgXN3
+zt/8AM51K90aAfsclOarmWC/EmzmiuCJtf5NbjBTfP5SJxm/W6Z7EBZ0jV74
+DvUY2ewVlJuQ9004sxHm5LcPN8KDdQ8vJMEhgx0h92Fh3ffiOtivrtfxISzu
+ts0eIo5N92mGR2bNLyuhv9tzTBbWkfjtzasN4E0mu22K4cl3p66R/y8N4ZpT
+iTD9flgEk8xXi2ncAXf7l5vRYVGAwiJ7uPIQZ+c01lf13JmhQ/zZhdVJzqO9
+TtE31CuIaPUqht/sT8p4B6ur2/X4w/amuhsH4bJUFX8dWH/s9rYBmH8wrfYJ
+6qdR0V2j8GBaxNMsC/LudTlTWJ8/N9TkCjuF9JcbkXxt13l9B3ftG/Xnwm3P
+3IyeLkefTUJ2ZsDKrCvhlfBhKtv4HsxQFL/NgP9pbapUX4r7GTMriYXra89c
+8oNdX1mf3QcrP7p/rRoWuvR5J8KXZXRbGTzYpWWVDz9+1HfKyRT7Fab18ir8
+6503h9NhoeWfKUPwiN6Tm3/BlcUnW2nIL/qjX6YMHgzfLM+FhT9nphua4XxE
+mv14jNz3ruvP18OiGufSZviXvIemXDhj/0fVWbg9dNFlb5hyTJEsR7+yDLOs
+ybjYYXwXD05kf53iwFZ5M5I9cFjj63pzWFl7y4FEcl/KrTJUyXjF0fhD8MTx
+q63vkE939o8HhPD2JR6z92Ard80Ob7J/zQY3qmCKHrR3Bazs65qUDfP7Q1+R
+92lkc2BZHKz+6IutGN7+i6lxGKlvCe/vQzAnvLomBKYbfapfC4e1j4fuhTs7
+3pdOoj+DPZT8r2T9RNWyGtL/j8sLy+H4oJgz4TDtWEajBGb9lO6yGs6q1Y6R
+R/65KbxxBfjtJabXBlh9kXPE0DLc9zuBwnQ4uZq15CEsFvecfgzHl8ycboZ9
+mEa7GUzUe32ELoGlTh+d9sKT3Ys/DcAR5oHFN+B/v6/BGuT7mjnn/wREgU0=
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.069228614102805, 9.329740963760747}, \
+{-1, 0}], LineBox[CompressedData["
+1:eJwt1Qs0VHkcB/Brle0lgyGdmpjN0ANZUx7V6GZqdlWkySZ7sOMxoZLphV7b
+VSqVMiWsZ8Oi51pjaaWsYeymUqP2OLamh9Eg9FAUStnvf886x5nzOd///c/v
+cS7csFix9AuKoqT4JZ8MRX549H8flCVNFd8YjhDATFjp6rWWNOO/KXJRIuzs
+4nPrFPKbnfpDN2HJRd3pKtgnjmfJtoO/yGz+E+f/Du4sCoHbthqpSa73HOgp
+gZmWePI8wx6YV91DcpEqXIy8R7/fYpY9TdHsF1M+WdBMuKJEFAw350VK0i1o
+qvz65DfJsLPRA8YauXtSjc1FmNL6rFewaeabkEZ/FVw2oXYuh01TE8UPk26T
+59NcN+eY01SH+AS3CWZczPbYmNOMly7NRA33dbzdojSjqdhdz/OUxDk6rdiM
+ZnRtW+KzSD2jxgXj4C5RsXwvLL/r+0eLKU2phE5mpD7WyAL+dfiEm/VSAckr
+uN3Ei7stN1jDkq6FF1pNaeZoimPFWFhlrJkxEd9X0d/s/Bb9y7b3dvjjfreM
+9LxOWHUnqxj1MHHlryP0MEuSP5+D+r3HnT/2ArbJt71xGn7eckUxSnJn6Uxj
+9F+eO6rikP5yDbWH4elqlxQR7Df8y+EPmMetqzrHXWQeljKDcMzz2aIsaQWZ
+l9qp4Bp8jJV/5j3p59GTaIrs57dKjWAWTSkyl3s4YT/xV90GjsDyraHdXvDW
+TKb2PkzlGEQJ4DNWDV3TZmM/quR6Dp7fe81pQSgsfx7I68D93ueXZitI3vju
+Ltmn9e7gFf/AfjbrBl3gcKukO0ZzUP9I+mUV6o9PTWDNhfs4m0qEqH9j+3HZ
+MtimOtCsDv2fik2vF8OSBO33nvDv5275r4Ppge5eFeZX4RHWu3oO2f+uQR/M
+O27Evoom943ftriH7CsixGcOXBaZcT8LPtS4L2UyyQN++vQD9jXh3clTr1Gf
+SiocvwSmLhnmamBWkLezO87njJ34voz0M6/h5Erkq3xl2nRYJjPgJiA3rpsS
+ysCS5KK71+DNo7yQbXBfYXGiOeqbUdkUEEPuZ3/97R7U12SULSM5Vdq//xUc
+OmIQdABufjc0Lgr93dReXJcHt3Ff7muHS4T3ZqrJ/CSBsesxnwJDnUk/Oc/3
+O9uA+cnldkNkfrLKDwu/wvtSM7gsYDPsV3XSJAb+uaHru3LS79SoqgJYXzr8
+5CPJW1Y01GAfNpwDV0RzYWZ+cy3sKXI6LYcVyRkZ53CeK0pwaSVuW/N2J7yy
+OGCPlQPqC1jb4oDzgR2bjothqsWNr0E9hbGFzQdhBe9ZmwT1ehnunHoJZh2O
+2diJfmqXGxbegP3YrroIvJ9GdfHTH5Dz2Z5FOsyrMSyo4ilM1/J5YbCvqHrS
+I3Le5MLlXsz/R9VUDw3MDFnZHISXtv+qrHYg7ymvyQHzd9u/SKggzz+WLnjB
+wvs3RvgxES4rvf1GzaKZJKMU0zBy3nZJSiVybpVa4wXLlcrtdcjPCMMT7BzI
+37eg953IR0TPHE1IfzOCvW1x/6RAX+1nMo+WDblx8LIdfOtBmGk86/4Q3u3y
+1GMYpjyiLqzAfiWv8kfHkvt3eL2sh8XKIg2H1Of412UB+lfM7kul4b6rwp2V
+cKs+ujQGbs5MG7DF/Aa+5NkXkfkdTeQfwXxD+AdT20l999Y0tcKRKSqevSO+
+r378NHPsZzBSoI+Fy/jRUlfs53GrMrMabqt9PLQEeaF7wOAYJ8zzvJ1gHnIv
+1881q2BZ9qPqMcj7kz7VpxKnpVvU4/4187tMm2DVqo7haHiU/Dj9//+DTf8L
+sFdb8w==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.776116632202752, 3.615966322027525}, \
+{0, 1}], LineBox[{{3.499999999996362, 5.499999999998181}, {6.999999999996362, 
+         11.500000000001819`}}], 
+        PolygonBox[{{4.947677384685548, 7.98173265946094}, {5.897834175673825,
+          8.816718930329426}, {5.206811054955079, 9.219815750748694}}], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.515942703607427, 8.676200089562332}, \
+{1, -1}], LineBox[{{3.499999999997692, 5.5}, {10.49999999999251, 5.5}}], 
+        PolygonBox[{{7.6, 5.5}, {6.4, 5.1}, {6.4, 5.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7., 4.5548}, {0, 1}], 
+        LineBox[{{6.999999999996362, 11.500000000005457`}, {10.5, 
+         5.500000000003638}}], 
+        PolygonBox[{{8.447677384685548, 9.01826734053906}, {8.706811054955079,
+          7.780184249251306}, {9.397834175673825, 8.183281069670574}}], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {9.484057296392571, 8.676200089562332}, \
+{-1, -1}], 
+        {PointSize[0.04], PointBox[{13.5, 12.5}], PointBox[{3.5, 5.5}], 
+         PointBox[{7., 11.5}], PointBox[{15.5, 5.}], PointBox[{10.5, 5.5}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T10", " ", "P1", " ", "N19"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdfei/fiijghgjhj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdfei/fiijghgjhj.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {0, 44}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwl2HlcjGsbB/BHG6JMReZENSlpc1qElGqoiLbRLi2jQiRGhYRMTjQSRvKW
+QYaOSuEkqUlxUlosaRzJSDItElFRjorq/d3vO3/U59vMc1/LfT/XM590Qnd6
+bpKhKEptEkWR35Qi+WHMpIYn8DJgUtIPPtxyIybVU3dY7Q0czWoz2wVPeT9R
+/gBWjDwdqAtzdu7wvAP/47Zib5Mhk+IerzhXAl/W052UDNPUR+7UwF7q9Vtt
+4WHHW0YdsEDv1eAIfmeanZUq4u8ax8SC+yRuiY6FHbxs27RfqbDkYsX4PviI
+7ojDZpglt6m6HBZdTWa4wOxdr0sp5BEmZpbZwHFz2vucYIuOxBtLYeG1FXE8
+eMDzHd0O9vd7dbgG3pqbeNEN5vU7HByFg4UyseFwD7ds0Xz04YS3KpdL1nNL
+/ugA1/CGIi6R+H8xo3xgtvbdYpKv2D1dfz1sOTTaRfpkYLlI0wPOMa0+M0Ti
+5+8dXgrnNoefUkDelaONP2bCTMfewRlwfYtj1wfEHzk1dQWxwcbqn0Xw7ewj
+kbJwXrrGqzj4bLfPx16Sz5IWl+XwnoddpfUwcynHhdS/SdE8UADTfGUe1OG6
+7mWPWjfCdEP+zrNwnPmHOww4L6v7eSTp7/3F9ZIF6O+4ZMwVnrg/2SEVFh1T
+SrWG8w+MpdjCzLI9RxbDCcfttPr1kf8alh/Zn4qSlL3ZMD/F+Jk3qUMr+msg
+LIxxpMfBY/0yBZowO1yuMQfeaWC088N85KPsOPkdbB/7/lI57FxyaosW8i8v
+Wap/HpYuj3QIhau2CrYchfO81t/NhRvnbl5xkFx/1/Z1L7xSboviIbh+ekaF
+Mfo571mKIAUWKsoWhcOzLd39s2AGl+eXDhfNcncRwezvNqUi2GaX3qJmmM8f
+DxLDkV3Jl7+T66M9trfAxrcT1Gcif6v07cJm+NPuYE1TWFzstr4Gbvdy3uoI
+5z3xTcuF3e+96l8Hm70cfJVA1ot8RvmS/ihcWewGFzgXrPcg/chZojULrpq2
+xtIW5l7Y4/Ea9cxsavHQhuOMnYsuwOLlbYMkn7iqfivSj6t+0s8P4IhL7ypM
+YLkM6z+SYOak3Lfj6Oe+Iovt9jBNxO1ogb3qDUuG9PD5Qx2XquAb+ysLc2CW
+HjO0lJyHT3L/+MEi9ZG2Mrirrf2cIszjaJs8htuU5ux+oIt+9+39+wNMT1hw
+OQFmc+7HqiC+0zxzVUe4ckm3gNxvu2u2BKrBcV3lkw+TuXH55uUv83C/u8ub
+P4Tveu5LegEz1/9cM5XMmSgOowbm5deFucM7Wi2mVsH1806c4sN/D63weAT7
+MzhUAxz9pC3lNcyoVjOZZIJ8rAM+D8B0b7UeI3iJgsY6JcSXUvP+cIZDtEIC
+TWCu4IbEHy4+dCPNheT/FyN4A/xSJnNPBExba2TIgreuvnKVC7OSqvqWwifU
+Pg2ehiPW/hhVg9Uz/Y4I4EI/qU438llYZNaZCYskEfmFsEBmllIqWV/YtWgP
+3Fh3MSmG9GdVdsYy2IOj4eVB+qnWUTeGfvB+6k9lwHzDCzfIPMo6yhB1o57C
+GzUK6WTOHq5+/ydsVrNvVSTsJTkcHwhz2lLj3GDvgvCCGXCma4MhmQcnYzZJ
+K3WYFPVT3tcKLmhIyYyGmbrpgSvh766fXBfAEf+Z+Ws9PPRhyKudgX4/DvBJ
+gPWPe9degeOsTn2/Ab/UyNgcBTvvnejuhhOSH6SuhMWS1jp91NM6X6SuC5sF
+tb/fRubbAvPgGeR9JUEQ6cejvKuWk+G8I702Q/BWBc77qTDruotwEfqpnDBu
+qw4Lj+q2RcJlh+6eN4IHpC/PC2BNGdkJRxL/p0zfPdguKmheGMymNUQ1keu/
+N6YfJvF5c9a8hWNqFzULYakLw1UCHy5eEltO4r0u7KyB+Ssq9MUwX+JHz4U9
+DX0+tZLP+/kfPgjLlQpmS2HRpYVLXWCmccgeCUzRg2+pwolZTS41sOR02W0y
+D/6YrRCWAzN2swwFcI8tc8YBuHBrhiwbDl/nZrAa5q5n0sl80s3+iyL11+v4
+UOPo52eljOtHtXH+6lVGW+C4ovADA1q43rL1WTWs+PIr3RuOKE2+XwYnscOi
+SzQRX+8l5x68Y4KXPBeuH3j15RkcvaPd+PhcnI/0zItf4ED3s40KMHVg2J2O
++L/HDbqcmYNzFZnsRObRSruakkVwYf41txSYtT/R7pMG6h/Xa34KV34co4lg
+6k6vEqm/3vCh20WY2f9Ezg/u4+TJnYN7niY3ZMLTt99iXoPZTY8vkf0J7n6u
+9QQWZkcPT16Ic3o1sn8UzospLjGDh7TUN1oiPj+ywdINFvqKiqJhNld7QyDM
+rSn8VAhbOb+9HgSzRcdpn2Bpyy23dbCyc8Hm31Afw0iXsoKLHjtetoYHkh/M
+VYPjjy6hr4UliSmHu8h8oMd+dYSdaZaJN+HPWZorDeGe6g33Y+CA2gd6/2J9
+7nuxOrn/vw3VVRfAnHtBB3+iHxcWHPNzgVmepyXVcGi2Cf0V6uFfUG9Pg/3z
+e3U9YQOJtkwkLJrWHVD5G/aP721L5ptGpZGFPsz04KnZwZ5W44d4dMwBf+cY
+G7I/NSUOn2djfaVpN1fBJw3KI31h7smE2BBYouV04Yk69oOr05JE9ks5ccQD
+Zmv+CrkDpz498KN7FvpMG5Pvh6Vv1CzOwJxQs1BTsn+78919Yaq/qoLU+yte
+/aMZzJx3wrQM1gs6kzoPFrWU1P2CtWRVywzhyul9uTboJ08nZ8gBdjbLNoyB
+JV+ceqLgiP5HP4VwQMeJo9mw1fYy22rYzrfWWgpz9w6lS+DAtVO1tJEv3eTt
+cim8WZ5htkGdPC8uzmiBs3yOnD4FS22lybVwvtXn8lLYeaVdeQ5MvS8vaST1
+69x0OwDTZXWcmuBMh/jgNbD6tKxp1bCQfWUnDf59zpYCATwsX+1MzmNKuss/
+AbDB9JfNGbCiR6ydHDxFxUYxGHY2enwnk/TnTU6xIez7YstXDVJfVGjEGPpp
+ESuXcHIm6j4WF/AGztKoSfuhhvxnzl5Dvg/ER3lKA+CBR95bKmD+2m0B91Tx
+vqmTxwPyfAjfNK4LC7f9Gn0Bjya5njujAms2PRyE54Zp8WkqZF737dAm+Qoa
+rmfRcL90XzT3IefTe/U3Jjz8jSZOg5tKZQa/zcD7jauKXsKt3muL0uCBbCPZ
+Oahf1N1pvhGeYrnreQjZv55noYFwZeU988uwlL7PlAuzMxLZrfCBGuOCWpgR
+oNSh/DvW+TPCeCbisWawLy2BlcUjNu6wpH3T+DrYX2XS36k08n3vxFAIfKAz
+W/QYjnBvVWXDvy46LZJFPeLN/6Z4whZ7lPeZw+yQNhMreGbdybXrYOdMXpAq
+bJ0iTwuBaWtuKnQiH/EbZVl/2F//Avc6fMX+lbs1bNAxtmcXXPIzaL48nDep
+45ElbBbZWC9CfOn2oO0jZD9np/B8YYPKdSurYJOD0rAHqG84uXP8NGxguq23
+WBnOnS9Pnj/U1TtHTimRebXJ1QMW/jnXImA67puogDVMWPR7V57WNJy7Yru3
+dnBFz/ZP3VNxXYfAhTwvzFbPfVIxBXlzFi/dRPZjkUPitcnk/nHLOQ6zJ0yt
+7yigf5xeJfI8a/3XqbxbHvu9oyHsB1lfZ6uaAzysT1tC5plrmDu7QQ77dpxf
+R847v8I//yjMKrptWkX6M3ZVEiVHvncvOCCP/iXJNN07BEe4qLxwgHtSe5aX
+wvT6+enxcP2NG0lKWD9vmebeXFiSJw6OhyWtpjn1cMQmk1NDcOYfIS9aYfHj
+L3bRyFe6VLC6E67cU7rjI8yfptD7Bh5uOreNhfoM3s9aVQc/PXvJOgseKA/Y
+nwPzY5oVn8DDH/yt98PCVK2jYpg3f7RgNVmvIFs7H+aOJ6wn5y3d4vpqH5g9
+X3XGP6T+jf7HniPegKxX+Vm49faPUwyYI8tyI8+Hp2XFaquQL2fd/jQD+PPA
+7purUW/c0vnqY+gnbVW3wEQW9fG+y7bCko6z7LFJmE9f7yrXwZbfJjjVFPLJ
+Lg78m+z/SGeMyoQ9xfOxiSffF7jG58Nv/rKnCneFe70m50n1/lPOqD1lFvbR
+chT2l6iobhu2pwZ2Ozfpk3mUm6l57V979LMymDyvmPwjN5d9t6e44v0nz8Nx
+Tl+e6w7ZU/5TvzxsI/tZvfFI5CDWW2dlqIf6DZRu82gw3cPmUQScJ9/LVoZZ
+cyvKr8FTOMGpgbA/Zbayi3hezPs+mHcorWeWKc7F+izTEqwv3PHm8nLYucmy
+Xoj4jIlH73xhbuKUmPPIj9E58GcYTNM/uSzthz2V52rBD4V5ShzPXaiHfUW/
+3QuurFWZrD+CeqTWu62It15OvQRPmZJ3TwWmZnXWNsLid6U328l5qO3qLfjf
++79dy4fNtplNWghLTdcE74RZvc9MWFifs8HnlgXMfrmjWR3xB64FnP1Bnv8p
+RhlHka+VnWtvJexskDuch/oYscfZp+E8jX0Kx79ife1mj0gyv0YvRu3rs6dE
+hwavskg/Z8eHCj9ivyyDnqyEOUlzhm91IV7ahzPE3JH/bL7+DtebLFhMPs+U
+mZYY0WxPGcyUdSTrVWbI3Kl6Yk8Ny/HL0sjzhmUzFlRmT9XL/Bp/SExeqbb/
+///IQuZ/Af+ePk8=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.82330080216169, 15.930190164263845}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwl1AtMW1UYB/BDwY1HxjoQChOEMhM6XE2XgDJfPc4h4yFUxmubKYUI81FG
+EwJ0Gy6dDALZBgVxRfagVg0D0UGN2i28JY4hSosZdAisbCyjMKCAIEJh/o/e
+pLn55dzvfI9ze/kZOQmZHEJIJH7sTuxPcLlRYmN3L0oKE5aKKLPAv7YKbnWq
+flvqSgnhJe99kZlfr0tzocQ405A/9zQlgpyxzRhnSlTXp/a1w52ZCd3Pb6VE
+dtkzph4O/eKdoa1b4Oi6rEb4rCIi1uqE+NnjwluwfNq2ZnakROtlEdjh/hMh
+z97jYL/hmyNvIZ/fAdEGB7YZUs1fwj7vH7sU7YA8x0fm3b0pCfd7mH+TUKJY
+GUoqgvuny1KSYG5k1d112PBut8gP7uz5xD+XR8mr3mE8d7Y+1GZ6ACtjf4sW
+wCLpwOxBH0qes+oTs2Dt4ZJHV2CfQOtL3bB6Z8bkOFzTckYfivzql0seOPti
+X27d+R9gVZd83BdumrcuvIJ6tf2L41xYEPmtqR2mYwMuc4gv7Sp6Iwz9ytaf
+uqKHLcWZ4xeZvz96X8by6VeCR+HA7bnedtTX6x42uMnmU3E+ohTuaXFzXYON
+5/ICXGFjzkRDH4tXnekpQb+2PyaP5sCKuhsXHGFy5+q1KZb/Bd1gMebH3bVn
+IZzVp9t+3QN2ungk6T3Ub5s5++t3mL/5859LFGxed5QhUjh1TuN1e1NMiOAb
++y7YmJ46qraLCU3MPM2BRR8Xj0StiUnnEf69NU/kCTbv3rIqJqJYbeg2rPc+
+/rNjeFlMmndvnAhn7ws3oXFgCfERv9SeZOvleUkbC7DwqzIjrPJ3nsy2If6g
+Jp29b5aVWpoyJyaSiXR1Pau/wNPn1GPsVyhxDkB/xq5SQdwM6vPYX6CBZZ08
+88C0mAQaalRumI/sQE3AKixpu/R3Hiyq49//iT2fN8AbZPNTNlT+g/0s0jHD
+M5g/Xb3hq0M+kX74VDw7Dw3fMQr1qFtn5j9k5+9Isg+hXu3gUpMc1r62sF+6
+iOd7b2UksvjkPmUK+pNIvx4NgpUf7O0W/iUmqsvnVu8iH/1oLs4EK/iPqgph
+4s0rCMV8aKX8mDuscOiJj4VVT3KnPkU/XNE6fwesrqxw94BL9R3tpxGvFcqD
+yjEPUW1zUzXyWWKiirbBxuo3hcmopzn8pPwzzNMgT/PtQ/2qH7NbQ2DJYqNw
+eRb5cq91mHBenUG9h6xWMeFOLjmUw1yNNa7ioRj/347gDFjh8bqfywT6Wzts
+ioct/D2hy2bE/76vLIU5P43DNWJ/r53tSlilzDLp2vE8R3C7Bf7v0rX9/33x
+pP8CT+Wxpw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {1.9692031021678298, 4.320378284825192}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{19.99999999999727, 16.999999999996362`}, {7., 
+          11.499999999996362`}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.754949725219685, 15.745496856246135}, \
+{1, -1}], LineBox[CompressedData["
+1:eJwt1gs0lHkfB/DHTLm/uWwiShhF2Iz0jsva3ifeiuhlXWokl2jQIhLOMCXV
+1nHLLVrRa2ULq2RWuWyFWbVWUTuxnR1yGbdcs6jWaNn2+3/PO+c85zmf81z+
+39/3PPOcxzA42pPHoCgqExvZU8sf8TOjKRnZm9KU848lIe7mNMVmxMbqbaWp
+dU+M35TBjcOqTBPYwCxcZRHmt1XlGsIL/Q3GzhY0NfdaeVEZNm7I6siDnbvV
+FEZxv75c0Vw3rHj7+ld3YM4lR3WlT2nKY3pMIQqu3fCXDxtOjd8jMYKDBJcb
+nWGRcdzDbhOaimk6r+gJSy6xHp2HVw2OLrjBXGa1gg089Ya/aA+HP30XP7+F
+ptTt73vqwzkNyrn18EKTfv8S1g+KbP9XGtyWEzskJnkv+5dFwHc+uzVTDgt/
+5rwNgJMH3l09Q/zD6vgQeI1kzj8ALnWfP86H2fpbvffA/ITNNtfgWKpYwx6u
+DDR17YSdS+eTP4PZqblxq5Gv2arwoSus060kc4KlfAfNCFiWMNZB5plTuTtV
+CHON7LpF8LYNSX2kL3pGSXcRNjUKbF6PeRQdTNRY6KfdUffnMNLf48DGXTDj
+gUb9fbh9k9aAByx2nWeobcP8r2rM3eGJf/trHIFT83WcHGB7h05eNezxRqdV
+B+a6nZXMwdxvfOxeY70dvz94ZGqJvqZ4WhWw822+mRfcrsAVBMCHetJfHodl
+IVW66rDInccTwDE3/RZbMH+KfNbBRFjHwsQyFhaGRH08Bpuu39dkBssOj8S6
+w+wtjvSbzTS173xLhAXxsd7HD+H0vFebVsEiv8yrxXCSxECzF/kq03+0yIDt
+P5gMfg+zbUcWiW3PBStmw6bKX/L/C8eVd4nitpG+vGyaYVXRzmYeuT40a2Aa
+nvXO1DhK5q0182Mhj/3Gi4on4MZBd+Uj8MxKm+4lWOfrE7OlMOPA0HADLJmq
+nRyAn/uZGJO+CiWsD+sw/5onoj5r5OXah8XthjPN5UNSSH8VoXZh8E5WfGYX
+XPlebjQRvqPCOP4JG3ldN84I4NxnX/c6wDJX1aZIOFI9oj0EnmNqNrvBdqNR
+hRfJ8bWJbhvhth7x+LewWFRUIUWehltuN+6T808u/XIVniwX6z2FSxs8/Nzg
+JDOhfBfsLK9PL2P+g4fuZxC3V5UVV8NFwdTOTpg6XxN/FE7dG7FWBHMLbl0w
+hu9Jr/nVkPM/3bE8Z0xTnZrTZcVwSv0J70742nDGzf/lq+iwbIQfn6OtYmHb
+HWt21sF94/MqQSTP4QDrR7Dm96KeL+CJg9mdUlj1NHO1C+zBKBpSwXqKgrzv
+9pA8p0wv7IJbn2d95QqnDoRbJsNXZvMmD5J5f7833wQPbJ9qioCFoXpCMt96
+sVYSydOoftafg/lHwtKsKkhff05ywuCMhG2lZF7pbxc/ZMChnpMO7+GgjCDt
+MlikpuGxyQrzDo53VcCrS3JVXWCJgVMw+b8X2jlXxcA5quPvz8Dlhjop+TBt
+/6LeC67m2224CweVZ9ath5c3Bfh2wOqfL3X8iny1LQnRfXChXu7JVFjma/Rx
+DBbWZ+XZkvxqhtoTVuT90uc4iX5OZiVZj8CKWhpXSuBABR5HAstkr30Pw4wF
+b7922ENQIN0MJyW+Na4jXmUvXmFhnl+Ye0thcaL28hhcwBBcyoCptGGXQZiq
+5bTyYTbr+o1JuEWuO+8YXKndv8LE/Ry36/MDYZGvjr8FrFGSU+oH6xhdXw6E
+77UyBwNIX5kGscWwHvNmCble1pYn7YWL437tE5D11J+zdTHfi6suWwtIX0L/
+/T6wkeep2/fgCa3dAaSPiap31j2wwVFaTgi/HXrmJLcdz+P4PsETOPpupIU5
+LNx+RdoFM0PNWT5waVYluwPmn8o7fBo27ZHn1ZLnV6NkSxmconn5RBpMM7Pl
+WmHx50UcT/jQ3r66V/DEe3+eGqw9yQidhRVVb3MfI//Th5bFS7CU99NIHOwZ
+reS2AgephuiSvp1abfrJ8coJVa0e9FecX6o3B6e6mdflw9wzNewh2ECLjvSD
+bSnv3Odk/ZcXlNjwN9E1Ez/A6vUvc9bCBrNVH2/AOdMWG5Xh1pTeslySryVF
+rA572ZinnoUbM5+9MIGn1vb/MwGm9E/77ocPRHJmYuDw/0R3JMMjWZzLsbAs
+0LS/EY7y9KoWkD5e//HTIpwUxPTIhJ05XyTYYB5u8Tkjsn7hRbr7JJz253Aw
+6YsbEbdQCbfYGcyPwZKwbK9ueFdVfuA/rJG/jfcJeT/Y9g8o2MCV++l1K7BP
+jDzrCCycatiyBM+IkkfS4JjdoQqj8IEb6dk1sJQdntAMGxYkF4lhWUGyUTr8
+h0P0g2nYwyoqzwWWIx8tO/7/vcKi/wZ+uCyP
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.306417572928748, 12.091885689614742}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt0QtUzHkUB/B/Yaep6SWO5PQWopgeK4/kl5BnpJFtt9lGr+khpTgbtVt6
+KCLTS8VKtoNaKyOnmmjHtKtkW0mkKU4Ny+koKW1rnWW138v+z5nzO59z7+/e
++7tjHRy7LUyb47gQ/Oj89C1in85pjHv66IJ4HawpS7hkD+cOLqosgJngfPoy
+WBntHNJPDh39RwiX9J05NE3IuA5m2iCA7a56WrjBcRP+Re0mjIvWOIr94fLm
+xtxEWOoh8tkDy7eLa/XhQsduxyxYM7yRlz+VcT13fttTDEs0b1bpwsVJ4o6z
+MOMPy5OMGfd2vq3XeaofsH9gyIhxh3S/5p2DZVq3jkjgX309T5XBqsAOU6Uh
+4441bFYU0P21rFdtwLhpa3Q2ZlK/zt08M/gLj6iIvRR3aj+Rrc+4FZ7pnsHU
+v8Um0R5WN/ZO30p2mxU4IWDcSI6D3Uq6/2VBkS7iabm2Z4V0X+fJ9PXwhGvt
+GTvyjO0ZdXBgXYOBJZwa9Cx2E/qty/apMqf4H00l2pjv7urkEWvYqu+sz11Y
+9FWKlQPNX6UY8cN79DTjbu7w6I3WbBVc9FDvlS/VExl3zsU+8gYV13bBW407
+pRmw4cLWRzmUX1AkuQffupolroa5zh2ZtE+JXaXdfVi4qvagA9xk0z3xlu4X
+v+N/DhdEpV+0cEJ+TsRfNrBblOPgKvLuqI1vUG/4QPmxUFil2eAlh3UN4jPT
+YKN878V+8GVfh6FTsGyBIuMp5vUzKBXIYblib2wwvHy8LkEJSyS72i/jvQe2
+fBhqofrnllXKsB+zYUXGbTg1su1yPPYnTdkmo7iVieGsndi/OLWq/OP9n7fk
+h+sxLqv/SGoN5VeE1x3VZdyy+RXzK2B2q7bmEZ9xFk82KfMoP6q9PwCW8Rrj
+U6jftlcH9GC9kpmHY6i+/Pi+MR3GhZY4eogpXu8aZIB4Subyxi303pBdUYHw
+0oM1+mspf1P30W74kst6Y0/KF9xQJKJ/iql+HFn1otrRDfO1yx8WedN8afse
+62B+ZWviT35wefjM3qdwTt+T0jBYk3XmcQPeW2m7RutbqnfTuDEN+9CaWOFd
+Svn92mPO2FfcG2VJA9myz7gJVvyZPP6Y+gX4npyK/TZJoxdrOyMecLrKAU6z
+bpk9DzYyq2km+3ebfLeZ4pMEcyg/y+kgbw8smREvvYZ6gxajJ/NgTaEP3xK+
+KDNzrSbv5hXswDxXvJ3fN8OqOa/F0Zh3SVWin5riz/2lIXjPhwcS9TPYyrD+
+xXq8vypiMHoITq3vHrDHfgJcJrm8pHz+y2ra74MFmsIBmPOP3D4J+zdRSBb3
+UX3+VvepPMaFCa+MddC8QbKS1Z9hzg+p91Tkwi7+D1MYNy/I/R3Np7KN9BLC
+cfEdF7+neLVR29hkxtWoZbNzqP/S9o5BOOl9/+kksruP9Qzkq++sWBpL8x4u
+c9kLd5kGjofTfLl5vu/hgZG20yEwM9TquYD+peHNbWG0r5W8ghjMV9EX3xVD
+92M2mHth/nNpgrsf6+dXSszxvuffjGYfp3rz/jZ8DYvYL3mVNK96of1V7MNm
+yf7lLZQv80gIwL5uF8+uoH2Uhw6M9cJvIwXX9VxQ//cIXyH2yx5e93eCJa3h
+QhHs4ha9ZAesMd8g9YIzLggtkyl/Z+Dcf3H/pkrUVQararSnpMPRxXM9lHD5
++UvP1eif8GN9cA/ZZvP9ybDIsyd5BGbT19bT//Pxc/3/1GH/AexNIgg=
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.77471462238284, 4.811607900361398}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJwd1gs01GkfB/A/IS1ZSWNclnGJURRFDaZMXoVdMaZYlcvQxoQyyi0p7BES
+XpFWKLQqly5zrFRsmWpdqgndhIg0Gwpp69XkUu/3Wec4zuc8zzy/y3MxhsGR
+vF3yFEWV4Jf8pWTf8LOCQ1kQaHIo2dM45m24TdhpuR3ublaNyIRTTXxp92D6
+52cLAmDlqoAqtyUcijPzpWUdrFBxVKkbthp40rMMdp9RromkcSjh7uoXS+Ex
+9VvnVbSw/lz57RVwJTO86zzsGsjud4YjzrMZbDqHYuzjS0PgZOuhKy2wzPcY
+lQ8zVu5f6aTNoQofxklb4Cxa8nQ1LBKyh0n+XMvPrl9hcWi5scNKzHv52tNe
+B5+fcSiKgd3r030C4Latt7ZehE0Ez26FwQLui4w+2ObdWyoITm053idnhXVE
+4lP/IfN9LEa/h3P9e8eXwOKOiXIt+E8ez7AP8ShDjaN0eNaTNlwED94ziNKA
+ZdI8t59hPeMFSYqwJMs3kkbmZ45wpYinfCE6oB/1cbTP+dXCnPcut0Vw5WuK
+GQdL7+ZdOQFTzpdNbeHJbesPZ8HqhfF671Fvp5xuYRHcZlI3ewGWJgQHieHk
+c4dag+HJVg+zrzD9TnCIERzflK63BfG5tYszRy0x3zMv+CYsYNdmNsBlU48N
+SL8Yqavdf4NtYhjlzXD3Kh1mCvyJtePIDl3kmfPf/njYPWH+hylYLPdbxmE4
+Puloa54e8n11t+w4XDHEHzb/Aft7NvmbiMSLKwm5Bk/mnB7vhUWKtyRr9GHN
+9LULkV908k6XCjg+0tZlI6wa5/Z8Fr7+9nenZFgoPbF/vQHqEQksG2FZeLOh
+AGY5vlL5SM5f3xq5BDjD2ltpKfrlvK3GLQZOjozK9IApu0m2HywsOL57D9xm
+5qK6Cq6U7fsnCWbIJLXTiCfuNFI8AvtdK2xpgGWzbEYiTC9pcIoj4zkDIbvI
++dI66W4LC3QXlm6AE6Wun7+gvsGXuUwNuFNxZP59mJJ2jHWT8z2Pd7MKZpzb
+6FpI7kPP8jMlsEzn6gSP1N/v7XkOFmR7P1CBy4LuRDfDyp1RL5vRL7aS/pk5
+mNmgppMKW4Sv4GxGfMZqO0c3WOK2prEWds05cVML7gvR3Lsc9fHTLpz8YMGh
+NJPZz/6ArXTsN3XDq2rVeo0Z8HCvSAJf1EwzjoL5etu1O+BY6R/rmohp9T8M
+wPoHrxSoGKKuD6cbZ+C0gp8ubYE5Y1v9jBGPehHNKoBFEWHDW2Bf6w2sdthX
+IexFJhy8OEpjDo7n88NJPb2WHhUMI/TfsaeUQr3THgu4LFhQ+uiAHexzbnqe
+M8wKlaftIe+Tf6QDMfXydTvpn8WJGZkd7OrXs6OBvDfP8xtMYWVH2lgH/DV2
+OlQV5mZ+cyD9byjxZI8jPr9EreIxPGIqqXkAV0qOMJpglnffpmr4Oq/E6wzJ
+x3yi+BgZjzeIjoLz6n2098GFzwd49jCnQDQZCNMZJ61nUI9TqcKcD0w9XVtb
+D5e4jl/0hXN7/nc1EqZtq/+wC1Yf8XIwh/OWcWyS4EFmr/0b9JPeas6tgCd3
+LUutgvu4Bwueks8rdpTEwBoJNzvVUA+fyj3rDjOm9Ld5wSPvU1ZZwZVcOZMi
+0k/DeT6G8K0bSv1vYFl3aiyD7KfuETlbY9TXKvK1hP+6pvM1BWbNMzFwgXN3
+zt/8AM51K90aAfsclOarmWC/EmzmiuCJtf5NbjBTfP5SJxm/W6Z7EBZ0jV74
+DvUY2ewVlJuQ9004sxHm5LcPN8KDdQ8vJMEhgx0h92Fh3ffiOtivrtfxISzu
+ts0eIo5N92mGR2bNLyuhv9tzTBbWkfjtzasN4E0mu22K4cl3p66R/y8N4ZpT
+iTD9flgEk8xXi2ncAXf7l5vRYVGAwiJ7uPIQZ+c01lf13JmhQ/zZhdVJzqO9
+TtE31CuIaPUqht/sT8p4B6ur2/X4w/amuhsH4bJUFX8dWH/s9rYBmH8wrfYJ
+6qdR0V2j8GBaxNMsC/LudTlTWJ8/N9TkCjuF9JcbkXxt13l9B3ftG/Xnwm3P
+3IyeLkefTUJ2ZsDKrCvhlfBhKtv4HsxQFL/NgP9pbapUX4r7GTMriYXra89c
+8oNdX1mf3QcrP7p/rRoWuvR5J8KXZXRbGTzYpWWVDz9+1HfKyRT7Fab18ir8
+6503h9NhoeWfKUPwiN6Tm3/BlcUnW2nIL/qjX6YMHgzfLM+FhT9nphua4XxE
+mv14jNz3ruvP18OiGufSZviXvIemXDhj/0fVWbg9dNFlb5hyTJEsR7+yDLOs
+ybjYYXwXD05kf53iwFZ5M5I9cFjj63pzWFl7y4FEcl/KrTJUyXjF0fhD8MTx
+q63vkE939o8HhPD2JR6z92Ard80Ob7J/zQY3qmCKHrR3Bazs65qUDfP7Q1+R
+92lkc2BZHKz+6IutGN7+i6lxGKlvCe/vQzAnvLomBKYbfapfC4e1j4fuhTs7
+3pdOoj+DPZT8r2T9RNWyGtL/j8sLy+H4oJgz4TDtWEajBGb9lO6yGs6q1Y6R
+R/65KbxxBfjtJabXBlh9kXPE0DLc9zuBwnQ4uZq15CEsFvecfgzHl8ycboZ9
+mEa7GUzUe32ELoGlTh+d9sKT3Ys/DcAR5oHFN+B/v6/BGuT7mjnn/wREgU0=
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.069228614102805, 9.329740963760747}, \
+{-1, 0}], LineBox[CompressedData["
+1:eJwt1Qs0VHkcB/Brle0lgyGdmpjN0ANZUx7V6GZqdlWkySZ7sOMxoZLphV7b
+VSqVMiWsZ8Oi51pjaaWsYeymUqP2OLamh9Eg9FAUStnvf886x5nzOd///c/v
+cS7csFix9AuKoqT4JZ8MRX549H8flCVNFd8YjhDATFjp6rWWNOO/KXJRIuzs
+4nPrFPKbnfpDN2HJRd3pKtgnjmfJtoO/yGz+E+f/Du4sCoHbthqpSa73HOgp
+gZmWePI8wx6YV91DcpEqXIy8R7/fYpY9TdHsF1M+WdBMuKJEFAw350VK0i1o
+qvz65DfJsLPRA8YauXtSjc1FmNL6rFewaeabkEZ/FVw2oXYuh01TE8UPk26T
+59NcN+eY01SH+AS3CWZczPbYmNOMly7NRA33dbzdojSjqdhdz/OUxDk6rdiM
+ZnRtW+KzSD2jxgXj4C5RsXwvLL/r+0eLKU2phE5mpD7WyAL+dfiEm/VSAckr
+uN3Ei7stN1jDkq6FF1pNaeZoimPFWFhlrJkxEd9X0d/s/Bb9y7b3dvjjfreM
+9LxOWHUnqxj1MHHlryP0MEuSP5+D+r3HnT/2ArbJt71xGn7eckUxSnJn6Uxj
+9F+eO6rikP5yDbWH4elqlxQR7Df8y+EPmMetqzrHXWQeljKDcMzz2aIsaQWZ
+l9qp4Bp8jJV/5j3p59GTaIrs57dKjWAWTSkyl3s4YT/xV90GjsDyraHdXvDW
+TKb2PkzlGEQJ4DNWDV3TZmM/quR6Dp7fe81pQSgsfx7I68D93ueXZitI3vju
+Ltmn9e7gFf/AfjbrBl3gcKukO0ZzUP9I+mUV6o9PTWDNhfs4m0qEqH9j+3HZ
+MtimOtCsDv2fik2vF8OSBO33nvDv5275r4Ppge5eFeZX4RHWu3oO2f+uQR/M
+O27Evoom943ftriH7CsixGcOXBaZcT8LPtS4L2UyyQN++vQD9jXh3clTr1Gf
+SiocvwSmLhnmamBWkLezO87njJ34voz0M6/h5Erkq3xl2nRYJjPgJiA3rpsS
+ysCS5KK71+DNo7yQbXBfYXGiOeqbUdkUEEPuZ3/97R7U12SULSM5Vdq//xUc
+OmIQdABufjc0Lgr93dReXJcHt3Ff7muHS4T3ZqrJ/CSBsesxnwJDnUk/Oc/3
+O9uA+cnldkNkfrLKDwu/wvtSM7gsYDPsV3XSJAb+uaHru3LS79SoqgJYXzr8
+5CPJW1Y01GAfNpwDV0RzYWZ+cy3sKXI6LYcVyRkZ53CeK0pwaSVuW/N2J7yy
+OGCPlQPqC1jb4oDzgR2bjothqsWNr0E9hbGFzQdhBe9ZmwT1ehnunHoJZh2O
+2diJfmqXGxbegP3YrroIvJ9GdfHTH5Dz2Z5FOsyrMSyo4ilM1/J5YbCvqHrS
+I3Le5MLlXsz/R9VUDw3MDFnZHISXtv+qrHYg7ymvyQHzd9u/SKggzz+WLnjB
+wvs3RvgxES4rvf1GzaKZJKMU0zBy3nZJSiVybpVa4wXLlcrtdcjPCMMT7BzI
+37eg953IR0TPHE1IfzOCvW1x/6RAX+1nMo+WDblx8LIdfOtBmGk86/4Q3u3y
+1GMYpjyiLqzAfiWv8kfHkvt3eL2sh8XKIg2H1Of412UB+lfM7kul4b6rwp2V
+cKs+ujQGbs5MG7DF/Aa+5NkXkfkdTeQfwXxD+AdT20l999Y0tcKRKSqevSO+
+r378NHPsZzBSoI+Fy/jRUlfs53GrMrMabqt9PLQEeaF7wOAYJ8zzvJ1gHnIv
+1881q2BZ9qPqMcj7kz7VpxKnpVvU4/4187tMm2DVqo7haHiU/Dj9//+DTf8L
+sFdb8w==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.776116632202752, 3.615966322027525}, \
+{0, 1}], LineBox[{{3.499999999996362, 5.499999999998181}, {6.999999999996362, 
+         11.500000000001819`}}], 
+        PolygonBox[{{5.552322615314452, 9.01826734053906}, {5.293188945044921,
+          7.780184249251306}, {4.602165824326175, 8.183281069670574}}], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.515942703607427, 8.676200089562332}, \
+{1, -1}], LineBox[{{3.499999999997692, 5.5}, {10.49999999999251, 5.5}}], 
+        PolygonBox[{{6.4, 5.5}, {7.6, 5.1}, {7.6, 5.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7., 4.5548}, {0, 1}], 
+        LineBox[{{6.999999999996362, 11.500000000005457`}, {10.5, 
+         5.500000000003638}}], 
+        PolygonBox[{{9.052322615314452, 7.98173265946094}, {8.102165824326175,
+          8.816718930329426}, {8.793188945044921, 9.219815750748694}}], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {9.484057296392571, 8.676200089562332}, \
+{-1, -1}], 
+        {PointSize[0.04], PointBox[{13.5, 12.5}], PointBox[{3.5, 5.5}], 
+         PointBox[{7., 11.5}], PointBox[{15.5, 5.}], PointBox[{10.5, 5.5}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T10", " ", "P2", " ", "N20"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdfei/fiijghgjhj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdfei/fiijghgjhj.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {22, 44}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwl1gs4lGkbB/DHKYfEVDZp7WdyihxLRKkZLR2wOWxpiiL0RSSKbSqHWacU
+orZCSbPSSZlmk5o+rGlTCWVWLEUMivbLYUixTn3/5/rmulxz/a73eZ77vv/z
+vjMWBx7w3iNPCLmKP/pOxr/iNZ9N1CkWs4lkt/8fB+DoogyHuTC3dij2/Tw2
+EettrbeARU2rHuyB+7u63bbCacvdTo7OZRMT34rWVNi+5njMOVhRds70ERxQ
+0+ngBlsHvM2V12cTqayuQhv2bGHYbYJDkn1GJxlsEvt+6Zsz8MakqfYxWPQv
+97Vv4eyXjUfUsF4rr3S+sQHOuz7QsQyOfqqqGwbbv8x3CYNFXdPsYljcf820
+FA4IWFPcBYv0PSOU0G+Td4dE0xDnp189sROWnIjMsoFzc13u3afXr6lbusMy
+DcG36pifu787dDss+TqttR1OUxs77AsvzPlmcx7Myf0i/yM83q0xWQNX91kZ
+OsH225bNvIOJryJnCWzypVzlI1wR6BKhTL3fovQ1nP/J4HAPnadPLUMIK/of
+Lamk/W46qRsJG/65xT8XvvFksFsHDvn+TnMMnXemcZ0Q/ZJvQhw5sOyFUrgd
+bH4wON2J7pfKOQgxf4VdS5QNnFsYMEsf9stPdraCGYMjydnIN7mwcsgW5noH
+phG4WuH6wAaY2VN9Y0AD67yXO+2BrY/Oax6ag3N8ZmIy4eyIijJNuEaXebUK
+lj42Wb5FHX24FsZPwJELg4R/zEafd322OWJeqZpz+y7YPDJkVRLMLKzhLYXb
+Qz9P18P8FctijOB+5b+2axthfbOg4AeYYXrlqz/smZo56zI8xZq+WwRLAocV
+tFAvbVJrdw9s/Tzi8FV4xbM4u0XG6GO16gI39Gd/LvjuBpiIE8WTcHhfwP19
+MK89qKcE823sdjiTCItlNW3bNOl9ajA7Cw4oaPCTwda9pruyqSMqQlbSvG7f
+WnMcth6NbdsD+/2kXBsNcxf0xPBg6SJxyg445KTqeDKc/SHPZRUsfJqjdhCW
+Kfl8twC2l3S4b4Cnqv/aJEP/aRWNHCV6XXRGpw7m20Yc8UV99bWbm27Awqif
+m1M06POy6Eo6zD7629pszDOlkHckhs5voxefiPlFs8LlQmDmeTffPTT/haK0
+YFjmf5e1Tg3Py8mg0TDqVw9f6avieWu6dT+eelo1j6HCJs59UbX5tP6JI6la
+yrivYw+UPqH1xktu2s1Cbpt+TBqHxWyvxjglNtFdd6rHhubttMN1SBHzCvYZ
+/ETzkfgWnILFia2bKmHmXiPuTlgYaLNUeQnmOMTK9IVHA5cc84J5jZO/psIr
+3B4P5sESown+GzhS8h/XDpgxueSpF+qZc14n6Jrg/NDDbe/g2ARBlTfMs6pP
+Tkd/yUHZWQmwxOFrjiP65zSYtf4KC/22xw3C1o9mZCLYc3Xm2RzMe/uh8/Vq
+mHirXrBEHgFW6uwnMLvtsMotWH2Xf0w5rde476AS8ssIKoi4QfdPJktWwoqL
+fO9l0vP1/iteA3/wtmPuhxn5vmVacPickOcbqX/R1ajAeTyPqkF9mKmbxLSF
+s0dI5zTms/YdNklCP2kfLknbqJufm9xCvzWJYp0qWPZ79W+lmE9Ud/vITZj9
+ooFfhPkdLQKL8mGy2qOO5hc9taWL5sc3My4MUsA7+TKnkO7ncF46y7OJu/L5
+s2Ww+P6OOhs5NlG5pRTSBEf+2ynJgSDPLD3FGXre+vqu8hkWyeWuPLQM/Ur9
+nuV4TLPwfNpy6HxszQdJ9lMsolg0NHWHOqMjIW6SReqtVgSP0fXPOJcWw625
+93c5mcKxLxQMYU7KvMJ0mK/GmUiA28UfpK+ozdbpWOA8aei3PdpL8Tnophbq
+0Xqlppe2wkTp0PRG9MMNK3NJpz7g55n7lUUYLR4hD+BsPsmLQ/9M95rRVphf
+IbC1wnxNF31dh2DGoy8BLXL092rz2oml9PdHpSsceYTvFX5HbS3gs/tgrqt5
+MV3P/kHZhIX8zD0WzGuHeT9ziiPgqfNTPWJaj7QnRcHSTpeZy7Cs9916F1gc
+f/zYMdr/av+Yv3Fe0/Pd+bR/xthMij/cX153xxoWqrxpKkY/XL1nExpw5FxN
+ngT9v+uO5Y/QPC60BgkwX79KZfpbmJjllWUij/YlDTv+hJki7XJP5HebGbK5
+gea7QyFY7R8WiSzhOrbC7Nml8i+/sMi9fv/j/TDP6zFPMMoi6pIOHXWaz8B0
+TuUIi5isGdtrR+edU6E9e5hFomtKovfRfFO7YjcOsUjT/qj2a7A4OszPeIBF
+JPnlPX/T9VlWipUf8flGbT6xzAzXzRhz58HhDZ4Xj8E8nwI3A7i+M/TlEzP6
+fXWwqheuSPnQPMcctpUzdMN5C33Gj3nBvHcXztijXuvq96JTsDRz9qMaGYuY
+f+LWPKbXb/fN6KBf54LTjkMwUTyVEvcJ/cyyVGdYoL6ch7YU8/HCvAqMYH7K
+DZ4l5o+Md5dYwSTTP9BnjEUcC03HLGFmZNvI+nHcT6ct2g1gnkAiGIb9XE7f
+06Re8c+wK/JU0a/XGqX9Jp6NolaXH+1spPXbrv/yEevze7psBHAAN/SyBez8
+6aN3GsysfV09H/XuGetlBMH856smiz4jn5gR/XV0vvwnDz6i/7M7D600hsUC
+fsJn5J8R33tnLp0327a0CHn0v39mOIv6oZKbCfKTPppuUKT1g7XEF3tZRJQ7
+mKBB999sKTPqRr62ClkGdH2C09OWNhYxHB7o/J4600zNoIlF2MUdHRF0/+Na
+YUst+peeP36F+vfis3lVyKP3u0gpNT/sTGMJ5gkoaqH5ECG7g5GNenoTojBq
+tlVV/v4q4v70VWcZNX3xKv///6Ml+3/dxt1U
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {1.87623281688787, 11.409748320682976}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwl13s8VNv7B/AdDhIZUiRlCFFolCOKZgip3NPlUJpCHZdKyLU0SnKUTDoi
+lEEkurhGUUYSR9F0QblOkooIqVTo+1m/n3/W622tvdbzPGvvtfeo7Tno7CVC
+UZTJDIoiLfX2N/70WdQIaRegbazvbYTZZedcE+F+VY/F8TCnt2iuEVzNUtll
+AzO+j70ZVmZR7WxnzrQeixLmp8VWw2cD/K8VwXT12U3XYAuJIws9YX6Xz183
+4fjvZkuUYP91luVP4PeDcymBLtabLnYRxfy6cfHl8cS+55McYP2icpXN8AhP
+f+QGPO3ukq8Gc7QUFJRVWNQim/PBP5exKBYnbH4CXGu5ZEk37LhQsVxiIdY1
+0Rt4AvMkVx6JhDNnGgY9IuOH3aSH4dDn4aKN8Ei2pavTIhblEGX+dytMzV3d
+kw1vWyuQG4D9+54/eQOnxOaqimJ9x7hyI0lVFrX7wNxgVZgRX7FiLpzQt6fF
+FKZ1Ph+SgF+cCB3bDlMNa8qEuL5NXpZ7COZ6y33hwXJdFsnRsH/ji0Wb4NgN
+J/S5pF/TKasX8T2T6G1KJLbSL/WFXfp6HU6T/Gfl6gwi36aYOdOhpP/fCPO9
+sCBNmOIGF67w8ulFva5LO7uuJPMb/S3hBe/vTvhCwQLrUsMvqL/B5Y0n65Cf
+4PqphHMwPcT1/HGY0xAtagmX3VMZN4GFJjkZMrDyZeuqoaUYdyc7aGQ+iwrL
+ldLmEd+0ixyCqzzOHN8M8x+XpYhh/LFvt6Sl4JH996MMlUndXPvqdBDP84H+
+cPjv0pVDsTDbtSfyJaxDf1/pAhdeDtUzQ7xXHBujlxI3fmIUwrQ3V2bPgmkH
+JbZqI9/6Rbr537SxnpiFAQ82003QH4JZCtau8qiXkGHyi5h3dtPVMFLP4bLp
+78QX672ewa3Nfg9mYj4qbyp+LurvHVQUrgYLpkw/W8Bqx8OUzch6a985b4MH
+nHu8XWFGZ9G/5H7pEIQvCiGeNL9lAIsfPjnOhbkum6smMP+M5rL6HNKfdOND
+Htw3WpNfQvJps9hhBb/+FjNZAdOn4hSfI/7frKGwUtIvcqF+M/xkYd0mcv2I
+eXniU+TvYilKOw3z30z2bIQzw753eZHrB3oWPEb9rO7aWxmR9WgVR7bA9/0G
+108hX9rMqP+GsT+zhlvtq+CRDi/NNHh1SZ3yYZizx7l3J3xmxqtCHVgoF7nD
+BHYr87HsXIJ9u8YR6sPPPg8uSoBHLspcWgvf9bgXYwkzpsd4++Ddu4xzp7Uw
+n27Au6uwwKQ/sBrmmnA8J8l6fmPpsTCj/4fJbsRXN782wA2ma7k3P4MPT0Z1
+GhM/MZm5Afld3WpopwbzIpT/qYGTtzffV4BH3LO6/0R9kq6GFMvD1PuVDWT/
+e+9P/akM+4fk+k7BEdLGwzow/9+40+tR76kzg5osmCZeVhYBz9sbJ3Ql86+R
+906GbZtmjISQ+EQWG1yEUxWvSifBjuJfyzjw7Qyz4VtwIfWh2h4O0xL1ekTy
+WzVv+R9w+4zCQ61kvZT7/blYX7nTw62bjDdLvLEKrtp99kEnsay5WBXyyVsr
+ViiA2Y7S48bk/LuUmnEHZu082laCegj3vjyZTOb3y1BdAS9J3CPwIfXxMle6
+g3oGXz602xAW3H16ww6Oj/5+8qsm8n9tuWpcCefDdr/3t2D62yjrQniMHRfm
+BXPMF0RFw5RMt6cSGV+z/kQAvCZC7nOjBuqRZdAcDpsoTew+BgvGfR+kwxVV
+fmOrYNaK/3Jb4Ydn5uV9W4x6fVtfqYn1o94tWn8P9u+02hYD/1rRZBpP+suv
+y43Dd+K6EvbB7JvsUW/kk9Vi1mILC5gd2b3wzc7rOmbk+m1p5dtRjwf9HIYx
+zKv90PYIbhvPUiT93JeuEuT535KSyNtI5q/IaA2Bowxk9XfBjjuXJRXDpbGC
+llCYVVge1gIH2J45nET6O17zu+Gh7t2NxeT6OTv5TfB0fsE/zWR8wdnhLPho
+l2Z4Pxm/f1nXLnhF3dYzEzBfqKktAc9X1RsVQT2oYJG/0hHfZa1OPTHiWlH+
+Yjh1xwLdXySfeoFlFvJjBCtav4c5/HTGQlhx3jm7BuKDquMXyfNV0x5/GS6s
+aR9cCMe2ZzT4kPXOmGneRL0PZCXr6cPUfZ0lDvBv42N2A+owk8kXg+UDP0pm
+woVpMl3PFNG/LTPCBRbe+b6vAn7QHPVOHGYdWWp4B14lXXPurhqepxPx4y/g
+OM/qe4dgQZ4cUwLzzfE7wNEnbjVOd4R76t1LxuiIt0A36zqcyffvroZZy1Yr
+KyLemEviS5KJb89bfhqeVD20LgwWfBrNFCXvl8+qgXthR66MWAR81G0wwp1Y
+uGdsEE7v+fc6G+adeuTohPo1nt3T50vm65xxPBfuLIjKiCTzVYWlvoc9tuVJ
+kPVGjFedlsN+RFczJUtIf3fYOnXYJs/ESwBz93vUKxELL7z4RPotHq7+iusv
+1p6TF0d+DOXEngqY175dTJmYUpbcC2t6bKzTIvn3R0/9Rnxa74r4S0m/16OO
+OPL9oq7xQAOm20d5zoI/3b4rogALRZ81kvs/4PklgwkSf6RhuAg8LRUZ8ozE
+y5HpOIH6SRe0BfFIPQ3NFWnwx7Xya0h96JIxbwqwH4OX6lka5HpOk7kb3P3N
+K7sC3xX+SZS3Gpz3YeQrHS78Mh5PwepH13w8ifdQobpKy495LCrcbpv8J5xL
+9Jbv62TQb8yR/LENZlh08U1gsR6xfnLfs/WkVI/CRic+lDjBjq9jjF7CpdS7
+K/2oAzesWXwN4psU/FqbAPOda3rJ/vdF2jLsSH/FVLYG8qOZ5ZqqwY49vm/T
+YZtYrT9nwf6BCYY01Kdbk/VzJnmPp83ZHQZvDZ0Tu4DU/Ypo1gvyPbmAK03e
++1x705fKaAvD/cR9SavdmrMJrbVHhm8mme/BhbseaI2OlbV0oGUJX9XtRlt6
+RKV4LuKncZ+mWME2fs5BG2Fh6SkNGiyu8KL+MOw/O/FgLdbrrcyoPg9Ti+uP
+7YF30LbPyIR5o0omo4ifozprIJV8V/l1rwgiz6OsbsExmGW1/+QI8k+18nO3
+h/lSyxJ9YR9Xniw5FxwjIhoGSH3DLaryST77FHwCYX7fBZs1MMfJ2kkKjl74
+0aeSPBdJJZUl2K8dB+vi9WHOzuoFgbB72uH8FKzr+KNkbCM83LJj4TTWcfRn
+lZnCD+/IB3vA7IKIShtY/v4mqybM69+vYnYAVugvG2AST8u7FsC2T0c8q9Hy
+jVSWT6FtnSjUdEBLX37k6y6MU/r9eXB0Lup9MVD3KZz+viHnGsxXLG60wjqR
+oxvdQmCafPbh+3Bi69LFbjBXy6hqJeK072lSc4F51y4582BLbkUim1xvHWj7
+G170cKLjKCw89dDZFnmaXi3Lz4M5SrdfnIDzhgoUu4hlS3Sy4dS3fzyfh/go
+dnhFHhwacsfeCabVPp4+Dw/0eP48BftbjKV5wQ+Wn/K9DQuyP9uowikaw4mv
+YG7O+bparN870/rDAHG4/d2tsPB6L/f/nDiT20nu5+OKx1pIPRjVTFc49/Sj
+2Hwy39e3C1pQjyc5ekHeMCfoR5IzrKDo9VMeLpz9WISsc2BBYDXJh7H+3S4f
++OybjSw9YrNGldmwhc6R8mwF5KNpNvAI/w9yqP4hC7MbKs8lw+rL3m4KnoP8
+HN62RsHTyoMrO+TRn0vzjIEr8tnr18H+AXK1V+BQ6tdEsRzi7/tzTwecfrpu
+nz5MqzudswTrxbZ0G9yhwTtPisbA6ml8260w3/vZsjFY2bSuTwJmON4x2od8
+uLxLcZdlsd6KqfYecl6sXpr0F1y4sfvqVtSjiu5byYQFWu2sR/CRo7u+2ZHx
+gzEpOqhn9KT0qWOw/xEp7SNwusmlpc0wvfEx/S6s//HM8vlYT/DL9IIQvu01
+0O4ECye/XCK/H4qv/kw+A/u7FnmSfiORi4KHpP/FgVXke0eJyZT6BrPt5fGL
+D+NG9BRVkC9j38eyxeR6602WK0k9upItKsnzqFQTZQyzajN3WMIvzdOjdch4
+H93XtchP/uOvHjHYMWT021ryfsypVGgk9bHI16hEffTbBi+E0cj561tnBi91
+72hQgDnDx74+Rr1ZEs/a1siS83GTsw9cGhMpy5iNfOUz6lXgFB2dRBkZ7Per
+a5792OcJqZTizlnIP5e9+j9YwShmd64U8ljeZPkI/lR56HHgTMw7ZcbugnWr
+2r/YSZLfy80bZTBf1WcrZzMJxJ9jWLyZPGfPLQ5vEEe7ztzuBvzwR8Ct0D8w
+/8jY77mIVztb7flTMfJ9kyz5Dyyt7zXhBFNhYoYzkG/FaxkvCqazS+aFwS//
+aQ1qF8V6+UybQdglaX9OF8x/Un/ZGfXrlJUo+gPjHUvS9+XDprU292zFyPn2
+MnUYfqV5Jq2ArHfqHwkV7Efoz1JFZcQjnNMbzIBfZa5xTiDx7dz5cCm5X14m
+qIkgflqo+4AUeX98vhrsDXNueIs8J/fXXwf4VcTu8ibHyfdmcuOGcZh7a+Ht
+RXDsybVnZ0qQ+6MnjLwvqyaCo76Lk99DDgZ65P11496ju+R6u1KRa8jfdGig
+xUmc/B5T3qIB5wmZ0vcQz8gNiSTyPPHVD+ZNI36exuCEPsxOmSpSJvUKeLu+
+AfuR1ynZNA/1EAjW5wTBVfO3T/6YgXFtqzxWwZ6eu1yeUKiflEa3PExvFrfS
++82kBIrCPZJk/wNeKz2cZCI/N7oSbBy/eNvBn0yK3nFZ0xy2sUxwZk0wKbY2
+3S8KFghtqq2/MSnaU5HhFtixkyvOHcf1N23qVyM+yi6qROsLk/JffZpdQOJl
+bv0tN8akGGJ7M9XJOTVT//iWUVwv5a2dRs6Dz1dmjY5gPRfdGFny/ZD144oQ
+phZPhoaT95MBr0oF47kJZ7Xa4L8v7QlLhUe0Njipod7GKkcNbDE/ra8pZgus
+PTuVUsf6hbUCq0MwTYsVLIX4GH0X5geS+yHfZMsXWJA8eo2cp/7rH7g1fkX8
+S8SrtWHh1Q+zIpEfvbXCmJw33LizvtMk303zf3JgwdamErPviGdh8X9y8Pad
+qz8wYLqqovYF8h4oincQYDxHKWzRHJi3+WiDIsyy2ClxltTjltZ3cbKefttm
+aXj7PdqGTMTLs2p0OE/q/SP56RDyc6x58H4JOYe9qvqGPiPeu30BzTiHGefo
+P88PYj76uhNxc8hz+FR5qB/xqOffdyf9q7Y+XdALD52usYWF3gZ9se3Yj2UO
+MluIcdMqPmNS/MYakRCYcj2c6sxnUkL5oQ+FxOTvwr3/bxVY/wOFNAsU
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.181526323287266, 4.607704332175082}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.00000000000182, 17.000000000003638`}, {
+          14.000000000003183`, 16.500000000003638`}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.892040876190137, 17.440709485718344}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwV1Qs4lFkYB/BPJmliWS1qd8o1t4hRK7n1RbVSi25yazGW1LhtbJEupEzr
+UYaIooxmSHSZaptUSHTdSkpKmUqiZhImhHLb/5nnmfme35wz5/zf9zvfMwac
+mDVhkyiKisKbXCkG+bCmKU1yZdFUpKrHcl1Y/3mIZSmcIXd1XQwrsjSCFs+i
+qcZiKm8bLC7MOVgPx3Jv912D6c3i0bmzaUp6njrGsMH3k6sr4uAMF9GjeXCj
+fYooD/4hLVPZH1Z4x1kQD55X/LwP5lck3iHzPf2bGRWwDR01jw3PqJ/oeAjX
+hndObcZ+jPEsaxncljWeFw4/XyK5OQJ7v6ly7EFefsr1fhU28gTSg/FwAyNN
+OBXW3GX4QpnUp3zOjgHzXRVc4S80tfSxRc4QyatetzAAZhX2aneSPKdiHNmw
+iVVQXANZ/3JzrjmsVdZdcpnsf8nAdTlclSK6X0jq0XEcToN9zXaP7Cd5S2m2
+HP5+4sLCODhY+NQrAvsP75niEA6LqTL5GFxaweYEk3qFr6xOop4I27fHOXCy
+OCNkFeoXSz75RZE8fsbcftjDmZ+UTLxoa+ghPZpqsdblFMC+h1uzmPo05brk
+uaKK5Dn9IpSGg8O+CN7DVGq9eji8fJ/kqDrqT8iLHkqEB+5Nb7CHZ/zUJEyC
+P1GrZ4XC7q1tlVzYN1Pp73Q4/+ycryvhUvaPfWfYpB9D0/Vgnz+l4/dIv01r
+3J4gD7M4PvI16S+rm+cH13Xv2i+H25qOdL1F/vgtiTO74eCaK6lRsMjr/h4Z
+LNBZ08eE7UQu2VJijRvSG+jHzhJe0X+wzcbav7JhM/0NPv/C+uvlKjyYauCX
+F5D7G723qQim1Uwke2Hx2PxHUngS43Ael8wfKi9zxPqBgVrevnBjjNX4FZjJ
+OSn0IPnXt2SuRF671pejbqS+JNOzPbBooafPMtiM9cBnFemXxYCFF8kzI8BZ
+ANsmxkeHkPqCsvg9pP+3ew8mwbIckfV8A5pKj5mTWAgnX8jM2QLrp3Iv1cGq
+2SvUsmFpZQT3M8nPfPHuFFyYq52va4v+lPISK+Btm36d6QoLVMr9j8N9J+mX
+m+HhuyzTPXCat7AnA5ZVu6ashdvtna+dhvMPfH83Cw5Od1a6AUe8tA9pR76O
+kWrqIawqvxpfQu6ne2diI0zvl5aR+x0+pfEyGZe90fZdBA93KqXcJOPWqWFa
+cJ1e2WwxrOnXMtaP/ghcEhYcgxWHjZ91wPynXHEKTD2T1X6Dt/BGTkfAjXb3
+kmbi9zaP6+nVsJlB8ILfYHFV6Q5nOPafvC+pcLQGz8gaFvMWVzyELzoXiU1J
+/q6ho6Sez6PO5maw99ytcVvh7I4AHTbMf//63B1YcUxzB+mX6jSnR9qGeP5/
+j30cQMZDdYsD4FUfm7R2kn5KzbNyYHHHlKfFJI/13SfVMCMsyO0B2W90e1Yz
+bNvmwBkk+X8Y026FPbocNAzm4/n27LrbALM+smxXwPaDJpYX4dhZc1oj4TLT
+0gc8uNZBiZMOBxuMM9fC6yR2yQK4UnPJgC6sUE4IO0fWe58x+Ar5RxsLb12C
+za57FQngDxPRLWLY+0T56ij4jQOOBpxwKoFaRvpRW5edCyvcfXot4EgLI/Vk
+2H19zm4Dct5sWiSbyLjhuslk3KkkReRJ9t9oVrUUlhTtGLQj638+dDUWDuT3
+SgxhTbWd1Bn41sS6q9PJegwNQT/c9nXZrmlwcsz2djfk/8As0CGu/KZ3IB8+
+omrPIvNbKmKmdcMuk4QnjGDfYrnMyYim1JJHTJxIf7otP6bCloc4NQEk38QG
+/xrYP3fjGMk/PF7whxwe9nQxLIdlXb4qysY4TwPmVs1kvbntCUx4fAIvWJX8
+fxnT/wPf+3c5
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.393275441506763, 7.232686837739852}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJwd2Hk8VPv/B/BRXGsMWcuuLCUmylWUkSxJGpW0iOmGuiWmhTYydbWTpULS
+NAqlyNKmkhC5FE24KGubEL6TRGnxe71//jmPp/M5720+58zB4K/QFYETGAwG
+W4LBoCNjeBw/k9mMb3TUZzOEmwYEp1XZDFZHZrSGAZvhyxjgTFNjM5iM3E4j
+OOfRkZfFcHxwwJ/TYM11D0pWqrMZPS89WJpwo0it6j2s+fSVmOIVdco1b9NA
+vLR2vTaKv7/a6QPcEpLfngvzLlV9XqaJ/JvXFYXDItstYVfg4w8XXLCFK/K2
+mL+HOXNawj7p4fc9ssuVtLBu9ugPLtwWxf42DeZoXqxq0mUzSs8mTTOG2Rk3
+G71gc+6zq6qw2Kn5Y5MO4lkJtL4gHj96t+9W2Nwm7kEFzNRpHFGC7W/c9oqF
+Gf0ZxTXabIZbh7yUF53XmP9fGtxf0T1LFY73Hdh5DI5+4TCzFf3k98Q+PQm/
+92iwvg7HJ/r/yoQ1xzvNjsDCmMdLmuF4ef+doXT+w+SRqcinOsn/Jc2HOdfh
+EA9+P/+bRwTM79v+RAT/DJfTvAxzJB5q2aKf4OiMI+0wb+xNUjr1K06RsqD6
+6n7byGAe9hKBMxJpXj72qpth8TzzImn0z61zTb0PxzycWXwKZuYF3/0B59/J
+uzFlCvLds5RQw7xjzF1O5MPM5LEv+vDiU9cUl0xFPJ5pB3lO8ZVXnfAardtb
+VOGcWuNUHvoqHTKJHEU8bucZh1E4X9yvlgfHl4YbUV+isPD3XrDbcKdlCyw0
+65Z/h/p354jGzXHkVVdvCcKxpfqvb8E4drme2NKFdab7MtYmw9zn7157w7tD
+w11yqO+ggMfPkMc0fMoTcvzRN0xXeHjg0PVUur7IIuE56jw+rzZ1L60fnZ7M
+hVuiq18tgfMN1d78Acf4n7ZSofgSIdvL0bcwN6P2P+Rh/O29/hxsnrRW6jys
+v2d9Ix8uVpKx5cKlN10YR+C0ZttUS5ijvHNiOhxgvF9Onq73fyHdAPdvKOn5
+SvOYaMnRRL4tnZ+GhmBW8ETv7bBtvbKpJNZzR3b01sKL5Xm3ZlD8veab52Jd
+13KLriCYpebaKaD9N3exehHlS5D1lMKRHV/YpY362b8uvNgEtyXX/kykeSwP
+bLgDdzWN7tDA3BkWDI9RWGz4X34WXNpZ+2oa1t2e5eOrS/dh5+ZBO7i8oES4
+FY7feuDjfJhZv2v4DpyfPaxnAItmmrB+w6zBipFBxNM2llnmiPueL/pZkwnv
+jWPuj4TZ8zcNuNIcxqZYFsCcQf3jLah/UOmHfSvMCOFHrodnpA++GoNFTXoO
+/6F/yaz32UqGqDvb8ZI7/JvjVK4Fc/RNBKWY58hdqWwyd/bxufbwwZT5y5kw
+X8NrWjn2dXewrvQ45TOuKV4N13y1Df8I85zm3vuF++LnTmb0M5i5/ZHcA7pP
+1pq65MLipSvq6L7vuK/TdxrWv3TXcD89l1hVgp3UX9VV4yhYMcwtch1cWp76
+9QK8Sk5ulxv12z61oA62mh8xa6EB7deQs/TccUndJ7OA+vNMV94K8/4nwXCh
+/p07R2rgJst3mWth1kF+qhX6UXV4NHUv1VcpoZAGB/lfUk6n/CPdrhMwjxJt
+z+oGuMs2MJj2c3iqki7Ni6WS018AZ13LifeC2XsKS4fg1fWmPudhES8hTg/z
+zoqICX0Pi6fk1dP+Olj/4zbLCJ+vk5vYGm4T248cgIWXHD204KRzpQoVcHxl
+nGc34on07L78MQ31pQ75pcHX/+x6vQjO15zdtAAOqti4MBwuFfE+1KJ+xYC+
+z5fIm3J2c+DnG7ZZPiZnZn+vRv+sR8WCBnKl7hIH2Hjp/LXtcHz30KY7NN8L
+93raKL5f3qLZ8NuQJkdaz8xbkn4Pz8GxuT/ul8HCqK21HnBh1JLv2TAv127f
+ML6H8mvtemPhrvrkswVwSU2sMJTiX7eyOAp39yxd5kX5v/zasAv+o2JQZy4s
+Tsidtw+2its5Q4fyb29oSIIf9Kzzk4c5+9Kca2D7OycCJGBu0b/lTHouHyg+
+x6B4zxXuBcEZXzf3ydL5kmufquDixUfFFI8ZmX3LEv0MvyqvtIf5JyR1zlO/
+IY7qQbC+wclp43Cd5iT983R+XUyfL+3nB/IPG6k+JZXuXNg3zjBQYzrynj+g
+OghnJSms8IeZFzKM6LmuUGR/8DosGq86awn/9pGqGIE5XveazOGc6SZDjsb4
+HJ54rVaGfaVfvz0Bs5tjo9sRr1y8IfE5rD+t6WUibONpPEfGBP0w+wTW9D2y
+pszZDuYnvDF6gnrr99wWBMDCwnWezrDFaFbEP+TIOSkl6D9Va/2pZDh+yokW
+a1hGbNAjhPW9/2Nexzwb6zL1yZySTbbG8HNfzVlJcOljI5lcvHeUX5cIiqZ4
+XGb1Itg8b2p4MJy/z9LkE95b6sV1bhyK91hCPhvmRsmMzIa7Vn/bfxBWYC7I
+mUz1HmAdDYY7dPjnR6l/71XzdsF9/EuNnbCoXE2QAPtdt3atg/MT3Cor4ZsZ
+J89XkFlWrQrIr36QbUBmPJvnvAleeNeuodaY3jfKqirgsSfCeW8pfuf5QnP0
+M+RgHCJB8/vgqEL76XSQlNZMmGff/e4HXLMscbcfzHgs5b4W85mwZrV3Kq1f
+Gfs4G9ZUXWPTTr630rUXntKotGS6KdYPSiTRe0namY3HeTC/Mm+OGbzlS2Nt
+McxK/Dd1OvzUz7xH2gyfW5vJQln4bu/2wuUwO6UipRHxsm5tm5FoRvstz+gE
+vbe97DhSC4tnp7ia0XvMIxtnxgzU+/ugUxHdP/t9nMxgRnCK3Hz4aKOwzBVm
+z6ybcgv9p24oDV0Pcy+fXmZKn9/knyEBcKlEW4aA5unYwNkE638tUJ8K8z0k
+ldfCzAN9ay7jvXRdtI08xWNNrsyzhVOab/dbUP4bGmVvVDC/uBeXVeD4rPHt
+QrhmqcBlmPqRy7wdDqt+GPmjifqdtuxCIGyazFd+QP2xU6Zvh9vkGg9chlkb
+1q+KgRc6pcxKoH53aLDK4LcTDz8/BjPihO0yyC86LH2DXGqoXewPt3VFPqD1
+3Pypp8pgd0OrQ1mwSGFxshn6Gcz9oPqU4vnlfEqERb49WmK6PmLwyDf4csWr
+p0aonyOqPOmN+YjO9fX7U7/fJu/LhA2zXCWv0HxkrNe+h39HmNt/onkzM7oV
+Me/6suFYm5no/+GmQkN4bHVA/WGYpxNhrwsLYl1aamH9mqcTJeD918MPqJnj
++nPzTj1DvIyT/g99YNaCo6uiYJsqKVEizL3kLNKFBdKP7SvhrqFVi3NRr+Dq
+y84BWJS9M9sCVtyy5rf8LPQTFX3oKvoPsRlYqgeLvBdc04Y7ztYMmMCcCFX9
+M5jnjIFF+4xh/sWsdiVYyBIMTIXZE7PPJCuzGSqHBdmycFddwiEL+DlnyobP
+yMdh/XBpYeLo7zTaSO4+9ygZdpf0TrwLMwPnt4bAd6dGbUih+stXXPSDx/75
+eiQCjt8W9jsIdvmoqh8Il5ZdHDkKb70Uo7yK+lvBOFoMl1bs/OUO5+vI1kgi
+/wTuZOuldP3lq1N9YcMplkJvit9yfW4JzK2eV7WV1genbjSm/bZ6/P5JOs+3
+yY6D1X0/at4h6ybJfYX/iuxU76V4UmU5XpjPSPyTQ9PRr3hGmko6PD/vU90W
+mlezsnsnvJfvO7OAXHJETZaeX8P/O/2T5uX+ZpI2zLTJfelmgfNG9Q/VYfWr
+oeVn4Pgjs69+w/WFxYMLWmE+b2h9Oe1XwRxnHUt8/m/+CgiD/3VIVlkDd536
+aasKu6zwMT8Js31CjS+jXqaTwe5COP70yAwj+JtFrZUIFi8PfH4B/c/xfav3
+DuaZX+lhwtq+cQGf6HrPmMPHME/1xtHzvXCpi2esJHx4Yl95B+VvbuRpKeHz
+/3uh43OYyxuPcFPE+1C4V9UtmF9atuPiJDyPNFguyRTvWMIXHdg90urVXorX
+sau9VgHfv4Gteevo/HS+Zh4cMuf9yEJYP+fFsTLYvCaozITylebITsT1Y5dV
+v6hTvtvDsaHwBJG/uSIstCxnSyB/ypvA+2SGtrAqHx77sTxai9arPjkdhno7
+NO7JW8KigDhlI9pf/js2LKf5NNe7x8DxgeNq+8lBoh2f4b2hlwJuUrx3n/KW
+YT5v/dom03zizbRj0mCGu95SDRbyR/dovYatP3icsoMZtemGEzHvjduznDeS
+h6a7qsFxlxsDj8Hi/hpNun8KXnIacmCm3jZTMa4/7tETIYLj3w/L3YdXMb9s
++kwOWbZyG3wguypLcTZsV3VIFh7f+PuEyWx633jdm4R6eZ6GfDuY7zw7TgN+
+vCbK0h1m9Pwc0UP/Q26isJXkeWk6cpiPm0XW3z6w8Gt6yijm/eeh/WtXw129
+W5cOybMZt96F/cshh+w6PRHe/M+kv11hdpllrbUcnmeNeWqUjzsmmHVSls3Q
+vV9bZU7rm22dFeBEZ0GsDq1nuXc8kmEzlhfJRFH9XTwTkRB++920kEHnRU2f
+bsNnWR8tv6JfttGvX6PwoOqU3n5Y3+b7h0DEC56QldPDovvdruwbnBPA0OuF
+uXYqZtmo58ZJ3q1BmK8dyA9Bva35q65+p+tvzfB0QH/uw2njsjSf/o9CZewf
+p6Kk43o0D1eDPa3wcIVcyzya53CY6RnMR1k6xWsNzeeo6jNLzO/TWp1Z+8my
+/gnZcKXB/w4K6Hq8XY/BVxIPO1bApUst/RSZ9H8JM24f9dcWtFIaVnDYVq5k
+hfhRA4ovsL7B75SPNdz1TyzLH+6/cs9gFcx3SVtUjvytzDD2DpgtzfX+hfr2
+uDR9PwELMxfpaMCPpHXKL1I8SW6OBvoLdAx3zIHxhaIjg/7TV5z1uQOXzkmZ
+O4R5lVRL6NynfD87xzox35Knum/vUfxFL5e1SuPv1ycNMwsp/l0n/sAf2D/n
+tG9eo/OxT7/owr4mmYvTKF7QhbJwKeQ7V9kbS/n7zHhjkmzGAN8+5yCt3zZW
+lAsvDpucEUrnI1M2JsLhkoYfN1J9H0ZNr8EFZtciV1O/c/Vq+uEJ0Xt8PCn+
+zJ+TfRH/iLbOIneqt3Ozmhi2+7iz6/89HrM+HfWYhH2+wqF4ngbszai/elT6
+3/V0fsOCxbboz/zQjeXBVvS+prlbDv07zP1T6jDFX3P2RQMc+UoQQf1wG51v
+ncT+0W5o03hI9RTcX2CM+fHnbJ/UTvWXl+QI4OqeBJ6ENXyx9+YAbOQoa2cC
+M1RGMhUxf8Vukc8ya/p+8Wj+jfOOU6Nv7oT5nLzjj+AJze0WSdb093urtAd8
+N/tD6124S/g6LRf5xX1eTQ2w8MzhzR9RX9aXgsB+yjeabsaA6d9847SejtLs
+/wPOwiIH
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.674112975512006, 3.0634133525730736}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwl1Qs0VHkcB/DLlNcqtSFFDCaPpjx6EuWaipIyGyNKIdbamEVovdolW06t
+avSiDU2xslI5JfTS3ZoSWTsSZpVM7WyNHsxSjYpmv//2njPnns/5v76/3733
+jPWWhHVfa1MUJcSP3P+/2DQ1qsHlSFM092maASxRBm6ogqUvQ3RYsLwka3kQ
+zIwtun7fiqYqZ139oAXLNedrs+BYi9tZ9Q5Y/zC0TRc2o9Rr0uBsXkd7uiVN
+xY/zWeILJ67vM+2ZQVOGkxPd7Mj8Ya9JrvA1k4VzTGHV4wFJngX88ucPxBF6
+lvRzc5rK0vy2zR5mm41QIXAru0+4AhbJZiQ/mY79vd6+EsL8q/y0PXCKH2tV
+CcysqDQIgl0iaoR/kvEqhzEe3BDkM50i9RRUPxbArTm7ZnJJPWv/pfbCTCrF
++MMiT0FZD3xX01sTCU/afmKpN86XnXTf8w3Mb5r2+hIs1VW1hBFb71Q6I391
+vJDyJv3jjZpUwKJUbYkx6W+Af6ER6lUs9qv7i+R5tSYkGnZoc48+SPpT0nWg
+BC7qSrXkkf7N+MCtg4OYVMkre5oSjwzanCHrmxt3H4XpzfvLMuGIZqPyZTD/
+cqCNI1zZdnrmiB3qbnLi1ZM8x+Wl9bDcJO0XLty6wPrNT7DqztVN+5B/XHP9
+7C1wRLDimYL0533mOj4s6hqc5wEvz1waGUDGjX4MPjYN6ywn+m6GpV86/60L
+h6WveZsB83lM7H4zPI/SvJxTcLZQpJ4LSyeqA9vJ/A4l834q+vhrdwQLeZlD
+nAcKeP4OVex8WBUiGxuGE734SyLgxM069zhY/+YeSzsXrrnOrdn2eT9x3DFS
+v8Hlr7rh2QUtw2JY2p7c74c85epMrSKy/4WkmxKYMc7U/gFmT357i9QjScpI
+CSTjmbu0T8OGJ316p8HyA+5rP8GKFTkXOpCXPSHo0mL0R9W2dS7pV7a/0XAw
+bMblujiTceNztwLg2qT2LtlMrLc9ZMaB2TrdMbtg1RYrx07sZ9znN+QGSx1X
+hcfAh/f2mas56O8NG+te5OMPKR/dhGmXugwaVgiUglLYxe3o2SLU55lQXL2X
+ONP+7AD6E1J38X0esUB2YDVsJlnuewRmEuZ8qjfF99PAEdfAlLqq0gNW6do5
+d8PisXl/PDLB92TmHz8eeajvdnacgMcVWwsWEQv6dfJgT/pcdSzssolJOgiP
++Bl5HYHFRjce3YCzV+7gXIZFpuuGDLD/yhMHNVKYbqzPFcKyB0Nze8j8jqMv
+++Dohx8NOmC+xeu8UOR9490vu0Lm2zcua4cb7jaMFcCJWwftl5J6o2wUoeT8
+jatfFMKMJeuFMdmv7vck8rzlWqcW30E9bIcKXzWsLLAvToLlTr0Dw3C+nnCe
+OSwdn2feCotbnno32eL9CTzflA2n7Kx+kg6L7OptTeDicCfJQljsvi1qP/KU
+Z7DVFJwYyokbRn5/YefFHhvkr8mP9IeZ6EaP27BLWc+cU+iH//ooCQOLqcr+
+MWPUp5mY0grTZfcDYmHFkqiEZ2S8gnbtn4I7f/TdF9ifMfUY2Q3HslYdcoel
+F615PrAD/+HqOJh9qfOII+y5ofFZMcl7OsHDlditj9tC8k24uWgjXFQqcBgk
+4zxVXBms1AkT6qF+VZZNNwvn5+sb+k6BJ4XR71JgivX98wmkf4+veQzAxbnx
+uWpSf8GnwhjUo/xoGy4l+WL+0e+E6d2a5mMwRQudXFF/fm2VfjCcfSb9TjJ5
+v8KfLNAj+fnJswphC0Mr3VrUy7jllBMb71h5fBPp3/jrZ8j88nCt+fqkf9/W
+jHLhiLjbQ1escX7x4X23cJ70JFW4HZYXGIV7wfn9PJ4XrOqMnF2BvCF6fj5T
+4c8XPEL+v9j0f1GRbYk=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.232686837739852, 11.393275441506766}, \
+{1, -1}], LineBox[CompressedData["
+1:eJwl03dM00EUB/CDggFRmUorUttaIsqwhqkQPRUVUbQoYg2CFSHgQBC0SlCm
+CARHNdoUQ1JkRMCRigsHAsFiURPRpIZ/BDEgDZUhQqg4vxd/yeXyyV3ee/fu
+fsKEtO1JloSQEAw2//+8KbFi8yJKzNm25m3wi5K0qkERJYI6wxM1XJlTQ1pg
+4xWPvR/g1t0nqophblPnTWsfSrzrBT/WwSk8bYQYDtWWBk8JKal7OzAsgZ/d
+UoprYaX9mkQvtn9lkiEK7uIernCB5Ql3FBZw92OBagTx1TTHuklAyadLOWuf
+MWuWOGbBlJexMx82XzcVbITDhfZ2a2HvHe/SPOCSNXn9lvCeDt2UM+zZfFeu
+96JEJn/px9xVJXyggslEvL8ItpGElh2FXSLTHVazdcH+jlg4LDWLkwwb5wXE
+7ILPTe4rV7F81OiaBPcPeQx0snzdFfozMI39+fwXq+9Fru0DOG/EbYYXziPt
+yT7+HRZnCz9L4bFR0ctQ1Bc2PvT3IKzWKWadhwl/fYcC1gbuHeiFj11wyc1g
+/Xszpmf9m2jPzIiDU86ERGbDMkvX8SC46YYk9SkszqXRHFiv3KIfho0xV3ra
+WP2XnLvtfSk5Ve1WpYCly524Argk6G4E61dd0Rd3PvOx+53VCxG3xKCZCZOE
+TSEWsHG08MAg4oVb2Voc4uPeE4tWP2L3df/8EaM7JemWRfdOs3ynxZW5cJfv
+c9Mq5iyn+QFwysP1+/7iPFJPXr4dbE7yL2+Hg2XV6RxY7TD340W4q8H3qBuz
+H2cqGQ7/VmwvhbtVtya3wtyRA84VsHGR6ecGWLuC/97M1vMm+FHsPZZaq+NR
+n8QzcGcqi1dWINLB2j9fFdfYfl6LSIzzSKzSpOz9pvcGtmXCylFrnTvqpXsG
+eLdheb4fSYWbLqfUv4KlYdGNLT7sHmNq9HCrrC/aEf2pM8T71cKCaW5GHGx8
+rVDKYbOvxqSBaftmzm/kH5t+FGKAPfmLm3NgetXx9jQsbzyrMqH+k4kNRXOW
+IW5PYWMEPFa9VOQAV/bpZtcsoP//T9iGzQvoP3WPQ9g=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.47431403485444, 8.442668420912664}, \
+{-1, -1}], 
+        LineBox[{{14.000000000007276`, 16.500000000003638`}, {
+         8.000000000005457, 13.}}], 
+        PolygonBox[{{11.51826734053906, 15.052322615314452`}, {
+         10.280184249251306`, 14.793188945044921`}, {10.683281069670574`, 
+         14.102165824326175`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10.823799910437668, 15.484057296392571}, \
+{1, -1}], LineBox[{{14., 16.50000000000231}, {14., 9.499999999998607}}], 
+        PolygonBox[{{14., 12.4}, {13.6, 13.6}, {14.4, 13.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.9452, 13.}, {-1, 0}], 
+        LineBox[{{8., 13.000000000003638`}, {14.000000000003638`, 
+         9.500000000003638}}], 
+        PolygonBox[{{10.48173265946094, 11.552322615314452`}, {
+         11.316718930329426`, 10.602165824326175`}, {11.719815750748694`, 
+         11.293188945044921`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10.823799910437668, 10.515942703607429}, \
+{1, 1}], 
+        {PointSize[0.04], PointBox[{5., 8.5}], PointBox[{15.5, 7.}], 
+         PointBox[{14., 16.5}], PointBox[{8., 13.}], PointBox[{14., 9.5}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T11", " ", "P1", " ", "N21"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdgef/figjhihjij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdgef/figjhihjij.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {44, 44}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwl1gs4lGkbB/DHKYfEVDZp7WdyihxLRKkZLR2wOWxpiiL0RSSKbSqHWacU
+orZCSbPSSZlmk5o+rGlTCWVWLEUMivbLYUixTn3/5/rmulxz/a73eZ77vv/z
+vjMWBx7w3iNPCLmKP/pOxr/iNZ9N1CkWs4lkt/8fB+DoogyHuTC3dij2/Tw2
+EettrbeARU2rHuyB+7u63bbCacvdTo7OZRMT34rWVNi+5njMOVhRds70ERxQ
+0+ngBlsHvM2V12cTqayuQhv2bGHYbYJDkn1GJxlsEvt+6Zsz8MakqfYxWPQv
+97Vv4eyXjUfUsF4rr3S+sQHOuz7QsQyOfqqqGwbbv8x3CYNFXdPsYljcf820
+FA4IWFPcBYv0PSOU0G+Td4dE0xDnp189sROWnIjMsoFzc13u3afXr6lbusMy
+DcG36pifu787dDss+TqttR1OUxs77AsvzPlmcx7Myf0i/yM83q0xWQNX91kZ
+OsH225bNvIOJryJnCWzypVzlI1wR6BKhTL3fovQ1nP/J4HAPnadPLUMIK/of
+Lamk/W46qRsJG/65xT8XvvFksFsHDvn+TnMMnXemcZ0Q/ZJvQhw5sOyFUrgd
+bH4wON2J7pfKOQgxf4VdS5QNnFsYMEsf9stPdraCGYMjydnIN7mwcsgW5noH
+phG4WuH6wAaY2VN9Y0AD67yXO+2BrY/Oax6ag3N8ZmIy4eyIijJNuEaXebUK
+lj42Wb5FHX24FsZPwJELg4R/zEafd322OWJeqZpz+y7YPDJkVRLMLKzhLYXb
+Qz9P18P8FctijOB+5b+2axthfbOg4AeYYXrlqz/smZo56zI8xZq+WwRLAocV
+tFAvbVJrdw9s/Tzi8FV4xbM4u0XG6GO16gI39Gd/LvjuBpiIE8WTcHhfwP19
+MK89qKcE823sdjiTCItlNW3bNOl9ajA7Cw4oaPCTwda9pruyqSMqQlbSvG7f
+WnMcth6NbdsD+/2kXBsNcxf0xPBg6SJxyg445KTqeDKc/SHPZRUsfJqjdhCW
+Kfl8twC2l3S4b4Cnqv/aJEP/aRWNHCV6XXRGpw7m20Yc8UV99bWbm27Awqif
+m1M06POy6Eo6zD7629pszDOlkHckhs5voxefiPlFs8LlQmDmeTffPTT/haK0
+YFjmf5e1Tg3Py8mg0TDqVw9f6avieWu6dT+eelo1j6HCJs59UbX5tP6JI6la
+yrivYw+UPqH1xktu2s1Cbpt+TBqHxWyvxjglNtFdd6rHhubttMN1SBHzCvYZ
+/ETzkfgWnILFia2bKmHmXiPuTlgYaLNUeQnmOMTK9IVHA5cc84J5jZO/psIr
+3B4P5sESown+GzhS8h/XDpgxueSpF+qZc14n6Jrg/NDDbe/g2ARBlTfMs6pP
+Tkd/yUHZWQmwxOFrjiP65zSYtf4KC/22xw3C1o9mZCLYc3Xm2RzMe/uh8/Vq
+mHirXrBEHgFW6uwnMLvtsMotWH2Xf0w5rde476AS8ssIKoi4QfdPJktWwoqL
+fO9l0vP1/iteA3/wtmPuhxn5vmVacPickOcbqX/R1ajAeTyPqkF9mKmbxLSF
+s0dI5zTms/YdNklCP2kfLknbqJufm9xCvzWJYp0qWPZ79W+lmE9Ud/vITZj9
+ooFfhPkdLQKL8mGy2qOO5hc9taWL5sc3My4MUsA7+TKnkO7ncF46y7OJu/L5
+s2Ww+P6OOhs5NlG5pRTSBEf+2ynJgSDPLD3FGXre+vqu8hkWyeWuPLQM/Ur9
+nuV4TLPwfNpy6HxszQdJ9lMsolg0NHWHOqMjIW6SReqtVgSP0fXPOJcWw625
+93c5mcKxLxQMYU7KvMJ0mK/GmUiA28UfpK+ozdbpWOA8aei3PdpL8Tnophbq
+0Xqlppe2wkTp0PRG9MMNK3NJpz7g55n7lUUYLR4hD+BsPsmLQ/9M95rRVphf
+IbC1wnxNF31dh2DGoy8BLXL092rz2oml9PdHpSsceYTvFX5HbS3gs/tgrqt5
+MV3P/kHZhIX8zD0WzGuHeT9ziiPgqfNTPWJaj7QnRcHSTpeZy7Cs9916F1gc
+f/zYMdr/av+Yv3Fe0/Pd+bR/xthMij/cX153xxoWqrxpKkY/XL1nExpw5FxN
+ngT9v+uO5Y/QPC60BgkwX79KZfpbmJjllWUij/YlDTv+hJki7XJP5HebGbK5
+gea7QyFY7R8WiSzhOrbC7Nml8i+/sMi9fv/j/TDP6zFPMMoi6pIOHXWaz8B0
+TuUIi5isGdtrR+edU6E9e5hFomtKovfRfFO7YjcOsUjT/qj2a7A4OszPeIBF
+JPnlPX/T9VlWipUf8flGbT6xzAzXzRhz58HhDZ4Xj8E8nwI3A7i+M/TlEzP6
+fXWwqheuSPnQPMcctpUzdMN5C33Gj3nBvHcXztijXuvq96JTsDRz9qMaGYuY
+f+LWPKbXb/fN6KBf54LTjkMwUTyVEvcJ/cyyVGdYoL6ch7YU8/HCvAqMYH7K
+DZ4l5o+Md5dYwSTTP9BnjEUcC03HLGFmZNvI+nHcT6ct2g1gnkAiGIb9XE7f
+06Re8c+wK/JU0a/XGqX9Jp6NolaXH+1spPXbrv/yEevze7psBHAAN/SyBez8
+6aN3GsysfV09H/XuGetlBMH856smiz4jn5gR/XV0vvwnDz6i/7M7D600hsUC
+fsJn5J8R33tnLp0327a0CHn0v39mOIv6oZKbCfKTPppuUKT1g7XEF3tZRJQ7
+mKBB999sKTPqRr62ClkGdH2C09OWNhYxHB7o/J4600zNoIlF2MUdHRF0/+Na
+YUst+peeP36F+vfis3lVyKP3u0gpNT/sTGMJ5gkoaqH5ECG7g5GNenoTojBq
+tlVV/v4q4v70VWcZNX3xKv///6Ml+3/dxt1U
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {1.87623281688787, 11.409748320682976}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwl13s8VNv7B/AdDhIZUiRlCFFolCOKZgip3NPlUJpCHZdKyLU0SnKUTDoi
+lEEkurhGUUYSR9F0QblOkooIqVTo+1m/n3/W622tvdbzPGvvtfeo7Tno7CVC
+UZTJDIoiLfX2N/70WdQIaRegbazvbYTZZedcE+F+VY/F8TCnt2iuEVzNUtll
+AzO+j70ZVmZR7WxnzrQeixLmp8VWw2cD/K8VwXT12U3XYAuJIws9YX6Xz183
+4fjvZkuUYP91luVP4PeDcymBLtabLnYRxfy6cfHl8cS+55McYP2icpXN8AhP
+f+QGPO3ukq8Gc7QUFJRVWNQim/PBP5exKBYnbH4CXGu5ZEk37LhQsVxiIdY1
+0Rt4AvMkVx6JhDNnGgY9IuOH3aSH4dDn4aKN8Ei2pavTIhblEGX+dytMzV3d
+kw1vWyuQG4D9+54/eQOnxOaqimJ9x7hyI0lVFrX7wNxgVZgRX7FiLpzQt6fF
+FKZ1Ph+SgF+cCB3bDlMNa8qEuL5NXpZ7COZ6y33hwXJdFsnRsH/ji0Wb4NgN
+J/S5pF/TKasX8T2T6G1KJLbSL/WFXfp6HU6T/Gfl6gwi36aYOdOhpP/fCPO9
+sCBNmOIGF67w8ulFva5LO7uuJPMb/S3hBe/vTvhCwQLrUsMvqL/B5Y0n65Cf
+4PqphHMwPcT1/HGY0xAtagmX3VMZN4GFJjkZMrDyZeuqoaUYdyc7aGQ+iwrL
+ldLmEd+0ixyCqzzOHN8M8x+XpYhh/LFvt6Sl4JH996MMlUndXPvqdBDP84H+
+cPjv0pVDsTDbtSfyJaxDf1/pAhdeDtUzQ7xXHBujlxI3fmIUwrQ3V2bPgmkH
+JbZqI9/6Rbr537SxnpiFAQ82003QH4JZCtau8qiXkGHyi5h3dtPVMFLP4bLp
+78QX672ewa3Nfg9mYj4qbyp+LurvHVQUrgYLpkw/W8Bqx8OUzch6a985b4MH
+nHu8XWFGZ9G/5H7pEIQvCiGeNL9lAIsfPjnOhbkum6smMP+M5rL6HNKfdOND
+Htw3WpNfQvJps9hhBb/+FjNZAdOn4hSfI/7frKGwUtIvcqF+M/xkYd0mcv2I
+eXniU+TvYilKOw3z30z2bIQzw753eZHrB3oWPEb9rO7aWxmR9WgVR7bA9/0G
+108hX9rMqP+GsT+zhlvtq+CRDi/NNHh1SZ3yYZizx7l3J3xmxqtCHVgoF7nD
+BHYr87HsXIJ9u8YR6sPPPg8uSoBHLspcWgvf9bgXYwkzpsd4++Ddu4xzp7Uw
+n27Au6uwwKQ/sBrmmnA8J8l6fmPpsTCj/4fJbsRXN782wA2ma7k3P4MPT0Z1
+GhM/MZm5Afld3WpopwbzIpT/qYGTtzffV4BH3LO6/0R9kq6GFMvD1PuVDWT/
+e+9P/akM+4fk+k7BEdLGwzow/9+40+tR76kzg5osmCZeVhYBz9sbJ3Ql86+R
+906GbZtmjISQ+EQWG1yEUxWvSifBjuJfyzjw7Qyz4VtwIfWh2h4O0xL1ekTy
+WzVv+R9w+4zCQ61kvZT7/blYX7nTw62bjDdLvLEKrtp99kEnsay5WBXyyVsr
+ViiA2Y7S48bk/LuUmnEHZu082laCegj3vjyZTOb3y1BdAS9J3CPwIfXxMle6
+g3oGXz602xAW3H16ww6Oj/5+8qsm8n9tuWpcCefDdr/3t2D62yjrQniMHRfm
+BXPMF0RFw5RMt6cSGV+z/kQAvCZC7nOjBuqRZdAcDpsoTew+BgvGfR+kwxVV
+fmOrYNaK/3Jb4Ydn5uV9W4x6fVtfqYn1o94tWn8P9u+02hYD/1rRZBpP+suv
+y43Dd+K6EvbB7JvsUW/kk9Vi1mILC5gd2b3wzc7rOmbk+m1p5dtRjwf9HIYx
+zKv90PYIbhvPUiT93JeuEuT535KSyNtI5q/IaA2Bowxk9XfBjjuXJRXDpbGC
+llCYVVge1gIH2J45nET6O17zu+Gh7t2NxeT6OTv5TfB0fsE/zWR8wdnhLPho
+l2Z4Pxm/f1nXLnhF3dYzEzBfqKktAc9X1RsVQT2oYJG/0hHfZa1OPTHiWlH+
+Yjh1xwLdXySfeoFlFvJjBCtav4c5/HTGQlhx3jm7BuKDquMXyfNV0x5/GS6s
+aR9cCMe2ZzT4kPXOmGneRL0PZCXr6cPUfZ0lDvBv42N2A+owk8kXg+UDP0pm
+woVpMl3PFNG/LTPCBRbe+b6vAn7QHPVOHGYdWWp4B14lXXPurhqepxPx4y/g
+OM/qe4dgQZ4cUwLzzfE7wNEnbjVOd4R76t1LxuiIt0A36zqcyffvroZZy1Yr
+KyLemEviS5KJb89bfhqeVD20LgwWfBrNFCXvl8+qgXthR66MWAR81G0wwp1Y
+uGdsEE7v+fc6G+adeuTohPo1nt3T50vm65xxPBfuLIjKiCTzVYWlvoc9tuVJ
+kPVGjFedlsN+RFczJUtIf3fYOnXYJs/ESwBz93vUKxELL7z4RPotHq7+iusv
+1p6TF0d+DOXEngqY175dTJmYUpbcC2t6bKzTIvn3R0/9Rnxa74r4S0m/16OO
+OPL9oq7xQAOm20d5zoI/3b4rogALRZ81kvs/4PklgwkSf6RhuAg8LRUZ8ozE
+y5HpOIH6SRe0BfFIPQ3NFWnwx7Xya0h96JIxbwqwH4OX6lka5HpOk7kb3P3N
+K7sC3xX+SZS3Gpz3YeQrHS78Mh5PwepH13w8ifdQobpKy495LCrcbpv8J5xL
+9Jbv62TQb8yR/LENZlh08U1gsR6xfnLfs/WkVI/CRic+lDjBjq9jjF7CpdS7
+K/2oAzesWXwN4psU/FqbAPOda3rJ/vdF2jLsSH/FVLYG8qOZ5ZqqwY49vm/T
+YZtYrT9nwf6BCYY01Kdbk/VzJnmPp83ZHQZvDZ0Tu4DU/Ypo1gvyPbmAK03e
++1x705fKaAvD/cR9SavdmrMJrbVHhm8mme/BhbseaI2OlbV0oGUJX9XtRlt6
+RKV4LuKncZ+mWME2fs5BG2Fh6SkNGiyu8KL+MOw/O/FgLdbrrcyoPg9Ti+uP
+7YF30LbPyIR5o0omo4ifozprIJV8V/l1rwgiz6OsbsExmGW1/+QI8k+18nO3
+h/lSyxJ9YR9Xniw5FxwjIhoGSH3DLaryST77FHwCYX7fBZs1MMfJ2kkKjl74
+0aeSPBdJJZUl2K8dB+vi9WHOzuoFgbB72uH8FKzr+KNkbCM83LJj4TTWcfRn
+lZnCD+/IB3vA7IKIShtY/v4mqybM69+vYnYAVugvG2AST8u7FsC2T0c8q9Hy
+jVSWT6FtnSjUdEBLX37k6y6MU/r9eXB0Lup9MVD3KZz+viHnGsxXLG60wjqR
+oxvdQmCafPbh+3Bi69LFbjBXy6hqJeK072lSc4F51y4582BLbkUim1xvHWj7
+G170cKLjKCw89dDZFnmaXi3Lz4M5SrdfnIDzhgoUu4hlS3Sy4dS3fzyfh/go
+dnhFHhwacsfeCabVPp4+Dw/0eP48BftbjKV5wQ+Wn/K9DQuyP9uowikaw4mv
+YG7O+bparN870/rDAHG4/d2tsPB6L/f/nDiT20nu5+OKx1pIPRjVTFc49/Sj
+2Hwy39e3C1pQjyc5ekHeMCfoR5IzrKDo9VMeLpz9WISsc2BBYDXJh7H+3S4f
++OybjSw9YrNGldmwhc6R8mwF5KNpNvAI/w9yqP4hC7MbKs8lw+rL3m4KnoP8
+HN62RsHTyoMrO+TRn0vzjIEr8tnr18H+AXK1V+BQ6tdEsRzi7/tzTwecfrpu
+nz5MqzudswTrxbZ0G9yhwTtPisbA6ml8260w3/vZsjFY2bSuTwJmON4x2od8
+uLxLcZdlsd6KqfYecl6sXpr0F1y4sfvqVtSjiu5byYQFWu2sR/CRo7u+2ZHx
+gzEpOqhn9KT0qWOw/xEp7SNwusmlpc0wvfEx/S6s//HM8vlYT/DL9IIQvu01
+0O4ECye/XCK/H4qv/kw+A/u7FnmSfiORi4KHpP/FgVXke0eJyZT6BrPt5fGL
+D+NG9BRVkC9j38eyxeR6602WK0k9upItKsnzqFQTZQyzajN3WMIvzdOjdch4
+H93XtchP/uOvHjHYMWT021ryfsypVGgk9bHI16hEffTbBi+E0cj561tnBi91
+72hQgDnDx74+Rr1ZEs/a1siS83GTsw9cGhMpy5iNfOUz6lXgFB2dRBkZ7Per
+a5792OcJqZTizlnIP5e9+j9YwShmd64U8ljeZPkI/lR56HHgTMw7ZcbugnWr
+2r/YSZLfy80bZTBf1WcrZzMJxJ9jWLyZPGfPLQ5vEEe7ztzuBvzwR8Ct0D8w
+/8jY77mIVztb7flTMfJ9kyz5Dyyt7zXhBFNhYoYzkG/FaxkvCqazS+aFwS//
+aQ1qF8V6+UybQdglaX9OF8x/Un/ZGfXrlJUo+gPjHUvS9+XDprU292zFyPn2
+MnUYfqV5Jq2ArHfqHwkV7Efoz1JFZcQjnNMbzIBfZa5xTiDx7dz5cCm5X14m
+qIkgflqo+4AUeX98vhrsDXNueIs8J/fXXwf4VcTu8ibHyfdmcuOGcZh7a+Ht
+RXDsybVnZ0qQ+6MnjLwvqyaCo76Lk99DDgZ65P11496ju+R6u1KRa8jfdGig
+xUmc/B5T3qIB5wmZ0vcQz8gNiSTyPPHVD+ZNI36exuCEPsxOmSpSJvUKeLu+
+AfuR1ynZNA/1EAjW5wTBVfO3T/6YgXFtqzxWwZ6eu1yeUKiflEa3PExvFrfS
++82kBIrCPZJk/wNeKz2cZCI/N7oSbBy/eNvBn0yK3nFZ0xy2sUxwZk0wKbY2
+3S8KFghtqq2/MSnaU5HhFtixkyvOHcf1N23qVyM+yi6qROsLk/JffZpdQOJl
+bv0tN8akGGJ7M9XJOTVT//iWUVwv5a2dRs6Dz1dmjY5gPRfdGFny/ZD144oQ
+phZPhoaT95MBr0oF47kJZ7Xa4L8v7QlLhUe0Njipod7GKkcNbDE/ra8pZgus
+PTuVUsf6hbUCq0MwTYsVLIX4GH0X5geS+yHfZMsXWJA8eo2cp/7rH7g1fkX8
+S8SrtWHh1Q+zIpEfvbXCmJw33LizvtMk303zf3JgwdamErPviGdh8X9y8Pad
+qz8wYLqqovYF8h4oincQYDxHKWzRHJi3+WiDIsyy2ClxltTjltZ3cbKefttm
+aXj7PdqGTMTLs2p0OE/q/SP56RDyc6x58H4JOYe9qvqGPiPeu30BzTiHGefo
+P88PYj76uhNxc8hz+FR5qB/xqOffdyf9q7Y+XdALD52usYWF3gZ9se3Yj2UO
+MluIcdMqPmNS/MYakRCYcj2c6sxnUkL5oQ+FxOTvwr3/bxVY/wOFNAsU
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.181526323287266, 4.607704332175082}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.00000000000182, 17.000000000003638`}, {
+          14.000000000003183`, 16.500000000003638`}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.892040876190137, 17.440709485718344}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwV1Qs4lFkYB/BPJmliWS1qd8o1t4hRK7n1RbVSi25yazGW1LhtbJEupEzr
+UYaIooxmSHSZaptUSHTdSkpKmUqiZhImhHLb/5nnmfme35wz5/zf9zvfMwac
+mDVhkyiKisKbXCkG+bCmKU1yZdFUpKrHcl1Y/3mIZSmcIXd1XQwrsjSCFs+i
+qcZiKm8bLC7MOVgPx3Jv912D6c3i0bmzaUp6njrGsMH3k6sr4uAMF9GjeXCj
+fYooD/4hLVPZH1Z4x1kQD55X/LwP5lck3iHzPf2bGRWwDR01jw3PqJ/oeAjX
+hndObcZ+jPEsaxncljWeFw4/XyK5OQJ7v6ly7EFefsr1fhU28gTSg/FwAyNN
+OBXW3GX4QpnUp3zOjgHzXRVc4S80tfSxRc4QyatetzAAZhX2aneSPKdiHNmw
+iVVQXANZ/3JzrjmsVdZdcpnsf8nAdTlclSK6X0jq0XEcToN9zXaP7Cd5S2m2
+HP5+4sLCODhY+NQrAvsP75niEA6LqTL5GFxaweYEk3qFr6xOop4I27fHOXCy
+OCNkFeoXSz75RZE8fsbcftjDmZ+UTLxoa+ghPZpqsdblFMC+h1uzmPo05brk
+uaKK5Dn9IpSGg8O+CN7DVGq9eji8fJ/kqDrqT8iLHkqEB+5Nb7CHZ/zUJEyC
+P1GrZ4XC7q1tlVzYN1Pp73Q4/+ycryvhUvaPfWfYpB9D0/Vgnz+l4/dIv01r
+3J4gD7M4PvI16S+rm+cH13Xv2i+H25qOdL1F/vgtiTO74eCaK6lRsMjr/h4Z
+LNBZ08eE7UQu2VJijRvSG+jHzhJe0X+wzcbav7JhM/0NPv/C+uvlKjyYauCX
+F5D7G723qQim1Uwke2Hx2PxHUngS43Ael8wfKi9zxPqBgVrevnBjjNX4FZjJ
+OSn0IPnXt2SuRF671pejbqS+JNOzPbBooafPMtiM9cBnFemXxYCFF8kzI8BZ
+ANsmxkeHkPqCsvg9pP+3ew8mwbIckfV8A5pKj5mTWAgnX8jM2QLrp3Iv1cGq
+2SvUsmFpZQT3M8nPfPHuFFyYq52va4v+lPISK+Btm36d6QoLVMr9j8N9J+mX
+m+HhuyzTPXCat7AnA5ZVu6ashdvtna+dhvMPfH83Cw5Od1a6AUe8tA9pR76O
+kWrqIawqvxpfQu6ne2diI0zvl5aR+x0+pfEyGZe90fZdBA93KqXcJOPWqWFa
+cJ1e2WwxrOnXMtaP/ghcEhYcgxWHjZ91wPynXHEKTD2T1X6Dt/BGTkfAjXb3
+kmbi9zaP6+nVsJlB8ILfYHFV6Q5nOPafvC+pcLQGz8gaFvMWVzyELzoXiU1J
+/q6ho6Sez6PO5maw99ytcVvh7I4AHTbMf//63B1YcUxzB+mX6jSnR9qGeP5/
+j30cQMZDdYsD4FUfm7R2kn5KzbNyYHHHlKfFJI/13SfVMCMsyO0B2W90e1Yz
+bNvmwBkk+X8Y026FPbocNAzm4/n27LrbALM+smxXwPaDJpYX4dhZc1oj4TLT
+0gc8uNZBiZMOBxuMM9fC6yR2yQK4UnPJgC6sUE4IO0fWe58x+Ar5RxsLb12C
+za57FQngDxPRLWLY+0T56ij4jQOOBpxwKoFaRvpRW5edCyvcfXot4EgLI/Vk
+2H19zm4Dct5sWiSbyLjhuslk3KkkReRJ9t9oVrUUlhTtGLQj638+dDUWDuT3
+SgxhTbWd1Bn41sS6q9PJegwNQT/c9nXZrmlwcsz2djfk/8As0CGu/KZ3IB8+
+omrPIvNbKmKmdcMuk4QnjGDfYrnMyYim1JJHTJxIf7otP6bCloc4NQEk38QG
+/xrYP3fjGMk/PF7whxwe9nQxLIdlXb4qysY4TwPmVs1kvbntCUx4fAIvWJX8
+fxnT/wPf+3c5
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.393275441506763, 7.232686837739852}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJwd2Hk8VPv/B/BRXGsMWcuuLCUmylWUkSxJGpW0iOmGuiWmhTYydbWTpULS
+NAqlyNKmkhC5FE24KGubEL6TRGnxe71//jmPp/M5720+58zB4K/QFYETGAwG
+W4LBoCNjeBw/k9mMb3TUZzOEmwYEp1XZDFZHZrSGAZvhyxjgTFNjM5iM3E4j
+OOfRkZfFcHxwwJ/TYM11D0pWqrMZPS89WJpwo0it6j2s+fSVmOIVdco1b9NA
+vLR2vTaKv7/a6QPcEpLfngvzLlV9XqaJ/JvXFYXDItstYVfg4w8XXLCFK/K2
+mL+HOXNawj7p4fc9ssuVtLBu9ugPLtwWxf42DeZoXqxq0mUzSs8mTTOG2Rk3
+G71gc+6zq6qw2Kn5Y5MO4lkJtL4gHj96t+9W2Nwm7kEFzNRpHFGC7W/c9oqF
+Gf0ZxTXabIZbh7yUF53XmP9fGtxf0T1LFY73Hdh5DI5+4TCzFf3k98Q+PQm/
+92iwvg7HJ/r/yoQ1xzvNjsDCmMdLmuF4ef+doXT+w+SRqcinOsn/Jc2HOdfh
+EA9+P/+bRwTM79v+RAT/DJfTvAxzJB5q2aKf4OiMI+0wb+xNUjr1K06RsqD6
+6n7byGAe9hKBMxJpXj72qpth8TzzImn0z61zTb0PxzycWXwKZuYF3/0B59/J
+uzFlCvLds5RQw7xjzF1O5MPM5LEv+vDiU9cUl0xFPJ5pB3lO8ZVXnfAardtb
+VOGcWuNUHvoqHTKJHEU8bucZh1E4X9yvlgfHl4YbUV+isPD3XrDbcKdlCyw0
+65Z/h/p354jGzXHkVVdvCcKxpfqvb8E4drme2NKFdab7MtYmw9zn7157w7tD
+w11yqO+ggMfPkMc0fMoTcvzRN0xXeHjg0PVUur7IIuE56jw+rzZ1L60fnZ7M
+hVuiq18tgfMN1d78Acf4n7ZSofgSIdvL0bcwN6P2P+Rh/O29/hxsnrRW6jys
+v2d9Ix8uVpKx5cKlN10YR+C0ZttUS5ijvHNiOhxgvF9Onq73fyHdAPdvKOn5
+SvOYaMnRRL4tnZ+GhmBW8ETv7bBtvbKpJNZzR3b01sKL5Xm3ZlD8veab52Jd
+13KLriCYpebaKaD9N3exehHlS5D1lMKRHV/YpY362b8uvNgEtyXX/kykeSwP
+bLgDdzWN7tDA3BkWDI9RWGz4X34WXNpZ+2oa1t2e5eOrS/dh5+ZBO7i8oES4
+FY7feuDjfJhZv2v4DpyfPaxnAItmmrB+w6zBipFBxNM2llnmiPueL/pZkwnv
+jWPuj4TZ8zcNuNIcxqZYFsCcQf3jLah/UOmHfSvMCOFHrodnpA++GoNFTXoO
+/6F/yaz32UqGqDvb8ZI7/JvjVK4Fc/RNBKWY58hdqWwyd/bxufbwwZT5y5kw
+X8NrWjn2dXewrvQ45TOuKV4N13y1Df8I85zm3vuF++LnTmb0M5i5/ZHcA7pP
+1pq65MLipSvq6L7vuK/TdxrWv3TXcD89l1hVgp3UX9VV4yhYMcwtch1cWp76
+9QK8Sk5ulxv12z61oA62mh8xa6EB7deQs/TccUndJ7OA+vNMV94K8/4nwXCh
+/p07R2rgJst3mWth1kF+qhX6UXV4NHUv1VcpoZAGB/lfUk6n/CPdrhMwjxJt
+z+oGuMs2MJj2c3iqki7Ni6WS018AZ13LifeC2XsKS4fg1fWmPudhES8hTg/z
+zoqICX0Pi6fk1dP+Olj/4zbLCJ+vk5vYGm4T248cgIWXHD204KRzpQoVcHxl
+nGc34on07L78MQ31pQ75pcHX/+x6vQjO15zdtAAOqti4MBwuFfE+1KJ+xYC+
+z5fIm3J2c+DnG7ZZPiZnZn+vRv+sR8WCBnKl7hIH2Hjp/LXtcHz30KY7NN8L
+93raKL5f3qLZ8NuQJkdaz8xbkn4Pz8GxuT/ul8HCqK21HnBh1JLv2TAv127f
+ML6H8mvtemPhrvrkswVwSU2sMJTiX7eyOAp39yxd5kX5v/zasAv+o2JQZy4s
+Tsidtw+2its5Q4fyb29oSIIf9Kzzk4c5+9Kca2D7OycCJGBu0b/lTHouHyg+
+x6B4zxXuBcEZXzf3ydL5kmufquDixUfFFI8ZmX3LEv0MvyqvtIf5JyR1zlO/
+IY7qQbC+wclp43Cd5iT983R+XUyfL+3nB/IPG6k+JZXuXNg3zjBQYzrynj+g
+OghnJSms8IeZFzKM6LmuUGR/8DosGq86awn/9pGqGIE5XveazOGc6SZDjsb4
+HJ54rVaGfaVfvz0Bs5tjo9sRr1y8IfE5rD+t6WUibONpPEfGBP0w+wTW9D2y
+pszZDuYnvDF6gnrr99wWBMDCwnWezrDFaFbEP+TIOSkl6D9Va/2pZDh+yokW
+a1hGbNAjhPW9/2Nexzwb6zL1yZySTbbG8HNfzVlJcOljI5lcvHeUX5cIiqZ4
+XGb1Itg8b2p4MJy/z9LkE95b6sV1bhyK91hCPhvmRsmMzIa7Vn/bfxBWYC7I
+mUz1HmAdDYY7dPjnR6l/71XzdsF9/EuNnbCoXE2QAPtdt3atg/MT3Cor4ZsZ
+J89XkFlWrQrIr36QbUBmPJvnvAleeNeuodaY3jfKqirgsSfCeW8pfuf5QnP0
+M+RgHCJB8/vgqEL76XSQlNZMmGff/e4HXLMscbcfzHgs5b4W85mwZrV3Kq1f
+Gfs4G9ZUXWPTTr630rUXntKotGS6KdYPSiTRe0namY3HeTC/Mm+OGbzlS2Nt
+McxK/Dd1OvzUz7xH2gyfW5vJQln4bu/2wuUwO6UipRHxsm5tm5FoRvstz+gE
+vbe97DhSC4tnp7ia0XvMIxtnxgzU+/ugUxHdP/t9nMxgRnCK3Hz4aKOwzBVm
+z6ybcgv9p24oDV0Pcy+fXmZKn9/knyEBcKlEW4aA5unYwNkE638tUJ8K8z0k
+ldfCzAN9ay7jvXRdtI08xWNNrsyzhVOab/dbUP4bGmVvVDC/uBeXVeD4rPHt
+QrhmqcBlmPqRy7wdDqt+GPmjifqdtuxCIGyazFd+QP2xU6Zvh9vkGg9chlkb
+1q+KgRc6pcxKoH53aLDK4LcTDz8/BjPihO0yyC86LH2DXGqoXewPt3VFPqD1
+3Pypp8pgd0OrQ1mwSGFxshn6Gcz9oPqU4vnlfEqERb49WmK6PmLwyDf4csWr
+p0aonyOqPOmN+YjO9fX7U7/fJu/LhA2zXCWv0HxkrNe+h39HmNt/onkzM7oV
+Me/6suFYm5no/+GmQkN4bHVA/WGYpxNhrwsLYl1aamH9mqcTJeD918MPqJnj
++nPzTj1DvIyT/g99YNaCo6uiYJsqKVEizL3kLNKFBdKP7SvhrqFVi3NRr+Dq
+y84BWJS9M9sCVtyy5rf8LPQTFX3oKvoPsRlYqgeLvBdc04Y7ztYMmMCcCFX9
+M5jnjIFF+4xh/sWsdiVYyBIMTIXZE7PPJCuzGSqHBdmycFddwiEL+DlnyobP
+yMdh/XBpYeLo7zTaSO4+9ygZdpf0TrwLMwPnt4bAd6dGbUih+stXXPSDx/75
+eiQCjt8W9jsIdvmoqh8Il5ZdHDkKb70Uo7yK+lvBOFoMl1bs/OUO5+vI1kgi
+/wTuZOuldP3lq1N9YcMplkJvit9yfW4JzK2eV7WV1genbjSm/bZ6/P5JOs+3
+yY6D1X0/at4h6ybJfYX/iuxU76V4UmU5XpjPSPyTQ9PRr3hGmko6PD/vU90W
+mlezsnsnvJfvO7OAXHJETZaeX8P/O/2T5uX+ZpI2zLTJfelmgfNG9Q/VYfWr
+oeVn4Pgjs69+w/WFxYMLWmE+b2h9Oe1XwRxnHUt8/m/+CgiD/3VIVlkDd536
+aasKu6zwMT8Js31CjS+jXqaTwe5COP70yAwj+JtFrZUIFi8PfH4B/c/xfav3
+DuaZX+lhwtq+cQGf6HrPmMPHME/1xtHzvXCpi2esJHx4Yl95B+VvbuRpKeHz
+/3uh43OYyxuPcFPE+1C4V9UtmF9atuPiJDyPNFguyRTvWMIXHdg90urVXorX
+sau9VgHfv4Gteevo/HS+Zh4cMuf9yEJYP+fFsTLYvCaozITylebITsT1Y5dV
+v6hTvtvDsaHwBJG/uSIstCxnSyB/ypvA+2SGtrAqHx77sTxai9arPjkdhno7
+NO7JW8KigDhlI9pf/js2LKf5NNe7x8DxgeNq+8lBoh2f4b2hlwJuUrx3n/KW
+YT5v/dom03zizbRj0mCGu95SDRbyR/dovYatP3icsoMZtemGEzHvjduznDeS
+h6a7qsFxlxsDj8Hi/hpNun8KXnIacmCm3jZTMa4/7tETIYLj3w/L3YdXMb9s
++kwOWbZyG3wguypLcTZsV3VIFh7f+PuEyWx633jdm4R6eZ6GfDuY7zw7TgN+
+vCbK0h1m9Pwc0UP/Q26isJXkeWk6cpiPm0XW3z6w8Gt6yijm/eeh/WtXw129
+W5cOybMZt96F/cshh+w6PRHe/M+kv11hdpllrbUcnmeNeWqUjzsmmHVSls3Q
+vV9bZU7rm22dFeBEZ0GsDq1nuXc8kmEzlhfJRFH9XTwTkRB++920kEHnRU2f
+bsNnWR8tv6JfttGvX6PwoOqU3n5Y3+b7h0DEC56QldPDovvdruwbnBPA0OuF
+uXYqZtmo58ZJ3q1BmK8dyA9Bva35q65+p+tvzfB0QH/uw2njsjSf/o9CZewf
+p6Kk43o0D1eDPa3wcIVcyzya53CY6RnMR1k6xWsNzeeo6jNLzO/TWp1Z+8my
+/gnZcKXB/w4K6Hq8XY/BVxIPO1bApUst/RSZ9H8JM24f9dcWtFIaVnDYVq5k
+hfhRA4ovsL7B75SPNdz1TyzLH+6/cs9gFcx3SVtUjvytzDD2DpgtzfX+hfr2
+uDR9PwELMxfpaMCPpHXKL1I8SW6OBvoLdAx3zIHxhaIjg/7TV5z1uQOXzkmZ
+O4R5lVRL6NynfD87xzox35Knum/vUfxFL5e1SuPv1ycNMwsp/l0n/sAf2D/n
+tG9eo/OxT7/owr4mmYvTKF7QhbJwKeQ7V9kbS/n7zHhjkmzGAN8+5yCt3zZW
+lAsvDpucEUrnI1M2JsLhkoYfN1J9H0ZNr8EFZtciV1O/c/Vq+uEJ0Xt8PCn+
+zJ+TfRH/iLbOIneqt3Ozmhi2+7iz6/89HrM+HfWYhH2+wqF4ngbszai/elT6
+3/V0fsOCxbboz/zQjeXBVvS+prlbDv07zP1T6jDFX3P2RQMc+UoQQf1wG51v
+ncT+0W5o03hI9RTcX2CM+fHnbJ/UTvWXl+QI4OqeBJ6ENXyx9+YAbOQoa2cC
+M1RGMhUxf8Vukc8ya/p+8Wj+jfOOU6Nv7oT5nLzjj+AJze0WSdb093urtAd8
+N/tD6124S/g6LRf5xX1eTQ2w8MzhzR9RX9aXgsB+yjeabsaA6d9847SejtLs
+/wPOwiIH
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.674112975512006, 3.0634133525730736}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwl1Qs0VHkcB/DLlNcqtSFFDCaPpjx6EuWaipIyGyNKIdbamEVovdolW06t
+avSiDU2xslI5JfTS3ZoSWTsSZpVM7WyNHsxSjYpmv//2njPnns/5v76/3733
+jPWWhHVfa1MUJcSP3P+/2DQ1qsHlSFM092maASxRBm6ogqUvQ3RYsLwka3kQ
+zIwtun7fiqYqZ139oAXLNedrs+BYi9tZ9Q5Y/zC0TRc2o9Rr0uBsXkd7uiVN
+xY/zWeILJ67vM+2ZQVOGkxPd7Mj8Ya9JrvA1k4VzTGHV4wFJngX88ucPxBF6
+lvRzc5rK0vy2zR5mm41QIXAru0+4AhbJZiQ/mY79vd6+EsL8q/y0PXCKH2tV
+CcysqDQIgl0iaoR/kvEqhzEe3BDkM50i9RRUPxbArTm7ZnJJPWv/pfbCTCrF
++MMiT0FZD3xX01sTCU/afmKpN86XnXTf8w3Mb5r2+hIs1VW1hBFb71Q6I391
+vJDyJv3jjZpUwKJUbYkx6W+Af6ER6lUs9qv7i+R5tSYkGnZoc48+SPpT0nWg
+BC7qSrXkkf7N+MCtg4OYVMkre5oSjwzanCHrmxt3H4XpzfvLMuGIZqPyZTD/
+cqCNI1zZdnrmiB3qbnLi1ZM8x+Wl9bDcJO0XLty6wPrNT7DqztVN+5B/XHP9
+7C1wRLDimYL0533mOj4s6hqc5wEvz1waGUDGjX4MPjYN6ywn+m6GpV86/60L
+h6WveZsB83lM7H4zPI/SvJxTcLZQpJ4LSyeqA9vJ/A4l834q+vhrdwQLeZlD
+nAcKeP4OVex8WBUiGxuGE734SyLgxM069zhY/+YeSzsXrrnOrdn2eT9x3DFS
+v8Hlr7rh2QUtw2JY2p7c74c85epMrSKy/4WkmxKYMc7U/gFmT357i9QjScpI
+CSTjmbu0T8OGJ316p8HyA+5rP8GKFTkXOpCXPSHo0mL0R9W2dS7pV7a/0XAw
+bMblujiTceNztwLg2qT2LtlMrLc9ZMaB2TrdMbtg1RYrx07sZ9znN+QGSx1X
+hcfAh/f2mas56O8NG+te5OMPKR/dhGmXugwaVgiUglLYxe3o2SLU55lQXL2X
+ONP+7AD6E1J38X0esUB2YDVsJlnuewRmEuZ8qjfF99PAEdfAlLqq0gNW6do5
+d8PisXl/PDLB92TmHz8eeajvdnacgMcVWwsWEQv6dfJgT/pcdSzssolJOgiP
++Bl5HYHFRjce3YCzV+7gXIZFpuuGDLD/yhMHNVKYbqzPFcKyB0Nze8j8jqMv
+++Dohx8NOmC+xeu8UOR9490vu0Lm2zcua4cb7jaMFcCJWwftl5J6o2wUoeT8
+jatfFMKMJeuFMdmv7vck8rzlWqcW30E9bIcKXzWsLLAvToLlTr0Dw3C+nnCe
+OSwdn2feCotbnno32eL9CTzflA2n7Kx+kg6L7OptTeDicCfJQljsvi1qP/KU
+Z7DVFJwYyokbRn5/YefFHhvkr8mP9IeZ6EaP27BLWc+cU+iH//ooCQOLqcr+
+MWPUp5mY0grTZfcDYmHFkqiEZ2S8gnbtn4I7f/TdF9ifMfUY2Q3HslYdcoel
+F615PrAD/+HqOJh9qfOII+y5ofFZMcl7OsHDlditj9tC8k24uWgjXFQqcBgk
+4zxVXBms1AkT6qF+VZZNNwvn5+sb+k6BJ4XR71JgivX98wmkf4+veQzAxbnx
+uWpSf8GnwhjUo/xoGy4l+WL+0e+E6d2a5mMwRQudXFF/fm2VfjCcfSb9TjJ5
+v8KfLNAj+fnJswphC0Mr3VrUy7jllBMb71h5fBPp3/jrZ8j88nCt+fqkf9/W
+jHLhiLjbQ1escX7x4X23cJ70JFW4HZYXGIV7wfn9PJ4XrOqMnF2BvCF6fj5T
+4c8XPEL+v9j0f1GRbYk=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.232686837739852, 11.393275441506766}, \
+{1, -1}], LineBox[CompressedData["
+1:eJwl03dM00EUB/CDggFRmUorUttaIsqwhqkQPRUVUbQoYg2CFSHgQBC0SlCm
+CARHNdoUQ1JkRMCRigsHAsFiURPRpIZ/BDEgDZUhQqg4vxd/yeXyyV3ee/fu
+fsKEtO1JloSQEAw2//+8KbFi8yJKzNm25m3wi5K0qkERJYI6wxM1XJlTQ1pg
+4xWPvR/g1t0nqophblPnTWsfSrzrBT/WwSk8bYQYDtWWBk8JKal7OzAsgZ/d
+UoprYaX9mkQvtn9lkiEK7uIernCB5Ql3FBZw92OBagTx1TTHuklAyadLOWuf
+MWuWOGbBlJexMx82XzcVbITDhfZ2a2HvHe/SPOCSNXn9lvCeDt2UM+zZfFeu
+96JEJn/px9xVJXyggslEvL8ItpGElh2FXSLTHVazdcH+jlg4LDWLkwwb5wXE
+7ILPTe4rV7F81OiaBPcPeQx0snzdFfozMI39+fwXq+9Fru0DOG/EbYYXziPt
+yT7+HRZnCz9L4bFR0ctQ1Bc2PvT3IKzWKWadhwl/fYcC1gbuHeiFj11wyc1g
+/Xszpmf9m2jPzIiDU86ERGbDMkvX8SC46YYk9SkszqXRHFiv3KIfho0xV3ra
+WP2XnLvtfSk5Ve1WpYCly524Argk6G4E61dd0Rd3PvOx+53VCxG3xKCZCZOE
+TSEWsHG08MAg4oVb2Voc4uPeE4tWP2L3df/8EaM7JemWRfdOs3ynxZW5cJfv
+c9Mq5iyn+QFwysP1+/7iPFJPXr4dbE7yL2+Hg2XV6RxY7TD340W4q8H3qBuz
+H2cqGQ7/VmwvhbtVtya3wtyRA84VsHGR6ecGWLuC/97M1vMm+FHsPZZaq+NR
+n8QzcGcqi1dWINLB2j9fFdfYfl6LSIzzSKzSpOz9pvcGtmXCylFrnTvqpXsG
+eLdheb4fSYWbLqfUv4KlYdGNLT7sHmNq9HCrrC/aEf2pM8T71cKCaW5GHGx8
+rVDKYbOvxqSBaftmzm/kH5t+FGKAPfmLm3NgetXx9jQsbzyrMqH+k4kNRXOW
+IW5PYWMEPFa9VOQAV/bpZtcsoP//T9iGzQvoP3WPQ9g=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.47431403485444, 8.442668420912664}, \
+{-1, -1}], 
+        LineBox[{{14.000000000007276`, 16.500000000003638`}, {
+         8.000000000005457, 13.}}], 
+        PolygonBox[{{10.48173265946094, 14.447677384685548`}, {
+         11.316718930329426`, 15.397834175673825`}, {11.719815750748694`, 
+         14.706811054955079`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10.823799910437668, 15.484057296392571}, \
+{1, -1}], LineBox[{{14., 16.50000000000231}, {14., 9.499999999998607}}], 
+        PolygonBox[{{14., 13.6}, {13.6, 12.4}, {14.4, 12.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.9452, 13.}, {-1, 0}], 
+        LineBox[{{8., 13.000000000003638`}, {14.000000000003638`, 
+         9.500000000003638}}], 
+        PolygonBox[{{11.51826734053906, 10.947677384685548`}, {
+         10.280184249251306`, 11.206811054955079`}, {10.683281069670574`, 
+         11.897834175673825`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10.823799910437668, 10.515942703607429}, \
+{1, 1}], 
+        {PointSize[0.04], PointBox[{5., 8.5}], PointBox[{15.5, 7.}], 
+         PointBox[{14., 16.5}], PointBox[{8., 13.}], PointBox[{14., 9.5}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T11", " ", "P2", " ", "N22"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdgef/figjhihjij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdgef/figjhihjij.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {0, 22}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwl1AlQE2cUB/APCHcCEQ+CF0FaRQckUEhpPXaFiigKVqmg9SAKFB2O4IgX
+kaYanKBSDqHGTgQUqyjaIIOAghiptkQQqSgGSjEIIjKEQwRBMtL/2p3J7Pzm
+7fe+9963G6ed8RsijQkhkfgxd9I8iWsqTT5d7jRJim5wVsD5mzkmdYtpcsZy
+IsURpoXeI7mwd4wh6awdTdQlmReOwLMTfu+3hLVFMaJo+KJql3viFJpw+Zkm
+4XDr48O1L7g0cYkKfBQBS3k/BQbBY3OT9u5n4vXs5SdsaRJg/9whm4k7Zisz
+bGhycAkVVQV7nb58q4xDE55XWYoeFlxSU8awhfP2lZ+j3tH7WcsPsGkS9ka5
+UARb3Er6aA9XPNiemgt/ppG87rJG3s7AolZY3PhI0ga3cbQJlgKahER8FTsB
+K9Z0h82Dp81OK1+K9dKKQr0QbuWkdZyFIyajff3hMJ0NZY39laenFgTDageB
+vxxuFA4qN8DJdmy9OeoPmZZmwsS1Bj37J7hYfuntNzAr9e6fvTBXNVrvBY8a
+/dC1FP3r7o1/6QgreW88xbBr1bNpprDsRMLfyXA4P0rfgPpDTF4kRMCFJTq3
+dNhnBkc+F9aORKSvg105TyOvIf/YUs1DNny8OtXXFhbE/pz+GPPzyVG5rUG9
+0ukRUQq4LHu7XoT+LEI25eyGa+w7NFsxj2Lb52YrYTbvVoCvFVxZ6uUKb9pn
+0TrTEvvdfWXPh6Mru5MGzDGXnNY5TvAMu7xQjRnep+E6Z3dY0j512w1TPF/g
+c3A1/HDFrzoVC+f929GXcbCCI6PqTTCP7tDic7C/zcp0NqwN3ljbBF+NK9qS
+aIx4vOU9G/TTM2gutoR5KccmAmHWrOgajRH2W2imlsOlTZ47bsL5ia+/r2Ge
+N5w5yMSli92oUTiMtUNmhPU9/25iT8F8dT73YkPhroK7751geoar9g/Y613Q
+bDe4pMhGvBz1GAr1wx4CJv8S/2o4Y75qmQC+7/Te42v0w+o9S1zguMxD3ldg
+btSWkw5w81Cezhj9y450ipnzHO2WX6dgntCP1YJ6InIXbdwM60ytT+TBvOrv
+rALhRr+sJ+Fwcqp7zRR4cF7Tfkf41LKXK64hv0XCQ9d2zEcr4gpnwWqjm1fy
+4PU9iQtFzPwGQmRR8Id8s91HmX5npfC84Vr97acyzKPCemMsh/n+RNy8eIJ4
+XuXcITeaZN9mGXI+UkTqORnYAa+tv3OeMlDEZ1XwyXa4T3H9SP84RQRe2zp7
+4OJjgxdL31NkLJNbNwm7tGtcC0Yows+Ndp+H/NxHnHjNMEUU71b9GASH2P8i
+8npLkTCTK1VH4fwug3n/IEUqPJKzmO+duyPW+sMARUj0urhx5v9AJr1a20+R
+weJYpRD9hy+YCPKHxx4XRybARLS5ZTfMd/jC7TKs9rHlOGM97W+V9gxm74o5
+74b8vEMK8Qe4L6BcMAG7+N+YbsWcX+W4Re8QRdqyyh9wYfacvZk9qM8g9Rxm
+rBAuSulC/VvXxmQwz8tMD1TWvUP95JBqgsmn8Rs4hX6Jp21WM7OfVZ6EN0oR
+i7TjAUw94jN72CJY3b2/Jp55XzOezN8K88q6VnvCiiHfS8Zw4WH+niH0y3fq
+M/0W+aR2LU0q5jy7EuWrsF+P5DQlZr4nY2/vXtTH86gPZs5z7YLJIhr160Ys
+9xkx86QnLxRhHhltjg3NOI/wPj9VXC/mMf3+zHJ4/T+RQb2vUN9fktwCWL4r
+dOeKDoo0Jpfan4MFT5VVghZ4UXoZExfv0ccsaMT+US2f1tO1nZKSavTT4BLG
+5P90Xbzz/30x/R8h+kp5
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.2761166322027524, 16.884033677972475}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwl1Qs01FkcB/DbZJnFMgyKoxojPeWV7anmrweKCoW2nWrSU1o7JVJLHq3X
+JKaIHtLUqdSUkkUhNdFmNctO6JSIOdrooZo0FZrY7z075zj/83Hv/97v73fn
+/x+70F8DN7MIIXvxR6+kYxifUQzR0KslQy4V9r7KhMk/Hg1Z8IH9BgpDWGrm
+sP5H+Bbb5+MeK4a4jEsf9cmCIZdv6q634f/SNyP1m2Ar/p/n5sKykFBFA3z2
+uPD8KVyZHLvlL3EtWPlqlwGuxRYmk3iYF+l5but+LkNEI9h+u2B2QP50A1i1
+7O3Gp3DJTEvZeXPMr77+LRD7nrU6sk4I81obHz6Cp5XrdTvCKp9YCyFy+hZ1
+rR8Fy24cbeiAu59xL9jAaqdqt5DRDGm63BzgDhMnx+HbsNvG2qciev9Q7T2O
+NUN0M07eOwlr/Ba7+cCL6qa0dsLSnfa+oXDB3qrwicjH0+NnroWb+RFnd9C8
+d+rZc2BHkfruJeq1FcEDWF981WdPK+zi1ZZRQPdT+475AnOqM8yc4IKt5v1D
+MIms2FiEvGuycza/g/1vPGjmw4dPXBmuhRkVcTuKejXP3a/G0/ms4Ggj2F7r
+dZFP1z+8bksG+uUqSd90jfbH/495Y+FfmkP2Tqb9kK9cex99Vz0TRhw1w9XD
+XD8drnL6mtjPYYgiSGoXBq9URm9eDUvjpLbbYJMPp7ujTDH/VmpLMqzu5NT5
+miD/UuFxBcw+umLkvB+wv+nchZbYz4+zTxVojP22hf0cDwdHFUpyjJD3Hit4
+ALbqrw4ygF0ay1tjkb/dmdVWZIg+1feYjUS9c4wrJqTB6iyWQTIsEucWZsPF
+0cf7v8LmVt9WKKmrS0s3oH+KA+sfT8R6jPR9TzEcsyBytIzu9z4o9AWsVkam
+TkYesj19mQ4ur4+tvAn7D4kDtPBNvs03T+RXm5w43wDrBk/2VMCiL2EmErhm
+UkafJepNSFx03xFumdsy5AeLEhtXViJPTHypMgQmn7eumAUPHcpd5QqLRzTZ
+FKE+2486s8dYj9NZmDkOJiZeNktov6ofnclFPxhNHk+CPGLPFFNreFIaCTyN
+/OIzXFKE/h7TSsylqNc/NrQihD43bvJTm7/H+X66smYMzJ/RkDmFjfUqXQoJ
+rPvosPq1PsbH7OpiwfkTcq4Wf4e8HV137OHXMa59aXoYD1Zs2QA7pUw6GTcS
+6/d9Tr8J79bzKcljYbzp0ZHxyGN+f4qwYwTOvy6s/TSsfdIWGwy7ZMXr7FFP
+prUshkXHd+ZbyeHAUgvLLoJzaatyn4p+ROxwju2DZQNBZ2SwxPGLyAnzxdb2
+8/XQT8P2UYsyYenn2c3+8L7VrS1s7K9xkgQmwZVJ2WHZsP+tpca5sPC4JJ2P
+vJqe8of0fGy5gkQ5rFav1qPfh/LQsoFxqE8abnvYBp5xl3swBuasCXtMz8tG
+47zwMvXvqXFecFqXp/V12OV+vHst8qeYPPdJhsV6ByJmwheDFFkOMInJNJKj
+/nMHO5YewX6Kt0mED5fGaHc2Il/xMcdv59E/nxfcnZ2oh1jWWXrAL9dldf2N
++kUbhLtf4Tk1zvP7iRkWEIVzv2UJvEP1zPQvnYC46HPyjsH59d6vvAcFRDpU
+ZVYAewyX+D7+IiCabVGmNfS9Y7OgJeMT5r/gZtHzXTUtxS3uo4DwIqvGCuHx
+qje2lR8ERPYknP2APu91heEBGgFJyNNkeiHvxbJw5bF3AsI8sJ2lhGN6/z28
+7q2AqP2O8ALo93OwZEJfL+73frLqISxLDuR5Y1x0m5m6GP1SGUb5e+N+zSHz
+ExeoM7Rdze8FhFN/KlkDu5ctjH6O/Xj2S1jj0H8yJU0+iDy8GwtSnWGLoU1J
+o5GX2C82tYNFeaPzHbRwVr2DFvdrU5ZHGNH6puk65XCGSVJ4GSzzaLzrA+9u
+rzEy/4z+HUqUNiFfr0J8jQszL/stlsOxT/auuI75qoOvVXdRX3uAa1831i+W
+V8ndYYutzR1l2F96dVEOfb7ae60Oje9D/TziOp2eFzs/YD7yM8+nJSjpe3dq
+a64D+sFEeWb9Rt/Lht3Tt/cg32DKLG86fme2MqoL/VX6fXChDpWPfftUQPyv
+WMlnw4rsjXEzHiKPb3SNCE7QGdsuVKCfuyeYnaPvcfpJqP7/95fL/Ac/lbt5
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.128720493773297, 4.310154074720437}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.00000000000273, 17.000000000003638`}, {
+          17.00000000000182, 16.500000000003638`}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.286281316503036, 17.427512100981787}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt2Hk81FsfB/CR1CiVaLHFyF6WocgWo5QlISkiTIVLISqlcpElQnJdSWWL
+7EtTIVLT2CJ1rcl6PVNJlKKypzyf87ye+cfr7Wzf7/d35syZkT560sZtEYVC
+UeChUMhfyvwCXusZlP+91jEoEjyqB+1EGBRasnBoBGwq+0K9HvYdLV2YgytW
+KQftFmVQGGmfwhwxTrDoiFYXbL33u0QWmSeoM+mUGIPClOVd0QInR+rYC4vj
+/4/VR/+FZVsaxx/CjO9tlaR9zSC721KCQYl/HNyfDZfSy5oHYEGZZsFjsLFv
+sojLBgYlZNFpk+Vwooww+yXceuevM1mIx1rzdqW0JOb7EWSjDgso129wgTNY
+E2JVaxkU16uCKmEw7b2krgkseJx6LA5mKukt9K1hUET2m/qEwr59aZbBcN5x
+lvhRuPX2R3stuHvuxRZ1mNXW48AHJ9KpFhMkHkk+zzFhBkVbRT6OBXOsysym
+4LozTgEn4IwcPhcx9J+Yjby5CR5fKZfpANOCTlv8QH4Zd/hYpWQ91XL/JpjW
+2Dski/ioXZompbBvz2xCDpy3fK8AcfzKH4pbkV9A0SqeVzDXeW10A6y/OFfr
+Fxm/ZJW1A+oTqC5x2QTrxfsslhiCWcqaCfmkXpoWH1zxHC2MLbtpyCdegde4
+DR60YrbkwxTFgYfyeI7DWqXCDCnUk7Pw8gjcaqSQOgCHFEp6hsCHD7F+G9Iw
+/tOPhkuwGPPivmsw0yI/zh0O4tl4rRem53TU0eHH/RYaUtKY57Pj4/dYjzNi
+stSROOzqQBhsbaptEguzDhpfWQcnV60quQ8zirkVdxD/2S+q0U3w+H31xs3w
+p7rJujcwM/2TVBXyN47ofk88fsX74wGY0TLK84qML2FX8MC3Ig1qHpH24T2O
+tajnspzreilwxpH/RKXBdTU5AxdJ/6KkZ9fJ/lj0xe4QHFK9TqYA1g+447MN
+pk0G+PTByU/+eCcCU26lTStg/mEPOzMKbK1SUxsLfx3jGx9D/ty1pkV8iHfr
+PfGnIzDlGDXhKjyQ0CFK2jP0k1Mkka/BuiguGc84GRH6AE58LmdD6sV8s7Rr
+B+oXzVgibE78zOPQC/gon6NaCPG8+Q4G3mdxo9/kOWS8nUhMJhw7XL2wdCPW
+15VWHoW16h2cD8CtBj6WYnjfqcbyZ2XDLMs+n83w/CfTZVMwZWWTrxRcLjPa
+vFMGz3d1ePo0xps+dbKIhVur9NLKYfsD5lL/wL7JfiZMmF0gs3OxLNaP3vfn
+LOJT1Fi1mQ77rjjwJRLe5CTQaQVbq61tWg2HOru/OQpniLKCUpHvJ6Vupic8
+vsvfRR1eck+G4QoLcoscO8j58qduqy1p/84ojSLnS57fqD7M9Wh/fACODo7v
+liTtxY4p22GxY52yvxBfyMcfOjvIeGHzuF4S76Ybq11hjsvX/krY2lBIO5P0
+73CoTiXtY4dd52D7lLCHUTAr881yT8RTYqH1OhDm5lLjRmDqqZftF2HB7jbv
+s8hH12Nf92XSP0nnOj/qMW+scT6N1C/obkYKXPR8SUkNTC9+oaKE+gaFjHV8
+h2nUm5vy4Yo/fEtVED/LeidtPd7HQp+9E/1gplfdWR9Y1TnB7Ampb3FRcSHs
+vl74wHI5rP/oeCQ5B44uXFl0GB4//Vu2FU5rcLtSCPseZAs+gsunbdSmYVp8
+/rYwmC084akvj/lbbrZtg53bTX4HwL6/Luj0IJ4kIx2JQpgh4f/IC17szOff
+BlvTMw1nkE/BvSN7PsPconOKoXD465TAGZhi5dcvCCc8Mg2dhWm19dEF5Pxw
+cvAagzlrZ3ttYR8d6us+uHXnr5w1cLInfyMHzqAynn1BfXcPKj3MIPHpRFe9
+g1c6exsEkXiuTfVOwNqX1emHyfq2MRMyGC+p/8FsO5l/keZ5H7ho6qecLMnH
+jD+yjZw/HdXrheGQe4MCZoiv/UXqSoH/9S+cb4EV98oFCcJ0MfYVJvKdcVOy
+kIYFg3N9J2DJqNv1BmT95mDjCNRL5GfHLQ8yf5gdWwDnKtvZ430qma/r5bII
++J3eMaV/SX5lVKER2H6zzUVZBax/8mn5VpyzFg57wv3gjNuzVDdy7hpU51XD
+46OBxwPgwYpn8kKK6F9RkelDzukyXm0mTP875q0p3G9vsjUftpa5zuIn7WFi
+Dz7BrLSujlKsNxF8/+5GJdR/0WZxK9g1TMffCrZ+Uy1PPleHdC+s84XpW9Ol
+PeDd29pXh5P+84f8fyDfW7u+xsbA8R19Fy7DOUmTJpHEV8c2K8BFj4wSA2DO
+YY+eXtRv1Hyt8RFimVMj2XBrg1jiTnhcQ+tODLxMoXoViac1//T8VVjozku/
+BRK/1e/EYtg4NDl0QJE8T5vbI/DX/c8mq+GMxGSuIdaL7ioxLSL5J6R/K4K5
+ch+z0mGaRqCRMuLXNbTgpMLMttojFWQ/T/W25ZJ6uOfv2oP8Y180BLAVSVyc
+2AE4cA2n8i2pb8irthOoXwC3+JcgqU944+woHH6PR3QPzG1lBh/G517NOUWH
+OJi5Tu1RGawqdzGtGw6JPs0/CeuX3vVS2IT9csFwlQDOdRuGtnAAHKX3+tdK
++Hfg/IsGmH60NJIXfhVv/Vp4M/ZP62LlToxn11GyDsHxP/n9YuBNt4d/JMGC
+yg9kVeGSHX1fXsD0gBXBNYjPNfP8tm8wdyzI0xJOpvUvFVBGvm4Fmt3IT7Fs
+B10M5nIcrNxJviK2khIwxUH+y2/Uh9LU+kYI5mjk1ObCnOc/hxcwH7Nhgu0G
+3yqydfwAZxzvq9eHGU5/JdTDNNvUK2qwpbDA1izSfuOhqyFswRXiu0RcsMbc
+i9zb+Isaj8CMts56cm/x6PTfYErakyVXrUM8v7VMnLRg1v34TbHwgLZ0iCrp
+73RRXAj5aHt282oQv70gnQlrHcrqMSL14o1Z0EQ9hlJOOTgTF0iaNcASQ5k7
+Ikl9RGu6FVBfj28GZVWwRwm3yBVmu+bvnoMbdRJib8BxfJtXGiH/+AfhzmxY
+0jD26VU4StQlrQt2X5L09F+Y5hZ68h2Zz0XUUlUF40Xv5w7AOVLfcgNhwQei
+ba/gRPFDUs9h5tUCmRLSf/SbMVUVdf3EczYcXibYw2sEJ+8olbeBi84fqfKB
+AyQXLYiS+L6p7o+HmX+00NjIJ0PziWk28V7mBjPYXT+7rBhurayx7kM9lL09
+LAvgEI0O9gW48WbJoRTYOmukQRlOfBqREUHGd3kOTaK+dK999h6w736fcz2w
+mNOlpSYkvl7tv4iHPzi7y5L+5Z4jU7CX96ntvDCdR/8VHfP9viW1cwj5sdZv
+kYsgz6eTNtcCc3/+kzwOU6khCTVwiC1viQ/i9ZWObX4Gc1oj+ObgiTzRL41w
+vK6w5W5S33TxWwMw7Xz8snhyb4zaP0TBejRx58Wk/uWDwbvVYMWeSiVyz4p6
+KHyLxE/98zPLGqbulNUpJPFyH+sGwXkGb6mTsPZc9VgarPXm5vWdajinbek3
+yD3SfNkK9UTY2nwou4zcmyavCg/CGUoquwrhkUm6oQgd5/6vCuu/4SO3u3z0
+4Pj7AhYnyT3QUfmMA2kvr7UygsMtJJ3PkPaKvLHl8KO/n1yIgkXaesTaET+H
+8colCebuC59Ognc8+ziWSif3o5kqJ1itc9gxHW7kTF1WguUnYmi36eT7AeMU
+qddl/eOUBJjDbs4sh/8sS5wLJ+t1nUkh58PB58YG/qRd46lSIPxzVEfCFaZ3
+uHGuwAL7zk/ZwNaBB0+WkvOrYZvaTpj1bvhfMr83vXq9FokvfZeqCtb/aEzn
+KsO0senQP+BaHk6UIpz89cZ0PjmvZLw6lWBTN5MH3+DZpvPG6nC33cwNPeRv
++KcT1ZC0SzWfCoelt5nz7SfzezaJvoC9ZyLbvUh8fX03luCeufrcpWcxZPzl
+E9a68N0U8/4SmGKXLXUUnvLS4usk46VHzwTCF3m/jM+T+LZquEfB5+z3M+TU
+kd/k7qoI+Nhk8DULmFZ3dfwM3FT/6bIfHHB8nm4HS7vxjibAIX6FJqqw5ism
+6x7MGCm4Mk/2T0nz7+ewPVelso48f7sbu7rhChm/91dgd6GY7e/hjOlFelbk
+e0C0z5ePsKKSwfh6OG4yO38IHp/j8n9Effg8pAW5sPZkjuEzsp8bnlA6iQse
+dmfCgYV+CWS9GT3va3/D5+K5fOUwVXtjYAIsdqur7K46qXfo0gx45M31JYkk
+nuC/PlTBHWk3bSNIflo2oh/gR1bN78+T/uLzFDHEo6A40nKK+KnccXt4w8Xy
+375w1ORIUSpcmk5Z60/mU6t8NQRvmbrpE0zaXYxS6ahPb+6oaDwx++7IOXjO
+yKQrh9T3H7GUSlhNeEy8Fk5uXz34Ha652C4yCHMuzNpL4177+EJUHVUD56MT
+VYR8j+hulx5Wg023xPYdhB01VFTtYe7Bu8sOw/OXt24Jgcc/ZHFs4Eavj0k5
+ME2Z81IPTt0nuaKJ9E8SzxKB9bjvvUfIfC55tp+xfpAvu5Z3C/n9ovZEOVw/
+E2UnsoXc49ltZP9YG5pVysPxdsP5RnD2/qR6VTjgNnsTFR7otsilw6wmvbMd
+5HnvC+xUhhUVpE7nwIW6uStkSX8rofwweJFEqvl6mGrgLu0NX49zqVgKN3JH
+9rrCqx/mZk8hPsqs4LQn2S9N7NMfYMWbJhrkvCq29IvoJPlmjTAz4Ev8YyqN
+cAjf520tcFX8iQw27LG+vYXEl+5v9rYSbv1g8MQcHjkdWfmY1KetXykBdt+8
+vLganqm24OmHlW8aTTTDHJb9CjkZct90Pf+O9I9L3ngcri6P6PlJ2vPSdufB
+spUHPcUQv7Zzw+t++LuP1/btcNT0YBofvneYi6RpHiP1zNtClYbf544ti4Fb
+zU1FVeGfzoddHsJ0Pd5YZXj3WnZzLzxz5kezBPyL/L605f+/L8ky/gt6ApWe
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10.791777955940793, 5.1492961558718795}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwt1ws0lVkbB/B3IpfI3ThyGYQicXRMufcOckvlkss0ZUjquOQ6RKmOiEMS
+M0juoRw5M6iJQo1KxSRDLp1vUDQ1kT5RCpG+//5mrGW967f23s9+nmfv913r
+aO4Ndw9cRlHUffyT5z9/6+h/njp4DolGOcKtmqd4b7Vpaui/ur9kwtwfTfT/
+hDm/fHWyG9591aujAWY+S5+RMKAptomfWRo8kv+txWY4uZKf6w63Z7VMsGEx
+C1MvBbhOoWk+Fc5ZXk53r6Yplx3Ddwth7V5FLy7MeZG9uhJuzx24aQ2rjr7a
+dR5eNDP/9b0WTVV23NbJIevvzAbVwose7ryjsN3u2tmDsGR4WuD3MD8325YF
+M+6eN7KAOec+T1JwnAdXUR6mH4xvEWjSVOe7wW3jqEfBM8+4CWa4e2u0wi5u
+XkZVMFeQ0XUOHtPjbi2FX78bTYiD26aUNcvh1rhfVX1Jf4qyhn+BOYtcHxf4
+mlyIUxscqieZZEfWJ5/qG4HFrHPSHODF6rUXl5F8TfmvPGE7/8raNXCRsHh9
+ODx3J/XWNjiZoRqdA8e1dJ2PgtsfOXjfIe4s1cqBR4bSVRdgV3uuaR1MWTuv
+MUd9nbK7pO+S/jxuzD5G+vWhX7UHdjUw3HwP5rYHMHuJ5VqmpdYj34FNx3+H
+n1cJ+3vBCZFB/AZYWCvdrQAO7azqPEvy+T2mRkDG7Q8EhsHcgpkz0oY05RN+
+5oAFbLlte6gVnKE2okP6nTDxTtwf9msMd7iJ+jXujBbEw2X1nQ2HSH9sB26l
+wDOlYZmGxH+I53FhRqW10AsNmpI59U35cdg1Tm57MdxWYf80FF5c+pzzLexS
+87HaDW5vjuhXgV1Dw64awezm6tIHX2G+X9q8GExfTZuIhIsW3pY8Rf7tsWca
+DODk1yvGr8JjZjzvT+q4NzY96pnw2huz9s/hH5QuRQfDvA/SyqOwT8f4lAvs
+yjdLegu3NEv5b4KZ68vZXyJeXWCC1TqY0fvyjRPcORpZqgd3X9MrS4MzzPpN
+WLBMalRyD8w8t8XMkcRrXHFJCvnzRJqj2XDye+YOEzh54IHpTzDbd+6IN+zX
+xom8T/KXfCIfC4/oRl0UQn38Iyp6mTBb/IaUPez4h6dMCTzVtqk8A467URVZ
+CWtzDQz7yXwhH68ymI65F6JmhHOzqduQTfqd76IUAMeVnpkg8ZNrrEQrYT89
+zmM3uKjbz+YJLNlt26wFL83MiIsxaUqwcy6pH/Vcno6UUoVldhx+5gX/fVSp
+Xh9u/VKc9RD9uihhU8OCx/4MSrWEnwVITG2EmcPlptVqNJW5uYtvAvskFzUp
+wfqm3g7rSbw19WEZqjSlntX/rSbZ77uFWAnYzuMqXxae6tHPyFfB/XGy3bOE
+/Oi20483wn03vhjoh8dEHj0aW4V6gs4u1cD539wzrIN/8PD5Kglmx6jePg3j
+9YvdAzs6D3MS4RYFGy0rWEP+r4R02C7JWVwb5hz1fnMRDk2x6pAn1ux17oMd
+1ZwurITr6P2e0tjfsiImXg5uDUt02gkLHx6t1yL5dIUtlsBxWlH21vC1zl6x
+CTj5Z93mfbDr57QFFuq7Ziemk0vq+Xt5YgwckZjC6oLnvBOya0j96lPqokyy
+r3DBI1hfTeySHux3X/r8Szil0LF6G8xb/2DfGDw0rrQYCdMOulG98P7Jk8dy
+4bIH51k8mK36RqGRmGU/ux+W/OTc2A9TS6kTMnD64OUjU+T8BkzlecjXUPFq
+qYgx6uugjI1glweKWUqwgGVcU41+rLr186QWnO8vG6QCd7HX5a2Fu78XreEq
+I9+2M4XEUwusp+8ZeD/+9t62GqblrH44ANfxv2Mqwz5X5PmjSuhLTeLHFbBY
+VVIEG3aPP3ZqnuTLdlj3+UuaMoga/+sFuU+8TRU8WCCxTKWHjGvMP90Pt5hk
+erTAI7ZOihbwpV22dTyYwWnJ04FVfZmOZ0l9PcF9xOrnS1TS4IjdfD9z+HD+
+oPhxOD+2ZsmPxP/o3h4PZ1Vvup4HO1ruHCRuXTlNCeCCpc4sMn+sJL9bA/ka
+rjf8lE76Hyc/EAqbsgs/FsJ1b46VNMLt0gf1L5P8tHPuLMImee/nOpnk/mUw
+TNGPxSsBFRMkPqOpLxCWyzy5eSX6cU1Gv+kErNWgdpcJM4saN2bAwS+CGZ6w
+Y6rLMQ6sLn9IMR42FTUv9oWH0psKC+E6velEXfiJXdG5ZnJeHxo+CbB/GWOX
+kgCOmHBpOQS3Bo/TU+R8Zp9tWA5zo0LChDbgfJhfpCaj3reNT/RlYV5hUNi8
+Ik1t2N9hqgxnGZuLs+Gye/wcFeKFnsY+BZrK+8/aGAZs6rlm0hZequxylCHx
+fLxFmuRpypnTWE/iz1lYK1jA6RFSx99h/7Ha4ebf5XAPyh9WjpB6Is0kQ+G8
+vcIbOmFOtbafJmzzTsy+8f/5Wtm/lsX7ekJ4eQVZXy8V+RBuM96ekQWXCb2p
+bYN3zki85MAMldmpbjjT6rRQDFmfOr51CtaW6Kw+CI9EVClqIL5ALiY6hNzP
+aPbCbtjXof1uGLn/N8u0K2AfpayHh2A/Jctdk3Bcos/RFHJ/h4qNzVFPstHc
+6QLY9Xqt2Qk4ds3+xCuwRhpr7W04bONvVd0wTzR9+QdYe9pBdxqWyTXyXIV+
+ffxrNaWA/jBL3cwM4Dn1IA1TmP21bJYenBmgF7gbdrzlIC4LtwdSNcfh9h1v
+WM8QT86yXlAGj1ldOFEM8yN3v7oJM8SUHexgny1DCwISvz23UoD8Q7cMu03C
+gudGh/eQ+vd4+S/BcS9jtgygP3xRhX4xFubP/LFkTzyjlr0Szn8+P3VFBt+T
+xL4rkjDn7denNeGb3KYcEdj1xOSRtdI01SAy17qAeGXyF6M1pGhqmcH196/h
+kWCx+g0rcb9jKxiDZJwX/jhQkqZ+HPjZ8D4Zt91n/psEvocR190uk3ED5yob
+uE/H80IxcWCB9dsVeL+r1bemE/exfLvgFaWbvOPhusHS4n44+Ce7uyFwd3TE
+kDDWX54KDNsLtxro7PWG97KyKV8y/tlN6j7snFw+S1znoXbWBfnY7DqYHwjT
+Ifm9T+GUkKX/RsJUyaJUHPIPG9XvSII1hhL8JVHf6+2RtwtgmRFNiRy4z1nZ
+uoHYRu6hCPrRUnsgqh/2C2i02gMvbeOFz5J6jfYpZMMJa5r1VEi/FeKDimGT
+x3dObGaR73nM2DF4lVGmVwCsYTQ/zYJ1+1gpJ+GsLR78Fuw3+emU0AXY79Xn
+L1RgfsHUYCvc6qSc6Y58vYZffSMg8QbSDrFRz5N9+3JfwXRTjGUA6tfeKh48
+C0covw93Rv9Knp07tUTiu7eF6or/+7vC5N+nGP0/GR1iig==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.93763702332162, 4.533080933367719}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwl1wk4VekfB/DDRCjcsoy1e4vsImIU5Wgk0oIaJAol2cYyYynRjUTKuNeS
+FqNbphDDVamEQsUoyy1l61/dQQtJN0ZZ0sz37e95PO/z6X3P7/yWc46nxf7h
+bgHiFEW14Jes//9RoSkWWZWxfn4pOP49TV366HHwF9jlSdykMVz38qLsDCxS
+WL/kHdbcpEOMLPw7e29qZhPsG+C80BxxGOdPvGuAVS64q/XAgj4vi+fw7NjY
+1AFVmuLsvXZHGdelawadU1KjKUri1PoQuPlmQOAFmOMvzuqCJcfP7NNQp6mI
+tKIIV8SJ+4FXdYjY2+tIF6y4IJ/bAvvOSmjtRNzwjE85k7Do5uExIWynqF8/
+X4OmhCVGvR6Ia9DDj58L10fr+NTCm5V0Ut7hPMddb0YK64nRmAe1WF2WRkWs
+xGpfa27BxspLHxnfgHV7UcU+a3K+LGmHDVY1v30x/yBOxJvbhnKwREnJiUpS
+z75eTiPWCe/ywjisdG2unQ/WWNVc4y1Y2fejNw0gv+g+z7aV5Hz48x4vuPMQ
+T8UGFly+9uAB6ssPLQr0hE3busNXwZpz71dlkuvtTFQr0Z8fI1fl/A2zjmVW
+W8C86UmTjciDfTklrR393mWvFNyqTuodK2fDHT/wxHaifkFJp5gLzJCoap0h
+/fnwrH0N7Hnr9uw5TZyvO163CV6RtDXSfhHiigc3xcMHZjKpAZhKeUyTeZfm
+8TqjmTTFL+RJ6uP+109r8z/DnCvdpQVwjFkR04yFfPp9mlnIv1FVRtsbpk9O
+ORbD5mlm7+Nggb18jzHqf9KYuSINjujRs7ysSrN3Zd3Ylw6bjmvwlFGn/KO8
+IjY5T9/RC4M3bNlfEUrO/7NdqkSNZs8c+73ZBeYtbv5fE/bNPvHPm8DCwfau
+e9h/8WupxXyST1jwY/Kc1fZIrOhEvi4vLnn6w4ed06/lwlSz3HFJuPz50fwA
+mMUsn8pGfoOjr96sh339BgIYcGmxWD4NC+8sj05CPWFFV7lu5PrRRZ4fUX/r
+ataWQyR+WHPQHjirZ814E4n3o2VbP/rndEtVTZH0w75UFu8Ze9MeRyuSv+D7
+J01qsEr05qFcUk8dd/sLJZpSkhU29MMuxjaV9Uo02/pL1SfzxXje4+I07sLV
+lEzSUTjCssL6FXzPTXtjN8wrlZNcinj/9vRu01pCnueng4kw96+2Z4GwaDB2
+4D3yaTf0SrkAM1RUxvA+srVnTA48ggVHui3HkH/aRUn2OMzqrQnaj3rfOjNk
+pLTwvHzwsJyGhQXutDzsu0qtIAzze7yzYFYa5jurubfBs0dH707herohXl0R
+8yjO/KlYSOK5zkythu97f7FsgKmAf9iOcKrrrEsBybdGZdAM8/jTqUUiHuZc
+1ZL8ini6vzODvWDh26nQMsyjo+72z7Yk321PmGvJ+9T86aYRbLrBJvIe8ut3
+W3ZIG643K7uxEjYwtAjRI/H+4E4Wo74czfHklTBfSztdFb52uoDpSfKd/y8/
+C/1Jr1/xMpncz+bSGnX0b8I/4moNyV9lgWU1+v103tfhWRL/rWR8JNwuZ+Lk
+iPoZrUc562EH1xmtU7AwrTRoNeZpYngndRjm1CZv2QrbJj/daaON69NXP0+F
+v26cPpMOs9f2LuyB3c447XwMC/4NTLBFPop11xYvWIr7L7wVdRPWWT3UZQ/7
+Knv72GB+o53934XCwonXivfglv7rXSkw/6HYGkcVmu0cyjHNgk0rZf9sgKMn
+nIq4sEDCpUkf/dM8yUkg50XF3C7y3X7gMs0NhynpzF182Gp4bJ0bcazVtmbM
+I+9ch48pibfxrN1t7JufqXo2H6Yrt/jnYl9J1757mOR/Z+/ZzdjvG1+0rQ02
+1RPf/R7z2HUhWfUGce8QNwYe0pPKuAyzSjOWiJD/Cc/orBJyvWaf0BduLA+N
+qoIZjQvlBaif12bc0g7zN8TNWYf51DjsTpyARfzOB03onygyoEkP+TCm5ep3
+wJasAaNA0i+ldloa83Fv9isuJ/W2HPbtVKSpnleZVV9If6VvXamFx5gzcZt1
+8H6dzdVrUqTZB7kBr3gwx5Q55wMcz70xKILrk+36VyBeOLXvsLUu+jPb2pdN
+nof5JnKJsOiz8Jok8uP8Oup0HaaXTRmlwqyw9wn9MH/huKMcnr+8h49zxPQQ
+r6CwKgf1ypbp6yvA1IySvgLmxTpWnv49LDTadA/fH3Z30KJb8rCgIyj8Ofr3
+Wr5hxyzi+e7wNVyEfncZ7D7/Lf75yW12mIfBkrdGjbBpbs5Te+z/LPV1pIDk
+W2tqqwd/LmmdiIeFi3UfjyAe7Vnu4U3OFwaG5sK33dQ/rYUFEZK7dWBX1VFf
+s2/1aTleRP5DlXOvGMGsWiueCkxxWZHm5HxIeTrqpYI96UPr4Yjn2/2nvr0f
+IpkgXfL3scsrGvMZOd+ckUfuLy9iimO/ZCCq8xE5n6t98CLmcTK2V1qZ1N88
+KbMH/W+LTuv1g3kdujM09g8L1FOuwKLqjwOrsR/DpOQk9PH9FN6t8ML+6fRz
+3u6wSNnr91zs33Z4EVRInOzk8Q771jHVgUPkvEY1y4N8f8XevF5qAO//oNgJ
+e+1N+OwO09/5xXiiHvHk92vjYQFbVVqIecr9MKaZBbPf3/3FH/Mr+5DCPQuL
+Rldd6EE/rIr2ep2COdOx2jbon+8pk5fHyL7F2yOpsLP4b5pRsLDqPPc65vtk
+V0bmVri+vzCnCT5p6ieznNzPeHkc9qk5IUGnZMm+1I6nR+GGwJ9dRpA/y272
+HfneuTpbGglg05U5Rzpx/9PlBcIaWGCWVOcJD2u4VleS80khTR2ox39kcv9V
+cj7fLgPfG3bM/jyHRtIP8Z/8KjCP44Urcl6Q/a/OXB3YPK16iRTub9rDki5D
+PzXKHKk1MIO1YWId/Fvwm9xE0o+C4fApBZpy8OmobSY297V5ACvN2/BM2RDz
+XfVXzi0Fmu1TkT03COazmPMfwn73Rctq4PqNJ45O4zwjdmiNjBHyabVzdMC8
+oowPb94KR+joqV2GR+/Q97OJFwQnsTAvxrK5iS0wJTckW4h8rZraBsa+7Tdc
+MkC9cQovJOWNMU8Pt/EK1Ouc41OiCXNcum4aoj9mRalrmTAj6CebPMxTpBcy
+qQjz9gzlj5C/H/5sDkXOW2Ut0cV88n597TGI+IyrBxN+hA2lU+fcJR4JHrOF
+Q7/Ucc6R/KPeRWpgPtEjIQoJMMdQ73Qf4mcnpJ/cCQuZa/MTYINFYaMOsMjM
+W10G99PRE2RbwfX7cwZTkD/VeyXJAuaHG176jHqti28ybcn5xJGcvahX0zl2
+qTu5/8e0eX2Yh3Vl2ZkDxMsndLfDCtTfj0pJPvbjIcPo97OVB6LekniMhwHZ
+6Pe80L/Sl6E+QcbdAE/sR1eqXI6HTRXW2dvA8VsjxdrgiMQ/rWk4r8z2GHMZ
+9i91de/G9SFds/oRMH+L0Zc/YGpN+asamEH+34F5zSWrCf0fLfyUIA==
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.562492355174517, 10.345769235517452}, \
+{1, 0}], LineBox[CompressedData["
+1:eJwV1AlQE2cUB/AtxKMdhOIRznCUw9QjJCgKHrBIRJpBDXI5IzoUMNAWk6Dx
+YBgBL4gilSookgBB1ECNgkgLo4gWVDICagBrEBqUZhALgiBqihT7/zKT3fnN
+2/3ee9++Xdc4yZadZhRFifAnZ2oWObjT5Ehlcmkq+lm5SudGUxbfZkXEw68N
+xSuK4PrSXIUADmwL4G2DqYPrtCvgzunGMCY81epwng0nZggL279B3LX7lAuc
+El/COQJXN80ZdoK/vJ4u9IPXcGQVbrCyaWDZuCtNGbWeaRw4LtxprApmb7+l
+94clF7yTZSQ+5DwZTtbPVdKBsObXf43J8D+aiSobcr35kn1y2DVdkm9ywfU8
+pvgS3NNZE22Ej9aYpzfBLQbRyHO44YF/lAEW8Gr0PbBesbT2I5zKVSwcgGXs
+fskcHk3teTw/m6yn6johd4I3hglCrZEvwc7faxHM8snL5sDuk5rHXrAywc9u
+E7ymYweTeGaVVLsLVkmXTSyEtZMu23Lg2NYZpfbwTb+hqxfh0ANJp2bB9UfZ
+rXUkHpSfNop6Gt5SVDM8EXdncyds5V07cg8+qfZyr4VzOJuLG2ClZDfvDNnv
+Ka/MSpLP1q85BX7WPpBB8smDExeFwb5eyyfj4HyL19e84Xm/2DVy4WTR60M2
+cIm3p/kH9MtI/q+agoNGtsfUwoU6pY/BC+s9C1bvgk261NYHsMCv66MbnMlr
+HrsFM4osGTecaUpaKR69DZ+s3MVwhWNDVh1qg5uSJr8764T5SMzsHYAPdKv6
+mLAs39AzA/mKgjKjLrNoqqtvucYR/sqQXboBDmG2dZB503J0Q1OONPVCHuRM
+5kEfb1HQAqt8WAIpbNb9ybICVrYcNsuFOdFF/cXw8inxlBrOO+d8Qw3rpy9M
+34HHkzWhzfDgEd0o2d9H4VTDG7jtfUp/P7zPyk/shvyDGQ1Ow7CnITg6Fp59
+Ln4ReT6FTftZKvjkSF37ELzEuD7EAFec/byA3L9lOEVK+tM4vorogA1bEiR8
+mFs1l3UbfrtYn5MAs70nVpfDHWajZXvg2BPs68fgawnTfAl8b7q+fCdsYX2l
+OxL2DaiN5MN/BvqqPeGtqReZ5H2SLRb2vUT+rR4yH3PYxB5TyOGkqzXGVuw3
+J7yg0xGuD2jsL4SFufP4ZejXNLE6RgLHuLIi7eDC3k39QrioouCd3IGmaN3S
+U/5wBEuYOGGP5+a/ftIX9s4yucfCwh49j4ZFE/YlT+wQ//TDzXA460motQCO
+HRs8sxu2eJsW88QW81KQylfA3NObO0Ww9l3UIKnPaeM2h69hZdoCty9Q/xrb
+S1aPbFDXwYx3LGJptaYMNv7+ve1quPqhcUYOLN3DDoyG6d/u8o/D3ILnC8n8
+VxS8vF4E5z1oL8mGL+5Ib2mA9X9HFJ+HH5r9HDoM13JeCC7DWRl793uQ/GU2
+s6/C3HQtMwE2HczdS/xBJmosh+Vz/9hP5ul0ktXHPpihDPZVkO9Zr1Q8H/26
+P53lfhymxJc91sJ3zaoHSD2zGauUUSReJ4uPgm+Odb3fDucb5VdWknkPtrAL
+I/v1XjXOhA//OHWfAwv/mskYwv7Yc+6Wf0C+enlcZCU8ruDxK2FV6V7xTzCV
+08oKgfPu37i1DPZd+SbtKfqjPNpFDPjRS7YogvQfIQro4+B95KoztEzEN5xX
+34d7U6f7fGDTWutj9bDpjdsr1QLU7xO3kpghCbO0hNk68/x7sMvtnrpD81Gf
+i8NgLzzyGb95uI+cOfT/y9lRKw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.058738695939086, 17.601506520304568}, \
+{0, -1}], 
+        LineBox[{{17.000000000007276`, 16.500000000005457`}, {
+         13.500000000003638`, 10.500000000001819`}}], 
+        PolygonBox[{{15.552322615314452`, 14.01826734053906}, {
+         14.602165824326175`, 13.183281069670574`}, {15.293188945044921`, 
+         12.780184249251306`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.984057296392571, 13.323799910437668}, \
+{-1, 1}], LineBox[{{17.00000000000185, 16.5}, {10.000000000002592`, 16.5}}], 
+        PolygonBox[{{12.9, 16.5}, {14.1, 16.9}, {14.1, 16.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.5, 17.4452}, {0, -1}], 
+        LineBox[{{13.5, 10.5}, {10., 16.50000000000182}}], 
+        PolygonBox[{{12.052322615314452`, 12.98173265946094}, {
+         11.793188945044921`, 14.219815750748694`}, {11.102165824326175`, 
+         13.816718930329426`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.015942703607429, 13.323799910437668}, \
+{1, 1}], 
+        {PointSize[0.04], PointBox[{5., 15.5}], PointBox[{6., 5.5}], 
+         PointBox[{17., 16.5}], PointBox[{13.5, 10.5}], 
+         PointBox[{10., 16.5}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T12", " ", "P1", " ", "N23"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdgei/fgfjhihjij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdgei/fgfjhihjij.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {22, 22}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwl1AlQE2cUB/APCHcCEQ+CF0FaRQckUEhpPXaFiigKVqmg9SAKFB2O4IgX
+kaYanKBSDqHGTgQUqyjaIIOAghiptkQQqSgGSjEIIjKEQwRBMtL/2p3J7Pzm
+7fe+9963G6ed8RsijQkhkfgxd9I8iWsqTT5d7jRJim5wVsD5mzkmdYtpcsZy
+IsURpoXeI7mwd4wh6awdTdQlmReOwLMTfu+3hLVFMaJo+KJql3viFJpw+Zkm
+4XDr48O1L7g0cYkKfBQBS3k/BQbBY3OT9u5n4vXs5SdsaRJg/9whm4k7Zisz
+bGhycAkVVQV7nb58q4xDE55XWYoeFlxSU8awhfP2lZ+j3tH7WcsPsGkS9ka5
+UARb3Er6aA9XPNiemgt/ppG87rJG3s7AolZY3PhI0ga3cbQJlgKahER8FTsB
+K9Z0h82Dp81OK1+K9dKKQr0QbuWkdZyFIyajff3hMJ0NZY39laenFgTDageB
+vxxuFA4qN8DJdmy9OeoPmZZmwsS1Bj37J7hYfuntNzAr9e6fvTBXNVrvBY8a
+/dC1FP3r7o1/6QgreW88xbBr1bNpprDsRMLfyXA4P0rfgPpDTF4kRMCFJTq3
+dNhnBkc+F9aORKSvg105TyOvIf/YUs1DNny8OtXXFhbE/pz+GPPzyVG5rUG9
+0ukRUQq4LHu7XoT+LEI25eyGa+w7NFsxj2Lb52YrYTbvVoCvFVxZ6uUKb9pn
+0TrTEvvdfWXPh6Mru5MGzDGXnNY5TvAMu7xQjRnep+E6Z3dY0j512w1TPF/g
+c3A1/HDFrzoVC+f929GXcbCCI6PqTTCP7tDic7C/zcp0NqwN3ljbBF+NK9qS
+aIx4vOU9G/TTM2gutoR5KccmAmHWrOgajRH2W2imlsOlTZ47bsL5ia+/r2Ge
+N5w5yMSli92oUTiMtUNmhPU9/25iT8F8dT73YkPhroK7751geoar9g/Y613Q
+bDe4pMhGvBz1GAr1wx4CJv8S/2o4Y75qmQC+7/Te42v0w+o9S1zguMxD3ldg
+btSWkw5w81Cezhj9y450ipnzHO2WX6dgntCP1YJ6InIXbdwM60ytT+TBvOrv
+rALhRr+sJ+Fwcqp7zRR4cF7Tfkf41LKXK64hv0XCQ9d2zEcr4gpnwWqjm1fy
+4PU9iQtFzPwGQmRR8Id8s91HmX5npfC84Vr97acyzKPCemMsh/n+RNy8eIJ4
+XuXcITeaZN9mGXI+UkTqORnYAa+tv3OeMlDEZ1XwyXa4T3H9SP84RQRe2zp7
+4OJjgxdL31NkLJNbNwm7tGtcC0Yows+Ndp+H/NxHnHjNMEUU71b9GASH2P8i
+8npLkTCTK1VH4fwug3n/IEUqPJKzmO+duyPW+sMARUj0urhx5v9AJr1a20+R
+weJYpRD9hy+YCPKHxx4XRybARLS5ZTfMd/jC7TKs9rHlOGM97W+V9gxm74o5
+74b8vEMK8Qe4L6BcMAG7+N+YbsWcX+W4Re8QRdqyyh9wYfacvZk9qM8g9Rxm
+rBAuSulC/VvXxmQwz8tMD1TWvUP95JBqgsmn8Rs4hX6Jp21WM7OfVZ6EN0oR
+i7TjAUw94jN72CJY3b2/Jp55XzOezN8K88q6VnvCiiHfS8Zw4WH+niH0y3fq
+M/0W+aR2LU0q5jy7EuWrsF+P5DQlZr4nY2/vXtTH86gPZs5z7YLJIhr160Ys
+9xkx86QnLxRhHhltjg3NOI/wPj9VXC/mMf3+zHJ4/T+RQb2vUN9fktwCWL4r
+dOeKDoo0Jpfan4MFT5VVghZ4UXoZExfv0ccsaMT+US2f1tO1nZKSavTT4BLG
+5P90Xbzz/30x/R8h+kp5
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.2761166322027524, 16.884033677972475}, 
+         {0, -1}], LineBox[CompressedData["
+1:eJwl1Qs01FkcB/DbZJnFMgyKoxojPeWV7anmrweKCoW2nWrSU1o7JVJLHq3X
+JKaIHtLUqdSUkkUhNdFmNctO6JSIOdrooZo0FZrY7z075zj/83Hv/97v73fn
+/x+70F8DN7MIIXvxR6+kYxifUQzR0KslQy4V9r7KhMk/Hg1Z8IH9BgpDWGrm
+sP5H+Bbb5+MeK4a4jEsf9cmCIZdv6q634f/SNyP1m2Ar/p/n5sKykFBFA3z2
+uPD8KVyZHLvlL3EtWPlqlwGuxRYmk3iYF+l5but+LkNEI9h+u2B2QP50A1i1
+7O3Gp3DJTEvZeXPMr77+LRD7nrU6sk4I81obHz6Cp5XrdTvCKp9YCyFy+hZ1
+rR8Fy24cbeiAu59xL9jAaqdqt5DRDGm63BzgDhMnx+HbsNvG2qciev9Q7T2O
+NUN0M07eOwlr/Ba7+cCL6qa0dsLSnfa+oXDB3qrwicjH0+NnroWb+RFnd9C8
+d+rZc2BHkfruJeq1FcEDWF981WdPK+zi1ZZRQPdT+475AnOqM8yc4IKt5v1D
+MIms2FiEvGuycza/g/1vPGjmw4dPXBmuhRkVcTuKejXP3a/G0/ms4Ggj2F7r
+dZFP1z+8bksG+uUqSd90jfbH/495Y+FfmkP2Tqb9kK9cex99Vz0TRhw1w9XD
+XD8drnL6mtjPYYgiSGoXBq9URm9eDUvjpLbbYJMPp7ujTDH/VmpLMqzu5NT5
+miD/UuFxBcw+umLkvB+wv+nchZbYz4+zTxVojP22hf0cDwdHFUpyjJD3Hit4
+ALbqrw4ygF0ay1tjkb/dmdVWZIg+1feYjUS9c4wrJqTB6iyWQTIsEucWZsPF
+0cf7v8LmVt9WKKmrS0s3oH+KA+sfT8R6jPR9TzEcsyBytIzu9z4o9AWsVkam
+TkYesj19mQ4ur4+tvAn7D4kDtPBNvs03T+RXm5w43wDrBk/2VMCiL2EmErhm
+UkafJepNSFx03xFumdsy5AeLEhtXViJPTHypMgQmn7eumAUPHcpd5QqLRzTZ
+FKE+2486s8dYj9NZmDkOJiZeNktov6ofnclFPxhNHk+CPGLPFFNreFIaCTyN
+/OIzXFKE/h7TSsylqNc/NrQihD43bvJTm7/H+X66smYMzJ/RkDmFjfUqXQoJ
+rPvosPq1PsbH7OpiwfkTcq4Wf4e8HV137OHXMa59aXoYD1Zs2QA7pUw6GTcS
+6/d9Tr8J79bzKcljYbzp0ZHxyGN+f4qwYwTOvy6s/TSsfdIWGwy7ZMXr7FFP
+prUshkXHd+ZbyeHAUgvLLoJzaatyn4p+ROxwju2DZQNBZ2SwxPGLyAnzxdb2
+8/XQT8P2UYsyYenn2c3+8L7VrS1s7K9xkgQmwZVJ2WHZsP+tpca5sPC4JJ2P
+vJqe8of0fGy5gkQ5rFav1qPfh/LQsoFxqE8abnvYBp5xl3swBuasCXtMz8tG
+47zwMvXvqXFecFqXp/V12OV+vHst8qeYPPdJhsV6ByJmwheDFFkOMInJNJKj
+/nMHO5YewX6Kt0mED5fGaHc2Il/xMcdv59E/nxfcnZ2oh1jWWXrAL9dldf2N
++kUbhLtf4Tk1zvP7iRkWEIVzv2UJvEP1zPQvnYC46HPyjsH59d6vvAcFRDpU
+ZVYAewyX+D7+IiCabVGmNfS9Y7OgJeMT5r/gZtHzXTUtxS3uo4DwIqvGCuHx
+qje2lR8ERPYknP2APu91heEBGgFJyNNkeiHvxbJw5bF3AsI8sJ2lhGN6/z28
+7q2AqP2O8ALo93OwZEJfL+73frLqISxLDuR5Y1x0m5m6GP1SGUb5e+N+zSHz
+ExeoM7Rdze8FhFN/KlkDu5ctjH6O/Xj2S1jj0H8yJU0+iDy8GwtSnWGLoU1J
+o5GX2C82tYNFeaPzHbRwVr2DFvdrU5ZHGNH6puk65XCGSVJ4GSzzaLzrA+9u
+rzEy/4z+HUqUNiFfr0J8jQszL/stlsOxT/auuI75qoOvVXdRX3uAa1831i+W
+V8ndYYutzR1l2F96dVEOfb7ae60Oje9D/TziOp2eFzs/YD7yM8+nJSjpe3dq
+a64D+sFEeWb9Rt/Lht3Tt/cg32DKLG86fme2MqoL/VX6fXChDpWPfftUQPyv
+WMlnw4rsjXEzHiKPb3SNCE7QGdsuVKCfuyeYnaPvcfpJqP7/95fL/Ac/lbt5
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.128720493773297, 4.310154074720437}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.00000000000273, 17.000000000003638`}, {
+          17.00000000000182, 16.500000000003638`}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.286281316503036, 17.427512100981787}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt2Hk81FsfB/CR1CiVaLHFyF6WocgWo5QlISkiTIVLISqlcpElQnJdSWWL
+7EtTIVLT2CJ1rcl6PVNJlKKypzyf87ye+cfr7Wzf7/d35syZkT560sZtEYVC
+UeChUMhfyvwCXusZlP+91jEoEjyqB+1EGBRasnBoBGwq+0K9HvYdLV2YgytW
+KQftFmVQGGmfwhwxTrDoiFYXbL33u0QWmSeoM+mUGIPClOVd0QInR+rYC4vj
+/4/VR/+FZVsaxx/CjO9tlaR9zSC721KCQYl/HNyfDZfSy5oHYEGZZsFjsLFv
+sojLBgYlZNFpk+Vwooww+yXceuevM1mIx1rzdqW0JOb7EWSjDgso129wgTNY
+E2JVaxkU16uCKmEw7b2krgkseJx6LA5mKukt9K1hUET2m/qEwr59aZbBcN5x
+lvhRuPX2R3stuHvuxRZ1mNXW48AHJ9KpFhMkHkk+zzFhBkVbRT6OBXOsysym
+4LozTgEn4IwcPhcx9J+Yjby5CR5fKZfpANOCTlv8QH4Zd/hYpWQ91XL/JpjW
+2Dski/ioXZompbBvz2xCDpy3fK8AcfzKH4pbkV9A0SqeVzDXeW10A6y/OFfr
+Fxm/ZJW1A+oTqC5x2QTrxfsslhiCWcqaCfmkXpoWH1zxHC2MLbtpyCdegde4
+DR60YrbkwxTFgYfyeI7DWqXCDCnUk7Pw8gjcaqSQOgCHFEp6hsCHD7F+G9Iw
+/tOPhkuwGPPivmsw0yI/zh0O4tl4rRem53TU0eHH/RYaUtKY57Pj4/dYjzNi
+stSROOzqQBhsbaptEguzDhpfWQcnV60quQ8zirkVdxD/2S+q0U3w+H31xs3w
+p7rJujcwM/2TVBXyN47ofk88fsX74wGY0TLK84qML2FX8MC3Ig1qHpH24T2O
+tajnspzreilwxpH/RKXBdTU5AxdJ/6KkZ9fJ/lj0xe4QHFK9TqYA1g+447MN
+pk0G+PTByU/+eCcCU26lTStg/mEPOzMKbK1SUxsLfx3jGx9D/ty1pkV8iHfr
+PfGnIzDlGDXhKjyQ0CFK2jP0k1Mkka/BuiguGc84GRH6AE58LmdD6sV8s7Rr
+B+oXzVgibE78zOPQC/gon6NaCPG8+Q4G3mdxo9/kOWS8nUhMJhw7XL2wdCPW
+15VWHoW16h2cD8CtBj6WYnjfqcbyZ2XDLMs+n83w/CfTZVMwZWWTrxRcLjPa
+vFMGz3d1ePo0xps+dbKIhVur9NLKYfsD5lL/wL7JfiZMmF0gs3OxLNaP3vfn
+LOJT1Fi1mQ77rjjwJRLe5CTQaQVbq61tWg2HOru/OQpniLKCUpHvJ6Vupic8
+vsvfRR1eck+G4QoLcoscO8j58qduqy1p/84ojSLnS57fqD7M9Wh/fACODo7v
+liTtxY4p22GxY52yvxBfyMcfOjvIeGHzuF4S76Ybq11hjsvX/krY2lBIO5P0
+73CoTiXtY4dd52D7lLCHUTAr881yT8RTYqH1OhDm5lLjRmDqqZftF2HB7jbv
+s8hH12Nf92XSP0nnOj/qMW+scT6N1C/obkYKXPR8SUkNTC9+oaKE+gaFjHV8
+h2nUm5vy4Yo/fEtVED/LeidtPd7HQp+9E/1gplfdWR9Y1TnB7Ampb3FRcSHs
+vl74wHI5rP/oeCQ5B44uXFl0GB4//Vu2FU5rcLtSCPseZAs+gsunbdSmYVp8
+/rYwmC084akvj/lbbrZtg53bTX4HwL6/Luj0IJ4kIx2JQpgh4f/IC17szOff
+BlvTMw1nkE/BvSN7PsPconOKoXD465TAGZhi5dcvCCc8Mg2dhWm19dEF5Pxw
+cvAagzlrZ3ttYR8d6us+uHXnr5w1cLInfyMHzqAynn1BfXcPKj3MIPHpRFe9
+g1c6exsEkXiuTfVOwNqX1emHyfq2MRMyGC+p/8FsO5l/keZ5H7ho6qecLMnH
+jD+yjZw/HdXrheGQe4MCZoiv/UXqSoH/9S+cb4EV98oFCcJ0MfYVJvKdcVOy
+kIYFg3N9J2DJqNv1BmT95mDjCNRL5GfHLQ8yf5gdWwDnKtvZ430qma/r5bII
++J3eMaV/SX5lVKER2H6zzUVZBax/8mn5VpyzFg57wv3gjNuzVDdy7hpU51XD
+46OBxwPgwYpn8kKK6F9RkelDzukyXm0mTP875q0p3G9vsjUftpa5zuIn7WFi
+Dz7BrLSujlKsNxF8/+5GJdR/0WZxK9g1TMffCrZ+Uy1PPleHdC+s84XpW9Ol
+PeDd29pXh5P+84f8fyDfW7u+xsbA8R19Fy7DOUmTJpHEV8c2K8BFj4wSA2DO
+YY+eXtRv1Hyt8RFimVMj2XBrg1jiTnhcQ+tODLxMoXoViac1//T8VVjozku/
+BRK/1e/EYtg4NDl0QJE8T5vbI/DX/c8mq+GMxGSuIdaL7ioxLSL5J6R/K4K5
+ch+z0mGaRqCRMuLXNbTgpMLMttojFWQ/T/W25ZJ6uOfv2oP8Y180BLAVSVyc
+2AE4cA2n8i2pb8irthOoXwC3+JcgqU944+woHH6PR3QPzG1lBh/G517NOUWH
+OJi5Tu1RGawqdzGtGw6JPs0/CeuX3vVS2IT9csFwlQDOdRuGtnAAHKX3+tdK
++Hfg/IsGmH60NJIXfhVv/Vp4M/ZP62LlToxn11GyDsHxP/n9YuBNt4d/JMGC
+yg9kVeGSHX1fXsD0gBXBNYjPNfP8tm8wdyzI0xJOpvUvFVBGvm4Fmt3IT7Fs
+B10M5nIcrNxJviK2khIwxUH+y2/Uh9LU+kYI5mjk1ObCnOc/hxcwH7Nhgu0G
+3yqydfwAZxzvq9eHGU5/JdTDNNvUK2qwpbDA1izSfuOhqyFswRXiu0RcsMbc
+i9zb+Isaj8CMts56cm/x6PTfYErakyVXrUM8v7VMnLRg1v34TbHwgLZ0iCrp
+73RRXAj5aHt282oQv70gnQlrHcrqMSL14o1Z0EQ9hlJOOTgTF0iaNcASQ5k7
+Ikl9RGu6FVBfj28GZVWwRwm3yBVmu+bvnoMbdRJib8BxfJtXGiH/+AfhzmxY
+0jD26VU4StQlrQt2X5L09F+Y5hZ68h2Zz0XUUlUF40Xv5w7AOVLfcgNhwQei
+ba/gRPFDUs9h5tUCmRLSf/SbMVUVdf3EczYcXibYw2sEJ+8olbeBi84fqfKB
+AyQXLYiS+L6p7o+HmX+00NjIJ0PziWk28V7mBjPYXT+7rBhurayx7kM9lL09
+LAvgEI0O9gW48WbJoRTYOmukQRlOfBqREUHGd3kOTaK+dK999h6w736fcz2w
+mNOlpSYkvl7tv4iHPzi7y5L+5Z4jU7CX96ntvDCdR/8VHfP9viW1cwj5sdZv
+kYsgz6eTNtcCc3/+kzwOU6khCTVwiC1viQ/i9ZWObX4Gc1oj+ObgiTzRL41w
+vK6w5W5S33TxWwMw7Xz8snhyb4zaP0TBejRx58Wk/uWDwbvVYMWeSiVyz4p6
+KHyLxE/98zPLGqbulNUpJPFyH+sGwXkGb6mTsPZc9VgarPXm5vWdajinbek3
+yD3SfNkK9UTY2nwou4zcmyavCg/CGUoquwrhkUm6oQgd5/6vCuu/4SO3u3z0
+4Pj7AhYnyT3QUfmMA2kvr7UygsMtJJ3PkPaKvLHl8KO/n1yIgkXaesTaET+H
+8colCebuC59Ognc8+ziWSif3o5kqJ1itc9gxHW7kTF1WguUnYmi36eT7AeMU
+qddl/eOUBJjDbs4sh/8sS5wLJ+t1nUkh58PB58YG/qRd46lSIPxzVEfCFaZ3
+uHGuwAL7zk/ZwNaBB0+WkvOrYZvaTpj1bvhfMr83vXq9FokvfZeqCtb/aEzn
+KsO0senQP+BaHk6UIpz89cZ0PjmvZLw6lWBTN5MH3+DZpvPG6nC33cwNPeRv
++KcT1ZC0SzWfCoelt5nz7SfzezaJvoC9ZyLbvUh8fX03luCeufrcpWcxZPzl
+E9a68N0U8/4SmGKXLXUUnvLS4usk46VHzwTCF3m/jM+T+LZquEfB5+z3M+TU
+kd/k7qoI+Nhk8DULmFZ3dfwM3FT/6bIfHHB8nm4HS7vxjibAIX6FJqqw5ism
+6x7MGCm4Mk/2T0nz7+ewPVelso48f7sbu7rhChm/91dgd6GY7e/hjOlFelbk
+e0C0z5ePsKKSwfh6OG4yO38IHp/j8n9Effg8pAW5sPZkjuEzsp8bnlA6iQse
+dmfCgYV+CWS9GT3va3/D5+K5fOUwVXtjYAIsdqur7K46qXfo0gx45M31JYkk
+nuC/PlTBHWk3bSNIflo2oh/gR1bN78+T/uLzFDHEo6A40nKK+KnccXt4w8Xy
+375w1ORIUSpcmk5Z60/mU6t8NQRvmbrpE0zaXYxS6ahPb+6oaDwx++7IOXjO
+yKQrh9T3H7GUSlhNeEy8Fk5uXz34Ha652C4yCHMuzNpL4177+EJUHVUD56MT
+VYR8j+hulx5Wg023xPYdhB01VFTtYe7Bu8sOw/OXt24Jgcc/ZHFs4Eavj0k5
+ME2Z81IPTt0nuaKJ9E8SzxKB9bjvvUfIfC55tp+xfpAvu5Z3C/n9ovZEOVw/
+E2UnsoXc49ltZP9YG5pVysPxdsP5RnD2/qR6VTjgNnsTFR7otsilw6wmvbMd
+5HnvC+xUhhUVpE7nwIW6uStkSX8rofwweJFEqvl6mGrgLu0NX49zqVgKN3JH
+9rrCqx/mZk8hPsqs4LQn2S9N7NMfYMWbJhrkvCq29IvoJPlmjTAz4Ev8YyqN
+cAjf520tcFX8iQw27LG+vYXEl+5v9rYSbv1g8MQcHjkdWfmY1KetXykBdt+8
+vLganqm24OmHlW8aTTTDHJb9CjkZct90Pf+O9I9L3ngcri6P6PlJ2vPSdufB
+spUHPcUQv7Zzw+t++LuP1/btcNT0YBofvneYi6RpHiP1zNtClYbf544ti4Fb
+zU1FVeGfzoddHsJ0Pd5YZXj3WnZzLzxz5kezBPyL/L605f+/L8ky/gt6ApWe
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10.791777955940793, 5.1492961558718795}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwt1ws0lVkbB/B3IpfI3ThyGYQicXRMufcOckvlkss0ZUjquOQ6RKmOiEMS
+M0juoRw5M6iJQo1KxSRDLp1vUDQ1kT5RCpG+//5mrGW967f23s9+nmfv913r
+aO4Ndw9cRlHUffyT5z9/6+h/njp4DolGOcKtmqd4b7Vpaui/ur9kwtwfTfT/
+hDm/fHWyG9591aujAWY+S5+RMKAptomfWRo8kv+txWY4uZKf6w63Z7VMsGEx
+C1MvBbhOoWk+Fc5ZXk53r6Yplx3Ddwth7V5FLy7MeZG9uhJuzx24aQ2rjr7a
+dR5eNDP/9b0WTVV23NbJIevvzAbVwose7ryjsN3u2tmDsGR4WuD3MD8325YF
+M+6eN7KAOec+T1JwnAdXUR6mH4xvEWjSVOe7wW3jqEfBM8+4CWa4e2u0wi5u
+XkZVMFeQ0XUOHtPjbi2FX78bTYiD26aUNcvh1rhfVX1Jf4qyhn+BOYtcHxf4
+mlyIUxscqieZZEfWJ5/qG4HFrHPSHODF6rUXl5F8TfmvPGE7/8raNXCRsHh9
+ODx3J/XWNjiZoRqdA8e1dJ2PgtsfOXjfIe4s1cqBR4bSVRdgV3uuaR1MWTuv
+MUd9nbK7pO+S/jxuzD5G+vWhX7UHdjUw3HwP5rYHMHuJ5VqmpdYj34FNx3+H
+n1cJ+3vBCZFB/AZYWCvdrQAO7azqPEvy+T2mRkDG7Q8EhsHcgpkz0oY05RN+
+5oAFbLlte6gVnKE2okP6nTDxTtwf9msMd7iJ+jXujBbEw2X1nQ2HSH9sB26l
+wDOlYZmGxH+I53FhRqW10AsNmpI59U35cdg1Tm57MdxWYf80FF5c+pzzLexS
+87HaDW5vjuhXgV1Dw64awezm6tIHX2G+X9q8GExfTZuIhIsW3pY8Rf7tsWca
+DODk1yvGr8JjZjzvT+q4NzY96pnw2huz9s/hH5QuRQfDvA/SyqOwT8f4lAvs
+yjdLegu3NEv5b4KZ68vZXyJeXWCC1TqY0fvyjRPcORpZqgd3X9MrS4MzzPpN
+WLBMalRyD8w8t8XMkcRrXHFJCvnzRJqj2XDye+YOEzh54IHpTzDbd+6IN+zX
+xom8T/KXfCIfC4/oRl0UQn38Iyp6mTBb/IaUPez4h6dMCTzVtqk8A467URVZ
+CWtzDQz7yXwhH68ymI65F6JmhHOzqduQTfqd76IUAMeVnpkg8ZNrrEQrYT89
+zmM3uKjbz+YJLNlt26wFL83MiIsxaUqwcy6pH/Vcno6UUoVldhx+5gX/fVSp
+Xh9u/VKc9RD9uihhU8OCx/4MSrWEnwVITG2EmcPlptVqNJW5uYtvAvskFzUp
+wfqm3g7rSbw19WEZqjSlntX/rSbZ77uFWAnYzuMqXxae6tHPyFfB/XGy3bOE
+/Oi20483wn03vhjoh8dEHj0aW4V6gs4u1cD539wzrIN/8PD5Kglmx6jePg3j
+9YvdAzs6D3MS4RYFGy0rWEP+r4R02C7JWVwb5hz1fnMRDk2x6pAn1ux17oMd
+1ZwurITr6P2e0tjfsiImXg5uDUt02gkLHx6t1yL5dIUtlsBxWlH21vC1zl6x
+CTj5Z93mfbDr57QFFuq7Ziemk0vq+Xt5YgwckZjC6oLnvBOya0j96lPqokyy
+r3DBI1hfTeySHux3X/r8Szil0LF6G8xb/2DfGDw0rrQYCdMOulG98P7Jk8dy
+4bIH51k8mK36RqGRmGU/ux+W/OTc2A9TS6kTMnD64OUjU+T8BkzlecjXUPFq
+qYgx6uugjI1glweKWUqwgGVcU41+rLr186QWnO8vG6QCd7HX5a2Fu78XreEq
+I9+2M4XEUwusp+8ZeD/+9t62GqblrH44ANfxv2Mqwz5X5PmjSuhLTeLHFbBY
+VVIEG3aPP3ZqnuTLdlj3+UuaMoga/+sFuU+8TRU8WCCxTKWHjGvMP90Pt5hk
+erTAI7ZOihbwpV22dTyYwWnJ04FVfZmOZ0l9PcF9xOrnS1TS4IjdfD9z+HD+
+oPhxOD+2ZsmPxP/o3h4PZ1Vvup4HO1ruHCRuXTlNCeCCpc4sMn+sJL9bA/ka
+rjf8lE76Hyc/EAqbsgs/FsJ1b46VNMLt0gf1L5P8tHPuLMImee/nOpnk/mUw
+TNGPxSsBFRMkPqOpLxCWyzy5eSX6cU1Gv+kErNWgdpcJM4saN2bAwS+CGZ6w
+Y6rLMQ6sLn9IMR42FTUv9oWH0psKC+E6velEXfiJXdG5ZnJeHxo+CbB/GWOX
+kgCOmHBpOQS3Bo/TU+R8Zp9tWA5zo0LChDbgfJhfpCaj3reNT/RlYV5hUNi8
+Ik1t2N9hqgxnGZuLs+Gye/wcFeKFnsY+BZrK+8/aGAZs6rlm0hZequxylCHx
+fLxFmuRpypnTWE/iz1lYK1jA6RFSx99h/7Ha4ebf5XAPyh9WjpB6Is0kQ+G8
+vcIbOmFOtbafJmzzTsy+8f/5Wtm/lsX7ekJ4eQVZXy8V+RBuM96ekQWXCb2p
+bYN3zki85MAMldmpbjjT6rRQDFmfOr51CtaW6Kw+CI9EVClqIL5ALiY6hNzP
+aPbCbtjXof1uGLn/N8u0K2AfpayHh2A/Jctdk3Bcos/RFHJ/h4qNzVFPstHc
+6QLY9Xqt2Qk4ds3+xCuwRhpr7W04bONvVd0wTzR9+QdYe9pBdxqWyTXyXIV+
+ffxrNaWA/jBL3cwM4Dn1IA1TmP21bJYenBmgF7gbdrzlIC4LtwdSNcfh9h1v
+WM8QT86yXlAGj1ldOFEM8yN3v7oJM8SUHexgny1DCwISvz23UoD8Q7cMu03C
+gudGh/eQ+vd4+S/BcS9jtgygP3xRhX4xFubP/LFkTzyjlr0Szn8+P3VFBt+T
+xL4rkjDn7denNeGb3KYcEdj1xOSRtdI01SAy17qAeGXyF6M1pGhqmcH196/h
+kWCx+g0rcb9jKxiDZJwX/jhQkqZ+HPjZ8D4Zt91n/psEvocR190uk3ED5yob
+uE/H80IxcWCB9dsVeL+r1bemE/exfLvgFaWbvOPhusHS4n44+Ce7uyFwd3TE
+kDDWX54KDNsLtxro7PWG97KyKV8y/tlN6j7snFw+S1znoXbWBfnY7DqYHwjT
+Ifm9T+GUkKX/RsJUyaJUHPIPG9XvSII1hhL8JVHf6+2RtwtgmRFNiRy4z1nZ
+uoHYRu6hCPrRUnsgqh/2C2i02gMvbeOFz5J6jfYpZMMJa5r1VEi/FeKDimGT
+x3dObGaR73nM2DF4lVGmVwCsYTQ/zYJ1+1gpJ+GsLR78Fuw3+emU0AXY79Xn
+L1RgfsHUYCvc6qSc6Y58vYZffSMg8QbSDrFRz5N9+3JfwXRTjGUA6tfeKh48
+C0covw93Rv9Knp07tUTiu7eF6or/+7vC5N+nGP0/GR1iig==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.93763702332162, 4.533080933367719}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwl1wk4VekfB/DDRCjcsoy1e4vsImIU5Wgk0oIaJAol2cYyYynRjUTKuNeS
+FqNbphDDVamEQsUoyy1l61/dQQtJN0ZZ0sz37e95PO/z6X3P7/yWc46nxf7h
+bgHiFEW14Jes//9RoSkWWZWxfn4pOP49TV366HHwF9jlSdykMVz38qLsDCxS
+WL/kHdbcpEOMLPw7e29qZhPsG+C80BxxGOdPvGuAVS64q/XAgj4vi+fw7NjY
+1AFVmuLsvXZHGdelawadU1KjKUri1PoQuPlmQOAFmOMvzuqCJcfP7NNQp6mI
+tKIIV8SJ+4FXdYjY2+tIF6y4IJ/bAvvOSmjtRNzwjE85k7Do5uExIWynqF8/
+X4OmhCVGvR6Ia9DDj58L10fr+NTCm5V0Ut7hPMddb0YK64nRmAe1WF2WRkWs
+xGpfa27BxspLHxnfgHV7UcU+a3K+LGmHDVY1v30x/yBOxJvbhnKwREnJiUpS
+z75eTiPWCe/ywjisdG2unQ/WWNVc4y1Y2fejNw0gv+g+z7aV5Hz48x4vuPMQ
+T8UGFly+9uAB6ssPLQr0hE3busNXwZpz71dlkuvtTFQr0Z8fI1fl/A2zjmVW
+W8C86UmTjciDfTklrR393mWvFNyqTuodK2fDHT/wxHaifkFJp5gLzJCoap0h
+/fnwrH0N7Hnr9uw5TZyvO163CV6RtDXSfhHiigc3xcMHZjKpAZhKeUyTeZfm
+8TqjmTTFL+RJ6uP+109r8z/DnCvdpQVwjFkR04yFfPp9mlnIv1FVRtsbpk9O
+ORbD5mlm7+Nggb18jzHqf9KYuSINjujRs7ysSrN3Zd3Ylw6bjmvwlFGn/KO8
+IjY5T9/RC4M3bNlfEUrO/7NdqkSNZs8c+73ZBeYtbv5fE/bNPvHPm8DCwfau
+e9h/8WupxXyST1jwY/Kc1fZIrOhEvi4vLnn6w4ed06/lwlSz3HFJuPz50fwA
+mMUsn8pGfoOjr96sh339BgIYcGmxWD4NC+8sj05CPWFFV7lu5PrRRZ4fUX/r
+ataWQyR+WHPQHjirZ814E4n3o2VbP/rndEtVTZH0w75UFu8Ze9MeRyuSv+D7
+J01qsEr05qFcUk8dd/sLJZpSkhU29MMuxjaV9Uo02/pL1SfzxXje4+I07sLV
+lEzSUTjCssL6FXzPTXtjN8wrlZNcinj/9vRu01pCnueng4kw96+2Z4GwaDB2
+4D3yaTf0SrkAM1RUxvA+srVnTA48ggVHui3HkH/aRUn2OMzqrQnaj3rfOjNk
+pLTwvHzwsJyGhQXutDzsu0qtIAzze7yzYFYa5jurubfBs0dH707herohXl0R
+8yjO/KlYSOK5zkythu97f7FsgKmAf9iOcKrrrEsBybdGZdAM8/jTqUUiHuZc
+1ZL8ini6vzODvWDh26nQMsyjo+72z7Yk321PmGvJ+9T86aYRbLrBJvIe8ut3
+W3ZIG643K7uxEjYwtAjRI/H+4E4Wo74czfHklTBfSztdFb52uoDpSfKd/y8/
+C/1Jr1/xMpncz+bSGnX0b8I/4moNyV9lgWU1+v103tfhWRL/rWR8JNwuZ+Lk
+iPoZrUc562EH1xmtU7AwrTRoNeZpYngndRjm1CZv2QrbJj/daaON69NXP0+F
+v26cPpMOs9f2LuyB3c447XwMC/4NTLBFPop11xYvWIr7L7wVdRPWWT3UZQ/7
+Knv72GB+o53934XCwonXivfglv7rXSkw/6HYGkcVmu0cyjHNgk0rZf9sgKMn
+nIq4sEDCpUkf/dM8yUkg50XF3C7y3X7gMs0NhynpzF182Gp4bJ0bcazVtmbM
+I+9ch48pibfxrN1t7JufqXo2H6Yrt/jnYl9J1757mOR/Z+/ZzdjvG1+0rQ02
+1RPf/R7z2HUhWfUGce8QNwYe0pPKuAyzSjOWiJD/Cc/orBJyvWaf0BduLA+N
+qoIZjQvlBaif12bc0g7zN8TNWYf51DjsTpyARfzOB03onygyoEkP+TCm5ep3
+wJasAaNA0i+ldloa83Fv9isuJ/W2HPbtVKSpnleZVV9If6VvXamFx5gzcZt1
+8H6dzdVrUqTZB7kBr3gwx5Q55wMcz70xKILrk+36VyBeOLXvsLUu+jPb2pdN
+nof5JnKJsOiz8Jok8uP8Oup0HaaXTRmlwqyw9wn9MH/huKMcnr+8h49zxPQQ
+r6CwKgf1ypbp6yvA1IySvgLmxTpWnv49LDTadA/fH3Z30KJb8rCgIyj8Ofr3
+Wr5hxyzi+e7wNVyEfncZ7D7/Lf75yW12mIfBkrdGjbBpbs5Te+z/LPV1pIDk
+W2tqqwd/LmmdiIeFi3UfjyAe7Vnu4U3OFwaG5sK33dQ/rYUFEZK7dWBX1VFf
+s2/1aTleRP5DlXOvGMGsWiueCkxxWZHm5HxIeTrqpYI96UPr4Yjn2/2nvr0f
+IpkgXfL3scsrGvMZOd+ckUfuLy9iimO/ZCCq8xE5n6t98CLmcTK2V1qZ1N88
+KbMH/W+LTuv1g3kdujM09g8L1FOuwKLqjwOrsR/DpOQk9PH9FN6t8ML+6fRz
+3u6wSNnr91zs33Z4EVRInOzk8Q771jHVgUPkvEY1y4N8f8XevF5qAO//oNgJ
+e+1N+OwO09/5xXiiHvHk92vjYQFbVVqIecr9MKaZBbPf3/3FH/Mr+5DCPQuL
+Rldd6EE/rIr2ep2COdOx2jbon+8pk5fHyL7F2yOpsLP4b5pRsLDqPPc65vtk
+V0bmVri+vzCnCT5p6ieznNzPeHkc9qk5IUGnZMm+1I6nR+GGwJ9dRpA/y272
+HfneuTpbGglg05U5Rzpx/9PlBcIaWGCWVOcJD2u4VleS80khTR2ox39kcv9V
+cj7fLgPfG3bM/jyHRtIP8Z/8KjCP44Urcl6Q/a/OXB3YPK16iRTub9rDki5D
+PzXKHKk1MIO1YWId/Fvwm9xE0o+C4fApBZpy8OmobSY297V5ACvN2/BM2RDz
+XfVXzi0Fmu1TkT03COazmPMfwn73Rctq4PqNJ45O4zwjdmiNjBHyabVzdMC8
+oowPb94KR+joqV2GR+/Q97OJFwQnsTAvxrK5iS0wJTckW4h8rZraBsa+7Tdc
+MkC9cQovJOWNMU8Pt/EK1Ouc41OiCXNcum4aoj9mRalrmTAj6CebPMxTpBcy
+qQjz9gzlj5C/H/5sDkXOW2Ut0cV88n597TGI+IyrBxN+hA2lU+fcJR4JHrOF
+Q7/Ucc6R/KPeRWpgPtEjIQoJMMdQ73Qf4mcnpJ/cCQuZa/MTYINFYaMOsMjM
+W10G99PRE2RbwfX7cwZTkD/VeyXJAuaHG176jHqti28ybcn5xJGcvahX0zl2
+qTu5/8e0eX2Yh3Vl2ZkDxMsndLfDCtTfj0pJPvbjIcPo97OVB6LekniMhwHZ
+6Pe80L/Sl6E+QcbdAE/sR1eqXI6HTRXW2dvA8VsjxdrgiMQ/rWk4r8z2GHMZ
+9i91de/G9SFds/oRMH+L0Zc/YGpN+asamEH+34F5zSWrCf0fLfyUIA==
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.562492355174517, 10.345769235517452}, \
+{1, 0}], LineBox[CompressedData["
+1:eJwV1AlQE2cUB/AtxKMdhOIRznCUw9QjJCgKHrBIRJpBDXI5IzoUMNAWk6Dx
+YBgBL4gilSookgBB1ECNgkgLo4gWVDICagBrEBqUZhALgiBqihT7/zKT3fnN
+2/3ee9++Xdc4yZadZhRFifAnZ2oWObjT5Ehlcmkq+lm5SudGUxbfZkXEw68N
+xSuK4PrSXIUADmwL4G2DqYPrtCvgzunGMCY81epwng0nZggL279B3LX7lAuc
+El/COQJXN80ZdoK/vJ4u9IPXcGQVbrCyaWDZuCtNGbWeaRw4LtxprApmb7+l
+94clF7yTZSQ+5DwZTtbPVdKBsObXf43J8D+aiSobcr35kn1y2DVdkm9ywfU8
+pvgS3NNZE22Ej9aYpzfBLQbRyHO44YF/lAEW8Gr0PbBesbT2I5zKVSwcgGXs
+fskcHk3teTw/m6yn6johd4I3hglCrZEvwc7faxHM8snL5sDuk5rHXrAywc9u
+E7ymYweTeGaVVLsLVkmXTSyEtZMu23Lg2NYZpfbwTb+hqxfh0ANJp2bB9UfZ
+rXUkHpSfNop6Gt5SVDM8EXdncyds5V07cg8+qfZyr4VzOJuLG2ClZDfvDNnv
+Ka/MSpLP1q85BX7WPpBB8smDExeFwb5eyyfj4HyL19e84Xm/2DVy4WTR60M2
+cIm3p/kH9MtI/q+agoNGtsfUwoU6pY/BC+s9C1bvgk261NYHsMCv66MbnMlr
+HrsFM4osGTecaUpaKR69DZ+s3MVwhWNDVh1qg5uSJr8764T5SMzsHYAPdKv6
+mLAs39AzA/mKgjKjLrNoqqtvucYR/sqQXboBDmG2dZB503J0Q1OONPVCHuRM
+5kEfb1HQAqt8WAIpbNb9ybICVrYcNsuFOdFF/cXw8inxlBrOO+d8Qw3rpy9M
+34HHkzWhzfDgEd0o2d9H4VTDG7jtfUp/P7zPyk/shvyDGQ1Ow7CnITg6Fp59
+Ln4ReT6FTftZKvjkSF37ELzEuD7EAFec/byA3L9lOEVK+tM4vorogA1bEiR8
+mFs1l3UbfrtYn5MAs70nVpfDHWajZXvg2BPs68fgawnTfAl8b7q+fCdsYX2l
+OxL2DaiN5MN/BvqqPeGtqReZ5H2SLRb2vUT+rR4yH3PYxB5TyOGkqzXGVuw3
+J7yg0xGuD2jsL4SFufP4ZejXNLE6RgLHuLIi7eDC3k39QrioouCd3IGmaN3S
+U/5wBEuYOGGP5+a/ftIX9s4yucfCwh49j4ZFE/YlT+wQ//TDzXA460motQCO
+HRs8sxu2eJsW88QW81KQylfA3NObO0Ww9l3UIKnPaeM2h69hZdoCty9Q/xrb
+S1aPbFDXwYx3LGJptaYMNv7+ve1quPqhcUYOLN3DDoyG6d/u8o/D3ILnC8n8
+VxS8vF4E5z1oL8mGL+5Ib2mA9X9HFJ+HH5r9HDoM13JeCC7DWRl793uQ/GU2
+s6/C3HQtMwE2HczdS/xBJmosh+Vz/9hP5ul0ktXHPpihDPZVkO9Zr1Q8H/26
+P53lfhymxJc91sJ3zaoHSD2zGauUUSReJ4uPgm+Odb3fDucb5VdWknkPtrAL
+I/v1XjXOhA//OHWfAwv/mskYwv7Yc+6Wf0C+enlcZCU8ruDxK2FV6V7xTzCV
+08oKgfPu37i1DPZd+SbtKfqjPNpFDPjRS7YogvQfIQro4+B95KoztEzEN5xX
+34d7U6f7fGDTWutj9bDpjdsr1QLU7xO3kpghCbO0hNk68/x7sMvtnrpD81Gf
+i8NgLzzyGb95uI+cOfT/y9lRKw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.058738695939086, 17.601506520304568}, \
+{0, -1}], 
+        LineBox[{{17.000000000007276`, 16.500000000005457`}, {
+         13.500000000003638`, 10.500000000001819`}}], 
+        PolygonBox[{{14.947677384685548`, 12.98173265946094}, {
+         15.206811054955079`, 14.219815750748694`}, {15.897834175673825`, 
+         13.816718930329426`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.984057296392571, 13.323799910437668}, \
+{-1, 1}], LineBox[{{17.00000000000185, 16.5}, {10.000000000002592`, 16.5}}], 
+        PolygonBox[{{14.1, 16.5}, {12.9, 16.9}, {12.9, 16.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.5, 17.4452}, {0, -1}], 
+        LineBox[{{13.5, 10.5}, {10., 16.50000000000182}}], 
+        PolygonBox[{{11.447677384685548`, 14.01826734053906}, {
+         12.397834175673825`, 13.183281069670574`}, {11.706811054955079`, 
+         12.780184249251306`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.015942703607429, 13.323799910437668}, \
+{1, 1}], 
+        {PointSize[0.04], PointBox[{5., 15.5}], PointBox[{6., 5.5}], 
+         PointBox[{17., 16.5}], PointBox[{13.5, 10.5}], 
+         PointBox[{10., 16.5}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T12", " ", "P2", " ", "N24"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdgei/fgfjhihjij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdgei/fgfjhihjij.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {44, 22}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwt1gtQU1caB/AjtjwEIshDtlAQzAKuRUOX54rJpUKxksGAvCqMIiOIGiVF
+aYMiG4Uqsm4LiDa6FHkEDUIhIkKwyvAqRJYuEW1BsBApICLViFgDIuz/dDcz
+mczv5jz+35d77sQxPjksQY8QkoU3/STqRbz+xJA/XhyGjPyrNboQLu755pBq
+PUOazpZyXOBV9iuCLsDpaYrCMhuGmI2djjgMbw8uDbGCxS3EOAa2bKkVSlYy
+xMfqt/AQuIj11e4n1livwFlK/TDQ6/twWNpVVEXHd6RPDnZYMSTa1nKYrld7
+0XliE2x4t0onhVPO/pDTY8mQzdku/A446aqbWghry8xVc3C7p/e79rDqaZH+
+e8ivb+FZNGrBEGXUpnZvOH2fm0sLPH8hPigCtkv4beN1uPvFmN9nMCfV+3wj
+LCs5F58DW68aMuiFp+62FVyCB+Tul2dhxXeVAzUwd65l+AO6n2hBdBMeXWZX
+vgfWPF7b2wRLkoYKyuGCEya3bsE7/vPx2hHYJKvmwzo4x9rzpQ3q8xtbJymn
+eWe/rg+EZaoc9zy4UL5QuRtmX6w2E8MaG4PiFNqP2xrbGJh/rHflAZhzY/bI
+Bjjfz14YBgvu96XQ+rd87DHoCGt81tdMoz9TBi55g9hf/At/vha+qP69XAL7
+REljxLDcqc7cAm6W57ED4bkAh2/OoV7pgu8OW7j+TVW5MazOZVXMr0OOpV4e
+aSsY4toZ6zYJ9/ePnxsxx/2gqPlqFO41Dgjmw4rDw6NPYTud/92bZrh/uKzv
+F+H0rkzRh7Dg628tHbC+X8OV9w8uZ4jOffyLzTTvxiIjKQv7eXEX0mDxC/uX
+j02Rb6Qo6Roc+0vTP3bBYvYynylYZLqzWR9WcLeNWqD+OBlf1meC60LPBg5s
+Kf1C1AvLDpl/EgyrvDvPv4TnD6oS4+HmhMYJT8y/df62Xiqce1Lekw9rqgOZ
+E/CUJrxAD3lUU3rHTsMzaypq0+H2js4oer+0p7l56WAP3Y26LNjPiWsrRD18
+/QNN9Pdjm00oemB26obRRPiZvPSoKepvDk78aStdn7gdXQ1rHG6mecCiyEfv
+uMAmofWPrWCB9SLLGpYEHLk2iXpNGpQPh7CeujPPW077Me7ZkQA3PxOy9sCu
+se1ercgTPZRxfw2sjl6Ieo164pZkvp1G/038P18wok4bbGiHmRWbUgn6IRVq
+7hfDfJfLviPLcF4vOt7IhsXziooGI9wvXSLfY7BrxM6K04aYdzWqMQPWueh9
+tMuAIRMDcYtnYJsyKyZIH+OzYoOv0PkV393b9C7q6ju1vZuObz/lveMd9PMB
+N3UO5gxnxxcuxfWSsuPrkTdr65sOPVixVfTeXjj3QbBTgR7ytryRy+D+a4Kd
+obDP9sjjw/R5pIk54wt337z8d2P0K2Bf5tgnsMbrn6Fsen6Cq6ePwcrhj6x9
+YSHLQdkDF/ZXPtgMk0zha2/s90Gh/lAYnR/oklENy/6qK4uEmc6fM/6CvLGP
+pp9vg5PasrWlMP/Kre4tdH7NuJaF+nQBczn0PBZnVbATYYms7bYzrD4RsaIE
+5txL9DClz4eQhEONsKvwb7/S/HLDQ+KrsKKN7V8MC1qPvBXBZlF7zHbAhg1v
+K41hw09lc/Q8svn5Rkexv/hkjPwh+qfm+ae0IK/GykRWCscNPl0YQX1aq0Ku
+CBZtVEePLUG+Rc7nQXBSKCu9h2D8nRzNGjpfnN8XtsgjysruCzawoGFD/et5
+HlnVcNDHElYI/L+9NMcjuSGDHXaw9ssfD8fqeEQ+8bbVna7Xd9Kf9zuPKKY7
+V4fBqtr6/VEzPCL6OXl3Orzq15mVtdM8YvbkeUE1rIz+TPrpCx6JmzVPHocl
+4ifz4VqM73JKdkR9zVXLz2x9ziMaS//nsbDGoD+j7BmPiOMdAs5TlzxeWgRn
+7yUDXbBkIdyPg/Hq1dcFOtqvn1gHnLBedkLNFhb9/dtaMjVwVkzmPH0+KoI8
+f2jF/u2apBJH+vzPrTZWIp/4wJUhakY1FV/9kkcMD1pcsoWzS8z/fRb1qJbP
+WCyHlVqj+chXPMLZ358wi/3IvXWOE/DmU3O7aB7lubVf+qIfTOf1V/mw2d4h
+ZwYW2CkjIqgvj3BmMF6ZZz1nQfPPKkJCYfGf92Xepf3Krx+MxH7Ni6FFubSf
+jrsmDZBH2ZU4vo2ev21qp/3ILzk9ced9en7MXV9Zon5BTnSy1g3rSUzzxiZ5
+RMq1L/oR1rrXpSSO84i2xaOyHubcOR7R+Aj9Yl3fV+VG+z2gXjqA71d3O9dQ
+L6krUKmxnlZe2AQzxvf0Wc3oZyB38YHb//8nFN/+3+c65r9ilhyv
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.907871335428632, 17.11903631971389}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwl1gk8lPkfB/DHUe4rFIomWrRSE4VVmqeibJGhRLusiagkTSK5JyS5EjZX
+y0QUHTurclQ0VK5Ks6JW5yhHroxat/h/nv3P69Xreb37Hd9reCzzPOrkLU4Q
+RBP+UU+iaw4fPZL477OAJCTiUvbUwKKmYcc8FZKMysw+FAjz2pSqnFVI/kt9
+h3fLYdrnSN0fVUgizNXuUqsuSQjybca0VUgOXdKyiUPZUXF8DSz8FutlAguv
+jZh747zPz27M/mW4/6vQ8A7Wf6tZsvgaTF8rVaWN+EYvV/1zAqa925WcDdM0
+dGUcYDLfyVZXleS3hYTFr4V5vkkfeKok2RdgE2kAc/8Zn7RSI/kOyVPulFlK
+cU51aiTpdql7yAQW7CjQNFcniepFGS62sPBSPPOCOs5LRZDe1P1e1zTfqJMc
+pnVaXxzMjByZFFtIEj+Lqe0upfI94iUls5DkxMZXHXpK3W/RLi5SJ/mXZ9X0
+qXq4met+rYTHOqQeEKiXP+Ss5Q27GP/YrABzY1fen1IjOUuLVrsrwUzpW18j
+ke/AVKaBJLWufmbvBOobNXeKHcB9/HN22v6qJId46h39GOY8DMrtXUCSrkUr
+u9KoeOfD5g6jPwv7DNSdqXyiyj6KLSA55yfHFipS9TXXf7uJ+bjkHvXh09Cv
+dTGlwej/lk7Ga39YENQp5wGT6R3hS2B2Y/wpH8xD6rRdQ9ZS5Ofxuj4Z1m9w
+kJOACaWEwVbcZ/WTl0GEDvIbTgswQfz8D39clYNZYUbBVxD/eV2YbJk2zr/d
+PGGE/DcZG8UHwOwAjeVVqiRx5sXlWXuYkL99exv6IT2k07kF5uQcdxTAd5sD
+SSdY2HJ+ZAfmEaii0x0E0+3DLW9jfqflXUNLYV6mdLsE5vH1N6vGfpgMVrlj
+hnmN1PMn6chHMK/aYTvWW98J+09QJjKqrbB+VO17aDnMTb1UrwIfWPL9fR+V
+v8zkq0bcb79v9osc6uXOW/XJB/GPiwUf1oDp9wNWjCC/VeWrzeQpWy0bPaJG
+EguyNMK7cV5ZnGXThXodFBqeFcLCq3bsX+HV23b9YAvzZi/wX6M/Am2bjjaq
+vv5bqofgdtONEf/1Y0VjhDz8NFiyrHwJ4tvoTDSh/0bZR3vVYbamv04R+l8p
+Hqp6bDHytQqazYf7rG09W7So76PvzF2YVen6yRTmWdx/9i/8/YKpxRVNzKPV
+O2E75pWT8sHWGGYb97+oQLzXS1TEmzUQf+OIkjnyNSDiaRyYZLJv1cIDMW7y
+jrBgk38OE/WmqhnWb4C5j5oOvIVtoiR7N1HrHTO97uiXgj/rljvM6eIda4H1
+ta8xkmC+vRrDEPNIDOy/3EidV7a+54P+a9eGbFZAPtxz9x7EwZHJUTK7qfyY
+6TWUs90MWi7AwhjXV9jPKd3ikfOcsqJPO+4jNuk8/j5Bmd6+SIB4A40ZexRR
+v2iF7f59cKxpvZI8zLw2WPwR85s+pvX3MPbzeEqFvyD/17LpeZVwqvvhLAG+
+n2sCr3f7wIJXXzp3wArfrwbPIF9W26L0F+jfsI75sXCYKSWj6Q+PR1cqDyzC
+/uY9XTT0M8XXNcKe8g1Fmgj9X5o9eKoEeTLXPwt5j3n6rScZ82DRKcH3QVhG
+520HvmcEvaBPejHu27/9okEb8uKryjr64L7N0977nGDRk0mJJ3DwCs133chL
+MJE9tQXzaVrs++I8zLGUnG2GO2T+XOsKpxb2aO3Fuc60rpSfYPZA9WwP6vcN
+sp6/DuYqyf1yBP35ckDAsoUJDY/N3cjjZPva5WyYvkLrnC3yNPU89ugKtf+Q
++Mo09F/zSZuwj7ov38O9BuvrdbWS6IgjKJP92oz16m5hbhDMM29lVcCZVi7T
+ZTBXp/R5LOy1+uEM5kCQG7dK4ueVY1ZUXEQgLnN6aONzPAPI6BEpPIVGYWJ7
+kF84rVJqDPtZyzmP8fuBkGu/t6+Juu9pQNFWPB8kpHw4hSen5eD3GtTPDzje
+RKP6tclTehNcJvuo5irVj792RmF+nJXqTWnasDK7c2M4+t1Z4a8ZiydHa3iC
+gXVLo5ieTswt9dzx0WX4f6eaLnErWJif3KMH24Yl5uYqI59dD/62wX6Tghs3
+JWCB7mWlOKzbp/x5YlQR+2dpnp3U+TbWsCxM29y1dBfi/vvlrJ6DAvqdNxTQ
+TuVxmjVTL49+3n5ZvA95SymybgbCvOe10SLq+6nyKNcFFqpalIaiL1v/fu3m
+B6fe+zQ3AQ/dqR66DgvspyS9MQ+DPKk5ZdzP9HehV8HRGXbeKQrU+6LSYgTu
+CQu7pIl8+DlmO2XxPU0xmBdWDPN0phkS8N7IikJDJeRLWCS9xf6t1VVuGTDb
+N3FvFkzTlFb7ANPLDX+xhJP113ydg7lFtjkNyIe428cUwcSykA1b4ZcGm9Su
+w6wrLgbVqKc2pbFzDcyzm1diCpesbTCJofqjY6z+F/oxPR1LXlag/t6o8dwA
+a5vynuSiPtFsTMsb9PNLyIvaADnkMxF4JgMePZ312FQW+w/TD/nCb1O0uf3S
+iJ9j2egB79b5p6BQCv1SvecUBFfqMsUPz8d9EW5SpfBk928mdvPQv+7GzdNw
+0+Kzdo6SuC9R4dN+xC9mxMRHS2BdVS6qE8bfF8+6xTGPrzJ/+iL/g30HvSNh
+gUSR5yRcJ6Px1A7m+J1lxKH+M2fyb+yE2WVqkrLo14CyiUQUTGwv/hwBn5BV
+dXkJ8/5InHpDvY+SSwx3IB4n4+HhpZhHyKmRw60w76DfC2t4uv4PbRbyozuG
+/7od3mX5Y1cvzNrG6lgNv35z9I476kmdMxOM4b59O1VOlsO0lQluBfD9VPus
+zzD7zu+y5nBdj3/8IEyf2pF9F/mu9VqiXw2LWLY3TOEfMjfOuVD3yVYFl6A+
+zYcdAdVUfLF+Zz24m6Z7XUTl6xTlT/2cZe6WOTmOesh3CY4MeDsnbLxDDPmd
+i+UOob+t89xNCgj0y6auDu8fYixxZlnFLIMQTO8v5VLzsf0hbvkMg+Ctarte
+As+e97QommQQdFEHu5War0PPW+Y4g+A+d/imgfsvGlW82jDKIDhPtQtCYCed
+u8Zh37D/My1pGH7/kkjX/Ao7nygMRL6lx6Vu0UYYBDviL0Vx1Cf6nXM/XcQg
+SNV7salw7LdaMzbMTYu/qYH+lE3M17sJCwOSz6bDgbqPD5A4n9pR/XgKfpR3
+hKOO+5lOZlo/o/9ZMV4HNRCff1czKRRW/Pby9pp/GYRy4nBhEvxeUNdii3xF
+thUpkbDTwbwNNmMMgtY3augIjzVE9yuhPr7Yim/z4aSKLI8MWJBkKSpEvHi9
+PEEtrFxdftQYLq3QE0ui+lGTUV+C/BPky3sHcB/nk93UUtj1g7O8kIqXctMz
+E/W/f7jtoh/yIY/v37YIVj5pZJJL5T/sEFmMfqWMbnYORb10lw4l6v1nLbI5
+8tMgg2DtluiRofrdNOtH70W+u6MSeqh5XfSLkPmIeTWYj3+EpUtHpAY7cL/1
+s7A5+OSl6Vo7Ac4f8K2yxHnhuGDd+hrEC9W/Q723/vtkV///qUb+D6LOr4I=
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.922596693736967, 3.8067338747393404}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000002274`, 17.}, {13.500000000002274`, 16.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.552325660469876, 17.180083206945802}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt1ws0lOkfB/A3USpqcp0Q41YaYhKbrNa4i1wrUZRKKalmc881bOWSJImi
+HZJLWaTkkrYhogs7CSG1UymWpYmKJP7fZ89/znGcz3luv9/3eWfOeVX3HHXd
+J0JR1Hv8kf/U5Cw+6mzqv48Um5KJzjmppMGmhOpWM6dhz5bjVyxg/phKj7g0
+m/KOlU0KhAUfa7eEw+wr25ilsPP8Pff74NTBTdRHMj+1VJ4pw6aKksKsDTXZ
+FE0yQ3s3zO3Wn4mC+XsVymJg6oyJ2GPYe7x842m4fGuntswKzG/ozAqFqxMd
+7XfAfP413c3w7XNWnjmwoKYhRAHuN85K6oY5G1aUPMP5jFxzh0UrUY/KUFEE
+zPvm6G8Al7/e8UiF1PfbVvnNMCXzreY++uvX/mdwPxl/qGm7G059Wjp8FPZu
+OMtaANPtR7OOwOwo09G7S9HP57zuvXDMrFNyJKzl+MuoM/El7QgXWKkkImgd
+TCuZ/tUYZoQ/37QMFtjW2xJ7r9CIm0S97GnVj2S+aN1x8xdwufkzrxNwI/dW
+TRXpR+LFxWY4W+SjWDbsbdh0Ww31mLyqVToJO18/9PksHEHvrAqBGR/ZLxeh
+v8bPbhbHSD79Hm5p5L7URP4KJvOvRL5XRl6ZOTZzyXr+YN6jEpgzFqbAJU6c
+MFwni/GAX183knq6gk/UwM4TtdfHST2blmzTk2NT7iXGAdroh1+77206zAqf
+afODU/V8Jz7APov588rJ+FnaWnV5NpX8+OOKbySPXrqMLcy2M5O21MK64aiF
+W2HhH/ScFJjR5xFpBwdaNmd1EbeWPVwFd+ybmVy2Cn2oR2l+wf4dmqq9bjCr
+Mq6gDA7MLfo9CeZ8rRP1IvVUtM/eIeNS3bFzYI33o0u7YeFpvfu56EfmHG/b
+KOy8VyreHC73udDwDU5l2mQMIg//ZX23puCYLy1xmXDLfsNvn2Da3ruBbrDO
+0MpGAcx3CqdWwO6VT3NayHj8KfGFMK1y3O0GOU+Ld0mU5Juw90siGZ/D6pMj
++Zt9vXKQ9GNh/INNnu9wv7iNxFThulhYtLe1SYfMN8jr6ibPt/DgflkyPrPd
+ltRbUiKvK0b6XXvG6K4s+V60Xf6BvJwD31WYol+uAatzFo6ZbLN/At++ef2S
+BKk3VM/RA3kqxVaaasDlPePD/bDM75xCa5KH772jB+k4X7/NKgBmv4o//BY+
+YLxes5jked5OaL+MTaVLRQs/kPGz3/Ly4Gq3C5Q2E+c96Bp7B3vW/XE4AOZ7
+0pmLFXBf2gNqf8Ic6bQTDLj6IH9cXBvnFd/XUoT7nr+qcIFpu3otZrE+/ss/
+NhmwQEdS0Aa3eHU3dcCMB2avk+FkvfCoRTqYn7m70wSmvo1Ir4d5Rb+MkHr7
+qipOesKc4Ku34mDWiVnTIDJf23pEHS7ntsvHkfm6v/m0oH9BQYrbSZgyGqoK
+gjkTkhXRMFsigMmC3TU3WXPIfuXJId+Rp9KwMMEDZkWeKumFtWb0TTfA3E9L
+F/DhzBulu5eT+XGzA33kPi4PL51G/bx59jfnYD/+rE/0S1g43d+5gXwfBF+f
+3YP54mGdZ2HbhCzpa8RTow5fYEraRfE8ccx8mUOovyWXeTwBZsfJbRmhk3oW
+HSJ2DkuoCUEeEsemm8h8bl3uZTHka6ngP1FEzlO8sDqN5B3y7HsLnFqmXk5X
+xO/Z9tZd4//Nz8tLhwUu7ZYrSV6jJz7NUcJ9qDD89pJ+lvgxvGC61Z31BbBz
+t9mRq3AMr6p7BPZ2yv/UTsb9M4yNVqO+XXklQ7BRpelPcTBtw9yLxN25R7Of
+wsKkrCvP4UBHC0cpXdxLc3FOITkvWXWzKxzDbrI5CPdZyY8kwsKyvyWVyHyv
+zuu1cKoKb+oB6q32zAgWkPXdJgn74NtWrrnfYb7eWJAYTMm1/rNID+MXXVOK
+0H+m+7ropXqk/wXRm+HsF1azEjD1vOLqQpKXVcfRWaynXnX2PEOegpwtBkMw
+o2fKvQTmuYTOtpH6qjjnsmEZZmF9GSwQLJfOhzXaJtNTYG7kzsgHcERcdOFh
+Un9fRugUXLeyUcMJppnX1djgPEbbDhVDmJ1XtqQYFgZGhavCrJOCMEXUny8W
+8VKW7B/raHMZ7sjrSZEm9XkUm2ggD//+pnhFmLN+Hu8mrGPEMdcl+8/sFzdd
+zqY+Hyt8ZU/yOKPl1AzfPjjxPYDU1+cxx1oZfbxx7LpG+uH9GL0DG20QNyN5
+0n5yCpZTwe/NuznVqiSvVtvi3bCz9cYjB2CW7vChDFgYfMe7AhakLEi8BRc9
+rvL7Qcbzax9Uw5uMfi5VZyF/m5G/Csh4VJW4DcxVm7c1Gu5aZffAF2bVtL+w
+hNtlkyfi4RiD2Nwp1FNgfeJdDixk3MzJh3V0/D/dhCmrgTU28NvyF/d4MM2H
+SRtAf9c7shQfw+z48HkJMHXqmmwbOU/UoHUNnC+VNfqUzHez6HqPvA40SCo3
+w4x/LVWK4bSkRvt7MOe4rXg0/PbsG9tyMn/iC8uPPI92EfNzYT4jyMsf3h/4
+MjWVrFdg+ZyE0z3qp6LJfIvVmtWwu/w6Tw7pJ84jicL5JrvtGvbAzpWVF73g
+jqX6mu4knxfjQU/h9JKNO13I+bvKsjaiv2B3exUnOFVZ+h0f/rBYffi/8eRj
+j7yQV+yGa7TtZP9y5cRhOPHyrkKS54G0RyXGDHwfja+lHIer86PtwmGF+38f
+SSN5jMmGVcIxv9DvlcJGywe2DsCXdM7zSF6huqZblqiyKTs/q0ufSN6TOx10
+4DTrTge5Nfjdm78neQM87fz4yc9wkWJypzlsnh077Q2zzlUcMIEvKUU8iYeF
+D4tmmHDDr5H6BbDRqsf1ZH+5FqZlI8xf8NHsX5zfEpdl+Bo+3W3r0wCXdkXv
+H4e7C546pcOJT274ztXH+qCvbj5wgUr0rCTM037ytwHsftdMRxqm6y+1F4cH
+h/U1iJ23RVfVIx+DevfNi2GOhqXpCZi5XmObGCx8bn7bFbZeLz85ifOoZUr9
+RvCRt3+oDsG8H/YPDWH9m6+7e2DvXb2+duT59ju/5hHMvh8jCIYzAk5Z1MDc
+HZUutXBU2IzyDTimoj1kAerZP9hc/zvJo0ewwBQevUlJZpLxTUt0IuBQox93
+02F3pvWrP2GtLTWeGTBt7uxbUeQ1Vqpkl0PW924U2MPJnY5FxfCg1E9HzpF8
+Jcz23oVbFK4aPIczGJF67XB5eqjIEjU2pfaedWYE5uTZ95vDrhNurRLoP9Tu
+lNFhWMa3ma4HcxNseMnwL4YDoZthrftGJVxYpDX7TSjJ0+FrfhHMjFAzuULW
+d55ry4ftflgfa4Anzyg3XyD73y0M6yfj95y4EbDWA87OuWtxP57+HdthXbe1
+DspwqNrCdfpw7anDlw3gFuHqt6Jw5hu/NiuYX5XO6EQ/GurruC4we7eY2zXY
+WZUj4g6zQrkfQmDvph5lDzimSEfZCWbZlW7dCmuZ7qKvhm1ZdesdYEGa7A1p
+kqfI8UQzMl/TezPJl7nEQWctqUddfQUFZ9e6qqjDjHdDjfNhiYRFQVKweK7v
+NkWSt6+rlQicWv48wZh8H5ZLXR1Hv6dzt6T6wPRjq88NwLRIA71M2PK8xORr
+8vyZXmkm96Nb93N2L3n+Vmw/IIt+g+dHyL2Eu1VfvSH5uCdltgpgyqmvL5fc
+zwXTsWHYNiJ8bABOWbgocprkPaTUxMR7nO2ep7qkPmfJdvoB+PPaZed14MEK
+zlAOzJSeEbUn+dJ2xj+GJxmFlf6k3+tGqf/C6SE1t1NhXsB1jbl4j/u6eP5U
+JcnbsKNNEk6uM+K8JPnVCzMk4Bny/rj2/++PGuz/AQ7UGzs=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.684798798577102, 9.013741219420858}, \
+{1, -1}], LineBox[CompressedData["
+1:eJwt1wk4lGsbB/C3UpbEILs0R3Yyk7R8LbxJxalsJUQaQguFEiqmkS2iMyFR
+YqIUCaeELDVKyqGTCi1UI3I6okYnS0W+//Odb67L5fq5n+d+7vue551r/OIT
+5Ow3laKoLvyQ3/++dOl/f2vTFHuZzLAd3GrvWaoPf40bupMBC9qdpRfBwfMd
+Rnvg4CduaUawwOC7KUsPznj1zzS4xX6ldBgscNIfaZiDPJcV/SpgR3ZC9D5Y
+69ZKn08w5+rXmGmw273FPC19mmL02jxJ0KIpKc54sRXxTaexSU2aKpeTd3KF
+6Yti+RC4+Chjyw6Y6fEtSqRBUzYZtQa+cHD5i+pN8JWoBaVbYdHbzbNb1bFu
+tMbWlqz/wdq/FdYNP1tuBnP8V80dVUNd497TGMQTAVmF8AZPEZfUx4tO2hMK
+i//m8ltIP/MlZd1hLSObgmIS1/LscIVtUvJUT8Gi7xYTQXCtu83MSBJ33paZ
+C9ue/eYVBAtzVG/1wFJr21MDSVzwKWkp6lkqs6MqlOz/eYqbBcdG/u5/nMS7
+30ROQT+GiRU3LsPivJdzA+B0ttvCpzBbU/NzK7whT3d8BupvXTDr/HzMh/Gf
+uN9tYLGBnXUkHJryPTUR5t/nplfBrUGVvz2DeSFRKm/h2vQ725gGmN/MNVaD
+cKRtQtpemGreldENt60fvlsFi6XiG2pg4dbM9EmYF6ZyhuRnR77ttjLEfL/t
+H9WDbZazHoXDgpGA9mrUJ9t2v+MSTEvsnGEFtxrGDj6EeUf3a1Si34hdbw+L
+YOE0tpEhnHnx4O4BmDH2JPMM5hXa9ENvEC4rKOqWgb8+Ony2B2YnDzkmqGKe
+txV0n5B87MBHCrBEQWlMJcyPTxWUqNCU6fXgPzJhcWz6Wm9YKv2wNamPn+q+
+zhS+4uzh4gKLPs/XUIBpP+mQRTDn0VZlBqymf2NAndQfw9ljCHddS/kkQawz
+YeYGsz8+2DSGeQiiz+7PhrVaS84Nw8wVFtuH4M0NHzsm4LL7a3ydUZ9NdeY5
+BbKfJ9pdDYfal/5kk/PdSqR10Z9aslaaBxwstaM5kfT7d8w+Pll/ZNS7D9ZN
+ilz4J6m/c8pfFmRe3A6mkhHmWnZKIQQeO7JSbxtxhpH/Gbg4eNtIIUzL1227
+BDsy4o1HYU78RDS5b77rSzZZG+PvfreiDpD7qFOokQgH3z7NJPnHxra6N5H4
+mzGX1zifLmkyn2KC/edPyO+Hk299M2DBIl9r3RH0Q4WWGDrDTLftevvg8nan
+3N0k7uJg8hbzcNvCDT9InJ+TbQ/7vurWDoNbNWKH6pVpynMyiBdI4kWXwyzh
+yB717+6wOPKJQtNsmrJ4x91Iw+xd6jP94fTJVcm/wJT4R5cabLhbRFHENYGz
+epWw/qCs8hvUL2zLUmiCVxgWL74NMyPOrXwIt3AKa/NgcXOjUARLXb/XkgLT
+t1pKGMi3K+f46miyf9BS2QWmn3FzuTA/KkmrCC6z2SuOJ/YfNZ+Jeg0NDzWf
+JfNTbbE6AAvv59pUw+xPbl1d8NfV7YO9sMhvL98a/TPin3aqk3nZpcrnwuXX
+PMtcSb8HPEIHyX07mVaYDTt2LQ03wjx71bJv9sECESfHAc589kfiQlPcf5ka
+321wm+X6Wh5MLVLd4gRbdOu+bSZ+HzrXBBZ5B51TnI/69lxM/Yj8A12xzc6w
+yED9fDo5/5lsWhLMGNxkbgSPLX16oAoWuj43vob6N8gc8eqExWlq6nqwSMf/
+9hcSF9urZGAeEn7GvJ8ws3x74nQ4Nnuf4iTM8fXrj8B86Q8M72GYdyI8blgR
+zz/d9sc7mDLhWPHg3hlSik2kPocOrzmwWNhuW0R8JM+zVQH3uUqh+jjcymqo
+PQfzzFIf+8O09PovPHhgo+noWlLPKm0H4kjVuAQT4i87qSxY1rLvkgo536xF
+tQmmEpebycCOXyUuzMJ5pr+syZGEBSFDd33gZPe/JBjk/I8F/ffgcr7zyDyY
+X3rhpwn6eXEzIW41mVfgyzOn4UDNY6v3kflYLrP8AZcvZtjkk/VFry+5kvvj
+rWfYTeYxfUv/JVh8aMF8fTPcI5/Q+93wB+oZHQwLgufdkST3KVxSrQ4W6ltt
+VobHUjpsZVjIJ1WhKA1LPXTzc4HL6qsK35H739Gvkg0La6wH80j+Ps+lXcRz
+2lrWw9WLx0ek2ahj4f2V5L6XnTB4zYSFZvoavrDZq9B15rBjQs5wJ/plyskN
+rIQpY1b/Bti8tbZ+NdnPVd5ei/nlDDlSNjC/w76FBV8sNdO2ggVR3lHFDHwe
+ujKbF8HMOLUtS2BB+KUPhjCPSltSKE9T/n8r89TJ+Q8ZJ+ThFyzJSimYs0FY
+VCCHzyOPgdjPqJ95MCYiRI58nidefwxTuY1pwbCj7tqN5TDH+LhzHtxgNHwo
+F6YXjD6binxjR0VKabBow0uTZDj9xJRMPszW2+2siXpetLrPziLrvTafiISX
+3tbVukbm6eRd0Atz3vvXt5D9nawV9ujvYbtO+uj/zm9quwGreeVsUkG9ZSUv
+dRmYj/WCgI2kX+rikK0XXDXxvN2VzNPLZjwL1hkN7okk89kV8vAOHJuU6JhP
+nGJn+ghu61T60ETymb+qFMKhr3UPfIYZi+K0zsJd51MaFRfgPv4TzN4KzwgY
+emwOCySN30+Fy7QbL9iTeN3bBWfI8yBbFeUHi5ezvmjAgXMmusJgTsJQdSp5
+fx78J+wYLHIVF0yDNw/cpI/DdClveR/mSdXXhRJzEqPNHs3C83reODEGFl5o
+rm2Upakvx1hmh8n5V4evds3E+1OTv2Yv2c/ti1GFG6R0Xm4jfuzB4srQ1Mk5
+AXIbyfqC6BJlWCcwRWMFiZuMvxFJ4/NWzcfClORPbvcgvsseideGeRcqwhSx
+nqcfoTsbZs6p+PUAzChe/n0WyWc88Nc4PPWLe6Ms2W/Xc/oyzndb4SOvAFOp
+k0Z7UG9SXbi2JonLquxbhn6Op2iPG5P9KVWps9Cv2bnOIJrEdZZceQFv/nh1
+qgepr0lW/RTuT0TlEgnSr6OvGV8F8wrbmZCaTfL3X9F0hi9u7M2vh/n9v1aH
+w9wbYYofyPx3vRqIhfuXzS2UM0e+9zFrImC36h9sC1gY8SrcCc40oI66wmXO
+LE8FOMliZnQ4zPFY3HIA52dM7bVLg0XX183JJvf92FnNIpIv771fPvqxXNgR
+VEP8ZN7TVPSbqVMx0WhOvm/qZYViHv37qLoWcp5JfdImzMuiIKqPmJYIz1iG
+efcaRg49gAWF0k4WUqiPf+bkbbL+Tznur5I0VVHzM/d3Es+9nBc3A8+P6W+s
+PJiK1S8YmI73I91ixylS3/OW2FjYsl4umEf2n6TUHOGup4PJwWR/xu4RBzi9
+rabXh8TjPPYeg+/eCUh0g5n27Wk98OJ/Jnc6k3z51mF7cZ7sz/mWTiT+Q9ld
+DfWk/qaU6kIc4CzfCT+1dS/eTuq5ttL7Kup/JTf9dBCZX2Adl4v+jHlzleLI
++as5EXbon5nPLs0l/Vc+uDUF81HRiagi/YrK1Xjn4bHnBRu6SX20zbrZmKeW
+9z3vGQvJ902O0XbYR6n5iSksaOgxOQQbr0rZuQlmXvQPJ3GdF+yBCJiTEhKu
+AJ/sa7HIJvHF4yI+8seWHmHVwqJSh9xu1ONzz+Xzc1hYOO+KNNz6+M+KT8S8
+d1UM6f//n2aB9ZN4SdL/BXHE1jc=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.51595498616782, 2.888880495006221}, \
+{1, 1}], LineBox[CompressedData["
+1:eJxTTMoPSmViYGCwBWIQDQEqDiEyIFrOgaGg63OSmYrDzO9z9v9uk3VgWLF5
+kku8ioPSsWuhi37JODBoaO52r1BxuLaBb/3LBCD/w0aDX/UqDvqbjmztPSDt
+wLBjCturUhWHfy805q1RAPI3eJmtiVJxUBZ+2RDbIeXAkPCA8Yq+ikNNZHC8
++z9JB4aK1Qtvf1d26H97fYldB5DPcX3a/63KDn84o2++0wLyG8QO8eUpO4jX
+1jVNfSnhwCAgx2KkouywPWWl0aWjQP6LFavW3VFyWLTIuKtvP5DfscJy+Wwl
+h/kz33T/vwLkB3ha3EtRcojcYaJ/gAlo3oH87jprJYcJ68uXMLsA+Qy/p7xR
+VHIQen0p6c4kIF/D6uwiSSWHdau+P5r8Asg30Hwkrazk8EG39iuvHdD9B/7P
+P22r5LDt2qvvhj1AfsAHbvUMJYfOV85Xg8+A/GdvuXu+kkPCzvcHp/0A8ndw
+tAc+VHKoWCL935kHGB4CG/TkNZUdXvAILhJgAfILGpP/Fik7+D+OC/O7B1Sv
+oXp02S5lBwab++4ss4H8iCnTv/1WdpDY/v7gO2uQ/Wck1IxVHCpY/NtTjwDd
+98IwgyVWxaF0ZnuMliWQ73HwsGq5ioOa/NH5SguA/r+QH8/eoOIw1QIUvxJw
++SfM1gl348Xh+qd0Viy+ekwMbv4kuY0Vs6zF4PYL7hKwEzwiCncf13OFHb9T
+ROHu32W/cOVGRVG4/xTF3se+/y0C9/+GM08Y9nwWgYfPykwBu0x2UXj4NVjs
+0VpjLAoP32AfUY5zxaLw8Ldwbub6dFAUHj/RFRyyOeJi8Pj7bq47VzlXDB6/
+lcUd0X92i8Hj/8KO0xfs/4rB00dWp3AJg7Y4PP1kNJwpLXQQh6ev4H1hZ3Wt
+xOHpT+hLY22WmDg8ffJJLlUTvCoGT79VphrRB8vF4Om79+SaBTsYxeDpny1O
+vH5RuSg8f/BYXU8Mvi8Czz+3Cqy9iuxF4Pkr+MDHALH5wvD8x7Fac1UsqzA8
+fxZoJzuwVAo5wPLvVjYQLeQAAACtaGA=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.354800000000001, 6.}, {1, 0}], 
+        LineBox[CompressedData["
+1:eJxTTMoPSmViYGAwBmIQDQEqDis4ITTDhdu3dtmrONz7tfe8025lBwYOlz9u
+2SoOf3P6puVlAvkvylXY6lUcDp5abPiQH8hf8TIwpFLF4c7e6gtztig5MDBU
+rVgVpeJwWHOR3IlYID8hIGGqqorD9Ss5KdqCQP6F+ZNq7yk7HEt+3Lj1sqID
+ww/VNO9uZQc9U+P/QiuBfI6qjBdGyg6rtsx6HT8ZyM9QbVtzR8nB9nYt++9J
+QP6EvTcP9is5bJyc/qF2GZD/wNKnJ0jJgf3JuY+3ToHUb1inqKXkoDhZ4e/c
+30B+xaxpdyWVHBY/iEr0Ngba/0L6u6SykoOR9oXkK9lAvsGGFCFXJYdPWkE8
+EvNB/NupX2qUHG50nC5JPQ7kW+iVSR9TcqiS8z3z5T7I/SEHiqWUHXbuCGPy
+fQrkT7gR87tI2WFrwoYVvVeB/AiFqPATyg4/OgWeT9sA5Guc1SkQVnE4oXFW
+m6cCFD4mnRx+Kg5ut1fEGOqD9O+QcSpWcZgx42PG0ltA9wbskGNtUHHwkgFG
+R4MiXP5tBd/0KFVFuH47s/DF5y4owM3f+8Loyud2Bbj9ve3vJTL9FeDuu7DB
+P7xISwHu/jMRK/9uklKA+4/78yZjbgUFuP/XdJh0z7JQgIfP5GdrPz9PUICH
+X/Az/TnaUxTg4fvIYOm8LWcU4OGfUnefKYkFET+1uoZ8qqaI+LtSO4O/KRIR
+v+5mTT9YchHxfzsmVWRBDiJ9hN85w/A2TBGefvavlanz0lGEp6+1NpNnX3mn
+AE9/B5/HPjRfpABPnyuCW/STvRXg6bejd8cc2wfy8PQt4Pn4kpKuPDz9++q2
+JFR1yjnA8scOfhAt5wAAXRMymg==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.354800000000001, 8.75}, {1, 0}], 
+        LineBox[{{6.4999999999976925`, 16.}, {13.49999999999251, 16.}}], 
+        PolygonBox[{{9.4, 16.}, {10.6, 15.6}, {10.6, 16.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 16.9452}, {0, -1}], 
+        LineBox[{{6.499999999996362, 16.000000000005457`}, {10., 
+         10.000000000003638`}}], 
+        PolygonBox[{{8.552322615314452, 12.48173265946094}, {
+         7.602165824326175, 13.316718930329426`}, {8.293188945044921, 
+         13.719815750748694`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.515942703607428, 12.823799910437668}, \
+{1, 1}], LineBox[{{13.500000000007276`, 16.000000000005457`}, {
+         10.000000000003638`, 10.000000000001819`}}], 
+        PolygonBox[{{12.052322615314452`, 13.51826734053906}, {
+         11.102165824326175`, 12.683281069670574`}, {11.793188945044921`, 
+         12.280184249251306`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.484057296392571, 12.823799910437668}, \
+{-1, 1}], 
+        {PointSize[0.04], PointBox[{6.5, 16.}], PointBox[{10., 4.5}], 
+         PointBox[{13.5, 16.}], PointBox[{10., 7.5}], PointBox[{10., 10.}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T13", " ", "P1", " ", "N25"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdgei/giijfhfjhj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdgei/giijfhfjhj.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {0, 0}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwt1gtQU1caB/AjtjwEIshDtlAQzAKuRUOX54rJpUKxksGAvCqMIiOIGiVF
+aYMiG4Uqsm4LiDa6FHkEDUIhIkKwyvAqRJYuEW1BsBApICLViFgDIuz/dDcz
+mczv5jz+35d77sQxPjksQY8QkoU3/STqRbz+xJA/XhyGjPyrNboQLu755pBq
+PUOazpZyXOBV9iuCLsDpaYrCMhuGmI2djjgMbw8uDbGCxS3EOAa2bKkVSlYy
+xMfqt/AQuIj11e4n1livwFlK/TDQ6/twWNpVVEXHd6RPDnZYMSTa1nKYrld7
+0XliE2x4t0onhVPO/pDTY8mQzdku/A446aqbWghry8xVc3C7p/e79rDqaZH+
+e8ivb+FZNGrBEGXUpnZvOH2fm0sLPH8hPigCtkv4beN1uPvFmN9nMCfV+3wj
+LCs5F58DW68aMuiFp+62FVyCB+Tul2dhxXeVAzUwd65l+AO6n2hBdBMeXWZX
+vgfWPF7b2wRLkoYKyuGCEya3bsE7/vPx2hHYJKvmwzo4x9rzpQ3q8xtbJymn
+eWe/rg+EZaoc9zy4UL5QuRtmX6w2E8MaG4PiFNqP2xrbGJh/rHflAZhzY/bI
+Bjjfz14YBgvu96XQ+rd87DHoCGt81tdMoz9TBi55g9hf/At/vha+qP69XAL7
+REljxLDcqc7cAm6W57ED4bkAh2/OoV7pgu8OW7j+TVW5MazOZVXMr0OOpV4e
+aSsY4toZ6zYJ9/ePnxsxx/2gqPlqFO41Dgjmw4rDw6NPYTud/92bZrh/uKzv
+F+H0rkzRh7Dg628tHbC+X8OV9w8uZ4jOffyLzTTvxiIjKQv7eXEX0mDxC/uX
+j02Rb6Qo6Roc+0vTP3bBYvYynylYZLqzWR9WcLeNWqD+OBlf1meC60LPBg5s
+Kf1C1AvLDpl/EgyrvDvPv4TnD6oS4+HmhMYJT8y/df62Xiqce1Lekw9rqgOZ
+E/CUJrxAD3lUU3rHTsMzaypq0+H2js4oer+0p7l56WAP3Y26LNjPiWsrRD18
+/QNN9Pdjm00oemB26obRRPiZvPSoKepvDk78aStdn7gdXQ1rHG6mecCiyEfv
+uMAmofWPrWCB9SLLGpYEHLk2iXpNGpQPh7CeujPPW077Me7ZkQA3PxOy9sCu
+se1ercgTPZRxfw2sjl6Ieo164pZkvp1G/038P18wok4bbGiHmRWbUgn6IRVq
+7hfDfJfLviPLcF4vOt7IhsXziooGI9wvXSLfY7BrxM6K04aYdzWqMQPWueh9
+tMuAIRMDcYtnYJsyKyZIH+OzYoOv0PkV393b9C7q6ju1vZuObz/lveMd9PMB
+N3UO5gxnxxcuxfWSsuPrkTdr65sOPVixVfTeXjj3QbBTgR7ytryRy+D+a4Kd
+obDP9sjjw/R5pIk54wt337z8d2P0K2Bf5tgnsMbrn6Fsen6Cq6ePwcrhj6x9
+YSHLQdkDF/ZXPtgMk0zha2/s90Gh/lAYnR/oklENy/6qK4uEmc6fM/6CvLGP
+pp9vg5PasrWlMP/Kre4tdH7NuJaF+nQBczn0PBZnVbATYYms7bYzrD4RsaIE
+5txL9DClz4eQhEONsKvwb7/S/HLDQ+KrsKKN7V8MC1qPvBXBZlF7zHbAhg1v
+K41hw09lc/Q8svn5Rkexv/hkjPwh+qfm+ae0IK/GykRWCscNPl0YQX1aq0Ku
+CBZtVEePLUG+Rc7nQXBSKCu9h2D8nRzNGjpfnN8XtsgjysruCzawoGFD/et5
+HlnVcNDHElYI/L+9NMcjuSGDHXaw9ssfD8fqeEQ+8bbVna7Xd9Kf9zuPKKY7
+V4fBqtr6/VEzPCL6OXl3Orzq15mVtdM8YvbkeUE1rIz+TPrpCx6JmzVPHocl
+4ifz4VqM73JKdkR9zVXLz2x9ziMaS//nsbDGoD+j7BmPiOMdAs5TlzxeWgRn
+7yUDXbBkIdyPg/Hq1dcFOtqvn1gHnLBedkLNFhb9/dtaMjVwVkzmPH0+KoI8
+f2jF/u2apBJH+vzPrTZWIp/4wJUhakY1FV/9kkcMD1pcsoWzS8z/fRb1qJbP
+WCyHlVqj+chXPMLZ358wi/3IvXWOE/DmU3O7aB7lubVf+qIfTOf1V/mw2d4h
+ZwYW2CkjIqgvj3BmMF6ZZz1nQfPPKkJCYfGf92Xepf3Krx+MxH7Ni6FFubSf
+jrsmDZBH2ZU4vo2ev21qp/3ILzk9ced9en7MXV9Zon5BTnSy1g3rSUzzxiZ5
+RMq1L/oR1rrXpSSO84i2xaOyHubcOR7R+Aj9Yl3fV+VG+z2gXjqA71d3O9dQ
+L6krUKmxnlZe2AQzxvf0Wc3oZyB38YHb//8nFN/+3+c65r9ilhyv
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.907871335428632, 17.11903631971389}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwl1gk8lPkfB/DHUe4rFIomWrRSE4VVmqeibJGhRLusiagkTSK5JyS5EjZX
+y0QUHTurclQ0VK5Ks6JW5yhHroxat/h/nv3P69Xreb37Hd9reCzzPOrkLU4Q
+RBP+UU+iaw4fPZL477OAJCTiUvbUwKKmYcc8FZKMysw+FAjz2pSqnFVI/kt9
+h3fLYdrnSN0fVUgizNXuUqsuSQjybca0VUgOXdKyiUPZUXF8DSz8FutlAguv
+jZh747zPz27M/mW4/6vQ8A7Wf6tZsvgaTF8rVaWN+EYvV/1zAqa925WcDdM0
+dGUcYDLfyVZXleS3hYTFr4V5vkkfeKok2RdgE2kAc/8Zn7RSI/kOyVPulFlK
+cU51aiTpdql7yAQW7CjQNFcniepFGS62sPBSPPOCOs5LRZDe1P1e1zTfqJMc
+pnVaXxzMjByZFFtIEj+Lqe0upfI94iUls5DkxMZXHXpK3W/RLi5SJ/mXZ9X0
+qXq4met+rYTHOqQeEKiXP+Ss5Q27GP/YrABzY1fen1IjOUuLVrsrwUzpW18j
+ke/AVKaBJLWufmbvBOobNXeKHcB9/HN22v6qJId46h39GOY8DMrtXUCSrkUr
+u9KoeOfD5g6jPwv7DNSdqXyiyj6KLSA55yfHFipS9TXXf7uJ+bjkHvXh09Cv
+dTGlwej/lk7Ga39YENQp5wGT6R3hS2B2Y/wpH8xD6rRdQ9ZS5Ofxuj4Z1m9w
+kJOACaWEwVbcZ/WTl0GEDvIbTgswQfz8D39clYNZYUbBVxD/eV2YbJk2zr/d
+PGGE/DcZG8UHwOwAjeVVqiRx5sXlWXuYkL99exv6IT2k07kF5uQcdxTAd5sD
+SSdY2HJ+ZAfmEaii0x0E0+3DLW9jfqflXUNLYV6mdLsE5vH1N6vGfpgMVrlj
+hnmN1PMn6chHMK/aYTvWW98J+09QJjKqrbB+VO17aDnMTb1UrwIfWPL9fR+V
+v8zkq0bcb79v9osc6uXOW/XJB/GPiwUf1oDp9wNWjCC/VeWrzeQpWy0bPaJG
+EguyNMK7cV5ZnGXThXodFBqeFcLCq3bsX+HV23b9YAvzZi/wX6M/Am2bjjaq
+vv5bqofgdtONEf/1Y0VjhDz8NFiyrHwJ4tvoTDSh/0bZR3vVYbamv04R+l8p
+Hqp6bDHytQqazYf7rG09W7So76PvzF2YVen6yRTmWdx/9i/8/YKpxRVNzKPV
+O2E75pWT8sHWGGYb97+oQLzXS1TEmzUQf+OIkjnyNSDiaRyYZLJv1cIDMW7y
+jrBgk38OE/WmqhnWb4C5j5oOvIVtoiR7N1HrHTO97uiXgj/rljvM6eIda4H1
+ta8xkmC+vRrDEPNIDOy/3EidV7a+54P+a9eGbFZAPtxz9x7EwZHJUTK7qfyY
+6TWUs90MWi7AwhjXV9jPKd3ikfOcsqJPO+4jNuk8/j5Bmd6+SIB4A40ZexRR
+v2iF7f59cKxpvZI8zLw2WPwR85s+pvX3MPbzeEqFvyD/17LpeZVwqvvhLAG+
+n2sCr3f7wIJXXzp3wArfrwbPIF9W26L0F+jfsI75sXCYKSWj6Q+PR1cqDyzC
+/uY9XTT0M8XXNcKe8g1Fmgj9X5o9eKoEeTLXPwt5j3n6rScZ82DRKcH3QVhG
+520HvmcEvaBPejHu27/9okEb8uKryjr64L7N0977nGDRk0mJJ3DwCs133chL
+MJE9tQXzaVrs++I8zLGUnG2GO2T+XOsKpxb2aO3Fuc60rpSfYPZA9WwP6vcN
+sp6/DuYqyf1yBP35ckDAsoUJDY/N3cjjZPva5WyYvkLrnC3yNPU89ugKtf+Q
++Mo09F/zSZuwj7ov38O9BuvrdbWS6IgjKJP92oz16m5hbhDMM29lVcCZVi7T
+ZTBXp/R5LOy1+uEM5kCQG7dK4ueVY1ZUXEQgLnN6aONzPAPI6BEpPIVGYWJ7
+kF84rVJqDPtZyzmP8fuBkGu/t6+Juu9pQNFWPB8kpHw4hSen5eD3GtTPDzje
+RKP6tclTehNcJvuo5irVj792RmF+nJXqTWnasDK7c2M4+t1Z4a8ZiydHa3iC
+gXVLo5ieTswt9dzx0WX4f6eaLnErWJif3KMH24Yl5uYqI59dD/62wX6Tghs3
+JWCB7mWlOKzbp/x5YlQR+2dpnp3U+TbWsCxM29y1dBfi/vvlrJ6DAvqdNxTQ
+TuVxmjVTL49+3n5ZvA95SymybgbCvOe10SLq+6nyKNcFFqpalIaiL1v/fu3m
+B6fe+zQ3AQ/dqR66DgvspyS9MQ+DPKk5ZdzP9HehV8HRGXbeKQrU+6LSYgTu
+CQu7pIl8+DlmO2XxPU0xmBdWDPN0phkS8N7IikJDJeRLWCS9xf6t1VVuGTDb
+N3FvFkzTlFb7ANPLDX+xhJP113ydg7lFtjkNyIe428cUwcSykA1b4ZcGm9Su
+w6wrLgbVqKc2pbFzDcyzm1diCpesbTCJofqjY6z+F/oxPR1LXlag/t6o8dwA
+a5vynuSiPtFsTMsb9PNLyIvaADnkMxF4JgMePZ312FQW+w/TD/nCb1O0uf3S
+iJ9j2egB79b5p6BQCv1SvecUBFfqMsUPz8d9EW5SpfBk928mdvPQv+7GzdNw
+0+Kzdo6SuC9R4dN+xC9mxMRHS2BdVS6qE8bfF8+6xTGPrzJ/+iL/g30HvSNh
+gUSR5yRcJ6Px1A7m+J1lxKH+M2fyb+yE2WVqkrLo14CyiUQUTGwv/hwBn5BV
+dXkJ8/5InHpDvY+SSwx3IB4n4+HhpZhHyKmRw60w76DfC2t4uv4PbRbyozuG
+/7od3mX5Y1cvzNrG6lgNv35z9I476kmdMxOM4b59O1VOlsO0lQluBfD9VPus
+zzD7zu+y5nBdj3/8IEyf2pF9F/mu9VqiXw2LWLY3TOEfMjfOuVD3yVYFl6A+
+zYcdAdVUfLF+Zz24m6Z7XUTl6xTlT/2cZe6WOTmOesh3CY4MeDsnbLxDDPmd
+i+UOob+t89xNCgj0y6auDu8fYixxZlnFLIMQTO8v5VLzsf0hbvkMg+Ctarte
+As+e97QommQQdFEHu5War0PPW+Y4g+A+d/imgfsvGlW82jDKIDhPtQtCYCed
+u8Zh37D/My1pGH7/kkjX/Ao7nygMRL6lx6Vu0UYYBDviL0Vx1Cf6nXM/XcQg
+SNV7salw7LdaMzbMTYu/qYH+lE3M17sJCwOSz6bDgbqPD5A4n9pR/XgKfpR3
+hKOO+5lOZlo/o/9ZMV4HNRCff1czKRRW/Pby9pp/GYRy4nBhEvxeUNdii3xF
+thUpkbDTwbwNNmMMgtY3augIjzVE9yuhPr7Yim/z4aSKLI8MWJBkKSpEvHi9
+PEEtrFxdftQYLq3QE0ui+lGTUV+C/BPky3sHcB/nk93UUtj1g7O8kIqXctMz
+E/W/f7jtoh/yIY/v37YIVj5pZJJL5T/sEFmMfqWMbnYORb10lw4l6v1nLbI5
+8tMgg2DtluiRofrdNOtH70W+u6MSeqh5XfSLkPmIeTWYj3+EpUtHpAY7cL/1
+s7A5+OSl6Vo7Ac4f8K2yxHnhuGDd+hrEC9W/Q723/vtkV///qUb+D6LOr4I=
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.922596693736967, 3.8067338747393404}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000002274`, 17.}, {13.500000000002274`, 16.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.552325660469876, 17.180083206945802}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt1ws0lOkfB/A3USpqcp0Q41YaYhKbrNa4i1wrUZRKKalmc881bOWSJImi
+HZJLWaTkkrYhogs7CSG1UymWpYmKJP7fZ89/znGcz3luv9/3eWfOeVX3HHXd
+J0JR1Hv8kf/U5Cw+6mzqv48Um5KJzjmppMGmhOpWM6dhz5bjVyxg/phKj7g0
+m/KOlU0KhAUfa7eEw+wr25ilsPP8Pff74NTBTdRHMj+1VJ4pw6aKksKsDTXZ
+FE0yQ3s3zO3Wn4mC+XsVymJg6oyJ2GPYe7x842m4fGuntswKzG/ozAqFqxMd
+7XfAfP413c3w7XNWnjmwoKYhRAHuN85K6oY5G1aUPMP5jFxzh0UrUY/KUFEE
+zPvm6G8Al7/e8UiF1PfbVvnNMCXzreY++uvX/mdwPxl/qGm7G059Wjp8FPZu
+OMtaANPtR7OOwOwo09G7S9HP57zuvXDMrFNyJKzl+MuoM/El7QgXWKkkImgd
+TCuZ/tUYZoQ/37QMFtjW2xJ7r9CIm0S97GnVj2S+aN1x8xdwufkzrxNwI/dW
+TRXpR+LFxWY4W+SjWDbsbdh0Ww31mLyqVToJO18/9PksHEHvrAqBGR/ZLxeh
+v8bPbhbHSD79Hm5p5L7URP4KJvOvRL5XRl6ZOTZzyXr+YN6jEpgzFqbAJU6c
+MFwni/GAX183knq6gk/UwM4TtdfHST2blmzTk2NT7iXGAdroh1+77206zAqf
+afODU/V8Jz7APov588rJ+FnaWnV5NpX8+OOKbySPXrqMLcy2M5O21MK64aiF
+W2HhH/ScFJjR5xFpBwdaNmd1EbeWPVwFd+ybmVy2Cn2oR2l+wf4dmqq9bjCr
+Mq6gDA7MLfo9CeZ8rRP1IvVUtM/eIeNS3bFzYI33o0u7YeFpvfu56EfmHG/b
+KOy8VyreHC73udDwDU5l2mQMIg//ZX23puCYLy1xmXDLfsNvn2Da3ruBbrDO
+0MpGAcx3CqdWwO6VT3NayHj8KfGFMK1y3O0GOU+Ld0mU5Juw90siGZ/D6pMj
++Zt9vXKQ9GNh/INNnu9wv7iNxFThulhYtLe1SYfMN8jr6ibPt/DgflkyPrPd
+ltRbUiKvK0b6XXvG6K4s+V60Xf6BvJwD31WYol+uAatzFo6ZbLN/At++ef2S
+BKk3VM/RA3kqxVaaasDlPePD/bDM75xCa5KH772jB+k4X7/NKgBmv4o//BY+
+YLxes5jked5OaL+MTaVLRQs/kPGz3/Ly4Gq3C5Q2E+c96Bp7B3vW/XE4AOZ7
+0pmLFXBf2gNqf8Ic6bQTDLj6IH9cXBvnFd/XUoT7nr+qcIFpu3otZrE+/ss/
+NhmwQEdS0Aa3eHU3dcCMB2avk+FkvfCoRTqYn7m70wSmvo1Ir4d5Rb+MkHr7
+qipOesKc4Ku34mDWiVnTIDJf23pEHS7ntsvHkfm6v/m0oH9BQYrbSZgyGqoK
+gjkTkhXRMFsigMmC3TU3WXPIfuXJId+Rp9KwMMEDZkWeKumFtWb0TTfA3E9L
+F/DhzBulu5eT+XGzA33kPi4PL51G/bx59jfnYD/+rE/0S1g43d+5gXwfBF+f
+3YP54mGdZ2HbhCzpa8RTow5fYEraRfE8ccx8mUOovyWXeTwBZsfJbRmhk3oW
+HSJ2DkuoCUEeEsemm8h8bl3uZTHka6ngP1FEzlO8sDqN5B3y7HsLnFqmXk5X
+xO/Z9tZd4//Nz8tLhwUu7ZYrSV6jJz7NUcJ9qDD89pJ+lvgxvGC61Z31BbBz
+t9mRq3AMr6p7BPZ2yv/UTsb9M4yNVqO+XXklQ7BRpelPcTBtw9yLxN25R7Of
+wsKkrCvP4UBHC0cpXdxLc3FOITkvWXWzKxzDbrI5CPdZyY8kwsKyvyWVyHyv
+zuu1cKoKb+oB6q32zAgWkPXdJgn74NtWrrnfYb7eWJAYTMm1/rNID+MXXVOK
+0H+m+7ropXqk/wXRm+HsF1azEjD1vOLqQpKXVcfRWaynXnX2PEOegpwtBkMw
+o2fKvQTmuYTOtpH6qjjnsmEZZmF9GSwQLJfOhzXaJtNTYG7kzsgHcERcdOFh
+Un9fRugUXLeyUcMJppnX1djgPEbbDhVDmJ1XtqQYFgZGhavCrJOCMEXUny8W
+8VKW7B/raHMZ7sjrSZEm9XkUm2ggD//+pnhFmLN+Hu8mrGPEMdcl+8/sFzdd
+zqY+Hyt8ZU/yOKPl1AzfPjjxPYDU1+cxx1oZfbxx7LpG+uH9GL0DG20QNyN5
+0n5yCpZTwe/NuznVqiSvVtvi3bCz9cYjB2CW7vChDFgYfMe7AhakLEi8BRc9
+rvL7Qcbzax9Uw5uMfi5VZyF/m5G/Csh4VJW4DcxVm7c1Gu5aZffAF2bVtL+w
+hNtlkyfi4RiD2Nwp1FNgfeJdDixk3MzJh3V0/D/dhCmrgTU28NvyF/d4MM2H
+SRtAf9c7shQfw+z48HkJMHXqmmwbOU/UoHUNnC+VNfqUzHez6HqPvA40SCo3
+w4x/LVWK4bSkRvt7MOe4rXg0/PbsG9tyMn/iC8uPPI92EfNzYT4jyMsf3h/4
+MjWVrFdg+ZyE0z3qp6LJfIvVmtWwu/w6Tw7pJ84jicL5JrvtGvbAzpWVF73g
+jqX6mu4knxfjQU/h9JKNO13I+bvKsjaiv2B3exUnOFVZ+h0f/rBYffi/8eRj
+j7yQV+yGa7TtZP9y5cRhOPHyrkKS54G0RyXGDHwfja+lHIer86PtwmGF+38f
+SSN5jMmGVcIxv9DvlcJGywe2DsCXdM7zSF6huqZblqiyKTs/q0ufSN6TOx10
+4DTrTge5Nfjdm78neQM87fz4yc9wkWJypzlsnh077Q2zzlUcMIEvKUU8iYeF
+D4tmmHDDr5H6BbDRqsf1ZH+5FqZlI8xf8NHsX5zfEpdl+Bo+3W3r0wCXdkXv
+H4e7C546pcOJT274ztXH+qCvbj5wgUr0rCTM037ytwHsftdMRxqm6y+1F4cH
+h/U1iJ23RVfVIx+DevfNi2GOhqXpCZi5XmObGCx8bn7bFbZeLz85ifOoZUr9
+RvCRt3+oDsG8H/YPDWH9m6+7e2DvXb2+duT59ju/5hHMvh8jCIYzAk5Z1MDc
+HZUutXBU2IzyDTimoj1kAerZP9hc/zvJo0ewwBQevUlJZpLxTUt0IuBQox93
+02F3pvWrP2GtLTWeGTBt7uxbUeQ1Vqpkl0PW924U2MPJnY5FxfCg1E9HzpF8
+Jcz23oVbFK4aPIczGJF67XB5eqjIEjU2pfaedWYE5uTZ95vDrhNurRLoP9Tu
+lNFhWMa3ma4HcxNseMnwL4YDoZthrftGJVxYpDX7TSjJ0+FrfhHMjFAzuULW
+d55ry4ftflgfa4Anzyg3XyD73y0M6yfj95y4EbDWA87OuWtxP57+HdthXbe1
+DspwqNrCdfpw7anDlw3gFuHqt6Jw5hu/NiuYX5XO6EQ/GurruC4we7eY2zXY
+WZUj4g6zQrkfQmDvph5lDzimSEfZCWbZlW7dCmuZ7qKvhm1ZdesdYEGa7A1p
+kqfI8UQzMl/TezPJl7nEQWctqUddfQUFZ9e6qqjDjHdDjfNhiYRFQVKweK7v
+NkWSt6+rlQicWv48wZh8H5ZLXR1Hv6dzt6T6wPRjq88NwLRIA71M2PK8xORr
+8vyZXmkm96Nb93N2L3n+Vmw/IIt+g+dHyL2Eu1VfvSH5uCdltgpgyqmvL5fc
+zwXTsWHYNiJ8bABOWbgocprkPaTUxMR7nO2ep7qkPmfJdvoB+PPaZed14MEK
+zlAOzJSeEbUn+dJ2xj+GJxmFlf6k3+tGqf/C6SE1t1NhXsB1jbl4j/u6eP5U
+JcnbsKNNEk6uM+K8JPnVCzMk4Bny/rj2/++PGuz/AQ7UGzs=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.684798798577102, 9.013741219420858}, \
+{1, -1}], LineBox[CompressedData["
+1:eJwt1wk4lGsbB/C3UpbEILs0R3Yyk7R8LbxJxalsJUQaQguFEiqmkS2iMyFR
+YqIUCaeELDVKyqGTCi1UI3I6okYnS0W+//Odb67L5fq5n+d+7vue551r/OIT
+5Ow3laKoLvyQ3/++dOl/f2vTFHuZzLAd3GrvWaoPf40bupMBC9qdpRfBwfMd
+Rnvg4CduaUawwOC7KUsPznj1zzS4xX6ldBgscNIfaZiDPJcV/SpgR3ZC9D5Y
+69ZKn08w5+rXmGmw273FPC19mmL02jxJ0KIpKc54sRXxTaexSU2aKpeTd3KF
+6Yti+RC4+Chjyw6Y6fEtSqRBUzYZtQa+cHD5i+pN8JWoBaVbYdHbzbNb1bFu
+tMbWlqz/wdq/FdYNP1tuBnP8V80dVUNd497TGMQTAVmF8AZPEZfUx4tO2hMK
+i//m8ltIP/MlZd1hLSObgmIS1/LscIVtUvJUT8Gi7xYTQXCtu83MSBJ33paZ
+C9ue/eYVBAtzVG/1wFJr21MDSVzwKWkp6lkqs6MqlOz/eYqbBcdG/u5/nMS7
+30ROQT+GiRU3LsPivJdzA+B0ttvCpzBbU/NzK7whT3d8BupvXTDr/HzMh/Gf
+uN9tYLGBnXUkHJryPTUR5t/nplfBrUGVvz2DeSFRKm/h2vQ725gGmN/MNVaD
+cKRtQtpemGreldENt60fvlsFi6XiG2pg4dbM9EmYF6ZyhuRnR77ttjLEfL/t
+H9WDbZazHoXDgpGA9mrUJ9t2v+MSTEvsnGEFtxrGDj6EeUf3a1Si34hdbw+L
+YOE0tpEhnHnx4O4BmDH2JPMM5hXa9ENvEC4rKOqWgb8+Ony2B2YnDzkmqGKe
+txV0n5B87MBHCrBEQWlMJcyPTxWUqNCU6fXgPzJhcWz6Wm9YKv2wNamPn+q+
+zhS+4uzh4gKLPs/XUIBpP+mQRTDn0VZlBqymf2NAndQfw9ljCHddS/kkQawz
+YeYGsz8+2DSGeQiiz+7PhrVaS84Nw8wVFtuH4M0NHzsm4LL7a3ydUZ9NdeY5
+BbKfJ9pdDYfal/5kk/PdSqR10Z9aslaaBxwstaM5kfT7d8w+Pll/ZNS7D9ZN
+ilz4J6m/c8pfFmRe3A6mkhHmWnZKIQQeO7JSbxtxhpH/Gbg4eNtIIUzL1227
+BDsy4o1HYU78RDS5b77rSzZZG+PvfreiDpD7qFOokQgH3z7NJPnHxra6N5H4
+mzGX1zifLmkyn2KC/edPyO+Hk299M2DBIl9r3RH0Q4WWGDrDTLftevvg8nan
+3N0k7uJg8hbzcNvCDT9InJ+TbQ/7vurWDoNbNWKH6pVpynMyiBdI4kWXwyzh
+yB717+6wOPKJQtNsmrJ4x91Iw+xd6jP94fTJVcm/wJT4R5cabLhbRFHENYGz
+epWw/qCs8hvUL2zLUmiCVxgWL74NMyPOrXwIt3AKa/NgcXOjUARLXb/XkgLT
+t1pKGMi3K+f46miyf9BS2QWmn3FzuTA/KkmrCC6z2SuOJ/YfNZ+Jeg0NDzWf
+JfNTbbE6AAvv59pUw+xPbl1d8NfV7YO9sMhvL98a/TPin3aqk3nZpcrnwuXX
+PMtcSb8HPEIHyX07mVaYDTt2LQ03wjx71bJv9sECESfHAc589kfiQlPcf5ka
+321wm+X6Wh5MLVLd4gRbdOu+bSZ+HzrXBBZ5B51TnI/69lxM/Yj8A12xzc6w
+yED9fDo5/5lsWhLMGNxkbgSPLX16oAoWuj43vob6N8gc8eqExWlq6nqwSMf/
+9hcSF9urZGAeEn7GvJ8ws3x74nQ4Nnuf4iTM8fXrj8B86Q8M72GYdyI8blgR
+zz/d9sc7mDLhWPHg3hlSik2kPocOrzmwWNhuW0R8JM+zVQH3uUqh+jjcymqo
+PQfzzFIf+8O09PovPHhgo+noWlLPKm0H4kjVuAQT4i87qSxY1rLvkgo536xF
+tQmmEpebycCOXyUuzMJ5pr+syZGEBSFDd33gZPe/JBjk/I8F/ffgcr7zyDyY
+X3rhpwn6eXEzIW41mVfgyzOn4UDNY6v3kflYLrP8AZcvZtjkk/VFry+5kvvj
+rWfYTeYxfUv/JVh8aMF8fTPcI5/Q+93wB+oZHQwLgufdkST3KVxSrQ4W6ltt
+VobHUjpsZVjIJ1WhKA1LPXTzc4HL6qsK35H739Gvkg0La6wH80j+Ps+lXcRz
+2lrWw9WLx0ek2ahj4f2V5L6XnTB4zYSFZvoavrDZq9B15rBjQs5wJ/plyskN
+rIQpY1b/Bti8tbZ+NdnPVd5ei/nlDDlSNjC/w76FBV8sNdO2ggVR3lHFDHwe
+ujKbF8HMOLUtS2BB+KUPhjCPSltSKE9T/n8r89TJ+Q8ZJ+ThFyzJSimYs0FY
+VCCHzyOPgdjPqJ95MCYiRI58nidefwxTuY1pwbCj7tqN5TDH+LhzHtxgNHwo
+F6YXjD6binxjR0VKabBow0uTZDj9xJRMPszW2+2siXpetLrPziLrvTafiISX
+3tbVukbm6eRd0Atz3vvXt5D9nawV9ujvYbtO+uj/zm9quwGreeVsUkG9ZSUv
+dRmYj/WCgI2kX+rikK0XXDXxvN2VzNPLZjwL1hkN7okk89kV8vAOHJuU6JhP
+nGJn+ghu61T60ETymb+qFMKhr3UPfIYZi+K0zsJd51MaFRfgPv4TzN4KzwgY
+emwOCySN30+Fy7QbL9iTeN3bBWfI8yBbFeUHi5ezvmjAgXMmusJgTsJQdSp5
+fx78J+wYLHIVF0yDNw/cpI/DdClveR/mSdXXhRJzEqPNHs3C83reODEGFl5o
+rm2Upakvx1hmh8n5V4evds3E+1OTv2Yv2c/ti1GFG6R0Xm4jfuzB4srQ1Mk5
+AXIbyfqC6BJlWCcwRWMFiZuMvxFJ4/NWzcfClORPbvcgvsseideGeRcqwhSx
+nqcfoTsbZs6p+PUAzChe/n0WyWc88Nc4PPWLe6Ms2W/Xc/oyzndb4SOvAFOp
+k0Z7UG9SXbi2JonLquxbhn6Op2iPG5P9KVWps9Cv2bnOIJrEdZZceQFv/nh1
+qgepr0lW/RTuT0TlEgnSr6OvGV8F8wrbmZCaTfL3X9F0hi9u7M2vh/n9v1aH
+w9wbYYofyPx3vRqIhfuXzS2UM0e+9zFrImC36h9sC1gY8SrcCc40oI66wmXO
+LE8FOMliZnQ4zPFY3HIA52dM7bVLg0XX183JJvf92FnNIpIv771fPvqxXNgR
+VEP8ZN7TVPSbqVMx0WhOvm/qZYViHv37qLoWcp5JfdImzMuiIKqPmJYIz1iG
+efcaRg49gAWF0k4WUqiPf+bkbbL+Tznur5I0VVHzM/d3Es+9nBc3A8+P6W+s
+PJiK1S8YmI73I91ixylS3/OW2FjYsl4umEf2n6TUHOGup4PJwWR/xu4RBzi9
+rabXh8TjPPYeg+/eCUh0g5n27Wk98OJ/Jnc6k3z51mF7cZ7sz/mWTiT+Q9ld
+DfWk/qaU6kIc4CzfCT+1dS/eTuq5ttL7Kup/JTf9dBCZX2Adl4v+jHlzleLI
++as5EXbon5nPLs0l/Vc+uDUF81HRiagi/YrK1Xjn4bHnBRu6SX20zbrZmKeW
+9z3vGQvJ902O0XbYR6n5iSksaOgxOQQbr0rZuQlmXvQPJ3GdF+yBCJiTEhKu
+AJ/sa7HIJvHF4yI+8seWHmHVwqJSh9xu1ONzz+Xzc1hYOO+KNNz6+M+KT8S8
+d1UM6f//n2aB9ZN4SdL/BXHE1jc=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.51595498616782, 2.888880495006221}, \
+{1, 1}], LineBox[CompressedData["
+1:eJxTTMoPSmViYGCwBWIQDQEqDiEyIFrOgaGg63OSmYrDzO9z9v9uk3VgWLF5
+kku8ioPSsWuhi37JODBoaO52r1BxuLaBb/3LBCD/w0aDX/UqDvqbjmztPSDt
+wLBjCturUhWHfy805q1RAPI3eJmtiVJxUBZ+2RDbIeXAkPCA8Yq+ikNNZHC8
++z9JB4aK1Qtvf1d26H97fYldB5DPcX3a/63KDn84o2++0wLyG8QO8eUpO4jX
+1jVNfSnhwCAgx2KkouywPWWl0aWjQP6LFavW3VFyWLTIuKtvP5DfscJy+Wwl
+h/kz33T/vwLkB3ha3EtRcojcYaJ/gAlo3oH87jprJYcJ68uXMLsA+Qy/p7xR
+VHIQen0p6c4kIF/D6uwiSSWHdau+P5r8Asg30Hwkrazk8EG39iuvHdD9B/7P
+P22r5LDt2qvvhj1AfsAHbvUMJYfOV85Xg8+A/GdvuXu+kkPCzvcHp/0A8ndw
+tAc+VHKoWCL935kHGB4CG/TkNZUdXvAILhJgAfILGpP/Fik7+D+OC/O7B1Sv
+oXp02S5lBwab++4ss4H8iCnTv/1WdpDY/v7gO2uQ/Wck1IxVHCpY/NtTjwDd
+98IwgyVWxaF0ZnuMliWQ73HwsGq5ioOa/NH5SguA/r+QH8/eoOIw1QIUvxJw
++SfM1gl348Xh+qd0Viy+ekwMbv4kuY0Vs6zF4PYL7hKwEzwiCncf13OFHb9T
+ROHu32W/cOVGRVG4/xTF3se+/y0C9/+GM08Y9nwWgYfPykwBu0x2UXj4NVjs
+0VpjLAoP32AfUY5zxaLw8Ldwbub6dFAUHj/RFRyyOeJi8Pj7bq47VzlXDB6/
+lcUd0X92i8Hj/8KO0xfs/4rB00dWp3AJg7Y4PP1kNJwpLXQQh6ev4H1hZ3Wt
+xOHpT+hLY22WmDg8ffJJLlUTvCoGT79VphrRB8vF4Om79+SaBTsYxeDpny1O
+vH5RuSg8f/BYXU8Mvi8Czz+3Cqy9iuxF4Pkr+MDHALH5wvD8x7Fac1UsqzA8
+fxZoJzuwVAo5wPLvVjYQLeQAAACtaGA=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.354800000000001, 6.}, {1, 0}], 
+        LineBox[CompressedData["
+1:eJxTTMoPSmViYGAwBmIQDQEqDis4ITTDhdu3dtmrONz7tfe8025lBwYOlz9u
+2SoOf3P6puVlAvkvylXY6lUcDp5abPiQH8hf8TIwpFLF4c7e6gtztig5MDBU
+rVgVpeJwWHOR3IlYID8hIGGqqorD9Ss5KdqCQP6F+ZNq7yk7HEt+3Lj1sqID
+ww/VNO9uZQc9U+P/QiuBfI6qjBdGyg6rtsx6HT8ZyM9QbVtzR8nB9nYt++9J
+QP6EvTcP9is5bJyc/qF2GZD/wNKnJ0jJgf3JuY+3ToHUb1inqKXkoDhZ4e/c
+30B+xaxpdyWVHBY/iEr0Ngba/0L6u6SykoOR9oXkK9lAvsGGFCFXJYdPWkE8
+EvNB/NupX2qUHG50nC5JPQ7kW+iVSR9TcqiS8z3z5T7I/SEHiqWUHXbuCGPy
+fQrkT7gR87tI2WFrwoYVvVeB/AiFqPATyg4/OgWeT9sA5Guc1SkQVnE4oXFW
+m6cCFD4mnRx+Kg5ut1fEGOqD9O+QcSpWcZgx42PG0ltA9wbskGNtUHHwkgFG
+R4MiXP5tBd/0KFVFuH47s/DF5y4owM3f+8Loyud2Bbj9ve3vJTL9FeDuu7DB
+P7xISwHu/jMRK/9uklKA+4/78yZjbgUFuP/XdJh0z7JQgIfP5GdrPz9PUICH
+X/Az/TnaUxTg4fvIYOm8LWcU4OGfUnefKYkFET+1uoZ8qqaI+LtSO4O/KRIR
+v+5mTT9YchHxfzsmVWRBDiJ9hN85w/A2TBGefvavlanz0lGEp6+1NpNnX3mn
+AE9/B5/HPjRfpABPnyuCW/STvRXg6bejd8cc2wfy8PQt4Pn4kpKuPDz9++q2
+JFR1yjnA8scOfhAt5wAAXRMymg==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.354800000000001, 8.75}, {1, 0}], 
+        LineBox[{{6.4999999999976925`, 16.}, {13.49999999999251, 16.}}], 
+        PolygonBox[{{10.6, 16.}, {9.4, 15.6}, {9.4, 16.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 16.9452}, {0, -1}], 
+        LineBox[{{6.499999999996362, 16.000000000005457`}, {10., 
+         10.000000000003638`}}], 
+        PolygonBox[{{7.947677384685548, 13.51826734053906}, {
+         8.206811054955079, 12.280184249251306`}, {8.897834175673825, 
+         12.683281069670574`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.515942703607428, 12.823799910437668}, \
+{1, 1}], LineBox[{{13.500000000007276`, 16.000000000005457`}, {
+         10.000000000003638`, 10.000000000001819`}}], 
+        PolygonBox[{{11.447677384685548`, 12.48173265946094}, {
+         11.706811054955079`, 13.719815750748694`}, {12.397834175673825`, 
+         13.316718930329426`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.484057296392571, 12.823799910437668}, \
+{-1, 1}], 
+        {PointSize[0.04], PointBox[{6.5, 16.}], PointBox[{10., 4.5}], 
+         PointBox[{13.5, 16.}], PointBox[{10., 7.5}], PointBox[{10., 10.}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T13", " ", "P2", " ", "N26"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdgei/giijfhfjhj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdgei/giijfhfjhj.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {22, 0}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwd1gs0VGsbB/BNqiFFSVFoCA0mDVHqqBlS6WoqNJxC5dZ9KjoKoYhKRe66
+jVBKZahVyGU4XYg0J5RqymCKk2QizhTx/d/PWq1Zv9n7fd7n+e93k+H2/Rv9
+lCmKGsI/8kkpRvGjz6FoBFM5VM2O32p74GLbig4TuOUyv+GjHofiaXRm7YA1
+Fc8stsKRTu22xbCdIPtE90xcF4ZdNtTmUOJ3C2LOwnbPFvZegnUW/Tl2Bay4
+f+2o6TQOxX+u1zqN3H/Y7XsJXKOq30rB1KKnqRunY7+qwtIxcIvlp6BuWJBr
+pGUA07UWJEXooN7Jtuh1pJ7hGEs1XfT5Qav6HBwY6NR9EvaJXfHwA1k/Q67W
+B9ck3Cu2Rb/yVxcTnGdwqPRPRg8SYYZylm8cHMIzOfQVDrR32y2Ei30XVXEw
+v8LELVEES4c3lZyCI8d61pfArAfr+6phKZWoeQUWrG4t7IJ9Ar8s5sM6tj+1
+FbBz3obv82HN/Q02vTBnk+XRHvRD36tu/YLU39gbn0X6l+x0vgALz97Vd4MZ
+rJnP2LD8nZXpRF3Sx+oxLejPLiF/XwPmF2+3WuoFFyuu8i7DLRZDka8xb2T0
+krvh5PqX/v3LSR5uTiEHYcFhpelkrhazDRJy3VmeWTgTFmUoj82CRSYF/LPY
+p4uprC0h9TJGOCRXxt9RJpb4lEfvTE4l33sv5abAwlOJrAUwbWHG40moE9jY
+r/IVz4n7l+RzKpwXsE6tlDy3WdwQM/TR5XifmQXnzdv2tIo8xxc8B2KfnoaP
+npiDm7KNVgLbLct82gvTLtYv/kzqPXMtDCXnsPpRtgmZS2vngl8wpaXldIjM
+IVE/HmCA7wslx57D6ZnlESI4wTxmrSn6TE/hDyvPQv5XHxyMgrmrhirmEm/z
+r3hN5qvLTeHAfMeEJYbkuY5yefaw8wODw1tgmoZuqxGct/tKWjQsZkl6Bsl+
+Qym5ZE6pJE67DOaNv52eANs1x8YfhjVNmcEHSL6DilFzWPhL7raIrN9T6/0R
+/Wv6LN79L3muxh03Usi5iQ/rOUHOQXVznhuZ16dURZ08jx3er4xggVFYbgzm
+446aKiuRc2ja6TuAfAKb63j95Fwc+LDcB053mTN9GE5/5RFVh/eKW7EsRg/3
+c2kH19rD4qsGMldS/+XxKw/xXtboNO/KIefYivbLAaa7e7qoot/AdycXt+K9
+5jE2v4uEWcx7Oy+Q9/6HW8x45CENKLq8FdYJ7zbMgFn0njYHuOnM1GgdOvYp
+CbJgw5xuMxM/uIUK93CFmV/EAwUw7YTMIYKsz2s4MwjLHTm1ZXDQ3I78BYbI
+Y5P3WFXye6Th/PZ9cGDS00BvWN1cpHsJVpg6DJTC6WF+typgfsWmQ9Mwn/Ns
+h53NMDfX/PYeOOcs11IKF7MjsovJ/JFx7q1wnE1fwwD8+FJ9ZSMs/u+QM52c
+x0GXSlJPwY//aQMzT9VOuQbThFnlVnBOEv1FBLmeUnVEG46fG8D2hAW3PzOk
+qDfV36h1PiylsyQXYF+r3+Ya5P7dagXz4D1a2ue/YV5WZ11BCfqPVpm6ugkW
+JtWU28D8lY6u1TDPwc0rF3nkWeauKiX5tKWe1oRdVQ145bCga3VIqBbOhxbX
+uh6Wxvd4d0/Bfvat4zuJ2SJHP1iq53ViIvanL7a51zOZQ9VvVm5YSuYvNLoW
+B+stHUw/YkjqjJ+/CA60lFqUwaJ2wwwlmE8f+UvFCH00jx9t10ReMmoeF46b
+fOfIB1jYnye5BLNiwsbL4T1TacpdMD0q5qIO1v8YsLOaNxu5Wi6zcYVb/uEx
++DAVR/2+AsuS077kwdIzfiE/YKcdzq/fwF2prkUuZJ6Hvx8MwbzKnsP5sL1b
+1ystY3jINV4Z89t9lfXNguP4JV9d4GLHVl86HJmvO3IOZqbzFdowp8njySNY
+2PJxQAnu0gye0gjrnZRqfEZ9QUdr9itYxfZv7mNigyR2CVyW9WTMVdJ/+U3R
+SS3yd0VwMQTm3/ilYw8zhLy0TTA9+dKK9+hPJI71tybrnWqWBMBiscv66TCH
+M6mmA/NR7cZcFZiWv8bTDQ4LPak1hLyKT7E6RMhvy/srjcOwwCss2QLW2Zey
+QQ33i15kbbTVwFyuzPrZMCt7Ac90EurvGvfbGZbPsw6fPxHzOt+feQTWrK+v
+91XH++Dv/7kI5l7OFokmoP+GjoIfsPBZnWINvFbV/KA98pAbHqCpwny7Tlks
+rPnsDw+FGqnflNoEJ2SVmurgep77axrdBPc1jr3gC28ZflAbAEsTK+rfwHFW
+Tok3yXWzcx67sP9jea5HByz86e6thf6SbRuDtUzRT+zRCbWwYiUzxw4WH5CP
+RGIedds9ehthAedgFUuDnB/3dG84UlZm2wA7WTx230ac8k2FQfJqkenw4HQf
+V43NsHFou+5yUv9tv5wPC47YKJmTesbZaw7Ba4OXiWlwnPmhp1tgTSPTetKf
+IixHby4cFLXPtxymNi53eI798qhZOulkvge1fhPh+BP9HodhlszK0wz9tiis
+gj1hzZej0SaYh+/OClpB1r+7f0cN8/uOyVe1J3lEe15sR557UjvDiaXf+m88
+VMX5KggWOJN68vh1yTT8PySEWekDC161Fx4fjzz0aq9Fw5zyItv4cfh+eFPi
+PXK9PlG9ZCzO8Qxr96+waGNTmwacPvGUy1zMx5eFnEtR4VDDuT6RQSRf2fqO
+tXBgdvH1SpjuVXBqAfxDdslVfQ7OxcjsYS7MWGM4gQeL29alpcNOvrruApiu
+z60ej/qRA5s722HOsWFmGvy1dqVQnwFP0zBciv64N6sU62Eq6Ht7H5xHNzoY
+DAsmv9LPxzzy8LrlCbBI2dt9C+Z1/uOQwVWYft7Me5j4baPFNVh6+HptFPKJ
+35xJz4Q1s2XrZbCN33XzOFi+nW+hjzxDVvV/2gv7/Buwaw45r0Wlq9fB4oBI
+PQruOpGWxiD93coIuY71xlMv2imT+0cOy2bCNQ47b0swjzzL/tMO7H87Pyaw
+FBZkblWcQL/R4WMrLsORk/PdT2Ae2UhTZRzM6mDk7ML8ZffuWoSTvM7SE5Yh
+L7HmY/cwOOFG5k6dMcj37TeDWHLdvOt2vxLOa5dGG6lHrbI+30oh79RxwSJY
+WvjHjLpRNsV6uXfeN1h09L2y3gib4iZO+NeE5OOyL6FymE0ZswUT/Mk8/l6f
+KofYFOPP2OzbJE+9av3Z8HCuX/B/JP+F4RO6f7Ep9bP905zM0P9bVSNtXKe5
+iFUTYGlP7YVMeGrR/DctsM/n3HQ+6lMXV1vomaP+3YLeuN9squzWpN7NsMg7
+7dAr9OOqctT7NLESrVcP/X/9R9uwCBZq89c3wzn5ai4NML3X7H0s5r3fOyHm
+IyxfoOVhrow8rYUd7f9f77f0HhwoGqchIZ6aoT8DecnHHJ1TZ05+3/xU5sE2
+devKC2Gf5BdVAbCeiVNlIhyZVDt3BRy02sxvL9m/zHlpH+oFHbWZvpLsn/RU
+dy8slq7fZEj2b5yhWop+mL8DE0cwL+eGyqaP6DcwfTKjDRakWo+pRv7cy8es
+62A6i81IwfzDjowjFTA1FOywCnkpYn5tLYNFvYrGPgWbqmH+rH9C1pv3vL0+
+iHyWKFm/J/d7nX575AebkvfqBg2TfI8wlSL68Dy8Tw0ySH/H12x8JmdTa9Wz
+rnqTeeqsaqu+san4h4OyKySPO90Xbn9FPzlREhnxHIO5W7rZVI7Sxw3zLFCf
+tn9R8xc2JVR6/jEUjjT0uqSF6zbb6sfWEEd03lLDeuc5knWTmVi/cunD3B42
+Fe3xeqsbzGk/PljTy6a25CdMuwD7dJR5mn1nU3GPAm49gaWcvQHn0K/o+LLC
+bzCdE2o22o88fs63U5+LemrmN/wH2NQeuaJOH6ZPql4nxPzcA9Sx2bBP1Uhz
+zX/IKyqng1wXvZw+4yry4v0t1JhEnGjQZPyTTQna/jo5QPafzLd3gWt+DzNf
+k/1XeUVNJ67tnl9E/KRtSijWx511Hj1D7rdXrwxF/celnyb4k/mqqCuzsL9m
+xJNGR3K/r0sDH/lLXmcUGcPUpGsq4ZjHlZ9cNxEW/Ezrd0X+jzk3v48iL5Fl
+g/F05FV8ZU3SMMnPMS15VyebCmLE3lIheY3Uz2lox/u2w6RIh9QrDln0WoL3
+8RNPYAdHuvF3ipuQT5hZ5w5yPbRwmqAOz7/60tEM4kcdnfoivG8F7pI3xGWz
+ftTcwfPsYzFJPhRX4zTvLPZL1VwSQCwYtV8YVEnlWU+5c4+Y/CSUUyrk05Lz
+P4Clt9A=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.703763748652328, 13.714402573074395}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJw11nk81PkfB/BvIkdiqgmFbZyxkpFopjBTUiJHl2NTDZUjRKWaQsYqx65q
+ioqu36DVqN0MHWSpKdqMFULOkmxb5IhEztrX54/fPB58H0+f7/d9fb/f8dHz
+D9+0R46iqJf4IUeKRn79wKWUyNGUS6X7hY5/0uVSoZEV2gUmXKrDtT3xKbwm
+kD0vABa8VqbHEcvSJD/AXbp2qwxhQW/VsfZFXIrX1dqQr8OlrkhVb92Ak8Y5
+F8zh685cpWg4aOk1vSvaXIr1vKXeFxa+7JbIweLkF8XOcIVPyOuABVzKNib1
+uSNZH3rjWz0f8TNWxrrCzVPrSu3h35NMf+fBlOysfqkWl5JnX70RA2tVspTd
+4AbnB+5ZsODOPdqwJuIrThpXwfxA+9q7MM/92/5RmJnYUngapo3SvQ3Rj5K5
+zfefYbrMTcEVZrLp2ULY0JRdFQ4Xfdi2/x58Ylez4y+wcNcWg344QsVz3yWY
+VyA9YYP8th7qpddgfiItJxlOCn9ncwHW2u6m2Qkzn/YfFZD1ipmmK9BPb+/s
+J9thlrMjMwXevc3y/RLYQ29uZR28LNvMbRj1sgq/aSuT+Tye01lA5js1McsM
+FhwKHgqGRZUbo6zhUM1Derqwh6+JtzFczuhn1xhjXsWTsknEGzA8qRkPj3o0
+WD6AvSf+jl0J8y7eX7Qdvrt1gdyEEfoTZwX2oN4Bv7HmMtgj+Z0kEJYonqi5
+CIseeWQ0on+lBeNmfJh7McbTDu69myDaA1Mzk2MzNbhU9OtPq3kww3BzpZIG
+me+5XwPh9ALnZ/x5+HtL0bZjMH/axLUROu7foTEVEl/wz8GGBLgrUynqT2KL
+EHVzeNRLwfJfkt/90kDPXC5Voj3/4GzUL7bmfS6Hk/JmBNvBThm6XkWweFTf
+PoD0d0nX+CnctV3fIRlOirFY3g2rGi5Suw5XKAVu0EN8Vc65i3eJ/WtZwbCg
+xX7TA5j1fv2cElh0StE+H67dahlKR/2+B4qGLsPN4SbpoXCo4E3uUTjiW0/3
+Q7ihddVSF+L4uRMK6J+3hD5A6uWGCXts4YY/9j6rIfO2+Xh5J8zUyJmRCNOC
+Ytv3wlqDH51XwFqxx6/6wjpne3i9hqjjaO2QFUy5HDUQwRGNlcsHkU9LL9TH
+G5Z0m3w9D5eY8NM04fS46HeGsNNU9JwOAxyrhu5nop81+g+z7sDNHcNTNLgk
+YY0wFTaRiT8ewXwiC0POCeAI/97Zr+bgOYjZXH4MDuLnmTrAQTZXsuNg6cM/
+ywtmI+5QtEYaLNyyiMaEGfs/8iXk+pMJ5x/RuNS7FEtJA8wPfiS/B2beXrDm
+G0wTKygZwEGpwdE/ot7aRA2nEXU8jz3ecZ6kvyVlLm1w1c1TMbFwR2G5/RBs
+eL33URbstMvlsw6uX5bysK0Upu1OCt4CmzRkPa2Gk9bGvLkML5452lMPezsl
+hffDkTcurK+CmcfDJGtRb3Pbt/2FMOvp5y/X4A6boAvnYbFe7plBuEF0OD4Q
+NvEp1mCj/6qxvItLSHyVs9cj4IbvBnd6yTzKPOekwUWuynrXDcj3YYqpCJYP
++ynai8y7OrzyHKwjeSBUhkWhXgohsK+ROrtUH/07dhmZwlJ2uN0hYsOUvGrk
+1/F7a7kMHv1hh8sO+ERFqtekHvk+8xO3oR8pqzeuBuYpC9xdSL/sIioPpgKK
+W3djXkznOOFlWLBJzdRcDednSjeeJ35RPTyuivc1Y9szss58rRvSMhNzaDr2
+6g+4o1+rt04F7zv78KAMFma8SB9QxnVvV3zqg2mnfnrLhjd4OfA09cnzMLn4
+rhLiGX095QCLfinM8IfXvJ+TGQ5Lbqk2OcL8M+fL0mGhVb2uL/yl/urqErIu
+OuCYqUTe9+zbTTBPkjSshviGVr+OdsGMJ7mDV2Ctl7a/9MOCwLtRq1AfX/ec
+zweSb69BxSAcUSv9UgdT2Z+PZ6Gfct/cxHxy/jG6gxP6Lcn4uyUejtBZtKIZ
+Di0fW+MCc7Ppp51m4f4lsX5TJr50tlMIi11SVj8m8zo6VXQTFoSU3Isk824a
+Lz0LnwjYKDOGI7QXTjnAWyY43q0MnKfrPvoY8ZNsa8zOwbR2SaYa8YBHqwcs
+iTrGskB9oj62WIucP99BxYz0U6zZ2rgQ54eUac9Ev+mp4vE0WMSZX9qiiPtk
+KbQOgyM2XFDLmoF6FQ427iTrstaocAWSL7cvBK6lIqxc5THn4X3bzsAdWtxM
+x+k45jh2/wUzY4w++8nh/oWbsRSRX2i4Myd3Gt7HqwknmbBIKM/Sh3u5shu+
+sNT/t5ZqCvenbWVFEtxRv9BDAr/yXUUrgCPyIrvL4cnnK/9+Sa6vUTirhOuj
+3VoTBsn54a7UIXhxnRtzOnk+t8qU5ZA/aJm6uTJ5/jZeGf8NVt0xHiZHnr8C
+HzVP1EtfPBXVj+t5685/moF+PFxEMc9Jvio25w94Q6mttYjM19ZTxx79N2/t
+/RoIU1aqOXmwmJF11Zhcb3xm/xhxokdjCfr3mFnQT8f8mq/O7TeApfob709h
+nbHca14S9kmMf/se5sOshSpyZJ8kOKJ4yBIesFJdvwPmzVS9H4v8ouPx2m3Y
+99C2L7ydiXq9NZqU9sLSKPdL19CP2NS6Qg0WNiw4EIv+RQkWqlXYB4n+3Bjt
+hnkNCOL8s7VJfLHY/BuHotIFeueJ3Wsqn01wKIls3m4RzDt3szxujEMppYbT
+y2DGqR2xEV85lCi6V34c5v44GJYzzKGap9E1VpH8U9Pzl37hUBHCpsBUHfL/
+x9afMcShmDerU3tgRmqZ+uHPHKpi/v0+B/RDWSvvs4b5Vy2eXYClivsctsFO
+X9PvtBO/+ev0G7L+c22FBubTMbvv/T3E69rT2bICplZ2qVUjX21Ap3gdWY+v
+LKSPcKigyv/NWknWDZYHRpJ6JXvU6TBv1csjjaMcSlqbNlBH8g8WLzIc51BJ
+OilmR8m8Ny0Tr0P/td/k/ZRhBoutbz7JocSu91iJqF9QGJxdBg+0/W79lcyH
+Htc1BdOGDwt2kPn6VE7UwUrBP+c+wb6IYlqI7OEgbl6AKSx98iZ+FeJLD2u7
+p5N95+Ay1lvMt8hrezod5m02/7QI9XUErW/Owj5IYCSaZoh+tPLMqtfCopZG
+hw/o33vtdJvpMDVxmpkwyKFGs5tutGBfJEi+3WXej/lb3z5RCXPFQTJeN4cS
+ysl/biDr/fXtL96hvvXT3o3A1HNH3VsduN/tvdbmJF5aA9ugFfnvFdccJPkD
+npSua8A8ln9pfErW77udeFuDfFn5Xbqol2K8W3ugEvH5n3wOE4+ZlXhUYD6u
+nCgZcVjM3t0yxL9y69VsMg+9D8n7nqN+reunnYnftPJn1GF+z3p8w4nfGnvu
+bORQ3HoZFUP8nTcV2Yb8fGOn/TBXRbuDj3pF6Y8tXMi+NJEjtPsHz9MG508q
+ZH1ziHzbv8hv/WwkH/m5EYsTjLrQ7/J9r1eTeR8JtBvGPILkilY/Rj/cvWtV
+TXpQnyoj2xKWLq4wzoY9ctL0MzAfaeCHTVvgoh813KewDxIs2fVk6UfU89yv
+fRfM9ZyI4iC+UEEaXId9j3TEyv0k8os0jczcYO4Ky81anRyK1/nkYRv2PVRz
+QJ/pKw4l0B/pOU6sVe9tV8+hGAV6/BXEfZ2zjpYh37VUBbJP+v9n4Ds+c7n/
+AZXP1VY=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.2230354724127457, 6.228068696807429}, \
+{-1, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{19.999999999998018`, 17.}, {16.99999999999754, 17.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.5, 17.6952}, {0, -1}], 
+        LineBox[CompressedData["
+1:eJxTTMoPSmViYGCwBWIQ7fP3PxAYODCAgYrD9j0SAo5yhg4MBV2fk8xUHBLS
+urLCHYH8FZsnucSrOPDG2kw5mg7ka2judq8Aqr/TN+lOP5D/YaPBr3oVB/uj
+pTeubAfyd0xhe1Wq4lB15Oj8F3eB/A1eZmuiVBxW2Ghr5DEYOTAkPGC8oq/i
+cFDoVNgHWSC/YvXC29+VHeQsVnq6mAL5HNen/d+q7HA/L2H+LFcgv0HsEF+e
+soPohtDibj8gX0COxUhF2aFGtThWJgDIf7Fi1bo7Sg4/77LIHvAC8jtWWC6f
+reSge9voi789kB/gaXEvRcnBUemR2H89IP9AfnedtZLDLhfv5x7SQD7D7ylv
+FJUcpss5sd9mBfI1rM4uklRyWHloQVPNB6D7DTQfSSsrOUTGsjZ9vgPkH/g/
+/7StksN+zvVcr88A+QEfuNUzlBzUBVv8bx0E8hPsLXfPV3JgV7VkeL8HFB4c
+7YEPlRzOnq++/nsfkC+wQU9eU9khPyAjK+cEKLwbk/8WKTvM1eZ4Z3cTFL6q
+R5ftUnaYLdbiz/IRyI+YMv3bb2UHVQ+dec/4QO4/I6FmrOLAIncvY6shyP+G
+GSyxKg5bt/NFfA8H8j0OHlYtV3GQ+w2M3nog/0J+PHuDikOb3cflHCsQ8hY3
+FKd7nUPo/7npcqLkR4T5zU+qN/zmM4bb33D+u+BBNWO4+9atmj51srkx3P2B
+2i0aLI7GcP+JXzv2X8DZGO7/7y+rN6jaGcPDJ/5jwFcRY2N4+B2Z+6uWR9kY
+Hr6lFvG1zfzG8PBvu7P3h8ovRPwkb9sisf0JIv7u3pB9yXAREb8f5c9ybziA
+iH8V2d+P7Lci0sfCqz2LHq9HpB8O71U9JRsR6cuuZ35C6i5E+vt/KGzb7lOI
+9BnzwnQl/yNE+i3bd+X6xP+I9L3YzCpBXMkYnv7vmXapa3sYw/NHmlxhrnKB
+MTz/CMw7nG01wxiev/ZOKZ26Yp8xPP+l2z1/v++hMTx/XgLnX2N4/gUAffB9
+2A==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.5, 8.354800000000001}, {0, 1}], 
+        LineBox[CompressedData["
+1:eJwd1wk0lWsXB/A3c0kp0k1XppQxKQ0y9HI1oAFJhohriAwRN6XSQYpQSolS
+HSRz6SrciIMGoiIUF92jgQaVipNIvv/+WqvV+q3nefez9/857yHlP3fbegkx
+DPMLf+lf5tcE/iiwzP//yLKMq4vq9eh5LMNNOHbHEi4fSH81U5FlrDPFlnPg
+hKf3E/Ngfvr11ouw94pjV5WV8Ly5h3AmXK1R9iQAZj/fXZMARwxpTC6D+WWX
+9V1g98FAgzE4acmfB+XgBY9KDq1UZpnFe7433JZhmfxwA5MAOMmztmgjfNLg
+/OpUmL9PENo6k2We+KgVl8NKk7+MWsNbTXiLH8NsYWJo4wyWKbP70NEBM43F
+K9bDFRU1yzrh4nr/yCZplrF68POPZlhaZpmxC3zihbFXNe0vk7o8Pp1lJKtm
+2uRSfdPkJl94w3N7oURaN3ieIQKb1FZk7IbduG11LdNY5kyQe6At9cdRKX0K
+r715IHsF7e+OeyiG/ZzuqbuUqb8BL3U/+MaqyqIZVP9VxIdRuM+9bu4UOGh/
+bOE29POv6zOxqTR/mpssD44bfuj0G+Uj0P+sh3ne/HX+tC6tp+z7LRc2z9cs
+saHzjvQbKSAPu+tyVhE0n8Ea2QRYxjM87CbtN7ly/jOs3pzw8SudX9mw9g/k
+++t6hsRKFdQfdzWMhhUPj3ZFkvW6ggphQV/2usdw0jnXZ5VwhFb89LmqcJy8
+Twn8OCrnmxfM19+yKgn209tbXwgrnYveZwd3+4Sf+AhLyxU5CMHTbD8cWzAf
+9xG2Xfgi+nEaSbGyh5tjfILV4bJ5um0HYI7iCzYP83VMdYpPgbkLP0bNh/8O
+nW59FR5MGD5yGfn0XvsZVkD1AiXOKcLL43sbad3tRtqVLcj3U5TU4TSYbxtc
+F4P7SfjgqBIDs1nvLvVIoc7lRcl+dN5Tlb/d4SwPi/5N9Pz2+lQ52MpE1V6P
+zlf+vefXVJbZU/NWaRbMdPh3y2P9ROTk8J+Yj9VVqfOBMwN2BryDmbg47ms4
+pG/hwx7yvwmnYnG+5FO56V2Uj0gMsxH9vZ4f5PSSrHD7gCz6N02vdhmivMpT
+2Dg43tDJfgb1M5x9fAI2d62bYgAHWeiL7kEeOp/mPNoFS3t3HemC7RtCorIp
+n+hTq1cgz9D3z6/1w0kH05hI2Kt8a4yuGt5nYyX7W3C4RvxYOMzNSi1tgTUl
+7v/3AE5yYNPb4H6T5kGZBchHNOvsHXi0y1OwHV58zccyEV7yh3knF+ZJGYau
+gRtmv/ynB06Sn970Fv3kXSoVmbkQ99N6cSAcniS1LdoIdmvdoMXAMywu+G6H
+k3oW+R7CfAVpZq7BMJOlX/kZ+RSU/xNxgDy0gPeO8svrdCHzm/i235DvGfOi
+cdrPcdrC0n3leUXedYPZRYdMnXFfrSdLAyxof27HxQZJlln1ZkSgA3PXBnd7
+w8Nz849Lkz8Iji2HFfx3+nxD/+wuB4lVsN2jvKYOmt88JjkIVo+I7aiF3Z6N
+LXsOL7G9El5C3vDgqw/Om16+zKmQ9r88/WMe+lm+ReneNVrPjB0chHvcH2dU
+wAzbtakd8+RtDPBqhZUEandrMG+a//A0ASw9pNS2FXmU/b50oSrlZbdrxV36
+PCxquecIWwd0Tl2I/ExtF11IhQe1Lj/dT99/y5N/9dD8mrK3ymF2ry6jro77
+8TUo58NVjvIRoXCzi1zHZzgjI8SwBrYWPjvvDRxhnzciqYH7qP9UxIOfKXbF
+28LsfIPqaPiOje3IadgtS/nsYtiva/qRRpgb7OvxEP1tmHX04Si8+ICmNvWv
+uqykUVET886vUi/AfO7pIwIDmB8j7pGB+TOTDPQsYKVTH66cQz7VphPtG2FW
+rT4+FXmyM1NK1sOcOUdNryFvv8xNQoaa9D56T3s5hWXG7ptuW0D1E1yGDOFI
+7YXJU8lH1zjUTmaZFd0jjz6jH05WXOV+eKMnyz6F+SXmSZ5weaqwVin1n9gj
+Gw1/KtlafZHmLTV1boVLAs6KxdP6WJeDDeo/sXRsOkzrAg+Z73CX0Y/jhyiP
+NwW9leivySfWOYbqP7lWlYb+lRsG3p2j5785FURjPr//zgbcovX8IfkgzC9+
+QzmnB+a9CveyQz457ye/mo7+rXefV5BBfuWRRpOsYOkpZlMC4Y+NGyMTKZ/r
+l5pKYWtZ3ul2Wp9zZvwdnG5VrK6shfdttE9RFPczfmimdCDMrjaqEIMlmxLE
+b8PcF1P8P2F/sODjcyFtfH5MWvsr4cDeZf5rYZ534HAIbDFH620UzETVO8qR
+lWMrS2H+s+shm9HvtLg3ZXxa363T54B52tbmyTA6qG+9rcMW85Yo7T4oCys5
+xFavQx47NE/Omkduq15nRu+Tb3qYAswvfvffBuR52GogTwZ286taH4z8M/YF
+zBaiekqiWuUSLFOzft3h93R++41/1OGIlre9j2E3m06PenGW0Riy87tB1q9P
+Ow9X5aY4n4HZ0xU5XFjt/PZP+2HOwOOcTvjs6rtmntr0+0R5vBnquSY7mW+l
++df2Gz+Do3ZbpWyiepeyOxLRT4toRqQN1WO7Bt3Qr3jzln5Xmv+c3Zc1mIer
+WLs8jNav5kYtwby27QKf8zD3jNPYXOSRWP2Vqafzava2foeDe4alJ+j5qnty
+lchv8ORJcxOaN7WqeQfyHX8r8Tma8vgrO6AL3jKRoPAYbnbffpR+XrB/WRbK
+L8L7lj+yQwWeN57rshOWvmPtTPc182fK1xswL3u+TS+eN9jTbzYCu/Ebfvei
+79czZXYrdennlVo5nV8l+SI4iPxcwP2E/uKUD6y6DLt9530Ugi0C+CV15BYZ
+gRDmk962aEsPeanRxxHkcXy/vvAAzD90NeQz8ur12ao2SOuJWapfkGfvCc/E
+97QeHDxPAg6yLNjXTXb2vmSM+6gWDeM8gJUsX59OE8NclrWxRTB728ZSBU74
+drMgCeacrtDpFmWZWTWdKiEwlxE91QAfWcnobqPn7QrS3sM1s5onTGgeI11j
+YzzPvSeXrk39XNffdgfOP/qkUZnOf+P7zBPnf5RvE1Gi80Y3/dJCfy2G4s7q
+dF7irIrJmGforyuhhnRemqTIEHzBVD/akZ6/772eT98/Y0GmUXT+97beOnwe
+Il8tFdyk9fbvx84gr6G7lgcpD0a2v3q9FMsxaA/KmbMY91M7YdaBfDtVx5uM
+yaHZDkbTWE76NsUcD5hruFAR3xccscWFc4/D/PAbPPr+0MgamFwMM6NSp42x
+ziR32rfR/oOv56Aep+/1nB/DMGukw5ijfm8tKyKrh/5+xvYdRT9x31r+1oHZ
+JTpauZIspy3xcqAZzNcYSy3GPLVrFjy3gblmahL5k1nODPese860v9v/2yUJ
+luOhWL7JDeZ9ixDD+8bZOhJbs4PMX52fLcZy9v/55xUnev72QHIj7qPxpvh1
+qscTdDrLwjsm3tWugd2kzJWOibCcXNcLvStgzpDqSg0R/P7o2KesQf2mWf0Y
+F2Y50rETWfLU31HjM2LY3+luEyNF6wfWiZthf9Uu7zYhmLnqp1GE9Z6ToTFj
+lEdYZpMZzhN/KOozQvl+mCQYE2U510QXzRuFlYR3aTSj3+akolmTqJ/DUfdu
+4fNwKNoymurzfsz3z8TnQT4n2U2R6qc82BOPPErXqvkvp/lOqdl7Iy+uZoC2
+LT0fu1pbA/evOvhkKJieH30xvRH56v02MnCG+m2cFmk+leVkZU/MuU31JoJL
+T8LFP6R9+bRfWaw7F/czkSVZIbYE+/VzjU5g/Ur9tUEtmH8izY6Fv0jcE2yC
+mQeGTTWof/zeo5ZA2O2hkfNseOnc7NzjMEfb/+w69Df7femjDKon5JXlhP59
+ZBzvl9B62Mz3jrjPVXrjm3lUf9mTK5sx/95jkzwe0P7GoL1r8b703xVa2gCz
+0V+H1yNPFYsC7fu03zHT0B15x/fM/lIF814WhqTivhJ/CW++ST6ZHy4Qwu9r
+neKrcuj5uZ6xkfAlkXW8VJib7TtgDNc0TPyKo/7f2P+nI8Ry2n/ulTtIvl21
+ywa20a1TCCJL1vlcxf4FwWNyO8k7XS6oC6POWYvX7lTfZPu/LbCKg70JmX9U
+xf48+rNQDSv0onny7Af2of8A868Ru8nTPhz3wP2/qTvXGEH9MJsvYn5OcV+r
+fzLVX6l+eAnuv+3UGuEiWlf/5/MkvP9yxx78eEjzJUtH3oQdXvLiB2i/04Zf
+pshbk7PvkfRS5Ktw/m4WPGn2jNLlMO+TrmQ7XFFZo+lCnrF4dits/VvLlGgy
+19zxIvxKr8UwB+Y23QhZBitJnbtVT+td6eqXcX8Zc/0T+6i+83o9PvqbRP+P
+18c++leC/R8W37Y1
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.994885276715344, 4.925732979470893}, \
+{0, -1}], LineBox[CompressedData["
+1:eJxFlglUU9cWhgMij4AoS6bk5t4DqSKlokSDrDIIWwFBHoUUQStjRBDahwxP
+K4iCgNWWwcoghVgGtXVoFYkiiAhCUygoolTFIaAGEQGLNCo+UFTeues9T+5a
+WVnfusM+Z5+9/38LIxMCorU5HE4J/rH//7sQpExM4+tj4EjyxfOiEfw5l6s3
+rcCcMWBcW4Pg9YlCiSwNsyqw4d4QAvOjUT/xlmK2bN6nNY0g+C0UGw9YAydx
+KJk7iWB7s+ukbxFmyd6lq28icO2dLyzwxJzxfOL7QgSbOrVqC98uAE7+z116
+jgjKFy1p6GjA3J28l+5kgHNdp9Q/C7O6a4vIj4G0w+Lca4GYD/2aFtNBw6JB
+dV+kGLPcYHIN0PBbzo3+AoQ5w45ztFEAHfUOiSvNMFvqJ91wF4B/5xWLS3zM
+0pP7O3spMLB9sqLBGrNKvflUNgW6p2OEsa4s+1WlfU4B1zO2KTeEfV7doeVA
+QdtNpapkJ2ZOQFThpxTcOcZ1uFbBrk8cMGc9BVub3is2NLPr59moiilomrjM
+HOxl46d8rjdKwSrp/opXasyicwW+6wRQ4vOy3/sdyzTE3hDAhmI9I+V7dn+y
+dP91NPyxbDB/2zjLNW47HtJAyy4zWffZ+PHrnaMYSFmrk/T+Ars+xwr9hwxQ
+3uvFuTmYjTKVqtUIQj3BOlzCxv+lOr0SgZWd6qXYkP2eV2F1L4Im4U9+Tr9b
+4Xz5VKVPIbg02F08vhVzd7ZR6DsE7Veu29NWmA/1rBX1IxCYPIhIvz0fx1t2
+NewEAlCdvH03F7OlamZ1EIL03oIvz3thlmu1i58x0Hso7eWaWZhbmFHDrQy4
+pR4LSe2dh+PdeyhS0+AwZD+dVIdZtKLNLJaGkBWXKp6VY7Yc00l4JADPpmCZ
+diH7fNLyK9ECGAs0GLBm+ZBevdckBcWP+xUu7PPSoATvSgqilh+YUXIGMxxM
+WBhBQe/RygHzLszqzx6ZOVMQqJ/XtOoZZtWe5G57Ck60LeEnzsHr45Sg474U
+vB85U9kuwqy6bJWQSUEYt9Er1w+z6Pbz/G4KeMlJnAWbMEs8Dtg4CEAdcMBa
+8jW7X//jzlUC0DN2FtumsvmI447Z0bDSsmdB+BbMYBHVc56GvbN2nKKlbD5M
+H3m4MlCxWDzlBJjVSuZIIwOSwSWGC03Y9wds6m0RuHsc4072sfs5Vz4zG4HH
+3d+sHcswJ0bd0OpCsG9qc/W7Nez9DUNBr/B5bR+eW6OLuUVHocuxgOl67Rjd
+8x/hfG2Z2DeKoDVC3KCIwSwXx6guIoiRO7+oEmCWhIsjExHYnvz9aXSPEMe/
+V9VhiKAwzzzPrQRzvlHtX6UMZP4ckGKzUcjWa+d35gw0pw03FzlhNqoefLOf
+BheHmdfDEOaMN1lP9Wg4LK7f1jmbfb5e/fo7AVC+Pj9mGrDfX/woyUwAbb6P
+5TnGmKUjm1/UUTCrKKMr0gqzShJom0DB5ZDR8/pumCVP/nFsJQUWF8dnCMPZ
+eDah+8UUOL3CcrVLc3+tncHbB4c175/63tj7VYvm+7Hrdi0tV2riy8sF/l+P
+atYXUlEblT6uWf+tOq9s++ea/TmeeyM60q/Zf12cOcS1afIz7ln17e0yTf4G
+woa3tMQKSX5Xu7mYHvxESPI/26nVMOCxJTkfec5Vz+WlluT8ti15V/ra25Kc
+b2j/YqXshQU5/+778w7rfGFB6kM6f6d8Xzsi9bPRt2Z0zipE6stHv2zwlzsM
+qb/TyTJuzi6G1GffRe7xP9wYUr/RB4LOuvMZUt/K09my4wYMqX99uzvyCFOG
+9EfDE3q6RsyQ/rFTfJs4EsmQ/hrjlLUkVjCk/2Sry7os+hnSnytbhr75txUi
+/bssu+XTbuxDH/pbGHxn8s8yRPq/xcAldW8bIvowe+GIo7wXEf2QBvt0vWH5
+//piH7BbMb8VEf1J1/1Biy5CRJ/iVGe9DbBuftAv+yId/hdDDNG3UabPtiCR
+IfoXa3IiwG+YJvp49pQ7zFhDE/0MdZP+0F4rIPoazw2/ZYbr7oP+xhdciMzd
+ThF9rtzmxisd5BP9FvnsOuMewSf6XufxmWzkKY/o/5T1BDMjj0f84cyRuNYp
+Dx7xj/Avlz2Ya84j/vLxr2MP/6nNI/7T6MZ3iZ/JI/4UZtKvMEE84l+Jg/9q
+7fTmEX/TDtZOdcnkEf8L6Rkt2qjgEX+ULvJx7dblE/+862O3Z9ibT/z1QYqo
+yW43n/jvrZ3inblyPvHnr/K+atl9lU/8e/3GQosdN/nE3zc1B7v0KfjE//P1
+0SonGZ/MB+qC0pHItXwyP+jv+c916RSPzBfy7eW58Tk8Mn8wrm+Llbo8Mp/E
+o7qm+1vNyfwyGZQ1Z9M9MzLfrPskveeuoxmZfxpzHC5c+9GUzEcTWcrwLh1T
+Mj95Vz/7WyvVBD7MV5OD7HxlDP8FAmqi9g==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.4452, 8.75}, {-1, 0}], 
+        LineBox[CompressedData["
+1:eJwt1A1MU1cYBuCb6lxjO6tSsKKgUBjUggWalI6wcVEUbTKsyBiKUiIKjSgW
+A6HiLG0E7cAfhuAqq1BAYZMfgaqFQRCmzFIrOMewDFa0Okb8WyfbQFHZe81u
+cnPyJPd85zvvzTleO/fH7qYRBLERLzUSzlk8viQxTY2rSIJjSC+ywfdl1S03
+4LjAkKE6WKGQ8Yvh7p65rP2wM8x38y5YKW8wCWCOWt+4Br5vKih74kMSzfM3
+7gyAnaFRledhMu/RMm9YUtY+sR0ubkhn+MBBizJPuMHOV76PguGTppnyn7mY
+v6nDLoHFs9aZMnhaL+7ZB3vqNCkymNA0P9HBVzWJHwfDQb/+I7fA82vqzjHh
+O5PXaQSfJLxZNaIX3iSxoTY/IRSunRO72QEnDPdN7YMlzBLLKOxMUmVXwQS/
+gP0AJm9bjg7AywOiw5/D5qVNnH9hR2TrJA31tdzPd7sEkIRuU3+FB6zMT5n3
+IWxoTN4VDstnoucEws3uL8gd1PdrY0b8YNv6Y8tUsPSbnkI3+PyUaEQPm63s
+opeo33Xn2hcmar6Q6P8Jlpoj/Kxw26s+owG2e4ojhmH10eVv0uAML/ec32Dn
+pddtPGp/wtbRe7BNdlYwgTy+Hxx33KTyy++3XICr36amNcILXT59Q/2/Cc4H
+l7Vwd3sazx8mpv44tI3qp/OY9i8ecgqmD3Kp+lXr2ddhuy3Rfxx56Io4Bypg
+20eMwBpYfiXBkQ/HqZ9Zt8OKjlRhDhy2yOLqCgdlbW3PhhVeIdx+L4zP9BI1
+HFNipRfCbRkVkWfgrp7JTglslmQfuQrnVmrmLoaVD9cWjcFJruXJD1aiL8PI
+QRb6vSgQzLbDxGUaLwruXGNv0sN0blnkIfjxD9VDX8LdHue2tMIlL42ZGlis
+3fPnOJw7bGIdgZXxdV1uyO94/YbhE7D2dKo+AmYPVugMlJWiehl8Rvnej9R6
+WlWsPBseGjr79T2q3t+Cjjw4KsnoMg1/y+8lVHCWJNR3KfonopcsVsAHBua1
+iOHkdbfWxcOlefX1cdT+RRf3BsN7mCmr0+GVGeF9NLjpYUthLlz8/l2aFf3G
+C42JGpjuoWKfgkWMrFIVLG0zimPghYbewkxqflj8XQZ1XhYsebsV1gp5cRbk
+N9HLcn+3vlLvdxwuPTmQxYQNv0yd3gIzn/5Ot6F/9YLxWm949dgn/Hd5XpKu
+mPHHebiy9/A2WJeTmmiHb/iMjrJh6VcFktuwvDGisnwF6jWVp5hhcVXIGAN2
+fpZgGIDZqxq+03jinriQc9gBv6buHY//7x9/8j9sjKv1
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.6318774622309, 14.558628882191854}, \
+{0, -1}], LineBox[{{17., 17.00000000000231}, {17., 9.999999999998607}}], 
+        PolygonBox[{{17., 14.1}, {16.6, 12.9}, {17.4, 12.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.9452, 13.5}, {-1, 0}], 
+        LineBox[{{17.000000000007276`, 17.000000000003638`}, {
+         11.000000000005457`, 13.5}}], 
+        PolygonBox[{{13.48173265946094, 14.947677384685548`}, {
+         14.316718930329426`, 15.897834175673825`}, {14.719815750748694`, 
+         15.206811054955079`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.823799910437668, 15.984057296392571}, \
+{1, -1}], 
+        LineBox[{{17., 9.999999999996362}, {11.000000000001819`, 
+         13.499999999996362`}}], 
+        PolygonBox[{{14.51826734053906, 11.447677384685548`}, {
+         13.683281069670574`, 12.397834175673825`}, {13.280184249251306`, 
+         11.706811054955079`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.823799910437668, 11.015942703607429}, \
+{1, 1}], 
+        {PointSize[0.04], PointBox[{7.5, 5.}], PointBox[{7.5, 12.5}], 
+         PointBox[{17., 17.}], PointBox[{17., 10.}], PointBox[{11., 13.5}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T14", " ", "P1", " ", "N27"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdief/fggjhihjij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdief/fggjhihjij.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {44, 0}, {0, 0}, {22, 22}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["g",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {21.75, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["g",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {26.25, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["\[RightArrow]",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {30.75, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["H",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {35.25, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["g",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {39.75, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["g",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {44.25, 69.96}, {0, 0}]},
+  AspectRatio->1.0999999999999999`,
+  ImageSize->{288, 288},
+  PlotRange->{{0, 66}, {0, 72.6}}]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821528902123*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"64b95aea-e735-45fc-9e2a-fb6bedc22350"],
+
+Cell[BoxData[
+ GraphicsBox[{InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwd1gs0VGsbB/BNqiFFSVFoCA0mDVHqqBlS6WoqNJxC5dZ9KjoKoYhKRe66
+jVBKZahVyGU4XYg0J5RqymCKk2QizhTx/d/PWq1Zv9n7fd7n+e93k+H2/Rv9
+lCmKGsI/8kkpRvGjz6FoBFM5VM2O32p74GLbig4TuOUyv+GjHofiaXRm7YA1
+Fc8stsKRTu22xbCdIPtE90xcF4ZdNtTmUOJ3C2LOwnbPFvZegnUW/Tl2Bay4
+f+2o6TQOxX+u1zqN3H/Y7XsJXKOq30rB1KKnqRunY7+qwtIxcIvlp6BuWJBr
+pGUA07UWJEXooN7Jtuh1pJ7hGEs1XfT5Qav6HBwY6NR9EvaJXfHwA1k/Q67W
+B9ck3Cu2Rb/yVxcTnGdwqPRPRg8SYYZylm8cHMIzOfQVDrR32y2Ei30XVXEw
+v8LELVEES4c3lZyCI8d61pfArAfr+6phKZWoeQUWrG4t7IJ9Ar8s5sM6tj+1
+FbBz3obv82HN/Q02vTBnk+XRHvRD36tu/YLU39gbn0X6l+x0vgALz97Vd4MZ
+rJnP2LD8nZXpRF3Sx+oxLejPLiF/XwPmF2+3WuoFFyuu8i7DLRZDka8xb2T0
+krvh5PqX/v3LSR5uTiEHYcFhpelkrhazDRJy3VmeWTgTFmUoj82CRSYF/LPY
+p4uprC0h9TJGOCRXxt9RJpb4lEfvTE4l33sv5abAwlOJrAUwbWHG40moE9jY
+r/IVz4n7l+RzKpwXsE6tlDy3WdwQM/TR5XifmQXnzdv2tIo8xxc8B2KfnoaP
+npiDm7KNVgLbLct82gvTLtYv/kzqPXMtDCXnsPpRtgmZS2vngl8wpaXldIjM
+IVE/HmCA7wslx57D6ZnlESI4wTxmrSn6TE/hDyvPQv5XHxyMgrmrhirmEm/z
+r3hN5qvLTeHAfMeEJYbkuY5yefaw8wODw1tgmoZuqxGct/tKWjQsZkl6Bsl+
+Qym5ZE6pJE67DOaNv52eANs1x8YfhjVNmcEHSL6DilFzWPhL7raIrN9T6/0R
+/Wv6LN79L3muxh03Usi5iQ/rOUHOQXVznhuZ16dURZ08jx3er4xggVFYbgzm
+446aKiuRc2ja6TuAfAKb63j95Fwc+LDcB053mTN9GE5/5RFVh/eKW7EsRg/3
+c2kH19rD4qsGMldS/+XxKw/xXtboNO/KIefYivbLAaa7e7qoot/AdycXt+K9
+5jE2v4uEWcx7Oy+Q9/6HW8x45CENKLq8FdYJ7zbMgFn0njYHuOnM1GgdOvYp
+CbJgw5xuMxM/uIUK93CFmV/EAwUw7YTMIYKsz2s4MwjLHTm1ZXDQ3I78BYbI
+Y5P3WFXye6Th/PZ9cGDS00BvWN1cpHsJVpg6DJTC6WF+typgfsWmQ9Mwn/Ns
+h53NMDfX/PYeOOcs11IKF7MjsovJ/JFx7q1wnE1fwwD8+FJ9ZSMs/u+QM52c
+x0GXSlJPwY//aQMzT9VOuQbThFnlVnBOEv1FBLmeUnVEG46fG8D2hAW3PzOk
+qDfV36h1PiylsyQXYF+r3+Ya5P7dagXz4D1a2ue/YV5WZ11BCfqPVpm6ugkW
+JtWU28D8lY6u1TDPwc0rF3nkWeauKiX5tKWe1oRdVQ145bCga3VIqBbOhxbX
+uh6Wxvd4d0/Bfvat4zuJ2SJHP1iq53ViIvanL7a51zOZQ9VvVm5YSuYvNLoW
+B+stHUw/YkjqjJ+/CA60lFqUwaJ2wwwlmE8f+UvFCH00jx9t10ReMmoeF46b
+fOfIB1jYnye5BLNiwsbL4T1TacpdMD0q5qIO1v8YsLOaNxu5Wi6zcYVb/uEx
++DAVR/2+AsuS077kwdIzfiE/YKcdzq/fwF2prkUuZJ6Hvx8MwbzKnsP5sL1b
+1ystY3jINV4Z89t9lfXNguP4JV9d4GLHVl86HJmvO3IOZqbzFdowp8njySNY
+2PJxQAnu0gye0gjrnZRqfEZ9QUdr9itYxfZv7mNigyR2CVyW9WTMVdJ/+U3R
+SS3yd0VwMQTm3/ilYw8zhLy0TTA9+dKK9+hPJI71tybrnWqWBMBiscv66TCH
+M6mmA/NR7cZcFZiWv8bTDQ4LPak1hLyKT7E6RMhvy/srjcOwwCss2QLW2Zey
+QQ33i15kbbTVwFyuzPrZMCt7Ac90EurvGvfbGZbPsw6fPxHzOt+feQTWrK+v
+91XH++Dv/7kI5l7OFokmoP+GjoIfsPBZnWINvFbV/KA98pAbHqCpwny7Tlks
+rPnsDw+FGqnflNoEJ2SVmurgep77axrdBPc1jr3gC28ZflAbAEsTK+rfwHFW
+Tok3yXWzcx67sP9jea5HByz86e6thf6SbRuDtUzRT+zRCbWwYiUzxw4WH5CP
+RGIedds9ehthAedgFUuDnB/3dG84UlZm2wA7WTx230ac8k2FQfJqkenw4HQf
+V43NsHFou+5yUv9tv5wPC47YKJmTesbZaw7Ba4OXiWlwnPmhp1tgTSPTetKf
+IixHby4cFLXPtxymNi53eI798qhZOulkvge1fhPh+BP9HodhlszK0wz9tiis
+gj1hzZej0SaYh+/OClpB1r+7f0cN8/uOyVe1J3lEe15sR557UjvDiaXf+m88
+VMX5KggWOJN68vh1yTT8PySEWekDC161Fx4fjzz0aq9Fw5zyItv4cfh+eFPi
+PXK9PlG9ZCzO8Qxr96+waGNTmwacPvGUy1zMx5eFnEtR4VDDuT6RQSRf2fqO
+tXBgdvH1SpjuVXBqAfxDdslVfQ7OxcjsYS7MWGM4gQeL29alpcNOvrruApiu
+z60ej/qRA5s722HOsWFmGvy1dqVQnwFP0zBciv64N6sU62Eq6Ht7H5xHNzoY
+DAsmv9LPxzzy8LrlCbBI2dt9C+Z1/uOQwVWYft7Me5j4baPFNVh6+HptFPKJ
+35xJz4Q1s2XrZbCN33XzOFi+nW+hjzxDVvV/2gv7/Buwaw45r0Wlq9fB4oBI
+PQruOpGWxiD93coIuY71xlMv2imT+0cOy2bCNQ47b0swjzzL/tMO7H87Pyaw
+FBZkblWcQL/R4WMrLsORk/PdT2Ae2UhTZRzM6mDk7ML8ZffuWoSTvM7SE5Yh
+L7HmY/cwOOFG5k6dMcj37TeDWHLdvOt2vxLOa5dGG6lHrbI+30oh79RxwSJY
+WvjHjLpRNsV6uXfeN1h09L2y3gib4iZO+NeE5OOyL6FymE0ZswUT/Mk8/l6f
+KofYFOPP2OzbJE+9av3Z8HCuX/B/JP+F4RO6f7Ep9bP905zM0P9bVSNtXKe5
+iFUTYGlP7YVMeGrR/DctsM/n3HQ+6lMXV1vomaP+3YLeuN9squzWpN7NsMg7
+7dAr9OOqctT7NLESrVcP/X/9R9uwCBZq89c3wzn5ai4NML3X7H0s5r3fOyHm
+IyxfoOVhrow8rYUd7f9f77f0HhwoGqchIZ6aoT8DecnHHJ1TZ05+3/xU5sE2
+devKC2Gf5BdVAbCeiVNlIhyZVDt3BRy02sxvL9m/zHlpH+oFHbWZvpLsn/RU
+dy8slq7fZEj2b5yhWop+mL8DE0cwL+eGyqaP6DcwfTKjDRakWo+pRv7cy8es
+62A6i81IwfzDjowjFTA1FOywCnkpYn5tLYNFvYrGPgWbqmH+rH9C1pv3vL0+
+iHyWKFm/J/d7nX575AebkvfqBg2TfI8wlSL68Dy8Tw0ySH/H12x8JmdTa9Wz
+rnqTeeqsaqu+san4h4OyKySPO90Xbn9FPzlREhnxHIO5W7rZVI7Sxw3zLFCf
+tn9R8xc2JVR6/jEUjjT0uqSF6zbb6sfWEEd03lLDeuc5knWTmVi/cunD3B42
+Fe3xeqsbzGk/PljTy6a25CdMuwD7dJR5mn1nU3GPAm49gaWcvQHn0K/o+LLC
+bzCdE2o22o88fs63U5+LemrmN/wH2NQeuaJOH6ZPql4nxPzcA9Sx2bBP1Uhz
+zX/IKyqng1wXvZw+4yry4v0t1JhEnGjQZPyTTQna/jo5QPafzLd3gWt+DzNf
+k/1XeUVNJ67tnl9E/KRtSijWx511Hj1D7rdXrwxF/celnyb4k/mqqCuzsL9m
+xJNGR3K/r0sDH/lLXmcUGcPUpGsq4ZjHlZ9cNxEW/Ezrd0X+jzk3v48iL5Fl
+g/F05FV8ZU3SMMnPMS15VyebCmLE3lIheY3Uz2lox/u2w6RIh9QrDln0WoL3
+8RNPYAdHuvF3ipuQT5hZ5w5yPbRwmqAOz7/60tEM4kcdnfoivG8F7pI3xGWz
+ftTcwfPsYzFJPhRX4zTvLPZL1VwSQCwYtV8YVEnlWU+5c4+Y/CSUUyrk05Lz
+P4Clt9A=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.703763748652328, 13.714402573074395}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJw11nk81PkfB/BvIkdiqgmFbZyxkpFopjBTUiJHl2NTDZUjRKWaQsYqx65q
+ioqu36DVqN0MHWSpKdqMFULOkmxb5IhEztrX54/fPB58H0+f7/d9fb/f8dHz
+D9+0R46iqJf4IUeKRn79wKWUyNGUS6X7hY5/0uVSoZEV2gUmXKrDtT3xKbwm
+kD0vABa8VqbHEcvSJD/AXbp2qwxhQW/VsfZFXIrX1dqQr8OlrkhVb92Ak8Y5
+F8zh685cpWg4aOk1vSvaXIr1vKXeFxa+7JbIweLkF8XOcIVPyOuABVzKNib1
+uSNZH3rjWz0f8TNWxrrCzVPrSu3h35NMf+fBlOysfqkWl5JnX70RA2tVspTd
+4AbnB+5ZsODOPdqwJuIrThpXwfxA+9q7MM/92/5RmJnYUngapo3SvQ3Rj5K5
+zfefYbrMTcEVZrLp2ULY0JRdFQ4Xfdi2/x58Ylez4y+wcNcWg344QsVz3yWY
+VyA9YYP8th7qpddgfiItJxlOCn9ncwHW2u6m2Qkzn/YfFZD1ipmmK9BPb+/s
+J9thlrMjMwXevc3y/RLYQ29uZR28LNvMbRj1sgq/aSuT+Tye01lA5js1McsM
+FhwKHgqGRZUbo6zhUM1Derqwh6+JtzFczuhn1xhjXsWTsknEGzA8qRkPj3o0
+WD6AvSf+jl0J8y7eX7Qdvrt1gdyEEfoTZwX2oN4Bv7HmMtgj+Z0kEJYonqi5
+CIseeWQ0on+lBeNmfJh7McbTDu69myDaA1Mzk2MzNbhU9OtPq3kww3BzpZIG
+me+5XwPh9ALnZ/x5+HtL0bZjMH/axLUROu7foTEVEl/wz8GGBLgrUynqT2KL
+EHVzeNRLwfJfkt/90kDPXC5Voj3/4GzUL7bmfS6Hk/JmBNvBThm6XkWweFTf
+PoD0d0nX+CnctV3fIRlOirFY3g2rGi5Suw5XKAVu0EN8Vc65i3eJ/WtZwbCg
+xX7TA5j1fv2cElh0StE+H67dahlKR/2+B4qGLsPN4SbpoXCo4E3uUTjiW0/3
+Q7ihddVSF+L4uRMK6J+3hD5A6uWGCXts4YY/9j6rIfO2+Xh5J8zUyJmRCNOC
+Ytv3wlqDH51XwFqxx6/6wjpne3i9hqjjaO2QFUy5HDUQwRGNlcsHkU9LL9TH
+G5Z0m3w9D5eY8NM04fS46HeGsNNU9JwOAxyrhu5nop81+g+z7sDNHcNTNLgk
+YY0wFTaRiT8ewXwiC0POCeAI/97Zr+bgOYjZXH4MDuLnmTrAQTZXsuNg6cM/
+ywtmI+5QtEYaLNyyiMaEGfs/8iXk+pMJ5x/RuNS7FEtJA8wPfiS/B2beXrDm
+G0wTKygZwEGpwdE/ot7aRA2nEXU8jz3ecZ6kvyVlLm1w1c1TMbFwR2G5/RBs
+eL33URbstMvlsw6uX5bysK0Upu1OCt4CmzRkPa2Gk9bGvLkML5452lMPezsl
+hffDkTcurK+CmcfDJGtRb3Pbt/2FMOvp5y/X4A6boAvnYbFe7plBuEF0OD4Q
+NvEp1mCj/6qxvItLSHyVs9cj4IbvBnd6yTzKPOekwUWuynrXDcj3YYqpCJYP
++ynai8y7OrzyHKwjeSBUhkWhXgohsK+ROrtUH/07dhmZwlJ2uN0hYsOUvGrk
+1/F7a7kMHv1hh8sO+ERFqtekHvk+8xO3oR8pqzeuBuYpC9xdSL/sIioPpgKK
+W3djXkznOOFlWLBJzdRcDednSjeeJ35RPTyuivc1Y9szss58rRvSMhNzaDr2
+6g+4o1+rt04F7zv78KAMFma8SB9QxnVvV3zqg2mnfnrLhjd4OfA09cnzMLn4
+rhLiGX095QCLfinM8IfXvJ+TGQ5Lbqk2OcL8M+fL0mGhVb2uL/yl/urqErIu
+OuCYqUTe9+zbTTBPkjSshviGVr+OdsGMJ7mDV2Ctl7a/9MOCwLtRq1AfX/ec
+zweSb69BxSAcUSv9UgdT2Z+PZ6Gfct/cxHxy/jG6gxP6Lcn4uyUejtBZtKIZ
+Di0fW+MCc7Ppp51m4f4lsX5TJr50tlMIi11SVj8m8zo6VXQTFoSU3Isk824a
+Lz0LnwjYKDOGI7QXTjnAWyY43q0MnKfrPvoY8ZNsa8zOwbR2SaYa8YBHqwcs
+iTrGskB9oj62WIucP99BxYz0U6zZ2rgQ54eUac9Ev+mp4vE0WMSZX9qiiPtk
+KbQOgyM2XFDLmoF6FQ427iTrstaocAWSL7cvBK6lIqxc5THn4X3bzsAdWtxM
+x+k45jh2/wUzY4w++8nh/oWbsRSRX2i4Myd3Gt7HqwknmbBIKM/Sh3u5shu+
+sNT/t5ZqCvenbWVFEtxRv9BDAr/yXUUrgCPyIrvL4cnnK/9+Sa6vUTirhOuj
+3VoTBsn54a7UIXhxnRtzOnk+t8qU5ZA/aJm6uTJ5/jZeGf8NVt0xHiZHnr8C
+HzVP1EtfPBXVj+t5685/moF+PFxEMc9Jvio25w94Q6mttYjM19ZTxx79N2/t
+/RoIU1aqOXmwmJF11Zhcb3xm/xhxokdjCfr3mFnQT8f8mq/O7TeApfob709h
+nbHca14S9kmMf/se5sOshSpyZJ8kOKJ4yBIesFJdvwPmzVS9H4v8ouPx2m3Y
+99C2L7ydiXq9NZqU9sLSKPdL19CP2NS6Qg0WNiw4EIv+RQkWqlXYB4n+3Bjt
+hnkNCOL8s7VJfLHY/BuHotIFeueJ3Wsqn01wKIls3m4RzDt3szxujEMppYbT
+y2DGqR2xEV85lCi6V34c5v44GJYzzKGap9E1VpH8U9Pzl37hUBHCpsBUHfL/
+x9afMcShmDerU3tgRmqZ+uHPHKpi/v0+B/RDWSvvs4b5Vy2eXYClivsctsFO
+X9PvtBO/+ev0G7L+c22FBubTMbvv/T3E69rT2bICplZ2qVUjX21Ap3gdWY+v
+LKSPcKigyv/NWknWDZYHRpJ6JXvU6TBv1csjjaMcSlqbNlBH8g8WLzIc51BJ
+OilmR8m8Ny0Tr0P/td/k/ZRhBoutbz7JocSu91iJqF9QGJxdBg+0/W79lcyH
+Htc1BdOGDwt2kPn6VE7UwUrBP+c+wb6IYlqI7OEgbl6AKSx98iZ+FeJLD2u7
+p5N95+Ay1lvMt8hrezod5m02/7QI9XUErW/Owj5IYCSaZoh+tPLMqtfCopZG
+hw/o33vtdJvpMDVxmpkwyKFGs5tutGBfJEi+3WXej/lb3z5RCXPFQTJeN4cS
+ysl/biDr/fXtL96hvvXT3o3A1HNH3VsduN/tvdbmJF5aA9ugFfnvFdccJPkD
+npSua8A8ln9pfErW77udeFuDfFn5Xbqol2K8W3ugEvH5n3wOE4+ZlXhUYD6u
+nCgZcVjM3t0yxL9y69VsMg+9D8n7nqN+reunnYnftPJn1GF+z3p8w4nfGnvu
+bORQ3HoZFUP8nTcV2Yb8fGOn/TBXRbuDj3pF6Y8tXMi+NJEjtPsHz9MG508q
+ZH1ziHzbv8hv/WwkH/m5EYsTjLrQ7/J9r1eTeR8JtBvGPILkilY/Rj/cvWtV
+TXpQnyoj2xKWLq4wzoY9ctL0MzAfaeCHTVvgoh813KewDxIs2fVk6UfU89yv
+fRfM9ZyI4iC+UEEaXId9j3TEyv0k8os0jczcYO4Ky81anRyK1/nkYRv2PVRz
+QJ/pKw4l0B/pOU6sVe9tV8+hGAV6/BXEfZ2zjpYh37VUBbJP+v9n4Ds+c7n/
+AZXP1VY=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.2230354724127457, 6.228068696807429}, \
+{-1, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{19.999999999998018`, 17.}, {16.99999999999754, 17.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.5, 17.6952}, {0, -1}], 
+        LineBox[CompressedData["
+1:eJxTTMoPSmViYGCwBWIQ7fP3PxAYODCAgYrD9j0SAo5yhg4MBV2fk8xUHBLS
+urLCHYH8FZsnucSrOPDG2kw5mg7ka2judq8Aqr/TN+lOP5D/YaPBr3oVB/uj
+pTeubAfyd0xhe1Wq4lB15Oj8F3eB/A1eZmuiVBxW2Ghr5DEYOTAkPGC8oq/i
+cFDoVNgHWSC/YvXC29+VHeQsVnq6mAL5HNen/d+q7HA/L2H+LFcgv0HsEF+e
+soPohtDibj8gX0COxUhF2aFGtThWJgDIf7Fi1bo7Sg4/77LIHvAC8jtWWC6f
+reSge9voi789kB/gaXEvRcnBUemR2H89IP9AfnedtZLDLhfv5x7SQD7D7ylv
+FJUcpss5sd9mBfI1rM4uklRyWHloQVPNB6D7DTQfSSsrOUTGsjZ9vgPkH/g/
+/7StksN+zvVcr88A+QEfuNUzlBzUBVv8bx0E8hPsLXfPV3JgV7VkeL8HFB4c
+7YEPlRzOnq++/nsfkC+wQU9eU9khPyAjK+cEKLwbk/8WKTvM1eZ4Z3cTFL6q
+R5ftUnaYLdbiz/IRyI+YMv3bb2UHVQ+dec/4QO4/I6FmrOLAIncvY6shyP+G
+GSyxKg5bt/NFfA8H8j0OHlYtV3GQ+w2M3nog/0J+PHuDikOb3cflHCsQ8hY3
+FKd7nUPo/7npcqLkR4T5zU+qN/zmM4bb33D+u+BBNWO4+9atmj51srkx3P2B
+2i0aLI7GcP+JXzv2X8DZGO7/7y+rN6jaGcPDJ/5jwFcRY2N4+B2Z+6uWR9kY
+Hr6lFvG1zfzG8PBvu7P3h8ovRPwkb9sisf0JIv7u3pB9yXAREb8f5c9ybziA
+iH8V2d+P7Lci0sfCqz2LHq9HpB8O71U9JRsR6cuuZ35C6i5E+vt/KGzb7lOI
+9BnzwnQl/yNE+i3bd+X6xP+I9L3YzCpBXMkYnv7vmXapa3sYw/NHmlxhrnKB
+MTz/CMw7nG01wxiev/ZOKZ26Yp8xPP+l2z1/v++hMTx/XgLnX2N4/gUAffB9
+2A==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.5, 8.354800000000001}, {0, 1}], 
+        LineBox[CompressedData["
+1:eJwd1wk0lWsXB/A3c0kp0k1XppQxKQ0y9HI1oAFJhohriAwRN6XSQYpQSolS
+HSRz6SrciIMGoiIUF92jgQaVipNIvv/+WqvV+q3nefez9/857yHlP3fbegkx
+DPMLf+lf5tcE/iiwzP//yLKMq4vq9eh5LMNNOHbHEi4fSH81U5FlrDPFlnPg
+hKf3E/Ngfvr11ouw94pjV5WV8Ly5h3AmXK1R9iQAZj/fXZMARwxpTC6D+WWX
+9V1g98FAgzE4acmfB+XgBY9KDq1UZpnFe7433JZhmfxwA5MAOMmztmgjfNLg
+/OpUmL9PENo6k2We+KgVl8NKk7+MWsNbTXiLH8NsYWJo4wyWKbP70NEBM43F
+K9bDFRU1yzrh4nr/yCZplrF68POPZlhaZpmxC3zihbFXNe0vk7o8Pp1lJKtm
+2uRSfdPkJl94w3N7oURaN3ieIQKb1FZk7IbduG11LdNY5kyQe6At9cdRKX0K
+r715IHsF7e+OeyiG/ZzuqbuUqb8BL3U/+MaqyqIZVP9VxIdRuM+9bu4UOGh/
+bOE29POv6zOxqTR/mpssD44bfuj0G+Uj0P+sh3ne/HX+tC6tp+z7LRc2z9cs
+saHzjvQbKSAPu+tyVhE0n8Ea2QRYxjM87CbtN7ly/jOs3pzw8SudX9mw9g/k
+++t6hsRKFdQfdzWMhhUPj3ZFkvW6ggphQV/2usdw0jnXZ5VwhFb89LmqcJy8
+Twn8OCrnmxfM19+yKgn209tbXwgrnYveZwd3+4Sf+AhLyxU5CMHTbD8cWzAf
+9xG2Xfgi+nEaSbGyh5tjfILV4bJ5um0HYI7iCzYP83VMdYpPgbkLP0bNh/8O
+nW59FR5MGD5yGfn0XvsZVkD1AiXOKcLL43sbad3tRtqVLcj3U5TU4TSYbxtc
+F4P7SfjgqBIDs1nvLvVIoc7lRcl+dN5Tlb/d4SwPi/5N9Pz2+lQ52MpE1V6P
+zlf+vefXVJbZU/NWaRbMdPh3y2P9ROTk8J+Yj9VVqfOBMwN2BryDmbg47ms4
+pG/hwx7yvwmnYnG+5FO56V2Uj0gMsxH9vZ4f5PSSrHD7gCz6N02vdhmivMpT
+2Dg43tDJfgb1M5x9fAI2d62bYgAHWeiL7kEeOp/mPNoFS3t3HemC7RtCorIp
+n+hTq1cgz9D3z6/1w0kH05hI2Kt8a4yuGt5nYyX7W3C4RvxYOMzNSi1tgTUl
+7v/3AE5yYNPb4H6T5kGZBchHNOvsHXi0y1OwHV58zccyEV7yh3knF+ZJGYau
+gRtmv/ynB06Sn970Fv3kXSoVmbkQ99N6cSAcniS1LdoIdmvdoMXAMywu+G6H
+k3oW+R7CfAVpZq7BMJOlX/kZ+RSU/xNxgDy0gPeO8svrdCHzm/i235DvGfOi
+cdrPcdrC0n3leUXedYPZRYdMnXFfrSdLAyxof27HxQZJlln1ZkSgA3PXBnd7
+w8Nz849Lkz8Iji2HFfx3+nxD/+wuB4lVsN2jvKYOmt88JjkIVo+I7aiF3Z6N
+LXsOL7G9El5C3vDgqw/Om16+zKmQ9r88/WMe+lm+ReneNVrPjB0chHvcH2dU
+wAzbtakd8+RtDPBqhZUEandrMG+a//A0ASw9pNS2FXmU/b50oSrlZbdrxV36
+PCxquecIWwd0Tl2I/ExtF11IhQe1Lj/dT99/y5N/9dD8mrK3ymF2ry6jro77
+8TUo58NVjvIRoXCzi1zHZzgjI8SwBrYWPjvvDRxhnzciqYH7qP9UxIOfKXbF
+28LsfIPqaPiOje3IadgtS/nsYtiva/qRRpgb7OvxEP1tmHX04Si8+ICmNvWv
+uqykUVET886vUi/AfO7pIwIDmB8j7pGB+TOTDPQsYKVTH66cQz7VphPtG2FW
+rT4+FXmyM1NK1sOcOUdNryFvv8xNQoaa9D56T3s5hWXG7ptuW0D1E1yGDOFI
+7YXJU8lH1zjUTmaZFd0jjz6jH05WXOV+eKMnyz6F+SXmSZ5weaqwVin1n9gj
+Gw1/KtlafZHmLTV1boVLAs6KxdP6WJeDDeo/sXRsOkzrAg+Z73CX0Y/jhyiP
+NwW9leivySfWOYbqP7lWlYb+lRsG3p2j5785FURjPr//zgbcovX8IfkgzC9+
+QzmnB+a9CveyQz457ye/mo7+rXefV5BBfuWRRpOsYOkpZlMC4Y+NGyMTKZ/r
+l5pKYWtZ3ul2Wp9zZvwdnG5VrK6shfdttE9RFPczfmimdCDMrjaqEIMlmxLE
+b8PcF1P8P2F/sODjcyFtfH5MWvsr4cDeZf5rYZ534HAIbDFH620UzETVO8qR
+lWMrS2H+s+shm9HvtLg3ZXxa363T54B52tbmyTA6qG+9rcMW85Yo7T4oCys5
+xFavQx47NE/Omkduq15nRu+Tb3qYAswvfvffBuR52GogTwZ286taH4z8M/YF
+zBaiekqiWuUSLFOzft3h93R++41/1OGIlre9j2E3m06PenGW0Riy87tB1q9P
+Ow9X5aY4n4HZ0xU5XFjt/PZP+2HOwOOcTvjs6rtmntr0+0R5vBnquSY7mW+l
++df2Gz+Do3ZbpWyiepeyOxLRT4toRqQN1WO7Bt3Qr3jzln5Xmv+c3Zc1mIer
+WLs8jNav5kYtwby27QKf8zD3jNPYXOSRWP2Vqafzava2foeDe4alJ+j5qnty
+lchv8ORJcxOaN7WqeQfyHX8r8Tma8vgrO6AL3jKRoPAYbnbffpR+XrB/WRbK
+L8L7lj+yQwWeN57rshOWvmPtTPc182fK1xswL3u+TS+eN9jTbzYCu/Ebfvei
+79czZXYrdennlVo5nV8l+SI4iPxcwP2E/uKUD6y6DLt9530Ugi0C+CV15BYZ
+gRDmk962aEsPeanRxxHkcXy/vvAAzD90NeQz8ur12ao2SOuJWapfkGfvCc/E
+97QeHDxPAg6yLNjXTXb2vmSM+6gWDeM8gJUsX59OE8NclrWxRTB728ZSBU74
+drMgCeacrtDpFmWZWTWdKiEwlxE91QAfWcnobqPn7QrS3sM1s5onTGgeI11j
+YzzPvSeXrk39XNffdgfOP/qkUZnOf+P7zBPnf5RvE1Gi80Y3/dJCfy2G4s7q
+dF7irIrJmGforyuhhnRemqTIEHzBVD/akZ6/772eT98/Y0GmUXT+97beOnwe
+Il8tFdyk9fbvx84gr6G7lgcpD0a2v3q9FMsxaA/KmbMY91M7YdaBfDtVx5uM
+yaHZDkbTWE76NsUcD5hruFAR3xccscWFc4/D/PAbPPr+0MgamFwMM6NSp42x
+ziR32rfR/oOv56Aep+/1nB/DMGukw5ijfm8tKyKrh/5+xvYdRT9x31r+1oHZ
+JTpauZIspy3xcqAZzNcYSy3GPLVrFjy3gblmahL5k1nODPese860v9v/2yUJ
+luOhWL7JDeZ9ixDD+8bZOhJbs4PMX52fLcZy9v/55xUnev72QHIj7qPxpvh1
+qscTdDrLwjsm3tWugd2kzJWOibCcXNcLvStgzpDqSg0R/P7o2KesQf2mWf0Y
+F2Y50rETWfLU31HjM2LY3+luEyNF6wfWiZthf9Uu7zYhmLnqp1GE9Z6ToTFj
+lEdYZpMZzhN/KOozQvl+mCQYE2U510QXzRuFlYR3aTSj3+akolmTqJ/DUfdu
+4fNwKNoymurzfsz3z8TnQT4n2U2R6qc82BOPPErXqvkvp/lOqdl7Iy+uZoC2
+LT0fu1pbA/evOvhkKJieH30xvRH56v02MnCG+m2cFmk+leVkZU/MuU31JoJL
+T8LFP6R9+bRfWaw7F/czkSVZIbYE+/VzjU5g/Ur9tUEtmH8izY6Fv0jcE2yC
+mQeGTTWof/zeo5ZA2O2hkfNseOnc7NzjMEfb/+w69Df7femjDKon5JXlhP59
+ZBzvl9B62Mz3jrjPVXrjm3lUf9mTK5sx/95jkzwe0P7GoL1r8b703xVa2gCz
+0V+H1yNPFYsC7fu03zHT0B15x/fM/lIF814WhqTivhJ/CW++ST6ZHy4Qwu9r
+neKrcuj5uZ6xkfAlkXW8VJib7TtgDNc0TPyKo/7f2P+nI8Ry2n/ulTtIvl21
+ywa20a1TCCJL1vlcxf4FwWNyO8k7XS6oC6POWYvX7lTfZPu/LbCKg70JmX9U
+xf48+rNQDSv0onny7Af2of8A868Ru8nTPhz3wP2/qTvXGEH9MJsvYn5OcV+r
+fzLVX6l+eAnuv+3UGuEiWlf/5/MkvP9yxx78eEjzJUtH3oQdXvLiB2i/04Zf
+pshbk7PvkfRS5Ktw/m4WPGn2jNLlMO+TrmQ7XFFZo+lCnrF4dits/VvLlGgy
+19zxIvxKr8UwB+Y23QhZBitJnbtVT+td6eqXcX8Zc/0T+6i+83o9PvqbRP+P
+18c++leC/R8W37Y1
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.994885276715344, 4.925732979470893}, \
+{0, -1}], LineBox[CompressedData["
+1:eJxFlglUU9cWhgMij4AoS6bk5t4DqSKlokSDrDIIWwFBHoUUQStjRBDahwxP
+K4iCgNWWwcoghVgGtXVoFYkiiAhCUygoolTFIaAGEQGLNCo+UFTeues9T+5a
+WVnfusM+Z5+9/38LIxMCorU5HE4J/rH//7sQpExM4+tj4EjyxfOiEfw5l6s3
+rcCcMWBcW4Pg9YlCiSwNsyqw4d4QAvOjUT/xlmK2bN6nNY0g+C0UGw9YAydx
+KJk7iWB7s+ukbxFmyd6lq28icO2dLyzwxJzxfOL7QgSbOrVqC98uAE7+z116
+jgjKFy1p6GjA3J28l+5kgHNdp9Q/C7O6a4vIj4G0w+Lca4GYD/2aFtNBw6JB
+dV+kGLPcYHIN0PBbzo3+AoQ5w45ztFEAHfUOiSvNMFvqJ91wF4B/5xWLS3zM
+0pP7O3spMLB9sqLBGrNKvflUNgW6p2OEsa4s+1WlfU4B1zO2KTeEfV7doeVA
+QdtNpapkJ2ZOQFThpxTcOcZ1uFbBrk8cMGc9BVub3is2NLPr59moiilomrjM
+HOxl46d8rjdKwSrp/opXasyicwW+6wRQ4vOy3/sdyzTE3hDAhmI9I+V7dn+y
+dP91NPyxbDB/2zjLNW47HtJAyy4zWffZ+PHrnaMYSFmrk/T+Ars+xwr9hwxQ
+3uvFuTmYjTKVqtUIQj3BOlzCxv+lOr0SgZWd6qXYkP2eV2F1L4Im4U9+Tr9b
+4Xz5VKVPIbg02F08vhVzd7ZR6DsE7Veu29NWmA/1rBX1IxCYPIhIvz0fx1t2
+NewEAlCdvH03F7OlamZ1EIL03oIvz3thlmu1i58x0Hso7eWaWZhbmFHDrQy4
+pR4LSe2dh+PdeyhS0+AwZD+dVIdZtKLNLJaGkBWXKp6VY7Yc00l4JADPpmCZ
+diH7fNLyK9ECGAs0GLBm+ZBevdckBcWP+xUu7PPSoATvSgqilh+YUXIGMxxM
+WBhBQe/RygHzLszqzx6ZOVMQqJ/XtOoZZtWe5G57Ck60LeEnzsHr45Sg474U
+vB85U9kuwqy6bJWQSUEYt9Er1w+z6Pbz/G4KeMlJnAWbMEs8Dtg4CEAdcMBa
+8jW7X//jzlUC0DN2FtumsvmI447Z0bDSsmdB+BbMYBHVc56GvbN2nKKlbD5M
+H3m4MlCxWDzlBJjVSuZIIwOSwSWGC03Y9wds6m0RuHsc4072sfs5Vz4zG4HH
+3d+sHcswJ0bd0OpCsG9qc/W7Nez9DUNBr/B5bR+eW6OLuUVHocuxgOl67Rjd
+8x/hfG2Z2DeKoDVC3KCIwSwXx6guIoiRO7+oEmCWhIsjExHYnvz9aXSPEMe/
+V9VhiKAwzzzPrQRzvlHtX6UMZP4ckGKzUcjWa+d35gw0pw03FzlhNqoefLOf
+BheHmdfDEOaMN1lP9Wg4LK7f1jmbfb5e/fo7AVC+Pj9mGrDfX/woyUwAbb6P
+5TnGmKUjm1/UUTCrKKMr0gqzShJom0DB5ZDR8/pumCVP/nFsJQUWF8dnCMPZ
+eDah+8UUOL3CcrVLc3+tncHbB4c175/63tj7VYvm+7Hrdi0tV2riy8sF/l+P
+atYXUlEblT6uWf+tOq9s++ea/TmeeyM60q/Zf12cOcS1afIz7ln17e0yTf4G
+woa3tMQKSX5Xu7mYHvxESPI/26nVMOCxJTkfec5Vz+WlluT8ti15V/ra25Kc
+b2j/YqXshQU5/+778w7rfGFB6kM6f6d8Xzsi9bPRt2Z0zipE6stHv2zwlzsM
+qb/TyTJuzi6G1GffRe7xP9wYUr/RB4LOuvMZUt/K09my4wYMqX99uzvyCFOG
+9EfDE3q6RsyQ/rFTfJs4EsmQ/hrjlLUkVjCk/2Sry7os+hnSnytbhr75txUi
+/bssu+XTbuxDH/pbGHxn8s8yRPq/xcAldW8bIvowe+GIo7wXEf2QBvt0vWH5
+//piH7BbMb8VEf1J1/1Biy5CRJ/iVGe9DbBuftAv+yId/hdDDNG3UabPtiCR
+IfoXa3IiwG+YJvp49pQ7zFhDE/0MdZP+0F4rIPoazw2/ZYbr7oP+xhdciMzd
+ThF9rtzmxisd5BP9FvnsOuMewSf6XufxmWzkKY/o/5T1BDMjj0f84cyRuNYp
+Dx7xj/Avlz2Ya84j/vLxr2MP/6nNI/7T6MZ3iZ/JI/4UZtKvMEE84l+Jg/9q
+7fTmEX/TDtZOdcnkEf8L6Rkt2qjgEX+ULvJx7dblE/+862O3Z9ibT/z1QYqo
+yW43n/jvrZ3inblyPvHnr/K+atl9lU/8e/3GQosdN/nE3zc1B7v0KfjE//P1
+0SonGZ/MB+qC0pHItXwyP+jv+c916RSPzBfy7eW58Tk8Mn8wrm+Llbo8Mp/E
+o7qm+1vNyfwyGZQ1Z9M9MzLfrPskveeuoxmZfxpzHC5c+9GUzEcTWcrwLh1T
+Mj95Vz/7WyvVBD7MV5OD7HxlDP8FAmqi9g==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.4452, 8.75}, {-1, 0}], 
+        LineBox[CompressedData["
+1:eJwt1A1MU1cYBuCb6lxjO6tSsKKgUBjUggWalI6wcVEUbTKsyBiKUiIKjSgW
+A6HiLG0E7cAfhuAqq1BAYZMfgaqFQRCmzFIrOMewDFa0Okb8WyfbQFHZe81u
+cnPyJPd85zvvzTleO/fH7qYRBLERLzUSzlk8viQxTY2rSIJjSC+ywfdl1S03
+4LjAkKE6WKGQ8Yvh7p65rP2wM8x38y5YKW8wCWCOWt+4Br5vKih74kMSzfM3
+7gyAnaFRledhMu/RMm9YUtY+sR0ubkhn+MBBizJPuMHOV76PguGTppnyn7mY
+v6nDLoHFs9aZMnhaL+7ZB3vqNCkymNA0P9HBVzWJHwfDQb/+I7fA82vqzjHh
+O5PXaQSfJLxZNaIX3iSxoTY/IRSunRO72QEnDPdN7YMlzBLLKOxMUmVXwQS/
+gP0AJm9bjg7AywOiw5/D5qVNnH9hR2TrJA31tdzPd7sEkIRuU3+FB6zMT5n3
+IWxoTN4VDstnoucEws3uL8gd1PdrY0b8YNv6Y8tUsPSbnkI3+PyUaEQPm63s
+opeo33Xn2hcmar6Q6P8Jlpoj/Kxw26s+owG2e4ojhmH10eVv0uAML/ec32Dn
+pddtPGp/wtbRe7BNdlYwgTy+Hxx33KTyy++3XICr36amNcILXT59Q/2/Cc4H
+l7Vwd3sazx8mpv44tI3qp/OY9i8ecgqmD3Kp+lXr2ddhuy3Rfxx56Io4Bypg
+20eMwBpYfiXBkQ/HqZ9Zt8OKjlRhDhy2yOLqCgdlbW3PhhVeIdx+L4zP9BI1
+HFNipRfCbRkVkWfgrp7JTglslmQfuQrnVmrmLoaVD9cWjcFJruXJD1aiL8PI
+QRb6vSgQzLbDxGUaLwruXGNv0sN0blnkIfjxD9VDX8LdHue2tMIlL42ZGlis
+3fPnOJw7bGIdgZXxdV1uyO94/YbhE7D2dKo+AmYPVugMlJWiehl8Rvnej9R6
+WlWsPBseGjr79T2q3t+Cjjw4KsnoMg1/y+8lVHCWJNR3KfonopcsVsAHBua1
+iOHkdbfWxcOlefX1cdT+RRf3BsN7mCmr0+GVGeF9NLjpYUthLlz8/l2aFf3G
+C42JGpjuoWKfgkWMrFIVLG0zimPghYbewkxqflj8XQZ1XhYsebsV1gp5cRbk
+N9HLcn+3vlLvdxwuPTmQxYQNv0yd3gIzn/5Ot6F/9YLxWm949dgn/Hd5XpKu
+mPHHebiy9/A2WJeTmmiHb/iMjrJh6VcFktuwvDGisnwF6jWVp5hhcVXIGAN2
+fpZgGIDZqxq+03jinriQc9gBv6buHY//7x9/8j9sjKv1
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.6318774622309, 14.558628882191854}, \
+{0, -1}], LineBox[{{17., 17.00000000000231}, {17., 9.999999999998607}}], 
+        PolygonBox[{{17., 12.9}, {16.6, 14.1}, {17.4, 14.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.9452, 13.5}, {-1, 0}], 
+        LineBox[{{17.000000000007276`, 17.000000000003638`}, {
+         11.000000000005457`, 13.5}}], 
+        PolygonBox[{{14.51826734053906, 15.552322615314452`}, {
+         13.280184249251306`, 15.293188945044921`}, {13.683281069670574`, 
+         14.602165824326175`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           
+           9.996694214876033]& ], {13.823799910437668, 15.984057296392571}, \
+{1, -1}], 
+        LineBox[{{17., 9.999999999996362}, {11.000000000001819`, 
+         13.499999999996362`}}], 
+        PolygonBox[{{13.48173265946094, 12.052322615314452`}, {
+         14.719815750748694`, 11.793188945044921`}, {14.316718930329426`, 
+         11.102165824326175`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.823799910437668, 11.015942703607429}, \
+{1, 1}], 
+        {PointSize[0.04], PointBox[{7.5, 5.}], PointBox[{7.5, 12.5}], 
+         PointBox[{17., 17.}], PointBox[{17., 10.}], PointBox[{11., 13.5}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T14", " ", "P2", " ", "N28"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdief/fggjhihjij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdief/fggjhihjij.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {0, 44}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwd13lcjNsfB/BnCG2Y0jLtaXErhSIl1UxapLQKU0IbkihKi60iDNowUYhB
+ERUJGVRGJVM3GW5SQnPj1iAJyZTo9zk//zyvt7N9v99nOs8508Ni/NeNoyjK
+jUZR5EkNjOHfXyxqDgGdRdmqCfjlcM7JDnV5OFqnURgGc/4NcpkNy1QukNeA
+QzKz/WJgc2tTo7YZLIp+Ykm9EG5vC4o6A8vmmvXZKrGoUbVewWaYvTNMpgrO
+yZu335P038cN9VJmUTy/wN3zYX5PxdVe+D33WsssuH2Ttub+aVhPKD86F9YP
+667TU2FR2l6Vn1xgqVnXmxsw9fb54FrivNkT56sizpaj3/fCsUm30y/D7JpF
+4SVwseeB9HFqaNf7vev/8b44ssgFVhwXE0hDPqkX9WZvgnfFWauYkvwWydES
+4dIF9C8eMCNYyo+EufkucRFw0m3f3EXEWvnZcaR/1OuhSbD5/d03EmBqeblN
+NdaPL53VHg2XB81P2ABHa37gLSfjd/+7QhHWjy/wtCT190x7QPJp1+y5QxGr
+J2WvhgdsNgQ9IvnnObBV4fQaxsw0uNyJq/EW9aEa/DJJ/cRjV2WqYMVYvpXE
+GPN8oy+pgFubEkfy4PK1Hz7XwvxzHi2esOSD7d1+2Py2TMp4mL0ieYY15i9d
+43Gh1gjj3/VEc+EMihF3BC5OtcuVQ7x9svmVa2EpTViQA9tH519iwSJl9xIj
+5M/YnNc9C6ab/HIWwGcuWEWawamNAcdWq7OoeZeYx61g4Y9xpUMwV3ze2A2O
+zB3o2M9AfmobV4TD5Sva3kzQgKdl9x6EGesUrLbBxRtcnW6Q/vczWY9Je9LB
+o69hd0lh1jhNFjXoHds/Efnk/KvYaQAz6BXJFnBqqJ2FCcxLTtnnBYsjxlqn
+wZxCx5IIWOjGDZJgvsLwxNFYWP/U47VX4PZdBRO3wgKvv+NWweac3P5wUt/N
+/M7xcMZuveQlcJJetH8xg8xTPNmAtL9prPWGGT/X3uhHfLz4m2OjyFeFKRop
+h2NXGe7mw+nth/5EwSZXhJMPkPrc+sdaD6Y8vIo3wqKy7BCRIeqhoGyzHi78
+WhueBke+Lo3fDQt9AmdYw6L5r9quw6/jRZv7DVgU63Q3h6zX6ptcdR2W5vC3
+hyKevqaPVjthet+y0E54KUMzwR+mnFTp65HPrh0Bp+fDIUF+O0Zh25QpWiZw
+8ZYcuXzUi+KY/j0DFladeG2thfGrfogt4fLa4SlPYBeTFyOLYcaqV1SgNvJ0
+U7bcQNbnBZ1uhQW7p1pkkvW5WVkLdZD/6EPXO3DS9KH9h2GVSaq8btKfM87v
+Acx+XeaniPwERfd+t8O3MiLTLeG8WLv3L2HZnjd5PrDQYO+Fathll7dbBByi
+KJTNhJOKt1RuJvUJtf+5BJYeeXg6Cs4x7Zo1jHgKA+Kcgkj/kiJ1Hqwi/+24
+PWl/eW2PC5wa8Hq6MiztveTTh/wYjXaqrxEfJ+j20gI4eHC58Rl4TkqYMBge
+MH+RFgAL5jdFzIZvfTLkTyL1dLXsZMBz9EK5/Ol4f4LSFi34fZD/2EY4KVym
+dAFs5DT8ShemJ6/M2wazAnd0dejj96PJjnkEUyJqRwHM2WH1bDbi42dbXd8E
+i4QJzGtwe+OZcW7wgEPRYnvkyzrgEmEBl/OW322F9QcXGhvAOQ7r/9uqi/jP
+Pv5uCLOi57ybrIc6Ri3qsoQjCxPbL8ABrTnhHrDgzDKeKp4mhSd3kvXsRb/V
+/fAc/dV69xhZf8rNx2l4xrd/WVeNJ8U0/esSniqdLwokpP291Jn8/4B8a5IS
+8nNZbfCkAS71HDOzhgcUetXq4IxrDn/5wfbCx2o34fQz/o7hMHtJx8o8eI5P
+/F1Sr4HY0d54WLjhrxjSLn3w1tGTrMMIf+YD67/9pqcL1w/6Dc4irjrzVYx8
+mm1WZ9JIfSsVdh6GZRSzPgpJfWy3HXIkjirrPgBLhHIe4+DCmHc1DrB+0h+z
+V6iXvl+zA5mH4bWrqBGWnaJS4QRzxsKm/QOLdLZeL8KTw7947CeefJV3n5Tw
+ZChf+jkf/fiDk+8e0SG/x6Cn2XDSroQ6dVhgLo4dI/Mo5XXcxXt0eT44xYm8
+p6FD1fHwYIlJ3iESV2fkeA/49fxVV9pI/o66fxbA7vcrQ4yRF6Mp5r4zTPda
+KdwG848cmLoOZpsuH7kP580JvX6K/G4yFFz+kLqd6GeL4eiyfjcb/E5zynon
+WiKewbBQ1XVw5LkBi4Mk3hczPQ7AvCMM6g2J9892jVOwb0vaTXPkV1WUGMSD
+ZZ+2CWNh3/mRh/JhiZKVdyGc8e3EQzKe/dhTqw6OZH+/vhF2N1KSaYLLt1zZ
+40L673Qcq4RZbY33NMg+0TaDeQg2kThY95HfQc3OhU6w0ZY0cQ3cbnO2RIx4
+JD21pVziS9Vbo+DIHt2IWJKvTW1iN/IT0q5yAuCQ36UpXrC4p8faGWbdLP9Q
+jr8rboX2JEeY41a3TRku9G8Y70banev7E7Hv2abKHV8FF688TOvFvqhv35Kw
+h8z/weZVBBxfWdFSBouctAZ/YF91v3HHQAILs7TEBXCVs+H2mchn4IunxlqY
+NfggaDupp+R2jx0cUODLqCP7ZuLfnpYwNet5nRL2naSljrJOsEBjaMMasg91
+OlzeAEtCjE0uwWLjsILzsFS4PLwHlri3xX2E6WvlWrXJdzr11h97xGev+L1k
+MfmuaP4+fRyO1Bi4sg7meJomke9e+xFP0wRYMEH9hTXyDe45appMvsP7+30S
+4FSnE94xsMT7ukERPJBd3B5IvrsrF6+pId+Fh6ty7eAk9W2aD2DZDm7jNPLd
+y9HIJ/0j+J9VJWQfNj+yaiss8r+/4h7MObfHxJCsZ2OflgnLehWNq0Y8t2gn
+U8g+zr82j74Ipj6tmbwIZjzkxlciv8Jk7xMm8BxlGV09mHv0CUMTZl/JPZSG
+717p1KuTGbBvQVjqO5xDmt+brTCETZy1n3nAkW5sS7LPF/uw5cg5Le/2L9sw
+mPrz3ZJJzml7d63nwnTpo6MvcA7iHVut94yM1zqcvA+W/FXvrob8Qj6naXnC
+u05rhIaSen28HWsBt17MPnsd9r2kY2FGzq0u05T+kHPQsGMdE+b+Q28g5wb3
+V+qJm2BR1vK+bNh2eFPKFdi9P3DoCSz7o2vuD1iQsuwuDec8d1q56xLEJ7OW
+e9AUDunxpnjknFn004WcizkOr7K+w0l5YfF+cKS3mrMjOZfur3Qglt46+moH
+rK/zaRPpH1l9uaYQFsRFhpvDeYor7fnwnA+qSgqw7W3XGxUwe+jT825yTtrz
+tOQYHHHdeFUlOSeV5Y2uhI2cY7M5MHX4KX88HHz88rpgWKpIs8hDPMHfmh/M
+g/lR+g8Z5Nx7sd9dhYx3UX16CPkZbS8J+E3OedOFmwdwLs2Z+7b2K8wanTPX
+n5xrTZok38g5KTBw4JYy+Y69TaWRc6xPZpQuHCzoOK9D1r+gocrFPSN15Hq1
+G8zJ6W/RJP7gW7yT1FPB93Il7imi2k9F9+A81fWlUbAsSzGV1HeAJttgC5cG
+ZfC8yD1CgXN2OpzaoGxJ7jW+BqdOGcFU5FmHj+SespUvZsLao8nt88g537Ek
+JhbmmXU7JMOyptOdK+AQrdIft2CTvfnpFOKpN1j29T9yr9q0tGE5fGY8VSRv
+gvbRRa6lcHtqoKYBzI7fMfsPzMlfMDoTLi+t+uiKfAPm3T1lQtqvPmXvgZuN
+QnsZMOtbjepFeGn3tY1/ML/t3CVl5bDR/iTzThLffUl9Iey+SLnoBjxQm2hL
+xqtkhOemk3j9VUwcYE7Ryo8ryL2o+dRQN9Zf+tYpbyYsYDfaboNDHvYkTCD3
+xOftuf3Ij/WnS7eX3KtqZU8Hw8X7qKbn5F4yd7vsvqlYt3uBbRO5t5zfKXWd
+gqen16kWUt9jl69Pnoz3/tVzn5j0X7C+4D8Fsv7Jf8dIvf1ebGqXx/oad8fI
++qyjkt1f5HBOPk7LDCf3rufau63gW9+yygpJPsOmo5dkEef9fvpn2FfdeK4v
+3Gy/dIod6qMv9WqfBWcEP6/nkHp1rVN3gqPTKh3bYN/90st7YfpDp1w9U/wd
+mB6kfYZFJ6arhMHl5holiVjvtZ9/0GmYJ91wgYH4ZJqVExtNyTmp6kU9XB6Q
+RvtEHFtxNRb59D2qNR2DB85vP0JXxH684l3tBDOsF9UQlw9HmA27kPYcy8mJ
+NNTjvXDL4z5Y9ER/AQuO7br3/SkcGzEuwAfmiGZ8vQpT+veKzGDeu3yPVBLf
+ggt7RZiv8Pblp/5k/c6qRieYZx20zZj099d5lUbiYa80/IV8YyvfbzyBeH3/
+UbtG8g+ZWs86iPzaD3SeuEc8w7djNfJ3UZ46Wkzq01H02WgS4mqN33UR5j3q
+GOydgP1FvMWwhLS3bDhZIYP9L9o1WACLXV2n54zH39OIwuduWCC/Qnp4HN53
+bNiwEuJhGYl0SmnYr8oHFJeSeldzBSMU6vtO2yKbxD/pzn874TPpRl/bSX3W
+rJppBbfGbzs3A/Urr35ZrANH5Dd7bzcj+1b+54Wwr6BerpbUd65YlwNrW1Z/
+k5uJfIc7rH7Bo5FN6z3gkIw1bhlYX5reqJMGl68xlrNEfM2TjN1KYV8Oe+Fb
+OD1g6FQT8ZeD8znIx+hNQlwnLEpJ3mmIfOvXTfj7LZlvG8OxCGb/WO30Aqab
+vpGMn0Dug7RpAjI+JeaoDcy2Mpc/T+KJGWbbwbxsuY07yHy6J2/KwmLKvsWb
++N+U4+cxn++sYZXpM0n+ndsnwgyum9Ug8hPFXfJdiHgY5SP0v2FW5L4wN8Qb
+vHDBlmJYfLCmZzby027V5GeReiQY3KAhf76j2kAKTHXej878zaQGG44f2036
+ay6brPqLSbF2taZzYN5d2b03pExK8l1O/jycqr5VIXmISbXyDAUNZLy04U3K
+IJMqfJZUKCXr03rNXn5jUoJ9avrWiFfwpM834yuTap6qpUXyY73caFM8wKTq
+b85VewSnlgx1z4L1F09YMs0c6011d9GDRzmT60NhQZOWaxzc5xHCLSPOWqOs
+j/lGHTN7v8PURxpPDevJRg9bWFlgPl27EJfvTErsJ2+3HqbEG425iK/v3OWg
+LNL+csTwyw8mpWj7LOYKHDL77STHn0wqwNNHWgmzju2lRyFfWec29Tuk/e0D
+4zXDTCrk07Lcq2R8XXb7pBEmlc7d8ewYrB8Y6swmNvx9eyssDgh54AKzuhaf
+XUL6m6qsf4zxlFRkpwMLls0O7ML8VcdWx34h8W8zfpKD9fVjGufVwalHJra9
+R3zsst9Rp83Jd0NxWIJ8QryfPNhB+geocq4hf/2l4YfCic/XFRzvZ1Jz5J5e
+XUnqc1LT9sIHJpX6RG43m7SPKIXfec+kImMza9aT9os//GliJhW83OXwXtLu
+3xO38iXeh6fTihJiGwdRwlPUd4LPSBfx0tKSrlq8P+tJNbqknkOGrLwKJiU6
+9GjzOmJ6rOKzkxhvnrj9BjH5l1dN0clzFut/TP1DYw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.684589195445786, 6.720523577306384}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwt1gs4lGkbB/AX5dBxQihTRoRknbXTonm/SqTkkBWdDDmUlUb4UmyNqCQk
+20E5NBY5rCyb1dhNjdN+o5XGodi2wxRFtBrWOh++/3N931wXc/3e557nue/7
+ed+ZR9f/mEegPEVRz/BH3v/3YtLUPPJuTFPczSYuk9o0lf8wvbJiHU1Jip5M
+/wFHVzwMCIDHD+oyb8MZdNPzlTDXuuQfZ1hszszvNKKpcrMGOelKmmqWsVdm
+w30duk1+MMtqg85RMq549ZeOFTTFe8TQ3g6zwpaP2sOiptcfLEh8SvrSPC2a
+0vqprM4QVt7m3KwC2zkleRjDaT3vXp3QpKlYy7rv2TB3OiRnWIOmSsdcrNzh
+xJ5wyWl40UmhynGYl28ZxILLQ+rEGXDXnhMeL5bj+hpBcx3JZygosAxmGsc5
+/0XymZVuyIa73vSFL0d9UvcjOndgUf/2VDbcNTzG+Q+s77Xb0BMWTbhmzMAB
+b4+uDoKdFNuNHbCefo2KOBTmz601uQln9KfOkXG6N8xuBN4aKW9DPq/8nF/o
+hnr0H9ZEWMOsPeNFRTBL1OunDBcxtCtG4UWeVexW5Gdks7XQBv3Y/7j95zT4
+sGmDgR/s1nRdkfTTaHLfvSj46qZ5ZdOGuF4nfceDRcdbg8pgraLlp9zhl8bN
+8n6w9JZ/jCacpmC6XRMWawkNGrCedOvRZ+0G2H+13H4f2KhGczwDzoi1cXyJ
+/MVD6zMPw6xPTvmu8GFn2/VbYaezTcxq9GPn3aDzJvC4fcO/VsN9lNywLsxr
+7O1MUMf9cXq3pj4cvUaQPqyG/QsuUbKE6YPyklCYcf6kozNs1FPpPa5KU+aa
+atIQMl9Rq8FNuFxv1YkrJJ/L32zwgKcflob8Cstc//JbC/dY3Ze9h7llkzvU
+YPVIP/YS1CfJ+3OPNpw1efuSBcyv/73cFu6qvXbMBe669tw3HG6YM6vzhYVs
+u2NCuPRkdnsQLFgnXLEI+QWUh58i/WP5/lshGC6qjdd1JTZbeqoeTrjY3WIG
+e59KFWqjXubUFb158GH5vSYhcFr33O4nyE+oJ7pfDJceL12RAps3qn1+Bkvf
+peY4wH0mMS4DMK+KPjSxFuvsnTzYCydUMXV/IF5R90oMsxzvFx+AzfUDay/D
+fSesG9WId9tz7OFPg4uXSfTR33nTv7YjP+sHz6RXYbfdqj96wT0J36wJgJW1
+HU8+Rr2hXrJtHJhSDDG3hsUNyRaG5PNy1/xvLsP95N5pwoQzLNva5xjYrxc+
+vav0yXXOxqPw/gu+J9bDjNGmj0+W0lRkwavALTCv8E1J9xKa8qweeXQITgu/
+Vq0Hex9hmybBrPQU1tXFeB6aChmVJP61ZjEbZv6klPOarH9/7q4qbJ1sNF+J
+1HfOb6EuzDBOSjWGeU5OJlxY3aD5wTaYVcqzeQzbFQSH+MD8O1Y79mC9hg+u
+3VxY1uH1eQa2G3ec2Aczyg4dv4d8xxdPLXOGheU5GzegHqavmel6ODoq7l4q
+bJJV83GO5Hc74sorUu8Wl8gmWFotLl+F/kS6msRfhLmP3uc4wwGyfrvNZLzE
+v4ULs46V6YzqIR+5mNoDsCDuaHchLK5rNaTheVtP+uyFM77XH1SC8yOfOzOI
+8yw5VVhPuX/cq3kN7ler36NcYKeWsI402HzAW+575M/XH670hVne8hFJqK/5
+umnYVzDPv9XvIPox4urepwuXV3/qNlqE++WYVYQGidcZO/PPAvQlS1CnScwO
+znuqgnoNPwzpwwz+0pV1yuiPMj/VjqzXZZXyXAnXBw8V74clF8wYy2FrH+3B
+szA9uFAUr4i4WxkPS+G0rnOnDODE7pMencTZvT/Ozsc641u75ohnX7kvxDg/
+ackNPdTL26kudYJ3Xp5aQsPmDnLpFXBpjpbmbliiM5xpj/X4QXpjpF+sYGZy
+N5yYoxrrBQuyuL9mIN/owmBFBxIfFtvsjnqkyrevGJD5Sh5aKaDe6PnBlVNk
+/bk+US7Myrx5sxHmLm3V11tIU+yLLsPnSP0eCaGnYW///LebYAHHLLQUzgrf
+1j2si36mNakXwT2PH9zNhyUqF8rDYMm+hap7YLeyjQoULGta/GIRzKrXdTmI
+9Q73GRWKWYhrVTFPRX588eu2ZGJd2YnryL9j+oHHPtjtXHvTGdSXXzEisIFl
+cWF2nuiHW1xlCZO46N6b1ein9QrNRgbx3R/YAwr4vp8xLl4Gl9tJ7zfI47lu
+23xiNSxa9si8Sg6/L/uCasl8otue3k0UTSXbB2d9zSLngUB3RVhr8ZOqGJjV
+cOP6h1kOlZx0PrIAptds5xnBkSrLl0iI/wiyfTbDoZgpNRXjJN7puOIATNtY
+FTBRr0BVe9If8Qz1dUEbSf2OAyUWcxxKuXGbeCfpz5ctEj2sVxS8cunXMP/l
+KxWSD5XSJu8OixLk3n2LfHs+imc5JH77xNwG1CM5YD6hS8wN7ewj9RUkxY+R
+fl1rs0xE/epMaX0tLOV6Vi+Yh+fadUHwWVKvi39IMNxRVplsCwsKNqncgKnv
+FPa/0UH9woiIq3AGQ4naokOeF5PX+2Fu0pM7havxbvvd2GfMz40veq8Kp03k
+9rvCIgMLhaRV6P/0Joc4eXJ+2CxcBkvq22qTkH/f3vSxuzh3sVb2jkaivr4z
+Zx/6wdKXq95+h/5wp0KHTJnk96uet26aQwlnlBw0YHpsR17tBIcSuI7baJLx
+vNu+EWMcSrR0ZIk5GT+TsM/zHw5FxZjMHID5Flyt6L851PjuBZbZsGij5+Tg
+EIcSbyhmfCTjT1MSGmUcitUzFGCH/Lh3eusV4OgWUe4VWGRU8MrnM4cqcrbU
+64ZpyfS3p2HB9enw9aiXSr+kaI147+J7CYHE2eK5OTLfxMBUMizY09CuNgw3
+h3nlwHzZsdb9yEcYtUz7BokXipsbRziUUazdaBRMR+Vps0c5FDu+rukrMn7L
+LT8L9cl6t5d9wPpU56mhl+MciifP/hBDfNdvUw/6Iaqsrpsh/Xg6ECaYRD4C
+41geLLg83Ss/xaEylO/NdeGcKtUYtpeD+QejKu1gfvLaimuIlwWq2ObinEr/
+nHn8EeaTcByNF8HSv3+8exbrMTTPNZ/FOZWb5uDVh/yU1wVKVci5taOtZgb5
+96UbcgtwjqLUHEbaUS8jc62HNywINZk+jX6IhWX5+jCfdeT+uk/IP3FMYyHx
+JcP1Pr0cKjHc1JyYkuOZ/PIO/YllOegRd6slyl5i/9KNk91IfGquQ9QzzHcg
+cdNlMq6n8eXFFnz+i+ONL4gtA1zXNGLcdVD2BfKj9gfNDtYgn3O/2cQTi3py
+HYXYT07NZ3IOpxZc6LSu5lBa/QP5q1AvFd5vYihC/0fXOnoTR3ylEf4b+nvE
+k8cnno2LnMV6jI6J6+kw39d2W3YH9s8nlJ1MnMd22PQC/bdpGf2GxHukdilI
+kc9232IL0l9127QW1Cf+HHDwNdanzRbt8HiPeldf2RVJrCHzCUQ/yiWn60bJ
+uVWV49rdh++P5DMDR2A6tKei7CP251BKRRvOpbTDyQM/wYLDVdEbiA+8Pv0O
+8VrFD6S3NMh+nte1x3zCLQNx82FKvWvb4x70q21zSQw51w8nns98i/gq7dXy
+MHXuQ/T1P3F/lFu9ycK5ifpjb+ZoG+Irnk7vIjY9s2tXPfZvl+mxlcT/fzHI
+P3X6v0/i0Lg=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {1.6402550371571483, 9.170599194669919}, \
+{1, -1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{19.999999999996135`, 16.999999999996362`}, {
+          12.999999999995453`, 16.499999999996362`}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.407378835015717, 17.441896309779956}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwd1XtUjGkcB/B3KwltRmwzk4aJMtlNJuWWUZM6mZkucimDKElX1Ipt7Iop
+o600bWZJlHTRqlOTjhhhVOy0km5skqnTJksXZHTaNdTZ9vv4Y97nfM5zeX+/
+7/ucM9ahsZv2GlAUFYEfGSkGeSzlU2wyzuNTE/al2ZZwXxwzJhXWHdg64QZT
+qvj0qfP5VOmc9wdi4YIc/0kJrG52uX8F9t9qN94F21/fuG+A7I9462TO5lOv
+44dFFlw+VbWFJbOHz/xzNduFmNX/wAU2v1N5LBjOWcbu4sHciYoXJ+CuZTIz
+J9hUNVL8G5wqaHOfBxt5D97+A6Zm6I9M4n0dO9asegnrlNw91+CU4bTN48Ty
+h97bYPGSmoNmjnyq/dmbWj368ZzhxbWCpZL47LMwNyIx2AbmfqV+4Az3rhWa
+cch6oc/SbhafkoiKZGS+gJW2Uw6LxOfcWTBtdUb4BtjqHO3fWWT+7NybNvDw
+kpOJhnB9a4puJlzx8n3HKOqJUww0m8P13FDaC1iaPWTqAPudL97QBreba2N3
+w8ZuAddq4aw9m1TlZF5t4VMF027tvjod9S0SL2aWEH9TvuEn+MnRaWMXSb8j
+Jx5/ggUe+zJyYf5AfU8S+vf3oELy4cjDXtunIr/e9a43vuRZUX3dF47USHOu
+w+yhvJTTsPNf0u4HMMO0Kr4dDs9ypfeR+RjXzSbWOLferWoCLs0xXr8SDjz9
+qYfkmTXwtnUH7MNkV7rB/MAnXYfg/moZI4zkk9L/KAnOvGxJpZH1wheZybDu
+vNJDCYvnL09LgA8GtDa2wfqy4vzdMC8t4ef3cCrrne06OMxAd2bGMj41qCvT
+WsL23glLFsJiW+rRO9Qrux+oXg7HhX1wvwtncwz618FVTM7VU3DRnKkSEZxl
+yZPvgPOMixQ+5DzfX9cvhXlBg8eFcE1MG3sabOKYpXGHpftHl3ciz4JZEosV
+5LykSxol3LTCLoADh7h7JuTCAkGe1AKuD3j+rgBeoFZVGpH9MnlLLUwzaJkc
+RT/+dh9vjcGdzg2KfnL/LnxfwSZ5F6470gH3tfhwN8LJr3ZWPCT3LZgSp8Ps
+6mCD32HBjfaVTbBEOWx7j+R5k37RDHmk3/2QqSH7yw/bBsBWgobEFnIfmZ+3
+5sLSyzH6bnL/hWvqeuFWfUgTyZdtKjRkLeBTu1bdSzEh+QxHGmyBKxIaMmxh
+O0X2QBLMd9hr5gVTWu3aEli7/SkjCubOVk6qYYO6U/lyYmt1YSPcERKUfA02
+2aVkECv61hR3woxfzjy/A5tHfDuohyWj859ehmVbHnoznJBPdPl+GUyFWw84
+watKiiOD4PwrnHERrCv7s9sBvt2Rpw+CKd9Q+n/oJ9lx7GQU2W8cKW+GjdSG
+J+Jg2sd5NXlwx5vA6Qdhdu7dyTjYf5FF3AFYMJtW6A27pGW6hsM1U3rOOsA9
+Zce42+Eshol0Lnw7LGyxN2zyNDRnNjystbJ3gUtltYV02C96tb8dnPr3UB8H
+bpz1o8oCFvtomZ6wSPX6qDGp38ZWEQMbNxlVk/6pC5WMi7BeVeI3Qu6XnGf+
+jJzvqLEehLs8o9Lp6Jd7vPvxa7J+oYeA5KHhzHk8DDdO1r0qgtm+mdvG4NIG
+06FBWHJoPNoQ7xsMqOz9biHy4xU20eGuz8HxUbCXXjPFkdS7LT/jEswrC//B
+j8zXde9qhrnRTFHsl/rjpSNw2GhVuoLUX6fQG9ngex6LtLsJ94UmCmfCKzrp
+U3pgifzO4a/h6eR/xRn5k9GG/z/9qkJF
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.23789659515192, 7.38794612872654}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJwt1gk01vkaB/C/NdlfJZXtlW7WoqERkr+8OuXmpHJTpN4yIRUp68TMv6JF
+hm4RIpRJskXZalJvQpEQb0KblGgaRZahqPt95lzn4HzO81ue5WfR2xG4fqck
+wzAX8UnfGQn6Ysgy/3yoskzzX9419jD/Q0HJWjjNQbUkBj51ydcrFr5eO6Om
+meLGcwWFsLGtQZOmEcsUezrllcObf4uN9YVbBAN/XoJ9mUcVxbDq3OxfDsJr
+fYLMR+FTPOHYUlitRyhpYcwyXH6r+K4Kyww0m0T7wQw7+MeAMsuURZj7JsLd
+ZyoWf1NimZUOr2vLYNG/9w9NKrLM1l3xCxtp/98Pw0YUWGZd3arspxQ/4nzq
+kzzLTKzKze6A+XN2vxqfzjK/W0Rot9B5j/wD5sKOEbG+d2j/9GI7LzmW2dCn
++EMu7e/heh5MY5mPivrBcbTf0srSG366cvfGAIoPRiiaw1qWAZqudF6mhfZi
++Kcbn2UtYbZI9eVOOKpA4KRF+4+uPf0QTqk/2CZPcbVsH7qvKK92lwScVfD6
+0kzk05WU6UfuLnKQfA8nyjyqV6B+HJEebEE9FfpX1fXovLxrStWot6M2yMuB
+PBKaVIJ+bGx0sdlD5znda01Ev2a6v3+cRfexNsnb0c/73jmvXtD6x91XlNFv
+iaM/V+uZoJ7+DpNEuPdeZbw/zIg2ffwAx/gr6JfD/LQ5z+Qwr9zSSntJU8wz
+bVqZBL2XYYvMNTB/0s2I5rc/66PyGVh0td3ZBf78afOxNpiVcnQswP0Ku9VW
+KC5Ev20igt8iP4Gu4yNbmJ/d2jeF/Ocf26O5HRbu9RyTgPmdPfEH4Szdmz1f
+UH+z51HmJFlTb9cw+rMlY8/dBNq/Ws15DP00bfBLjqX97KhYCRY6p5ZGwqzE
+4TBH9H+bl3ueL8WdHm3MlGWZsXCNTS6wSN9jzAD+JX203YzWx30dfC3DMtYv
+G3fwyFd+q2uG88zEDiNUT2W+aAiu2tqQ3wV368d9csJ+SU1RSR3Z4F/2D+AX
+sscNblI//K5n78f9GweqE8ppf9ktTzvk59G0XaEKzqq4LdBFPYWP17k0wUzg
+wHJl1Kv9vOP0nxS/K0r7DrvsG8uifDjrc6f7Mf/slt66FTBjfaL8Nvq10Cun
+l+rtDjLwC0d/PR2XRt6m/FtLliuh/9d05SplFiF+8bV3KMxtbz/uCouMzr0s
+gsUqDhXpFM+zqb8O92dPTPbBQjXHoGg4Y02GtrkZ9gUObZ0Hz+pZ8H0/zFeJ
+EfwX92nu7RIVwVnWL5+0Ix9rq9bm1zA7YRH7BfkmqKtHypjjvqrjzjIKLFft
+xbsxE2bkNqtKyLNcRNT6EB1yaH74uBzLlSj53JsHsw6GrmPTWG5IymBID+Yb
+GmvLwIG7/aO1YOHZloJF6HeR3OolM2h948Tlg5iP1V7BO1myXZnlsDTL+JXY
+LBlCPsLZP+aeg52en2hvJZemrgmBec+qR0upniVTy6Lh8+taW1Mp/1X+m+vg
+m7VlCUeovvs6G5bi/NRpFnOCaf26Ky1iWHmJmLeX1ve55iYiH5d0JVEg3O3l
+vCgQ87/j7spEwYy+zxkPzN++/oJtEsWVF7quwfzd3+p4V1J/h7uSrTFvleT0
+wV6KH1vbpIF+DfqbhSqjnu4rA1+fo58XdMVfF8JZrmE2HPqdkvO00JXcyc76
+oshyH0eN40NofWbSK4ESy1Wc/HA0jeKbxP1bYFa8PPQuzG1NL2Lh+SeLbd5R
+P5vd+gdxnnpX3B25xVjfsYnbB/fzr8oZwkybTnAN8klaJbBzhLvdy88PY34z
+JBRKNsMsf8hPFvlbtxV88IeFGX5hstNZLq7hVWEozN/pYvUN87O7N3skks5P
+jAoal2W5EaWSsShYdOp223cZluudjDL4me4z40fqwKfFI6b7aX3y4VgvaZaL
+91B95kPru0Zu1Uihv1edjOl+LttE0wNe5fDB1Jnyi88r1ZNiuZ5DMVK2FD8b
+EKyNuJJ6RIsp2WlKwQVx3oXcfD7lZ181Vkjr3WLOapAzDyTZ4j67NTOD1Mge
+N4Wf8B5+TBQO8qhe3mrzu8hv2szqs7PI0bKJlzH/98UuRXReVsos2xTUaxGZ
+72RO9ahyPx3H/A+fCzFzovtnpbvtRX9GPy2Q3kb1rHBpWIZ+xuZEL6B+cPVT
+AQPo56sT6xsyqJ9B55eFYf7KOtOnqum8HsGTNswjcMui4n66L1X04Bvi0ard
+Nco/oP5fFWpH4fBS3mxLmG91+Wol1t8e/TveHWZNq3JWw4q8ufrhcNbcyfcF
+uG+pUsxAIiwaXVTQT7+ftuWYF9L6uOPN0vChlTuEInLvsQR5/LxaHVYybKL1
+bvO0pPHeG5ZND2in+HfOeBL9URJ3unVSfDGPm0I/I5sKrJ/Cwvy3kWqwjfPW
+4haKW/nkCdB/QYxRVB3lH2S1IV2S5UxOrI67QedtyDXkS7LM+vDevjxaf/r3
+CbEE/p7ElBekUf6Wlr9USbCcOPjNVByt12207kK8jn92/Fc6L/VaiBH2F3i3
+Xg6h/Z9LN1zG+f6KMyYCaL/1jnF6Dx3yRtf20Pot3xrUMe+j7g/9Aql/7w48
+GEW+169bRIaRLf7ofYOf/wsqyrwY2q8VE/UE7/mFRp9KCsyJD9bcwfwHLEwW
+FNN56fPtUzD/ZEF+fSPV/8bD8j/oZ1wPt3wAZmwOa3yE57znZapa4PyBd72e
+eA9Sz5/1LoGFHa4HUuHhxenjnuSMIxezMS/bFM/SQ3DWrRXHIhB3jOmYuAR3
+l+zcpyVPc6m/cZ/O04jvTMB7u9AdyLyDmb80nToxv+/0YfH//wfl2P8BT1Cq
+YQ==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.72092184717428, 1.8721747773942476}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwd1QtMk1cUB/BPUKljCgNaUEELIpSn1QJWBuwTdGOIkZSHosTwkIfgLCoj
+nytMcBXLYAqCo0V8ApH4BGGKghMVkTAmn8qrDLVugB2gaxC1Asr+1ybNzS8n
+ueecf25T21ipJN6Aoqg4fMlJTU3j405TWnLa0JRi9J/o93Bvckjzdjhpjr/N
+EKmvzvvQbU1TzRtbY1tghaFffzBczJx4WQozJU7u7EKa6sz9OL0NLjiy0TEe
+1urZUAdyn954hQkcYqCb/dyNptjk6/fZBTSVf2d8fwmsLb8adh7m3D4TEwy3
+ct87noTH97ptMIBT2w9JSV0zeH6kwZWmxF3Tqx/AlI/lRRnMV7nUzcT9rQ9c
+7gaQ+tWzE0Ewx/+7j1yYI7E7Wgb3b0xpeO1CU6aRPdnjMP+N6PETWDmnPX09
+9unsKC/shGmJ/6IzsOmqmVd6YNasJvQlrMixjh2CA8sUW52Rj+vnxeum4Sza
+XhAOVxxcVc5Hv1OG2cnJcNrxbN9AWLGioisRZjIkZ/fAvTOMnINhn5IZ/qeI
+K9RfW8Lsw4CYP2BmtsylDf0GnG5sHyPz0xajCbBP081XZsiDKlerdJjf9TTv
+gTMsFFD8FNhiU3SgGC5Y+I73F/IJ9prF9SZ5Wg8eXgtnlIykLoOtFjf1XZ6P
+OXlujlaw6eTRbxfD/K49RePoJ8hoeK20Qr8rfx+/R+Zfr5LZwgLfa9X5sHB3
+tbrREvcZWVetI5Z5LNsJK+UDjTPJ/LMCzqyEq7uXptwg+RlL1i6AOSs7wqVw
+ld+rz3iwcDBH4AA3KcNbnGAfP/u9z50xL/+FOBQO0yw5Vw5r+v50OQwL0hM7
+dsLKd03FauJ45tc1pK7waHbDfLqEKJEDrPUcLs2B5e3dEgs4yyuz+SncKK41
+M4FPrQweF2Jf4eVdFA/Wf+DYMTBjHLdIQKxddZfkM5o1+SoAZk5bTz+GqQH1
+gURYeEjV9xyu23b7eAHcmyDZ3APrB36+0ghTK75R1cIZDYM2/8IKT5PH6bC9
+/KSnOfZVmC+PsYOjzeYni2G9X/35esxXIM2Pi4CTfro21xfOF3VZp8CM59il
+WuxbplFMpMG9hTFhtrD2fcST3Z/ea51THo+mPDKfum+D69965bzlIr878dpA
+WKO7fzkJ7m1xLLIl/Q8UnhiywPuJFPn/h/k2HfNuToP7V9vl1JJ8w63UPDjJ
+wHNLKvGjypoOc8yrO2lG8tGwgkWnYcWuueInTvg9FL3pyoM5u+VpR2Bmw1fS
+w3DnyLQ0CM66+SjuHLzD3bzWCI7eJ7frg0efvcltF+D9XchzXYh+dRn+w6Ww
+MIrx3Q5nuRVFpcGpD6dkt2Bq39RwJKyfvaXGCvtUDblxg4mbp+RSmP/jrbYg
+uECXf/13uODZy5RwOPBFT9IM5NNa08Amw01jLV+KYHm6Y0Qu8S/vjoXAbPdT
+3SVYEF3fHwHbT6rWqGElVxm5Bk4Ktbg1C/MLQ5xyrWBt987flsOsbKlhJ/qx
+9hf2byZ5xFbtZeAo0XBlJqw5+LCSA3twqWdKWCuqEiiwT6NKHHgO1hlXxkyS
+/L433FENt2be8EmE9Rcrwkm96QfeBGuGeYOWlJXA4snFY75wluFEAgNz5m3d
+VPsF8vAK27Ge1EcNKC9Y6DGitYTr5921bzPFXh81hWSfkBCp9x64f6t3djHM
+jsruiWB5W4/NOrjXQew3F/70/+CIOjlN6P8BDe0+ig==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.763809742330267, 6.7361902576697315}, \
+{1, -1}], LineBox[CompressedData["
+1:eJwl0w9MjGEcB/BHXX82yUVDu7t0FNGViqiQt+2cs2ZyazlpIR3RcbJLl24k
+1cr5EyPpMKzlRKflxS01x26c2erK2TXVnFxlw/zLn66bfJ95tnfPPnvfve/v
++33fV5irkim8CCGpOOj+fy1m/u/zGdK65mjeBpij9n3jDfOX7l3RAFsUiojx
+eQz5Y2qUvYe5P2S9b2G2+6A5Ioohcn7mGRMsve41lANrw3eZK+CBIt3Zk/BY
+YrdSAovt4pQWOFhpDSdwovQFMcOetJlOVsgQ5+z+Jguc7S937IZNDd/uP4LT
+dQlZfFjJ25/XBMe2LGx8HcaQ89N7aqrggMvqtjq4o72zij5/7JdYkAsv8/FZ
+EEfnYZ0/k+B8rzTNFFjT//z2XDi2LexOL/LkP+O4Z8Jfiy+5bsIaY/PgLHgs
+pZhbAWvdExcWwo07iGUPbM1YbhTDrnrV7K2wMqqSq4TNkjbdFrhvU7hQD0uV
+jl8K2E5kzi5Y3hxdUgabbJlBHORZ5rxSaoA9xJC3gub/u/nhANxqn7yhgC0n
+9kt4mPfAjJUOHVwdXtOxAy4rf6O+CUtF+yS0T9ur+JIHcGL50y43zC9sqHwI
+m2ctX7BOxJCTvsy3W/R+n7+IzsDBwic9p2CWZSa64U/vuO6dcIBPkZ9fNEPU
+gZ1founzCt5J4uGMbIHjM+2zWCNNh1mJanMTbE2tXbcdtv1cr8mC1dahhFzY
+rBAdnkbz2yUdmfS8dKO8ci7yJc2JXwNfc9Ufc4ciR+tjnQB2joasL4PPL0lJ
+HcM8msltd3lwRqdfzDM4f6RGbxOgt4u2gjq4uvqI4TpsTo5bnA9L2/28a2FD
+S0xlCmz1VGfpYbnxaTYflg/MGX4Crwo5uIQDc08/P0Rw/3pO3/hv9JW4ytUs
+gyOPvOSP035PRAruwX3jqjR/XG8Kfn+Xh/nVN0LKI+Cw0tp+mudOkNY3nVrv
+8P4Ii9cKC6tgVvdy1zya39/4mM6vIb0mCVxxzlcViLyGAC/Odlh0dVKfBXPs
+ozvp9xM5+D3SAFviVl/eC2uHN4z8gMUlZBHt12yY2pEcg/drilq7kvad4+kp
+geWD7Ggg/InXzRrhWOPEvhbMwyl0FzngD12tI4tgbajL8h0uO15wrx75PJNY
+sD/9/0OZf0nWbpA=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.613477323709358, 9.105546654636697}, \
+{-1, -1}], 
+        LineBox[{{6.999999999983629, 12.999999999992724`}, {
+         12.999999999987267`, 16.499999999996362`}}], 
+        PolygonBox[{{9.48173265946094, 14.447677384685548`}, {
+         10.719815750748694`, 14.706811054955079`}, {10.316718930329426`, 
+         15.397834175673825`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {9.823799910437668, 15.484057296392571}, \
+{1, -1}], 
+        LineBox[{{7., 13.000000000003638`}, {13.000000000003638`, 
+         9.500000000003638}}], 
+        PolygonBox[{{10.51826734053906, 10.947677384685548`}, {
+         9.280184249251306, 11.206811054955079`}, {9.683281069670574, 
+         11.897834175673825`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {9.823799910437668, 10.515942703607429}, \
+{1, 1}], LineBox[{{13., 16.50000000000231}, {13., 9.499999999998607}}], 
+        PolygonBox[{{13., 13.6}, {12.6, 12.4}, {13.4, 12.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.9452, 13.}, {-1, 0}], 
+        {PointSize[0.04], PointBox[{12., 4.}], PointBox[{7., 13.}], 
+         PointBox[{13., 16.5}], PointBox[{15.5, 7.5}], PointBox[{13., 9.5}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T15", " ", "P1", " ", "N29"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdief/fiijghgjhj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdief/fiijghgjhj.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {22, 44}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwd13lcjNsfB/BnCG2Y0jLtaXErhSIl1UxapLQKU0IbkihKi60iDNowUYhB
+ERUJGVRGJVM3GW5SQnPj1iAJyZTo9zk//zyvt7N9v99nOs8508Ni/NeNoyjK
+jUZR5EkNjOHfXyxqDgGdRdmqCfjlcM7JDnV5OFqnURgGc/4NcpkNy1QukNeA
+QzKz/WJgc2tTo7YZLIp+Ykm9EG5vC4o6A8vmmvXZKrGoUbVewWaYvTNMpgrO
+yZu335P038cN9VJmUTy/wN3zYX5PxdVe+D33WsssuH2Ttub+aVhPKD86F9YP
+667TU2FR2l6Vn1xgqVnXmxsw9fb54FrivNkT56sizpaj3/fCsUm30y/D7JpF
+4SVwseeB9HFqaNf7vev/8b44ssgFVhwXE0hDPqkX9WZvgnfFWauYkvwWydES
+4dIF9C8eMCNYyo+EufkucRFw0m3f3EXEWvnZcaR/1OuhSbD5/d03EmBqeblN
+NdaPL53VHg2XB81P2ABHa37gLSfjd/+7QhHWjy/wtCT190x7QPJp1+y5QxGr
+J2WvhgdsNgQ9IvnnObBV4fQaxsw0uNyJq/EW9aEa/DJJ/cRjV2WqYMVYvpXE
+GPN8oy+pgFubEkfy4PK1Hz7XwvxzHi2esOSD7d1+2Py2TMp4mL0ieYY15i9d
+43Gh1gjj3/VEc+EMihF3BC5OtcuVQ7x9svmVa2EpTViQA9tH519iwSJl9xIj
+5M/YnNc9C6ab/HIWwGcuWEWawamNAcdWq7OoeZeYx61g4Y9xpUMwV3ze2A2O
+zB3o2M9AfmobV4TD5Sva3kzQgKdl9x6EGesUrLbBxRtcnW6Q/vczWY9Je9LB
+o69hd0lh1jhNFjXoHds/Efnk/KvYaQAz6BXJFnBqqJ2FCcxLTtnnBYsjxlqn
+wZxCx5IIWOjGDZJgvsLwxNFYWP/U47VX4PZdBRO3wgKvv+NWweac3P5wUt/N
+/M7xcMZuveQlcJJetH8xg8xTPNmAtL9prPWGGT/X3uhHfLz4m2OjyFeFKRop
+h2NXGe7mw+nth/5EwSZXhJMPkPrc+sdaD6Y8vIo3wqKy7BCRIeqhoGyzHi78
+WhueBke+Lo3fDQt9AmdYw6L5r9quw6/jRZv7DVgU63Q3h6zX6ptcdR2W5vC3
+hyKevqaPVjthet+y0E54KUMzwR+mnFTp65HPrh0Bp+fDIUF+O0Zh25QpWiZw
+8ZYcuXzUi+KY/j0DFladeG2thfGrfogt4fLa4SlPYBeTFyOLYcaqV1SgNvJ0
+U7bcQNbnBZ1uhQW7p1pkkvW5WVkLdZD/6EPXO3DS9KH9h2GVSaq8btKfM87v
+Acx+XeaniPwERfd+t8O3MiLTLeG8WLv3L2HZnjd5PrDQYO+Fathll7dbBByi
+KJTNhJOKt1RuJvUJtf+5BJYeeXg6Cs4x7Zo1jHgKA+Kcgkj/kiJ1Hqwi/+24
+PWl/eW2PC5wa8Hq6MiztveTTh/wYjXaqrxEfJ+j20gI4eHC58Rl4TkqYMBge
+MH+RFgAL5jdFzIZvfTLkTyL1dLXsZMBz9EK5/Ol4f4LSFi34fZD/2EY4KVym
+dAFs5DT8ShemJ6/M2wazAnd0dejj96PJjnkEUyJqRwHM2WH1bDbi42dbXd8E
+i4QJzGtwe+OZcW7wgEPRYnvkyzrgEmEBl/OW322F9QcXGhvAOQ7r/9uqi/jP
+Pv5uCLOi57ybrIc6Ri3qsoQjCxPbL8ABrTnhHrDgzDKeKp4mhSd3kvXsRb/V
+/fAc/dV69xhZf8rNx2l4xrd/WVeNJ8U0/esSniqdLwokpP291Jn8/4B8a5IS
+8nNZbfCkAS71HDOzhgcUetXq4IxrDn/5wfbCx2o34fQz/o7hMHtJx8o8eI5P
+/F1Sr4HY0d54WLjhrxjSLn3w1tGTrMMIf+YD67/9pqcL1w/6Dc4irjrzVYx8
+mm1WZ9JIfSsVdh6GZRSzPgpJfWy3HXIkjirrPgBLhHIe4+DCmHc1DrB+0h+z
+V6iXvl+zA5mH4bWrqBGWnaJS4QRzxsKm/QOLdLZeL8KTw7947CeefJV3n5Tw
+ZChf+jkf/fiDk+8e0SG/x6Cn2XDSroQ6dVhgLo4dI/Mo5XXcxXt0eT44xYm8
+p6FD1fHwYIlJ3iESV2fkeA/49fxVV9pI/o66fxbA7vcrQ4yRF6Mp5r4zTPda
+KdwG848cmLoOZpsuH7kP580JvX6K/G4yFFz+kLqd6GeL4eiyfjcb/E5zynon
+WiKewbBQ1XVw5LkBi4Mk3hczPQ7AvCMM6g2J9892jVOwb0vaTXPkV1WUGMSD
+ZZ+2CWNh3/mRh/JhiZKVdyGc8e3EQzKe/dhTqw6OZH+/vhF2N1KSaYLLt1zZ
+40L673Qcq4RZbY33NMg+0TaDeQg2kThY95HfQc3OhU6w0ZY0cQ3cbnO2RIx4
+JD21pVziS9Vbo+DIHt2IWJKvTW1iN/IT0q5yAuCQ36UpXrC4p8faGWbdLP9Q
+jr8rboX2JEeY41a3TRku9G8Y70banev7E7Hv2abKHV8FF688TOvFvqhv35Kw
+h8z/weZVBBxfWdFSBouctAZ/YF91v3HHQAILs7TEBXCVs+H2mchn4IunxlqY
+NfggaDupp+R2jx0cUODLqCP7ZuLfnpYwNet5nRL2naSljrJOsEBjaMMasg91
+OlzeAEtCjE0uwWLjsILzsFS4PLwHlri3xX2E6WvlWrXJdzr11h97xGev+L1k
+MfmuaP4+fRyO1Bi4sg7meJomke9e+xFP0wRYMEH9hTXyDe45appMvsP7+30S
+4FSnE94xsMT7ukERPJBd3B5IvrsrF6+pId+Fh6ty7eAk9W2aD2DZDm7jNPLd
+y9HIJ/0j+J9VJWQfNj+yaiss8r+/4h7MObfHxJCsZ2OflgnLehWNq0Y8t2gn
+U8g+zr82j74Ipj6tmbwIZjzkxlciv8Jk7xMm8BxlGV09mHv0CUMTZl/JPZSG
+717p1KuTGbBvQVjqO5xDmt+brTCETZy1n3nAkW5sS7LPF/uw5cg5Le/2L9sw
+mPrz3ZJJzml7d63nwnTpo6MvcA7iHVut94yM1zqcvA+W/FXvrob8Qj6naXnC
+u05rhIaSen28HWsBt17MPnsd9r2kY2FGzq0u05T+kHPQsGMdE+b+Q28g5wb3
+V+qJm2BR1vK+bNh2eFPKFdi9P3DoCSz7o2vuD1iQsuwuDec8d1q56xLEJ7OW
+e9AUDunxpnjknFn004WcizkOr7K+w0l5YfF+cKS3mrMjOZfur3Qglt46+moH
+rK/zaRPpH1l9uaYQFsRFhpvDeYor7fnwnA+qSgqw7W3XGxUwe+jT825yTtrz
+tOQYHHHdeFUlOSeV5Y2uhI2cY7M5MHX4KX88HHz88rpgWKpIs8hDPMHfmh/M
+g/lR+g8Z5Nx7sd9dhYx3UX16CPkZbS8J+E3OedOFmwdwLs2Z+7b2K8wanTPX
+n5xrTZok38g5KTBw4JYy+Y69TaWRc6xPZpQuHCzoOK9D1r+gocrFPSN15Hq1
+G8zJ6W/RJP7gW7yT1FPB93Il7imi2k9F9+A81fWlUbAsSzGV1HeAJttgC5cG
+ZfC8yD1CgXN2OpzaoGxJ7jW+BqdOGcFU5FmHj+SespUvZsLao8nt88g537Ek
+JhbmmXU7JMOyptOdK+AQrdIft2CTvfnpFOKpN1j29T9yr9q0tGE5fGY8VSRv
+gvbRRa6lcHtqoKYBzI7fMfsPzMlfMDoTLi+t+uiKfAPm3T1lQtqvPmXvgZuN
+QnsZMOtbjepFeGn3tY1/ML/t3CVl5bDR/iTzThLffUl9Iey+SLnoBjxQm2hL
+xqtkhOemk3j9VUwcYE7Ryo8ryL2o+dRQN9Zf+tYpbyYsYDfaboNDHvYkTCD3
+xOftuf3Ij/WnS7eX3KtqZU8Hw8X7qKbn5F4yd7vsvqlYt3uBbRO5t5zfKXWd
+gqen16kWUt9jl69Pnoz3/tVzn5j0X7C+4D8Fsv7Jf8dIvf1ebGqXx/oad8fI
++qyjkt1f5HBOPk7LDCf3rufau63gW9+yygpJPsOmo5dkEef9fvpn2FfdeK4v
+3Gy/dIod6qMv9WqfBWcEP6/nkHp1rVN3gqPTKh3bYN/90st7YfpDp1w9U/wd
+mB6kfYZFJ6arhMHl5holiVjvtZ9/0GmYJ91wgYH4ZJqVExtNyTmp6kU9XB6Q
+RvtEHFtxNRb59D2qNR2DB85vP0JXxH684l3tBDOsF9UQlw9HmA27kPYcy8mJ
+NNTjvXDL4z5Y9ER/AQuO7br3/SkcGzEuwAfmiGZ8vQpT+veKzGDeu3yPVBLf
+ggt7RZiv8Pblp/5k/c6qRieYZx20zZj099d5lUbiYa80/IV8YyvfbzyBeH3/
+UbtG8g+ZWs86iPzaD3SeuEc8w7djNfJ3UZ46Wkzq01H02WgS4mqN33UR5j3q
+GOydgP1FvMWwhLS3bDhZIYP9L9o1WACLXV2n54zH39OIwuduWCC/Qnp4HN53
+bNiwEuJhGYl0SmnYr8oHFJeSeldzBSMU6vtO2yKbxD/pzn874TPpRl/bSX3W
+rJppBbfGbzs3A/Urr35ZrANH5Dd7bzcj+1b+54Wwr6BerpbUd65YlwNrW1Z/
+k5uJfIc7rH7Bo5FN6z3gkIw1bhlYX5reqJMGl68xlrNEfM2TjN1KYV8Oe+Fb
+OD1g6FQT8ZeD8znIx+hNQlwnLEpJ3mmIfOvXTfj7LZlvG8OxCGb/WO30Aqab
+vpGMn0Dug7RpAjI+JeaoDcy2Mpc/T+KJGWbbwbxsuY07yHy6J2/KwmLKvsWb
++N+U4+cxn++sYZXpM0n+ndsnwgyum9Ug8hPFXfJdiHgY5SP0v2FW5L4wN8Qb
+vHDBlmJYfLCmZzby027V5GeReiQY3KAhf76j2kAKTHXej878zaQGG44f2036
+ay6brPqLSbF2taZzYN5d2b03pExK8l1O/jycqr5VIXmISbXyDAUNZLy04U3K
+IJMqfJZUKCXr03rNXn5jUoJ9avrWiFfwpM834yuTap6qpUXyY73caFM8wKTq
+b85VewSnlgx1z4L1F09YMs0c6011d9GDRzmT60NhQZOWaxzc5xHCLSPOWqOs
+j/lGHTN7v8PURxpPDevJRg9bWFlgPl27EJfvTErsJ2+3HqbEG425iK/v3OWg
+LNL+csTwyw8mpWj7LOYKHDL77STHn0wqwNNHWgmzju2lRyFfWec29Tuk/e0D
+4zXDTCrk07Lcq2R8XXb7pBEmlc7d8ewYrB8Y6swmNvx9eyssDgh54AKzuhaf
+XUL6m6qsf4zxlFRkpwMLls0O7ML8VcdWx34h8W8zfpKD9fVjGufVwalHJra9
+R3zsst9Rp83Jd0NxWIJ8QryfPNhB+geocq4hf/2l4YfCic/XFRzvZ1Jz5J5e
+XUnqc1LT9sIHJpX6RG43m7SPKIXfec+kImMza9aT9os//GliJhW83OXwXtLu
+3xO38iXeh6fTihJiGwdRwlPUd4LPSBfx0tKSrlq8P+tJNbqknkOGrLwKJiU6
+9GjzOmJ6rOKzkxhvnrj9BjH5l1dN0clzFut/TP1DYw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.684589195445786, 6.720523577306384}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwt1gs4lGkbB/AX5dBxQihTRoRknbXTonm/SqTkkBWdDDmUlUb4UmyNqCQk
+20E5NBY5rCyb1dhNjdN+o5XGodi2wxRFtBrWOh++/3N931wXc/3e557nue/7
+ed+ZR9f/mEegPEVRz/BH3v/3YtLUPPJuTFPczSYuk9o0lf8wvbJiHU1Jip5M
+/wFHVzwMCIDHD+oyb8MZdNPzlTDXuuQfZ1hszszvNKKpcrMGOelKmmqWsVdm
+w30duk1+MMtqg85RMq549ZeOFTTFe8TQ3g6zwpaP2sOiptcfLEh8SvrSPC2a
+0vqprM4QVt7m3KwC2zkleRjDaT3vXp3QpKlYy7rv2TB3OiRnWIOmSsdcrNzh
+xJ5wyWl40UmhynGYl28ZxILLQ+rEGXDXnhMeL5bj+hpBcx3JZygosAxmGsc5
+/0XymZVuyIa73vSFL0d9UvcjOndgUf/2VDbcNTzG+Q+s77Xb0BMWTbhmzMAB
+b4+uDoKdFNuNHbCefo2KOBTmz601uQln9KfOkXG6N8xuBN4aKW9DPq/8nF/o
+hnr0H9ZEWMOsPeNFRTBL1OunDBcxtCtG4UWeVexW5Gdks7XQBv3Y/7j95zT4
+sGmDgR/s1nRdkfTTaHLfvSj46qZ5ZdOGuF4nfceDRcdbg8pgraLlp9zhl8bN
+8n6w9JZ/jCacpmC6XRMWawkNGrCedOvRZ+0G2H+13H4f2KhGczwDzoi1cXyJ
+/MVD6zMPw6xPTvmu8GFn2/VbYaezTcxq9GPn3aDzJvC4fcO/VsN9lNywLsxr
+7O1MUMf9cXq3pj4cvUaQPqyG/QsuUbKE6YPyklCYcf6kozNs1FPpPa5KU+aa
+atIQMl9Rq8FNuFxv1YkrJJ/L32zwgKcflob8Cstc//JbC/dY3Ze9h7llkzvU
+YPVIP/YS1CfJ+3OPNpw1efuSBcyv/73cFu6qvXbMBe669tw3HG6YM6vzhYVs
+u2NCuPRkdnsQLFgnXLEI+QWUh58i/WP5/lshGC6qjdd1JTZbeqoeTrjY3WIG
+e59KFWqjXubUFb158GH5vSYhcFr33O4nyE+oJ7pfDJceL12RAps3qn1+Bkvf
+peY4wH0mMS4DMK+KPjSxFuvsnTzYCydUMXV/IF5R90oMsxzvFx+AzfUDay/D
+fSesG9WId9tz7OFPg4uXSfTR33nTv7YjP+sHz6RXYbfdqj96wT0J36wJgJW1
+HU8+Rr2hXrJtHJhSDDG3hsUNyRaG5PNy1/xvLsP95N5pwoQzLNva5xjYrxc+
+vav0yXXOxqPw/gu+J9bDjNGmj0+W0lRkwavALTCv8E1J9xKa8qweeXQITgu/
+Vq0Hex9hmybBrPQU1tXFeB6aChmVJP61ZjEbZv6klPOarH9/7q4qbJ1sNF+J
+1HfOb6EuzDBOSjWGeU5OJlxY3aD5wTaYVcqzeQzbFQSH+MD8O1Y79mC9hg+u
+3VxY1uH1eQa2G3ec2Aczyg4dv4d8xxdPLXOGheU5GzegHqavmel6ODoq7l4q
+bJJV83GO5Hc74sorUu8Wl8gmWFotLl+F/kS6msRfhLmP3uc4wwGyfrvNZLzE
+v4ULs46V6YzqIR+5mNoDsCDuaHchLK5rNaTheVtP+uyFM77XH1SC8yOfOzOI
+8yw5VVhPuX/cq3kN7ler36NcYKeWsI402HzAW+575M/XH670hVne8hFJqK/5
+umnYVzDPv9XvIPox4urepwuXV3/qNlqE++WYVYQGidcZO/PPAvQlS1CnScwO
+znuqgnoNPwzpwwz+0pV1yuiPMj/VjqzXZZXyXAnXBw8V74clF8wYy2FrH+3B
+szA9uFAUr4i4WxkPS+G0rnOnDODE7pMencTZvT/Ozsc641u75ohnX7kvxDg/
+ackNPdTL26kudYJ3Xp5aQsPmDnLpFXBpjpbmbliiM5xpj/X4QXpjpF+sYGZy
+N5yYoxrrBQuyuL9mIN/owmBFBxIfFtvsjnqkyrevGJD5Sh5aKaDe6PnBlVNk
+/bk+US7Myrx5sxHmLm3V11tIU+yLLsPnSP0eCaGnYW///LebYAHHLLQUzgrf
+1j2si36mNakXwT2PH9zNhyUqF8rDYMm+hap7YLeyjQoULGta/GIRzKrXdTmI
+9Q73GRWKWYhrVTFPRX588eu2ZGJd2YnryL9j+oHHPtjtXHvTGdSXXzEisIFl
+cWF2nuiHW1xlCZO46N6b1ein9QrNRgbx3R/YAwr4vp8xLl4Gl9tJ7zfI47lu
+23xiNSxa9si8Sg6/L/uCasl8otue3k0UTSXbB2d9zSLngUB3RVhr8ZOqGJjV
+cOP6h1kOlZx0PrIAptds5xnBkSrLl0iI/wiyfTbDoZgpNRXjJN7puOIATNtY
+FTBRr0BVe9If8Qz1dUEbSf2OAyUWcxxKuXGbeCfpz5ctEj2sVxS8cunXMP/l
+KxWSD5XSJu8OixLk3n2LfHs+imc5JH77xNwG1CM5YD6hS8wN7ewj9RUkxY+R
+fl1rs0xE/epMaX0tLOV6Vi+Yh+fadUHwWVKvi39IMNxRVplsCwsKNqncgKnv
+FPa/0UH9woiIq3AGQ4naokOeF5PX+2Fu0pM7havxbvvd2GfMz40veq8Kp03k
+9rvCIgMLhaRV6P/0Joc4eXJ+2CxcBkvq22qTkH/f3vSxuzh3sVb2jkaivr4z
+Zx/6wdKXq95+h/5wp0KHTJnk96uet26aQwlnlBw0YHpsR17tBIcSuI7baJLx
+vNu+EWMcSrR0ZIk5GT+TsM/zHw5FxZjMHID5Flyt6L851PjuBZbZsGij5+Tg
+EIcSbyhmfCTjT1MSGmUcitUzFGCH/Lh3eusV4OgWUe4VWGRU8MrnM4cqcrbU
+64ZpyfS3p2HB9enw9aiXSr+kaI147+J7CYHE2eK5OTLfxMBUMizY09CuNgw3
+h3nlwHzZsdb9yEcYtUz7BokXipsbRziUUazdaBRMR+Vps0c5FDu+rukrMn7L
+LT8L9cl6t5d9wPpU56mhl+MciifP/hBDfNdvUw/6Iaqsrpsh/Xg6ECaYRD4C
+41geLLg83Ss/xaEylO/NdeGcKtUYtpeD+QejKu1gfvLaimuIlwWq2ObinEr/
+nHn8EeaTcByNF8HSv3+8exbrMTTPNZ/FOZWb5uDVh/yU1wVKVci5taOtZgb5
+96UbcgtwjqLUHEbaUS8jc62HNywINZk+jX6IhWX5+jCfdeT+uk/IP3FMYyHx
+JcP1Pr0cKjHc1JyYkuOZ/PIO/YllOegRd6slyl5i/9KNk91IfGquQ9QzzHcg
+cdNlMq6n8eXFFnz+i+ONL4gtA1zXNGLcdVD2BfKj9gfNDtYgn3O/2cQTi3py
+HYXYT07NZ3IOpxZc6LSu5lBa/QP5q1AvFd5vYihC/0fXOnoTR3ylEf4b+nvE
+k8cnno2LnMV6jI6J6+kw39d2W3YH9s8nlJ1MnMd22PQC/bdpGf2GxHukdilI
+kc9232IL0l9127QW1Cf+HHDwNdanzRbt8HiPeldf2RVJrCHzCUQ/yiWn60bJ
+uVWV49rdh++P5DMDR2A6tKei7CP251BKRRvOpbTDyQM/wYLDVdEbiA+8Pv0O
+8VrFD6S3NMh+nte1x3zCLQNx82FKvWvb4x70q21zSQw51w8nns98i/gq7dXy
+MHXuQ/T1P3F/lFu9ycK5ifpjb+ZoG+Irnk7vIjY9s2tXPfZvl+mxlcT/fzHI
+P3X6v0/i0Lg=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {1.6402550371571483, 9.170599194669919}, \
+{1, -1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{19.999999999996135`, 16.999999999996362`}, {
+          12.999999999995453`, 16.499999999996362`}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.407378835015717, 17.441896309779956}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwd1XtUjGkcB/B3KwltRmwzk4aJMtlNJuWWUZM6mZkucimDKElX1Ipt7Iop
+o600bWZJlHTRqlOTjhhhVOy0km5skqnTJksXZHTaNdTZ9vv4Y97nfM5zeX+/
+7/ucM9ahsZv2GlAUFYEfGSkGeSzlU2wyzuNTE/al2ZZwXxwzJhXWHdg64QZT
+qvj0qfP5VOmc9wdi4YIc/0kJrG52uX8F9t9qN94F21/fuG+A7I9462TO5lOv
+44dFFlw+VbWFJbOHz/xzNduFmNX/wAU2v1N5LBjOWcbu4sHciYoXJ+CuZTIz
+J9hUNVL8G5wqaHOfBxt5D97+A6Zm6I9M4n0dO9asegnrlNw91+CU4bTN48Ty
+h97bYPGSmoNmjnyq/dmbWj368ZzhxbWCpZL47LMwNyIx2AbmfqV+4Az3rhWa
+cch6oc/SbhafkoiKZGS+gJW2Uw6LxOfcWTBtdUb4BtjqHO3fWWT+7NybNvDw
+kpOJhnB9a4puJlzx8n3HKOqJUww0m8P13FDaC1iaPWTqAPudL97QBreba2N3
+w8ZuAddq4aw9m1TlZF5t4VMF027tvjod9S0SL2aWEH9TvuEn+MnRaWMXSb8j
+Jx5/ggUe+zJyYf5AfU8S+vf3oELy4cjDXtunIr/e9a43vuRZUX3dF47USHOu
+w+yhvJTTsPNf0u4HMMO0Kr4dDs9ypfeR+RjXzSbWOLferWoCLs0xXr8SDjz9
+qYfkmTXwtnUH7MNkV7rB/MAnXYfg/moZI4zkk9L/KAnOvGxJpZH1wheZybDu
+vNJDCYvnL09LgA8GtDa2wfqy4vzdMC8t4ef3cCrrne06OMxAd2bGMj41qCvT
+WsL23glLFsJiW+rRO9Qrux+oXg7HhX1wvwtncwz618FVTM7VU3DRnKkSEZxl
+yZPvgPOMixQ+5DzfX9cvhXlBg8eFcE1MG3sabOKYpXGHpftHl3ciz4JZEosV
+5LykSxol3LTCLoADh7h7JuTCAkGe1AKuD3j+rgBeoFZVGpH9MnlLLUwzaJkc
+RT/+dh9vjcGdzg2KfnL/LnxfwSZ5F6470gH3tfhwN8LJr3ZWPCT3LZgSp8Ps
+6mCD32HBjfaVTbBEOWx7j+R5k37RDHmk3/2QqSH7yw/bBsBWgobEFnIfmZ+3
+5sLSyzH6bnL/hWvqeuFWfUgTyZdtKjRkLeBTu1bdSzEh+QxHGmyBKxIaMmxh
+O0X2QBLMd9hr5gVTWu3aEli7/SkjCubOVk6qYYO6U/lyYmt1YSPcERKUfA02
+2aVkECv61hR3woxfzjy/A5tHfDuohyWj859ehmVbHnoznJBPdPl+GUyFWw84
+watKiiOD4PwrnHERrCv7s9sBvt2Rpw+CKd9Q+n/oJ9lx7GQU2W8cKW+GjdSG
+J+Jg2sd5NXlwx5vA6Qdhdu7dyTjYf5FF3AFYMJtW6A27pGW6hsM1U3rOOsA9
+Zce42+Eshol0Lnw7LGyxN2zyNDRnNjystbJ3gUtltYV02C96tb8dnPr3UB8H
+bpz1o8oCFvtomZ6wSPX6qDGp38ZWEQMbNxlVk/6pC5WMi7BeVeI3Qu6XnGf+
+jJzvqLEehLs8o9Lp6Jd7vPvxa7J+oYeA5KHhzHk8DDdO1r0qgtm+mdvG4NIG
+06FBWHJoPNoQ7xsMqOz9biHy4xU20eGuz8HxUbCXXjPFkdS7LT/jEswrC//B
+j8zXde9qhrnRTFHsl/rjpSNw2GhVuoLUX6fQG9ngex6LtLsJ94UmCmfCKzrp
+U3pgifzO4a/h6eR/xRn5k9GG/z/9qkJF
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.23789659515192, 7.38794612872654}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJwt1gk01vkaB/C/NdlfJZXtlW7WoqERkr+8OuXmpHJTpN4yIRUp68TMv6JF
+hm4RIpRJskXZalJvQpEQb0KblGgaRZahqPt95lzn4HzO81ue5WfR2xG4fqck
+wzAX8UnfGQn6Ysgy/3yoskzzX9419jD/Q0HJWjjNQbUkBj51ydcrFr5eO6Om
+meLGcwWFsLGtQZOmEcsUezrllcObf4uN9YVbBAN/XoJ9mUcVxbDq3OxfDsJr
+fYLMR+FTPOHYUlitRyhpYcwyXH6r+K4Kyww0m0T7wQw7+MeAMsuURZj7JsLd
+ZyoWf1NimZUOr2vLYNG/9w9NKrLM1l3xCxtp/98Pw0YUWGZd3arspxQ/4nzq
+kzzLTKzKze6A+XN2vxqfzjK/W0Rot9B5j/wD5sKOEbG+d2j/9GI7LzmW2dCn
++EMu7e/heh5MY5mPivrBcbTf0srSG366cvfGAIoPRiiaw1qWAZqudF6mhfZi
++Kcbn2UtYbZI9eVOOKpA4KRF+4+uPf0QTqk/2CZPcbVsH7qvKK92lwScVfD6
+0kzk05WU6UfuLnKQfA8nyjyqV6B+HJEebEE9FfpX1fXovLxrStWot6M2yMuB
+PBKaVIJ+bGx0sdlD5znda01Ev2a6v3+cRfexNsnb0c/73jmvXtD6x91XlNFv
+iaM/V+uZoJ7+DpNEuPdeZbw/zIg2ffwAx/gr6JfD/LQ5z+Qwr9zSSntJU8wz
+bVqZBL2XYYvMNTB/0s2I5rc/66PyGVh0td3ZBf78afOxNpiVcnQswP0Ku9VW
+KC5Ev20igt8iP4Gu4yNbmJ/d2jeF/Ocf26O5HRbu9RyTgPmdPfEH4Szdmz1f
+UH+z51HmJFlTb9cw+rMlY8/dBNq/Ws15DP00bfBLjqX97KhYCRY6p5ZGwqzE
+4TBH9H+bl3ueL8WdHm3MlGWZsXCNTS6wSN9jzAD+JX203YzWx30dfC3DMtYv
+G3fwyFd+q2uG88zEDiNUT2W+aAiu2tqQ3wV368d9csJ+SU1RSR3Z4F/2D+AX
+sscNblI//K5n78f9GweqE8ppf9ktTzvk59G0XaEKzqq4LdBFPYWP17k0wUzg
+wHJl1Kv9vOP0nxS/K0r7DrvsG8uifDjrc6f7Mf/slt66FTBjfaL8Nvq10Cun
+l+rtDjLwC0d/PR2XRt6m/FtLliuh/9d05SplFiF+8bV3KMxtbz/uCouMzr0s
+gsUqDhXpFM+zqb8O92dPTPbBQjXHoGg4Y02GtrkZ9gUObZ0Hz+pZ8H0/zFeJ
+EfwX92nu7RIVwVnWL5+0Ix9rq9bm1zA7YRH7BfkmqKtHypjjvqrjzjIKLFft
+xbsxE2bkNqtKyLNcRNT6EB1yaH74uBzLlSj53JsHsw6GrmPTWG5IymBID+Yb
+GmvLwIG7/aO1YOHZloJF6HeR3OolM2h948Tlg5iP1V7BO1myXZnlsDTL+JXY
+LBlCPsLZP+aeg52en2hvJZemrgmBec+qR0upniVTy6Lh8+taW1Mp/1X+m+vg
+m7VlCUeovvs6G5bi/NRpFnOCaf26Ky1iWHmJmLeX1ve55iYiH5d0JVEg3O3l
+vCgQ87/j7spEwYy+zxkPzN++/oJtEsWVF7quwfzd3+p4V1J/h7uSrTFvleT0
+wV6KH1vbpIF+DfqbhSqjnu4rA1+fo58XdMVfF8JZrmE2HPqdkvO00JXcyc76
+oshyH0eN40NofWbSK4ESy1Wc/HA0jeKbxP1bYFa8PPQuzG1NL2Lh+SeLbd5R
+P5vd+gdxnnpX3B25xVjfsYnbB/fzr8oZwkybTnAN8klaJbBzhLvdy88PY34z
+JBRKNsMsf8hPFvlbtxV88IeFGX5hstNZLq7hVWEozN/pYvUN87O7N3skks5P
+jAoal2W5EaWSsShYdOp223cZluudjDL4me4z40fqwKfFI6b7aX3y4VgvaZaL
+91B95kPru0Zu1Uihv1edjOl+LttE0wNe5fDB1Jnyi88r1ZNiuZ5DMVK2FD8b
+EKyNuJJ6RIsp2WlKwQVx3oXcfD7lZ181Vkjr3WLOapAzDyTZ4j67NTOD1Mge
+N4Wf8B5+TBQO8qhe3mrzu8hv2szqs7PI0bKJlzH/98UuRXReVsos2xTUaxGZ
+72RO9ahyPx3H/A+fCzFzovtnpbvtRX9GPy2Q3kb1rHBpWIZ+xuZEL6B+cPVT
+AQPo56sT6xsyqJ9B55eFYf7KOtOnqum8HsGTNswjcMui4n66L1X04Bvi0ard
+Nco/oP5fFWpH4fBS3mxLmG91+Wol1t8e/TveHWZNq3JWw4q8ufrhcNbcyfcF
+uG+pUsxAIiwaXVTQT7+ftuWYF9L6uOPN0vChlTuEInLvsQR5/LxaHVYybKL1
+bvO0pPHeG5ZND2in+HfOeBL9URJ3unVSfDGPm0I/I5sKrJ/Cwvy3kWqwjfPW
+4haKW/nkCdB/QYxRVB3lH2S1IV2S5UxOrI67QedtyDXkS7LM+vDevjxaf/r3
+CbEE/p7ElBekUf6Wlr9USbCcOPjNVByt12207kK8jn92/Fc6L/VaiBH2F3i3
+Xg6h/Z9LN1zG+f6KMyYCaL/1jnF6Dx3yRtf20Pot3xrUMe+j7g/9Aql/7w48
+GEW+169bRIaRLf7ofYOf/wsqyrwY2q8VE/UE7/mFRp9KCsyJD9bcwfwHLEwW
+FNN56fPtUzD/ZEF+fSPV/8bD8j/oZ1wPt3wAZmwOa3yE57znZapa4PyBd72e
+eA9Sz5/1LoGFHa4HUuHhxenjnuSMIxezMS/bFM/SQ3DWrRXHIhB3jOmYuAR3
+l+zcpyVPc6m/cZ/O04jvTMB7u9AdyLyDmb80nToxv+/0YfH//wfl2P8BT1Cq
+YQ==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.72092184717428, 1.8721747773942476}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwd1QtMk1cUB/BPUKljCgNaUEELIpSn1QJWBuwTdGOIkZSHosTwkIfgLCoj
+nytMcBXLYAqCo0V8ApH4BGGKghMVkTAmn8qrDLVugB2gaxC1Asr+1ybNzS8n
+ueecf25T21ipJN6Aoqg4fMlJTU3j405TWnLa0JRi9J/o93Bvckjzdjhpjr/N
+EKmvzvvQbU1TzRtbY1tghaFffzBczJx4WQozJU7u7EKa6sz9OL0NLjiy0TEe
+1urZUAdyn954hQkcYqCb/dyNptjk6/fZBTSVf2d8fwmsLb8adh7m3D4TEwy3
+ct87noTH97ptMIBT2w9JSV0zeH6kwZWmxF3Tqx/AlI/lRRnMV7nUzcT9rQ9c
+7gaQ+tWzE0Ewx/+7j1yYI7E7Wgb3b0xpeO1CU6aRPdnjMP+N6PETWDmnPX09
+9unsKC/shGmJ/6IzsOmqmVd6YNasJvQlrMixjh2CA8sUW52Rj+vnxeum4Sza
+XhAOVxxcVc5Hv1OG2cnJcNrxbN9AWLGioisRZjIkZ/fAvTOMnINhn5IZ/qeI
+K9RfW8Lsw4CYP2BmtsylDf0GnG5sHyPz0xajCbBP081XZsiDKlerdJjf9TTv
+gTMsFFD8FNhiU3SgGC5Y+I73F/IJ9prF9SZ5Wg8eXgtnlIykLoOtFjf1XZ6P
+OXlujlaw6eTRbxfD/K49RePoJ8hoeK20Qr8rfx+/R+Zfr5LZwgLfa9X5sHB3
+tbrREvcZWVetI5Z5LNsJK+UDjTPJ/LMCzqyEq7uXptwg+RlL1i6AOSs7wqVw
+ld+rz3iwcDBH4AA3KcNbnGAfP/u9z50xL/+FOBQO0yw5Vw5r+v50OQwL0hM7
+dsLKd03FauJ45tc1pK7waHbDfLqEKJEDrPUcLs2B5e3dEgs4yyuz+SncKK41
+M4FPrQweF2Jf4eVdFA/Wf+DYMTBjHLdIQKxddZfkM5o1+SoAZk5bTz+GqQH1
+gURYeEjV9xyu23b7eAHcmyDZ3APrB36+0ghTK75R1cIZDYM2/8IKT5PH6bC9
+/KSnOfZVmC+PsYOjzeYni2G9X/35esxXIM2Pi4CTfro21xfOF3VZp8CM59il
+WuxbplFMpMG9hTFhtrD2fcST3Z/ea51THo+mPDKfum+D69965bzlIr878dpA
+WKO7fzkJ7m1xLLIl/Q8UnhiywPuJFPn/h/k2HfNuToP7V9vl1JJ8w63UPDjJ
+wHNLKvGjypoOc8yrO2lG8tGwgkWnYcWuueInTvg9FL3pyoM5u+VpR2Bmw1fS
+w3DnyLQ0CM66+SjuHLzD3bzWCI7eJ7frg0efvcltF+D9XchzXYh+dRn+w6Ww
+MIrx3Q5nuRVFpcGpD6dkt2Bq39RwJKyfvaXGCvtUDblxg4mbp+RSmP/jrbYg
+uECXf/13uODZy5RwOPBFT9IM5NNa08Amw01jLV+KYHm6Y0Qu8S/vjoXAbPdT
+3SVYEF3fHwHbT6rWqGElVxm5Bk4Ktbg1C/MLQ5xyrWBt987flsOsbKlhJ/qx
+9hf2byZ5xFbtZeAo0XBlJqw5+LCSA3twqWdKWCuqEiiwT6NKHHgO1hlXxkyS
+/L433FENt2be8EmE9Rcrwkm96QfeBGuGeYOWlJXA4snFY75wluFEAgNz5m3d
+VPsF8vAK27Ge1EcNKC9Y6DGitYTr5921bzPFXh81hWSfkBCp9x64f6t3djHM
+jsruiWB5W4/NOrjXQew3F/70/+CIOjlN6P8BDe0+ig==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.763809742330267, 6.7361902576697315}, \
+{1, -1}], LineBox[CompressedData["
+1:eJwl0w9MjGEcB/BHXX82yUVDu7t0FNGViqiQt+2cs2ZyazlpIR3RcbJLl24k
+1cr5EyPpMKzlRKflxS01x26c2erK2TXVnFxlw/zLn66bfJ95tnfPPnvfve/v
++33fV5irkim8CCGpOOj+fy1m/u/zGdK65mjeBpij9n3jDfOX7l3RAFsUiojx
+eQz5Y2qUvYe5P2S9b2G2+6A5Ioohcn7mGRMsve41lANrw3eZK+CBIt3Zk/BY
+YrdSAovt4pQWOFhpDSdwovQFMcOetJlOVsgQ5+z+Jguc7S937IZNDd/uP4LT
+dQlZfFjJ25/XBMe2LGx8HcaQ89N7aqrggMvqtjq4o72zij5/7JdYkAsv8/FZ
+EEfnYZ0/k+B8rzTNFFjT//z2XDi2LexOL/LkP+O4Z8Jfiy+5bsIaY/PgLHgs
+pZhbAWvdExcWwo07iGUPbM1YbhTDrnrV7K2wMqqSq4TNkjbdFrhvU7hQD0uV
+jl8K2E5kzi5Y3hxdUgabbJlBHORZ5rxSaoA9xJC3gub/u/nhANxqn7yhgC0n
+9kt4mPfAjJUOHVwdXtOxAy4rf6O+CUtF+yS0T9ur+JIHcGL50y43zC9sqHwI
+m2ctX7BOxJCTvsy3W/R+n7+IzsDBwic9p2CWZSa64U/vuO6dcIBPkZ9fNEPU
+gZ1founzCt5J4uGMbIHjM+2zWCNNh1mJanMTbE2tXbcdtv1cr8mC1dahhFzY
+rBAdnkbz2yUdmfS8dKO8ci7yJc2JXwNfc9Ufc4ciR+tjnQB2joasL4PPL0lJ
+HcM8msltd3lwRqdfzDM4f6RGbxOgt4u2gjq4uvqI4TpsTo5bnA9L2/28a2FD
+S0xlCmz1VGfpYbnxaTYflg/MGX4Crwo5uIQDc08/P0Rw/3pO3/hv9JW4ytUs
+gyOPvOSP035PRAruwX3jqjR/XG8Kfn+Xh/nVN0LKI+Cw0tp+mudOkNY3nVrv
+8P4Ii9cKC6tgVvdy1zya39/4mM6vIb0mCVxxzlcViLyGAC/Odlh0dVKfBXPs
+ozvp9xM5+D3SAFviVl/eC2uHN4z8gMUlZBHt12yY2pEcg/drilq7kvad4+kp
+geWD7Ggg/InXzRrhWOPEvhbMwyl0FzngD12tI4tgbajL8h0uO15wrx75PJNY
+sD/9/0OZf0nWbpA=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.613477323709358, 9.105546654636697}, \
+{-1, -1}], 
+        LineBox[{{6.999999999983629, 12.999999999992724`}, {
+         12.999999999987267`, 16.499999999996362`}}], 
+        PolygonBox[{{10.51826734053906, 15.052322615314452`}, {
+         9.683281069670574, 14.102165824326175`}, {9.280184249251306, 
+         14.793188945044921`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {9.823799910437668, 15.484057296392571}, \
+{1, -1}], 
+        LineBox[{{7., 13.000000000003638`}, {13.000000000003638`, 
+         9.500000000003638}}], 
+        PolygonBox[{{9.48173265946094, 11.552322615314452`}, {
+         10.316718930329426`, 10.602165824326175`}, {10.719815750748694`, 
+         11.293188945044921`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {9.823799910437668, 10.515942703607429}, \
+{1, 1}], LineBox[{{13., 16.50000000000231}, {13., 9.499999999998607}}], 
+        PolygonBox[{{13., 12.4}, {12.6, 13.6}, {13.4, 13.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.9452, 13.}, {-1, 0}], 
+        {PointSize[0.04], PointBox[{12., 4.}], PointBox[{7., 13.}], 
+         PointBox[{13., 16.5}], PointBox[{15.5, 7.5}], PointBox[{13., 9.5}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T15", " ", "P2", " ", "N30"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdief/fiijghgjhj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdief/fiijghgjhj.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {44, 44}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwt1QdUU1cYB/CLgwaZImisFIJYRJAYlNooJHlAWsBRYloBlREVaUQs4AAq
+tEXUQh3I0IgDBdEaDit6tKFHxRRXFKGcFmhYEkUF62IvBfu/bTkHcn65L/f7
+vv99j9hviJFumkAIScYvfSUm9A+bIf/+uDBEFv3AZvsMhrDjVaNtznh/uPNo
+y3SGpCzYekELW81ddEYIV+xMCvgNdr/1U3mBNdZ9hg/T9fy5CYIpcHCKv/Qh
+PGnpq6TvrBiiPeheY4D9Q4o9PiSwvPRghhv8VXvIFMU07DdqcGgLvLcjXOIN
+61d/4lVK+3H6vM0Q1qxpvdUHv/S1TXhiyZDE/J2DHvMZclC5u7wZVmY3nEmF
+53s/7+qE61gX827B7BZFlBE+T14KDd/DR3bapHrAfsHWKxe4wu5PVN9Sd6Vv
++BK+ti+to5La2aRmM1xvuEI1Gf0Sm6CrcXDyvNvH/WCL4ASzLbD4caQ0FR52
+WbkuECa77o+VwhzPjR3ucN1IavRdOm9F4j4WnLm7IKAaVvok//wn+hG/iFmv
+hjVqS6vjMCc+evd+uOtrq8frYKsi1yoxzMspEtvBK66lyjvRn0yukz+jeXo3
+t+yg84mjVl6GT5mVpXdjftVVo9MHaH7fhf8SRvO4E579Dc3PZ7/01lSG5Lre
+/iMM1loEXnaE89W6jaGw3P/S2gMWOD/lwPEoOPbkilVvzBnCN/zY+kfYz6nn
+s0dmmL/o6u0yuGLp9YgBU1w3K3rkMcy6GN68EB5e5BLLQb+Zx+IaT5ug/86n
+CRGw7GDeck9Y/uiSaQnMm7q22hhmvXs2oR/WcPu/p+5q95mzBHnppULhp3BK
+aNj6RFjbfq8qHSbxQb1lcL5y4cAQ3a92xq5mWG56U5KE+kQqdxih6xPOB7PQ
+r944VW3ExX2zbIx9BNYq35cYw1r+tdJpmE9Zl8h9T/fvL9Imw4xxPPspPNwm
+4N2BOcGNrytd6X02z60LTm9yup8BOzEOY62wdrBdEATrPNf35lMHneTPoudd
+FqhdCMtemenbMJ+u7KczOajP8/OJOgsn2lX23UG/wT4mg1vgrriP4v6g8zSc
+ihDQfNTysuvGqMtMXTyTXp+V8XvWFJxv/LkoA3p/O862XmOEfMxNooaQf2KY
+TZgtC+ed4Nz7Fk4pGS14aciQ7uyXpub0et/SzbWTcV6hN614tJ9nDStrJqG+
+geZSKBzcqUjpmYh6oa+Hj8IWfxbKvWBJzJydjbSfr2Kkv03A+zx7iQ3m02zy
+8tgOax6kxUbAsRmaikBYFsAqKHalz9XMcTnMrmlXv4ZZu34cPwc73bx33Znm
+n5laPJHW899jGQpbeKqXJ8NMle2hPXD6ushnk9CfTnxCcQqu8+VWZsOq8jjB
+BZj/TtDwIeZR5nl4FcKZ35zZkQ2zN1VZZ9Hz9mGr3sD549va4mC5fLl+HvKQ
+e0eu84VzawSmS2HOp6q2aTDx54hnUQuJPb2f9E+F9ffx+UT3N9w8+jxPnxvr
+B6tcTvBldH3NFjcF+smdFBjjSM/bvP77CvSvuhHe1ou8cu2WNF6heeVtZbQ0
+f5KXrDDA/navO5XUfuHsCIL1u0dyFfR5mfzXDum4iGhm5MRnw5JziysevRUR
+mef+oVM0fw9b1YEREelKe9x6Be6WjmsjhkQkcU/t4lY4P/xv5x8GRCRlY32M
+GfpJOTza9LxPRFhFAbJl9LwyZGPlvSKiSxuVH6L9v7cO1PVgP3N+Tj3Ms7/x
+IgKWBGRdsUEemoHKPik8PF54YgN1ZEnfCbh7VaETzVtWlvSRG/aTK/amtcB6
+x+f6yagXW2sgNlqAeWIdig37RUQfc3OrM2zhmlRti/50XGG5AOYls7fxBzHf
+Erswb5hpSrgmwDysh8l7+LC+/27VzGERCW6JbOHAJIh//FeYU9JS/Q71uptb
++abIg0Oyv6yl5585KGbBOsuonmO0n7eOhWdxPX/k8r4QmPnCs12H/SVPq7l2
+dJ6t2tUlqE8ci2d30Plttzs40P72bU6j969EXdfki3kyH2xbkUTz8gocc8L8
+uU82GK6GZU2S86pXmL9d+PtS+v+m8coH9V0iogzJmc+l+Vf6Szo7UE+ofke/
+bzRZvZ3zHyIPxcxohq7zTtuzG0SEOW3bF0ZdtGjv9XuoP3o+ZD/9PpnoprFU
+Y74Xz+s1rv9/Tx8R/PfKZf4BIR3UrA==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.545705156331749, 15.828020625326996}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwl1Qs01FkcB/DbZJnFMgyKoxojPeWV7anmrweKCoW2nWrSU1o7JVJLHq3X
+JKaIHtLUqdSUkkUhNdFmNctO6JSIOdrooZo0FZrY7z075zj/83Hv/97v73fn
+/x+70F8DN7MIIXvxR6+kYxifUQzR0KslQy4V9r7KhMk/Hg1Z8IH9BgpDWGrm
+sP5H+Bbb5+MeK4a4jEsf9cmCIZdv6q634f/SNyP1m2Ar/p/n5sKykFBFA3z2
+uPD8KVyZHLvlL3EtWPlqlwGuxRYmk3iYF+l5but+LkNEI9h+u2B2QP50A1i1
+7O3Gp3DJTEvZeXPMr77+LRD7nrU6sk4I81obHz6Cp5XrdTvCKp9YCyFy+hZ1
+rR8Fy24cbeiAu59xL9jAaqdqt5DRDGm63BzgDhMnx+HbsNvG2qciev9Q7T2O
+NUN0M07eOwlr/Ba7+cCL6qa0dsLSnfa+oXDB3qrwicjH0+NnroWb+RFnd9C8
+d+rZc2BHkfruJeq1FcEDWF981WdPK+zi1ZZRQPdT+475AnOqM8yc4IKt5v1D
+MIms2FiEvGuycza/g/1vPGjmw4dPXBmuhRkVcTuKejXP3a/G0/ms4Ggj2F7r
+dZFP1z+8bksG+uUqSd90jfbH/495Y+FfmkP2Tqb9kK9cex99Vz0TRhw1w9XD
+XD8drnL6mtjPYYgiSGoXBq9URm9eDUvjpLbbYJMPp7ujTDH/VmpLMqzu5NT5
+miD/UuFxBcw+umLkvB+wv+nchZbYz4+zTxVojP22hf0cDwdHFUpyjJD3Hit4
+ALbqrw4ygF0ay1tjkb/dmdVWZIg+1feYjUS9c4wrJqTB6iyWQTIsEucWZsPF
+0cf7v8LmVt9WKKmrS0s3oH+KA+sfT8R6jPR9TzEcsyBytIzu9z4o9AWsVkam
+TkYesj19mQ4ur4+tvAn7D4kDtPBNvs03T+RXm5w43wDrBk/2VMCiL2EmErhm
+UkafJepNSFx03xFumdsy5AeLEhtXViJPTHypMgQmn7eumAUPHcpd5QqLRzTZ
+FKE+2486s8dYj9NZmDkOJiZeNktov6ofnclFPxhNHk+CPGLPFFNreFIaCTyN
+/OIzXFKE/h7TSsylqNc/NrQihD43bvJTm7/H+X66smYMzJ/RkDmFjfUqXQoJ
+rPvosPq1PsbH7OpiwfkTcq4Wf4e8HV137OHXMa59aXoYD1Zs2QA7pUw6GTcS
+6/d9Tr8J79bzKcljYbzp0ZHxyGN+f4qwYwTOvy6s/TSsfdIWGwy7ZMXr7FFP
+prUshkXHd+ZbyeHAUgvLLoJzaatyn4p+ROxwju2DZQNBZ2SwxPGLyAnzxdb2
+8/XQT8P2UYsyYenn2c3+8L7VrS1s7K9xkgQmwZVJ2WHZsP+tpca5sPC4JJ2P
+vJqe8of0fGy5gkQ5rFav1qPfh/LQsoFxqE8abnvYBp5xl3swBuasCXtMz8tG
+47zwMvXvqXFecFqXp/V12OV+vHst8qeYPPdJhsV6ByJmwheDFFkOMInJNJKj
+/nMHO5YewX6Kt0mED5fGaHc2Il/xMcdv59E/nxfcnZ2oh1jWWXrAL9dldf2N
++kUbhLtf4Tk1zvP7iRkWEIVzv2UJvEP1zPQvnYC46HPyjsH59d6vvAcFRDpU
+ZVYAewyX+D7+IiCabVGmNfS9Y7OgJeMT5r/gZtHzXTUtxS3uo4DwIqvGCuHx
+qje2lR8ERPYknP2APu91heEBGgFJyNNkeiHvxbJw5bF3AsI8sJ2lhGN6/z28
+7q2AqP2O8ALo93OwZEJfL+73frLqISxLDuR5Y1x0m5m6GP1SGUb5e+N+zSHz
+ExeoM7Rdze8FhFN/KlkDu5ctjH6O/Xj2S1jj0H8yJU0+iDy8GwtSnWGLoU1J
+o5GX2C82tYNFeaPzHbRwVr2DFvdrU5ZHGNH6puk65XCGSVJ4GSzzaLzrA+9u
+rzEy/4z+HUqUNiFfr0J8jQszL/stlsOxT/auuI75qoOvVXdRX3uAa1831i+W
+V8ndYYutzR1l2F96dVEOfb7ae60Oje9D/TziOp2eFzs/YD7yM8+nJSjpe3dq
+a64D+sFEeWb9Rt/Lht3Tt/cg32DKLG86fme2MqoL/VX6fXChDpWPfftUQPyv
+WMlnw4rsjXEzHiKPb3SNCE7QGdsuVKCfuyeYnaPvcfpJqP7/95fL/Ac/lbt5
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.128720493773297, 4.310154074720437}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.00000000000106, 17.}, {16.49999999999894, 17.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.25, 17.6952}, {0, -1}], 
+        LineBox[CompressedData["
+1:eJxFlA9QTFscx7fUvDJjee+JGuXPvefNY5Gcq9VkJr/8eXbVa3qkUsafVfqz
+prJpUGJRNLymPLZC78VEWhH5U2vRtsZKjJSKsJJpp2yZUYasJu0752nOuzN3
+7nzmnPs7vz/f75mhSF4V6ygSiVaQl36fjdjt9r0+IPrvQeAfLG5OOkU4VPHj
+pnkI/Jb7fMvTE1b/4zVtDYKYYnFchpmwi0FSkowgNr0yVyKaD6JIg7YuE8Gr
+8Tk1BxDh/JA71j0IGqbM+xArI9xZbBqXiuDcdHPIjUTC/S+tl6IQNA6YJsYd
+Jjwz/0SLFEFcXuHwn2WE6yoCnV0R9HgEKTbUElZvvuLbwoPb8SHD8mbCTW/N
+lYU8TM6eL3ndQXjj0FdbJA/Br3yzhrsJx6d11XrwYDl+NqDaSjhH9lOVmYOy
+yPzciB6anzgs/iwHIRd6psZ2ErZpsuSpHJgnTU7TtNH11ZnKIA7qJZl8Qz1h
+UUK42puDr6JlgQ46wjpT/10vDnSXCtPDztP6Av6yenCQsHjWwq4CwrKgX6by
+HFyVvg5/dIjWeyNl2I8DwWnE1TODsEtFVEEUB9sdZ8gfbqPnG132HOQgNHd2
+YtlWwjs7ktr0HCgjWpaupiwrLVV85uCHQTdYTPdPAK9ygYfxxTO1JTSee2uj
+XcWDUT43JukIzW+JveYKD3LjMZx4mta/r8Snl4ewX3N3eOgJ+73v/OKJoO9j
+3uYnz2m/l7VafkOQxhl+v2YjnKL44L0FQXbpor6GKZjUJ9u1bxf6rhOg7Og6
+Vo0gfd29idKY/9e17XA1+BBm/wsuKcU+5ZjFr2hX5XSbMDu/OmDrY80bzPIL
+qH566ugnzPIXb3gevtFJYPVNcu411IkFVr+mfM7tiz8LrD+XVa2atZRH+6e1
+dVT70v2j/e0ddBjsovFG+6+8x2kX2DCbT0HdsweeVszmt2JVfHZFO2bzRUO3
+akfqMZt/RNN+s1SHmT4CLe8OJ17ATD9Va9zfnizBTF9R55NV5UWY6c9/S7RR
+XoCZPpunPcwYcwIz/VrTG9u4M5jpu1fpDPpKzPTv3n3979NGzPxRo4wfk/oC
+M/+Euvr3FX3GzF/Rb/iqlW4C85/U0jTh5EKB+RP175DtjhaYf3XqP1RtewXm
+75vrB4qySgXm/3r9E8cUk8Duh/vXBryPWgR2f0gcqGAWsPvlXyACxJo=
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.25, 8.354800000000001}, {0, 1}], 
+        LineBox[CompressedData["
+1:eJwd2Hk81OsXB/BvthCSRLYMCUUMWim+3bIUlSyJrCWSuJQQqSlkS0iRrea6
+ol8pa0Ulc1WytLio7Ea3ZEmRNYXf58k/Xu/XOc/znHO+z8wwSgf+tDrEQ1GU
+wjyKIr+p4Tn8SNPU7x8pmmozXbwpcilNMXieq5nBseaml5bI0BSzvGcwBN6Q
+bTKUD3NN9F9egeuEuwdNZGnK0u71jlS4z9tWvBseHmv5eRouW/Rt2E+Opjj9
+jrE7YYkVf3tOwYWRXwr54A6X4Sf+8ji/b1o1bwlNWfwcaW2FG9pY4RvgwH08
+e7UUaIou0ZWqkKSp/JozOT4wK2OgbCMcoZIllwqzWwwzShbTVFVP9MwtuPBc
+iDATDhnNOkHMld67oVSCphLDKuJIfmJJG48xzC13EDsBu06+quxdRFPfG1QD
+TMj+vl2iWXBdcc79hTBjLubOETjAbqPaW9THCnc/uAdOlI6mM0i9HnMff/uC
+RKAHPHyQ/tcbbv6xgs8AFl8WUkr2E/skXyUPczxkl36Cj7p/mBKD/aa3ZRmi
+nvy3gUaSsGWigVIuHCgw7qwFczcLD0ihH4mlJkbOMLPtSmscXPzBpvNvOFHg
+U84cvFRfw3wWZpftEvXBfEojpsq9UT+HpSLzBm4TSonvJ/M0DNiuhPmGVNwP
+DliGeunMOhfYJOgSW1ARLsvJioLFj8RV/wVTXtfLUuBbffyPFBioJ6lA/gKs
+OWWbfhhu6KrnepL8N+b2BcT81UwNOPZz8q9vsHh2Nt2C81/+aq9TV4J16tYc
+g1fPHXfZBw/flaRmUL9B+/7yMJgxuWxjGJzuIWdyFW7QetA3iXm88fj2OQ+m
+lwRbH4ON1whN5pP9hLo5I5in5JumzTfhxPytf4TClQs8h9NJ/gaZU4vhuAuR
+18+T8x7UHH8ijudhWazmQ9bf2eJ+Bva4L5llSfL5pDL2wSx9vrV6MJc33cUc
+vr9LS0uaxO9JfrKDj7+wK5tFf4zuK2ZhsKd3ZccgzBqPTi+HL/7JOMyFqeKs
+USGcb778j/edJL9I5TK5Tw1pvSafYGZivMh7uKrpuecknOi5x2cH+jtkLR0k
+ifOYhttOVcIiX6cNNsGsbNEhcr95VTuFfGHXgx7pafBEfMUL0j9npLBiDO4a
+F/w1ALOzkpUNMe9vmVEdusrYr9/Dhsx/U2CJ22k4seHC04vw1ms3HOvhQguF
+niR4+8ydi9LLEW9+rB0KS01c+ccVtnzTa2YOS5REdefA4i+OveMl9ys4VegD
+TAWns/Jwfijz520pFfS5auu/G+GvrCUJW2BGG0eU9FOyMfOjG5yYWCi4CR7j
+sbAMgrmtHUP3MA+z0PrBs2S9n4uwLqwrctn4HEy37U++h/lqXP7icJI4p8LH
+GJ6yWB9/GKZelnyvX0hTP18IJO+BOd1OT9fC950zDq0j8XzWl1diNLVeKUlD
+htQTE7j0KqwamaP0C/XTN23fXoGL0qPP9cAsCZWIanjofJNvPcxwuOCihv3u
+8fK/ewSzC+rSSmCx6mtupWQ+90zNdFHPtBPz4H2Ye95aOA3OcF1aXUX2V9Jx
+I/dhnHOZv43sd/Os3mnYuzFejZxv+SFg/XeYHWjzWB31ia8e1HDFfHiT9/7n
+DA9b6S96Cq+wTbXJggvbtV3I+8NV00jfDzBLXmjdXvji5FVTzRXIL9wdfQb2
+65+pCoY5dW8NEmGfLI+85yvIffSho2Djt5IPxFURf+WR4Q7baknU2MHDi2w8
+V8J8wsntV2HuqmU173G+X9V5vUbihA9N5PU4M+B9iEcN9ysuzX8W9f9BZXmp
+w5bcQa0zcLG2X+5WmNE/JzZNXl/KxRPWMGdsj00AbMmz7rY9TJtVJfRinvPU
+j0TZwq4nVlNTmH99pVS5Gcw2/ctaFc78fL1+DVkf+M/tk6K4Pzq2qXIwa9+2
+9CkRPJ+5c6vnUJ+r6GxrHvyDX6Gqh9S7uE4uFvZVGU1+TuKPQvqvwzv3+Tfn
+w7SOIPszrH5sOCENpuYZnnXC/opSqanxMMtCveMnbFxa7hNL1gdd2PEI9eiZ
+xK9NgtlVb6lk1K/Y3pGbDSeGx6VsQn9VtSYClWS/9oTCIvjlJVvlXrhQ/8rZ
+5ZgPr/xlW2nUX7hIl3sBblGLit8Diw/pz/bBlwW37E0m/W6/m6mHeZs+kxho
+I/l8KRu9YL7dRdtU1RH3+ro2ClYQoTYehympHyNx5PUmdiW6EmYere0KhAtf
+Tv0UXIn6OywizOB3E+khO2FOTXwoDzy+46RSHMxc/qdTHnl/sgq345B4eEau
+Pnl/jerqGoT99N8ncdCPs57lB5FVqLfKYmAz3KSyaVYZpvTDC/7EPJ6sf79N
+C+bWVO/0xLxupLlu1oYZb0QZPphnRNSRLlWSz4maIc9H+ppfuBRM/y+zvHYB
+TWnHaXbN4Txqa+ozJtz3yvTjR5h9w7z9uTDujzPz4QuYJbqs9gJs3jWWcYvE
+8wSMouCHCsrPE8j61xb/lMJzbrn7TpJ+vj/Jl8B+EqlPtnuReYxoWWfCRfa9
+Jm7ER+dWm6MeWaW7eQfI/hlsFWnU+3eGgbMvzPgf78cJeEW7+FAE2S/YZisX
+/YX0RLvlwlzGw6Ia9J/iaGzdSGxn2GyF+dRIXO6bj/4aol0u3oeD2jO7jcn8
+5KkJYcx3aMd4Ruwqcr6nogWZ9/X5G5pJvmfV10D4X5GkNIYG7pfYo40x8PZh
++2gf2DWmq+sseb3t1a0ugznvmv91hZc4a6tRmnjuE5/k1GAnevn/tsDUTHXD
+O5yfr2AVEwoPa6tPHYPDy4Pt8jXJ++dQ6yzqP+htx98EsweOeM6D3cxkvn8l
+68/bJk+if/kj8iNzJP/tWOcg5vWXcaO5wGr06/+2vQ/zTJLNecIDs3afejqF
++d/xmvGbQD53XGJOBQ593tj3AWacL60+IYTX+zzN6VoSf3LjxYggTS2oOFhy
+B2aFruvIgvNujpgkapLPd7v3p2Bfl4LR48QeSz0SYHog9YsDyW9yFGyGJdnz
+t5iS/YTElEyxf13WqWp9Un/DcoX/4HU9L/jWk/ys1gI26vnndcSKzSRfOVop
+CPW75MZ83knid9/ccUR/VTdbUrxIvXdlh0zQv+QqL6Hf9bzjM9bA829KHWRz
+SLyqz2EO7ntwYs80We/yJLwc83vj9ibfAPMQZ5ulqJP70Pdp5Bxs2X4pwwWe
+C6pUfA0zM/2Xk79PcguUFshpYf7rDoRFwnWseYGesKvBkCB5Xl9bnqgVwYWW
+RzeRz8OCmRX8EzBTeAGbgqM/6qqt0UZ+jn/ITpzvbsL+5gWzesMEAlGfobi7
+bApM+ZtsC0c/kyqO9Q9gdmfDw9Po9+X91NTXZH2LRtExzKNMqDWmDWY0uVd6
+YV5vdRWVO0i+oaSjL+Yps3KzZTPMeW7jHYv5p42WeT0jcd+Bpur5+Puw0FXu
+LtkvTE5RA1b207FLhrnG29UqBGhq/2lro0BST/mDFhZ8c/HChfYkrqA1Pxge
+0inmMST77dN3yIatqryN1Eg/jYOWM/CZAMZjKZhu7HSMwP4T1nqaYmR9mM9i
+HdSTwas2RMzxEDz+E64Z6JyUIfnheRvbUH9F7tJ32qS/zw1mT9GfolNOpiXJ
+39UnkY/+k0WCB0LJ+U06ouT9Sqyy7kshyZd9oGSN+W1vnPD8SvJ30/KzojTL
+zOrQARkm6jN8IRouRrNsItvFDWFGgE52O+ZfKZCk507ixcXuvAtp1i7NeQWx
+ML117Nsk8n1Ofj5YSOJnp+aXw++1XQ2ayfqi7EwzWNX9ru44TLW8KL2F81LW
+qXtI6KA+4dt/fEJ9u+Y3yWrAnIZH/82h/jPlptWGMO298yIvHPkwRnKnDnl/
+4zCn0f+iyqRBW5ibu87kqyDN+izicdSexLVtDw3Mp1k3c0pH7Ejc/sOrKQGa
+df7S7AIrst+oyLQy5r9vLCzUjOTvFdngz0+zyqoE1TeReIKX5QAfzdKRNZPW
+IvWYP9yUDH97eMdNkdSb+nHElw//j0xcU10EU+7a9GnYodKGxUfOywquq0R+
+dvFo0DST/L/zTZKJ/ROiHKdHyXxq792qhY9lrn49QuIar/ZFor76ILe4MTKf
+uI5QB9wH78cfL/8i8+sJczLC80/qOSwpTOrtW5m1Uohmufeyp+RhxrAVW0yY
+Znkzf46vIVYa4/sIt/Q3xOwh9YVVLmIvoFnmf/fN+RNbaSnqi9Cs0nfiIVdI
+v5f4xm/BwoasHw+JlW2WDsGZZSlePcSFpQIzeD4OkbG35+vCVdqOrYhfTQjP
+1oS5oyYfziGu2/aX0W6YmvSP+oXzHEeOxvvCnKN+RuZ4fip3mA9jYJZR9asT
+uK88zPcMNvHaG6ci0I+aL3d3Edlv2v4pC/2ypzTEKn6bjxuA5ynm7ub0FGYE
+DR/2Js/zcOfJZyRepN3my4/6ilRaOKS+TgeVGDwPe7kpxXIS19fe8pQXn88l
+Rivuknqm0xtV4P2LZbp/n19o3lDCg3m98nK6RNZ7bDQNgBvDPSrCSb5M7+rD
+PDQlHBGrEAiz+1fuToA3151NOkL6bfaz+Ix8zrMoqQPEA3seePPSrN32ZdFO
+pN533lukUM9Bv+o0YtdV56hu2M34VC3J56799fQx6u8M2evqQ853WhV8A/3t
+MA04Gkb2m1FKvoj+136Z4ZD6uLJXz/vgvtfKCU7lk3qGv+hswPxUJbmB9STO
+d3X3J1ho9aWAIbLftr2tRzFvtWB3Hgk97Leu27kG92O2v3/JBpjbG2Q+ingw
+c8tlZ5hhflx6EPEfN/idI2D2++iDBYjvN/Dff5Osf9z6awviBbKa0bVkvc3J
+2ly8Hlv0d8z26pHvJ8yv/Yf6Zsn3N2Q/8v2NIP1/jDpz6w==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.272475489649668, 5.171062742038147}, \
+{0, -1}], LineBox[CompressedData["
+1:eJxFlgs0lekaxzeSRqXt1rf3/oQ23/apZJtFUapHJyWqQS41yiW3UeO4zHHN
+uERYFKUJKdtWNGWXsyu3cRuF9tAocteFVHLUaW3KYUqc9ztn1jvfWnt967fe
+/b7f877v8zz//+ojIc7+iiwWqxj9mPf/Hw589b/3SmB1OvLOiglYevPZjaUR
+iMVs1zoXAoR2TjztPxA7iqhWPQIyor8r8UsngDXivHJWiYAzdNF0qy4HWPp3
+Y9MUCRBpzaRWVSOGB3QySUBd//2kvH1ctF5iW99eAmynFZ+MPEcMLm2ueQQk
+b9QL3+/HA5bwtG/3RwL0f7u8hH7CcF+j7REO5KfkqFoBCaxEv9ypIQ68kocc
+pM4i1s9JunKQC4+UqQtHf0fclJM3PMCFXM/gpxGTiFm/Thrt54Esen72OksH
+WKGuIebNPMh4b77V4zMadxzmrTckoV8rtLHpJWJ2jeRVGAmPv0Q8fFLPrO/T
+M3eNBJ3NFu1uGYjFHw5ry0go0IrIOuTIjFdGvmgnIesP18Cjmkx8QvWNFSRY
+X0kN1R1A8SdqVLJTSLCfNslcdAWxfu3NE9YkWNbqrPKLRiyfW14ywoMjbNMW
+9iHE0qVp3/+DB8+fOS0BJ8RNw5npc1zwHBMP+3+LGPpLqXgubA1ROM2NYc4n
+xeKXeQ54VacpLypnxsM5LckcWOX3tmhglpmv8+i8BgeWFZd6HTiA4oPpZnUp
+AW6ruTVe7cx+Jq1jvAkYuL9VOO+Azqfpwl5rIwLE4rcvcgcRe69/3L2YgKfv
+4oOXhKxC8y9yrrIIeB/Kvjakoov20+w/o0XATpVM1dAixPJIxTfbCRi5HtZo
+aaaH9l8vj0Z54ubM1nxdw/DUM8koAbyTG3Ptufpo/pRnwV4OOFXpvE/ai7gz
+cPHVFg64zdj490YhlpdEl23ngs6TfaYheYhDh3ZtuMcFmV03Vy5B3NRlINvC
+Az/36qs/VDLzM5sXS3kgsXo4mFXB/H/fG2UtEpykJrLdZcx491i4PwkBH4aN
+tfIRs66FtolJyDb/Nqkygfme5rGYZhKEvWH+Vr6IE1V2K6G8CpDbTAzsQCxV
+KlhSi85NV7Z8VICYzdZ1zCKhxSNrq2gps55U2GBPwqKhOOPwCbTfzpJ/bZri
+weGer687PkB8Rm3oYjoP3kmGUtc1IJa6t4do8GCRe12c6B5idp9D109cqF9p
+3BDwDLE8zMFEmwuZpc1t61TQ+iMK2ioXOPDIyYUnWYPYMcWzjuLAOB2sUXIA
+sbfllx1NBNQoReRwzzDxu/YoBxPwWC/hbMkjZn6yZ64pqrfwbFGK9moUH0wU
+qhLQuNtv2x0vxML1NpULK8FqOtXtk4RhtQWXFQR8ut2cv2wWsXTYo9OSAEHn
+DqUiGz7Kh9bLh2IJOFEbaHkiFbGQp0R1EdC3EFtW24LY238kyIoDpunD6bmf
+EIt/3llWzoGE+ndxTQIDFI9rTe9aLhzV9AncZ4cYFExTJFxIb0g5/sATsXjD
+SzOaB9PaJ+22HGU4amfcJXReSytiDI4hPkOcPqxEwsCtTsfwI4hDH1r4oTwf
+TWsm0p0QC/9m/CqPhG3hrfOrNjHjVc56v5Lga+SrZqGLmGUz6Yvud+vMAnr4
+eLx46NJk+ws+nt+SvUlhtJWP1+fHWo9HlfPx90usTf95upCP41v4j0Pq05/4
+OP4V72Kr753n4/3F7TieYl7Mx/sveC/Kv1X91/mctNVM3jb41/n1xOhHBSkb
+4PM1UTzparvZAJ9/0q582Y8xBvh+npvVzXk3GuD7U/3GOvCDiiG+3wfLYq4r
+uxji+7etudi0R2yI8yMpO9Tn+IQhzh+z0cS/ewgpnF975jOCx0IonH/kYM6/
+PX6mcH5aSCWvXXopnL/Rh6w3dM9SOL9LI48V71EX4PxPcrt8V6orwPWx/EZO
+fdBqAa6f3rwAiTtPgOtL8bzN2/uqAlx/cDXsrs9HCten0ivLqVWDFK5fkXqj
+tlEdhet7Dzer4P4lCtd/REdpvH0ihfuDSE2/720ghfvHHafHllWuFO4vXRVm
+gjAHCvefojK7g6fsKdyftvyybmyFC4X717jgVueZ7yjc36iZhoI16RTuf3cc
+XqrH36Zwf5yI+y2ocozC/XNgICrytIEA99dTXJnYN1CA+69PfO2nXVIB7s+n
+2mYkGnMC3L9zM6HtuJ0R7u8VZqrZ5ueMcP/PF428YQ0ZYX04GPbBoJNHY/2I
+NzPp7N5PY32Z/kZVei6ZxvrjIrD+8uUajfXJ3z7B6odmGutXT5Ypu+MxjfVN
+S7P/s1c/jfWvO2a8cKaLxvo4XhI22cHM/1M/PVWCan8sp7G+BkjrZfJzNNbf
+Lcquv9tH0lifq6Naa7rcaazfkX6vC3o20VjfSaVWTs5qGut//oxMrKdGY3/Q
+mPHa21mRxv6BcztRSbJghP1FjXObuq0Kjf2HTkLwnXYujf1Jzld2+4M30ti/
+CG9Uxb70orG/+VhY/vlYDo39z/YA+c6+Dhr7I5+0+JxstjH2T6ITOtsqDhhj
+f1URlVJvWGKM/VddsFC5UG6M/Vlj64ObHZvXYP/ma98fHpG8Bvu7+LVnjWNb
+Ef/p/xYUmPda+C9XmtaC
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.0548, 9.5}, {1, 0}], 
+        LineBox[CompressedData["
+1:eJxFlHswXHcUx7e7pUobK9sWu3uzFhV772130hJvjjZBBolkZsdbUUKLeg0p
+lYSIdEIWsSE606gKCYISHcmmEYnnJlGvbT0a0WXKLKslTUhMgv62f/z2N3Pn
+zmd+957zO7/zPV9hdPKRWCaDwQhFj/Zts76NljUw/l8U7Kwz0nPqQVwdo5A/
+JKH4Y8L2xHHElcYrbZdJGOsJXv98D2K2XKpfSELDtYxDv89aASPA15OTS0KO
+71WV5jxis4S+iDMkeG+vWvfvQ1yfqZR9T0JNl5d1+KYlMCIv1RXcI8Gn89sP
+w+4gvrug8nhKgthq/8+vzmo5fYdQTEGwxHu3Ogox4wO3rVQKqkx7soXeiH1Y
+i/43KbCYu5D+3Anxzcy5wC0KXDfc8xjOiA2ONccBDWQqP9DCC7FFUvNWNg37
+XnfaqAhDrHj3GOsaDedexaWYfYM4t3xA8ysNB274/aWpQqxSqGdmaRAIHTPZ
+fYgr49uG5mloa7BZil3S5pMPFUzRIPXVPB83QvWl5FQ0dtLAjHY2yLdBXLrq
+3CGjIWaOK5p3QDzybEIVTkNowB1y3Q0xWxTHEtCQ2csy9dHuf31lT+ofFAgd
+ZSXmVogjefcfyCig60eNIl9D3DqwOHiQgtu3fBIUYyj/ZNAMYUyBJ2dL2VyJ
+OIXB4U+SYJ9bH/iGRFuvS0ZrEwmLEROB/oba88Yb7i4hoUruaBL0ixDFd1ca
+55Fg0evBcUpADB0/ivJJiHl0osWEQFwayAgqJ2ElPFyqVlqgeO3ttR0k3I4X
+d+SWIa5uvOc3jzgiy9IuFLHBkv/kLgrKyxIWlGLEkbSBayQFspbViyUmiFXu
+ccwrFNQa2X4yz9B+zz2VvUzB2kGbHPuXAmCov3xrSUyDUfjI/bv6aF9dMNqV
+SIN9X3d7F1eb347Z+wMNhS9S/k500MaLH/i0n4aPdsiibEMQT743aD9Dg8sa
+kvNJxIrGYckC6vd0YtVEnW5f86R4p0yh+9/zfTc/mNfFT5CK93ps6PK/7F72
+jGUK8fnGZiY6udu688+5GMen/KOrbzbwgjk9oqv/VtGZxw9rdfcjzxs5cDJJ
+d38V7TVpprTufi13MS9P9wnw/Tf55U5JRQLcn9ao4seHzu7C/TM3PRwQqyFw
+f0/91hLwRELg/n/RwgqqHeJjfaR99pUoOYSP9SM7Hab22ORhfTXETKkG5Tys
+v23fF6PJ53lYn3vt8hs5p3lYv9bsB832pTysbzW7aGXjOg/rf8xNxD6i5uH5
+KMy7TtlRfDw/LWUlnD8z+Hi+go8edbDt5uP5Uz4SC4bfJPB8Rg9K3x7zIvD8
+Vv7bf7grncDznT6Xt7lVROD5b2KPm5mcI7A/DD/NMuxMJbB/OJKpbWJXAvuL
+tDjjov4yH/tPSMhqjXc+H/vTVUnajf16fOxfEeNER3omD/vbM7c2d9tpLva/
+746/EyVx5WJ/9PL34zheMsf+OZTU9xNLzxz7q6JQvSbNMsP+W63W+rMp9uf/
+AHbvO2E=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.25, 15.145199999999999}, {0, -1}], 
+        LineBox[{{16.5, 17.00000000000231}, {16.5, 9.999999999998607}}], 
+        PolygonBox[{{16.5, 14.1}, {16.1, 12.9}, {16.9, 12.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.4452, 13.5}, {-1, 0}], 
+        LineBox[{{16.500000000007276`, 17.000000000003638`}, {
+         10.500000000005457`, 13.5}}], 
+        PolygonBox[{{12.98173265946094, 14.947677384685548`}, {
+         13.816718930329426`, 15.897834175673825`}, {14.219815750748694`, 
+         15.206811054955079`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.323799910437668, 15.984057296392571}, \
+{1, -1}], 
+        LineBox[{{16.5, 9.999999999996362}, {10.500000000001819`, 
+         13.499999999996362`}}], 
+        PolygonBox[{{14.01826734053906, 11.447677384685548`}, {
+         13.183281069670574`, 12.397834175673825`}, {12.780184249251306`, 
+         11.706811054955079`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.323799910437668, 11.015942703607429}, \
+{1, 1}], 
+        {PointSize[0.04], PointBox[{6., 13.5}], PointBox[{6., 5.5}], 
+         PointBox[{16.5, 17.}], PointBox[{16.5, 10.}], 
+         PointBox[{10.5, 13.5}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T16", " ", "P1", " ", "N31"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdieg/fgfjhihjij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdieg/fgfjhihjij.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {0, 22}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwt1QdUU1cYB/CLgwaZImisFIJYRJAYlNooJHlAWsBRYloBlREVaUQs4AAq
+tEXUQh3I0IgDBdEaDit6tKFHxRRXFKGcFmhYEkUF62IvBfu/bTkHcn65L/f7
+vv99j9hviJFumkAIScYvfSUm9A+bIf/+uDBEFv3AZvsMhrDjVaNtznh/uPNo
+y3SGpCzYekELW81ddEYIV+xMCvgNdr/1U3mBNdZ9hg/T9fy5CYIpcHCKv/Qh
+PGnpq6TvrBiiPeheY4D9Q4o9PiSwvPRghhv8VXvIFMU07DdqcGgLvLcjXOIN
+61d/4lVK+3H6vM0Q1qxpvdUHv/S1TXhiyZDE/J2DHvMZclC5u7wZVmY3nEmF
+53s/7+qE61gX827B7BZFlBE+T14KDd/DR3bapHrAfsHWKxe4wu5PVN9Sd6Vv
++BK+ti+to5La2aRmM1xvuEI1Gf0Sm6CrcXDyvNvH/WCL4ASzLbD4caQ0FR52
+WbkuECa77o+VwhzPjR3ucN1IavRdOm9F4j4WnLm7IKAaVvok//wn+hG/iFmv
+hjVqS6vjMCc+evd+uOtrq8frYKsi1yoxzMspEtvBK66lyjvRn0yukz+jeXo3
+t+yg84mjVl6GT5mVpXdjftVVo9MHaH7fhf8SRvO4E579Dc3PZ7/01lSG5Lre
+/iMM1loEXnaE89W6jaGw3P/S2gMWOD/lwPEoOPbkilVvzBnCN/zY+kfYz6nn
+s0dmmL/o6u0yuGLp9YgBU1w3K3rkMcy6GN68EB5e5BLLQb+Zx+IaT5ug/86n
+CRGw7GDeck9Y/uiSaQnMm7q22hhmvXs2oR/WcPu/p+5q95mzBHnppULhp3BK
+aNj6RFjbfq8qHSbxQb1lcL5y4cAQ3a92xq5mWG56U5KE+kQqdxih6xPOB7PQ
+r944VW3ExX2zbIx9BNYq35cYw1r+tdJpmE9Zl8h9T/fvL9Imw4xxPPspPNwm
+4N2BOcGNrytd6X02z60LTm9yup8BOzEOY62wdrBdEATrPNf35lMHneTPoudd
+FqhdCMtemenbMJ+u7KczOajP8/OJOgsn2lX23UG/wT4mg1vgrriP4v6g8zSc
+ihDQfNTysuvGqMtMXTyTXp+V8XvWFJxv/LkoA3p/O862XmOEfMxNooaQf2KY
+TZgtC+ed4Nz7Fk4pGS14aciQ7uyXpub0et/SzbWTcV6hN614tJ9nDStrJqG+
+geZSKBzcqUjpmYh6oa+Hj8IWfxbKvWBJzJydjbSfr2Kkv03A+zx7iQ3m02zy
+8tgOax6kxUbAsRmaikBYFsAqKHalz9XMcTnMrmlXv4ZZu34cPwc73bx33Znm
+n5laPJHW899jGQpbeKqXJ8NMle2hPXD6ushnk9CfTnxCcQqu8+VWZsOq8jjB
+BZj/TtDwIeZR5nl4FcKZ35zZkQ2zN1VZZ9Hz9mGr3sD549va4mC5fLl+HvKQ
+e0eu84VzawSmS2HOp6q2aTDx54hnUQuJPb2f9E+F9ffx+UT3N9w8+jxPnxvr
+B6tcTvBldH3NFjcF+smdFBjjSM/bvP77CvSvuhHe1ou8cu2WNF6heeVtZbQ0
+f5KXrDDA/navO5XUfuHsCIL1u0dyFfR5mfzXDum4iGhm5MRnw5JziysevRUR
+mef+oVM0fw9b1YEREelKe9x6Be6WjmsjhkQkcU/t4lY4P/xv5x8GRCRlY32M
+GfpJOTza9LxPRFhFAbJl9LwyZGPlvSKiSxuVH6L9v7cO1PVgP3N+Tj3Ms7/x
+IgKWBGRdsUEemoHKPik8PF54YgN1ZEnfCbh7VaETzVtWlvSRG/aTK/amtcB6
+x+f6yagXW2sgNlqAeWIdig37RUQfc3OrM2zhmlRti/50XGG5AOYls7fxBzHf
+Erswb5hpSrgmwDysh8l7+LC+/27VzGERCW6JbOHAJIh//FeYU9JS/Q71uptb
++abIg0Oyv6yl5585KGbBOsuonmO0n7eOhWdxPX/k8r4QmPnCs12H/SVPq7l2
+dJ6t2tUlqE8ci2d30Plttzs40P72bU6j969EXdfki3kyH2xbkUTz8gocc8L8
+uU82GK6GZU2S86pXmL9d+PtS+v+m8coH9V0iogzJmc+l+Vf6Szo7UE+ofke/
+bzRZvZ3zHyIPxcxohq7zTtuzG0SEOW3bF0ZdtGjv9XuoP3o+ZD/9PpnoprFU
+Y74Xz+s1rv9/Tx8R/PfKZf4BIR3UrA==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.545705156331749, 15.828020625326996}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwl1Qs01FkcB/DbZJnFMgyKoxojPeWV7anmrweKCoW2nWrSU1o7JVJLHq3X
+JKaIHtLUqdSUkkUhNdFmNctO6JSIOdrooZo0FZrY7z075zj/83Hv/97v73fn
+/x+70F8DN7MIIXvxR6+kYxifUQzR0KslQy4V9r7KhMk/Hg1Z8IH9BgpDWGrm
+sP5H+Bbb5+MeK4a4jEsf9cmCIZdv6q634f/SNyP1m2Ar/p/n5sKykFBFA3z2
+uPD8KVyZHLvlL3EtWPlqlwGuxRYmk3iYF+l5but+LkNEI9h+u2B2QP50A1i1
+7O3Gp3DJTEvZeXPMr77+LRD7nrU6sk4I81obHz6Cp5XrdTvCKp9YCyFy+hZ1
+rR8Fy24cbeiAu59xL9jAaqdqt5DRDGm63BzgDhMnx+HbsNvG2qciev9Q7T2O
+NUN0M07eOwlr/Ba7+cCL6qa0dsLSnfa+oXDB3qrwicjH0+NnroWb+RFnd9C8
+d+rZc2BHkfruJeq1FcEDWF981WdPK+zi1ZZRQPdT+475AnOqM8yc4IKt5v1D
+MIms2FiEvGuycza/g/1vPGjmw4dPXBmuhRkVcTuKejXP3a/G0/ms4Ggj2F7r
+dZFP1z+8bksG+uUqSd90jfbH/495Y+FfmkP2Tqb9kK9cex99Vz0TRhw1w9XD
+XD8drnL6mtjPYYgiSGoXBq9URm9eDUvjpLbbYJMPp7ujTDH/VmpLMqzu5NT5
+miD/UuFxBcw+umLkvB+wv+nchZbYz4+zTxVojP22hf0cDwdHFUpyjJD3Hit4
+ALbqrw4ygF0ay1tjkb/dmdVWZIg+1feYjUS9c4wrJqTB6iyWQTIsEucWZsPF
+0cf7v8LmVt9WKKmrS0s3oH+KA+sfT8R6jPR9TzEcsyBytIzu9z4o9AWsVkam
+TkYesj19mQ4ur4+tvAn7D4kDtPBNvs03T+RXm5w43wDrBk/2VMCiL2EmErhm
+UkafJepNSFx03xFumdsy5AeLEhtXViJPTHypMgQmn7eumAUPHcpd5QqLRzTZ
+FKE+2486s8dYj9NZmDkOJiZeNktov6ofnclFPxhNHk+CPGLPFFNreFIaCTyN
+/OIzXFKE/h7TSsylqNc/NrQihD43bvJTm7/H+X66smYMzJ/RkDmFjfUqXQoJ
+rPvosPq1PsbH7OpiwfkTcq4Wf4e8HV137OHXMa59aXoYD1Zs2QA7pUw6GTcS
+6/d9Tr8J79bzKcljYbzp0ZHxyGN+f4qwYwTOvy6s/TSsfdIWGwy7ZMXr7FFP
+prUshkXHd+ZbyeHAUgvLLoJzaatyn4p+ROxwju2DZQNBZ2SwxPGLyAnzxdb2
+8/XQT8P2UYsyYenn2c3+8L7VrS1s7K9xkgQmwZVJ2WHZsP+tpca5sPC4JJ2P
+vJqe8of0fGy5gkQ5rFav1qPfh/LQsoFxqE8abnvYBp5xl3swBuasCXtMz8tG
+47zwMvXvqXFecFqXp/V12OV+vHst8qeYPPdJhsV6ByJmwheDFFkOMInJNJKj
+/nMHO5YewX6Kt0mED5fGaHc2Il/xMcdv59E/nxfcnZ2oh1jWWXrAL9dldf2N
++kUbhLtf4Tk1zvP7iRkWEIVzv2UJvEP1zPQvnYC46HPyjsH59d6vvAcFRDpU
+ZVYAewyX+D7+IiCabVGmNfS9Y7OgJeMT5r/gZtHzXTUtxS3uo4DwIqvGCuHx
+qje2lR8ERPYknP2APu91heEBGgFJyNNkeiHvxbJw5bF3AsI8sJ2lhGN6/z28
+7q2AqP2O8ALo93OwZEJfL+73frLqISxLDuR5Y1x0m5m6GP1SGUb5e+N+zSHz
+ExeoM7Rdze8FhFN/KlkDu5ctjH6O/Xj2S1jj0H8yJU0+iDy8GwtSnWGLoU1J
+o5GX2C82tYNFeaPzHbRwVr2DFvdrU5ZHGNH6puk65XCGSVJ4GSzzaLzrA+9u
+rzEy/4z+HUqUNiFfr0J8jQszL/stlsOxT/auuI75qoOvVXdRX3uAa1831i+W
+V8ndYYutzR1l2F96dVEOfb7ae60Oje9D/TziOp2eFzs/YD7yM8+nJSjpe3dq
+a64D+sFEeWb9Rt/Lht3Tt/cg32DKLG86fme2MqoL/VX6fXChDpWPfftUQPyv
+WMlnw4rsjXEzHiKPb3SNCE7QGdsuVKCfuyeYnaPvcfpJqP7/95fL/Ac/lbt5
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.128720493773297, 4.310154074720437}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.00000000000106, 17.}, {16.49999999999894, 17.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.25, 17.6952}, {0, -1}], 
+        LineBox[CompressedData["
+1:eJxFlA9QTFscx7fUvDJjee+JGuXPvefNY5Gcq9VkJr/8eXbVa3qkUsafVfqz
+prJpUGJRNLymPLZC78VEWhH5U2vRtsZKjJSKsJJpp2yZUYasJu0752nOuzN3
+7nzmnPs7vz/f75mhSF4V6ygSiVaQl36fjdjt9r0+IPrvQeAfLG5OOkU4VPHj
+pnkI/Jb7fMvTE1b/4zVtDYKYYnFchpmwi0FSkowgNr0yVyKaD6JIg7YuE8Gr
+8Tk1BxDh/JA71j0IGqbM+xArI9xZbBqXiuDcdHPIjUTC/S+tl6IQNA6YJsYd
+Jjwz/0SLFEFcXuHwn2WE6yoCnV0R9HgEKTbUElZvvuLbwoPb8SHD8mbCTW/N
+lYU8TM6eL3ndQXjj0FdbJA/Br3yzhrsJx6d11XrwYDl+NqDaSjhH9lOVmYOy
+yPzciB6anzgs/iwHIRd6psZ2ErZpsuSpHJgnTU7TtNH11ZnKIA7qJZl8Qz1h
+UUK42puDr6JlgQ46wjpT/10vDnSXCtPDztP6Av6yenCQsHjWwq4CwrKgX6by
+HFyVvg5/dIjWeyNl2I8DwWnE1TODsEtFVEEUB9sdZ8gfbqPnG132HOQgNHd2
+YtlWwjs7ktr0HCgjWpaupiwrLVV85uCHQTdYTPdPAK9ygYfxxTO1JTSee2uj
+XcWDUT43JukIzW+JveYKD3LjMZx4mta/r8Snl4ewX3N3eOgJ+73v/OKJoO9j
+3uYnz2m/l7VafkOQxhl+v2YjnKL44L0FQXbpor6GKZjUJ9u1bxf6rhOg7Og6
+Vo0gfd29idKY/9e17XA1+BBm/wsuKcU+5ZjFr2hX5XSbMDu/OmDrY80bzPIL
+qH566ugnzPIXb3gevtFJYPVNcu411IkFVr+mfM7tiz8LrD+XVa2atZRH+6e1
+dVT70v2j/e0ddBjsovFG+6+8x2kX2DCbT0HdsweeVszmt2JVfHZFO2bzRUO3
+akfqMZt/RNN+s1SHmT4CLe8OJ17ATD9Va9zfnizBTF9R55NV5UWY6c9/S7RR
+XoCZPpunPcwYcwIz/VrTG9u4M5jpu1fpDPpKzPTv3n3979NGzPxRo4wfk/oC
+M/+Euvr3FX3GzF/Rb/iqlW4C85/U0jTh5EKB+RP175DtjhaYf3XqP1RtewXm
+75vrB4qySgXm/3r9E8cUk8Duh/vXBryPWgR2f0gcqGAWsPvlXyACxJo=
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.25, 8.354800000000001}, {0, 1}], 
+        LineBox[CompressedData["
+1:eJwd2Hk81OsXB/BvthCSRLYMCUUMWim+3bIUlSyJrCWSuJQQqSlkS0iRrea6
+ol8pa0Ulc1WytLio7Ea3ZEmRNYXf58k/Xu/XOc/znHO+z8wwSgf+tDrEQ1GU
+wjyKIr+p4Tn8SNPU7x8pmmozXbwpcilNMXieq5nBseaml5bI0BSzvGcwBN6Q
+bTKUD3NN9F9egeuEuwdNZGnK0u71jlS4z9tWvBseHmv5eRouW/Rt2E+Opjj9
+jrE7YYkVf3tOwYWRXwr54A6X4Sf+8ji/b1o1bwlNWfwcaW2FG9pY4RvgwH08
+e7UUaIou0ZWqkKSp/JozOT4wK2OgbCMcoZIllwqzWwwzShbTVFVP9MwtuPBc
+iDATDhnNOkHMld67oVSCphLDKuJIfmJJG48xzC13EDsBu06+quxdRFPfG1QD
+TMj+vl2iWXBdcc79hTBjLubOETjAbqPaW9THCnc/uAdOlI6mM0i9HnMff/uC
+RKAHPHyQ/tcbbv6xgs8AFl8WUkr2E/skXyUPczxkl36Cj7p/mBKD/aa3ZRmi
+nvy3gUaSsGWigVIuHCgw7qwFczcLD0ihH4mlJkbOMLPtSmscXPzBpvNvOFHg
+U84cvFRfw3wWZpftEvXBfEojpsq9UT+HpSLzBm4TSonvJ/M0DNiuhPmGVNwP
+DliGeunMOhfYJOgSW1ARLsvJioLFj8RV/wVTXtfLUuBbffyPFBioJ6lA/gKs
+OWWbfhhu6KrnepL8N+b2BcT81UwNOPZz8q9vsHh2Nt2C81/+aq9TV4J16tYc
+g1fPHXfZBw/flaRmUL9B+/7yMJgxuWxjGJzuIWdyFW7QetA3iXm88fj2OQ+m
+lwRbH4ON1whN5pP9hLo5I5in5JumzTfhxPytf4TClQs8h9NJ/gaZU4vhuAuR
+18+T8x7UHH8ijudhWazmQ9bf2eJ+Bva4L5llSfL5pDL2wSx9vrV6MJc33cUc
+vr9LS0uaxO9JfrKDj7+wK5tFf4zuK2ZhsKd3ZccgzBqPTi+HL/7JOMyFqeKs
+USGcb778j/edJL9I5TK5Tw1pvSafYGZivMh7uKrpuecknOi5x2cH+jtkLR0k
+ifOYhttOVcIiX6cNNsGsbNEhcr95VTuFfGHXgx7pafBEfMUL0j9npLBiDO4a
+F/w1ALOzkpUNMe9vmVEdusrYr9/Dhsx/U2CJ22k4seHC04vw1ms3HOvhQguF
+niR4+8ydi9LLEW9+rB0KS01c+ccVtnzTa2YOS5REdefA4i+OveMl9ys4VegD
+TAWns/Jwfijz520pFfS5auu/G+GvrCUJW2BGG0eU9FOyMfOjG5yYWCi4CR7j
+sbAMgrmtHUP3MA+z0PrBs2S9n4uwLqwrctn4HEy37U++h/lqXP7icJI4p8LH
+GJ6yWB9/GKZelnyvX0hTP18IJO+BOd1OT9fC950zDq0j8XzWl1diNLVeKUlD
+htQTE7j0KqwamaP0C/XTN23fXoGL0qPP9cAsCZWIanjofJNvPcxwuOCihv3u
+8fK/ewSzC+rSSmCx6mtupWQ+90zNdFHPtBPz4H2Ye95aOA3OcF1aXUX2V9Jx
+I/dhnHOZv43sd/Os3mnYuzFejZxv+SFg/XeYHWjzWB31ia8e1HDFfHiT9/7n
+DA9b6S96Cq+wTbXJggvbtV3I+8NV00jfDzBLXmjdXvji5FVTzRXIL9wdfQb2
+65+pCoY5dW8NEmGfLI+85yvIffSho2Djt5IPxFURf+WR4Q7baknU2MHDi2w8
+V8J8wsntV2HuqmU173G+X9V5vUbihA9N5PU4M+B9iEcN9ysuzX8W9f9BZXmp
+w5bcQa0zcLG2X+5WmNE/JzZNXl/KxRPWMGdsj00AbMmz7rY9TJtVJfRinvPU
+j0TZwq4nVlNTmH99pVS5Gcw2/ctaFc78fL1+DVkf+M/tk6K4Pzq2qXIwa9+2
+9CkRPJ+5c6vnUJ+r6GxrHvyDX6Gqh9S7uE4uFvZVGU1+TuKPQvqvwzv3+Tfn
+w7SOIPszrH5sOCENpuYZnnXC/opSqanxMMtCveMnbFxa7hNL1gdd2PEI9eiZ
+xK9NgtlVb6lk1K/Y3pGbDSeGx6VsQn9VtSYClWS/9oTCIvjlJVvlXrhQ/8rZ
+5ZgPr/xlW2nUX7hIl3sBblGLit8Diw/pz/bBlwW37E0m/W6/m6mHeZs+kxho
+I/l8KRu9YL7dRdtU1RH3+ro2ClYQoTYehympHyNx5PUmdiW6EmYere0KhAtf
+Tv0UXIn6OywizOB3E+khO2FOTXwoDzy+46RSHMxc/qdTHnl/sgq345B4eEau
+Pnl/jerqGoT99N8ncdCPs57lB5FVqLfKYmAz3KSyaVYZpvTDC/7EPJ6sf79N
+C+bWVO/0xLxupLlu1oYZb0QZPphnRNSRLlWSz4maIc9H+ppfuBRM/y+zvHYB
+TWnHaXbN4Txqa+ozJtz3yvTjR5h9w7z9uTDujzPz4QuYJbqs9gJs3jWWcYvE
+8wSMouCHCsrPE8j61xb/lMJzbrn7TpJ+vj/Jl8B+EqlPtnuReYxoWWfCRfa9
+Jm7ER+dWm6MeWaW7eQfI/hlsFWnU+3eGgbMvzPgf78cJeEW7+FAE2S/YZisX
+/YX0RLvlwlzGw6Ia9J/iaGzdSGxn2GyF+dRIXO6bj/4aol0u3oeD2jO7jcn8
+5KkJYcx3aMd4Ruwqcr6nogWZ9/X5G5pJvmfV10D4X5GkNIYG7pfYo40x8PZh
++2gf2DWmq+sseb3t1a0ugznvmv91hZc4a6tRmnjuE5/k1GAnevn/tsDUTHXD
+O5yfr2AVEwoPa6tPHYPDy4Pt8jXJ++dQ6yzqP+htx98EsweOeM6D3cxkvn8l
+68/bJk+if/kj8iNzJP/tWOcg5vWXcaO5wGr06/+2vQ/zTJLNecIDs3afejqF
++d/xmvGbQD53XGJOBQ593tj3AWacL60+IYTX+zzN6VoSf3LjxYggTS2oOFhy
+B2aFruvIgvNujpgkapLPd7v3p2Bfl4LR48QeSz0SYHog9YsDyW9yFGyGJdnz
+t5iS/YTElEyxf13WqWp9Un/DcoX/4HU9L/jWk/ys1gI26vnndcSKzSRfOVop
+CPW75MZ83knid9/ccUR/VTdbUrxIvXdlh0zQv+QqL6Hf9bzjM9bA829KHWRz
+SLyqz2EO7ntwYs80We/yJLwc83vj9ibfAPMQZ5ulqJP70Pdp5Bxs2X4pwwWe
+C6pUfA0zM/2Xk79PcguUFshpYf7rDoRFwnWseYGesKvBkCB5Xl9bnqgVwYWW
+RzeRz8OCmRX8EzBTeAGbgqM/6qqt0UZ+jn/ITpzvbsL+5gWzesMEAlGfobi7
+bApM+ZtsC0c/kyqO9Q9gdmfDw9Po9+X91NTXZH2LRtExzKNMqDWmDWY0uVd6
+YV5vdRWVO0i+oaSjL+Yps3KzZTPMeW7jHYv5p42WeT0jcd+Bpur5+Puw0FXu
+LtkvTE5RA1b207FLhrnG29UqBGhq/2lro0BST/mDFhZ8c/HChfYkrqA1Pxge
+0inmMST77dN3yIatqryN1Eg/jYOWM/CZAMZjKZhu7HSMwP4T1nqaYmR9mM9i
+HdSTwas2RMzxEDz+E64Z6JyUIfnheRvbUH9F7tJ32qS/zw1mT9GfolNOpiXJ
+39UnkY/+k0WCB0LJ+U06ouT9Sqyy7kshyZd9oGSN+W1vnPD8SvJ30/KzojTL
+zOrQARkm6jN8IRouRrNsItvFDWFGgE52O+ZfKZCk507ixcXuvAtp1i7NeQWx
+ML117Nsk8n1Ofj5YSOJnp+aXw++1XQ2ayfqi7EwzWNX9ru44TLW8KL2F81LW
+qXtI6KA+4dt/fEJ9u+Y3yWrAnIZH/82h/jPlptWGMO298yIvHPkwRnKnDnl/
+4zCn0f+iyqRBW5ibu87kqyDN+izicdSexLVtDw3Mp1k3c0pH7Ejc/sOrKQGa
+df7S7AIrst+oyLQy5r9vLCzUjOTvFdngz0+zyqoE1TeReIKX5QAfzdKRNZPW
+IvWYP9yUDH97eMdNkdSb+nHElw//j0xcU10EU+7a9GnYodKGxUfOywquq0R+
+dvFo0DST/L/zTZKJ/ROiHKdHyXxq792qhY9lrn49QuIar/ZFor76ILe4MTKf
+uI5QB9wH78cfL/8i8+sJczLC80/qOSwpTOrtW5m1Uohmufeyp+RhxrAVW0yY
+Znkzf46vIVYa4/sIt/Q3xOwh9YVVLmIvoFnmf/fN+RNbaSnqi9Cs0nfiIVdI
+v5f4xm/BwoasHw+JlW2WDsGZZSlePcSFpQIzeD4OkbG35+vCVdqOrYhfTQjP
+1oS5oyYfziGu2/aX0W6YmvSP+oXzHEeOxvvCnKN+RuZ4fip3mA9jYJZR9asT
+uK88zPcMNvHaG6ci0I+aL3d3Edlv2v4pC/2ypzTEKn6bjxuA5ynm7ub0FGYE
+DR/2Js/zcOfJZyRepN3my4/6ilRaOKS+TgeVGDwPe7kpxXIS19fe8pQXn88l
+Rivuknqm0xtV4P2LZbp/n19o3lDCg3m98nK6RNZ7bDQNgBvDPSrCSb5M7+rD
+PDQlHBGrEAiz+1fuToA3151NOkL6bfaz+Ix8zrMoqQPEA3seePPSrN32ZdFO
+pN533lukUM9Bv+o0YtdV56hu2M34VC3J56799fQx6u8M2evqQ853WhV8A/3t
+MA04Gkb2m1FKvoj+136Z4ZD6uLJXz/vgvtfKCU7lk3qGv+hswPxUJbmB9STO
+d3X3J1ho9aWAIbLftr2tRzFvtWB3Hgk97Leu27kG92O2v3/JBpjbG2Q+ingw
+c8tlZ5hhflx6EPEfN/idI2D2++iDBYjvN/Dff5Osf9z6awviBbKa0bVkvc3J
+2ly8Hlv0d8z26pHvJ8yv/Yf6Zsn3N2Q/8v2NIP1/jDpz6w==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.272475489649668, 5.171062742038147}, \
+{0, -1}], LineBox[CompressedData["
+1:eJxFlgs0lekaxzeSRqXt1rf3/oQ23/apZJtFUapHJyWqQS41yiW3UeO4zHHN
+uERYFKUJKdtWNGWXsyu3cRuF9tAocteFVHLUaW3KYUqc9ztn1jvfWnt967fe
+/b7f877v8zz//+ojIc7+iiwWqxj9mPf/Hw589b/3SmB1OvLOiglYevPZjaUR
+iMVs1zoXAoR2TjztPxA7iqhWPQIyor8r8UsngDXivHJWiYAzdNF0qy4HWPp3
+Y9MUCRBpzaRWVSOGB3QySUBd//2kvH1ctF5iW99eAmynFZ+MPEcMLm2ueQQk
+b9QL3+/HA5bwtG/3RwL0f7u8hH7CcF+j7REO5KfkqFoBCaxEv9ypIQ68kocc
+pM4i1s9JunKQC4+UqQtHf0fclJM3PMCFXM/gpxGTiFm/Thrt54Esen72OksH
+WKGuIebNPMh4b77V4zMadxzmrTckoV8rtLHpJWJ2jeRVGAmPv0Q8fFLPrO/T
+M3eNBJ3NFu1uGYjFHw5ry0go0IrIOuTIjFdGvmgnIesP18Cjmkx8QvWNFSRY
+X0kN1R1A8SdqVLJTSLCfNslcdAWxfu3NE9YkWNbqrPKLRiyfW14ywoMjbNMW
+9iHE0qVp3/+DB8+fOS0BJ8RNw5npc1zwHBMP+3+LGPpLqXgubA1ROM2NYc4n
+xeKXeQ54VacpLypnxsM5LckcWOX3tmhglpmv8+i8BgeWFZd6HTiA4oPpZnUp
+AW6ruTVe7cx+Jq1jvAkYuL9VOO+Azqfpwl5rIwLE4rcvcgcRe69/3L2YgKfv
+4oOXhKxC8y9yrrIIeB/Kvjakoov20+w/o0XATpVM1dAixPJIxTfbCRi5HtZo
+aaaH9l8vj0Z54ubM1nxdw/DUM8koAbyTG3Ptufpo/pRnwV4OOFXpvE/ai7gz
+cPHVFg64zdj490YhlpdEl23ngs6TfaYheYhDh3ZtuMcFmV03Vy5B3NRlINvC
+Az/36qs/VDLzM5sXS3kgsXo4mFXB/H/fG2UtEpykJrLdZcx491i4PwkBH4aN
+tfIRs66FtolJyDb/Nqkygfme5rGYZhKEvWH+Vr6IE1V2K6G8CpDbTAzsQCxV
+KlhSi85NV7Z8VICYzdZ1zCKhxSNrq2gps55U2GBPwqKhOOPwCbTfzpJ/bZri
+weGer687PkB8Rm3oYjoP3kmGUtc1IJa6t4do8GCRe12c6B5idp9D109cqF9p
+3BDwDLE8zMFEmwuZpc1t61TQ+iMK2ioXOPDIyYUnWYPYMcWzjuLAOB2sUXIA
+sbfllx1NBNQoReRwzzDxu/YoBxPwWC/hbMkjZn6yZ64pqrfwbFGK9moUH0wU
+qhLQuNtv2x0vxML1NpULK8FqOtXtk4RhtQWXFQR8ut2cv2wWsXTYo9OSAEHn
+DqUiGz7Kh9bLh2IJOFEbaHkiFbGQp0R1EdC3EFtW24LY238kyIoDpunD6bmf
+EIt/3llWzoGE+ndxTQIDFI9rTe9aLhzV9AncZ4cYFExTJFxIb0g5/sATsXjD
+SzOaB9PaJ+22HGU4amfcJXReSytiDI4hPkOcPqxEwsCtTsfwI4hDH1r4oTwf
+TWsm0p0QC/9m/CqPhG3hrfOrNjHjVc56v5Lga+SrZqGLmGUz6Yvud+vMAnr4
+eLx46NJk+ws+nt+SvUlhtJWP1+fHWo9HlfPx90usTf95upCP41v4j0Pq05/4
+OP4V72Kr753n4/3F7TieYl7Mx/sveC/Kv1X91/mctNVM3jb41/n1xOhHBSkb
+4PM1UTzparvZAJ9/0q582Y8xBvh+npvVzXk3GuD7U/3GOvCDiiG+3wfLYq4r
+uxji+7etudi0R2yI8yMpO9Tn+IQhzh+z0cS/ewgpnF975jOCx0IonH/kYM6/
+PX6mcH5aSCWvXXopnL/Rh6w3dM9SOL9LI48V71EX4PxPcrt8V6orwPWx/EZO
+fdBqAa6f3rwAiTtPgOtL8bzN2/uqAlx/cDXsrs9HCten0ivLqVWDFK5fkXqj
+tlEdhet7Dzer4P4lCtd/REdpvH0ihfuDSE2/720ghfvHHafHllWuFO4vXRVm
+gjAHCvefojK7g6fsKdyftvyybmyFC4X717jgVueZ7yjc36iZhoI16RTuf3cc
+XqrH36Zwf5yI+y2ocozC/XNgICrytIEA99dTXJnYN1CA+69PfO2nXVIB7s+n
+2mYkGnMC3L9zM6HtuJ0R7u8VZqrZ5ueMcP/PF428YQ0ZYX04GPbBoJNHY/2I
+NzPp7N5PY32Z/kZVei6ZxvrjIrD+8uUajfXJ3z7B6odmGutXT5Ypu+MxjfVN
+S7P/s1c/jfWvO2a8cKaLxvo4XhI22cHM/1M/PVWCan8sp7G+BkjrZfJzNNbf
+Lcquv9tH0lifq6Naa7rcaazfkX6vC3o20VjfSaVWTs5qGut//oxMrKdGY3/Q
+mPHa21mRxv6BcztRSbJghP1FjXObuq0Kjf2HTkLwnXYujf1Jzld2+4M30ti/
+CG9Uxb70orG/+VhY/vlYDo39z/YA+c6+Dhr7I5+0+JxstjH2T6ITOtsqDhhj
+f1URlVJvWGKM/VddsFC5UG6M/Vlj64ObHZvXYP/ma98fHpG8Bvu7+LVnjWNb
+Ef/p/xYUmPda+C9XmtaC
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.0548, 9.5}, {1, 0}], 
+        LineBox[CompressedData["
+1:eJxFlHswXHcUx7e7pUobK9sWu3uzFhV772130hJvjjZBBolkZsdbUUKLeg0p
+lYSIdEIWsSE606gKCYISHcmmEYnnJlGvbT0a0WXKLKslTUhMgv62f/z2N3Pn
+zmd+957zO7/zPV9hdPKRWCaDwQhFj/Zts76NljUw/l8U7Kwz0nPqQVwdo5A/
+JKH4Y8L2xHHElcYrbZdJGOsJXv98D2K2XKpfSELDtYxDv89aASPA15OTS0KO
+71WV5jxis4S+iDMkeG+vWvfvQ1yfqZR9T0JNl5d1+KYlMCIv1RXcI8Gn89sP
+w+4gvrug8nhKgthq/8+vzmo5fYdQTEGwxHu3Ogox4wO3rVQKqkx7soXeiH1Y
+i/43KbCYu5D+3Anxzcy5wC0KXDfc8xjOiA2ONccBDWQqP9DCC7FFUvNWNg37
+XnfaqAhDrHj3GOsaDedexaWYfYM4t3xA8ysNB274/aWpQqxSqGdmaRAIHTPZ
+fYgr49uG5mloa7BZil3S5pMPFUzRIPXVPB83QvWl5FQ0dtLAjHY2yLdBXLrq
+3CGjIWaOK5p3QDzybEIVTkNowB1y3Q0xWxTHEtCQ2csy9dHuf31lT+ofFAgd
+ZSXmVogjefcfyCig60eNIl9D3DqwOHiQgtu3fBIUYyj/ZNAMYUyBJ2dL2VyJ
+OIXB4U+SYJ9bH/iGRFuvS0ZrEwmLEROB/oba88Yb7i4hoUruaBL0ixDFd1ca
+55Fg0evBcUpADB0/ivJJiHl0osWEQFwayAgqJ2ElPFyqVlqgeO3ttR0k3I4X
+d+SWIa5uvOc3jzgiy9IuFLHBkv/kLgrKyxIWlGLEkbSBayQFspbViyUmiFXu
+ccwrFNQa2X4yz9B+zz2VvUzB2kGbHPuXAmCov3xrSUyDUfjI/bv6aF9dMNqV
+SIN9X3d7F1eb347Z+wMNhS9S/k500MaLH/i0n4aPdsiibEMQT743aD9Dg8sa
+kvNJxIrGYckC6vd0YtVEnW5f86R4p0yh+9/zfTc/mNfFT5CK93ps6PK/7F72
+jGUK8fnGZiY6udu688+5GMen/KOrbzbwgjk9oqv/VtGZxw9rdfcjzxs5cDJJ
+d38V7TVpprTufi13MS9P9wnw/Tf55U5JRQLcn9ao4seHzu7C/TM3PRwQqyFw
+f0/91hLwRELg/n/RwgqqHeJjfaR99pUoOYSP9SM7Hab22ORhfTXETKkG5Tys
+v23fF6PJ53lYn3vt8hs5p3lYv9bsB832pTysbzW7aGXjOg/rf8xNxD6i5uH5
+KMy7TtlRfDw/LWUlnD8z+Hi+go8edbDt5uP5Uz4SC4bfJPB8Rg9K3x7zIvD8
+Vv7bf7grncDznT6Xt7lVROD5b2KPm5mcI7A/DD/NMuxMJbB/OJKpbWJXAvuL
+tDjjov4yH/tPSMhqjXc+H/vTVUnajf16fOxfEeNER3omD/vbM7c2d9tpLva/
+746/EyVx5WJ/9PL34zheMsf+OZTU9xNLzxz7q6JQvSbNMsP+W63W+rMp9uf/
+AHbvO2E=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.25, 15.145199999999999}, {0, -1}], 
+        LineBox[{{16.5, 17.00000000000231}, {16.5, 9.999999999998607}}], 
+        PolygonBox[{{16.5, 12.9}, {16.1, 14.1}, {16.9, 14.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.4452, 13.5}, {-1, 0}], 
+        LineBox[{{16.500000000007276`, 17.000000000003638`}, {
+         10.500000000005457`, 13.5}}], 
+        PolygonBox[{{14.01826734053906, 15.552322615314452`}, {
+         12.780184249251306`, 15.293188945044921`}, {13.183281069670574`, 
+         14.602165824326175`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.323799910437668, 15.984057296392571}, \
+{1, -1}], 
+        LineBox[{{16.5, 9.999999999996362}, {10.500000000001819`, 
+         13.499999999996362`}}], 
+        PolygonBox[{{12.98173265946094, 12.052322615314452`}, {
+         14.219815750748694`, 11.793188945044921`}, {13.816718930329426`, 
+         11.102165824326175`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.323799910437668, 11.015942703607429}, \
+{1, 1}], 
+        {PointSize[0.04], PointBox[{6., 13.5}], PointBox[{6., 5.5}], 
+         PointBox[{16.5, 17.}], PointBox[{16.5, 10.}], 
+         PointBox[{10.5, 13.5}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T16", " ", "P2", " ", "N32"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdieg/fgfjhihjij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdieg/fgfjhihjij.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {22, 22}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwt1gtQU1caB/AjtjwEIshDtlAQzAKuRUOX54rJpUKxksGAvCqMIiOIGiVF
+aYMiG4Uqsm4LiDa6FHkEDUIhIkKwyvAqRJYuEW1BsBApICLViFgDIuz/dDcz
+mczv5jz+35d77sQxPjksQY8QkoU3/STqRbz+xJA/XhyGjPyrNboQLu755pBq
+PUOazpZyXOBV9iuCLsDpaYrCMhuGmI2djjgMbw8uDbGCxS3EOAa2bKkVSlYy
+xMfqt/AQuIj11e4n1livwFlK/TDQ6/twWNpVVEXHd6RPDnZYMSTa1nKYrld7
+0XliE2x4t0onhVPO/pDTY8mQzdku/A446aqbWghry8xVc3C7p/e79rDqaZH+
+e8ivb+FZNGrBEGXUpnZvOH2fm0sLPH8hPigCtkv4beN1uPvFmN9nMCfV+3wj
+LCs5F58DW68aMuiFp+62FVyCB+Tul2dhxXeVAzUwd65l+AO6n2hBdBMeXWZX
+vgfWPF7b2wRLkoYKyuGCEya3bsE7/vPx2hHYJKvmwzo4x9rzpQ3q8xtbJymn
+eWe/rg+EZaoc9zy4UL5QuRtmX6w2E8MaG4PiFNqP2xrbGJh/rHflAZhzY/bI
+Bjjfz14YBgvu96XQ+rd87DHoCGt81tdMoz9TBi55g9hf/At/vha+qP69XAL7
+REljxLDcqc7cAm6W57ED4bkAh2/OoV7pgu8OW7j+TVW5MazOZVXMr0OOpV4e
+aSsY4toZ6zYJ9/ePnxsxx/2gqPlqFO41Dgjmw4rDw6NPYTud/92bZrh/uKzv
+F+H0rkzRh7Dg628tHbC+X8OV9w8uZ4jOffyLzTTvxiIjKQv7eXEX0mDxC/uX
+j02Rb6Qo6Roc+0vTP3bBYvYynylYZLqzWR9WcLeNWqD+OBlf1meC60LPBg5s
+Kf1C1AvLDpl/EgyrvDvPv4TnD6oS4+HmhMYJT8y/df62Xiqce1Lekw9rqgOZ
+E/CUJrxAD3lUU3rHTsMzaypq0+H2js4oer+0p7l56WAP3Y26LNjPiWsrRD18
+/QNN9Pdjm00oemB26obRRPiZvPSoKepvDk78aStdn7gdXQ1rHG6mecCiyEfv
+uMAmofWPrWCB9SLLGpYEHLk2iXpNGpQPh7CeujPPW077Me7ZkQA3PxOy9sCu
+se1ercgTPZRxfw2sjl6Ieo164pZkvp1G/038P18wok4bbGiHmRWbUgn6IRVq
+7hfDfJfLviPLcF4vOt7IhsXziooGI9wvXSLfY7BrxM6K04aYdzWqMQPWueh9
+tMuAIRMDcYtnYJsyKyZIH+OzYoOv0PkV393b9C7q6ju1vZuObz/lveMd9PMB
+N3UO5gxnxxcuxfWSsuPrkTdr65sOPVixVfTeXjj3QbBTgR7ytryRy+D+a4Kd
+obDP9sjjw/R5pIk54wt337z8d2P0K2Bf5tgnsMbrn6Fsen6Cq6ePwcrhj6x9
+YSHLQdkDF/ZXPtgMk0zha2/s90Gh/lAYnR/oklENy/6qK4uEmc6fM/6CvLGP
+pp9vg5PasrWlMP/Kre4tdH7NuJaF+nQBczn0PBZnVbATYYms7bYzrD4RsaIE
+5txL9DClz4eQhEONsKvwb7/S/HLDQ+KrsKKN7V8MC1qPvBXBZlF7zHbAhg1v
+K41hw09lc/Q8svn5Rkexv/hkjPwh+qfm+ae0IK/GykRWCscNPl0YQX1aq0Ku
+CBZtVEePLUG+Rc7nQXBSKCu9h2D8nRzNGjpfnN8XtsgjysruCzawoGFD/et5
+HlnVcNDHElYI/L+9NMcjuSGDHXaw9ssfD8fqeEQ+8bbVna7Xd9Kf9zuPKKY7
+V4fBqtr6/VEzPCL6OXl3Orzq15mVtdM8YvbkeUE1rIz+TPrpCx6JmzVPHocl
+4ifz4VqM73JKdkR9zVXLz2x9ziMaS//nsbDGoD+j7BmPiOMdAs5TlzxeWgRn
+7yUDXbBkIdyPg/Hq1dcFOtqvn1gHnLBedkLNFhb9/dtaMjVwVkzmPH0+KoI8
+f2jF/u2apBJH+vzPrTZWIp/4wJUhakY1FV/9kkcMD1pcsoWzS8z/fRb1qJbP
+WCyHlVqj+chXPMLZ358wi/3IvXWOE/DmU3O7aB7lubVf+qIfTOf1V/mw2d4h
+ZwYW2CkjIqgvj3BmMF6ZZz1nQfPPKkJCYfGf92Xepf3Krx+MxH7Ni6FFubSf
+jrsmDZBH2ZU4vo2ev21qp/3ILzk9ced9en7MXV9Zon5BTnSy1g3rSUzzxiZ5
+RMq1L/oR1rrXpSSO84i2xaOyHubcOR7R+Aj9Yl3fV+VG+z2gXjqA71d3O9dQ
+L6krUKmxnlZe2AQzxvf0Wc3oZyB38YHb//8nFN/+3+c65r9ilhyv
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.907871335428632, 17.11903631971389}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwl1gk8lPkfB/DHUe4rFIomWrRSE4VVmqeibJGhRLusiagkTSK5JyS5EjZX
+y0QUHTurclQ0VK5Ks6JW5yhHroxat/h/nv3P69Xreb37Hd9reCzzPOrkLU4Q
+RBP+UU+iaw4fPZL477OAJCTiUvbUwKKmYcc8FZKMysw+FAjz2pSqnFVI/kt9
+h3fLYdrnSN0fVUgizNXuUqsuSQjybca0VUgOXdKyiUPZUXF8DSz8FutlAguv
+jZh747zPz27M/mW4/6vQ8A7Wf6tZsvgaTF8rVaWN+EYvV/1zAqa925WcDdM0
+dGUcYDLfyVZXleS3hYTFr4V5vkkfeKok2RdgE2kAc/8Zn7RSI/kOyVPulFlK
+cU51aiTpdql7yAQW7CjQNFcniepFGS62sPBSPPOCOs5LRZDe1P1e1zTfqJMc
+pnVaXxzMjByZFFtIEj+Lqe0upfI94iUls5DkxMZXHXpK3W/RLi5SJ/mXZ9X0
+qXq4met+rYTHOqQeEKiXP+Ss5Q27GP/YrABzY1fen1IjOUuLVrsrwUzpW18j
+ke/AVKaBJLWufmbvBOobNXeKHcB9/HN22v6qJId46h39GOY8DMrtXUCSrkUr
+u9KoeOfD5g6jPwv7DNSdqXyiyj6KLSA55yfHFipS9TXXf7uJ+bjkHvXh09Cv
+dTGlwej/lk7Ga39YENQp5wGT6R3hS2B2Y/wpH8xD6rRdQ9ZS5Ofxuj4Z1m9w
+kJOACaWEwVbcZ/WTl0GEDvIbTgswQfz8D39clYNZYUbBVxD/eV2YbJk2zr/d
+PGGE/DcZG8UHwOwAjeVVqiRx5sXlWXuYkL99exv6IT2k07kF5uQcdxTAd5sD
+SSdY2HJ+ZAfmEaii0x0E0+3DLW9jfqflXUNLYV6mdLsE5vH1N6vGfpgMVrlj
+hnmN1PMn6chHMK/aYTvWW98J+09QJjKqrbB+VO17aDnMTb1UrwIfWPL9fR+V
+v8zkq0bcb79v9osc6uXOW/XJB/GPiwUf1oDp9wNWjCC/VeWrzeQpWy0bPaJG
+EguyNMK7cV5ZnGXThXodFBqeFcLCq3bsX+HV23b9YAvzZi/wX6M/Am2bjjaq
+vv5bqofgdtONEf/1Y0VjhDz8NFiyrHwJ4tvoTDSh/0bZR3vVYbamv04R+l8p
+Hqp6bDHytQqazYf7rG09W7So76PvzF2YVen6yRTmWdx/9i/8/YKpxRVNzKPV
+O2E75pWT8sHWGGYb97+oQLzXS1TEmzUQf+OIkjnyNSDiaRyYZLJv1cIDMW7y
+jrBgk38OE/WmqhnWb4C5j5oOvIVtoiR7N1HrHTO97uiXgj/rljvM6eIda4H1
+ta8xkmC+vRrDEPNIDOy/3EidV7a+54P+a9eGbFZAPtxz9x7EwZHJUTK7qfyY
+6TWUs90MWi7AwhjXV9jPKd3ikfOcsqJPO+4jNuk8/j5Bmd6+SIB4A40ZexRR
+v2iF7f59cKxpvZI8zLw2WPwR85s+pvX3MPbzeEqFvyD/17LpeZVwqvvhLAG+
+n2sCr3f7wIJXXzp3wArfrwbPIF9W26L0F+jfsI75sXCYKSWj6Q+PR1cqDyzC
+/uY9XTT0M8XXNcKe8g1Fmgj9X5o9eKoEeTLXPwt5j3n6rScZ82DRKcH3QVhG
+520HvmcEvaBPejHu27/9okEb8uKryjr64L7N0977nGDRk0mJJ3DwCs133chL
+MJE9tQXzaVrs++I8zLGUnG2GO2T+XOsKpxb2aO3Fuc60rpSfYPZA9WwP6vcN
+sp6/DuYqyf1yBP35ckDAsoUJDY/N3cjjZPva5WyYvkLrnC3yNPU89ugKtf+Q
++Mo09F/zSZuwj7ov38O9BuvrdbWS6IgjKJP92oz16m5hbhDMM29lVcCZVi7T
+ZTBXp/R5LOy1+uEM5kCQG7dK4ueVY1ZUXEQgLnN6aONzPAPI6BEpPIVGYWJ7
+kF84rVJqDPtZyzmP8fuBkGu/t6+Juu9pQNFWPB8kpHw4hSen5eD3GtTPDzje
+RKP6tclTehNcJvuo5irVj792RmF+nJXqTWnasDK7c2M4+t1Z4a8ZiydHa3iC
+gXVLo5ieTswt9dzx0WX4f6eaLnErWJif3KMH24Yl5uYqI59dD/62wX6Tghs3
+JWCB7mWlOKzbp/x5YlQR+2dpnp3U+TbWsCxM29y1dBfi/vvlrJ6DAvqdNxTQ
+TuVxmjVTL49+3n5ZvA95SymybgbCvOe10SLq+6nyKNcFFqpalIaiL1v/fu3m
+B6fe+zQ3AQ/dqR66DgvspyS9MQ+DPKk5ZdzP9HehV8HRGXbeKQrU+6LSYgTu
+CQu7pIl8+DlmO2XxPU0xmBdWDPN0phkS8N7IikJDJeRLWCS9xf6t1VVuGTDb
+N3FvFkzTlFb7ANPLDX+xhJP113ydg7lFtjkNyIe428cUwcSykA1b4ZcGm9Su
+w6wrLgbVqKc2pbFzDcyzm1diCpesbTCJofqjY6z+F/oxPR1LXlag/t6o8dwA
+a5vynuSiPtFsTMsb9PNLyIvaADnkMxF4JgMePZ312FQW+w/TD/nCb1O0uf3S
+iJ9j2egB79b5p6BQCv1SvecUBFfqMsUPz8d9EW5SpfBk928mdvPQv+7GzdNw
+0+Kzdo6SuC9R4dN+xC9mxMRHS2BdVS6qE8bfF8+6xTGPrzJ/+iL/g30HvSNh
+gUSR5yRcJ6Px1A7m+J1lxKH+M2fyb+yE2WVqkrLo14CyiUQUTGwv/hwBn5BV
+dXkJ8/5InHpDvY+SSwx3IB4n4+HhpZhHyKmRw60w76DfC2t4uv4PbRbyozuG
+/7od3mX5Y1cvzNrG6lgNv35z9I476kmdMxOM4b59O1VOlsO0lQluBfD9VPus
+zzD7zu+y5nBdj3/8IEyf2pF9F/mu9VqiXw2LWLY3TOEfMjfOuVD3yVYFl6A+
+zYcdAdVUfLF+Zz24m6Z7XUTl6xTlT/2cZe6WOTmOesh3CY4MeDsnbLxDDPmd
+i+UOob+t89xNCgj0y6auDu8fYixxZlnFLIMQTO8v5VLzsf0hbvkMg+Ctarte
+As+e97QommQQdFEHu5War0PPW+Y4g+A+d/imgfsvGlW82jDKIDhPtQtCYCed
+u8Zh37D/My1pGH7/kkjX/Ao7nygMRL6lx6Vu0UYYBDviL0Vx1Cf6nXM/XcQg
+SNV7salw7LdaMzbMTYu/qYH+lE3M17sJCwOSz6bDgbqPD5A4n9pR/XgKfpR3
+hKOO+5lOZlo/o/9ZMV4HNRCff1czKRRW/Pby9pp/GYRy4nBhEvxeUNdii3xF
+thUpkbDTwbwNNmMMgtY3augIjzVE9yuhPr7Yim/z4aSKLI8MWJBkKSpEvHi9
+PEEtrFxdftQYLq3QE0ui+lGTUV+C/BPky3sHcB/nk93UUtj1g7O8kIqXctMz
+E/W/f7jtoh/yIY/v37YIVj5pZJJL5T/sEFmMfqWMbnYORb10lw4l6v1nLbI5
+8tMgg2DtluiRofrdNOtH70W+u6MSeqh5XfSLkPmIeTWYj3+EpUtHpAY7cL/1
+s7A5+OSl6Vo7Ac4f8K2yxHnhuGDd+hrEC9W/Q723/vtkV///qUb+D6LOr4I=
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.922596693736967, 3.8067338747393404}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000002274`, 17.}, {13.500000000002274`, 16.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.552325660469876, 17.180083206945802}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt1ws4lNkfB/B3RZQwqywh5JbrmCKpqKmtdkhWUs22RhIaUsZ2G4oG67KR
+hkaIXHIJycrdFkYJyS1FF2I2FWqLveVa/b9nn7/nwfN5zu895/f7vec978xy
+zwAXbymKorrwS/5TS8gffSb1348Wk9KaGRZbwMKQWh8BcWVPoB9My41/8QH+
+2Wt2RwnsfI8r2KbNpPicJM1puHTZQGwEXHpxxpFlwKQYwsa4HNhxnrpqKpwV
+b3k2D26jX8sYhXUGvft/gTcY2KtaGWI+UeUFF1h98vMIHxYesB2Vgp2vTz+o
+gCdYmt6ZWD/dwHH8NUwlXwwzhxPd5s+XXwHzC4+WL2NS7YopbnrE3pKmNTDX
+sVhCh3UWdDAaNZmUB09Rlzgru1RrD9zZdH67Llyqstl3ToNJXdJbt0QBlggK
+lGphTd+KwgmsR7vn9PEC3N2bK+qCPfxKKiPgk7blKcUkn+CzQUnwQEhSwjk4
+68G7P5tgt5T3Tv4wM0+wl4b12HkNPFe4u6047Djs3MzctpWMd5QovodpCVdL
+maR+9dnLx5F/1EFHeRaJ7+PIyKDetqu/qruRfCJP306Gf4sTSoWQ+D8GvjZE
+vzyUN24pgnkc//hCWKelr+klzJ/V0FXUYVKuW9b066M+m8PVcbZwVbS091GY
+v/EnaXdYcDXv99swW+GESSBsIvtHgoIRk2JJfXI9AYcW9VzmwBPshmQ/uH4m
+3biIeMvEnZ2wNTsueQJmXplmm5F4FW4s3Rj5vWn+OIV8plotVD1hZ544k9z/
+t2cE3b/ATJWcOhr8TyL/ZS7MKHv+TIT6PufaqJXDvNUPczRhsUnIUAXcPeyV
+XoL+CJIY314nDi++6wy3Ta0bTCbx3yzdIQer2Vq3nIE9jCo4z9DfdUdlT7rB
+OsLaJ82wpKkody1c2qhr3QO37bttpkry0ZsImiX7ZYw3PIl6hLc0TTZhPv3w
+eycGYd5dW58suKC6aFuHEdkX/QtVkN+Zzj7nZpi2tet1KnleMm8rPIAlYSOT
+Rqivk/bKcwD2OH5HfAu2jRJemoHlNgpaDdAvQ7+tjgYkP77POBeWO7z7lx9h
+7vltjrlwuM23jWkwpd5t0wtfOrl3bBiOSSlLnIYXrTqeuNKESdXYpvUpLWdS
+m6cHZcNhSpttqQp73jkd2APHnKKLyHixWcuktinGZX/PJtc3XWwdOQQzCn/4
+rQ9+/qdV7zWYK9o/VAA7FyjXvoBpS1Zf+Qn2qdsnL2eG/f6F89YaLr69q88A
+pvF2SP+F+tr/uXnH2oycB7Gn+KR+l1ca62FqyzqxLNykzG63JNfzPal89Ctq
++uVOXZjp15zOJv18/qaIzO9BL53Sg/nvNO3GsL7Qkb9BHg73+K66meTvHLaG
+Bo8qs8ZzYElX9mpLWDeQVR8B81aqKx2DHTyrB7hkXMXevEOL7N/hht3EeV43
+7JAPu2Qk2BF2tk9LaIA/f+2b60TGz6kKDFFf3/qIzRx49Nvq5gDYaG93HR8W
+Pw7cVgP/MbR+IAuequwvm4PPpA3efQyzlin9vRb9zsgWyyxGPSz3J6wj8Fzl
+9K8/wILXB46J4N/EDj75ML+/7sENuEh1+uxHM7JPG3+ogR8nBxp/Z459keYk
+KYdzMxbEJMESjd2SLHJ/TZcODsI68qcSBXCWbt4NHTr2w2fRE1cyrjD8hA0z
+rBYt14G7m2RrImGuzsOdr8n5sE3RJh8WV75PvQarHeIN1sJMh5VO5HlvPqn/
+WAzrqNDqGTCjSPTyFizQjl88h345RRX5FpP4+df/JedPeIi/kwgu7TjbGACP
+5i4YPgHznpWNOMN9luH3d8GSgoVnv4eV/fb3MMj8fBkTf3ifofYzJVjIeaSY
+D7uHLsn6G/VRdLWXM8RZkTdIvcKUj2GWpP/NDaaP4FGV531kf/Y9q+jogQu8
+bZPJ/TG0Dqkl8R71P6V+hfr1H3UETZL+mWSec4A/0zUmNbGeXFy1mhCmHRLz
+neCpjnDNLjj4iGbJOZK/c1CjtC6eb96qhi6YpiEspMMM+9mDGhbI55Ox/HY4
+5hXzq8Owzs3yFja8wfXS/VvwRFt70F7YL9qbJ8PA+DqH4O/gJrtFYhN4dKCn
+3xjuGM6Mc4QlpTs4FGzeeeSWLyzn1rGrA/mIThj6h8FGYbTzF2GnDxPzLsI2
+jEVme+BokdLqDDhGa1OYGuwRXymVAwuDHkpeoB/R/w6Is2HGKV9+IXmeP2nT
+0sj6vyuuCIWFTfd7L5D5yx6xyfuh1yqCQdZ7Gmk9uh2uUDb145H4sfL5LFhG
+IW7EHWaFlJrvgi0F9d84wTWngtWOwMv9lnA2wtzNJS0i+MurYzJWxHaPzrfC
+OdpfLMzhUnaC/nySL+/pXVOYH3PsPrk/c4lVBxnE5Q88SL03S555ryfrWXxJ
+H4CvaLV0kX7FLN5upEf6bye1xwtO2TfReRDW+3JvP8lfEFV2LQ2u9Bcqkn7I
+JRfYtMKxJTr2rTAvOv7SCGyf4HZ/nMw3Tz5kCt545YiZ2kpcr17lPgNrVdtL
+M2EbxW/838MLt9wf84azGtYm9MCGj73jY+AYWSW/63B7nbg9H5aI5OjBMDtN
+p7oBFr9ZItoE14XSc3pgFt2+lOyvkST3VUPwRPRf7c3kvLa4vOc1LLd0hhkL
+U8cnXIi5nKKtu2GvH7fWkPiUgncdK+DRhcbuvTBt9ayHDMyzWMVuIflKH58Z
+R78l4wdGq2C1ELs/R8n739MuII+sH5r+ZgLmuHrvE5H4Ztt6WVy/wypGORL2
+2JScaQYHGSeO8WFGVA7lDn9yn1sQCD89uKM2FTY7rcg9ClOFNVovyPnV0F75
+33jejL4B6rPLNN13mvTHLjPyKCx2mDocCwuLlccq4fy3VaXZpJ7Tr2ik/4fU
+IjPrSPy6DmqVHpOq3jNwaJDMZ8rTPwAzDIdmpVbhXFszGxABz/qWLDOBY1zk
+gpPhu3u1AlxguWb++XS4Ulk6Iph4F7csEd7fxxzPgtm9zTeCYbFtvnsTLAi8
+MrkbTjN6mD0MGx0NLjDUI59bDOs/Eb/44D5O9s+ulTNfWzKp1sQjWuVwTX/n
+G2149Crd+AS8m57vtQK2uTjdZwOfsanMM4LFMUN+X8GH5z0x0YdpcnNjD9Gv
+Qze969ThlOat/xbDC7gsbwUSb+lSQN4XZSNvfyTrq93+NfQc3HXq7tw7mHds
+xaYLpP+ZJhXPYZuxntmrsLIL530bLOZEfGqCbTrjqHpY+DRM8jccKh5cXgnT
+LqxNN0c+L+OsXG7CzoffZwTAi22CXcpJvYOWH6pg16Rll2+R8Z8zHCn0IzHa
+cCeZv7XqpicL1v9+vdMQycfIcCwWtttcpDZD+rnFvacF3umz/8NS1JM1LRU4
+DX+8EdxhBxsFD6Vq4XtFVoZCmBfpZ9T3Dathrtb+0ji4Ru219AbYR/+f8Qp4
+osrRYQ0clxr5qB+WO//GTBeWJ99rrP7//Uaf+T/tBqKl
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.54570515633175, 7.171979374673003}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwt1wlUjfkbB/C3tN+0oGPmKm5TUkKFQQpvJYQUZUmr20iNVEyRGrwto6SS
+GoU56hYVow1ZC7fFMkq0GEupG2lPm5RC/+8z53/Pwfmc531/v+f5/t73Fm2h
+/6ad0gzDVOAP/ctI0V+6LPPfZxLLfDc2ybOGC2qd9znAJdFjZomwsfBVQyy8
+eI1mzzuq7yzouwi//7m5auFM+EK7JBOO/OdjYyTMnvp+MAIuHaub/xwWRMXp
+WsGGKT7Tp+jh+sRHNW3qLDOo3LtlA8wtvvE6CI5SMlU/BLMX2VsDaizjomf5
+YxrV4z5U/QIHRn9tvgYLnO9NzVJlGUl7XGwR2VBacEyFZXQcTrfeIGeOpXMT
+WSajJ8s9m+6f+yT0jDLLDHFrP8eTffgvGnks05nZqBUAizceiXWC5z22T7Wl
+euCrUlXYPjvBfzbZsyRGBq65G5OoCHuUzBEvhudPye3owXyizGVKWbDp4NdJ
+b2Buzmp5G+yX5JBvTfMzjgWiqehnW6f8zzWweJZfuBz6/TXp2xcJ5RU8kK+A
+eeJ1nsh8gxO+B05VwLzsS52petjPuDbcPQr2aPVd7Uzel792DNbkFSj/RXbu
+inZFfuq8p5vew31f4q9ehFccrjxlMgv9rfE/8Qq+WjQoHQGLC5w3dMKrWz+c
+q4PVumf/3QC3hXXs0tHH/g7+o/mw3inbKF9YXPF5nhcclN7mmwtzZzfekIb3
+VRUPvYclwfn2Mehnv8m0KBUD9Pnxl2ppODviis4cWGSWeuED5p2jmBBsTn7D
+u1OKPHga3s0rYObcBc3LyGtfZ43nYpjVddibgzxLnzSm68KC05+n1CqxzMyc
+pHJFqqe8PmgA9/4R495B/Ti6pN5UZJkv3cp2D2EmqPF8ONxtF5J4HmY32x6P
+hXUaJLqR5CeV/Dp46OizF7/S/QfrehyxnuCap+52qi/9mCeP/W+nHZjuSFae
+EfwO9rglsqY6x1fY/Br9Nt3xCN1D9TF1SSPmCbWPH4qDPbITBlow75fhOLMi
+qtfUub3F+a734eZ8onynbdjsinw0mjVUaF4mUs/jFjx5wsrzYXDC2b6HozAj
+KLSphiWel8sFyLtRZpemzmyWCbDvUtSHd2Q//DEQZn3M61VhfrbxuhK4L6CM
+/xr3r1Dr75I3hG3SzI/SeQhy4qzhANF5vWkwL3vrkmCYXW44aor+JuvPiEw1
+pPeHf08H/Q8ua7x8E5Z87jSUwnw1ActTymBx1plgCfKQ+T5YXwpzMw6JnyG/
+pn7FGzfIecW2DchX78T5YRHZN7lDHX60SLE/gtbP2W0RooDnl2++SUj1udG7
+NOF/akTyK2DRFcP9X+XxvCw/OVmL9rf6y2ka6gd8q7zGMZ+o4nvZfnimxpvb
+7bDA++91ilhfXmOBTz0sfmN99Qk8nLF2y2u63tlwYwH6y534pOo95cX3y8xF
+/718v9AxmNm37VMhztPlutNWAe3f2jt+E/Ouj9pUsJHyaTItvYg85Cd/MIqn
+fosyZoYgr1WPR7pr4QTpqG1qyLMzoidSMAee5XLCBm47ObJ0L9xXMWX3Tjjm
+ua5mGdXFB7WFcLStpt7kuXj/ut6FrYAbKov93GCuek/vN6zvyfdbmwFLQg/3
+roLlXC38G2DR/birQvQzwuNN5s1DPUd2qQv6Tfbukp5LPuFtw2KeGapq1yxg
+0U/B9zQxb9X9Jmsb8qOmN+PIZ9mF+TErYY9H96OHkaf67Py+hTBjf+e8Gqw6
+/jJYk+r6bXZbcB61deXJ32j/eudd1XIs41XcNKmePOGpbDSsbmX34SYsyLZY
+cgiuUvyokgIzGcN1BXBbxPO9oVRXjj40g9azcL+8i+pnjSpKYVff4X5Xmt95
+KOMk9tdrqRt2h8V73HI59FuyqLzOj/ZrPdYVjvMsE5cMx1A+kROFMZiv3sdK
+u5DWc3n6PBrz83OCvTrInKtfAPJZ8nbLMgPKJ9P23ELk9/dIbcJeWGygkvgE
+Dti9quE+za/cLjFA3sUG4evVjbBfV1H3eng0YbxFaETv97/GJvALY53sK2RZ
+NeFL3B+xI/32KMykHNlpRetHjD3UMsb61pZav09kuSPqslKmsODDwMTj6E/+
+wbTlG4zp+T7UHIr+FzrNY1xhj/Y7T50xn+cfv0zfCYtCi1qXKLKcVeyiR14w
+J8ncqY18ZEMUDgth1q2w5yd5lktt8Z7iRPult76ykWO5xQ7r09bRegdST4lk
+WSZEq9bbjOp2h7SM4HPdjk0GVOdiY0dlWG793YTwH8jX1BtlUNePGXmmQP19
+C6tZD9+tWOQ2QvN2d4w/hbW83O61weLpg7wwOXo+tj1thjmnOGUXnGfL4Sxe
+O+W3xFrJAf1yqclOY7CkP+XcNpxnTEXT0ETKI944zU2J5fz1dS/okgel3m3h
+sdyl/Ul6FjDTnNezAHlVFYal0bxcaE5+hzLLVcZ8642ifl1l+X4436yvsQ/z
+KY9Df2bfRt6fXCIKXlF+o133HqE+N0h5rpQJrl9b8zEZ9R0rBsSzYKbUVMoA
+/u3dD0rryJ9uvQ/H+v3CgmofWHLlthd+HnEDh+doRlC98dq/+ej3bIzxomQT
++v2kOPAMzkfL6cHdDKqL3F/g+4kLNPHIvgiL/uHNw/vDbRoMXk7mKpadtcb5
+HFO8qE3XS5ImCDchT6OkI0tTyCWu66Jl8L2x/PiVaFhwdf943wSWy6yb0nSA
+1tdMP54EC8RBpl5k2fMygXDAt7cWm2FWTnUj6kx2e2zAKlpP7KvVi7pqzhFt
+M7reuHI0DOsfG0kMX0h12/lZVrIsZ3RFOnIB3d+wMMgA/XUbT65cQtf7z3+n
+h/5nCo/mraR+Fn8ynofzdJxuq7+V5qu01jHB/L13cpv8ab1W80JtPL8ZMxr1
+48khic8HkFeW2QuVK7C48E/pM8jzrZHE/SW5s16Bh/Nteb/57jjlUzDB3hLu
+STqbqz+fzkvPxgznsdvxaL49LPG9eHoI70vJXKMN+8n7eviBWO+jxaSFp2HG
++sa9YuwffTXN/DrM2vIXv8LzZrXGMqKS1jusdawa/SdN0fJ/S/erPAi5juc1
+LqflThssvqTVdRLP89IB3+AuWi+vbloQzmfXSLFqB3lr2ZAv3pc9IddNm+n+
+WOVNR5G3dnLC5zpYFGCysVKa5RpHb3IPqH7z8ePV0vg+eJhqXkh1dedn36VY
+xn/nb1kZ1E/Ydt9PUiwXNHJmeSJdr28foI/r8/N6gyLnUx7rDqRgPcWlb86G
+wIK9gRpm2M9LQ/NxEPWr8JuhEs7zksDuX8pD9Lub2xfYU1huf5jWY2Vzx9D/
+Pktnv1i637WdPwHn+T4+TyWd9nfQ9pZCHsLbxUVFNN+kksp2uLx+KL/+v/UV
+8nKQn6W5h2Scrq+etdIS+aos2KA0awFcpaifjvP9cXV/mR0s2FBdUob69qN9
+8cGweOzXxGz4OTexO42uP7HD0RZ+tfaFXzksKl49cAvPj5zF9uctsOTSzw79
+2H+cPgv+//8TBfZ/11uc6w==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.666233980906949, 2.1296932060463307}, \
+{0, 1}], LineBox[CompressedData["
+1:eJxTTMoPSmViYGCwBWIQDQEqDiEyIFrOgaGg63OSmYrDzO9z9v9uk3VgWLF5
+kku8ioPSsWuhi37JODBoaO52r1BxuLaBb/3LBCD/w0aDX/UqDvqbjmztPSDt
+wLBjCturUhWHfy805q1RAPI3eJmtiVJxUBZ+2RDbIeXAkPCA8Yq+ikNNZHC8
++z9JB4aK1Qtvf1d26H97fYldB5DPcX3a/63KDn84o2++0wLyG8QO8eUpO4jX
+1jVNfSnhwCAgx2KkouywPWWl0aWjQP6LFavW3VFyWLTIuKtvP5DfscJy+Wwl
+h/kz33T/vwLkB3ha3EtRcojcYaJ/gAlo3oH87jprJYcJ68uXMLsA+Qy/p7xR
+VHIQen0p6c4kIF/D6uwiSSWHdau+P5r8Asg30Hwkrazk8EG39iuvHdD9B/7P
+P22r5LDt2qvvhj1AfsAHbvUMJYfOV85Xg8+A/GdvuXu+kkPCzvcHp/0A8ndw
+tAc+VHKoWCL935kHGB4CG/TkNZUdXvAILhJgAfILGpP/Fik7+D+OC/O7B1Sv
+oXp02S5lBwab++4ss4H8iCnTv/1WdpDY/v7gO2uQ/Wck1IxVHCpY/NtTjwDd
+98IwgyVWxaF0ZnuMliWQ73HwsGq5ioOa/NH5SguA/r+QH8/eoOIw1QIUvxJw
++SfM1gl348Xh+qd0Viy+ekwMbv4kuY0Vs6zF4PYL7hKwEzwiCncf13OFHb9T
+ROHu32W/cOVGRVG4/xTF3se+/y0C9/+GM08Y9nwWgYfPykwBu0x2UXj4NVjs
+0VpjLAoP32AfUY5zxaLw8Ldwbub6dFAUHj/RFRyyOeJi8Pj7bq47VzlXDB6/
+lcUd0X92i8Hj/8KO0xfs/4rB00dWp3AJg7Y4PP1kNJwpLXQQh6ev4H1hZ3Wt
+xOHpT+hLY22WmDg8ffJJLlUTvCoGT79VphrRB8vF4Om79+SaBTsYxeDpny1O
+vH5RuSg8f/BYXU8Mvi8Czz+3Cqy9iuxF4Pkr+MDHALH5wvD8x7Fac1UsqzA8
+fxZoJzuwVAo5wPLvVjYQLeQAAACtaGA=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.354800000000001, 6.}, {1, 0}], 
+        LineBox[CompressedData["
+1:eJxTTMoPSmViYGAwBmIQDQEqDis4ITTDhdu3dtmrONz7tfe8025lBwYOlz9u
+2SoOf3P6puVlAvkvylXY6lUcDp5abPiQH8hf8TIwpFLF4c7e6gtztig5MDBU
+rVgVpeJwWHOR3IlYID8hIGGqqorD9Ss5KdqCQP6F+ZNq7yk7HEt+3Lj1sqID
+ww/VNO9uZQc9U+P/QiuBfI6qjBdGyg6rtsx6HT8ZyM9QbVtzR8nB9nYt++9J
+QP6EvTcP9is5bJyc/qF2GZD/wNKnJ0jJgf3JuY+3ToHUb1inqKXkoDhZ4e/c
+30B+xaxpdyWVHBY/iEr0Ngba/0L6u6SykoOR9oXkK9lAvsGGFCFXJYdPWkE8
+EvNB/NupX2qUHG50nC5JPQ7kW+iVSR9TcqiS8z3z5T7I/SEHiqWUHXbuCGPy
+fQrkT7gR87tI2WFrwoYVvVeB/AiFqPATyg4/OgWeT9sA5Guc1SkQVnE4oXFW
+m6cCFD4mnRx+Kg5ut1fEGOqD9O+QcSpWcZgx42PG0ltA9wbskGNtUHHwkgFG
+R4MiXP5tBd/0KFVFuH47s/DF5y4owM3f+8Loyud2Bbj9ve3vJTL9FeDuu7DB
+P7xISwHu/jMRK/9uklKA+4/78yZjbgUFuP/XdJh0z7JQgIfP5GdrPz9PUICH
+X/Az/TnaUxTg4fvIYOm8LWcU4OGfUnefKYkFET+1uoZ8qqaI+LtSO4O/KRIR
+v+5mTT9YchHxfzsmVWRBDiJ9hN85w/A2TBGefvavlanz0lGEp6+1NpNnX3mn
+AE9/B5/HPjRfpABPnyuCW/STvRXg6bejd8cc2wfy8PQt4Pn4kpKuPDz9++q2
+JFR1yjnA8scOfhAt5wAAXRMymg==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.354800000000001, 8.75}, {1, 0}], 
+        LineBox[{{6.4999999999976925`, 16.}, {13.49999999999251, 16.}}], 
+        PolygonBox[{{9.4, 16.}, {10.6, 15.6}, {10.6, 16.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 16.9452}, {0, -1}], 
+        LineBox[{{6.499999999996362, 16.000000000005457`}, {10., 
+         10.000000000003638`}}], 
+        PolygonBox[{{8.552322615314452, 12.48173265946094}, {
+         7.602165824326175, 13.316718930329426`}, {8.293188945044921, 
+         13.719815750748694`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.515942703607428, 12.823799910437668}, \
+{1, 1}], LineBox[{{13.500000000007276`, 16.000000000005457`}, {
+         10.000000000003638`, 10.000000000001819`}}], 
+        PolygonBox[{{12.052322615314452`, 13.51826734053906}, {
+         11.102165824326175`, 12.683281069670574`}, {11.793188945044921`, 
+         12.280184249251306`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.484057296392571, 12.823799910437668}, \
+{-1, 1}], 
+        {PointSize[0.04], PointBox[{6.5, 16.}], PointBox[{10., 4.5}], 
+         PointBox[{13.5, 16.}], PointBox[{10., 7.5}], PointBox[{10., 10.}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T17", " ", "P1", " ", "N33"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdieg/giijfhfjhj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdieg/giijfhfjhj.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {44, 22}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwt1gtQU1caB/AjtjwEIshDtlAQzAKuRUOX54rJpUKxksGAvCqMIiOIGiVF
+aYMiG4Uqsm4LiDa6FHkEDUIhIkKwyvAqRJYuEW1BsBApICLViFgDIuz/dDcz
+mczv5jz+35d77sQxPjksQY8QkoU3/STqRbz+xJA/XhyGjPyrNboQLu755pBq
+PUOazpZyXOBV9iuCLsDpaYrCMhuGmI2djjgMbw8uDbGCxS3EOAa2bKkVSlYy
+xMfqt/AQuIj11e4n1livwFlK/TDQ6/twWNpVVEXHd6RPDnZYMSTa1nKYrld7
+0XliE2x4t0onhVPO/pDTY8mQzdku/A446aqbWghry8xVc3C7p/e79rDqaZH+
+e8ivb+FZNGrBEGXUpnZvOH2fm0sLPH8hPigCtkv4beN1uPvFmN9nMCfV+3wj
+LCs5F58DW68aMuiFp+62FVyCB+Tul2dhxXeVAzUwd65l+AO6n2hBdBMeXWZX
+vgfWPF7b2wRLkoYKyuGCEya3bsE7/vPx2hHYJKvmwzo4x9rzpQ3q8xtbJymn
+eWe/rg+EZaoc9zy4UL5QuRtmX6w2E8MaG4PiFNqP2xrbGJh/rHflAZhzY/bI
+Bjjfz14YBgvu96XQ+rd87DHoCGt81tdMoz9TBi55g9hf/At/vha+qP69XAL7
+REljxLDcqc7cAm6W57ED4bkAh2/OoV7pgu8OW7j+TVW5MazOZVXMr0OOpV4e
+aSsY4toZ6zYJ9/ePnxsxx/2gqPlqFO41Dgjmw4rDw6NPYTud/92bZrh/uKzv
+F+H0rkzRh7Dg628tHbC+X8OV9w8uZ4jOffyLzTTvxiIjKQv7eXEX0mDxC/uX
+j02Rb6Qo6Roc+0vTP3bBYvYynylYZLqzWR9WcLeNWqD+OBlf1meC60LPBg5s
+Kf1C1AvLDpl/EgyrvDvPv4TnD6oS4+HmhMYJT8y/df62Xiqce1Lekw9rqgOZ
+E/CUJrxAD3lUU3rHTsMzaypq0+H2js4oer+0p7l56WAP3Y26LNjPiWsrRD18
+/QNN9Pdjm00oemB26obRRPiZvPSoKepvDk78aStdn7gdXQ1rHG6mecCiyEfv
+uMAmofWPrWCB9SLLGpYEHLk2iXpNGpQPh7CeujPPW077Me7ZkQA3PxOy9sCu
+se1ercgTPZRxfw2sjl6Ieo164pZkvp1G/038P18wok4bbGiHmRWbUgn6IRVq
+7hfDfJfLviPLcF4vOt7IhsXziooGI9wvXSLfY7BrxM6K04aYdzWqMQPWueh9
+tMuAIRMDcYtnYJsyKyZIH+OzYoOv0PkV393b9C7q6ju1vZuObz/lveMd9PMB
+N3UO5gxnxxcuxfWSsuPrkTdr65sOPVixVfTeXjj3QbBTgR7ytryRy+D+a4Kd
+obDP9sjjw/R5pIk54wt337z8d2P0K2Bf5tgnsMbrn6Fsen6Cq6ePwcrhj6x9
+YSHLQdkDF/ZXPtgMk0zha2/s90Gh/lAYnR/oklENy/6qK4uEmc6fM/6CvLGP
+pp9vg5PasrWlMP/Kre4tdH7NuJaF+nQBczn0PBZnVbATYYms7bYzrD4RsaIE
+5txL9DClz4eQhEONsKvwb7/S/HLDQ+KrsKKN7V8MC1qPvBXBZlF7zHbAhg1v
+K41hw09lc/Q8svn5Rkexv/hkjPwh+qfm+ae0IK/GykRWCscNPl0YQX1aq0Ku
+CBZtVEePLUG+Rc7nQXBSKCu9h2D8nRzNGjpfnN8XtsgjysruCzawoGFD/et5
+HlnVcNDHElYI/L+9NMcjuSGDHXaw9ssfD8fqeEQ+8bbVna7Xd9Kf9zuPKKY7
+V4fBqtr6/VEzPCL6OXl3Orzq15mVtdM8YvbkeUE1rIz+TPrpCx6JmzVPHocl
+4ifz4VqM73JKdkR9zVXLz2x9ziMaS//nsbDGoD+j7BmPiOMdAs5TlzxeWgRn
+7yUDXbBkIdyPg/Hq1dcFOtqvn1gHnLBedkLNFhb9/dtaMjVwVkzmPH0+KoI8
+f2jF/u2apBJH+vzPrTZWIp/4wJUhakY1FV/9kkcMD1pcsoWzS8z/fRb1qJbP
+WCyHlVqj+chXPMLZ358wi/3IvXWOE/DmU3O7aB7lubVf+qIfTOf1V/mw2d4h
+ZwYW2CkjIqgvj3BmMF6ZZz1nQfPPKkJCYfGf92Xepf3Krx+MxH7Ni6FFubSf
+jrsmDZBH2ZU4vo2ev21qp/3ILzk9ced9en7MXV9Zon5BTnSy1g3rSUzzxiZ5
+RMq1L/oR1rrXpSSO84i2xaOyHubcOR7R+Aj9Yl3fV+VG+z2gXjqA71d3O9dQ
+L6krUKmxnlZe2AQzxvf0Wc3oZyB38YHb//8nFN/+3+c65r9ilhyv
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.907871335428632, 17.11903631971389}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwl1gk8lPkfB/DHUe4rFIomWrRSE4VVmqeibJGhRLusiagkTSK5JyS5EjZX
+y0QUHTurclQ0VK5Ks6JW5yhHroxat/h/nv3P69Xreb37Hd9reCzzPOrkLU4Q
+RBP+UU+iaw4fPZL477OAJCTiUvbUwKKmYcc8FZKMysw+FAjz2pSqnFVI/kt9
+h3fLYdrnSN0fVUgizNXuUqsuSQjybca0VUgOXdKyiUPZUXF8DSz8FutlAguv
+jZh747zPz27M/mW4/6vQ8A7Wf6tZsvgaTF8rVaWN+EYvV/1zAqa925WcDdM0
+dGUcYDLfyVZXleS3hYTFr4V5vkkfeKok2RdgE2kAc/8Zn7RSI/kOyVPulFlK
+cU51aiTpdql7yAQW7CjQNFcniepFGS62sPBSPPOCOs5LRZDe1P1e1zTfqJMc
+pnVaXxzMjByZFFtIEj+Lqe0upfI94iUls5DkxMZXHXpK3W/RLi5SJ/mXZ9X0
+qXq4met+rYTHOqQeEKiXP+Ss5Q27GP/YrABzY1fen1IjOUuLVrsrwUzpW18j
+ke/AVKaBJLWufmbvBOobNXeKHcB9/HN22v6qJId46h39GOY8DMrtXUCSrkUr
+u9KoeOfD5g6jPwv7DNSdqXyiyj6KLSA55yfHFipS9TXXf7uJ+bjkHvXh09Cv
+dTGlwej/lk7Ga39YENQp5wGT6R3hS2B2Y/wpH8xD6rRdQ9ZS5Ofxuj4Z1m9w
+kJOACaWEwVbcZ/WTl0GEDvIbTgswQfz8D39clYNZYUbBVxD/eV2YbJk2zr/d
+PGGE/DcZG8UHwOwAjeVVqiRx5sXlWXuYkL99exv6IT2k07kF5uQcdxTAd5sD
+SSdY2HJ+ZAfmEaii0x0E0+3DLW9jfqflXUNLYV6mdLsE5vH1N6vGfpgMVrlj
+hnmN1PMn6chHMK/aYTvWW98J+09QJjKqrbB+VO17aDnMTb1UrwIfWPL9fR+V
+v8zkq0bcb79v9osc6uXOW/XJB/GPiwUf1oDp9wNWjCC/VeWrzeQpWy0bPaJG
+EguyNMK7cV5ZnGXThXodFBqeFcLCq3bsX+HV23b9YAvzZi/wX6M/Am2bjjaq
+vv5bqofgdtONEf/1Y0VjhDz8NFiyrHwJ4tvoTDSh/0bZR3vVYbamv04R+l8p
+Hqp6bDHytQqazYf7rG09W7So76PvzF2YVen6yRTmWdx/9i/8/YKpxRVNzKPV
+O2E75pWT8sHWGGYb97+oQLzXS1TEmzUQf+OIkjnyNSDiaRyYZLJv1cIDMW7y
+jrBgk38OE/WmqhnWb4C5j5oOvIVtoiR7N1HrHTO97uiXgj/rljvM6eIda4H1
+ta8xkmC+vRrDEPNIDOy/3EidV7a+54P+a9eGbFZAPtxz9x7EwZHJUTK7qfyY
+6TWUs90MWi7AwhjXV9jPKd3ikfOcsqJPO+4jNuk8/j5Bmd6+SIB4A40ZexRR
+v2iF7f59cKxpvZI8zLw2WPwR85s+pvX3MPbzeEqFvyD/17LpeZVwqvvhLAG+
+n2sCr3f7wIJXXzp3wArfrwbPIF9W26L0F+jfsI75sXCYKSWj6Q+PR1cqDyzC
+/uY9XTT0M8XXNcKe8g1Fmgj9X5o9eKoEeTLXPwt5j3n6rScZ82DRKcH3QVhG
+520HvmcEvaBPejHu27/9okEb8uKryjr64L7N0977nGDRk0mJJ3DwCs133chL
+MJE9tQXzaVrs++I8zLGUnG2GO2T+XOsKpxb2aO3Fuc60rpSfYPZA9WwP6vcN
+sp6/DuYqyf1yBP35ckDAsoUJDY/N3cjjZPva5WyYvkLrnC3yNPU89ugKtf+Q
++Mo09F/zSZuwj7ov38O9BuvrdbWS6IgjKJP92oz16m5hbhDMM29lVcCZVi7T
+ZTBXp/R5LOy1+uEM5kCQG7dK4ueVY1ZUXEQgLnN6aONzPAPI6BEpPIVGYWJ7
+kF84rVJqDPtZyzmP8fuBkGu/t6+Juu9pQNFWPB8kpHw4hSen5eD3GtTPDzje
+RKP6tclTehNcJvuo5irVj792RmF+nJXqTWnasDK7c2M4+t1Z4a8ZiydHa3iC
+gXVLo5ieTswt9dzx0WX4f6eaLnErWJif3KMH24Yl5uYqI59dD/62wX6Tghs3
+JWCB7mWlOKzbp/x5YlQR+2dpnp3U+TbWsCxM29y1dBfi/vvlrJ6DAvqdNxTQ
+TuVxmjVTL49+3n5ZvA95SymybgbCvOe10SLq+6nyKNcFFqpalIaiL1v/fu3m
+B6fe+zQ3AQ/dqR66DgvspyS9MQ+DPKk5ZdzP9HehV8HRGXbeKQrU+6LSYgTu
+CQu7pIl8+DlmO2XxPU0xmBdWDPN0phkS8N7IikJDJeRLWCS9xf6t1VVuGTDb
+N3FvFkzTlFb7ANPLDX+xhJP113ydg7lFtjkNyIe428cUwcSykA1b4ZcGm9Su
+w6wrLgbVqKc2pbFzDcyzm1diCpesbTCJofqjY6z+F/oxPR1LXlag/t6o8dwA
+a5vynuSiPtFsTMsb9PNLyIvaADnkMxF4JgMePZ312FQW+w/TD/nCb1O0uf3S
+iJ9j2egB79b5p6BQCv1SvecUBFfqMsUPz8d9EW5SpfBk928mdvPQv+7GzdNw
+0+Kzdo6SuC9R4dN+xC9mxMRHS2BdVS6qE8bfF8+6xTGPrzJ/+iL/g30HvSNh
+gUSR5yRcJ6Px1A7m+J1lxKH+M2fyb+yE2WVqkrLo14CyiUQUTGwv/hwBn5BV
+dXkJ8/5InHpDvY+SSwx3IB4n4+HhpZhHyKmRw60w76DfC2t4uv4PbRbyozuG
+/7od3mX5Y1cvzNrG6lgNv35z9I476kmdMxOM4b59O1VOlsO0lQluBfD9VPus
+zzD7zu+y5nBdj3/8IEyf2pF9F/mu9VqiXw2LWLY3TOEfMjfOuVD3yVYFl6A+
+zYcdAdVUfLF+Zz24m6Z7XUTl6xTlT/2cZe6WOTmOesh3CY4MeDsnbLxDDPmd
+i+UOob+t89xNCgj0y6auDu8fYixxZlnFLIMQTO8v5VLzsf0hbvkMg+Ctarte
+As+e97QommQQdFEHu5War0PPW+Y4g+A+d/imgfsvGlW82jDKIDhPtQtCYCed
+u8Zh37D/My1pGH7/kkjX/Ao7nygMRL6lx6Vu0UYYBDviL0Vx1Cf6nXM/XcQg
+SNV7salw7LdaMzbMTYu/qYH+lE3M17sJCwOSz6bDgbqPD5A4n9pR/XgKfpR3
+hKOO+5lOZlo/o/9ZMV4HNRCff1czKRRW/Pby9pp/GYRy4nBhEvxeUNdii3xF
+thUpkbDTwbwNNmMMgtY3augIjzVE9yuhPr7Yim/z4aSKLI8MWJBkKSpEvHi9
+PEEtrFxdftQYLq3QE0ui+lGTUV+C/BPky3sHcB/nk93UUtj1g7O8kIqXctMz
+E/W/f7jtoh/yIY/v37YIVj5pZJJL5T/sEFmMfqWMbnYORb10lw4l6v1nLbI5
+8tMgg2DtluiRofrdNOtH70W+u6MSeqh5XfSLkPmIeTWYj3+EpUtHpAY7cL/1
+s7A5+OSl6Vo7Ac4f8K2yxHnhuGDd+hrEC9W/Q723/vtkV///qUb+D6LOr4I=
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.922596693736967, 3.8067338747393404}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000002274`, 17.}, {13.500000000002274`, 16.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.552325660469876, 17.180083206945802}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt1ws4lNkfB/B3RZQwqywh5JbrmCKpqKmtdkhWUs22RhIaUsZ2G4oG67KR
+hkaIXHIJycrdFkYJyS1FF2I2FWqLveVa/b9nn7/nwfN5zu895/f7vec978xy
+zwAXbymKorrwS/5TS8gffSb1348Wk9KaGRZbwMKQWh8BcWVPoB9My41/8QH+
+2Wt2RwnsfI8r2KbNpPicJM1puHTZQGwEXHpxxpFlwKQYwsa4HNhxnrpqKpwV
+b3k2D26jX8sYhXUGvft/gTcY2KtaGWI+UeUFF1h98vMIHxYesB2Vgp2vTz+o
+gCdYmt6ZWD/dwHH8NUwlXwwzhxPd5s+XXwHzC4+WL2NS7YopbnrE3pKmNTDX
+sVhCh3UWdDAaNZmUB09Rlzgru1RrD9zZdH67Llyqstl3ToNJXdJbt0QBlggK
+lGphTd+KwgmsR7vn9PEC3N2bK+qCPfxKKiPgk7blKcUkn+CzQUnwQEhSwjk4
+68G7P5tgt5T3Tv4wM0+wl4b12HkNPFe4u6047Djs3MzctpWMd5QovodpCVdL
+maR+9dnLx5F/1EFHeRaJ7+PIyKDetqu/qruRfCJP306Gf4sTSoWQ+D8GvjZE
+vzyUN24pgnkc//hCWKelr+klzJ/V0FXUYVKuW9b066M+m8PVcbZwVbS091GY
+v/EnaXdYcDXv99swW+GESSBsIvtHgoIRk2JJfXI9AYcW9VzmwBPshmQ/uH4m
+3biIeMvEnZ2wNTsueQJmXplmm5F4FW4s3Rj5vWn+OIV8plotVD1hZ544k9z/
+t2cE3b/ATJWcOhr8TyL/ZS7MKHv+TIT6PufaqJXDvNUPczRhsUnIUAXcPeyV
+XoL+CJIY314nDi++6wy3Ta0bTCbx3yzdIQer2Vq3nIE9jCo4z9DfdUdlT7rB
+OsLaJ82wpKkody1c2qhr3QO37bttpkry0ZsImiX7ZYw3PIl6hLc0TTZhPv3w
+eycGYd5dW58suKC6aFuHEdkX/QtVkN+Zzj7nZpi2tet1KnleMm8rPIAlYSOT
+Rqivk/bKcwD2OH5HfAu2jRJemoHlNgpaDdAvQ7+tjgYkP77POBeWO7z7lx9h
+7vltjrlwuM23jWkwpd5t0wtfOrl3bBiOSSlLnIYXrTqeuNKESdXYpvUpLWdS
+m6cHZcNhSpttqQp73jkd2APHnKKLyHixWcuktinGZX/PJtc3XWwdOQQzCn/4
+rQ9+/qdV7zWYK9o/VAA7FyjXvoBpS1Zf+Qn2qdsnL2eG/f6F89YaLr69q88A
+pvF2SP+F+tr/uXnH2oycB7Gn+KR+l1ca62FqyzqxLNykzG63JNfzPal89Ctq
++uVOXZjp15zOJv18/qaIzO9BL53Sg/nvNO3GsL7Qkb9BHg73+K66meTvHLaG
+Bo8qs8ZzYElX9mpLWDeQVR8B81aqKx2DHTyrB7hkXMXevEOL7N/hht3EeV43
+7JAPu2Qk2BF2tk9LaIA/f+2b60TGz6kKDFFf3/qIzRx49Nvq5gDYaG93HR8W
+Pw7cVgP/MbR+IAuequwvm4PPpA3efQyzlin9vRb9zsgWyyxGPSz3J6wj8Fzl
+9K8/wILXB46J4N/EDj75ML+/7sENuEh1+uxHM7JPG3+ogR8nBxp/Z459keYk
+KYdzMxbEJMESjd2SLHJ/TZcODsI68qcSBXCWbt4NHTr2w2fRE1cyrjD8hA0z
+rBYt14G7m2RrImGuzsOdr8n5sE3RJh8WV75PvQarHeIN1sJMh5VO5HlvPqn/
+WAzrqNDqGTCjSPTyFizQjl88h345RRX5FpP4+df/JedPeIi/kwgu7TjbGACP
+5i4YPgHznpWNOMN9luH3d8GSgoVnv4eV/fb3MMj8fBkTf3ifofYzJVjIeaSY
+D7uHLsn6G/VRdLWXM8RZkTdIvcKUj2GWpP/NDaaP4FGV531kf/Y9q+jogQu8
+bZPJ/TG0Dqkl8R71P6V+hfr1H3UETZL+mWSec4A/0zUmNbGeXFy1mhCmHRLz
+neCpjnDNLjj4iGbJOZK/c1CjtC6eb96qhi6YpiEspMMM+9mDGhbI55Ox/HY4
+5hXzq8Owzs3yFja8wfXS/VvwRFt70F7YL9qbJ8PA+DqH4O/gJrtFYhN4dKCn
+3xjuGM6Mc4QlpTs4FGzeeeSWLyzn1rGrA/mIThj6h8FGYbTzF2GnDxPzLsI2
+jEVme+BokdLqDDhGa1OYGuwRXymVAwuDHkpeoB/R/w6Is2HGKV9+IXmeP2nT
+0sj6vyuuCIWFTfd7L5D5yx6xyfuh1yqCQdZ7Gmk9uh2uUDb145H4sfL5LFhG
+IW7EHWaFlJrvgi0F9d84wTWngtWOwMv9lnA2wtzNJS0i+MurYzJWxHaPzrfC
+OdpfLMzhUnaC/nySL+/pXVOYH3PsPrk/c4lVBxnE5Q88SL03S555ryfrWXxJ
+H4CvaLV0kX7FLN5upEf6bye1xwtO2TfReRDW+3JvP8lfEFV2LQ2u9Bcqkn7I
+JRfYtMKxJTr2rTAvOv7SCGyf4HZ/nMw3Tz5kCt545YiZ2kpcr17lPgNrVdtL
+M2EbxW/838MLt9wf84azGtYm9MCGj73jY+AYWSW/63B7nbg9H5aI5OjBMDtN
+p7oBFr9ZItoE14XSc3pgFt2+lOyvkST3VUPwRPRf7c3kvLa4vOc1LLd0hhkL
+U8cnXIi5nKKtu2GvH7fWkPiUgncdK+DRhcbuvTBt9ayHDMyzWMVuIflKH58Z
+R78l4wdGq2C1ELs/R8n739MuII+sH5r+ZgLmuHrvE5H4Ztt6WVy/wypGORL2
+2JScaQYHGSeO8WFGVA7lDn9yn1sQCD89uKM2FTY7rcg9ClOFNVovyPnV0F75
+33jejL4B6rPLNN13mvTHLjPyKCx2mDocCwuLlccq4fy3VaXZpJ7Tr2ik/4fU
+IjPrSPy6DmqVHpOq3jNwaJDMZ8rTPwAzDIdmpVbhXFszGxABz/qWLDOBY1zk
+gpPhu3u1AlxguWb++XS4Ulk6Iph4F7csEd7fxxzPgtm9zTeCYbFtvnsTLAi8
+MrkbTjN6mD0MGx0NLjDUI59bDOs/Eb/44D5O9s+ulTNfWzKp1sQjWuVwTX/n
+G2149Crd+AS8m57vtQK2uTjdZwOfsanMM4LFMUN+X8GH5z0x0YdpcnNjD9Gv
+Qze969ThlOat/xbDC7gsbwUSb+lSQN4XZSNvfyTrq93+NfQc3HXq7tw7mHds
+xaYLpP+ZJhXPYZuxntmrsLIL530bLOZEfGqCbTrjqHpY+DRM8jccKh5cXgnT
+LqxNN0c+L+OsXG7CzoffZwTAi22CXcpJvYOWH6pg16Rll2+R8Z8zHCn0IzHa
+cCeZv7XqpicL1v9+vdMQycfIcCwWtttcpDZD+rnFvacF3umz/8NS1JM1LRU4
+DX+8EdxhBxsFD6Vq4XtFVoZCmBfpZ9T3Dathrtb+0ji4Ru219AbYR/+f8Qp4
+osrRYQ0clxr5qB+WO//GTBeWJ99rrP7//Uaf+T/tBqKl
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.54570515633175, 7.171979374673003}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwt1wlUjfkbB/C3tN+0oGPmKm5TUkKFQQpvJYQUZUmr20iNVEyRGrwto6SS
+GoU56hYVow1ZC7fFMkq0GEupG2lPm5RC/+8z53/Pwfmc531/v+f5/t73Fm2h
+/6ad0gzDVOAP/ctI0V+6LPPfZxLLfDc2ybOGC2qd9znAJdFjZomwsfBVQyy8
+eI1mzzuq7yzouwi//7m5auFM+EK7JBOO/OdjYyTMnvp+MAIuHaub/xwWRMXp
+WsGGKT7Tp+jh+sRHNW3qLDOo3LtlA8wtvvE6CI5SMlU/BLMX2VsDaizjomf5
+YxrV4z5U/QIHRn9tvgYLnO9NzVJlGUl7XGwR2VBacEyFZXQcTrfeIGeOpXMT
+WSajJ8s9m+6f+yT0jDLLDHFrP8eTffgvGnks05nZqBUAizceiXWC5z22T7Wl
+euCrUlXYPjvBfzbZsyRGBq65G5OoCHuUzBEvhudPye3owXyizGVKWbDp4NdJ
+b2Buzmp5G+yX5JBvTfMzjgWiqehnW6f8zzWweJZfuBz6/TXp2xcJ5RU8kK+A
+eeJ1nsh8gxO+B05VwLzsS52petjPuDbcPQr2aPVd7Uzel792DNbkFSj/RXbu
+inZFfuq8p5vew31f4q9ehFccrjxlMgv9rfE/8Qq+WjQoHQGLC5w3dMKrWz+c
+q4PVumf/3QC3hXXs0tHH/g7+o/mw3inbKF9YXPF5nhcclN7mmwtzZzfekIb3
+VRUPvYclwfn2Mehnv8m0KBUD9Pnxl2ppODviis4cWGSWeuED5p2jmBBsTn7D
+u1OKPHga3s0rYObcBc3LyGtfZ43nYpjVddibgzxLnzSm68KC05+n1CqxzMyc
+pHJFqqe8PmgA9/4R495B/Ti6pN5UZJkv3cp2D2EmqPF8ONxtF5J4HmY32x6P
+hXUaJLqR5CeV/Dp46OizF7/S/QfrehyxnuCap+52qi/9mCeP/W+nHZjuSFae
+EfwO9rglsqY6x1fY/Br9Nt3xCN1D9TF1SSPmCbWPH4qDPbITBlow75fhOLMi
+qtfUub3F+a734eZ8onynbdjsinw0mjVUaF4mUs/jFjx5wsrzYXDC2b6HozAj
+KLSphiWel8sFyLtRZpemzmyWCbDvUtSHd2Q//DEQZn3M61VhfrbxuhK4L6CM
+/xr3r1Dr75I3hG3SzI/SeQhy4qzhANF5vWkwL3vrkmCYXW44aor+JuvPiEw1
+pPeHf08H/Q8ua7x8E5Z87jSUwnw1ActTymBx1plgCfKQ+T5YXwpzMw6JnyG/
+pn7FGzfIecW2DchX78T5YRHZN7lDHX60SLE/gtbP2W0RooDnl2++SUj1udG7
+NOF/akTyK2DRFcP9X+XxvCw/OVmL9rf6y2ka6gd8q7zGMZ+o4nvZfnimxpvb
+7bDA++91ilhfXmOBTz0sfmN99Qk8nLF2y2u63tlwYwH6y534pOo95cX3y8xF
+/718v9AxmNm37VMhztPlutNWAe3f2jt+E/Ouj9pUsJHyaTItvYg85Cd/MIqn
+fosyZoYgr1WPR7pr4QTpqG1qyLMzoidSMAee5XLCBm47ObJ0L9xXMWX3Tjjm
+ua5mGdXFB7WFcLStpt7kuXj/ut6FrYAbKov93GCuek/vN6zvyfdbmwFLQg/3
+roLlXC38G2DR/birQvQzwuNN5s1DPUd2qQv6Tfbukp5LPuFtw2KeGapq1yxg
+0U/B9zQxb9X9Jmsb8qOmN+PIZ9mF+TErYY9H96OHkaf67Py+hTBjf+e8Gqw6
+/jJYk+r6bXZbcB61deXJ32j/eudd1XIs41XcNKmePOGpbDSsbmX34SYsyLZY
+cgiuUvyokgIzGcN1BXBbxPO9oVRXjj40g9azcL+8i+pnjSpKYVff4X5Xmt95
+KOMk9tdrqRt2h8V73HI59FuyqLzOj/ZrPdYVjvMsE5cMx1A+kROFMZiv3sdK
+u5DWc3n6PBrz83OCvTrInKtfAPJZ8nbLMgPKJ9P23ELk9/dIbcJeWGygkvgE
+Dti9quE+za/cLjFA3sUG4evVjbBfV1H3eng0YbxFaETv97/GJvALY53sK2RZ
+NeFL3B+xI/32KMykHNlpRetHjD3UMsb61pZav09kuSPqslKmsODDwMTj6E/+
+wbTlG4zp+T7UHIr+FzrNY1xhj/Y7T50xn+cfv0zfCYtCi1qXKLKcVeyiR14w
+J8ncqY18ZEMUDgth1q2w5yd5lktt8Z7iRPult76ykWO5xQ7r09bRegdST4lk
+WSZEq9bbjOp2h7SM4HPdjk0GVOdiY0dlWG793YTwH8jX1BtlUNePGXmmQP19
+C6tZD9+tWOQ2QvN2d4w/hbW83O61weLpg7wwOXo+tj1thjmnOGUXnGfL4Sxe
+O+W3xFrJAf1yqclOY7CkP+XcNpxnTEXT0ETKI944zU2J5fz1dS/okgel3m3h
+sdyl/Ul6FjDTnNezAHlVFYal0bxcaE5+hzLLVcZ8642ifl1l+X4436yvsQ/z
+KY9Df2bfRt6fXCIKXlF+o133HqE+N0h5rpQJrl9b8zEZ9R0rBsSzYKbUVMoA
+/u3dD0rryJ9uvQ/H+v3CgmofWHLlthd+HnEDh+doRlC98dq/+ej3bIzxomQT
++v2kOPAMzkfL6cHdDKqL3F/g+4kLNPHIvgiL/uHNw/vDbRoMXk7mKpadtcb5
+HFO8qE3XS5ImCDchT6OkI0tTyCWu66Jl8L2x/PiVaFhwdf943wSWy6yb0nSA
+1tdMP54EC8RBpl5k2fMygXDAt7cWm2FWTnUj6kx2e2zAKlpP7KvVi7pqzhFt
+M7reuHI0DOsfG0kMX0h12/lZVrIsZ3RFOnIB3d+wMMgA/XUbT65cQtf7z3+n
+h/5nCo/mraR+Fn8ynofzdJxuq7+V5qu01jHB/L13cpv8ab1W80JtPL8ZMxr1
+48khic8HkFeW2QuVK7C48E/pM8jzrZHE/SW5s16Bh/Nteb/57jjlUzDB3hLu
+STqbqz+fzkvPxgznsdvxaL49LPG9eHoI70vJXKMN+8n7eviBWO+jxaSFp2HG
++sa9YuwffTXN/DrM2vIXv8LzZrXGMqKS1jusdawa/SdN0fJ/S/erPAi5juc1
+LqflThssvqTVdRLP89IB3+AuWi+vbloQzmfXSLFqB3lr2ZAv3pc9IddNm+n+
+WOVNR5G3dnLC5zpYFGCysVKa5RpHb3IPqH7z8ePV0vg+eJhqXkh1dedn36VY
+xn/nb1kZ1E/Ydt9PUiwXNHJmeSJdr28foI/r8/N6gyLnUx7rDqRgPcWlb86G
+wIK9gRpm2M9LQ/NxEPWr8JuhEs7zksDuX8pD9Lub2xfYU1huf5jWY2Vzx9D/
+Pktnv1i637WdPwHn+T4+TyWd9nfQ9pZCHsLbxUVFNN+kksp2uLx+KL/+v/UV
+8nKQn6W5h2Scrq+etdIS+aos2KA0awFcpaifjvP9cXV/mR0s2FBdUob69qN9
+8cGweOzXxGz4OTexO42uP7HD0RZ+tfaFXzksKl49cAvPj5zF9uctsOTSzw79
+2H+cPgv+//8TBfZ/11uc6w==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.666233980906949, 2.1296932060463307}, \
+{0, 1}], LineBox[CompressedData["
+1:eJxTTMoPSmViYGCwBWIQDQEqDiEyIFrOgaGg63OSmYrDzO9z9v9uk3VgWLF5
+kku8ioPSsWuhi37JODBoaO52r1BxuLaBb/3LBCD/w0aDX/UqDvqbjmztPSDt
+wLBjCturUhWHfy805q1RAPI3eJmtiVJxUBZ+2RDbIeXAkPCA8Yq+ikNNZHC8
++z9JB4aK1Qtvf1d26H97fYldB5DPcX3a/63KDn84o2++0wLyG8QO8eUpO4jX
+1jVNfSnhwCAgx2KkouywPWWl0aWjQP6LFavW3VFyWLTIuKtvP5DfscJy+Wwl
+h/kz33T/vwLkB3ha3EtRcojcYaJ/gAlo3oH87jprJYcJ68uXMLsA+Qy/p7xR
+VHIQen0p6c4kIF/D6uwiSSWHdau+P5r8Asg30Hwkrazk8EG39iuvHdD9B/7P
+P22r5LDt2qvvhj1AfsAHbvUMJYfOV85Xg8+A/GdvuXu+kkPCzvcHp/0A8ndw
+tAc+VHKoWCL935kHGB4CG/TkNZUdXvAILhJgAfILGpP/Fik7+D+OC/O7B1Sv
+oXp02S5lBwab++4ss4H8iCnTv/1WdpDY/v7gO2uQ/Wck1IxVHCpY/NtTjwDd
+98IwgyVWxaF0ZnuMliWQ73HwsGq5ioOa/NH5SguA/r+QH8/eoOIw1QIUvxJw
++SfM1gl348Xh+qd0Viy+ekwMbv4kuY0Vs6zF4PYL7hKwEzwiCncf13OFHb9T
+ROHu32W/cOVGRVG4/xTF3se+/y0C9/+GM08Y9nwWgYfPykwBu0x2UXj4NVjs
+0VpjLAoP32AfUY5zxaLw8Ldwbub6dFAUHj/RFRyyOeJi8Pj7bq47VzlXDB6/
+lcUd0X92i8Hj/8KO0xfs/4rB00dWp3AJg7Y4PP1kNJwpLXQQh6ev4H1hZ3Wt
+xOHpT+hLY22WmDg8ffJJLlUTvCoGT79VphrRB8vF4Om79+SaBTsYxeDpny1O
+vH5RuSg8f/BYXU8Mvi8Czz+3Cqy9iuxF4Pkr+MDHALH5wvD8x7Fac1UsqzA8
+fxZoJzuwVAo5wPLvVjYQLeQAAACtaGA=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.354800000000001, 6.}, {1, 0}], 
+        LineBox[CompressedData["
+1:eJxTTMoPSmViYGAwBmIQDQEqDis4ITTDhdu3dtmrONz7tfe8025lBwYOlz9u
+2SoOf3P6puVlAvkvylXY6lUcDp5abPiQH8hf8TIwpFLF4c7e6gtztig5MDBU
+rVgVpeJwWHOR3IlYID8hIGGqqorD9Ss5KdqCQP6F+ZNq7yk7HEt+3Lj1sqID
+ww/VNO9uZQc9U+P/QiuBfI6qjBdGyg6rtsx6HT8ZyM9QbVtzR8nB9nYt++9J
+QP6EvTcP9is5bJyc/qF2GZD/wNKnJ0jJgf3JuY+3ToHUb1inqKXkoDhZ4e/c
+30B+xaxpdyWVHBY/iEr0Ngba/0L6u6SykoOR9oXkK9lAvsGGFCFXJYdPWkE8
+EvNB/NupX2qUHG50nC5JPQ7kW+iVSR9TcqiS8z3z5T7I/SEHiqWUHXbuCGPy
+fQrkT7gR87tI2WFrwoYVvVeB/AiFqPATyg4/OgWeT9sA5Guc1SkQVnE4oXFW
+m6cCFD4mnRx+Kg5ut1fEGOqD9O+QcSpWcZgx42PG0ltA9wbskGNtUHHwkgFG
+R4MiXP5tBd/0KFVFuH47s/DF5y4owM3f+8Loyud2Bbj9ve3vJTL9FeDuu7DB
+P7xISwHu/jMRK/9uklKA+4/78yZjbgUFuP/XdJh0z7JQgIfP5GdrPz9PUICH
+X/Az/TnaUxTg4fvIYOm8LWcU4OGfUnefKYkFET+1uoZ8qqaI+LtSO4O/KRIR
+v+5mTT9YchHxfzsmVWRBDiJ9hN85w/A2TBGefvavlanz0lGEp6+1NpNnX3mn
+AE9/B5/HPjRfpABPnyuCW/STvRXg6bejd8cc2wfy8PQt4Pn4kpKuPDz9++q2
+JFR1yjnA8scOfhAt5wAAXRMymg==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.354800000000001, 8.75}, {1, 0}], 
+        LineBox[{{6.4999999999976925`, 16.}, {13.49999999999251, 16.}}], 
+        PolygonBox[{{10.6, 16.}, {9.4, 15.6}, {9.4, 16.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 16.9452}, {0, -1}], 
+        LineBox[{{6.499999999996362, 16.000000000005457`}, {10., 
+         10.000000000003638`}}], 
+        PolygonBox[{{7.947677384685548, 13.51826734053906}, {
+         8.206811054955079, 12.280184249251306`}, {8.897834175673825, 
+         12.683281069670574`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.515942703607428, 12.823799910437668}, \
+{1, 1}], LineBox[{{13.500000000007276`, 16.000000000005457`}, {
+         10.000000000003638`, 10.000000000001819`}}], 
+        PolygonBox[{{11.447677384685548`, 12.48173265946094}, {
+         11.706811054955079`, 13.719815750748694`}, {12.397834175673825`, 
+         13.316718930329426`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.484057296392571, 12.823799910437668}, \
+{-1, 1}], 
+        {PointSize[0.04], PointBox[{6.5, 16.}], PointBox[{10., 4.5}], 
+         PointBox[{13.5, 16.}], PointBox[{10., 7.5}], PointBox[{10., 10.}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T17", " ", "P2", " ", "N34"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdieg/giijfhfjhj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdieg/giijfhfjhj.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {0, 0}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwl2HlcjNsfB/AnWqZ90UpqSiktTEmSMoMi1aVIiiKMpUUGUVfLzW29SUpR
+LmlaqKgrSpsuSVJEU4pUl6G0SAnTXvw+5/Xzz/N6e87y/X7PmXMetPYd3Xpg
+DkVRukIURZ7UzC/8WcyiJshThUWFVNm+uAfHhuUYE/eLxGX7wv0HrmkrqbIo
+etHa0kUw1fF16Tp4RE1cm6/Lotxq4kuj4MhPUm+yYGr/pZXvYP4/FlFHYC/l
+J+6b1NDu7FjcWrj88D7RWrh8cFmfJszXfBdjPx/j62ouE4dpY5W322F+i3vs
+rA7imdws5LMAfy/mnDsD91tkvZ+EpeJdW0TQnpt/qSpCnUVZmNIGVGB9k8CN
+cxeyKEf1tqMmcLiwwuUAuIuml+FE5m+6sqsV1mennDwB222q/aKpwaICfng1
+ppL3TG7QdljHJ/jIffLez1UqgLxfoGLQBVsE8zKC4cj2qZFx0t5bWvkI3Kqe
+2S1F6jcrb2YP85udvdXgNN6rBCWYdvM4Ux2u/vMNpwXz58UfilaEwz3Ol0fC
+Ltl/PBOC6+83FzHgku5kWg/GZ0lM93QgvxG+3j8kHrpL8PcYmBEqefEvkp/y
+TXcrmDWeP7UZrubUbJlBfXSGdp+QJvGufpf8HGZf2tpRh/oVCeXZFcKq386s
+CYXrmx1as2GjKyUvTGH+5PDTIrhny8oHA4swX2d+UytsU7zGIgeu/pR7Sxbz
+2RS+ZbLheoMSUy944qsL1xCmTqjuroXLL3x8O62N+V22716FfHRi1iq8hlWX
+vi+7D9tNC4nfh8MHKw5uRH08at7J3oLLNWLE2mGe+GmxG6T/qX3C3prYP7ev
+eZH39cWPHo/CkbaTWpUwl1M1aEVnUQIVme882GOB0MUgOEBDVHcYnolaqFgA
+f0l+8kIW8bEfjX5vgyPt05uXwxYTzQtHYTmnF7M74KALe4ZpWljH7zMLT8O1
+IS6m8rDwnzUKacRvOcYycGOuS99tmJ/77BIFf3ka8+kh7DERljSA8Zy2O+TW
+kfdO8zKfwS7JAp3HcNrL2cvX4fJ3tQ9LSD3HvyWEEMuy7K7Aefp37jvDBeYK
+VCAcQK3014N11h5LtVtE9rPru1/IX1hPabE8sbNcWyVctEGG3oJ8g5a33I2A
+u54PbjgHe8mVd3rCtH8aUm1ghoPaXEdYP3LWfApxuykMyjqR9o0mO4vgoAZH
+cV/Y42iTiTecaCIilQ4LDl9tWQxzJ3Zt+gSrJwbQB0mc1YViWnjy9ccqy/Ck
+G8874oYnTa7/yzk62advzFPxTDsyN8Of1IV5ILgTT7cleZt34mk3oau2CON6
+re2kkbxtphwafWEzsxrvraT/+UnbYtiomMv1JOt6r339OFmf/GVBx+DEdaa5
+K5DXVY2JffEkjlNpcX5w4+HlZ8m65xRt3P43HGKa8KkJVnQPfP4vXLRTZoOA
+vA8WzCf7Mm/a9pQKxg1gR3V/hCdujzisJOt+s9qyh+zDuYoPneH+3xm3OmBh
++Uc/2XDe+LOlT2Gd/dkRR+E0zQkdsk+7LmdocuAS4bM2sWTfcj6KHyT9L1rH
+ecGRop96nWDB47065rBUnGIjg9TfN9VDkuzj4fE1ojDnnk/4R7JOzK5lLST/
+joaGf2GrDuuRi3D953V2GbCds5PuNrh22/fnsTDfZ2mZJBybM9kSDKuW3z9N
+9gXH2ur07zAjrrNlmJxL2j+P/QlXtyl+8CT2fzt2iczHez1AzknHmK1NpSRu
+J1H+Driqa9HmD2S9StOtPuN3Lnd3ibsS4mUNGXQmwGx6boAz3C+U2rWReITT
+kgy77dmXpAzPyOxnk/pZBJr5TeNcEdzf/00b+9jNyW52FPYKXmjkS343N3vG
+hNE+3jPmWRF8+Mkdy8Xq5B5wSP9G3kuxv7rCBa5qNwxxblXX/JeeDPdHiBt5
+wiM70l3aYf4N0xeRcPiQNI+O+PvHn8dnwu3chTcOw0ap6/+7C5eLeZy4BTf2
+9VwvJ+dkwyuxTzCts3V9MUyZtCXJoz4MrZ3R2eQeKpupNYaFzVNvxME8/b5p
+c9isQmK1DzlHbVdvM4Tb87br2cD0X4IqcdhGayh2Ppl/hbEkuQc49SGZX5HP
+yJev38g9oHjr9cMnMGdMmtIh70089DNgVbPl5+8gn7wNzbOhsF129y0GHHsj
+2pCcw26LXMZyUL+07ErnbbDcD49QBdhv8WSJI9y/jroYSu5ZCV0TZ3JOpxnd
+/Ix7OP7sbcZeMr7JH0q7YYuKHXkhcLlk23An7nGbE+kq2eSckT3WfQh2YXef
+e0XGS98vJwLX+kiWSJF7ekvJx3v4bpiQMexwhFnVyT+DYU71c9oFHXK+Ji91
+g1mbRZU64LSLCbvsiT/cKtUm95r+5XPOcBDvcoY3LKfQN+oLlzzdlFwA82zs
+hVJhde/C0AFyr2XEHG+CHV/7xmrg3kxsOxkhj3i8luUZ25Pvmo3Jku5wo0PS
+RvIdEysaezOTfMe0LlA/A1vs+iDohWekj7LPLib7zTpTB/nbpJZviYOd9BeU
+uMJsa/szYeReHv0r73dYykhJwpuMx9BOiYMdZ2s9HWDuy5c2MXDPu4H1emQ8
+M+sd/jDNuuHJT8Q7cVrKlglXcRPUWsl3wxlDnynMT9tw52w+HNu7VIjE5+Z6
+8tAZOE2yVnkFHM4Peu9JvqsUHwVUIN+8jVbjLFIPz9woE1LvwbP+RqS/xX2T
+TGXEez39thb5DrJQKpOC1VUuVxPTFWzDgpRwrnzVWGVM2i9eO9SvyKJSHCyt
+bGDVwKOW++CRDVOnDpLxh5LX9s/D70u2ZlEyHHTNwyMMjr9srNAAO9VqsvRg
+fS3LYlHky9I2+NijgHpLmi8h9R9hVuwvh11obTuTYLsj/qJZcLXFdVoH7FVU
+tCQTNuoR79HSw+/KStW5hPS/y7txEOZEZS5/C+d4cgxuwHb6Uq+kMN+E7dyw
+dzBtzam/HWCG38IpaX2cDy1TfybBtabFzsvh8qddVh1w4x52xm+w3aLLu7SQ
+H6so298DDl+jEUHypV3wrN4DV79yT7lM6pE8LOEGy7W6vqkh7Ye8V2yAnb5a
+aXXCOV5eCYaw6mCh4D3MTox6IA7zDppfaYJDtKrKPiK+cq+X5vlwecWKzHLY
+4nHpMz/Sv/nYo3Mknz3uqxfA+vSZg2yY5W1kWzqP3IPtvDVw4toxHxZMSz+r
+oknqs2txVxWp3/YiFTE4b8LOZRncc+jL7gnUkzf7QXBFHudWpay6AOb4mC0Q
+g63uTCtMk/X4cH35STmMK8NLkSb1PS+l1iaL9XUsDDEk8z2e5/JaBr/rNGMT
+F7j6AcdyVBr78EDUzWiYOzXwYCU80y4V+gimKxsczpLCPWZd1zcH+bPWBWlb
+wH51jr12ML2kTWtKEvPoB9gmwYmDd9r64ALRuoq3+uT+LR7+Cbswxsc0l6B9
+m9up1ehv9ob9dC/sFXhmPBVWL8jXTofD61eXSmN+fV32Oh7MyeIKUuDEh+4l
+kzDPcnKtLuLniq/xVjXA+hWLNt+Du65GPzSEGSKTzdbIlxb731/L4ZHu0MYS
+OHL/iBwDtqvTCxZHffSv/SWnDXMaDj3Sh+lZ8kUSMD2QFbAC5m2rPTWI+bi0
+l/HGcKPNPKs6mPX439eycIFYqyKJl2VoOVlG6vtiyvo4LJcSo6wLl5yrFLGD
+EyP82r0RX7mPoJhO2lcc+ycO+egs7Tv+E/XhLtwSeA75s0ylV3WT/Rj2zeZ3
+1MttvuQ9HtmP1GpFVwmMlx1iVU/28xyvYCNxrFfKlgfPSPt92ltFaPi9nrKo
+aIcpS78dA6L4fmjJMv9Oxt/V+4Yvgt91ndMzZczPV1no/kMY37GthZdsSTxX
+Uh31YO7NvO2hcJFA8OLMXMxjU3GgiuSz5o6/KFygldBBoT5eJ/Lly+aQfx/e
+S7SDEw+8epMMu/UFr08i/jSscQWunaOW005sYH2hAeaObTqmbohxBRcc52O8
+qzW7EnbC1MrDEjFw4/lHqkkwn9vjTUM8qoIdwQ9gLtvd/BKc1pQY9gHmKepU
+6SEfncKPLpMw/QFXqwR2q5rJEjFCe+Vrj0yRf+Md3whRuDqlLOIKHL83LmqG
+zP9LZlkfrPOlPrcfZnSplsiK4fvkY+RvjWS83+J85IhlOxj5ZD77EVYv2gfl
+zzidIfHuk+g6D09oNf/nStrX5eVIw1dnkrSMYFbfH4/3Ih7H6UPec2FOzQLJ
+RMQf1No99A71oMJf8dKRb8DgpqpqUs8sh9Ik1KdqeVrmTdip8u6BE0I4X16r
+q14j7Tl+6x0o7N9Zd4urcPXXiwybn0xKx6+58Drp3x19VGiGSU1cNSiqhFns
+gw7vJ5lUT/wk1Un6X8oMGxpnUq1TVsMiiMerN7pt1RiTqvr7tLslceCyzCYB
+k6IfYzw+Rept+nR92Q+MZ754ZwWxSGvH6HcmJfVTSIZCPamcAYlzMFuwN8eO
+1LueP3wajvXJbkqE+YusDSthlqH/htdweNKUzjqMV3J0XqeyMfo3nHcXw3z6
+qc1JTsSz3NZpuHyJ2r0zxmS9Cx/IIr5EHeG+PJhfOveXCeKvWvXbsifG5P6J
++uw0gfgCLUReEytZTexEvilWtO2dcPWxpADmFJPi1taFt5H3iZOGX+F4Nw8P
+0t+LYS/qOc2khEXn6xaQ9mEx8WFwo5XsybNkPt+WbY7w1Uu3TA+QeGrNNtWg
+v8enbaGrSX+WbSepb0BTUaocTB+d/JWLeJwSUni9pD4LjihrId72zv2+1TDr
+5dPrLqNob/gjNoPUx/7z9GbUQ7iqVj6avM+/e1vjG5MqkIzOOkn2a/Uzlbwh
+JqW4KSX4KHm/1KWZGsD744yAAFLP3giBTw+s3fstkrRfpWIhzke+CqE9XDI/
+Z03IxBsmVdt9re4p8YE78TU87JcEg+wJ4qKDUjZPkN/3nxqmpP5jdr2CUszn
+2h59nLgx+71/Jtan/S6/jJj8Cbf+//8fGbP+ByrUpRc=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.851144620506076, 7.907943040036291}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwl2Hk8VPsbB/ATCUWNpFzLNeRSlqiQ1pmUcJOlxdI6SHS52VpUqhHViKJQ
+IjWyhmqKauxTKlOoKbLLXOVS2bIlit/ne3/+8Xr3Pef7PM/nnBnnpOnut9lT
+gqIo2SkURX5TXZP40WD+//ciJqVWVsyWoDMpk7YAGg+mr6ik9WJde/YiKxbx
+xwlxIZxVEZCoCHPs1M76wv46yY1VhkyKpXDPSwrmTCievwjz5PlaEb8zKZe7
+hRXb4a7pYTt/qjOp4mPX9JbC3qHxnL2w9cr+B8qw8Y+otAo1JvXpRl7xDNh6
+3toefTgqnDZOHOzwNuaqKpMSswxDyPEJAb5uNNj61Fi+EUy7cyUqSYVJCWee
+iLOHzQOPbV8NG/imJh8i51/wGR39DXP67Zl2ExZqmDuK4KGy0CYhPBpmNlwO
+7z1+i95Pjm9ZoVgD06X/nFTAvCypqtPjcNqU82J9mB+j3LYc+zf02FxeCWf9
+teN+BOx7LN+NAXP1b2Z1wBw9P2Mzsq6yoMUK/dYmxJ7WIHm+sFLKJvN0FoWP
+o17/ckp9GuZ1KKuTrST9D+TKOsHeha3saDKfVCcnDv7p09v+JyxTKKNVokb2
+T0+cNEB+xbQDVXALvceTBwuKFloIYOMjpUtZ8Kjt01dXYVbQ4UkFWPzpn/gt
+cPH12ByhPuaIXR41TPorz2w9C7OZVo1sWNBk0WoHc8celv/APFXHDx7RgmVW
+fT3iCZtnW3dJwP4luypekjyPulb262G+nA9tBrDvXbM53cRe7hNxykzqmYnE
+rCFYKDlTUwa+nrp8vzQ538O5OHIeco1eY6ENM03aDmvDaZmvLazJerpz3/u5
+TEquzrLQHx6lNkXfgll/rRIkwqLdU/+OhAVjLS7lcNemrtUxML1PP7ETtn5q
+sP0enDbHTzQV88e8CnnbAcfd672pDLvI8aKNSD3BX1qacP/3kuhz8Pr22gk1
+mNMUqNIFN+TqHJsBC+Ua5Deif2P2aXY39u+/UbMwG1bLNcgQEHtZ7J6ETW45
+0CNgzqXiuZbIg2nY/dAKpnEc2Yfh4qzrtyeQh4xdzfNo+OdvHsk82GWylHER
+zj9fFsCC2Uo+8f4wzatUUwFmarZUm8HhY/zk5wvxebP5274d9ValJ2aw4ZgX
+Dq8PwTsVD+eshxPsy/WGyXyTyjmKMN3vGtMTFs1XVe1bgH0/h2dXIo+hQO77
+elimXjZkESzz7sHM17DYJ3o4VgnznOQ7voV5iWvNJOCDd3XOieH+tti+k3OY
+lPK3BRJjxOn032fBDUaX41VRj39sV+UjRVyvJQr3LGBRoWFzMNy9YusRX9h/
+TNjpBDPrIobjyXr0Y0NHeK9WmEkxHPzhA2cfHJWR6dUCe//x9HQcnLaxR34I
+5gxbBtTDJsMaClOQDxV0OE0P9W13DLQRCxcppXDgrM7LocPk/EJFz69wvqko
+pRl2kEp7YIt5dt4wjc+HaVNNd2fAwq3dW0Nhrv2FpAG41iYucB1Zn8ncYIB8
++lfnTv2FeY3XDGjawwbbT0Tx4IYo21kuMLfgTR0LZttKLrWE+Vd7G2hwgqac
+/FzYVvt+ZLkuPkd1H05WYn+1oW0vjsM82SCBF/zs4BTVVTAnKHx9L8nzWNKj
+aTC/MviCB7xqMNmyVQd9ZkoMV2F+mfEFbQKY42Ox3xjmzHf/fh/OyritFTcb
+95vzS1ce7BLCcJpQYFILDF/pF8EyyQpdB+Faq/3fRWT9daLmLxrO+3mupA+O
+WfbILwnuD2mcqYT6QmkX/S2wi4mj3hq4waPETwcOKbqg4Q3H2KtTc+F89cuD
+0bB1idYaTfh6vMSLB7BDWMbiDbDgvuJwNUwXWqeEwvx1PmvayP59j1a8gYdK
+XZo/EZ/JFC5Ef4J/pl5thdnuX4Ii4Z2isFYh7F/DkuuFlcPkyzNg71g7p42Y
+l24nIRkMi0tWuyTD2tEVI6thkUdW+ge4wbY3fAzzBXs+vTUdeWnXHZIl+VjX
+KpaqwxRns7kbTFkqJivBtTeyxmkwbejS8m84P6uWZf/0D9y3wRG9PLiqpVU1
+GBbxs4OcYJcvaQqmMD+no+IT+rMtKjs3ro16F0dmsODwxyG7q7XJ90K1XTXm
+9VUd78yBR8u32C2BxWlZ9VfJeozLHr1ZmH/jqeWXYG7Lq72j8vj3UP8Ass7l
+vX7WJIf7SF5q3W2YRr1JaJmBvD++FT+D2bN1A6ThT9spyS6yn/PtVvfpyDX/
+jSQN/dEL9GYNySK/PTnUCpireOdKCUw3M59whx1SHC3L4CzmFXkOmU89ddEI
+vJUtFZABs/pUqndiv/V22qVFsH/mb1Zf4bQ61Z/P4Zi1I6KrqF+ra1FcTo7f
+sVPXGf1qB07o55N1KQk1dcyTtoSmcZWcv7rBsBUWfOUr/A0bm9r8ETkTOTLv
+aC0j/S3+lKuKPIzfKkt9xzziRxJt4bA33ePrXZJH+/EnpXDa5lIfN9iYt/12
+OcxeVrdHgeQT9zg0Bo7TWfrkyXzM83jNgDbcf0U+/BBMXWN7hKHeekWPQCOY
+11Un5qEfcz0V2QEtrHs6Neaj/+uen13KYHpJ+9MEkvees90JME+zL9UL8wvG
+9zw8BYvLHkQYIq+QL7WTQTDXPerbiDSTym0+6ncIFun2G4im4XuhPlkyDGaW
+nqh4JoXP/2TN/CTYePDJyIepyOt6R14R2a89V0UXXlC4ZFE76ad3aGuqJOZy
+WFY+A/0KpNirnOHgvOwQU5hZf5G3DpbZc9p9J9w/tbF6H2ySIss9AYsXaU0r
+hoUUI/MKOf6opusq7G/dWuKQDtMjh3NIfa5kxkgmzC78Z0UC+vNnL45IJnm9
+EWrsQv97q74nnYH9g+r+pWM+erm5D4vUez5Xrx7OX9zTsIjkvXKvwUEZzOP1
+xI3k2R+n6tsDr58VNv0OTBP56KxAXiY9nze4wazK+mdbyP03Y6RJgeSREW1k
+Bs8RufGfaCLvzUmUGOcvOFvfGKRJ7sdt8ZvhnwseqevDDiO7f11C/a1iM60v
+eM7tv19XkYZ+07h52nkwb6Hb/VjMY2Kf1XEOptjfzPZjXpOiqsv7YWZ/3uzF
+yMfY15XvAtMnTtz+PgXf11FGK7YRu/T4vaRwfQ8s37Yb5l4+n7x3kkEZbBjI
+CoTF0RvUjv1i4HOfbB1DrJ6Y3DHOoJhRTjX55Ph3W4wfjjGo8CevLrXCgpZu
+auAHg5IL0U+QRv9M66F/b8LdGne/GMHcQ4qmJbDvnJpbW2DxdInXFjh/a2GK
+oj9Mf+dxQhv7s+WUvp4mvrUyxvEng+IUzrM/T6x0Jv0h+qmSzxgKJ855mbsc
+/Xb3DRkFwsYP54e5U+R5tvanI8nTb9MODcyba9cxoU3q5Ry0r4AdPicf7SZ5
+Oetus5dArlZhzGzYweZr/x14NMaVyyLz6pXnNsPK6/dbzIZjZgQcqoG9lU7N
+Dcd7A/1eZ+NlCfL3QKGnA+8NomuihSowJR370R5mZmQF+KKe6GyUXwXeG3jl
+qVuj0Z8wtGqnIyzw3x+lhP77mwIvfSPPuUe3bXqLeWmBJq3ZMLuSHe2NfBzo
+y+pOwvRuq9LB7wyK1bX6+d8wd92z5shhBsVfq37rMCzYtcnaZpBBCU6m0slz
+M7ft30sW3xiUjOuW6kqYOtKXP7ePQSkXcMxpqM9MmP18XzeDasj8ariH9OMh
+HRH5Bdc7/fjwA+KmXzUxnxkUNW9akhTmYd94H3YEZqWcN3ck86VsOmyK4wU6
+3YwYsv76mvSjrwxKvNRJUELWDy+d09zDoPyzh1Lfw9yU2+aMflxf3/H2Wpjl
+2fqpAP0xrUNvFxCvrPCwRP/GhdsOhBH/9TtfOIT9vfJ/LIEp1sk/9Ucwr+vp
+Ha/QH0siX80JeYg3X3xrS+bZpfzZZJRBCVWUbpaSPN71aTyGva+frtcm+T72
+fSSCRWtlNM6Q9xjvZSXHYPom+l7y3kMf1nich/0c7hyI3wizjIpzTqEe/WGy
+cwl5r2qSGe5EP1lp70sZMMsm/NXYAPqzWTurHs+tLJ2j0a8wX0JXwbmzMFNm
+c1Mj8pURmC53IH41nzPYSTzUbQJTJgqScz6in6C7Kv857Au3sQX7563sI8/p
+FHOJj2stro+jt8dRYtnAkuGXuH4vX7vxibVdNsgXI9/Wjz8k0Q9lUM41SUe/
+vnnJTsSUlnPGYgZlbvGnVzYxNy2CHllG8W32u//4b724ulkL+Zt/riPvnRRr
+X15WKvovMIwJJG63dNMtwP7KBr/HEv+WM/3gCwbFa2qUuw6zF84z+CZiUF2J
+9rMiiRMvaivUo/77M2p7yPGV3llmrZh3cH2IMiyYxlc69Q/2b8oo56M+e7Bk
+x9RPmGfJticWsED3qhX1L+5/r2PbC0leJs/v2iEv60sq27VhdoFUWw1sbLjU
+9Ow8cv7Z0RMkT9ULL8h7EXuGa7Ulzufui5OygalQo5VG2N97irDoIZ5L2W9m
+jlujvjjWc9ViYs6Zd87NuJ9/NGoK8FxKfTBPHnyH/Wcvm7OPeHVK14Fy3G8d
+J5P+ICY/7JL///+DIvN/nXAewg==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {1.5990515496243272, 9.421161979599258}, \
+{1, -1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{19.999999999996362`, 17.}, {14.999999999995453`, 
+          15.499999999996362`}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.126447748763752, 16.890374170787496}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwd0ws0VHkcB/Arw45HmTreJkYor1CeZeJKalpOa6VMtWo0U1mPNGvEiqNa
+OkOW8ehk5RRLDtYeWkTrsUJlS0vIVrRUOsnabSqPoanZ73/nnJl7PnPv//97
+/H/X8nBcyJFlFEXF4kuuFIP8bKApW3I1pCnRdE73kgtNlTrxA3+C9bOGUj7B
+dI9mYpgRTWVTvwTr4PmWmkxtJWxMDQ9yYOmdBM08Y5pyy/xa1weWq1aK9Exo
+6ivn8+cjyP4L8RlimGPPS86EJ55a5DbAjury1gayfrjg6hDM4/Ws+AsutZ3S
+HoRnUhXOmhuxXq3W9BpMLd1U2cH1HX7WCfBEplf5Dph3xmCtNez24O+ycDg4
+ejH2FvIp/HfPxyi41/eKdQQsethEx8En9sbfUyH/otFQKbkvU842VsPBtd1p
+ZH2vvirtKDxRbx+2E5ZS2y5z4ZQ1/Hpnsn9b9j8usEvOjfRVcJLcImo7XJ84
+rjGL/AfW2qhSYcGb08kjMM/gQ+IIzJ1xNG2Dk7KiC4KQz0z6zOtK0k9htuco
+XMXXLimCFSH63adQT0WSWkI+fCJNP3GtKfZV2+Z5AWbFnH03CEsi2UZlsCB2
+ojnJjKbaVkY3N5H7wvpGPTbObZfEeRCe6vXpksHSpQiTOfJ8YbvRPLxtRV4V
+G/nLY2WV3qvx//T229tJf3SZBw7BodoMVzHM1/puSwTsxhXU/ACf7noh9oeD
+vd0+64Ajlx8x0IaT3vQfGYMF3XLlr9i/atJs63u46PlKfjise+9WrporTTGv
+B/ssIl/d0fm7mrBMw8LpItz3OpNSh73OHMrwhWMife7Pk/iRig+LqLeINbf7
+BTmP57/Z3odPtOc53IWrnkYZd8BSnfKAn+EWFvNjPxxaIOzPgUtHtD6oY7+e
+1mV6pJ5Oto7RPti47KDvXpjT8U1AH8mnRBxDk3iSj8V85NumrAnZQObrsP2l
+BXjMketvT+ajuvpKGepVJuvrOZJ5ZIeH7DLHfHqOLnqQeO+/3DgHB69rafqc
+7L81yizHAvk3rY88CmcncCaZHMQPbm6WwrXLjay2wIr4kGd1MLfGqCYClouL
+hx+TeDLh7gTYzfJ6KAP9qdoZpJkEd05rsdeTfnJbW6JgdoWECoFFO0YPfQHT
+Wx8aiGFdxeMBW7iCauiTwrz+Y+vmkI9UZKFTRPrd27YnD+6sCfC5DJ9OK690
+Ip7KFV6C+VHPzjxEPbbcAaYMFsRpNH8PC5Kj/VPJ+d18Qh2EJaxVV0Su5P0y
+LQ6E9QNNNXiwy07m9D54soVx2Q5WnFq/Kwv2Osmq04F7j+cwxmCRDeOknPRz
+U6tnEOJz7WI1npDz6lp0GIEF+blW5LzpT+G3NqEe6qShUxfp1/FHwhw4qJHH
+6IbTF/L7JmGpj/liHxzqvrrDyxL9dtD/Y5zMY+pu83Mw32NV8xKZ19IH3r/D
+FWKrY2zkk5IxzlTBVa89bPzhnnz7IJs1eF+HSl7FwPQlv57NMDcsU3KR5F9V
+4u0LT6guZHSSeqm3511hrzCdmZewY1eJzATmj9Q1aLghXp261iz2D9381s8c
+rlBej7lN8itIjHOClXXWjYVwY35WsTvcc9XPRAjbGlpfc4Un73CG3eH6FL2N
+dnBRRM2fLDjyjbqNEey1WJ6/gPr7BJ7aKsRPn3/fMgMrp+K6nsNKpdT4HSzp
+ZYl7yLykFKQwsV52gNpfSeaJMVbqDAsqz7VnwfJvKY+jliQvUWM8LAncM18N
+cy5ErBDC1qXmdxfgAQeh+36yfnZCEYh6h6+NGxIrzjaLfoRrO1gG5Hl+6ad7
+83DbyyEqAW4s3Lw8wArv16Nidi7p70FVZCacbca1rSf5G7a3d8LpWa8kI+T5
+haYbU/D/H9SrS67W9H9qGVzk
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.81512204377634, 8.004985304149105}, \
+{1, -1}], LineBox[CompressedData["
+1:eJwl1A8wm3cYB/D3MoxgUyKzlkp6tOlm/qylqsOLzkYnTTNd0bVllrLrjGPF
++fuytpTNhVbdzEhbNRyb2zCr1uVsKFp/ZkoxM9aiapcVKTq172O5S9773O/N
+7/k+z+9NxB9EyxU8hmEO4k3X/z+cWEafrkKWiXc43GIHc5uHnHVhj7YELghm
+FCGGk+YsYzrT3cLBshPHtxfBZzQrjlfhoErd5R3wyQCDJzdhV+kvacUCljE6
+ZtPcC9flRo1ozVgm7/PyziHYRHP/J1843r3B6i6sGW6vuWjKMmkdVWHdcGKX
+q2JuE8uE9jJTTWQ3xZNAWBs+n6SivE58mxET7G9rHHVmY11zPQMuz7nqEQEr
+rQNFMni10/X8ATjy3Yk1X3gy+k73LurnUKuNAm6afOS+jfr1WrpSQV5s/8aC
+8sx683VRL4nZ6k12DX82lQD/LfZXiWH2wRG/JbhkYuzabvjtgEuFscgvbC7L
+ltG6sM72PnxDr2s8jvqt7X7JB/3m8KKbSqj+gv3aZ/C27Udbb1H9FovYy3BX
+x3z0Es331oCyiOZj+0wieh3z+2hmj4K+X5af6AsPOydvNYJTel7eexJ2bI9s
+UKJe9T6r5lR4IunA0Ary+c/mT+XCjJFxgAz+9nS7p5L8sN6hFP2KtLHGG+tf
+2inGXmSZRnmoC33fpEfeVvgC5tqz6BkJq37c259szDLS8h4HKaxeX2goNUKu
+jpAIJ1jD7Qjmw0Y6y4kCcsdCZpsh8mZXr6xQf49mw/vh7ODL8r/oecirSN+J
++y/+0184SPMe+WLtZ9ovrTGInhf13FpwAeq5lN4u+hXue3j2VCbycCaD5X/A
+ofadVenIK//KTKyleZ3LPeiGflIatc+Zo75F23FnOk9B/Xe1bvByarzlKlx9
+KkpHQf02/u5vj3l4GNoV58MSTYOXO1zDix2+CWdPOYps4MDHD+ynaR7lEUOT
+NK+WVC/DXThf28hXU2A9m8emEliV1c2bQx6VeYnkDbjuvNVaDfJG6pld86X7
+n974V4Z+JMvqI2/BHLfvtznMo7L4HbUHzHCjqwV8PEcOX+vaw8q+LfyjBixz
+KWPzn0LYRDDt/54++gksS3+KPNxAwscXnsfzKpKGjNN579+UYgm7LhrwW8kZ
+lo5aPfzefBosquA++bEL1liv9+AGCul8Zp2EBXBLZYo4h873XoWON/bXWIaG
+ZdF6tCDYGvXvnhiT5VH/80ljQuSL4fmtl9L9Xu9zZshv6ZV3uwkO3dl+bx2O
+H/3w0xE45vr0lQ6cp5QR2/KQX1MqkASj/9Y7n6heg9WZWecqYJ3RH8JDqN/e
+uAqyKsxz8CwsU3eNH4YtqrfE1dK8kl/Z04j9EgudmV6al/KQTy/qib6vqZmB
+Y/yqimuRT/rmaZcVmv9y5lIY8m/8v+1mmY2XPvsfs/y8/w==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.88748581947994, 4.835942983375933}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJwd1Qk41GkcB/B/ji2PclTuaFzlyBBJizzvJmUljX1sKGVcTVJLRUutTIex
+SjkqUWmHlKOSatcVGylylKGY3bGtWbIlcobayuz3zfN45vk8v/f4/b6veRgG
+R34XJscwTCR+6Scjoz82hPnyo0kYQws59xew2sR5QY4GYbw7hr4ug4XlpoN+
+GqT2b9trghSYn1+TvFKD8K/oN84OhtMcVUtXwYMHTa+sgjnJU3GBWL9EN89q
+Pj3/TVtbIeqs7qkcqTVhbB4UCNQ0Cb/YukRUCAsfbxam4X71MwtnDsPSqVsF
+hlqE/7L2qX8oHMW3N76nRZijcxXY/nDak0gtH23CZIiGuwLo/u3q6X2wMqui
+dQ9MZi6wg3QIP3ZE8V4ydadT7iM44IAo/yY8am2jr6xL+O5OvvO7YE5nzx0r
+XcIEq+9fJ6Pn7ww+aYn6y6451V/6f9uooKhLSN+gncAIlj7Zd6NahzClK9k8
+K7jWRKLlq0PIX4IhVVual67qZQn6GfdTTLeGbfzIlJc2IQZFC8JN6f4yjbpq
+zHdZfDhlARzVK69gBYuZwNZ3uJ+5n3q5EPksy92Q9xvNw1hc5wDHNFzT3E37
+m5ex7x+8z6hEwU2PztNgoH8d+Q780FPRwMZ532iuyUL9tIqKwz5YLWE3KUa9
+Y2PLMUOYcdtCpDDz/IHZH1ao5/oQnM98vJ/vkg3XZnq4FsMJvOOreXCpflCO
+LfJvO9nT5QqLAtO2PEa/M3KZ3dawUHu6Ilib8Mtzg6wtYb7iiVvvMb+byenm
+FTC3cHbcEeQv29vZ5EHX/yTWnYTv2kSc3AVzPlf1eCLvYXasOI3uTxz//Rje
+4+aTTPUqanF+USZcUO4b1UvPE/dVHod9++McvsI8tZ8PkU3Yn/XId4zOR1yr
+Sj/gfe6maOXbwkKnwIhk3Kd7dY/MHubuH45QRD1PtpxvAXOqOC9i0O/Skfwk
+VXqewOlSH+b9qPQ5tJ/Oa/e6xBfz5msWc27SfIo9qiR4j8mCs/7hMEveID4a
+ea2sjHNbRPMKeOhnifqYg/uOpmV4n9dGI/Kohyuq8aLh2lhuN/2+JbicXWAI
+i9a2JRvBJ4736z+zxPqxXct52J+bntR/inrEa6QZzso65eoDp4UelnNHP01e
+rdvNYNaeMBMx7FVUf0IZjjpT9z4S8zgPOtvNWCCPWIfTSpi3pryzU0ad1P3q
+AvLY5CtRUsV6YcCuJD3kqe8wec6c7o/uG0H+fAeDsAxPeh+nRPsp3MO9fi4a
+Jmu5zZNY3zIkN5BD+2On97yH1Xvj6h7S9aOSMDHscpEc7IelKXNyzmD/rOyS
+1k8wP+bI8+Wot44J5eZgftZqBfMK9NMevoylCHPfFy9ho98qOyO5CaznXnzh
+cwl/XxpF6ZHt9D5Li7vKmG9x7yr9XGr7PnYi5ncxKMkLofMkPtdRx/vdj30V
+pEfvm95YXIZ8Uz2zglswf5RsRcoh5KnpfN74R5g12JgcAode1Qkzgrnx3t5R
+WC+vw4yIzPF9sfHamos6b92NzQKYPy99fAJ1VS1poxvMvf1mWwjuH+6eeqYO
+qzm2mw3g/q3+PI8hM7y3pFgQj/4vWQwv6oKl8vXNWphXqD7Xuw3mxPz6tgTz
+Vm4tk9G6zaSrtiPyUnnnHDIIixx9LG/Dix1Tx5VoP9WPnefpEf7HEKefrWFO
+jnjWt/CffqIMP1hYsZMVpEeYCXbVhiOwdMMvwT6oVwd5jV2FSfCBJmP4nGkK
+U0/P+887vgPvIXqjE9EJl47uzQmDuffWNEjo+YU2Y33o14trGNUO16Y2JnwP
+LyysKayg+xO7F9ZjPt6s7Jw0OK3FsdIe7ng0vWMLvY8ztLQMeXyoVJ3Wovmo
+DKz3RF5FnvqfWjAf1zL9zgzy5A1ZlMfBrNcWXh3IO8xcodmE5rM7UY7+/cfX
+bJaJluK+HetT/sX6+MxtakdhtW3Ze5fgvAOGWRFOsNRCoi2Av/yTo3X6qU3+
+B+U8lqE=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.109669593634097, 4.811165529975059}, \
+{0, 1}], LineBox[CompressedData["
+1:eJw9lAtMU2cUx6+PkoIb4mOmcO+1Frz3U0CFoRVnlAMR6cLYEJS3KFWMjLBW
+wQRDytpp9vKxymAOAQkiWkAIlTfy0kxQExQVlBHETthiEbExLoBT2ddozk1u
+Tn757v2+75zz/x+FWhORPJthmBD62uP7h8CSefboAUy4ekHSGgJdCSM73W+6
+A6M/y8t3EPjzVLHE8jNlaYdnsYbA9J0nvo4hlGM6yjt1BDRM6WjFjAIY45dt
+1mwCMQ4241QDZUvh9Y/TCaR2lyjWaijbBq1VcQTq2kLUeZ6UVxjz7yvp+e/S
+H/g+WwZMZ2WgxJGAj6XX4Z/LlPV7atbdF6FxOGVj4BHKvX8NVZ8W4XeLkz5j
+J+Xdr6enYkSIkRZVBgdR3n9opN1VhJLNuZMOn1L+UbXQPCRA+9OG7371pmx0
+3r7/vADvvn48Gu5LeSrv6OfpAoh1PtfWBdjXI3WpoQJsvXv3k/7tlJmUKP1q
+AS4VS5rTtJSbrtuu8QJEu2Xq3v5C2bI5x+oqQERVr1O0mbIqVFjqIYCXvurU
+hnuUbfXaN/4ClDcFR6TYKEsr436LE2Bk0dzxbkea/9RVafb3AgzOaU9L5Shn
+Dn/T30K/n1XuVStSVpWWqv8VoGZPbGYsoewCvMlPhDqu71sDT1nWd3vmoAiP
+u6qrOqWUm4JmGmtEyEotW+9htedvKPYZE+HiwYEzXh2U/cctkxyBnsK/XXqO
+2eu9pW90K4EMpcU/KZyyVv1i9T4CRT2GvfnO9vxUhw2HCTxULYgcMMopz3Z0
+0hPI87frRY7rfoMTl4hmKf7f+8MbZc8THvdXNASc3LSLx/O11rXDyU85vF/r
+pq9umQwc3n/xF/XG5lUc5head+589gSL+Z+zRjNv/2CxPqb4sPlhZhbr9yCt
+2pR/mcX6RrFHl6/sZrH+Qf9NEu04i/1pNGfEr5Jz2L9a97Kh4/Ec9nffjcSx
+bUUc9j9hYr5EYuFQH+aRVyeWy3nUT7Y+oW9HFI/6am85m5Vr4FF/3gWBysQi
+HvV5fFvO64ELPOq3u+yhy8sCHvUdu7DLlJHFo/4Hk8ZmlgTz6I+CZO+fdNMc
++qdcnfjS7wyH/nokyiILV3Lov5KL2o39FSz60y+3tfW0gkX/Zu1dNuyc44b+
+9nRvUVYwbuh/2ZHPCp8fcMX5kBl29VXAmAznhy5lw5YraZQ/zJdHH9mjDP4H
+xxO6LA==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.4452, 7.75}, {-1, 0}], 
+        LineBox[{{7.9999999999976925`, 15.5}, {14.99999999999251, 15.5}}], 
+        PolygonBox[{{10.9, 15.5}, {12.1, 15.1}, {12.1, 15.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.5, 16.4452}, {0, -1}], 
+        LineBox[{{7.999999999996362, 15.500000000005457`}, {11.5, 
+         9.500000000003638}}], 
+        PolygonBox[{{10.052322615314452`, 11.98173265946094}, {
+         9.102165824326175, 12.816718930329426`}, {9.793188945044921, 
+         13.219815750748694`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {9.015942703607429, 12.323799910437668}, \
+{1, 1}], LineBox[{{15.000000000007276`, 15.500000000005457`}, {
+         11.500000000003638`, 9.500000000001819}}], 
+        PolygonBox[{{13.552322615314452`, 13.01826734053906}, {
+         12.602165824326175`, 12.183281069670574`}, {13.293188945044921`, 
+         11.780184249251306`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.984057296392571, 12.323799910437668}, \
+{-1, 1}], 
+        {PointSize[0.04], PointBox[{11.5, 6.}], PointBox[{8., 15.5}], 
+         PointBox[{15., 15.5}], PointBox[{17., 5.5}], PointBox[{11.5, 9.5}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T18", " ", "P1", " ", "N35"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdiei/fifjghgjhj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdiei/fifjghgjhj.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {22, 0}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwl2HlcjNsfB/AnWqZ90UpqSiktTEmSMoMi1aVIiiKMpUUGUVfLzW29SUpR
+LmlaqKgrSpsuSVJEU4pUl6G0SAnTXvw+5/Xzz/N6e87y/X7PmXMetPYd3Xpg
+DkVRukIURZ7UzC/8WcyiJshThUWFVNm+uAfHhuUYE/eLxGX7wv0HrmkrqbIo
+etHa0kUw1fF16Tp4RE1cm6/Lotxq4kuj4MhPUm+yYGr/pZXvYP4/FlFHYC/l
+J+6b1NDu7FjcWrj88D7RWrh8cFmfJszXfBdjPx/j62ouE4dpY5W322F+i3vs
+rA7imdws5LMAfy/mnDsD91tkvZ+EpeJdW0TQnpt/qSpCnUVZmNIGVGB9k8CN
+cxeyKEf1tqMmcLiwwuUAuIuml+FE5m+6sqsV1mennDwB222q/aKpwaICfng1
+ppL3TG7QdljHJ/jIffLez1UqgLxfoGLQBVsE8zKC4cj2qZFx0t5bWvkI3Kqe
+2S1F6jcrb2YP85udvdXgNN6rBCWYdvM4Ux2u/vMNpwXz58UfilaEwz3Ol0fC
+Ltl/PBOC6+83FzHgku5kWg/GZ0lM93QgvxG+3j8kHrpL8PcYmBEqefEvkp/y
+TXcrmDWeP7UZrubUbJlBfXSGdp+QJvGufpf8HGZf2tpRh/oVCeXZFcKq386s
+CYXrmx1as2GjKyUvTGH+5PDTIrhny8oHA4swX2d+UytsU7zGIgeu/pR7Sxbz
+2RS+ZbLheoMSUy944qsL1xCmTqjuroXLL3x8O62N+V22716FfHRi1iq8hlWX
+vi+7D9tNC4nfh8MHKw5uRH08at7J3oLLNWLE2mGe+GmxG6T/qX3C3prYP7ev
+eZH39cWPHo/CkbaTWpUwl1M1aEVnUQIVme882GOB0MUgOEBDVHcYnolaqFgA
+f0l+8kIW8bEfjX5vgyPt05uXwxYTzQtHYTmnF7M74KALe4ZpWljH7zMLT8O1
+IS6m8rDwnzUKacRvOcYycGOuS99tmJ/77BIFf3ka8+kh7DERljSA8Zy2O+TW
+kfdO8zKfwS7JAp3HcNrL2cvX4fJ3tQ9LSD3HvyWEEMuy7K7Aefp37jvDBeYK
+VCAcQK3014N11h5LtVtE9rPru1/IX1hPabE8sbNcWyVctEGG3oJ8g5a33I2A
+u54PbjgHe8mVd3rCtH8aUm1ghoPaXEdYP3LWfApxuykMyjqR9o0mO4vgoAZH
+cV/Y42iTiTecaCIilQ4LDl9tWQxzJ3Zt+gSrJwbQB0mc1YViWnjy9ccqy/Ck
+G8874oYnTa7/yzk62advzFPxTDsyN8Of1IV5ILgTT7cleZt34mk3oau2CON6
+re2kkbxtphwafWEzsxrvraT/+UnbYtiomMv1JOt6r339OFmf/GVBx+DEdaa5
+K5DXVY2JffEkjlNpcX5w4+HlZ8m65xRt3P43HGKa8KkJVnQPfP4vXLRTZoOA
+vA8WzCf7Mm/a9pQKxg1gR3V/hCdujzisJOt+s9qyh+zDuYoPneH+3xm3OmBh
++Uc/2XDe+LOlT2Gd/dkRR+E0zQkdsk+7LmdocuAS4bM2sWTfcj6KHyT9L1rH
+ecGRop96nWDB47065rBUnGIjg9TfN9VDkuzj4fE1ojDnnk/4R7JOzK5lLST/
+joaGf2GrDuuRi3D953V2GbCds5PuNrh22/fnsTDfZ2mZJBybM9kSDKuW3z9N
+9gXH2ur07zAjrrNlmJxL2j+P/QlXtyl+8CT2fzt2iczHez1AzknHmK1NpSRu
+J1H+Driqa9HmD2S9StOtPuN3Lnd3ibsS4mUNGXQmwGx6boAz3C+U2rWReITT
+kgy77dmXpAzPyOxnk/pZBJr5TeNcEdzf/00b+9jNyW52FPYKXmjkS343N3vG
+hNE+3jPmWRF8+Mkdy8Xq5B5wSP9G3kuxv7rCBa5qNwxxblXX/JeeDPdHiBt5
+wiM70l3aYf4N0xeRcPiQNI+O+PvHn8dnwu3chTcOw0ap6/+7C5eLeZy4BTf2
+9VwvJ+dkwyuxTzCts3V9MUyZtCXJoz4MrZ3R2eQeKpupNYaFzVNvxME8/b5p
+c9isQmK1DzlHbVdvM4Tb87br2cD0X4IqcdhGayh2Ppl/hbEkuQc49SGZX5HP
+yJev38g9oHjr9cMnMGdMmtIh70089DNgVbPl5+8gn7wNzbOhsF129y0GHHsj
+2pCcw26LXMZyUL+07ErnbbDcD49QBdhv8WSJI9y/jroYSu5ZCV0TZ3JOpxnd
+/Ix7OP7sbcZeMr7JH0q7YYuKHXkhcLlk23An7nGbE+kq2eSckT3WfQh2YXef
+e0XGS98vJwLX+kiWSJF7ekvJx3v4bpiQMexwhFnVyT+DYU71c9oFHXK+Ji91
+g1mbRZU64LSLCbvsiT/cKtUm95r+5XPOcBDvcoY3LKfQN+oLlzzdlFwA82zs
+hVJhde/C0AFyr2XEHG+CHV/7xmrg3kxsOxkhj3i8luUZ25Pvmo3Jku5wo0PS
+RvIdEysaezOTfMe0LlA/A1vs+iDohWekj7LPLib7zTpTB/nbpJZviYOd9BeU
+uMJsa/szYeReHv0r73dYykhJwpuMx9BOiYMdZ2s9HWDuy5c2MXDPu4H1emQ8
+M+sd/jDNuuHJT8Q7cVrKlglXcRPUWsl3wxlDnynMT9tw52w+HNu7VIjE5+Z6
+8tAZOE2yVnkFHM4Peu9JvqsUHwVUIN+8jVbjLFIPz9woE1LvwbP+RqS/xX2T
+TGXEez39thb5DrJQKpOC1VUuVxPTFWzDgpRwrnzVWGVM2i9eO9SvyKJSHCyt
+bGDVwKOW++CRDVOnDpLxh5LX9s/D70u2ZlEyHHTNwyMMjr9srNAAO9VqsvRg
+fS3LYlHky9I2+NijgHpLmi8h9R9hVuwvh11obTuTYLsj/qJZcLXFdVoH7FVU
+tCQTNuoR79HSw+/KStW5hPS/y7txEOZEZS5/C+d4cgxuwHb6Uq+kMN+E7dyw
+dzBtzam/HWCG38IpaX2cDy1TfybBtabFzsvh8qddVh1w4x52xm+w3aLLu7SQ
+H6so298DDl+jEUHypV3wrN4DV79yT7lM6pE8LOEGy7W6vqkh7Ye8V2yAnb5a
+aXXCOV5eCYaw6mCh4D3MTox6IA7zDppfaYJDtKrKPiK+cq+X5vlwecWKzHLY
+4nHpMz/Sv/nYo3Mknz3uqxfA+vSZg2yY5W1kWzqP3IPtvDVw4toxHxZMSz+r
+oknqs2txVxWp3/YiFTE4b8LOZRncc+jL7gnUkzf7QXBFHudWpay6AOb4mC0Q
+g63uTCtMk/X4cH35STmMK8NLkSb1PS+l1iaL9XUsDDEk8z2e5/JaBr/rNGMT
+F7j6AcdyVBr78EDUzWiYOzXwYCU80y4V+gimKxsczpLCPWZd1zcH+bPWBWlb
+wH51jr12ML2kTWtKEvPoB9gmwYmDd9r64ALRuoq3+uT+LR7+Cbswxsc0l6B9
+m9up1ehv9ob9dC/sFXhmPBVWL8jXTofD61eXSmN+fV32Oh7MyeIKUuDEh+4l
+kzDPcnKtLuLniq/xVjXA+hWLNt+Du65GPzSEGSKTzdbIlxb731/L4ZHu0MYS
+OHL/iBwDtqvTCxZHffSv/SWnDXMaDj3Sh+lZ8kUSMD2QFbAC5m2rPTWI+bi0
+l/HGcKPNPKs6mPX439eycIFYqyKJl2VoOVlG6vtiyvo4LJcSo6wLl5yrFLGD
+EyP82r0RX7mPoJhO2lcc+ycO+egs7Tv+E/XhLtwSeA75s0ylV3WT/Rj2zeZ3
+1MttvuQ9HtmP1GpFVwmMlx1iVU/28xyvYCNxrFfKlgfPSPt92ltFaPi9nrKo
+aIcpS78dA6L4fmjJMv9Oxt/V+4Yvgt91ndMzZczPV1no/kMY37GthZdsSTxX
+Uh31YO7NvO2hcJFA8OLMXMxjU3GgiuSz5o6/KFygldBBoT5eJ/Lly+aQfx/e
+S7SDEw+8epMMu/UFr08i/jSscQWunaOW005sYH2hAeaObTqmbohxBRcc52O8
+qzW7EnbC1MrDEjFw4/lHqkkwn9vjTUM8qoIdwQ9gLtvd/BKc1pQY9gHmKepU
+6SEfncKPLpMw/QFXqwR2q5rJEjFCe+Vrj0yRf+Md3whRuDqlLOIKHL83LmqG
+zP9LZlkfrPOlPrcfZnSplsiK4fvkY+RvjWS83+J85IhlOxj5ZD77EVYv2gfl
+zzidIfHuk+g6D09oNf/nStrX5eVIw1dnkrSMYFbfH4/3Ih7H6UPec2FOzQLJ
+RMQf1No99A71oMJf8dKRb8DgpqpqUs8sh9Ik1KdqeVrmTdip8u6BE0I4X16r
+q14j7Tl+6x0o7N9Zd4urcPXXiwybn0xKx6+58Drp3x19VGiGSU1cNSiqhFns
+gw7vJ5lUT/wk1Un6X8oMGxpnUq1TVsMiiMerN7pt1RiTqvr7tLslceCyzCYB
+k6IfYzw+Rept+nR92Q+MZ754ZwWxSGvH6HcmJfVTSIZCPamcAYlzMFuwN8eO
+1LueP3wajvXJbkqE+YusDSthlqH/htdweNKUzjqMV3J0XqeyMfo3nHcXw3z6
+qc1JTsSz3NZpuHyJ2r0zxmS9Cx/IIr5EHeG+PJhfOveXCeKvWvXbsifG5P6J
++uw0gfgCLUReEytZTexEvilWtO2dcPWxpADmFJPi1taFt5H3iZOGX+F4Nw8P
+0t+LYS/qOc2khEXn6xaQ9mEx8WFwo5XsybNkPt+WbY7w1Uu3TA+QeGrNNtWg
+v8enbaGrSX+WbSepb0BTUaocTB+d/JWLeJwSUni9pD4LjihrId72zv2+1TDr
+5dPrLqNob/gjNoPUx/7z9GbUQ7iqVj6avM+/e1vjG5MqkIzOOkn2a/Uzlbwh
+JqW4KSX4KHm/1KWZGsD744yAAFLP3giBTw+s3fstkrRfpWIhzke+CqE9XDI/
+Z03IxBsmVdt9re4p8YE78TU87JcEg+wJ4qKDUjZPkN/3nxqmpP5jdr2CUszn
+2h59nLgx+71/Jtan/S6/jJj8Cbf+//8fGbP+ByrUpRc=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.851144620506076, 7.907943040036291}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwl2Hk8VPsbB/ATCUWNpFzLNeRSlqiQ1pmUcJOlxdI6SHS52VpUqhHViKJQ
+IjWyhmqKauxTKlOoKbLLXOVS2bIlit/ne3/+8Xr3Pef7PM/nnBnnpOnut9lT
+gqIo2SkURX5TXZP40WD+//ciJqVWVsyWoDMpk7YAGg+mr6ik9WJde/YiKxbx
+xwlxIZxVEZCoCHPs1M76wv46yY1VhkyKpXDPSwrmTCievwjz5PlaEb8zKZe7
+hRXb4a7pYTt/qjOp4mPX9JbC3qHxnL2w9cr+B8qw8Y+otAo1JvXpRl7xDNh6
+3toefTgqnDZOHOzwNuaqKpMSswxDyPEJAb5uNNj61Fi+EUy7cyUqSYVJCWee
+iLOHzQOPbV8NG/imJh8i51/wGR39DXP67Zl2ExZqmDuK4KGy0CYhPBpmNlwO
+7z1+i95Pjm9ZoVgD06X/nFTAvCypqtPjcNqU82J9mB+j3LYc+zf02FxeCWf9
+teN+BOx7LN+NAXP1b2Z1wBw9P2Mzsq6yoMUK/dYmxJ7WIHm+sFLKJvN0FoWP
+o17/ckp9GuZ1KKuTrST9D+TKOsHeha3saDKfVCcnDv7p09v+JyxTKKNVokb2
+T0+cNEB+xbQDVXALvceTBwuKFloIYOMjpUtZ8Kjt01dXYVbQ4UkFWPzpn/gt
+cPH12ByhPuaIXR41TPorz2w9C7OZVo1sWNBk0WoHc8celv/APFXHDx7RgmVW
+fT3iCZtnW3dJwP4luypekjyPulb262G+nA9tBrDvXbM53cRe7hNxykzqmYnE
+rCFYKDlTUwa+nrp8vzQ538O5OHIeco1eY6ENM03aDmvDaZmvLazJerpz3/u5
+TEquzrLQHx6lNkXfgll/rRIkwqLdU/+OhAVjLS7lcNemrtUxML1PP7ETtn5q
+sP0enDbHTzQV88e8CnnbAcfd672pDLvI8aKNSD3BX1qacP/3kuhz8Pr22gk1
+mNMUqNIFN+TqHJsBC+Ua5Deif2P2aXY39u+/UbMwG1bLNcgQEHtZ7J6ETW45
+0CNgzqXiuZbIg2nY/dAKpnEc2Yfh4qzrtyeQh4xdzfNo+OdvHsk82GWylHER
+zj9fFsCC2Uo+8f4wzatUUwFmarZUm8HhY/zk5wvxebP5274d9ValJ2aw4ZgX
+Dq8PwTsVD+eshxPsy/WGyXyTyjmKMN3vGtMTFs1XVe1bgH0/h2dXIo+hQO77
+elimXjZkESzz7sHM17DYJ3o4VgnznOQ7voV5iWvNJOCDd3XOieH+tti+k3OY
+lPK3BRJjxOn032fBDUaX41VRj39sV+UjRVyvJQr3LGBRoWFzMNy9YusRX9h/
+TNjpBDPrIobjyXr0Y0NHeK9WmEkxHPzhA2cfHJWR6dUCe//x9HQcnLaxR34I
+5gxbBtTDJsMaClOQDxV0OE0P9W13DLQRCxcppXDgrM7LocPk/EJFz69wvqko
+pRl2kEp7YIt5dt4wjc+HaVNNd2fAwq3dW0Nhrv2FpAG41iYucB1Zn8ncYIB8
++lfnTv2FeY3XDGjawwbbT0Tx4IYo21kuMLfgTR0LZttKLrWE+Vd7G2hwgqac
+/FzYVvt+ZLkuPkd1H05WYn+1oW0vjsM82SCBF/zs4BTVVTAnKHx9L8nzWNKj
+aTC/MviCB7xqMNmyVQd9ZkoMV2F+mfEFbQKY42Ox3xjmzHf/fh/OyritFTcb
+95vzS1ce7BLCcJpQYFILDF/pF8EyyQpdB+Faq/3fRWT9daLmLxrO+3mupA+O
+WfbILwnuD2mcqYT6QmkX/S2wi4mj3hq4waPETwcOKbqg4Q3H2KtTc+F89cuD
+0bB1idYaTfh6vMSLB7BDWMbiDbDgvuJwNUwXWqeEwvx1PmvayP59j1a8gYdK
+XZo/EZ/JFC5Ef4J/pl5thdnuX4Ii4Z2isFYh7F/DkuuFlcPkyzNg71g7p42Y
+l24nIRkMi0tWuyTD2tEVI6thkUdW+ge4wbY3fAzzBXs+vTUdeWnXHZIl+VjX
+KpaqwxRns7kbTFkqJivBtTeyxmkwbejS8m84P6uWZf/0D9y3wRG9PLiqpVU1
+GBbxs4OcYJcvaQqmMD+no+IT+rMtKjs3ro16F0dmsODwxyG7q7XJ90K1XTXm
+9VUd78yBR8u32C2BxWlZ9VfJeozLHr1ZmH/jqeWXYG7Lq72j8vj3UP8Ass7l
+vX7WJIf7SF5q3W2YRr1JaJmBvD++FT+D2bN1A6ThT9spyS6yn/PtVvfpyDX/
+jSQN/dEL9GYNySK/PTnUCpireOdKCUw3M59whx1SHC3L4CzmFXkOmU89ddEI
+vJUtFZABs/pUqndiv/V22qVFsH/mb1Zf4bQ61Z/P4Zi1I6KrqF+ra1FcTo7f
+sVPXGf1qB07o55N1KQk1dcyTtoSmcZWcv7rBsBUWfOUr/A0bm9r8ETkTOTLv
+aC0j/S3+lKuKPIzfKkt9xzziRxJt4bA33ePrXZJH+/EnpXDa5lIfN9iYt/12
+OcxeVrdHgeQT9zg0Bo7TWfrkyXzM83jNgDbcf0U+/BBMXWN7hKHeekWPQCOY
+11Un5qEfcz0V2QEtrHs6Neaj/+uen13KYHpJ+9MEkvees90JME+zL9UL8wvG
+9zw8BYvLHkQYIq+QL7WTQTDXPerbiDSTym0+6ncIFun2G4im4XuhPlkyDGaW
+nqh4JoXP/2TN/CTYePDJyIepyOt6R14R2a89V0UXXlC4ZFE76ad3aGuqJOZy
+WFY+A/0KpNirnOHgvOwQU5hZf5G3DpbZc9p9J9w/tbF6H2ySIss9AYsXaU0r
+hoUUI/MKOf6opusq7G/dWuKQDtMjh3NIfa5kxkgmzC78Z0UC+vNnL45IJnm9
+EWrsQv97q74nnYH9g+r+pWM+erm5D4vUez5Xrx7OX9zTsIjkvXKvwUEZzOP1
+xI3k2R+n6tsDr58VNv0OTBP56KxAXiY9nze4wazK+mdbyP03Y6RJgeSREW1k
+Bs8RufGfaCLvzUmUGOcvOFvfGKRJ7sdt8ZvhnwseqevDDiO7f11C/a1iM60v
+eM7tv19XkYZ+07h52nkwb6Hb/VjMY2Kf1XEOptjfzPZjXpOiqsv7YWZ/3uzF
+yMfY15XvAtMnTtz+PgXf11FGK7YRu/T4vaRwfQ8s37Yb5l4+n7x3kkEZbBjI
+CoTF0RvUjv1i4HOfbB1DrJ6Y3DHOoJhRTjX55Ph3W4wfjjGo8CevLrXCgpZu
+auAHg5IL0U+QRv9M66F/b8LdGne/GMHcQ4qmJbDvnJpbW2DxdInXFjh/a2GK
+oj9Mf+dxQhv7s+WUvp4mvrUyxvEng+IUzrM/T6x0Jv0h+qmSzxgKJ855mbsc
+/Xb3DRkFwsYP54e5U+R5tvanI8nTb9MODcyba9cxoU3q5Ry0r4AdPicf7SZ5
+Oetus5dArlZhzGzYweZr/x14NMaVyyLz6pXnNsPK6/dbzIZjZgQcqoG9lU7N
+Dcd7A/1eZ+NlCfL3QKGnA+8NomuihSowJR370R5mZmQF+KKe6GyUXwXeG3jl
+qVuj0Z8wtGqnIyzw3x+lhP77mwIvfSPPuUe3bXqLeWmBJq3ZMLuSHe2NfBzo
+y+pOwvRuq9LB7wyK1bX6+d8wd92z5shhBsVfq37rMCzYtcnaZpBBCU6m0slz
+M7ft30sW3xiUjOuW6kqYOtKXP7ePQSkXcMxpqM9MmP18XzeDasj8ariH9OMh
+HRH5Bdc7/fjwA+KmXzUxnxkUNW9akhTmYd94H3YEZqWcN3ck86VsOmyK4wU6
+3YwYsv76mvSjrwxKvNRJUELWDy+d09zDoPyzh1Lfw9yU2+aMflxf3/H2Wpjl
+2fqpAP0xrUNvFxCvrPCwRP/GhdsOhBH/9TtfOIT9vfJ/LIEp1sk/9Ucwr+vp
+Ha/QH0siX80JeYg3X3xrS+bZpfzZZJRBCVWUbpaSPN71aTyGva+frtcm+T72
+fSSCRWtlNM6Q9xjvZSXHYPom+l7y3kMf1nich/0c7hyI3wizjIpzTqEe/WGy
+cwl5r2qSGe5EP1lp70sZMMsm/NXYAPqzWTurHs+tLJ2j0a8wX0JXwbmzMFNm
+c1Mj8pURmC53IH41nzPYSTzUbQJTJgqScz6in6C7Kv857Au3sQX7563sI8/p
+FHOJj2stro+jt8dRYtnAkuGXuH4vX7vxibVdNsgXI9/Wjz8k0Q9lUM41SUe/
+vnnJTsSUlnPGYgZlbvGnVzYxNy2CHllG8W32u//4b724ulkL+Zt/riPvnRRr
+X15WKvovMIwJJG63dNMtwP7KBr/HEv+WM/3gCwbFa2qUuw6zF84z+CZiUF2J
+9rMiiRMvaivUo/77M2p7yPGV3llmrZh3cH2IMiyYxlc69Q/2b8oo56M+e7Bk
+x9RPmGfJticWsED3qhX1L+5/r2PbC0leJs/v2iEv60sq27VhdoFUWw1sbLjU
+9Ow8cv7Z0RMkT9ULL8h7EXuGa7Ulzufui5OygalQo5VG2N97irDoIZ5L2W9m
+jlujvjjWc9ViYs6Zd87NuJ9/NGoK8FxKfTBPHnyH/Wcvm7OPeHVK14Fy3G8d
+J5P+ICY/7JL///+DIvN/nXAewg==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {1.5990515496243272, 9.421161979599258}, \
+{1, -1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{19.999999999996362`, 17.}, {14.999999999995453`, 
+          15.499999999996362`}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.126447748763752, 16.890374170787496}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwd0ws0VHkcB/Arw45HmTreJkYor1CeZeJKalpOa6VMtWo0U1mPNGvEiqNa
+OkOW8ehk5RRLDtYeWkTrsUJlS0vIVrRUOsnabSqPoanZ73/nnJl7PnPv//97
+/H/X8nBcyJFlFEXF4kuuFIP8bKApW3I1pCnRdE73kgtNlTrxA3+C9bOGUj7B
+dI9mYpgRTWVTvwTr4PmWmkxtJWxMDQ9yYOmdBM08Y5pyy/xa1weWq1aK9Exo
+6ivn8+cjyP4L8RlimGPPS86EJ55a5DbAjury1gayfrjg6hDM4/Ws+AsutZ3S
+HoRnUhXOmhuxXq3W9BpMLd1U2cH1HX7WCfBEplf5Dph3xmCtNez24O+ycDg4
+ejH2FvIp/HfPxyi41/eKdQQsethEx8En9sbfUyH/otFQKbkvU842VsPBtd1p
+ZH2vvirtKDxRbx+2E5ZS2y5z4ZQ1/Hpnsn9b9j8usEvOjfRVcJLcImo7XJ84
+rjGL/AfW2qhSYcGb08kjMM/gQ+IIzJ1xNG2Dk7KiC4KQz0z6zOtK0k9htuco
+XMXXLimCFSH63adQT0WSWkI+fCJNP3GtKfZV2+Z5AWbFnH03CEsi2UZlsCB2
+ojnJjKbaVkY3N5H7wvpGPTbObZfEeRCe6vXpksHSpQiTOfJ8YbvRPLxtRV4V
+G/nLY2WV3qvx//T229tJf3SZBw7BodoMVzHM1/puSwTsxhXU/ACf7noh9oeD
+vd0+64Ajlx8x0IaT3vQfGYMF3XLlr9i/atJs63u46PlKfjise+9WrporTTGv
+B/ssIl/d0fm7mrBMw8LpItz3OpNSh73OHMrwhWMife7Pk/iRig+LqLeINbf7
+BTmP57/Z3odPtOc53IWrnkYZd8BSnfKAn+EWFvNjPxxaIOzPgUtHtD6oY7+e
+1mV6pJ5Oto7RPti47KDvXpjT8U1AH8mnRBxDk3iSj8V85NumrAnZQObrsP2l
+BXjMketvT+ajuvpKGepVJuvrOZJ5ZIeH7DLHfHqOLnqQeO+/3DgHB69rafqc
+7L81yizHAvk3rY88CmcncCaZHMQPbm6WwrXLjay2wIr4kGd1MLfGqCYClouL
+hx+TeDLh7gTYzfJ6KAP9qdoZpJkEd05rsdeTfnJbW6JgdoWECoFFO0YPfQHT
+Wx8aiGFdxeMBW7iCauiTwrz+Y+vmkI9UZKFTRPrd27YnD+6sCfC5DJ9OK690
+Ip7KFV6C+VHPzjxEPbbcAaYMFsRpNH8PC5Kj/VPJ+d18Qh2EJaxVV0Su5P0y
+LQ6E9QNNNXiwy07m9D54soVx2Q5WnFq/Kwv2Osmq04F7j+cwxmCRDeOknPRz
+U6tnEOJz7WI1npDz6lp0GIEF+blW5LzpT+G3NqEe6qShUxfp1/FHwhw4qJHH
+6IbTF/L7JmGpj/liHxzqvrrDyxL9dtD/Y5zMY+pu83Mw32NV8xKZ19IH3r/D
+FWKrY2zkk5IxzlTBVa89bPzhnnz7IJs1eF+HSl7FwPQlv57NMDcsU3KR5F9V
+4u0LT6guZHSSeqm3511hrzCdmZewY1eJzATmj9Q1aLghXp261iz2D9381s8c
+rlBej7lN8itIjHOClXXWjYVwY35WsTvcc9XPRAjbGlpfc4Un73CG3eH6FL2N
+dnBRRM2fLDjyjbqNEey1WJ6/gPr7BJ7aKsRPn3/fMgMrp+K6nsNKpdT4HSzp
+ZYl7yLykFKQwsV52gNpfSeaJMVbqDAsqz7VnwfJvKY+jliQvUWM8LAncM18N
+cy5ErBDC1qXmdxfgAQeh+36yfnZCEYh6h6+NGxIrzjaLfoRrO1gG5Hl+6ad7
+83DbyyEqAW4s3Lw8wArv16Nidi7p70FVZCacbca1rSf5G7a3d8LpWa8kI+T5
+haYbU/D/H9SrS67W9H9qGVzk
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.81512204377634, 8.004985304149105}, \
+{1, -1}], LineBox[CompressedData["
+1:eJwl1A8wm3cYB/D3MoxgUyKzlkp6tOlm/qylqsOLzkYnTTNd0bVllrLrjGPF
++fuytpTNhVbdzEhbNRyb2zCr1uVsKFp/ZkoxM9aiapcVKTq172O5S9773O/N
+7/k+z+9NxB9EyxU8hmEO4k3X/z+cWEafrkKWiXc43GIHc5uHnHVhj7YELghm
+FCGGk+YsYzrT3cLBshPHtxfBZzQrjlfhoErd5R3wyQCDJzdhV+kvacUCljE6
+ZtPcC9flRo1ozVgm7/PyziHYRHP/J1843r3B6i6sGW6vuWjKMmkdVWHdcGKX
+q2JuE8uE9jJTTWQ3xZNAWBs+n6SivE58mxET7G9rHHVmY11zPQMuz7nqEQEr
+rQNFMni10/X8ATjy3Yk1X3gy+k73LurnUKuNAm6afOS+jfr1WrpSQV5s/8aC
+8sx683VRL4nZ6k12DX82lQD/LfZXiWH2wRG/JbhkYuzabvjtgEuFscgvbC7L
+ltG6sM72PnxDr2s8jvqt7X7JB/3m8KKbSqj+gv3aZ/C27Udbb1H9FovYy3BX
+x3z0Es331oCyiOZj+0wieh3z+2hmj4K+X5af6AsPOydvNYJTel7eexJ2bI9s
+UKJe9T6r5lR4IunA0Ary+c/mT+XCjJFxgAz+9nS7p5L8sN6hFP2KtLHGG+tf
+2inGXmSZRnmoC33fpEfeVvgC5tqz6BkJq37c259szDLS8h4HKaxeX2goNUKu
+jpAIJ1jD7Qjmw0Y6y4kCcsdCZpsh8mZXr6xQf49mw/vh7ODL8r/oecirSN+J
++y/+0184SPMe+WLtZ9ovrTGInhf13FpwAeq5lN4u+hXue3j2VCbycCaD5X/A
+ofadVenIK//KTKyleZ3LPeiGflIatc+Zo75F23FnOk9B/Xe1bvByarzlKlx9
+KkpHQf02/u5vj3l4GNoV58MSTYOXO1zDix2+CWdPOYps4MDHD+ynaR7lEUOT
+NK+WVC/DXThf28hXU2A9m8emEliV1c2bQx6VeYnkDbjuvNVaDfJG6pld86X7
+n974V4Z+JMvqI2/BHLfvtznMo7L4HbUHzHCjqwV8PEcOX+vaw8q+LfyjBixz
+KWPzn0LYRDDt/54++gksS3+KPNxAwscXnsfzKpKGjNN579+UYgm7LhrwW8kZ
+lo5aPfzefBosquA++bEL1liv9+AGCul8Zp2EBXBLZYo4h873XoWON/bXWIaG
+ZdF6tCDYGvXvnhiT5VH/80ljQuSL4fmtl9L9Xu9zZshv6ZV3uwkO3dl+bx2O
+H/3w0xE45vr0lQ6cp5QR2/KQX1MqkASj/9Y7n6heg9WZWecqYJ3RH8JDqN/e
+uAqyKsxz8CwsU3eNH4YtqrfE1dK8kl/Z04j9EgudmV6al/KQTy/qib6vqZmB
+Y/yqimuRT/rmaZcVmv9y5lIY8m/8v+1mmY2XPvsfs/y8/w==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.88748581947994, 4.835942983375933}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJwd1Qk41GkcB/B/ji2PclTuaFzlyBBJizzvJmUljX1sKGVcTVJLRUutTIex
+SjkqUWmHlKOSatcVGylylKGY3bGtWbIlcobayuz3zfN45vk8v/f4/b6veRgG
+R34XJscwTCR+6Scjoz82hPnyo0kYQws59xew2sR5QY4GYbw7hr4ug4XlpoN+
+GqT2b9trghSYn1+TvFKD8K/oN84OhtMcVUtXwYMHTa+sgjnJU3GBWL9EN89q
+Pj3/TVtbIeqs7qkcqTVhbB4UCNQ0Cb/YukRUCAsfbxam4X71MwtnDsPSqVsF
+hlqE/7L2qX8oHMW3N76nRZijcxXY/nDak0gtH23CZIiGuwLo/u3q6X2wMqui
+dQ9MZi6wg3QIP3ZE8V4ydadT7iM44IAo/yY8am2jr6xL+O5OvvO7YE5nzx0r
+XcIEq+9fJ6Pn7ww+aYn6y6451V/6f9uooKhLSN+gncAIlj7Zd6NahzClK9k8
+K7jWRKLlq0PIX4IhVVual67qZQn6GfdTTLeGbfzIlJc2IQZFC8JN6f4yjbpq
+zHdZfDhlARzVK69gBYuZwNZ3uJ+5n3q5EPksy92Q9xvNw1hc5wDHNFzT3E37
+m5ex7x+8z6hEwU2PztNgoH8d+Q780FPRwMZ532iuyUL9tIqKwz5YLWE3KUa9
+Y2PLMUOYcdtCpDDz/IHZH1ao5/oQnM98vJ/vkg3XZnq4FsMJvOOreXCpflCO
+LfJvO9nT5QqLAtO2PEa/M3KZ3dawUHu6Ilib8Mtzg6wtYb7iiVvvMb+byenm
+FTC3cHbcEeQv29vZ5EHX/yTWnYTv2kSc3AVzPlf1eCLvYXasOI3uTxz//Rje
+4+aTTPUqanF+USZcUO4b1UvPE/dVHod9++McvsI8tZ8PkU3Yn/XId4zOR1yr
+Sj/gfe6maOXbwkKnwIhk3Kd7dY/MHubuH45QRD1PtpxvAXOqOC9i0O/Skfwk
+VXqewOlSH+b9qPQ5tJ/Oa/e6xBfz5msWc27SfIo9qiR4j8mCs/7hMEveID4a
+ea2sjHNbRPMKeOhnifqYg/uOpmV4n9dGI/Kohyuq8aLh2lhuN/2+JbicXWAI
+i9a2JRvBJ4736z+zxPqxXct52J+bntR/inrEa6QZzso65eoDp4UelnNHP01e
+rdvNYNaeMBMx7FVUf0IZjjpT9z4S8zgPOtvNWCCPWIfTSpi3pryzU0ad1P3q
+AvLY5CtRUsV6YcCuJD3kqe8wec6c7o/uG0H+fAeDsAxPeh+nRPsp3MO9fi4a
+Jmu5zZNY3zIkN5BD+2On97yH1Xvj6h7S9aOSMDHscpEc7IelKXNyzmD/rOyS
+1k8wP+bI8+Wot44J5eZgftZqBfMK9NMevoylCHPfFy9ho98qOyO5CaznXnzh
+cwl/XxpF6ZHt9D5Li7vKmG9x7yr9XGr7PnYi5ncxKMkLofMkPtdRx/vdj30V
+pEfvm95YXIZ8Uz2zglswf5RsRcoh5KnpfN74R5g12JgcAode1Qkzgrnx3t5R
+WC+vw4yIzPF9sfHamos6b92NzQKYPy99fAJ1VS1poxvMvf1mWwjuH+6eeqYO
+qzm2mw3g/q3+PI8hM7y3pFgQj/4vWQwv6oKl8vXNWphXqD7Xuw3mxPz6tgTz
+Vm4tk9G6zaSrtiPyUnnnHDIIixx9LG/Dix1Tx5VoP9WPnefpEf7HEKefrWFO
+jnjWt/CffqIMP1hYsZMVpEeYCXbVhiOwdMMvwT6oVwd5jV2FSfCBJmP4nGkK
+U0/P+887vgPvIXqjE9EJl47uzQmDuffWNEjo+YU2Y33o14trGNUO16Y2JnwP
+LyysKayg+xO7F9ZjPt6s7Jw0OK3FsdIe7ng0vWMLvY8ztLQMeXyoVJ3Wovmo
+DKz3RF5FnvqfWjAf1zL9zgzy5A1ZlMfBrNcWXh3IO8xcodmE5rM7UY7+/cfX
+bJaJluK+HetT/sX6+MxtakdhtW3Ze5fgvAOGWRFOsNRCoi2Av/yTo3X6qU3+
+B+U8lqE=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.109669593634097, 4.811165529975059}, \
+{0, 1}], LineBox[CompressedData["
+1:eJw9lAtMU2cUx6+PkoIb4mOmcO+1Frz3U0CFoRVnlAMR6cLYEJS3KFWMjLBW
+wQRDytpp9vKxymAOAQkiWkAIlTfy0kxQExQVlBHETthiEbExLoBT2ddozk1u
+Tn757v2+75zz/x+FWhORPJthmBD62uP7h8CSefboAUy4ekHSGgJdCSM73W+6
+A6M/y8t3EPjzVLHE8jNlaYdnsYbA9J0nvo4hlGM6yjt1BDRM6WjFjAIY45dt
+1mwCMQ4241QDZUvh9Y/TCaR2lyjWaijbBq1VcQTq2kLUeZ6UVxjz7yvp+e/S
+H/g+WwZMZ2WgxJGAj6XX4Z/LlPV7atbdF6FxOGVj4BHKvX8NVZ8W4XeLkz5j
+J+Xdr6enYkSIkRZVBgdR3n9opN1VhJLNuZMOn1L+UbXQPCRA+9OG7371pmx0
+3r7/vADvvn48Gu5LeSrv6OfpAoh1PtfWBdjXI3WpoQJsvXv3k/7tlJmUKP1q
+AS4VS5rTtJSbrtuu8QJEu2Xq3v5C2bI5x+oqQERVr1O0mbIqVFjqIYCXvurU
+hnuUbfXaN/4ClDcFR6TYKEsr436LE2Bk0dzxbkea/9RVafb3AgzOaU9L5Shn
+Dn/T30K/n1XuVStSVpWWqv8VoGZPbGYsoewCvMlPhDqu71sDT1nWd3vmoAiP
+u6qrOqWUm4JmGmtEyEotW+9htedvKPYZE+HiwYEzXh2U/cctkxyBnsK/XXqO
+2eu9pW90K4EMpcU/KZyyVv1i9T4CRT2GvfnO9vxUhw2HCTxULYgcMMopz3Z0
+0hPI87frRY7rfoMTl4hmKf7f+8MbZc8THvdXNASc3LSLx/O11rXDyU85vF/r
+pq9umQwc3n/xF/XG5lUc5head+589gSL+Z+zRjNv/2CxPqb4sPlhZhbr9yCt
+2pR/mcX6RrFHl6/sZrH+Qf9NEu04i/1pNGfEr5Jz2L9a97Kh4/Ec9nffjcSx
+bUUc9j9hYr5EYuFQH+aRVyeWy3nUT7Y+oW9HFI/6am85m5Vr4FF/3gWBysQi
+HvV5fFvO64ELPOq3u+yhy8sCHvUdu7DLlJHFo/4Hk8ZmlgTz6I+CZO+fdNMc
++qdcnfjS7wyH/nokyiILV3Lov5KL2o39FSz60y+3tfW0gkX/Zu1dNuyc44b+
+9nRvUVYwbuh/2ZHPCp8fcMX5kBl29VXAmAznhy5lw5YraZQ/zJdHH9mjDP4H
+xxO6LA==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.4452, 7.75}, {-1, 0}], 
+        LineBox[{{7.9999999999976925`, 15.5}, {14.99999999999251, 15.5}}], 
+        PolygonBox[{{12.1, 15.5}, {10.9, 15.1}, {10.9, 15.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.5, 16.4452}, {0, -1}], 
+        LineBox[{{7.999999999996362, 15.500000000005457`}, {11.5, 
+         9.500000000003638}}], 
+        PolygonBox[{{9.447677384685548, 13.01826734053906}, {
+         9.706811054955079, 11.780184249251306`}, {10.397834175673825`, 
+         12.183281069670574`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {9.015942703607429, 12.323799910437668}, \
+{1, 1}], LineBox[{{15.000000000007276`, 15.500000000005457`}, {
+         11.500000000003638`, 9.500000000001819}}], 
+        PolygonBox[{{12.947677384685548`, 11.98173265946094}, {
+         13.206811054955079`, 13.219815750748694`}, {13.897834175673825`, 
+         12.816718930329426`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.984057296392571, 12.323799910437668}, \
+{-1, 1}], 
+        {PointSize[0.04], PointBox[{11.5, 6.}], PointBox[{8., 15.5}], 
+         PointBox[{15., 15.5}], PointBox[{17., 5.5}], PointBox[{11.5, 9.5}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T18", " ", "P2", " ", "N36"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdiei/fifjghgjhj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdiei/fifjghgjhj.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {44, 0}, {0, 0}, {22, 22}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["g",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {21.75, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["g",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {26.25, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["\[RightArrow]",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {30.75, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["H",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {35.25, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["g",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {39.75, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["g",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {44.25, 69.96}, {0, 0}]},
+  AspectRatio->1.0999999999999999`,
+  ImageSize->{288, 288},
+  PlotRange->{{0, 66}, {0, 72.6}}]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215291833344`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"0aac61b9-b707-4352-b484-ba5a8ea791ae"],
+
+Cell[BoxData[
+ GraphicsBox[{InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwl1glUE9caB/DLUgiLmLJo3KOCRSwJCEoKlEQPskQDKUoJFB4opIBSRJSK
+0hZKQBBBcpRNSjBuNRZEpEjBAmU7GArYFJGCPGPA1oeCAVHQUinvP+2ck5Pz
+y8y991vuTGbtvoMBYl1CiAQf6pv8toBjGY/8c7B5hKXS7TgLJ8yeMe5h8cig
+S+SapTCvzop3Ae4cbkjPY/BIcuZ/xF/DQbHfPZ9byiMlvd91fgZzvLraIuGW
+dr+N0fD8sg+Le5Zg/IxzO3U+zmkzcYVp+ac41HjhnCCi2opHxgwbzsvh5izh
+D05wTGbcqZ/he4K5pDuWPOLzLGT5PFwgXimKh0vUcyZbEa/Hr0ledrDI4JOh
+RDjk0rVtby1wPpz8Wg2T5C1Bv8NvQs85P4f/ZI/IR2DmkvMV5g48Uii+7jcN
+T+xMDtsED8X33bbAfGPWJkVcWDE3fWI77On7KM4P9nHgtR6HFcv7nYNg1uTM
+4np4UFAoCYb/XiccmaHGW7K3BsJnDZ7K2MhHEZufyIcXqgKHI2D3Px5f+QDO
+yrmXmwmbWj9JXQ+HXNCyS+GOdP44Da446/zyG5hu62s4gPg/kvnez4aTQ/ea
+F8EHC2g/hsMcf/Nv98BeoQ0pTMonm9MsYXbUwGg34omQ3AoYRP0an+66Ggkn
+Z+XJL1L96CwWPUP+8uDwq0lwyPWM7ZFw8qyV5244SvvAp88c9escVbvDN+qO
+NLrBDnoNnzjBB3Zc3nT5XeyXEyl0F2p/VE6z6bA8xbfVG041jHTLoKOfP5pf
+ioJrQvdH68PyT4OicuGeocR828WYj13j1gRrrhdlfmaGeg7l/vUK7tcffDy8
+iEdsT9jYOSIfV4G95eewvG545UF4pTpQ5g47TBRbVcIbWFarWHCMxGjvH/Cn
+Vl8GecP9FVtdTVHPWTNZiAR+dejnjLWw2SLTW9T8JUfffuNI9XthutEH67fU
+j3S4wcunsn9vhSMOvsqk9kP1aBjDA/H6NPlXusOlC+L1tXBcrUbgBKuq3XIW
+Ib/s0iNKqp+HP48XboE9VVVNZvCfH2h+EsCKehvGM8SXnezxcDdML1bn3IB7
+Lzoe3QErZ2y8EmD6RJ7HWliTIptiwZzM09d6sZ5ic7W3FvU53UyX28NjolCd
+m/AA86tYMeKV3vCrOgZ7BCu7jiE/+niJjA+7GsabHDLF/Shwa7eBbcUrbgeY
+oH8BpRdNqfvr7iH/94xRjzV3PyTwkpzc+69pPDI1IjHWgWmDfEmvIe6f4fEJ
+MzjHs/Ljmwb43XyCs5Ean3nhZsU7PJJ2KKfBDz4yUDLfro96prk3fwknLm0L
+JjDj7kn7WjiALQ0S66HfsU5lk3BpRrhyRhf7bVYTbY98+7oOlNfAaYb2/fvh
+mrnY0VK4PkxlewU2rXZproBF4ed/GWJT+9q2TANXnszi6KHezruLg50w/9tL
+elmW8BfTuTllsM/VaWMmbKs+022BeOIi1G428H71ptVSOHSV6W9U/+xi3+yk
+IR+ed+joCrhyYvuuwzCjwKhyEVzXV3hVCY85FZ5+ifX5ceb3CepR0jFj0kb1
+KzYjzwoeu7buUTb1fF1XTteFHVblH+DDjeq9we0Y77BH7WcEt+1K4org7C2m
+nkrUI52vlbQinnpGwDs5cH2EcZcOnJBuwfoIZnXZJa1CPlOS1auZsOLO7vTl
+yD9i4ItHb+yRR9EOd6KDeE7NLn4I5/5trLm+wCWKYx6/9MIt7HKm/zyXqFbk
+1XTDe6QtV2bnuIRZt7l5ALaeai+se8MlwtposRYu8S43ks9yiSYgTPou1mO8
+/FjY9opLRJd3KjzgPUxnL7uXXJIw9lpxmNoP/drOkRdckqx6sbUKXimhbZuc
+4uJ5eaZhHHb+SRsfCPuskR3diPzjGl9zLOAEge+tKPhtQWrreup8uLivFK5u
+lJV+BcdM8qO7YKEecz0D86cd3xeupfp/XGkwCqsKjGj66A/nL+//dk9zSeW4
+9IoxbBlj+6Ad8Q0mPrj1jx89LP0B8ata61jU9UxV/v8KZrgkwtFHRs1X9kST
+xke+jGFXZ2o9abn5QyXMGeyuOAerRgPv6b7G9Rlr5vfCualj72txXrjRJcUa
+1n/SbJUBt7wQNjxGvkqBOroV8yt2SeKp56+0w+but1g/5nZPUCRVv2t6TRzE
+R7MYXUbdT6LBqG2pyCfBjWY9i/qL4qb8TSa5RK50LeyBp56ydGqfcUl16x3r
+Krg+VGyw7AmuL9q3uIy6/sRwQ9gI6rMh1ajYnvofKKkVDHGJNP6Uy3lYem7D
+uKMK8VaFvV9L7YfvlRV1zVxCDx173m//73tB2qWmf98PWLz/A7rNAR0=
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.077432877509341, 16.88857259237856}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwl1wk4lWkbB/A3awgn+1YOxlKok0GROoeIQrRMtlH2ofgcNYpK3yFkpOzN
+TGbMQSOVsZQGUY5lKFRnxpqlTtpE5WTJNsP3f+ZzXa7H7zzvcz/3fb/v+5yL
+TkDkvmARiqIe4peMnDfL+NFjUf/+qLEommS3bStMn33Ov6DKooxpprEJsHt3
+zJypKovTsJ03awkLFR11x1VY1JeuAyfe6LIoTsj59FYVFmesrHsyG6YVpI03
+Yj4mWeKcHcwf8LYYhh2inBkzOiwqI6SqQQXxi/VcO8tgSvwHx6Pw+eRbHVEw
+N0CE3ov9FF9t1GfBfinX2HvVWByv2U2bNWH2196JvciXWZt4R5TM/yOud0id
+RfVGj/8yT0d+NfGTAngm29Dub1hw3eSphwbqmAnfJo3redEGvvUaLM7PKS1X
+dGDOQaPFlZosTrdOyGsm7K5/jG0FW5qUOAeQfFPfT+3WZFEHn3S0JBGXJvjY
+YN7P+KbVNbL/2/vGcnD6n0ZlzaSe0KcZTdhP6bhFWD/Mqs+19cV+JVn71V+S
+/f6Idn2J/GR55VMvyPWRw/3e6pjfZdLZBfNvVLW3o77QM2v0a2DGo75Ia9R/
+um3EIp3sb7tRvRL9yk4QHfWC6d+l11qgX1zfmXZ1Ev9GUspj9Fv+1cZlPp3U
+O1nGwf2Jj/tVPQHmX+9a4Y756kL6Cgbpz8Tg4+2wIK70Up02rr934Z4rfEWM
+vawFc0WOtJ6GNUMPm6SuRb5Jf7Fwv6nVIYNuK2FuEVdiHfIxzKvk5a1Bfrf6
+bubDmZ3j1Y4wZ8S3jY56yiau6MvBrMvzTiVw1inB5Qkt5GMv32+KfkgOZmwY
+h9n9RpY34BJffsUSzJjS4qqgn2b+sgUGWM9nNRhFwLPjLexDMHvaa+V1uE8x
+v54LV+i0DbXCHirXc97CglePe1tgacOFDhPky4k48lch7FAV7XwEZj0r9gyA
+mbqxgVdIfW1yFyTgEZqGWg1M1y6bz0Y+mh5LgQ2wu//LYBr82NPlP7/BwoZN
+0QmoR6fpeQWHrP+41vMT6pc1bFxlReJHtIUFwfEXOjv6kA99h+WjEfTPeHNk
++mHSD/ubssfheuVA027SD9XuVg147DXzjDXMvZfp9UwZ+0rmKPyA59Dd1KaS
+B+9fGl+cRJ6CmBitZjjVu/qbvTDbsnzra/ijq8vBWuTJvSknoY94Rf8JcmKo
+k+e559VZ8n6WOM/cRd7CVydffoA7pLgyvuQcUFObJO/j71WTy2owP7HPchJe
+E/p8fAIj/WldWCw+l2ja998XcMWEh+UCqd+uWew97GetkR+BfdQmdWNW4XOe
+s8bBR/CY4ED5dpjVeFpTCXlu3SmZFQfT9y7Ob4PFfMUPNcNU8DTHCb4bHjEt
+RfKvU3tlBsf8wTN2Jvnf1pNYwvhzYoJuPEbB6Hx4KUZHtsKlYoz8A93adhiH
+vIpWVGNk7LaJakFc5+u568phnllptRX8vkV9Lo3Eu5o5V4K8kzqbeG5whd4X
+qerwrbOXbedIvquWK7LQHxFr7R9TYIFN8XZNePqt6Hqxf/u12rIW/V43UhAR
+iXW8UYnTUfB5X6maJ7iO1pmc4QiHXo8XrifvWcrNsG0we/6A3XmMGfXn3PZj
+VAuRaR9TwvrUbcPk88X28B0+MNvuqUI/3Jp0uX5YEfUtfxPHRJzCJNN9J2C6
+wt1jNWQfT+s5Q9hP5WtfG+TxpXXWvmkF7DfzRqkFjjN8nj8IV3Ss2O6EvN2V
+wyuHYEal7G+N8O2uZ2IzMF/cvXUd+uB1SGaIjnjCkszeU3Ccsca3PjAllX64
+Ar7P87P/hfjklgNtcFlHjtMbmOGSZ3sfHq08uXc98nevdAvIhcdVmzyCYX5D
+SN4eWKpurjMTZhiJBH7A/pplE69vED99l3kCXtyjPFgK029e1BUi/9BCA81c
+sn7NgMAP7gq6GhEA05oU5Pmo3+iYlagyzN0dI+YAy2pZHC8j+Vd0tbeif/EN
+VsWbYNqCHM8Hto2yKS9EvX7Kj1lScJC5IEcCFj6M9+tCHCmelFzgauwvdfdW
+PfxoyNziPg33Iy/XqBX+PJRhuRbOYGiLTcDhS4cXVsvj/p2zHTEn71/njjZJ
+OfTnn86BbPgH0539BrKIPyuokkB+ns67V55Yhedrw7zJefjsn1Wl8zK4PwpT
+TnKo76qbl89tmJdfdCeHeNChpwCmFpXXKaI/GzyTVRthgYlrCzl/LvEWM6QR
+j/8kLHIYTjxw/FQ07OfjZ7yWvAcnD7vMwhUFcwdsyfflsKRLIvJh5Ob02JPn
+3uOREQ35CusYTCN4IH9nwSVYoGP413vEY9zJMpyGGUXfhOfCZnmOZyxRr4At
+EWhA9tvyYrOrPKlPz+lX5JtWF7fVDKbXb+GqwWb5SyIjWM8/WpZK6uXd3d7t
+A7OHvQLm0Z+YmBcPCpBPxh+93tGweZT5rRrkK5AXaovACTpX+q+hXnbuF2d+
+Rb89jZ79GCON+bY56SA47V7GuIUU7v8Tw0UWLJKw3DYuiXxqP73cBp/oib9Y
+LIHnUdBc7k2es9fJnsfEMa/i/TN5rj4aaPh7i8HndnmMw8mLgUGhorheq5bu
+gf17g6V1r4rAsRNKXXDy1K5pBZgl6n/CE/V81NucUr0C9XHUpQTkfLUdrc2E
+OR+ajwegfqfA4Mv5sPCjdWE/LJdve64fzlg4+YUN+uf3ue27zYgntBhNPA+n
+cNobK2HBnYLM30m/t53u3Yp8eCNFOa1w537v/Icw33RTDJk/5r/z/h7kz1vp
+05NM7leXgVsDzLD9Z5ycdyYOSXE01Muwyknswv5vLtRpWImT8zDhnie8b4+W
+mhlMTzjaSs6tW+qFrz+T9T/ZXiTnTVmUaXkS7C7ylX856i95rh79HPuzlpwz
+DWANt+ElSZjeT5ci7y33q4ASceRPo++ecYCbUptWvaDQj/yxyHm8hyXXyvV3
+LTMpzpd+Nu2wSWJAc/XfTIpt/SDnLmzfE5tisMCkKujaqzpgc8eqlWWzTIrn
+kpa8AKdkf74QPMOkWJ22TjsRv3R5vsd/CusNjDTIOWKe3ipf9QlefSSBjvyE
+jzJfhAqZFCX3TrYIpj9cmyU/QeYbi8m5HFNrcET/I+J57Jsqh53Skvpk4Az3
+3hpj8r3Gdo2tgGlhX9l8T9w3P/sZ67lB734i33s5Pp2sYcTP2JKla4h+p1W3
+Db7F/vTbZ+J2wFqatFOiyI/2/sgkE/42jxukOs2k3I+NR2nBVYqlzjKoJ8PY
+6McBEl/u+7QHsEDb7qc4OPH+Wf+tn5mU0OxrTWnYZUvY2H6YF5vzKgn5KjVY
+i0gSRxoXz6K+B8UO3XuwXnj2fU4I3B99Zb0x9qN9SpEZQH/UlmfZBZPwphlD
+L9iGsSG8Hvm7208dHSPnJjN2v+oH9J/WEZwNO7379pDDKJPiX2wO9oRjWsdG
+N75kUgxFB3sbWHBUul9uCP08+9tWFsze5MBb+BPzxb19gTAngZ0j0Yh4biZ/
+X1X8//8dHO49ikb+UGL9D/eEi/g=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.1542307644825485, 4.562492355174517}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000006366`, 16.999999999996362`}, {
+          13.500000000003638`, 15.5}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.457682641291616, 16.911908554403006}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwd1Qk41GkcB/B/OtZapMORnJNKyA5JKukvcuTI5ljs7CRyjiuxqwhZocmu
+u0PZDjxNjqKLzfF4HCVUZlLKljMhV5GMY9nv6/8888zzmXnn/f1+33nnP6ru
+QYc8RSiKOo4HeV68Ypg0JVzAJU1T8jcldaPgYBFZpzwZmrrtn+oXB19b4hdn
+KUtTB1Q7itPglJCDVn1w4L6hizz4DSe095gcTZUtY1nWw4m+s+xBWNiVn9AP
+h/OD583W0VSuat1TCR2sfyIITYD9ptZY68PFCe9kbsEf3jZpHIY/L4yOF8CS
+M18j4+EWVbolFR7obArKJ+9v/VWaDVuz3rs9hX3sAy9Iw9/GAye7YZ7xlEMV
+6teV926dIOtXfVM+DLPNREPn4IuCHw0X0P+3FSdy/iP17zCm8uDHugU/TJH9
+5oP2usI90yc5g3CM4wVjBtxxL+rjK9h5V/LKpXDG7dKvlbBQXMuZgj8NnbXJ
+gd1yPXQV4KiKzS8S4OolbgtO8DDF9wggDpPwvAOfl/f86EhcFHKEgf5o/5bv
+TOBwXlVYASyiIdAn+cR45H00xXzD1WHnmKT+SIjkAByzxatUl9RPMqr4Ux55
+zs7OGsINjKEs7fU0FTqesekgHMzRyaqFc719033I/B8E9mYKNGW6vlQ/kdSL
+PuBdArP5lQWFJG+jN48pRZqybXpo0Uryyz//RQc+1MjTJ3mpL3eRNYXjqNpz
+G3Xx+bmDagbwsGG9lxXMc3t+T4qsvzf8fQBcbTH8iY/9r7T0TiTCFmaqe07D
+ws12k9lwMaWhtBHOkGg0LiDrHS/l1aFfcU2riGLiDuMt3rBtenBpEdlffXPr
+GrhZc39UDkz1vd7Lx/z5FXk1abC6Sb90Hrw2qqA1Ela51FOVDosEddp6kHpb
+1DdcgwXeJgvmcOKIxekmeDThxDMtMo+yHksa+xtNR1xdA7dM6sZGwO5lHKN5
+zK9ia6c1A/82Nms4SvJp5Oglof+46IGuD3AXZ4KtifnZrx5J9cJy8hvvt8AV
+MT1m5DzR5e29oUr4ngrbueS8CR9Z3ZZSpin/l1XBEqhHb++3yoYPPXBQ1oBF
+5XZ7i6nQlK5Qj2UNt6aI7d4Jty49mh0CJy27ftIFZlWylS+TeU7I2vnBotPs
++VqSF8OlhgOLhQX8NARf6a+6z4bfnarcv3IbvMeh3RQuPNpooA07mEdmq8Cf
+e6tfmMHUg1szg+hn3KNPzBku+5xcz4VjM7vtj8B20V6dGrCrQCveHVb/qyaT
+j/m8xGW//AK7zUS0nYFZii72trAPy5NvAxuN+Lbsgi9KdmVqEy/V6WIQq+xp
+1VQidRd2isIpM9M55jCv+b/yYfQvF9HkFQv7HfG1E8DOrmq17fCnbnXBI5hZ
+cqbUBv3sYhqM34R9ZOLrX8Mz6QGL+Qj3rl1ngPnc2r4cy4TjQicLzpK8JlMv
+XyB5Os3GvoNdTZveXyd5jidPaKnifjCmsuI+qWcUHvY7LHAcC34GN7wNfFUG
+Sz3PWD0Ch3Ln3UfhruP+8avQv1q3mKwMA6/L1jF2wkzHjmJtOEv+jhTJy19B
+sWEHPFDo5sWFDXwuC3SIq9L3FcPFybWKSjAlFd7Phxs0hsrnsX9u7Y2XI3Dr
+jhyv1zA3OrtNRA+/C5uin3mwwvnOTVJwypN6+XC4+biRhzSx8VtXSzj+H50b
+q2GL5aeKlGGVqqscUXgtN+vwPOZvv2Vydwr7J5VomQ3AzL51j7tJv2N3Mzth
+J/FM4wY42O/vmj6Yu483XkjO08NI/1m4ImSsOnUbuZ+IOapgfyHHOy0cNrUo
+9LAn/cUZMj3gCg3VB2mwvt32rfawXnH8w39hSTn1F5Ywz1bvgCbJj1k1Zw5b
+K7h+PQXHP+UyyXmy7u0Tb4GTfLRDWLB4e++E4gaamvtj0DGEnOdM//1H4Ujf
+XJFkOLdrh9g1ePWItFEJ3LxEoec5/CbTNaoNluuX3TQGL/5JIo/FS43+H88X
+pNI=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.631304063066693, 8.096807950948126}, \
+{1, -1}], LineBox[CompressedData["
+1:eJwd1AlQU1cUBuBbFwiEfROF1kCC2FEEZUeWJ0SlaAXLIiBbUaDDCMYFiIA0
+rImIEqhSZNMqiwvSFIGiUxVbEZFKAdEShyrYmKJQRQsMQ0vof81M5s037957
+/nPeSyxi938Rt4gQsgtfeiWqhYWFr+0Y8uFjwhCjgf3+l2A9j7ibunBhb825
+AdhU+Y+jypghHSuttObgkaM6rB54gNd+7+P1DLl/gHSmwa83dm50h1ltt+Tq
+8NrsUV4QPMKsiBAZMSSqqrlqL3VVyO2/DBmipXRemwRfnMw9vBnmtzT1Uwuf
+W2d+Z8CQHTVXSAI9n1vxdjG892BCZRhMnKckh/UZ0nL8wsstcPlvYrs5PYYM
+7hg7YAeHxh8tq4CHfR00TWHZZvGzMDjvdcrpBdpv8rFYNzjTJezfMVia/HOx
+O1wTyWY9gceGhCNRdH9S2c778OrHhe+r4TJFNOcOLJKXXJ+CX7ywiqAW8lu6
+I5BHdfZUVjfsq9ff1gsXtboVyem8uHk53sivbOUbvYNdvqwzkMES+yXOusgn
+2BZ/SRf9V/SPNm+g/RxYHhoOr1POzdB+WZ7zcYWwhLvLLRcO0DCuq4RTC6LK
+GmEXSyvZcVgYp84dpP2WuerQ/aldKwxn6TwdLrqy4ION470mG7C+warwDK3/
+cIptC4uW2S82hKV81XMv2NfzrkYG8rsPN/X6wuekSUvl6Nfg0u2+z+DymjPv
+Hag5CUE+sN4j/pCNLkNm6qednOA+/eB4bR2GbGla1M6FZcIQoYk28ijG4rXh
+joibxUFaDOHtq2VPI99kx5xZH5shTiGJRcPUBenzJ+DQxdn9nXDfN9EexXD5
+T3MXm2HRoTUqul4ZNn2llvYrcqjfjvNaLMdXVdP7MymbZmHLkkNqH/y3vnEX
+6ue8knbT9ZNe87svI195anB6CyzljVuUIr9T4udXe+DVtcplzuhP4N0mfkXn
+e8ss61t4idL6Vy3kb8/5w/dPeMx1asIeJvmTTUaYV6OHDTeSzqMyNtkaHv7+
+P0kBPCtvYi+HOfJ7jk1wzLOTM2PYv84/LXyAnicLKS2H458FRryj8zWNtlgD
+t4m7JjTsGWI3Ff3pNuSr33PX3AxmagX55shfcLUqkQdLbRoM5Og3Iim/24qa
+/8kdKeYjiQo8vxIW2LO6AzXxHvonPDSAOxQbb6zXYMiNfbwCAstqxKddWPh9
+dVwOfY36Uhl3/pA6Q1b5vNSk+QTirZIJNYZkvfHKuU6fb/BTnwbYr/14w3na
+/0dVCXXwE7Mf/IphztIVfAWsEA2qZ8MBXhmJkTjvyaZ02yMwk/GYrY56D0rZ
+14T0ftqxwkFq2bCJCLaz9XD8Efma/XIT6Xl9uy9wziL/SdmbrfV0vzLFMBP9
+zcT6y3+h9W3mUj3Rf8VA6kslfb/CLTyH4BcBs6Pa6E80MdLqgedvOqrScIYD
+fGQb4un72J4vjIFjEs1LtsMPhpP5Erreez77LfYrv/q9qhHm5I5U74TzXJcq
+euj6lYWeR1D/6Z6oLgVdX9nJESBf3zW1wBk631OqR97IT/9fF+BJelVn/gcL
+PvkH
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.547014064132036, 3.0238996897848462}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwt1gk0lGsYB/CPI0m2iLGUOxhTjGXaFBVfK1Ky3lRTJhlUipSkVF/lilvu
+SEmWsaVFRzVdUcnIpUVaTFe3yJK4ipLRIpUb9/92mnOcOb/zfO/y/J8xZ8yC
+InxEyhRFHcQfeWdG8NrHp6kfLwO6at5MP/d1MPuavLlIn6bFIt9ZLnCe4EZA
+mD5NdUts7xmTeqtBhDOc4BrEeWOP9cuGde30aYZ9PiMiB263uW06C/Wl497d
+9IOFB8XuApj7lfLQhumj0dYZcHtwA0tuh/cdOm69WF/1e2D3SViHe2uajwHN
+rHSdzd0Ey7dnXLpjQFNTHVQaXGFhhmrrQhbNWFu47bGHmc78qLssmvqmCHIy
+h/N8tnx2M6SpowvSTv8CV6m5fKsxpBmj4jX/cuFIafqKaUY0Y9jZeckB5pdF
+h6XCr0dprV9GzgtKcWo1oqkxCws1NsD06OZyHWOa6f5QHn+InH9/wzNrY5qK
+p2Liz8DSiwtOEGf3c2/WkOd9uWw8T+0fyRpqgamBW5Ut2N/frdimn+zflvaI
+nOehKT80BKdU1hXOgNeovTz5neSRmbrxHu4/arK5zwDpx9lJ4QMnKtpYHeS8
+LM62Z+h3paX5XXJef17nZgH8crfj1UyyXq7wfo28kswGSkPJ827pXnvgLw4P
+hnkkj9PlbAvk+2q/q22PLfYPq69rQf7t71x5+TAdLoq7gPl8dOw1+ZXUZxqL
+0lE3yhteoA4LP8blZKHul9nXf9MG+bHe/VIOK2ltCoyFq4q/Vr7H87nLSgtm
+we2j586hcb4sVJY8woNVJgkKcP6SzSq59XDklEL18ZhnebF5fxGss8kwMQX9
+zEk8ayUm9XMVEl3MLzCmcfc+YifTZ8eRh6QrJ3sX2c93UeU45NcYfKOO1Omk
+t6x4eO5h46fJsDzUeuJruGqhwuYULPTiSh0wn/wupXcymJq4NSkC9laL/tJM
+9o/mC8TwOjcTzSG4an+s4ji8tEbQaoh+2JI6HgOb8jKtpsFUitYEH1izbaDR
+FZZyTTs0yOdFL0rHn7jSObcEnyeX/SLXlXDkjTzvJbjPDk1RgC9Zr73q3D/o
+75Zpd/J84r6/6lfBBp9MznPJ+oaQWS+Qj9YucQ/Jj5+ttzoM9qzLoEh+jFJs
+3BDyTMhJ10sj/XSO3yaBa/v8zvuSPDmNW8n/U4+7ba4GyafsWdNEWNSarV5t
+jfxqRusrw4uPWNjsgPku2bvxfUDlc2O9eaReOH2REeoT9nJknVY4L3NHggec
+1ZOcnA+zn06ZnQaXxuSdDiEOlAg+wq7yofTpsPzyNeUgzFOyNjtNA/YSCcUt
+cOeY60LFZOQ76PRyDfqNtwtd2AqnvPU40o75nq0RjnsKs+1k+oHIq69Dm90E
+e2314D+BL9+qXdEF68y78dkJeR+c1OH0lTy/8W8zzI9RYbiDujhP+vjAzIeY
+j8uh7lg+ud+A8+UPcFdNa8Jy0o/sMWsYVqJr5JutSH4JegqsP/tfhW4SLGx7
+H3EHtq0IsMqF2+9a6SXAR8vZ1hdJP5eed/PhoCvlO6+QflX1qutwv+DE841S
+sr7RnheA+UuKP+0qgOnNVx3b0F/Z8JjRP/bX8PALgrf5ZeYEk/uWGA32IJ+d
+7hYtM0h9bXDMLjj18ZIH39Ef/fBirSHmz4vz7JBNJt+flovvIe/EItXuGFIf
+TD0ghme02r6xJXWNQfYW+FjhbbOOSdhPNepqCOZ7PTG1+QRM/XFbFgs7F8nW
+esL9vbzEM3DphCsN6jBdUun5Fus1D6+0ecRFXctk3iKc3/DwuFYmXKW66bQU
+rvW2qI6AI3X3KFlhniWlu829iHM4S4vg+VNWp80m669Vc2yQj36ZSHUqzPZK
+1SpGPs6X1LqJdcZaX7Ag+TudcJwL0yknR5Lh8Mn+qcvJ+uPi9FeYV0Hc2Clh
+cN6ZuXVWJjQV3rdC+zdi34pGPxOa8VMb9eUULJzprxWC+t3XgbnVpL7Rq0EA
+px9IqGgj51nuKXHE83trT5h/JvVjNgH4PDDsZUWNquhfav8y+gLOU4SK7bVh
+JiDu4hLU3y4QPdEkeV2fuuE5ub8d74USzL9JFaxDf0tZt1veYD+pRtmfXZiv
+2cP3DbWkH9kAKxx5KDUpL8qGU56UTv+G+WpUrOCEwHL1JoM0uEa5qX4SsXaU
+yzx4xqtXIx2WuK8pa6sy8u6NWnclA2bebEhoxnzqBVmmnnDKIYnPI9jlvnWS
+MszP8k9GnVLTPeV8nYP7qsvqsJ4aWe8ZuR1mwnnMfPhJ+vBEB7i911L/JOvn
+7wLOz3dD+n9/iwB3
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.131120426728657, 4.809365547472548}, \
+{0, 1}], LineBox[CompressedData["
+1:eJw9lAtME1kUhmd1SwrrIj7WFGbG2pkRFFBBtKJGORCRGkQRkLfsUsWIBNsV
+TDCk2KrxibsVQUVAwkvLM1QREBHQrLBrguIKigSxChrLIjbGDeALb6M5k0xO
+vtyZe+855/+PTKkKSZhCUVQAea3x2yPAnJ+skQcqWDkjfokA7bGD27h/OKC0
+F1npVgGenC4UmU4QFre6FqoEmLj/wtM2gHBka3mbRgAVVTJUMSkDSr/ppjlD
+gEgbi368nrAp/87PKQIkdRTJlqkIW/rM1dEC1N0MUOa4El6gz30oJ+d/SXnk
++d88oNoqfUW2AniYumxeXSGs3V67/CEPDQOJq30PEe563l9zjofzJjtt6jbC
+v32YGI/kIVJcUOnvR3jXvsEWRx6K1maP2SwlfEwx09jPQcvr+oNn3Anr7cN2
+lXLwZfezoWBPwuM5hzekcOBc53F7uY91PVSTFMjB+gcPfukJI0wlhmsXc1BV
+KLqerCbceMdym+UgwilN8/lPwqa1WWZHDkKqu+wijIQVgfPn8hy4aatPr/yX
+sOWa+pM3B+WN/iGJFsLiyuiz0RwMzvpxpMOW5D9+S5xxhIO+qS3JSQzhtIE9
+PU3k+x/K3a46E1aUlCj/56B2e1RalAthB2ANXjzUMd0HdCxhSfe9yb08PGuv
+qW4TE270m2yo5SE9qWwFb7bmryv0GObh8t7eC26thL1HTGOMAJ35Lx06T1rr
+va57aL0AqXKTd3wwYbXy7eKdAhR06nbk2lvzU+zX7RfgsWJGaK9eSniKrZ1W
+gBxvq16kuO7VN1rlopqL/3cd/STvfMHi/rJ6nz/W/Mri+WrzsoGE1wzer3nN
+5rsGHYP3n73xmv76IgbzC8wpLs0YpTH/YnME9fkvGutjiAmaHmSksX6PkmsM
+uVdorG84fVhY2EFj/f0+jrmoR2jsT4MxNWaRlMH+XeXK+jNjGOzvzr/jhrcU
+MNj/2NHpIpGJQX0YB9+fEqQs6idDG9u9NZxFfbU0XUzP1rGoP/c8X3lcAYv6
+zNyS9aH3Eov67Sh77PAuj0V9R81sN6Sms6j/vvjhyTn+LPojL8H9uGaCQf+U
+K+PeeV1g0F9PnSWh+QsZ9F/RZfXqngoa/emV3dx8Tkajf9N3zBuwz3JCf7ty
+TfIKygn9Lzm0Kv/N7444H9KCbr33GZbg/NAkrlx3I5nw9/nydJo1SuAr7LO5
+Vw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.354800000000001, 7.75}, {1, 0}], 
+        LineBox[{{6.4999999999976925`, 15.5}, {13.49999999999251, 15.5}}], 
+        PolygonBox[{{9.4, 15.5}, {10.6, 15.1}, {10.6, 15.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 16.4452}, {0, -1}], 
+        LineBox[{{6.499999999996362, 15.500000000005457`}, {10., 
+         9.500000000003638}}], 
+        PolygonBox[{{8.552322615314452, 11.98173265946094}, {
+         7.602165824326175, 12.816718930329426`}, {8.293188945044921, 
+         13.219815750748694`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.515942703607428, 12.323799910437668}, \
+{1, 1}], LineBox[{{13.500000000007276`, 15.500000000005457`}, {
+         10.000000000003638`, 9.500000000001819}}], 
+        PolygonBox[{{12.052322615314452`, 13.01826734053906}, {
+         11.102165824326175`, 12.183281069670574`}, {11.793188945044921`, 
+         11.780184249251306`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.484057296392571, 12.323799910437668}, \
+{-1, 1}], 
+        {PointSize[0.04], PointBox[{6.5, 15.5}], PointBox[{10., 6.}], 
+         PointBox[{13.5, 15.5}], PointBox[{16.5, 5.5}], PointBox[{10., 9.5}]},
+         InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T19", " ", "P1", " ", "N37"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdiei/gigjfhfjhj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdiei/gigjfhfjhj.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {0, 44}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwl1glUE9caB/DLUgiLmLJo3KOCRSwJCEoKlEQPskQDKUoJFB4opIBSRJSK
+0hZKQBBBcpRNSjBuNRZEpEjBAmU7GArYFJGCPGPA1oeCAVHQUinvP+2ck5Pz
+y8y991vuTGbtvoMBYl1CiAQf6pv8toBjGY/8c7B5hKXS7TgLJ8yeMe5h8cig
+S+SapTCvzop3Ae4cbkjPY/BIcuZ/xF/DQbHfPZ9byiMlvd91fgZzvLraIuGW
+dr+N0fD8sg+Le5Zg/IxzO3U+zmkzcYVp+ac41HjhnCCi2opHxgwbzsvh5izh
+D05wTGbcqZ/he4K5pDuWPOLzLGT5PFwgXimKh0vUcyZbEa/Hr0ledrDI4JOh
+RDjk0rVtby1wPpz8Wg2T5C1Bv8NvQs85P4f/ZI/IR2DmkvMV5g48Uii+7jcN
+T+xMDtsED8X33bbAfGPWJkVcWDE3fWI77On7KM4P9nHgtR6HFcv7nYNg1uTM
+4np4UFAoCYb/XiccmaHGW7K3BsJnDZ7K2MhHEZufyIcXqgKHI2D3Px5f+QDO
+yrmXmwmbWj9JXQ+HXNCyS+GOdP44Da446/zyG5hu62s4gPg/kvnez4aTQ/ea
+F8EHC2g/hsMcf/Nv98BeoQ0pTMonm9MsYXbUwGg34omQ3AoYRP0an+66Ggkn
+Z+XJL1L96CwWPUP+8uDwq0lwyPWM7ZFw8qyV5244SvvAp88c9escVbvDN+qO
+NLrBDnoNnzjBB3Zc3nT5XeyXEyl0F2p/VE6z6bA8xbfVG041jHTLoKOfP5pf
+ioJrQvdH68PyT4OicuGeocR828WYj13j1gRrrhdlfmaGeg7l/vUK7tcffDy8
+iEdsT9jYOSIfV4G95eewvG545UF4pTpQ5g47TBRbVcIbWFarWHCMxGjvH/Cn
+Vl8GecP9FVtdTVHPWTNZiAR+dejnjLWw2SLTW9T8JUfffuNI9XthutEH67fU
+j3S4wcunsn9vhSMOvsqk9kP1aBjDA/H6NPlXusOlC+L1tXBcrUbgBKuq3XIW
+Ib/s0iNKqp+HP48XboE9VVVNZvCfH2h+EsCKehvGM8SXnezxcDdML1bn3IB7
+Lzoe3QErZ2y8EmD6RJ7HWliTIptiwZzM09d6sZ5ic7W3FvU53UyX28NjolCd
+m/AA86tYMeKV3vCrOgZ7BCu7jiE/+niJjA+7GsabHDLF/Shwa7eBbcUrbgeY
+oH8BpRdNqfvr7iH/94xRjzV3PyTwkpzc+69pPDI1IjHWgWmDfEmvIe6f4fEJ
+MzjHs/Ljmwb43XyCs5Ean3nhZsU7PJJ2KKfBDz4yUDLfro96prk3fwknLm0L
+JjDj7kn7WjiALQ0S66HfsU5lk3BpRrhyRhf7bVYTbY98+7oOlNfAaYb2/fvh
+mrnY0VK4PkxlewU2rXZproBF4ed/GWJT+9q2TANXnszi6KHezruLg50w/9tL
+elmW8BfTuTllsM/VaWMmbKs+022BeOIi1G428H71ptVSOHSV6W9U/+xi3+yk
+IR+ed+joCrhyYvuuwzCjwKhyEVzXV3hVCY85FZ5+ifX5ceb3CepR0jFj0kb1
+KzYjzwoeu7buUTb1fF1XTteFHVblH+DDjeq9we0Y77BH7WcEt+1K4org7C2m
+nkrUI52vlbQinnpGwDs5cH2EcZcOnJBuwfoIZnXZJa1CPlOS1auZsOLO7vTl
+yD9i4ItHb+yRR9EOd6KDeE7NLn4I5/5trLm+wCWKYx6/9MIt7HKm/zyXqFbk
+1XTDe6QtV2bnuIRZt7l5ALaeai+se8MlwtposRYu8S43ks9yiSYgTPou1mO8
+/FjY9opLRJd3KjzgPUxnL7uXXJIw9lpxmNoP/drOkRdckqx6sbUKXimhbZuc
+4uJ5eaZhHHb+SRsfCPuskR3diPzjGl9zLOAEge+tKPhtQWrreup8uLivFK5u
+lJV+BcdM8qO7YKEecz0D86cd3xeupfp/XGkwCqsKjGj66A/nL+//dk9zSeW4
+9IoxbBlj+6Ad8Q0mPrj1jx89LP0B8ata61jU9UxV/v8KZrgkwtFHRs1X9kST
+xke+jGFXZ2o9abn5QyXMGeyuOAerRgPv6b7G9Rlr5vfCualj72txXrjRJcUa
+1n/SbJUBt7wQNjxGvkqBOroV8yt2SeKp56+0w+but1g/5nZPUCRVv2t6TRzE
+R7MYXUbdT6LBqG2pyCfBjWY9i/qL4qb8TSa5RK50LeyBp56ydGqfcUl16x3r
+Krg+VGyw7AmuL9q3uIy6/sRwQ9gI6rMh1ajYnvofKKkVDHGJNP6Uy3lYem7D
+uKMK8VaFvV9L7YfvlRV1zVxCDx173m//73tB2qWmf98PWLz/A7rNAR0=
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           
+           9.996694214876033]& ], {3.077432877509341, 16.88857259237856}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwl1wk4lWkbB/A3awgn+1YOxlKok0GROoeIQrRMtlH2ofgcNYpK3yFkpOzN
+TGbMQSOVsZQGUY5lKFRnxpqlTtpE5WTJNsP3f+ZzXa7H7zzvcz/3fb/v+5yL
+TkDkvmARiqIe4peMnDfL+NFjUf/+qLEommS3bStMn33Ov6DKooxpprEJsHt3
+zJypKovTsJ03awkLFR11x1VY1JeuAyfe6LIoTsj59FYVFmesrHsyG6YVpI03
+Yj4mWeKcHcwf8LYYhh2inBkzOiwqI6SqQQXxi/VcO8tgSvwHx6Pw+eRbHVEw
+N0CE3ov9FF9t1GfBfinX2HvVWByv2U2bNWH2196JvciXWZt4R5TM/yOud0id
+RfVGj/8yT0d+NfGTAngm29Dub1hw3eSphwbqmAnfJo3redEGvvUaLM7PKS1X
+dGDOQaPFlZosTrdOyGsm7K5/jG0FW5qUOAeQfFPfT+3WZFEHn3S0JBGXJvjY
+YN7P+KbVNbL/2/vGcnD6n0ZlzaSe0KcZTdhP6bhFWD/Mqs+19cV+JVn71V+S
+/f6Idn2J/GR55VMvyPWRw/3e6pjfZdLZBfNvVLW3o77QM2v0a2DGo75Ia9R/
+um3EIp3sb7tRvRL9yk4QHfWC6d+l11qgX1zfmXZ1Ev9GUspj9Fv+1cZlPp3U
+O1nGwf2Jj/tVPQHmX+9a4Y756kL6Cgbpz8Tg4+2wIK70Up02rr934Z4rfEWM
+vawFc0WOtJ6GNUMPm6SuRb5Jf7Fwv6nVIYNuK2FuEVdiHfIxzKvk5a1Bfrf6
+bubDmZ3j1Y4wZ8S3jY56yiau6MvBrMvzTiVw1inB5Qkt5GMv32+KfkgOZmwY
+h9n9RpY34BJffsUSzJjS4qqgn2b+sgUGWM9nNRhFwLPjLexDMHvaa+V1uE8x
+v54LV+i0DbXCHirXc97CglePe1tgacOFDhPky4k48lch7FAV7XwEZj0r9gyA
+mbqxgVdIfW1yFyTgEZqGWg1M1y6bz0Y+mh5LgQ2wu//LYBr82NPlP7/BwoZN
+0QmoR6fpeQWHrP+41vMT6pc1bFxlReJHtIUFwfEXOjv6kA99h+WjEfTPeHNk
++mHSD/ubssfheuVA027SD9XuVg147DXzjDXMvZfp9UwZ+0rmKPyA59Dd1KaS
+B+9fGl+cRJ6CmBitZjjVu/qbvTDbsnzra/ijq8vBWuTJvSknoY94Rf8JcmKo
+k+e559VZ8n6WOM/cRd7CVydffoA7pLgyvuQcUFObJO/j71WTy2owP7HPchJe
+E/p8fAIj/WldWCw+l2ja998XcMWEh+UCqd+uWew97GetkR+BfdQmdWNW4XOe
+s8bBR/CY4ED5dpjVeFpTCXlu3SmZFQfT9y7Ob4PFfMUPNcNU8DTHCb4bHjEt
+RfKvU3tlBsf8wTN2Jvnf1pNYwvhzYoJuPEbB6Hx4KUZHtsKlYoz8A93adhiH
+vIpWVGNk7LaJakFc5+u568phnllptRX8vkV9Lo3Eu5o5V4K8kzqbeG5whd4X
+qerwrbOXbedIvquWK7LQHxFr7R9TYIFN8XZNePqt6Hqxf/u12rIW/V43UhAR
+iXW8UYnTUfB5X6maJ7iO1pmc4QiHXo8XrifvWcrNsG0we/6A3XmMGfXn3PZj
+VAuRaR9TwvrUbcPk88X28B0+MNvuqUI/3Jp0uX5YEfUtfxPHRJzCJNN9J2C6
+wt1jNWQfT+s5Q9hP5WtfG+TxpXXWvmkF7DfzRqkFjjN8nj8IV3Ss2O6EvN2V
+wyuHYEal7G+N8O2uZ2IzMF/cvXUd+uB1SGaIjnjCkszeU3Ccsca3PjAllX64
+Ar7P87P/hfjklgNtcFlHjtMbmOGSZ3sfHq08uXc98nevdAvIhcdVmzyCYX5D
+SN4eWKpurjMTZhiJBH7A/pplE69vED99l3kCXtyjPFgK029e1BUi/9BCA81c
+sn7NgMAP7gq6GhEA05oU5Pmo3+iYlagyzN0dI+YAy2pZHC8j+Vd0tbeif/EN
+VsWbYNqCHM8Hto2yKS9EvX7Kj1lScJC5IEcCFj6M9+tCHCmelFzgauwvdfdW
+PfxoyNziPg33Iy/XqBX+PJRhuRbOYGiLTcDhS4cXVsvj/p2zHTEn71/njjZJ
+OfTnn86BbPgH0539BrKIPyuokkB+ns67V55Yhedrw7zJefjsn1Wl8zK4PwpT
+TnKo76qbl89tmJdfdCeHeNChpwCmFpXXKaI/GzyTVRthgYlrCzl/LvEWM6QR
+j/8kLHIYTjxw/FQ07OfjZ7yWvAcnD7vMwhUFcwdsyfflsKRLIvJh5Ob02JPn
+3uOREQ35CusYTCN4IH9nwSVYoGP413vEY9zJMpyGGUXfhOfCZnmOZyxRr4At
+EWhA9tvyYrOrPKlPz+lX5JtWF7fVDKbXb+GqwWb5SyIjWM8/WpZK6uXd3d7t
+A7OHvQLm0Z+YmBcPCpBPxh+93tGweZT5rRrkK5AXaovACTpX+q+hXnbuF2d+
+Rb89jZ79GCON+bY56SA47V7GuIUU7v8Tw0UWLJKw3DYuiXxqP73cBp/oib9Y
+LIHnUdBc7k2es9fJnsfEMa/i/TN5rj4aaPh7i8HndnmMw8mLgUGhorheq5bu
+gf17g6V1r4rAsRNKXXDy1K5pBZgl6n/CE/V81NucUr0C9XHUpQTkfLUdrc2E
+OR+ajwegfqfA4Mv5sPCjdWE/LJdve64fzlg4+YUN+uf3ue27zYgntBhNPA+n
+cNobK2HBnYLM30m/t53u3Yp8eCNFOa1w537v/Icw33RTDJk/5r/z/h7kz1vp
+05NM7leXgVsDzLD9Z5ycdyYOSXE01Muwyknswv5vLtRpWImT8zDhnie8b4+W
+mhlMTzjaSs6tW+qFrz+T9T/ZXiTnTVmUaXkS7C7ylX856i95rh79HPuzlpwz
+DWANt+ElSZjeT5ci7y33q4ASceRPo++ecYCbUptWvaDQj/yxyHm8hyXXyvV3
+LTMpzpd+Nu2wSWJAc/XfTIpt/SDnLmzfE5tisMCkKujaqzpgc8eqlWWzTIrn
+kpa8AKdkf74QPMOkWJ22TjsRv3R5vsd/CusNjDTIOWKe3ipf9QlefSSBjvyE
+jzJfhAqZFCX3TrYIpj9cmyU/QeYbi8m5HFNrcET/I+J57Jsqh53Skvpk4Az3
+3hpj8r3Gdo2tgGlhX9l8T9w3P/sZ67lB734i33s5Pp2sYcTP2JKla4h+p1W3
+Db7F/vTbZ+J2wFqatFOiyI/2/sgkE/42jxukOs2k3I+NR2nBVYqlzjKoJ8PY
+6McBEl/u+7QHsEDb7qc4OPH+Wf+tn5mU0OxrTWnYZUvY2H6YF5vzKgn5KjVY
+i0gSRxoXz6K+B8UO3XuwXnj2fU4I3B99Zb0x9qN9SpEZQH/UlmfZBZPwphlD
+L9iGsSG8Hvm7208dHSPnJjN2v+oH9J/WEZwNO7379pDDKJPiX2wO9oRjWsdG
+N75kUgxFB3sbWHBUul9uCP08+9tWFsze5MBb+BPzxb19gTAngZ0j0Yh4biZ/
+X1X8//8dHO49ikb+UGL9D/eEi/g=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.1542307644825485, 4.562492355174517}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000006366`, 16.999999999996362`}, {
+          13.500000000003638`, 15.5}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.457682641291616, 16.911908554403006}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwd1Qk41GkcB/B/OtZapMORnJNKyA5JKukvcuTI5ljs7CRyjiuxqwhZocmu
+u0PZDjxNjqKLzfF4HCVUZlLKljMhV5GMY9nv6/8888zzmXnn/f1+33nnP6ru
+QYc8RSiKOo4HeV68Ypg0JVzAJU1T8jcldaPgYBFZpzwZmrrtn+oXB19b4hdn
+KUtTB1Q7itPglJCDVn1w4L6hizz4DSe095gcTZUtY1nWw4m+s+xBWNiVn9AP
+h/OD583W0VSuat1TCR2sfyIITYD9ptZY68PFCe9kbsEf3jZpHIY/L4yOF8CS
+M18j4+EWVbolFR7obArKJ+9v/VWaDVuz3rs9hX3sAy9Iw9/GAye7YZ7xlEMV
+6teV926dIOtXfVM+DLPNREPn4IuCHw0X0P+3FSdy/iP17zCm8uDHugU/TJH9
+5oP2usI90yc5g3CM4wVjBtxxL+rjK9h5V/LKpXDG7dKvlbBQXMuZgj8NnbXJ
+gd1yPXQV4KiKzS8S4OolbgtO8DDF9wggDpPwvAOfl/f86EhcFHKEgf5o/5bv
+TOBwXlVYASyiIdAn+cR45H00xXzD1WHnmKT+SIjkAByzxatUl9RPMqr4Ux55
+zs7OGsINjKEs7fU0FTqesekgHMzRyaqFc719033I/B8E9mYKNGW6vlQ/kdSL
+PuBdArP5lQWFJG+jN48pRZqybXpo0Uryyz//RQc+1MjTJ3mpL3eRNYXjqNpz
+G3Xx+bmDagbwsGG9lxXMc3t+T4qsvzf8fQBcbTH8iY/9r7T0TiTCFmaqe07D
+ws12k9lwMaWhtBHOkGg0LiDrHS/l1aFfcU2riGLiDuMt3rBtenBpEdlffXPr
+GrhZc39UDkz1vd7Lx/z5FXk1abC6Sb90Hrw2qqA1Ela51FOVDosEddp6kHpb
+1DdcgwXeJgvmcOKIxekmeDThxDMtMo+yHksa+xtNR1xdA7dM6sZGwO5lHKN5
+zK9ia6c1A/82Nms4SvJp5Oglof+46IGuD3AXZ4KtifnZrx5J9cJy8hvvt8AV
+MT1m5DzR5e29oUr4ngrbueS8CR9Z3ZZSpin/l1XBEqhHb++3yoYPPXBQ1oBF
+5XZ7i6nQlK5Qj2UNt6aI7d4Jty49mh0CJy27ftIFZlWylS+TeU7I2vnBotPs
++VqSF8OlhgOLhQX8NARf6a+6z4bfnarcv3IbvMeh3RQuPNpooA07mEdmq8Cf
+e6tfmMHUg1szg+hn3KNPzBku+5xcz4VjM7vtj8B20V6dGrCrQCveHVb/qyaT
+j/m8xGW//AK7zUS0nYFZii72trAPy5NvAxuN+Lbsgi9KdmVqEy/V6WIQq+xp
+1VQidRd2isIpM9M55jCv+b/yYfQvF9HkFQv7HfG1E8DOrmq17fCnbnXBI5hZ
+cqbUBv3sYhqM34R9ZOLrX8Mz6QGL+Qj3rl1ngPnc2r4cy4TjQicLzpK8JlMv
+XyB5Os3GvoNdTZveXyd5jidPaKnifjCmsuI+qWcUHvY7LHAcC34GN7wNfFUG
+Sz3PWD0Ch3Ln3UfhruP+8avQv1q3mKwMA6/L1jF2wkzHjmJtOEv+jhTJy19B
+sWEHPFDo5sWFDXwuC3SIq9L3FcPFybWKSjAlFd7Phxs0hsrnsX9u7Y2XI3Dr
+jhyv1zA3OrtNRA+/C5uin3mwwvnOTVJwypN6+XC4+biRhzSx8VtXSzj+H50b
+q2GL5aeKlGGVqqscUXgtN+vwPOZvv2Vydwr7J5VomQ3AzL51j7tJv2N3Mzth
+J/FM4wY42O/vmj6Yu483XkjO08NI/1m4ImSsOnUbuZ+IOapgfyHHOy0cNrUo
+9LAn/cUZMj3gCg3VB2mwvt32rfawXnH8w39hSTn1F5Ywz1bvgCbJj1k1Zw5b
+K7h+PQXHP+UyyXmy7u0Tb4GTfLRDWLB4e++E4gaamvtj0DGEnOdM//1H4Ujf
+XJFkOLdrh9g1ePWItFEJ3LxEoec5/CbTNaoNluuX3TQGL/5JIo/FS43+H88X
+pNI=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.631304063066693, 8.096807950948126}, \
+{1, -1}], LineBox[CompressedData["
+1:eJwd1AlQU1cUBuBbFwiEfROF1kCC2FEEZUeWJ0SlaAXLIiBbUaDDCMYFiIA0
+rImIEqhSZNMqiwvSFIGiUxVbEZFKAdEShyrYmKJQRQsMQ0vof81M5s037957
+/nPeSyxi938Rt4gQsgtfeiWqhYWFr+0Y8uFjwhCjgf3+l2A9j7ibunBhb825
+AdhU+Y+jypghHSuttObgkaM6rB54gNd+7+P1DLl/gHSmwa83dm50h1ltt+Tq
+8NrsUV4QPMKsiBAZMSSqqrlqL3VVyO2/DBmipXRemwRfnMw9vBnmtzT1Uwuf
+W2d+Z8CQHTVXSAI9n1vxdjG892BCZRhMnKckh/UZ0nL8wsstcPlvYrs5PYYM
+7hg7YAeHxh8tq4CHfR00TWHZZvGzMDjvdcrpBdpv8rFYNzjTJezfMVia/HOx
+O1wTyWY9gceGhCNRdH9S2c778OrHhe+r4TJFNOcOLJKXXJ+CX7ywiqAW8lu6
+I5BHdfZUVjfsq9ff1gsXtboVyem8uHk53sivbOUbvYNdvqwzkMES+yXOusgn
+2BZ/SRf9V/SPNm+g/RxYHhoOr1POzdB+WZ7zcYWwhLvLLRcO0DCuq4RTC6LK
+GmEXSyvZcVgYp84dpP2WuerQ/aldKwxn6TwdLrqy4ION470mG7C+warwDK3/
+cIptC4uW2S82hKV81XMv2NfzrkYG8rsPN/X6wuekSUvl6Nfg0u2+z+DymjPv
+Hag5CUE+sN4j/pCNLkNm6qednOA+/eB4bR2GbGla1M6FZcIQoYk28ijG4rXh
+joibxUFaDOHtq2VPI99kx5xZH5shTiGJRcPUBenzJ+DQxdn9nXDfN9EexXD5
+T3MXm2HRoTUqul4ZNn2llvYrcqjfjvNaLMdXVdP7MymbZmHLkkNqH/y3vnEX
+6ue8knbT9ZNe87svI195anB6CyzljVuUIr9T4udXe+DVtcplzuhP4N0mfkXn
+e8ss61t4idL6Vy3kb8/5w/dPeMx1asIeJvmTTUaYV6OHDTeSzqMyNtkaHv7+
+P0kBPCtvYi+HOfJ7jk1wzLOTM2PYv84/LXyAnicLKS2H458FRryj8zWNtlgD
+t4m7JjTsGWI3Ff3pNuSr33PX3AxmagX55shfcLUqkQdLbRoM5Og3Iim/24qa
+/8kdKeYjiQo8vxIW2LO6AzXxHvonPDSAOxQbb6zXYMiNfbwCAstqxKddWPh9
+dVwOfY36Uhl3/pA6Q1b5vNSk+QTirZIJNYZkvfHKuU6fb/BTnwbYr/14w3na
+/0dVCXXwE7Mf/IphztIVfAWsEA2qZ8MBXhmJkTjvyaZ02yMwk/GYrY56D0rZ
+14T0ftqxwkFq2bCJCLaz9XD8Efma/XIT6Xl9uy9wziL/SdmbrfV0vzLFMBP9
+zcT6y3+h9W3mUj3Rf8VA6kslfb/CLTyH4BcBs6Pa6E80MdLqgedvOqrScIYD
+fGQb4un72J4vjIFjEs1LtsMPhpP5Erreez77LfYrv/q9qhHm5I5U74TzXJcq
+euj6lYWeR1D/6Z6oLgVdX9nJESBf3zW1wBk631OqR97IT/9fF+BJelVn/gcL
+PvkH
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.547014064132036, 3.0238996897848462}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwt1gk0lGsYB/CPI0m2iLGUOxhTjGXaFBVfK1Ky3lRTJhlUipSkVF/lilvu
+SEmWsaVFRzVdUcnIpUVaTFe3yJK4ipLRIpUb9/92mnOcOb/zfO/y/J8xZ8yC
+InxEyhRFHcQfeWdG8NrHp6kfLwO6at5MP/d1MPuavLlIn6bFIt9ZLnCe4EZA
+mD5NdUts7xmTeqtBhDOc4BrEeWOP9cuGde30aYZ9PiMiB263uW06C/Wl497d
+9IOFB8XuApj7lfLQhumj0dYZcHtwA0tuh/cdOm69WF/1e2D3SViHe2uajwHN
+rHSdzd0Ey7dnXLpjQFNTHVQaXGFhhmrrQhbNWFu47bGHmc78qLssmvqmCHIy
+h/N8tnx2M6SpowvSTv8CV6m5fKsxpBmj4jX/cuFIafqKaUY0Y9jZeckB5pdF
+h6XCr0dprV9GzgtKcWo1oqkxCws1NsD06OZyHWOa6f5QHn+InH9/wzNrY5qK
+p2Liz8DSiwtOEGf3c2/WkOd9uWw8T+0fyRpqgamBW5Ut2N/frdimn+zflvaI
+nOehKT80BKdU1hXOgNeovTz5neSRmbrxHu4/arK5zwDpx9lJ4QMnKtpYHeS8
+LM62Z+h3paX5XXJef17nZgH8crfj1UyyXq7wfo28kswGSkPJ827pXnvgLw4P
+hnkkj9PlbAvk+2q/q22PLfYPq69rQf7t71x5+TAdLoq7gPl8dOw1+ZXUZxqL
+0lE3yhteoA4LP8blZKHul9nXf9MG+bHe/VIOK2ltCoyFq4q/Vr7H87nLSgtm
+we2j586hcb4sVJY8woNVJgkKcP6SzSq59XDklEL18ZhnebF5fxGss8kwMQX9
+zEk8ayUm9XMVEl3MLzCmcfc+YifTZ8eRh6QrJ3sX2c93UeU45NcYfKOO1Omk
+t6x4eO5h46fJsDzUeuJruGqhwuYULPTiSh0wn/wupXcymJq4NSkC9laL/tJM
+9o/mC8TwOjcTzSG4an+s4ji8tEbQaoh+2JI6HgOb8jKtpsFUitYEH1izbaDR
+FZZyTTs0yOdFL0rHn7jSObcEnyeX/SLXlXDkjTzvJbjPDk1RgC9Zr73q3D/o
+75Zpd/J84r6/6lfBBp9MznPJ+oaQWS+Qj9YucQ/Jj5+ttzoM9qzLoEh+jFJs
+3BDyTMhJ10sj/XSO3yaBa/v8zvuSPDmNW8n/U4+7ba4GyafsWdNEWNSarV5t
+jfxqRusrw4uPWNjsgPku2bvxfUDlc2O9eaReOH2REeoT9nJknVY4L3NHggec
+1ZOcnA+zn06ZnQaXxuSdDiEOlAg+wq7yofTpsPzyNeUgzFOyNjtNA/YSCcUt
+cOeY60LFZOQ76PRyDfqNtwtd2AqnvPU40o75nq0RjnsKs+1k+oHIq69Dm90E
+e2314D+BL9+qXdEF68y78dkJeR+c1OH0lTy/8W8zzI9RYbiDujhP+vjAzIeY
+j8uh7lg+ud+A8+UPcFdNa8Jy0o/sMWsYVqJr5JutSH4JegqsP/tfhW4SLGx7
+H3EHtq0IsMqF2+9a6SXAR8vZ1hdJP5eed/PhoCvlO6+QflX1qutwv+DE841S
+sr7RnheA+UuKP+0qgOnNVx3b0F/Z8JjRP/bX8PALgrf5ZeYEk/uWGA32IJ+d
+7hYtM0h9bXDMLjj18ZIH39Ef/fBirSHmz4vz7JBNJt+flovvIe/EItXuGFIf
+TD0ghme02r6xJXWNQfYW+FjhbbOOSdhPNepqCOZ7PTG1+QRM/XFbFgs7F8nW
+esL9vbzEM3DphCsN6jBdUun5Fus1D6+0ecRFXctk3iKc3/DwuFYmXKW66bQU
+rvW2qI6AI3X3KFlhniWlu829iHM4S4vg+VNWp80m669Vc2yQj36ZSHUqzPZK
+1SpGPs6X1LqJdcZaX7Ag+TudcJwL0yknR5Lh8Mn+qcvJ+uPi9FeYV0Hc2Clh
+cN6ZuXVWJjQV3rdC+zdi34pGPxOa8VMb9eUULJzprxWC+t3XgbnVpL7Rq0EA
+px9IqGgj51nuKXHE83trT5h/JvVjNgH4PDDsZUWNquhfav8y+gLOU4SK7bVh
+JiDu4hLU3y4QPdEkeV2fuuE5ub8d74USzL9JFaxDf0tZt1veYD+pRtmfXZiv
+2cP3DbWkH9kAKxx5KDUpL8qGU56UTv+G+WpUrOCEwHL1JoM0uEa5qX4SsXaU
+yzx4xqtXIx2WuK8pa6sy8u6NWnclA2bebEhoxnzqBVmmnnDKIYnPI9jlvnWS
+MszP8k9GnVLTPeV8nYP7qsvqsJ4aWe8ZuR1mwnnMfPhJ+vBEB7i911L/JOvn
+7wLOz3dD+n9/iwB3
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.131120426728657, 4.809365547472548}, \
+{0, 1}], LineBox[CompressedData["
+1:eJw9lAtME1kUhmd1SwrrIj7WFGbG2pkRFFBBtKJGORCRGkQRkLfsUsWIBNsV
+TDCk2KrxibsVQUVAwkvLM1QREBHQrLBrguIKigSxChrLIjbGDeALb6M5k0xO
+vtyZe+855/+PTKkKSZhCUVQAea3x2yPAnJ+skQcqWDkjfokA7bGD27h/OKC0
+F1npVgGenC4UmU4QFre6FqoEmLj/wtM2gHBka3mbRgAVVTJUMSkDSr/ppjlD
+gEgbi368nrAp/87PKQIkdRTJlqkIW/rM1dEC1N0MUOa4El6gz30oJ+d/SXnk
++d88oNoqfUW2AniYumxeXSGs3V67/CEPDQOJq30PEe563l9zjofzJjtt6jbC
+v32YGI/kIVJcUOnvR3jXvsEWRx6K1maP2SwlfEwx09jPQcvr+oNn3Anr7cN2
+lXLwZfezoWBPwuM5hzekcOBc53F7uY91PVSTFMjB+gcPfukJI0wlhmsXc1BV
+KLqerCbceMdym+UgwilN8/lPwqa1WWZHDkKqu+wijIQVgfPn8hy4aatPr/yX
+sOWa+pM3B+WN/iGJFsLiyuiz0RwMzvpxpMOW5D9+S5xxhIO+qS3JSQzhtIE9
+PU3k+x/K3a46E1aUlCj/56B2e1RalAthB2ANXjzUMd0HdCxhSfe9yb08PGuv
+qW4TE270m2yo5SE9qWwFb7bmryv0GObh8t7eC26thL1HTGOMAJ35Lx06T1rr
+va57aL0AqXKTd3wwYbXy7eKdAhR06nbk2lvzU+zX7RfgsWJGaK9eSniKrZ1W
+gBxvq16kuO7VN1rlopqL/3cd/STvfMHi/rJ6nz/W/Mri+WrzsoGE1wzer3nN
+5rsGHYP3n73xmv76IgbzC8wpLs0YpTH/YnME9fkvGutjiAmaHmSksX6PkmsM
+uVdorG84fVhY2EFj/f0+jrmoR2jsT4MxNWaRlMH+XeXK+jNjGOzvzr/jhrcU
+MNj/2NHpIpGJQX0YB9+fEqQs6idDG9u9NZxFfbU0XUzP1rGoP/c8X3lcAYv6
+zNyS9aH3Eov67Sh77PAuj0V9R81sN6Sms6j/vvjhyTn+LPojL8H9uGaCQf+U
+K+PeeV1g0F9PnSWh+QsZ9F/RZfXqngoa/emV3dx8Tkajf9N3zBuwz3JCf7ty
+TfIKygn9Lzm0Kv/N7444H9KCbr33GZbg/NAkrlx3I5nw9/nydJo1SuAr7LO5
+Vw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.354800000000001, 7.75}, {1, 0}], 
+        LineBox[{{6.4999999999976925`, 15.5}, {13.49999999999251, 15.5}}], 
+        PolygonBox[{{10.6, 15.5}, {9.4, 15.1}, {9.4, 15.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 16.4452}, {0, -1}], 
+        LineBox[{{6.499999999996362, 15.500000000005457`}, {10., 
+         9.500000000003638}}], 
+        PolygonBox[{{7.947677384685548, 13.01826734053906}, {
+         8.206811054955079, 11.780184249251306`}, {8.897834175673825, 
+         12.183281069670574`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.515942703607428, 12.323799910437668}, \
+{1, 1}], LineBox[{{13.500000000007276`, 15.500000000005457`}, {
+         10.000000000003638`, 9.500000000001819}}], 
+        PolygonBox[{{11.447677384685548`, 11.98173265946094}, {
+         11.706811054955079`, 13.219815750748694`}, {12.397834175673825`, 
+         12.816718930329426`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.484057296392571, 12.323799910437668}, \
+{-1, 1}], 
+        {PointSize[0.04], PointBox[{6.5, 15.5}], PointBox[{10., 6.}], 
+         PointBox[{13.5, 15.5}], PointBox[{16.5, 5.5}], PointBox[{10., 9.5}]},
+         InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T19", " ", "P2", " ", "N38"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdiei/gigjfhfjhj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdiei/gigjfhfjhj.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {22, 44}, {0, 0}, {22, 22}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["g",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {21.75, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["g",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {26.25, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["\[RightArrow]",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {30.75, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["H",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {35.25, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["g",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {39.75, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["g",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {44.25, 69.96}, {0, 0}]},
+  AspectRatio->1.0999999999999999`,
+  ImageSize->{288, 288},
+  PlotRange->{{0, 66}, {0, 72.6}}]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215292793713`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"c482892d-792f-4e01-b976-eeed43c2c366"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdgeg/igfhfihi.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 1, " ", "afbg/chdgeg/igfhfihi.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821529296563*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"cbf5c2a7-3746-451c-8624-4dcc1ba0f98a"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "2", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdfef/ifghgihi.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 2, " ", "afbg/chdfef/ifghgihi.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215293061647`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"02a3bd31-6e06-4496-88e2-ef8766bb9783"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "3", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbf/cgdhef/ifghgihi.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 3, " ", "afbf/cgdhef/ifghgihi.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215293174543`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"292815c1-45f3-475a-af82-00590959c16e"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "4", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbf/cgdfeh/ifghgihi.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 4, " ", "afbf/cgdfeh/ifghgihi.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821529327404*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"b7fee54b-6209-40f6-9f9f-10e497c197b6"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "5", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbf/cgdheh/fihjgigjij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 5, " ", "afbf/cgdheh/fihjgigjij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821529335308*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"3209f1ad-6ea9-4357-8176-10429fe11391"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "6", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbf/cgdhei/fhhjgigjij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 6, " ", "afbf/cgdhei/fhhjgigjij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821529342211*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"ca352abb-fe11-410e-8322-2ce39234b094"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "7", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbf/cgdhei/fiijghgjhj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 7, " ", "afbf/cgdhei/fiijghgjhj.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215293490543`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"82a695c0-088f-4d5c-a5cb-a74ed23247f0"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "8", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdfeg/figjhihjij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 8, " ", "afbg/chdfeg/figjhihjij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215293558702`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"236565b3-b8de-4303-a786-5a1eba9e724c"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "9", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdfei/fggjhihjij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 9, " ", "afbg/chdfei/fggjhihjij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.77582152936271*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"bd1bea21-d72e-4cdb-9908-2050fcfe40c6"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "10", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdfei/fiijghgjhj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 10, " ", "afbg/chdfei/fiijghgjhj.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821529369566*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"68f1074d-bfb0-4efb-999b-0e7171b699b7"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "11", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdgef/figjhihjij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 11, " ", "afbg/chdgef/figjhihjij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821529376359*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"8a199273-bda5-4d42-8036-88f37eb9501a"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "12", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdgei/fgfjhihjij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 12, " ", "afbg/chdgei/fgfjhihjij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821529383153*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"358e2294-9ad6-4cba-a0e6-1abe99c3a81d"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "13", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdgei/giijfhfjhj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 13, " ", "afbg/chdgei/giijfhfjhj.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821529389979*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"b9e4bcd6-09db-4bc8-b80b-aa538dcb9b0a"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "14", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdief/fggjhihjij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 14, " ", "afbg/chdief/fggjhihjij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821529396763*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"eb0c65aa-ec7b-4af6-9ab9-7fa32a82700f"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "15", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdief/fiijghgjhj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 15, " ", "afbg/chdief/fiijghgjhj.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821529404859*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"cc147248-5fca-42ca-9d42-9a980b81cec1"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "16", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdieg/fgfjhihjij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 16, " ", "afbg/chdieg/fgfjhihjij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821529416059*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"ef08089c-f83c-4e58-8d38-e68e658256b1"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "17", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdieg/giijfhfjhj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 17, " ", "afbg/chdieg/giijfhfjhj.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215294269123`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"cf5dd067-e0f0-407d-b633-37054a8867c6"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "18", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdiei/fifjghgjhj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 18, " ", "afbg/chdiei/fifjghgjhj.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821529437599*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"cd06af1e-5509-4375-a93a-10e11a0dc383"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "19", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdiei/gigjfhfjhj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 19, " ", "afbg/chdiei/gigjfhfjhj.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821529449108*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"f70a5eee-b194-4c18-9fcc-167674d51a44"]
+}, Open  ]],
+
+Cell[BoxData["\.1c"], "Output",
+ CellChangeTimes->{3.769409682147449*^9, 3.7694098202822733`*^9, 
+  3.769411576455082*^9, 3.7694193356910152`*^9, 3.76941969430898*^9, 
+  3.774370761349127*^9, 3.774370837493993*^9, 3.775821532143385*^9},
+ CellLabel->"Out[20]=",ExpressionUUID->"d79637b0-08aa-4536-8506-f77a2a16d880"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["\<\"\"\>"], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821532171977*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"ffc82ff7-24b1-486f-8187-c620cc49f0a2"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"creating amplitudes at level(s) \"\>", "\[InvisibleSpace]", 
+   RowBox[{"{", "Particles", "}"}]}],
+  SequenceForm["creating amplitudes at level(s) ", {FeynArts`Particles}],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215321816807`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"3879e29b-3cbf-499a-acff-3e595c73e21f"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles amplitudes\"\>"}],
+  SequenceForm["> Top. ", 1, ": ", "2 Particles amplitudes"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215322501087`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"d14582c8-ff1f-4330-b15b-1b0b4c6b2338"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "2", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles amplitudes\"\>"}],
+  SequenceForm["> Top. ", 2, ": ", "2 Particles amplitudes"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821532262566*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"7a2e3214-e4b7-4bdb-aaac-88fe2f119c09"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "3", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles amplitudes\"\>"}],
+  SequenceForm["> Top. ", 3, ": ", "2 Particles amplitudes"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821532272553*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"14cee031-2ab7-4213-b8fe-7cd4db9f8e50"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "4", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles amplitudes\"\>"}],
+  SequenceForm["> Top. ", 4, ": ", "2 Particles amplitudes"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821532329216*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"a6c38bb8-17f6-49ee-995f-2490e32591c4"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "5", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles amplitudes\"\>"}],
+  SequenceForm["> Top. ", 5, ": ", "2 Particles amplitudes"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821532340156*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"c9a29be3-1aa2-4ec5-a895-fc4d0bb48a02"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "6", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles amplitudes\"\>"}],
+  SequenceForm["> Top. ", 6, ": ", "2 Particles amplitudes"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821532351162*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"b45fecbe-c3a4-47cd-9b84-68df6f7a7d43"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "7", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles amplitudes\"\>"}],
+  SequenceForm["> Top. ", 7, ": ", "2 Particles amplitudes"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215323601027`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"9fb38ea0-c59c-4024-9276-0feec3269214"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "8", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles amplitudes\"\>"}],
+  SequenceForm["> Top. ", 8, ": ", "2 Particles amplitudes"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821532413371*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"c133bf4e-7342-4327-af7c-6ebd1c82cbb7"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "9", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles amplitudes\"\>"}],
+  SequenceForm["> Top. ", 9, ": ", "2 Particles amplitudes"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821532423524*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"42e40ad8-c10a-499a-8e9b-084087384d9e"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "10", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles amplitudes\"\>"}],
+  SequenceForm["> Top. ", 10, ": ", "2 Particles amplitudes"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.77582153247992*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"aa04af00-2f0d-4e9b-9a69-98d7d903733e"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "11", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles amplitudes\"\>"}],
+  SequenceForm["> Top. ", 11, ": ", "2 Particles amplitudes"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215325298223`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"53a06575-6e80-458a-8d62-e74f9e799a3f"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "12", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles amplitudes\"\>"}],
+  SequenceForm["> Top. ", 12, ": ", "2 Particles amplitudes"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215325843782`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"5e24b5ad-ca75-4b07-81a9-d95671dfdf70"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "13", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles amplitudes\"\>"}],
+  SequenceForm["> Top. ", 13, ": ", "2 Particles amplitudes"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821532648321*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"9fc90ed5-3cbe-4e65-ad36-e39efb75c512"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "14", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles amplitudes\"\>"}],
+  SequenceForm["> Top. ", 14, ": ", "2 Particles amplitudes"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821532662293*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"7f04687e-cb41-45fd-b3cf-75433702c44d"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "15", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles amplitudes\"\>"}],
+  SequenceForm["> Top. ", 15, ": ", "2 Particles amplitudes"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821532672018*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"43fee89e-d6b1-431c-9b0e-3d45e037713a"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "16", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles amplitudes\"\>"}],
+  SequenceForm["> Top. ", 16, ": ", "2 Particles amplitudes"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215326802397`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"6af18cf1-9e62-45cd-924d-71e32334ce4b"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "17", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles amplitudes\"\>"}],
+  SequenceForm["> Top. ", 17, ": ", "2 Particles amplitudes"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821532745768*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"6bcbb518-d9d0-48cd-b271-3652bf782e86"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "18", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles amplitudes\"\>"}],
+  SequenceForm["> Top. ", 18, ": ", "2 Particles amplitudes"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215327573023`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"06df76bd-e0a2-4f71-8bc0-605fffff985c"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "19", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles amplitudes\"\>"}],
+  SequenceForm["> Top. ", 19, ": ", "2 Particles amplitudes"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821532767949*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"1efec01c-2547-4c04-ae9e-3ed797ff56c7"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"in total: \"\>", 
+   "\[InvisibleSpace]", "\<\"38 Particles amplitudes\"\>"}],
+  SequenceForm["in total: ", "38 Particles amplitudes"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.775821532779902*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"d7db2bea-f18c-4745-a892-ad163359c203"],
+
+Cell[BoxData["\<\"\\npreparing FORM code in \
+/Users/josegabrielreyes/Documents/Higgs/Mathematica \
+Scripts/ggHgg/FinalSetUp/fc-amp-2.frm\"\>"], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215329689293`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"f7d40fa0-2e81-44cb-b977-19fca6fe9eb3"],
+
+Cell[BoxData["\<\"running FORM... \"\>"], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.7758215330312862`*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"32e1d87b-fe20-40c4-895a-065869fb386b"],
+
+Cell[BoxData["\<\"ok\\n\"\>"], "Print",
+ CellChangeTimes->{3.76940967302593*^9, 3.769409811772174*^9, 
+  3.769411568280257*^9, 3.769419326972622*^9, 3.769419686198049*^9, 
+  3.774370753098699*^9, 3.774370830374971*^9, 3.77582154164139*^9},
+ CellLabel->
+  "During evaluation of \
+In[15]:=",ExpressionUUID->"86e8c25e-d826-44d9-84d0-dec075063487"]
+}, Open  ]]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{
+ RowBox[{
+  RowBox[{"Clear", "[", 
+   RowBox[{
+   "box1", ",", "box2", ",", "box3", ",", "box4", ",", "dB1", ",", "dB2", ",",
+     "dB3", ",", "dB4"}], "]"}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{"Print", "[", "\"\<Boxes\>\"", "]"}], "\n", 
+ RowBox[{
+  RowBox[{"topsB", " ", "=", " ", 
+   RowBox[{"CreateTopologies", "[", 
+    RowBox[{"1", ",", 
+     RowBox[{"2", "\[Rule]", "3"}], ",", "BoxesOnly"}], "]"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"insB", " ", "=", " ", 
+   RowBox[{"InsertFields", "[", 
+    RowBox[{"topsB", ",", "process", ",", 
+     RowBox[{"InsertionLevel", "\[Rule]", 
+      RowBox[{"{", "Particles", "}"}]}], ",", 
+     RowBox[{"Restrictions", "\[Rule]", 
+      RowBox[{"{", "NoLightFHCoupling", "}"}]}]}], "]"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"Paint", "[", "insB", "]"}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"DoPaint", "[", 
+   RowBox[{"insB", ",", "\"\<box\>\""}], "]"}], ";", 
+  "\.1c"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"dB1", " ", "=", " ", 
+   RowBox[{"DiagramExtract", "[", 
+    RowBox[{"insB", ",", 
+     RowBox[{"{", 
+      RowBox[{
+      "1", ",", "2", ",", "3", ",", "4", ",", "5", ",", "6", ",", "7", ",", 
+       "8", ",", "9"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"dB2", " ", "=", " ", 
+   RowBox[{"DiagramExtract", "[", 
+    RowBox[{"insB", ",", 
+     RowBox[{"{", 
+      RowBox[{
+      "10", ",", "11", ",", "12", ",", "13", ",", "14", ",", "15", ",", "16", 
+       ",", "17", ",", "18"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"dB3", " ", "=", " ", 
+   RowBox[{"DiagramExtract", "[", 
+    RowBox[{"insB", ",", 
+     RowBox[{"{", 
+      RowBox[{
+      "19", ",", "20", ",", "21", ",", "22", ",", "23", ",", "24", ",", "25", 
+       ",", "26", ",", "27"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"dB4", " ", "=", " ", 
+   RowBox[{"DiagramExtract", "[", 
+    RowBox[{"insB", ",", 
+     RowBox[{"{", 
+      RowBox[{
+      "28", ",", "29", ",", "30", ",", "31", ",", "32", ",", "33", ",", "34", 
+       ",", "35", ",", "36"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"box", "=", 
+   RowBox[{"{", 
+    RowBox[{"box1", ",", "box2", ",", "box3", ",", "box4"}], "}"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"dB", "=", 
+   RowBox[{"{", 
+    RowBox[{"dB1", ",", "dB2", ",", "dB3", ",", "dB4"}], "}"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{"Do", "[", "\[IndentingNewLine]", 
+  RowBox[{
+   RowBox[{
+    RowBox[{
+     RowBox[{"box", "[", 
+      RowBox[{"[", "n", "]"}], "]"}], "=", " ", 
+     RowBox[{"CalcFeynAmp", "[", 
+      RowBox[{
+       RowBox[{"CreateFeynAmp", "[", 
+        RowBox[{"dB", "[", 
+         RowBox[{"[", "n", "]"}], "]"}], "]"}], ",", 
+       RowBox[{"SortDen", "\[Rule]", "True"}]}], "]"}]}], ";", 
+    "\[IndentingNewLine]", 
+    RowBox[{"Keep", "[", 
+     RowBox[{"box", "[", 
+      RowBox[{"[", "n", "]"}], "]"}], "]"}], ";", "\[IndentingNewLine]", 
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<Abbr_ggHgg_box_\>\"", "<>", 
+       RowBox[{"ToString", "[", "n", "]"}], "<>", 
+       "\"\<FeynAmp_9diags.m\>\""}], ",", 
+      RowBox[{"box", "[", 
+       RowBox[{"[", "n", "]"}], "]"}]}], "]"}], ";", "\[IndentingNewLine]", 
+    RowBox[{
+     RowBox[{"box", "[", 
+      RowBox[{"[", "n", "]"}], "]"}], "=", 
+     RowBox[{
+      RowBox[{
+       RowBox[{
+        RowBox[{"box", "[", 
+         RowBox[{"[", "n", "]"}], "]"}], "//.", 
+        RowBox[{"Abbr", "[", "]"}]}], "//.", 
+       RowBox[{"Subexpr", "[", "]"}]}], "//.", 
+      RowBox[{"Abbr", "[", "]"}]}]}], ";", "\[IndentingNewLine]", 
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<ggHgg_box_\>\"", "<>", 
+       RowBox[{"ToString", "[", "n", "]"}], "<>", 
+       "\"\<_FeynAmp_9diags.m\>\""}], ",", 
+      RowBox[{"box", "[", 
+       RowBox[{"[", "n", "]"}], "]"}]}], "]"}], ";"}], "\[IndentingNewLine]", 
+   ",", 
+   RowBox[{"{", 
+    RowBox[{"n", ",", 
+     RowBox[{"Length", "[", "box", "]"}]}], "}"}]}], 
+  "]"}], "\[IndentingNewLine]"}], "Input",
+ CellChangeTimes->{{3.76940829547766*^9, 3.769408317037019*^9}, {
+   3.769408387805746*^9, 3.7694085001096697`*^9}, {3.769408546101728*^9, 
+   3.769408639433099*^9}, {3.769408855108705*^9, 3.769408915246937*^9}, {
+   3.769408979966034*^9, 3.769409234338009*^9}, {3.7694092668494873`*^9, 
+   3.76940929288006*^9}, {3.769409345328158*^9, 3.769409377005896*^9}, {
+   3.769409431575429*^9, 3.769409446282214*^9}, 3.7694094895308657`*^9, {
+   3.769409721883926*^9, 3.7694097778463583`*^9}, {3.7694099723583097`*^9, 
+   3.769409975431435*^9}, 3.769410121545998*^9, {3.769419371159957*^9, 
+   3.76941938284577*^9}, {3.769419700066349*^9, 3.7694197384987097`*^9}},
+ CellLabel->"In[23]:=",ExpressionUUID->"6db5e1ce-d298-4829-9b87-57793191d1ff"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["\<\"Boxes\"\>"], "Print",
+ CellChangeTimes->{3.769419767873272*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"d7665995-5b38-4120-864a-216b5be8a360"],
+
+Cell[BoxData["\<\"\"\>"], "Print",
+ CellChangeTimes->{3.7694197680450163`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"67c9fb12-783d-4c5a-86dc-486c8bf67ee8"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"Excluding \"\>", "\[InvisibleSpace]", "18", 
+   "\[InvisibleSpace]", "\<\" field point(s) (incl. charge-conjugate \
+ones)\"\>"}],
+  SequenceForm[
+  "Excluding ", 18, " field point(s) (incl. charge-conjugate ones)"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197680552063`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"7119e816-c5e9-4981-9e2d-f65be7c0e570"],
+
+Cell[BoxData["\<\"\"\>"], "Print",
+ CellChangeTimes->{3.769419768062174*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"1c682e20-40d1-4dec-9202-a3530a13ffaa"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"inserting at level(s) \"\>", "\[InvisibleSpace]", 
+   RowBox[{"{", "Particles", "}"}]}],
+  SequenceForm["inserting at level(s) ", {FeynArts`Particles}],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197680696697`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"357774aa-48ca-497b-a2b0-d9e0e0411f61"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 1, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197680789833`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"b3ed0818-0a18-48a5-bd83-961ac488432d"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "2", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 2, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768087954*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"a8cd2652-f78d-4dda-98a0-1a4f36fb6be7"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "3", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 3, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197680969563`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"0d57b7aa-3abc-4b65-9bbc-f278967af523"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "4", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 4, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197681054363`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"67624f7f-4342-4ae2-a7ca-011b41653683"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "5", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 5, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768113914*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"06403b8a-f28c-4d35-8662-5be9cd241ac1"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "6", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 6, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768122939*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"8d069dbc-972a-4606-b916-420e9649f4a1"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "7", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 7, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768130316*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"b7bdb7e3-2cab-4534-bcb4-2f6b75ffcc9e"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "8", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 8, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197681375723`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"9c046f14-91b4-4a0d-a90e-e2cbd55888a4"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "9", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 9, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768144348*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"dbc52e95-3dbd-48f5-8519-d6d2e9bb9c0e"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "10", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 10, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768151458*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"bb636163-f263-4c9c-87f0-711e80330b4b"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "11", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 11, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197681583147`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"a0686b78-ee49-4f11-baca-9b5848c0ad03"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "12", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 12, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197681652412`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"ba894d17-c186-4106-8d12-7666f4860452"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "13", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 13, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768172043*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"d83ab526-a801-47a1-9900-89a8118f30ff"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "14", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 14, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768179027*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"38549d4b-1beb-4050-aa0f-07f0fd654af3"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "15", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 15, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768185875*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"6ece42c0-706e-442e-92c2-737b95ae7a52"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "16", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 16, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768192442*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"2559847a-4207-4de3-942a-c10316ee3c14"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "17", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 17, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768197235*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"2ff8cda3-b3d4-4a45-a687-5020b59824e5"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "18", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 18, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768248375*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"28d8203b-6a33-49e5-8a4c-10be6dd4b472"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "19", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 19, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768253455*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"bc05dcd6-f8fa-4722-bd47-3a3c0d8d5b1b"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "20", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 20, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768258329*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"bf2e2165-1a49-445d-af8a-841f01b52c3f"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "21", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 21, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76941976826364*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"3ed27a96-2350-4395-98b5-4918682bc638"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "22", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 22, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197682691402`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"1a598280-c3c8-495d-be24-9d11966bc96f"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "23", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 23, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768274597*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"8a78dd65-5af2-4e1b-973a-6576f9de479c"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "24", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 24, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768279916*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"b4e28a3e-fb4f-40ed-bc81-1a254c57368a"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "25", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 25, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768285191*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"97aeba55-6dd0-46ea-886b-51055bf92eab"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "26", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 26, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768290215*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"eecaa652-f260-49fe-bf45-4ba9ba10398d"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "27", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 27, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768295643*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"ad542275-ffa7-47cf-8fc2-adc45c19d68c"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "28", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 28, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768301161*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"a5137e25-aa17-4ab8-a7cd-42f746873514"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "29", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 29, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768306416*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"160f3722-c0d4-40c5-88d0-0116fec82483"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "30", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 30, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197683114967`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"69acbb0d-07e1-4e21-9f3a-8a861cc7cb0a"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "31", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 31, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768316627*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"32062fb6-7d5a-4431-86ed-d4145f64b283"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "32", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 32, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768364999*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"4a5dd41b-30a2-4d33-b8ae-b714067bfad5"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "33", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 33, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768370344*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"7dcb4b17-950e-45da-93c6-f6461f82a320"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "34", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 34, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768375827*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"a44c2779-0733-40b0-9bf1-e4c603a6ea81"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "35", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 35, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768381678*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"6791ef6b-c94d-424f-824d-9cf43afcd817"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "36", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 36, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197683871803`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"bae5aeba-ba1c-4fae-8077-33f4aef558b2"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "37", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 37, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768392717*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"cd833297-8239-403c-8ad9-a1c5860aca35"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "38", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 38, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197683985243`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"98db6214-067b-4c9e-8017-6ac3ad09a81d"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "39", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 39, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76941976840521*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"3bdf4e83-bd51-4fed-ab7b-075118a2aa06"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "40", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 40, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768410801*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"fcf1a58b-4031-420a-8f1b-df4b6112e548"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "41", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 41, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197684164543`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"b34baa65-3299-4305-b15b-ebc9cc8f9554"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "42", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 42, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768422155*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"1f3e0b9e-8944-4952-9a41-b5d487a7b7b8"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "43", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 43, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197684280157`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"5df6cea2-df7e-4395-90dd-95dc73a4845e"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "44", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 44, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768433721*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"63756f13-8f17-4af9-adbd-295261c9312f"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "45", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 45, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768482436*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"635e32cf-a783-4e2e-a5d6-75d616e9d537"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "46", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 46, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768487527*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"5a19dbbf-8457-4a41-b7a2-4e44c1bdd2b8"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "47", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 47, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768492621*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"cd07cf2e-46ec-42f4-8eb9-47b3a1fe4603"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "48", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 48, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768497655*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"d2df5218-4f23-4c0e-8100-9147a518998c"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "49", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 49, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768503105*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"d5ce00ca-5692-41db-ba2e-60c0f5b93227"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "50", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 50, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768508177*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"478fa217-805d-41a6-8dcb-30e4e26bdfcb"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "51", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 51, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197685132103`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"4ecce0b5-2ed6-48e1-b377-c1fd9d735c92"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "52", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 52, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768518325*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"c16fa650-2b43-4dca-99e1-5337341c0d9f"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "53", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 53, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768523552*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"12de3db1-44f2-4303-b41c-26c8d0d1cbc2"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "54", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 54, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768528515*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"6a84b3ff-5868-4a11-879b-834cc9e7a917"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "55", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 55, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768533568*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"3fc90174-0d41-48bf-9c50-9e1da7082a38"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "56", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 56, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768538742*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"fc1d47fc-1dcd-4fe5-9ec2-c4508e93a889"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "57", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 57, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197685439568`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"48347fc7-5023-4097-90f4-faaec3020269"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "58", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 58, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768583765*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"e07e5d66-ab18-4047-97bf-4c6644046707"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "59", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 59, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768589476*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"619dc925-96f5-414f-9f86-527e4f08adca"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "60", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 60, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197685958776`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"de4bd8c1-3a36-47cb-901c-e9c922c31b87"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "61", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 61, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768648973*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"19beddf1-613e-4efe-b086-d97b97eda1be"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "62", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 62, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768699093*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"a3629449-4ecd-4110-ae35-3950d64c1003"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "63", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 63, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768751234*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"7ca4ccc9-a800-4a94-a2b6-5b119e12c156"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "64", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 64, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768784747*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"d444d9de-70e7-4691-b1db-d71bdfcef946"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "65", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 65, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768833028*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"94c93543-0587-4e98-9afa-ce44e151b889"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "66", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 66, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197688383303`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"e4532781-8059-42b6-bc04-ffa41119502a"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "67", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 67, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768883196*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"7beaf51f-4c24-4952-8c78-4b480c656c58"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "68", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 68, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768888548*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"4951bb34-c816-40f5-aeef-010adab576e3"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "69", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 69, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768933756*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"d8facc23-89df-4b2a-a74e-7dfa3d234eca"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "70", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 70, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419768982822*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"6fb26224-367e-4f3e-a991-6d85a6124d0f"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "71", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 71, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419769029752*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"a5135887-51ee-4b81-9af6-6a9acc78eea0"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "72", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 72, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419769088135*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"704cca61-2b8a-4142-a74b-9f65295cdcc9"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "73", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 73, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197691442633`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"d890d246-9fee-449f-bddf-019c3c250f78"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "74", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 74, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419769204152*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"332180fd-80ec-4766-ae62-e8bfa48b554d"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "75", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 75, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197692825947`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"983d895e-8b21-442f-940a-7a0add8cf449"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "76", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 76, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419769365759*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"8d879242-0fab-439a-b678-a1092c3b0400"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "77", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 77, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419769371777*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"9949c074-3b76-4c60-8188-ad3f724c1594"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "78", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 78, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197693778477`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"5056b01c-7bea-4d14-b393-9756e5b57c78"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "79", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 79, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419769466263*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"45872de8-cad7-423b-93b4-18588bc83a2b"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "80", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 80, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197695838137`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"2c82be28-dfd2-42e1-a633-b4f3e502ec05"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "81", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 81, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197695903053`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"02b1d7a6-3f16-44ad-ac81-351b908c41f9"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "82", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 82, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197696218033`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"9e0068b8-515c-4c16-ac68-0808e51885d9"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "83", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 83, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419769663519*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"d5d53c86-b600-417f-ad78-14d06668024b"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "84", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 84, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197697232437`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"895877a0-6836-438c-a01d-0423117f6574"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "85", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 85, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419769752304*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"0ebc1075-914a-477c-9d7f-fcbec7b2d39a"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "86", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 86, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197697811613`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"e042d911-9291-47cc-975a-238003128fb7"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "87", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 87, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419769817305*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"50944f14-3ee9-42da-979a-5172021b8cb7"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "88", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 88, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197698717737`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"1b507f01-fd8a-46bb-9780-f763478ec943"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "89", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 89, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419769929172*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"a5a35299-81d0-4fbb-b0a1-d8f542dc6070"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "90", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 90, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419769985559*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"28983f92-0aee-4863-a944-050b4adde8f6"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "91", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 91, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197699912367`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"0893dc70-aa9f-4a03-b651-7f21ded2c37a"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "92", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 92, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197699966993`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"074366cb-c61a-4889-a983-a179b0621ba9"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "93", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 93, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76941977000231*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"5a848af4-e0fb-42f5-8423-3472b969ed21"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "94", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 94, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419770007799*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"986ddbcb-d7c6-4df6-b4db-9b43f6cc21dd"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "95", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 95, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419770013418*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"3fa42382-223a-4bfb-8bc6-e279ad07fc8a"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "96", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 96, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419770019102*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"5f4b52f1-e247-476e-a54c-781493e8cb6f"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "97", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 97, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419770025353*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"9a91a84a-19eb-42a5-a7b0-9f37e72209c3"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "98", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 98, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419770031722*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"0c831a3a-d006-4b30-9ec8-281f948859fb"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "99", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 99, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419770037841*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"29f514fc-72cb-4d6d-a8fc-a490a60ee46e"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "100", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 100, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76941977004362*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"9dc03715-efa6-454f-ba2a-24cdeb417e0b"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "101", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 101, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419770049534*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"5b3d912c-484e-41ce-8511-796aeb1f52c4"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "102", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 102, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197700555763`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"68d56b4e-f5a2-412f-98e7-46068d844ac2"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "103", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 103, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419770061208*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"7641702a-ceea-47fa-b168-d111beb3cd8b"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "104", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 104, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419770066761*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"796af381-fa0e-480b-b3dc-da3e547ac0e7"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "105", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 105, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76941977007226*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"bfa7760a-852d-4046-b5da-a2ea841c2f56"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "106", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 106, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197700779247`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"8b33e52d-1f2f-4c3a-b046-b1b09abf4127"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "107", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 107, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197700837803`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"8ad33386-ec91-4e7b-bc54-9fb871896c31"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "108", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 108, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197700897408`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"5d266ec0-5529-4ea4-b8fe-49b14db1bd90"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "109", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 109, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419770095449*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"8775bc1b-23b9-4068-89f9-4c039a369567"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "110", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 110, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197701018963`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"7c69cb31-6e0c-4048-891e-f229a2b37c3e"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "111", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 111, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76941977010845*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"38d4bc27-71d6-477b-b8b1-85c15ee8e247"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "112", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 112, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197701152143`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"929dfbd2-c745-43c7-a269-531beb85c2f7"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "113", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 113, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419770121669*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"2a4b661c-93e4-41c5-b6ed-30fc494f59f3"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "114", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 114, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419770128109*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"a2d64867-0f1b-4d5f-969c-28aefa5581d0"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "115", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 115, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419770134653*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"07253675-1d8c-4c3c-aa33-e88ff8eaef19"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "116", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 116, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76941977014109*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"72db5043-c184-4464-88a0-11e92b63e50a"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "117", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 117, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197701474333`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"3a017fc0-8a53-4a29-9251-12ae21ebafbf"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "118", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 118, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419770153709*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"4845b75d-47ca-4bfa-8faa-c7fa8666bbbf"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "119", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 119, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197701600113`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"3fff6dc3-1cb7-423d-9c53-e5c4ef91f300"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "120", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 120, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197701662607`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"49fd2ce2-5024-40a2-9ec5-2363bbca7a13"],
+
+Cell[BoxData["\<\"\"\>"], "Print",
+ CellChangeTimes->{3.769419770172454*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"6404ceef-d342-45ea-9662-82ae93a425c2"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"Restoring \"\>", "\[InvisibleSpace]", "18", 
+   "\[InvisibleSpace]", "\<\" field point(s)\"\>"}],
+  SequenceForm["Restoring ", 18, " field point(s)"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419770178927*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"1bf236cc-5ac1-45ea-a75d-d7eccb1d0763"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"in total: \"\>", 
+   "\[InvisibleSpace]", "\<\"36 Particles insertions\"\>"}],
+  SequenceForm["in total: ", "36 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197701854343`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"51fb3dec-4b3e-4c81-9c24-85b57bd4ff1b"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbf/cgdhei/fjghgihjij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 1, " ", "afbf/cgdhei/fjghgihjij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76941977019176*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"d10fd181-1351-4d5d-a097-d55dcd4f9cd7"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "2", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbf/cgdhei/fjghgjhiij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 2, " ", "afbf/cgdhei/fjghgjhiij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419770198029*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"b8317f05-e1a0-4750-9f00-06c0b79e2292"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "3", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbf/cgdhei/fjgigjhihj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 3, " ", "afbf/cgdhei/fjgigjhihj.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419770204391*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"a78601d9-d1c0-442a-b234-c8c46bec6200"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "4", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdfei/fjghgihjij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 4, " ", "afbg/chdfei/fjghgihjij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419770210783*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"c8e35b33-ebd2-47e6-8c1c-d7758727728e"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "5", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdfei/fjghgjhiij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 5, " ", "afbg/chdfei/fjghgjhiij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197702170563`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"3d2be911-6f81-4f0c-896d-56183aed70d9"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "6", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdfei/fjgigjhihj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 6, " ", "afbg/chdfei/fjgigjhihj.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419770223379*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"39342352-8933-449d-ba88-dec7dd6882d5"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "7", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdgei/gjfhfihjij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 7, " ", "afbg/chdgei/gjfhfihjij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419770229751*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"3c27eb42-ad52-4225-be2d-66f31fa0e9ef"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "8", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdgei/gjfhfjhiij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 8, " ", "afbg/chdgei/gjfhfjhiij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197702361*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"36a27991-21e8-4661-b5ff-e47e384bc63c"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "9", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdgei/gjfifjhihj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 9, " ", "afbg/chdgei/gjfifjhihj.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419770242469*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"f40b6e5f-7daf-42c5-91df-70dfe1e4585c"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "10", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdief/fjghgihjij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 10, " ", "afbg/chdief/fjghgihjij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419770248949*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"dcb7564d-06ed-44d0-9e10-47793b600ad2"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "11", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdief/fjghgjhiij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 11, " ", "afbg/chdief/fjghgjhiij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419770255588*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"f7a25ea9-8723-4dce-ba66-04f741f73756"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "12", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdief/fjgigjhihj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 12, " ", "afbg/chdief/fjgigjhihj.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197702619553`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"0e01dd7d-dfd6-44a9-88fc-124eed1955cf"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "13", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdieg/gjfhfihjij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 13, " ", "afbg/chdieg/gjfhfihjij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76941977026838*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"d73394dc-51bb-407f-b290-6762e02597a3"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "14", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdieg/gjfhfjhiij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 14, " ", "afbg/chdieg/gjfhfjhiij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419770274775*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"2aa34850-4118-451e-9bbe-beffa4ca11d1"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "15", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdieg/gjfifjhihj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 15, " ", "afbg/chdieg/gjfifjhihj.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197702813053`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"dba7da10-584e-4a36-9120-5fe8fd695e9d"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "16", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdiei/ijfgfhgjhj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 16, " ", "afbg/chdiei/ijfgfhgjhj.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197702876883`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"87ac91e2-e101-43e7-a9a1-76c38598030e"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "17", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdiei/ijfgfjghhj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 17, " ", "afbg/chdiei/ijfgfjghhj.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197702939587`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"61aec5f2-7a78-4dc4-a944-4cb69ee78fde"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "18", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdiei/ijfhfjghgj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 18, " ", "afbg/chdiei/ijfhfjghgj.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419770300264*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"2b5675aa-44f7-492b-a6f2-e4e03aa81c82"],
+
+Cell[BoxData[
+ GraphicsBox[{InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwt1Qs01FkcB/DrtU3eCnmlSYxHapFoO/L/yyNKJSShktgUbW0R67XDVEaZ
+kJSNI6FY65GpRMRkh2NFrcfBSmuOPCY9tsN4JLK/356dc5w5H/fe3/39vuc6
+1gad9gyRJoREwg9+E9ESfJbRhIEwpAmJtYhq+wa+P94K0gGLXDpNyuVoslBc
+Lu8Ipl0o+UeyNPH1s2+PBjMv+Sl/kKFJepViSy2ed1riHQIHJN+IlTGC/ckJ
+PQrg4K7EWU8ws8Wn97M0TQYZaZIicODMOk0WrDNKB+Vn0Nr2tVfArnOMoe0s
+mrBzxG0GcF/+rrseXDCpOl0qAkczo+/+Dqbt7fNqoL/+FNvKSXCgyiwnF/oP
+5fDfrjSG/Z/lr8fDfAHs1jQWWPTjlo27GVD3tdI9M3THWOEi2CLn8jwTTI+c
+mk5aDr93v6mtAGZWqEZ3gwNCz255h/f5PPQXg4PlqjWFYFG97vIGsKGyd382
+9nssw8sbHGHAGgjHfvL3xVZA/fToExxHMLMzk3RDP/X1v2oycX/7bbfn0K+v
+2r0Lclhfvo1ZCPOIXfMdMQ9ywF8tFOd/4LZBAmZnW5WZYD43jEIInk+gGqak
+aDJ3Ruiqi06t5fQRmtyf5Z90wnomO1ueLVEkOPBYdgxY4PZL5OavFLkf2ThR
+h3nWlV/XWaRIqlKCSA7nr7NNjF2giFj7JXs/5vfl5bg/OO5j/IViXM/TzagB
+hw7s5czhetPeq8lwfq7EbJ2zCaw3/9ZUA/UjrM67XAaL+uyO6kI/C6tsbZtx
+vfTZ4hQ4NPpq+xSua/+k0A/99zhmc9VNYV2uTlAD7yPgtkI5C8wcsk9Khnm1
++GxnM7Bg1rLcBvIo83/BYoLJmkGvJ2D2EvfNcjz/TcEwA/IzLHCofov3ucYV
+6eL7VeQHNYFJcP2af2C/t+RnlZtgdu9qFw5YNaJYJwwcuONK5Cu4T7RpfMIB
+zNzEc/sK/Yyo8QX64PykUWoa+lVfZZkii/XGXTa3wzxCR+GjachDUBuXtBby
+Dh+20pFgXpSPpADycv/zSDfB+0wHfLbOU8QuWmSrh04PUpOdo8hIuHs35keG
+/+rSnqGI77Lk8Di0+56NGRKK1DuXaTbgPG/9z8RMUcQkp3oXA+dlZT0dmqRI
+DS9cxRddqX9JCH5oydcqxXxstHyMYD+9QnppHswuCpGbA3Orbp7YYQb7H293
+Mp+miF5mw7ZUMPugXHwZ3G/9SfhHC9qp7+th6M9amZ6QgAUR244aQ/+09m1j
+jfWwnmmlJP5CEVXZiDYWmP77Wi8H3oPsRb9RUzAxrkkbgvdQ0iHxWoP7+88n
+voF8PIIUKxlg5vEbB+0hP/bRWBsx1o/NmtsDDkhT4QvAzGvFDkyw+QqNXVlg
+QqZSguE81yE38ATu9zBfUIX66t29vjRaeH6HF+QdqKl2djXOFzKfZQ/9DuZ2
+ZsngecXI5olZyNMx1WIa8zqlufoczF9yS1NVgnmlGvRIID9RaMVOKaxXUR/P
++0QR77z332I9snRsiP+eIgv5kU6YH9tBGDEipghjXaFrAlppkjcwSpF8znM3
+7J9s/e7wozfQH9f2qTzm8cK8njtMEa1Jj0I/zCNDVcUfbJhoUFWGLto8Ywj7
+GScn4hfRLZqVnSMU6VFy5buZw/nEcmt6HOZ7EmVzFcz+/hzDeQLe0x29Q624
+ftI7tewDRdib3Bgz5vj3yh7Lg/7V5VpaNDbA/h+W2g7DfIM90mIW+nRYF74H
+u/S8i6ZgEpU+vg/y4KrKJOmD6YV3UZ7wHoosTeKW4XqOoHYcrHjHuHYM73s3
+UykLeQbv75NtxH7WC18XwHo/R+9KJq5HBOc3Qb3sGKWy4+hXqmZh8J4tcukO
+e9zvGaVfCv1cn+ww08N+T63svQb9trrySqVxvXXD3RjIW6y38ECCeWwtGU2B
++UOLZ5TR5LHVJx7k58RQey6F9aWamjmvKBIQNmahj6a4l+u7KCLUM2twRZ+p
+Fh9ogfrRVeZsdM3rLzkPIc9LGhea0IIjiSU8eM9Gc9ZKOK+FzL7irEZiwThn
+dwhN75FyvtVImLzm3ZXo/z///f/cSP8LkEup2w==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {0.7756859651455563, 12.307331579087336}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwdlQs0lGkYx193RdbEMDKuJVQTjksXl+9ru7iXQjnKLiLpgopNmzS5NONS
+LqGUGJuk1opSR1nNbItVjprcomwHuSUnQyPXap9nv3PmzPmd533/z//5zzMz
+RsGRu0JlCSEx8MJ3IvoOjxJNBvB9OU0MC2RTbZRpIklv8LyLrPjb9tXA6son
+HAKAe4vi9/TDecmKGZslwCKGkeFeYMvzzKSnxjQh+dHnrirSpDq2ag0XWDRd
+EVGmQJMS9qonLsC00JmXIQ+6h4cs9bG+83PiPjmaaCozmmWwPpF7Xk+WJn63
+vqhJjaB+oXp3H6FJPXvhPjLJHjM/+p0iZS4X7sji/XJ+n+9XikRNtqxiY/8V
+4x058xQZu0a3OGE97drPjnMUSfp1SXkYcpu9ccAsRWoS2WmXsJ/mIq/5GYpY
++r6WFwJzQ6htLKiPCUwfDaGenCb/D+BoK7M4JZiX8CNZFaDnpy6XoI/zZ+Rw
+lBYows4sTDbHehaxLQY/Te2yIyuRg87qBIFfqXxjIxPzHBztyYF5Aq1dlb+A
+fq/J+7oIGZrMCNgBTeivqH3SAubf9/ik3UXsv31jTjNwyRKXe67AgrzjT+0g
+r4Hw0TNfIQ/Dt/YO4cBSrnFVOXBvs1QcANw+4XXDH/OqOla2FFjMW1e3GJiO
+S9yXAnrcxGZXkSH4GH/R3wj9B4xvuMQDE2Lq0gb+egQxW5yBuV6bE46Df5vC
+MQs95BP/rlaB+f48WOEmg+ezP/SnQx4jNhzDEQPQl6ZuZEKesTxW0Cgw96rC
+ob+mKCIueJUrB+dFG1Nqyj9TxEGLcRz1RBVtcuMTkE9rpx+Net9Vf7kmoYjP
+poLAcOz3MGg2fpwiykuZ7rnI6nf06j9RxCPjh3vonwSX5itC3SPotN0I1k1T
+4tlw3yFY9a4yztvlHGUI+tEtUm8DZKOj5nGTFBlI8h80Rz7SMqktpciCXPTz
+lZhX2tPCLvBro1NkygTmPjaTKZ6miLwaPSpFvzfnErxhHxbG6581IjvX1bbB
+/GPZTxzTgem9V+dwH2KrLodjfqJnw7ffAB9cIf9tCvPx6jtlD/mZ7Q+x8kHu
+PvSjIbJut36lPvTXKslIhvMS26OX1ZHvV72KgH1mpflx4vRAT28lZwj6Z6qp
+dc+wgSOuf5oHf/zuK6VpwKTT5HYD+LeUiCLXA3OFt1UCIG+WQFgqA0xvTTzz
+DvKJqg+1GdGF8yEDq16OUSSQxz/8EZgrDSerR+Dz5AQvXYT3rZu7FQcoIlge
+cs4R9ftazbN74XzYi45EZFfGy8G38H0a3m7bidzDluV1UcRw5Lv+WvBL6vR6
+jF9TpEsnpCEJuXl8tAa4d3PikTZkJYMgzhvo943xjwbO6xSV5/YO+GGBJw3M
+TZCf7uuDPPbLpPkgj2p8ZQ/C/E7a/p54/rJuaxH4deFZMsyRd88qW8I8mRJ2
+/jDqF6mezob9uGIREZEKzN3g4+gM+xAYMpauCUw7Vh6LhX3g7/Tdlor5BA1E
+OENe/OoixQnMQ96SVQJc0zOvvAOY3tIUn4R160KZ35ch7zo8CPfFyxZEKsCi
+BwdSn4M+62N8x0kd6N/1YIMT5C0WNVpOsUCvRWeiGPzR46EdfGQFWSUr8C/u
+42fZAZPrtjsC3lPEa437c4K8zSRG2EMREnbJf0Qb+M7d2aFWmDeL5o0hr5c7
+4P43+DP2WKSC5720H57No8j6U94cGpllc+jlAyHplbQq8pCdtDZsbRAS/haP
+6m7k1tqs3mYhIeyySiv0e2BrbfILISlbfITDRx5afG5di5DEigeiOpFd3u22
+aBISbv5aay2Yl4i646qFQuJix5zahJzJvuh+Q0gyH+t6+CK3C+I9K+H3kmQZ
+eCKrZojWNcI+KIa2mf7Pamr2ME+URuRPg6gfk1A+B/tTRkvceMjGtWUfYB9m
+8tyK1ZHzlXRfwT6YSRhPktG/SdStMMir0vsRE/PgDpeUsmBfKxn6H1wxn36F
+CjHU+SVy4ze1gD/JNqX0Q35qnGlFYO5QbqM77HNvsE76CSbup0LFHtjHqOq4
+KxOawI0xj/LAX+WOvczzyB4z6X6Qt+itbYMNMj6COiLG/08N+j/4tL4C
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.2243140348544435, 7.307331579087334}, \
+{-1, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000003638`, 17.000000000003638`}, {
+          13.500000000003638`, 7.500000000001819}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.35680734900121, 15.595086868322632}, \
+{1, -1}], LineBox[CompressedData["
+1:eJwd1gs0lHkfB/BZEZtiziuZtz3Oukw1btEUDTv0SE1CkttOksbtbYo0q4li
+aELxbimtyKXsMHLt4lq2ze6krabtposSEpFmM+tS8o6S3u9/55w5v/M5/+f5
+3eZ5HOYRu/2jtWg02s/4kkib/oKPNUX752NH0aqstD5721A0s4ltJrNhs/Tt
+RwpgRRf9xy+2FE2wd4vpACwItzRQwyqfH7+zQtx3wkt9B5G6ySgVIkop+fTP
+iCfrtgWRmKMyO7MDsSdrXRu5rqB0bpk1onol7ybJ40nx3F8jb2w9+9pXqLuP
+sXyqGNZ+GVo8B9brSRBvglXCwpu6MF94OUYP7pE7On/E/XoxbYevY44W83mR
+A3BLbbzbIbh8hmt6g/RnV6PYCPvMX5pXCjtUlTxjwmrdweXJxJY5HTqwJqQ6
+LZD0v+PBofdWFI2+3dfAAZb1tVqOwGuWu3vRYU2ZLf8DbFt1Q/w/9CE6w3HV
+w/11yqyUN7BsOlG4CJ7uuDDaD/fV63zyggMfB/aR87Ho5ksJcHuK96sp2LP1
+gEkFzL2Y/8UE+ekfZoueknxvPra4w8pfxnR1cJ3tyhL9BDLvylYXe1J3RiJp
+hKuaW/P84YzPDlYa0v+7p+9jYVaHzwt37IvDfZIngbmLQmyOwe3rVzpJYbr5
+tqwumDYoN0mExbJGIXMp5jvrMS8cljb0hu6AW463SdxsyPyOdpVw+/N7m+kw
+/+8v77phvr3nN53o96pSf+lse4rmN3i+5hTZv+PFDiasdynadxPMzE+PWgkr
+OBPHdWHtwg29rvakf6dvW7FPRs7DBxxY2D3cKIalPXmeVrCqbWDEAc5I6rpP
+J/mLVnAnWLhO7Os7jvpZJTcuK+DTZeu07sG0xO3GBbDi057QCljWkJWdDE+f
+sPzrAEz1Cx7EwJrEaHYoOX+5dEoIiyfc5K4ww+JVfjx819wjdjFMt3SrzIRZ
+4dd2MmDpbdfKCli7Sm5kDHs+d5TfI/WHhiNMYbPYCZ+PMCfpSPsyWKR6ZWyN
+/oWGRt7+cNVuLZ8Q8nxxEzmpsN+mJE4WXOXVL2ki+2eFudXDMu6qzPdk382+
+mkfwk3HtSGfMX7D1bMAw3JMRdD+d7MNoslIDTwwUBrTDdU97bk/Bqi31bAMH
+5PvenUGe3zLFuVY2LGMmpXfAscGSU4EwY+NMdh3sK4iojYeVF87wpPDkY6Hh
+UZgKOcjlwUO9vxnI4PZ8yS5t+F3xr8suwFkzCfatmHf+1zYel0g9pzHjPXCU
+SbV/C0y/dvsJC9ZbMtbYBPu5l5n3L8HfkUGLT7Uw/3fTvBI47dp3kyXkfuPE
+7Eh4caVafgymfVNlxIbj04JZElhYyP9DH274naEQkv42F7aOL6ZoYcneDUFw
+379cfhqEfbbPWr2G5Kte70EsOjpL5ggLqDnUGKw95fbCGjY7uzlWF/lcbK73
+Msk8eWvtWLDD3JMBxNJo12Q/eI63+pwVOZ9nNJUCqzqc/03y8Y1vGVyAJ10N
+03hkn3dHZ/fCqyPMs7fCqqI4O33MP7aKJ9tPvNlkhE2er+vrVIWwaN7IuD+c
+H+ca0Up+ny0XnXfA0kmtN69IvaqEFWK4ge7F+XoZ9qGUPiTP58L1jQb2sKDc
+/WgU7DbflxUAj5V6xK+HuWXdwWJYOu+YhQXMk7GzT8Bm0YU3R9Gf7d82w9Uw
+K9lcpwlm9+Xcugq3LIgZFcFeEUWXb8OMcw//Ivu4oqjNbYdVnpU5vdifQY7R
+/oewMqmo6CScr/xNeZfk04z/sgGWTaotrsP8tx9T5sJHQxcImmFZqLbT40WY
+63JgZjksLHV4JofNjv/aRvorWLt26AAsCmL6p8J+z8T/EcIfGdopMSSf4PW9
+rbBEMJweQurv30sTwLK0wJ98SH3rT35xsK1HeP1qmNozkpUJz3lhetWV7OMG
+a7IaLhPcD3Ij8zaappJ+TrObXq0h+13V2PwV+i04fCZ9E5m3pnZ6GRzI/GF+
+FFzH21kcDrNpt+wksOjhtf5sMt+5ZKtCOIe7e20TvFo9x/oKzFnyJvURHOEY
+xuwl/Qbby4fgK9/Khmex8d4/LXEehUvuHHOzhh1eZvsMw2m8Sx0b4QJDjriL
+1C8c/2EPTI8K6r4Kd2my3+bCigZH11yYqt7tUge3WItfhMGPwuVHbsEaeul+
+c3hfdyf1HN6XluH4AvPGqUOmB2H+hq60k7DS2Kn8LdzuWaTjBQ/FhUUS95Xr
+JtDgVM2tSnI948+ug1eYeB8NM027YFbswPkkOGynQ+Udkl8r2dkDTvB4EHAF
+NrPT11kAc6sH/Cth5SmlZMISfa8YHyL963Fys17CsmKn7w8S7204+Azm6Dr0
+i0h/O/uX9sBaUVk1kbCK1nlTDfMGGE0h5Jy1YkoX+RcO//d+MOy5MeyzDTyy
+fMEJPnGqoiIYFtZ2+gtggU1MyiG4ZmxscRxMldO7muEMy5ruf+rrLdR+DU83
+nZ8ugjv7pX50zM/ZZdXZAufIDSlHWB1/4TCZnzZcX7wJ9lsr+jAD14XkZkfC
+lyp3v2Mux/s4Mdq8A+ZV6bp4w31N1S7kfMLa45AINkt4176ROJZfkAtrdp1W
+2MNpKyr8GuGWE8N9s+DOt7n192Ga/tzj99Afta9tdBBm6RSVHIOjnhgkfYAV
+4rdr1sMz5P87ko9ES+r/pF+h5A==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.31406512997668, 9.373369816204487}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwd2Hk8lGsbB/DHGkIOstNI2YozGjvViKiIic5YjmUQKZS0vpQtpcWWpFJq
+HJLTaiehKU4kSrK0nRqSSMugQqH3dx//zOf7ee77uq/rN888A+2g7e4hwhRF
+aQpRFHmlBL/wo8qk5Ai0mJTKbLhzuhqTonHitE3huuyq2EXqTErQJBW3Abbt
++WXQAFN9ngw2XCFx6QFbg0lx1HdvsYO9pLY+H4YF/JE/FeDMIH3FnZqo98XG
+sx2v1zZ9u/AZryVdT67swGuhRtsyb6zjHZ2XKQJ/dZtcWQKz9HbPSUGd4vhG
+yTE46lDQdYqcc8/yluYC1HdafWQ3+ih8bhrKgDlv1nd+QN/JExwlU5hl9p0X
+Amd36JRpw1G6dS4jmJOzQEgwS+qf3f4zHm7TcLJ4TM6f43VTD45Y5RSbQ65/
+YR54p8KkNESL5Uh/NJFlx2/DYX+fj1OHBV7WU1fgqNjp9f3oO2HO2u5yYvO1
+z0phzpYctW6YsqpUSYf5WwrrpFF/0+pFiTEkD3pAvSfMqvze9T+Yvmn7+jLY
+kkufS9ZzrAK/KaP/IcOVVjVkvfDAPwdhTqhdyiQs56WaJoAproexK/phalXI
+epP3SU2QUA13qB21rYEVvebOmGB+5oRRpCTyc/imv7kWpnl4pa+BW7L+2qNL
+w/sU/IoVDQ9NSxdHw4L/bXdJhumcxCN34IQ7V1UPwIdbHJ9IaWOeXptAX7h/
+vMfFHZbzP/ZmIayh1vD5JMwNb/ftxPkXhhqG22Ees+lsJLxxiXPjLMwKnjCZ
+RP9bk+KCFy9Ev+N1u/bAhT6faXZwVEOR+SfkoXv4cfMGmBa7IS8QlgpYdN4T
+5qx/8P4Z8tVf+IrtAQs4r8y84JYRYS1H4oE7rAFlJsVW9NxnApcs99ubqEzu
+x1ZbZVKveDedAd9Pyo+b0ia5Hl80rcSkcs9L7H0BM88vEXoNHzadF1lH5q1/
+FPocTiiUzcuH6cYK/Z/gjcXJtFQyj8E5gSrqrUoJ7T1AnOj925/wvf19Hvtg
+yj3vzXW46FnQg/3Ej2ssZNFv59SFX8fJeSeqg/fCWTY664qIb9i5DsCDv9qT
+H8IJyodvuWF+F4bH/J8kX/WXeyvgbcvqRxmYh76ytEAG+bXoFl7dBfM7Y7vY
+sINQQfxtWC7UwzUVlmUHh4nrYH4NN8OrMHtftKkHnHCRv7sUbpocz7sIy+W8
+cboAW/ubBA/DXJHA1h2wY8KMv/EirDcTWBrBcuVvL0bAzP22TzvRD/ur3oG/
+YH7Xw6YQeGCoovgR3OF7S/gD5nGsN1sugOXEx2ib4I2xjc3ii1G/r572HPm8
+2FjvIk98/Zq1K6x767STApwpYVzUgrzTMwovScElpeaB62FDF5m6KdTjpHr8
+4M9nUrUHwq36YVZdVEAKvLT2nMJ9WOAcVm4Pu+/KiL5M+j2ycKkKLH9a+OwR
+sv5m5Q8x+FmkXFs4zCs6vEIGDoq8ae1B+r36TcQIlorUGGTC1IZLrsHw/VpG
+qjmcOfPR+DqsWJifbUbqb87oE0d/sxGVQivJ/j7/yXA44lhMCKlHq1A51gu/
+GEp7GU3WP43e7IB5C8XG5uSRfgRaHuR+qbn/We0Jya8/xFoGea048vS5DObn
+3J4ID4Bj1Jdf20C8gNt6kTx/zrGu58KsJ7VTrXCXnglvEBbcS0l8DatlPC1i
+6KL/f7uHyeen1tpKLR4WaA48uAXzQ6Tf3of53u1tieR5F31yVEIPdXtcryyD
+XRwmd9rDtFELxcfoL/382PAu4gLnsz6wRC1ldp6441Ec+bwY98QV1sB0xeAs
+FizVrTbzABZ8pH1vQl6pjR6xHTDXYOGwDRwd9KGjDZZ79zS9VhH7b/lr8kg9
+9q7q1XCDflvfVbJ/QuFanwKeP/suC07AnBhnKgsuviPrQ/qhzHPDveGk8fg/
+/iD1F8pes4JDhwYNLEi9OdE7GXCEndh8DbhDpD3AET7zz3KGOJl3T/KvKLhr
+dUvYBPKgXxnnl8CucxzWj8Il6k+uCaMfntohtW8wZ5/DuiB40oZ9UQT7+S/1
+5j6E2TYN5ppwyaGc1xaYL9Rdr8mOnK9yOaUAbtHLqogi8zoI90ggH9HnzaJ/
+wwkHx/4NgvfvXOMyDLMUM4yuw+YqCW2/66Ofg43Tb2HenQsHY2BmxlK2KPLf
+ynBa1Qxz0uQspOGvPwwbFQyQxxnVSz+wfptsdqMfLDg1WPMY9vraqV4Ac59R
+ealwq+TRnj6Yz7VLZJDzZztXqxhi/bvfDzajX9Fj2+avhjOF2KkucMlvyt6b
+4RL3n3rNmDd3+kBOHMwdlnK3hWcld7Yeg+k/rOxKkd8RDbEtqYbk+7LCeAls
+GZjrlUzsc13zpjzm0DUb2knstPySHUx74XrXF5b71dIw+BvquvR3M0k/dkrn
+8uH00M3OC2GOX3f8LvjFroJgEZgWqnSTA6/btmbTIJk/p8w7FC7z2RrXDmfu
+tc1LhlklT6tqYfrStLRbcK6kZcdNsr4pZa0wzm/aSre8QfK5sEztTzjX/tFE
+FcmP0Zt7B64rDy9uhRN09g4ZYh7/EZPIYZipn9NzGhZvPDcqT+bv0tITQh5e
+/aKRjnAUS7wxEA71XHA1CWYuch6tIPfPia8q98l8RdNHv8NjWe+6ZZfASTo6
+Osg75+VYsw9ccueSmSUsobyj7DJMjzhtaQpv0jZzHYdZRztKleBZ5WVBNksx
+zwtFGz7qRZjGvzxA3H8qNgs+fOLu2xqY5zVfiU7uZ86cbx9gvvuW1Dr0z2xc
+/kHeCP2a5qjawjmOGXPpxNYqyeWYf9BnsdIqmNu27oMeLCs/tWItTNmrH7+A
+PHMms+mOMK3MN00DHjzBF7GG+RO0liI5fD8V25vqwnJqUel28KOh/AxpUk9q
+sVDfPHzeFV8t/IJ+aCNtDyLgrYf+1ukg/Z5+pGAI81xuPSuFmQUbQ9Tg9Bsa
+iTlkPnEnzeXwMSdR2wQyT7xSTAZMXekejYKjHHh/iuM8nyuZK7cSe4tpe8J1
+fweFRJJ6E6K/KmHRjzpWsXDm0XNuWujf9RVLMxvuOJkhfhwO6+FPV5P90apD
+38n9c17PZZDsr4+864s85OxqZLWMyP32nlsN69tL9fsZkef1zrkiyPMvxjbp
+QuIVU0ttiE+UZHwm+cjXC/nByaX5K2yM8X4LCfaEwuZKuV0psFyGaiIb1pWZ
+kemEuScC9Yzgz0klPOXf0V/GqoMjOC9oc+I4G+aeuVxxEqZn7B1Pg/nG31v1
+4fvey0Jvwwnc6YIb6N8/LsXrNVkfYXjPAO4Y/WfNd5gX1aN+EXkYSijnCNGx
+/2T+OwXYfV5ZtTCdfJ9FV5D8qexnozNYTxOvENGWZVL7FnhNfyLuGpiwl8Hv
+R5UGjF6YGbQl97g0fj8aZiWT8zl1fmGzc/E82FUhn0fO+xQvnQ9n6kstiIOp
+suale+BXRYlfOKTetYfr4+CBbabVTqT/Yf32atg3ZFOcKfEig3Et1A9SPypt
+QOYJH1a7ARdxVbp1ib+6ffFDP5+tXr43JvVMVtYuRr+P9He+syPX7W7e+wmH
+bsueDCDnt1ZWdmM+LYFZ1xHSn0D8+EbM79v8uIr0L7hR2UPul68iydETZH9i
+2Iwk8tsg9clWE/kIsrltLvBEq90+O5LXFqv2GHi6tTZgM8y0fhl2At6f39Cd
+BnP8BWIZsJXQjapyuIP5RWUnbKzLeNcLU5IrDFfAAYnr2VNkv31UxyjOn9x4
+WkPZBO/zgMbFTPiuq3M0HWZ6iM/VguOr8u46wLQ1B4/aYp7YIdmrHjB1tU9p
+KealP4iW9IP5MuNjisinripxnEPWjzXlCiG/Ev3+2gA4YaVn0LQUk9p+vHLI
+m7hIUmwe7N/SbsH677xY21WSTGqK0ZpqT/bPdwnKk2BSr813fDQljqmh6cI9
+wjejFhP3bDHjz8Hz2rLEVgnm5suubYeffzoTJUHstP3fj3BAma/mDMnnGc/d
+FvtzK6ytvpE8HaZFqmE/Z59ToyQfjsT/2Djf+etE1xhZzzl7TR79CYkmhf6X
+V+HToH7YbvOXODHU5x2WSruN+6fxWZIyyY+3NLTqJOadeSz/2Yjk8fTFLg7y
+UFr9NGUtmXf59efKyKuJfdB8C1nv1fSqRJb8/du8IJXMb81s0EG+vW/8HEvJ
+9SALn63w5X86s3tJvQ9y4QnwximT4RmSv8KN6mDY295RW2cZ+X6MWqIIm5o/
+13WEOapKvSdRX+3Tjp8hMG1h+ItB9JNrrdCYCDPPllsowKdkD7WfIdf3NWTR
+0P9KblPeFZir7/laGfO1jq77UkWuq5z6KYz53UoFNfUwT0fL7SPyc3NnGd0h
+9bb9y3qNvJX9/6q5TfZ3jKi9FWdSOquWTJcTJ22fFoFvG0Y0F8NUjMz8tWJM
+qvwiZ945YmvDmRpRfB9c0Bs4TvrfeD3OC3YeSQnZT/YfXBNoCIcVP6yKJP1w
+o1x+h20s94xxSD+pLrwQ2FLVW8uT7I8aXNwKN689QttAfE7wjY3z7gdeqnQj
+9Vpiv4qin1jND2EepH9XtfiH4uTv+TXpviTPJ4s+cDHPPvbrFeFkf5zJcAzm
+rU967xlP+r3wx6wr7peY5cv2k/x49+JHyP0iqyir8l9e3dra9fB+t8Obe8l+
+sfjFq5Hne9eiuJ9k/SxTUAB7hWzz0GagH8Ye8y74aJXMAyc4Ib2xoBOWvv/+
+diRMyQbM5sEb7r2VyYI55q6mFrDi1oSycnLd3HtDPs4zHDSofQIzUxb496E/
+vW9s3xEGeV6VGcyi/xny/xti8v8bCeb/ATaALY8=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.538487526462115, 3.720262579386344}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwl1Q00VFkAB/BHlomhYUeEagjJx6Yisy3rrSjfjTGWRCFKPiclaiUrIpVI
+MhV71J7aSWyIQmHalI9tmSjJKi9Jg8iuZte2yv5fO+fMeec37757///77sEw
+LJ4foUgQxB586SsxM4fPIvL/qyVJiLffs1PRIwlp6jtBBUx6NfhN4r7xXIfD
+Flh2IMu+FpZsCAhUh7l/8YuDYWaHi0arBUlwJk72j+mShKVHOu8YzEgRvAiF
+zYpa04LggP1v+9p0SGL2/BkXe5hnVNllChvczt9rASeLpILDC/FcWrayOSzW
+sWSOaGP85KCOHUymSclv4TeRPnIe3Jabk9LPxu+9rjaJMNfG2TwZttyW8biU
+Xl9zt+samPm3klAK1408X6kBtyyUhRLIrzusnzAfNhDHKVnBDFvfh8tginCl
++LBQl80PhG38bAbjYJH1ZzvE8EAYNzkVplwMrRjII/pntOcQHMnra0+ApVad
+I7thjkboXQo2m9uUJqD3c/aW0B39WC77vczo+Qqjd4hpX9nQNYl8Mu8mahoW
+X+W4lMES/5vGy7E/ut4Vx4Nh3VmzbgfY7Oj9GTW6/+adRrZwQD1lWG+O/los
+FhPOjsupjoRZa8sj7mI+a/fXq5fAZGhgdTCcfWJh78AK5Dy1zGSQzicJ9PwJ
+Tmtg+HjBeVRB8SG4stv42c/oG1Nmo7KTdm+QiRocctD3XTD9/Idp6a7PkVeh
+b2I7bM0cD+/WIonTXbqXk+jxq736PGDR70dVi+C8RqH1gCaeC4oPbabHhzSb
+Z8Plc2PCCVjc/mSGD7P91lQsRl6pb4/W13Aea1u0J0xVOxi5wZXRb7T30eaN
+KyfAGSfYIUVwpPoueQ0s3MpMrIDFKvwKJtYPv57LuQH3rU9vSYBZ49GT1+DS
+kD8VKdj46BbHc/T+UYs6PNHHfuqVTyJM6LPSq2BW5sjXTnDyEh9lFfSX9T0Z
+VYTNnFjMjXCyXsereuSfUtiaEgMz3I/wouDsMnbjHng4YeKSDkx8SBymz5Pg
+olbuPTO8P8/CR4ZwpFG/OAl2rVZy6MB6ARHMwFWwxLwi3R+efd0iki/Hekst
+T3YiLyde3nIfFk/F59jCkf9uzbwM56lmphegf8wR2bVCeEo/Q3mKRRJBzy47
+nIYpC/cGPhyp+43HBZinye7OXID9+eWqyS1Y0l/+Za4G3kfd4bBBWErNfN+u
+jnlNriqqIQ9FPRI7wnUq3JJ1MEcwHSJnIq/EMy8Kto492zkOU3VLbIvo/MUb
+kzgYL1F0YjfCLG27iBPwbR8vnacweaYyZQXWq5tZUCujnx9J+iiDa+JfaI/B
+pf6K1k3Il6c474sBevxvDJYX8gc4nXvQBHMPBDbdgOu6Y384Re9fctBNNvoH
+LXcw3gwTjkvtQuC6d/YlbDr/NbdP+0M1j4+0op/wIpdbBocfUxXso/fToi7/
+Aux5RengMjhtsjs7GQ5RFzJ7TPGeyZTXK2HRnaycbLhU7GTfgfUNTPPNN8Li
+1vJaD1iYqFCiCVuHFj/Yg/wDS+SyURPM5zw4uhb9pGWGmx7CPIusA2+xX6KX
+Q3ZtsET0/kG5Gq5F4Vad8BQjbPygKvoK7YdewJw0xxbhfJzPx2xnBcwvHRoN
+y2fg/LYFnV0BV85jrx9Vwd+/ar7YH6a857WnwgLuuldZcFooc0QAhzeZXroB
+T61JmIyCJe/T+RQ9XkPxx9uwNDGiVAH9Q6qGYp0w/17vnnod+rz0Wnf9ASez
+vKI4MFniP92IPBmFoQ56cOV4Y5SIzut2uEAJ5kRlzOxGH84dedkg5heWtsR8
+hb4tN32Ly2HeoH7qCOz8+Ll7LMxK9TuzA+ejctN+N2M6r2PzkSrYterX2kfo
+n5eioSehz9/LS2rpMFFz5btcuMZAb3olff/W8TgDeNjEgDlkjPvUdV4s5i+O
+Kmg4D7NqBsaykIe3tE2+Dc4r4i3Yh7zcjy8Xr4JJHwt1Z/Tp05U9ZdHj6X+S
+6PvpY0z+BxWKgGg=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.578757510903266, 13.026566380408571}, \
+{1, -1}], LineBox[{{13.5, 7.4999999999976925`}, {13.5, 14.49999999999251}}], 
+        PolygonBox[{{13.5, 10.4}, {13.9, 11.6}, {13.1, 11.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.5548, 11.}, {1, 0}], 
+        LineBox[{{13.500000000001851`, 7.5}, {6.500000000002592, 7.5}}], 
+        PolygonBox[{{9.4, 7.5}, {10.6, 7.9}, {10.6, 7.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 8.4452}, {0, -1}], 
+        LineBox[{{13.500000000001851`, 14.5}, {6.500000000002592, 14.5}}], 
+        PolygonBox[{{10.6, 14.5}, {9.4, 14.9}, {9.4, 14.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 15.4452}, {0, -1}], 
+        LineBox[{{6.5, 7.4999999999976925`}, {6.5, 14.49999999999251}}], 
+        PolygonBox[{{6.5, 11.6}, {6.9, 10.4}, {6.1, 10.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.55424990759769, 9.30053848023783}, \
+{1, 0}], 
+        {PointSize[0.04], PointBox[{3., 10.}], PointBox[{13.5, 7.5}], 
+         PointBox[{13.5, 14.5}], PointBox[{6.5, 7.5}], PointBox[{6.5, 14.5}]},
+         InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T1", " ", "P1", " ", "N1"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbf/cgdhei/fjghgihjij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbf/cgdhei/fjghgihjij.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {0, 44}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwt1Qs01FkcB/DrtU3eCnmlSYxHapFoO/L/yyNKJSShktgUbW0R67XDVEaZ
+kJSNI6FY65GpRMRkh2NFrcfBSmuOPCY9tsN4JLK/356dc5w5H/fe3/39vuc6
+1gad9gyRJoREwg9+E9ESfJbRhIEwpAmJtYhq+wa+P94K0gGLXDpNyuVoslBc
+Lu8Ipl0o+UeyNPH1s2+PBjMv+Sl/kKFJepViSy2ed1riHQIHJN+IlTGC/ckJ
+PQrg4K7EWU8ws8Wn97M0TQYZaZIicODMOk0WrDNKB+Vn0Nr2tVfArnOMoe0s
+mrBzxG0GcF/+rrseXDCpOl0qAkczo+/+Dqbt7fNqoL/+FNvKSXCgyiwnF/oP
+5fDfrjSG/Z/lr8fDfAHs1jQWWPTjlo27GVD3tdI9M3THWOEi2CLn8jwTTI+c
+mk5aDr93v6mtAGZWqEZ3gwNCz255h/f5PPQXg4PlqjWFYFG97vIGsKGyd382
+9nssw8sbHGHAGgjHfvL3xVZA/fToExxHMLMzk3RDP/X1v2oycX/7bbfn0K+v
+2r0Lclhfvo1ZCPOIXfMdMQ9ywF8tFOd/4LZBAmZnW5WZYD43jEIInk+gGqak
+aDJ3Ruiqi06t5fQRmtyf5Z90wnomO1ueLVEkOPBYdgxY4PZL5OavFLkf2ThR
+h3nWlV/XWaRIqlKCSA7nr7NNjF2giFj7JXs/5vfl5bg/OO5j/IViXM/TzagB
+hw7s5czhetPeq8lwfq7EbJ2zCaw3/9ZUA/UjrM67XAaL+uyO6kI/C6tsbZtx
+vfTZ4hQ4NPpq+xSua/+k0A/99zhmc9VNYV2uTlAD7yPgtkI5C8wcsk9Khnm1
++GxnM7Bg1rLcBvIo83/BYoLJmkGvJ2D2EvfNcjz/TcEwA/IzLHCofov3ucYV
+6eL7VeQHNYFJcP2af2C/t+RnlZtgdu9qFw5YNaJYJwwcuONK5Cu4T7RpfMIB
+zNzEc/sK/Yyo8QX64PykUWoa+lVfZZkii/XGXTa3wzxCR+GjachDUBuXtBby
+Dh+20pFgXpSPpADycv/zSDfB+0wHfLbOU8QuWmSrh04PUpOdo8hIuHs35keG
+/+rSnqGI77Lk8Di0+56NGRKK1DuXaTbgPG/9z8RMUcQkp3oXA+dlZT0dmqRI
+DS9cxRddqX9JCH5oydcqxXxstHyMYD+9QnppHswuCpGbA3Orbp7YYQb7H293
+Mp+miF5mw7ZUMPugXHwZ3G/9SfhHC9qp7+th6M9amZ6QgAUR244aQ/+09m1j
+jfWwnmmlJP5CEVXZiDYWmP77Wi8H3oPsRb9RUzAxrkkbgvdQ0iHxWoP7+88n
+voF8PIIUKxlg5vEbB+0hP/bRWBsx1o/NmtsDDkhT4QvAzGvFDkyw+QqNXVlg
+QqZSguE81yE38ATu9zBfUIX66t29vjRaeH6HF+QdqKl2djXOFzKfZQ/9DuZ2
+ZsngecXI5olZyNMx1WIa8zqlufoczF9yS1NVgnmlGvRIID9RaMVOKaxXUR/P
++0QR77z332I9snRsiP+eIgv5kU6YH9tBGDEipghjXaFrAlppkjcwSpF8znM3
+7J9s/e7wozfQH9f2qTzm8cK8njtMEa1Jj0I/zCNDVcUfbJhoUFWGLto8Ywj7
+GScn4hfRLZqVnSMU6VFy5buZw/nEcmt6HOZ7EmVzFcz+/hzDeQLe0x29Q624
+ftI7tewDRdib3Bgz5vj3yh7Lg/7V5VpaNDbA/h+W2g7DfIM90mIW+nRYF74H
+u/S8i6ZgEpU+vg/y4KrKJOmD6YV3UZ7wHoosTeKW4XqOoHYcrHjHuHYM73s3
+UykLeQbv75NtxH7WC18XwHo/R+9KJq5HBOc3Qb3sGKWy4+hXqmZh8J4tcukO
+e9zvGaVfCv1cn+ww08N+T63svQb9trrySqVxvXXD3RjIW6y38ECCeWwtGU2B
++UOLZ5TR5LHVJx7k58RQey6F9aWamjmvKBIQNmahj6a4l+u7KCLUM2twRZ+p
+Fh9ogfrRVeZsdM3rLzkPIc9LGhea0IIjiSU8eM9Gc9ZKOK+FzL7irEZiwThn
+dwhN75FyvtVImLzm3ZXo/z///f/cSP8LkEup2w==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {0.7756859651455563, 12.307331579087336}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwdlQs0lGkYx193RdbEMDKuJVQTjksXl+9ru7iXQjnKLiLpgopNmzS5NONS
+LqGUGJuk1opSR1nNbItVjprcomwHuSUnQyPXap9nv3PmzPmd533/z//5zzMz
+RsGRu0JlCSEx8MJ3IvoOjxJNBvB9OU0MC2RTbZRpIklv8LyLrPjb9tXA6son
+HAKAe4vi9/TDecmKGZslwCKGkeFeYMvzzKSnxjQh+dHnrirSpDq2ag0XWDRd
+EVGmQJMS9qonLsC00JmXIQ+6h4cs9bG+83PiPjmaaCozmmWwPpF7Xk+WJn63
+vqhJjaB+oXp3H6FJPXvhPjLJHjM/+p0iZS4X7sji/XJ+n+9XikRNtqxiY/8V
+4x058xQZu0a3OGE97drPjnMUSfp1SXkYcpu9ccAsRWoS2WmXsJ/mIq/5GYpY
++r6WFwJzQ6htLKiPCUwfDaGenCb/D+BoK7M4JZiX8CNZFaDnpy6XoI/zZ+Rw
+lBYows4sTDbHehaxLQY/Te2yIyuRg87qBIFfqXxjIxPzHBztyYF5Aq1dlb+A
+fq/J+7oIGZrMCNgBTeivqH3SAubf9/ik3UXsv31jTjNwyRKXe67AgrzjT+0g
+r4Hw0TNfIQ/Dt/YO4cBSrnFVOXBvs1QcANw+4XXDH/OqOla2FFjMW1e3GJiO
+S9yXAnrcxGZXkSH4GH/R3wj9B4xvuMQDE2Lq0gb+egQxW5yBuV6bE46Df5vC
+MQs95BP/rlaB+f48WOEmg+ezP/SnQx4jNhzDEQPQl6ZuZEKesTxW0Cgw96rC
+ob+mKCIueJUrB+dFG1Nqyj9TxEGLcRz1RBVtcuMTkE9rpx+Net9Vf7kmoYjP
+poLAcOz3MGg2fpwiykuZ7rnI6nf06j9RxCPjh3vonwSX5itC3SPotN0I1k1T
+4tlw3yFY9a4yztvlHGUI+tEtUm8DZKOj5nGTFBlI8h80Rz7SMqktpciCXPTz
+lZhX2tPCLvBro1NkygTmPjaTKZ6miLwaPSpFvzfnErxhHxbG6581IjvX1bbB
+/GPZTxzTgem9V+dwH2KrLodjfqJnw7ffAB9cIf9tCvPx6jtlD/mZ7Q+x8kHu
+PvSjIbJut36lPvTXKslIhvMS26OX1ZHvV72KgH1mpflx4vRAT28lZwj6Z6qp
+dc+wgSOuf5oHf/zuK6VpwKTT5HYD+LeUiCLXA3OFt1UCIG+WQFgqA0xvTTzz
+DvKJqg+1GdGF8yEDq16OUSSQxz/8EZgrDSerR+Dz5AQvXYT3rZu7FQcoIlge
+cs4R9ftazbN74XzYi45EZFfGy8G38H0a3m7bidzDluV1UcRw5Lv+WvBL6vR6
+jF9TpEsnpCEJuXl8tAa4d3PikTZkJYMgzhvo943xjwbO6xSV5/YO+GGBJw3M
+TZCf7uuDPPbLpPkgj2p8ZQ/C/E7a/p54/rJuaxH4deFZMsyRd88qW8I8mRJ2
+/jDqF6mezob9uGIREZEKzN3g4+gM+xAYMpauCUw7Vh6LhX3g7/Tdlor5BA1E
+OENe/OoixQnMQ96SVQJc0zOvvAOY3tIUn4R160KZ35ch7zo8CPfFyxZEKsCi
+BwdSn4M+62N8x0kd6N/1YIMT5C0WNVpOsUCvRWeiGPzR46EdfGQFWSUr8C/u
+42fZAZPrtjsC3lPEa437c4K8zSRG2EMREnbJf0Qb+M7d2aFWmDeL5o0hr5c7
+4P43+DP2WKSC5720H57No8j6U94cGpllc+jlAyHplbQq8pCdtDZsbRAS/haP
+6m7k1tqs3mYhIeyySiv0e2BrbfILISlbfITDRx5afG5di5DEigeiOpFd3u22
+aBISbv5aay2Yl4i646qFQuJix5zahJzJvuh+Q0gyH+t6+CK3C+I9K+H3kmQZ
+eCKrZojWNcI+KIa2mf7Pamr2ME+URuRPg6gfk1A+B/tTRkvceMjGtWUfYB9m
+8tyK1ZHzlXRfwT6YSRhPktG/SdStMMir0vsRE/PgDpeUsmBfKxn6H1wxn36F
+CjHU+SVy4ze1gD/JNqX0Q35qnGlFYO5QbqM77HNvsE76CSbup0LFHtjHqOq4
+KxOawI0xj/LAX+WOvczzyB4z6X6Qt+itbYMNMj6COiLG/08N+j/4tL4C
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.2243140348544435, 7.307331579087334}, \
+{-1, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000003638`, 17.000000000003638`}, {
+          13.500000000003638`, 7.500000000001819}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.35680734900121, 15.595086868322632}, \
+{1, -1}], LineBox[CompressedData["
+1:eJwd1gs0lHkfB/BZEZtiziuZtz3Oukw1btEUDTv0SE1CkttOksbtbYo0q4li
+aELxbimtyKXsMHLt4lq2ze6krabtposSEpFmM+tS8o6S3u9/55w5v/M5/+f5
+3eZ5HOYRu/2jtWg02s/4kkib/oKPNUX752NH0aqstD5721A0s4ltJrNhs/Tt
+RwpgRRf9xy+2FE2wd4vpACwItzRQwyqfH7+zQtx3wkt9B5G6ySgVIkop+fTP
+iCfrtgWRmKMyO7MDsSdrXRu5rqB0bpk1onol7ybJ40nx3F8jb2w9+9pXqLuP
+sXyqGNZ+GVo8B9brSRBvglXCwpu6MF94OUYP7pE7On/E/XoxbYevY44W83mR
+A3BLbbzbIbh8hmt6g/RnV6PYCPvMX5pXCjtUlTxjwmrdweXJxJY5HTqwJqQ6
+LZD0v+PBofdWFI2+3dfAAZb1tVqOwGuWu3vRYU2ZLf8DbFt1Q/w/9CE6w3HV
+w/11yqyUN7BsOlG4CJ7uuDDaD/fV63zyggMfB/aR87Ho5ksJcHuK96sp2LP1
+gEkFzL2Y/8UE+ekfZoueknxvPra4w8pfxnR1cJ3tyhL9BDLvylYXe1J3RiJp
+hKuaW/P84YzPDlYa0v+7p+9jYVaHzwt37IvDfZIngbmLQmyOwe3rVzpJYbr5
+tqwumDYoN0mExbJGIXMp5jvrMS8cljb0hu6AW463SdxsyPyOdpVw+/N7m+kw
+/+8v77phvr3nN53o96pSf+lse4rmN3i+5hTZv+PFDiasdynadxPMzE+PWgkr
+OBPHdWHtwg29rvakf6dvW7FPRs7DBxxY2D3cKIalPXmeVrCqbWDEAc5I6rpP
+J/mLVnAnWLhO7Os7jvpZJTcuK+DTZeu07sG0xO3GBbDi057QCljWkJWdDE+f
+sPzrAEz1Cx7EwJrEaHYoOX+5dEoIiyfc5K4ww+JVfjx819wjdjFMt3SrzIRZ
+4dd2MmDpbdfKCli7Sm5kDHs+d5TfI/WHhiNMYbPYCZ+PMCfpSPsyWKR6ZWyN
+/oWGRt7+cNVuLZ8Q8nxxEzmpsN+mJE4WXOXVL2ki+2eFudXDMu6qzPdk382+
+mkfwk3HtSGfMX7D1bMAw3JMRdD+d7MNoslIDTwwUBrTDdU97bk/Bqi31bAMH
+5PvenUGe3zLFuVY2LGMmpXfAscGSU4EwY+NMdh3sK4iojYeVF87wpPDkY6Hh
+UZgKOcjlwUO9vxnI4PZ8yS5t+F3xr8suwFkzCfatmHf+1zYel0g9pzHjPXCU
+SbV/C0y/dvsJC9ZbMtbYBPu5l5n3L8HfkUGLT7Uw/3fTvBI47dp3kyXkfuPE
+7Eh4caVafgymfVNlxIbj04JZElhYyP9DH274naEQkv42F7aOL6ZoYcneDUFw
+379cfhqEfbbPWr2G5Kte70EsOjpL5ggLqDnUGKw95fbCGjY7uzlWF/lcbK73
+Msk8eWvtWLDD3JMBxNJo12Q/eI63+pwVOZ9nNJUCqzqc/03y8Y1vGVyAJ10N
+03hkn3dHZ/fCqyPMs7fCqqI4O33MP7aKJ9tPvNlkhE2er+vrVIWwaN7IuD+c
+H+ca0Up+ny0XnXfA0kmtN69IvaqEFWK4ge7F+XoZ9qGUPiTP58L1jQb2sKDc
+/WgU7DbflxUAj5V6xK+HuWXdwWJYOu+YhQXMk7GzT8Bm0YU3R9Gf7d82w9Uw
+K9lcpwlm9+Xcugq3LIgZFcFeEUWXb8OMcw//Ivu4oqjNbYdVnpU5vdifQY7R
+/oewMqmo6CScr/xNeZfk04z/sgGWTaotrsP8tx9T5sJHQxcImmFZqLbT40WY
+63JgZjksLHV4JofNjv/aRvorWLt26AAsCmL6p8J+z8T/EcIfGdopMSSf4PW9
+rbBEMJweQurv30sTwLK0wJ98SH3rT35xsK1HeP1qmNozkpUJz3lhetWV7OMG
+a7IaLhPcD3Ij8zaappJ+TrObXq0h+13V2PwV+i04fCZ9E5m3pnZ6GRzI/GF+
+FFzH21kcDrNpt+wksOjhtf5sMt+5ZKtCOIe7e20TvFo9x/oKzFnyJvURHOEY
+xuwl/Qbby4fgK9/Khmex8d4/LXEehUvuHHOzhh1eZvsMw2m8Sx0b4QJDjriL
+1C8c/2EPTI8K6r4Kd2my3+bCigZH11yYqt7tUge3WItfhMGPwuVHbsEaeul+
+c3hfdyf1HN6XluH4AvPGqUOmB2H+hq60k7DS2Kn8LdzuWaTjBQ/FhUUS95Xr
+JtDgVM2tSnI948+ug1eYeB8NM027YFbswPkkOGynQ+Udkl8r2dkDTvB4EHAF
+NrPT11kAc6sH/Cth5SmlZMISfa8YHyL963Fys17CsmKn7w8S7204+Azm6Dr0
+i0h/O/uX9sBaUVk1kbCK1nlTDfMGGE0h5Jy1YkoX+RcO//d+MOy5MeyzDTyy
+fMEJPnGqoiIYFtZ2+gtggU1MyiG4ZmxscRxMldO7muEMy5ruf+rrLdR+DU83
+nZ8ugjv7pX50zM/ZZdXZAufIDSlHWB1/4TCZnzZcX7wJ9lsr+jAD14XkZkfC
+lyp3v2Mux/s4Mdq8A+ZV6bp4w31N1S7kfMLa45AINkt4176ROJZfkAtrdp1W
+2MNpKyr8GuGWE8N9s+DOt7n192Ga/tzj99Afta9tdBBm6RSVHIOjnhgkfYAV
+4rdr1sMz5P87ko9ES+r/pF+h5A==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.31406512997668, 9.373369816204487}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwd2Hk8lGsbB/DHGkIOstNI2YozGjvViKiIic5YjmUQKZS0vpQtpcWWpFJq
+HJLTaiehKU4kSrK0nRqSSMugQqH3dx//zOf7ee77uq/rN888A+2g7e4hwhRF
+aQpRFHmlBL/wo8qk5Ai0mJTKbLhzuhqTonHitE3huuyq2EXqTErQJBW3Abbt
++WXQAFN9ngw2XCFx6QFbg0lx1HdvsYO9pLY+H4YF/JE/FeDMIH3FnZqo98XG
+sx2v1zZ9u/AZryVdT67swGuhRtsyb6zjHZ2XKQJ/dZtcWQKz9HbPSUGd4vhG
+yTE46lDQdYqcc8/yluYC1HdafWQ3+ih8bhrKgDlv1nd+QN/JExwlU5hl9p0X
+Amd36JRpw1G6dS4jmJOzQEgwS+qf3f4zHm7TcLJ4TM6f43VTD45Y5RSbQ65/
+YR54p8KkNESL5Uh/NJFlx2/DYX+fj1OHBV7WU1fgqNjp9f3oO2HO2u5yYvO1
+z0phzpYctW6YsqpUSYf5WwrrpFF/0+pFiTEkD3pAvSfMqvze9T+Yvmn7+jLY
+kkufS9ZzrAK/KaP/IcOVVjVkvfDAPwdhTqhdyiQs56WaJoAproexK/phalXI
+epP3SU2QUA13qB21rYEVvebOmGB+5oRRpCTyc/imv7kWpnl4pa+BW7L+2qNL
+w/sU/IoVDQ9NSxdHw4L/bXdJhumcxCN34IQ7V1UPwIdbHJ9IaWOeXptAX7h/
+vMfFHZbzP/ZmIayh1vD5JMwNb/ftxPkXhhqG22Ees+lsJLxxiXPjLMwKnjCZ
+RP9bk+KCFy9Ev+N1u/bAhT6faXZwVEOR+SfkoXv4cfMGmBa7IS8QlgpYdN4T
+5qx/8P4Z8tVf+IrtAQs4r8y84JYRYS1H4oE7rAFlJsVW9NxnApcs99ubqEzu
+x1ZbZVKveDedAd9Pyo+b0ia5Hl80rcSkcs9L7H0BM88vEXoNHzadF1lH5q1/
+FPocTiiUzcuH6cYK/Z/gjcXJtFQyj8E5gSrqrUoJ7T1AnOj925/wvf19Hvtg
+yj3vzXW46FnQg/3Ej2ssZNFv59SFX8fJeSeqg/fCWTY664qIb9i5DsCDv9qT
+H8IJyodvuWF+F4bH/J8kX/WXeyvgbcvqRxmYh76ytEAG+bXoFl7dBfM7Y7vY
+sINQQfxtWC7UwzUVlmUHh4nrYH4NN8OrMHtftKkHnHCRv7sUbpocz7sIy+W8
+cboAW/ubBA/DXJHA1h2wY8KMv/EirDcTWBrBcuVvL0bAzP22TzvRD/ur3oG/
+YH7Xw6YQeGCoovgR3OF7S/gD5nGsN1sugOXEx2ib4I2xjc3ii1G/r572HPm8
+2FjvIk98/Zq1K6x767STApwpYVzUgrzTMwovScElpeaB62FDF5m6KdTjpHr8
+4M9nUrUHwq36YVZdVEAKvLT2nMJ9WOAcVm4Pu+/KiL5M+j2ycKkKLH9a+OwR
+sv5m5Q8x+FmkXFs4zCs6vEIGDoq8ae1B+r36TcQIlorUGGTC1IZLrsHw/VpG
+qjmcOfPR+DqsWJifbUbqb87oE0d/sxGVQivJ/j7/yXA44lhMCKlHq1A51gu/
+GEp7GU3WP43e7IB5C8XG5uSRfgRaHuR+qbn/We0Jya8/xFoGea048vS5DObn
+3J4ID4Bj1Jdf20C8gNt6kTx/zrGu58KsJ7VTrXCXnglvEBbcS0l8DatlPC1i
+6KL/f7uHyeen1tpKLR4WaA48uAXzQ6Tf3of53u1tieR5F31yVEIPdXtcryyD
+XRwmd9rDtFELxcfoL/382PAu4gLnsz6wRC1ldp6441Ec+bwY98QV1sB0xeAs
+FizVrTbzABZ8pH1vQl6pjR6xHTDXYOGwDRwd9KGjDZZ79zS9VhH7b/lr8kg9
+9q7q1XCDflvfVbJ/QuFanwKeP/suC07AnBhnKgsuviPrQ/qhzHPDveGk8fg/
+/iD1F8pes4JDhwYNLEi9OdE7GXCEndh8DbhDpD3AET7zz3KGOJl3T/KvKLhr
+dUvYBPKgXxnnl8CucxzWj8Il6k+uCaMfntohtW8wZ5/DuiB40oZ9UQT7+S/1
+5j6E2TYN5ppwyaGc1xaYL9Rdr8mOnK9yOaUAbtHLqogi8zoI90ggH9HnzaJ/
+wwkHx/4NgvfvXOMyDLMUM4yuw+YqCW2/66Ofg43Tb2HenQsHY2BmxlK2KPLf
+ynBa1Qxz0uQspOGvPwwbFQyQxxnVSz+wfptsdqMfLDg1WPMY9vraqV4Ac59R
+ealwq+TRnj6Yz7VLZJDzZztXqxhi/bvfDzajX9Fj2+avhjOF2KkucMlvyt6b
+4RL3n3rNmDd3+kBOHMwdlnK3hWcld7Yeg+k/rOxKkd8RDbEtqYbk+7LCeAls
+GZjrlUzsc13zpjzm0DUb2knstPySHUx74XrXF5b71dIw+BvquvR3M0k/dkrn
+8uH00M3OC2GOX3f8LvjFroJgEZgWqnSTA6/btmbTIJk/p8w7FC7z2RrXDmfu
+tc1LhlklT6tqYfrStLRbcK6kZcdNsr4pZa0wzm/aSre8QfK5sEztTzjX/tFE
+FcmP0Zt7B64rDy9uhRN09g4ZYh7/EZPIYZipn9NzGhZvPDcqT+bv0tITQh5e
+/aKRjnAUS7wxEA71XHA1CWYuch6tIPfPia8q98l8RdNHv8NjWe+6ZZfASTo6
+Osg75+VYsw9ccueSmSUsobyj7DJMjzhtaQpv0jZzHYdZRztKleBZ5WVBNksx
+zwtFGz7qRZjGvzxA3H8qNgs+fOLu2xqY5zVfiU7uZ86cbx9gvvuW1Dr0z2xc
+/kHeCP2a5qjawjmOGXPpxNYqyeWYf9BnsdIqmNu27oMeLCs/tWItTNmrH7+A
+PHMms+mOMK3MN00DHjzBF7GG+RO0liI5fD8V25vqwnJqUel28KOh/AxpUk9q
+sVDfPHzeFV8t/IJ+aCNtDyLgrYf+1ukg/Z5+pGAI81xuPSuFmQUbQ9Tg9Bsa
+iTlkPnEnzeXwMSdR2wQyT7xSTAZMXekejYKjHHh/iuM8nyuZK7cSe4tpe8J1
+fweFRJJ6E6K/KmHRjzpWsXDm0XNuWujf9RVLMxvuOJkhfhwO6+FPV5P90apD
+38n9c17PZZDsr4+864s85OxqZLWMyP32nlsN69tL9fsZkef1zrkiyPMvxjbp
+QuIVU0ttiE+UZHwm+cjXC/nByaX5K2yM8X4LCfaEwuZKuV0psFyGaiIb1pWZ
+kemEuScC9Yzgz0klPOXf0V/GqoMjOC9oc+I4G+aeuVxxEqZn7B1Pg/nG31v1
+4fvey0Jvwwnc6YIb6N8/LsXrNVkfYXjPAO4Y/WfNd5gX1aN+EXkYSijnCNGx
+/2T+OwXYfV5ZtTCdfJ9FV5D8qexnozNYTxOvENGWZVL7FnhNfyLuGpiwl8Hv
+R5UGjF6YGbQl97g0fj8aZiWT8zl1fmGzc/E82FUhn0fO+xQvnQ9n6kstiIOp
+suale+BXRYlfOKTetYfr4+CBbabVTqT/Yf32atg3ZFOcKfEig3Et1A9SPypt
+QOYJH1a7ARdxVbp1ib+6ffFDP5+tXr43JvVMVtYuRr+P9He+syPX7W7e+wmH
+bsueDCDnt1ZWdmM+LYFZ1xHSn0D8+EbM79v8uIr0L7hR2UPul68iydETZH9i
+2Iwk8tsg9clWE/kIsrltLvBEq90+O5LXFqv2GHi6tTZgM8y0fhl2At6f39Cd
+BnP8BWIZsJXQjapyuIP5RWUnbKzLeNcLU5IrDFfAAYnr2VNkv31UxyjOn9x4
+WkPZBO/zgMbFTPiuq3M0HWZ6iM/VguOr8u46wLQ1B4/aYp7YIdmrHjB1tU9p
+KealP4iW9IP5MuNjisinripxnEPWjzXlCiG/Ev3+2gA4YaVn0LQUk9p+vHLI
+m7hIUmwe7N/SbsH677xY21WSTGqK0ZpqT/bPdwnKk2BSr813fDQljqmh6cI9
+wjejFhP3bDHjz8Hz2rLEVgnm5suubYeffzoTJUHstP3fj3BAma/mDMnnGc/d
+FvtzK6ytvpE8HaZFqmE/Z59ToyQfjsT/2Djf+etE1xhZzzl7TR79CYkmhf6X
+V+HToH7YbvOXODHU5x2WSruN+6fxWZIyyY+3NLTqJOadeSz/2Yjk8fTFLg7y
+UFr9NGUtmXf59efKyKuJfdB8C1nv1fSqRJb8/du8IJXMb81s0EG+vW/8HEvJ
+9SALn63w5X86s3tJvQ9y4QnwximT4RmSv8KN6mDY295RW2cZ+X6MWqIIm5o/
+13WEOapKvSdRX+3Tjp8hMG1h+ItB9JNrrdCYCDPPllsowKdkD7WfIdf3NWTR
+0P9KblPeFZir7/laGfO1jq77UkWuq5z6KYz53UoFNfUwT0fL7SPyc3NnGd0h
+9bb9y3qNvJX9/6q5TfZ3jKi9FWdSOquWTJcTJ22fFoFvG0Y0F8NUjMz8tWJM
+qvwiZ945YmvDmRpRfB9c0Bs4TvrfeD3OC3YeSQnZT/YfXBNoCIcVP6yKJP1w
+o1x+h20s94xxSD+pLrwQ2FLVW8uT7I8aXNwKN689QttAfE7wjY3z7gdeqnQj
+9Vpiv4qin1jND2EepH9XtfiH4uTv+TXpviTPJ4s+cDHPPvbrFeFkf5zJcAzm
+rU967xlP+r3wx6wr7peY5cv2k/x49+JHyP0iqyir8l9e3dra9fB+t8Obe8l+
+sfjFq5Hne9eiuJ9k/SxTUAB7hWzz0GagH8Ye8y74aJXMAyc4Ib2xoBOWvv/+
+diRMyQbM5sEb7r2VyYI55q6mFrDi1oSycnLd3HtDPs4zHDSofQIzUxb496E/
+vW9s3xEGeV6VGcyi/xny/xti8v8bCeb/ATaALY8=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.538487526462115, 3.720262579386344}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwl1Q00VFkAB/BHlomhYUeEagjJx6Yisy3rrSjfjTGWRCFKPiclaiUrIpVI
+MhV71J7aSWyIQmHalI9tmSjJKi9Jg8iuZte2yv5fO+fMeec37757///77sEw
+LJ4foUgQxB586SsxM4fPIvL/qyVJiLffs1PRIwlp6jtBBUx6NfhN4r7xXIfD
+Flh2IMu+FpZsCAhUh7l/8YuDYWaHi0arBUlwJk72j+mShKVHOu8YzEgRvAiF
+zYpa04LggP1v+9p0SGL2/BkXe5hnVNllChvczt9rASeLpILDC/FcWrayOSzW
+sWSOaGP85KCOHUymSclv4TeRPnIe3Jabk9LPxu+9rjaJMNfG2TwZttyW8biU
+Xl9zt+samPm3klAK1408X6kBtyyUhRLIrzusnzAfNhDHKVnBDFvfh8tginCl
++LBQl80PhG38bAbjYJH1ZzvE8EAYNzkVplwMrRjII/pntOcQHMnra0+ApVad
+I7thjkboXQo2m9uUJqD3c/aW0B39WC77vczo+Qqjd4hpX9nQNYl8Mu8mahoW
+X+W4lMES/5vGy7E/ut4Vx4Nh3VmzbgfY7Oj9GTW6/+adRrZwQD1lWG+O/los
+FhPOjsupjoRZa8sj7mI+a/fXq5fAZGhgdTCcfWJh78AK5Dy1zGSQzicJ9PwJ
+Tmtg+HjBeVRB8SG4stv42c/oG1Nmo7KTdm+QiRocctD3XTD9/Idp6a7PkVeh
+b2I7bM0cD+/WIonTXbqXk+jxq736PGDR70dVi+C8RqH1gCaeC4oPbabHhzSb
+Z8Plc2PCCVjc/mSGD7P91lQsRl6pb4/W13Aea1u0J0xVOxi5wZXRb7T30eaN
+KyfAGSfYIUVwpPoueQ0s3MpMrIDFKvwKJtYPv57LuQH3rU9vSYBZ49GT1+DS
+kD8VKdj46BbHc/T+UYs6PNHHfuqVTyJM6LPSq2BW5sjXTnDyEh9lFfSX9T0Z
+VYTNnFjMjXCyXsereuSfUtiaEgMz3I/wouDsMnbjHng4YeKSDkx8SBymz5Pg
+olbuPTO8P8/CR4ZwpFG/OAl2rVZy6MB6ARHMwFWwxLwi3R+efd0iki/Hekst
+T3YiLyde3nIfFk/F59jCkf9uzbwM56lmphegf8wR2bVCeEo/Q3mKRRJBzy47
+nIYpC/cGPhyp+43HBZinye7OXID9+eWqyS1Y0l/+Za4G3kfd4bBBWErNfN+u
+jnlNriqqIQ9FPRI7wnUq3JJ1MEcwHSJnIq/EMy8Kto492zkOU3VLbIvo/MUb
+kzgYL1F0YjfCLG27iBPwbR8vnacweaYyZQXWq5tZUCujnx9J+iiDa+JfaI/B
+pf6K1k3Il6c474sBevxvDJYX8gc4nXvQBHMPBDbdgOu6Y384Re9fctBNNvoH
+LXcw3gwTjkvtQuC6d/YlbDr/NbdP+0M1j4+0op/wIpdbBocfUxXso/fToi7/
+Aux5RengMjhtsjs7GQ5RFzJ7TPGeyZTXK2HRnaycbLhU7GTfgfUNTPPNN8Li
+1vJaD1iYqFCiCVuHFj/Yg/wDS+SyURPM5zw4uhb9pGWGmx7CPIusA2+xX6KX
+Q3ZtsET0/kG5Gq5F4Vad8BQjbPygKvoK7YdewJw0xxbhfJzPx2xnBcwvHRoN
+y2fg/LYFnV0BV85jrx9Vwd+/ar7YH6a857WnwgLuuldZcFooc0QAhzeZXroB
+T61JmIyCJe/T+RQ9XkPxx9uwNDGiVAH9Q6qGYp0w/17vnnod+rz0Wnf9ASez
+vKI4MFniP92IPBmFoQ56cOV4Y5SIzut2uEAJ5kRlzOxGH84dedkg5heWtsR8
+hb4tN32Ly2HeoH7qCOz8+Ll7LMxK9TuzA+ejctN+N2M6r2PzkSrYterX2kfo
+n5eioSehz9/LS2rpMFFz5btcuMZAb3olff/W8TgDeNjEgDlkjPvUdV4s5i+O
+Kmg4D7NqBsaykIe3tE2+Dc4r4i3Yh7zcjy8Xr4JJHwt1Z/Tp05U9ZdHj6X+S
+6PvpY0z+BxWKgGg=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.578757510903266, 13.026566380408571}, \
+{1, -1}], LineBox[{{13.5, 7.4999999999976925`}, {13.5, 14.49999999999251}}], 
+        PolygonBox[{{13.5, 11.6}, {13.9, 10.4}, {13.1, 10.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.5548, 11.}, {1, 0}], 
+        LineBox[{{13.500000000001851`, 7.5}, {6.500000000002592, 7.5}}], 
+        PolygonBox[{{10.6, 7.5}, {9.4, 7.9}, {9.4, 7.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 8.4452}, {0, -1}], 
+        LineBox[{{13.500000000001851`, 14.5}, {6.500000000002592, 14.5}}], 
+        PolygonBox[{{9.4, 14.5}, {10.6, 14.9}, {10.6, 14.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 15.4452}, {0, -1}], 
+        LineBox[{{6.5, 7.4999999999976925`}, {6.5, 14.49999999999251}}], 
+        PolygonBox[{{6.5, 10.4}, {6.9, 11.6}, {6.1, 11.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.55424990759769, 9.30053848023783}, \
+{1, 0}], 
+        {PointSize[0.04], PointBox[{3., 10.}], PointBox[{13.5, 7.5}], 
+         PointBox[{13.5, 14.5}], PointBox[{6.5, 7.5}], PointBox[{6.5, 14.5}]},
+         InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T1", " ", "P2", " ", "N2"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbf/cgdhei/fjghgihjij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbf/cgdhei/fjghgihjij.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {22, 44}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwt0gs01GkUAPCPkUaZUrFJjh3yKEaLRJjO/18ipKgk6UFko5RhdCpNGhxR
+x7GqIdVshihKQi/yGqVFebQpFGVsNMqzsIZee+/uzjkzc37nft/97r3fpx8Q
+tilImRDCgy/+//dRoYkm/hvShCz1ia5TponY6TZTHyzZ7dZQqEQTwUTBjI1g
+dr1ofi2hST6L9k3GeK53209gWVVZbCtYOlWw0vMHRWrmXdxvbEQTOnX62u/f
+KSKo5yZEgUlB3pQtxDWMMpjNYGnFE7dxMEfyUJdtDPmG66zOQT6uc6ThPjDd
+x9rkC+erS5T689DffUdWQX3pbVmtnWApi6Vhz6DJM+eq2UomUIfN2geW0M8L
+83KxFpi+a/Vj/jSaeKUW83TAEoPm8U5w5OJfQjXA7GKH/AhVmmQHffKYhHz+
+19dPNYI10iKy2sDsSjVTOVhmVHOqAOMr5oY+ACdlqIhjsJ5s8zku4B37VuR5
+YT0BsfEiyG9tfz/GDNeva2blQj3c4bPlamBZa4pbMtRrcWBnzGfoX3LqYOIW
+6McrTujTB5b95drHgn6tuQqVQZzXwOa2FJhP7uniECU8b7xabvaNIswkE4ER
+WHjc6KT6F4qMNY2v8cH4VQ/dDZMUkbGihs6jUw5tV1VQpM74pKwbTML5Y44T
+FBEHiORW0L+0oaWUBS63NQ5KAJN5JSsCwJKPESc70JYPmmxhv7WWWbTZYvBl
+gcNxyM95LK/gg+kyjxwdOD/JsdusCG2doDT6lSJHnB9u7AYLI22f9sL9t79+
+EaO8BOI37A4H4/0G+4zMA7N3xAe5Qr9MTlyVFlg2Yq2tCvOga6O+MTHO2qRz
+BtyjHygaxvz64b1d4Ny0SPMGMLsxQ9gPdqltZGaBZfvyPxSCk+z8GiIxXnR2
+tSW4hvXS3QXr2e8vDYfzNF5XbGbj+tOiHcegHt6Vrb8SsPT88kt3oN7O5ICU
+fnw/7GqxPfRDLuva9KDPPTqRB/0Hs/VGME4m0gIXwbzYV+z4DNyvnFpdP0aR
+kqaGeFOsdyiSX/YZ7iPakOGP8VC6e+4nirjzqgcysR69P3rqhimSXXskcRDn
+2/G4OGqIIuo/ck9R0D/xGUl3AvuraDqKwMK+tAOLYL00LvStHONjyvLoEYpw
+XTak2ZjCeXa7Stogv3Tr8mEBWFgayIkbpcge1fkD9zFeLtgTOA73URrr0AuW
+Sq2CtkL96X6ZvgwzyDcZwlwJ/bH7GPlzwLS3hdLoFOzf9kGoARaeLnruC/Ow
+WBeuqQSW6uWIfeE9irsYRzEfvVAj6y1Yos88KsX8GzbyX4MV/dLQVHSCPM8V
+zFY8nR4MJsHdphaQr/0dV5+L+w1ZAxfgPNnBjKNaWH+BH3UR3l+niXvsBPY7
+aHvL7W+K6NruXdKL8yi+JaiH/tTJpZsydPa9Vlvo31NhJujH9SrN9WGDsH/W
+3oWqeF7l+oSXffB++UUGFuiO8Z/f9MB7jSum/63HZvWq0m6KaK9x8MhHl4/q
+srvgfsoq+ZPo60PST51wv448N3ecV+/j+nGw+o1jCzLRXbzABbC+5rCn2hja
+IKZFBPmC1W7uWsUBX+tcvx/Oc1n2tTgeLJyTOdEhh/i9IpNKjL95l5zXT5E1
+Cy6f6UM7BHifgfvmGOZfYJjD/FRbYq9Bf3VROn/OAtP8ZcGe0H/PW1IyAyzk
+GmfnwPvrPFR1VwH76ST7sGS4b07dE0YHnsf5uFcBTrmtmXQH8/sZ57aDv+qz
+KhLRX96HcMDWls+3bEc3qllOQn4V79/NLTAfc+YRd3jP6TMfTc7A+O4TPfbw
+/njRhVrD+D7OivUqof4XSss9u7D/Me33t95TJDFDq/oNWtvFIhnmIXEPzetH
+e8WE2L+C+zpW5K+G+RaNpnGfUUQk+M3DBs3rdbaopsjI1SYFD82+4BqWA+5u
+mX0fnbJ2891zVURauvPSNOifMJ2a269VEf/iCINt6MIxgXt2FVE4vZLdRP//
+0cafpfQ/QPmcfg==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {0.4684378539501304, 12.411618926975063}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwt1Qs01FkYAPDLoJS1xBSNalBrFm0qLCf1/28kpDU9vRajVluOZ3ZPbMpU
+FJHG7iatZ+UUztgQYaMZ5BHCmvEKmZQiYjwqFbXf1+6cM2fO79x7v/t9373/
+/+gfCN7tp0gICYEv/hLZJ/gwaPL5s5omWe3T63cp0eTZth5ZviFN2NqbD/qA
+nYuOGriDZYk3/I3AaeVeqcpgfmrP1jxY3/dE8mWpAcTJTfowpkiTsRstsyFg
+Xqp+4KwCzIu86GKJ7mgt6iY0sTpeyFPF+TO9L6w+USTLOSB3VB/mxUyr5cxR
+hJfJrOoH03cK5ez3FBEqWHAHwOIMPqv2LUXcThYwJ3D+25lzt19TJHpxzbtF
+EI+/8U2LygxFtPenrzXD+Mq6yZIpipivb9/nCRZn9bgagYf1v6iMxXEJM2UB
+OOC2dkIxrg+rFYSCdRoaGb3omh5Pj2mKNPwiKpnF9QnNl29B/L7HpGwR1C+e
+NT3h9gby/3X5P+pgerBl77ezsP9q4RUGmGgmWplA/mzdjKRhWE8fW6e0BOu7
+U2h0Dy3UdG+ch/w2zhXFYD7BVLIF9IOnmu/9He73NEmiB/2KPcZVnYF6iW29
+vS9Ymndc9yo4y3iwHp1tG+LkDObF+s6xwAl374W9Y8P8IW8fQ4inbbfJRQjm
+L1EOSYL9fjxTRB8Gi9nuNpc+QL1hhQZmOP+kDsvhHUWk6j+xVMC0p+PXDVBf
+uNx1tnMVeCf3jCXUL/9k4VmF1mrglkxSxCqoZXcjmFyjTzWNUyTEJUVpAl06
+ZNT8kiLNQZkRTNx/3ea8zBcUuf/URt8G95s0EwYMQX9mmxZgPnxfL90dz2D/
+UXHAJfSDgbtbwWn6CyPEOL+6pM4J5scOMCKGcPxlmocTxNPbEaqtgPdhT+a8
+LuzHcx/ha2C/1E0nYl5RZOEwQ6iJ49TDP3PkFMn2uerBwHG7M6lpcN7S8tOb
+MB6xT5NEQn02KsvGSrE/dVe3c6B+oavFRCT2Q21e5xTcPyuH75Mt0fHmjkFw
+3lYLeipaoV6+9NzGfnD3Qs5ZDnpJ+o1qsMbHXVpRKyG+PO0CC8cTJzV6V8D6
+30UrX0F8gex0jy1YrBmfYAf3OWXeQUWsB/Pn/bdYwv1jp19ZvA/MVz2S1gf5
+u9mHPVfB8e5wkj8Gpm1kXSyw6ETdeehHwSbrgAYwv+2PB8mDEH9FLfvzeI4n
+a00fRcrsbzUTXH99bi5USpG228dv0uhxaedoM5w3K++KAO1s7Td5nyI5R++l
+jKCNGW+2V1GETkzVtIN8yfCrHIVq6O/aEY8UtOmAx3gdPA+2dZwB9ExBZEYr
+1JP4+r0m1r+qQ1LcAc+fq0qUCTp7g30F5MNpK5AZgflLk46YQ768klyGMvry
+5Jzuc3j+EqKvV0M8fhyvpHEE7t/ZatcDGP++SpwynC/3fOvxF5hfevwBwQTc
+Z+P9c/vB9Nj2+nToV5t0SK0U6hdvMLWfAnOCnRvVwfTFhMUVYLNaTqvfclg/
+oO04DesP71SrqtEFF/PqD0L8AtZM3zq0Usn0c9g/JX00rkAH8mFGmuXAfdTQ
+cZl1AhOO267HMsiH6SdRRA8XVAq6oF/hctVHy8CHlkXcbIT+qCgUtqHpRs9A
+IdyfR38rDqEDRsoVSkSE+3hNhBauN/vKzeGBiOj8HMRwRRsGxtHtIiKQhuzO
+Rdck8SQdIiLfomrFwPwmd3Ktu0SkbEeslhd6b2B7cKeItJkM2d1CJ/X7XpKI
+CLtpMHMK/c3UD60PRSSF693NxvrdTKajqkQk3NjviTlakGrYnyIiPM9waxO0
+s/fHyjKo/8LJVYpoHe57WRNFZH9tyy/HeBWC4LVwvm0Uo3MP+nTZkUO90I+E
+YQcp5hvt78+E/nDoGGsanS1cJHgC5+W0RTMD6ud3yEMZcP7y3yLUXy+FcdVr
+0T4wzjYy73JGlzttcxyA90vUMeV8Jr5f3G3re+D8WPxiPfS0MD2iHdaPezGv
+aYMNTiwPr4H+xh/S3Kr9//9cVuV//3ta9L/6LKiQ
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.0315621460498696, 7.411618926975065}, \
+{-1, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{19.999999999996362`, 17.}, {13.499999999996362`, 
+          13.499999999996362`}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.738470230054478, 15.789812429898827}, \
+{1, -1}], LineBox[CompressedData["
+1:eJwd1gs0lOsaB/AvjcmlzSj3mEYuIcZI5BaTS4YjueS+d8eeCh2JSkKtmvYh
+NqrphFAkXbZITS3bpdDQtnMpDYewSw0lk92O2rl1c/7vmbVmfes373zP+zz/
+712zxoCfELhTjqKoPLzJlZpbwMucS02Rqw6XqjiSy2Su4VLczIc783W51Dpn
+tcPeMEdt2oO5gktRt+NlAjjx5KWGPLhipjy/FZZeZPT8DXvYHrBaasGlynb4
+da7X41IWIX/OR8BC9wSvbfCgiv50FUy1pO+OhlnyabQvZP3Biwl/mOaZqcWz
+5FJiuYXZlXCW39eAE7D/8nLOAKm/08G6A6bqDu86BCfqalfPw9Lu6YRlsDQi
+J1CfjXUdq+Zy9F+RKwyxgYWj9iY2sLPhqTInWOrZntKJef2PF3bZwQL6IosE
+WLI1lWkCs26N0lfDDxVoh5ThsgtV/TPaXCrqTILnG9LPO5U1o7D0i7JnK+n3
+6D7rP2GOweujRfBUeOHJZbhfW2q7fB/M6jKODIX7zM8rbYHLlhxk18GmyzbZ
+25D+zxm5sEneP31TNYAlBaWn6ojdlmXqwsKerQ6bMZ/2u8pPLPJ9R22RDG7n
+vNe3Jft/Fev9G3mp35NOhcCcwfpfNfS5lKxmkzgDFtT1axXD4o4JthgWuc0X
+KTG5VNJ/4rxomE+8mn2WDxc+eZm/BeZYp1SVwnrDCrwLMMPTUdoIn7+qFzjF
+Jjm9bSMW9T4ucLXCfGslqRfgxlwFRjYs2BVxNgaWhafMPIQ5ESqaOnCuy9cP
+chzct5Cr0YB+RjMSjujAQsOjxZthhSaPNDOYM9/hOox5+CmMorXEgZrSPXCs
+j/P4Olg8oOmsCPtH7+jkwNIZw/LbyKPGy/iLCZwYePtcImy+r1SgDTOKn172
+grOiTYro8FRB9XtHcp787saMoT/JKxcPX9iUPnmrkfQbXt1PzlfWzQjLAlj6
+aG1QO+z88behJFi4K3mSjf2/30jfHwlTn9ZnVsF9yS6bfeGpjwcG7DGPyCzU
+zhtmaPm0SmB1df62ILKuPFe6G3msK1PkxZH9BzRPy6/kUs9GXrQI4bJDUaN5
+MEv3lawV5jF5lkosLtWspKpLcci5jeW5wj81R3oYkvyaeUUxcP3Ltkpvsn5Z
+pfQYXCbm/7EXpsKVhblwhImMVwxXmIzFZ8F81kBsC1wfeu3zAThZXdI0Ru5X
+a6sPgX0Y9Cl5azyXktiHFjB1pXeYZU2e5/XeafTnGJpeaUustyI4Cy5Wvdrh
+DrMCvfq1YLGNBf0fsKC7xqoK88Y+MMsgljxJUPGGa7ZP3PeEKcXe07PIJ5uW
+fdoRFrkGUY1wYfY22hpSL+noMXJ+9/2rKU4bLjtROJ4Py2UNuNBI/YXK7Jsw
+PyhHcYrkMTBrNw5TstVhw8SMYisn7LfpmdmlR7DgZw/PCjhl+JNTK8nHZ3LB
+DP126omcGuEyy6ChO3Bs/rUkYs75c27mmL+9vDvmPjw4+84gBfZfMb2hh5w3
+NrvkPjxa1NFG8qsIWROtaID9zm5NptDf4FPP1E1wVjJihoUqIx4psLrk4hUP
+WJZP7zoPm6wKvxlH5vvu8N3b8Kvtz7XySB4fp9MbSL31VGAjuT/l+Pe3YFbq
+ZO8oye/Ka8dzcJhCogl9LeplNj0m9dlhI4uMYbF8bpwvnFhtHOwCz93dNqIN
+X32THRYAh6n+98cR9G+nvlDwA8x6GRRwDb4cofyRD3NmRSuS4MPZXtU/wtyY
+kCWeMG+jTWgEqXdoj9JK2M+ytH8zPNXEvEyD7zTK+W8gFtUenESezYK4Veaw
+xGqO8Tfs1lDRpQFnPQ4TkPP9trh5aBFsOugcRPLu5eT2T2K+qBrBu1CY+a2G
+PULycVTPOQ2bOPeZDsD+9S2/9cETA5OdvbD9WGoDk+RJp/X2weKdqla74W+9
+ob8ME29JaiJ5dp7RifyL1P8u4PPiVZhbNfvSYuwvUKqu9ILZSS3SlXBhetTL
+Y3DZ82dGG2HGRUMHEVzra8aNJuv2vKcSuPTkdckJuL3kyPVRuPsEd2strDAU
+HzAG+50Jcn5O8lscZTsEcxp85Gg22D+lLf0evC71kJMJXPHgiX4x/Lartsod
+tn/ETImDfc33B0fCsRmW6XbwE+XW47vhuae6Gd8wjygjZjQZZt3oGfsdNgot
+2ZEGCwMCl56B7wS7bz8IS/h2ltEw9SHt5z1wvXajgTtsHz3eHQWL1Y64WcAu
+NPm4LbCp+z2eIbzDeEObE6mX/Wy9GVwuPc5fTer9ruTvAtf+mt6zHB5sUVHm
+k7w5hgVycGKXjiHZ3491X2OanEefvZcew3nvP6S/JfnlLJHTwDyvc64OvIGF
+y+u4UfD1vY01f5HzORGvfgOe69kfPwdHJfEYn2Feufu8IupLX8T0uhvi9zzV
+e8aA9O/hwMmA02743HAl/TW9+WcjrMmjs/iw7JRMbxz+o+SHpVlwmFpR22Ij
+fO7wC11EngfnZqIafPJzcOYgzClkzqvCX8j/JPj/LyPu/wCdFD/V
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.211924601828787, 6.873740025175105}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJwt2HlYzOv7B/BPaVFJ004Lk6VF27T4tk01lEqkkYS0jDptpw5JUkSTREiS
+aKOGE5WiKFRHY7QJSSuOSCiJaFJHiZPf+znXzx+6Xtez3Pf9/swSWgE7PIJE
+KYpSFaEo8pOikb/UWBT1/z+rSzySUvGTtpw2xx4/Y+XSGhepsyjhWmogGE79
+emY5H2ZvmrTdDX/QapX11sD5Y4mjofBIoAh3DOb9dnN6Bdn/LFeYoMmiKnrU
+00TgzQUpeiILWFR6rM9kyXwWNWDdcHQnHMlxPGoHV8RbGLXB3Iy1MQ3zWNRz
+9gYF5YUsSiDlfMEWbrFo1F4FC5e4BN9QZVFrrUN8/eD+His/HTieNVCyDeYI
+7y28qMKiUoq+fGPDtKmVlC7cKHeJZgwz9tQ9q1NmUaFfxZJ/oR7L0+JhCBxh
+93RfM8xwpM3XI17cdSSF9Dd3/cwsOF1DY5crTP+Ycfq7Eur/YkrJk/O5OU1S
+WDefXPSmH/NS4/obzeDWl4F6fJjhrjW4C6bracaVwf0CceUWeEprf9E1OPKn
+bpE++ouYqCtthjne4RU5cEvqj8P/kP07rz2Zg/mKmX2WNqjHy4/9PQH+EJV7
+9+wCkg995BM8z95psQSZV+OmmBvy6i8TTz1M8ht/P3AebuVIm0jT4SC76Bfw
+nRWL/9oIc9rXJPyC/UKzs/+Eqfv8Xmk8D+a52MAxmL6lnfsD67e2X7jF1MK9
++0YyOuDuQ/dckmCauGpAGnzAW0uiQYs8/wVbzWGFCDndaVhg6jDSjP5iAoZc
+dBbh+Rkd9XOFU1mdu1bDdIPgSw2Y9+HYCWMOTPsxqm0Jhz6pTwqHOe9nDlxF
+Xo02pVPENMVxe/J8Us/InwqABacGKyvwPFYWfuCzyf3iUhdc4HU7f3lYwrw7
+fyv+o8iistNSQtXh9F37TGrg9Oqtbj/Rn7DXSSkLPhfzb8gr0v98laqTcID7
+KY17MNtsa+9FmGYzdL0EjvTfp/cEVqnussiBOZWeixRQL9ZrfMcpuCLS3jUU
+/rnxdc1pmHXW3e0x3Ox0Y9YFcj5Vg8FE/2+1j9+tIedDho+Uw1c2JveR+txv
+Vbe1MH/UFr+OOaT/iETjEzAvpT5tFdzOki4dgY9Nf88/DHMNl/5hgzwruFEG
+bWQ9j7F7N/wxPmKe2mLUazQvy4JbLr5RCIUZ/rWSPHhAN7vqJkxvfcw7QfY7
+MHOpJdgvp8/nkP2q6xKc4Ir+hR1q8K0lVZuSYd5s5yA+6ucndgT/RdbLu2e5
+w5y16huG4PTk2zIdmOeWJ3v57KXIl8fmroYlwoouasKU5Jf2OuShwUu8rgPz
+PJLzzGDG1/ApbZjlve2PCuTbXLXviAbMLk49ZEXyt1z/Ugrup9dmding/TbX
+pUNI6pWuyjgI293PSOmCueMXklfDMU2GnlXE6/TClimQ13t13hmY3dGpoA1X
+a3rfi4Ppxc3LmLDE7SGJQJjqsjEOh9MXRUVvIH60K7kC/qofcG8t3P5CKWs2
++nHtW7iCTeY/lz29Hb68l97tR+6zlrzUB8e6z+qLhRm6TxZ5YD6atOGKfJLv
+K8ueBpjjrshpg1nv7pkYIZ8lgcuWkLx4s85QqbBQT0faFU7X9896DqdUyZhl
+wO1xw7I05N0ZZBfXB1fM1/ndGL4sy08x0Ma8g033zGEl+YDvcTBb9b77Qngk
+biasERb6GOwfxX0DPKs8KR30s3PTy8vERwZSnGFaAlvVhdRvus2Nhxm+f3U8
+Rb+e/tHLi+CK620Jm+D3VemPm4nH1M3J+8FPsXXkBcxp8At2gKUVbKvfwe21
+z2/WIL9z7le738DsA8ISC5ixY6P/U1hwr29XvTyLyri85k09nH5Qp8oP5n4w
+tSuBedNRTjQ4XutL/nFyf7e8ygsa6gmct0SQ+n+o/FsHl30u6HGDhfzd5Xfg
+7i8PdpmS+lNqlT1wq4NrpAaZh+4cJIn7LtYteiRL7mNQsu7wB2cXk9lk3VLw
+vRhWMxIMzyHn30lfpZHX01mr++Q8W0FZNhEuS25aYEn6a3bIn4AjzVQa/Uj/
+p6YFQZh/rUukTDrM6qLG2uC+RMuOh6SeZuUsfeRnPdNyWFYX/YY4BOyGN/f9
+6+AFC+bvsb0CfyuufHlRl9ybV91M8rdY9V0It1MPpR7AAb8mGHZ6qGeokkY+
+/xbUqy5NgTnXbrfvJ+dF2/JayXrG8CFTmJm3IEdqGZ4vxY/qIO8v8U27bWFh
+g2CTH7yyq2o0GKaHPLzzCvPwa5KZyTDrz9f1nnAFtXBuNswb8x1uQT4tvs7Z
+BeQ+b5F2e7hN4fOJc3Ck24FJPvIWxK+cnw63/29v0hp4c2hu2z6Y+tNGpFsO
+33eXs3O3wYKJvAAmfGcgocyB1NuY09wzF/3HnPJdQtbr7Hh/wj5ZmSoScH+F
+rWIRfGtdufknzCdwVxnqg9n19V96YNZfzzOdcZ9jRwyzhaxPDmzvhZXGZAUN
+sPB1dORq9HNFOF35AGY/Kg64AafJz371gpwfNQxejHmyT5cmTsIV5gZTZ+GP
+OZ+CF5J5e8djJZFHyv2JzvXE5YHhO+DoFqczJ0g+GQ9vPIClpdSVOmDO0WOt
+8sj32pvtfmr66J8xLuoIWyu9XxECc34oZ/nCA1NpgTdhHvPOax/yfSS301vU
+gHy/aPmsgOM31j5cA1O2vBoZeObCZu5JmNU0p7UO9SwfdB55RPaXqMd5w/8T
+Xe04Q/Yb3swaRP+dtoWJ2oaYv/hKYyAc5aRz0AFmDFUZkffTx5oWiY1w/xoJ
+n3Ww4+Dk+q0wFSP5/Djy88m9umQTzHrUWJ6KvPl7Pt5cDdM/D4eVyOL7cFT0
+kjnMec3/9nEOizr0csPQfJhbsL1oM9y51OjGD9LvZFrvpAyLKvT+uu0lcWN6
+4yNY7UW0Px/mdtev6IE5Zk/FCuH+8vinCjg/kiySROalL+mv5cLrXH60HCTn
+p6Ml5qN+X5TK9gSyX+nu1y64e4c47zDZL//GtBj9cp+nK+fAApdIHzJPwOOj
+ErcNyPtju5EV5lV666HXDzM2L/pRDLvWqN9SRP9sG5UCOZKfQ+kONplvdPWc
+UHhEuPF6JizImOy+Ci9rOJjYR/JlJPm+grWrvxTpG+H+cV3xCdgzu7I5Dm6X
+LnAQwn2jk9HNMG/Up7YDTlVQ95Yzxv0KTZY58Lf4ZS4eMENMtNIFNh/Y7XkC
+5jnO6L9Df4UJBp/5sNB3x+kIuC1X7tMg3P/zvWkX5pMKsnpCMbD/XMQ4H/NH
+n9/3aTbcH/6WW4R8Kk/3RMnAgucC1WzkKTZc20rWBf29OXnI3yXgZ64IzDlb
+rXhHGr9vpLgFfcb9VLbLGlHY5zNraSfMKpL03S2F9/Ol1xWVpP8tPeFqsKn/
++pBMmF4oHzIxG6+Pcs3rMbDALWV4FtbL+iQHfcj68wJTZ5hrXWm4mqw3zrOu
+hUXPWe60JfU+HnjlhXo/5wpsbIiXuS1VRn92qXLXHMi8b6vzP8mQ121X5Cbi
+HJPmJ5jHQ9X4KqnHmh7YfwvzquWOSF8g9U7KHc9EHnaHt1b1kPXLZ5T8yetB
+62W5FOalJRbPlUCekvefGRnA6fKb95LPC78BQ6/1JJ+QzWtj4GGxcYlYYqco
+0WOw/j+DtAKSd33i8iR4OfepfRODfB45l2yDvR9bhg3D9A80d224cfHaOGkT
+zK2rF3MZ9ZPOsxJ0iFUl1J6hv5mSztv2MFWSnfMe/ZeUDJzxgHnsLXv7MN9g
+wc0Wf7h/fGbNA8z//p/t9iHk/OsIkxvIy2zLG70w4j90AguR586Tod+CiOue
+VlzB8zBmznXzgwUrwiSfSOJzjrdo9gZSL8xMRA2+O5G/bBWpNzR1KEMCeT6r
+614Osz4sjrWFXSJcLbRhuuvZI5rwIe3lh1Vhzs6DUmbwHo74JzIfh13wfR98
+IUiwR4ScP/hWbgKe8f9b7Sd5PV4UCDNRr3DyeuYPkl9ad7QXeb30au2gyHwn
+m8WM0b8n77dJch9lHiquhPlKY25Yq5P6t1e6T8MfF18RNyH1LnuWPUUelxRP
+v19D9nvt9spHXkUWfqbhZL/W40hn5NmfZDgnjcyXOXvPA1jUTXZHJbEN57wm
+8l8vGmX1grjUStMe7q2ZshIxRX52IuH6sFLtC6YO3N/70uMtzn+0iJ+/BqZk
+JqaD4NQV+++Gw4Jis0e1qG/rVbMy5b/9+TZD6E/c+tpgAVkX8Ts+jv6ZF7u1
+bsC8kvrAYcyrm5V6lW9K/n25JbwLeTxs9U5ogulpzx7fQV6CYx5tzWR/4TJ+
+BfIMu1Qk10D2r2NO1Yjj82rhobFa0k/OV+e3Yuj/3dYN5WTdq1HNFL5qocy8
+QM7r36FXzMLvN9PRbafIfFnzRLbBdw3WMw+S/vr/XuoM08XUanaR+qWpvADY
+xGh9RAjZX5Kkdx1ecOnIb37kfvujVka4/8CR6ONbTMnva0PMLjhlTmkescDk
+2Kss9MfbFTjPn6zLjHGi0P9+bqXz7+Q+h17lzZjP/uYe432kv62PW20xf6wN
+7cx//d3Q85qHfDTPT/wqI/PprKVewY7RIndbSX+m6rSDyNMpzlE4Su6/zzf6
+BbszRo8pm6G/34ruuyH/70upcCZMPybwCINPrFroFwhzYo4ecYcdLTVMjhJn
+dsVQ8N6UmLoyct5C7NgB3Bf5yOtbK1mf9zakjfTjGzzxgaxf1BJ8Q7///SeL
+OZ73L/yRZP0f984Zvg==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.685335142736616, 3.176806979126948}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwd1Qs01FkcB/A/jViR8YyymTQ1o5TJYRul3b+UIjZZKzo9JpqoqNke8kgr
+lWg5nAzJei/GITWidlAItWRkijQ2u0a7ZSqvynbItO337pwz8z+fc++59/v7
+3Tszi4KP+Am1KYo6hDd5UizyMZ+mGOS5nKYUg/GtaiuaMnvOeVG3jKbKX81h
+34ZFwfqKE/BUFScrBi48uOmhM0xNTu9YAtPXKu7N2NGUSj7reKMlTR23zt/b
+AfMSz6Vthnn9fdqFMOuE+9j9eTRVEjtQHU/mr7zrvg6+emTMLBxWxupeum5B
+U7I9FQeCYdGSGG1beERRnRBC5o9y7mSb0xT7vbDjMJyeYdc8D3aSlLufhZt1
+cmXFZjTVu/NgXgHMtKn50xWuXStxboHVcvc+tSlNuR71X/kK9pVPicvhwu6i
+0yaoh3djxdY4WGX0x2xXOEmzLDwU1gicSkPgqAHnhP2wNS/V6wIs0MrZEQ1f
+zfllbinMHT7/KQ9WvKta3wD7dm289whW+zw80w5PlC2KMkYebmZ1YyeZf24o
+NAgWL3zq00b8oC2zFE6Pth6phgMtUvvfwvHJPnfFMB1lo78G9U78XbA7As6e
+57A0Bla7c+tI3nZ5SOw1WKQbz2KQeobjHvTADJsPq+6RevPMQ4fh3K3t7WdI
+f2ObthHv++vfN2thvcHMLY/J+MTP9f9wcQ6csOcSmP9oMKAa5tpbngiD7Q9F
+PBLBLOsZB3NY6TLf/Cti271aUuQ1uODQqw0ztWoT18IMfu9JJQfrx7x4V49+
+lJx2M5HBsibO+CpY9IOnfzHMZ9meLDHBvTPJSrwMM+2oGxYwa+j5/w7kKztS
+jHHvrLw7iuDylA8t+rBcXrbrJtzckuMvZqKfsVVTClgklLTZw77fSqj3sOqy
+d1qVEc7fdm6eFfIp9GrlXHiEn9O+nuRPut3TNRf16c0ShpP8hxzz8+ANMzVb
+xTC1aOLsZVjRUBEpg3kVXm51MMusZqSPjAsdDT/DuY1rNKNkvS95jSFYf/NG
+Hb6GjHs90ajgtgHrZAr9zs7ob16NfGHsKJePJM/LddfOEg+OfFTDKmEnSwGn
+9yx/LYcFXVdGLVGvsqI8tQzmfxAY7oBL4qIUkWT9zv7WNNjeKGj6a5LP2L3t
+FumPBz+fgpVdJdvkcFjOTfEd9GMiKyvoIcyvdlKdhOOlCUkNcPs2Xv4qOD2h
+ICADru1LfTuyFN8TD5ZhAMzlN4xWwsyJA60MOFsRkiCC6cxQ/yKSPyghzBXm
+/7rfeyUs9Uk2NoZ91UGFu1C/NMHjyvgS7M+M1HijXymmBg1KmH7Tk+VoSFPn
+6pMeyGHV6miZhQH2LcqUdsKifc0yrTk45wnLkV4yvru7cuYLjO+fzBqGfSOK
+TA3g9qruw9rYT3RdkuWih9+t7WFDi8n+Ol2Nybo0dWp6bIEXyd+/vZWCnXSf
+WR+DWYz6PUWzcX9NLvyWCysuqmThMCvjyVQbLDiq6xcMs+PMcl/BquDTxvGw
+7MB3TXrkvgU6fN8C69UJy1iw4PVCCzbWD/zU98wBlmb8ZFUAazj23zgTX5Kv
+sEe+bL+XRjxYYZUvaoXFkmeTNuQ+X7LP3Yl6/G/lf2bAhT+ObR+HkyYfVw6S
+PMtXXzymj/s2fvx3KTEllAzBAscNHdFwc2DpjCP6xSwunk3Ogyc8NbJ3Djnv
+PcHTpP+qNIeDpJ/9swZqYIrOndwMp2zyTIuA0yOmqU9Yjx0bX8CFBQeLGhJh
+6aYK22E2xuXr7dTIw481NayERUHnlWxYkO+yMBKW3nFrckM9mtqabk9Y8ZTS
+34j6b6+778GBm7fkDTqjX21iB08jmPILWGCtg34H5zhrw0zyv8TA+X3GazH9
+H76vYPg=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.6231646322958344, 12.838497563090474}, \
+{1, -1}], LineBox[{{13.5, 13.500000000002307`}, {13.5, 6.499999999998607}}], 
+        PolygonBox[{{13.5, 10.6}, {13.1, 9.4}, {13.9, 9.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.594402784781746, 10.950315888839512}, \
+{-1, 0}], LineBox[{{13.500000000001851`, 13.5}, {6.500000000002592, 13.5}}], 
+        PolygonBox[{{9.4, 13.5}, {10.6, 13.9}, {10.6, 13.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 14.4452}, {0, -1}], 
+        LineBox[{{13.500000000001851`, 6.5}, {6.500000000002592, 6.5}}], 
+        PolygonBox[{{10.6, 6.5}, {9.4, 6.9}, {9.4, 6.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 7.445200000000001}, {0, -1}], 
+        LineBox[{{6.5, 6.4999999999976925`}, {6.5, 13.49999999999251}}], 
+        PolygonBox[{{6.5, 9.4}, {6.9, 10.6}, {6.1, 10.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.554793699764814, 9.000208212001706}, \
+{1, 0}], 
+        {PointSize[0.04], PointBox[{2.5, 10.}], PointBox[{13.5, 13.5}], 
+         PointBox[{13.5, 6.5}], PointBox[{6.5, 6.5}], PointBox[{6.5, 13.5}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T2", " ", "P1", " ", "N3"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbf/cgdhei/fjghgjhiij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbf/cgdhei/fjghgjhiij.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {44, 44}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwt0gs01GkUAPCPkUaZUrFJjh3yKEaLRJjO/18ipKgk6UFko5RhdCpNGhxR
+x7GqIdVshihKQi/yGqVFebQpFGVsNMqzsIZee+/uzjkzc37nft/97r3fpx8Q
+tilImRDCgy/+//dRoYkm/hvShCz1ia5TponY6TZTHyzZ7dZQqEQTwUTBjI1g
+dr1ofi2hST6L9k3GeK53209gWVVZbCtYOlWw0vMHRWrmXdxvbEQTOnX62u/f
+KSKo5yZEgUlB3pQtxDWMMpjNYGnFE7dxMEfyUJdtDPmG66zOQT6uc6ThPjDd
+x9rkC+erS5T689DffUdWQX3pbVmtnWApi6Vhz6DJM+eq2UomUIfN2geW0M8L
+83KxFpi+a/Vj/jSaeKUW83TAEoPm8U5w5OJfQjXA7GKH/AhVmmQHffKYhHz+
+19dPNYI10iKy2sDsSjVTOVhmVHOqAOMr5oY+ACdlqIhjsJ5s8zku4B37VuR5
+YT0BsfEiyG9tfz/GDNeva2blQj3c4bPlamBZa4pbMtRrcWBnzGfoX3LqYOIW
+6McrTujTB5b95drHgn6tuQqVQZzXwOa2FJhP7uniECU8b7xabvaNIswkE4ER
+WHjc6KT6F4qMNY2v8cH4VQ/dDZMUkbGihs6jUw5tV1VQpM74pKwbTML5Y44T
+FBEHiORW0L+0oaWUBS63NQ5KAJN5JSsCwJKPESc70JYPmmxhv7WWWbTZYvBl
+gcNxyM95LK/gg+kyjxwdOD/JsdusCG2doDT6lSJHnB9u7AYLI22f9sL9t79+
+EaO8BOI37A4H4/0G+4zMA7N3xAe5Qr9MTlyVFlg2Yq2tCvOga6O+MTHO2qRz
+BtyjHygaxvz64b1d4Ny0SPMGMLsxQ9gPdqltZGaBZfvyPxSCk+z8GiIxXnR2
+tSW4hvXS3QXr2e8vDYfzNF5XbGbj+tOiHcegHt6Vrb8SsPT88kt3oN7O5ICU
+fnw/7GqxPfRDLuva9KDPPTqRB/0Hs/VGME4m0gIXwbzYV+z4DNyvnFpdP0aR
+kqaGeFOsdyiSX/YZ7iPakOGP8VC6e+4nirjzqgcysR69P3rqhimSXXskcRDn
+2/G4OGqIIuo/ck9R0D/xGUl3AvuraDqKwMK+tAOLYL00LvStHONjyvLoEYpw
+XTak2ZjCeXa7Stogv3Tr8mEBWFgayIkbpcge1fkD9zFeLtgTOA73URrr0AuW
+Sq2CtkL96X6ZvgwzyDcZwlwJ/bH7GPlzwLS3hdLoFOzf9kGoARaeLnruC/Ow
+WBeuqQSW6uWIfeE9irsYRzEfvVAj6y1Yos88KsX8GzbyX4MV/dLQVHSCPM8V
+zFY8nR4MJsHdphaQr/0dV5+L+w1ZAxfgPNnBjKNaWH+BH3UR3l+niXvsBPY7
+aHvL7W+K6NruXdKL8yi+JaiH/tTJpZsydPa9Vlvo31NhJujH9SrN9WGDsH/W
+3oWqeF7l+oSXffB++UUGFuiO8Z/f9MB7jSum/63HZvWq0m6KaK9x8MhHl4/q
+srvgfsoq+ZPo60PST51wv448N3ecV+/j+nGw+o1jCzLRXbzABbC+5rCn2hja
+IKZFBPmC1W7uWsUBX+tcvx/Oc1n2tTgeLJyTOdEhh/i9IpNKjL95l5zXT5E1
+Cy6f6UM7BHifgfvmGOZfYJjD/FRbYq9Bf3VROn/OAtP8ZcGe0H/PW1IyAyzk
+GmfnwPvrPFR1VwH76ST7sGS4b07dE0YHnsf5uFcBTrmtmXQH8/sZ57aDv+qz
+KhLRX96HcMDWls+3bEc3qllOQn4V79/NLTAfc+YRd3jP6TMfTc7A+O4TPfbw
+/njRhVrD+D7OivUqof4XSss9u7D/Me33t95TJDFDq/oNWtvFIhnmIXEPzetH
+e8WE2L+C+zpW5K+G+RaNpnGfUUQk+M3DBs3rdbaopsjI1SYFD82+4BqWA+5u
+mX0fnbJ2891zVURauvPSNOifMJ2a269VEf/iCINt6MIxgXt2FVE4vZLdRP//
+0cafpfQ/QPmcfg==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {0.4684378539501304, 12.411618926975063}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwt1Qs01FkYAPDLoJS1xBSNalBrFm0qLCf1/28kpDU9vRajVluOZ3ZPbMpU
+FJHG7iatZ+UUztgQYaMZ5BHCmvEKmZQiYjwqFbXf1+6cM2fO79x7v/t9373/
+/+gfCN7tp0gICYEv/hLZJ/gwaPL5s5omWe3T63cp0eTZth5ZviFN2NqbD/qA
+nYuOGriDZYk3/I3AaeVeqcpgfmrP1jxY3/dE8mWpAcTJTfowpkiTsRstsyFg
+Xqp+4KwCzIu86GKJ7mgt6iY0sTpeyFPF+TO9L6w+USTLOSB3VB/mxUyr5cxR
+hJfJrOoH03cK5ez3FBEqWHAHwOIMPqv2LUXcThYwJ3D+25lzt19TJHpxzbtF
+EI+/8U2LygxFtPenrzXD+Mq6yZIpipivb9/nCRZn9bgagYf1v6iMxXEJM2UB
+OOC2dkIxrg+rFYSCdRoaGb3omh5Pj2mKNPwiKpnF9QnNl29B/L7HpGwR1C+e
+NT3h9gby/3X5P+pgerBl77ezsP9q4RUGmGgmWplA/mzdjKRhWE8fW6e0BOu7
+U2h0Dy3UdG+ch/w2zhXFYD7BVLIF9IOnmu/9He73NEmiB/2KPcZVnYF6iW29
+vS9Ymndc9yo4y3iwHp1tG+LkDObF+s6xwAl374W9Y8P8IW8fQ4inbbfJRQjm
+L1EOSYL9fjxTRB8Gi9nuNpc+QL1hhQZmOP+kDsvhHUWk6j+xVMC0p+PXDVBf
+uNx1tnMVeCf3jCXUL/9k4VmF1mrglkxSxCqoZXcjmFyjTzWNUyTEJUVpAl06
+ZNT8kiLNQZkRTNx/3ea8zBcUuf/URt8G95s0EwYMQX9mmxZgPnxfL90dz2D/
+UXHAJfSDgbtbwWn6CyPEOL+6pM4J5scOMCKGcPxlmocTxNPbEaqtgPdhT+a8
+LuzHcx/ha2C/1E0nYl5RZOEwQ6iJ49TDP3PkFMn2uerBwHG7M6lpcN7S8tOb
+MB6xT5NEQn02KsvGSrE/dVe3c6B+oavFRCT2Q21e5xTcPyuH75Mt0fHmjkFw
+3lYLeipaoV6+9NzGfnD3Qs5ZDnpJ+o1qsMbHXVpRKyG+PO0CC8cTJzV6V8D6
+30UrX0F8gex0jy1YrBmfYAf3OWXeQUWsB/Pn/bdYwv1jp19ZvA/MVz2S1gf5
+u9mHPVfB8e5wkj8Gpm1kXSyw6ETdeehHwSbrgAYwv+2PB8mDEH9FLfvzeI4n
+a00fRcrsbzUTXH99bi5USpG228dv0uhxaedoM5w3K++KAO1s7Td5nyI5R++l
+jKCNGW+2V1GETkzVtIN8yfCrHIVq6O/aEY8UtOmAx3gdPA+2dZwB9ExBZEYr
+1JP4+r0m1r+qQ1LcAc+fq0qUCTp7g30F5MNpK5AZgflLk46YQ768klyGMvry
+5Jzuc3j+EqKvV0M8fhyvpHEE7t/ZatcDGP++SpwynC/3fOvxF5hfevwBwQTc
+Z+P9c/vB9Nj2+nToV5t0SK0U6hdvMLWfAnOCnRvVwfTFhMUVYLNaTqvfclg/
+oO04DesP71SrqtEFF/PqD0L8AtZM3zq0Usn0c9g/JX00rkAH8mFGmuXAfdTQ
+cZl1AhOO267HMsiH6SdRRA8XVAq6oF/hctVHy8CHlkXcbIT+qCgUtqHpRs9A
+IdyfR38rDqEDRsoVSkSE+3hNhBauN/vKzeGBiOj8HMRwRRsGxtHtIiKQhuzO
+Rdck8SQdIiLfomrFwPwmd3Ktu0SkbEeslhd6b2B7cKeItJkM2d1CJ/X7XpKI
+CLtpMHMK/c3UD60PRSSF693NxvrdTKajqkQk3NjviTlakGrYnyIiPM9waxO0
+s/fHyjKo/8LJVYpoHe57WRNFZH9tyy/HeBWC4LVwvm0Uo3MP+nTZkUO90I+E
+YQcp5hvt78+E/nDoGGsanS1cJHgC5+W0RTMD6ud3yEMZcP7y3yLUXy+FcdVr
+0T4wzjYy73JGlzttcxyA90vUMeV8Jr5f3G3re+D8WPxiPfS0MD2iHdaPezGv
+aYMNTiwPr4H+xh/S3Kr9//9cVuV//3ta9L/6LKiQ
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.0315621460498696, 7.411618926975065}, \
+{-1, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{19.999999999996362`, 17.}, {13.499999999996362`, 
+          13.499999999996362`}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.738470230054478, 15.789812429898827}, \
+{1, -1}], LineBox[CompressedData["
+1:eJwd1gs0lOsaB/AvjcmlzSj3mEYuIcZI5BaTS4YjueS+d8eeCh2JSkKtmvYh
+NqrphFAkXbZITS3bpdDQtnMpDYewSw0lk92O2rl1c/7vmbVmfes373zP+zz/
+712zxoCfELhTjqKoPLzJlZpbwMucS02Rqw6XqjiSy2Su4VLczIc783W51Dpn
+tcPeMEdt2oO5gktRt+NlAjjx5KWGPLhipjy/FZZeZPT8DXvYHrBaasGlynb4
+da7X41IWIX/OR8BC9wSvbfCgiv50FUy1pO+OhlnyabQvZP3Biwl/mOaZqcWz
+5FJiuYXZlXCW39eAE7D/8nLOAKm/08G6A6bqDu86BCfqalfPw9Lu6YRlsDQi
+J1CfjXUdq+Zy9F+RKwyxgYWj9iY2sLPhqTInWOrZntKJef2PF3bZwQL6IosE
+WLI1lWkCs26N0lfDDxVoh5ThsgtV/TPaXCrqTILnG9LPO5U1o7D0i7JnK+n3
+6D7rP2GOweujRfBUeOHJZbhfW2q7fB/M6jKODIX7zM8rbYHLlhxk18GmyzbZ
+25D+zxm5sEneP31TNYAlBaWn6ojdlmXqwsKerQ6bMZ/2u8pPLPJ9R22RDG7n
+vNe3Jft/Fev9G3mp35NOhcCcwfpfNfS5lKxmkzgDFtT1axXD4o4JthgWuc0X
+KTG5VNJ/4rxomE+8mn2WDxc+eZm/BeZYp1SVwnrDCrwLMMPTUdoIn7+qFzjF
+Jjm9bSMW9T4ucLXCfGslqRfgxlwFRjYs2BVxNgaWhafMPIQ5ESqaOnCuy9cP
+chzct5Cr0YB+RjMSjujAQsOjxZthhSaPNDOYM9/hOox5+CmMorXEgZrSPXCs
+j/P4Olg8oOmsCPtH7+jkwNIZw/LbyKPGy/iLCZwYePtcImy+r1SgDTOKn172
+grOiTYro8FRB9XtHcp787saMoT/JKxcPX9iUPnmrkfQbXt1PzlfWzQjLAlj6
+aG1QO+z88behJFi4K3mSjf2/30jfHwlTn9ZnVsF9yS6bfeGpjwcG7DGPyCzU
+zhtmaPm0SmB1df62ILKuPFe6G3msK1PkxZH9BzRPy6/kUs9GXrQI4bJDUaN5
+MEv3lawV5jF5lkosLtWspKpLcci5jeW5wj81R3oYkvyaeUUxcP3Ltkpvsn5Z
+pfQYXCbm/7EXpsKVhblwhImMVwxXmIzFZ8F81kBsC1wfeu3zAThZXdI0Ru5X
+a6sPgX0Y9Cl5azyXktiHFjB1pXeYZU2e5/XeafTnGJpeaUustyI4Cy5Wvdrh
+DrMCvfq1YLGNBf0fsKC7xqoK88Y+MMsgljxJUPGGa7ZP3PeEKcXe07PIJ5uW
+fdoRFrkGUY1wYfY22hpSL+noMXJ+9/2rKU4bLjtROJ4Py2UNuNBI/YXK7Jsw
+PyhHcYrkMTBrNw5TstVhw8SMYisn7LfpmdmlR7DgZw/PCjhl+JNTK8nHZ3LB
+DP126omcGuEyy6ChO3Bs/rUkYs75c27mmL+9vDvmPjw4+84gBfZfMb2hh5w3
+NrvkPjxa1NFG8qsIWROtaID9zm5NptDf4FPP1E1wVjJihoUqIx4psLrk4hUP
+WJZP7zoPm6wKvxlH5vvu8N3b8Kvtz7XySB4fp9MbSL31VGAjuT/l+Pe3YFbq
+ZO8oye/Ka8dzcJhCogl9LeplNj0m9dlhI4uMYbF8bpwvnFhtHOwCz93dNqIN
+X32THRYAh6n+98cR9G+nvlDwA8x6GRRwDb4cofyRD3NmRSuS4MPZXtU/wtyY
+kCWeMG+jTWgEqXdoj9JK2M+ytH8zPNXEvEyD7zTK+W8gFtUenESezYK4Veaw
+xGqO8Tfs1lDRpQFnPQ4TkPP9trh5aBFsOugcRPLu5eT2T2K+qBrBu1CY+a2G
+PULycVTPOQ2bOPeZDsD+9S2/9cETA5OdvbD9WGoDk+RJp/X2weKdqla74W+9
+ob8ME29JaiJ5dp7RifyL1P8u4PPiVZhbNfvSYuwvUKqu9ILZSS3SlXBhetTL
+Y3DZ82dGG2HGRUMHEVzra8aNJuv2vKcSuPTkdckJuL3kyPVRuPsEd2strDAU
+HzAG+50Jcn5O8lscZTsEcxp85Gg22D+lLf0evC71kJMJXPHgiX4x/Lartsod
+tn/ETImDfc33B0fCsRmW6XbwE+XW47vhuae6Gd8wjygjZjQZZt3oGfsdNgot
+2ZEGCwMCl56B7wS7bz8IS/h2ltEw9SHt5z1wvXajgTtsHz3eHQWL1Y64WcAu
+NPm4LbCp+z2eIbzDeEObE6mX/Wy9GVwuPc5fTer9ruTvAtf+mt6zHB5sUVHm
+k7w5hgVycGKXjiHZ3491X2OanEefvZcew3nvP6S/JfnlLJHTwDyvc64OvIGF
+y+u4UfD1vY01f5HzORGvfgOe69kfPwdHJfEYn2Feufu8IupLX8T0uhvi9zzV
+e8aA9O/hwMmA02743HAl/TW9+WcjrMmjs/iw7JRMbxz+o+SHpVlwmFpR22Ij
+fO7wC11EngfnZqIafPJzcOYgzClkzqvCX8j/JPj/LyPu/wCdFD/V
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.211924601828787, 6.873740025175105}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJwt2HlYzOv7B/BPaVFJ004Lk6VF27T4tk01lEqkkYS0jDptpw5JUkSTREiS
+aKOGE5WiKFRHY7QJSSuOSCiJaFJHiZPf+znXzx+6Xtez3Pf9/swSWgE7PIJE
+KYpSFaEo8pOikb/UWBT1/z+rSzySUvGTtpw2xx4/Y+XSGhepsyjhWmogGE79
+emY5H2ZvmrTdDX/QapX11sD5Y4mjofBIoAh3DOb9dnN6Bdn/LFeYoMmiKnrU
+00TgzQUpeiILWFR6rM9kyXwWNWDdcHQnHMlxPGoHV8RbGLXB3Iy1MQ3zWNRz
+9gYF5YUsSiDlfMEWbrFo1F4FC5e4BN9QZVFrrUN8/eD+His/HTieNVCyDeYI
+7y28qMKiUoq+fGPDtKmVlC7cKHeJZgwz9tQ9q1NmUaFfxZJ/oR7L0+JhCBxh
+93RfM8xwpM3XI17cdSSF9Dd3/cwsOF1DY5crTP+Ycfq7Eur/YkrJk/O5OU1S
+WDefXPSmH/NS4/obzeDWl4F6fJjhrjW4C6bracaVwf0CceUWeEprf9E1OPKn
+bpE++ouYqCtthjne4RU5cEvqj8P/kP07rz2Zg/mKmX2WNqjHy4/9PQH+EJV7
+9+wCkg995BM8z95psQSZV+OmmBvy6i8TTz1M8ht/P3AebuVIm0jT4SC76Bfw
+nRWL/9oIc9rXJPyC/UKzs/+Eqfv8Xmk8D+a52MAxmL6lnfsD67e2X7jF1MK9
++0YyOuDuQ/dckmCauGpAGnzAW0uiQYs8/wVbzWGFCDndaVhg6jDSjP5iAoZc
+dBbh+Rkd9XOFU1mdu1bDdIPgSw2Y9+HYCWMOTPsxqm0Jhz6pTwqHOe9nDlxF
+Xo02pVPENMVxe/J8Us/InwqABacGKyvwPFYWfuCzyf3iUhdc4HU7f3lYwrw7
+fyv+o8iistNSQtXh9F37TGrg9Oqtbj/Rn7DXSSkLPhfzb8gr0v98laqTcID7
+KY17MNtsa+9FmGYzdL0EjvTfp/cEVqnussiBOZWeixRQL9ZrfMcpuCLS3jUU
+/rnxdc1pmHXW3e0x3Ox0Y9YFcj5Vg8FE/2+1j9+tIedDho+Uw1c2JveR+txv
+Vbe1MH/UFr+OOaT/iETjEzAvpT5tFdzOki4dgY9Nf88/DHMNl/5hgzwruFEG
+bWQ9j7F7N/wxPmKe2mLUazQvy4JbLr5RCIUZ/rWSPHhAN7vqJkxvfcw7QfY7
+MHOpJdgvp8/nkP2q6xKc4Ir+hR1q8K0lVZuSYd5s5yA+6ucndgT/RdbLu2e5
+w5y16huG4PTk2zIdmOeWJ3v57KXIl8fmroYlwoouasKU5Jf2OuShwUu8rgPz
+PJLzzGDG1/ApbZjlve2PCuTbXLXviAbMLk49ZEXyt1z/Ugrup9dmding/TbX
+pUNI6pWuyjgI293PSOmCueMXklfDMU2GnlXE6/TClimQ13t13hmY3dGpoA1X
+a3rfi4Ppxc3LmLDE7SGJQJjqsjEOh9MXRUVvIH60K7kC/qofcG8t3P5CKWs2
++nHtW7iCTeY/lz29Hb68l97tR+6zlrzUB8e6z+qLhRm6TxZ5YD6atOGKfJLv
+K8ueBpjjrshpg1nv7pkYIZ8lgcuWkLx4s85QqbBQT0faFU7X9896DqdUyZhl
+wO1xw7I05N0ZZBfXB1fM1/ndGL4sy08x0Ma8g033zGEl+YDvcTBb9b77Qngk
+biasERb6GOwfxX0DPKs8KR30s3PTy8vERwZSnGFaAlvVhdRvus2Nhxm+f3U8
+Rb+e/tHLi+CK620Jm+D3VemPm4nH1M3J+8FPsXXkBcxp8At2gKUVbKvfwe21
+z2/WIL9z7le738DsA8ISC5ixY6P/U1hwr29XvTyLyri85k09nH5Qp8oP5n4w
+tSuBedNRTjQ4XutL/nFyf7e8ygsa6gmct0SQ+n+o/FsHl30u6HGDhfzd5Xfg
+7i8PdpmS+lNqlT1wq4NrpAaZh+4cJIn7LtYteiRL7mNQsu7wB2cXk9lk3VLw
+vRhWMxIMzyHn30lfpZHX01mr++Q8W0FZNhEuS25aYEn6a3bIn4AjzVQa/Uj/
+p6YFQZh/rUukTDrM6qLG2uC+RMuOh6SeZuUsfeRnPdNyWFYX/YY4BOyGN/f9
+6+AFC+bvsb0CfyuufHlRl9ybV91M8rdY9V0It1MPpR7AAb8mGHZ6qGeokkY+
+/xbUqy5NgTnXbrfvJ+dF2/JayXrG8CFTmJm3IEdqGZ4vxY/qIO8v8U27bWFh
+g2CTH7yyq2o0GKaHPLzzCvPwa5KZyTDrz9f1nnAFtXBuNswb8x1uQT4tvs7Z
+BeQ+b5F2e7hN4fOJc3Ck24FJPvIWxK+cnw63/29v0hp4c2hu2z6Y+tNGpFsO
+33eXs3O3wYKJvAAmfGcgocyB1NuY09wzF/3HnPJdQtbr7Hh/wj5ZmSoScH+F
+rWIRfGtdufknzCdwVxnqg9n19V96YNZfzzOdcZ9jRwyzhaxPDmzvhZXGZAUN
+sPB1dORq9HNFOF35AGY/Kg64AafJz371gpwfNQxejHmyT5cmTsIV5gZTZ+GP
+OZ+CF5J5e8djJZFHyv2JzvXE5YHhO+DoFqczJ0g+GQ9vPIClpdSVOmDO0WOt
+8sj32pvtfmr66J8xLuoIWyu9XxECc34oZ/nCA1NpgTdhHvPOax/yfSS301vU
+gHy/aPmsgOM31j5cA1O2vBoZeObCZu5JmNU0p7UO9SwfdB55RPaXqMd5w/8T
+Xe04Q/Yb3swaRP+dtoWJ2oaYv/hKYyAc5aRz0AFmDFUZkffTx5oWiY1w/xoJ
+n3Ww4+Dk+q0wFSP5/Djy88m9umQTzHrUWJ6KvPl7Pt5cDdM/D4eVyOL7cFT0
+kjnMec3/9nEOizr0csPQfJhbsL1oM9y51OjGD9LvZFrvpAyLKvT+uu0lcWN6
+4yNY7UW0Px/mdtev6IE5Zk/FCuH+8vinCjg/kiySROalL+mv5cLrXH60HCTn
+p6Ml5qN+X5TK9gSyX+nu1y64e4c47zDZL//GtBj9cp+nK+fAApdIHzJPwOOj
+ErcNyPtju5EV5lV666HXDzM2L/pRDLvWqN9SRP9sG5UCOZKfQ+kONplvdPWc
+UHhEuPF6JizImOy+Ci9rOJjYR/JlJPm+grWrvxTpG+H+cV3xCdgzu7I5Dm6X
+LnAQwn2jk9HNMG/Up7YDTlVQ95Yzxv0KTZY58Lf4ZS4eMENMtNIFNh/Y7XkC
+5jnO6L9Df4UJBp/5sNB3x+kIuC1X7tMg3P/zvWkX5pMKsnpCMbD/XMQ4H/NH
+n9/3aTbcH/6WW4R8Kk/3RMnAgucC1WzkKTZc20rWBf29OXnI3yXgZ64IzDlb
+rXhHGr9vpLgFfcb9VLbLGlHY5zNraSfMKpL03S2F9/Ol1xWVpP8tPeFqsKn/
++pBMmF4oHzIxG6+Pcs3rMbDALWV4FtbL+iQHfcj68wJTZ5hrXWm4mqw3zrOu
+hUXPWe60JfU+HnjlhXo/5wpsbIiXuS1VRn92qXLXHMi8b6vzP8mQ121X5Cbi
+HJPmJ5jHQ9X4KqnHmh7YfwvzquWOSF8g9U7KHc9EHnaHt1b1kPXLZ5T8yetB
+62W5FOalJRbPlUCekvefGRnA6fKb95LPC78BQ6/1JJ+QzWtj4GGxcYlYYqco
+0WOw/j+DtAKSd33i8iR4OfepfRODfB45l2yDvR9bhg3D9A80d224cfHaOGkT
+zK2rF3MZ9ZPOsxJ0iFUl1J6hv5mSztv2MFWSnfMe/ZeUDJzxgHnsLXv7MN9g
+wc0Wf7h/fGbNA8z//p/t9iHk/OsIkxvIy2zLG70w4j90AguR586Tod+CiOue
+VlzB8zBmznXzgwUrwiSfSOJzjrdo9gZSL8xMRA2+O5G/bBWpNzR1KEMCeT6r
+614Osz4sjrWFXSJcLbRhuuvZI5rwIe3lh1Vhzs6DUmbwHo74JzIfh13wfR98
+IUiwR4ScP/hWbgKe8f9b7Sd5PV4UCDNRr3DyeuYPkl9ad7QXeb30au2gyHwn
+m8WM0b8n77dJch9lHiquhPlKY25Yq5P6t1e6T8MfF18RNyH1LnuWPUUelxRP
+v19D9nvt9spHXkUWfqbhZL/W40hn5NmfZDgnjcyXOXvPA1jUTXZHJbEN57wm
+8l8vGmX1grjUStMe7q2ZshIxRX52IuH6sFLtC6YO3N/70uMtzn+0iJ+/BqZk
+JqaD4NQV+++Gw4Jis0e1qG/rVbMy5b/9+TZD6E/c+tpgAVkX8Ts+jv6ZF7u1
+bsC8kvrAYcyrm5V6lW9K/n25JbwLeTxs9U5ogulpzx7fQV6CYx5tzWR/4TJ+
+BfIMu1Qk10D2r2NO1Yjj82rhobFa0k/OV+e3Yuj/3dYN5WTdq1HNFL5qocy8
+QM7r36FXzMLvN9PRbafIfFnzRLbBdw3WMw+S/vr/XuoM08XUanaR+qWpvADY
+xGh9RAjZX5Kkdx1ecOnIb37kfvujVka4/8CR6ONbTMnva0PMLjhlTmkescDk
+2Kss9MfbFTjPn6zLjHGi0P9+bqXz7+Q+h17lzZjP/uYe432kv62PW20xf6wN
+7cx//d3Q85qHfDTPT/wqI/PprKVewY7RIndbSX+m6rSDyNMpzlE4Su6/zzf6
+BbszRo8pm6G/34ruuyH/70upcCZMPybwCINPrFroFwhzYo4ecYcdLTVMjhJn
+dsVQ8N6UmLoyct5C7NgB3Bf5yOtbK1mf9zakjfTjGzzxgaxf1BJ8Q7///SeL
+OZ73L/yRZP0f984Zvg==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.685335142736616, 3.176806979126948}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwd1Qs01FkcB/A/jViR8YyymTQ1o5TJYRul3b+UIjZZKzo9JpqoqNke8kgr
+lWg5nAzJei/GITWidlAItWRkijQ2u0a7ZSqvynbItO337pwz8z+fc++59/v7
+3Tszi4KP+Am1KYo6hDd5UizyMZ+mGOS5nKYUg/GtaiuaMnvOeVG3jKbKX81h
+34ZFwfqKE/BUFScrBi48uOmhM0xNTu9YAtPXKu7N2NGUSj7reKMlTR23zt/b
+AfMSz6Vthnn9fdqFMOuE+9j9eTRVEjtQHU/mr7zrvg6+emTMLBxWxupeum5B
+U7I9FQeCYdGSGG1beERRnRBC5o9y7mSb0xT7vbDjMJyeYdc8D3aSlLufhZt1
+cmXFZjTVu/NgXgHMtKn50xWuXStxboHVcvc+tSlNuR71X/kK9pVPicvhwu6i
+0yaoh3djxdY4WGX0x2xXOEmzLDwU1gicSkPgqAHnhP2wNS/V6wIs0MrZEQ1f
+zfllbinMHT7/KQ9WvKta3wD7dm289whW+zw80w5PlC2KMkYebmZ1YyeZf24o
+NAgWL3zq00b8oC2zFE6Pth6phgMtUvvfwvHJPnfFMB1lo78G9U78XbA7As6e
+57A0Bla7c+tI3nZ5SOw1WKQbz2KQeobjHvTADJsPq+6RevPMQ4fh3K3t7WdI
+f2ObthHv++vfN2thvcHMLY/J+MTP9f9wcQ6csOcSmP9oMKAa5tpbngiD7Q9F
+PBLBLOsZB3NY6TLf/Cti271aUuQ1uODQqw0ztWoT18IMfu9JJQfrx7x4V49+
+lJx2M5HBsibO+CpY9IOnfzHMZ9meLDHBvTPJSrwMM+2oGxYwa+j5/w7kKztS
+jHHvrLw7iuDylA8t+rBcXrbrJtzckuMvZqKfsVVTClgklLTZw77fSqj3sOqy
+d1qVEc7fdm6eFfIp9GrlXHiEn9O+nuRPut3TNRf16c0ShpP8hxzz8+ANMzVb
+xTC1aOLsZVjRUBEpg3kVXm51MMusZqSPjAsdDT/DuY1rNKNkvS95jSFYf/NG
+Hb6GjHs90ajgtgHrZAr9zs7ob16NfGHsKJePJM/LddfOEg+OfFTDKmEnSwGn
+9yx/LYcFXVdGLVGvsqI8tQzmfxAY7oBL4qIUkWT9zv7WNNjeKGj6a5LP2L3t
+FumPBz+fgpVdJdvkcFjOTfEd9GMiKyvoIcyvdlKdhOOlCUkNcPs2Xv4qOD2h
+ICADru1LfTuyFN8TD5ZhAMzlN4xWwsyJA60MOFsRkiCC6cxQ/yKSPyghzBXm
+/7rfeyUs9Uk2NoZ91UGFu1C/NMHjyvgS7M+M1HijXymmBg1KmH7Tk+VoSFPn
+6pMeyGHV6miZhQH2LcqUdsKifc0yrTk45wnLkV4yvru7cuYLjO+fzBqGfSOK
+TA3g9qruw9rYT3RdkuWih9+t7WFDi8n+Ol2Nybo0dWp6bIEXyd+/vZWCnXSf
+WR+DWYz6PUWzcX9NLvyWCysuqmThMCvjyVQbLDiq6xcMs+PMcl/BquDTxvGw
+7MB3TXrkvgU6fN8C69UJy1iw4PVCCzbWD/zU98wBlmb8ZFUAazj23zgTX5Kv
+sEe+bL+XRjxYYZUvaoXFkmeTNuQ+X7LP3Yl6/G/lf2bAhT+ObR+HkyYfVw6S
+PMtXXzymj/s2fvx3KTEllAzBAscNHdFwc2DpjCP6xSwunk3Ogyc8NbJ3Djnv
+PcHTpP+qNIeDpJ/9swZqYIrOndwMp2zyTIuA0yOmqU9Yjx0bX8CFBQeLGhJh
+6aYK22E2xuXr7dTIw481NayERUHnlWxYkO+yMBKW3nFrckM9mtqabk9Y8ZTS
+34j6b6+778GBm7fkDTqjX21iB08jmPILWGCtg34H5zhrw0zyv8TA+X3GazH9
+H76vYPg=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.6231646322958344, 12.838497563090474}, \
+{1, -1}], LineBox[{{13.5, 13.500000000002307`}, {13.5, 6.499999999998607}}], 
+        PolygonBox[{{13.5, 9.4}, {13.1, 10.6}, {13.9, 10.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.594402784781746, 10.950315888839512}, \
+{-1, 0}], LineBox[{{13.500000000001851`, 13.5}, {6.500000000002592, 13.5}}], 
+        PolygonBox[{{10.6, 13.5}, {9.4, 13.9}, {9.4, 13.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 14.4452}, {0, -1}], 
+        LineBox[{{13.500000000001851`, 6.5}, {6.500000000002592, 6.5}}], 
+        PolygonBox[{{9.4, 6.5}, {10.6, 6.9}, {10.6, 6.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 7.445200000000001}, {0, -1}], 
+        LineBox[{{6.5, 6.4999999999976925`}, {6.5, 13.49999999999251}}], 
+        PolygonBox[{{6.5, 10.6}, {6.9, 9.4}, {6.1, 9.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.554793699764814, 9.000208212001706}, \
+{1, 0}], 
+        {PointSize[0.04], PointBox[{2.5, 10.}], PointBox[{13.5, 13.5}], 
+         PointBox[{13.5, 6.5}], PointBox[{6.5, 6.5}], PointBox[{6.5, 13.5}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T2", " ", "P2", " ", "N4"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbf/cgdhei/fjghgjhiij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbf/cgdhei/fjghgjhiij.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {0, 22}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwt0gs01GkUAPCPkUaZUrFJjh3yKEaLRJjO/18ipKgk6UFko5RhdCpNGhxR
+x7GqIdVshihKQi/yGqVFebQpFGVsNMqzsIZee+/uzjkzc37nft/97r3fpx8Q
+tilImRDCgy/+//dRoYkm/hvShCz1ia5TponY6TZTHyzZ7dZQqEQTwUTBjI1g
+dr1ofi2hST6L9k3GeK53209gWVVZbCtYOlWw0vMHRWrmXdxvbEQTOnX62u/f
+KSKo5yZEgUlB3pQtxDWMMpjNYGnFE7dxMEfyUJdtDPmG66zOQT6uc6ThPjDd
+x9rkC+erS5T689DffUdWQX3pbVmtnWApi6Vhz6DJM+eq2UomUIfN2geW0M8L
+83KxFpi+a/Vj/jSaeKUW83TAEoPm8U5w5OJfQjXA7GKH/AhVmmQHffKYhHz+
+19dPNYI10iKy2sDsSjVTOVhmVHOqAOMr5oY+ACdlqIhjsJ5s8zku4B37VuR5
+YT0BsfEiyG9tfz/GDNeva2blQj3c4bPlamBZa4pbMtRrcWBnzGfoX3LqYOIW
+6McrTujTB5b95drHgn6tuQqVQZzXwOa2FJhP7uniECU8b7xabvaNIswkE4ER
+WHjc6KT6F4qMNY2v8cH4VQ/dDZMUkbGihs6jUw5tV1VQpM74pKwbTML5Y44T
+FBEHiORW0L+0oaWUBS63NQ5KAJN5JSsCwJKPESc70JYPmmxhv7WWWbTZYvBl
+gcNxyM95LK/gg+kyjxwdOD/JsdusCG2doDT6lSJHnB9u7AYLI22f9sL9t79+
+EaO8BOI37A4H4/0G+4zMA7N3xAe5Qr9MTlyVFlg2Yq2tCvOga6O+MTHO2qRz
+BtyjHygaxvz64b1d4Ny0SPMGMLsxQ9gPdqltZGaBZfvyPxSCk+z8GiIxXnR2
+tSW4hvXS3QXr2e8vDYfzNF5XbGbj+tOiHcegHt6Vrb8SsPT88kt3oN7O5ICU
+fnw/7GqxPfRDLuva9KDPPTqRB/0Hs/VGME4m0gIXwbzYV+z4DNyvnFpdP0aR
+kqaGeFOsdyiSX/YZ7iPakOGP8VC6e+4nirjzqgcysR69P3rqhimSXXskcRDn
+2/G4OGqIIuo/ck9R0D/xGUl3AvuraDqKwMK+tAOLYL00LvStHONjyvLoEYpw
+XTak2ZjCeXa7Stogv3Tr8mEBWFgayIkbpcge1fkD9zFeLtgTOA73URrr0AuW
+Sq2CtkL96X6ZvgwzyDcZwlwJ/bH7GPlzwLS3hdLoFOzf9kGoARaeLnruC/Ow
+WBeuqQSW6uWIfeE9irsYRzEfvVAj6y1Yos88KsX8GzbyX4MV/dLQVHSCPM8V
+zFY8nR4MJsHdphaQr/0dV5+L+w1ZAxfgPNnBjKNaWH+BH3UR3l+niXvsBPY7
+aHvL7W+K6NruXdKL8yi+JaiH/tTJpZsydPa9Vlvo31NhJujH9SrN9WGDsH/W
+3oWqeF7l+oSXffB++UUGFuiO8Z/f9MB7jSum/63HZvWq0m6KaK9x8MhHl4/q
+srvgfsoq+ZPo60PST51wv448N3ecV+/j+nGw+o1jCzLRXbzABbC+5rCn2hja
+IKZFBPmC1W7uWsUBX+tcvx/Oc1n2tTgeLJyTOdEhh/i9IpNKjL95l5zXT5E1
+Cy6f6UM7BHifgfvmGOZfYJjD/FRbYq9Bf3VROn/OAtP8ZcGe0H/PW1IyAyzk
+GmfnwPvrPFR1VwH76ST7sGS4b07dE0YHnsf5uFcBTrmtmXQH8/sZ57aDv+qz
+KhLRX96HcMDWls+3bEc3qllOQn4V79/NLTAfc+YRd3jP6TMfTc7A+O4TPfbw
+/njRhVrD+D7OivUqof4XSss9u7D/Me33t95TJDFDq/oNWtvFIhnmIXEPzetH
+e8WE2L+C+zpW5K+G+RaNpnGfUUQk+M3DBs3rdbaopsjI1SYFD82+4BqWA+5u
+mX0fnbJ2891zVURauvPSNOifMJ2a269VEf/iCINt6MIxgXt2FVE4vZLdRP//
+0cafpfQ/QPmcfg==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.6576611797498106, 12.901430589874906}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJwt1Qs01FkYAPDLoJS1xBSNalBrFm0qLCf1/28kpDU9vRajVluOZ3ZPbMpU
+FJHG7iatZ+UUztgQYaMZ5BHCmvEKmZQiYjwqFbXf1+6cM2fO79x7v/t9373/
+/+gfCN7tp0gICYEv/hLZJ/gwaPL5s5omWe3T63cp0eTZth5ZviFN2NqbD/qA
+nYuOGriDZYk3/I3AaeVeqcpgfmrP1jxY3/dE8mWpAcTJTfowpkiTsRstsyFg
+Xqp+4KwCzIu86GKJ7mgt6iY0sTpeyFPF+TO9L6w+USTLOSB3VB/mxUyr5cxR
+hJfJrOoH03cK5ez3FBEqWHAHwOIMPqv2LUXcThYwJ3D+25lzt19TJHpxzbtF
+EI+/8U2LygxFtPenrzXD+Mq6yZIpipivb9/nCRZn9bgagYf1v6iMxXEJM2UB
+OOC2dkIxrg+rFYSCdRoaGb3omh5Pj2mKNPwiKpnF9QnNl29B/L7HpGwR1C+e
+NT3h9gby/3X5P+pgerBl77ezsP9q4RUGmGgmWplA/mzdjKRhWE8fW6e0BOu7
+U2h0Dy3UdG+ch/w2zhXFYD7BVLIF9IOnmu/9He73NEmiB/2KPcZVnYF6iW29
+vS9Ymndc9yo4y3iwHp1tG+LkDObF+s6xwAl374W9Y8P8IW8fQ4inbbfJRQjm
+L1EOSYL9fjxTRB8Gi9nuNpc+QL1hhQZmOP+kDsvhHUWk6j+xVMC0p+PXDVBf
+uNx1tnMVeCf3jCXUL/9k4VmF1mrglkxSxCqoZXcjmFyjTzWNUyTEJUVpAl06
+ZNT8kiLNQZkRTNx/3ea8zBcUuf/URt8G95s0EwYMQX9mmxZgPnxfL90dz2D/
+UXHAJfSDgbtbwWn6CyPEOL+6pM4J5scOMCKGcPxlmocTxNPbEaqtgPdhT+a8
+LuzHcx/ha2C/1E0nYl5RZOEwQ6iJ49TDP3PkFMn2uerBwHG7M6lpcN7S8tOb
+MB6xT5NEQn02KsvGSrE/dVe3c6B+oavFRCT2Q21e5xTcPyuH75Mt0fHmjkFw
+3lYLeipaoV6+9NzGfnD3Qs5ZDnpJ+o1qsMbHXVpRKyG+PO0CC8cTJzV6V8D6
+30UrX0F8gex0jy1YrBmfYAf3OWXeQUWsB/Pn/bdYwv1jp19ZvA/MVz2S1gf5
+u9mHPVfB8e5wkj8Gpm1kXSyw6ETdeehHwSbrgAYwv+2PB8mDEH9FLfvzeI4n
+a00fRcrsbzUTXH99bi5USpG228dv0uhxaedoM5w3K++KAO1s7Td5nyI5R++l
+jKCNGW+2V1GETkzVtIN8yfCrHIVq6O/aEY8UtOmAx3gdPA+2dZwB9ExBZEYr
+1JP4+r0m1r+qQ1LcAc+fq0qUCTp7g30F5MNpK5AZgflLk46YQ768klyGMvry
+5Jzuc3j+EqKvV0M8fhyvpHEE7t/ZatcDGP++SpwynC/3fOvxF5hfevwBwQTc
+Z+P9c/vB9Nj2+nToV5t0SK0U6hdvMLWfAnOCnRvVwfTFhMUVYLNaTqvfclg/
+oO04DesP71SrqtEFF/PqD0L8AtZM3zq0Usn0c9g/JX00rkAH8mFGmuXAfdTQ
+cZl1AhOO267HMsiH6SdRRA8XVAq6oF/hctVHy8CHlkXcbIT+qCgUtqHpRs9A
+IdyfR38rDqEDRsoVSkSE+3hNhBauN/vKzeGBiOj8HMRwRRsGxtHtIiKQhuzO
+Rdck8SQdIiLfomrFwPwmd3Ktu0SkbEeslhd6b2B7cKeItJkM2d1CJ/X7XpKI
+CLtpMHMK/c3UD60PRSSF693NxvrdTKajqkQk3NjviTlakGrYnyIiPM9waxO0
+s/fHyjKo/8LJVYpoHe57WRNFZH9tyy/HeBWC4LVwvm0Uo3MP+nTZkUO90I+E
+YQcp5hvt78+E/nDoGGsanS1cJHgC5+W0RTMD6ud3yEMZcP7y3yLUXy+FcdVr
+0T4wzjYy73JGlzttcxyA90vUMeV8Jr5f3G3re+D8WPxiPfS0MD2iHdaPezGv
+aYMNTiwPr4H+xh/S3Kr9//9cVuV//3ta9L/6LKiQ
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {-0.15766117974981075, 7.901430589874905}, \
+{1, -1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000010914`, 17.000000000003638`}, {
+          6.500000000010914, 13.500000000003638`}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.923749193581157, 15.90359596761554}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwd1gs0lOsaB/AvjcmlzSj3mEYuIcZI5BaTS4YjueS+d8eeCh2JSkKtmvYh
+NqrphFAkXbZITS3bpdDQtnMpDYewSw0lk92O2rl1c/7vmbVmfes373zP+zz/
+712zxoCfELhTjqKoPLzJlZpbwMucS02Rqw6XqjiSy2Su4VLczIc783W51Dpn
+tcPeMEdt2oO5gktRt+NlAjjx5KWGPLhipjy/FZZeZPT8DXvYHrBaasGlynb4
+da7X41IWIX/OR8BC9wSvbfCgiv50FUy1pO+OhlnyabQvZP3Biwl/mOaZqcWz
+5FJiuYXZlXCW39eAE7D/8nLOAKm/08G6A6bqDu86BCfqalfPw9Lu6YRlsDQi
+J1CfjXUdq+Zy9F+RKwyxgYWj9iY2sLPhqTInWOrZntKJef2PF3bZwQL6IosE
+WLI1lWkCs26N0lfDDxVoh5ThsgtV/TPaXCrqTILnG9LPO5U1o7D0i7JnK+n3
+6D7rP2GOweujRfBUeOHJZbhfW2q7fB/M6jKODIX7zM8rbYHLlhxk18GmyzbZ
+25D+zxm5sEneP31TNYAlBaWn6ojdlmXqwsKerQ6bMZ/2u8pPLPJ9R22RDG7n
+vNe3Jft/Fev9G3mp35NOhcCcwfpfNfS5lKxmkzgDFtT1axXD4o4JthgWuc0X
+KTG5VNJ/4rxomE+8mn2WDxc+eZm/BeZYp1SVwnrDCrwLMMPTUdoIn7+qFzjF
+Jjm9bSMW9T4ucLXCfGslqRfgxlwFRjYs2BVxNgaWhafMPIQ5ESqaOnCuy9cP
+chzct5Cr0YB+RjMSjujAQsOjxZthhSaPNDOYM9/hOox5+CmMorXEgZrSPXCs
+j/P4Olg8oOmsCPtH7+jkwNIZw/LbyKPGy/iLCZwYePtcImy+r1SgDTOKn172
+grOiTYro8FRB9XtHcp787saMoT/JKxcPX9iUPnmrkfQbXt1PzlfWzQjLAlj6
+aG1QO+z88behJFi4K3mSjf2/30jfHwlTn9ZnVsF9yS6bfeGpjwcG7DGPyCzU
+zhtmaPm0SmB1df62ILKuPFe6G3msK1PkxZH9BzRPy6/kUs9GXrQI4bJDUaN5
+MEv3lawV5jF5lkosLtWspKpLcci5jeW5wj81R3oYkvyaeUUxcP3Ltkpvsn5Z
+pfQYXCbm/7EXpsKVhblwhImMVwxXmIzFZ8F81kBsC1wfeu3zAThZXdI0Ru5X
+a6sPgX0Y9Cl5azyXktiHFjB1pXeYZU2e5/XeafTnGJpeaUustyI4Cy5Wvdrh
+DrMCvfq1YLGNBf0fsKC7xqoK88Y+MMsgljxJUPGGa7ZP3PeEKcXe07PIJ5uW
+fdoRFrkGUY1wYfY22hpSL+noMXJ+9/2rKU4bLjtROJ4Py2UNuNBI/YXK7Jsw
+PyhHcYrkMTBrNw5TstVhw8SMYisn7LfpmdmlR7DgZw/PCjhl+JNTK8nHZ3LB
+DP126omcGuEyy6ChO3Bs/rUkYs75c27mmL+9vDvmPjw4+84gBfZfMb2hh5w3
+NrvkPjxa1NFG8qsIWROtaID9zm5NptDf4FPP1E1wVjJihoUqIx4psLrk4hUP
+WJZP7zoPm6wKvxlH5vvu8N3b8Kvtz7XySB4fp9MbSL31VGAjuT/l+Pe3YFbq
+ZO8oye/Ka8dzcJhCogl9LeplNj0m9dlhI4uMYbF8bpwvnFhtHOwCz93dNqIN
+X32THRYAh6n+98cR9G+nvlDwA8x6GRRwDb4cofyRD3NmRSuS4MPZXtU/wtyY
+kCWeMG+jTWgEqXdoj9JK2M+ytH8zPNXEvEyD7zTK+W8gFtUenESezYK4Veaw
+xGqO8Tfs1lDRpQFnPQ4TkPP9trh5aBFsOugcRPLu5eT2T2K+qBrBu1CY+a2G
+PULycVTPOQ2bOPeZDsD+9S2/9cETA5OdvbD9WGoDk+RJp/X2weKdqla74W+9
+ob8ME29JaiJ5dp7RifyL1P8u4PPiVZhbNfvSYuwvUKqu9ILZSS3SlXBhetTL
+Y3DZ82dGG2HGRUMHEVzra8aNJuv2vKcSuPTkdckJuL3kyPVRuPsEd2strDAU
+HzAG+50Jcn5O8lscZTsEcxp85Gg22D+lLf0evC71kJMJXPHgiX4x/Lartsod
+tn/ETImDfc33B0fCsRmW6XbwE+XW47vhuae6Gd8wjygjZjQZZt3oGfsdNgot
+2ZEGCwMCl56B7wS7bz8IS/h2ltEw9SHt5z1wvXajgTtsHz3eHQWL1Y64WcAu
+NPm4LbCp+z2eIbzDeEObE6mX/Wy9GVwuPc5fTer9ruTvAtf+mt6zHB5sUVHm
+k7w5hgVycGKXjiHZ3491X2OanEefvZcew3nvP6S/JfnlLJHTwDyvc64OvIGF
+y+u4UfD1vY01f5HzORGvfgOe69kfPwdHJfEYn2Feufu8IupLX8T0uhvi9zzV
+e8aA9O/hwMmA02743HAl/TW9+WcjrMmjs/iw7JRMbxz+o+SHpVlwmFpR22Ij
+fO7wC11EngfnZqIafPJzcOYgzClkzqvCX8j/JPj/LyPu/wCdFD/V
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.095260378700779, 5.519108263604518}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJwl1ws41NkbB/Ahl0mI1DSVzbjVyKXRSJOkKfctl81dknUvkWSXSnaSMomi
+yEQx0gWhaWmjJkbUUrrbaLuNbBqpCGWU1f97/jvP4/F85vzOOe/7nvf3mxn9
+0G3rIxQpFMoY/sj//16mXMrEd7wWcSmy0RG5C0zxH1zbBwvG9gVkw1VvLpyR
+wJ5f9p2+DZf/pvDgCExXnnNuElaveK/jA/t3XxEuNMN43PeFM2COVYibA6xE
+u6jfboJ1p5qPesHP27cGpcBCxaMJvrBRY1GwBcyQvbVdB1Nti8Q9TFjBOsAa
+rp9kfRPA/OBELxrc5nU+wZeMP71r+hH7J9u+Y+vC1N3VqyQwo6lraGAhlyJv
+LLY4Auu2PJLdgpMHl4k3wrKXv/5dDfPvRYks4LbzWt+EsFT76BUlWDC+YrQE
+pvvI7F8jD55Dy9sK2PNp8PZ2WBh0bOd1mBOT+uEa7NLw06tuWBjH/OcqXF/0
+enQcZgSYDN+CdWmj3vMRHz2YPV8Ky98kJtrD0TW53crYrztX3BRJxq8WKCwj
+5yGh1e+HtW6mfdkOZy3epFVMrvewOVMH17Ej/6yG27LpJRMkXuqgXS1M2Vdp
+54z61H1Y5U7G45tNxLkw91WcRxEsPLh+/VO4c8qjBXvI9fYmG+eZ4/wW2Tl4
+kfp+WJPsAyd3KRWTeEV6Swv3wzncgbNS5NN9adi0Eha2CzhFpL7vqPNuwEGu
+K/iesKR14E0HbOXhO2UKLNNoLb0Nz6x6ybm8APVoTBm/Bot3vL66GeYHzV1w
+Gmas0FQwhLVi6qSpMLPl53W9xliv95K7N1mP559dBfvXmPYbwSzjGjceXC84
+EjKCfHI6rxdvgpPXte+5QfrlmqPGWpg5zUsxH+5Qnle0hozHnuTHwidVaU2O
+MCXKMtIdnvBaFuNFxsvGcpbDQ+wm+hZY2lXHZ8GMsaqnGbBw5ytHKziv4UVc
+JcwpT7VwJP3oeffn+zCjWqAdBo8mPGKMEm8KN8mGxdVHdWnIT77WyIjENyQK
+erME5qx2YlOQj+gXurMLLJwyl+EIP+/KCvWGXcYsIw7D6WXdN3zg5Ikf1z4l
+9chkxq2FZfbxVEML3G+T/UNWpH4Lv7yKhnlmX0NnwA9+erG6HB51y4/8B/E8
+WGYtewmzomfoV/0/X/YntcWo6/VG8xhSD/3m0UVwzt1thwxhz4SzM+1g0b6S
+/V1GiK8tScUB7oyYU3gQDon6TFsJZ6lGBdnC/mG5C8h8pZv2/sOGyHM8okQd
+bnuyZbQa5v37NbwP+2ud0vTbDstLixobYO5tKzc7uC3YauVBuLVR25oGU7v+
+OeUHi5M8RsYN0M+JBZULYSP5yMt+4nGVuROkHiWBf76BZQ3C+C7SP25xn97D
+nqblvaTfWGfV9CdhBr9v1QU4xM/o/GysL8mg/nUOjnag/bIM9ucdj7xI1ku0
+ttoAu2izDW/C8Y/PhPDgB3npp9+Sfq1jRJ4xJPdFT/8sko+k8HorWS+Rn+QO
+16Wy1F7B0lqZ1xFYYuxo9Qmu327GfAKbSXl7x+H42GkBDNSnSq+s/Ass9Ko2
+ioG9vRykb8n8hc43amHm5hdvO+By5alpY7DV0mq1c3A6dezzHBaX4uAYqJsI
+dx5RiWPDLsKkbRyYX3DUzRnmLQ24NYr8tT4Zj3vDUv0+uwuwlWqcbhC5fq+n
+TTCsvlixhjjlVPtqLZhVfH/QF/Z8GdPfoo9zNTfeuhbu/Kn8991wyEPeoA1M
+nX1ocDns8i3itwXwqBmjnAJnqZxzn07mF5nse8jA8y1tzaYPiH+r2LK2GqYc
+slUTw1z/R7J8WMq8E54N0/l3f8wkDrlIC4eDKtYnEueER2eugW3H03aS67WK
+eQ9Jv0mHFYYrYBeFrqz5cPRG+tRbsMRl9CmxdNmlo2/htr7VTmbwe1OukTri
+05pxuc2J1DM0kWUJd8dY34iFOcm7jLzhnJPNSkI4PjR1fwIc7TMgfUbuF5V5
+GpkwPfbESZLf1uTtLQK4rp9xl9T/n/3iWadgmXuaaQA8EbRRlg+fya/ySoXV
+J3LL0uDy0K+9pXDOSnubMFi+e2r2DXjI+OQiDizRb2a8YpHnZViyIpzX/3fJ
+FzjI3L+0BfnUt613pFpi/Cotaw/8nrLiiA6c9/HHhCWwf95hBzosa1l/uF0P
+eYY3JdFgfkKltQXMLH29XxPm9fRPFszH+2r7ZyjA9MIjd6fB6T2+lEHsx785
+l3b4B9Tv8pSop3D0JcVzBjD9fOWBZri+UG9nhy7W+3igoRxmfksqyIa5drHh
+OaS/ro3/Gwknv7/ftxOWxZsc84c7mAqHImFuuwvzZ/hMY1SSH9kvq+9AKpwi
+8yh1g0VltpnVuuRzeLDZFW5LWW7/DlYXz3FfB4fMExizEI+tn8p2H7JfoqLt
+Lvjk601qETCD2h/SAidmX7m4C+4uTt+pgvyCPrhcyocllGCRHSzu7Na/TNa7
+LK6KgunPvHu6YLni3tY9cEd/Q8UEiX+u+YJUWKJQ84OBJfm8shmPhNVlxt1O
+MGXYdccymBEUlrIZjv/DqmcQ++vuyLvJJ5aUlOXCgjch+WWw/ISFnh7c6ttI
+aYC5l7RKi5AfxTc5sI2s72ywfBqczh6xeQgzdL0PJczD8yLzQfpjmPo2vvDJ
+XPTRYm7kfbhcXHbYFhaEfvS9CXcbeu2qmIN81c/P+AN22TOmZwALjg/knCbu
+yrhWScfzbfLZ+CFy/nc/PnSCh+KHBTtgz+Ja6vhsnHu1yb1AS/KcPqvaAnNP
+cSbXkHhceyPOwls/FqSZk/3lc8tK4IkP1MJ5sCjZ1VwE6066B5J+k8rECZ1w
+68qmMhWY48z/TsV+tq+tZiuT/RXpZ13h5x4vNNXgZG2DylxYHGtROIvUr6yD
+8hz2j1u6ZyE8ZFrCM0Q+iV8d2atgoeY5/TA4T2FgdAO5Xs/Q+jjMMflLkkLy
+zVwqrIfluSFRQjK/SFvhT5j62VxA6sVNrHzVCFu5sT+9gwW52jeLYZfQAs3p
+SxC/jpNbJNy5+XQhC5av+d2URtYbVN/oDtcHGBqKEN/MLf+6RMFDuwo+WcMT
+b3UO7oJD0tpZNcg/uXicnwEL7/SazYU5GSoT2XD0Eqva32j4HGgWSYkpgbOf
+9c5Cv9kV88j1Q4XH7qyFPUf8YnfDojureeKZ6M/NrTu3wOWdJjk2MKe0TuQD
+d7sajLfrIO6Lgy52JL6lmsOxcEqEU4ExTLdRvsUk47Xu39WJb027+m0G9lH5
+tfczOb8vGZN9cP1y/fweOJozp7ofli3KcST9ODT67pEC5tMNlshJ/egt0zLM
+4K3lqkkScj/Mbp8WCSf2H3dtJv0akTteAVex/64h/S06t337CCybGVf4hPSX
+5nvvlYi/c4PeZVL/bv9yXhrJr+xRiBLi4ztvVG2EqX8ImgxI/dU9twzAkuri
+6w6knvU9HSqoj0id/8Nmcl4LnzE04IlVZw8chuMHdrlO4HpWfVheLSyJ/p39
+GBYLnfqewIK9u1/nws9nXVo8RupXXR+3HPZu7HDSYSPObOHXO4hX/qjHchHM
+nO94Yh0s3JaxZAUsj/QwbUJ9rMSm9xxh6bH0JcwZ5Ptc7mNXWLJMpzhLG33m
+obrRGRb5fs39pMWlhC9Zet+OrPdRxywIFpwq7mTBIUb3j56ejnounfCZDzO2
+dpys1MR+vfe2UdnkvtXt79JAPWqEEUMkv7BfVrFgzswDx7pgnpPirivq+N7h
+dCC4CebmOQRsI9Y+ZVQB58QoxPvBSjIN8+NkfuMiZizs2XDtBOk3XmmG9AIs
+yjIPTIVZhm36GlhfVNrJIP3nKTgj48NG7zU3kHHp3isKNMTHiVttxocZjl8S
+SLwpaWu2Csj8dq2PK5BPjs2CihrSz3+dcJLAnTb+ZrfJ/THHb4SG/L0r2xTf
+kflF8fPt4JTj91Q1SP3l3OnrYaae/bAlzCmUqXvC6+xXhfnB/ia2gdYwL/jx
+592k/vENrkpwlamSRzE8xBVmJmI/1mcf8+tk3MX1WC3i8zzLTuqCeTYqlbeR
+T/SOLOf3sKdyVr4E+aeHzJZ/hVmpnwSnpuF5WnOLOcUKnto/M0YN/d08q1UJ
+Fiov1mVP5f73+xoeIr+vVbn/AzL9fMQ=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.157838422120044, 11.076737872805136}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJwd1Q1QzGkcB/D/ZGkr2kRU9rK9THJid7Pc9oI/imr0poZc0YsraYulkQ1p
+YyJDaghtqE2qlbjd6+V6o3S5yinblaypZvMS7ekclXSi7vvczvxn5zPP83+e
+3+/7PDN/68j9W6P0KIoS4SH/lGYaPwua4hBY0pSmJ2jkABzeLBAx4IkdfJNB
+c5pSLg27YAWbZE8f2QmnHz2X4QtzrMM42oU0xYzdk38RDg+8dzEeVroluA3D
+Ytmud0bE4/aW2xbRlMKbe6N+Ad7PDPLogHleJ1NS4eBxal0AG+sPqNJCYGbm
+BateWMoSDnnDWeX61Xu+oym6/YGBH5wT2dA8AucELj8RDfPcPeZIrGhqKMXH
+MRNu/Cn9wijsEPva5Xc4RquriFhMU56NzCAm6qF0RdsbYEmVThUAx1XlTTM4
+2H9UuTkPvlbSO7YYbqyy0OngrK1vWDyYs9olgYf+GQ6O61bB1NkPY/Gw+7ee
+Xi4sD4x5mgdzaqKKObC4g/7cAKv3BjYw4aFNX3s6YPqLg7AL+ytrMwvbYJ79
+7Y9nYGrKxv9nmGlnnOkMC+cF5aWQ/I2rnN+gH/9kGceVjI/2/5AN0w5lglek
+H6W6aTMs9uKOJ8HSkPx+Bpzub/69HuzfPrT8CfJStOfbpiAP+Qu+5has3v1b
+4ZgZ5m9cFnEFDja8XBENmx+ae0kGSz83pz6fjxyXmCeq4CGjLm4A7D8zw0kL
+azxl5Z3z8N5VU1sb7Fcdm3N7FzzwC6OTnAfT5LLbpCnyKGhhvIAlNdqRWzAt
+Tuzdjv5iksNvxcGSO4tePSd5+CUfdoerA3h5fOTVGrO3mA+HqgQDh0neTiF3
+V8LS3Mrse2T8fb2rF9y9SZhHWeO+CuzdxLCAtePftXCjQf5IEVyWLFEnwuFO
+0aZv4bFSRUYxLMwVaLmoN6tr2V+PYU+LpoBjcKh2+MsQmR9nv64VFttJnL/A
+5iGXUlnov7mPfYayQQ4f33J84WCPmcKvZH57dJIUVt53+fo3PFD6Y1ghyW9+
++XAPLPlHf20FrKkrTayGsx694algt8lyv2xYUWe9QAYHMWdExcHBk0UyETzb
+Obd1A8yp2CFcCgtsjK9bkPm5wa5dqM/Tt4QaRR7Ba6Jui+BzR+9MqGFegsGa
+T+i373HxzkpyP1uWrE6AmRZb2gpg5rNpH91cmmK/eHnqChnX9qeHwPWml/83
+TWtMOkxQ9wGvoBvwhzTLOR5w2fH1ptVw+LcrI+ksmrITdh/WwNK6Nd/yjVHn
+aW63HupTthjIn85BDs6WZqtheckTMy4sEMV3isn5KLmuytlwp3abioyv744J
+gSs+XK39BPsbpIby4fBXU+9cSd4Pu/nEN/1aW1PhRj5DFAwzFo/zH8Lh0UKD
+QliiL+UwbFGPuqDcCPtR7g41bjCP9eDdWeLB/F3xZLxrcAsb9UrP+DzIhuWi
+xO4KOCeJPawi/uzG80F/16ye+TTDWap6Vj/seUl1/w843anWZQXyoHw7Ulth
+tfkRvUhYM3JnQx1Zfyqq6BRcn1toXETWs32ULIPZvAzv07BwxtOLObBdhKBo
+N6zw+VN5Ap5g9c8i9SpW6ou2w4onBcdNYZOV9UsXwu4Hg1bo0C/dJNtwCvXI
+XUtWNcHisZbztai/LzT2ej6cpSlLUaNfzxLFxpMwz06Z1oF8HEej2vaRPCuN
+JuuMaOq1WnViN0wxP/bKDWnqcVjp3kiS541kSZoB8t7/fn4crDRLsj3IxPkf
+7VNJYfXo+MA+fdzv5z16crJ+9MTCk7No6hg7L6IN5pjP9q6ciTrvlj6cJPXe
+VHYZwvLYzR2rSB6OQ7+eZuC8Ig3Vh2B/ekqyAma/XDJYAyvJ92kG7j/5PtnR
+/wFp5VhF
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.084117857803797, 7.68830612320434}, \
+{1, 1}], LineBox[{{6.4999999999976925`, 13.5}, {13.49999999999251, 13.5}}], 
+        PolygonBox[{{9.4, 13.5}, {10.6, 13.1}, {10.6, 13.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 12.5548}, {0, 1}], 
+        LineBox[{{6.5, 13.500000000002307`}, {6.5, 6.499999999998607}}], 
+        PolygonBox[{{6.5, 9.4}, {6.1, 10.6}, {6.9, 10.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.5548, 10.}, {1, 0}], 
+        LineBox[{{13.5, 6.4999999999976925`}, {13.5, 13.49999999999251}}], 
+        PolygonBox[{{13.5, 10.6}, {13.9, 9.4}, {13.1, 9.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.095161292761041, 9.350096513122315}, \
+{-1, 0}], LineBox[{{13.500000000001851`, 6.5}, {6.500000000002592, 6.5}}], 
+        PolygonBox[{{10.6, 6.5}, {9.4, 6.9}, {9.4, 6.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 5.5548}, {0, 1}], 
+        {PointSize[0.04], PointBox[{2.5, 10.}], PointBox[{6.5, 13.5}], 
+         PointBox[{13.5, 6.5}], PointBox[{13.5, 13.5}], PointBox[{6.5, 6.5}]},
+         InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T3", " ", "P1", " ", "N5"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbf/cgdhei/fjgigjhihj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbf/cgdhei/fjgigjhihj.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {22, 22}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwt0gs01GkUAPCPkUaZUrFJjh3yKEaLRJjO/18ipKgk6UFko5RhdCpNGhxR
+x7GqIdVshihKQi/yGqVFebQpFGVsNMqzsIZee+/uzjkzc37nft/97r3fpx8Q
+tilImRDCgy/+//dRoYkm/hvShCz1ia5TponY6TZTHyzZ7dZQqEQTwUTBjI1g
+dr1ofi2hST6L9k3GeK53209gWVVZbCtYOlWw0vMHRWrmXdxvbEQTOnX62u/f
+KSKo5yZEgUlB3pQtxDWMMpjNYGnFE7dxMEfyUJdtDPmG66zOQT6uc6ThPjDd
+x9rkC+erS5T689DffUdWQX3pbVmtnWApi6Vhz6DJM+eq2UomUIfN2geW0M8L
+83KxFpi+a/Vj/jSaeKUW83TAEoPm8U5w5OJfQjXA7GKH/AhVmmQHffKYhHz+
+19dPNYI10iKy2sDsSjVTOVhmVHOqAOMr5oY+ACdlqIhjsJ5s8zku4B37VuR5
+YT0BsfEiyG9tfz/GDNeva2blQj3c4bPlamBZa4pbMtRrcWBnzGfoX3LqYOIW
+6McrTujTB5b95drHgn6tuQqVQZzXwOa2FJhP7uniECU8b7xabvaNIswkE4ER
+WHjc6KT6F4qMNY2v8cH4VQ/dDZMUkbGihs6jUw5tV1VQpM74pKwbTML5Y44T
+FBEHiORW0L+0oaWUBS63NQ5KAJN5JSsCwJKPESc70JYPmmxhv7WWWbTZYvBl
+gcNxyM95LK/gg+kyjxwdOD/JsdusCG2doDT6lSJHnB9u7AYLI22f9sL9t79+
+EaO8BOI37A4H4/0G+4zMA7N3xAe5Qr9MTlyVFlg2Yq2tCvOga6O+MTHO2qRz
+BtyjHygaxvz64b1d4Ny0SPMGMLsxQ9gPdqltZGaBZfvyPxSCk+z8GiIxXnR2
+tSW4hvXS3QXr2e8vDYfzNF5XbGbj+tOiHcegHt6Vrb8SsPT88kt3oN7O5ICU
+fnw/7GqxPfRDLuva9KDPPTqRB/0Hs/VGME4m0gIXwbzYV+z4DNyvnFpdP0aR
+kqaGeFOsdyiSX/YZ7iPakOGP8VC6e+4nirjzqgcysR69P3rqhimSXXskcRDn
+2/G4OGqIIuo/ck9R0D/xGUl3AvuraDqKwMK+tAOLYL00LvStHONjyvLoEYpw
+XTak2ZjCeXa7Stogv3Tr8mEBWFgayIkbpcge1fkD9zFeLtgTOA73URrr0AuW
+Sq2CtkL96X6ZvgwzyDcZwlwJ/bH7GPlzwLS3hdLoFOzf9kGoARaeLnruC/Ow
+WBeuqQSW6uWIfeE9irsYRzEfvVAj6y1Yos88KsX8GzbyX4MV/dLQVHSCPM8V
+zFY8nR4MJsHdphaQr/0dV5+L+w1ZAxfgPNnBjKNaWH+BH3UR3l+niXvsBPY7
+aHvL7W+K6NruXdKL8yi+JaiH/tTJpZsydPa9Vlvo31NhJujH9SrN9WGDsH/W
+3oWqeF7l+oSXffB++UUGFuiO8Z/f9MB7jSum/63HZvWq0m6KaK9x8MhHl4/q
+srvgfsoq+ZPo60PST51wv448N3ecV+/j+nGw+o1jCzLRXbzABbC+5rCn2hja
+IKZFBPmC1W7uWsUBX+tcvx/Oc1n2tTgeLJyTOdEhh/i9IpNKjL95l5zXT5E1
+Cy6f6UM7BHifgfvmGOZfYJjD/FRbYq9Bf3VROn/OAtP8ZcGe0H/PW1IyAyzk
+GmfnwPvrPFR1VwH76ST7sGS4b07dE0YHnsf5uFcBTrmtmXQH8/sZ57aDv+qz
+KhLRX96HcMDWls+3bEc3qllOQn4V79/NLTAfc+YRd3jP6TMfTc7A+O4TPfbw
+/njRhVrD+D7OivUqof4XSss9u7D/Me33t95TJDFDq/oNWtvFIhnmIXEPzetH
+e8WE2L+C+zpW5K+G+RaNpnGfUUQk+M3DBs3rdbaopsjI1SYFD82+4BqWA+5u
+mX0fnbJ2891zVURauvPSNOifMJ2a269VEf/iCINt6MIxgXt2FVE4vZLdRP//
+0cafpfQ/QPmcfg==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.6576611797498106, 12.901430589874906}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJwt1Qs01FkYAPDLoJS1xBSNalBrFm0qLCf1/28kpDU9vRajVluOZ3ZPbMpU
+FJHG7iatZ+UUztgQYaMZ5BHCmvEKmZQiYjwqFbXf1+6cM2fO79x7v/t9373/
+/+gfCN7tp0gICYEv/hLZJ/gwaPL5s5omWe3T63cp0eTZth5ZviFN2NqbD/qA
+nYuOGriDZYk3/I3AaeVeqcpgfmrP1jxY3/dE8mWpAcTJTfowpkiTsRstsyFg
+Xqp+4KwCzIu86GKJ7mgt6iY0sTpeyFPF+TO9L6w+USTLOSB3VB/mxUyr5cxR
+hJfJrOoH03cK5ez3FBEqWHAHwOIMPqv2LUXcThYwJ3D+25lzt19TJHpxzbtF
+EI+/8U2LygxFtPenrzXD+Mq6yZIpipivb9/nCRZn9bgagYf1v6iMxXEJM2UB
+OOC2dkIxrg+rFYSCdRoaGb3omh5Pj2mKNPwiKpnF9QnNl29B/L7HpGwR1C+e
+NT3h9gby/3X5P+pgerBl77ezsP9q4RUGmGgmWplA/mzdjKRhWE8fW6e0BOu7
+U2h0Dy3UdG+ch/w2zhXFYD7BVLIF9IOnmu/9He73NEmiB/2KPcZVnYF6iW29
+vS9Ymndc9yo4y3iwHp1tG+LkDObF+s6xwAl374W9Y8P8IW8fQ4inbbfJRQjm
+L1EOSYL9fjxTRB8Gi9nuNpc+QL1hhQZmOP+kDsvhHUWk6j+xVMC0p+PXDVBf
+uNx1tnMVeCf3jCXUL/9k4VmF1mrglkxSxCqoZXcjmFyjTzWNUyTEJUVpAl06
+ZNT8kiLNQZkRTNx/3ea8zBcUuf/URt8G95s0EwYMQX9mmxZgPnxfL90dz2D/
+UXHAJfSDgbtbwWn6CyPEOL+6pM4J5scOMCKGcPxlmocTxNPbEaqtgPdhT+a8
+LuzHcx/ha2C/1E0nYl5RZOEwQ6iJ49TDP3PkFMn2uerBwHG7M6lpcN7S8tOb
+MB6xT5NEQn02KsvGSrE/dVe3c6B+oavFRCT2Q21e5xTcPyuH75Mt0fHmjkFw
+3lYLeipaoV6+9NzGfnD3Qs5ZDnpJ+o1qsMbHXVpRKyG+PO0CC8cTJzV6V8D6
+30UrX0F8gex0jy1YrBmfYAf3OWXeQUWsB/Pn/bdYwv1jp19ZvA/MVz2S1gf5
+u9mHPVfB8e5wkj8Gpm1kXSyw6ETdeehHwSbrgAYwv+2PB8mDEH9FLfvzeI4n
+a00fRcrsbzUTXH99bi5USpG228dv0uhxaedoM5w3K++KAO1s7Td5nyI5R++l
+jKCNGW+2V1GETkzVtIN8yfCrHIVq6O/aEY8UtOmAx3gdPA+2dZwB9ExBZEYr
+1JP4+r0m1r+qQ1LcAc+fq0qUCTp7g30F5MNpK5AZgflLk46YQ768klyGMvry
+5Jzuc3j+EqKvV0M8fhyvpHEE7t/ZatcDGP++SpwynC/3fOvxF5hfevwBwQTc
+Z+P9c/vB9Nj2+nToV5t0SK0U6hdvMLWfAnOCnRvVwfTFhMUVYLNaTqvfclg/
+oO04DesP71SrqtEFF/PqD0L8AtZM3zq0Usn0c9g/JX00rkAH8mFGmuXAfdTQ
+cZl1AhOO267HMsiH6SdRRA8XVAq6oF/hctVHy8CHlkXcbIT+qCgUtqHpRs9A
+IdyfR38rDqEDRsoVSkSE+3hNhBauN/vKzeGBiOj8HMRwRRsGxtHtIiKQhuzO
+Rdck8SQdIiLfomrFwPwmd3Ktu0SkbEeslhd6b2B7cKeItJkM2d1CJ/X7XpKI
+CLtpMHMK/c3UD60PRSSF693NxvrdTKajqkQk3NjviTlakGrYnyIiPM9waxO0
+s/fHyjKo/8LJVYpoHe57WRNFZH9tyy/HeBWC4LVwvm0Uo3MP+nTZkUO90I+E
+YQcp5hvt78+E/nDoGGsanS1cJHgC5+W0RTMD6ud3yEMZcP7y3yLUXy+FcdVr
+0T4wzjYy73JGlzttcxyA90vUMeV8Jr5f3G3re+D8WPxiPfS0MD2iHdaPezGv
+aYMNTiwPr4H+xh/S3Kr9//9cVuV//3ta9L/6LKiQ
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {-0.15766117974981075, 7.901430589874905}, \
+{1, -1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000010914`, 17.000000000003638`}, {
+          6.500000000010914, 13.500000000003638`}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.923749193581157, 15.90359596761554}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwd1gs0lOsaB/AvjcmlzSj3mEYuIcZI5BaTS4YjueS+d8eeCh2JSkKtmvYh
+NqrphFAkXbZITS3bpdDQtnMpDYewSw0lk92O2rl1c/7vmbVmfes373zP+zz/
+712zxoCfELhTjqKoPLzJlZpbwMucS02Rqw6XqjiSy2Su4VLczIc783W51Dpn
+tcPeMEdt2oO5gktRt+NlAjjx5KWGPLhipjy/FZZeZPT8DXvYHrBaasGlynb4
+da7X41IWIX/OR8BC9wSvbfCgiv50FUy1pO+OhlnyabQvZP3Biwl/mOaZqcWz
+5FJiuYXZlXCW39eAE7D/8nLOAKm/08G6A6bqDu86BCfqalfPw9Lu6YRlsDQi
+J1CfjXUdq+Zy9F+RKwyxgYWj9iY2sLPhqTInWOrZntKJef2PF3bZwQL6IosE
+WLI1lWkCs26N0lfDDxVoh5ThsgtV/TPaXCrqTILnG9LPO5U1o7D0i7JnK+n3
+6D7rP2GOweujRfBUeOHJZbhfW2q7fB/M6jKODIX7zM8rbYHLlhxk18GmyzbZ
+25D+zxm5sEneP31TNYAlBaWn6ojdlmXqwsKerQ6bMZ/2u8pPLPJ9R22RDG7n
+vNe3Jft/Fev9G3mp35NOhcCcwfpfNfS5lKxmkzgDFtT1axXD4o4JthgWuc0X
+KTG5VNJ/4rxomE+8mn2WDxc+eZm/BeZYp1SVwnrDCrwLMMPTUdoIn7+qFzjF
+Jjm9bSMW9T4ucLXCfGslqRfgxlwFRjYs2BVxNgaWhafMPIQ5ESqaOnCuy9cP
+chzct5Cr0YB+RjMSjujAQsOjxZthhSaPNDOYM9/hOox5+CmMorXEgZrSPXCs
+j/P4Olg8oOmsCPtH7+jkwNIZw/LbyKPGy/iLCZwYePtcImy+r1SgDTOKn172
+grOiTYro8FRB9XtHcp787saMoT/JKxcPX9iUPnmrkfQbXt1PzlfWzQjLAlj6
+aG1QO+z88behJFi4K3mSjf2/30jfHwlTn9ZnVsF9yS6bfeGpjwcG7DGPyCzU
+zhtmaPm0SmB1df62ILKuPFe6G3msK1PkxZH9BzRPy6/kUs9GXrQI4bJDUaN5
+MEv3lawV5jF5lkosLtWspKpLcci5jeW5wj81R3oYkvyaeUUxcP3Ltkpvsn5Z
+pfQYXCbm/7EXpsKVhblwhImMVwxXmIzFZ8F81kBsC1wfeu3zAThZXdI0Ru5X
+a6sPgX0Y9Cl5azyXktiHFjB1pXeYZU2e5/XeafTnGJpeaUustyI4Cy5Wvdrh
+DrMCvfq1YLGNBf0fsKC7xqoK88Y+MMsgljxJUPGGa7ZP3PeEKcXe07PIJ5uW
+fdoRFrkGUY1wYfY22hpSL+noMXJ+9/2rKU4bLjtROJ4Py2UNuNBI/YXK7Jsw
+PyhHcYrkMTBrNw5TstVhw8SMYisn7LfpmdmlR7DgZw/PCjhl+JNTK8nHZ3LB
+DP126omcGuEyy6ChO3Bs/rUkYs75c27mmL+9vDvmPjw4+84gBfZfMb2hh5w3
+NrvkPjxa1NFG8qsIWROtaID9zm5NptDf4FPP1E1wVjJihoUqIx4psLrk4hUP
+WJZP7zoPm6wKvxlH5vvu8N3b8Kvtz7XySB4fp9MbSL31VGAjuT/l+Pe3YFbq
+ZO8oye/Ka8dzcJhCogl9LeplNj0m9dlhI4uMYbF8bpwvnFhtHOwCz93dNqIN
+X32THRYAh6n+98cR9G+nvlDwA8x6GRRwDb4cofyRD3NmRSuS4MPZXtU/wtyY
+kCWeMG+jTWgEqXdoj9JK2M+ytH8zPNXEvEyD7zTK+W8gFtUenESezYK4Veaw
+xGqO8Tfs1lDRpQFnPQ4TkPP9trh5aBFsOugcRPLu5eT2T2K+qBrBu1CY+a2G
+PULycVTPOQ2bOPeZDsD+9S2/9cETA5OdvbD9WGoDk+RJp/X2weKdqla74W+9
+ob8ME29JaiJ5dp7RifyL1P8u4PPiVZhbNfvSYuwvUKqu9ILZSS3SlXBhetTL
+Y3DZ82dGG2HGRUMHEVzra8aNJuv2vKcSuPTkdckJuL3kyPVRuPsEd2strDAU
+HzAG+50Jcn5O8lscZTsEcxp85Gg22D+lLf0evC71kJMJXPHgiX4x/Lartsod
+tn/ETImDfc33B0fCsRmW6XbwE+XW47vhuae6Gd8wjygjZjQZZt3oGfsdNgot
+2ZEGCwMCl56B7wS7bz8IS/h2ltEw9SHt5z1wvXajgTtsHz3eHQWL1Y64WcAu
+NPm4LbCp+z2eIbzDeEObE6mX/Wy9GVwuPc5fTer9ruTvAtf+mt6zHB5sUVHm
+k7w5hgVycGKXjiHZ3491X2OanEefvZcew3nvP6S/JfnlLJHTwDyvc64OvIGF
+y+u4UfD1vY01f5HzORGvfgOe69kfPwdHJfEYn2Feufu8IupLX8T0uhvi9zzV
+e8aA9O/hwMmA02743HAl/TW9+WcjrMmjs/iw7JRMbxz+o+SHpVlwmFpR22Ij
+fO7wC11EngfnZqIafPJzcOYgzClkzqvCX8j/JPj/LyPu/wCdFD/V
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.095260378700779, 5.519108263604518}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJwl1ws41NkbB/Ahl0mI1DSVzbjVyKXRSJOkKfctl81dknUvkWSXSnaSMomi
+yEQx0gWhaWmjJkbUUrrbaLuNbBqpCGWU1f97/jvP4/F85vzOOe/7nvf3mxn9
+0G3rIxQpFMoY/sj//16mXMrEd7wWcSmy0RG5C0zxH1zbBwvG9gVkw1VvLpyR
+wJ5f9p2+DZf/pvDgCExXnnNuElaveK/jA/t3XxEuNMN43PeFM2COVYibA6xE
+u6jfboJ1p5qPesHP27cGpcBCxaMJvrBRY1GwBcyQvbVdB1Nti8Q9TFjBOsAa
+rp9kfRPA/OBELxrc5nU+wZeMP71r+hH7J9u+Y+vC1N3VqyQwo6lraGAhlyJv
+LLY4Auu2PJLdgpMHl4k3wrKXv/5dDfPvRYks4LbzWt+EsFT76BUlWDC+YrQE
+pvvI7F8jD55Dy9sK2PNp8PZ2WBh0bOd1mBOT+uEa7NLw06tuWBjH/OcqXF/0
+enQcZgSYDN+CdWmj3vMRHz2YPV8Ky98kJtrD0TW53crYrztX3BRJxq8WKCwj
+5yGh1e+HtW6mfdkOZy3epFVMrvewOVMH17Ej/6yG27LpJRMkXuqgXS1M2Vdp
+54z61H1Y5U7G45tNxLkw91WcRxEsPLh+/VO4c8qjBXvI9fYmG+eZ4/wW2Tl4
+kfp+WJPsAyd3KRWTeEV6Swv3wzncgbNS5NN9adi0Eha2CzhFpL7vqPNuwEGu
+K/iesKR14E0HbOXhO2UKLNNoLb0Nz6x6ybm8APVoTBm/Bot3vL66GeYHzV1w
+Gmas0FQwhLVi6qSpMLPl53W9xliv95K7N1mP559dBfvXmPYbwSzjGjceXC84
+EjKCfHI6rxdvgpPXte+5QfrlmqPGWpg5zUsxH+5Qnle0hozHnuTHwidVaU2O
+MCXKMtIdnvBaFuNFxsvGcpbDQ+wm+hZY2lXHZ8GMsaqnGbBw5ytHKziv4UVc
+JcwpT7VwJP3oeffn+zCjWqAdBo8mPGKMEm8KN8mGxdVHdWnIT77WyIjENyQK
+erME5qx2YlOQj+gXurMLLJwyl+EIP+/KCvWGXcYsIw7D6WXdN3zg5Ikf1z4l
+9chkxq2FZfbxVEML3G+T/UNWpH4Lv7yKhnlmX0NnwA9+erG6HB51y4/8B/E8
+WGYtewmzomfoV/0/X/YntcWo6/VG8xhSD/3m0UVwzt1thwxhz4SzM+1g0b6S
+/V1GiK8tScUB7oyYU3gQDon6TFsJZ6lGBdnC/mG5C8h8pZv2/sOGyHM8okQd
+bnuyZbQa5v37NbwP+2ud0vTbDstLixobYO5tKzc7uC3YauVBuLVR25oGU7v+
+OeUHi5M8RsYN0M+JBZULYSP5yMt+4nGVuROkHiWBf76BZQ3C+C7SP25xn97D
+nqblvaTfWGfV9CdhBr9v1QU4xM/o/GysL8mg/nUOjnag/bIM9ucdj7xI1ku0
+ttoAu2izDW/C8Y/PhPDgB3npp9+Sfq1jRJ4xJPdFT/8sko+k8HorWS+Rn+QO
+16Wy1F7B0lqZ1xFYYuxo9Qmu327GfAKbSXl7x+H42GkBDNSnSq+s/Ass9Ko2
+ioG9vRykb8n8hc43amHm5hdvO+By5alpY7DV0mq1c3A6dezzHBaX4uAYqJsI
+dx5RiWPDLsKkbRyYX3DUzRnmLQ24NYr8tT4Zj3vDUv0+uwuwlWqcbhC5fq+n
+TTCsvlixhjjlVPtqLZhVfH/QF/Z8GdPfoo9zNTfeuhbu/Kn8991wyEPeoA1M
+nX1ocDns8i3itwXwqBmjnAJnqZxzn07mF5nse8jA8y1tzaYPiH+r2LK2GqYc
+slUTw1z/R7J8WMq8E54N0/l3f8wkDrlIC4eDKtYnEueER2eugW3H03aS67WK
+eQ9Jv0mHFYYrYBeFrqz5cPRG+tRbsMRl9CmxdNmlo2/htr7VTmbwe1OukTri
+05pxuc2J1DM0kWUJd8dY34iFOcm7jLzhnJPNSkI4PjR1fwIc7TMgfUbuF5V5
+GpkwPfbESZLf1uTtLQK4rp9xl9T/n/3iWadgmXuaaQA8EbRRlg+fya/ySoXV
+J3LL0uDy0K+9pXDOSnubMFi+e2r2DXjI+OQiDizRb2a8YpHnZViyIpzX/3fJ
+FzjI3L+0BfnUt613pFpi/Cotaw/8nrLiiA6c9/HHhCWwf95hBzosa1l/uF0P
+eYY3JdFgfkKltQXMLH29XxPm9fRPFszH+2r7ZyjA9MIjd6fB6T2+lEHsx785
+l3b4B9Tv8pSop3D0JcVzBjD9fOWBZri+UG9nhy7W+3igoRxmfksqyIa5drHh
+OaS/ro3/Gwknv7/ftxOWxZsc84c7mAqHImFuuwvzZ/hMY1SSH9kvq+9AKpwi
+8yh1g0VltpnVuuRzeLDZFW5LWW7/DlYXz3FfB4fMExizEI+tn8p2H7JfoqLt
+Lvjk601qETCD2h/SAidmX7m4C+4uTt+pgvyCPrhcyocllGCRHSzu7Na/TNa7
+LK6KgunPvHu6YLni3tY9cEd/Q8UEiX+u+YJUWKJQ84OBJfm8shmPhNVlxt1O
+MGXYdccymBEUlrIZjv/DqmcQ++vuyLvJJ5aUlOXCgjch+WWw/ISFnh7c6ttI
+aYC5l7RKi5AfxTc5sI2s72ywfBqczh6xeQgzdL0PJczD8yLzQfpjmPo2vvDJ
+XPTRYm7kfbhcXHbYFhaEfvS9CXcbeu2qmIN81c/P+AN22TOmZwALjg/knCbu
+yrhWScfzbfLZ+CFy/nc/PnSCh+KHBTtgz+Ja6vhsnHu1yb1AS/KcPqvaAnNP
+cSbXkHhceyPOwls/FqSZk/3lc8tK4IkP1MJ5sCjZ1VwE6066B5J+k8rECZ1w
+68qmMhWY48z/TsV+tq+tZiuT/RXpZ13h5x4vNNXgZG2DylxYHGtROIvUr6yD
+8hz2j1u6ZyE8ZFrCM0Q+iV8d2atgoeY5/TA4T2FgdAO5Xs/Q+jjMMflLkkLy
+zVwqrIfluSFRQjK/SFvhT5j62VxA6sVNrHzVCFu5sT+9gwW52jeLYZfQAs3p
+SxC/jpNbJNy5+XQhC5av+d2URtYbVN/oDtcHGBqKEN/MLf+6RMFDuwo+WcMT
+b3UO7oJD0tpZNcg/uXicnwEL7/SazYU5GSoT2XD0Eqva32j4HGgWSYkpgbOf
+9c5Cv9kV88j1Q4XH7qyFPUf8YnfDojureeKZ6M/NrTu3wOWdJjk2MKe0TuQD
+d7sajLfrIO6Lgy52JL6lmsOxcEqEU4ExTLdRvsUk47Xu39WJb027+m0G9lH5
+tfczOb8vGZN9cP1y/fweOJozp7ofli3KcST9ODT67pEC5tMNlshJ/egt0zLM
+4K3lqkkScj/Mbp8WCSf2H3dtJv0akTteAVex/64h/S06t337CCybGVf4hPSX
+5nvvlYi/c4PeZVL/bv9yXhrJr+xRiBLi4ztvVG2EqX8ImgxI/dU9twzAkuri
+6w6knvU9HSqoj0id/8Nmcl4LnzE04IlVZw8chuMHdrlO4HpWfVheLSyJ/p39
+GBYLnfqewIK9u1/nws9nXVo8RupXXR+3HPZu7HDSYSPObOHXO4hX/qjHchHM
+nO94Yh0s3JaxZAUsj/QwbUJ9rMSm9xxh6bH0JcwZ5Ptc7mNXWLJMpzhLG33m
+obrRGRb5fs39pMWlhC9Zet+OrPdRxywIFpwq7mTBIUb3j56ejnounfCZDzO2
+dpys1MR+vfe2UdnkvtXt79JAPWqEEUMkv7BfVrFgzswDx7pgnpPirivq+N7h
+dCC4CebmOQRsI9Y+ZVQB58QoxPvBSjIN8+NkfuMiZizs2XDtBOk3XmmG9AIs
+yjIPTIVZhm36GlhfVNrJIP3nKTgj48NG7zU3kHHp3isKNMTHiVttxocZjl8S
+SLwpaWu2Csj8dq2PK5BPjs2CihrSz3+dcJLAnTb+ZrfJ/THHb4SG/L0r2xTf
+kflF8fPt4JTj91Q1SP3l3OnrYaae/bAlzCmUqXvC6+xXhfnB/ia2gdYwL/jx
+592k/vENrkpwlamSRzE8xBVmJmI/1mcf8+tk3MX1WC3i8zzLTuqCeTYqlbeR
+T/SOLOf3sKdyVr4E+aeHzJZ/hVmpnwSnpuF5WnOLOcUKnto/M0YN/d08q1UJ
+Fiov1mVP5f73+xoeIr+vVbn/AzL9fMQ=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.157838422120044, 11.076737872805136}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJwd1Q1QzGkcB/D/ZGkr2kRU9rK9THJid7Pc9oI/imr0poZc0YsraYulkQ1p
+YyJDaghtqE2qlbjd6+V6o3S5yinblaypZvMS7ekclXSi7vvczvxn5zPP83+e
+3+/7PDN/68j9W6P0KIoS4SH/lGYaPwua4hBY0pSmJ2jkABzeLBAx4IkdfJNB
+c5pSLg27YAWbZE8f2QmnHz2X4QtzrMM42oU0xYzdk38RDg+8dzEeVroluA3D
+Ytmud0bE4/aW2xbRlMKbe6N+Ad7PDPLogHleJ1NS4eBxal0AG+sPqNJCYGbm
+BateWMoSDnnDWeX61Xu+oym6/YGBH5wT2dA8AucELj8RDfPcPeZIrGhqKMXH
+MRNu/Cn9wijsEPva5Xc4RquriFhMU56NzCAm6qF0RdsbYEmVThUAx1XlTTM4
+2H9UuTkPvlbSO7YYbqyy0OngrK1vWDyYs9olgYf+GQ6O61bB1NkPY/Gw+7ee
+Xi4sD4x5mgdzaqKKObC4g/7cAKv3BjYw4aFNX3s6YPqLg7AL+ytrMwvbYJ79
+7Y9nYGrKxv9nmGlnnOkMC+cF5aWQ/I2rnN+gH/9kGceVjI/2/5AN0w5lglek
+H6W6aTMs9uKOJ8HSkPx+Bpzub/69HuzfPrT8CfJStOfbpiAP+Qu+5has3v1b
+4ZgZ5m9cFnEFDja8XBENmx+ae0kGSz83pz6fjxyXmCeq4CGjLm4A7D8zw0kL
+azxl5Z3z8N5VU1sb7Fcdm3N7FzzwC6OTnAfT5LLbpCnyKGhhvIAlNdqRWzAt
+Tuzdjv5iksNvxcGSO4tePSd5+CUfdoerA3h5fOTVGrO3mA+HqgQDh0neTiF3
+V8LS3Mrse2T8fb2rF9y9SZhHWeO+CuzdxLCAtePftXCjQf5IEVyWLFEnwuFO
+0aZv4bFSRUYxLMwVaLmoN6tr2V+PYU+LpoBjcKh2+MsQmR9nv64VFttJnL/A
+5iGXUlnov7mPfYayQQ4f33J84WCPmcKvZH57dJIUVt53+fo3PFD6Y1ghyW9+
++XAPLPlHf20FrKkrTayGsx694algt8lyv2xYUWe9QAYHMWdExcHBk0UyETzb
+Obd1A8yp2CFcCgtsjK9bkPm5wa5dqM/Tt4QaRR7Ba6Jui+BzR+9MqGFegsGa
+T+i373HxzkpyP1uWrE6AmRZb2gpg5rNpH91cmmK/eHnqChnX9qeHwPWml/83
+TWtMOkxQ9wGvoBvwhzTLOR5w2fH1ptVw+LcrI+ksmrITdh/WwNK6Nd/yjVHn
+aW63HupTthjIn85BDs6WZqtheckTMy4sEMV3isn5KLmuytlwp3abioyv744J
+gSs+XK39BPsbpIby4fBXU+9cSd4Pu/nEN/1aW1PhRj5DFAwzFo/zH8Lh0UKD
+QliiL+UwbFGPuqDcCPtR7g41bjCP9eDdWeLB/F3xZLxrcAsb9UrP+DzIhuWi
+xO4KOCeJPawi/uzG80F/16ye+TTDWap6Vj/seUl1/w843anWZQXyoHw7Ulth
+tfkRvUhYM3JnQx1Zfyqq6BRcn1toXETWs32ULIPZvAzv07BwxtOLObBdhKBo
+N6zw+VN5Ap5g9c8i9SpW6ou2w4onBcdNYZOV9UsXwu4Hg1bo0C/dJNtwCvXI
+XUtWNcHisZbztai/LzT2ej6cpSlLUaNfzxLFxpMwz06Z1oF8HEej2vaRPCuN
+JuuMaOq1WnViN0wxP/bKDWnqcVjp3kiS541kSZoB8t7/fn4crDRLsj3IxPkf
+7VNJYfXo+MA+fdzv5z16crJ+9MTCk7No6hg7L6IN5pjP9q6ciTrvlj6cJPXe
+VHYZwvLYzR2rSB6OQ7+eZuC8Ig3Vh2B/ekqyAma/XDJYAyvJ92kG7j/5PtnR
+/wFp5VhF
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.084117857803797, 7.68830612320434}, \
+{1, 1}], LineBox[{{6.4999999999976925`, 13.5}, {13.49999999999251, 13.5}}], 
+        PolygonBox[{{10.6, 13.5}, {9.4, 13.1}, {9.4, 13.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 12.5548}, {0, 1}], 
+        LineBox[{{6.5, 13.500000000002307`}, {6.5, 6.499999999998607}}], 
+        PolygonBox[{{6.5, 10.6}, {6.1, 9.4}, {6.9, 9.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.5548, 10.}, {1, 0}], 
+        LineBox[{{13.5, 6.4999999999976925`}, {13.5, 13.49999999999251}}], 
+        PolygonBox[{{13.5, 9.4}, {13.9, 10.6}, {13.1, 10.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.095161292761041, 9.350096513122315}, \
+{-1, 0}], LineBox[{{13.500000000001851`, 6.5}, {6.500000000002592, 6.5}}], 
+        PolygonBox[{{9.4, 6.5}, {10.6, 6.9}, {10.6, 6.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 5.5548}, {0, 1}], 
+        {PointSize[0.04], PointBox[{2.5, 10.}], PointBox[{6.5, 13.5}], 
+         PointBox[{13.5, 6.5}], PointBox[{13.5, 13.5}], PointBox[{6.5, 6.5}]},
+         InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T3", " ", "P2", " ", "N6"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbf/cgdhei/fjgigjhihj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbf/cgdhei/fjgigjhihj.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {44, 22}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwl2Hk8VN0fB/CbbHkiJCbZQ8JEi6w1ozxCkSxZWkwqUZFCSAst1miKihYp
+2RIpEiGTxKDRpCxRUilTSZQkit/nPD//3Nfbufec7/meZc696t57nLYLURS1
+cgpFkSvFn8SfAZMSJ9BlUnGCNiMOnFvezXo5n0kVOEgmHYCZH9uuVcI8z/rX
+hjD/qq1kPrx4Xc3cDwuYlM31k8FZsMLph0Fp8ODVjQtvwge8NN6uhUdX2ClX
+wzvTg/wkYMEZ65TXcHL4wJtGOpOS/rQ8QhTtC33P7DwD82ceX20CM8+oX9sK
+586O0dgLn5dcqrkcNqTbthbC3Qs3f9Yg9zuUin6DW+st5GRhlpgw00CPSSUs
+WL/+HzjyC03CH758WOmvJFw2MiKaDeuF6A/T4NSHGhId8AvrwGe6cJjUdIMp
++kwqxOXue0uYWcvuV4Uf2apYbSTxrn2muRie97TqUygc6FxsaAYveXHqAYnf
+Xf3SxyXwnT2/S27A4qnKl+bCC8eGXlXBAqPjGmJwYtR4KOk/q9nvQQ/aPz2q
+9M9T2PdWpuId2P6nZsB/+WmXNT4Ef606315B+m8r5mIFp57j9V4jz/dJdE2D
+dwV/vXyExDMqZM1HPpSfXQhxIi7LFbkAC9I9rJTgWG2Wrx/cntbO6EYc0tGB
+R5lwVmzwQBoc1pZMU4d/8+MU1sHcXfcTp8Pbts68LQJHPnnwYircqBnaVI52
+yzZc9hGDx46ZH9wDs6tTlinAJgOxXB2Y5rCldRH8RNqF3YcrX+G0oQeu8RNi
+EQW4stjl72JxpVpCP0bgKh6mpcrBdYJb3+FMyhO3Nv3BtULzzU8j4jMjKRao
+tzzxaZgGzP1qPY3kZ0ttyMLZZN6MdRdWwPqtu6KJOU++qozATbtMIsj9qSHT
+VHTRj/xlEfdJXDbxC4td4Wi/gkwb0n6XpkUonCbo2+ANF/FMDifC8opT3x4i
+5d3Cxedhz412KmmwWrUX+yw85eDAlDskvpYNq2Pg5XM9z9TBHQaa5/yJ808K
+tZL2GPxUW7iXk1fbBZc9DP2gRNovmEh7ScppQr6fEC9l2nGFR54/7eZ0m4x3
+/XX3e8StHJFQeIqf8O1z5PkLm8ZIPvx3naF2w77sW1kisIkES5Sso54hxpbn
+uC4ztno7jnU3SN/ulAvvP7RWuBzuOKHhEg3v6OqctxfO6BHpDYAr45qMtWEd
+0wbZrTD9XA2jUwfzxXx9OPGVSuH1p2D+zsuLAsl4WQyfWAWr+UZ2kvHc+27s
+vjBMhXeevglXfaq6yZ2H/aDikFgnbET35aXAaubcEzMQr4bjQ7Od8OA9K+HV
+ML0i/44tnLH2qkU8rDp6JGExzC2dW9MIr5FJKZoHO87LU5RA/jYels3UgiON
+DDv+ha9kKRzRh3NXfrgdAfd97RE2h5nety7mwWIBhVlrYcMvdl08+LZNS7Iv
+7O5NU+wj98vYtB6DU7UE+4ZhuRw59yswjbck4ifsm35JrBwWp/uv+gx3Js56
+10zqa1Tf+RwO2mUk+QZmGakM3IY/iq/+1AebyOX/Nz8GRMfVBaS+iB0eZP4J
+WoYrumGbfFdTFThjg6xqE9wT3L2iF/3liB9QKoA7eAWf8+CqI8cGj8O+flvy
+9sLV/quZzqT/jlLvlsHvJ6Rmzib9MbjeIA0bmCbXt2uT/VPfsR/5l/5XRPQ0
+sVDz9BY4RvVDoTXM9vejP4I/dt+oH9PC/LL030nWY8KCge234MhIv8kG+K5+
+X5oPLG2Yl/sGTmJre2jAgpz+LIrsCzzWzl5N9IeuU6MHi7UqORfCJt9GvLxg
+rf1TbaJgqt8yPg3Wtd6rthl2HAgQJ/vxFc0m+3/h1F2rQmjIR3XGQNtSOGN6
+vps7vFf0q9si2NBwhgVZfxmJM0WNSXvRtbwnsD9fvmwlPMicGPgDnxaV/L4e
+VjPLbJ6LfbB6U8VwAClfJj7OgGvPpT6NI45pCXSEhW2agrPgwDl+WS7w/ibX
+5mqYvT3u5Bp4R8vZ522wb/7jVBN4m7VZuoDEryconQ2HZLcf+gHn7t1pNUTm
+l/W6aSPwqOzWKQ9h+qxt9G8wp+rARDzZZ0WrjLtJf2OuxZB9V/exTncNrPPM
+Z7oCrOB5xvIyzHzcItqN/Kwqvt3vD5c59L3NhaVtQ5uNSLy8mz3hcLdGgOHI
+XMR3vUfUGWZoheYVwUULDISXwu8cfCR3wNJ+fA1N8vwzXc85MLPUzEwFNvey
+ynyqgfGaDM4m5ZKlHn9OwMyqLVbG8J5NvK1MOIM+P8gVXsmjF1Kwu0yJ4mH4
+r5FrEFcd+aINl96C8+vH/6bCRXEndgjgOcPblwfBZS/Fp2qjf38n73Hc4Miz
+u+k+8Kkopxxr2PeuZWA2zLu3N48BM4NUXXrhg1nK8itI/Z3SB5SR71tua7rW
+wBlDIiVr4e/H+tmb4Z4za+aEw2L7fWJC4Nyt8zVT4YGsvx2nYNZkXUE+fLDZ
+61A+zKG3SxbDRmPnN9fBNI8AhUJY50liQDcceKVF6TIZ/+uLK4dg6pVefyTs
+dTYuZgLm1iyt94T1FXOcpyIfnATH9fqwVa3MCCm3ucw6/4ucH1pqrg2S+hmO
+DQ/gfbe9htvh2I/vXY6T/SvScbCExFfcW2wH8w3jRWNhR80LbnJwjaqUpBN5
+Xv/iqffIp6e9vbEcHOY2tvc+7H6nfhpfDfmpq3l8AR7U22EXA6u9yxw8AR81
+Mx4wh4v6YgUH4YBluyV6VDH/fhXNj4TlzVXtVsOOXQW3T8HfP5nmVKlg/uoc
+mrwBXxif0WsGq1Xdpz0jv1clz5zqlLH+P5QmU4jPKmVNsTfM1xbPNoaTSs/I
+y8IUQ8g4mOx32gUNrUrYP4ecfxaT/fv+EptC4tP9AWS/XaO5wfgiTOtbpLsY
++av8dc6P2NEnrtofdpz95PNNOLCA9v0qfPTePjkeTDX21PHIej3VnzuqRNbT
+3LRvsO6ugWE9tG+zz1VPFOdQ7pasnyQ+plBfsTRcVyl1NA3mmnt/kIJ9qzpC
+mki5TtwQBSsWyr4ahmPFXGP6yLnq2bCCLPpv0/a56RGcYaYkoQYLyngO52Eh
+jQpDJZKf19zf5BzbK7XvoTC5P27pXz2Ya19f0YH6OOw95WR/SJI5/OM87Fuy
+OvsePKLrLbuStBdyyzQSblsWcroL/eEW0pvt4Z0Wj/K2wrEJNfEacPOP8GXd
+c1Cf3rU1JP+0WIP7DjC3ZzKZrLelCvE/yxQxH5xSgl+R8ZS6K6IOG5odjSfe
+rWKhkDAb689h+jC5X443YTlOQz3WmxzJefiV2u/NIbBNVMAjTXhi3tmePwrI
+j/yHCbJfjcqo3kqBwx7HrSW/b2aZjRIMeLCTX1hD5sPKI8F/5TFuSlXtU8i5
+vdIjnQ+P2ltvXgGbyRzbVga7/1rHjYLPVWU1F8PsXosccm7e9mBo9kNYoDpQ
+9AN2il/V9Brmfw1sV8f4fFRv5oqivdHTGput4WZ6f7gJ3HEt7YsXLM/y7A9Q
+IOeRpPP+cInssz9ZsE2Q0XAAPKZeGPUSzi27IbsNPtncFSKC/nL6LY/aw0nj
+yzW0aeS8wLHThxv1haxMiEc5b6fAR38tWmAKR3Iz5/DJe0SK2wdyf5nbPVoa
++T0x6VlMwSav7Qy8YCnm1dJatKdTee65Jpkfqq09wTDt8Z7D/chX9uKDv2Rg
+9vnG5DKyPhJthdPlyXqZZZdAxmP4GmcOXKSwM5nslz1GJ8OTZmG+l4ZNWwNr
+jKd//S2H/GtNf21B5tecAG1vOHUbp8EUvlH4zqFpJvq7L1hqJex4mRlrCheJ
+1ewkv6+9PknVRbKYj7Vn1cPhS68VTiyBI+V51HX4xcuCvnoZzPuFCf7t5L1g
+gYqrP2zT9ThYhvRHb36UNim39npD9uPehhHnYWm0c+2vDZvMfzlOTxssXl1i
+QvJlkTl9Ow8OizhmJkny7ZHgSMrdtdNHrWDqzxLXbzBbK8o5BE7JkTkyC/W7
+c5+HXoJpdflO/8qQ9w/ToTI4eNvI4AFiz3XlDbDwpyWMO7DvTKsVzXClhK1M
+H6xz/uDBOpi9tdhlFvpnErKq/Q787lWCmSmsNu5mkQI/efFw81q4yNtLdDfM
+fz7jiwspN1f4YQ4vrzMrWQULOhxkyP7i6bzHURtmlpTkPyHjz27TGkR7/DVL
+F5L3xA5WU2AWPCr9eY4HfEAk0HIVnPr2RDs5n1yYWRnYjv7GHvHLJfuhoX5Q
+ojscaL08hZxXizzZxy7OQL6clO2L4NqWsO0hUujP/Jlq6eR91E/+rrUk4lt7
+t4+8r2zstqtWmI55stRlKikfzeY+H5RAvds1ncnzl0o8v72chvz4RJs2k/Nu
+2DG/TnHMfw/W1RFS36HHuaNimE+xq6bpIL4XZpk9prD7S9FkFjz4z2TXVVHE
+9+GtfDrZr3WF2xbBsaLNpt2wi6ve1q8iiEeu8oQK8vNi5qpdfJjFGj26ETYZ
+f77kJSl3uPjsLBnvv/JRU/H8oKXwCi6syfl4zxYuSvf+MgSHvdigngWnnt3G
+kDFA//bL6UkhHp0JpqIWHPvZsvQgiW98f7M+rGm6YZcAjtzRqKcD19opSNui
+f77SRlEK8E0t01fnxMl8LEsbJ/EZPm5ohMO4i0paYbm72193w4GuJ/bnLCDv
+SXLbmmFWxoVX++CySfZc8jxXd2iuGawjmxOxBBZkHyuZJOM9Ob4/j+Tv3JhY
+HXx8dXbjCOJXc5nHPgXbLL9Yqwq7pz69vJnkLzpz/nzkgwrm2RiR/Y9hJDxb
+GM9/C/ecRZ7HMWlECP2hLM0puKjis2rDFIxnp1IvGa9c5/I9aRT+H5L04jcs
+HpDu8WaCQZlUH5CcRvZfx8R3OX8YVEagugzZfxwjlRMvjjGo2CG6wJbsXzlb
+btWPMqjc7wV65PwUqKzoYfyLQQ0ORc8sIt81rua8/f6TQUkHt8b2k+8W5TPO
+TA4zKJpvmDnZH3NzYgO84NTQz+VkvbCuV6rLwCyHoPh8uGN5qoQ0zJErsPoI
+q32R3e0C84XcbihiPKghoarnxItCHljDHfWP5KJIez5PX/rCtGz7IvsR1Hdq
+vOIIzJH2jp+P+DKSrVLjyfMGBZQw4me7C5TjYK6p8ZEnMMvcPSKCfOeKZ+oF
+/cb9uz03esM21nnRn2CTfarvl8Nhyk4ic5EPrljyJVlS/92gpFlw2T1W4Buy
+/q3KestxPxOJJPOB+fTD4D+w2jSuE/l9CQuT75dAezoV60wWw5zohh3liJfP
+NSwZJ991BkMXK6M/hrv/qjeQ71C699UYPxBfnusNcr6UNvHJ1R2CVS/qR9DJ
+OfOCoPMrgxrlZ+qR8wRVW3ad/gnlyloP1sM9x5PpAb0MSrwg/Nh/nvWwOeIN
+g3KnL73sTb4ThYQujmhD/LOeFhwgz5c57Dd8AvtuekXao+oMRnXuo7/xG16T
+707//RVV/f/74ALm/wBpUU4y
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.76814822984937, 16.138025500903524}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwl1QtUzFkcB/CLDmMrJk30ovFYBtWOShI786dWD5XZ4eihGKm0s8XUolCM
+yqNTalLJsxI2poPRklHZnaI8wrZtJ4Me06omRNNDjVft97/bOdPvfOZ/7+/+
+7u/O3JkZul0YPpYQIsGLjmQK/W8qRZh0ZFLE2SX3erQZRUThGabrJ1NEuHFE
+/5hFkcKottTXkyiiDNx9dw6sGXRTVsHik9HbE0zhngld7XBZz9SQl1MoQj69
+sfTCfB7LdL8nzLZ5YNcPGxRs7XtoQhHuGo+JYqxX+6fj2TBYsT9+UR+s/z7p
+vRUs0L40OozoYHu6kH6fKWh0nY08c46+Ot8Jsxf7fa6E69v+mjEEq1RvSlej
+jkse3ak2mFfvMxJ1H/6VZdgZDDNDb62dT9ftZTTuEp2fFzAtClZPGer6CLOr
+onjpcP78bLvVyCtYuDLoCJzg9SUhB9a0HbHeDB8vyRt4CiuKnvtYwBtdiWyQ
+fh5UmX8T61nOu5lGEKWFl8XLEX32LT3fi+ciibPfTURhTaiHClEay7zNQXSY
+8+5GLN2vZdnRBajDMqxXx4B1RXu+zIRZNqHyQ4iiIqmbEvtsWpIylu6HIjZ1
+KBLRuiKU74dISja7LkX06Vnwwht9FtUx/G1h9+OZXZ+NUV/HjENucLrjVe/f
+jTBeFapJhJW8H4oLDCkicwn4WQ2Hddg9LPmGIhKB5yo/rNsdxhp+OxHPU/sH
+1HCKMDA8gnZsbqUEdcZfEamn076cMssY+2XsbdxjAnOPiUMvwkyt75vlcP30
+C8NcFn0u53afgAUZWutLcHNc2wULrKdKL1hhgM9dwm6u4jeYvJ4UTcGVi+dF
+BqA+KicsNRD2dFis18OkWnjMDyaLTj06hP3ojMUX2LBg1tmwQZjdJOhpQH7r
+iywHZ3r/ur93ieGOcsrJDRZ8Pd/xDvXVmxWnmsEqe974cFjt/b5WjvmCLdpw
+NX2uQ3FWBrAs5FqtAN4Rf5Q/F+szTcwLm9APA2OOHV0/xeHmx8DWt5OLtQyc
+z8IrdhzYqTTnRP4ErHO/2XIU/U2x+eDrMx71OXO8PsLdUU8LRw3g9JjD0zA+
+uENqdn8c5ue0JgfAleHeRDEW37/ih21K2LyuvaJmDM6nWx7qiHrcH/R8ZcLM
+mXrPKtjoWMzaPIJ8L4XyIOxnh2TCkyBYt+mLbgiW+ZS1BcLc/KQNR9GPS+f8
+EzLhwtERqRn6Z7DaNHgArm+3qD9M9ztXkrgH+XX/rBvTCjcfzHs0DfWwL7fu
+NMW9YdTX11oJU20Bid/CjT+laIJQv070yz76ud7wO9ErWHRveJSer+QUOHph
+v1RJZVYa3LjJcvkBWJbefHwGzOVETUqGBekbBvNRX1Tk5Fh6vNSGcZkFC7xN
+FQ3IR/HK1x3BfnRJJlfYsGY9s2ws3DhV/tgF9dR7B85NRz9utNgXzkb9oppd
+Vrb099ow45F6lE9kyfNvdaOfslVrldRXPuE+2SauhamQzpHTn/iE6b+19D4c
+uapWyNDziaLlTn8PHND9PqLoA/y8ZrsT8pmftV2WMoB85iWRp2DPPt/su318
+InKaK7Cg6/Nbe1Wi45PCjGC2HBZIrIoW9PKJSjt8zx37kZR7h0e+x/j5Drka
+WNYcXZwF63zPNe1AP2QVDSmZGK/IM1zxkf68q7Z5FCAfZZ+4NwL9VXeVxiix
+nuYIL60MjnTUSvT9fCI5ybbvhBW34xasHOQT8rzOUgcrDRh9caiffcVj9jOY
+U5vpnjiE+hnXl5yBddXXpC7DGO867OkGm1e82pRDOyTAuAHrx/f+sfwArNlp
+I18DS929Rj5gvtSk3OMe6o9ct/OcDvm5cUnHXWCOr8J/F9avf5a0mr4fqVvZ
+LtmoT5rVe2YlrDi4JS0Q+1HEWNVq6XtPaB1R9Rbz/V1Oyel7tqXr5OEujP/R
+3zYTVqll9lQ7LH6RlQdTVZYtPmr09+Kn6rv0PSrWP6x7gvMbwzttgvxEulVQ
+XY76I5o+0r9T//3l3Pn/945F/Qu0rYWt
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.472727570790026, 3.579801639345143}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000006366`, 17.000000000003638`}, {
+          5.5000000000045475`, 11.000000000003638`}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.950887509261843, 15.744254101457688}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt1QlMk2cYB/C6IsLCkAh4IMYpVLmcUIuKB3yCLqRsilAPDqcrYKlyVLwY
+VgQts7gqHjChMCxZXRgWrdcssRp0jHrUoJRKNYUgcqOldEBBRPZ/tzVpm1/e
+73m+//OkzbeAmx6V9BmNRkvCm3z/9+FP0UYn8fKmaMz6vE+ecCZDNUT3oWjS
+bJMDG5Z4MKrGcX5j1SFLKuyiWGXqgoNlM04UwNv782fVwxmKzYpqeL3+1BQp
+LCudn6uBOboAeiIcJbGEGWHttqA2Brl++ru0ftjO9cHtN14UzX/dxZohON4w
+620JbPOtjfso3OZ+bSAS3rh2fsMw6Z+zNd0ertsbzDbBfk7mzr8WU7T24/Tg
+dviRa9MVMeySrpE0wj0Jzk3RsEraQdWSvGdvuHrDgmXsXAXp19Cssod7JvWi
+Yrj2WY14ZBFyXJsU5ZH57/U+GYBlVp7yABxpv33NMFw53jqPBxtjWC62qN8T
+IajdQe6/O99hASw/Y42PgTsClgvWw1pXZW4s6X/0ypI0uOzl3JzvYRld9r4U
+fq4U8dNg/z0P/Z6SPFuCHXNJ/jmbto0R216fJPnUQXGdHphfbJhZdBuuXFN+
+KBx2LL1j0cMpLeJ3ifBsT47zGOxgOpV7GNbeidHNC6BoH0PExmy48A/uRCjs
+rvltfhZcFntkG4+YqRtMhm0Nxcp8WBFx4XgErBy9+r4Szpz78eRCWJDW5FoH
+p/i1Lx9Avi6eOf41vNJYEngTHrIR+vXD8bGv8gWwG9/qPULqj504TvZfL3i6
+ahwW/bSpvA37jE1KzfsAt61LFBST/a9QpQ/BrA3Oomi4PfO0tBd+5NxPucCh
+QabX5H5qZtRzI4OiWW40+z+Gn3/5bOo12G59uPo2qY/8my2BVXGdygqYGjAV
+HISF056En4ErUwLW7YWDRxzvCOFCybPQVHJ+/5JbGtwz/vtgFvyz/v2+BHK+
+9pjPBbhsnt3ZHbAwgrP1FmyUnXEmlkwbPELyzKju3Mkl/Zknt9iT30uLpTgV
+Vu2S81fCnvrzFdmkf3jcIh58v8jgXgTnJGdNnIfFrXYZSljAlubUwDZjDF0D
+nJjYcMRA6kPrNljIPje//sIEd8jrq2cy8b+4rFWPwurw069Ww7cOhPxohUUa
+p4JdsPYbfl8v3PN5bMkJWP2gZLABZnc91P8KO61o9a2CubpUqhaWN+qqfoCz
+n+6dbCb9xX3DIXDxddeUPrh4o3TsE+ZtFTHdrHCiQ5hFBW+vKzVOwIqjl6IF
+cMaUJZpPsOFPQ/ViWJbUu+QDbMPnnnvjSdH6yndVmGGVXpchg736snraYfHq
+oYLdcKzQbH1B6lVfNgfCTQuedN8n85x3a5wOq/Z/110Fd5gZRcMeyHNhk/9F
+2MGHebMbZm6YPSaC3QWnV3TBPmN3eQfhwpbky2ZyfYtvHh8eWsqcmIp+Xd79
+AVy4Nk+s8YSlS9Pdyf5YthxGBJx9V16TAHvRIzsOwY333oWkwsq4RRcvk3xB
+GrmQ7Oums7IJtp3z9S/n4LMsc9kUzM+xC6u4AnMY/LfecBcVOPiY5M8KXBMB
+Z3J45f2k3zk3RQJ8i76saPoy7Jt1tWQf7NjdWMmCy150te6HI6lwWQysfazS
+8+GXXE3YUVjotXxnNFzInrWnHHZJbu/wh6MOb56qhlWVvhw6HGo++JUeVs9d
+7aJFXidfztJe2CCTjEjghx1xp6yw3DqyMBz+9/nB+v/54UH9AzZnaeA=
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.3252, 12.135199999999998}, {-1, -1}], 
+        LineBox[CompressedData["
+1:eJwt1gs41PkaB/C/u4g4nKgOO1kKFako2vSjUumyWygUjSRq0eROu51/0WWj
+6WIVxZmJWpc2l7Y9HJzMOlvKtTSFSCKmdoe2pM1RnO+7ezyPZ57P877/3++9
+zMwzM3fu2xyiynFcJv7p9c8/G/bnqwHjROJqhTt82nUwwwuee//c6TRYlBEz
+JIafT1U7/BiWTbPpLoa33l2jb2uL/P2yk2XwguKfohPg0vnK0+fgSFPDiVrY
+oD/r10C45mXhXK05iBf4aujBK+Sqd9xhmUTFZO0UxgXNG9GMgYWtgmPe+ozr
+FL6RZMGC/wxIVusx7pbwQ8d1yl88T243mXEfjS9m1MD8Ym9bE13GXdAWbpTB
+3NilC3o6jAswGjD+J8U/9Y40n8S4K5MzD+WSu+zyvbVx39/6pMfIDcq4f2kx
+rrWqviOU7o+Y1+QFC3+bdm8V3ecVpmINqyTmrbCEpbYGOYvhVOWsIQ3K9z60
+5hBsHn8oaBD99pwt6ORwvuacJkUXLAhNP1MCG4+M7n5E8fG921NQz++ebG0n
+OfmOTwzqvVp+5ksl5Q+/XhWNftZtfPYXHZzf81nU0hj0GxJw98VCmDncmLMX
+85DzFRNhZL7t2zWY17SHUd35VK9IYaqOeZpN8Ts7RPXmKXXS4X066XUuc1Hv
+16qKQTjJ6E3/N/Bvac1tWthHY5ilQwfM4hPnvEP8jXbRL1bzkJ/tpJIL+796
+Hh0B81puJVPh+q9zIq/BUnmM0B/3KzRDH/fBnN8ZSSzqq/SPnzfFDs8PLxqM
+Qv1BfdWhdmTJkWWB6G9Y7PGJGzm7PXgl+k/sDT6yGmZ5J6IXYD6NM1x3uVO8
+v8bMEfP7Sqb914VkzZdGvph3b9+KfTNgWUFx3BVNxnl59pR9pHrfevpawWMe
+QaFdZBbq+0SDcUenbvGohFns1sB7cElu2ZQLcI+1cew4XPH4UvhByje9Xr8L
+z9u+Otm0h+I/BDz4CMfEydcFUnymjfgn3D/0d9mpAIrf3vriCurbd+h9VRjF
+nXxdJKh/vd/uHTzNoyCwXYr+Dh9fHXmZHPGPkhz0b2VX7S6n+dUnvziO+bwJ
+br6sT/04GB7dgvllDIo7NsGCx1f+OwavsE6ruEj9339XJMK811hl3X4JSz/v
+8S2GNa9mejvbI/6wR1QG29xpkh6DZW0HnBJhDwvj0fswJ9vepKWPd03YnCGd
++chvv2O+U4/x5WOtadZwj2FR9qnJjHeJuDHCKN46uz8L9dqHXDvqBQuC1q5L
+02H85teCgR2wzCzcMxr9To/aqLUb5lcE/rpNm/GSiCFbsrBOaoHPE68+otcl
+JEfm24fQPPs/f7mFno99pp6jwfjGdwr/tXR/vaJGDfvYZNwY4gxLF4Uskaoz
+TvVd5Xaqj7+74GqcOuPTb9yXmJAdbh05Dkd2HEjVpvNT4rzlyFfctGh5j35Z
++HG5D+37B0XxC+pfOGGtiftF7k/P99J86ursu+CEWYJXClgQrjHciP0WbX6V
+Omr/x+fdoRH9PAnKf6RL5wcde9uIft1i4sYEMMswc6zFPLzPN1Uupfks35Qo
+wbw8ok74bKP6f1y63w/7Vdvrfu8g9Xf27eEBzNdXP2riMlla6bYc+w1WVz3X
+SOddnl4fiH1wjhGOb2k+uRfH3eElJTUHpzugfsHEJSXOszO5+KkrLN3SsmEH
+7GQX8S4AFrSWrrqky/iGCf3RBFiYkGtThfefn6HJHjHMF78+UY76LS6uupsD
+syGjPbl4/8oVGYrv6DzL2uzj6N+qovBpIT1vJl4Sj/no94mm5ZMjvx9Iwr6W
+2JmvlMCyjJZ1Esxf37lgQzrFr5fFDakx7r0Z25pC559aHyyCM3U25EdTPLjh
+vK0a48sqLmTtpH4SVHs+gWcrD4o3U3zvTdsvkO/QebtjJfUzM+tEBeKjhuy6
+C53n7unvhf3e7SywcKS4btlhU9Rz/knth0Xk9QuffoRP2Fu3UL5QN6Pqd9Sf
+YhHU7UHPL50fMor+luWdnulH8TXJd0awX5/qHvf95NZoo55JjLd3LcqjebFJ
+Yd7fY37XVlruKqX5qPD6X2C+w3GfRT6k+wZuVtVi33Viw+QPNI+BB07jsNuL
+ME/LBdjv8iCtCeS3We0IXgdzevonf0Y89VxKrAgWqq/X2gQvqz3tdhZmhaLE
+QtyXlfGktAQWZH4V/hD7cnn0sreO8lsyznRjX3amS5c8Jn95c+099LPZ0tR/
+gPKjc0zLNRm/V6PaVUn3ty2YJMX7/728yYYssB/XzcS+AmpMCilfmC7achXz
+PbL+u5NdlH92f8NzVcY7J1951kz1WG6M2aDKuIOPEjtvwnxhtoFSBd9P3I/N
+1yg+K6X2ZxXGJwVdmpFDLo3pbEd87lN7czHl9zU2zMJ5420zzA6TZy92KsJ5
+fYZTXZKonnvNVttx/4euyuB4WKaM2LUQ+7WPUvGkOFc/orTEPiPUbvgkU326
+k2Is0V97uH8ezYvLPc9Z4ftlW8MjlQIya0+bhn3Gx956W0vW6s2n/XZbJ1f2
+Un1yA4NizDN1UOyjuRD7rCl3dcbn11H0IHMuLNyxrfsU5v/viOVO3hSXlVtd
+Q3y++vvmAzBfOtuI4uGybeq5FP829YgT4q/11L65Bcuykxzycb7R7V/m91O+
+dGW0Avf/8Ttr0f9/b2mz/wHsVWpK
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.952631629795212, 1.8745372234640723}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwt1AtMW1UYB/AbihlDHmUYLc8VKVKetkgssJLdMJCCZliGyBiPWWF2oFCU
+CZ3NyAYKwzqQR+iQ6UaIFHkPNqoypdqNN+Et25Aw2DIYRUoHS52M+D/GJu3N
+L/e755zv33OPmyQ7Nt2MoigxvuRKWZEfL5r67/MKTdE2okpnWHX9JPsIPB2V
+WRQNm7rvr1yC6yRtxmJSn/LXnnly/ypnawJmHtKZW3rSVPdEdT/Hm6bUptnT
+HjBbPvSCApbZ6sL84Hy58fUp2DTI+sINTqriKj18UPd7aS8DnpvU6rJgijVb
+MYvx+1529GsmXt7oJfObczb0f8Aym2+vJ8PdtdZBj2G1VdenTjCr0+6jHXiu
+jOk470FTVlw/9hYs7WUrG2CmUGg3D/OCLgfI4XDVlHUPvOKVWJ8MF/VGakvg
+gWt/vhcHN+xbOvUObMGO+CUF5gacGnYj81/Y7FaQ59UCqRH9GBiaxy1wgt6/
+aRjWnFds6GFdpOLdTpht8aNtMNYX11L6wfcwt3qPXgmzHXJvtZD60cqaZZgj
+Mgu+CYvapNsC5PHhi2cPb8ArR0y2n8OiwgipF+bXRDGybsHm1idnZKTfT/ip
+JlhWuED9BjOzhAdYXORcOtTG8qWpkm1ZGQdO45lHyGBu8mcCF1g9teSgg9kP
+ZlIZsN7GXmfrR1MdIe05tzEeFeF0IgZebLiyWg8rvQsNBbDozK5TGnFjQPx3
+8Aqn9RH5P+nNkvYWmJdWmXMP/Rh6pqPUsJSxv70R1j/yqK+ENcuD/nI49/Tk
+mznweFPMz0dhVZhEFw6rR/pd3oJ1C1OCfbDF9t/rYrLfvhIEL2C96htOeZmw
+71habissGh28WkP278XnUopg2qcicRoOPBTz8ARs0i/buGJ906PnQhJgXuFQ
+uYzku6spSiTPZ1607Id1ed+MZ8EDwlaJM/IQlZVuVcHlzj9VZMINc5LqYZji
+TzxrhyltVygT65tzT/r1Acl38XZxKswcuLm+F+9FoNwn4Rps6Dg64gjXGcXu
+1v7Ie42x+hKsTHcUSuDxaaO7Gdxyo9i9A07gqy7fxXh1c0MzRlhWYHmlEd5Z
+fWrj+SpNBR0MOZwBs2VPzkXD5eIeGRceye40TyL3Z4dcH5J+msW1x2BD7PH0
+Zvj+P1oFqddEfr0phwPXdWY+xPravnhS//x6PgW/XVpzNxzuy/VcHcP8x/lf
+ur8BC9cuzdTCA65C/jF4hHVhTQqL5DvRhbBvdmhXKBxksM/phXn274e5wOrd
+rQKyvwx3BE8sYaZpKz0Onj94J3gv3BFlkP4Ad2vvJTkQj72WR84lRcaK4gCc
+vxR2RgxX5SoLs2CVVatWBTdwrINJXqwiju8kzM0Jz3hG8mqXVj8lees+3h+L
+fkyd8SZbvEd1FfzFJpJH9tlqO9iCnHu8/88/b/pf0S3MLw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.761512611302877, 10.651252930219968}, \
+{-1, 1}], LineBox[{{5.5, 3.9999999999976925`}, {5.5, 10.99999999999251}}], 
+        PolygonBox[{{5.5, 6.9}, {5.9, 8.1}, {5.1, 8.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.5548, 7.5}, {1, 0}], 
+        LineBox[{{5.4999999999976925`, 4.}, {12.49999999999251, 4.}}], 
+        PolygonBox[{{9.6, 4.}, {8.4, 3.6}, {8.4, 4.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {9., 3.0548}, {0, 1}], 
+        LineBox[{{5.4999999999976925`, 11.}, {12.49999999999251, 11.}}], 
+        PolygonBox[{{8.4, 11.}, {9.6, 10.6}, {9.6, 11.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {9., 10.0548}, {0, 1}], 
+        LineBox[{{12.5, 3.9999999999976925`}, {12.5, 10.99999999999251}}], 
+        PolygonBox[{{12.5, 8.1}, {12.9, 6.9}, {12.1, 6.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.4452, 7.5}, {-1, 0}], 
+        {PointSize[0.04], PointBox[{16., 13.}], PointBox[{5.5, 4.}], 
+         PointBox[{5.5, 11.}], PointBox[{12.5, 4.}], PointBox[{12.5, 11.}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T4", " ", "P1", " ", "N7"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdfei/fjghgihjij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdfei/fjghgihjij.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {0, 0}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwl2Hk8VN0fB/CbbHkiJCbZQ8JEi6w1ozxCkSxZWkwqUZFCSAst1miKihYp
+2RIpEiGTxKDRpCxRUilTSZQkit/nPD//3Nfbufec7/meZc696t57nLYLURS1
+cgpFkSvFn8SfAZMSJ9BlUnGCNiMOnFvezXo5n0kVOEgmHYCZH9uuVcI8z/rX
+hjD/qq1kPrx4Xc3cDwuYlM31k8FZsMLph0Fp8ODVjQtvwge8NN6uhUdX2ClX
+wzvTg/wkYMEZ65TXcHL4wJtGOpOS/rQ8QhTtC33P7DwD82ceX20CM8+oX9sK
+586O0dgLn5dcqrkcNqTbthbC3Qs3f9Yg9zuUin6DW+st5GRhlpgw00CPSSUs
+WL/+HzjyC03CH758WOmvJFw2MiKaDeuF6A/T4NSHGhId8AvrwGe6cJjUdIMp
++kwqxOXue0uYWcvuV4Uf2apYbSTxrn2muRie97TqUygc6FxsaAYveXHqAYnf
+Xf3SxyXwnT2/S27A4qnKl+bCC8eGXlXBAqPjGmJwYtR4KOk/q9nvQQ/aPz2q
+9M9T2PdWpuId2P6nZsB/+WmXNT4Ef606315B+m8r5mIFp57j9V4jz/dJdE2D
+dwV/vXyExDMqZM1HPpSfXQhxIi7LFbkAC9I9rJTgWG2Wrx/cntbO6EYc0tGB
+R5lwVmzwQBoc1pZMU4d/8+MU1sHcXfcTp8Pbts68LQJHPnnwYircqBnaVI52
+yzZc9hGDx46ZH9wDs6tTlinAJgOxXB2Y5rCldRH8RNqF3YcrX+G0oQeu8RNi
+EQW4stjl72JxpVpCP0bgKh6mpcrBdYJb3+FMyhO3Nv3BtULzzU8j4jMjKRao
+tzzxaZgGzP1qPY3kZ0ttyMLZZN6MdRdWwPqtu6KJOU++qozATbtMIsj9qSHT
+VHTRj/xlEfdJXDbxC4td4Wi/gkwb0n6XpkUonCbo2+ANF/FMDifC8opT3x4i
+5d3Cxedhz412KmmwWrUX+yw85eDAlDskvpYNq2Pg5XM9z9TBHQaa5/yJ808K
+tZL2GPxUW7iXk1fbBZc9DP2gRNovmEh7ScppQr6fEC9l2nGFR54/7eZ0m4x3
+/XX3e8StHJFQeIqf8O1z5PkLm8ZIPvx3naF2w77sW1kisIkES5Sso54hxpbn
+uC4ztno7jnU3SN/ulAvvP7RWuBzuOKHhEg3v6OqctxfO6BHpDYAr45qMtWEd
+0wbZrTD9XA2jUwfzxXx9OPGVSuH1p2D+zsuLAsl4WQyfWAWr+UZ2kvHc+27s
+vjBMhXeevglXfaq6yZ2H/aDikFgnbET35aXAaubcEzMQr4bjQ7Od8OA9K+HV
+ML0i/44tnLH2qkU8rDp6JGExzC2dW9MIr5FJKZoHO87LU5RA/jYels3UgiON
+DDv+ha9kKRzRh3NXfrgdAfd97RE2h5nety7mwWIBhVlrYcMvdl08+LZNS7Iv
+7O5NU+wj98vYtB6DU7UE+4ZhuRw59yswjbck4ifsm35JrBwWp/uv+gx3Js56
+10zqa1Tf+RwO2mUk+QZmGakM3IY/iq/+1AebyOX/Nz8GRMfVBaS+iB0eZP4J
+WoYrumGbfFdTFThjg6xqE9wT3L2iF/3liB9QKoA7eAWf8+CqI8cGj8O+flvy
+9sLV/quZzqT/jlLvlsHvJ6Rmzib9MbjeIA0bmCbXt2uT/VPfsR/5l/5XRPQ0
+sVDz9BY4RvVDoTXM9vejP4I/dt+oH9PC/LL030nWY8KCge234MhIv8kG+K5+
+X5oPLG2Yl/sGTmJre2jAgpz+LIrsCzzWzl5N9IeuU6MHi7UqORfCJt9GvLxg
+rf1TbaJgqt8yPg3Wtd6rthl2HAgQJ/vxFc0m+3/h1F2rQmjIR3XGQNtSOGN6
+vps7vFf0q9si2NBwhgVZfxmJM0WNSXvRtbwnsD9fvmwlPMicGPgDnxaV/L4e
+VjPLbJ6LfbB6U8VwAClfJj7OgGvPpT6NI45pCXSEhW2agrPgwDl+WS7w/ibX
+5mqYvT3u5Bp4R8vZ522wb/7jVBN4m7VZuoDEryconQ2HZLcf+gHn7t1pNUTm
+l/W6aSPwqOzWKQ9h+qxt9G8wp+rARDzZZ0WrjLtJf2OuxZB9V/exTncNrPPM
+Z7oCrOB5xvIyzHzcItqN/Kwqvt3vD5c59L3NhaVtQ5uNSLy8mz3hcLdGgOHI
+XMR3vUfUGWZoheYVwUULDISXwu8cfCR3wNJ+fA1N8vwzXc85MLPUzEwFNvey
+ynyqgfGaDM4m5ZKlHn9OwMyqLVbG8J5NvK1MOIM+P8gVXsmjF1Kwu0yJ4mH4
+r5FrEFcd+aINl96C8+vH/6bCRXEndgjgOcPblwfBZS/Fp2qjf38n73Hc4Miz
+u+k+8Kkopxxr2PeuZWA2zLu3N48BM4NUXXrhg1nK8itI/Z3SB5SR71tua7rW
+wBlDIiVr4e/H+tmb4Z4za+aEw2L7fWJC4Nyt8zVT4YGsvx2nYNZkXUE+fLDZ
+61A+zKG3SxbDRmPnN9fBNI8AhUJY50liQDcceKVF6TIZ/+uLK4dg6pVefyTs
+dTYuZgLm1iyt94T1FXOcpyIfnATH9fqwVa3MCCm3ucw6/4ucH1pqrg2S+hmO
+DQ/gfbe9htvh2I/vXY6T/SvScbCExFfcW2wH8w3jRWNhR80LbnJwjaqUpBN5
+Xv/iqffIp6e9vbEcHOY2tvc+7H6nfhpfDfmpq3l8AR7U22EXA6u9yxw8AR81
+Mx4wh4v6YgUH4YBluyV6VDH/fhXNj4TlzVXtVsOOXQW3T8HfP5nmVKlg/uoc
+mrwBXxif0WsGq1Xdpz0jv1clz5zqlLH+P5QmU4jPKmVNsTfM1xbPNoaTSs/I
+y8IUQ8g4mOx32gUNrUrYP4ecfxaT/fv+EptC4tP9AWS/XaO5wfgiTOtbpLsY
++av8dc6P2NEnrtofdpz95PNNOLCA9v0qfPTePjkeTDX21PHIej3VnzuqRNbT
+3LRvsO6ugWE9tG+zz1VPFOdQ7pasnyQ+plBfsTRcVyl1NA3mmnt/kIJ9qzpC
+mki5TtwQBSsWyr4ahmPFXGP6yLnq2bCCLPpv0/a56RGcYaYkoQYLyngO52Eh
+jQpDJZKf19zf5BzbK7XvoTC5P27pXz2Ya19f0YH6OOw95WR/SJI5/OM87Fuy
+OvsePKLrLbuStBdyyzQSblsWcroL/eEW0pvt4Z0Wj/K2wrEJNfEacPOP8GXd
+c1Cf3rU1JP+0WIP7DjC3ZzKZrLelCvE/yxQxH5xSgl+R8ZS6K6IOG5odjSfe
+rWKhkDAb689h+jC5X443YTlOQz3WmxzJefiV2u/NIbBNVMAjTXhi3tmePwrI
+j/yHCbJfjcqo3kqBwx7HrSW/b2aZjRIMeLCTX1hD5sPKI8F/5TFuSlXtU8i5
+vdIjnQ+P2ltvXgGbyRzbVga7/1rHjYLPVWU1F8PsXosccm7e9mBo9kNYoDpQ
+9AN2il/V9Brmfw1sV8f4fFRv5oqivdHTGput4WZ6f7gJ3HEt7YsXLM/y7A9Q
+IOeRpPP+cInssz9ZsE2Q0XAAPKZeGPUSzi27IbsNPtncFSKC/nL6LY/aw0nj
+yzW0aeS8wLHThxv1haxMiEc5b6fAR38tWmAKR3Iz5/DJe0SK2wdyf5nbPVoa
++T0x6VlMwSav7Qy8YCnm1dJatKdTee65Jpkfqq09wTDt8Z7D/chX9uKDv2Rg
+9vnG5DKyPhJthdPlyXqZZZdAxmP4GmcOXKSwM5nslz1GJ8OTZmG+l4ZNWwNr
+jKd//S2H/GtNf21B5tecAG1vOHUbp8EUvlH4zqFpJvq7L1hqJex4mRlrCheJ
+1ewkv6+9PknVRbKYj7Vn1cPhS68VTiyBI+V51HX4xcuCvnoZzPuFCf7t5L1g
+gYqrP2zT9ThYhvRHb36UNim39npD9uPehhHnYWm0c+2vDZvMfzlOTxssXl1i
+QvJlkTl9Ow8OizhmJkny7ZHgSMrdtdNHrWDqzxLXbzBbK8o5BE7JkTkyC/W7
+c5+HXoJpdflO/8qQ9w/ToTI4eNvI4AFiz3XlDbDwpyWMO7DvTKsVzXClhK1M
+H6xz/uDBOpi9tdhlFvpnErKq/Q787lWCmSmsNu5mkQI/efFw81q4yNtLdDfM
+fz7jiwspN1f4YQ4vrzMrWQULOhxkyP7i6bzHURtmlpTkPyHjz27TGkR7/DVL
+F5L3xA5WU2AWPCr9eY4HfEAk0HIVnPr2RDs5n1yYWRnYjv7GHvHLJfuhoX5Q
+ojscaL08hZxXizzZxy7OQL6clO2L4NqWsO0hUujP/Jlq6eR91E/+rrUk4lt7
+t4+8r2zstqtWmI55stRlKikfzeY+H5RAvds1ncnzl0o8v72chvz4RJs2k/Nu
+2DG/TnHMfw/W1RFS36HHuaNimE+xq6bpIL4XZpk9prD7S9FkFjz4z2TXVVHE
+9+GtfDrZr3WF2xbBsaLNpt2wi6ve1q8iiEeu8oQK8vNi5qpdfJjFGj26ETYZ
+f77kJSl3uPjsLBnvv/JRU/H8oKXwCi6syfl4zxYuSvf+MgSHvdigngWnnt3G
+kDFA//bL6UkhHp0JpqIWHPvZsvQgiW98f7M+rGm6YZcAjtzRqKcD19opSNui
+f77SRlEK8E0t01fnxMl8LEsbJ/EZPm5ohMO4i0paYbm72193w4GuJ/bnLCDv
+SXLbmmFWxoVX++CySfZc8jxXd2iuGawjmxOxBBZkHyuZJOM9Ob4/j+Tv3JhY
+HXx8dXbjCOJXc5nHPgXbLL9Yqwq7pz69vJnkLzpz/nzkgwrm2RiR/Y9hJDxb
+GM9/C/ecRZ7HMWlECP2hLM0puKjis2rDFIxnp1IvGa9c5/I9aRT+H5L04jcs
+HpDu8WaCQZlUH5CcRvZfx8R3OX8YVEagugzZfxwjlRMvjjGo2CG6wJbsXzlb
+btWPMqjc7wV65PwUqKzoYfyLQQ0ORc8sIt81rua8/f6TQUkHt8b2k+8W5TPO
+TA4zKJpvmDnZH3NzYgO84NTQz+VkvbCuV6rLwCyHoPh8uGN5qoQ0zJErsPoI
+q32R3e0C84XcbihiPKghoarnxItCHljDHfWP5KJIez5PX/rCtGz7IvsR1Hdq
+vOIIzJH2jp+P+DKSrVLjyfMGBZQw4me7C5TjYK6p8ZEnMMvcPSKCfOeKZ+oF
+/cb9uz03esM21nnRn2CTfarvl8Nhyk4ic5EPrljyJVlS/92gpFlw2T1W4Buy
+/q3KestxPxOJJPOB+fTD4D+w2jSuE/l9CQuT75dAezoV60wWw5zohh3liJfP
+NSwZJ991BkMXK6M/hrv/qjeQ71C699UYPxBfnusNcr6UNvHJ1R2CVS/qR9DJ
+OfOCoPMrgxrlZ+qR8wRVW3ad/gnlyloP1sM9x5PpAb0MSrwg/Nh/nvWwOeIN
+g3KnL73sTb4ThYQujmhD/LOeFhwgz5c57Dd8AvtuekXao+oMRnXuo7/xG16T
+707//RVV/f/74ALm/wBpUU4y
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.76814822984937, 16.138025500903524}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwl1QtUzFkcB/CLDmMrJk30ovFYBtWOShI786dWD5XZ4eihGKm0s8XUolCM
+yqNTalLJsxI2poPRklHZnaI8wrZtJ4Me06omRNNDjVft97/bOdPvfOZ/7+/+
+7u/O3JkZul0YPpYQIsGLjmQK/W8qRZh0ZFLE2SX3erQZRUThGabrJ1NEuHFE
+/5hFkcKottTXkyiiDNx9dw6sGXRTVsHik9HbE0zhngld7XBZz9SQl1MoQj69
+sfTCfB7LdL8nzLZ5YNcPGxRs7XtoQhHuGo+JYqxX+6fj2TBYsT9+UR+s/z7p
+vRUs0L40OozoYHu6kH6fKWh0nY08c46+Ot8Jsxf7fa6E69v+mjEEq1RvSlej
+jkse3ak2mFfvMxJ1H/6VZdgZDDNDb62dT9ftZTTuEp2fFzAtClZPGer6CLOr
+onjpcP78bLvVyCtYuDLoCJzg9SUhB9a0HbHeDB8vyRt4CiuKnvtYwBtdiWyQ
+fh5UmX8T61nOu5lGEKWFl8XLEX32LT3fi+ciibPfTURhTaiHClEay7zNQXSY
+8+5GLN2vZdnRBajDMqxXx4B1RXu+zIRZNqHyQ4iiIqmbEvtsWpIylu6HIjZ1
+KBLRuiKU74dISja7LkX06Vnwwht9FtUx/G1h9+OZXZ+NUV/HjENucLrjVe/f
+jTBeFapJhJW8H4oLDCkicwn4WQ2Hddg9LPmGIhKB5yo/rNsdxhp+OxHPU/sH
+1HCKMDA8gnZsbqUEdcZfEamn076cMssY+2XsbdxjAnOPiUMvwkyt75vlcP30
+C8NcFn0u53afgAUZWutLcHNc2wULrKdKL1hhgM9dwm6u4jeYvJ4UTcGVi+dF
+BqA+KicsNRD2dFis18OkWnjMDyaLTj06hP3ojMUX2LBg1tmwQZjdJOhpQH7r
+iywHZ3r/ur93ieGOcsrJDRZ8Pd/xDvXVmxWnmsEqe974cFjt/b5WjvmCLdpw
+NX2uQ3FWBrAs5FqtAN4Rf5Q/F+szTcwLm9APA2OOHV0/xeHmx8DWt5OLtQyc
+z8IrdhzYqTTnRP4ErHO/2XIU/U2x+eDrMx71OXO8PsLdUU8LRw3g9JjD0zA+
+uENqdn8c5ue0JgfAleHeRDEW37/ih21K2LyuvaJmDM6nWx7qiHrcH/R8ZcLM
+mXrPKtjoWMzaPIJ8L4XyIOxnh2TCkyBYt+mLbgiW+ZS1BcLc/KQNR9GPS+f8
+EzLhwtERqRn6Z7DaNHgArm+3qD9M9ztXkrgH+XX/rBvTCjcfzHs0DfWwL7fu
+NMW9YdTX11oJU20Bid/CjT+laIJQv070yz76ud7wO9ErWHRveJSer+QUOHph
+v1RJZVYa3LjJcvkBWJbefHwGzOVETUqGBekbBvNRX1Tk5Fh6vNSGcZkFC7xN
+FQ3IR/HK1x3BfnRJJlfYsGY9s2ws3DhV/tgF9dR7B85NRz9utNgXzkb9oppd
+Vrb099ow45F6lE9kyfNvdaOfslVrldRXPuE+2SauhamQzpHTn/iE6b+19D4c
+uapWyNDziaLlTn8PHND9PqLoA/y8ZrsT8pmftV2WMoB85iWRp2DPPt/su318
+InKaK7Cg6/Nbe1Wi45PCjGC2HBZIrIoW9PKJSjt8zx37kZR7h0e+x/j5Drka
+WNYcXZwF63zPNe1AP2QVDSmZGK/IM1zxkf68q7Z5FCAfZZ+4NwL9VXeVxiix
+nuYIL60MjnTUSvT9fCI5ybbvhBW34xasHOQT8rzOUgcrDRh9caiffcVj9jOY
+U5vpnjiE+hnXl5yBddXXpC7DGO867OkGm1e82pRDOyTAuAHrx/f+sfwArNlp
+I18DS929Rj5gvtSk3OMe6o9ct/OcDvm5cUnHXWCOr8J/F9avf5a0mr4fqVvZ
+LtmoT5rVe2YlrDi4JS0Q+1HEWNVq6XtPaB1R9Rbz/V1Oyel7tqXr5OEujP/R
+3zYTVqll9lQ7LH6RlQdTVZYtPmr09+Kn6rv0PSrWP6x7gvMbwzttgvxEulVQ
+XY76I5o+0r9T//3l3Pn/945F/Qu0rYWt
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.472727570790026, 3.579801639345143}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000006366`, 17.000000000003638`}, {
+          5.5000000000045475`, 11.000000000003638`}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.950887509261843, 15.744254101457688}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt1QlMk2cYB/C6IsLCkAh4IMYpVLmcUIuKB3yCLqRsilAPDqcrYKlyVLwY
+VgQts7gqHjChMCxZXRgWrdcssRp0jHrUoJRKNYUgcqOldEBBRPZ/tzVpm1/e
+73m+//OkzbeAmx6V9BmNRkvCm3z/9+FP0UYn8fKmaMz6vE+ecCZDNUT3oWjS
+bJMDG5Z4MKrGcX5j1SFLKuyiWGXqgoNlM04UwNv782fVwxmKzYpqeL3+1BQp
+LCudn6uBOboAeiIcJbGEGWHttqA2Brl++ru0ftjO9cHtN14UzX/dxZohON4w
+620JbPOtjfso3OZ+bSAS3rh2fsMw6Z+zNd0ertsbzDbBfk7mzr8WU7T24/Tg
+dviRa9MVMeySrpE0wj0Jzk3RsEraQdWSvGdvuHrDgmXsXAXp19Cssod7JvWi
+Yrj2WY14ZBFyXJsU5ZH57/U+GYBlVp7yABxpv33NMFw53jqPBxtjWC62qN8T
+IajdQe6/O99hASw/Y42PgTsClgvWw1pXZW4s6X/0ypI0uOzl3JzvYRld9r4U
+fq4U8dNg/z0P/Z6SPFuCHXNJ/jmbto0R216fJPnUQXGdHphfbJhZdBuuXFN+
+KBx2LL1j0cMpLeJ3ifBsT47zGOxgOpV7GNbeidHNC6BoH0PExmy48A/uRCjs
+rvltfhZcFntkG4+YqRtMhm0Nxcp8WBFx4XgErBy9+r4Szpz78eRCWJDW5FoH
+p/i1Lx9Avi6eOf41vNJYEngTHrIR+vXD8bGv8gWwG9/qPULqj504TvZfL3i6
+ahwW/bSpvA37jE1KzfsAt61LFBST/a9QpQ/BrA3Oomi4PfO0tBd+5NxPucCh
+QabX5H5qZtRzI4OiWW40+z+Gn3/5bOo12G59uPo2qY/8my2BVXGdygqYGjAV
+HISF056En4ErUwLW7YWDRxzvCOFCybPQVHJ+/5JbGtwz/vtgFvyz/v2+BHK+
+9pjPBbhsnt3ZHbAwgrP1FmyUnXEmlkwbPELyzKju3Mkl/Zknt9iT30uLpTgV
+Vu2S81fCnvrzFdmkf3jcIh58v8jgXgTnJGdNnIfFrXYZSljAlubUwDZjDF0D
+nJjYcMRA6kPrNljIPje//sIEd8jrq2cy8b+4rFWPwurw069Ww7cOhPxohUUa
+p4JdsPYbfl8v3PN5bMkJWP2gZLABZnc91P8KO61o9a2CubpUqhaWN+qqfoCz
+n+6dbCb9xX3DIXDxddeUPrh4o3TsE+ZtFTHdrHCiQ5hFBW+vKzVOwIqjl6IF
+cMaUJZpPsOFPQ/ViWJbUu+QDbMPnnnvjSdH6yndVmGGVXpchg736snraYfHq
+oYLdcKzQbH1B6lVfNgfCTQuedN8n85x3a5wOq/Z/110Fd5gZRcMeyHNhk/9F
+2MGHebMbZm6YPSaC3QWnV3TBPmN3eQfhwpbky2ZyfYtvHh8eWsqcmIp+Xd79
+AVy4Nk+s8YSlS9Pdyf5YthxGBJx9V16TAHvRIzsOwY333oWkwsq4RRcvk3xB
+GrmQ7Oums7IJtp3z9S/n4LMsc9kUzM+xC6u4AnMY/LfecBcVOPiY5M8KXBMB
+Z3J45f2k3zk3RQJ8i76saPoy7Jt1tWQf7NjdWMmCy150te6HI6lwWQysfazS
+8+GXXE3YUVjotXxnNFzInrWnHHZJbu/wh6MOb56qhlWVvhw6HGo++JUeVs9d
+7aJFXidfztJe2CCTjEjghx1xp6yw3DqyMBz+9/nB+v/54UH9AzZnaeA=
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.3252, 12.135199999999998}, {-1, -1}], 
+        LineBox[CompressedData["
+1:eJwt1gs41PkaB/C/u4g4nKgOO1kKFako2vSjUumyWygUjSRq0eROu51/0WWj
+6WIVxZmJWpc2l7Y9HJzMOlvKtTSFSCKmdoe2pM1RnO+7ezyPZ57P877/3++9
+zMwzM3fu2xyiynFcJv7p9c8/G/bnqwHjROJqhTt82nUwwwuee//c6TRYlBEz
+JIafT1U7/BiWTbPpLoa33l2jb2uL/P2yk2XwguKfohPg0vnK0+fgSFPDiVrY
+oD/r10C45mXhXK05iBf4aujBK+Sqd9xhmUTFZO0UxgXNG9GMgYWtgmPe+ozr
+FL6RZMGC/wxIVusx7pbwQ8d1yl88T243mXEfjS9m1MD8Ym9bE13GXdAWbpTB
+3NilC3o6jAswGjD+J8U/9Y40n8S4K5MzD+WSu+zyvbVx39/6pMfIDcq4f2kx
+rrWqviOU7o+Y1+QFC3+bdm8V3ecVpmINqyTmrbCEpbYGOYvhVOWsIQ3K9z60
+5hBsHn8oaBD99pwt6ORwvuacJkUXLAhNP1MCG4+M7n5E8fG921NQz++ebG0n
+OfmOTwzqvVp+5ksl5Q+/XhWNftZtfPYXHZzf81nU0hj0GxJw98VCmDncmLMX
+85DzFRNhZL7t2zWY17SHUd35VK9IYaqOeZpN8Ts7RPXmKXXS4X066XUuc1Hv
+16qKQTjJ6E3/N/Bvac1tWthHY5ilQwfM4hPnvEP8jXbRL1bzkJ/tpJIL+796
+Hh0B81puJVPh+q9zIq/BUnmM0B/3KzRDH/fBnN8ZSSzqq/SPnzfFDs8PLxqM
+Qv1BfdWhdmTJkWWB6G9Y7PGJGzm7PXgl+k/sDT6yGmZ5J6IXYD6NM1x3uVO8
+v8bMEfP7Sqb914VkzZdGvph3b9+KfTNgWUFx3BVNxnl59pR9pHrfevpawWMe
+QaFdZBbq+0SDcUenbvGohFns1sB7cElu2ZQLcI+1cew4XPH4UvhByje9Xr8L
+z9u+Otm0h+I/BDz4CMfEydcFUnymjfgn3D/0d9mpAIrf3vriCurbd+h9VRjF
+nXxdJKh/vd/uHTzNoyCwXYr+Dh9fHXmZHPGPkhz0b2VX7S6n+dUnvziO+bwJ
+br6sT/04GB7dgvllDIo7NsGCx1f+OwavsE6ruEj9339XJMK811hl3X4JSz/v
+8S2GNa9mejvbI/6wR1QG29xpkh6DZW0HnBJhDwvj0fswJ9vepKWPd03YnCGd
++chvv2O+U4/x5WOtadZwj2FR9qnJjHeJuDHCKN46uz8L9dqHXDvqBQuC1q5L
+02H85teCgR2wzCzcMxr9To/aqLUb5lcE/rpNm/GSiCFbsrBOaoHPE68+otcl
+JEfm24fQPPs/f7mFno99pp6jwfjGdwr/tXR/vaJGDfvYZNwY4gxLF4Uskaoz
+TvVd5Xaqj7+74GqcOuPTb9yXmJAdbh05Dkd2HEjVpvNT4rzlyFfctGh5j35Z
++HG5D+37B0XxC+pfOGGtiftF7k/P99J86ursu+CEWYJXClgQrjHciP0WbX6V
+Omr/x+fdoRH9PAnKf6RL5wcde9uIft1i4sYEMMswc6zFPLzPN1Uupfks35Qo
+wbw8ok74bKP6f1y63w/7Vdvrfu8g9Xf27eEBzNdXP2riMlla6bYc+w1WVz3X
+SOddnl4fiH1wjhGOb2k+uRfH3eElJTUHpzugfsHEJSXOszO5+KkrLN3SsmEH
+7GQX8S4AFrSWrrqky/iGCf3RBFiYkGtThfefn6HJHjHMF78+UY76LS6uupsD
+syGjPbl4/8oVGYrv6DzL2uzj6N+qovBpIT1vJl4Sj/no94mm5ZMjvx9Iwr6W
+2JmvlMCyjJZ1Esxf37lgQzrFr5fFDakx7r0Z25pC559aHyyCM3U25EdTPLjh
+vK0a48sqLmTtpH4SVHs+gWcrD4o3U3zvTdsvkO/QebtjJfUzM+tEBeKjhuy6
+C53n7unvhf3e7SywcKS4btlhU9Rz/knth0Xk9QuffoRP2Fu3UL5QN6Pqd9Sf
+YhHU7UHPL50fMor+luWdnulH8TXJd0awX5/qHvf95NZoo55JjLd3LcqjebFJ
+Yd7fY37XVlruKqX5qPD6X2C+w3GfRT6k+wZuVtVi33Viw+QPNI+BB07jsNuL
+ME/LBdjv8iCtCeS3We0IXgdzevonf0Y89VxKrAgWqq/X2gQvqz3tdhZmhaLE
+QtyXlfGktAQWZH4V/hD7cnn0sreO8lsyznRjX3amS5c8Jn95c+099LPZ0tR/
+gPKjc0zLNRm/V6PaVUn3ty2YJMX7/728yYYssB/XzcS+AmpMCilfmC7achXz
+PbL+u5NdlH92f8NzVcY7J1951kz1WG6M2aDKuIOPEjtvwnxhtoFSBd9P3I/N
+1yg+K6X2ZxXGJwVdmpFDLo3pbEd87lN7czHl9zU2zMJ5420zzA6TZy92KsJ5
+fYZTXZKonnvNVttx/4euyuB4WKaM2LUQ+7WPUvGkOFc/orTEPiPUbvgkU326
+k2Is0V97uH8ezYvLPc9Z4ftlW8MjlQIya0+bhn3Gx956W0vW6s2n/XZbJ1f2
+Un1yA4NizDN1UOyjuRD7rCl3dcbn11H0IHMuLNyxrfsU5v/viOVO3hSXlVtd
+Q3y++vvmAzBfOtuI4uGybeq5FP829YgT4q/11L65Bcuykxzycb7R7V/m91O+
+dGW0Avf/8Ttr0f9/b2mz/wHsVWpK
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.952631629795212, 1.8745372234640723}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwt1AtMW1UYB/AbihlDHmUYLc8VKVKetkgssJLdMJCCZliGyBiPWWF2oFCU
+CZ3NyAYKwzqQR+iQ6UaIFHkPNqoypdqNN+Et25Aw2DIYRUoHS52M+D/GJu3N
+L/e755zv33OPmyQ7Nt2MoigxvuRKWZEfL5r67/MKTdE2okpnWHX9JPsIPB2V
+WRQNm7rvr1yC6yRtxmJSn/LXnnly/ypnawJmHtKZW3rSVPdEdT/Hm6bUptnT
+HjBbPvSCApbZ6sL84Hy58fUp2DTI+sINTqriKj18UPd7aS8DnpvU6rJgijVb
+MYvx+1529GsmXt7oJfObczb0f8Aym2+vJ8PdtdZBj2G1VdenTjCr0+6jHXiu
+jOk470FTVlw/9hYs7WUrG2CmUGg3D/OCLgfI4XDVlHUPvOKVWJ8MF/VGakvg
+gWt/vhcHN+xbOvUObMGO+CUF5gacGnYj81/Y7FaQ59UCqRH9GBiaxy1wgt6/
+aRjWnFds6GFdpOLdTpht8aNtMNYX11L6wfcwt3qPXgmzHXJvtZD60cqaZZgj
+Mgu+CYvapNsC5PHhi2cPb8ArR0y2n8OiwgipF+bXRDGybsHm1idnZKTfT/ip
+JlhWuED9BjOzhAdYXORcOtTG8qWpkm1ZGQdO45lHyGBu8mcCF1g9teSgg9kP
+ZlIZsN7GXmfrR1MdIe05tzEeFeF0IgZebLiyWg8rvQsNBbDozK5TGnFjQPx3
+8Aqn9RH5P+nNkvYWmJdWmXMP/Rh6pqPUsJSxv70R1j/yqK+ENcuD/nI49/Tk
+mznweFPMz0dhVZhEFw6rR/pd3oJ1C1OCfbDF9t/rYrLfvhIEL2C96htOeZmw
+71habissGh28WkP278XnUopg2qcicRoOPBTz8ARs0i/buGJ906PnQhJgXuFQ
+uYzku6spSiTPZ1607Id1ed+MZ8EDwlaJM/IQlZVuVcHlzj9VZMINc5LqYZji
+TzxrhyltVygT65tzT/r1Acl38XZxKswcuLm+F+9FoNwn4Rps6Dg64gjXGcXu
+1v7Ie42x+hKsTHcUSuDxaaO7Gdxyo9i9A07gqy7fxXh1c0MzRlhWYHmlEd5Z
+fWrj+SpNBR0MOZwBs2VPzkXD5eIeGRceye40TyL3Z4dcH5J+msW1x2BD7PH0
+Zvj+P1oFqddEfr0phwPXdWY+xPravnhS//x6PgW/XVpzNxzuy/VcHcP8x/lf
+ur8BC9cuzdTCA65C/jF4hHVhTQqL5DvRhbBvdmhXKBxksM/phXn274e5wOrd
+rQKyvwx3BE8sYaZpKz0Onj94J3gv3BFlkP4Ad2vvJTkQj72WR84lRcaK4gCc
+vxR2RgxX5SoLs2CVVatWBTdwrINJXqwiju8kzM0Jz3hG8mqXVj8lees+3h+L
+fkyd8SZbvEd1FfzFJpJH9tlqO9iCnHu8/88/b/pf0S3MLw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.761512611302877, 10.651252930219968}, \
+{-1, 1}], LineBox[{{5.5, 3.9999999999976925`}, {5.5, 10.99999999999251}}], 
+        PolygonBox[{{5.5, 8.1}, {5.9, 6.9}, {5.1, 6.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.5548, 7.5}, {1, 0}], 
+        LineBox[{{5.4999999999976925`, 4.}, {12.49999999999251, 4.}}], 
+        PolygonBox[{{8.4, 4.}, {9.6, 3.6}, {9.6, 4.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {9., 3.0548}, {0, 1}], 
+        LineBox[{{5.4999999999976925`, 11.}, {12.49999999999251, 11.}}], 
+        PolygonBox[{{9.6, 11.}, {8.4, 10.6}, {8.4, 11.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {9., 10.0548}, {0, 1}], 
+        LineBox[{{12.5, 3.9999999999976925`}, {12.5, 10.99999999999251}}], 
+        PolygonBox[{{12.5, 6.9}, {12.9, 8.1}, {12.1, 8.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.4452, 7.5}, {-1, 0}], 
+        {PointSize[0.04], PointBox[{16., 13.}], PointBox[{5.5, 4.}], 
+         PointBox[{5.5, 11.}], PointBox[{12.5, 4.}], PointBox[{12.5, 11.}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T4", " ", "P2", " ", "N8"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdfei/fjghgihjij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdfei/fjghgihjij.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {22, 0}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwV1gs8lOkeB/BXqDkal+RuYipJoYhFknldhxK2i0gr2zood0qcxBQ5s6qN
+aJtyG1LUii6iosjKkkhkE1ZTcSjkLiTO7/H5pM/381ze/+V93sfKgyE7/72I
+oqhb+Ef+p8TJr5U0NbewsBBnQFNdrnbiDWyaGlS48dIbrkw1Vj8D+8/5dNrD
+0o6CMGuY8TXM1wi2P8bc0adJUw4ft+9fC0d5NHnYwK5tlrar4QdVW+2yNWiK
+p2FjTsblm7qdxGDWrvihTfC2mFzPkBU0leAozLODX1yeePiFRVMqAdFcLziY
+5V0bD6epTAYdh12fn3tkCPs4i0Wkw0qCh3Gz6tjvbkNSBdxc9SmtGx6slejs
+gs/ut2b8Qxz9v9RZWEu+KX4clpj7g6FgiLwlZII0sJ/Dfwxq18JFs9cUPWCe
+c/x1YziGmzqbSca9Dok2wzcPXJbpI/afXWYK+0tML92A+AslG+z04EUiVn0g
+bFz605gq7KTZcSYT9k74ME7Bv5lWupXDg9mXeR8Qj+/tOL1qsv7WUZUquCb2
+rV0xzCvuCCX53VRYZXoSNvic9FMkXHHnhLgZnOY6U7YTPiIqZ7UhHnaJsz2p
+pzn/rYsnLMeOuKoES7RsyG5Cvi/YB9aJwestuUxjmBq+97h3I03VZnN2p6hh
+/zmT1nbYMtAid1AV8QaoLe2CM8SWWTjBySetxIdhkW6cfqkK6vabrzUD+znI
+/zq1ERZWWm3ThPMq11g9UaYpC/fn9lvgDeq2uT4wq6cgdx9sWxF8aA08qD57
+hfTT6VXGSTG45rTq3gxSj65Wn2kl7H8xRawcbmrhrGaQ8RCRqA2uDvY+oQ+r
+VFcHD5B8bT7Jkv0Z9PNA0t+Mp+Lnr8Ml9esmxVDvhM2t0sNw4fnXicRF4pHO
+pog3T+jEnMH82DwnpWhYbumzrn6YUlQ6VQSzdvDLXsGLQ8P3tMC2Ou8flpD3
+tfmKlQimJWVcU2Ft+1TNNrhEXGpVCNzvWKNWDL+Q3fjdEc5VLK8Pghnj3eVr
+YHeNp0bysOuSGD0J+MLV79VZiE+gt2SsEfV9EtG5Whm+Pa69Mhs+m354OQ/1
+cDiiqBMLO2zer/lOEfNnLp4LhJ3aZvaZw8I7rxgBsNKEjLRAgabaxwqPRcOs
+jeqe88tpqq4zVfQ7XHeXOxUOt4tdj3sK8wdONc3K05SZ9vnuKbg75tXLyzB7
+W++sKsl/scetnXDCs79umpP6GA1XaMNzjRo3PeG7C8q9ijD/7WdN0k+v1z5Z
+GmT+/VHuJXjwPJthCatwryQVwR2bDWRD4SqToAuVMK9Z7Vox7L5VxasevmL8
+o8RXOGOMcm6AEztY8xwS/2ix3jNYY1rVOQF+8STXsAweo998eQzTPl7zOfDU
+qTUBfbBgx+eLieT71Nm4dg7299B28YV7dBtypmHmmZJqa/jR1OPMDtjg+OH7
+K+C6P1Tsc5aT97qTGkM93EMCTHbAzQ+iRgphHcsfIkSIj1E0lB8Cs/Pynb1I
+/H/66G2FGfIvtjQso6kCh7WjymT+Ef8LerBD2alSMVjr6Et7vhzGpdnh3zbg
+vVJ4u6leFvV7yLSWxPiDlksJ52UQx0GtAA24vWKdeYg0vquKowftyPkzbbwX
+zsRzd8T0HIMn3JOCc5fCx7/K3CP9Zl1IkYCp9Myz43DNZ/30DCm8H+tE79SQ
+n0A82zAAzht4OUP6udvFTy0YNm6x4LqT/N2C3YUwf0ZhZRg5n53+IbNk/QU/
+VgIc6j9eF479+TZJK5JhlZ+lTOZhwVNZvzRyf3gyE5MRn1nps6tkPCHrR90V
+iP8By2iArC+8UdhzSZrUe18V2b/AqffgJGxR3ixFni90PfpeF/nP9Z6W2kz6
+dTvqphFckd1jT75nWlMdsUtg0V73iQ/Ir+c1/U8e1uv4mk4IyHm5MrSaCdOp
+uyx3wsmJb87QiKfquf5eeZiXv/47F/GaDbr5dW0g39n4yvXIz3vzM7l7MMtX
+WWqcgfcl1Wa7AN7NLIouXIL6W3U6noP931dE/LIYcRdnH74Ay5X1xWpJIn+6
+zDAfbmfWXP4mjv0O9Lg8h+esmwTji3CeT5iUzJD5EZppirDw7/H8TYinkJsR
+6C+GOHKtx8NIv3uVQkYo9M80l1ECp2k5qBXD/NR+40mS37tCqatwzVRmvwrq
+QQfslq6DLS5uMif3sSAk210Z+1VdDJVzgFm6w33/hYVHc0zcSP0igydl8Py8
+awdb9pP51/hnhHAFb30IOc8Wol+0DRC/zocgCXK/yNV27b8DZwQvn6Jh4wF1
+vooE4uVtkF1H7mOjEW9PWKLd4dhS2Gc6JykMjtp6ya6V1PvrgPgeeNqpJDYJ
+pqpWRS0i69ku5jRsIE8HRpPn3RvTm0Z9ah4H21UgHm8Jm6H7MDOrXKcZ8QsS
+Ev6MgX1aM+9XIN/QSLsTLnBy+vxW5QUOZebL4xrAoVGHXJPnOJSIZ5rChlX8
+hKrfZziUwyqlaeIoxzulkV85FDtOgzYktrW5pDjJoUYmW91cSX8fRBiNjHEo
+gW3Zz+R5zetcu1RHOVRoq+ubu6R/yr1BNsMcqv/3yJwR2DtUUrR6iEMl287b
+k34aBPzl0z2A+XsL1I7AI65nm0Nh/mB94F0ybvYmtRHWOaP0+BMZr04P7xrk
+UMYlE0dI/ao+ChuOf+FQvBbuLXVyHlL2brQa4VBCZ70ULdjbp6HCG/HEnHY8
+R+4TkbhHWTziTVvFjNYg/VRoU00Z51DTY/UCWXI+ldIWhU2gHmxnY/I9qDr8
+eVIa+fJVOxTL4ahHuyg32Dsi+yK5L6b9xgu2wA4WlaOGZP5NYX4p1tOSjuV9
+yJf/w7vdNdi/ap/s9Sy4TufvRj8830Dyuts+WMfb4/kNEm+wvqEGTHcHORug
+PmYf4nWH9HEOWqb2JPUjnkvca/Vw8qiaxrmP6AejlnsfZm8v8H/VhX58+3X4
+Nixc+6+QrBbUt7FMWAFTxcyGuqccqsC6LfENMfnhPaam8ffrgj79f5/a5wc=
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.858982998704643, 17.360963007340356}, \
+{0, -1}], LineBox[CompressedData["
+1:eJw11gs4lPkeB/DXbIstO8aMS0kaRUTFxEk5mNe6PJb0TMjOtk5m56iN3C91
+aLK6rOiUmbVCbjunozl0aAcnRCPdJFvbsDYqMko3KhJNa8uc77/nnPd5PP/n
+4//+/r/LO/NiI04M3c6gKOogfshKzelwLaKpDxebpgyGBHbfwdwW9b0aE5ry
+KgoZebeQpuSRbcKdsHxPk+0umDtknugNG0mvBPZZID5kjr0G9gl3HfaENauu
+Wq+HS5bd/bbGnKZEB6WfR8Ibp/SKrGH6+3THE3DHdYWz3Az372YFPof3m11Q
+82DWiiuuoainMX/3xtumNKVOO/FTJxwdZ6iQwqIT+kN+HJraEiCb3QZnP/xH
+yjV4evhqmh8sD014E4h12WHHYD7WDkP+7GWsrsK2rhCsScriL1yRh9d5LSoe
+dmlK31kA31pg1VlK8ollHkMwOzdwUS9MG9xrZaHunkfpnxjj96KfY/odYUO9
+l4YhsPKMbxHx+pGQrMMwHbaCS+5n6Ny152Bq5kr7INZ/y4RfarCq7x//heQr
+tpQba7HK2rur/oS1jXWJ9weZR2lB7HXknS/wqxqD5d4eE6Ewa1jlfIXkK7NN
+7Ue/DUF++STfpPxhfCR8SZuSQM7RqCc2P8G82L5ju24hThlYLNgHT8aXvP+C
+zONUK3c5fPMj6dZexMl33uoexPwv3pNGfAbTcdsldfDj1AH3Wtwnd7fcXgy7
+0u8Pm8Ki15LKMrjabWjkW6wuFi+WtmJlWN1un2Lh/Nrf21/B/LJY/2RYY+Dl
+SSNuunJm3ZwxPM8+8iTseNZE4g0n8armmyLvWMORjn8x0eeuhbkyeJJbqfCE
+k6rPV7BRd9bQ1xPvP4U9rPsL4bSivSljsCbMv90EfYt/eOGog+m8cYtD8JtV
+sUJ3xKu/cVzyBGZwVI1HYZFghXIdns+hIoP/aGFqSXJeIuxn0zeSSOpJd4mU
+kn2beLfncMf+jIlCuCTnXCsP/XArup2yYc8It7AdMCVjWoXClufH66WwcoX1
+AyPyebEf5Z4mbvf+sRH5sxg/5zfASW3yzUHwC8tupYLEG2+t/g395HmpF39H
+/PLira3w6qfu4SEk/tcd64cxD4+nXgod6nEp53y1k3jlNwxPOFsvQ/IH5mmZ
+uW1TOOnnoWlqBbysLaxmE+bBsh1IJt8nhf1ZyVojzKep/84SuCg91dFwAeZ3
+2cCMQeJ5+cqBT3A+v3wveR8cKh31rzPEfpWb/yI45e330/kGyFe6OycYTlC4
+r8vRxzxu8/58HL59f39R6cdwVEXka9jaZyKqdx7mX9/CEKPetMzkiLWwYLtI
+OggftR89oPoI89V6jPwF/bJby03SYdl48FENXM486C+EuWtUZlGYV+vf+dnR
+sCA52KUP7mQvjzoOs3za3nhg3szK3PFRcn9srw15fmyqdDAY+ZQ9B9xvwu+s
+Tj65CHNnvOun4ELjPYu9UW+2qsdiDp5Hferb/DGZXw5nAq6ceh1ki/5E918l
+dsJNk+JTElhzbSUnBw4YO1DdAgt+uvvUBT7SM/agB1brcy51o74Cm9PiyyR+
+wNlJCKc19I7nwXR884b76G9g1t7qw/lGweFi+MbmmMwC5Fc2LtI+w3w0dseS
++lGvaFv0nkw4MMCJp0V/9M0zXQvhM5Mb8rQM8v60C7hOnrfCUj6sh31twQEp
+eR5pzdXNFPaNtNwEuNx2NdNEx6dE+inNO+Au/8LBpnd8isq/qsog74fPX8yk
+zPKpyedOuQq4+pG8IuItn6Ib2zeNw3HCG+LkN9hnLvbxR/7yBEWaeppPdejv
+OqWE/fItTbJe86kk9j69leT51Q1x9k/BlbYba2DTI3dOD75CfMsl21WYR61y
+tasM5goKmLXkPZbhTxfDrAWOdcvJ9+u3+hvPYFpWojsGR/vWFEhw3mShtPgx
+zHr0Va4P8skVXt0r8XdHlHoh0wH1yMPOD4TDVZ85dCydQb/uW5g74PXeullT
+1C+PFfwaCbeYuo3OwCy7fY0b4GnfJtN6LfZ/WCX88HmICbq6Dv0rnUfS6+C/
+8fdKMuBsoeRMEBy51PGfCfDkubUxd0n9yV/+zoRdLlAnv4ajWx0eR+A8pVFT
+wyP0bxiT/2MA8tGqGYs42KjL3OEB6pX1nXWbxfxEGtUyHvpRz79jfhxeaN6V
+5Y3+1cYpfB9Y8NeEOeeXqNfaIpkBd62xCCh7hnrGYnLu4fm8vXH22cgozjtc
+EfoLcWNtgYMG9ZRtOUb2KR9xn30/6p2v6ibxHboSjtVNxMc5ZZP3PjUWrGO2
+8SnNczuzEs7//i/4/2VK/xeQhO8n
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.131120426728658, 3.8093655474725483}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20., 17.000000000003638`}, {13.5, 4.500000000003638}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.203937013962182, 14.894893814502087}, \
+{1, -1}], LineBox[CompressedData["
+1:eJwl2Hs81Nn/B/BRakWKcktyzyXKuGTJpdmoXEq+7bqXJre1LZqVJCQUi1ym
+yKXEqJYpbEjMlkpRCIWshtRSKpWEtfEV9vd6/77++Tye8zlzzvv9/pzPOWeo
++Rzc7b+AwWAsEWEw6Pq/PzXW/19imSwG8+XvL5xgfbvH5YnwkOvF6EJYoUst
+mNzW9XFiFG4WsZuKgRulV/pvUmcxljbx9nFgP36b7nF4cm/ZCi9YadTq403Y
+b/5Ox2bYVmdD40eY35x/WQXOKq11k9JgMZxfvi2bMmAxWInOr7RhvsKV2lI4
+9qqLjRHME59I8YYnfYrmDWDVLz5uK+Gk46tM1eGBU2Mm7RtYDDGjxPPisM68
+xWw6XL/C14vGc59ZqOEFXz5xXaQJFqT+dMEY7nff4MmDAzOTHqyCA2ucdkbC
+zu5ZDsvgHy7O33KDk2QcdaThZskiLwuYIalXogZPbrHM0oYrqgP8reGl0wd8
+lGGOqk6gP7xnzSlrNWrP3mGSBSvJs8UNYa6kz6cmOOKK5GIn2E4z8OgcjW//
+T9sRWOxWeokh8ou2vOBZTk6Xdd8Pu5f7yX+ChZqul5LhrGMBIybItyNPer4E
+HnpxZm881UvO0uMmzJn6g98F57IFFnfhsYWiw+qayC/9XvcNuE5Dx5QDs5OV
+FhfAMmYXumphu6en/SOovRrDdgrmKl7YuA0eERc5or8W+er97rIEFtz5QegC
+M7fXr2tE/PkR/oGhcH1tUNxROKy7rSkO5n0dPaBP+U/MWJyk+5+fyA2sR149
+HaWRMEdTvjQHzn/unhVA/T/6W8kV7ihd98Uebi5tllCGg5p9LbVpvJJA3rg+
+6v9XsLIIzG9QCu2Cma+WxvQh3orUxtB78I7le21q4Nx7Yq/vwLZN8WY58HCB
+8a5H5OjOt8cpX42erFdw7k2lI6GU7+u/xxZhvIjiO9lUH845UTkjuDvpsk8U
+zOsU2PnB0e8DPDLh+kTF+Dx4x2tFFwEsVbbv7GN4SH5d2nvYTCnbjUHzJ1OR
+txbxSrmbN+nBmu/bLh+A2c4Nhk5wd5bHlhrKP9vHheZP1oRv+yItFmOazTx2
+EBaUhP3kCg/EJGT/DFf039T/Deb6+Fp7wLneh20/w+xD9g/N4A5PSwUjbeRr
+vIkpQe+HXeiBn2GBpLp6F9VbdltYHjz9s1VnBmynO/z1Jpw7dPztNljBrd/3
+CSz8zWXvDNWbdaWqBxYb8vYuh0UNE850wmPMKXlfqn+7qP09uH5JeLYy3Chu
+UlICO5usKnilx2LMFg5MJMK8s2FJlXC/idGj/XCztLx2GhzI+3uBBcU33FUW
+Drepav0qC5vJPygIgQVqecxJ5Jd0uqc9DLY03vlbL6waIOaRBPNue5s2w/Xq
+IYISONdZtuEeOX5nRweNXxZb1AQz74dJiCC+fL+mtD5YQRgTtREWHJ3izVB/
+9aFzB8hdrbu0Mb5U+CS7AA7TDP9lH8WzRJnbBu8ZV3Aqovg7ltVMwEmbrao/
+wPw6J59lqJ+tj5mMuQ7WI1vHkjUwf0CPlwwzCzhGKjSfOpcf7IUHWiv3rKD5
+3ipdtFYXz5NXYTSF/iyvxp34GebcUgl7DAf+mVLFh8UMA1LyqN4qMt8+h90l
+ZsI94X5f50KRdbgf4nRzJc3/rDap1eS5dJNm5K/vsup7bViYfU0kiuo1k9Kl
+BSv8cXq3AT2Pu5/OKcIDG9duHca1v4vjIIor82D4bT59zgyae4Px7DK43x2C
+h7Lnje9TPHe+9NrDmgXtVedh/rDV9HpYtC6EfRiOVRP1V4Xd2bpquymfYi1T
+Nfp+T0+VCSxVU9FuQHGNXExRgXWSuYMOcHeTe40MrGpfdYoDxy66dV+Wvi8p
+2F8ANzpo8zVgoVArsxPeMxp+xxqeHsxY+g3NH2a1IIDGl/v3ggUc29PLP6dL
+68tj9SB4sjJEopfqPT7KPwuXZQX1qaAf9kj12RtwxVxicRAsqPjxYQtsopp9
+ow6eNhu/SvOpI/SqpiSudu4/etB9qW9UlnrRvEs9knedvl//7tIlXJ3fa73L
+wDXMxyVgiD6vaQjaR+0S8w1W03PN/GFSAxZdfNZ9G61Dey06/8I4fBXfVj94
+rFyj4SzMGv5GOpzuR/Gf2sFhHAO3SJgX6c2cRR71VpPBobDZrTULr9Nz8Ku+
+vY/aP4l04MBJ7Uc22sLuW/dWm8IsxUYjdZhTnhgtBo9cW+o3S/NCucz5Heal
+3XlmyZ8w93CMRTcctObKmwq4XqQk5wndd9YZ48JMUS8JmsfRGiFeETDD9Hbq
+Z3hPiTj7JzipsidEmp7jXOEdf6qHT0K4JT0Xxfkr9F5zGzy/BMNhObqCk7BQ
+fPnYRXhPvNhzeo8H5N+ZC+G6F1L7n5FXbCoWR/62OWNz0oif/Y+O3rfwyPaG
+PheYW5Aj5gVLCSTKeTCjLvUDzVdhxu6nn+k9LXVYHAu3jYqGs/De8XxvMGPg
+MZfpq7QOSq3/NBIM6ywS5vXBgrAfQ3fBfruqC5WxjgpDzK9qwM3yUwdp3Y09
+XKMxgvjyNdUMk+GkjDFGKTx5dTizDFaVX97vQ/F35Ly+DyssaCmWo/pzXi5r
+gxmJeQktqBf7v3x+M6yzOoofAw9bTgz8QeeE0pUatI7UO304XET9pdg8/Ip1
+pjtdvyAOdvaYmm2G8y/IftpD+4zWZPlFWqd2ZBqZwryHcpoptM5/ZLhL0T7y
+asP8cVqnv2myGKV133Sz9km4v/1kGu0LdqUnnp2lfSAlvuwuHJvNLLgOM8aX
+p9TSvn3kl0PP4eqJzadvrad6PuwUR3yqM8yzbVSvuIQ/rWGl2jsPP9D3946z
+w+i+g3KVLNVrnZ4NH479GG+7g+pVI8V+BodNnexNhbk3Vj2bp/vBl3f9CfMv
+7dBWonVH+Z26Bs4d7NFkp/Vwqtu21EMGdB4tfsWEA0/7Xm6AFUwVNLTgM2bv
+bcRwzrTbv3+BJCy+Ke+2HswIqdZ6i/4n9l1d7AjX3xUOVsFbfhlU9Kdz8JdS
+1cNws63Mt0dhAUf6ewP4/urKV3QO7iiM3jmE/DUdiv5Jg3mrM9fmwC8LrM6l
+wzoCnoQj7Zvmlo7J8HTgXfWF8MyrynY6N3c8u+xxH/tMvkSoNp2b6//z79ZT
+sPfCbWe84YgMPVE2POl6Poji40b2KG2B294G6pjReMu6fzGCxSJUzbVg4WFF
+Y0N4dnu6iDw8/PpAvxUsGE+6LwEHBjywcIODbtmfWkT56LvFRsHzvzH1ydz/
+6vyHD/f55ulT+4rS0A+0L0aqshqpv+amtSwpxO93IUm4jtrf+FdjKzxwu2XO
+BlbQsQsOh73j0qJ9YM4aR1XaF4dWnPRMoHiXF2XehxP33gwopfqaHzothLmN
+UXZPKd53qw8NwgFGa7lfYbZjy8Z+Omc4ybeoG6JdluqvNL+nE96d2g5L2du0
+FMOPQkcyAuGxGNFlEbDRUodbJ2H2bPISa7jvTTXzPMxMY8zRvq5szfIshXlz
+wecq4f7Ka2PVcO63Iq/94Fzp8fla2KwxQUQBrps+M0j3+as71B/jXDa6aPOW
+MkOaz9JOKbDSYc7yQopHfsHmXfDsh8ecdHj4XJ2NCiw0viuIovY24yqzOAdG
+H3/5PcU7Ldv/5S2slGVa6wI7C5dZDcALHJc4bYUDJ+qr3sGTV+QCzWCW7EgA
+fZ/xcpMuk/rvXdaghP7PJDOj1lM+5xcUboOTFHUXGFK9Fn3yOgJ7H2uRsYDr
+RedEy+Bq88+1jtTe2zNskPJ5EVrgQ+0vRkbKIN/owQ/6xyle2bFFNN8qzFhx
+PNh9zT37H2l+rq059gDu6A8ciIOrrj3vGYGTnFvfZ8AOdQINWSOMt61YnQtb
+3wj6bAknjXtMUvszmT6tPrDCOZtof/jxNdP9CTA/1CnFAlaPDjlxiRzTlk3n
+3r55pmUdLCyUq3hAvxv6tvc+hsWu97JjqL7Xuyb74AHT3VwjOF6ZFTkAxzYv
+9H5D9fy6s+QvWEqxaiaPzv19okt6qT+DE7Hfw+f2doe1w9MLrdpk4LJ+rfnb
+8HBlvMcAfjddfDc6XErxCJ5oCOA7rT15uXBFenXaBXjm5bOTFH/F+eRdp2Ej
+uZWrw2C7OE5IJryJ1y7whzsmVlpegh0CQrO8YB5Ld99dWCo56JornBthP/QG
+9uzPaXGj/F7ucqV4XikPue2jemVJvtgOX24vjAmmeA2fso/R75bXlcvjyUdl
+KiupfaswNR92T7EpG4SnK7rWU/2S4sYDxFEfboj6B6oH+4Sjsy48uX8qYbEx
+4nurt9sSblycU7QBljq+4eN3VM+RXx+5wmMP4r4zh6tOlKQdo/tRyevV4R3l
+dslFxvS7pN1ijuYrJyLmHszvXVPcCv/eyWX3w9MR1rYZcNJrV59xOOLLX2EO
+mv/7vwPDBPf/xZ8G6/8Akdv9Zw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.518114191521104, 16.112957390365363}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJwt1ws41NkbB/AhXURjRJHrMAo1oVxX2FFsbiGE6CI7lRRNQm5bwkqZkFuW
+SZPcKsVKUWRRuqoUE93ckzZblMvEpP2e/f89D57Pc37nnO/7/s6c5xkN//1u
+O8UpFEoHfsl/igT5s4JF+e9Hm0WhlS/LdoQTFPSe/bOMRWHXRV/KgHNcZiSe
+wvJTMXkCMr7fUacQplHKJWWYLIqOzrZNwbCittN3S1h6749l+jCvz1/oBw+0
+lxQNLWVRJJgekodgutgF/TOwxYUBwRH4TUbAVhe4rnjb2Wi45fWXPjFYh535
+815Ya64Dp1oLOTvfqbmS8Yx3p0LgAdpfDCZZz64t3RiO+ebKE4MVr3XsEIeF
+X48z2pB3YOp+1CsG5gcmx52H/XqYgnp4OF48LQwuy3rXWQ4zu/qoTnBV/IHN
+l2EjpmSKLiyfPX76OsydZDnQYOa3b44PyfxMaXlx2OlrSOUgXOfkb076adex
+s0AS+1vkekVLwawgs2IDOPZL0DQDbk2OU9wMu74fXGcP10TQ1sWS/GsM7aLg
+4XcXD5+Hx7wsQ67BdAMDtwa4yvVHlRA28ElPbYcTRk4UWqNe3r2dQV0wLyQw
+/SQs39Ge9wb2zlxw+SU8tlvc4wnMb39OZ6xEzlPLdlyFjap1f9oNc/ZOaXJh
+6Rz72PNwg5PncZLvjZrkGwFs8NJYUpWsJ4wvFsGhVwuSO1GvWW5Q42I9rLfZ
+2SuF9Gu93nkGXCXXN84iZhtsJZbXsVr8VRP1a8vnked7Ds4OKoG5s9tyZ7Ae
+130w0w9mrdRXewvTquVH6HCDjJJnFUyX8+X+rYEcN2c9SITb/SWl/oJFHJax
+F2wz+frkWdjoQTdHB36TfOMCF07yCrb7jvo7z/VvT4T5+drbOuGky0OqZFzI
+U5SqI+c1xfsOD+bE89ZdhANqh69eh9tvhcUWwmXqJ3o64H37Ui9fgpl0qw/f
+4QHGKvUGuEZazWgZ8t7xZKT0kvNZ1CTtDItOjSrJIA+7aep2CFzB0fJeDzs1
+WT89BQ/wp32S4ASZ44OlsJbpwLOnsF/QpNp1uHBroboy+sV0YovVwHzDmcjd
+pN9rj+VdJvvN+M+vhGkdssnZ8MhhUxkhfF99lfhB2CyIITLRx+doxdrmdXCC
+9ejpfbDKVJvGfJj99Ozi07DZMb/ue6iH2XlQ7xo8psVZfgSet2Gh9l04SVYl
+ejWcNj3a+wAWBipHDNDhxMbXDfAW0ysdp+FQ2z+XlcGFKm0/u8BVagNbT8L0
+FAvtBbBHa276LrgnuY9Too48FROG5mT/7HaOPSzhyfkyH6ZwyvvFYZWPrvzX
+qMe79rujQA33UPdZWjlcE908txF2vTBv4hjs527h1AynxVjcDoAbZmj6PbCE
+39oUd9h1yds6Klk/dbbQHq7wqVHeACd5s5ZsIOud8q7Jhsc6C8K2wor6V6IH
+Yfboo/EoOKHfJl4Z+QckfYcKYRsZuwhrWEeTOv8V2a/icbw/XGZ2MlMR+Y0C
+Nv4SQ55/Z+y+DbbglF/jwgZNX+tKSf1ZVON0mD0xITsO80MflCTDlZETlnQD
+5ByKOBwBG/XzFWzgmIjEW97wF/qXZjbcw/kmYsIU9hy1o/C8HLHbw8i77+0T
+7Rz4/goFtSDYRD9Y9wJco6K0ohv98G+sLb8KR/B4f66Hc2VOZFTDtKPPhy6p
+sijOEiHTVWS9o3vNZeECd6pPGdlPQX3WbyosSnFubUA+8Zrn7mPK8KCSOheu
+uGR6PRr+tOFmSThMjy+YXAxLVAW4bYeTBJGi+0o435qChPVw503P/Ax4HlXv
+ogHsp705+xDsnB6rqQLz2ypCQ+GFkbmrpcjz/9QVJcEtAq+/v5Pz4ZmY8Cdc
+8eBy3gg5X+O1kR9h6U/Hbn0m4+F3l67G/pSEfeIimPNmTmYszEoPa5yP9XI0
+hkKfwQ8DrbpUSf1flLeoo76Z7PpHJjCnQJeyE650n77hAXuX7Yo4A2freeaT
++hrs48LvwHdXNf6cR/K5iUW+gJOi5Gwb4SFxn7FWuGvXC5v3ZP7cx5xK2Mr8
+uUBqFXKZncmLgqm2OWdXwvPiXzssh1OK7AId4TSd3IO3kU+z5BWTDcfKTi20
+J/00YC05BLOOqEv9hXq7WgRF8fD9nRfGdWG3zIqM42S8r/GflCUsSn7fkdEk
+2LWF5fFVkUUxV+pVioN7mvPTtsA8t5VVYXCOM+/ZUwUWJc7iSwHZL+lEfOtG
+eHle8CxX2Cy15Y/Bxbgfak4q/wR788q2noJLU6ccNeCGM7UOHvCrO99+SJLx
+GXaoAby25h5vjPTrnPPdpTC90vJAnwH5PNrPNoRjmn4rbif9abn1dhPs3eu9
+ugVOE47OnIB/Sae2PCD93d5t/QSubPrQ/xiOHX39Ugn5Wqmq+Z3kfA294O6F
+KzKVnn0g70+YM3ITHq6NmiuGPHQr84uzUK/JNd/fVeHSuMEyFulH25SrFcmr
+TwsLgm8uYVj5w50PfS0T4XS9j9PHSH91O5YnweENGlpX4NaNYcEH4IHrVx3b
+4IDHtj7WZP0fjnITpP8LgvcIsX+ffKDpotV4v+8TzXNgbt7qs/owR4Yfw4A9
+rJ322MCltvefnkF9iVOrJtzgztjkXCk4IvToZx84h+rz4sAi3O/Tnx23wBHG
+JgKBPIuSubPaxQsWVnnMsoQ7RWHHnWDWw+SSMjnkZhY/soD58lFFurBH1pSm
+LtywxtymZiGLMqdK5uFCWDFtrcgXXpw0S3ka+Wkptc4KsIkR70g/zFHQLf0o
+y6Lsiqz2e0zqPXzL5SXcatq86CZsZ7iE3Q0Hp1IFF2F+C+/dNMxqOVrEJ+fN
+v/3xCqyXHXLBjUfO/+y/V++F9Tb6/ppPzp93bNg1eKKIK1dC3teVN+GzkZef
+mrHxOvk8hA22b4KnhsfrH5H+JlrqnoPDTeuqBkle6wS7Plj8ziLHOaT+/snD
+8uiHp2jsV1JvwLm0e4bwwm3aNc6kv8Oa0xYw85PLYCisc897fCUcUSEfnwu3
+TrZeng1HZTbq1pP5ny1s7mB9m44z3C7S/+ZPM4Hwcw+jhCm4Qvh+jYj069hr
+FVlDzNdR3BQN13O6zmnAwmjZyGH040TE7aIVcMPwj0gP2EHOda4+XCrOyKqh
+4Tlf6lcynrN+h7EabNa4tlcTpjG4uxfJIE/9njR5mNJauGoOFfW7HBaJwSN5
+P5oUFuA+TtrvPkze71LXrI3S6Pttp/ftcNrSUIcbUrg/ch+q3YLpw4cC3WBp
+0xfsYnI+yn8yV4N3nZ5USCfnc0FqmTKcu8c26iip78MfwevhpszigjDy/KNa
+Kg9eTqNy9pPxuO0WC7FfxO+/HPnP26+onoOrDJoZ4TCt1bbaCvkmRB2/xpPx
+Tfo7emBOhq8wm+zn1bguGvU4NIpcKkhevcoXEqi3R6076wlxAnfLQThUy7d2
+hOR/+dajHtYs3JGwiPSbNtDdBU/xvmatgelBOjKtcMq4ROIO2C9zk3oqzKTQ
+hn+H+abncpThhrjTB0pIP7WdPA5h/5Trgt47MIc/uasY+Qqde0zfkv7feDxy
+BfVU5udd/Ezmm1wR5KB+WsnItWni3ot+QfNxX314SRczwvnTk+0wkWT970uW
+0f+/X81j/QsnUMtV
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.049881517191032, 4.07817374061448}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwl1As0VHkcB/C7GK9UI+9kPBKWjDmtY8lWN6tJKcZ7KYzyWsVMraWHneRU
+O9HLFkuJqSMNveaIkESxXituYjwqREpHSVJhyX7v7j1nzv98zr3/3//3/d2Z
+Md0h8I5QIAhiNz70+v+1lCTU6dWSJMgc6V8NBnCX1N8b5hXyWLdh5jo9uRSW
+uQSH1cH3jTM2z8PjpJboHzgkU/ewlxVJUFNXZ/1Q77PmwbQLtDtCLNrgGbaA
+6IVJhqU335Akzo31r1L/FvXf9fK+WYb6hvuDrWFhJzkhhe8IdlU7wcl7g85v
+NcL6sUDqCEuixc+H4fCDtfFWtBuyDH5mkUSk02j8Apjpra5AwZMn7Zpf4rxx
+ea6ujjH2C26sKod56WWz9nBJ1r2W4zB/iiplwzHdjI5gWJhTeEsRdlxXvd0R
+Tq5beKMM9dbujdE0gmvsa8Q8OCXI7csi+v6RUHkn+lm0z20Nk873wDOKBztY
+nNE3g4k3CZVNyLO5v0fmCnM0hiLdYZemUaNEWFa/IqEP8zC775lQRvdzlPs0
+FW6ZDhlToPNYX37rD5v7FjH8YX7Z6BwXVuf2VV+HTYx6DIJhbuOxYQVr1P/6
+cSALvivKdPOFZcuKTn+BdTv8VS/CyZmrbeJx/myPgOqBybf57Sro1z9UebGq
+Dc7b+Cu7CObUHmJZwGS3z5QX8vq6uvK/g/nhlemf4PIlj7gcmBO3QZKGeUn2
+bfNgwbL1VDvDhCT6blIv51F/gF3v+j08tp7j0g0LM08eC4DrRz3tr8HjeyYX
+R8Bbrqq8SIJH8sbFofAdYWuKF6zq7tC2EW7RUje3haUfLEaMYTkRG6wF80Qz
+1Z04v2hNmqEKnW/qHCcQZkcECdTp+6ntmk/o91eQt5sF8yXNY1vgOCJW/0d6
+XuWvvCnkPV/eHJ0IM183sSPhnBNn/Sro/XdUN+rC+gt+mWYgn9BmtPQV5ndg
+0/uaQNpta8RP4UXSlHwZfKZVdPAzrPFJJ0Z5JfJTGS8csH+yrPiNP5y8f/Ba
+NpyfxPTKhXlJ73IM0E8BuzisB+bUnb14C054JrnCsMXzXBeOD/JMKMb8aQrL
+To/PzMBfGV13V8KNcWm3PDCPZ1ta8i1hpvJcahacqvr4gxZcMy0bksOvcntt
+JlFfbJHhpmyK7xuhculvmIpKdTaH10qHbel+pH8MBtrBrfXlXwVwtPbgXktY
+VbvIfQNs1d+VuhD2dSS1zeCsgOzmIdQv9ojtU4NNnOO234BP8H1/m8c8pI1X
+HONg1+TIISX6fo/esDX8cGuNgiHM3OYdQCGPdkNT1XpYqDad5QdTD5a8SaSf
+Dz8cNoZ5xL/2CKmk51mixL0Mmyxda6yGfJKdRssT6XkFuR8Lhvlel6uE8JTO
+o8Ml8MCRiKNn6OejzOVqbMwzqfe3TvjAIfGOQHigw9jjB5w3GGMcnkebHZVY
+DVucN7ndDfM0l3fZoF+uiPVZwQ55yy5Ziej+KfvGZbD+phMzj+F7spttK+CR
+jn6RGebjQJXUsuBolrvRLriAlPLVaBvLq67CU/wR9xHUtzLfuaATnphoG7kP
+i/MfF47DYwFXTNPh7nmf7dOwo/Oc5U44Wn7c4D084pTNcYKF1/U1nsDm7dp2
+enDWkopDdP2f0kszCFhaN1opgNW1hEZTmEf03O1W+v2GO93MnocpqmzzW/Rf
+kJLfS+8fXz05W0j//hL1JSQsqajMjYWVSgUX98GqoxNiZ3iiqv5UFd3P85hY
+PVjkdTdYA/ncpJ1LleCSplM+YTDz3gpPRZi153e/crhcce0FHdipoeWsMgfv
+xb86cDXcvyev2xbmPxRXCOj9VkomPA79/77uaTEcWtv7Yhf834X+GViSOeS/
+Rwlgaw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {6.150426821111384, 13.782458980118262}, \
+{1, 0}], LineBox[{{6.4999999999976925`, 4.5}, {13.49999999999251, 4.5}}], 
+        PolygonBox[{{9.4, 4.5}, {10.6, 4.1}, {10.6, 4.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 3.5548}, {0, 1}], 
+        LineBox[{{6.5, 4.4999999999976925`}, {6.5, 11.49999999999251}}], 
+        PolygonBox[{{6.5, 8.6}, {6.9, 7.4}, {6.1, 7.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.5548, 8.}, {1, 0}], 
+        LineBox[{{13.5, 4.4999999999976925`}, {13.5, 11.49999999999251}}], 
+        PolygonBox[{{13.5, 7.4}, {13.9, 8.6}, {13.1, 8.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.5548, 8.}, {1, 0}], 
+        LineBox[{{13.500000000001851`, 11.5}, {6.500000000002592, 11.5}}], 
+        PolygonBox[{{10.6, 11.5}, {9.4, 11.9}, {9.4, 11.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 12.4452}, {0, -1}], 
+        {PointSize[0.04], PointBox[{8.5, 16.5}], PointBox[{6.5, 4.5}], 
+         PointBox[{13.5, 4.5}], PointBox[{13.5, 11.5}], 
+         PointBox[{6.5, 11.5}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T5", " ", "P1", " ", "N9"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdfei/fjghgjhiij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdfei/fjghgjhiij.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {44, 0}, {0, 0}, {22, 22}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["g",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {21.75, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["g",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {26.25, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["\[RightArrow]",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {30.75, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["H",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {35.25, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["g",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {39.75, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["g",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {44.25, 69.96}, {0, 0}]},
+  AspectRatio->1.0999999999999999`,
+  ImageSize->{288, 288},
+  PlotRange->{{0, 66}, {0, 72.6}}]], "Print",
+ CellChangeTimes->{3.769419770651333*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"70a06fb7-ad3a-4c53-a702-68cc4b24ca3c"],
+
+Cell[BoxData[
+ GraphicsBox[{InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwV1gs8lOkeB/BXqDkal+RuYipJoYhFknldhxK2i0gr2zood0qcxBQ5s6qN
+aJtyG1LUii6iosjKkkhkE1ZTcSjkLiTO7/H5pM/381ze/+V93sfKgyE7/72I
+oqhb+Ef+p8TJr5U0NbewsBBnQFNdrnbiDWyaGlS48dIbrkw1Vj8D+8/5dNrD
+0o6CMGuY8TXM1wi2P8bc0adJUw4ft+9fC0d5NHnYwK5tlrar4QdVW+2yNWiK
+p2FjTsblm7qdxGDWrvihTfC2mFzPkBU0leAozLODX1yeePiFRVMqAdFcLziY
+5V0bD6epTAYdh12fn3tkCPs4i0Wkw0qCh3Gz6tjvbkNSBdxc9SmtGx6slejs
+gs/ut2b8Qxz9v9RZWEu+KX4clpj7g6FgiLwlZII0sJ/Dfwxq18JFs9cUPWCe
+c/x1YziGmzqbSca9Dok2wzcPXJbpI/afXWYK+0tML92A+AslG+z04EUiVn0g
+bFz605gq7KTZcSYT9k74ME7Bv5lWupXDg9mXeR8Qj+/tOL1qsv7WUZUquCb2
+rV0xzCvuCCX53VRYZXoSNvic9FMkXHHnhLgZnOY6U7YTPiIqZ7UhHnaJsz2p
+pzn/rYsnLMeOuKoES7RsyG5Cvi/YB9aJwestuUxjmBq+97h3I03VZnN2p6hh
+/zmT1nbYMtAid1AV8QaoLe2CM8SWWTjBySetxIdhkW6cfqkK6vabrzUD+znI
+/zq1ERZWWm3ThPMq11g9UaYpC/fn9lvgDeq2uT4wq6cgdx9sWxF8aA08qD57
+hfTT6VXGSTG45rTq3gxSj65Wn2kl7H8xRawcbmrhrGaQ8RCRqA2uDvY+oQ+r
+VFcHD5B8bT7Jkv0Z9PNA0t+Mp+Lnr8Ml9esmxVDvhM2t0sNw4fnXicRF4pHO
+pog3T+jEnMH82DwnpWhYbumzrn6YUlQ6VQSzdvDLXsGLQ8P3tMC2Ou8flpD3
+tfmKlQimJWVcU2Ft+1TNNrhEXGpVCNzvWKNWDL+Q3fjdEc5VLK8Pghnj3eVr
+YHeNp0bysOuSGD0J+MLV79VZiE+gt2SsEfV9EtG5Whm+Pa69Mhs+m354OQ/1
+cDiiqBMLO2zer/lOEfNnLp4LhJ3aZvaZw8I7rxgBsNKEjLRAgabaxwqPRcOs
+jeqe88tpqq4zVfQ7XHeXOxUOt4tdj3sK8wdONc3K05SZ9vnuKbg75tXLyzB7
+W++sKsl/scetnXDCs79umpP6GA1XaMNzjRo3PeG7C8q9ijD/7WdN0k+v1z5Z
+GmT+/VHuJXjwPJthCatwryQVwR2bDWRD4SqToAuVMK9Z7Vox7L5VxasevmL8
+o8RXOGOMcm6AEztY8xwS/2ix3jNYY1rVOQF+8STXsAweo998eQzTPl7zOfDU
+qTUBfbBgx+eLieT71Nm4dg7299B28YV7dBtypmHmmZJqa/jR1OPMDtjg+OH7
+K+C6P1Tsc5aT97qTGkM93EMCTHbAzQ+iRgphHcsfIkSIj1E0lB8Cs/Pynb1I
+/H/66G2FGfIvtjQso6kCh7WjymT+Ef8LerBD2alSMVjr6Et7vhzGpdnh3zbg
+vVJ4u6leFvV7yLSWxPiDlksJ52UQx0GtAA24vWKdeYg0vquKowftyPkzbbwX
+zsRzd8T0HIMn3JOCc5fCx7/K3CP9Zl1IkYCp9Myz43DNZ/30DCm8H+tE79SQ
+n0A82zAAzht4OUP6udvFTy0YNm6x4LqT/N2C3YUwf0ZhZRg5n53+IbNk/QU/
+VgIc6j9eF479+TZJK5JhlZ+lTOZhwVNZvzRyf3gyE5MRn1nps6tkPCHrR90V
+iP8By2iArC+8UdhzSZrUe18V2b/AqffgJGxR3ixFni90PfpeF/nP9Z6W2kz6
+dTvqphFckd1jT75nWlMdsUtg0V73iQ/Ir+c1/U8e1uv4mk4IyHm5MrSaCdOp
+uyx3wsmJb87QiKfquf5eeZiXv/47F/GaDbr5dW0g39n4yvXIz3vzM7l7MMtX
+WWqcgfcl1Wa7AN7NLIouXIL6W3U6noP931dE/LIYcRdnH74Ay5X1xWpJIn+6
+zDAfbmfWXP4mjv0O9Lg8h+esmwTji3CeT5iUzJD5EZppirDw7/H8TYinkJsR
+6C+GOHKtx8NIv3uVQkYo9M80l1ECp2k5qBXD/NR+40mS37tCqatwzVRmvwrq
+QQfslq6DLS5uMif3sSAk210Z+1VdDJVzgFm6w33/hYVHc0zcSP0igydl8Py8
+awdb9pP51/hnhHAFb30IOc8Wol+0DRC/zocgCXK/yNV27b8DZwQvn6Jh4wF1
+vooE4uVtkF1H7mOjEW9PWKLd4dhS2Gc6JykMjtp6ya6V1PvrgPgeeNqpJDYJ
+pqpWRS0i69ku5jRsIE8HRpPn3RvTm0Z9ah4H21UgHm8Jm6H7MDOrXKcZ8QsS
+Ev6MgX1aM+9XIN/QSLsTLnBy+vxW5QUOZebL4xrAoVGHXJPnOJSIZ5rChlX8
+hKrfZziUwyqlaeIoxzulkV85FDtOgzYktrW5pDjJoUYmW91cSX8fRBiNjHEo
+gW3Zz+R5zetcu1RHOVRoq+ubu6R/yr1BNsMcqv/3yJwR2DtUUrR6iEMl287b
+k34aBPzl0z2A+XsL1I7AI65nm0Nh/mB94F0ybvYmtRHWOaP0+BMZr04P7xrk
+UMYlE0dI/ao+ChuOf+FQvBbuLXVyHlL2brQa4VBCZ70ULdjbp6HCG/HEnHY8
+R+4TkbhHWTziTVvFjNYg/VRoU00Z51DTY/UCWXI+ldIWhU2gHmxnY/I9qDr8
+eVIa+fJVOxTL4ahHuyg32Dsi+yK5L6b9xgu2wA4WlaOGZP5NYX4p1tOSjuV9
+yJf/w7vdNdi/ap/s9Sy4TufvRj8830Dyuts+WMfb4/kNEm+wvqEGTHcHORug
+PmYf4nWH9HEOWqb2JPUjnkvca/Vw8qiaxrmP6AejlnsfZm8v8H/VhX58+3X4
+Nixc+6+QrBbUt7FMWAFTxcyGuqccqsC6LfENMfnhPaam8ffrgj79f5/a5wc=
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.858982998704643, 17.360963007340356}, \
+{0, -1}], LineBox[CompressedData["
+1:eJw11gs4lPkeB/DXbIstO8aMS0kaRUTFxEk5mNe6PJb0TMjOtk5m56iN3C91
+aLK6rOiUmbVCbjunozl0aAcnRCPdJFvbsDYqMko3KhJNa8uc77/nnPd5PP/n
+4//+/r/LO/NiI04M3c6gKOogfshKzelwLaKpDxebpgyGBHbfwdwW9b0aE5ry
+KgoZebeQpuSRbcKdsHxPk+0umDtknugNG0mvBPZZID5kjr0G9gl3HfaENauu
+Wq+HS5bd/bbGnKZEB6WfR8Ibp/SKrGH6+3THE3DHdYWz3Az372YFPof3m11Q
+82DWiiuuoainMX/3xtumNKVOO/FTJxwdZ6iQwqIT+kN+HJraEiCb3QZnP/xH
+yjV4evhqmh8sD014E4h12WHHYD7WDkP+7GWsrsK2rhCsScriL1yRh9d5LSoe
+dmlK31kA31pg1VlK8ollHkMwOzdwUS9MG9xrZaHunkfpnxjj96KfY/odYUO9
+l4YhsPKMbxHx+pGQrMMwHbaCS+5n6Ny152Bq5kr7INZ/y4RfarCq7x//heQr
+tpQba7HK2rur/oS1jXWJ9weZR2lB7HXknS/wqxqD5d4eE6Ewa1jlfIXkK7NN
+7Ue/DUF++STfpPxhfCR8SZuSQM7RqCc2P8G82L5ju24hThlYLNgHT8aXvP+C
+zONUK3c5fPMj6dZexMl33uoexPwv3pNGfAbTcdsldfDj1AH3Wtwnd7fcXgy7
+0u8Pm8Ki15LKMrjabWjkW6wuFi+WtmJlWN1un2Lh/Nrf21/B/LJY/2RYY+Dl
+SSNuunJm3ZwxPM8+8iTseNZE4g0n8armmyLvWMORjn8x0eeuhbkyeJJbqfCE
+k6rPV7BRd9bQ1xPvP4U9rPsL4bSivSljsCbMv90EfYt/eOGog+m8cYtD8JtV
+sUJ3xKu/cVzyBGZwVI1HYZFghXIdns+hIoP/aGFqSXJeIuxn0zeSSOpJd4mU
+kn2beLfncMf+jIlCuCTnXCsP/XArup2yYc8It7AdMCVjWoXClufH66WwcoX1
+AyPyebEf5Z4mbvf+sRH5sxg/5zfASW3yzUHwC8tupYLEG2+t/g395HmpF39H
+/PLira3w6qfu4SEk/tcd64cxD4+nXgod6nEp53y1k3jlNwxPOFsvQ/IH5mmZ
+uW1TOOnnoWlqBbysLaxmE+bBsh1IJt8nhf1ZyVojzKep/84SuCg91dFwAeZ3
+2cCMQeJ5+cqBT3A+v3wveR8cKh31rzPEfpWb/yI45e330/kGyFe6OycYTlC4
+r8vRxzxu8/58HL59f39R6cdwVEXka9jaZyKqdx7mX9/CEKPetMzkiLWwYLtI
+OggftR89oPoI89V6jPwF/bJby03SYdl48FENXM486C+EuWtUZlGYV+vf+dnR
+sCA52KUP7mQvjzoOs3za3nhg3szK3PFRcn9srw15fmyqdDAY+ZQ9B9xvwu+s
+Tj65CHNnvOun4ELjPYu9UW+2qsdiDp5Hferb/DGZXw5nAq6ceh1ki/5E918l
+dsJNk+JTElhzbSUnBw4YO1DdAgt+uvvUBT7SM/agB1brcy51o74Cm9PiyyR+
+wNlJCKc19I7nwXR884b76G9g1t7qw/lGweFi+MbmmMwC5Fc2LtI+w3w0dseS
++lGvaFv0nkw4MMCJp0V/9M0zXQvhM5Mb8rQM8v60C7hOnrfCUj6sh31twQEp
+eR5pzdXNFPaNtNwEuNx2NdNEx6dE+inNO+Au/8LBpnd8isq/qsog74fPX8yk
+zPKpyedOuQq4+pG8IuItn6Ib2zeNw3HCG+LkN9hnLvbxR/7yBEWaeppPdejv
+OqWE/fItTbJe86kk9j69leT51Q1x9k/BlbYba2DTI3dOD75CfMsl21WYR61y
+tasM5goKmLXkPZbhTxfDrAWOdcvJ9+u3+hvPYFpWojsGR/vWFEhw3mShtPgx
+zHr0Va4P8skVXt0r8XdHlHoh0wH1yMPOD4TDVZ85dCydQb/uW5g74PXeullT
+1C+PFfwaCbeYuo3OwCy7fY0b4GnfJtN6LfZ/WCX88HmICbq6Dv0rnUfS6+C/
+8fdKMuBsoeRMEBy51PGfCfDkubUxd0n9yV/+zoRdLlAnv4ajWx0eR+A8pVFT
+wyP0bxiT/2MA8tGqGYs42KjL3OEB6pX1nXWbxfxEGtUyHvpRz79jfhxeaN6V
+5Y3+1cYpfB9Y8NeEOeeXqNfaIpkBd62xCCh7hnrGYnLu4fm8vXH22cgozjtc
+EfoLcWNtgYMG9ZRtOUb2KR9xn30/6p2v6ibxHboSjtVNxMc5ZZP3PjUWrGO2
+8SnNczuzEs7//i/4/2VK/xeQhO8n
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.131120426728658, 3.8093655474725483}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20., 17.000000000003638`}, {13.5, 4.500000000003638}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.203937013962182, 14.894893814502087}, \
+{1, -1}], LineBox[CompressedData["
+1:eJwl2Hs81Nn/B/BRakWKcktyzyXKuGTJpdmoXEq+7bqXJre1LZqVJCQUi1ym
+yKXEqJYpbEjMlkpRCIWshtRSKpWEtfEV9vd6/77++Tye8zlzzvv9/pzPOWeo
++Rzc7b+AwWAsEWEw6Pq/PzXW/19imSwG8+XvL5xgfbvH5YnwkOvF6EJYoUst
+mNzW9XFiFG4WsZuKgRulV/pvUmcxljbx9nFgP36b7nF4cm/ZCi9YadTq403Y
+b/5Ox2bYVmdD40eY35x/WQXOKq11k9JgMZxfvi2bMmAxWInOr7RhvsKV2lI4
+9qqLjRHME59I8YYnfYrmDWDVLz5uK+Gk46tM1eGBU2Mm7RtYDDGjxPPisM68
+xWw6XL/C14vGc59ZqOEFXz5xXaQJFqT+dMEY7nff4MmDAzOTHqyCA2ucdkbC
+zu5ZDsvgHy7O33KDk2QcdaThZskiLwuYIalXogZPbrHM0oYrqgP8reGl0wd8
+lGGOqk6gP7xnzSlrNWrP3mGSBSvJs8UNYa6kz6cmOOKK5GIn2E4z8OgcjW//
+T9sRWOxWeokh8ou2vOBZTk6Xdd8Pu5f7yX+ChZqul5LhrGMBIybItyNPer4E
+HnpxZm881UvO0uMmzJn6g98F57IFFnfhsYWiw+qayC/9XvcNuE5Dx5QDs5OV
+FhfAMmYXumphu6en/SOovRrDdgrmKl7YuA0eERc5or8W+er97rIEFtz5QegC
+M7fXr2tE/PkR/oGhcH1tUNxROKy7rSkO5n0dPaBP+U/MWJyk+5+fyA2sR149
+HaWRMEdTvjQHzn/unhVA/T/6W8kV7ihd98Uebi5tllCGg5p9LbVpvJJA3rg+
+6v9XsLIIzG9QCu2Cma+WxvQh3orUxtB78I7le21q4Nx7Yq/vwLZN8WY58HCB
+8a5H5OjOt8cpX42erFdw7k2lI6GU7+u/xxZhvIjiO9lUH845UTkjuDvpsk8U
+zOsU2PnB0e8DPDLh+kTF+Dx4x2tFFwEsVbbv7GN4SH5d2nvYTCnbjUHzJ1OR
+txbxSrmbN+nBmu/bLh+A2c4Nhk5wd5bHlhrKP9vHheZP1oRv+yItFmOazTx2
+EBaUhP3kCg/EJGT/DFf039T/Deb6+Fp7wLneh20/w+xD9g/N4A5PSwUjbeRr
+vIkpQe+HXeiBn2GBpLp6F9VbdltYHjz9s1VnBmynO/z1Jpw7dPztNljBrd/3
+CSz8zWXvDNWbdaWqBxYb8vYuh0UNE850wmPMKXlfqn+7qP09uH5JeLYy3Chu
+UlICO5usKnilx2LMFg5MJMK8s2FJlXC/idGj/XCztLx2GhzI+3uBBcU33FUW
+Drepav0qC5vJPygIgQVqecxJ5Jd0uqc9DLY03vlbL6waIOaRBPNue5s2w/Xq
+IYISONdZtuEeOX5nRweNXxZb1AQz74dJiCC+fL+mtD5YQRgTtREWHJ3izVB/
+9aFzB8hdrbu0Mb5U+CS7AA7TDP9lH8WzRJnbBu8ZV3Aqovg7ltVMwEmbrao/
+wPw6J59lqJ+tj5mMuQ7WI1vHkjUwf0CPlwwzCzhGKjSfOpcf7IUHWiv3rKD5
+3ipdtFYXz5NXYTSF/iyvxp34GebcUgl7DAf+mVLFh8UMA1LyqN4qMt8+h90l
+ZsI94X5f50KRdbgf4nRzJc3/rDap1eS5dJNm5K/vsup7bViYfU0kiuo1k9Kl
+BSv8cXq3AT2Pu5/OKcIDG9duHca1v4vjIIor82D4bT59zgyae4Px7DK43x2C
+h7Lnje9TPHe+9NrDmgXtVedh/rDV9HpYtC6EfRiOVRP1V4Xd2bpquymfYi1T
+Nfp+T0+VCSxVU9FuQHGNXExRgXWSuYMOcHeTe40MrGpfdYoDxy66dV+Wvi8p
+2F8ANzpo8zVgoVArsxPeMxp+xxqeHsxY+g3NH2a1IIDGl/v3ggUc29PLP6dL
+68tj9SB4sjJEopfqPT7KPwuXZQX1qaAf9kj12RtwxVxicRAsqPjxYQtsopp9
+ow6eNhu/SvOpI/SqpiSudu4/etB9qW9UlnrRvEs9knedvl//7tIlXJ3fa73L
+wDXMxyVgiD6vaQjaR+0S8w1W03PN/GFSAxZdfNZ9G61Dey06/8I4fBXfVj94
+rFyj4SzMGv5GOpzuR/Gf2sFhHAO3SJgX6c2cRR71VpPBobDZrTULr9Nz8Ku+
+vY/aP4l04MBJ7Uc22sLuW/dWm8IsxUYjdZhTnhgtBo9cW+o3S/NCucz5Heal
+3XlmyZ8w93CMRTcctObKmwq4XqQk5wndd9YZ48JMUS8JmsfRGiFeETDD9Hbq
+Z3hPiTj7JzipsidEmp7jXOEdf6qHT0K4JT0Xxfkr9F5zGzy/BMNhObqCk7BQ
+fPnYRXhPvNhzeo8H5N+ZC+G6F1L7n5FXbCoWR/62OWNz0oif/Y+O3rfwyPaG
+PheYW5Aj5gVLCSTKeTCjLvUDzVdhxu6nn+k9LXVYHAu3jYqGs/De8XxvMGPg
+MZfpq7QOSq3/NBIM6ywS5vXBgrAfQ3fBfruqC5WxjgpDzK9qwM3yUwdp3Y09
+XKMxgvjyNdUMk+GkjDFGKTx5dTizDFaVX97vQ/F35Ly+DyssaCmWo/pzXi5r
+gxmJeQktqBf7v3x+M6yzOoofAw9bTgz8QeeE0pUatI7UO304XET9pdg8/Ip1
+pjtdvyAOdvaYmm2G8y/IftpD+4zWZPlFWqd2ZBqZwryHcpoptM5/ZLhL0T7y
+asP8cVqnv2myGKV133Sz9km4v/1kGu0LdqUnnp2lfSAlvuwuHJvNLLgOM8aX
+p9TSvn3kl0PP4eqJzadvrad6PuwUR3yqM8yzbVSvuIQ/rWGl2jsPP9D3946z
+w+i+g3KVLNVrnZ4NH479GG+7g+pVI8V+BodNnexNhbk3Vj2bp/vBl3f9CfMv
+7dBWonVH+Z26Bs4d7NFkp/Vwqtu21EMGdB4tfsWEA0/7Xm6AFUwVNLTgM2bv
+bcRwzrTbv3+BJCy+Ke+2HswIqdZ6i/4n9l1d7AjX3xUOVsFbfhlU9Kdz8JdS
+1cNws63Mt0dhAUf6ewP4/urKV3QO7iiM3jmE/DUdiv5Jg3mrM9fmwC8LrM6l
+wzoCnoQj7Zvmlo7J8HTgXfWF8MyrynY6N3c8u+xxH/tMvkSoNp2b6//z79ZT
+sPfCbWe84YgMPVE2POl6Poji40b2KG2B294G6pjReMu6fzGCxSJUzbVg4WFF
+Y0N4dnu6iDw8/PpAvxUsGE+6LwEHBjywcIODbtmfWkT56LvFRsHzvzH1ydz/
+6vyHD/f55ulT+4rS0A+0L0aqshqpv+amtSwpxO93IUm4jtrf+FdjKzxwu2XO
+BlbQsQsOh73j0qJ9YM4aR1XaF4dWnPRMoHiXF2XehxP33gwopfqaHzothLmN
+UXZPKd53qw8NwgFGa7lfYbZjy8Z+Omc4ybeoG6JdluqvNL+nE96d2g5L2du0
+FMOPQkcyAuGxGNFlEbDRUodbJ2H2bPISa7jvTTXzPMxMY8zRvq5szfIshXlz
+wecq4f7Ka2PVcO63Iq/94Fzp8fla2KwxQUQBrps+M0j3+as71B/jXDa6aPOW
+MkOaz9JOKbDSYc7yQopHfsHmXfDsh8ecdHj4XJ2NCiw0viuIovY24yqzOAdG
+H3/5PcU7Ldv/5S2slGVa6wI7C5dZDcALHJc4bYUDJ+qr3sGTV+QCzWCW7EgA
+fZ/xcpMuk/rvXdaghP7PJDOj1lM+5xcUboOTFHUXGFK9Fn3yOgJ7H2uRsYDr
+RedEy+Bq88+1jtTe2zNskPJ5EVrgQ+0vRkbKIN/owQ/6xyle2bFFNN8qzFhx
+PNh9zT37H2l+rq059gDu6A8ciIOrrj3vGYGTnFvfZ8AOdQINWSOMt61YnQtb
+3wj6bAknjXtMUvszmT6tPrDCOZtof/jxNdP9CTA/1CnFAlaPDjlxiRzTlk3n
+3r55pmUdLCyUq3hAvxv6tvc+hsWu97JjqL7Xuyb74AHT3VwjOF6ZFTkAxzYv
+9H5D9fy6s+QvWEqxaiaPzv19okt6qT+DE7Hfw+f2doe1w9MLrdpk4LJ+rfnb
+8HBlvMcAfjddfDc6XErxCJ5oCOA7rT15uXBFenXaBXjm5bOTFH/F+eRdp2Ej
+uZWrw2C7OE5IJryJ1y7whzsmVlpegh0CQrO8YB5Ld99dWCo56JornBthP/QG
+9uzPaXGj/F7ucqV4XikPue2jemVJvtgOX24vjAmmeA2fso/R75bXlcvjyUdl
+KiupfaswNR92T7EpG4SnK7rWU/2S4sYDxFEfboj6B6oH+4Sjsy48uX8qYbEx
+4nurt9sSblycU7QBljq+4eN3VM+RXx+5wmMP4r4zh6tOlKQdo/tRyevV4R3l
+dslFxvS7pN1ijuYrJyLmHszvXVPcCv/eyWX3w9MR1rYZcNJrV59xOOLLX2EO
+mv/7vwPDBPf/xZ8G6/8Akdv9Zw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.518114191521104, 16.112957390365363}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJwt1ws41NkbB/AhXURjRJHrMAo1oVxX2FFsbiGE6CI7lRRNQm5bwkqZkFuW
+SZPcKsVKUWRRuqoUE93ckzZblMvEpP2e/f89D57Pc37nnO/7/s6c5xkN//1u
+O8UpFEoHfsl/igT5s4JF+e9Hm0WhlS/LdoQTFPSe/bOMRWHXRV/KgHNcZiSe
+wvJTMXkCMr7fUacQplHKJWWYLIqOzrZNwbCittN3S1h6749l+jCvz1/oBw+0
+lxQNLWVRJJgekodgutgF/TOwxYUBwRH4TUbAVhe4rnjb2Wi45fWXPjFYh535
+815Ya64Dp1oLOTvfqbmS8Yx3p0LgAdpfDCZZz64t3RiO+ebKE4MVr3XsEIeF
+X48z2pB3YOp+1CsG5gcmx52H/XqYgnp4OF48LQwuy3rXWQ4zu/qoTnBV/IHN
+l2EjpmSKLiyfPX76OsydZDnQYOa3b44PyfxMaXlx2OlrSOUgXOfkb076adex
+s0AS+1vkekVLwawgs2IDOPZL0DQDbk2OU9wMu74fXGcP10TQ1sWS/GsM7aLg
+4XcXD5+Hx7wsQ67BdAMDtwa4yvVHlRA28ElPbYcTRk4UWqNe3r2dQV0wLyQw
+/SQs39Ge9wb2zlxw+SU8tlvc4wnMb39OZ6xEzlPLdlyFjap1f9oNc/ZOaXJh
+6Rz72PNwg5PncZLvjZrkGwFs8NJYUpWsJ4wvFsGhVwuSO1GvWW5Q42I9rLfZ
+2SuF9Gu93nkGXCXXN84iZhtsJZbXsVr8VRP1a8vnked7Ds4OKoG5s9tyZ7Ae
+130w0w9mrdRXewvTquVH6HCDjJJnFUyX8+X+rYEcN2c9SITb/SWl/oJFHJax
+F2wz+frkWdjoQTdHB36TfOMCF07yCrb7jvo7z/VvT4T5+drbOuGky0OqZFzI
+U5SqI+c1xfsOD+bE89ZdhANqh69eh9tvhcUWwmXqJ3o64H37Ui9fgpl0qw/f
+4QHGKvUGuEZazWgZ8t7xZKT0kvNZ1CTtDItOjSrJIA+7aep2CFzB0fJeDzs1
+WT89BQ/wp32S4ASZ44OlsJbpwLOnsF/QpNp1uHBroboy+sV0YovVwHzDmcjd
+pN9rj+VdJvvN+M+vhGkdssnZ8MhhUxkhfF99lfhB2CyIITLRx+doxdrmdXCC
+9ejpfbDKVJvGfJj99Ozi07DZMb/ue6iH2XlQ7xo8psVZfgSet2Gh9l04SVYl
+ejWcNj3a+wAWBipHDNDhxMbXDfAW0ysdp+FQ2z+XlcGFKm0/u8BVagNbT8L0
+FAvtBbBHa276LrgnuY9Too48FROG5mT/7HaOPSzhyfkyH6ZwyvvFYZWPrvzX
+qMe79rujQA33UPdZWjlcE908txF2vTBv4hjs527h1AynxVjcDoAbZmj6PbCE
+39oUd9h1yds6Klk/dbbQHq7wqVHeACd5s5ZsIOud8q7Jhsc6C8K2wor6V6IH
+Yfboo/EoOKHfJl4Z+QckfYcKYRsZuwhrWEeTOv8V2a/icbw/XGZ2MlMR+Y0C
+Nv4SQ55/Z+y+DbbglF/jwgZNX+tKSf1ZVON0mD0xITsO80MflCTDlZETlnQD
+5ByKOBwBG/XzFWzgmIjEW97wF/qXZjbcw/kmYsIU9hy1o/C8HLHbw8i77+0T
+7Rz4/goFtSDYRD9Y9wJco6K0ohv98G+sLb8KR/B4f66Hc2VOZFTDtKPPhy6p
+sijOEiHTVWS9o3vNZeECd6pPGdlPQX3WbyosSnFubUA+8Zrn7mPK8KCSOheu
+uGR6PRr+tOFmSThMjy+YXAxLVAW4bYeTBJGi+0o435qChPVw503P/Ax4HlXv
+ogHsp705+xDsnB6rqQLz2ypCQ+GFkbmrpcjz/9QVJcEtAq+/v5Pz4ZmY8Cdc
+8eBy3gg5X+O1kR9h6U/Hbn0m4+F3l67G/pSEfeIimPNmTmYszEoPa5yP9XI0
+hkKfwQ8DrbpUSf1flLeoo76Z7PpHJjCnQJeyE650n77hAXuX7Yo4A2freeaT
++hrs48LvwHdXNf6cR/K5iUW+gJOi5Gwb4SFxn7FWuGvXC5v3ZP7cx5xK2Mr8
+uUBqFXKZncmLgqm2OWdXwvPiXzssh1OK7AId4TSd3IO3kU+z5BWTDcfKTi20
+J/00YC05BLOOqEv9hXq7WgRF8fD9nRfGdWG3zIqM42S8r/GflCUsSn7fkdEk
+2LWF5fFVkUUxV+pVioN7mvPTtsA8t5VVYXCOM+/ZUwUWJc7iSwHZL+lEfOtG
+eHle8CxX2Cy15Y/Bxbgfak4q/wR788q2noJLU6ccNeCGM7UOHvCrO99+SJLx
+GXaoAby25h5vjPTrnPPdpTC90vJAnwH5PNrPNoRjmn4rbif9abn1dhPs3eu9
+ugVOE47OnIB/Sae2PCD93d5t/QSubPrQ/xiOHX39Ugn5Wqmq+Z3kfA294O6F
+KzKVnn0g70+YM3ITHq6NmiuGPHQr84uzUK/JNd/fVeHSuMEyFulH25SrFcmr
+TwsLgm8uYVj5w50PfS0T4XS9j9PHSH91O5YnweENGlpX4NaNYcEH4IHrVx3b
+4IDHtj7WZP0fjnITpP8LgvcIsX+ffKDpotV4v+8TzXNgbt7qs/owR4Yfw4A9
+rJ322MCltvefnkF9iVOrJtzgztjkXCk4IvToZx84h+rz4sAi3O/Tnx23wBHG
+JgKBPIuSubPaxQsWVnnMsoQ7RWHHnWDWw+SSMjnkZhY/soD58lFFurBH1pSm
+LtywxtymZiGLMqdK5uFCWDFtrcgXXpw0S3ka+Wkptc4KsIkR70g/zFHQLf0o
+y6Lsiqz2e0zqPXzL5SXcatq86CZsZ7iE3Q0Hp1IFF2F+C+/dNMxqOVrEJ+fN
+v/3xCqyXHXLBjUfO/+y/V++F9Tb6/ppPzp93bNg1eKKIK1dC3teVN+GzkZef
+mrHxOvk8hA22b4KnhsfrH5H+JlrqnoPDTeuqBkle6wS7Plj8ziLHOaT+/snD
+8uiHp2jsV1JvwLm0e4bwwm3aNc6kv8Oa0xYw85PLYCisc897fCUcUSEfnwu3
+TrZeng1HZTbq1pP5ny1s7mB9m44z3C7S/+ZPM4Hwcw+jhCm4Qvh+jYj069hr
+FVlDzNdR3BQN13O6zmnAwmjZyGH040TE7aIVcMPwj0gP2EHOda4+XCrOyKqh
+4Tlf6lcynrN+h7EabNa4tlcTpjG4uxfJIE/9njR5mNJauGoOFfW7HBaJwSN5
+P5oUFuA+TtrvPkze71LXrI3S6Pttp/ftcNrSUIcbUrg/ch+q3YLpw4cC3WBp
+0xfsYnI+yn8yV4N3nZ5USCfnc0FqmTKcu8c26iip78MfwevhpszigjDy/KNa
+Kg9eTqNy9pPxuO0WC7FfxO+/HPnP26+onoOrDJoZ4TCt1bbaCvkmRB2/xpPx
+Tfo7emBOhq8wm+zn1bguGvU4NIpcKkhevcoXEqi3R6076wlxAnfLQThUy7d2
+hOR/+dajHtYs3JGwiPSbNtDdBU/xvmatgelBOjKtcMq4ROIO2C9zk3oqzKTQ
+hn+H+abncpThhrjTB0pIP7WdPA5h/5Trgt47MIc/uasY+Qqde0zfkv7feDxy
+BfVU5udd/Ezmm1wR5KB+WsnItWni3ot+QfNxX314SRczwvnTk+0wkWT970uW
+0f+/X81j/QsnUMtV
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.049881517191032, 4.07817374061448}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwl1As0VHkcB/C7GK9UI+9kPBKWjDmtY8lWN6tJKcZ7KYzyWsVMraWHneRU
+O9HLFkuJqSMNveaIkESxXituYjwqREpHSVJhyX7v7j1nzv98zr3/3//3/d2Z
+Md0h8I5QIAhiNz70+v+1lCTU6dWSJMgc6V8NBnCX1N8b5hXyWLdh5jo9uRSW
+uQSH1cH3jTM2z8PjpJboHzgkU/ewlxVJUFNXZ/1Q77PmwbQLtDtCLNrgGbaA
+6IVJhqU335Akzo31r1L/FvXf9fK+WYb6hvuDrWFhJzkhhe8IdlU7wcl7g85v
+NcL6sUDqCEuixc+H4fCDtfFWtBuyDH5mkUSk02j8Apjpra5AwZMn7Zpf4rxx
+ea6ujjH2C26sKod56WWz9nBJ1r2W4zB/iiplwzHdjI5gWJhTeEsRdlxXvd0R
+Tq5beKMM9dbujdE0gmvsa8Q8OCXI7csi+v6RUHkn+lm0z20Nk873wDOKBztY
+nNE3g4k3CZVNyLO5v0fmCnM0hiLdYZemUaNEWFa/IqEP8zC775lQRvdzlPs0
+FW6ZDhlToPNYX37rD5v7FjH8YX7Z6BwXVuf2VV+HTYx6DIJhbuOxYQVr1P/6
+cSALvivKdPOFZcuKTn+BdTv8VS/CyZmrbeJx/myPgOqBybf57Sro1z9UebGq
+Dc7b+Cu7CObUHmJZwGS3z5QX8vq6uvK/g/nhlemf4PIlj7gcmBO3QZKGeUn2
+bfNgwbL1VDvDhCT6blIv51F/gF3v+j08tp7j0g0LM08eC4DrRz3tr8HjeyYX
+R8Bbrqq8SIJH8sbFofAdYWuKF6zq7tC2EW7RUje3haUfLEaMYTkRG6wF80Qz
+1Z04v2hNmqEKnW/qHCcQZkcECdTp+6ntmk/o91eQt5sF8yXNY1vgOCJW/0d6
+XuWvvCnkPV/eHJ0IM183sSPhnBNn/Sro/XdUN+rC+gt+mWYgn9BmtPQV5ndg
+0/uaQNpta8RP4UXSlHwZfKZVdPAzrPFJJ0Z5JfJTGS8csH+yrPiNP5y8f/Ba
+NpyfxPTKhXlJ73IM0E8BuzisB+bUnb14C054JrnCsMXzXBeOD/JMKMb8aQrL
+To/PzMBfGV13V8KNcWm3PDCPZ1ta8i1hpvJcahacqvr4gxZcMy0bksOvcntt
+JlFfbJHhpmyK7xuhculvmIpKdTaH10qHbel+pH8MBtrBrfXlXwVwtPbgXktY
+VbvIfQNs1d+VuhD2dSS1zeCsgOzmIdQv9ojtU4NNnOO234BP8H1/m8c8pI1X
+HONg1+TIISX6fo/esDX8cGuNgiHM3OYdQCGPdkNT1XpYqDad5QdTD5a8SaSf
+Dz8cNoZ5xL/2CKmk51mixL0Mmyxda6yGfJKdRssT6XkFuR8Lhvlel6uE8JTO
+o8Ml8MCRiKNn6OejzOVqbMwzqfe3TvjAIfGOQHigw9jjB5w3GGMcnkebHZVY
+DVucN7ndDfM0l3fZoF+uiPVZwQ55yy5Ziej+KfvGZbD+phMzj+F7spttK+CR
+jn6RGebjQJXUsuBolrvRLriAlPLVaBvLq67CU/wR9xHUtzLfuaATnphoG7kP
+i/MfF47DYwFXTNPh7nmf7dOwo/Oc5U44Wn7c4D084pTNcYKF1/U1nsDm7dp2
+enDWkopDdP2f0kszCFhaN1opgNW1hEZTmEf03O1W+v2GO93MnocpqmzzW/Rf
+kJLfS+8fXz05W0j//hL1JSQsqajMjYWVSgUX98GqoxNiZ3iiqv5UFd3P85hY
+PVjkdTdYA/ncpJ1LleCSplM+YTDz3gpPRZi153e/crhcce0FHdipoeWsMgfv
+xb86cDXcvyev2xbmPxRXCOj9VkomPA79/77uaTEcWtv7Yhf834X+GViSOeS/
+Rwlgaw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {6.150426821111384, 13.782458980118262}, \
+{1, 0}], LineBox[{{6.4999999999976925`, 4.5}, {13.49999999999251, 4.5}}], 
+        PolygonBox[{{10.6, 4.5}, {9.4, 4.1}, {9.4, 4.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 3.5548}, {0, 1}], 
+        LineBox[{{6.5, 4.4999999999976925`}, {6.5, 11.49999999999251}}], 
+        PolygonBox[{{6.5, 7.4}, {6.9, 8.6}, {6.1, 8.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.5548, 8.}, {1, 0}], 
+        LineBox[{{13.5, 4.4999999999976925`}, {13.5, 11.49999999999251}}], 
+        PolygonBox[{{13.5, 8.6}, {13.9, 7.4}, {13.1, 7.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.5548, 8.}, {1, 0}], 
+        LineBox[{{13.500000000001851`, 11.5}, {6.500000000002592, 11.5}}], 
+        PolygonBox[{{9.4, 11.5}, {10.6, 11.9}, {10.6, 11.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 12.4452}, {0, -1}], 
+        {PointSize[0.04], PointBox[{8.5, 16.5}], PointBox[{6.5, 4.5}], 
+         PointBox[{13.5, 4.5}], PointBox[{13.5, 11.5}], 
+         PointBox[{6.5, 11.5}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T5", " ", "P2", " ", "N10"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdfei/fjghgjhiij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdfei/fjghgjhiij.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {0, 44}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwV1gs8lOkeB/BXqDkal+RuYipJoYhFknldhxK2i0gr2zood0qcxBQ5s6qN
+aJtyG1LUii6iosjKkkhkE1ZTcSjkLiTO7/H5pM/381ze/+V93sfKgyE7/72I
+oqhb+Ef+p8TJr5U0NbewsBBnQFNdrnbiDWyaGlS48dIbrkw1Vj8D+8/5dNrD
+0o6CMGuY8TXM1wi2P8bc0adJUw4ft+9fC0d5NHnYwK5tlrar4QdVW+2yNWiK
+p2FjTsblm7qdxGDWrvihTfC2mFzPkBU0leAozLODX1yeePiFRVMqAdFcLziY
+5V0bD6epTAYdh12fn3tkCPs4i0Wkw0qCh3Gz6tjvbkNSBdxc9SmtGx6slejs
+gs/ut2b8Qxz9v9RZWEu+KX4clpj7g6FgiLwlZII0sJ/Dfwxq18JFs9cUPWCe
+c/x1YziGmzqbSca9Dok2wzcPXJbpI/afXWYK+0tML92A+AslG+z04EUiVn0g
+bFz605gq7KTZcSYT9k74ME7Bv5lWupXDg9mXeR8Qj+/tOL1qsv7WUZUquCb2
+rV0xzCvuCCX53VRYZXoSNvic9FMkXHHnhLgZnOY6U7YTPiIqZ7UhHnaJsz2p
+pzn/rYsnLMeOuKoES7RsyG5Cvi/YB9aJwestuUxjmBq+97h3I03VZnN2p6hh
+/zmT1nbYMtAid1AV8QaoLe2CM8SWWTjBySetxIdhkW6cfqkK6vabrzUD+znI
+/zq1ERZWWm3ThPMq11g9UaYpC/fn9lvgDeq2uT4wq6cgdx9sWxF8aA08qD57
+hfTT6VXGSTG45rTq3gxSj65Wn2kl7H8xRawcbmrhrGaQ8RCRqA2uDvY+oQ+r
+VFcHD5B8bT7Jkv0Z9PNA0t+Mp+Lnr8Ml9esmxVDvhM2t0sNw4fnXicRF4pHO
+pog3T+jEnMH82DwnpWhYbumzrn6YUlQ6VQSzdvDLXsGLQ8P3tMC2Ou8flpD3
+tfmKlQimJWVcU2Ft+1TNNrhEXGpVCNzvWKNWDL+Q3fjdEc5VLK8Pghnj3eVr
+YHeNp0bysOuSGD0J+MLV79VZiE+gt2SsEfV9EtG5Whm+Pa69Mhs+m354OQ/1
+cDiiqBMLO2zer/lOEfNnLp4LhJ3aZvaZw8I7rxgBsNKEjLRAgabaxwqPRcOs
+jeqe88tpqq4zVfQ7XHeXOxUOt4tdj3sK8wdONc3K05SZ9vnuKbg75tXLyzB7
+W++sKsl/scetnXDCs79umpP6GA1XaMNzjRo3PeG7C8q9ijD/7WdN0k+v1z5Z
+GmT+/VHuJXjwPJthCatwryQVwR2bDWRD4SqToAuVMK9Z7Vox7L5VxasevmL8
+o8RXOGOMcm6AEztY8xwS/2ix3jNYY1rVOQF+8STXsAweo998eQzTPl7zOfDU
+qTUBfbBgx+eLieT71Nm4dg7299B28YV7dBtypmHmmZJqa/jR1OPMDtjg+OH7
+K+C6P1Tsc5aT97qTGkM93EMCTHbAzQ+iRgphHcsfIkSIj1E0lB8Cs/Pynb1I
+/H/66G2FGfIvtjQso6kCh7WjymT+Ef8LerBD2alSMVjr6Et7vhzGpdnh3zbg
+vVJ4u6leFvV7yLSWxPiDlksJ52UQx0GtAA24vWKdeYg0vquKowftyPkzbbwX
+zsRzd8T0HIMn3JOCc5fCx7/K3CP9Zl1IkYCp9Myz43DNZ/30DCm8H+tE79SQ
+n0A82zAAzht4OUP6udvFTy0YNm6x4LqT/N2C3YUwf0ZhZRg5n53+IbNk/QU/
+VgIc6j9eF479+TZJK5JhlZ+lTOZhwVNZvzRyf3gyE5MRn1nps6tkPCHrR90V
+iP8By2iArC+8UdhzSZrUe18V2b/AqffgJGxR3ixFni90PfpeF/nP9Z6W2kz6
+dTvqphFckd1jT75nWlMdsUtg0V73iQ/Ir+c1/U8e1uv4mk4IyHm5MrSaCdOp
+uyx3wsmJb87QiKfquf5eeZiXv/47F/GaDbr5dW0g39n4yvXIz3vzM7l7MMtX
+WWqcgfcl1Wa7AN7NLIouXIL6W3U6noP931dE/LIYcRdnH74Ay5X1xWpJIn+6
+zDAfbmfWXP4mjv0O9Lg8h+esmwTji3CeT5iUzJD5EZppirDw7/H8TYinkJsR
+6C+GOHKtx8NIv3uVQkYo9M80l1ECp2k5qBXD/NR+40mS37tCqatwzVRmvwrq
+QQfslq6DLS5uMif3sSAk210Z+1VdDJVzgFm6w33/hYVHc0zcSP0igydl8Py8
+awdb9pP51/hnhHAFb30IOc8Wol+0DRC/zocgCXK/yNV27b8DZwQvn6Jh4wF1
+vooE4uVtkF1H7mOjEW9PWKLd4dhS2Gc6JykMjtp6ya6V1PvrgPgeeNqpJDYJ
+pqpWRS0i69ku5jRsIE8HRpPn3RvTm0Z9ah4H21UgHm8Jm6H7MDOrXKcZ8QsS
+Ev6MgX1aM+9XIN/QSLsTLnBy+vxW5QUOZebL4xrAoVGHXJPnOJSIZ5rChlX8
+hKrfZziUwyqlaeIoxzulkV85FDtOgzYktrW5pDjJoUYmW91cSX8fRBiNjHEo
+gW3Zz+R5zetcu1RHOVRoq+ubu6R/yr1BNsMcqv/3yJwR2DtUUrR6iEMl287b
+k34aBPzl0z2A+XsL1I7AI65nm0Nh/mB94F0ybvYmtRHWOaP0+BMZr04P7xrk
+UMYlE0dI/ao+ChuOf+FQvBbuLXVyHlL2brQa4VBCZ70ULdjbp6HCG/HEnHY8
+R+4TkbhHWTziTVvFjNYg/VRoU00Z51DTY/UCWXI+ldIWhU2gHmxnY/I9qDr8
+eVIa+fJVOxTL4ahHuyg32Dsi+yK5L6b9xgu2wA4WlaOGZP5NYX4p1tOSjuV9
+yJf/w7vdNdi/ap/s9Sy4TufvRj8830Dyuts+WMfb4/kNEm+wvqEGTHcHORug
+PmYf4nWH9HEOWqb2JPUjnkvca/Vw8qiaxrmP6AejlnsfZm8v8H/VhX58+3X4
+Nixc+6+QrBbUt7FMWAFTxcyGuqccqsC6LfENMfnhPaam8ffrgj79f5/a5wc=
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.858982998704643, 17.360963007340356}, \
+{0, -1}], LineBox[CompressedData["
+1:eJw11gs4lPkeB/DXbIstO8aMS0kaRUTFxEk5mNe6PJb0TMjOtk5m56iN3C91
+aLK6rOiUmbVCbjunozl0aAcnRCPdJFvbsDYqMko3KhJNa8uc77/nnPd5PP/n
+4//+/r/LO/NiI04M3c6gKOogfshKzelwLaKpDxebpgyGBHbfwdwW9b0aE5ry
+KgoZebeQpuSRbcKdsHxPk+0umDtknugNG0mvBPZZID5kjr0G9gl3HfaENauu
+Wq+HS5bd/bbGnKZEB6WfR8Ibp/SKrGH6+3THE3DHdYWz3Az372YFPof3m11Q
+82DWiiuuoainMX/3xtumNKVOO/FTJxwdZ6iQwqIT+kN+HJraEiCb3QZnP/xH
+yjV4evhqmh8sD014E4h12WHHYD7WDkP+7GWsrsK2rhCsScriL1yRh9d5LSoe
+dmlK31kA31pg1VlK8ollHkMwOzdwUS9MG9xrZaHunkfpnxjj96KfY/odYUO9
+l4YhsPKMbxHx+pGQrMMwHbaCS+5n6Ny152Bq5kr7INZ/y4RfarCq7x//heQr
+tpQba7HK2rur/oS1jXWJ9weZR2lB7HXknS/wqxqD5d4eE6Ewa1jlfIXkK7NN
+7Ue/DUF++STfpPxhfCR8SZuSQM7RqCc2P8G82L5ju24hThlYLNgHT8aXvP+C
+zONUK3c5fPMj6dZexMl33uoexPwv3pNGfAbTcdsldfDj1AH3Wtwnd7fcXgy7
+0u8Pm8Ki15LKMrjabWjkW6wuFi+WtmJlWN1un2Lh/Nrf21/B/LJY/2RYY+Dl
+SSNuunJm3ZwxPM8+8iTseNZE4g0n8armmyLvWMORjn8x0eeuhbkyeJJbqfCE
+k6rPV7BRd9bQ1xPvP4U9rPsL4bSivSljsCbMv90EfYt/eOGog+m8cYtD8JtV
+sUJ3xKu/cVzyBGZwVI1HYZFghXIdns+hIoP/aGFqSXJeIuxn0zeSSOpJd4mU
+kn2beLfncMf+jIlCuCTnXCsP/XArup2yYc8It7AdMCVjWoXClufH66WwcoX1
+AyPyebEf5Z4mbvf+sRH5sxg/5zfASW3yzUHwC8tupYLEG2+t/g395HmpF39H
+/PLira3w6qfu4SEk/tcd64cxD4+nXgod6nEp53y1k3jlNwxPOFsvQ/IH5mmZ
+uW1TOOnnoWlqBbysLaxmE+bBsh1IJt8nhf1ZyVojzKep/84SuCg91dFwAeZ3
+2cCMQeJ5+cqBT3A+v3wveR8cKh31rzPEfpWb/yI45e330/kGyFe6OycYTlC4
+r8vRxzxu8/58HL59f39R6cdwVEXka9jaZyKqdx7mX9/CEKPetMzkiLWwYLtI
+OggftR89oPoI89V6jPwF/bJby03SYdl48FENXM486C+EuWtUZlGYV+vf+dnR
+sCA52KUP7mQvjzoOs3za3nhg3szK3PFRcn9srw15fmyqdDAY+ZQ9B9xvwu+s
+Tj65CHNnvOun4ELjPYu9UW+2qsdiDp5Hferb/DGZXw5nAq6ceh1ki/5E918l
+dsJNk+JTElhzbSUnBw4YO1DdAgt+uvvUBT7SM/agB1brcy51o74Cm9PiyyR+
+wNlJCKc19I7nwXR884b76G9g1t7qw/lGweFi+MbmmMwC5Fc2LtI+w3w0dseS
++lGvaFv0nkw4MMCJp0V/9M0zXQvhM5Mb8rQM8v60C7hOnrfCUj6sh31twQEp
+eR5pzdXNFPaNtNwEuNx2NdNEx6dE+inNO+Au/8LBpnd8isq/qsog74fPX8yk
+zPKpyedOuQq4+pG8IuItn6Ib2zeNw3HCG+LkN9hnLvbxR/7yBEWaeppPdejv
+OqWE/fItTbJe86kk9j69leT51Q1x9k/BlbYba2DTI3dOD75CfMsl21WYR61y
+tasM5goKmLXkPZbhTxfDrAWOdcvJ9+u3+hvPYFpWojsGR/vWFEhw3mShtPgx
+zHr0Va4P8skVXt0r8XdHlHoh0wH1yMPOD4TDVZ85dCydQb/uW5g74PXeullT
+1C+PFfwaCbeYuo3OwCy7fY0b4GnfJtN6LfZ/WCX88HmICbq6Dv0rnUfS6+C/
+8fdKMuBsoeRMEBy51PGfCfDkubUxd0n9yV/+zoRdLlAnv4ajWx0eR+A8pVFT
+wyP0bxiT/2MA8tGqGYs42KjL3OEB6pX1nXWbxfxEGtUyHvpRz79jfhxeaN6V
+5Y3+1cYpfB9Y8NeEOeeXqNfaIpkBd62xCCh7hnrGYnLu4fm8vXH22cgozjtc
+EfoLcWNtgYMG9ZRtOUb2KR9xn30/6p2v6ibxHboSjtVNxMc5ZZP3PjUWrGO2
+8SnNczuzEs7//i/4/2VK/xeQhO8n
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.131120426728658, 3.8093655474725483}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20., 17.}, {13.500000000001819`, 11.5}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.09538441690569, 14.704079264670717}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJwl2Hs81Nn/B/BRakWKcktyzyXKuGTJpdmoXEq+7bqXJre1LZqVJCQUi1ym
+yKXEqJYpbEjMlkpRCIWshtRSKpWEtfEV9vd6/77++Tye8zlzzvv9/pzPOWeo
++Rzc7b+AwWAsEWEw6Pq/PzXW/19imSwG8+XvL5xgfbvH5YnwkOvF6EJYoUst
+mNzW9XFiFG4WsZuKgRulV/pvUmcxljbx9nFgP36b7nF4cm/ZCi9YadTq403Y
+b/5Ox2bYVmdD40eY35x/WQXOKq11k9JgMZxfvi2bMmAxWInOr7RhvsKV2lI4
+9qqLjRHME59I8YYnfYrmDWDVLz5uK+Gk46tM1eGBU2Mm7RtYDDGjxPPisM68
+xWw6XL/C14vGc59ZqOEFXz5xXaQJFqT+dMEY7nff4MmDAzOTHqyCA2ucdkbC
+zu5ZDsvgHy7O33KDk2QcdaThZskiLwuYIalXogZPbrHM0oYrqgP8reGl0wd8
+lGGOqk6gP7xnzSlrNWrP3mGSBSvJs8UNYa6kz6cmOOKK5GIn2E4z8OgcjW//
+T9sRWOxWeokh8ou2vOBZTk6Xdd8Pu5f7yX+ChZqul5LhrGMBIybItyNPer4E
+HnpxZm881UvO0uMmzJn6g98F57IFFnfhsYWiw+qayC/9XvcNuE5Dx5QDs5OV
+FhfAMmYXumphu6en/SOovRrDdgrmKl7YuA0eERc5or8W+er97rIEFtz5QegC
+M7fXr2tE/PkR/oGhcH1tUNxROKy7rSkO5n0dPaBP+U/MWJyk+5+fyA2sR149
+HaWRMEdTvjQHzn/unhVA/T/6W8kV7ihd98Uebi5tllCGg5p9LbVpvJJA3rg+
+6v9XsLIIzG9QCu2Cma+WxvQh3orUxtB78I7le21q4Nx7Yq/vwLZN8WY58HCB
+8a5H5OjOt8cpX42erFdw7k2lI6GU7+u/xxZhvIjiO9lUH845UTkjuDvpsk8U
+zOsU2PnB0e8DPDLh+kTF+Dx4x2tFFwEsVbbv7GN4SH5d2nvYTCnbjUHzJ1OR
+txbxSrmbN+nBmu/bLh+A2c4Nhk5wd5bHlhrKP9vHheZP1oRv+yItFmOazTx2
+EBaUhP3kCg/EJGT/DFf039T/Deb6+Fp7wLneh20/w+xD9g/N4A5PSwUjbeRr
+vIkpQe+HXeiBn2GBpLp6F9VbdltYHjz9s1VnBmynO/z1Jpw7dPztNljBrd/3
+CSz8zWXvDNWbdaWqBxYb8vYuh0UNE850wmPMKXlfqn+7qP09uH5JeLYy3Chu
+UlICO5usKnilx2LMFg5MJMK8s2FJlXC/idGj/XCztLx2GhzI+3uBBcU33FUW
+Drepav0qC5vJPygIgQVqecxJ5Jd0uqc9DLY03vlbL6waIOaRBPNue5s2w/Xq
+IYISONdZtuEeOX5nRweNXxZb1AQz74dJiCC+fL+mtD5YQRgTtREWHJ3izVB/
+9aFzB8hdrbu0Mb5U+CS7AA7TDP9lH8WzRJnbBu8ZV3Aqovg7ltVMwEmbrao/
+wPw6J59lqJ+tj5mMuQ7WI1vHkjUwf0CPlwwzCzhGKjSfOpcf7IUHWiv3rKD5
+3ipdtFYXz5NXYTSF/iyvxp34GebcUgl7DAf+mVLFh8UMA1LyqN4qMt8+h90l
+ZsI94X5f50KRdbgf4nRzJc3/rDap1eS5dJNm5K/vsup7bViYfU0kiuo1k9Kl
+BSv8cXq3AT2Pu5/OKcIDG9duHca1v4vjIIor82D4bT59zgyae4Px7DK43x2C
+h7Lnje9TPHe+9NrDmgXtVedh/rDV9HpYtC6EfRiOVRP1V4Xd2bpquymfYi1T
+Nfp+T0+VCSxVU9FuQHGNXExRgXWSuYMOcHeTe40MrGpfdYoDxy66dV+Wvi8p
+2F8ANzpo8zVgoVArsxPeMxp+xxqeHsxY+g3NH2a1IIDGl/v3ggUc29PLP6dL
+68tj9SB4sjJEopfqPT7KPwuXZQX1qaAf9kj12RtwxVxicRAsqPjxYQtsopp9
+ow6eNhu/SvOpI/SqpiSudu4/etB9qW9UlnrRvEs9knedvl//7tIlXJ3fa73L
+wDXMxyVgiD6vaQjaR+0S8w1W03PN/GFSAxZdfNZ9G61Dey06/8I4fBXfVj94
+rFyj4SzMGv5GOpzuR/Gf2sFhHAO3SJgX6c2cRR71VpPBobDZrTULr9Nz8Ku+
+vY/aP4l04MBJ7Uc22sLuW/dWm8IsxUYjdZhTnhgtBo9cW+o3S/NCucz5Heal
+3XlmyZ8w93CMRTcctObKmwq4XqQk5wndd9YZ48JMUS8JmsfRGiFeETDD9Hbq
+Z3hPiTj7JzipsidEmp7jXOEdf6qHT0K4JT0Xxfkr9F5zGzy/BMNhObqCk7BQ
+fPnYRXhPvNhzeo8H5N+ZC+G6F1L7n5FXbCoWR/62OWNz0oif/Y+O3rfwyPaG
+PheYW5Aj5gVLCSTKeTCjLvUDzVdhxu6nn+k9LXVYHAu3jYqGs/De8XxvMGPg
+MZfpq7QOSq3/NBIM6ywS5vXBgrAfQ3fBfruqC5WxjgpDzK9qwM3yUwdp3Y09
+XKMxgvjyNdUMk+GkjDFGKTx5dTizDFaVX97vQ/F35Ly+DyssaCmWo/pzXi5r
+gxmJeQktqBf7v3x+M6yzOoofAw9bTgz8QeeE0pUatI7UO304XET9pdg8/Ip1
+pjtdvyAOdvaYmm2G8y/IftpD+4zWZPlFWqd2ZBqZwryHcpoptM5/ZLhL0T7y
+asP8cVqnv2myGKV133Sz9km4v/1kGu0LdqUnnp2lfSAlvuwuHJvNLLgOM8aX
+p9TSvn3kl0PP4eqJzadvrad6PuwUR3yqM8yzbVSvuIQ/rWGl2jsPP9D3946z
+w+i+g3KVLNVrnZ4NH479GG+7g+pVI8V+BodNnexNhbk3Vj2bp/vBl3f9CfMv
+7dBWonVH+Z26Bs4d7NFkp/Vwqtu21EMGdB4tfsWEA0/7Xm6AFUwVNLTgM2bv
+bcRwzrTbv3+BJCy+Ke+2HswIqdZ6i/4n9l1d7AjX3xUOVsFbfhlU9Kdz8JdS
+1cNws63Mt0dhAUf6ewP4/urKV3QO7iiM3jmE/DUdiv5Jg3mrM9fmwC8LrM6l
+wzoCnoQj7Zvmlo7J8HTgXfWF8MyrynY6N3c8u+xxH/tMvkSoNp2b6//z79ZT
+sPfCbWe84YgMPVE2POl6Poji40b2KG2B294G6pjReMu6fzGCxSJUzbVg4WFF
+Y0N4dnu6iDw8/PpAvxUsGE+6LwEHBjywcIODbtmfWkT56LvFRsHzvzH1ydz/
+6vyHD/f55ulT+4rS0A+0L0aqshqpv+amtSwpxO93IUm4jtrf+FdjKzxwu2XO
+BlbQsQsOh73j0qJ9YM4aR1XaF4dWnPRMoHiXF2XehxP33gwopfqaHzothLmN
+UXZPKd53qw8NwgFGa7lfYbZjy8Z+Omc4ybeoG6JdluqvNL+nE96d2g5L2du0
+FMOPQkcyAuGxGNFlEbDRUodbJ2H2bPISa7jvTTXzPMxMY8zRvq5szfIshXlz
+wecq4f7Ka2PVcO63Iq/94Fzp8fla2KwxQUQBrps+M0j3+as71B/jXDa6aPOW
+MkOaz9JOKbDSYc7yQopHfsHmXfDsh8ecdHj4XJ2NCiw0viuIovY24yqzOAdG
+H3/5PcU7Ldv/5S2slGVa6wI7C5dZDcALHJc4bYUDJ+qr3sGTV+QCzWCW7EgA
+fZ/xcpMuk/rvXdaghP7PJDOj1lM+5xcUboOTFHUXGFK9Fn3yOgJ7H2uRsYDr
+RedEy+Bq88+1jtTe2zNskPJ5EVrgQ+0vRkbKIN/owQ/6xyle2bFFNN8qzFhx
+PNh9zT37H2l+rq059gDu6A8ciIOrrj3vGYGTnFvfZ8AOdQINWSOMt61YnQtb
+3wj6bAknjXtMUvszmT6tPrDCOZtof/jxNdP9CTA/1CnFAlaPDjlxiRzTlk3n
+3r55pmUdLCyUq3hAvxv6tvc+hsWu97JjqL7Xuyb74AHT3VwjOF6ZFTkAxzYv
+9H5D9fy6s+QvWEqxaiaPzv19okt6qT+DE7Hfw+f2doe1w9MLrdpk4LJ+rfnb
+8HBlvMcAfjddfDc6XErxCJ5oCOA7rT15uXBFenXaBXjm5bOTFH/F+eRdp2Ej
+uZWrw2C7OE5IJryJ1y7whzsmVlpegh0CQrO8YB5Ld99dWCo56JornBthP/QG
+9uzPaXGj/F7ucqV4XikPue2jemVJvtgOX24vjAmmeA2fso/R75bXlcvjyUdl
+KiupfaswNR92T7EpG4SnK7rWU/2S4sYDxFEfboj6B6oH+4Sjsy48uX8qYbEx
+4nurt9sSblycU7QBljq+4eN3VM+RXx+5wmMP4r4zh6tOlKQdo/tRyevV4R3l
+dslFxvS7pN1ijuYrJyLmHszvXVPcCv/eyWX3w9MR1rYZcNJrV59xOOLLX2EO
+mv/7vwPDBPf/xZ8G6/8Akdv9Zw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.717657384322742, 15.863036082896215}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJwt1gs01HkbB/D/jq2Q61Q2hgzZdhXFFFZk/y5dFGLXuxFpXpeEaHRy2XKr
+M4vYLLFuLU2ivFKy4gjbzpa2qDQubchl4i3RSm8ql43e77Nn5xxnzuf8Ls/3
+ef7/OYeB/8GvgjgMwyTjj76Z9x/wWc0yf3+4LFOcqLTaYQ3LSAe8ttrDfjqe
+tidg92WxluGwrXGAeSfMH/45+xh8pdb1qZ4J3NCgFw/7c1xNgmGzoEf5e2FB
+cPFoJcya+7Ybw1Lt25+O035ru+x+TZbpeOe2cpUpy8jzjPLi4YW5n0R+A2du
+aQhShT0FGTNxMLNCJMjSYJkEwXK1Ajip1qpKFY6YsY+oIFctqVNXZ5m+6MDt
+1bBQQ1yopAZ3ldlfJjdOfuCq4t7iUJ8S8lWBlYUKy3zeGvc+g86bn0iPXcwy
+FdY+3VGUx3LXi2Fllmkudxn0IidqnImDRbOvjTfCksgfNbfApxZbDvPIbwWV
+9nBvaoQ5A0ttm29HwENav+mPol/pzKmaVjhCMz+1G066dandHfXq9qzgyMhH
+027PwgmNqffJTOkbqRT5ulL6Wx7DEo+UGwXIv33976H/I3PcFOPQX6/j3RpN
+qvfywoE96L/VzfQLW5idzh/VxnwyZb76Isq3tbzlCFzMHzKtpP5r/np5Dz4/
+vavjJSxKszupgnlnKr2ysFzLMjKx52lLOPRq584kmD25a3IbnFufM9sKv9K0
+CXGA17bdVV66Dnn1Vz0yhO0K3wV5w2YKHP0XuN/t+rnlBbCIZ2pQBO/TVAhr
+h+VjNeU28KaUpG8ZM7wPtjdO5yD/lE2exxI4abBWUoj+5pJfjPFhtreh6xT6
+19w8amwMyy06N6VgPoG8wDUmMMMfVzqO+RXe2ue4ms5zSlaexLyf5jXNrCTH
+NLVUK7GMxWPvj3WoXkG76bQi5s0d+FKV1sMn9IJhN995lznkS/Icb1KAc1uO
+pA+so/fXw6V9EctM78zfJ6X8Qxxl8p0/nRXKYKmh1UoO9jcVxoZk0DzSeb/8
+G/bUOxORQPuzn3NfwH2tsSXRMH+pXnke8jwvyrCLpXopHd/vRd7fG3Zqi2n9
+zu5qa/Tz2ntTUSHdd7Nusy76FVunNDf+7Wn+HFyyeKv2CCyx9zDpwHwU/Uz6
+qR+hi9/9LMwvIsRNQPMRGu7ZsR7zLeo2kLrSvLyWrKmCS0da8yNpnuLz8R/g
+MEOnulw4MytLXQPPZ3nZZwuaYNkZ9chF8NeSBSI53ddRef4u9uely8Y45vDN
+//h4wZnHn8Ubwkz/3rF61B/b7ehuByeV7FCdRL58+cEr/4Llw01L1ODVfz3g
+7Yelt+/ncNHPdD3HKYruy+lbqoz+jc/xuPG0/oPD2XnMKzk2+0Iirb/fv28W
+83RIfeZL6xKPfKdF8MWAiV+iaf/8WPBaPJ93sUbiA5Sn9uJIzEKWWb//bcZe
+qt+7PHJsAfKczu91p/0X1T5Khy9oVETZw/y4uCpf+HSZYrSA1p3bMoSwy6rg
+cSOqV3pW8iOsfEBpQBtmh2zl03CxupEZl/pN3u3/HeolxrmVq9F922ZTNyDP
+0ddhg+qUf4uW8zxsflZoq0X7c/wSe5A/xvjhhAHdP5Dg3oR+/7C0eE31hbbT
+mT/h/RAenFdwpnqmzmYizKdZ4nslgFw1W2KK+d3tnPI4Tvfd2LD1Hlzf+pt2
+KfXLr/vVCfP+xvvoJ3coj47IPgte1pfnOE77rXNkl+DmAq00rgCW/xCaD3dU
+Dj60hBltG54H/HOBia43LHXwed+D+4UW4uBYWPgoQd8K/nTq4ZNs8jAvIAL5
+li3d3l8B81NqN6Qgf44o5HETnW/LcUhDf3emPE61UL1tbvxj6N8pTToho3r1
+3U+iMJ/AXJl2JyxP8K0+hHleLwgJp3W2RifwGOY9uTnsCJ0XCrq4Fz/G771Z
+OncdlvRNXptSwLmKgp5qslX403B4tkhH5RzZ9VYYF/7vg5FSyivv5tk857DM
+28ipa2LKY++68RW8WWbgG0P5/Q99aYz9e0Qj6Qdov5GhbiY8+PXw2iDKo/Lm
+uj7qa4V5LfSn/B+G9rfDumWbLgRQv4F+b35C3jdeuodDKW+Q3ppv0c+vZz8q
+iKY8GSaf+aJfccIlpVSqV2nVaIN5bHvLPV5M+61u9atiXpd1jE5co/XDM9wW
+uPHyvahuqleYLAvEfKVzz6JmyRmVj3rgns4nuSvW0+8j+5ghnkfMwaYHjrB0
+0ePZjXCRzcTiEJg9NB5mAO/a0WZ5klwfrPIHzmcljW+pov03H/B94Ll1as5t
+tH740tBV1P980jB0lNa7FDxHFf/5P2LDP9+K7P8BYjjyQQ==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.244066109927797, 2.1624198096871057}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwl1As0VHkcB/C7GK9UI+9kPBKWjDmtY8lWN6tJKcZ7KYzyWsVMraWHneRU
+O9HLFkuJqSMNveaIkESxXituYjwqREpHSVJhyX7v7j1nzv98zr3/3//3/d2Z
+Md0h8I5QIAhiNz70+v+1lCTU6dWSJMgc6V8NBnCX1N8b5hXyWLdh5jo9uRSW
+uQSH1cH3jTM2z8PjpJboHzgkU/ewlxVJUFNXZ/1Q77PmwbQLtDtCLNrgGbaA
+6IVJhqU335Akzo31r1L/FvXf9fK+WYb6hvuDrWFhJzkhhe8IdlU7wcl7g85v
+NcL6sUDqCEuixc+H4fCDtfFWtBuyDH5mkUSk02j8Apjpra5AwZMn7Zpf4rxx
+ea6ujjH2C26sKod56WWz9nBJ1r2W4zB/iiplwzHdjI5gWJhTeEsRdlxXvd0R
+Tq5beKMM9dbujdE0gmvsa8Q8OCXI7csi+v6RUHkn+lm0z20Nk873wDOKBztY
+nNE3g4k3CZVNyLO5v0fmCnM0hiLdYZemUaNEWFa/IqEP8zC775lQRvdzlPs0
+FW6ZDhlToPNYX37rD5v7FjH8YX7Z6BwXVuf2VV+HTYx6DIJhbuOxYQVr1P/6
+cSALvivKdPOFZcuKTn+BdTv8VS/CyZmrbeJx/myPgOqBybf57Sro1z9UebGq
+Dc7b+Cu7CObUHmJZwGS3z5QX8vq6uvK/g/nhlemf4PIlj7gcmBO3QZKGeUn2
+bfNgwbL1VDvDhCT6blIv51F/gF3v+j08tp7j0g0LM08eC4DrRz3tr8HjeyYX
+R8Bbrqq8SIJH8sbFofAdYWuKF6zq7tC2EW7RUje3haUfLEaMYTkRG6wF80Qz
+1Z04v2hNmqEKnW/qHCcQZkcECdTp+6ntmk/o91eQt5sF8yXNY1vgOCJW/0d6
+XuWvvCnkPV/eHJ0IM183sSPhnBNn/Sro/XdUN+rC+gt+mWYgn9BmtPQV5ndg
+0/uaQNpta8RP4UXSlHwZfKZVdPAzrPFJJ0Z5JfJTGS8csH+yrPiNP5y8f/Ba
+NpyfxPTKhXlJ73IM0E8BuzisB+bUnb14C054JrnCsMXzXBeOD/JMKMb8aQrL
+To/PzMBfGV13V8KNcWm3PDCPZ1ta8i1hpvJcahacqvr4gxZcMy0bksOvcntt
+JlFfbJHhpmyK7xuhculvmIpKdTaH10qHbel+pH8MBtrBrfXlXwVwtPbgXktY
+VbvIfQNs1d+VuhD2dSS1zeCsgOzmIdQv9ojtU4NNnOO234BP8H1/m8c8pI1X
+HONg1+TIISX6fo/esDX8cGuNgiHM3OYdQCGPdkNT1XpYqDad5QdTD5a8SaSf
+Dz8cNoZ5xL/2CKmk51mixL0Mmyxda6yGfJKdRssT6XkFuR8Lhvlel6uE8JTO
+o8Ml8MCRiKNn6OejzOVqbMwzqfe3TvjAIfGOQHigw9jjB5w3GGMcnkebHZVY
+DVucN7ndDfM0l3fZoF+uiPVZwQ55yy5Ziej+KfvGZbD+phMzj+F7spttK+CR
+jn6RGebjQJXUsuBolrvRLriAlPLVaBvLq67CU/wR9xHUtzLfuaATnphoG7kP
+i/MfF47DYwFXTNPh7nmf7dOwo/Oc5U44Wn7c4D084pTNcYKF1/U1nsDm7dp2
+enDWkopDdP2f0kszCFhaN1opgNW1hEZTmEf03O1W+v2GO93MnocpqmzzW/Rf
+kJLfS+8fXz05W0j//hL1JSQsqajMjYWVSgUX98GqoxNiZ3iiqv5UFd3P85hY
+PVjkdTdYA/ncpJ1LleCSplM+YTDz3gpPRZi153e/crhcce0FHdipoeWsMgfv
+xb86cDXcvyev2xbmPxRXCOj9VkomPA79/77uaTEcWtv7Yhf834X+GViSOeS/
+Rwlgaw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {6.372684128093524, 13.593276950937812}, \
+{1, 0}], LineBox[{{6.4999999999976925`, 4.5}, {13.49999999999251, 4.5}}], 
+        PolygonBox[{{9.4, 4.5}, {10.6, 4.1}, {10.6, 4.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 3.5548}, {0, 1}], 
+        LineBox[{{6.5, 4.4999999999976925`}, {6.5, 11.49999999999251}}], 
+        PolygonBox[{{6.5, 8.6}, {6.9, 7.4}, {6.1, 7.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.5548, 8.}, {1, 0}], 
+        LineBox[{{13.5, 11.500000000002307`}, {13.5, 4.499999999998607}}], 
+        PolygonBox[{{13.5, 7.4}, {13.1, 8.6}, {13.9, 8.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.4452, 8.}, {-1, 0}], 
+        LineBox[{{13.500000000001851`, 11.5}, {6.500000000002592, 11.5}}], 
+        PolygonBox[{{10.6, 11.5}, {9.4, 11.9}, {9.4, 11.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 12.4452}, {0, -1}], 
+        {PointSize[0.04], PointBox[{8.5, 16.5}], PointBox[{6.5, 4.5}], 
+         PointBox[{13.5, 11.5}], PointBox[{13.5, 4.5}], 
+         PointBox[{6.5, 11.5}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T6", " ", "P1", " ", "N11"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdfei/fjgigjhihj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdfei/fjgigjhihj.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {22, 44}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwV1gs8lOkeB/BXqDkal+RuYipJoYhFknldhxK2i0gr2zood0qcxBQ5s6qN
+aJtyG1LUii6iosjKkkhkE1ZTcSjkLiTO7/H5pM/381ze/+V93sfKgyE7/72I
+oqhb+Ef+p8TJr5U0NbewsBBnQFNdrnbiDWyaGlS48dIbrkw1Vj8D+8/5dNrD
+0o6CMGuY8TXM1wi2P8bc0adJUw4ft+9fC0d5NHnYwK5tlrar4QdVW+2yNWiK
+p2FjTsblm7qdxGDWrvihTfC2mFzPkBU0leAozLODX1yeePiFRVMqAdFcLziY
+5V0bD6epTAYdh12fn3tkCPs4i0Wkw0qCh3Gz6tjvbkNSBdxc9SmtGx6slejs
+gs/ut2b8Qxz9v9RZWEu+KX4clpj7g6FgiLwlZII0sJ/Dfwxq18JFs9cUPWCe
+c/x1YziGmzqbSca9Dok2wzcPXJbpI/afXWYK+0tML92A+AslG+z04EUiVn0g
+bFz605gq7KTZcSYT9k74ME7Bv5lWupXDg9mXeR8Qj+/tOL1qsv7WUZUquCb2
+rV0xzCvuCCX53VRYZXoSNvic9FMkXHHnhLgZnOY6U7YTPiIqZ7UhHnaJsz2p
+pzn/rYsnLMeOuKoES7RsyG5Cvi/YB9aJwestuUxjmBq+97h3I03VZnN2p6hh
+/zmT1nbYMtAid1AV8QaoLe2CM8SWWTjBySetxIdhkW6cfqkK6vabrzUD+znI
+/zq1ERZWWm3ThPMq11g9UaYpC/fn9lvgDeq2uT4wq6cgdx9sWxF8aA08qD57
+hfTT6VXGSTG45rTq3gxSj65Wn2kl7H8xRawcbmrhrGaQ8RCRqA2uDvY+oQ+r
+VFcHD5B8bT7Jkv0Z9PNA0t+Mp+Lnr8Ml9esmxVDvhM2t0sNw4fnXicRF4pHO
+pog3T+jEnMH82DwnpWhYbumzrn6YUlQ6VQSzdvDLXsGLQ8P3tMC2Ou8flpD3
+tfmKlQimJWVcU2Ft+1TNNrhEXGpVCNzvWKNWDL+Q3fjdEc5VLK8Pghnj3eVr
+YHeNp0bysOuSGD0J+MLV79VZiE+gt2SsEfV9EtG5Whm+Pa69Mhs+m354OQ/1
+cDiiqBMLO2zer/lOEfNnLp4LhJ3aZvaZw8I7rxgBsNKEjLRAgabaxwqPRcOs
+jeqe88tpqq4zVfQ7XHeXOxUOt4tdj3sK8wdONc3K05SZ9vnuKbg75tXLyzB7
+W++sKsl/scetnXDCs79umpP6GA1XaMNzjRo3PeG7C8q9ijD/7WdN0k+v1z5Z
+GmT+/VHuJXjwPJthCatwryQVwR2bDWRD4SqToAuVMK9Z7Vox7L5VxasevmL8
+o8RXOGOMcm6AEztY8xwS/2ix3jNYY1rVOQF+8STXsAweo998eQzTPl7zOfDU
+qTUBfbBgx+eLieT71Nm4dg7299B28YV7dBtypmHmmZJqa/jR1OPMDtjg+OH7
+K+C6P1Tsc5aT97qTGkM93EMCTHbAzQ+iRgphHcsfIkSIj1E0lB8Cs/Pynb1I
+/H/66G2FGfIvtjQso6kCh7WjymT+Ef8LerBD2alSMVjr6Et7vhzGpdnh3zbg
+vVJ4u6leFvV7yLSWxPiDlksJ52UQx0GtAA24vWKdeYg0vquKowftyPkzbbwX
+zsRzd8T0HIMn3JOCc5fCx7/K3CP9Zl1IkYCp9Myz43DNZ/30DCm8H+tE79SQ
+n0A82zAAzht4OUP6udvFTy0YNm6x4LqT/N2C3YUwf0ZhZRg5n53+IbNk/QU/
+VgIc6j9eF479+TZJK5JhlZ+lTOZhwVNZvzRyf3gyE5MRn1nps6tkPCHrR90V
+iP8By2iArC+8UdhzSZrUe18V2b/AqffgJGxR3ixFni90PfpeF/nP9Z6W2kz6
+dTvqphFckd1jT75nWlMdsUtg0V73iQ/Ir+c1/U8e1uv4mk4IyHm5MrSaCdOp
+uyx3wsmJb87QiKfquf5eeZiXv/47F/GaDbr5dW0g39n4yvXIz3vzM7l7MMtX
+WWqcgfcl1Wa7AN7NLIouXIL6W3U6noP931dE/LIYcRdnH74Ay5X1xWpJIn+6
+zDAfbmfWXP4mjv0O9Lg8h+esmwTji3CeT5iUzJD5EZppirDw7/H8TYinkJsR
+6C+GOHKtx8NIv3uVQkYo9M80l1ECp2k5qBXD/NR+40mS37tCqatwzVRmvwrq
+QQfslq6DLS5uMif3sSAk210Z+1VdDJVzgFm6w33/hYVHc0zcSP0igydl8Py8
+awdb9pP51/hnhHAFb30IOc8Wol+0DRC/zocgCXK/yNV27b8DZwQvn6Jh4wF1
+vooE4uVtkF1H7mOjEW9PWKLd4dhS2Gc6JykMjtp6ya6V1PvrgPgeeNqpJDYJ
+pqpWRS0i69ku5jRsIE8HRpPn3RvTm0Z9ah4H21UgHm8Jm6H7MDOrXKcZ8QsS
+Ev6MgX1aM+9XIN/QSLsTLnBy+vxW5QUOZebL4xrAoVGHXJPnOJSIZ5rChlX8
+hKrfZziUwyqlaeIoxzulkV85FDtOgzYktrW5pDjJoUYmW91cSX8fRBiNjHEo
+gW3Zz+R5zetcu1RHOVRoq+ubu6R/yr1BNsMcqv/3yJwR2DtUUrR6iEMl287b
+k34aBPzl0z2A+XsL1I7AI65nm0Nh/mB94F0ybvYmtRHWOaP0+BMZr04P7xrk
+UMYlE0dI/ao+ChuOf+FQvBbuLXVyHlL2brQa4VBCZ70ULdjbp6HCG/HEnHY8
+R+4TkbhHWTziTVvFjNYg/VRoU00Z51DTY/UCWXI+ldIWhU2gHmxnY/I9qDr8
+eVIa+fJVOxTL4ahHuyg32Dsi+yK5L6b9xgu2wA4WlaOGZP5NYX4p1tOSjuV9
+yJf/w7vdNdi/ap/s9Sy4TufvRj8830Dyuts+WMfb4/kNEm+wvqEGTHcHORug
+PmYf4nWH9HEOWqb2JPUjnkvca/Vw8qiaxrmP6AejlnsfZm8v8H/VhX58+3X4
+Nixc+6+QrBbUt7FMWAFTxcyGuqccqsC6LfENMfnhPaam8ffrgj79f5/a5wc=
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.858982998704643, 17.360963007340356}, \
+{0, -1}], LineBox[CompressedData["
+1:eJw11gs4lPkeB/DXbIstO8aMS0kaRUTFxEk5mNe6PJb0TMjOtk5m56iN3C91
+aLK6rOiUmbVCbjunozl0aAcnRCPdJFvbsDYqMko3KhJNa8uc77/nnPd5PP/n
+4//+/r/LO/NiI04M3c6gKOogfshKzelwLaKpDxebpgyGBHbfwdwW9b0aE5ry
+KgoZebeQpuSRbcKdsHxPk+0umDtknugNG0mvBPZZID5kjr0G9gl3HfaENauu
+Wq+HS5bd/bbGnKZEB6WfR8Ibp/SKrGH6+3THE3DHdYWz3Az372YFPof3m11Q
+82DWiiuuoainMX/3xtumNKVOO/FTJxwdZ6iQwqIT+kN+HJraEiCb3QZnP/xH
+yjV4evhqmh8sD014E4h12WHHYD7WDkP+7GWsrsK2rhCsScriL1yRh9d5LSoe
+dmlK31kA31pg1VlK8ollHkMwOzdwUS9MG9xrZaHunkfpnxjj96KfY/odYUO9
+l4YhsPKMbxHx+pGQrMMwHbaCS+5n6Ny152Bq5kr7INZ/y4RfarCq7x//heQr
+tpQba7HK2rur/oS1jXWJ9weZR2lB7HXknS/wqxqD5d4eE6Ewa1jlfIXkK7NN
+7Ue/DUF++STfpPxhfCR8SZuSQM7RqCc2P8G82L5ju24hThlYLNgHT8aXvP+C
+zONUK3c5fPMj6dZexMl33uoexPwv3pNGfAbTcdsldfDj1AH3Wtwnd7fcXgy7
+0u8Pm8Ki15LKMrjabWjkW6wuFi+WtmJlWN1un2Lh/Nrf21/B/LJY/2RYY+Dl
+SSNuunJm3ZwxPM8+8iTseNZE4g0n8armmyLvWMORjn8x0eeuhbkyeJJbqfCE
+k6rPV7BRd9bQ1xPvP4U9rPsL4bSivSljsCbMv90EfYt/eOGog+m8cYtD8JtV
+sUJ3xKu/cVzyBGZwVI1HYZFghXIdns+hIoP/aGFqSXJeIuxn0zeSSOpJd4mU
+kn2beLfncMf+jIlCuCTnXCsP/XArup2yYc8It7AdMCVjWoXClufH66WwcoX1
+AyPyebEf5Z4mbvf+sRH5sxg/5zfASW3yzUHwC8tupYLEG2+t/g395HmpF39H
+/PLira3w6qfu4SEk/tcd64cxD4+nXgod6nEp53y1k3jlNwxPOFsvQ/IH5mmZ
+uW1TOOnnoWlqBbysLaxmE+bBsh1IJt8nhf1ZyVojzKep/84SuCg91dFwAeZ3
+2cCMQeJ5+cqBT3A+v3wveR8cKh31rzPEfpWb/yI45e330/kGyFe6OycYTlC4
+r8vRxzxu8/58HL59f39R6cdwVEXka9jaZyKqdx7mX9/CEKPetMzkiLWwYLtI
+OggftR89oPoI89V6jPwF/bJby03SYdl48FENXM486C+EuWtUZlGYV+vf+dnR
+sCA52KUP7mQvjzoOs3za3nhg3szK3PFRcn9srw15fmyqdDAY+ZQ9B9xvwu+s
+Tj65CHNnvOun4ELjPYu9UW+2qsdiDp5Hferb/DGZXw5nAq6ceh1ki/5E918l
+dsJNk+JTElhzbSUnBw4YO1DdAgt+uvvUBT7SM/agB1brcy51o74Cm9PiyyR+
+wNlJCKc19I7nwXR884b76G9g1t7qw/lGweFi+MbmmMwC5Fc2LtI+w3w0dseS
++lGvaFv0nkw4MMCJp0V/9M0zXQvhM5Mb8rQM8v60C7hOnrfCUj6sh31twQEp
+eR5pzdXNFPaNtNwEuNx2NdNEx6dE+inNO+Au/8LBpnd8isq/qsog74fPX8yk
+zPKpyedOuQq4+pG8IuItn6Ib2zeNw3HCG+LkN9hnLvbxR/7yBEWaeppPdejv
+OqWE/fItTbJe86kk9j69leT51Q1x9k/BlbYba2DTI3dOD75CfMsl21WYR61y
+tasM5goKmLXkPZbhTxfDrAWOdcvJ9+u3+hvPYFpWojsGR/vWFEhw3mShtPgx
+zHr0Va4P8skVXt0r8XdHlHoh0wH1yMPOD4TDVZ85dCydQb/uW5g74PXeullT
+1C+PFfwaCbeYuo3OwCy7fY0b4GnfJtN6LfZ/WCX88HmICbq6Dv0rnUfS6+C/
+8fdKMuBsoeRMEBy51PGfCfDkubUxd0n9yV/+zoRdLlAnv4ajWx0eR+A8pVFT
+wyP0bxiT/2MA8tGqGYs42KjL3OEB6pX1nXWbxfxEGtUyHvpRz79jfhxeaN6V
+5Y3+1cYpfB9Y8NeEOeeXqNfaIpkBd62xCCh7hnrGYnLu4fm8vXH22cgozjtc
+EfoLcWNtgYMG9ZRtOUb2KR9xn30/6p2v6ibxHboSjtVNxMc5ZZP3PjUWrGO2
+8SnNczuzEs7//i/4/2VK/xeQhO8n
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.131120426728658, 3.8093655474725483}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20., 17.}, {13.500000000001819`, 11.5}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.09538441690569, 14.704079264670717}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJwl2Hs81Nn/B/BRakWKcktyzyXKuGTJpdmoXEq+7bqXJre1LZqVJCQUi1ym
+yKXEqJYpbEjMlkpRCIWshtRSKpWEtfEV9vd6/77++Tye8zlzzvv9/pzPOWeo
++Rzc7b+AwWAsEWEw6Pq/PzXW/19imSwG8+XvL5xgfbvH5YnwkOvF6EJYoUst
+mNzW9XFiFG4WsZuKgRulV/pvUmcxljbx9nFgP36b7nF4cm/ZCi9YadTq403Y
+b/5Ox2bYVmdD40eY35x/WQXOKq11k9JgMZxfvi2bMmAxWInOr7RhvsKV2lI4
+9qqLjRHME59I8YYnfYrmDWDVLz5uK+Gk46tM1eGBU2Mm7RtYDDGjxPPisM68
+xWw6XL/C14vGc59ZqOEFXz5xXaQJFqT+dMEY7nff4MmDAzOTHqyCA2ucdkbC
+zu5ZDsvgHy7O33KDk2QcdaThZskiLwuYIalXogZPbrHM0oYrqgP8reGl0wd8
+lGGOqk6gP7xnzSlrNWrP3mGSBSvJs8UNYa6kz6cmOOKK5GIn2E4z8OgcjW//
+T9sRWOxWeokh8ou2vOBZTk6Xdd8Pu5f7yX+ChZqul5LhrGMBIybItyNPer4E
+HnpxZm881UvO0uMmzJn6g98F57IFFnfhsYWiw+qayC/9XvcNuE5Dx5QDs5OV
+FhfAMmYXumphu6en/SOovRrDdgrmKl7YuA0eERc5or8W+er97rIEFtz5QegC
+M7fXr2tE/PkR/oGhcH1tUNxROKy7rSkO5n0dPaBP+U/MWJyk+5+fyA2sR149
+HaWRMEdTvjQHzn/unhVA/T/6W8kV7ihd98Uebi5tllCGg5p9LbVpvJJA3rg+
+6v9XsLIIzG9QCu2Cma+WxvQh3orUxtB78I7le21q4Nx7Yq/vwLZN8WY58HCB
+8a5H5OjOt8cpX42erFdw7k2lI6GU7+u/xxZhvIjiO9lUH845UTkjuDvpsk8U
+zOsU2PnB0e8DPDLh+kTF+Dx4x2tFFwEsVbbv7GN4SH5d2nvYTCnbjUHzJ1OR
+txbxSrmbN+nBmu/bLh+A2c4Nhk5wd5bHlhrKP9vHheZP1oRv+yItFmOazTx2
+EBaUhP3kCg/EJGT/DFf039T/Deb6+Fp7wLneh20/w+xD9g/N4A5PSwUjbeRr
+vIkpQe+HXeiBn2GBpLp6F9VbdltYHjz9s1VnBmynO/z1Jpw7dPztNljBrd/3
+CSz8zWXvDNWbdaWqBxYb8vYuh0UNE850wmPMKXlfqn+7qP09uH5JeLYy3Chu
+UlICO5usKnilx2LMFg5MJMK8s2FJlXC/idGj/XCztLx2GhzI+3uBBcU33FUW
+Drepav0qC5vJPygIgQVqecxJ5Jd0uqc9DLY03vlbL6waIOaRBPNue5s2w/Xq
+IYISONdZtuEeOX5nRweNXxZb1AQz74dJiCC+fL+mtD5YQRgTtREWHJ3izVB/
+9aFzB8hdrbu0Mb5U+CS7AA7TDP9lH8WzRJnbBu8ZV3Aqovg7ltVMwEmbrao/
+wPw6J59lqJ+tj5mMuQ7WI1vHkjUwf0CPlwwzCzhGKjSfOpcf7IUHWiv3rKD5
+3ipdtFYXz5NXYTSF/iyvxp34GebcUgl7DAf+mVLFh8UMA1LyqN4qMt8+h90l
+ZsI94X5f50KRdbgf4nRzJc3/rDap1eS5dJNm5K/vsup7bViYfU0kiuo1k9Kl
+BSv8cXq3AT2Pu5/OKcIDG9duHca1v4vjIIor82D4bT59zgyae4Px7DK43x2C
+h7Lnje9TPHe+9NrDmgXtVedh/rDV9HpYtC6EfRiOVRP1V4Xd2bpquymfYi1T
+Nfp+T0+VCSxVU9FuQHGNXExRgXWSuYMOcHeTe40MrGpfdYoDxy66dV+Wvi8p
+2F8ANzpo8zVgoVArsxPeMxp+xxqeHsxY+g3NH2a1IIDGl/v3ggUc29PLP6dL
+68tj9SB4sjJEopfqPT7KPwuXZQX1qaAf9kj12RtwxVxicRAsqPjxYQtsopp9
+ow6eNhu/SvOpI/SqpiSudu4/etB9qW9UlnrRvEs9knedvl//7tIlXJ3fa73L
+wDXMxyVgiD6vaQjaR+0S8w1W03PN/GFSAxZdfNZ9G61Dey06/8I4fBXfVj94
+rFyj4SzMGv5GOpzuR/Gf2sFhHAO3SJgX6c2cRR71VpPBobDZrTULr9Nz8Ku+
+vY/aP4l04MBJ7Uc22sLuW/dWm8IsxUYjdZhTnhgtBo9cW+o3S/NCucz5Heal
+3XlmyZ8w93CMRTcctObKmwq4XqQk5wndd9YZ48JMUS8JmsfRGiFeETDD9Hbq
+Z3hPiTj7JzipsidEmp7jXOEdf6qHT0K4JT0Xxfkr9F5zGzy/BMNhObqCk7BQ
+fPnYRXhPvNhzeo8H5N+ZC+G6F1L7n5FXbCoWR/62OWNz0oif/Y+O3rfwyPaG
+PheYW5Aj5gVLCSTKeTCjLvUDzVdhxu6nn+k9LXVYHAu3jYqGs/De8XxvMGPg
+MZfpq7QOSq3/NBIM6ywS5vXBgrAfQ3fBfruqC5WxjgpDzK9qwM3yUwdp3Y09
+XKMxgvjyNdUMk+GkjDFGKTx5dTizDFaVX97vQ/F35Ly+DyssaCmWo/pzXi5r
+gxmJeQktqBf7v3x+M6yzOoofAw9bTgz8QeeE0pUatI7UO304XET9pdg8/Ip1
+pjtdvyAOdvaYmm2G8y/IftpD+4zWZPlFWqd2ZBqZwryHcpoptM5/ZLhL0T7y
+asP8cVqnv2myGKV133Sz9km4v/1kGu0LdqUnnp2lfSAlvuwuHJvNLLgOM8aX
+p9TSvn3kl0PP4eqJzadvrad6PuwUR3yqM8yzbVSvuIQ/rWGl2jsPP9D3946z
+w+i+g3KVLNVrnZ4NH479GG+7g+pVI8V+BodNnexNhbk3Vj2bp/vBl3f9CfMv
+7dBWonVH+Z26Bs4d7NFkp/Vwqtu21EMGdB4tfsWEA0/7Xm6AFUwVNLTgM2bv
+bcRwzrTbv3+BJCy+Ke+2HswIqdZ6i/4n9l1d7AjX3xUOVsFbfhlU9Kdz8JdS
+1cNws63Mt0dhAUf6ewP4/urKV3QO7iiM3jmE/DUdiv5Jg3mrM9fmwC8LrM6l
+wzoCnoQj7Zvmlo7J8HTgXfWF8MyrynY6N3c8u+xxH/tMvkSoNp2b6//z79ZT
+sPfCbWe84YgMPVE2POl6Poji40b2KG2B294G6pjReMu6fzGCxSJUzbVg4WFF
+Y0N4dnu6iDw8/PpAvxUsGE+6LwEHBjywcIODbtmfWkT56LvFRsHzvzH1ydz/
+6vyHD/f55ulT+4rS0A+0L0aqshqpv+amtSwpxO93IUm4jtrf+FdjKzxwu2XO
+BlbQsQsOh73j0qJ9YM4aR1XaF4dWnPRMoHiXF2XehxP33gwopfqaHzothLmN
+UXZPKd53qw8NwgFGa7lfYbZjy8Z+Omc4ybeoG6JdluqvNL+nE96d2g5L2du0
+FMOPQkcyAuGxGNFlEbDRUodbJ2H2bPISa7jvTTXzPMxMY8zRvq5szfIshXlz
+wecq4f7Ka2PVcO63Iq/94Fzp8fla2KwxQUQBrps+M0j3+as71B/jXDa6aPOW
+MkOaz9JOKbDSYc7yQopHfsHmXfDsh8ecdHj4XJ2NCiw0viuIovY24yqzOAdG
+H3/5PcU7Ldv/5S2slGVa6wI7C5dZDcALHJc4bYUDJ+qr3sGTV+QCzWCW7EgA
+fZ/xcpMuk/rvXdaghP7PJDOj1lM+5xcUboOTFHUXGFK9Fn3yOgJ7H2uRsYDr
+RedEy+Bq88+1jtTe2zNskPJ5EVrgQ+0vRkbKIN/owQ/6xyle2bFFNN8qzFhx
+PNh9zT37H2l+rq059gDu6A8ciIOrrj3vGYGTnFvfZ8AOdQINWSOMt61YnQtb
+3wj6bAknjXtMUvszmT6tPrDCOZtof/jxNdP9CTA/1CnFAlaPDjlxiRzTlk3n
+3r55pmUdLCyUq3hAvxv6tvc+hsWu97JjqL7Xuyb74AHT3VwjOF6ZFTkAxzYv
+9H5D9fy6s+QvWEqxaiaPzv19okt6qT+DE7Hfw+f2doe1w9MLrdpk4LJ+rfnb
+8HBlvMcAfjddfDc6XErxCJ5oCOA7rT15uXBFenXaBXjm5bOTFH/F+eRdp2Ej
+uZWrw2C7OE5IJryJ1y7whzsmVlpegh0CQrO8YB5Ld99dWCo56JornBthP/QG
+9uzPaXGj/F7ucqV4XikPue2jemVJvtgOX24vjAmmeA2fso/R75bXlcvjyUdl
+KiupfaswNR92T7EpG4SnK7rWU/2S4sYDxFEfboj6B6oH+4Sjsy48uX8qYbEx
+4nurt9sSblycU7QBljq+4eN3VM+RXx+5wmMP4r4zh6tOlKQdo/tRyevV4R3l
+dslFxvS7pN1ijuYrJyLmHszvXVPcCv/eyWX3w9MR1rYZcNJrV59xOOLLX2EO
+mv/7vwPDBPf/xZ8G6/8Akdv9Zw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.717657384322742, 15.863036082896215}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJwt1gs01HkbB/D/jq2Q61Q2hgzZdhXFFFZk/y5dFGLXuxFpXpeEaHRy2XKr
+M4vYLLFuLU2ivFKy4gjbzpa2qDQubchl4i3RSm8ql43e77Nn5xxnzuf8Ls/3
+ef7/OYeB/8GvgjgMwyTjj76Z9x/wWc0yf3+4LFOcqLTaYQ3LSAe8ttrDfjqe
+tidg92WxluGwrXGAeSfMH/45+xh8pdb1qZ4J3NCgFw/7c1xNgmGzoEf5e2FB
+cPFoJcya+7Ybw1Lt25+O035ru+x+TZbpeOe2cpUpy8jzjPLi4YW5n0R+A2du
+aQhShT0FGTNxMLNCJMjSYJkEwXK1Ajip1qpKFY6YsY+oIFctqVNXZ5m+6MDt
+1bBQQ1yopAZ3ldlfJjdOfuCq4t7iUJ8S8lWBlYUKy3zeGvc+g86bn0iPXcwy
+FdY+3VGUx3LXi2Fllmkudxn0IidqnImDRbOvjTfCksgfNbfApxZbDvPIbwWV
+9nBvaoQ5A0ttm29HwENav+mPol/pzKmaVjhCMz+1G066dandHfXq9qzgyMhH
+027PwgmNqffJTOkbqRT5ulL6Wx7DEo+UGwXIv33976H/I3PcFOPQX6/j3RpN
+qvfywoE96L/VzfQLW5idzh/VxnwyZb76Isq3tbzlCFzMHzKtpP5r/np5Dz4/
+vavjJSxKszupgnlnKr2ysFzLMjKx52lLOPRq584kmD25a3IbnFufM9sKv9K0
+CXGA17bdVV66Dnn1Vz0yhO0K3wV5w2YKHP0XuN/t+rnlBbCIZ2pQBO/TVAhr
+h+VjNeU28KaUpG8ZM7wPtjdO5yD/lE2exxI4abBWUoj+5pJfjPFhtreh6xT6
+19w8amwMyy06N6VgPoG8wDUmMMMfVzqO+RXe2ue4ms5zSlaexLyf5jXNrCTH
+NLVUK7GMxWPvj3WoXkG76bQi5s0d+FKV1sMn9IJhN995lznkS/Icb1KAc1uO
+pA+so/fXw6V9EctM78zfJ6X8Qxxl8p0/nRXKYKmh1UoO9jcVxoZk0DzSeb/8
+G/bUOxORQPuzn3NfwH2tsSXRMH+pXnke8jwvyrCLpXopHd/vRd7fG3Zqi2n9
+zu5qa/Tz2ntTUSHdd7Nusy76FVunNDf+7Wn+HFyyeKv2CCyx9zDpwHwU/Uz6
+qR+hi9/9LMwvIsRNQPMRGu7ZsR7zLeo2kLrSvLyWrKmCS0da8yNpnuLz8R/g
+MEOnulw4MytLXQPPZ3nZZwuaYNkZ9chF8NeSBSI53ddRef4u9uely8Y45vDN
+//h4wZnHn8Ubwkz/3rF61B/b7ehuByeV7FCdRL58+cEr/4Llw01L1ODVfz3g
+7Yelt+/ncNHPdD3HKYruy+lbqoz+jc/xuPG0/oPD2XnMKzk2+0Iirb/fv28W
+83RIfeZL6xKPfKdF8MWAiV+iaf/8WPBaPJ93sUbiA5Sn9uJIzEKWWb//bcZe
+qt+7PHJsAfKczu91p/0X1T5Khy9oVETZw/y4uCpf+HSZYrSA1p3bMoSwy6rg
+cSOqV3pW8iOsfEBpQBtmh2zl03CxupEZl/pN3u3/HeolxrmVq9F922ZTNyDP
+0ddhg+qUf4uW8zxsflZoq0X7c/wSe5A/xvjhhAHdP5Dg3oR+/7C0eE31hbbT
+mT/h/RAenFdwpnqmzmYizKdZ4nslgFw1W2KK+d3tnPI4Tvfd2LD1Hlzf+pt2
+KfXLr/vVCfP+xvvoJ3coj47IPgte1pfnOE77rXNkl+DmAq00rgCW/xCaD3dU
+Dj60hBltG54H/HOBia43LHXwed+D+4UW4uBYWPgoQd8K/nTq4ZNs8jAvIAL5
+li3d3l8B81NqN6Qgf44o5HETnW/LcUhDf3emPE61UL1tbvxj6N8pTToho3r1
+3U+iMJ/AXJl2JyxP8K0+hHleLwgJp3W2RifwGOY9uTnsCJ0XCrq4Fz/G771Z
+OncdlvRNXptSwLmKgp5qslX403B4tkhH5RzZ9VYYF/7vg5FSyivv5tk857DM
+28ipa2LKY++68RW8WWbgG0P5/Q99aYz9e0Qj6Qdov5GhbiY8+PXw2iDKo/Lm
+uj7qa4V5LfSn/B+G9rfDumWbLgRQv4F+b35C3jdeuodDKW+Q3ppv0c+vZz8q
+iKY8GSaf+aJfccIlpVSqV2nVaIN5bHvLPV5M+61u9atiXpd1jE5co/XDM9wW
+uPHyvahuqleYLAvEfKVzz6JmyRmVj3rgns4nuSvW0+8j+5ghnkfMwaYHjrB0
+0ePZjXCRzcTiEJg9NB5mAO/a0WZ5klwfrPIHzmcljW+pov03H/B94Ll1as5t
+tH740tBV1P980jB0lNa7FDxHFf/5P2LDP9+K7P8BYjjyQQ==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.244066109927797, 2.1624198096871057}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwl1As0VHkcB/C7GK9UI+9kPBKWjDmtY8lWN6tJKcZ7KYzyWsVMraWHneRU
+O9HLFkuJqSMNveaIkESxXituYjwqREpHSVJhyX7v7j1nzv98zr3/3//3/d2Z
+Md0h8I5QIAhiNz70+v+1lCTU6dWSJMgc6V8NBnCX1N8b5hXyWLdh5jo9uRSW
+uQSH1cH3jTM2z8PjpJboHzgkU/ewlxVJUFNXZ/1Q77PmwbQLtDtCLNrgGbaA
+6IVJhqU335Akzo31r1L/FvXf9fK+WYb6hvuDrWFhJzkhhe8IdlU7wcl7g85v
+NcL6sUDqCEuixc+H4fCDtfFWtBuyDH5mkUSk02j8Apjpra5AwZMn7Zpf4rxx
+ea6ujjH2C26sKod56WWz9nBJ1r2W4zB/iiplwzHdjI5gWJhTeEsRdlxXvd0R
+Tq5beKMM9dbujdE0gmvsa8Q8OCXI7csi+v6RUHkn+lm0z20Nk873wDOKBztY
+nNE3g4k3CZVNyLO5v0fmCnM0hiLdYZemUaNEWFa/IqEP8zC775lQRvdzlPs0
+FW6ZDhlToPNYX37rD5v7FjH8YX7Z6BwXVuf2VV+HTYx6DIJhbuOxYQVr1P/6
+cSALvivKdPOFZcuKTn+BdTv8VS/CyZmrbeJx/myPgOqBybf57Sro1z9UebGq
+Dc7b+Cu7CObUHmJZwGS3z5QX8vq6uvK/g/nhlemf4PIlj7gcmBO3QZKGeUn2
+bfNgwbL1VDvDhCT6blIv51F/gF3v+j08tp7j0g0LM08eC4DrRz3tr8HjeyYX
+R8Bbrqq8SIJH8sbFofAdYWuKF6zq7tC2EW7RUje3haUfLEaMYTkRG6wF80Qz
+1Z04v2hNmqEKnW/qHCcQZkcECdTp+6ntmk/o91eQt5sF8yXNY1vgOCJW/0d6
+XuWvvCnkPV/eHJ0IM183sSPhnBNn/Sro/XdUN+rC+gt+mWYgn9BmtPQV5ndg
+0/uaQNpta8RP4UXSlHwZfKZVdPAzrPFJJ0Z5JfJTGS8csH+yrPiNP5y8f/Ba
+NpyfxPTKhXlJ73IM0E8BuzisB+bUnb14C054JrnCsMXzXBeOD/JMKMb8aQrL
+To/PzMBfGV13V8KNcWm3PDCPZ1ta8i1hpvJcahacqvr4gxZcMy0bksOvcntt
+JlFfbJHhpmyK7xuhculvmIpKdTaH10qHbel+pH8MBtrBrfXlXwVwtPbgXktY
+VbvIfQNs1d+VuhD2dSS1zeCsgOzmIdQv9ojtU4NNnOO234BP8H1/m8c8pI1X
+HONg1+TIISX6fo/esDX8cGuNgiHM3OYdQCGPdkNT1XpYqDad5QdTD5a8SaSf
+Dz8cNoZ5xL/2CKmk51mixL0Mmyxda6yGfJKdRssT6XkFuR8Lhvlel6uE8JTO
+o8Ml8MCRiKNn6OejzOVqbMwzqfe3TvjAIfGOQHigw9jjB5w3GGMcnkebHZVY
+DVucN7ndDfM0l3fZoF+uiPVZwQ55yy5Ziej+KfvGZbD+phMzj+F7spttK+CR
+jn6RGebjQJXUsuBolrvRLriAlPLVaBvLq67CU/wR9xHUtzLfuaATnphoG7kP
+i/MfF47DYwFXTNPh7nmf7dOwo/Oc5U44Wn7c4D084pTNcYKF1/U1nsDm7dp2
+enDWkopDdP2f0kszCFhaN1opgNW1hEZTmEf03O1W+v2GO93MnocpqmzzW/Rf
+kJLfS+8fXz05W0j//hL1JSQsqajMjYWVSgUX98GqoxNiZ3iiqv5UFd3P85hY
+PVjkdTdYA/ncpJ1LleCSplM+YTDz3gpPRZi153e/crhcce0FHdipoeWsMgfv
+xb86cDXcvyev2xbmPxRXCOj9VkomPA79/77uaTEcWtv7Yhf834X+GViSOeS/
+Rwlgaw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {6.372684128093524, 13.593276950937812}, \
+{1, 0}], LineBox[{{6.4999999999976925`, 4.5}, {13.49999999999251, 4.5}}], 
+        PolygonBox[{{10.6, 4.5}, {9.4, 4.1}, {9.4, 4.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 3.5548}, {0, 1}], 
+        LineBox[{{6.5, 4.4999999999976925`}, {6.5, 11.49999999999251}}], 
+        PolygonBox[{{6.5, 7.4}, {6.9, 8.6}, {6.1, 8.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.5548, 8.}, {1, 0}], 
+        LineBox[{{13.5, 11.500000000002307`}, {13.5, 4.499999999998607}}], 
+        PolygonBox[{{13.5, 8.6}, {13.1, 7.4}, {13.9, 7.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.4452, 8.}, {-1, 0}], 
+        LineBox[{{13.500000000001851`, 11.5}, {6.500000000002592, 11.5}}], 
+        PolygonBox[{{9.4, 11.5}, {10.6, 11.9}, {10.6, 11.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 12.4452}, {0, -1}], 
+        {PointSize[0.04], PointBox[{8.5, 16.5}], PointBox[{6.5, 4.5}], 
+         PointBox[{13.5, 11.5}], PointBox[{13.5, 4.5}], 
+         PointBox[{6.5, 11.5}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T6", " ", "P2", " ", "N12"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdfei/fjgigjhihj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdfei/fjgigjhihj.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {44, 44}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwt2Hk8len7B/CHJMKxZKc6WUJRtiyDzokaQpJStilS1uJEk7XOaRKnUo5t
+0jZOZiyDZEmEpPqmlJ1CK429ZZAQ0u9z/75f/3i9X9f93Pd1X/fyPKzaH+py
+UJCiKEkBiiK/OeM/8LOGSf3/jy6T8+AKZX+P+ELOTx1rmZSGtplXBKyYdb64
+ZC2Tw1t6M2wNzOsrXHINrjy9IPRKh0nxz8k5/o72XZKdeefgmcch/5D4xuvi
+XzbCra0m3DLEPdN73Ka1mZRZpcC2F4hznLxlKmC7rxdyhXSZ1HNpY4oDa682
+OGWJfDSch9J2wsMfC9xjEHc8WffQEHZO2rujFvEyaZ+vy+G62y77BPWY1C/5
+A4JycKtZRvBmPSZHPOOOqQJcGWRx7CTiGYuWeKjDAd6q1bdh6fy9d0xhkenZ
+9j54OHfI2gVmzum2UuuYVPW05mUWzE/NdZWB75Ws38Ajfm+XKweXbKFiimDv
+kMzSpfCTB+z3T2CKXS85gf6MJp5JvYFZa7fNNiKfoPfuX4dh+tNY62uID6nx
+34+S/BOLTA/Cd9apZ/XBxf+WJmqh/dSxyd8aSb6/pZkOYb7OV6d8Ckhc0tQp
+F/U4e/NUwQlSz/tRfUFwrbXPbluSX2VatzG8Q2FjtzAZf8S/eQmef5FgLXtP
+C+3fuk8MYD1Uqk9tDoO5vJ8+t2I9vJf6v1ODi3n72xtgp1qj6I7VTGrMYF6k
+De0jNYzy4+HWetqOQcQv+7QObIQrDRLui6B/80M6/guaqMMJpU4TuGPnEenH
+8JhPVEQIXKO93+MyzCqV1L6B/OpUGs2iYP0ji2ljiDPoMkoHYDM9q5XGmP/q
+7cu7PUj74r9sjqE+Rz4IPvKCZz7qRpfByZ12fwfAvKii+WG4afXBrlg477WE
+jyzW4y7r2caLsPaLZbeN1jE5lvUX48rJeCbXL29B/NJM8crncKSFjtNW2EtB
+JuILrFh3485G+OHdNopG5jvWxloN074c9VYj862ZyheAXR+on1oH15mUGbdj
+/L8/hVTqw3yP3R6X4fSxE/VaJN4S1ugFn9SsnpGBvWNq2KqYX9l/zLUnyPj5
+FWdeox43TqXefQRzb7yby4RjE4QKL8DMtd9rA+FznrJ+TrCUw34WzgcVKO7Y
+KAx3byq0Vkb9IqueyFdpYP4P2f/gPHGULtyuCoKHfaP9v2O9EhXGHVXg3io7
+KxL3DNX2bVbHfrwXo60EH7WYPxoPZyh7brZA/z8YJ2q3wFJVKTQyvr3jcU0a
+af/OIooPN37uUutTw34XDlr0Dh4SGCy+BzOl5LtWYX7eSs8Y+bDZYsEP2N8c
+96VWxXxYcRellUfW6+z8rixYROwTdwDxqsZPszfgSJtMOxXUV6M/dPo+zPLT
+/PYzvGOTreVrOMPjXrYf1tN4uR5rFh5LtxyJRFwq7O1SZeRXLJu7EAu/4niG
+m8Fc06NPw9Be/P3nFTthVlvTKw9438iZm/6wm2j/QRM4TUpc6ijMf3bRYAn8
+dVT9/DG4blCb24J8l6XxRw7D3l6DCinId7ydedidxBdpde5AnNvg9ImMV0eJ
+tkvDj8f5zeJwr9Y19eeor97sEPUC+ea5m5T9AQernPySTrw1lX4EtqK5xDnB
+dLlT151Qz3KdmBEBuJsbM2SGeMaK0d9LV6F+/V5iBvCAhegqX3hsmSvHFN7R
+M7JcHi42ZtMc8bxBp4dwMx3nMZv9/DB86IuX4nk4IOL77itw5a3dlq4kPhLD
+bcfz3AXbz1pwXkLtBynMj29J0xWGFTekFe7EfFr9lTp6V6I+gtkPLsJ2EYny
+TTCnvEjuJWzb59zSAnd/O5GlgPrPvRi7Ngj3ho7/sQ31PNx4UmkJ+rPLsrkS
+Req/ba/FKnisRz/zEtqP7B7xYsAzptGbChH3i6qe2gtz6Q8qi+HUynehx4kr
+xvtzYKPlLy0ziDdVOifheTUPiYVCWCpeZm0wHNgke/UOXByqZW4Jv+DUedfA
+3UVq94Xw/M9dXLFbsHanaOhjzHfuwuneTNKfbatxAixC21DChlnuWlq2mN/F
+qvy3O2G32iK3pXBKg6jrctjZ2qq8A/VcrywkUL2S1HfmbTZ8svXPSF3Y+cpr
+2il4dJd+VOoK5DOsO3sIPp76fWhyOe6vUdHaA7BE+sRHV7hyeFU7uc8bWSO3
+qlVxnq4pL2LDvFsdRmthnsD0UXL+9rsljOSpYLxTXjeaYKv4mQIzmP7MMlsI
++f261zfqjTLW7blUnzUsnHlm1yV4LPfUhdOw5Jabuofh3hGdnAbYNOZouxvM
+CiiTFEe9fFdLz3rAzPGBenI/1ni8sD8C69/K/cGGp85bxGTAlVlBtlgvKiFJ
+K7IRnskPzGqE6y5lposgn+4cjz/fkf3Q8Xu9LTwmHx3bD49/tOmJgznamqKv
+4L9qdcurSHu/pJaHsPzlRRn9cF0BezYTjphlOy3AihL7HI7ALsaJfkKoB92I
+ufgnuHuW5TaJePGxnrZ5zOfnVzLZjTAv7Nb1Gth8smsokTw/SzsTC2ts2fdq
+A2k/L3WFAYc6tzo3IH/FXtojEVitQ0fZHg7Yn1TwEvVl/Js8XK2E9ZepOFsB
+N9Wa09Vhs8EUletwifk/f8Yp4r61P8nOgOcexF4eUMD6v7tpiPNOVdQlGjjA
+rMDtwqWw2+S2fVXyuM/2PFQj+8dXySfXFO7NKZWmyPguPf31cmjfcLLFBL6e
+p60aDIucP/DPUTK/8GV7VsN2+sOxFXCCpnviN1nUg5OWPgdXtBin9cNugjJy
+5H1Gb7BaMwib6WpOxcASisnzc3B3w3+CSmGFsPOP1Uj/7Kvf38IxD57H7oa5
+OsE3f8CMksfhKXBr2FvasvVMKp6hfr0N9i5v3qoIxw3Zd9CQv36khKkk7Guy
+bWwzmU/wDrcZPC95ucMwFOZNa3d2wqrbV/qegd2SLQJwnqmDDodEeaT91+O7
+QuG2y94XOfCTuB1MQ9hc+lK8O8wtblEm31fDEwNByjBdq2a6hLx/+72mHyIf
++qG6UVIfi0uCU3vggDV5763I/u4OMezBfAPSXOMl4UMbAt0cYG6ZlNxH1D+8
+R/xJ6TKsP7vQAfc15eLA9pGFzToebG+EN1gV2P8qg/OQ8eN6Gzy1pbLkpTTu
+Q6GVigOw1p2VSVvhmcbBt4vRf6m/TVC9FOI5gnGG5Lxpb1N3hd20nZYEwk/H
+a86MS2L97O5O5MDMF+H3/GD99EcRI7BIpX6/GMw8N8zTw/yrDPgVvTTyfm7W
+ZMGJTuX33sORwwz9Ivj2pIOfBGkf4tBLzleI/MJ6D5i+89VdaazHZo0rovfh
+7tsm9YZk/bJ37FJFPiwD4bifYYl/1Y57wmO19+iOcPPzl00ZcN6lv0Ns1pP3
+tcraFtiMMz+qC+e1JTV+g7tHxSpF4babYsdkMX/nT3eSyHmO1tPIV4HHYrqL
+/oKHV7/vEIdZzJAqf/j67LWDg6Q/vRV8LfL+nk35kAvz1NeGD2H+Pz46SLuQ
+8VPv2ObDo/e3GTUhfzc5YVo4vOB0LbUV889LsQvdTOrdYMcrl0D9S4du0GG/
+N7Z9ceLoryDyrCgs03Bxk50Y9pdD8zpyvkojxmZFlyJeJE0n61Vs3RTUKYLn
+O8+aKcLRmdz4kiV4P/zm+7cZuT+/7jqQL4z52mwXIt/rnRVZzfWLsf+1sx2v
+wGGPhIfE4Tz+Cske+OPAt9ccIeynayvZ5Hvmtu/rag2Y36aTsQ+eHEh2mVmE
+5+0/bMqC83S7NnyDi/3Mf+2FFZuN3qihPWf/Rm8F1DfHULcnBOYxdLib4c/l
+a+jPYfqdpsGDsIgjN8QR40udaBeMhnmm5uVPYea8owAH3u89mbwF+UeenrkZ
+AWfttHhWCpt1X0jwIf09in4qgvnaia3O2QhnRKbQGMRyXfelSH8ph5OdiB0d
+ZV8iPx77s4oh3PpxLfMaue8rbOIG0R9H9qrBL/DSoeqOINjNwG1OFeZTu1zq
+kE/r9EzJO7K/N4dHjCJ/brKmLfkeVE04U/eZ1OPtQb8oOCchNrRTEPuH8ZOr
+KzyVNmH0lwD2z96pLnKeo63jH/pTqFfEn6r4e4G6+iLimcsCA3kMFpL1OlCz
+dWJwjkGxLNL8Hch4i15/zvzGoIZTLH4Lhl8L2c8nTTOoSosrKeR7JrY38WH9
+VwbltuRsZhNx0x6+8ySD4uglmokh/wOlRyRMvjCoJxKzKdvI++pKKCNmAu2V
+vQqSYfGGhImVMFf3cCC538YS2w4TR47KPpJB/Sxn6qtZMC+YP7oVVv3FR24J
++uMGcr3IejR2NEW3w1JXDaQvwcNnLobVYXzvbzbnbsCT3z0Ha5BfnsWxD2Ww
+7KO7MmVT6N/822wB/FHJj30B8/G+Ibzu9/Xku+r0F4sZ5Pv+6B/h8K0Almc+
+3EvxFrbAvXuupj2DWWPP48h9HcuIl0+H3Zrj29qRP0VLY1EwlbKlJQXu36pw
+UQz9KyYzeC4wV6NjrhL5tCrH6JC/h+ej37Akka9d4qILb1C/J+2GXUqYb8Bk
+fnCRHnkPJpo3/cug+HHCYmfhvDfmdNoHBqV/WsM4DKYPz6gtH8T6LLNWCoAD
+RMt3q/dhfWzYdodgfuyB8LRujJdqmX0C7i30oQ01I1/5I4F/kPvTc8TqVg3q
+azuy7qne//6vUXD3v7/XMf8PEmtJ5Q==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.72102250104224, 16.744111812358444}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt1gs0VGsbB/BdiEqMSyWUcWiSlJFyysLsdOF0cummxHRGiXKiCUW6nCHK
+JUxM6HSb4qN0MUVyK1Mpo+sYFUlCKhShEIXv/37rm7Wsd/28ez/v8zx773dv
+4y271mwbS1HULfyRkfoxip8xTf3vp05T9vMNBkth3q3Gcb4TacpPw7N0Nywo
+se0emEBTlq/iJSawVONr4l04eKw//wUT8wlZsytg/7t254/A9D1jLoXzT+f1
+19rBlMnEiaFwwZ3Gnl4jmhK/CgjXx3rxj5k2B2HBk8cxX2CBwuqtAUyp2Kg0
+T6KplU/DV1fPwPEhw2adGjRVuMeo4ywsSNM9PJZBU6LVbfXRMMOUpZ0Er2Pd
+t4oi811KE3S0aMpC3a5FBDfJkqIS4Bu6to3FMPXxH/NeWDTUbNsJy2WpRx21
+aSp0uPEvc6zvrpFisQ+mJtQ67ISZQdktqbBIM1B4leTnoVdxHLZ926PTDgu7
+ZziFwP5vfD6po17+qOsiW/hsADtrOszM+ZDVjvU8eBZNprD0Xd/NGLhMv2qu
+MSw/uuAQybf5rk+mFiw5Ii3LQD02tgeffEZ8emdVugE87lQZ9zTp1983spZp
+0lRQxJljNqSfsZFj/NAfv6SAwTLUwwsMOpSN/j28/nW+Ncwcv6xBE3bMS0g4
+Mx3zU3d1XUK/ixxVP1Aw1RNjFwE/asjes8UQ/WLGlh+GWfUOcZUGWF/91+2H
+8B0/xyULYab+aRmNeJKH1R4SfZJPae0XWDmnoNkO5vWMHL2PfLrieliN05Af
+nRhSiny7jTbsToOp9vJqX9Rzr6emzw+WP58+oQemq9or3GBmwmKTA+iH4ubn
+KmL3gOGOUVitXqPOF+7emnt0L/orts+rSICF6cF36uFn5fGJUrLekGi+mQ5N
+BRiYxo2Q9Uapf73gjHqVczTJz1P1QzDst8shJhKmnRdvCITH6bBxTTC/c6Xw
+TzjWIt/4M5lnxEdrwvM8U6InoP4moeu2MqzH0E6NnAKLLXdFeMD0iQQvddKv
+6tNdLch3BR3M68D5wn/VjvvD3pa1w3kw+5Bzcgfqjd0tr+SS9VIrzYNhlrdy
+cB/y5Q8uD1SGn/Walu6DeTZfy13Qv4+qNX926cF/bT1ehv4GDYfFb4DpklNN
+3nDRSXO/kqm4HqK+dmtYu8/IwBAWNy1dvwyuU4R9i5yC859KJyeR89V4qj2T
+4eiLARqIP78kZTSQOGcPJSXX6/6Ut7900b8faRku5H5U6pCJYammF/sxzFj7
+ttMLlo/ZsWgt6ruQHrTZEpZUX858By8Y06BqAItPMdkB6I/wwcT86TDThXvj
+C3xhs53OQpidqsLzQX+HRh41c2HeicuT78OHfpOqiGD6QLVoEsZG3rIHCozu
+74xu2WNM418c0UW+0nB/0Wp4yNfdbz3MeJ550hkWxaQ/TILFHu3JJvD2zFyH
+Mpgd+jmlFfH7uVsPvobdRccGkuB7XZv7WmBa+bLJLLhgd4PqKxLfSdPzBvKd
+Ec01vQ4Le3/usYEFKxPehJD4HO9rxaj3ztz9rTPIfO0n2hFufa6tW0Dqm3t/
+ziv0a83U3hU2pD8c89YIOKDli8MlrEOpJ+suhLu5BXu0YPFiJ181OPet4iPZ
+V8ShLWlduB6FS4/UvERcedrMPrL/pQW4HbaDmeHeVnPI82S8UPkqRsl9q7Ag
+jGrKtzvJ/yVeOweqMB4IHlgTgTiSrO13FuO8Y98LjlbiPpALn7wvgutOZCQt
+hXnDFQ+WYN2NNVynbjzX/CHK5Rn83YNa8RSmLGxsNiLPVRGNtbWwQF7IfQ3X
+xa81nUjiLYwbvwp1Wqxz8OfB1JmoeZfhrNo8x+cws83kai980feTiSvykQ96
+HjZC39R0XhcqyH0nq+q2hLWP+VnNZpDr1ZtgAm+6ZrjNB6YOspx+kr6atJkk
+wnIWc1sxXFjAt7oIS8+XcH3gvfky/TyYV69XMID87ixQ552Dm5LnSyNh54OJ
+KWGwu/fGIBV4hslvfr+TeMlFA7Go98DjQzvKkQ9j3dJ0bZgnCG5rRf7imHCH
+i+gX46G9/QfUL+/NdXGDMxrOG8qwT7ozDdaqw5JA5XNpeO/xbQdrWhD3Sk+O
+YhPekzzeR+OXsGCJs6PReByX2u/QSvaDuJd7ulTJeTHVmjj/yT9uIYpxqDeF
+b+YBi3fcXf5CBffX7Wi3AtguerLwpzLWy2RZs5Cfd+NHtissfBxbnQ3rjeT+
+fK6EfmsZhrHJ/qcTHx8Fy1/zlG7DMqnWnG2wwLx+/gr0S1d66WMo8df/dDwg
+z4vbluwrSuR6m0fZoP/hVgF8FcQXG2xWTYVFdcvK9sKSmLCIWjj6QOXrflgQ
+YTFCYZ+RaI7124982dFLhybBi9qOywZh+T/V80ZwvN7MsHx/1CefbH9LAesO
++p8rhQX8978S4QZ+pUMnLJ07etIaXtbysrkPZvLY82TIL3xoS6UcZlRdZ5Hn
+v+iKtcd+WGjdcOAF6qPz/Oz6sJ6gfVIQuV8NDb1CaBVSjzf7PdmPXNtm+SBf
+5pFTORFwWY1SLBf1CjudZpiS53uzdbj9WNyPGjkqreh39+8uCyaMQT3KZtLb
+sN4NNempUQ6+b2LD82GzGKVprGEOxdiWq/oQjmVn7pYNcSihD7fjO7zdem12
+2g8OxfROcHJA/Lo+tagL/RyqOz1u3DmYP2fvp6HvHKrJZ993beSrpr9p+uVv
+HMrdcaBfBC9S/L2ipBfzrII/jMg+OtNp4hxYeolRQZ6vImpHxM8e5KMdbLIA
+/SrSKDGaiXmm/LnHDXgj9+iaM7D79fZKJq4HW3tR4XrEF4bmn42A+aGXP9lh
+fcY+2c9SuC1ay43Tx6HoGNasFjjc11PdGfkyjX5JPsMCVe1vSwY4FLt+JKoO
+FgY1xemhPjouvPnSFLLvRo8phsUnR7y2wLGzHk3VGeRQfEXCNRV4o2fJm2kw
+U3W3KIO8d8plf1TgeOFUu2Qm2cfvZRdNIm5fnpWJ+mQvTmj1k359VtM1I/uo
+dXJ1JPITtF7RKEB/wi0sa4pRD++axw4XmBH45X0u+iE+fHfDIHk/ay1Z+6gL
+/aoPmUve3xIXt/L+dtQ788jsk2R+XWK70gf01zLYLYXcHyeUZhs2cSh5bIXr
+Rbhp1fSzileIJ3gZQb436JsDxSufYP17nQoW2cddE8bVF8OaofrxOv//rs64
+TTHIqEv/F6niFE4=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.245181569676696, 3.3258894180601777}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000010004`, 17.}, {6.5000000000081855`, 14.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.850455074238777, 16.59527726407387}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwd13tcTOkfB/BTLKVkYnRRmO6ppHtZxUGSEbohCpOKLmTIioSJSr+URmrl
+2mippDQyirR2IqlUO9Kk0mqQSiqD1q3S7/Ps/DOv9+t7zvN8v5/zTK+O3tZd
+3iGKFD4KFPXf938ffZpikW9VmuLxVlbPgMUDb3jak2mq2aznLA0Lflzz0VOj
+KQ8t4UMuTAm649Sm0JREyXRWAcwLPmndBsfOuaX3HuaXhcS6MGjKrmFgyNqA
+pujNzqeiYVFsBC8W5iXbcs/CYnfVhBpY6HhNlANXXf9+a5ohTXHK/6AyYMOr
+7Mf+xEVTvkTCjNbl5y7B3GVeRg6waroH3Q4LxNVvyP6sk57ak41oSibz6rCE
+W4MWvbGHWe3dW/aif0FV8GMfUj82c5EI8+mmbQ7aBnNW3Uv8hvlF8fYNO2Eq
+LYK5EjY13p0eDosruHNvq9BUYalVySZSX12iswhujkxKdyf1f92kHybRlJNn
+xkcL4gKzknpYUtHZpArTOU62baSu0hvWh35lc2s7NHA/3zJbsQbmDcYZJ8C9
++OTBVNf4OD3s3zGk6ZlC5ruzeHcP6a+YuyCa3K/lJpagf8H4wtBwWOyf9qcU
+84l0OS7bYTp4xqkBzJ8fN/1OJMxa9cbjOPJiOueHxMHyM2rhmuo0FZC1zT8b
+5iud08+Bqy5YOJB+WO3nS/Sn0lTK24RZw2T/uZkPMmCnzmtPHTCPcHpD5hCc
+tf3TjQOwoN3RZtE0nI/PzrWVMH86zdsDu++OHVY1hvtmBqbCASqCMT+Yc6qh
+PI3UFdoT/4BZbkYHYuAqx6XefTBFjR1bA+f7NLPNTXC9ZmeBOrw/UnQmGJb7
+fUyswv6uAR9uZsA0+6LvDmJ25d5ymLLwqJ4MS5Tr5khhcc/SpiLMFzsjl98F
+M2JuHPKCTXMuvOqFBVHj8kaRT7x82ZPXsJA/pakUVnq4NOIZzP1R9ZUH0yN+
+SyrI9c4t/lvg/vothtlkv2myMF+40K3W8DDMOpx5PhCWO+/j+ZP9ohXCSP6y
+i9KE+aTfyYlLH8Hu/W6xM2BPuvG8NvpR3fH4BEXqDlGf4uDCUwNXB5CHMOCP
+Tz9gxj7T3W9IPl7FmTzMxxllOf5nnsJqNeQjn/i9hVzPWljqmA1L6obvjSN5
+fW3wsGQiB8qgzRCWxdWfK4X3jrt8zZPMY/G/aNvpeN724Q6JZJ47wyUCOL7g
+KKuK1Jd8evgDthq5XKxkivVPNA0s1EBfzfwuL1jMeLYpArZ7cfDkRVK/G7Xw
+CGw63W/rO5grDRHHwIL7m6fZzsH6HvFaW+D+cecj9sOev3/cYwm7hxwLKoOF
+7Lcv3mM/17Ycx0Filt7s83BsZvhBHTP04RKWTcN+TUGmC2HWc6HJK8xTkzP7
+2lpYsPNDWRzMiOR2BsI8xco1JqQuKzAKgjk2KndbkI/M4BV7I6nnyHwzYPF1
+OtmdWL+qPwjurRg8NI9YdWGyOzl/f32YrA579uxZ50rOs+Bv/w9zyO+FecwP
+rtHuul5P+r171SUB9l2vs+o6TB8+VVQLNw/58VJhvq/9qAH6aTYP5fxG6mpR
+O0/B+98dexJM8nGlotQwn7gseM0mWFLk1PE7LMq8psWBedtko0bIK0NnVffO
+OeTvw7euUpjWLVI4TurPTp9w1cT51Y9ZQPYXFkap1cFdpcUDbSTvXMdXS7TI
+75CnOJXk0fT+ZwFcUdk/5kXyNfjMHIOT1BM1s8i8SkdznbVpSmtK+fzXpL7G
+0mQrrJv+zNzSHPsF7FfZBYfG12QfgOX/XmgMgpVOSj0ewMLA3QOLiatkEydY
+IPc6XosK7Dp0qX0JLChlSqqwX2hCvFY0qU9fKOUSJ+VwL8Pic74RTLg1+eaw
+GObvKtktwjxUumiZFOZ1FQ+sheMLG7xfwqyUSdJR5GHVwMjugBlfP7cKYfmP
+ddpPyf1TR22j4ELWCu0/YeHBoVh3cv5KVb1yYMr4LM8W1v1pdu8o7Pn4roED
+rCSOSuAQp4yt9iL3n6n47gJLjix4Gw8zH+wNmUnWG71Y9TfM6lJXUCDrOT1p
+mof+PEb9W/uQBzXBY1oO7JScKeogro54rI/5vs0OU24leabO+72IzOsR+vYf
+WHKgotwFefUfr+wehGn7hY6NcJVCrp0KyeuS5aSNM3BembmHbIg/PQrqgPnK
+GsNBMP3Vr81TB+dHef2BS6Tfc7yMW7Bhw/VgGWzlMy1WQRfno3NKu8lc5BT6
+61onuPnIpnt7YEn24hfr4OCbfY/uw7RIvyEAdn9xvUDZEs/vnwVyNixXbDf2
+ghleTCUDeGjLdN3TsKQy8WEP2T9TMa8BFlrpCC7AdvRu2zFSd3lQtQwe6rFL
+NZ6Hvp150h70L34y0r8EpgpfVR6HTUWXKV+Y48rmm8FdB04NboC5871Mpcij
+9Yut71pSZ2+flQI3X9u4aDksWfbvUR84Q0/BwBoWx46UWsL1Ri2PmbDg7kR3
+Fiw+aDN/iPQ3f6B5Dlxh5V78lMyjHj+yEh4a2RNdTOZd+cv6RFjokfsijVzv
+uyXmOcwcP6b8G0wlr1J2QX+8okOjHFLXOF1/C2YcfxW6Fvac5SF1xLxZ7MQr
+PmQ9757cKlh+aIIggHi10va1uuQ5Lmjlknz6fdTfwoxDyt58mNc9Whg5E7+f
+h0bnymGWYUfcAJyV9q52kNyvXsveNIumLnAG+eaYT/7y16By2OqgxtJdsExg
+Oqgwm6YsEkP7ykjeJReHrOHg7rEiBSvkkCqKWQF/KsjKMyF+qpXsDmf9+rXc
+A+brC6ytYIaxsG4XLDP+eUCR+HZ7YxrsGabq+QD7ScrUZddhwaKTIVGwxmet
+xQ9hTup95RlwwArxNimpyzyGy9F/7Gnh6CtYGHXb3h8uCeka6IWtNNUrxjD/
+1JY8/z6Y0ZsRVASfFDFzu8l6L0eyQ2HvnTpBL2HqykRfe3L+updsaCL983/m
+acBK47ZGk/3lk8b3qsFW3wvqSsj1qWkRs2G3oj1Rl0k/V3WPu8MZl83P8sk8
+SVeT/kf2u8XcHAdzb6v9JYNzJsx+tpf0d8EuZSX6bV6W0h9B1nvUzquGX1fe
+j95O8hJ5x63CvKaL86eGkvXKfD6+IHlo2BpFkutH5r3dgfwm/XjfcYCsr7Jx
+3TB8X1fH/ARMMxMsFrNoqqmZ84j0lxUTlH8Y/j3mb9M/4Rp7CUMEO68LzO6A
+tW5MvNEJN67gLx+DQ5ECpYd+GfdnGlqj30U8MRMWxitNZMPy3k/jZsJKZhr/
+7IJ5s9YaacPc3oCYDJhR5CdRhjvqt1SXwqa/TDaXY32WdmCl1Jqci/O1DXDy
+E5U0OfztaPjFKzCnM+fIBBvkuT5Qtg9mb/DV1IRrulmjbvCX6Vun6cP5ZU6/
+acLfIt/tMIElE+pTpJj/h5nFBmLx/W/ZibB39frl5HqZqkmUG7z62esXWjD3
+OeOOFkx133ynAtN/pfpT8APDVWEj6Ef23X/bGPLeZxMf+d6aPM+IHg3Um18P
+6raT+eae7iXr3fB4dL6WOMYk8iRc95KvfI/ktX5/3Hu4q3o+txhuPf06Zy76
+NbOW382D87WDVXbCXXXb867AQmnt85uwU3fD41yY9YFR+B3mWkv23CDre7Wp
+LEGehwc+V5H1qTWDe5Pg8ufBlxphjppaTB288bz7lW7yPKRPO37Be9U+YZLr
+OBvy/3vOVSe426HvngGs1XnXKRAeLLaZtRzuvbJ6+2G45YQiZwfJO90hNg32
+dBgJTCfP48repRnwy53ikTIb8v4WrJoK1zctmtxB8ksNz42Bj2q85I3CpntX
++22G7WzecnRs8X9KSVbTfLhkd2OHHaxUkTRzCmx88bP3CphrufWYDP2Lzq5c
+7we3FnyPFsJq9/vKAmFBUOLhONhySONICMz4+LfaOlh8pu1TEFzzZ0uMFdx4
+b1r6JjjfjNEyFWZPspviA3OyF3b+RJ7G+dXuy2Dq+dOBf+G6cEvaHuaPZb75
+Brsu7lMzhK1Wsg2UcH+AdVv7VFjseizFAOZP+FGrSPqvHn+IDadvnvNlCPPu
+N0p4fhAO7+AE9sGtCaemlMIvvw/1vYFZccxfv8IWW1zdXpO8Rhr1XDA/d5Xz
+57ckX0nv5gQ4S09x/gdyv/witwFmqw/r/yTPj/Hl+VS89yZ/9eL918/1MBsf
+uD2Q6jaHPT+s90mB3ecuu0Xy9Mtz8a+A1ZQ2aEXAWnNuP3kFU1bas9PgpJSw
+M8OwU83K2yL4Trn3XGW8txVOZNxph7OcHhyeBI8n7/l2mJd8G9L/B4/XuA8=
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.278814934002025, 3.4867457599351623}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJwd1gs01HkbB/C/sim5jGsubU1lxbozpdz6N2pjM1FrhcQkNiRRwm5tvDaF
+OA05oZRRyb28KclKo3rXhI2QFSuzsrUrl5F2V73i/T7vnDNnzuc8v99z+8+c
+MyuCD+4InccwTD7e9MnMzOH1OctwCEtZJiF8dYvADP4ztkAH/vVkz9MCuMNV
+8E4dZk0vu4zA0YfMjccNWUbY82CrnTk+q+LLqmGpy1z4Ebh6aaGbHxxmoxR0
+Hfb60mLxGwOWKT3TKPyVziuWcyLg1AxTs1lY1LkksF+fZW4FjalrWbCMZEu8
+eBOcF1IyawBX9298XaHHMklpt1J0YS9ba/8lsLApqHUBLFR/PpaxBPHA1sQx
+qrf4kYEmrLKLL20jt0Ser9BlmYYdE0YlsDwxwmI3nBHnuCOR+klIPGAKc1o9
+VvvCspwHVRowV9nlMA9ml4aN6MC8N3f7dGGuhVzKo/vFl+4owB0FdaX74bpT
+a2b+xn7kxasf1sKPrgUaTsNJiq/8NNBPqm7335/QfZUp+RH46rXd3Vy6v6ot
+6wXM8/vW343irTHam2m+qqKco7DEqS3iCvyu8eNsHRwd2j0yBcdmjubR/rg3
+3521wb5i21I/utO+Tnt6+MLdUe+T8mB5yIxmKGxuabL9NSyO6DLygR/9S5Bn
+Z4n+ChQ1zWCTlvLC72D2VMzDYeRfp/VYfhe2/iT1YArc3Xn18AS5wTiRA2uX
+e6fqW+H5dfyyNx39s9lyA3vYWiF4zzTmb4v4T/UWWHZiq0AIRy6zi9oKs8qh
+W6Q6OFc4pu1K5/dJo9bCqd/UfrCieMlv56q1WaY3iXmvBXOD9RgnePT9Fp9J
+1PfKSl4yoIU5ztuWt8CiezVsLux2tf3eZVgWv6EyEq5LORp+DGbyRpwC4Ya1
+iw75w1yDrmP74cqL/d9soPh6rSvZsEpTZrIFzf/8fFkH7LSq7IwxLNTjHVqB
++gEKdZ1mtC92fDqRXHb/gzPcsedk1iv4VpdMbzf1Z/bC3BPzSM+dKEylem2W
+V2pg1p0bfp/6Dds/p4p9jA46/zQHi/vspb6w775Ps2lfSR1/8c/Q9yt8yiMH
+lpy+WVUFS9b/4PASruZaHfg3LHJvb9KzxrzSJ+b5cPpnCeYuMLfu5XgIvO5V
+TboQFqdlq+jCtXc9bxyHq8sEn91AP0auveJcuu9TM2sHuxSlFZfDjKevTxnt
+W9/O4w7db7hdog1zoopi7sEdm+b9eRT7GT4u4JO9Vlvwf9dkmWyJwzo6zyz8
+rskHtpQs16mERTW+Gj0aLFOfzH1eQPdbFO3C4IDUjNp0qh/jslEDDmleOz8e
+5rQtcunmsEzOBkOTvbBwtn/sJhxwxEDkBbP6001V8LDjpXMsHJ2i2PUQvmQ3
+E8ejuI3h6FuYv2GPswVs7fBzsT3ybxPO3jWj/dS2n8mEjbq04q0p/ttX+yZg
+Ps/7piMs6YvZuRP91xbI/QSUvzSLvQ+PjMaohlL/QWHzV2D+5AVfr0yG5Y5T
+rXEw/45N5RXKb9nn+yNce29hqpTs3O44Audct4yYoP3UPVNnsM+4w6bjujao
+3/bL5Q+IvzVpLHGGZbkZnOf0/YsP5AWTn4X8fIHcs9zjB1hkPi3eROclkU8L
+YfFRe1EP+pvef+NFLczJP1j3NewQsu1pMyzXHVrajPme+Mdu74QlqoHh1rBK
+o6tPD+UTPa7Mxb4Uq/nG3RT/OK42H04QfPiqDU4yW6s8qcYy13re1t6HWblA
+87+qeJ6DwXtuUH+hPZUWMGvIOVtA50fEQSIV/P6K5pWn0vn9KXtN4ADrnzSO
+wELT2JDpxeg3ZoHtXqrXKxEyiD+y3LXbm/Kp25c5w2oy3SZ3yqf7j0IFLK8f
+8NlE8zqkDbFUP+p2L1miodf5F5yRv7xuK9VLDu9vRL/J0go9P5hbvVhLpM4y
+Xxx3fRJJ++grzrHEfOtsNgedpPOXvmcyYZNib+Vi6u/L10UDcF1pfjvtjztY
+EGeIfeU4zhwbo/q7zwbz4fJj0gZtW/yekncEe8J/rFUydoI5PYM3WFj4+oEg
+GI72S+jVgYMrQntTKB6i9qAd+Y2dd6UXw3IfN3E0LNM02ymBkzzUav5Bv0ZR
+26OewbJlifVvME9D6/rNw7DwkHt/M+Y195NdHIXF9ccac2lflo/Txun+73OX
+92G/efNNw0fIBbnNrsos4z3g/kpmS89jstt+Efa2KWSsk/JPDm7bthDzfL69
+qAnmFl/QEimhvmGh4DrM5FhNzIeHAm/7nCcn8N2uL8C+hc0mp+j80JoREVyv
+H24cR/kPWE6Uw3kN+blh5IsardNwhLb2+SCqpzQVF4t86d9e1QqgeRoH6nVQ
+f8ERs5JA8unD2Z1w7fddlftovk/PlhSiX9vlzy3iyaEmA9GY54O9/nAG5V95
+4uV6zDs+EOFcSvkDV7aPwwaaBcFSivPLyk9gP0PjP26kfSUlrfo4CXek8S5o
+2qFe5CIXK+xT8oW2hgN5TbqNPWyU3Gq/BxZLy0yU4GWZWSUn4aRFK1YW4v4f
+fRdUy2AJ70CLAtzt5+3UTPE7qrt4qO9vJV0vg2Ueyf4u6Le89+LWKcofYMCa
+Yp5Z+v8F//+1kP0fdp5jRA==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.77627226468353, 5.608447160322252}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJwV1As021ccB/B/1YZW2lCPiFewYmxkD+OUdn/PZtiqum7p2JY6a8vWquK0
+tKs+phPqkDBEvcscfSATuqAsK1bUc2ULilDromuPHMy03ZJ97/+c5J5P/vf+
+7/f3+98Th5jjkYf0KIr6GB8yUobki01T6zpc1jQlCNXFVcG8YXb4BKwYjGH6
+YEzITbXNxyjdGlxxGyPrkZnIE6PIXzPkakNTldWfJjVhHV2lVZyCuUntJg4w
+1yuHVwur5izmL1jRlNyBbyWDBekvXB6wMP+kZrIcFgXOZXjDsfVM+6NwbOhU
+QYklTQktzvrawyOXdx7aCnNW2ow6sa/PnTb7YguaUtfvFe2BR9wY13fCkqLy
+K1Nk367EKAquaw8K/pI4zGNg3hw5Ox5f2ggLDBY7FuC6ip0tDcgl2Rhpr4/5
+Ij2GYyIsON7tRp4nooZkkTB3zqM8C153e1q1D15v1Rk+ghVdTkEnyXrjAnce
+8vGUYm0rLNpwI+YaLBjuCrXBfuomMUuP1LdsOy2Bhe+WeYXBcqv0hVeR3/X0
++5lpMM8xV9ALp7SYOxfBvYX7Mkk/OLcSr4thTqQ8YIst6sgxSToKs543fvc9
+rLKzk7nAdazPHdztcD91z4ke7K+QfpQngeV+03HvwbEzOWtq+PwX1r/LkZ+a
+bNhsZY/3+9OyExtmlcTEu8DytebsZPSHuqRpMIMr/xyRDZvh94vTvIdYz5JU
+cN+CfTqt04rgXqMJu9ptqKPmkaU3rKrzavGAeXl/M/uQL3Zy/+KoKfpWoX19
+P8ysDXTOh3vXhFkPUZ8waMgqGea9aON8Td531s0SYgHN3udMzteR8cY8WNFq
+fk5Nzuny4+p+8ry+xvK7xAz9EEvslxLYof0FVvKvvZFILPiPQeaLpGKPMVjQ
+MLPbjZxHcXWJF/Lz/dz9LpP+tm5S5cBqoZvsZdLPkt+mlLAwzvFJIRxxvnQv
+A/2QlBcvv436Imq0AS7k/IiOvTQBaxLadzjBvF3dRmfQL9r02Tkd1ndfLr5g
+xMHz37nveRsuvW/aEw4rfmjwjYKD2GM26bDS9qtwFfJF37MxqIdVBbbZEbCN
+2FTZQ2x1+kAT6q1Lz/p1EHbNiV40hvUrtG+S+wrJX1NHTGhqQG78GlmfEJJx
+r5+J97VdNpZB5g8xH/jBldJIIz7Mbdx+VbgVuU0C/B3I/JvjBwe2ID9z9NYQ
+8mt0NathcEpQc180zLH0nNsECyfErauoV/qKTs8I5o5nLZeR9x0vyw6A1coU
+1Wcw9fQTWgqL4u/k+pH+dPVN7sZ+VHxmzA6Y+2HjjX9haXDGzAE4xWnUVYB8
+/MNnC6/AfN+quz/DkuEM7nNY6ZFTaI36DL1XhcnII+orO3YYVpsM/rMB+enU
+Br1SWLG0rTMCZo22hfwI89f9266SeiWz0mY4+YMbsytwyon+xDw4gcPwoB2Q
+Q//b/AhYP2r2yTfES2ZLGuy/4HN+vh2OyFexT8GaXQbpf8BMrevBEeQ3XnnG
+1sGC5DX9AtKf8qYZA0esF6WdCWXgeeT/1ZH0E9dm+n9frvJj
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.582298081084662, 5.349305811371944}, \
+{1, 1}], LineBox[{{13.500000000001851`, 14.}, {6.500000000002592, 14.}}], 
+        PolygonBox[{{10.6, 14.}, {9.4, 14.4}, {9.4, 13.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 13.0548}, {0, 1}], 
+        LineBox[{{13.5, 14.000000000002307`}, {13.5, 6.999999999998607}}], 
+        PolygonBox[{{13.5, 9.9}, {13.1, 11.1}, {13.9, 11.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.4452, 10.5}, {-1, 0}], 
+        LineBox[{{6.5, 14.000000000002307`}, {6.5, 6.999999999998607}}], 
+        PolygonBox[{{6.5, 11.1}, {6.1, 9.9}, {6.9, 9.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.5548, 10.5}, {1, 0}], 
+        LineBox[{{13.500000000001851`, 7.}, {6.500000000002592, 7.}}], 
+        PolygonBox[{{9.4, 7.}, {10.6, 7.4}, {10.6, 6.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 6.0548}, {0, 1}], 
+        {PointSize[0.04], PointBox[{13.5, 14.}], PointBox[{9., 3.5}], 
+         PointBox[{6.5, 14.}], PointBox[{13.5, 7.}], PointBox[{6.5, 7.}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T7", " ", "P1", " ", "N13"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdgei/gjfhfihjij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdgei/gjfhfihjij.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {0, 22}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwt2Hk8len7B/CHJMKxZKc6WUJRtiyDzokaQpJStilS1uJEk7XOaRKnUo5t
+0jZOZiyDZEmEpPqmlJ1CK429ZZAQ0u9z/75f/3i9X9f93Pd1X/fyPKzaH+py
+UJCiKEkBiiK/OeM/8LOGSf3/jy6T8+AKZX+P+ELOTx1rmZSGtplXBKyYdb64
+ZC2Tw1t6M2wNzOsrXHINrjy9IPRKh0nxz8k5/o72XZKdeefgmcch/5D4xuvi
+XzbCra0m3DLEPdN73Ka1mZRZpcC2F4hznLxlKmC7rxdyhXSZ1HNpY4oDa682
+OGWJfDSch9J2wsMfC9xjEHc8WffQEHZO2rujFvEyaZ+vy+G62y77BPWY1C/5
+A4JycKtZRvBmPSZHPOOOqQJcGWRx7CTiGYuWeKjDAd6q1bdh6fy9d0xhkenZ
+9j54OHfI2gVmzum2UuuYVPW05mUWzE/NdZWB75Ws38Ajfm+XKweXbKFiimDv
+kMzSpfCTB+z3T2CKXS85gf6MJp5JvYFZa7fNNiKfoPfuX4dh+tNY62uID6nx
+34+S/BOLTA/Cd9apZ/XBxf+WJmqh/dSxyd8aSb6/pZkOYb7OV6d8Ckhc0tQp
+F/U4e/NUwQlSz/tRfUFwrbXPbluSX2VatzG8Q2FjtzAZf8S/eQmef5FgLXtP
+C+3fuk8MYD1Uqk9tDoO5vJ8+t2I9vJf6v1ODi3n72xtgp1qj6I7VTGrMYF6k
+De0jNYzy4+HWetqOQcQv+7QObIQrDRLui6B/80M6/guaqMMJpU4TuGPnEenH
+8JhPVEQIXKO93+MyzCqV1L6B/OpUGs2iYP0ji2ljiDPoMkoHYDM9q5XGmP/q
+7cu7PUj74r9sjqE+Rz4IPvKCZz7qRpfByZ12fwfAvKii+WG4afXBrlg477WE
+jyzW4y7r2caLsPaLZbeN1jE5lvUX48rJeCbXL29B/NJM8crncKSFjtNW2EtB
+JuILrFh3485G+OHdNopG5jvWxloN074c9VYj862ZyheAXR+on1oH15mUGbdj
+/L8/hVTqw3yP3R6X4fSxE/VaJN4S1ugFn9SsnpGBvWNq2KqYX9l/zLUnyPj5
+FWdeox43TqXefQRzb7yby4RjE4QKL8DMtd9rA+FznrJ+TrCUw34WzgcVKO7Y
+KAx3byq0Vkb9IqueyFdpYP4P2f/gPHGULtyuCoKHfaP9v2O9EhXGHVXg3io7
+KxL3DNX2bVbHfrwXo60EH7WYPxoPZyh7brZA/z8YJ2q3wFJVKTQyvr3jcU0a
+af/OIooPN37uUutTw34XDlr0Dh4SGCy+BzOl5LtWYX7eSs8Y+bDZYsEP2N8c
+96VWxXxYcRellUfW6+z8rixYROwTdwDxqsZPszfgSJtMOxXUV6M/dPo+zPLT
+/PYzvGOTreVrOMPjXrYf1tN4uR5rFh5LtxyJRFwq7O1SZeRXLJu7EAu/4niG
+m8Fc06NPw9Be/P3nFTthVlvTKw9438iZm/6wm2j/QRM4TUpc6ijMf3bRYAn8
+dVT9/DG4blCb24J8l6XxRw7D3l6DCinId7ydedidxBdpde5AnNvg9ImMV0eJ
+tkvDj8f5zeJwr9Y19eeor97sEPUC+ea5m5T9AQernPySTrw1lX4EtqK5xDnB
+dLlT151Qz3KdmBEBuJsbM2SGeMaK0d9LV6F+/V5iBvCAhegqX3hsmSvHFN7R
+M7JcHi42ZtMc8bxBp4dwMx3nMZv9/DB86IuX4nk4IOL77itw5a3dlq4kPhLD
+bcfz3AXbz1pwXkLtBynMj29J0xWGFTekFe7EfFr9lTp6V6I+gtkPLsJ2EYny
+TTCnvEjuJWzb59zSAnd/O5GlgPrPvRi7Ngj3ho7/sQ31PNx4UmkJ+rPLsrkS
+Req/ba/FKnisRz/zEtqP7B7xYsAzptGbChH3i6qe2gtz6Q8qi+HUynehx4kr
+xvtzYKPlLy0ziDdVOifheTUPiYVCWCpeZm0wHNgke/UOXByqZW4Jv+DUedfA
+3UVq94Xw/M9dXLFbsHanaOhjzHfuwuneTNKfbatxAixC21DChlnuWlq2mN/F
+qvy3O2G32iK3pXBKg6jrctjZ2qq8A/VcrywkUL2S1HfmbTZ8svXPSF3Y+cpr
+2il4dJd+VOoK5DOsO3sIPp76fWhyOe6vUdHaA7BE+sRHV7hyeFU7uc8bWSO3
+qlVxnq4pL2LDvFsdRmthnsD0UXL+9rsljOSpYLxTXjeaYKv4mQIzmP7MMlsI
++f261zfqjTLW7blUnzUsnHlm1yV4LPfUhdOw5Jabuofh3hGdnAbYNOZouxvM
+CiiTFEe9fFdLz3rAzPGBenI/1ni8sD8C69/K/cGGp85bxGTAlVlBtlgvKiFJ
+K7IRnskPzGqE6y5lposgn+4cjz/fkf3Q8Xu9LTwmHx3bD49/tOmJgznamqKv
+4L9qdcurSHu/pJaHsPzlRRn9cF0BezYTjphlOy3AihL7HI7ALsaJfkKoB92I
+ufgnuHuW5TaJePGxnrZ5zOfnVzLZjTAv7Nb1Gth8smsokTw/SzsTC2ts2fdq
+A2k/L3WFAYc6tzo3IH/FXtojEVitQ0fZHg7Yn1TwEvVl/Js8XK2E9ZepOFsB
+N9Wa09Vhs8EUletwifk/f8Yp4r61P8nOgOcexF4eUMD6v7tpiPNOVdQlGjjA
+rMDtwqWw2+S2fVXyuM/2PFQj+8dXySfXFO7NKZWmyPguPf31cmjfcLLFBL6e
+p60aDIucP/DPUTK/8GV7VsN2+sOxFXCCpnviN1nUg5OWPgdXtBin9cNugjJy
+5H1Gb7BaMwib6WpOxcASisnzc3B3w3+CSmGFsPOP1Uj/7Kvf38IxD57H7oa5
+OsE3f8CMksfhKXBr2FvasvVMKp6hfr0N9i5v3qoIxw3Zd9CQv36khKkk7Guy
+bWwzmU/wDrcZPC95ucMwFOZNa3d2wqrbV/qegd2SLQJwnqmDDodEeaT91+O7
+QuG2y94XOfCTuB1MQ9hc+lK8O8wtblEm31fDEwNByjBdq2a6hLx/+72mHyIf
++qG6UVIfi0uCU3vggDV5763I/u4OMezBfAPSXOMl4UMbAt0cYG6ZlNxH1D+8
+R/xJ6TKsP7vQAfc15eLA9pGFzToebG+EN1gV2P8qg/OQ8eN6Gzy1pbLkpTTu
+Q6GVigOw1p2VSVvhmcbBt4vRf6m/TVC9FOI5gnGG5Lxpb1N3hd20nZYEwk/H
+a86MS2L97O5O5MDMF+H3/GD99EcRI7BIpX6/GMw8N8zTw/yrDPgVvTTyfm7W
+ZMGJTuX33sORwwz9Ivj2pIOfBGkf4tBLzleI/MJ6D5i+89VdaazHZo0rovfh
+7tsm9YZk/bJ37FJFPiwD4bifYYl/1Y57wmO19+iOcPPzl00ZcN6lv0Ns1pP3
+tcraFtiMMz+qC+e1JTV+g7tHxSpF4babYsdkMX/nT3eSyHmO1tPIV4HHYrqL
+/oKHV7/vEIdZzJAqf/j67LWDg6Q/vRV8LfL+nk35kAvz1NeGD2H+Pz46SLuQ
+8VPv2ObDo/e3GTUhfzc5YVo4vOB0LbUV889LsQvdTOrdYMcrl0D9S4du0GG/
+N7Z9ceLoryDyrCgs03Bxk50Y9pdD8zpyvkojxmZFlyJeJE0n61Vs3RTUKYLn
+O8+aKcLRmdz4kiV4P/zm+7cZuT+/7jqQL4z52mwXIt/rnRVZzfWLsf+1sx2v
+wGGPhIfE4Tz+Cske+OPAt9ccIeynayvZ5Hvmtu/rag2Y36aTsQ+eHEh2mVmE
+5+0/bMqC83S7NnyDi/3Mf+2FFZuN3qihPWf/Rm8F1DfHULcnBOYxdLib4c/l
+a+jPYfqdpsGDsIgjN8QR40udaBeMhnmm5uVPYea8owAH3u89mbwF+UeenrkZ
+AWfttHhWCpt1X0jwIf09in4qgvnaia3O2QhnRKbQGMRyXfelSH8ph5OdiB0d
+ZV8iPx77s4oh3PpxLfMaue8rbOIG0R9H9qrBL/DSoeqOINjNwG1OFeZTu1zq
+kE/r9EzJO7K/N4dHjCJ/brKmLfkeVE04U/eZ1OPtQb8oOCchNrRTEPuH8ZOr
+KzyVNmH0lwD2z96pLnKeo63jH/pTqFfEn6r4e4G6+iLimcsCA3kMFpL1OlCz
+dWJwjkGxLNL8Hch4i15/zvzGoIZTLH4Lhl8L2c8nTTOoSosrKeR7JrY38WH9
+VwbltuRsZhNx0x6+8ySD4uglmokh/wOlRyRMvjCoJxKzKdvI++pKKCNmAu2V
+vQqSYfGGhImVMFf3cCC538YS2w4TR47KPpJB/Sxn6qtZMC+YP7oVVv3FR24J
++uMGcr3IejR2NEW3w1JXDaQvwcNnLobVYXzvbzbnbsCT3z0Ha5BfnsWxD2Ww
+7KO7MmVT6N/822wB/FHJj30B8/G+Ibzu9/Xku+r0F4sZ5Pv+6B/h8K0Almc+
+3EvxFrbAvXuupj2DWWPP48h9HcuIl0+H3Zrj29qRP0VLY1EwlbKlJQXu36pw
+UQz9KyYzeC4wV6NjrhL5tCrH6JC/h+ej37Akka9d4qILb1C/J+2GXUqYb8Bk
+fnCRHnkPJpo3/cug+HHCYmfhvDfmdNoHBqV/WsM4DKYPz6gtH8T6LLNWCoAD
+RMt3q/dhfWzYdodgfuyB8LRujJdqmX0C7i30oQ01I1/5I4F/kPvTc8TqVg3q
+azuy7qne//6vUXD3v7/XMf8PEmtJ5Q==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.72102250104224, 16.744111812358444}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt1gs0VGsbB/BdiEqMSyWUcWiSlJFyysLsdOF0cummxHRGiXKiCUW6nCHK
+JUxM6HSb4qN0MUVyK1Mpo+sYFUlCKhShEIXv/37rm7Wsd/28ez/v8zx773dv
+4y271mwbS1HULfyRkfoxip8xTf3vp05T9vMNBkth3q3Gcb4TacpPw7N0Nywo
+se0emEBTlq/iJSawVONr4l04eKw//wUT8wlZsytg/7t254/A9D1jLoXzT+f1
+19rBlMnEiaFwwZ3Gnl4jmhK/CgjXx3rxj5k2B2HBk8cxX2CBwuqtAUyp2Kg0
+T6KplU/DV1fPwPEhw2adGjRVuMeo4ywsSNM9PJZBU6LVbfXRMMOUpZ0Er2Pd
+t4oi811KE3S0aMpC3a5FBDfJkqIS4Bu6to3FMPXxH/NeWDTUbNsJy2WpRx21
+aSp0uPEvc6zvrpFisQ+mJtQ67ISZQdktqbBIM1B4leTnoVdxHLZ926PTDgu7
+ZziFwP5vfD6po17+qOsiW/hsADtrOszM+ZDVjvU8eBZNprD0Xd/NGLhMv2qu
+MSw/uuAQybf5rk+mFiw5Ii3LQD02tgeffEZ8emdVugE87lQZ9zTp1983spZp
+0lRQxJljNqSfsZFj/NAfv6SAwTLUwwsMOpSN/j28/nW+Ncwcv6xBE3bMS0g4
+Mx3zU3d1XUK/ixxVP1Aw1RNjFwE/asjes8UQ/WLGlh+GWfUOcZUGWF/91+2H
+8B0/xyULYab+aRmNeJKH1R4SfZJPae0XWDmnoNkO5vWMHL2PfLrieliN05Af
+nRhSiny7jTbsToOp9vJqX9Rzr6emzw+WP58+oQemq9or3GBmwmKTA+iH4ubn
+KmL3gOGOUVitXqPOF+7emnt0L/orts+rSICF6cF36uFn5fGJUrLekGi+mQ5N
+BRiYxo2Q9Uapf73gjHqVczTJz1P1QzDst8shJhKmnRdvCITH6bBxTTC/c6Xw
+TzjWIt/4M5lnxEdrwvM8U6InoP4moeu2MqzH0E6NnAKLLXdFeMD0iQQvddKv
+6tNdLch3BR3M68D5wn/VjvvD3pa1w3kw+5Bzcgfqjd0tr+SS9VIrzYNhlrdy
+cB/y5Q8uD1SGn/Walu6DeTZfy13Qv4+qNX926cF/bT1ehv4GDYfFb4DpklNN
+3nDRSXO/kqm4HqK+dmtYu8/IwBAWNy1dvwyuU4R9i5yC859KJyeR89V4qj2T
+4eiLARqIP78kZTSQOGcPJSXX6/6Ut7900b8faRku5H5U6pCJYammF/sxzFj7
+ttMLlo/ZsWgt6ruQHrTZEpZUX858By8Y06BqAItPMdkB6I/wwcT86TDThXvj
+C3xhs53OQpidqsLzQX+HRh41c2HeicuT78OHfpOqiGD6QLVoEsZG3rIHCozu
+74xu2WNM418c0UW+0nB/0Wp4yNfdbz3MeJ550hkWxaQ/TILFHu3JJvD2zFyH
+Mpgd+jmlFfH7uVsPvobdRccGkuB7XZv7WmBa+bLJLLhgd4PqKxLfSdPzBvKd
+Ec01vQ4Le3/usYEFKxPehJD4HO9rxaj3ztz9rTPIfO0n2hFufa6tW0Dqm3t/
+ziv0a83U3hU2pD8c89YIOKDli8MlrEOpJ+suhLu5BXu0YPFiJ181OPet4iPZ
+V8ShLWlduB6FS4/UvERcedrMPrL/pQW4HbaDmeHeVnPI82S8UPkqRsl9q7Ag
+jGrKtzvJ/yVeOweqMB4IHlgTgTiSrO13FuO8Y98LjlbiPpALn7wvgutOZCQt
+hXnDFQ+WYN2NNVynbjzX/CHK5Rn83YNa8RSmLGxsNiLPVRGNtbWwQF7IfQ3X
+xa81nUjiLYwbvwp1Wqxz8OfB1JmoeZfhrNo8x+cws83kai980feTiSvykQ96
+HjZC39R0XhcqyH0nq+q2hLWP+VnNZpDr1ZtgAm+6ZrjNB6YOspx+kr6atJkk
+wnIWc1sxXFjAt7oIS8+XcH3gvfky/TyYV69XMID87ixQ552Dm5LnSyNh54OJ
+KWGwu/fGIBV4hslvfr+TeMlFA7Go98DjQzvKkQ9j3dJ0bZgnCG5rRf7imHCH
+i+gX46G9/QfUL+/NdXGDMxrOG8qwT7ozDdaqw5JA5XNpeO/xbQdrWhD3Sk+O
+YhPekzzeR+OXsGCJs6PReByX2u/QSvaDuJd7ulTJeTHVmjj/yT9uIYpxqDeF
+b+YBi3fcXf5CBffX7Wi3AtguerLwpzLWy2RZs5Cfd+NHtissfBxbnQ3rjeT+
+fK6EfmsZhrHJ/qcTHx8Fy1/zlG7DMqnWnG2wwLx+/gr0S1d66WMo8df/dDwg
+z4vbluwrSuR6m0fZoP/hVgF8FcQXG2xWTYVFdcvK9sKSmLCIWjj6QOXrflgQ
+YTFCYZ+RaI7124982dFLhybBi9qOywZh+T/V80ZwvN7MsHx/1CefbH9LAesO
++p8rhQX8978S4QZ+pUMnLJ07etIaXtbysrkPZvLY82TIL3xoS6UcZlRdZ5Hn
+v+iKtcd+WGjdcOAF6qPz/Oz6sJ6gfVIQuV8NDb1CaBVSjzf7PdmPXNtm+SBf
+5pFTORFwWY1SLBf1CjudZpiS53uzdbj9WNyPGjkqreh39+8uCyaMQT3KZtLb
+sN4NNempUQ6+b2LD82GzGKVprGEOxdiWq/oQjmVn7pYNcSihD7fjO7zdem12
+2g8OxfROcHJA/Lo+tagL/RyqOz1u3DmYP2fvp6HvHKrJZ993beSrpr9p+uVv
+HMrdcaBfBC9S/L2ipBfzrII/jMg+OtNp4hxYeolRQZ6vImpHxM8e5KMdbLIA
+/SrSKDGaiXmm/LnHDXgj9+iaM7D79fZKJq4HW3tR4XrEF4bmn42A+aGXP9lh
+fcY+2c9SuC1ay43Tx6HoGNasFjjc11PdGfkyjX5JPsMCVe1vSwY4FLt+JKoO
+FgY1xemhPjouvPnSFLLvRo8phsUnR7y2wLGzHk3VGeRQfEXCNRV4o2fJm2kw
+U3W3KIO8d8plf1TgeOFUu2Qm2cfvZRdNIm5fnpWJ+mQvTmj1k359VtM1I/uo
+dXJ1JPITtF7RKEB/wi0sa4pRD++axw4XmBH45X0u+iE+fHfDIHk/ay1Z+6gL
+/aoPmUve3xIXt/L+dtQ788jsk2R+XWK70gf01zLYLYXcHyeUZhs2cSh5bIXr
+Rbhp1fSzileIJ3gZQb436JsDxSufYP17nQoW2cddE8bVF8OaofrxOv//rs64
+TTHIqEv/F6niFE4=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.245181569676696, 3.3258894180601777}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000010004`, 17.}, {6.5000000000081855`, 14.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.850455074238777, 16.59527726407387}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwd13tcTOkfB/BTLKVkYnRRmO6ppHtZxUGSEbohCpOKLmTIioSJSr+URmrl
+2mippDQyirR2IqlUO9Kk0mqQSiqD1q3S7/Ps/DOv9+t7zvN8v5/zTK+O3tZd
+3iGKFD4KFPXf938ffZpikW9VmuLxVlbPgMUDb3jak2mq2aznLA0Lflzz0VOj
+KQ8t4UMuTAm649Sm0JREyXRWAcwLPmndBsfOuaX3HuaXhcS6MGjKrmFgyNqA
+pujNzqeiYVFsBC8W5iXbcs/CYnfVhBpY6HhNlANXXf9+a5ohTXHK/6AyYMOr
+7Mf+xEVTvkTCjNbl5y7B3GVeRg6waroH3Q4LxNVvyP6sk57ak41oSibz6rCE
+W4MWvbGHWe3dW/aif0FV8GMfUj82c5EI8+mmbQ7aBnNW3Uv8hvlF8fYNO2Eq
+LYK5EjY13p0eDosruHNvq9BUYalVySZSX12iswhujkxKdyf1f92kHybRlJNn
+xkcL4gKzknpYUtHZpArTOU62baSu0hvWh35lc2s7NHA/3zJbsQbmDcYZJ8C9
++OTBVNf4OD3s3zGk6ZlC5ruzeHcP6a+YuyCa3K/lJpagf8H4wtBwWOyf9qcU
+84l0OS7bYTp4xqkBzJ8fN/1OJMxa9cbjOPJiOueHxMHyM2rhmuo0FZC1zT8b
+5iud08+Bqy5YOJB+WO3nS/Sn0lTK24RZw2T/uZkPMmCnzmtPHTCPcHpD5hCc
+tf3TjQOwoN3RZtE0nI/PzrWVMH86zdsDu++OHVY1hvtmBqbCASqCMT+Yc6qh
+PI3UFdoT/4BZbkYHYuAqx6XefTBFjR1bA+f7NLPNTXC9ZmeBOrw/UnQmGJb7
+fUyswv6uAR9uZsA0+6LvDmJ25d5ymLLwqJ4MS5Tr5khhcc/SpiLMFzsjl98F
+M2JuHPKCTXMuvOqFBVHj8kaRT7x82ZPXsJA/pakUVnq4NOIZzP1R9ZUH0yN+
+SyrI9c4t/lvg/vothtlkv2myMF+40K3W8DDMOpx5PhCWO+/j+ZP9ohXCSP6y
+i9KE+aTfyYlLH8Hu/W6xM2BPuvG8NvpR3fH4BEXqDlGf4uDCUwNXB5CHMOCP
+Tz9gxj7T3W9IPl7FmTzMxxllOf5nnsJqNeQjn/i9hVzPWljqmA1L6obvjSN5
+fW3wsGQiB8qgzRCWxdWfK4X3jrt8zZPMY/G/aNvpeN724Q6JZJ47wyUCOL7g
+KKuK1Jd8evgDthq5XKxkivVPNA0s1EBfzfwuL1jMeLYpArZ7cfDkRVK/G7Xw
+CGw63W/rO5grDRHHwIL7m6fZzsH6HvFaW+D+cecj9sOev3/cYwm7hxwLKoOF
+7Lcv3mM/17Ycx0Filt7s83BsZvhBHTP04RKWTcN+TUGmC2HWc6HJK8xTkzP7
+2lpYsPNDWRzMiOR2BsI8xco1JqQuKzAKgjk2KndbkI/M4BV7I6nnyHwzYPF1
+OtmdWL+qPwjurRg8NI9YdWGyOzl/f32YrA579uxZ50rOs+Bv/w9zyO+FecwP
+rtHuul5P+r171SUB9l2vs+o6TB8+VVQLNw/58VJhvq/9qAH6aTYP5fxG6mpR
+O0/B+98dexJM8nGlotQwn7gseM0mWFLk1PE7LMq8psWBedtko0bIK0NnVffO
+OeTvw7euUpjWLVI4TurPTp9w1cT51Y9ZQPYXFkap1cFdpcUDbSTvXMdXS7TI
+75CnOJXk0fT+ZwFcUdk/5kXyNfjMHIOT1BM1s8i8SkdznbVpSmtK+fzXpL7G
+0mQrrJv+zNzSHPsF7FfZBYfG12QfgOX/XmgMgpVOSj0ewMLA3QOLiatkEydY
+IPc6XosK7Dp0qX0JLChlSqqwX2hCvFY0qU9fKOUSJ+VwL8Pic74RTLg1+eaw
+GObvKtktwjxUumiZFOZ1FQ+sheMLG7xfwqyUSdJR5GHVwMjugBlfP7cKYfmP
+ddpPyf1TR22j4ELWCu0/YeHBoVh3cv5KVb1yYMr4LM8W1v1pdu8o7Pn4roED
+rCSOSuAQp4yt9iL3n6n47gJLjix4Gw8zH+wNmUnWG71Y9TfM6lJXUCDrOT1p
+mof+PEb9W/uQBzXBY1oO7JScKeogro54rI/5vs0OU24leabO+72IzOsR+vYf
+WHKgotwFefUfr+wehGn7hY6NcJVCrp0KyeuS5aSNM3BembmHbIg/PQrqgPnK
+GsNBMP3Vr81TB+dHef2BS6Tfc7yMW7Bhw/VgGWzlMy1WQRfno3NKu8lc5BT6
+61onuPnIpnt7YEn24hfr4OCbfY/uw7RIvyEAdn9xvUDZEs/vnwVyNixXbDf2
+ghleTCUDeGjLdN3TsKQy8WEP2T9TMa8BFlrpCC7AdvRu2zFSd3lQtQwe6rFL
+NZ6Hvp150h70L34y0r8EpgpfVR6HTUWXKV+Y48rmm8FdB04NboC5871Mpcij
+9Yut71pSZ2+flQI3X9u4aDksWfbvUR84Q0/BwBoWx46UWsL1Ri2PmbDg7kR3
+Fiw+aDN/iPQ3f6B5Dlxh5V78lMyjHj+yEh4a2RNdTOZd+cv6RFjokfsijVzv
+uyXmOcwcP6b8G0wlr1J2QX+8okOjHFLXOF1/C2YcfxW6Fvac5SF1xLxZ7MQr
+PmQ9757cKlh+aIIggHi10va1uuQ5Lmjlknz6fdTfwoxDyt58mNc9Whg5E7+f
+h0bnymGWYUfcAJyV9q52kNyvXsveNIumLnAG+eaYT/7y16By2OqgxtJdsExg
+Oqgwm6YsEkP7ykjeJReHrOHg7rEiBSvkkCqKWQF/KsjKMyF+qpXsDmf9+rXc
+A+brC6ytYIaxsG4XLDP+eUCR+HZ7YxrsGabq+QD7ScrUZddhwaKTIVGwxmet
+xQ9hTup95RlwwArxNimpyzyGy9F/7Gnh6CtYGHXb3h8uCeka6IWtNNUrxjD/
+1JY8/z6Y0ZsRVASfFDFzu8l6L0eyQ2HvnTpBL2HqykRfe3L+updsaCL983/m
+acBK47ZGk/3lk8b3qsFW3wvqSsj1qWkRs2G3oj1Rl0k/V3WPu8MZl83P8sk8
+SVeT/kf2u8XcHAdzb6v9JYNzJsx+tpf0d8EuZSX6bV6W0h9B1nvUzquGX1fe
+j95O8hJ5x63CvKaL86eGkvXKfD6+IHlo2BpFkutH5r3dgfwm/XjfcYCsr7Jx
+3TB8X1fH/ARMMxMsFrNoqqmZ84j0lxUTlH8Y/j3mb9M/4Rp7CUMEO68LzO6A
+tW5MvNEJN67gLx+DQ5ECpYd+GfdnGlqj30U8MRMWxitNZMPy3k/jZsJKZhr/
+7IJ5s9YaacPc3oCYDJhR5CdRhjvqt1SXwqa/TDaXY32WdmCl1Jqci/O1DXDy
+E5U0OfztaPjFKzCnM+fIBBvkuT5Qtg9mb/DV1IRrulmjbvCX6Vun6cP5ZU6/
+acLfIt/tMIElE+pTpJj/h5nFBmLx/W/ZibB39frl5HqZqkmUG7z62esXWjD3
+OeOOFkx133ynAtN/pfpT8APDVWEj6Ef23X/bGPLeZxMf+d6aPM+IHg3Um18P
+6raT+eae7iXr3fB4dL6WOMYk8iRc95KvfI/ktX5/3Hu4q3o+txhuPf06Zy76
+NbOW382D87WDVXbCXXXb867AQmnt85uwU3fD41yY9YFR+B3mWkv23CDre7Wp
+LEGehwc+V5H1qTWDe5Pg8ufBlxphjppaTB288bz7lW7yPKRPO37Be9U+YZLr
+OBvy/3vOVSe426HvngGs1XnXKRAeLLaZtRzuvbJ6+2G45YQiZwfJO90hNg32
+dBgJTCfP48repRnwy53ikTIb8v4WrJoK1zctmtxB8ksNz42Bj2q85I3CpntX
++22G7WzecnRs8X9KSVbTfLhkd2OHHaxUkTRzCmx88bP3CphrufWYDP2Lzq5c
+7we3FnyPFsJq9/vKAmFBUOLhONhySONICMz4+LfaOlh8pu1TEFzzZ0uMFdx4
+b1r6JjjfjNEyFWZPspviA3OyF3b+RJ7G+dXuy2Dq+dOBf+G6cEvaHuaPZb75
+Brsu7lMzhK1Wsg2UcH+AdVv7VFjseizFAOZP+FGrSPqvHn+IDadvnvNlCPPu
+N0p4fhAO7+AE9sGtCaemlMIvvw/1vYFZccxfv8IWW1zdXpO8Rhr1XDA/d5Xz
+57ckX0nv5gQ4S09x/gdyv/witwFmqw/r/yTPj/Hl+VS89yZ/9eL918/1MBsf
+uD2Q6jaHPT+s90mB3ecuu0Xy9Mtz8a+A1ZQ2aEXAWnNuP3kFU1bas9PgpJSw
+M8OwU83K2yL4Trn3XGW8txVOZNxph7OcHhyeBI8n7/l2mJd8G9L/B4/XuA8=
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           
+           9.996694214876033]& ], {12.278814934002025, 3.4867457599351623}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJwd1gs01HkbB/C/sim5jGsubU1lxbozpdz6N2pjM1FrhcQkNiRRwm5tvDaF
+OA05oZRRyb28KclKo3rXhI2QFSuzsrUrl5F2V73i/T7vnDNnzuc8v99z+8+c
+MyuCD+4InccwTD7e9MnMzOH1OctwCEtZJiF8dYvADP4ztkAH/vVkz9MCuMNV
+8E4dZk0vu4zA0YfMjccNWUbY82CrnTk+q+LLqmGpy1z4Ebh6aaGbHxxmoxR0
+Hfb60mLxGwOWKT3TKPyVziuWcyLg1AxTs1lY1LkksF+fZW4FjalrWbCMZEu8
+eBOcF1IyawBX9298XaHHMklpt1J0YS9ba/8lsLApqHUBLFR/PpaxBPHA1sQx
+qrf4kYEmrLKLL20jt0Ser9BlmYYdE0YlsDwxwmI3nBHnuCOR+klIPGAKc1o9
+VvvCspwHVRowV9nlMA9ml4aN6MC8N3f7dGGuhVzKo/vFl+4owB0FdaX74bpT
+a2b+xn7kxasf1sKPrgUaTsNJiq/8NNBPqm7335/QfZUp+RH46rXd3Vy6v6ot
+6wXM8/vW343irTHam2m+qqKco7DEqS3iCvyu8eNsHRwd2j0yBcdmjubR/rg3
+3521wb5i21I/utO+Tnt6+MLdUe+T8mB5yIxmKGxuabL9NSyO6DLygR/9S5Bn
+Z4n+ChQ1zWCTlvLC72D2VMzDYeRfp/VYfhe2/iT1YArc3Xn18AS5wTiRA2uX
+e6fqW+H5dfyyNx39s9lyA3vYWiF4zzTmb4v4T/UWWHZiq0AIRy6zi9oKs8qh
+W6Q6OFc4pu1K5/dJo9bCqd/UfrCieMlv56q1WaY3iXmvBXOD9RgnePT9Fp9J
+1PfKSl4yoIU5ztuWt8CiezVsLux2tf3eZVgWv6EyEq5LORp+DGbyRpwC4Ya1
+iw75w1yDrmP74cqL/d9soPh6rSvZsEpTZrIFzf/8fFkH7LSq7IwxLNTjHVqB
++gEKdZ1mtC92fDqRXHb/gzPcsedk1iv4VpdMbzf1Z/bC3BPzSM+dKEylem2W
+V2pg1p0bfp/6Dds/p4p9jA46/zQHi/vspb6w775Ps2lfSR1/8c/Q9yt8yiMH
+lpy+WVUFS9b/4PASruZaHfg3LHJvb9KzxrzSJ+b5cPpnCeYuMLfu5XgIvO5V
+TboQFqdlq+jCtXc9bxyHq8sEn91AP0auveJcuu9TM2sHuxSlFZfDjKevTxnt
+W9/O4w7db7hdog1zoopi7sEdm+b9eRT7GT4u4JO9Vlvwf9dkmWyJwzo6zyz8
+rskHtpQs16mERTW+Gj0aLFOfzH1eQPdbFO3C4IDUjNp0qh/jslEDDmleOz8e
+5rQtcunmsEzOBkOTvbBwtn/sJhxwxEDkBbP6001V8LDjpXMsHJ2i2PUQvmQ3
+E8ejuI3h6FuYv2GPswVs7fBzsT3ybxPO3jWj/dS2n8mEjbq04q0p/ttX+yZg
+Ps/7piMs6YvZuRP91xbI/QSUvzSLvQ+PjMaohlL/QWHzV2D+5AVfr0yG5Y5T
+rXEw/45N5RXKb9nn+yNce29hqpTs3O44Audct4yYoP3UPVNnsM+4w6bjujao
+3/bL5Q+IvzVpLHGGZbkZnOf0/YsP5AWTn4X8fIHcs9zjB1hkPi3eROclkU8L
+YfFRe1EP+pvef+NFLczJP1j3NewQsu1pMyzXHVrajPme+Mdu74QlqoHh1rBK
+o6tPD+UTPa7Mxb4Uq/nG3RT/OK42H04QfPiqDU4yW6s8qcYy13re1t6HWblA
+87+qeJ6DwXtuUH+hPZUWMGvIOVtA50fEQSIV/P6K5pWn0vn9KXtN4ADrnzSO
+wELT2JDpxeg3ZoHtXqrXKxEyiD+y3LXbm/Kp25c5w2oy3SZ3yqf7j0IFLK8f
+8NlE8zqkDbFUP+p2L1miodf5F5yRv7xuK9VLDu9vRL/J0go9P5hbvVhLpM4y
+Xxx3fRJJ++grzrHEfOtsNgedpPOXvmcyYZNib+Vi6u/L10UDcF1pfjvtjztY
+EGeIfeU4zhwbo/q7zwbz4fJj0gZtW/yekncEe8J/rFUydoI5PYM3WFj4+oEg
+GI72S+jVgYMrQntTKB6i9qAd+Y2dd6UXw3IfN3E0LNM02ymBkzzUav5Bv0ZR
+26OewbJlifVvME9D6/rNw7DwkHt/M+Y195NdHIXF9ccac2lflo/Txun+73OX
+92G/efNNw0fIBbnNrsos4z3g/kpmS89jstt+Efa2KWSsk/JPDm7bthDzfL69
+qAnmFl/QEimhvmGh4DrM5FhNzIeHAm/7nCcn8N2uL8C+hc0mp+j80JoREVyv
+H24cR/kPWE6Uw3kN+blh5IsardNwhLb2+SCqpzQVF4t86d9e1QqgeRoH6nVQ
+f8ERs5JA8unD2Z1w7fddlftovk/PlhSiX9vlzy3iyaEmA9GY54O9/nAG5V95
+4uV6zDs+EOFcSvkDV7aPwwaaBcFSivPLyk9gP0PjP26kfSUlrfo4CXek8S5o
+2qFe5CIXK+xT8oW2hgN5TbqNPWyU3Gq/BxZLy0yU4GWZWSUn4aRFK1YW4v4f
+fRdUy2AJ70CLAtzt5+3UTPE7qrt4qO9vJV0vg2Ueyf4u6Le89+LWKcofYMCa
+Yp5Z+v8F//+1kP0fdp5jRA==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.77627226468353, 5.608447160322252}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJwV1As021ccB/B/1YZW2lCPiFewYmxkD+OUdn/PZtiqum7p2JY6a8vWquK0
+tKs+phPqkDBEvcscfSATuqAsK1bUc2ULilDromuPHMy03ZJ97/+c5J5P/vf+
+7/f3+98Th5jjkYf0KIr6GB8yUobki01T6zpc1jQlCNXFVcG8YXb4BKwYjGH6
+YEzITbXNxyjdGlxxGyPrkZnIE6PIXzPkakNTldWfJjVhHV2lVZyCuUntJg4w
+1yuHVwur5izmL1jRlNyBbyWDBekvXB6wMP+kZrIcFgXOZXjDsfVM+6NwbOhU
+QYklTQktzvrawyOXdx7aCnNW2ow6sa/PnTb7YguaUtfvFe2BR9wY13fCkqLy
+K1Nk367EKAquaw8K/pI4zGNg3hw5Ox5f2ggLDBY7FuC6ip0tDcgl2Rhpr4/5
+Ij2GYyIsON7tRp4nooZkkTB3zqM8C153e1q1D15v1Rk+ghVdTkEnyXrjAnce
+8vGUYm0rLNpwI+YaLBjuCrXBfuomMUuP1LdsOy2Bhe+WeYXBcqv0hVeR3/X0
++5lpMM8xV9ALp7SYOxfBvYX7Mkk/OLcSr4thTqQ8YIst6sgxSToKs543fvc9
+rLKzk7nAdazPHdztcD91z4ke7K+QfpQngeV+03HvwbEzOWtq+PwX1r/LkZ+a
+bNhsZY/3+9OyExtmlcTEu8DytebsZPSHuqRpMIMr/xyRDZvh94vTvIdYz5JU
+cN+CfTqt04rgXqMJu9ptqKPmkaU3rKrzavGAeXl/M/uQL3Zy/+KoKfpWoX19
+P8ysDXTOh3vXhFkPUZ8waMgqGea9aON8Td531s0SYgHN3udMzteR8cY8WNFq
+fk5Nzuny4+p+8ry+xvK7xAz9EEvslxLYof0FVvKvvZFILPiPQeaLpGKPMVjQ
+MLPbjZxHcXWJF/Lz/dz9LpP+tm5S5cBqoZvsZdLPkt+mlLAwzvFJIRxxvnQv
+A/2QlBcvv436Imq0AS7k/IiOvTQBaxLadzjBvF3dRmfQL9r02Tkd1ndfLr5g
+xMHz37nveRsuvW/aEw4rfmjwjYKD2GM26bDS9qtwFfJF37MxqIdVBbbZEbCN
+2FTZQ2x1+kAT6q1Lz/p1EHbNiV40hvUrtG+S+wrJX1NHTGhqQG78GlmfEJJx
+r5+J97VdNpZB5g8xH/jBldJIIz7Mbdx+VbgVuU0C/B3I/JvjBwe2ID9z9NYQ
+8mt0NathcEpQc180zLH0nNsECyfErauoV/qKTs8I5o5nLZeR9x0vyw6A1coU
+1Wcw9fQTWgqL4u/k+pH+dPVN7sZ+VHxmzA6Y+2HjjX9haXDGzAE4xWnUVYB8
+/MNnC6/AfN+quz/DkuEM7nNY6ZFTaI36DL1XhcnII+orO3YYVpsM/rMB+enU
+Br1SWLG0rTMCZo22hfwI89f9266SeiWz0mY4+YMbsytwyon+xDw4gcPwoB2Q
+Q//b/AhYP2r2yTfES2ZLGuy/4HN+vh2OyFexT8GaXQbpf8BMrevBEeQ3XnnG
+1sGC5DX9AtKf8qYZA0esF6WdCWXgeeT/1ZH0E9dm+n9frvJj
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.582298081084662, 5.349305811371944}, \
+{1, 1}], LineBox[{{13.500000000001851`, 14.}, {6.500000000002592, 14.}}], 
+        PolygonBox[{{9.4, 14.}, {10.6, 14.4}, {10.6, 13.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 13.0548}, {0, 1}], 
+        LineBox[{{13.5, 14.000000000002307`}, {13.5, 6.999999999998607}}], 
+        PolygonBox[{{13.5, 11.1}, {13.1, 9.9}, {13.9, 9.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.4452, 10.5}, {-1, 0}], 
+        LineBox[{{6.5, 14.000000000002307`}, {6.5, 6.999999999998607}}], 
+        PolygonBox[{{6.5, 9.9}, {6.1, 11.1}, {6.9, 11.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.5548, 10.5}, {1, 0}], 
+        LineBox[{{13.500000000001851`, 7.}, {6.500000000002592, 7.}}], 
+        PolygonBox[{{10.6, 7.}, {9.4, 7.4}, {9.4, 6.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 6.0548}, {0, 1}], 
+        {PointSize[0.04], PointBox[{13.5, 14.}], PointBox[{9., 3.5}], 
+         PointBox[{6.5, 14.}], PointBox[{13.5, 7.}], PointBox[{6.5, 7.}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T7", " ", "P2", " ", "N14"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdgei/gjfhfihjij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdgei/gjfhfihjij.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {22, 22}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwl1glUE9caB/DLUgiLmLJo3KOCRSwJCEoKlEQPskQDKUoJFB4opIBSRJSK
+0hZKQBBBcpRNSjBuNRZEpEjBAmU7GArYFJGCPGPA1oeCAVHQUinvP+2ck5Pz
+y8y991vuTGbtvoMBYl1CiAQf6pv8toBjGY/8c7B5hKXS7TgLJ8yeMe5h8cig
+S+SapTCvzop3Ae4cbkjPY/BIcuZ/xF/DQbHfPZ9byiMlvd91fgZzvLraIuGW
+dr+N0fD8sg+Le5Zg/IxzO3U+zmkzcYVp+ac41HjhnCCi2opHxgwbzsvh5izh
+D05wTGbcqZ/he4K5pDuWPOLzLGT5PFwgXimKh0vUcyZbEa/Hr0ledrDI4JOh
+RDjk0rVtby1wPpz8Wg2T5C1Bv8NvQs85P4f/ZI/IR2DmkvMV5g48Uii+7jcN
+T+xMDtsED8X33bbAfGPWJkVcWDE3fWI77On7KM4P9nHgtR6HFcv7nYNg1uTM
+4np4UFAoCYb/XiccmaHGW7K3BsJnDZ7K2MhHEZufyIcXqgKHI2D3Px5f+QDO
+yrmXmwmbWj9JXQ+HXNCyS+GOdP44Da446/zyG5hu62s4gPg/kvnez4aTQ/ea
+F8EHC2g/hsMcf/Nv98BeoQ0pTMonm9MsYXbUwGg34omQ3AoYRP0an+66Ggkn
+Z+XJL1L96CwWPUP+8uDwq0lwyPWM7ZFw8qyV5244SvvAp88c9escVbvDN+qO
+NLrBDnoNnzjBB3Zc3nT5XeyXEyl0F2p/VE6z6bA8xbfVG041jHTLoKOfP5pf
+ioJrQvdH68PyT4OicuGeocR828WYj13j1gRrrhdlfmaGeg7l/vUK7tcffDy8
+iEdsT9jYOSIfV4G95eewvG545UF4pTpQ5g47TBRbVcIbWFarWHCMxGjvH/Cn
+Vl8GecP9FVtdTVHPWTNZiAR+dejnjLWw2SLTW9T8JUfffuNI9XthutEH67fU
+j3S4wcunsn9vhSMOvsqk9kP1aBjDA/H6NPlXusOlC+L1tXBcrUbgBKuq3XIW
+Ib/s0iNKqp+HP48XboE9VVVNZvCfH2h+EsCKehvGM8SXnezxcDdML1bn3IB7
+Lzoe3QErZ2y8EmD6RJ7HWliTIptiwZzM09d6sZ5ic7W3FvU53UyX28NjolCd
+m/AA86tYMeKV3vCrOgZ7BCu7jiE/+niJjA+7GsabHDLF/Shwa7eBbcUrbgeY
+oH8BpRdNqfvr7iH/94xRjzV3PyTwkpzc+69pPDI1IjHWgWmDfEmvIe6f4fEJ
+MzjHs/Ljmwb43XyCs5Ean3nhZsU7PJJ2KKfBDz4yUDLfro96prk3fwknLm0L
+JjDj7kn7WjiALQ0S66HfsU5lk3BpRrhyRhf7bVYTbY98+7oOlNfAaYb2/fvh
+mrnY0VK4PkxlewU2rXZproBF4ed/GWJT+9q2TANXnszi6KHezruLg50w/9tL
+elmW8BfTuTllsM/VaWMmbKs+022BeOIi1G428H71ptVSOHSV6W9U/+xi3+yk
+IR+ed+joCrhyYvuuwzCjwKhyEVzXV3hVCY85FZ5+ifX5ceb3CepR0jFj0kb1
+KzYjzwoeu7buUTb1fF1XTteFHVblH+DDjeq9we0Y77BH7WcEt+1K4org7C2m
+nkrUI52vlbQinnpGwDs5cH2EcZcOnJBuwfoIZnXZJa1CPlOS1auZsOLO7vTl
+yD9i4ItHb+yRR9EOd6KDeE7NLn4I5/5trLm+wCWKYx6/9MIt7HKm/zyXqFbk
+1XTDe6QtV2bnuIRZt7l5ALaeai+se8MlwtposRYu8S43ks9yiSYgTPou1mO8
+/FjY9opLRJd3KjzgPUxnL7uXXJIw9lpxmNoP/drOkRdckqx6sbUKXimhbZuc
+4uJ5eaZhHHb+SRsfCPuskR3diPzjGl9zLOAEge+tKPhtQWrreup8uLivFK5u
+lJV+BcdM8qO7YKEecz0D86cd3xeupfp/XGkwCqsKjGj66A/nL+//dk9zSeW4
+9IoxbBlj+6Ad8Q0mPrj1jx89LP0B8ata61jU9UxV/v8KZrgkwtFHRs1X9kST
+xke+jGFXZ2o9abn5QyXMGeyuOAerRgPv6b7G9Rlr5vfCualj72txXrjRJcUa
+1n/SbJUBt7wQNjxGvkqBOroV8yt2SeKp56+0w+but1g/5nZPUCRVv2t6TRzE
+R7MYXUbdT6LBqG2pyCfBjWY9i/qL4qb8TSa5RK50LeyBp56ydGqfcUl16x3r
+Krg+VGyw7AmuL9q3uIy6/sRwQ9gI6rMh1ajYnvofKKkVDHGJNP6Uy3lYem7D
+uKMK8VaFvV9L7YfvlRV1zVxCDx173m//73tB2qWmf98PWLz/A7rNAR0=
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.077432877509341, 16.88857259237856}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt1gs4lPkeB/A3lzXrklnjHpkWkbLrsj1YaibCsLQO1jpymUpRZMdmt3s7
+ndQq1IRU58ROVmKXTJH7MuiCWmdKhNyryW0YGqdC2e//nDPP4/k9H+/7/n+X
+//vOO6u2fxe4U4miqLP4I5GSLuGzgk3990NnU+JrGQPfw0zx7dgAbTZl2GMs
+7TLG8Yg1Xj3L2dTmpB82ORDv2yO7Cpf3SrNTjdjU0FU36xtwpOnxojFDNsVX
++WLpPezbPfU2EBb2uVanYz2LucXoPw2QR82bthb5NK1ovRGwIEfXvwDes1Kh
+ToPlG5VsHT5hU7Hm593a9ZGvZnjDfVhHLdzyJsyde5wRoYP11Lc/L4XZOu/X
+yeAwaRetBRbt8dybwGBTuiaF9XOwnU8Zvxf2MmUuOJL1vQ83rtVlU+0m51qP
+wLz+LWqRME35Q24rHFBwaCQBLt/hVMlA/TxOan0EHJy+mBQMi/6VNk6ur6HT
+xSdJv717T/Vh/Smdga15sOSzzJAkuCrstX0BLJ7Q4L9Dfe6DzLSzcECbnf0+
+uGmM7hoGcx2SXcfQX5WL9fWPYTmPn78DlmY2tuWSeTGOO45jPlfmGPqmMGW9
+UjkZngr528bT6I95yMzECU4bLJsf1cP5TdfMaHCgi32ZO8wdzFVXYP7B2aGW
+Oag7IFFpRgvHR2/GqyyhTsF42acecF2s9j/J3Ni5ussuwpxLD+NnUKeYfmaj
+Kupx4BybSYX5szv1U2CV9WNfbYLp0YpcQ9LPBYNPGYgSh0drSxHDj04mL0MU
+SjRrPbDunVuu0+qwnS89ph2OXJW4dR1ZP2Kyyxt1ZSzPSNgGB5R3FRTBimWO
+FfkkX4Na8xQc5iGfm4YFv8lKGehraPUKvhvW4XreqtWHf2sszToB81YH67/F
++W5v/BvrST+nF9ur4fmSEbdRcryssiIKTnOacFmA7Xo+t5lGPGPbZKNAHCra
+e5fMoaLbRiFBDLDqVZUiL1f6lcZ5cr20ejAc1nm59+h6mP6lpv8zzMO9UmtY
+TPqxMOiLhTfv17N3gtlymYcmLHT3zMpB5GVOqDzAfMNbphnziEx3nnER4mS0
+iVcQIpfm1lSISB0sGozCvoma08Lb4Kr06z62eK7EgXd3kfWqlr/oMNZC/arj
+gjh4HUetwUETx0PFkyOwbuZT+REN3E/Grx3jUUeaQHrigzr2JyV4FYW6+zyV
+fqqGueac7mx4lMWrKoZFj7KCrTGf0I4UaQdMFcX2FcP0vKY+K6xHDTknmGLe
+B0rvzeQSl+6wSIKvNAyk2CI/1aZxuhimQowr78GS7JOdzWS/Aj/Mh6NeYa3E
+qBrWnExbHIHl2jKfdNjkiw++fuhPmOBv5wGP8vK0zsKC59Zeg8g/et009xdi
+tYF9MXDhrXjlwzCXL68bIfdXyoCXKTwk8u0LhVMavXNPkXwX/bseof9LoXq7
+a1AP3azt1Dfwi6poqgH104td7Ccwr7rOe+E56FewIt7oMlwou5HN/Rjzjdxt
+Ew3nv7jK0aNhv1QPi74m+2k08azlI9SftckmAqblt7emqOL/+xMd02DRfOez
+bSrw57vO9MLhq4d/iFLGXMLc7DYjv+jCCsUZJeSPK7raTJ4j0VPLiWWY12yM
+ZSDqF12vnDwB2zn0rSX3rbN2smoITF/8peYo+vf7e/37SFjQvtCvjnkxzfkh
+l2Gx1ZJRCpx0rezxIvHj6SdTZN7XfCaPIZ/d4urbLvjeoI292s0g9XRZyqJh
+E+0GzRJYzC9MTICtG4b8NqJ+5oMK/RDimDyjGphbpZdhCrf8GZWpi36Zym+2
+t5Dvnfdbyj1gthpbuBUOMFcbZMH0SzaiftR76aDEVwUWeG+WfQOLjld5nyPz
+Ke7Z8BD9dZsLQ0aQX5h+5VcOLN4/zlCCmb83tT7GfA7cfDM3R/pVm7mYCE+W
+aD6/T2FeQmWJDdnfPIaP2hKL4gVY1SnBzMsnj8Uvsii7Ax0zC5h/S/n5pN53
+LIppRrM1IM+z02hd3Bu47plnELl+tnHWeQ4OkLFLYN7ztvBvX7Mobq7kIBP1
+8D/6sf7pDIuiJxu+LICZC2d335WzKHlE0C4Xcn/2c3IsYUG1/XoJLOng7Z+a
+ZlGUhrPfDszD8B9PexxwnF7+pHcc5qy0WvMAHnpwojwK8+RbqN8uwfrCrU8q
+asn+nNsy1jyL8//IZ86T91ycX5AC9QR8Vt9pgPcA0/GOhgXqFbQuT2XA3Hc7
+1zv/h0VJtmn1yHB+oc79Qwbob0i6ybGIvAdtL/z4OyxM3XPXB37roz47DHNf
+rHPuRD3CEcWrEpjXlMMNJM8fZ2YDjVx/xGCwhfTz8Oc1cuTjvWy+xYbFvmmu
+cQrUZzJ0vxHzMPxJ/5OTqJffqfFzECyp+O7GFvTHtX0Vt0jmmeBkXDuB40d7
+CxvJ93hK55MsKeaTb91fQMw3+nfUMOpbiBkm8+cadX+Z383C/cgq6SLvAYZH
+5rF2XD/V/60Z2Q/j7+9U17IotoWFYzLj/79jMv74X9Rl/wX5tzcv
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.2807968978321704, 3.5703782848251917}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000006366`, 16.999999999996362`}, {
+          13.500000000003638`, 15.5}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.457682641291616, 16.911908554403006}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwd2Hs8lGkbB/BRrRQyapKknMIUtSMlh1ZTSbKqIaGykVTDKxRZRUxFUWhI
+kZAWJaGpkFfSFJW3JJtjJSadpkWGohzK+7u2f3y+n/twHe7nyXPT8Qpw2jmO
+wWBoyTEY9JPxfQz/ZnEZTAKTyxA6uohXaXIZ9R4Xso/B7PXWp9JhXvQh23Gq
+XIYoUj1BYTaXwdDcet4fDq18rhoNi+XGf38E53Fd706Zw2Vw213DFadyGdJf
+eNcuwpIr3zlL4UDNeykWWljPW6JpD8d03Rn6GxZ1BDnYwOLBPLapNpfBcU9p
+MaDxL3W6B+DAaP9nX7B/lmtyVxnMHMw1KoKDRy0fyGDxE3b+Zti5OsFWS4fL
+8NRYcXkY+adO7vZZBQtddXrPwJqzdFLdYYH6wxMcqlftVpEvzBi5yLqggjgX
+POT8YUknJ7N3CpfR5hTqshsWF2y6thUe3fy/dleYm/taq0uZy1Cf3MJeQeul
+Fetz4LzEdUx9Gk8ybT8JszSX5v9C+YwLPkLjzC91C98jX22LlnefYYWTr988
+gD2L/k73wf4ViueGr8CC/V+sVZFPwWzFuNMwV9n5sAQuc/rmH0X90fpiwUf+
+rOwFCyOoP7yFO7th3iONwcO0/3xbjVA6r0erY4TUn6h6T3n0k+HCNc2H61Xl
+9JPgHF3PZ3W032nxHrVpXIaxm7f4hzadc15iAmz+dmBkCdUfVcQfhFOd77BC
+YNmf/qH2LC4j2SR1bQU51nJmDMw+/HuqvC7ih+9KKoSVZnc/d4KFKlnG5bC3
+t/qtTJjZL7QogmuSFeWlcFZpKPMkXD35RLqxHuKpvB1zgm12XY71hbULpy6Z
+BGt+DtLLgrndBmnXkY+EUaJeS/bYWcCD3cd3R/TAgf07HLpQX222Wtv4uYiX
+rXriGFzdKTZSgTk5j/wNadzQtINcn3Hx0XP0i3+tvFUeFiW79cfB7iJrrwHK
+x+BeET1f6rHHtF7Dgt/aBq3oeVeqGr0LMx30OpbAvDssDcpPFrBdYEf9r5UW
+R8Ii9i/dQeT/zmZup/HOXUa36Hn179lqC0vklOyZyEdzTUamCZxlesA3HK5Y
+1505l3yw9N032O6Q/t/aMM+YuycC9YZKL6wxpPz8Hq5URH/C9Zwum1M8nUbP
+c3DMYL/2JpijsLJEbzp+SmT+4TAjZ5lLLty6waW1EBYeziidqYbz6Aszl8L1
+XT7N4XDwjKWK86lfxvv2PIEF7uMO7aX+SOynjJ+BuMbBERWwp58RVxeWxpq+
+VNDHeFJGAhuOaRA4OMNZHS4JanB6guv5dBqfqdDSg/0WvzQs6oC5Fd79Ilj9
++vycWQboZ8iMFTvgNo0d0vVwvU51swIc6vDnylBYIp+y/hLyZ4QWvT0LC4Sc
+NC4sMIkNyCcXfK9tQ/0FBufGbtD6BYofIuGowwG612nc40faQrjxZGFTLsyt
+vKnfg34KO0PCkuBApW0z7tLzlF7yhOIxh0IXXYa5Jk/vbaH9Kn3WkWNeRBy3
+hBkHu63F9Dz2d/yhAfN89Zv6aL941+hRqleruMUS8cSX/9J/C3uG3GDR+XAC
+283qYQZreugk5M/Wifd7QPOzgo1jYHfmfr1qWPt5ZxUT9Y+umbXxKSy5pL47
+ExZdCj76BuadmDjJGP3l5Vk9YiC+9qq89GJYKdzw9nzY8/hje1N1jI9TPrGN
+6pdezs2G1RvuDKTB4kBWq9xMPM9PbL3baf3HTXX2cO0nRp+BIepe/tklHFbi
+Vwr2weKDIxZnYLu2Za2VsCDX1Jac+rH75iQ27NnvdAiublSV8GDPySuXboDr
+vyzlJcGBc7ilynB67sQltbDwU+H2CuQzmhmn8gOWRH4M8oC1jefe05uH8bjm
+v0ZQj/AHP2U5nMW713MGTq7N2MiDOfVKfFOYrW+3wAUWJ80b/wL9iWvteOYI
+M1S7Np+E07uubrSh+VcPRq4nq89c9CvMDZE16MPvlOTNWHDgRw/JNNjtQAF/
+APmIRpqtNGC+Sv9II9XHCThoAWdpKJiW0PjeuYZ7YYf9Tvap5IibNXfpfXE5
+6yFg0/93v/fR+xGY7L81gOp75++WArvFDrTtYtP78eGHOuqdsOMQm//vfG9n
+Oh8HYxWNYLLLj70m6Jf2ba7mSZjhHWlTCVfsr9IrhOv3hD2y0UDc2FfXXlC/
+FW5ZiOHa5vJnKqhHtLR5gzF+z0vPHjNeD/NiZ3tFk7+mzzhN/XLYeboG1vQ8
+kt5G/U7M7P0Ci/64dYY9H/N35wjk8R0gEaZWBcNC+zA3BiwYdH5XCQu8E4Wd
+tL5m+MkEI+wnnGh9Dc67kBZmAzNnCLb6wLINJ8zC4cAnHldYsPu498n5sEC3
+MboE+YpFR5PqjOj87Sp5VM+DunMfaT+ZpXsX6tXsG4gdoPlliQEnYNFyh7Lv
+RlR3Yesi2Nm8vLsP5vWFsD6hf8sYfps7YdkiodJ1uMaYlfCE4p/O64mHy9rt
+d1+DhdcLfjkCC6aXD5+i/e9YXU2A2fP+EQTQ+mu7fi2GKy6m/caj9dqOL/vg
+HM3s3Yspv1Mt/asRP0r+D9U5FP/2p/pCOh/XxKkqsGdB05A+6jEPb/qqQPv7
+uqzOhxvvs98q0Xrpq0lm6EeOzuGMWVTPs8Xrq2F1bm3gEvLm2J8b0O9Au3LT
+LeSJQbqNcKMs2C4W1u6VqTrgOyw0h5N9j/bfMuHyTbhM6tgkZ4z9+9/5TMR3
+WJ6xSNMO5hoOlNjAo9YbQ5LId7ubfGCbyLc322FtA2W1EDiQJU2avwD5W2U8
+oXGm1avGIPJDd0db2PzdNNcymOc1fUgZrq2MnjcIZ9V39lchPstmZ7bRQpwn
+z9LID5b9bAh2hTlrZukowt4jrcWhsCfDsDSX6nvO7EqA6+0zh7lwbUARKw0W
+mAV8e4N+ZCWk5JB5TxND42H+4PmIRFqv3ftiDdwWN9wTCYsa+lvp+fIzP5ey
+G5ZFlvh9Q79DVxzh28PiD7sv9cE2R7Yfng9rMzecn4D5yedeaU2GmTFWmzlw
+nLnoWBfqkfkPvg+CK47nvq+HRXvy1z6l8dFlKytgTtWLbAvkq102z+sajAfb
+vkSTnts9ZVdpXHLlsxXq1a6WbroB189c9KwG5tkOva6ifjXFf3Ch/s0XRUpg
+8YZy3Tcwp7X1y0TK92JVmhe+k6XTeyMtqD9lrKpmOLn/zY8gOKawv04T3218
+S0dpCfVnTNK/Cv4+dt/3B+z20zTVA9Z0nLvf7lf6flgxIQBum/jg72SYvTbt
+517Y2fTdMgksadnVwIfjBvjWLA7yu2LOc4ZfZjyvWAIzLQ/dXgK7l1df2Qhz
+dT4+nAK7ZW2x2kPzle4N30d+fmGzmg9z6PdvwhZPuLZ077REmLHg5oVh1Of9
+6fODNDjw039fn4WjRheOZMKeKXrTLOHyM7YjGRz6f2DxVyn6ldR1f3UqLNF8
+UXYZ5k/cGpdA60OKew/AU4dPXKV4gkvL3bxm03u9++I+ys8s6gFZMlH5qBfM
+ExRNDqf3I0JtrxPFk9j0F8J/OWacXEXzvbdzv8Ev860+mNH+a5vvbkI+Z88n
+hy+g+T7XNz+ES+VeGbKpnq1zzVajvvtDD88YUn7Tg94/hdvWbllhDJfdTHu0
+AP0pGBTvof3MVYeTgmGlu1F6tnDe4og6utfU7jfhbIXFndNVvsMnDPzZ+6me
+7ttzOPjOtq4I9jsNs1fKszzgfcKyhSWUn0b0rqN07/geHP6C6htQHzsPV8fU
+rBmDhSsSV+Xp0P2sb5++Cc5PNGN23r/7mbTZw+alekM0P/+sxMcf5k/vro6C
+1bx01E7R+M9jb3fABXaPh67CgVq6WlZws804l2rYbrXsjBLsFG+S3gKLP6Zk
+v6R7y/3eoPcw13ZazWWY3SSq7IFjJMrxIXB6/qRzMpit+8p3LbxILXLzZ1i0
+zqBIF3482BX3keJ9CPKYANc158jayE39WyTo72hIiu8zite0o7QO/soqH7tL
+8fht3k3wSw7nf9dg3pSOwa9w9cZU6QVYavzhgBr287cfC0uE3dqDen+DS9WG
+EqPhsjUp2fR+ZDlvm3PIhO7DBTK6l61XMJCFUr1L/2z6h+5dE2ryDsCy+IjJ
+dD5Kz46WRMKpHU4af8KpTxrsT8LqgXfD7sDyv//mlQ4L+XUFDNx7JF+Ty2/A
+rdaCddbwlsfFL59S/ndmWgTDgT3H1KhfwoHh9Cy4OPDXsyqLkG+OotJ9ujc9
+VvBYDPPe9sS3wDUq07ZtgRWmbroioXtW9q4gAVyWN9XnNdxuxYnIhbOmZG+t
+g3OCS/k1MMd6eXwx7HJLaiqFv++/EZ4IH/tjVG6CKfJU/I/ibth55JLWLJjv
+GOizFOZlnlZcADMspv2cADcWVYVZwHbWTuuf0/PC+8uTC6fGynVehFtzrrxf
+AYvdmth0j4yYfzrAmtyxx9MR9sowSDWDzRUPhNO902akwdAIzrORqs6l9bXu
+yrPhsmMzbOfAvn7vNyrDoYrn7tP4/YGWGT+Qf0yAYdFSuEJTJawHrtk46aoL
+vKjpYWoHzM749lJA+xk3HGiE7erdpcV0fq1pk57CnjonWX0U/4290mPq96ij
+vSnqC+69qlYLh1osWHwAtlwtO94Aa7fobBLD/2RVREuof4eX68nTPcv77HD/
+IvoOKtC1g9vbHp2djHyZFZqMKNj99+sNBuRtKVduwWzHHUO2MNvouPcbOJW1
+xsCX+m9sIBmDk/9zxO0UjYuPrJqKe5dz+83QEupX7nEzdfjdj9M7X5GbL71X
+hX/S33dgBfr7zlzu/wFLi3W0
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.041851370299756, 4.042946021129489}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJwt1As41OkeB/B/ZbdxpyyTW6NUyj0Suew/93bRpEjiVG4rpxinVsqlOeSu
+TC3tpJJirUsubURFlHLpYqZNs0QZuaZIK8xK2/m+55x5nnnm+Tzzvr/3+/u9
+/xmdgAjP4IUURZXhTT7/99KnKQb51KGp2L+10zxhTjrf9QuLprjV/MkCeLRW
+S/s9zAm69mAS7mpQOC2A955+KdpgQFP8qYLky3B+3lt/DjxYf+BqCKyXtm91
+Hvm+RH2fDix35VNZA1ylF7WmZDnqqxcZd8DFY1ssFsO60oK7Apgp4CsGadPU
+Dr2Ezc0wK2x6sEUL9ft82aUw45NejgXMuDtlnQLTgk3uNzVp6rGq3Cs/sl93
+qdkO2Oak5o9GsGvFDm1ZWBITe+QL8rNsHALFGjRlsvFE4DPiwOzfOmHWavus
+cpjpOaw4Avf+6T/Hgy1t9/apYL9BW5EuF2YbNkn7wqlvUt/GEh8aNL9G6ie7
+cFJhyvS+vAryaRb+g0Hmx07pvhQDh7YMWj6GhfNONWJYstugYSHyCSu5m2xI
+vzlb+I7E0Qb5KfBhmQyTLJhSerKhAa5TDDvUR+bhfzi6C3aLX0itN0S+b9Zs
+E8Fdtq1eiTD/Ff/bGjjoy7iUEE5lTYb/COvyPr5UMULfgsjrTJj2qtDaCke7
+b4i8gjyTTtE/xcKW5+0OqsGWGQmN52ElZmpGHPozicocKYMls5lxPZhPUNsU
+q5zUa7sdbAlX6WduzYd9Ep4ePq9OU9maW5elwJORkcmycOqiLEEgXGzgc+/U
+Mqzzf+NhRdb/4uKyDla5f/0PGVh8ymGwn4l+4xf39yB/qN77gVrYJ6B7tBKm
+/nr97ios3lrtkA4rBVVKGuFQ72sTB+FRKUbABMxxWxviD7dp7JA2R/0qe99E
+XzIfh7KTGXCdZk9ACFxVrP/zBEzJ2nn9G3a1/9XIG3lttG68KIW7qHGt23Dv
+xvmSfpiTFLNdFf1OclXurURelpO14z5YaPwlKRzWK5M4nYV1z4vEd2DeyVsv
+q2BK+ANH2Rj12+s+l8O01V/XA+C9BueMM2HGwzqbSpiqKyn+HpZ7b/ZyClaS
+fHGewPm/uRSOqZrAq385cgT2iFOLNYR9CswXv0P+GabLkA0svh/btw12U4x7
+5AhL6upqKjGPDimxtRPMtBOUy8HOI/WldjD/8LnZCDWaKu2zHTeF23RS/ilW
+Rf7mIUMWTEs+6wfBodkRvTJwdFIWm4JTG16bjSCf5Rz/Ut03uNfzpY51cH4a
+0zcL/rjubmgmzItI1UyCM/XWTIXATbsOiviwj9q+V9/Bxdly3a3wgWS3gk2w
+T0f8vDzqUwXTqpYw98Ly7mBYr91xmyOZTwe9pB02r+y/uAdmLlCvMEH+q0Oa
+0Wkwo2dDVA5c7M4800TyHdfbPQl7fAo+tAD56z4YiDaReXBmx1bDrMRAhwg4
+j9bR3UrmKxAap8FNQ6sORsOjPUNnk8h6Yc5Xl+HiaFu5QHhFUopFK5lnu5tA
+h+y/5hb2Bg41mWltxnlVLn72X5ti/4jhATe4yNm+VBMW62rxmpC/QzVrWB+e
+5PiuXA17VM3mmcFdBc9eJWIeuUHqA8SMpO4RsQpNvfAuWmsIs7W3H3SEuVEf
+trBg4YoIx5qlNNX51oujAKduNkm3gkWrJPJ/IY8wZ9xDtAT3aia63w9z9niz
+s2D1XebbHpK8uxsfhMC05qXIatjEM3GzP9wU29FB+q0K0iqJhFuO1w7+ROYx
+vt/xMqz6jDGRAbPZ1gMjsF+r4bN08jy9sFajcT5ldE/rNOx66XN8ARzlrfsh
+D86/qa8ti/zR7RkMch5LoH4nAn5o23hLQO6Hm7DtIZxfbrHoA8n3/WcvFcxj
++Kw+TxX91aXLGLnCK9jPO+3gvT/UhO+Dowqfa4fCoVSFpj987GZ5OQ/2eZv8
+3Iqsl5p9eIOsH+h5PYv6YZ7Kr7tg2sPH4hw5z/3vnGky37hODx1Y/aN1p+x6
+3E/v58U5yD8vd25AHRbuWbNzDv1ecLYIXwFLjAYlO+GOxLXJxJbvxUtrlGmq
+2jyxUAOmd0mJmHBvSPMVBbI/xUg5XQm/V4dllfM4z1J5qlcBbnmsaDMC53/b
+fsJHEc93V9o7AXk+tsy9e6SAe2OviKuDKZ1W91jYl7/26hW4ybmwNgwuksrU
+If3y/I/2Z8P3wyZ2JsAcNUvXaVjy1ib1GOmfLR2TiPqUQwv/KMzaOeeijvO9
+hY+VuGT/Mr+XcbCCgpXyKfI8BYjih2D77373LID5K89Ob0E/dh6q6xph5r9O
+WBTCxYwYnpjUW1XcPA6H83LXf41+2fVjX+lgPjNjSQlGcFNhSK4VHMXb/GQn
++X5KKcsc5jy39+TCPjVRGUqwUUrJ7iKYmbdr4AnqHasd9moj+43WnQmHfePT
+hgbJetHF5TPI1za/aG6OzP9kb/h+OP1RUK+0GZ7nymfTF9DvxLyllTLcdLl/
+sQ/mkT8ov4qYzv0jcIk8TdV77tCQgZVmggNfyOL/pqV6dh71qPrsggYZmrqj
+Yjo2Blc9zXZtk8b/2VRtyHOY0z7hJQVrN8sr3yH3y9bSPcrAuiusIpJ/cpXM
+p3Vw9e4Fgzyy/9awSB2ecX8SGQ/vreb5OsMWRqI2Dqz0wHbyV3hex4G1H86v
+KFPdiPp+CY5+oaS+sFQ0CusZ31sQAfMir/pWIZ93qpFxHCweXpN/HPmV9Ptz
+z5B8Do5WrnL4vToq/VwBc7meKvOwT72phpDkqfK0O4X+u17b/z5N5mu28OwU
+nHvc1FAb88i//SB4JeZlqRoa7ULmOaXZqwYvKdw+FQFTLE2/DqwvrL44mgOL
+TU9fdoHfNT56UEvmeaDvRgrO41GfTTphzlOthhzke9V9TmMMnpyOS4tB/gu6
+fwolMJdmazmhv/++zP//yaD/A2Slx6s=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.25695895996216, 5.4856114964743385}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJwt1AtMk1cUB/BPoqVCkVKcFlAEdNMG0OKgA3XwARVfzFWYZHYbqygGpJGm
+VEU2tTAeBbaEDSRaBaoyHZLwqEoUSm2ngBLQ4iBDXimCik6wWAaKgvvfaZPm
+5Nd7vtNz7r35POOSo+JtKIr6Bl8S339c6ffRk6ZqIp1jD8LPLo4G3PGgKfYW
+6/edsFbQ662CLZd4wVw3mpq2PyAIgfnWFs3n8Aq5l/fDZTQlEda2hcEXiqSl
+obCykdWwEj5Zb2Sdd8d62jmXMdTb3yg6y4KVtLv/KVgWbeZmLqUpM1Pa4gvv
+m+IqFsCShHxjrQtNjZU1Xa5egvzckHFvmHNXc24/bHjTW3GeS1OB2/OraVh0
+yFHiAUet9u7xI/k7nwsrFtPUV51T2g2wxT17WAi3zq89EPt/va3trxbRVI93
+IKsQrrFtFt6BU7e15nURT7Y7XIfrXuh8PdCPyGZZOFmPeLKqVQoXKBI3v4Yv
+XUhwvQobqk/cj0B9seMcZyusfGZiVMHXwlL9PTGvjK2v4qG/THFL1zq4oJB5
+/DL8OOnwng1kP1aUSoWYL2ySU7Cc7NdfDqwuuLVfnPKC1MueM/kd9idhprhY
+A1Mx6d7dcNrbXaOBsOypVkHOI8HCbWhA/2ax01UVvEryZp8vTOX+wa+DSy8G
+0YWIdFmF/iYit8hPYEUdQ2jl4xrYxotSRZN70cV8coyc988Pk+vRR43CrpwP
+SwN67vrCpoHrylbkFfPs+7WYw+B3eHkUzCljDX0Bm5vkvLvIUwyMvJsDm1xc
+2jfC/PP9sybsi/KH1ZkG/L7XhhvSAEtSbqs3wnbvtFU3YJnnUVMvYh1j/QMS
+DYdsZlSIosMWJgt5SiHHuIM8Z513ZBssaTJuCoLTXvsVF5H1Y2fcQuG9T3lb
+B4nbmp0SyXmkzN9O7hEtDoushhm2kcelsKElIJqNvGzb3rVlZF75YHgOPCFq
+T9eTeec2cxYg+kvu5DeTdc3R/hJEi09O5RXEghfWTWswf/fLCnUOrPnU0VwP
+3/a1/ymE5DGyMoKwf2ud8t/2oy4/IquhHE79LWMqHqb1S92n4Dzj6yIyb82Z
+ul98cG7ySt1YOGy+d/NgGPwtT3i/HPdOqbz2/DM4z8FNPhdm98QZHOALaU+d
+Ej9CP78yk5pRTzx8srZ7IXzl7/F4OC3WUfc1TJ2WV42jP68H9xpHneG3qQwZ
+XBW3e+VpZ3IfhxeOoG9B9A33PXCNoG3LbrjOZnNcBMxnVM0bQt9tW7TBQtjU
+khWggO8LCk6KYU2g7b+u8DNjHzMbNreOrO/DHKt72PZ/wqLgs2py7sqkL9fN
+Rz8e7R/bEe8VS9U7YVlnQEcPHJz7ckQDi4JKlC6oJ18yOD4MmxdrGOT/xmZ/
+H3LDvPSEqvsRzDY+KqFh6pOV/ET0+6rj8eR2mB83s2sKvrRmwhoOG0SzjrmY
+t1zRML6UPD9t17cI+3MtLaO+D/UtJ2Z+PAWfiWLkpsPs5JHNdtjf0uW9Uwtg
+k09Mzh5Y0OEzoMI8dMstvQbum9a5TXBQXxg6roc5RQMxMbCsY+yWDp7WjVZf
+dUL9ruhiNaw+suMAl/gfRYoYPlQnrcxkf3gvL/kQ2fR/EnMCOw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.118561596984358, 6.001529066331595}, \
+{1, 0}], LineBox[{{6.4999999999976925`, 15.5}, {13.49999999999251, 15.5}}], 
+        PolygonBox[{{9.4, 15.5}, {10.6, 15.1}, {10.6, 15.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 16.4452}, {0, -1}], 
+        LineBox[{{6.5, 15.500000000002307`}, {6.5, 8.499999999998607}}], 
+        PolygonBox[{{6.5, 11.4}, {6.1, 12.6}, {6.9, 12.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.5548, 12.}, {1, 0}], 
+        LineBox[{{13.5, 15.500000000002307`}, {13.5, 8.499999999998607}}], 
+        PolygonBox[{{13.5, 12.6}, {13.1, 11.4}, {13.9, 11.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.4452, 12.}, {-1, 0}], 
+        LineBox[{{13.500000000001851`, 8.5}, {6.500000000002592, 8.5}}], 
+        PolygonBox[{{10.6, 8.5}, {9.4, 8.9}, {9.4, 8.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 7.5548}, {0, 1}], 
+        {PointSize[0.04], PointBox[{6.5, 15.5}], PointBox[{7., 4.}], 
+         PointBox[{13.5, 15.5}], PointBox[{13.5, 8.5}], PointBox[{6.5, 8.5}]},
+         InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T8", " ", "P1", " ", "N15"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdgei/gjfhfjhiij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdgei/gjfhfjhiij.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {44, 22}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwl1glUE9caB/DLUgiLmLJo3KOCRSwJCEoKlEQPskQDKUoJFB4opIBSRJSK
+0hZKQBBBcpRNSjBuNRZEpEjBAmU7GArYFJGCPGPA1oeCAVHQUinvP+2ck5Pz
+y8y991vuTGbtvoMBYl1CiAQf6pv8toBjGY/8c7B5hKXS7TgLJ8yeMe5h8cig
+S+SapTCvzop3Ae4cbkjPY/BIcuZ/xF/DQbHfPZ9byiMlvd91fgZzvLraIuGW
+dr+N0fD8sg+Le5Zg/IxzO3U+zmkzcYVp+ac41HjhnCCi2opHxgwbzsvh5izh
+D05wTGbcqZ/he4K5pDuWPOLzLGT5PFwgXimKh0vUcyZbEa/Hr0ledrDI4JOh
+RDjk0rVtby1wPpz8Wg2T5C1Bv8NvQs85P4f/ZI/IR2DmkvMV5g48Uii+7jcN
+T+xMDtsED8X33bbAfGPWJkVcWDE3fWI77On7KM4P9nHgtR6HFcv7nYNg1uTM
+4np4UFAoCYb/XiccmaHGW7K3BsJnDZ7K2MhHEZufyIcXqgKHI2D3Px5f+QDO
+yrmXmwmbWj9JXQ+HXNCyS+GOdP44Da446/zyG5hu62s4gPg/kvnez4aTQ/ea
+F8EHC2g/hsMcf/Nv98BeoQ0pTMonm9MsYXbUwGg34omQ3AoYRP0an+66Ggkn
+Z+XJL1L96CwWPUP+8uDwq0lwyPWM7ZFw8qyV5244SvvAp88c9escVbvDN+qO
+NLrBDnoNnzjBB3Zc3nT5XeyXEyl0F2p/VE6z6bA8xbfVG041jHTLoKOfP5pf
+ioJrQvdH68PyT4OicuGeocR828WYj13j1gRrrhdlfmaGeg7l/vUK7tcffDy8
+iEdsT9jYOSIfV4G95eewvG545UF4pTpQ5g47TBRbVcIbWFarWHCMxGjvH/Cn
+Vl8GecP9FVtdTVHPWTNZiAR+dejnjLWw2SLTW9T8JUfffuNI9XthutEH67fU
+j3S4wcunsn9vhSMOvsqk9kP1aBjDA/H6NPlXusOlC+L1tXBcrUbgBKuq3XIW
+Ib/s0iNKqp+HP48XboE9VVVNZvCfH2h+EsCKehvGM8SXnezxcDdML1bn3IB7
+Lzoe3QErZ2y8EmD6RJ7HWliTIptiwZzM09d6sZ5ic7W3FvU53UyX28NjolCd
+m/AA86tYMeKV3vCrOgZ7BCu7jiE/+niJjA+7GsabHDLF/Shwa7eBbcUrbgeY
+oH8BpRdNqfvr7iH/94xRjzV3PyTwkpzc+69pPDI1IjHWgWmDfEmvIe6f4fEJ
+MzjHs/Ljmwb43XyCs5Ean3nhZsU7PJJ2KKfBDz4yUDLfro96prk3fwknLm0L
+JjDj7kn7WjiALQ0S66HfsU5lk3BpRrhyRhf7bVYTbY98+7oOlNfAaYb2/fvh
+mrnY0VK4PkxlewU2rXZproBF4ed/GWJT+9q2TANXnszi6KHezruLg50w/9tL
+elmW8BfTuTllsM/VaWMmbKs+022BeOIi1G428H71ptVSOHSV6W9U/+xi3+yk
+IR+ed+joCrhyYvuuwzCjwKhyEVzXV3hVCY85FZ5+ifX5ceb3CepR0jFj0kb1
+KzYjzwoeu7buUTb1fF1XTteFHVblH+DDjeq9we0Y77BH7WcEt+1K4org7C2m
+nkrUI52vlbQinnpGwDs5cH2EcZcOnJBuwfoIZnXZJa1CPlOS1auZsOLO7vTl
+yD9i4ItHb+yRR9EOd6KDeE7NLn4I5/5trLm+wCWKYx6/9MIt7HKm/zyXqFbk
+1XTDe6QtV2bnuIRZt7l5ALaeai+se8MlwtposRYu8S43ks9yiSYgTPou1mO8
+/FjY9opLRJd3KjzgPUxnL7uXXJIw9lpxmNoP/drOkRdckqx6sbUKXimhbZuc
+4uJ5eaZhHHb+SRsfCPuskR3diPzjGl9zLOAEge+tKPhtQWrreup8uLivFK5u
+lJV+BcdM8qO7YKEecz0D86cd3xeupfp/XGkwCqsKjGj66A/nL+//dk9zSeW4
+9IoxbBlj+6Ad8Q0mPrj1jx89LP0B8ata61jU9UxV/v8KZrgkwtFHRs1X9kST
+xke+jGFXZ2o9abn5QyXMGeyuOAerRgPv6b7G9Rlr5vfCualj72txXrjRJcUa
+1n/SbJUBt7wQNjxGvkqBOroV8yt2SeKp56+0w+but1g/5nZPUCRVv2t6TRzE
+R7MYXUbdT6LBqG2pyCfBjWY9i/qL4qb8TSa5RK50LeyBp56ydGqfcUl16x3r
+Krg+VGyw7AmuL9q3uIy6/sRwQ9gI6rMh1ajYnvofKKkVDHGJNP6Uy3lYem7D
+uKMK8VaFvV9L7YfvlRV1zVxCDx173m//73tB2qWmf98PWLz/A7rNAR0=
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.077432877509341, 16.88857259237856}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt1gs4lPkeB/A3lzXrklnjHpkWkbLrsj1YaibCsLQO1jpymUpRZMdmt3s7
+ndQq1IRU58ROVmKXTJH7MuiCWmdKhNyryW0YGqdC2e//nDPP4/k9H+/7/n+X
+//vOO6u2fxe4U4miqLP4I5GSLuGzgk3990NnU+JrGQPfw0zx7dgAbTZl2GMs
+7TLG8Yg1Xj3L2dTmpB82ORDv2yO7Cpf3SrNTjdjU0FU36xtwpOnxojFDNsVX
++WLpPezbPfU2EBb2uVanYz2LucXoPw2QR82bthb5NK1ovRGwIEfXvwDes1Kh
+ToPlG5VsHT5hU7Hm593a9ZGvZnjDfVhHLdzyJsyde5wRoYP11Lc/L4XZOu/X
+yeAwaRetBRbt8dybwGBTuiaF9XOwnU8Zvxf2MmUuOJL1vQ83rtVlU+0m51qP
+wLz+LWqRME35Q24rHFBwaCQBLt/hVMlA/TxOan0EHJy+mBQMi/6VNk6ur6HT
+xSdJv717T/Vh/Smdga15sOSzzJAkuCrstX0BLJ7Q4L9Dfe6DzLSzcECbnf0+
+uGmM7hoGcx2SXcfQX5WL9fWPYTmPn78DlmY2tuWSeTGOO45jPlfmGPqmMGW9
+UjkZngr528bT6I95yMzECU4bLJsf1cP5TdfMaHCgi32ZO8wdzFVXYP7B2aGW
+Oag7IFFpRgvHR2/GqyyhTsF42acecF2s9j/J3Ni5ussuwpxLD+NnUKeYfmaj
+Kupx4BybSYX5szv1U2CV9WNfbYLp0YpcQ9LPBYNPGYgSh0drSxHDj04mL0MU
+SjRrPbDunVuu0+qwnS89ph2OXJW4dR1ZP2Kyyxt1ZSzPSNgGB5R3FRTBimWO
+FfkkX4Na8xQc5iGfm4YFv8lKGehraPUKvhvW4XreqtWHf2sszToB81YH67/F
++W5v/BvrST+nF9ur4fmSEbdRcryssiIKTnOacFmA7Xo+t5lGPGPbZKNAHCra
+e5fMoaLbRiFBDLDqVZUiL1f6lcZ5cr20ejAc1nm59+h6mP6lpv8zzMO9UmtY
+TPqxMOiLhTfv17N3gtlymYcmLHT3zMpB5GVOqDzAfMNbphnziEx3nnER4mS0
+iVcQIpfm1lSISB0sGozCvoma08Lb4Kr06z62eK7EgXd3kfWqlr/oMNZC/arj
+gjh4HUetwUETx0PFkyOwbuZT+REN3E/Grx3jUUeaQHrigzr2JyV4FYW6+zyV
+fqqGueac7mx4lMWrKoZFj7KCrTGf0I4UaQdMFcX2FcP0vKY+K6xHDTknmGLe
+B0rvzeQSl+6wSIKvNAyk2CI/1aZxuhimQowr78GS7JOdzWS/Aj/Mh6NeYa3E
+qBrWnExbHIHl2jKfdNjkiw++fuhPmOBv5wGP8vK0zsKC59Zeg8g/et009xdi
+tYF9MXDhrXjlwzCXL68bIfdXyoCXKTwk8u0LhVMavXNPkXwX/bseof9LoXq7
+a1AP3azt1Dfwi6poqgH104td7Ccwr7rOe+E56FewIt7oMlwou5HN/Rjzjdxt
+Ew3nv7jK0aNhv1QPi74m+2k08azlI9SftckmAqblt7emqOL/+xMd02DRfOez
+bSrw57vO9MLhq4d/iFLGXMLc7DYjv+jCCsUZJeSPK7raTJ4j0VPLiWWY12yM
+ZSDqF12vnDwB2zn0rSX3rbN2smoITF/8peYo+vf7e/37SFjQvtCvjnkxzfkh
+l2Gx1ZJRCpx0rezxIvHj6SdTZN7XfCaPIZ/d4urbLvjeoI292s0g9XRZyqJh
+E+0GzRJYzC9MTICtG4b8NqJ+5oMK/RDimDyjGphbpZdhCrf8GZWpi36Zym+2
+t5Dvnfdbyj1gthpbuBUOMFcbZMH0SzaiftR76aDEVwUWeG+WfQOLjld5nyPz
+Ke7Z8BD9dZsLQ0aQX5h+5VcOLN4/zlCCmb83tT7GfA7cfDM3R/pVm7mYCE+W
+aD6/T2FeQmWJDdnfPIaP2hKL4gVY1SnBzMsnj8Uvsii7Ax0zC5h/S/n5pN53
+LIppRrM1IM+z02hd3Bu47plnELl+tnHWeQ4OkLFLYN7ztvBvX7Mobq7kIBP1
+8D/6sf7pDIuiJxu+LICZC2d335WzKHlE0C4Xcn/2c3IsYUG1/XoJLOng7Z+a
+ZlGUhrPfDszD8B9PexxwnF7+pHcc5qy0WvMAHnpwojwK8+RbqN8uwfrCrU8q
+asn+nNsy1jyL8//IZ86T91ycX5AC9QR8Vt9pgPcA0/GOhgXqFbQuT2XA3Hc7
+1zv/h0VJtmn1yHB+oc79Qwbob0i6ybGIvAdtL/z4OyxM3XPXB37roz47DHNf
+rHPuRD3CEcWrEpjXlMMNJM8fZ2YDjVx/xGCwhfTz8Oc1cuTjvWy+xYbFvmmu
+cQrUZzJ0vxHzMPxJ/5OTqJffqfFzECyp+O7GFvTHtX0Vt0jmmeBkXDuB40d7
+CxvJ93hK55MsKeaTb91fQMw3+nfUMOpbiBkm8+cadX+Z383C/cgq6SLvAYZH
+5rF2XD/V/60Z2Q/j7+9U17IotoWFYzLj/79jMv74X9Rl/wX5tzcv
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           
+           9.996694214876033]& ], {3.2807968978321704, 3.5703782848251917}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000006366`, 16.999999999996362`}, {
+          13.500000000003638`, 15.5}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.457682641291616, 16.911908554403006}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwd2Hs8lGkbB/BRrRQyapKknMIUtSMlh1ZTSbKqIaGykVTDKxRZRUxFUWhI
+kZAWJaGpkFfSFJW3JJtjJSadpkWGohzK+7u2f3y+n/twHe7nyXPT8Qpw2jmO
+wWBoyTEY9JPxfQz/ZnEZTAKTyxA6uohXaXIZ9R4Xso/B7PXWp9JhXvQh23Gq
+XIYoUj1BYTaXwdDcet4fDq18rhoNi+XGf38E53Fd706Zw2Vw213DFadyGdJf
+eNcuwpIr3zlL4UDNeykWWljPW6JpD8d03Rn6GxZ1BDnYwOLBPLapNpfBcU9p
+MaDxL3W6B+DAaP9nX7B/lmtyVxnMHMw1KoKDRy0fyGDxE3b+Zti5OsFWS4fL
+8NRYcXkY+adO7vZZBQtddXrPwJqzdFLdYYH6wxMcqlftVpEvzBi5yLqggjgX
+POT8YUknJ7N3CpfR5hTqshsWF2y6thUe3fy/dleYm/taq0uZy1Cf3MJeQeul
+Fetz4LzEdUx9Gk8ybT8JszSX5v9C+YwLPkLjzC91C98jX22LlnefYYWTr988
+gD2L/k73wf4ViueGr8CC/V+sVZFPwWzFuNMwV9n5sAQuc/rmH0X90fpiwUf+
+rOwFCyOoP7yFO7th3iONwcO0/3xbjVA6r0erY4TUn6h6T3n0k+HCNc2H61Xl
+9JPgHF3PZ3W032nxHrVpXIaxm7f4hzadc15iAmz+dmBkCdUfVcQfhFOd77BC
+YNmf/qH2LC4j2SR1bQU51nJmDMw+/HuqvC7ih+9KKoSVZnc/d4KFKlnG5bC3
+t/qtTJjZL7QogmuSFeWlcFZpKPMkXD35RLqxHuKpvB1zgm12XY71hbULpy6Z
+BGt+DtLLgrndBmnXkY+EUaJeS/bYWcCD3cd3R/TAgf07HLpQX222Wtv4uYiX
+rXriGFzdKTZSgTk5j/wNadzQtINcn3Hx0XP0i3+tvFUeFiW79cfB7iJrrwHK
+x+BeET1f6rHHtF7Dgt/aBq3oeVeqGr0LMx30OpbAvDssDcpPFrBdYEf9r5UW
+R8Ii9i/dQeT/zmZup/HOXUa36Hn179lqC0vklOyZyEdzTUamCZxlesA3HK5Y
+1505l3yw9N032O6Q/t/aMM+YuycC9YZKL6wxpPz8Hq5URH/C9Zwum1M8nUbP
+c3DMYL/2JpijsLJEbzp+SmT+4TAjZ5lLLty6waW1EBYeziidqYbz6Aszl8L1
+XT7N4XDwjKWK86lfxvv2PIEF7uMO7aX+SOynjJ+BuMbBERWwp58RVxeWxpq+
+VNDHeFJGAhuOaRA4OMNZHS4JanB6guv5dBqfqdDSg/0WvzQs6oC5Fd79Ilj9
++vycWQboZ8iMFTvgNo0d0vVwvU51swIc6vDnylBYIp+y/hLyZ4QWvT0LC4Sc
+NC4sMIkNyCcXfK9tQ/0FBufGbtD6BYofIuGowwG612nc40faQrjxZGFTLsyt
+vKnfg34KO0PCkuBApW0z7tLzlF7yhOIxh0IXXYa5Jk/vbaH9Kn3WkWNeRBy3
+hBkHu63F9Dz2d/yhAfN89Zv6aL941+hRqleruMUS8cSX/9J/C3uG3GDR+XAC
+283qYQZreugk5M/Wifd7QPOzgo1jYHfmfr1qWPt5ZxUT9Y+umbXxKSy5pL47
+ExZdCj76BuadmDjJGP3l5Vk9YiC+9qq89GJYKdzw9nzY8/hje1N1jI9TPrGN
+6pdezs2G1RvuDKTB4kBWq9xMPM9PbL3baf3HTXX2cO0nRp+BIepe/tklHFbi
+Vwr2weKDIxZnYLu2Za2VsCDX1Jac+rH75iQ27NnvdAiublSV8GDPySuXboDr
+vyzlJcGBc7ilynB67sQltbDwU+H2CuQzmhmn8gOWRH4M8oC1jefe05uH8bjm
+v0ZQj/AHP2U5nMW713MGTq7N2MiDOfVKfFOYrW+3wAUWJ80b/wL9iWvteOYI
+M1S7Np+E07uubrSh+VcPRq4nq89c9CvMDZE16MPvlOTNWHDgRw/JNNjtQAF/
+APmIRpqtNGC+Sv9II9XHCThoAWdpKJiW0PjeuYZ7YYf9Tvap5IibNXfpfXE5
+6yFg0/93v/fR+xGY7L81gOp75++WArvFDrTtYtP78eGHOuqdsOMQm//vfG9n
+Oh8HYxWNYLLLj70m6Jf2ba7mSZjhHWlTCVfsr9IrhOv3hD2y0UDc2FfXXlC/
+FW5ZiOHa5vJnKqhHtLR5gzF+z0vPHjNeD/NiZ3tFk7+mzzhN/XLYeboG1vQ8
+kt5G/U7M7P0Ci/64dYY9H/N35wjk8R0gEaZWBcNC+zA3BiwYdH5XCQu8E4Wd
+tL5m+MkEI+wnnGh9Dc67kBZmAzNnCLb6wLINJ8zC4cAnHldYsPu498n5sEC3
+MboE+YpFR5PqjOj87Sp5VM+DunMfaT+ZpXsX6tXsG4gdoPlliQEnYNFyh7Lv
+RlR3Yesi2Nm8vLsP5vWFsD6hf8sYfps7YdkiodJ1uMaYlfCE4p/O64mHy9rt
+d1+DhdcLfjkCC6aXD5+i/e9YXU2A2fP+EQTQ+mu7fi2GKy6m/caj9dqOL/vg
+HM3s3Yspv1Mt/asRP0r+D9U5FP/2p/pCOh/XxKkqsGdB05A+6jEPb/qqQPv7
+uqzOhxvvs98q0Xrpq0lm6EeOzuGMWVTPs8Xrq2F1bm3gEvLm2J8b0O9Au3LT
+LeSJQbqNcKMs2C4W1u6VqTrgOyw0h5N9j/bfMuHyTbhM6tgkZ4z9+9/5TMR3
+WJ6xSNMO5hoOlNjAo9YbQ5LId7ubfGCbyLc322FtA2W1EDiQJU2avwD5W2U8
+oXGm1avGIPJDd0db2PzdNNcymOc1fUgZrq2MnjcIZ9V39lchPstmZ7bRQpwn
+z9LID5b9bAh2hTlrZukowt4jrcWhsCfDsDSX6nvO7EqA6+0zh7lwbUARKw0W
+mAV8e4N+ZCWk5JB5TxND42H+4PmIRFqv3ftiDdwWN9wTCYsa+lvp+fIzP5ey
+G5ZFlvh9Q79DVxzh28PiD7sv9cE2R7Yfng9rMzecn4D5yedeaU2GmTFWmzlw
+nLnoWBfqkfkPvg+CK47nvq+HRXvy1z6l8dFlKytgTtWLbAvkq102z+sajAfb
+vkSTnts9ZVdpXHLlsxXq1a6WbroB189c9KwG5tkOva6ifjXFf3Ch/s0XRUpg
+8YZy3Tcwp7X1y0TK92JVmhe+k6XTeyMtqD9lrKpmOLn/zY8gOKawv04T3218
+S0dpCfVnTNK/Cv4+dt/3B+z20zTVA9Z0nLvf7lf6flgxIQBum/jg72SYvTbt
+517Y2fTdMgksadnVwIfjBvjWLA7yu2LOc4ZfZjyvWAIzLQ/dXgK7l1df2Qhz
+dT4+nAK7ZW2x2kPzle4N30d+fmGzmg9z6PdvwhZPuLZ077REmLHg5oVh1Of9
+6fODNDjw039fn4WjRheOZMKeKXrTLOHyM7YjGRz6f2DxVyn6ldR1f3UqLNF8
+UXYZ5k/cGpdA60OKew/AU4dPXKV4gkvL3bxm03u9++I+ys8s6gFZMlH5qBfM
+ExRNDqf3I0JtrxPFk9j0F8J/OWacXEXzvbdzv8Ev860+mNH+a5vvbkI+Z88n
+hy+g+T7XNz+ES+VeGbKpnq1zzVajvvtDD88YUn7Tg94/hdvWbllhDJfdTHu0
+AP0pGBTvof3MVYeTgmGlu1F6tnDe4og6utfU7jfhbIXFndNVvsMnDPzZ+6me
+7ttzOPjOtq4I9jsNs1fKszzgfcKyhSWUn0b0rqN07/geHP6C6htQHzsPV8fU
+rBmDhSsSV+Xp0P2sb5++Cc5PNGN23r/7mbTZw+alekM0P/+sxMcf5k/vro6C
+1bx01E7R+M9jb3fABXaPh67CgVq6WlZws804l2rYbrXsjBLsFG+S3gKLP6Zk
+v6R7y/3eoPcw13ZazWWY3SSq7IFjJMrxIXB6/qRzMpit+8p3LbxILXLzZ1i0
+zqBIF3482BX3keJ9CPKYANc158jayE39WyTo72hIiu8zite0o7QO/soqH7tL
+8fht3k3wSw7nf9dg3pSOwa9w9cZU6QVYavzhgBr287cfC0uE3dqDen+DS9WG
+EqPhsjUp2fR+ZDlvm3PIhO7DBTK6l61XMJCFUr1L/2z6h+5dE2ryDsCy+IjJ
+dD5Kz46WRMKpHU4af8KpTxrsT8LqgXfD7sDyv//mlQ4L+XUFDNx7JF+Ty2/A
+rdaCddbwlsfFL59S/ndmWgTDgT3H1KhfwoHh9Cy4OPDXsyqLkG+OotJ9ujc9
+VvBYDPPe9sS3wDUq07ZtgRWmbroioXtW9q4gAVyWN9XnNdxuxYnIhbOmZG+t
+g3OCS/k1MMd6eXwx7HJLaiqFv++/EZ4IH/tjVG6CKfJU/I/ibth55JLWLJjv
+GOizFOZlnlZcADMspv2cADcWVYVZwHbWTuuf0/PC+8uTC6fGynVehFtzrrxf
+AYvdmth0j4yYfzrAmtyxx9MR9sowSDWDzRUPhNO902akwdAIzrORqs6l9bXu
+yrPhsmMzbOfAvn7vNyrDoYrn7tP4/YGWGT+Qf0yAYdFSuEJTJawHrtk46aoL
+vKjpYWoHzM749lJA+xk3HGiE7erdpcV0fq1pk57CnjonWX0U/4290mPq96ij
+vSnqC+69qlYLh1osWHwAtlwtO94Aa7fobBLD/2RVREuof4eX68nTPcv77HD/
+IvoOKtC1g9vbHp2djHyZFZqMKNj99+sNBuRtKVduwWzHHUO2MNvouPcbOJW1
+xsCX+m9sIBmDk/9zxO0UjYuPrJqKe5dz+83QEupX7nEzdfjdj9M7X5GbL71X
+hX/S33dgBfr7zlzu/wFLi3W0
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.041851370299756, 4.042946021129489}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJwt1As41OkeB/B/ZbdxpyyTW6NUyj0Suew/93bRpEjiVG4rpxinVsqlOeSu
+TC3tpJJirUsubURFlHLpYqZNs0QZuaZIK8xK2/m+55x5nnnm+Tzzvr/3+/u9
+/xmdgAjP4IUURZXhTT7/99KnKQb51KGp2L+10zxhTjrf9QuLprjV/MkCeLRW
+S/s9zAm69mAS7mpQOC2A955+KdpgQFP8qYLky3B+3lt/DjxYf+BqCKyXtm91
+Hvm+RH2fDix35VNZA1ylF7WmZDnqqxcZd8DFY1ssFsO60oK7Apgp4CsGadPU
+Dr2Ezc0wK2x6sEUL9ft82aUw45NejgXMuDtlnQLTgk3uNzVp6rGq3Cs/sl93
+qdkO2Oak5o9GsGvFDm1ZWBITe+QL8rNsHALFGjRlsvFE4DPiwOzfOmHWavus
+cpjpOaw4Avf+6T/Hgy1t9/apYL9BW5EuF2YbNkn7wqlvUt/GEh8aNL9G6ie7
+cFJhyvS+vAryaRb+g0Hmx07pvhQDh7YMWj6GhfNONWJYstugYSHyCSu5m2xI
+vzlb+I7E0Qb5KfBhmQyTLJhSerKhAa5TDDvUR+bhfzi6C3aLX0itN0S+b9Zs
+E8Fdtq1eiTD/Ff/bGjjoy7iUEE5lTYb/COvyPr5UMULfgsjrTJj2qtDaCke7
+b4i8gjyTTtE/xcKW5+0OqsGWGQmN52ElZmpGHPozicocKYMls5lxPZhPUNsU
+q5zUa7sdbAlX6WduzYd9Ep4ePq9OU9maW5elwJORkcmycOqiLEEgXGzgc+/U
+Mqzzf+NhRdb/4uKyDla5f/0PGVh8ymGwn4l+4xf39yB/qN77gVrYJ6B7tBKm
+/nr97ios3lrtkA4rBVVKGuFQ72sTB+FRKUbABMxxWxviD7dp7JA2R/0qe99E
+XzIfh7KTGXCdZk9ACFxVrP/zBEzJ2nn9G3a1/9XIG3lttG68KIW7qHGt23Dv
+xvmSfpiTFLNdFf1OclXurURelpO14z5YaPwlKRzWK5M4nYV1z4vEd2DeyVsv
+q2BK+ANH2Rj12+s+l8O01V/XA+C9BueMM2HGwzqbSpiqKyn+HpZ7b/ZyClaS
+fHGewPm/uRSOqZrAq385cgT2iFOLNYR9CswXv0P+GabLkA0svh/btw12U4x7
+5AhL6upqKjGPDimxtRPMtBOUy8HOI/WldjD/8LnZCDWaKu2zHTeF23RS/ilW
+Rf7mIUMWTEs+6wfBodkRvTJwdFIWm4JTG16bjSCf5Rz/Ut03uNfzpY51cH4a
+0zcL/rjubmgmzItI1UyCM/XWTIXATbsOiviwj9q+V9/Bxdly3a3wgWS3gk2w
+T0f8vDzqUwXTqpYw98Ly7mBYr91xmyOZTwe9pB02r+y/uAdmLlCvMEH+q0Oa
+0Wkwo2dDVA5c7M4800TyHdfbPQl7fAo+tAD56z4YiDaReXBmx1bDrMRAhwg4
+j9bR3UrmKxAap8FNQ6sORsOjPUNnk8h6Yc5Xl+HiaFu5QHhFUopFK5lnu5tA
+h+y/5hb2Bg41mWltxnlVLn72X5ti/4jhATe4yNm+VBMW62rxmpC/QzVrWB+e
+5PiuXA17VM3mmcFdBc9eJWIeuUHqA8SMpO4RsQpNvfAuWmsIs7W3H3SEuVEf
+trBg4YoIx5qlNNX51oujAKduNkm3gkWrJPJ/IY8wZ9xDtAT3aia63w9z9niz
+s2D1XebbHpK8uxsfhMC05qXIatjEM3GzP9wU29FB+q0K0iqJhFuO1w7+ROYx
+vt/xMqz6jDGRAbPZ1gMjsF+r4bN08jy9sFajcT5ldE/rNOx66XN8ARzlrfsh
+D86/qa8ti/zR7RkMch5LoH4nAn5o23hLQO6Hm7DtIZxfbrHoA8n3/WcvFcxj
++Kw+TxX91aXLGLnCK9jPO+3gvT/UhO+Dowqfa4fCoVSFpj987GZ5OQ/2eZv8
+3Iqsl5p9eIOsH+h5PYv6YZ7Kr7tg2sPH4hw5z/3vnGky37hODx1Y/aN1p+x6
+3E/v58U5yD8vd25AHRbuWbNzDv1ecLYIXwFLjAYlO+GOxLXJxJbvxUtrlGmq
+2jyxUAOmd0mJmHBvSPMVBbI/xUg5XQm/V4dllfM4z1J5qlcBbnmsaDMC53/b
+fsJHEc93V9o7AXk+tsy9e6SAe2OviKuDKZ1W91jYl7/26hW4ybmwNgwuksrU
+If3y/I/2Z8P3wyZ2JsAcNUvXaVjy1ib1GOmfLR2TiPqUQwv/KMzaOeeijvO9
+hY+VuGT/Mr+XcbCCgpXyKfI8BYjih2D77373LID5K89Ob0E/dh6q6xph5r9O
+WBTCxYwYnpjUW1XcPA6H83LXf41+2fVjX+lgPjNjSQlGcFNhSK4VHMXb/GQn
++X5KKcsc5jy39+TCPjVRGUqwUUrJ7iKYmbdr4AnqHasd9moj+43WnQmHfePT
+hgbJetHF5TPI1za/aG6OzP9kb/h+OP1RUK+0GZ7nymfTF9DvxLyllTLcdLl/
+sQ/mkT8ov4qYzv0jcIk8TdV77tCQgZVmggNfyOL/pqV6dh71qPrsggYZmrqj
+Yjo2Blc9zXZtk8b/2VRtyHOY0z7hJQVrN8sr3yH3y9bSPcrAuiusIpJ/cpXM
+p3Vw9e4Fgzyy/9awSB2ecX8SGQ/vreb5OsMWRqI2Dqz0wHbyV3hex4G1H86v
+KFPdiPp+CY5+oaS+sFQ0CusZ31sQAfMir/pWIZ93qpFxHCweXpN/HPmV9Ptz
+z5B8Do5WrnL4vToq/VwBc7meKvOwT72phpDkqfK0O4X+u17b/z5N5mu28OwU
+nHvc1FAb88i//SB4JeZlqRoa7ULmOaXZqwYvKdw+FQFTLE2/DqwvrL44mgOL
+TU9fdoHfNT56UEvmeaDvRgrO41GfTTphzlOthhzke9V9TmMMnpyOS4tB/gu6
+fwolMJdmazmhv/++zP//yaD/A2Slx6s=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.25695895996216, 5.4856114964743385}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJwt1AtMk1cUB/BPoqVCkVKcFlAEdNMG0OKgA3XwARVfzFWYZHYbqygGpJGm
+VEU2tTAeBbaEDSRaBaoyHZLwqEoUSm2ngBLQ4iBDXimCik6wWAaKgvvfaZPm
+5Nd7vtNz7r35POOSo+JtKIr6Bl8S339c6ffRk6ZqIp1jD8LPLo4G3PGgKfYW
+6/edsFbQ662CLZd4wVw3mpq2PyAIgfnWFs3n8Aq5l/fDZTQlEda2hcEXiqSl
+obCykdWwEj5Zb2Sdd8d62jmXMdTb3yg6y4KVtLv/KVgWbeZmLqUpM1Pa4gvv
+m+IqFsCShHxjrQtNjZU1Xa5egvzckHFvmHNXc24/bHjTW3GeS1OB2/OraVh0
+yFHiAUet9u7xI/k7nwsrFtPUV51T2g2wxT17WAi3zq89EPt/va3trxbRVI93
+IKsQrrFtFt6BU7e15nURT7Y7XIfrXuh8PdCPyGZZOFmPeLKqVQoXKBI3v4Yv
+XUhwvQobqk/cj0B9seMcZyusfGZiVMHXwlL9PTGvjK2v4qG/THFL1zq4oJB5
+/DL8OOnwng1kP1aUSoWYL2ySU7Cc7NdfDqwuuLVfnPKC1MueM/kd9idhprhY
+A1Mx6d7dcNrbXaOBsOypVkHOI8HCbWhA/2ax01UVvEryZp8vTOX+wa+DSy8G
+0YWIdFmF/iYit8hPYEUdQ2jl4xrYxotSRZN70cV8coyc988Pk+vRR43CrpwP
+SwN67vrCpoHrylbkFfPs+7WYw+B3eHkUzCljDX0Bm5vkvLvIUwyMvJsDm1xc
+2jfC/PP9sybsi/KH1ZkG/L7XhhvSAEtSbqs3wnbvtFU3YJnnUVMvYh1j/QMS
+DYdsZlSIosMWJgt5SiHHuIM8Z513ZBssaTJuCoLTXvsVF5H1Y2fcQuG9T3lb
+B4nbmp0SyXmkzN9O7hEtDoushhm2kcelsKElIJqNvGzb3rVlZF75YHgOPCFq
+T9eTeec2cxYg+kvu5DeTdc3R/hJEi09O5RXEghfWTWswf/fLCnUOrPnU0VwP
+3/a1/ymE5DGyMoKwf2ud8t/2oy4/IquhHE79LWMqHqb1S92n4Dzj6yIyb82Z
+ul98cG7ySt1YOGy+d/NgGPwtT3i/HPdOqbz2/DM4z8FNPhdm98QZHOALaU+d
+Ej9CP78yk5pRTzx8srZ7IXzl7/F4OC3WUfc1TJ2WV42jP68H9xpHneG3qQwZ
+XBW3e+VpZ3IfhxeOoG9B9A33PXCNoG3LbrjOZnNcBMxnVM0bQt9tW7TBQtjU
+khWggO8LCk6KYU2g7b+u8DNjHzMbNreOrO/DHKt72PZ/wqLgs2py7sqkL9fN
+Rz8e7R/bEe8VS9U7YVlnQEcPHJz7ckQDi4JKlC6oJ18yOD4MmxdrGOT/xmZ/
+H3LDvPSEqvsRzDY+KqFh6pOV/ET0+6rj8eR2mB83s2sKvrRmwhoOG0SzjrmY
+t1zRML6UPD9t17cI+3MtLaO+D/UtJ2Z+PAWfiWLkpsPs5JHNdtjf0uW9Uwtg
+k09Mzh5Y0OEzoMI8dMstvQbum9a5TXBQXxg6roc5RQMxMbCsY+yWDp7WjVZf
+dUL9ruhiNaw+suMAl/gfRYoYPlQnrcxkf3gvL/kQ2fR/EnMCOw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.118561596984358, 6.001529066331595}, \
+{1, 0}], LineBox[{{6.4999999999976925`, 15.5}, {13.49999999999251, 15.5}}], 
+        PolygonBox[{{10.6, 15.5}, {9.4, 15.1}, {9.4, 15.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 16.4452}, {0, -1}], 
+        LineBox[{{6.5, 15.500000000002307`}, {6.5, 8.499999999998607}}], 
+        PolygonBox[{{6.5, 12.6}, {6.1, 11.4}, {6.9, 11.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.5548, 12.}, {1, 0}], 
+        LineBox[{{13.5, 15.500000000002307`}, {13.5, 8.499999999998607}}], 
+        PolygonBox[{{13.5, 11.4}, {13.1, 12.6}, {13.9, 12.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.4452, 12.}, {-1, 0}], 
+        LineBox[{{13.500000000001851`, 8.5}, {6.500000000002592, 8.5}}], 
+        PolygonBox[{{9.4, 8.5}, {10.6, 8.9}, {10.6, 8.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 7.5548}, {0, 1}], 
+        {PointSize[0.04], PointBox[{6.5, 15.5}], PointBox[{7., 4.}], 
+         PointBox[{13.5, 15.5}], PointBox[{13.5, 8.5}], PointBox[{6.5, 8.5}]},
+         InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T8", " ", "P2", " ", "N16"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdgei/gjfhfjhiij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdgei/gjfhfjhiij.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {0, 0}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwd1Qk01GsfB/C/9Ga4dspwlGnRptzp0iUNM2ncpqgGqVeRaZEWarpkSzWh
+mm6WUZOmUOO2TUopKqLShhbdIWsh2iwZezV45f0+d85x5nzO8/x/z+/7+z9z
+TN64yytwDEVRV/FHvqnmUXzMOZQpwVQOpR7zWLUWlu8Juktcl/p6Uj6dQzF5
+H1oMyfrvGWGTYI5r704mzGjkeknNOFSMrl/Uelj0eCbXCuYtPuF9GpaoWLlP
+JnCoyNWfzzbB+YU0RTxc9pUbbDMN9V/kyjfBxTrvNsfAkaoNMQJYKrNTl8Mz
+bwzHRMG67ocSLa1Rn7Ms4Cosj91xezOs2EcX98Ii2Ubf8zC/snXxHziftjP8
+SzUs+Fwy/jzco6gWDsF1WlpGGuiftnH9a4PpHEqY8sPRFxa/vn1pPJyfu7fl
+AkzV6kbqwjQL7i9NcHzLSsk3PC/edevOKCxstxquhMvmdM0ch3kJSxIDL8Pq
+XqFVN9YlrRMH98Cyu67dBWQ/y4TpCjNDf08Kgi9o+F80gJuXXD40hP6Yiocf
+Wkje6uB/wuH8J+2/FsHqjvazLchnGmkemAkLmm3MF8GSimdPTsB8zeHRtPEc
+KmxPcK0UZsTvXjVoyqGqJHaCi+R5atr3ALi5+wjvGSx+P4FbY4I89CWX+mGh
+z/mnG2C+b2CpLckTalA/DpbcEiwNsyY5h0RlxhzKcGCh0yOS36SVqYBN4xcs
+MsZ8enbSH1yEdS2nlG+CtypaBQ/hAZdTbrdgZcmG8l6yf0kpawhWqFsEjqiv
+bH9z1nEG+nWbuzERFs71a9gO10XI+B1wumOTXjKsGNPrzEP/yh00/Qtk/8Ll
+tnI4PS7p6BWYKTgV+RWmrVBoymG6d8aUaZhH+sjwazGs3pJt5wbb9/kMB8KS
+aPfBZTB3/ewFTsQlS53s4Byb7Xk0uKw9zmcE9aiAa21VJM+zE8uyYMUB7d1/
+wzyJ1jUWzHd2rQmD60Zq9uajX5n/B/+VsKNcY2AKLM7SbLSHxc+9XGKRf1XB
+lJQZcFkA06rRCL+XtKkas2B+op7MCe7cZte2AG7ekXQ40xDznHbVZi2cM1nm
+Roctx4oaxDD1uDGLZ4CcIXO5T2HGeK6VVB/v/3rg/7TRv9KhtJoO52UsMlwD
+cw6ZXajXwzzOT7VWkHnVjzJqYMMN9CuDxM/oWTrY3+BmN5Y3E/2MMUoVwo67
+WC+SYeWXCslPuFNTo6Mc5vjFWV7B+Vud82tH4fx4J9k89Dc2zi5n6iz8fsuy
+wpNhfmG/lyPMyNpn2wqzygp3O8OS6zfNf0NeD+/nUjuYWeG8eDv89HaUiSVM
+9W8p+AvukRVrDKJ+cYFpZTLcNk9oQs6PDAn3j4AZp9+Hp8GKTNZTDhw22qcI
+ggX2JQYqnCc3/sydD4s3//NuPxxTvKNSCxZZKzcPoH/mkXbpB+SnoriKMuST
+uaxYX0Y8/K3pMOYTLzPbWkhcqUxl6eL+Gifa3/93v+ebHzp474tbol7Dwpon
+7iXayJXmS++Ge/48k51Hwzxbx1pOIvN8PFFVrsWhpum2P/eFJS9U2RbwtZDe
+u+fIPJceeSkfh35Lvbo64Z4YV9ommGubauiCefS8ndMqgCXOJgnJxLzyW6lw
+p3D180ZY6B6WMwIX7Szzt56Nepn8fQmoz3/f6rQJVipdJA7ohzX/aJ2UeMOK
++l7YQ1m1Jh82dPAPz0b/Ai9Gxiu4Z6JWqB/yDax2CaiAm80TjvbCect325TC
+cg3uW8EvmL/2S/8bZH1LQbIcVq/ZqJ8A85+lbLkC5xlvHAgg+5O7jCLgSOZB
+ji1MeTSG02De1A7hEMmTm1kYgPpiWR+jDOYbjZsdi36KHrrUnoGbjy/7EoF+
+BWs1qvf8m//8fncyv3tDbetg0X4fX23kD/O4yFsJGzZ4aT8ci/mPKnZ7kvtl
+f/x4tCZ+f3+xxm+Cc5qWKJaO4VDB+sf142FB8J5uRw30X/dmcy5cfFyP701h
+ro9O/reb1L/PKXIdZVMKI42Y+ehf9OuuEs+fbMqeH1wVCwtS0yzrR9hUQlui
+ZhXMeByUUQuLxQbh1jZ4H3mv7rphf9ibEWkoLE95/mY86jGLtv64Byvfzz9i
+gfMSIg6nqGHR6YNWJTAzp7xp1hzUc7mZJkJ/F0IejV0OC2JUE1jo/5VDUqcA
+zmHlnu2AI7smeAUSvz3Xvx95FYrM0rWw/EoCRwU7DvVmu8LKc/QHNpiP7jXn
+yVZzyP+p8gV2sLhqTEOfDbl/p6NGybz6PY0ewcxkh/BkuOG1lJNI+s8O2fYZ
+53l02f9nHVycuPzGOJhWev/TXFh4b0bMMMmjspmkTfarV9ekI29nps6+bnI/
++Zm1ZphPTvar3z6S+f34YhM3xKZEhyPyP8PFisp3Qz/YlOAi994Pcn8SgtzO
+fGNTuvO89c1JvSPSzOh+NlXc1nGHR84333r5Zi+bGjCd1xNP5mdXHMDvYVPB
+BSm8lzCVsCX0aRfqmR57TEdekaC5rk7FpvJOaf3cBlPBi9e/gyPNdYIK4eJL
+e04WYb88dnqQ9lycl54bz0Q9ywqLU3xYkNvl54nzcl6+VSUSl4ikV/rQz/L4
+jgcwVT61e9IA+rmqvtMCF1d9yziJ/qXhzou+kXrcjoe939GP5x/LBsl+hs1H
+uppNUW/WbeuCGZYZf/bDyqQezRqY01w+HDLIpvxMfZxuwaL6uwuj4U/uPi8O
+kfP1Gj8awIqPq9q9yXq0md5cPO837rsZg6yvUHnW4DxW9/VeFfI13x9OmoB+
+1AFfh4pJXqdPHj/Rf4P3DmE6Wa+oePc38s4JPWARR9Z1lL5OnXg+JWl6BMxZ
+MNJn2Ao/UdOiyfz2Hjup8QH3Wa3emkBcfbzu0Fs2JctNM7tO5q1pmKhfyaZo
+1jzjJrKee+Bg6zM29fRYvsSC5DedvuXTbTZ1IVY+cQOxKMShKB3z676af52Y
+fHLuUwzybcv5P/BL/e8=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.558531590841939, 14.870172348677091}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJwt1AtQVFUYB/CjxCs0XgstCQQFMYMM7BCFuNk94IJsCK6LpCAgEAKNIkRB
+SMQQbxNymwgZQdxgNXXAthIkQHkaODnbEkQbIW2Asi7IW95h/6vtzO6d35x7
+vvN9/71z7WOSxEc3E0L248ten/2YUPL0Y0mJtUX1OUtjmOeVl2lBiWZSNbGy
+lZKZivJfLOCuv5IKb2yhRMkXRPzGoeQjrqbgiBHWb/FjG2ADl+5UnecpEZmu
+xnfCykF7x3oDSto+8XVfhtcXPsvI16eEek6PilDPQ14alKtHidrwZc9u2OTK
+xokmXew3b9aK0Q+vP6TfHW77oXmfFr68q91q5jlKJFWLUzkvUlKpOsjMwiYd
+wrfMuHDiu8083M+zdg74Au7Pf6KSwdKB3PQpdl3WE0lx3sx7ko3tVpQc6GlI
+noej+O0JPvDYsTsXatGfXQhRu8FDk2JOGPqPErq+8xj7wxX7W7XsPF937iyD
+o5zjsvYZop5OZT0XbtH+Y5vJ2kqnJw/9ZQZWuybAUVUjG6Pof4H/U7ExTNb8
+Oykce89DnmLA5udx+SLmPzTgIy3D+dmCM/XWsMjFrSoP/dG0D1qusfn5rRYI
+2Xni3NpiYFGo9dKCDnLeI8jaBY9FuDPlmymRa5xsvFm/kMH33YQ8sjL1E+H+
+q0v2WwnO7zFavAmrI7NvbPzLEEm+xskV56niBKuidYYkn57rqod3NH479Moa
+Q3jVjrEB6Jcr41z6dJUh0pSG2jG4/G5gWjQssnhT/2PMq9ybs/s2a86oeBnW
+LLqmnsV+6UP9r44gH4Nt8aatqE9//7XoIswzOpxgs8GuC91uw8uniuwlTxgi
+V4tMW+CiqdbOk+hXmXzuw8/h8rCsVDPMIxm3Fb0Ob5F5Z+Sw87U7vdqC86j2
++HALbFd5vMQF7qrwFjQ+nT+vtwT9aqb35CWxHo99Q4v58jZqdEdQX9JRIN4L
+N9Yl9JjDPFVK1C3k01YX7fMS+pNr/8gXwrSYG3KdzaPwHv+xOfr7vmTCfIUh
+ymlXxc+w6upd08OLyNMpiLTDh4r80+rmGdLWTYdHYTLcq+c6yxByqb3ZBfXs
+JHMeK4+QF183poz9PxN6pfFahqhryftW6GfGP0yiGEc+I14NtbByTVkjeIDz
+GRnXD/O0LV0LVdyHI6yXBuGZt207IrCunh3QjWbzCL6f2If96u+kiwqYl/Rj
+EUF9k+LXuDbIj97pWL0yiX4GpX/6wtKgHeHF07i/iePsB2uaDvJ56NekUlHL
+3p/9aF4neQ7zHChtZeupxrk7j7LzGTmKI+HsSIfiBVhe1/xlH/rpmQhNN1xA
+PQevE55wuti49izWo2q2bypln+8l5UAF6kn8JtXz7PN4IXh0G86buR59LBqW
+69U5BE5hPrMCzgPkZ+cZti57iP36Z7pOwXJa7nZyDM9r1WmRGFbnaoe4wwyx
+My+03M3a2T8noA/r5//uDGfz/0Zg69aBvIPrhOfN/3/vpd98duXQ/wAMmub2
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.1922538386132735, 4.316769291093815}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.00000000000432, 17.}, {13.500000000004775`, 16.5}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.650294551449843, 17.441370831152057}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt2HlcjNsfB/DRJqLGlEqLpn1KZVq0WKckoTItFDeptCpJQsrSYinaEIVk
+MLIVI6m46U5UUmG4YoT20iYjUSr5fc59/f5xXu/O85zz/X6fc87zDE3/7W6B
+YhQKxXkKhUJaCoP8Q2VRqKRVZFFEhVu/bCTO2mt8EPZSCM2rg1t//Dw3CJct
+XqLhNAv9+9JfrFJiUYQXnQs+wCJ714VpMPsBrTmaxqL4qtcElsAx3AMfafIs
+ClNYMb0K7rQ8ks0jdrbSIf3xNCuxVQosCmtp5iC5fyDquvM7uDVQ+70zrLxF
+UdNzNq6jvg/9hfnDg3IaqmC2kozCaZj1QztaHa3A/bSEHtp9wV3MzWg533Z0
+3cV1vOGt+ikw9cLl80thvhTnxHmY+SVU7DXm2cfWLc8m12eN5O+AR/11R0je
+8bHco1pwjqlnnCdMVy1634O4BUmh9lpkvF0WwqfEB9LaOzEule+fVwl73V2y
+gkvmMZKSe0dcWZgQCIuGdeqmYjz69oRsY5ip4m/qBksL9ltOIfc/bY69Byvv
++3i0Ey1lWeUrffx92LvidxO5z6w78SbJ5/Gw4WdYsOeeuSXiKN/5kzud1ONP
+Kr0aVpP0/baCjH9D3tcV9RNYCw/mkHhK1BmNcPkBDo88ZzbTftYaZbS3D3+O
+g3kTonW3YWs3j5tS5LncmTl9HKaabHuWC3Mmah1N5uD5qXMybfD3eHfv9Q4w
+JYc2+Q6mm68stoPZQbyJKLT0D/L6OmhZTXEXJVXQDvgVDuC6xfel/zoOi45d
+DLkIN9xKXEhRxXp5Gx/DggP4b2b6wSLX1ro3mDdy+bv0W6qkngvb/eBDa/6N
+a4Y5fX6nvyDuXIZ+/i84s9m3fj9xh9/wb1iQkWOpTOohVeH5BWYmOtEeow7C
+8d3360h/3rmugzCnYkr1WTL+9xsu60j/P0WdPjAva4/QHo7xquueS3zI+NNa
++M12m/fNiD/SbdPu3fC+pMK6KzDV4G1cKawsdSojCuY3ap+gYv6eG49S1pLr
+w+bYHoBDzq3ctZTkv1dPbwIeZk4stoMpPI76YeTnJL1G6A3Hj91Kkkc9ikNd
+LTJgeq7UrktwZIuUwXtY0PxA3oDUV3NGnA3ii1ROr+fC3CnSfYUkv9Xap+Rw
+ncTy/tXmahgvv0QvEOb+6SmohgVN3TaX4WTJ6KO+6ohf3SyvCg4Y0f86CbO8
+w73ryXObbvHy/FzsRwsJfgnJM/O6jpkGxhs56Z4MO2UNWT+CI9+2vCB5NLC3
+havR0b+SMdKLeC4HPn7MhunjGjsT4ceW511iYY7FzaxZcK21+JIcOHNBjcoF
+5BcRnGJ3E+YFJA0awsrTbufx4NbbMs181IfROa5cAPs+7fEKgNuVvo5cgCP9
+zzFV4KJB+aGj5PpRX99u1FfRXkYlHKbubWiuhy13bKpxIuOvNoprgIf2Ltht
+ROKJ2VnbA7uZ2hXPhEW/jijSMd4bB82hLuRHlbOPjST7IitKjeRL1WjreAuH
+mPp+5sICG67dWsQrse5TJgduFbkUvyHPa3TW9iJYVKpY4Yd8w0PlGz/AvNQT
+qSK4+/j9BFlSr8hCqzjUb+xo5smFJJ7Bs1Mn4JpHJUY7SDx3DpZuw3ONdhd0
+knpQU8aL6uEqVc2uEViwOWMNjTzXA0Ni9pqo90hOx1I4/PyndydhUbdwBhuW
+mP/iUxvMN9U9uwIem9ydaqKF8fwO5dLh5IKW3bthVmKObwfGP/SsKLgU9u0b
+WHUCduFPifsKRyb48Ezg6d9cLdS10T8QXsBHvPmD3zKWwZGbqj44wbGjDbLr
+YZFVicZ75HtT17zcl1zvf8ErDDaydTcmFrS7aE6DTRrDY9eR+7klaaWoX/v0
+6WZ2ME/2/NdYcs7EvHVgwPEmC7nr4dqL3aPTyPgfZb44wZ1fY/7uRXx0x6hG
+H1hnhr9yHZwZe1wvFab9teNkIcyuvxv6L0z5oJd8huRDSf9livmPFcgpHyX5
+ag3TyX6quiYjnQBzbLUddJEPMz2Xd5iMJxZJ58HD+5lfTsM8u54fS1GPXLYG
+rYj0K2g2k+ejoiXoeQ/z+7WnuqK+/CCLohkkv7b1v2rhwZ9x81fB7Dsr35lg
+370tyeWlkXq8jDxzAHZZL8EQwixxf5P78GqzdDs9HeR3UrdcAAfsvJq4C/bt
+ss8hzgtev+kJ3MoK8yHXlxwc95ypS9aHc3c8zGPP03WFedUME0sy38vT/6QS
+NzVavUc8k47ZCRUw84FEUwT8gh5h3QVn3qs5OoF8XqeZm1H0MF7tCDUZzi8c
+XiFH7Bjho0TOYVFaIw1myUsbk/pY55o/k4GZvQ/qPGFDwYdD4xiPfa1QSIP7
+7kkKO+DI2bazu1Dv1+Lne2pI//eNzFfk/cJon3MN5q+ULxDCetVc0RGYtVit
+fhwOsHv5I4Q4pizNBuN5nGzJWQtT1vs/Iudm66c4+SXkflqu1Djs7bVvrTlM
+VSzX2IN4h+nZAmKRzLexSfhhW9HlZWS8csspaWrkvX7b2ZPUZ36quyrq1XTB
+5GUs8aUoOS7sEFd87gbxsjOnNHFOCiykOO1kfM7BynT48aLTnjrI33f5WpvP
+cNklzzfhpF5Nz1L1cQ7Q1e2aHsD0NX7BznBJvPeotD76W4JueMJ2w8uuesJ8
+MYNdDuTclSnyvqJP9tMWY1XYv0PsUS+cmUYLFGJ8Rbd3lxkM5O8WVpkADzxT
+sfOB2R9cXqrCbt9+LExhkPeG2YtbiL8mq/HGdVhAb4uyghPXPTUth+N7e7lV
+5Dzg3KNUwcywMpsNMHOW/XM+zP98hDeGeimoZLy4B9PFlgyR906uV19hHoPs
+fwNlUt+lkik7k4gvmy7eQN7bO2sjAmCOU77Hevjj26Wq9iSej5vVt5P1ZFYj
+rgtnqjDlrsAWrW+400g+GjJBIvKeW7J/7TDJfxFngQfiEXGCZD/DvNKo43Vw
+weuxtA6Y0tqZ64J8BLObpfuJS9T+NMER/adtJmFWsmV3KOqxz0fKTZ3kn9gZ
+8gNWyDH4tZLMtyeoeg/qa1ivtnY/zFt0n9sPex1xH/n7v/qEGOnh3O1Jj2WI
+GSDew7xpa+DcNnalM+w1VWbaFrjbP8kvF+blRm3eBjcLQw73w4z05W2hMI2x
+8Yq1IfIqs5HYADdQ2KsS4OvFtKZFcKxyuM0TuMxLXkIBlqilH5qABWkSrKeI
+R6etOm/ePKw3r36fjbBRxKlda2E2zeBHN/Kp6GPGBMOUPtuWKNiiyYGzE46M
+SJ0iAQek1uyIhltP7BTnoD7HTLuGt8LMvfEzneCH5dSbXrBvnHHaDHLeMMNi
+lhHPYE3pQr0ZF3OyNWH+A/FX72C7zPZdU8j8O22Z3TBHvfl8G+KlvLaZRcX9
+bnNb0quIH63Q9YCDSjLvFcC8mYoDd+B4nPe5sCiiVaCB+DwKuB+zYKq/rsdF
++LX3Q5UcmB3NYBkgX+UAO2E+6R8s6Sol72Fp2bhKmKO3+I4W6mVhotX8GR7N
+bOsJhCfqAtznkPgLQj9ehnPEj9/ymEfO1yty78h3xdn+5TmwtOyuCArek+VR
+WXPa4ZwUzS3qcOfWqtb5RtgXJ5/0GMHnmKUaB+GegxbZJvCw5rE1z2GvtPpr
+WvDDrJ4uJWPsj7f8oWnwwFedc96wsoZbVxfmW/16q9dZY/I+V9tRBvc1N2xr
+gEezt/1IIuvhyuycYZi3PUubrK+igmiFWSY4V/fubqHCMwa9r2vC9LCCRTzy
+3ZFgzNWDmZduJa2EZTWOtNCJqzN+DqB++duj7pD7RRdvu1yFxzRb3o5hfGb+
+59BoWEpKNqoZZkekqG2Cf5aOfqqAKWxXqh9Mu8XPzYMFDZJ348n6Kd1mHU+u
+r07T/xuOn8nWDSL93EdbZDH/4D8+V91I/tYhFmQ/6RW3Fq6EMwvOhX+DpexO
+CRzI+I2M6YvJ/lm2wcAVTv5o9SoRtt/v6BoMl2Vcn1sHZxkXeqbAkTOP/JFF
+Pd3M1lWWkHrdpl9wIc9DNC99kMQzYuRzBC5I6rKfj3xrCxQli8nztDeV2EPq
+p61X1wgL+m7mPIEZUQ6RfbD/ZMoZ2nzye2ev+zf4SFrHLj84JMrjv/6+SXNe
+IcwXaQW8hXu+v/s0DMcH8gNL4M0SsqEqTMTzJdQqFX4ucm5aAMcXWNM2wjrL
+A2ScYFYFM5Wsj28ZzonecI+lQmwP8jMXCKcGw7XBG1/chjuohjfDYKr4890x
+8KdwhfKtsJe390JHeM8s91cBsDDsQQ6dXL//eelGJtkf8wvF4eUnF0Q4Ewdr
+GXWj3vX/hisvhVuZvCctcKiW9ZAxzJe5IvkDbhZ8ZM2FKZW9z2i4f3+Fiz0V
+lma+6rGC2fq5DEnYt8M/LgR2W5woGkf+tf82Z5P9dG6DBH0EVi5Y2NUBRxSX
+GvyGy8YPlRgg3z3cfeFTcX9ygqrhDnhbyCVrRVj5rOOaUvhW5rFGQ5JP2T8W
+v+BNtrkf7El8hUFmFviO6rynyN1C6unR1hoIH665wz4CR17YvioVtqfdb7wF
+lyUJR6/CA2YsqX9J/8b1VPJdZs8bvDRG6lFbsZYHu9nu36JpyqI4NmxXvkRc
+fV7OAaZkt4T8951X6ZQUDCtLi7/ygZuyGJWHYMFymu98WPtC70QuHL8qPpXE
+q3LtIfcOzDJYqsSHbRd9CC6HGX+d7T8MFx90WvgEbl1h9NsZtpD2XlcFX4+K
+0FUl6zdaagGfzGe1W0yE+ukeZp8sJfPlbBe+gOWvCjfegq0PGe15ACvZiueT
++a9niOnehaVUWddTYeaVgYwS+OjABHcfye/5hepn8DNab8s2OCavzawPnjq6
+IN0Ppq5yvamI+dW142u9TMnvW7koEt+QteQBD1jE7/Uk6zlIvzx0HYlPYbRO
+AKcIXkzzhr18j/1SQj0shcKzITDn8IwhUi++yIQaR/Id2lR9WYt8T7jMPUXm
+3zDzRit8P2eHBY+M196jpIjv3E0SqsmvSP2FQV9ZsF2gm/pPkv++jOTN8MBi
++ms1M9w/d0V9JByzribMHu6xnbYomthqztUwOPP+jYlQeFLPfckJmG1z6o0b
+HHDgnlQxPLr6kzoTnpq/bPg1XMvd81AcfqQpqfcFjjc3+/0S8ZWXOn+fYo78
+ZDjp2bBztcsQFZb+MstlE8nPcWxiDmwdR2PqwOuuPzBTNye/P/pVv5LzgDX5
+UwWOkat+RtZD1+WyAXly/4rBy+fhecn9g9Jw7c8HVxNgZfm7UuOYv2xyqUs0
+nMbX29xP8jsjdZhYrbLB6gOJXz86KxGuSxpprIfp1X66eXC17O9dFaT/ufLy
+GvhiV91ikq9jYEwQWZ8Zx1MNb8P8qqdHFyDeLRsnZQth1u0Ayxj4+6/hg3dh
+Ya/N/Qr4h3ry679hxve7KlKoz8oYplIDHOlwN2oN/DJYak47LBqTaTsO24QY
++v4m9bvU+bgKzmQvsiL1cByLeP4dDi89d48FC3beYSjhd0rhn7n8IGL9P4eM
+4em6JQbpMFtxg6ElXHojsPA+nNnxiGIKz58tMfUjHD/b6cRcWJr8v6XF/1sd
+1v8AcRBasw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {9.806386448142824, 5.191782494132622}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwd1gs0lFsbB/D3MJ0o5RqjC0OukcYlpHKmEopKfcotliRS49bnaFzSVJRQ
+CWmSOqWEwjdN1DDq4FDTRalUCE26iSEiuR7ff2ctZv3Ws9+9n//z7jWLTkD4
+ll0yFEUJ8Us+KRr5Y8Kifv0sZFG8yD9EG+C62gDdEV0WVdg1/dw5mN58SvED
+LF0T+0oCP7nlPlkNG70c+8AwxadraVUG7Gacd8IDbguR53vBE2OlM4/AcmMV
+lRowbaBqfh6spBC+6JkOi/JvqlUtg9Nkb54/DGe91pMI4d3/CFqt4KFDsbNv
+wozQ7pouBouyMpyquUDWCyj6ZdjBffwaF6ZiSsL84QnJww4fYrdZNGPi2ODP
+5rDtItGmUW2cW1PFmQbzJFUuFbDrp2lhLcjjXypkZ8JD9PZzfFiYb9FzDG7T
+O1B0Ana7MFJ3BrYSP5X9L5w8w/RhJew5eLc4gNTjggWDMP+O6WI/OH38g4EW
+zpe7kccNIuujEl87wZ5qmfLxZL6nS5lRcBS/Pu0inJaz0O8SzH5Dt2qAm2rK
+jz+E2+zieb+jX/5eTZleeP7OkhfOcNnADG85zIeZ0Hf6NJz13TlJEzaqLLTp
+gP375Qa0YGEOf9hkMYuK6KrJ1oDbVt4Z2g+LzdhysnBjgBf7b5gzdeXP96Q/
+7tKnU7CtU2TRLZhTcuCdtRnWaT6j4khdkdcUAJvKB3ovI/2knAo6DPf/9KE6
+kZ8T6N6ZBV/66ElfB1cfUzfPgZvb/8oo0WJRailbWzJgSegavTkwr/PcyEG4
+ix3om7SARX1k61rvJOsLHgbJwkbn9f9nDzMpl7rM+ehrX0a7GswS9GnZwZ4q
+B2O70G+6z3LN0XksKlf5mm8VLNnzYMkLWK072icTprLjC+rhJ2c3LoyAdx8P
+SCH19Ji92ltJ/b36rWF4vmiupwNcfSbksxn2L5yM9vkDHjkuHY2Gm9kti5xg
+/qHr0x7B/fGtZtthuYayi7ro12p7pEUC3OXfoBEHR6xj7yomHjeub4DpHL2g
+T7Cz0JBF8rsOjW42RB6q8X6BKyyd9/JtOMkfLm0Nh/vjMoOrSN5jgqI4mH58
+tfGMJbA+ZzwUnkgJc9wGFy7t+bIWZtitHLkAi5UlNbIw5ZpZ3AFHKP+pWoTz
+70fsVJnJRJ4F/FRbuFjWxlkHZsns6yhHnqjwxM3msO1Fe54+vGhZ7XM7sj67
++0sa5pMQEFa5EuY/uuM/MBeOEbmQutHsujue8Nz808rk+QifTwfFmug/bXq7
+Luw/R+fLWljB6nKlEtwV18x5RUfeVxmPf6I/+kDql1g4S8cm6jEs91YksYUZ
+L70d/4IZqj+kSvDuDUs1oolzknxl6STXMt4WuHHPLWdFeOROn7UNfMk7L8sC
+dlUdn9KHmbRgpT2wUOb6UQbMEc/LuQkrpOu8MCTnSc3daOiva/+CzSuImwSP
+t8Ni3/omXzJffqV/Oezm/DYjlcyTbRIgh7y8eKMldbCQFrHLDT68su2TDPJV
+exgeSYb7fNIVDWGJuuB0Mfyi6pPTBljI6tpWAZcyucZRZP4/rpSSuu2S+U45
+MKPW/WoSbHr57Ip7sDg0JMEBlqqc/LsD3s2bLupGP/TPNaVjZD8X239j4X0+
+OdrK5ng/iX7fR5AvmTknRAeWVEXMD4HdJgtNTEi9lrrWqIH9lSq3msFug9na
+S2FhEluP1IXhq+xz1VnU91cPGbowNRxxdibM/G27phpsO+rmlzyHRWm9TaHL
+wLz02/oasFGxmWcv+kkXpRSJ1PBcudTiDen/m10eB6bFKajVwHTGmqubYK3v
+R4OKyX2Z5j5rFaxQo5lI8vMMhqdc4MJso/w0Mr/w9tAwuKzV9MURuFl3HzMf
+Phq04w2XOGePmRQWO6xcnkju77XyNHv0UztsZnsSZq4J68qGHSY6Ky6S9Tf0
+z36Dh7Ws/crJ+sbE7tXI571WHPOcvD9LrahUuG3bqPZ3cn+zHB3r4BTZgcXq
+ZB6fe82+wqXfF3uuMCffDxVfh+HK/LFlO8l8P8o59cDpBYpBx+Hmu8qO9fBJ
+bu7+EjLf2W2MJJg7Xar7FFb658Q6U9jPod2hG5bjGXjdRX/7aJx+ygL3Iyq2
+fzm8p2EsRhkemdOeVoy8W+Q7EubBRipJW9Tgxsvsbi24+afBM44q8s0TDZN6
+s821O+9U0HfZgLEqnN41eGUjrNIn7zaNPN/v/OSRMosaS1gfOUjuS0bzI0/Y
+znOwvgPeLewMnFDC/CxLCsSkPlrmK4TZl/YcEsCFLYKtJ+FY3bh7F2DP8d7b
+CXDYrpyKVHJfopfyk2F7YX3xAZgx+Nr+OuyZx8uLIvdnyQVHCZyg/y4kEjZq
+6r1tgPMrWwdSSZ210FXEgT+/3uiYQOan9+9QI5xeLDp2EuZ81BMZI49CtcrA
+VXK+tYvfAXgkRNBSDYtbHNj3Ybt5Xh7vyf71lgNTcPRbpXW/8qvdEOhjXlE/
+CwJN4GTFxQFWsMEydcctcL+4sM4YHptU53Jgppp2Aw3OplmU5MKXtJhF9dhP
+mhbMvQt3eY/fC4VzrwibWmA+tTd3Cv1WTT2v7Id59YLmBDhQwzrxN0vkiQv7
++g35bYf8H8+Edy/d0esBW3ASOYqW5H3ldXAU8X0Wc7VWAeaPVDg5zmZRrZxp
+i2kwN618/cJZeM/lCoeGsT+3p3/HXAX0I2mt+whX++5stJrJohwblJc0wpIa
+dcvYGSyq09mDXglHbHY16JdH3W51zxWSrzhFJgeum4xUPQU3dgjKOHBTxzlp
+PFnf8FOQAl+VcRGEkf0YyxWfwO6G9pG7SD1zKN8a+7OLnoztIPWdUcG1cLaJ
+2dtAcp/PaAh3oR8D229byPNM2mDnHPSb9qjvPwlk3j0Xzj2AqcLfD2fBVKJh
+XDjycau22fBhxube8zLIv96LSiN5qnMnpu+HM6x/+A+Rfqd3L6uDy3Z4hc7F
+fNy8M7kfYPGh5g2rLEnemZsaYbmjNmeCYaW6wX3JMG1ye3sqLOkRmSnA/WW0
+5mKYmZ9s7Yfz6QYefg/J+3DtOXUE/X30up4ggasVv249gjwK0gfHBsj7ydMO
+DELegB3myhPk/PuTUmvM59c/3VY4j3zKsf4PMygizw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.683437538255017, 4.183048595699216}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwd1ws0VGsbB/ChQtE0IuXaiCSFSXLc7RBSLhWiVAjlVhJSuQwJfR1CHYnS
+FIlyS0glTSVHkkuHcklNfMe9zhRphM/3f09rtWb91vvu93mevz3bpux1dKeP
+MI1G68N/8knjz+GfLEX7io8YFkXzmHA5uFmOoilW/ma1H+Ya7HYMgifV9BmG
+cOqA0dlYeO7thJc0zArpfhwJu1/8dOuDNkUrE1vzYD8czUj6lgYzph9vUYfX
+W4q9toV5UVsNelBPP7ZNayHMumOz6xSc457ysVmLorVW165ZCI9UxNhfg8s+
+W/08vwL7UpZkhMGszh+xovCpSBNvVzi48Ec7ezlFsz14QLCFXF/Cl56VoWgT
+RmdWmsKOtHjrWJhzOFmPIufNTSsuhT/Uz7C2wVTjhRf3l1G0pCCJvH0wU2vd
+PT9Yo6qmg9QLfp2dpAe7jqm0pJHzc28L5OHwrZbHSsn+Ed27cvAqx/+cb4K5
+mpSpDtzNXDA+ANOiRq09YYUXXldmSL3E0z63YLGRmpvi2iTvXKdpcr2tw8ml
+MK1PRuYA+rO5Y/VxCTE1vLwJzvp9clKY5FmxyNcE84bsHnYexXkMlZaPxbDl
+M/+5BjLvU3e/FcjHQ87d7yqpZ/NkXQRcLdgV7gvzepxqG2DjAuNAdZhvcXWP
+CPLOv9g+0K9J0divteZpwa6Z1+uz4NTwuFwTeJHM/xQcYE7v1GpdeGbUWGYe
+zDjoEyMJmxsl9lWvR76ck6XvcP5ATUlOCMxm6VWdhXPMnpnowCyP4mhl2Pew
+W+jUOqyr0bmk/0veCfmvYBrd4J0W7F22qCsX5sTGXSzE/CmJKflJcJl+8mIV
+2DdR3yCCrIfsPcRBfqbmfJsQmGL+laUGD/HdlcLh1reTFo+kcf9qsLPiYBZ9
+XvABeGdRtnkGWTcPD5GFFUr6HUphxufGZyNSyGn97uevyfkH3HrbYT3NybBh
+mD8dbtIJy8iGGYhgHk70SfsJmM+J/HslzO9rD1+D80TaY47rkvlll6ofhWsT
+9KTMYcaG0ak/4YjEThNrkkdOULMm+rX9bFdP1jnFubPZcMnlgr83Em+fTFiM
+ed8lHLSQgx3Tjayi4KEW+tQP9MP0MNMYgJOumaf9Sfq/dcbfAvndke4XSiXz
+zs4+TIVNf3674UjyNqgObYRLct3kxYlTjtZ/If5u7fZMAz6S2SAg1wu1Hw+D
+GUeSMkbgwPf1V9bCrUy+yws4ujxk6tNarO+lDONhaiylMAsOHhU/og03G9Av
+7oU5LaMLGtAfv6zbXRUu29LTvQPe32q/Z1Id65SvVxvmZV9fHfUWbo3bG7MN
+Zimc2PaQrHsJ7F4ir5vy67rvwB5KFV8sYK1tik35MLN22LYJ+WeoTjsXwakv
+OSNeMDe63OoRzHXLeSQOuwhkpFvIebTHg6+WUjSl7t9Gh2D+Fb2a67CE6MMX
+C9Cfx9GjiSlw8BPPMBWYWzV7IQOuy5lpNiPz1tczHsBDf2QUu5L5ZtU2f4XL
+3dSkAmH+955DBuR+SS8yiiDXhw/8vAQzesdKT8Nsb52qGZhpP+UURuqphA0E
+YJ7f80dPeBPrHIrqhUf6HTpsYN4mS5ft5P5w+Ja96t/9e/zI8ypUbsz/O5mn
+0VuIjjzr7i3/Ny/etZgvu2E9myV5EcT3souTYav87Zo6ZL/UzctF5H6RGO8Z
+XIN+zarHy2G6nnhzNszMP0XnwE3NErqOMKsigAqFGztyDUSJ421GWHBkesHX
+52roZ52/byd5HnJNN5yF+fzmf4Jg+x3zsxxgWmR7zA/Mk26yKkAFTm2j5x2H
+n68djxOCeZxpuy/I42Psm50jq9GfX3rOIVj9xs7uXpjf2ls6SPJNCb3dAzNY
+n/aHwP4NG3r64FadX8sl4Jnkdp3vMHVYvKBakqLV2+5aJobzyyTlpU/DglmL
+vFWw497dJ51h1eqSFjOY4V44aQNLj40F7CP7Q99yyHrT42Kbk6R/4dTYU7Dc
+nnU2aXDr+eYblbBpXnZYLszyZSvNR33K6qtsCZn/l6G1F5xeNPOmlJxn7/Ly
+NdwpHnDuNkyt4L8ywnxyL68WXyL1r49QxXBgv7XECXJ9QaOIPPJpqvcctlcj
+z0eDlWxYbpujQIGc5zcw/J64L9KJzM95fG2XEvLWXZIZxoGZsWwhR1gtaiHT
+DU6VzAn1h49kbNhJJ3kdOqIaCAs8LLSfq6LeRZkLTrDl4stD4TDDsNFUFRae
+9MnXglmiknUfUM9LdTB4VAX5CdbfIv0khD6VK4WDuTsspGAxzzuap8l68auq
+TMzDea/e7QjzSuJzl8H+dv0jLBVS76PoBfLzGrGskSfuyBddBGuUF+hLkv3D
+2ZXnkW/jBNXFgD1cr/augI9sLL0rC3MMGtoqGaj3hOGuATN8S4x9YZm1yyw2
+w60rA36th23Ez51wJ+s2Tr/EYd79rL6TcOq5UI35sL6YsMtlsv9LSdAyOJzD
+zC0n9feNXzWFkxRWl78i+11PXIyC47KNM7vJeV7HtrTAFSaDd/thtrMvTxv9
+iThnZhBzLcrHs+CKqEGvLpKH0fXr4pjvsGpNQh1Zfy7zKhLOTBIdzoOpD68c
+hmF769a+U6SedprlduQVJxVvZE3Oj65TvAGH2FUxxYnn7R/sh/Nrbso2rML9
++W4kUBL5O+UJJmNglvb5veT3j9b3K091ibOu7FGF7zyRyx5Sxs9rz7isGMzd
+8vejazDTx9b5L/K8Yv4wdyF+tK8pEWY9ZG6Uhnm1/ix18jz16tvRxYSLropW
+o988qzjZ2zDHvTDRCF5v7lcQTWyn7vcA80fQLSo94LLhqEoW+b6lBiXawY4B
+R9KKkF/3wQUTlnAw64IIC/Z/UHLACmYblmfHLMH3cb3oS0eYa7baiEvH+4R0
+5FMvmFZoM6UOG3dIZp0i9S4eNHy6GM9PvxjPDLK/cAE7ATYU9Aruk/X3nRZs
+2HSJJKuNWG5m8C6cJ/mre5TMY5b8RATn0efHDglhXq6HgvLv8PPq6AhJmHO/
+5+4m9LPUgPPPCuKzcSemYcbjYLHlMPVjoYE/uZ/SO3iLYMYFsQM9ZB65oHkT
+ZP7u5MXbMX+fUlDgW5gl5raW5FPd13QuH251M3+7HPllPKnWO0byyRnP8IOF
+DWLKNxLnL8wrgJP0S9U+rUResXfG2uCIfvkAO7js3mfbfjiwLtmhSgnrb/wz
+emBBlJuGEkxlCcoewazSbvdziti/LTwxFm7vmFKdUUD9q5vEdOCxmbXBp2CG
+VAi9Bf2tcKy5J0rWJ4Ut3WFvTcvafHl8X59H/erFfPzjqcVuMPOyz6wr3FQV
+UacMU23ZtXnIJ77C79Ac3vu5ViuScpBnqI+ZzHeYttjXqRD5KyhkHhPATN7G
+wGYJzJN+aCsD1/MuWQjJwJkFWhV6MGfxmfcJ4ngfXfBZ8zDMDrKbXQ1HxrOe
+cGDuRNMfk4vQ58tyxQ+kflXlgyl46Kfyl2Xon9f40FML+73turq2wh6eG86m
+wcYZnNbjMNVzVk0J9QTDn9ekwjS2WPobuK44pj6bXP/f+bmX0a9HQqnlJbL/
+jaLccczTMBW1IALmiHvOOWNe3toxayuSl4WQiDzyUG//pjWHfmiXSs7HwxEb
+6dxcklflnmd9sIJreOcmMq92rsMG5Ou6ZJdsNfJgS2mfDSR2/vRaEw5W/hCV
+BhflpNRm4T07WDxgcw4s4V+kMA/mrvHpJOuB4crmAeTvpKf7XMj1DCnd5Pd4
+D2PLr+rSIt/HbC3W9uXk/edzJLk/XYM657/B73HugT+3hMGRVlkH98E88vcg
+5mkln8uo/wNkrgaE
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.8279221571592412, 8.41091634100807}, \
+{1, 0}], LineBox[{{6.4999999999976925`, 9.5}, {13.49999999999251, 9.5}}], 
+        PolygonBox[{{9.4, 9.5}, {10.6, 9.1}, {10.6, 9.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.099654057937274, 10.345676968901149}, \
+{0, -1}], LineBox[{{6.5, 9.499999999997693}, {6.5, 16.49999999999251}}], 
+        PolygonBox[{{6.5, 13.6}, {6.9, 12.4}, {6.1, 12.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.445200000000001, 13.}, {-1, 0}], 
+        LineBox[{{13.5, 16.50000000000231}, {13.5, 9.499999999998607}}], 
+        PolygonBox[{{13.5, 12.4}, {13.1, 13.6}, {13.9, 13.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.4452, 13.}, {-1, 0}], 
+        LineBox[{{13.500000000001851`, 16.5}, {6.500000000002592, 16.5}}], 
+        PolygonBox[{{10.6, 16.5}, {9.4, 16.9}, {9.4, 16.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 17.4452}, {0, -1}], 
+        {PointSize[0.04], PointBox[{6.5, 9.5}], PointBox[{4., 5.5}], 
+         PointBox[{13.5, 16.5}], PointBox[{13.5, 9.5}], 
+         PointBox[{6.5, 16.5}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T9", " ", "P1", " ", "N17"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdgei/gjfifjhihj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdgei/gjfifjhihj.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {22, 0}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwd1Qk01GsfB/C/9Ga4dspwlGnRptzp0iUNM2ncpqgGqVeRaZEWarpkSzWh
+mm6WUZOmUOO2TUopKqLShhbdIWsh2iwZezV45f0+d85x5nzO8/x/z+/7+z9z
+TN64yytwDEVRV/FHvqnmUXzMOZQpwVQOpR7zWLUWlu8Juktcl/p6Uj6dQzF5
+H1oMyfrvGWGTYI5r704mzGjkeknNOFSMrl/Uelj0eCbXCuYtPuF9GpaoWLlP
+JnCoyNWfzzbB+YU0RTxc9pUbbDMN9V/kyjfBxTrvNsfAkaoNMQJYKrNTl8Mz
+bwzHRMG67ocSLa1Rn7Ms4Cosj91xezOs2EcX98Ii2Ubf8zC/snXxHziftjP8
+SzUs+Fwy/jzco6gWDsF1WlpGGuiftnH9a4PpHEqY8sPRFxa/vn1pPJyfu7fl
+AkzV6kbqwjQL7i9NcHzLSsk3PC/edevOKCxstxquhMvmdM0ch3kJSxIDL8Pq
+XqFVN9YlrRMH98Cyu67dBWQ/y4TpCjNDf08Kgi9o+F80gJuXXD40hP6Yiocf
+Wkje6uB/wuH8J+2/FsHqjvazLchnGmkemAkLmm3MF8GSimdPTsB8zeHRtPEc
+KmxPcK0UZsTvXjVoyqGqJHaCi+R5atr3ALi5+wjvGSx+P4FbY4I89CWX+mGh
+z/mnG2C+b2CpLckTalA/DpbcEiwNsyY5h0RlxhzKcGCh0yOS36SVqYBN4xcs
+MsZ8enbSH1yEdS2nlG+CtypaBQ/hAZdTbrdgZcmG8l6yf0kpawhWqFsEjqiv
+bH9z1nEG+nWbuzERFs71a9gO10XI+B1wumOTXjKsGNPrzEP/yh00/Qtk/8Ll
+tnI4PS7p6BWYKTgV+RWmrVBoymG6d8aUaZhH+sjwazGs3pJt5wbb9/kMB8KS
+aPfBZTB3/ewFTsQlS53s4Byb7Xk0uKw9zmcE9aiAa21VJM+zE8uyYMUB7d1/
+wzyJ1jUWzHd2rQmD60Zq9uajX5n/B/+VsKNcY2AKLM7SbLSHxc+9XGKRf1XB
+lJQZcFkA06rRCL+XtKkas2B+op7MCe7cZte2AG7ekXQ40xDznHbVZi2cM1nm
+Roctx4oaxDD1uDGLZ4CcIXO5T2HGeK6VVB/v/3rg/7TRv9KhtJoO52UsMlwD
+cw6ZXajXwzzOT7VWkHnVjzJqYMMN9CuDxM/oWTrY3+BmN5Y3E/2MMUoVwo67
+WC+SYeWXCslPuFNTo6Mc5vjFWV7B+Vud82tH4fx4J9k89Dc2zi5n6iz8fsuy
+wpNhfmG/lyPMyNpn2wqzygp3O8OS6zfNf0NeD+/nUjuYWeG8eDv89HaUiSVM
+9W8p+AvukRVrDKJ+cYFpZTLcNk9oQs6PDAn3j4AZp9+Hp8GKTNZTDhw22qcI
+ggX2JQYqnCc3/sydD4s3//NuPxxTvKNSCxZZKzcPoH/mkXbpB+SnoriKMuST
+uaxYX0Y8/K3pMOYTLzPbWkhcqUxl6eL+Gifa3/93v+ebHzp474tbol7Dwpon
+7iXayJXmS++Ge/48k51Hwzxbx1pOIvN8PFFVrsWhpum2P/eFJS9U2RbwtZDe
+u+fIPJceeSkfh35Lvbo64Z4YV9ommGubauiCefS8ndMqgCXOJgnJxLzyW6lw
+p3D180ZY6B6WMwIX7Szzt56Nepn8fQmoz3/f6rQJVipdJA7ohzX/aJ2UeMOK
++l7YQ1m1Jh82dPAPz0b/Ai9Gxiu4Z6JWqB/yDax2CaiAm80TjvbCect325TC
+cg3uW8EvmL/2S/8bZH1LQbIcVq/ZqJ8A85+lbLkC5xlvHAgg+5O7jCLgSOZB
+ji1MeTSG02De1A7hEMmTm1kYgPpiWR+jDOYbjZsdi36KHrrUnoGbjy/7EoF+
+BWs1qvf8m//8fncyv3tDbetg0X4fX23kD/O4yFsJGzZ4aT8ci/mPKnZ7kvtl
+f/x4tCZ+f3+xxm+Cc5qWKJaO4VDB+sf142FB8J5uRw30X/dmcy5cfFyP701h
+ro9O/reb1L/PKXIdZVMKI42Y+ehf9OuuEs+fbMqeH1wVCwtS0yzrR9hUQlui
+ZhXMeByUUQuLxQbh1jZ4H3mv7rphf9ibEWkoLE95/mY86jGLtv64Byvfzz9i
+gfMSIg6nqGHR6YNWJTAzp7xp1hzUc7mZJkJ/F0IejV0OC2JUE1jo/5VDUqcA
+zmHlnu2AI7smeAUSvz3Xvx95FYrM0rWw/EoCRwU7DvVmu8LKc/QHNpiP7jXn
+yVZzyP+p8gV2sLhqTEOfDbl/p6NGybz6PY0ewcxkh/BkuOG1lJNI+s8O2fYZ
+53l02f9nHVycuPzGOJhWev/TXFh4b0bMMMmjspmkTfarV9ekI29nps6+bnI/
++Zm1ZphPTvar3z6S+f34YhM3xKZEhyPyP8PFisp3Qz/YlOAi994Pcn8SgtzO
+fGNTuvO89c1JvSPSzOh+NlXc1nGHR84333r5Zi+bGjCd1xNP5mdXHMDvYVPB
+BSm8lzCVsCX0aRfqmR57TEdekaC5rk7FpvJOaf3cBlPBi9e/gyPNdYIK4eJL
+e04WYb88dnqQ9lycl54bz0Q9ywqLU3xYkNvl54nzcl6+VSUSl4ikV/rQz/L4
+jgcwVT61e9IA+rmqvtMCF1d9yziJ/qXhzou+kXrcjoe939GP5x/LBsl+hs1H
+uppNUW/WbeuCGZYZf/bDyqQezRqY01w+HDLIpvxMfZxuwaL6uwuj4U/uPi8O
+kfP1Gj8awIqPq9q9yXq0md5cPO837rsZg6yvUHnW4DxW9/VeFfI13x9OmoB+
+1AFfh4pJXqdPHj/Rf4P3DmE6Wa+oePc38s4JPWARR9Z1lL5OnXg+JWl6BMxZ
+MNJn2Ao/UdOiyfz2Hjup8QH3Wa3emkBcfbzu0Fs2JctNM7tO5q1pmKhfyaZo
+1jzjJrKee+Bg6zM29fRYvsSC5DedvuXTbTZ1IVY+cQOxKMShKB3z676af52Y
+fHLuUwzybcv5P/BL/e8=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.558531590841939, 14.870172348677091}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJwt1AtQVFUYB/CjxCs0XgstCQQFMYMM7BCFuNk94IJsCK6LpCAgEAKNIkRB
+SMQQbxNymwgZQdxgNXXAthIkQHkaODnbEkQbIW2Asi7IW95h/6vtzO6d35x7
+vvN9/71z7WOSxEc3E0L248ten/2YUPL0Y0mJtUX1OUtjmOeVl2lBiWZSNbGy
+lZKZivJfLOCuv5IKb2yhRMkXRPzGoeQjrqbgiBHWb/FjG2ADl+5UnecpEZmu
+xnfCykF7x3oDSto+8XVfhtcXPsvI16eEek6PilDPQ14alKtHidrwZc9u2OTK
+xokmXew3b9aK0Q+vP6TfHW77oXmfFr68q91q5jlKJFWLUzkvUlKpOsjMwiYd
+wrfMuHDiu8083M+zdg74Au7Pf6KSwdKB3PQpdl3WE0lx3sx7ko3tVpQc6GlI
+noej+O0JPvDYsTsXatGfXQhRu8FDk2JOGPqPErq+8xj7wxX7W7XsPF937iyD
+o5zjsvYZop5OZT0XbtH+Y5vJ2kqnJw/9ZQZWuybAUVUjG6Pof4H/U7ExTNb8
+Oykce89DnmLA5udx+SLmPzTgIy3D+dmCM/XWsMjFrSoP/dG0D1qusfn5rRYI
+2Xni3NpiYFGo9dKCDnLeI8jaBY9FuDPlmymRa5xsvFm/kMH33YQ8sjL1E+H+
+q0v2WwnO7zFavAmrI7NvbPzLEEm+xskV56niBKuidYYkn57rqod3NH479Moa
+Q3jVjrEB6Jcr41z6dJUh0pSG2jG4/G5gWjQssnhT/2PMq9ybs/s2a86oeBnW
+LLqmnsV+6UP9r44gH4Nt8aatqE9//7XoIswzOpxgs8GuC91uw8uniuwlTxgi
+V4tMW+CiqdbOk+hXmXzuw8/h8rCsVDPMIxm3Fb0Ob5F5Z+Sw87U7vdqC86j2
++HALbFd5vMQF7qrwFjQ+nT+vtwT9aqb35CWxHo99Q4v58jZqdEdQX9JRIN4L
+N9Yl9JjDPFVK1C3k01YX7fMS+pNr/8gXwrSYG3KdzaPwHv+xOfr7vmTCfIUh
+ymlXxc+w6upd08OLyNMpiLTDh4r80+rmGdLWTYdHYTLcq+c6yxByqb3ZBfXs
+JHMeK4+QF183poz9PxN6pfFahqhryftW6GfGP0yiGEc+I14NtbByTVkjeIDz
+GRnXD/O0LV0LVdyHI6yXBuGZt207IrCunh3QjWbzCL6f2If96u+kiwqYl/Rj
+EUF9k+LXuDbIj97pWL0yiX4GpX/6wtKgHeHF07i/iePsB2uaDvJ56NekUlHL
+3p/9aF4neQ7zHChtZeupxrk7j7LzGTmKI+HsSIfiBVhe1/xlH/rpmQhNN1xA
+PQevE55wuti49izWo2q2bypln+8l5UAF6kn8JtXz7PN4IXh0G86buR59LBqW
+69U5BE5hPrMCzgPkZ+cZti57iP36Z7pOwXJa7nZyDM9r1WmRGFbnaoe4wwyx
+My+03M3a2T8noA/r5//uDGfz/0Zg69aBvIPrhOfN/3/vpd98duXQ/wAMmub2
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.1922538386132735, 4.316769291093815}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.00000000000432, 17.}, {13.500000000004775`, 16.5}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.650294551449843, 17.441370831152057}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt2HlcjNsfB/DRJqLGlEqLpn1KZVq0WKckoTItFDeptCpJQsrSYinaEIVk
+MLIVI6m46U5UUmG4YoT20iYjUSr5fc59/f5xXu/O85zz/X6fc87zDE3/7W6B
+YhQKxXkKhUJaCoP8Q2VRqKRVZFFEhVu/bCTO2mt8EPZSCM2rg1t//Dw3CJct
+XqLhNAv9+9JfrFJiUYQXnQs+wCJ714VpMPsBrTmaxqL4qtcElsAx3AMfafIs
+ClNYMb0K7rQ8ks0jdrbSIf3xNCuxVQosCmtp5iC5fyDquvM7uDVQ+70zrLxF
+UdNzNq6jvg/9hfnDg3IaqmC2kozCaZj1QztaHa3A/bSEHtp9wV3MzWg533Z0
+3cV1vOGt+ikw9cLl80thvhTnxHmY+SVU7DXm2cfWLc8m12eN5O+AR/11R0je
+8bHco1pwjqlnnCdMVy1634O4BUmh9lpkvF0WwqfEB9LaOzEule+fVwl73V2y
+gkvmMZKSe0dcWZgQCIuGdeqmYjz69oRsY5ip4m/qBksL9ltOIfc/bY69Byvv
++3i0Ey1lWeUrffx92LvidxO5z6w78SbJ5/Gw4WdYsOeeuSXiKN/5kzud1ONP
+Kr0aVpP0/baCjH9D3tcV9RNYCw/mkHhK1BmNcPkBDo88ZzbTftYaZbS3D3+O
+g3kTonW3YWs3j5tS5LncmTl9HKaabHuWC3Mmah1N5uD5qXMybfD3eHfv9Q4w
+JYc2+Q6mm68stoPZQbyJKLT0D/L6OmhZTXEXJVXQDvgVDuC6xfel/zoOi45d
+DLkIN9xKXEhRxXp5Gx/DggP4b2b6wSLX1ro3mDdy+bv0W6qkngvb/eBDa/6N
+a4Y5fX6nvyDuXIZ+/i84s9m3fj9xh9/wb1iQkWOpTOohVeH5BWYmOtEeow7C
+8d3360h/3rmugzCnYkr1WTL+9xsu60j/P0WdPjAva4/QHo7xquueS3zI+NNa
++M12m/fNiD/SbdPu3fC+pMK6KzDV4G1cKawsdSojCuY3ap+gYv6eG49S1pLr
+w+bYHoBDzq3ctZTkv1dPbwIeZk4stoMpPI76YeTnJL1G6A3Hj91Kkkc9ikNd
+LTJgeq7UrktwZIuUwXtY0PxA3oDUV3NGnA3ii1ROr+fC3CnSfYUkv9Xap+Rw
+ncTy/tXmahgvv0QvEOb+6SmohgVN3TaX4WTJ6KO+6ohf3SyvCg4Y0f86CbO8
+w73ryXObbvHy/FzsRwsJfgnJM/O6jpkGxhs56Z4MO2UNWT+CI9+2vCB5NLC3
+havR0b+SMdKLeC4HPn7MhunjGjsT4ceW511iYY7FzaxZcK21+JIcOHNBjcoF
+5BcRnGJ3E+YFJA0awsrTbufx4NbbMs181IfROa5cAPs+7fEKgNuVvo5cgCP9
+zzFV4KJB+aGj5PpRX99u1FfRXkYlHKbubWiuhy13bKpxIuOvNoprgIf2Ltht
+ROKJ2VnbA7uZ2hXPhEW/jijSMd4bB82hLuRHlbOPjST7IitKjeRL1WjreAuH
+mPp+5sICG67dWsQrse5TJgduFbkUvyHPa3TW9iJYVKpY4Yd8w0PlGz/AvNQT
+qSK4+/j9BFlSr8hCqzjUb+xo5smFJJ7Bs1Mn4JpHJUY7SDx3DpZuw3ONdhd0
+knpQU8aL6uEqVc2uEViwOWMNjTzXA0Ni9pqo90hOx1I4/PyndydhUbdwBhuW
+mP/iUxvMN9U9uwIem9ydaqKF8fwO5dLh5IKW3bthVmKObwfGP/SsKLgU9u0b
+WHUCduFPifsKRyb48Ezg6d9cLdS10T8QXsBHvPmD3zKWwZGbqj44wbGjDbLr
+YZFVicZ75HtT17zcl1zvf8ErDDaydTcmFrS7aE6DTRrDY9eR+7klaaWoX/v0
+6WZ2ME/2/NdYcs7EvHVgwPEmC7nr4dqL3aPTyPgfZb44wZ1fY/7uRXx0x6hG
+H1hnhr9yHZwZe1wvFab9teNkIcyuvxv6L0z5oJd8huRDSf9livmPFcgpHyX5
+ag3TyX6quiYjnQBzbLUddJEPMz2Xd5iMJxZJ58HD+5lfTsM8u54fS1GPXLYG
+rYj0K2g2k+ejoiXoeQ/z+7WnuqK+/CCLohkkv7b1v2rhwZ9x81fB7Dsr35lg
+370tyeWlkXq8jDxzAHZZL8EQwixxf5P78GqzdDs9HeR3UrdcAAfsvJq4C/bt
+ss8hzgtev+kJ3MoK8yHXlxwc95ypS9aHc3c8zGPP03WFedUME0sy38vT/6QS
+NzVavUc8k47ZCRUw84FEUwT8gh5h3QVn3qs5OoF8XqeZm1H0MF7tCDUZzi8c
+XiFH7Bjho0TOYVFaIw1myUsbk/pY55o/k4GZvQ/qPGFDwYdD4xiPfa1QSIP7
+7kkKO+DI2bazu1Dv1+Lne2pI//eNzFfk/cJon3MN5q+ULxDCetVc0RGYtVit
+fhwOsHv5I4Q4pizNBuN5nGzJWQtT1vs/Iudm66c4+SXkflqu1Djs7bVvrTlM
+VSzX2IN4h+nZAmKRzLexSfhhW9HlZWS8csspaWrkvX7b2ZPUZ36quyrq1XTB
+5GUs8aUoOS7sEFd87gbxsjOnNHFOCiykOO1kfM7BynT48aLTnjrI33f5WpvP
+cNklzzfhpF5Nz1L1cQ7Q1e2aHsD0NX7BznBJvPeotD76W4JueMJ2w8uuesJ8
+MYNdDuTclSnyvqJP9tMWY1XYv0PsUS+cmUYLFGJ8Rbd3lxkM5O8WVpkADzxT
+sfOB2R9cXqrCbt9+LExhkPeG2YtbiL8mq/HGdVhAb4uyghPXPTUth+N7e7lV
+5Dzg3KNUwcywMpsNMHOW/XM+zP98hDeGeimoZLy4B9PFlgyR906uV19hHoPs
+fwNlUt+lkik7k4gvmy7eQN7bO2sjAmCOU77Hevjj26Wq9iSej5vVt5P1ZFYj
+rgtnqjDlrsAWrW+400g+GjJBIvKeW7J/7TDJfxFngQfiEXGCZD/DvNKo43Vw
+weuxtA6Y0tqZ64J8BLObpfuJS9T+NMER/adtJmFWsmV3KOqxz0fKTZ3kn9gZ
+8gNWyDH4tZLMtyeoeg/qa1ivtnY/zFt0n9sPex1xH/n7v/qEGOnh3O1Jj2WI
+GSDew7xpa+DcNnalM+w1VWbaFrjbP8kvF+blRm3eBjcLQw73w4z05W2hMI2x
+8Yq1IfIqs5HYADdQ2KsS4OvFtKZFcKxyuM0TuMxLXkIBlqilH5qABWkSrKeI
+R6etOm/ePKw3r36fjbBRxKlda2E2zeBHN/Kp6GPGBMOUPtuWKNiiyYGzE46M
+SJ0iAQek1uyIhltP7BTnoD7HTLuGt8LMvfEzneCH5dSbXrBvnHHaDHLeMMNi
+lhHPYE3pQr0ZF3OyNWH+A/FX72C7zPZdU8j8O22Z3TBHvfl8G+KlvLaZRcX9
+bnNb0quIH63Q9YCDSjLvFcC8mYoDd+B4nPe5sCiiVaCB+DwKuB+zYKq/rsdF
++LX3Q5UcmB3NYBkgX+UAO2E+6R8s6Sol72Fp2bhKmKO3+I4W6mVhotX8GR7N
+bOsJhCfqAtznkPgLQj9ehnPEj9/ymEfO1yty78h3xdn+5TmwtOyuCArek+VR
+WXPa4ZwUzS3qcOfWqtb5RtgXJ5/0GMHnmKUaB+GegxbZJvCw5rE1z2GvtPpr
+WvDDrJ4uJWPsj7f8oWnwwFedc96wsoZbVxfmW/16q9dZY/I+V9tRBvc1N2xr
+gEezt/1IIuvhyuycYZi3PUubrK+igmiFWSY4V/fubqHCMwa9r2vC9LCCRTzy
+3ZFgzNWDmZduJa2EZTWOtNCJqzN+DqB++duj7pD7RRdvu1yFxzRb3o5hfGb+
+59BoWEpKNqoZZkekqG2Cf5aOfqqAKWxXqh9Mu8XPzYMFDZJ348n6Kd1mHU+u
+r07T/xuOn8nWDSL93EdbZDH/4D8+V91I/tYhFmQ/6RW3Fq6EMwvOhX+DpexO
+CRzI+I2M6YvJ/lm2wcAVTv5o9SoRtt/v6BoMl2Vcn1sHZxkXeqbAkTOP/JFF
+Pd3M1lWWkHrdpl9wIc9DNC99kMQzYuRzBC5I6rKfj3xrCxQli8nztDeV2EPq
+p61X1wgL+m7mPIEZUQ6RfbD/ZMoZ2nzye2ev+zf4SFrHLj84JMrjv/6+SXNe
+IcwXaQW8hXu+v/s0DMcH8gNL4M0SsqEqTMTzJdQqFX4ucm5aAMcXWNM2wjrL
+A2ScYFYFM5Wsj28ZzonecI+lQmwP8jMXCKcGw7XBG1/chjuohjfDYKr4890x
+8KdwhfKtsJe390JHeM8s91cBsDDsQQ6dXL//eelGJtkf8wvF4eUnF0Q4Ewdr
+GXWj3vX/hisvhVuZvCctcKiW9ZAxzJe5IvkDbhZ8ZM2FKZW9z2i4f3+Fiz0V
+lma+6rGC2fq5DEnYt8M/LgR2W5woGkf+tf82Z5P9dG6DBH0EVi5Y2NUBRxSX
+GvyGy8YPlRgg3z3cfeFTcX9ygqrhDnhbyCVrRVj5rOOaUvhW5rFGQ5JP2T8W
+v+BNtrkf7El8hUFmFviO6rynyN1C6unR1hoIH665wz4CR17YvioVtqfdb7wF
+lyUJR6/CA2YsqX9J/8b1VPJdZs8bvDRG6lFbsZYHu9nu36JpyqI4NmxXvkRc
+fV7OAaZkt4T8951X6ZQUDCtLi7/ygZuyGJWHYMFymu98WPtC70QuHL8qPpXE
+q3LtIfcOzDJYqsSHbRd9CC6HGX+d7T8MFx90WvgEbl1h9NsZtpD2XlcFX4+K
+0FUl6zdaagGfzGe1W0yE+ukeZp8sJfPlbBe+gOWvCjfegq0PGe15ACvZiueT
++a9niOnehaVUWddTYeaVgYwS+OjABHcfye/5hepn8DNab8s2OCavzawPnjq6
+IN0Ppq5yvamI+dW142u9TMnvW7koEt+QteQBD1jE7/Uk6zlIvzx0HYlPYbRO
+AKcIXkzzhr18j/1SQj0shcKzITDn8IwhUi++yIQaR/Id2lR9WYt8T7jMPUXm
+3zDzRit8P2eHBY+M196jpIjv3E0SqsmvSP2FQV9ZsF2gm/pPkv++jOTN8MBi
++ms1M9w/d0V9JByzribMHu6xnbYomthqztUwOPP+jYlQeFLPfckJmG1z6o0b
+HHDgnlQxPLr6kzoTnpq/bPg1XMvd81AcfqQpqfcFjjc3+/0S8ZWXOn+fYo78
+ZDjp2bBztcsQFZb+MstlE8nPcWxiDmwdR2PqwOuuPzBTNye/P/pVv5LzgDX5
+UwWOkat+RtZD1+WyAXly/4rBy+fhecn9g9Jw7c8HVxNgZfm7UuOYv2xyqUs0
+nMbX29xP8jsjdZhYrbLB6gOJXz86KxGuSxpprIfp1X66eXC17O9dFaT/ufLy
+GvhiV91ikq9jYEwQWZ8Zx1MNb8P8qqdHFyDeLRsnZQth1u0Ayxj4+6/hg3dh
+Ya/N/Qr4h3ry679hxve7KlKoz8oYplIDHOlwN2oN/DJYak47LBqTaTsO24QY
++v4m9bvU+bgKzmQvsiL1cByLeP4dDi89d48FC3beYSjhd0rhn7n8IGL9P4eM
+4em6JQbpMFtxg6ElXHojsPA+nNnxiGIKz58tMfUjHD/b6cRcWJr8v6XF/1sd
+1v8AcRBasw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {9.806386448142824, 5.191782494132622}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwd1gs0lFsbB/D3MJ0o5RqjC0OukcYlpHKmEopKfcotliRS49bnaFzSVJRQ
+CWmSOqWEwjdN1DDq4FDTRalUCE26iSEiuR7ff2ctZv3Ws9+9n//z7jWLTkD4
+ll0yFEUJ8Us+KRr5Y8Kifv0sZFG8yD9EG+C62gDdEV0WVdg1/dw5mN58SvED
+LF0T+0oCP7nlPlkNG70c+8AwxadraVUG7Gacd8IDbguR53vBE2OlM4/AcmMV
+lRowbaBqfh6spBC+6JkOi/JvqlUtg9Nkb54/DGe91pMI4d3/CFqt4KFDsbNv
+wozQ7pouBouyMpyquUDWCyj6ZdjBffwaF6ZiSsL84QnJww4fYrdZNGPi2ODP
+5rDtItGmUW2cW1PFmQbzJFUuFbDrp2lhLcjjXypkZ8JD9PZzfFiYb9FzDG7T
+O1B0Ana7MFJ3BrYSP5X9L5w8w/RhJew5eLc4gNTjggWDMP+O6WI/OH38g4EW
+zpe7kccNIuujEl87wZ5qmfLxZL6nS5lRcBS/Pu0inJaz0O8SzH5Dt2qAm2rK
+jz+E2+zieb+jX/5eTZleeP7OkhfOcNnADG85zIeZ0Hf6NJz13TlJEzaqLLTp
+gP375Qa0YGEOf9hkMYuK6KrJ1oDbVt4Z2g+LzdhysnBjgBf7b5gzdeXP96Q/
+7tKnU7CtU2TRLZhTcuCdtRnWaT6j4khdkdcUAJvKB3ovI/2knAo6DPf/9KE6
+kZ8T6N6ZBV/66ElfB1cfUzfPgZvb/8oo0WJRailbWzJgSegavTkwr/PcyEG4
+ix3om7SARX1k61rvJOsLHgbJwkbn9f9nDzMpl7rM+ehrX0a7GswS9GnZwZ4q
+B2O70G+6z3LN0XksKlf5mm8VLNnzYMkLWK072icTprLjC+rhJ2c3LoyAdx8P
+SCH19Ji92ltJ/b36rWF4vmiupwNcfSbksxn2L5yM9vkDHjkuHY2Gm9kti5xg
+/qHr0x7B/fGtZtthuYayi7ro12p7pEUC3OXfoBEHR6xj7yomHjeub4DpHL2g
+T7Cz0JBF8rsOjW42RB6q8X6BKyyd9/JtOMkfLm0Nh/vjMoOrSN5jgqI4mH58
+tfGMJbA+ZzwUnkgJc9wGFy7t+bIWZtitHLkAi5UlNbIw5ZpZ3AFHKP+pWoTz
+70fsVJnJRJ4F/FRbuFjWxlkHZsns6yhHnqjwxM3msO1Fe54+vGhZ7XM7sj67
++0sa5pMQEFa5EuY/uuM/MBeOEbmQutHsujue8Nz808rk+QifTwfFmug/bXq7
+Luw/R+fLWljB6nKlEtwV18x5RUfeVxmPf6I/+kDql1g4S8cm6jEs91YksYUZ
+L70d/4IZqj+kSvDuDUs1oolzknxl6STXMt4WuHHPLWdFeOROn7UNfMk7L8sC
+dlUdn9KHmbRgpT2wUOb6UQbMEc/LuQkrpOu8MCTnSc3daOiva/+CzSuImwSP
+t8Ni3/omXzJffqV/Oezm/DYjlcyTbRIgh7y8eKMldbCQFrHLDT68su2TDPJV
+exgeSYb7fNIVDWGJuuB0Mfyi6pPTBljI6tpWAZcyucZRZP4/rpSSuu2S+U45
+MKPW/WoSbHr57Ip7sDg0JMEBlqqc/LsD3s2bLupGP/TPNaVjZD8X239j4X0+
+OdrK5ng/iX7fR5AvmTknRAeWVEXMD4HdJgtNTEi9lrrWqIH9lSq3msFug9na
+S2FhEluP1IXhq+xz1VnU91cPGbowNRxxdibM/G27phpsO+rmlzyHRWm9TaHL
+wLz02/oasFGxmWcv+kkXpRSJ1PBcudTiDen/m10eB6bFKajVwHTGmqubYK3v
+R4OKyX2Z5j5rFaxQo5lI8vMMhqdc4MJso/w0Mr/w9tAwuKzV9MURuFl3HzMf
+Phq04w2XOGePmRQWO6xcnkju77XyNHv0UztsZnsSZq4J68qGHSY6Ky6S9Tf0
+z36Dh7Ws/crJ+sbE7tXI571WHPOcvD9LrahUuG3bqPZ3cn+zHB3r4BTZgcXq
+ZB6fe82+wqXfF3uuMCffDxVfh+HK/LFlO8l8P8o59cDpBYpBx+Hmu8qO9fBJ
+bu7+EjLf2W2MJJg7Xar7FFb658Q6U9jPod2hG5bjGXjdRX/7aJx+ygL3Iyq2
+fzm8p2EsRhkemdOeVoy8W+Q7EubBRipJW9Tgxsvsbi24+afBM44q8s0TDZN6
+s821O+9U0HfZgLEqnN41eGUjrNIn7zaNPN/v/OSRMosaS1gfOUjuS0bzI0/Y
+znOwvgPeLewMnFDC/CxLCsSkPlrmK4TZl/YcEsCFLYKtJ+FY3bh7F2DP8d7b
+CXDYrpyKVHJfopfyk2F7YX3xAZgx+Nr+OuyZx8uLIvdnyQVHCZyg/y4kEjZq
+6r1tgPMrWwdSSZ210FXEgT+/3uiYQOan9+9QI5xeLDp2EuZ81BMZI49CtcrA
+VXK+tYvfAXgkRNBSDYtbHNj3Ybt5Xh7vyf71lgNTcPRbpXW/8qvdEOhjXlE/
+CwJN4GTFxQFWsMEydcctcL+4sM4YHptU53Jgppp2Aw3OplmU5MKXtJhF9dhP
+mhbMvQt3eY/fC4VzrwibWmA+tTd3Cv1WTT2v7Id59YLmBDhQwzrxN0vkiQv7
++g35bYf8H8+Edy/d0esBW3ASOYqW5H3ldXAU8X0Wc7VWAeaPVDg5zmZRrZxp
+i2kwN618/cJZeM/lCoeGsT+3p3/HXAX0I2mt+whX++5stJrJohwblJc0wpIa
+dcvYGSyq09mDXglHbHY16JdH3W51zxWSrzhFJgeum4xUPQU3dgjKOHBTxzlp
+PFnf8FOQAl+VcRGEkf0YyxWfwO6G9pG7SD1zKN8a+7OLnoztIPWdUcG1cLaJ
+2dtAcp/PaAh3oR8D229byPNM2mDnHPSb9qjvPwlk3j0Xzj2AqcLfD2fBVKJh
+XDjycau22fBhxube8zLIv96LSiN5qnMnpu+HM6x/+A+Rfqd3L6uDy3Z4hc7F
+fNy8M7kfYPGh5g2rLEnemZsaYbmjNmeCYaW6wX3JMG1ye3sqLOkRmSnA/WW0
+5mKYmZ9s7Yfz6QYefg/J+3DtOXUE/X30up4ggasVv249gjwK0gfHBsj7ydMO
+DELegB3myhPk/PuTUmvM59c/3VY4j3zKsf4PMygizw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.683437538255017, 4.183048595699216}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwd1ws0VGsbB/ChQtE0IuXaiCSFSXLc7RBSLhWiVAjlVhJSuQwJfR1CHYnS
+FIlyS0glTSVHkkuHcklNfMe9zhRphM/3f09rtWb91vvu93mevz3bpux1dKeP
+MI1G68N/8knjz+GfLEX7io8YFkXzmHA5uFmOoilW/ma1H+Ya7HYMgifV9BmG
+cOqA0dlYeO7thJc0zArpfhwJu1/8dOuDNkUrE1vzYD8czUj6lgYzph9vUYfX
+W4q9toV5UVsNelBPP7ZNayHMumOz6xSc457ysVmLorVW165ZCI9UxNhfg8s+
+W/08vwL7UpZkhMGszh+xovCpSBNvVzi48Ec7ezlFsz14QLCFXF/Cl56VoWgT
+RmdWmsKOtHjrWJhzOFmPIufNTSsuhT/Uz7C2wVTjhRf3l1G0pCCJvH0wU2vd
+PT9Yo6qmg9QLfp2dpAe7jqm0pJHzc28L5OHwrZbHSsn+Ed27cvAqx/+cb4K5
+mpSpDtzNXDA+ANOiRq09YYUXXldmSL3E0z63YLGRmpvi2iTvXKdpcr2tw8ml
+MK1PRuYA+rO5Y/VxCTE1vLwJzvp9clKY5FmxyNcE84bsHnYexXkMlZaPxbDl
+M/+5BjLvU3e/FcjHQ87d7yqpZ/NkXQRcLdgV7gvzepxqG2DjAuNAdZhvcXWP
+CPLOv9g+0K9J0divteZpwa6Z1+uz4NTwuFwTeJHM/xQcYE7v1GpdeGbUWGYe
+zDjoEyMJmxsl9lWvR76ck6XvcP5ATUlOCMxm6VWdhXPMnpnowCyP4mhl2Pew
+W+jUOqyr0bmk/0veCfmvYBrd4J0W7F22qCsX5sTGXSzE/CmJKflJcJl+8mIV
+2DdR3yCCrIfsPcRBfqbmfJsQmGL+laUGD/HdlcLh1reTFo+kcf9qsLPiYBZ9
+XvABeGdRtnkGWTcPD5GFFUr6HUphxufGZyNSyGn97uevyfkH3HrbYT3NybBh
+mD8dbtIJy8iGGYhgHk70SfsJmM+J/HslzO9rD1+D80TaY47rkvlll6ofhWsT
+9KTMYcaG0ak/4YjEThNrkkdOULMm+rX9bFdP1jnFubPZcMnlgr83Em+fTFiM
+ed8lHLSQgx3Tjayi4KEW+tQP9MP0MNMYgJOumaf9Sfq/dcbfAvndke4XSiXz
+zs4+TIVNf3674UjyNqgObYRLct3kxYlTjtZ/If5u7fZMAz6S2SAg1wu1Hw+D
+GUeSMkbgwPf1V9bCrUy+yws4ujxk6tNarO+lDONhaiylMAsOHhU/og03G9Av
+7oU5LaMLGtAfv6zbXRUu29LTvQPe32q/Z1Id65SvVxvmZV9fHfUWbo3bG7MN
+Zimc2PaQrHsJ7F4ir5vy67rvwB5KFV8sYK1tik35MLN22LYJ+WeoTjsXwakv
+OSNeMDe63OoRzHXLeSQOuwhkpFvIebTHg6+WUjSl7t9Gh2D+Fb2a67CE6MMX
+C9Cfx9GjiSlw8BPPMBWYWzV7IQOuy5lpNiPz1tczHsBDf2QUu5L5ZtU2f4XL
+3dSkAmH+955DBuR+SS8yiiDXhw/8vAQzesdKT8Nsb52qGZhpP+UURuqphA0E
+YJ7f80dPeBPrHIrqhUf6HTpsYN4mS5ft5P5w+Ja96t/9e/zI8ypUbsz/O5mn
+0VuIjjzr7i3/Ny/etZgvu2E9myV5EcT3souTYav87Zo6ZL/UzctF5H6RGO8Z
+XIN+zarHy2G6nnhzNszMP0XnwE3NErqOMKsigAqFGztyDUSJ421GWHBkesHX
+52roZ52/byd5HnJNN5yF+fzmf4Jg+x3zsxxgWmR7zA/Mk26yKkAFTm2j5x2H
+n68djxOCeZxpuy/I42Psm50jq9GfX3rOIVj9xs7uXpjf2ls6SPJNCb3dAzNY
+n/aHwP4NG3r64FadX8sl4Jnkdp3vMHVYvKBakqLV2+5aJobzyyTlpU/DglmL
+vFWw497dJ51h1eqSFjOY4V44aQNLj40F7CP7Q99yyHrT42Kbk6R/4dTYU7Dc
+nnU2aXDr+eYblbBpXnZYLszyZSvNR33K6qtsCZn/l6G1F5xeNPOmlJxn7/Ly
+NdwpHnDuNkyt4L8ywnxyL68WXyL1r49QxXBgv7XECXJ9QaOIPPJpqvcctlcj
+z0eDlWxYbpujQIGc5zcw/J64L9KJzM95fG2XEvLWXZIZxoGZsWwhR1gtaiHT
+DU6VzAn1h49kbNhJJ3kdOqIaCAs8LLSfq6LeRZkLTrDl4stD4TDDsNFUFRae
+9MnXglmiknUfUM9LdTB4VAX5CdbfIv0khD6VK4WDuTsspGAxzzuap8l68auq
+TMzDea/e7QjzSuJzl8H+dv0jLBVS76PoBfLzGrGskSfuyBddBGuUF+hLkv3D
+2ZXnkW/jBNXFgD1cr/augI9sLL0rC3MMGtoqGaj3hOGuATN8S4x9YZm1yyw2
+w60rA36th23Ez51wJ+s2Tr/EYd79rL6TcOq5UI35sL6YsMtlsv9LSdAyOJzD
+zC0n9feNXzWFkxRWl78i+11PXIyC47KNM7vJeV7HtrTAFSaDd/thtrMvTxv9
+iThnZhBzLcrHs+CKqEGvLpKH0fXr4pjvsGpNQh1Zfy7zKhLOTBIdzoOpD68c
+hmF769a+U6SedprlduQVJxVvZE3Oj65TvAGH2FUxxYnn7R/sh/Nrbso2rML9
++W4kUBL5O+UJJmNglvb5veT3j9b3K091ibOu7FGF7zyRyx5Sxs9rz7isGMzd
+8vejazDTx9b5L/K8Yv4wdyF+tK8pEWY9ZG6Uhnm1/ix18jz16tvRxYSLropW
+o988qzjZ2zDHvTDRCF5v7lcQTWyn7vcA80fQLSo94LLhqEoW+b6lBiXawY4B
+R9KKkF/3wQUTlnAw64IIC/Z/UHLACmYblmfHLMH3cb3oS0eYa7baiEvH+4R0
+5FMvmFZoM6UOG3dIZp0i9S4eNHy6GM9PvxjPDLK/cAE7ATYU9Aruk/X3nRZs
+2HSJJKuNWG5m8C6cJ/mre5TMY5b8RATn0efHDglhXq6HgvLv8PPq6AhJmHO/
+5+4m9LPUgPPPCuKzcSemYcbjYLHlMPVjoYE/uZ/SO3iLYMYFsQM9ZB65oHkT
+ZP7u5MXbMX+fUlDgW5gl5raW5FPd13QuH251M3+7HPllPKnWO0byyRnP8IOF
+DWLKNxLnL8wrgJP0S9U+rUResXfG2uCIfvkAO7js3mfbfjiwLtmhSgnrb/wz
+emBBlJuGEkxlCcoewazSbvdziti/LTwxFm7vmFKdUUD9q5vEdOCxmbXBp2CG
+VAi9Bf2tcKy5J0rWJ4Ut3WFvTcvafHl8X59H/erFfPzjqcVuMPOyz6wr3FQV
+UacMU23ZtXnIJ77C79Ac3vu5ViuScpBnqI+ZzHeYttjXqRD5KyhkHhPATN7G
+wGYJzJN+aCsD1/MuWQjJwJkFWhV6MGfxmfcJ4ngfXfBZ8zDMDrKbXQ1HxrOe
+cGDuRNMfk4vQ58tyxQ+kflXlgyl46Kfyl2Xon9f40FML+73turq2wh6eG86m
+wcYZnNbjMNVzVk0J9QTDn9ekwjS2WPobuK44pj6bXP/f+bmX0a9HQqnlJbL/
+jaLccczTMBW1IALmiHvOOWNe3toxayuSl4WQiDzyUG//pjWHfmiXSs7HwxEb
+6dxcklflnmd9sIJreOcmMq92rsMG5Ou6ZJdsNfJgS2mfDSR2/vRaEw5W/hCV
+BhflpNRm4T07WDxgcw4s4V+kMA/mrvHpJOuB4crmAeTvpKf7XMj1DCnd5Pd4
+D2PLr+rSIt/HbC3W9uXk/edzJLk/XYM657/B73HugT+3hMGRVlkH98E88vcg
+5mkln8uo/wNkrgaE
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.8279221571592412, 8.41091634100807}, \
+{1, 0}], LineBox[{{6.4999999999976925`, 9.5}, {13.49999999999251, 9.5}}], 
+        PolygonBox[{{10.6, 9.5}, {9.4, 9.1}, {9.4, 9.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.099654057937274, 10.345676968901149}, \
+{0, -1}], LineBox[{{6.5, 9.499999999997693}, {6.5, 16.49999999999251}}], 
+        PolygonBox[{{6.5, 12.4}, {6.9, 13.6}, {6.1, 13.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.445200000000001, 13.}, {-1, 0}], 
+        LineBox[{{13.5, 16.50000000000231}, {13.5, 9.499999999998607}}], 
+        PolygonBox[{{13.5, 13.6}, {13.1, 12.4}, {13.9, 12.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.4452, 13.}, {-1, 0}], 
+        LineBox[{{13.500000000001851`, 16.5}, {6.500000000002592, 16.5}}], 
+        PolygonBox[{{9.4, 16.5}, {10.6, 16.9}, {10.6, 16.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 17.4452}, {0, -1}], 
+        {PointSize[0.04], PointBox[{6.5, 9.5}], PointBox[{4., 5.5}], 
+         PointBox[{13.5, 16.5}], PointBox[{13.5, 9.5}], 
+         PointBox[{6.5, 16.5}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T9", " ", "P2", " ", "N18"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdgei/gjfifjhihj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdgei/gjfifjhihj.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {44, 0}, {0, 0}, {22, 22}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["g",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {21.75, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["g",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {26.25, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["\[RightArrow]",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {30.75, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["H",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {35.25, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["g",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {39.75, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["g",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {44.25, 69.96}, {0, 0}]},
+  AspectRatio->1.0999999999999999`,
+  ImageSize->{288, 288},
+  PlotRange->{{0, 66}, {0, 72.6}}]], "Print",
+ CellChangeTimes->{3.769419770848486*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"80f68548-0b73-4548-b02e-48df91477fdf"],
+
+Cell[BoxData[
+ GraphicsBox[{InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwl2Hk8VN//B/ArlQkxRdZElkEkZclWM0qaolASIVJKUhFpShgljeLTRAlF
+SklJaaWyp5CKUlGpRlmzjSVF6Ps6v59/7uPpfc495/0+9557mOuzd53vJIqi
+zEQoilyp/n/4MWBRNAI9FlXiu1FQAgvvdtp8mMeiun/WWx2EMzJXiOTPY3ET
+s9/KGcB+PmuzMxHfJnnikmA+iwqs5OumwWXTH+kmwqWHzrQhzt30wHJsJcxW
+yrqF/lS2Wbq9CEw72V/aAB/+XTm7TJ9F1S18/24Sxj+XVMOIhdXGZ+gs1mNx
+zc6/qd4EO7paJuyD43nCUVO4So5/4S7a721LsZhDfNs4bQhxrY/0U3RYp+7S
+OxN9FleUoR09ndxvTCQuGN6qu9xQFmYXGBjlwFM+hi7VIPE+kfBPuM6YZjZu
+hitVU875h3iKvHzQehJfevaawnwWN8Twqn8g6c/7J6mFPKTYyenxcMG6WnNN
+eKezekk2TFdqc5SDlZW3nS2BBV35U8ZwrXz2XbEO19IZ8Wc+4Fq+YeBEI648
+9ab71zDegzgVbgPM1VgfEwTbj90fqYEzlLccRN7c32s+7npAxl+w3HgE+c9M
+jKlIhBvbi/cXwuWxngE74Lwpr4aPwB8q5i5bCAtFou0dUJ82tTmnB/D7PwX/
+1Wjg+sjr46RcXF1v+O9B/bnnMgvifGDeqRMl3Vgfm5xNm2bBbEmHqh9wl+T5
+B5W48p6fntKB9U0rsu0Jgzkp1j4jsHtBiqUxrBBuZyaPfjriGbkDuhhP+vlG
+Fu5fln1C8hGsFkyXDUb8UsNANQ8281jvQuaR5NzW5wPTis7d70b7zviAWWzY
+9XFwnAHyOBwv6moG86W01cg6BNl4bDKCC5Ra799CfdbUbmWTeMfAeF474vse
+BghWkP6LUgqwflRy+syoTbA361klE+54sNQyBGZbPmG7w+vuH2vnw4a3t2j5
+Y7399g4uuQULntrX74ID7Jf0VcN+vvlu3jA/fEVxM+wYYuTERv+bMe+TB8l4
+AbJfyPPgoht5axym631J/435tZtei54g+V2wvFKO+R0caZr6C+aYuDnyYKvs
+6gQBccUhazu0v9ho9K8UTv4w01gKcZpudVoSqdeamJZ61CdBNHUxqVfg3H5h
+Oupn2797shassMe8MAjx/cMOaQId1JuTt34t4p2e7T+TYN4SX1dTePtPL/pq
+OJut0TMP7W0SX6wf00Z/Qct1fcQ9p45NzoMb/ZaftUR8x+DE1h0wjWeguRHx
+tiZjnibsqtPDjEC86JLZqk4G2v/WWncb1tx/ZF4+rMD2d+lAe9/tt1afgmnr
+ooQM5Bezes7GfbCfR3iMH/I7fTIy2hsO3HPI8wZsY3I8zg3mN1bld6L9+u6x
+PA/S3sJ0UAP1z3o58NQPNgxgZLmg3rfFao0PwwUtFo8jEe8YSpp7lrS38jma
+hnj61sJdd2CWntPbW3Dd1uO1r8l8JVJE7sEbRZXGf8K87TVj1+GHvSN3RJEf
+75679Rncbx5j6ls5mJ5k8nEf4mWbn0Wowx1rljtgn+MufC+hrwWXSmxNl4ED
+L8neUYF17I4rY3/h6qc5bZCAHR8Puqchv0sLtzX2YLy8hfcUvBGXv90W8ozM
+fzSKroX4Lon2LwlwciWnsxf1Gw0zWLyRxE9WypSivlaCGzRZWFDw9FYqvOdt
+9PwaLbzvRcFBXPiFRlpJBFyqfP4c2T8ddjtTC2H6FYV35Pngh6UxWzQxn8z5
+q7B+1IDznvJUmOcmevwc4kZXb1x3gbOVI/lkf6GU0z4pkvZ3FrR1If71r+jP
+Vg3cT/ZzEtlHqzKSxQvhgohfzluQz9XBt/8uwMkhsvzLcMCMsFmxsJqfzekW
+tG8d9Z3Nhdl1YinkfZEWiwqIgqsM7497wUdmz+o+Se53/gub1J+S71dOJ+Pd
+ObmuBHH3a0PaD2HuRQm3byReZvP3DUzNcZUdRNzKY/XGPpijaF0xAi+/Gt4t
+gfl71z00I3Hnnq5gLZj/qqke/SmJws1V5rDw46tjpXDkfqkJW7gxg1mehPu3
+SH4+YAdzfDmB2xBviFAbWUH8ZeUHPcTfqPncM4HzvLoi+sh6Zpg4KMF1twfm
+3IUHu8SFg2S+n9xDQ5G/78+sRU9hlqfhIia8cssWBqlPxubB1+R9v+sbaL0S
+FjzXDm9HvR94ljv+U8f7NqQyrQZe+1Vh2z2Yx5etfEy+h0tY+b4wfxkvOh/x
+nBKvFAW4Ltc5sozEg4PXv54LN9K2NiK+SlVcOhZmR8XZ/0X8QMnm4tUwndZb
+r4PxpcbeT50FNx7tVvbC/MMjXhl0qsGqCW3nEX9jESNdRTw0mttE9jPTZxJ3
+4bpA09I5qI/e3ASJa7COqrQnWU9u0LLwLJh9f++786hXl/wz99twNm/WlTfw
+i88d5qUwK5idOIH2Qq7augbYW+Bbo4ZzR6+bXOoAzFMx7DY1YHHnDJh+lMb8
+uKkiyizEd7WZl+nDpQ5WklawpXKq2EqSn2r8VD34N7MlwgMu0Pn2bTr6D/pU
+GOyC/zxUG2rFeNVa1TuDSPscptwD8v126/62G3bUEj0cDpfYyeZ6wbQfGVet
+4aoDPT62cNWI8rLJmP/NsNvT1WGeXPqMKtQjwDPZaBDzpTfMrDwFc/w1ah+T
+es3Y8NMTrrC1tDlE8s1aXGgMBy/96mgEc3+nq8jBU0sKB2tVsf6exYdEYW1F
+zU5jWKjk9WQc68VybZidOgf1y/tqNgXxl58ltSfDecvXP1Yk56Z9R/0PqGA9
+7lAHLOBXQbSW37ORv56o6nZYcbvvBA/WCa3tTIUlai8EzIep4I7r5HwS6iUv
+2a6M+lDCFnKemWEqUfcQzlad1ucKrzWj8i/AyVc9aKlwb3HLi3MwtfZQWAN5
+fwfz9LJIPMj2iRTqnxKnrvkMZr/QjVwC5y7MWdkP83vtmrbAboG2yQyM3/Gz
+bNMh2Fbl7F1v2FCuckoMHCWycSIV5tPWhEbD3Ed6zXWwmuKehv1w+13//nGY
+vfJ0yybY37yZMQf5s+Scm43h5iIPMQOYn5p4cooBeS9mvZoHs1sMaLWYr92V
+dcdmwoZGG2vIOdbLoV+rBfcTxASHk+9LQGlb8kWYM1L+RRHW919ctIKMbz/p
+igD1WuPh7tlI8hPb5pNLzifqHOVNcB5de+cROG7uaufXSng+K6bkbiH7+4GJ
+ETOYbp58xx5+/ficX7oi1vdGMseGnEevl5iIwoEaT0NXkfaXlSZ2KWA8j5r/
+3Mn5JmHNoi/y2C8uZsw8BGs4/WzdBHMz+19kwvGHt1zukMPzZpU2mZwrf+t2
+M2PhDHZY5gzMf9lFledL4TqpW+ZOcKsdZ4M4zHY8pE7yj9g5rtQ9C/1Z4Rff
+wdp01tofsHfS+PBM1K/Hnm7RCzvm0hLsYIMcTwfS309GWvEwfFoQaW0MVwVV
+xF+Gn2TenOcHB8ppbSmCqbti+Zfg7KHc6Br4o0eQcxNMiUwLfQm7C0R9ZZCP
+kJZrUwqfZc/ctwxm9S46fQ3+ZxTq6QuzM3bEHIULd0ie4sA6DjteboCttfxn
+H4SzFziGkv2juU62cxvM+erSRd533Y6GIgtSrzDzl9mwluJil1GM711g+gHn
+Peqzy46tV2BOUnXFQpjjlBttAess4RiNo55ZX0NMSkg9+KJR5Fz/Prbtjgks
+FDV9QNZ//jPd+kuyqI9lsH8SbBbxtUVMlrSnCk/Cj1Wv7A+QwfrvemH+H6wk
+9kTz3Uys77X538n5QO9Cz57lsHfxNPXHcM/m4cPFM1CfLqXPzbB8/vFfbNh1
+YkMgzhvUB/GBd6101NuyqMGenF8cGPbn4DqxzryT8InLUdmbYfZyO69X8Hzx
+3Sus4IIJcW1p1IeTu5e3AHbkm9uthU0WfW03hf8sldHnwfNTmv46wH4rx7c+
+htNFhpMPwKVj1Pfv8PC4xuB1WMi/SFELMC+b8srvMD1kUjId9rS+GKeC+fIP
+lojLwnITcy9vgAVvMu3FYU6je0wMrPPJ4scg7mcV/3bqTeI+ccEb2HTelz3l
+sLCp8t1V+I7VmbznMM9kvCwIfr74dMxDOLuvjzKDK61p8XyYFZuj+xf5jpYz
+nJxhP2u34SJ4kbukyyTSfkxF6yj8NoEhfYHkW1LjtgY+81m/ToPU68YDShXe
+Zvlpu7k08vrSYTSK+kveoPXJSuF+bgOZ5P0PPPY357sk+qctOlYPf51ucz1H
+AvvZifgjxIVNQ4yD4jgPF017SNrf/OZj5DwN35O/edfI/YR/JVauoOE+s4vX
+qZHzS+tw23ox/F7tm6Ej/Of3OaeYqRhPKGXHg4vl35o3T8Hzu9ve4TksO1cq
+cQfsWrT0hhjylxLPClSCWfY5mavgoYvio38mI5+/Rw7HwhYhWiEU4rzNFvEV
+8MzqeC992LBaZesfONTC+kYonLfA87M61sfl6aOBBthM76rFMmK7sI8rMR9h
+LIu1AU59kehZBNON+ozc4buX6awFmL9f4see9fDscFX/M3BHDbuRCf/JCXZq
+gV2v0LtU4YoVF1zkkb/Zty8ZvzB+dIu5ojbM+vu1rRxetnlfsRTsWhUmdgL2
+MExm1KB/ad3U02vgOL/70u5wozTXnA6XuoRolGA+ai0ZpWT/8nn5rW8E86d0
+Dr8hfw88bGLUSMMdcpNad8MtlkWZU1EfmiCXQf5v0bixvrh1Eq49JzxwvqNM
+Myi/ByJ4vyadr1eGJyqSzkZQqFfHfifyPYiW0ZY4O8GkFG6WSZDzbEFj/y2b
+MSYlLG++akmen/tda1VGmZRa9rAxOQ+FnArdbPCHSWWUiqyOh+OGjJujh5mU
+mWuRSAXZb56bf573C+2jDiqKIB/9897fGUNMqlRLnrYM1nl25n3YIJOqU52u
+RL6H0Tk6RTqwY5r1KbKeGYnJ74l5v3Y/Iu8ju35pRTBsxihSNIULtfMGx+Hk
+as/DPrDCrjKZR7i/YFIDPRo2LruVfwbjc+7KRKTAwld8iUjMj3vJtv8SfHOJ
+fYrvbyZVtURUOw3WLAmXNUU+Qg5jz0n4/rpkzW9w4/W9V3bDdamRmk4jqM94
+r/4KmHroXhsBC2TuCWTgqrZF9Z5w4/Dm0c8GZJ1/LWtH/9Ly2PGLcIDLjB/y
+MDX5T6oPTH9pukaI+TSeaE5gwGrRNZ0hmG+GelxSL+r3kmFbkov8dKadnEfe
+d276KcWsfibl+qfrxBnyPu0MUmrsRX2cjyWEkvNcbU2+6k8m1REdmkXO99ln
+HaNsW9FerSiLrFd2p4RrkADj7Ypt2QGzLK8KYhuYFH120RxyPuQyjIT8VxhP
+6Ul0OnHGjeUHnjApP8OdJS/g//u5XvT//28zYP0PCMornA==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.191470063271683, 16.391592056605244}, \
+{0, -1}], LineBox[CompressedData["
+1:eJw11Q0wlHkcB/C/FVZRK+8Sq3C1TSG1KtY+OtFpxmx0uutlW9UWbuu2ay4n
+JclRIpvr6BR2epHrVHvyUg3NcuFovR293Cq0h/LWLsnLiO77NNMzY5757PP8
+f//v7/c3u067vw8RMwghYvzRdzLzEZc5RT5d8ylSIjXh/gzH52xWFJpRxG2p
+x5lpfN7cULT6IBywkjsqgeVfOxwIhMXmJa3PcJdPR7itw13i71m6Hnf2uUkf
++nlQgjWniIV6nNOf1ldZy89yYPZ9/uVbMFNCbu6aRxHlgPkbBupK48Q9KXMp
+4r77Yl4UnGha7f3CFPtPup7ogu21xse3wsSl6MYu5OxK6iicMaGI4D3VpoEL
+yzIHW2B3Sd0vey0oMnq3PqYJljUMJXbC+UcVle9glp3p+WBLityzE55eS9fb
+6+B8C357zH9RNqwkI8JxWNQdVWGKPFKPP/04VhRxHQ4oOwvr9OtVX8L1Tqem
+ZiO/dFOHFW3u9mv7E2C5TXXYEvr9xq/c+mBqxP3VKOo9tBHmLkD/slQLuz/g
+sta2RythauW+bXSegWw21wvW5YU/1iBvgPZOvyvcFd6+5gDdT2jGQwKT5uwX
+I+i3KlXvw2nUj9/zwTkGZoyuaupBPoVhSIwB7Gobs3EBPc++9JnLmN9F1qXI
+FehP4NMi9IefViTfcsE8dIudMj/iPLieSyuZc9BPxIOaFjjJ1smtyxj1z+Va
+VcC7r0zrlTCxv3gmqwpuy9GKZEY4H340TwP3mm1YFmuI9db5ajvULxJOZh43
+wHOv2R70ee6wTnmaOwvz7fyd2UDvn6Ot69bHPPSjQvnIy65a+DAUZmkufFsO
+rzjSzHvLQP8b8od80f8Fv5vvi2F5svP1Sjgo/ElhPqycY2XBx/xKbaJDlDAl
+SWIWwWpTkeM0zBpL+8sS5+F7MKk+DPUFFyOX74P7XzIbq+n9CvYz5PDEskf3
+/ZCPyi4fU8IfQofTK2Hd1dKmWljS1/qFD91Ps/ehYrixxjejAJalz3Qkw1um
+5LEzsDx6u4c//IgRkczFPFg7t8UNWtL1G+RBMDXQWJYIF3Rn8ejnJMQk3gyu
+mTuRPob17rONxrPQH+P8luspMLtjfsJCeN/wA+k75FHk5ctuYD5WI7FKT5it
+uiPyhjUVYkcBPc8gg+qXmK+70+CVYPSvCDyky6DPf0hUwNVDnt6sQCEc4G+b
+yCKYH6fEez1caKXdVD/NJ8oTj90o2L8p7WDsFJ+IoiMjv4HbmniSgEnY8bZp
+Cqx7st7FZ5xP2AWFnFb4TZv82nfv+YQs+1vljjxbEgaPvnqH99X2jnnwrJ6t
+q26M8IkuJuNXW/RT3NKjrRrmE8VAncMlWDHhZ+8Fi8SV2x0wD0G//U4GrKRU
+6hzYuXF5tiP9vi4s1II+jykPryQ43uh15zF6/kPxP3BQnypXe7bChQbOvdOw
+clF2vbk1/v/Ur110yCPYvGquD/z8cd5h7Sjeb1ceDoILfDUn+5BfGhyc6kv7
+vx4f1Rgf329XjW3hNbU9siT0SzRXSttRv5ib5mI8gbyc3/acgY8J9xoGwlIv
+Ua0LbHHA0IMLk9qssBLk35jG1G/GeunZivk8WPKjOsEMVv6zNrQK/U8UxcVP
+YX9WQHlKEKx7rkjNoPNFSOa0Y347lM9qOuj5HYlT/QRfE/eeGtAh34rbnkvg
+e+vGr6YN4TlvrHsQ59F1Ymm5Xh/6VWVm18Gyk5rEsG6cF7XISEl/jw/YWIZ3
+Yp5b/61qhgWr11IRT/lEJl68YYpeX5tLzVPBkqh+Hv078UxsMn4fee7aGWZ+
+/t34fFlQ/wOCa1H0
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.3457692355174515, 3.812492355174517}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{19.99999999999909, 17.}, {4.999999999998181, 11.5}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.899390194486315, 16.096286839465897}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt1ws4lGkbB/AXxWxJs9aGlBAaERM6WfKykihrsNvk1Cw6sJRTZRmFVWtT
+OSTksI0R0XHCJ1ttjWNEIiXRYYS0hZRjNbL/5/s+18Vcv+t55n7u++9557pG
+23ev6w5ZiqJq8EteKUXyh0VT//1Rpim+1qzgb+GQUPbqZNg9db/2ajjl1iRL
+9Rua2m1gnfwzzFNkO5+Es9Y7VmSQdQ/N0zNwSv1yk4dk/erBQq4KTal4K1io
+GcC6ad05MMPTrI0HjyheSbpDrHz51gViQ2OqG+YFF5RNwJL+8YQOmP9hlGe9
+HHVd3PxvwH1Wt5N/g9n5tk+SYDuNwbVVsNZ05aQj7G9cnj0B04zBJCn6Kfd0
+dtIxpCmx1+j7s7DD/fcbv4ddfEIHHOCHfmkzXJj3PXvbEOZNP93H9SPrck3G
+mXDDnoAyX5iOOrHACe7UOdC7lfjwTbd5cKxKgIEdPOJnk9rzNfrmuOsakPM2
+37x+FzYfvydmkP1dkc+IFTWidPvRHy9PqNxL9vtbZorJfPrZ4d+gnpGhNDCP
+9L91QM0Tjrwy/TIGdjF4uLQS1lreoeEPh8xxfLAM/ddafRrjwCMzmrlFsMve
+R1IHkkdeDpeNPCIC1vMcST3+hUAxLNCfevYTzJTrfc/5Fn2o1t3aQ+o3cr68
+gCPEvAepMMX4XLtjAU2xWLGht0l/AfUPnsNjvTUJJF+XoqbvNqrSVNAwJ2UV
+5hO9l6nLgTc/yamJgtl3M+W74Cl+iWIt8e3Dhyk1mjrWudB4vhH2K2yuUYIl
+kxMd22DBdrPvZ8PcXMcb+XCs3ZOEfry/uTvlYh+ckmszdhW+aP1SpLUC+W5V
+bQ0mVhlTdYcFTGOFxaSf94zjMbDL1TKlWvQrnaeilwtrtbaU7oK9In/dfQWO
+LcnvVYSbm+W414ir78dWYn5qsiuoHBa9K9PbC7vH8k+egyXjQVPmsFf/G+00
+ct6Fhph5sBGL37gP5p3rCf+MfCU2zxNIPyMu0nIK6/5OzN/YxKmdSzXh1sMm
+TEWYKXUQusGMo0ox/2A+LTpcWQBL2k/LN8HMqxd9ZdCfO3P+rVIy/8eIggg4
+YVwuXAhL7hbqT8Dlm/QFOTD9+7GiOMxP98d5niF5PnIOV0aefapjjpdhnnrl
+2QJYJXJjXgPMbvNxZqvjvmfZMIZJ/YbJsjLYLvZa02Iyz/j5aIOFNKW7LvGv
+n+DW565Pj8OiPJZtJsn30vW6Z3DkgMXhZySfRmMZVQ2aWhQYt2OZMfI8MnvT
+WrjBnHsmjNhb7ycbmL2/XnITph9OvTSFp4TLXsqZYP4MUYESnKC38+AGeGSl
+vvljUl+5vvEQzNygJU2Gzau36F+FYy2WzLWCg3JH3Tthl1qzoZfov7ixK34M
+5hmdjzoCR5h/VSLLxv7gY2eNYJ0tf++ZDVP7NOku5OGl1t5N1ukz8e0n4Vlz
+6vom8H6JfPEOb7i5/PH9F8T6cW4WcKLCme+qSX8LNhmtgMW/D5gI4BCha8Ya
+eEx3sjea9HcvzsoDrrWQPbeVzCc2aE6HW5vy76yCqcbs4X64IemHaDVYUGvx
+s5M6+fwarJch83qmMaph/qFNAaPIS/DkB2V7kn9MbsMwzHTqWdxO5u/J7R2D
+JeKJQH/k5x4xYi9Pzn/zZe448QdXhaXk/EuHF8Yuwv57lWJHMs96h7fUYsxt
+sD+bT/oxf2QdDrOnrFyukf1txeHtsMPR09YfSZ5P+oWamjQVJjhrqYW8BM+U
+Gl1h9o03gRtgkc6vHXvgMZ6F/C8w+1H6jTA48GNJfzLcGpkWsB1Oq9J8XUre
+X+rTsBp2YG+h2mGt+duFn3FeWtQr63ewS9CdI1dhdz6/R34lfL2mwAs+NqvM
+RR2m8xjZMnBI1i62PhybVuBUiPmku074rIBFWd8Wb4YDE3PGjeGRLy8OSJGH
+6HiAkyHMLhUZ/AXXWpYM6cAh45sKjsCDK6ncBTBPqK62Gz74SoVWWEnu55qB
+7TAj5mnvOPoTrzWP3wv3WaQW9ZJ5D1V7Z2qQ565e1Aan6EgGO+BEXQ1WFckn
+9EqREfqxG529tAwOuVi7IANu3rcpr5jsf7ducj7mSbE9GCxkk+cvwi0Ddp4x
+sMwn+aSvKNVFXj6nbvMLyX1unrCrgLUi2ndfIXmlczTsl9BUl7Ri+hY80rR8
+631YSZguJfkK7JxE+lo0ZSqYOzQEJ+7kzPWBmadNdBQxX5ZF3nQSHPaqoork
+x72vY3QFtl839x6HzG+x/nI9fGLeU8MDJN9OL9UHcHVY9bVcmJl9KLoNLnKP
+cqiCUzg799TBf9qaiHuJB4OmL8M6o9tU5Uzx3Hd5nk2Gc4NFuzRhh0qhVQBc
+fql83Bwunl04bEX62cxfa0/Wj75hMuHAQp8XHJh662Rai/l0rLc82gpLMld/
+CiLzzimz4cJM5UnTJbDlxrYjbsQRGStfIK9FCResHOEUz78rRbDo8yUTK1iw
+TtyaAY/UcJxXkHoVu86dhH2jVUs0YHpRU2QxnNhm6/sVsb9p/CP4Q3yLcBLz
+UXpJM+o471Wp2okBcl85SWYRcErK3VVdsDjOMKoH7rgXfaKV5OnpYWqCeTRL
+j+5ogtUGNfaGw8KWdC7x6w/7DG+QPNTftpD9YpbbJzltfF4v2zjeTe7njlV+
+TnAg/e7GILzW9YD0BOxl4v1YFv01SEYSmmHuW17NYjj29dBnGR3c97q8BkuY
+tyCyYgXMur5s1naY9dfXoc6wbce7kN9gl3pdbz/YNCznQzGcpZ1pEAS/eub6
+cwus1smSDyD7//kq4wPM3R+Z7wE3F97er2KG5ySjWtsWPm9kJmsGv35QoqYN
+lyqkemyBO03/CPuI/oo6z7X4kvV9sr734Nw/bHvCYFZTvsMZ2I7h4RwDO2xL
+zguF+TED8+JhQbFnuz2crbvOPY7U2zltpQ13OtcnR8ORXSqfZLXJfTrtHwpX
+Vkd3DCHPitT4Qj+Y6p1v0wtv3v6jkxuxbsKaPjiDmRVoQ/rZ88TyPazixWCZ
+wMWfh93moF4rZ9/FxaS/Kr8ZYzgkPFhNCWY637X3gV317CJl4MTHk+IM0m/d
+UOUUyUdDpqADlnSz/hwj+c+yb9dAHmwl7+vjJM/+qhmSd4fPkd1S8v/wKKu4
+CIuigxsY5PzRU7Gj8KeAH/9eCGeVbPu0ainud6nRu5UwfaBqOBQW/7KqheTL
+9e8OLoT77KezgmGRX1ZPC5yrstM/hfQ7Uaw5BCduCdD7D5lf/23IDPxcZHyz
+i9Q/1S+crUv/70uC+f+/H+jS/wKhtFvA
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.984279526590164, 4.521860800255244}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJwl1ws4lGkbB/BRWrMMRsjkHCmlcqymDxk5pByWqBxjI40KU6ko5yiVajaH
+nHKcShFqZ7CZCqvYPso5FWu2iEIRK9rk+z/7vdflcv2uZ97nue/7ud/nnVm2
+N3THvgUUCmUQf+T//y99FuX7PK7VLEqtHtvfEm6P+v1tLzwesdIoCl4xUigo
+h3W5Xv534c0hzMAImCXTYtYLv1kVZm0Ki743BXyDeRuVxqdXsSijqZLhVAMW
+Rdx4xK4M1jxVJaDBChP+Xv5wr/PScUnYu/6oPQPOd50LWgjnmAdvfq7LojA3
+mlqNYT5JlxfW5+GKBLmrT+HSNoaNPTy8rSI9H6ZMvhiSJ7ag7DwM8717zgyu
+ZFFa441ULGDmr1SNOpgbpOVCg80O/mR7Ew4fPRnweh2Lcvx7jE4G7B6cX14G
+T/Eqj6fAFZJ7f06C+Q56SWSccy448AC8JHKP1Q2YXRiycxf8bHInswZmDd7Y
+4wjzpI+Vdv27/k0LZ9i7eHfpJJmPV2LqC+se+qJB4m1a/4ZxEjZKsRcZkvzo
+v2vlww1KCS2OJJ+Y3YatsMGLrwMBcNLAagEV8Z9Rm9l5DOY6sRu3wg4KYalR
+MOdetPkF2G+TfFAkPDMf+6gVZpytnuPADclr/623aI3eO0844CVHZQ1cuen4
+8v/A46o+Ndvhjw2durIkPiGtYR+8Zp1eyyvEr9B01ykSblI2c8gl9Xr5rvAi
+zKVOmXjBtec1N2fCPe1OnvKweMLnnlz4W01UbdMK1CV3Ioh4HUUuKQqOtFdc
+kQFrxXx7YQyXbk2NTobTuzwbx3SQf80OVbJeQnvn1juwGVXu5X7YLzxZLgxm
+CwsqneHWWc9frGC73LjOjfChBUtfqcINruYB6jBT7VwmBc7PVb22CK44ukvu
+03LMr6/j24f6/PA1VGEYzvB/f1hA+ovxmjoC9zR8DE0j/df+YWwanuE/E4+B
+t6hlB0pivtbqxRFH4c+nrzdqw7rHJ3nEMvwHupYknvq8IfL5akPrcD+Y+mif
+dga8eLKIGwMXXxt8WANPh0U75cAVNyxL3sNZJ+pu8En+XYkb6Yh3i399zROY
+efmRsj78wTVxvBUudRVwSP6SqezZNviQ+Gm5o/Ar7aT3TWQ+zvvGNHhG6GQm
+gBn9TT5VZL71ba/Sift4xd2wTJFQNYTU88eKtM9weHBLgymJf89bE0lDFuV+
+yeQMqZ/u7rJ6Vbj767ENj1CPsMbX5avghMMXt4TDfrUeNw1g6zdLGetg3fvF
+vxjCnyv0Ot5oo38inqWtgRlDG7IzYP7reiUtmLKwLdkFnnkZyF8M1xf3F8nC
+yRx903nEk1y59GanFvKdenx9GI4NL1MshPmBU9Kt8C52q1IETJu0KayEF/xd
+f8QTzjdoy7wGZx1/F2sLMxxurzwDX1qnsM4cZndGhxyGd9wJnSFWWPk6zA9W
+nuX9vRVOzbyi7AY7mfj0esA5wipZR3i5cpLcEdh5LK7FHo7Wn6i+BGvGBf1C
+9mOAe6zpDmw3X+rpRc47AwW1Ftj7H/cPB+F7BvPcD+R+8/bHcaQ/bz+VE0e+
+bmJNpjlwb3uHQAkWt/Y6eB8uO7ewVRtOtTN0fE2ev8WaYithEV/+4RzsPPnV
+RhM2S604r4n6GW0YFiP16x2jRG6Bp+8tXjSJ9YS9Xf574VclBy81k3rESq6K
+gaPPLNuWA1PretuvwjduV9n4wwnXv1wpgbM6f/ikBY/6N7b8Bm9PvvpP7zKc
+S0p1mvUw3eyjVwrM1vAJbIDPUGNX2MHeEtlVtTC/XiN+TpOcz/MHquAe1frL
+ApihoSh3C86RinE7ArtZZIakw6llv/LWw/lpSWGx8D1PVTkxYu/ADWyY2+16
+p0QD6waq9TvBIo8jRUEw5ckn3nq42dfvgxnsnjghVIN1f7h/QQeuvn/ZiQrP
+tJzna8Ga/bz906hf84H2B0awc0TaBOmvgQfp5q5k/NzgTRE8WtCuEQcHDNyk
+/wkP67GeVMPLryqe+Ase961cOw2zFRKHP8Dqoc0XlBFvc4LI+Cucu+hFFhM2
+eZA/IkOejzJ7PVe4+hDzgC68xp9rx4ZHh+t6bIgl3DYch91Lbm8MJPXbHhV/
+CvZbtDAoCa7dr6JwAi7OlDAj+0PVebiB3L88KjiiBW649ajACU6ifP40Rvrh
+osmp1eR+39JYKSOcE3KNpTOIlyVVuFoH5gwVe52Hae90FP8D+5Xvv0eDBwyv
+ZmwzIu+poe/x6tifRh0bV1gUypGaUEN/p+8c2gUPm5/54gkH1C4+7wbnC7ZJ
+P1bF/j9lHXeAHe6uSDOGqYf/0LeA3SRTbt1WQd9f2sZZC6t+vUVbB3urp2gw
+4PByD7E6ZeQhctlOIeMS/FWBcKmLsdIQ8tGUfnhQAw5nLKgh+bqVdveNLUX8
+XfqHBKR/DkfXtMGjdKddeXBGzeTepzD94ZeLyaSeKTVe3bCfcvGiaNK/+zr2
+TcLWxp9Ph8HhFz5y1cl6i6KzOfBU83NPN3h4SO36EdJPaYkdXPiQ3SbhSdJ/
+GvJPnsOM6rsPyP40Kb19S0M+tTzHbTmwuLfVhBXM0856zIcNnqtPcGC6UCWw
+jazPN3TiwlM/XTKegL0/y1DyyPj3PxXlkT8v88TtLHhmYUT/epgWViuIgx3+
+5ni4w5pK23xdYfdcunMEXNroUSerQt6LlnlX4dGAJe1ViK941H3zPbi1jevh
+CPdO1W1vgk1Mf+5vR/7JPivlXpL7A+K59vDyoDKFAThpa6x6DQNxpIgpvCf9
+c8ohUweueDopNQwzt1rZXFZCHzkXbPwL7rwmH/ptCc6jSZpMF9xM22FxGP5m
+vcO8AaaOxV2eUES+sblF5TC/27k+FjZpZtpmwGFL8/KXwW4Xpm1jSP+semjW
+rYB4OpJ69sED2dJ9ebBDr4qRI9yzpONjNBzr1xS/Ac452yl2FM7Jdh/Ugr+l
+/9V8EjbZ0u9G6hmro2aaCk9tTi+kkvpxouKE8Lem4OCFcHUfz3Qcpk4UqojD
+7CfvL+khnoxned2SpH+fa+84oEi+P/10TgmmmPGYxfB48axoFenf3mvfReTz
+LmnOlnCFk1EaHfnTPkYu8SH93OjjYAxn5JpZR8IsX/qsDcz2MWy6BhvojSja
+wnSvlPBa2D3eqc8Q5g9HaLwl6zeXeFHh0j7vs+LG6Md574g/sF6q05Wz2rBD
+evY/x2Daua10CzggNzlSFvbLili/C056+KtnBvJjfD3FZMMNJuH58rDzq9uX
+w+BWUfVAgjzmT5wdOQnz9/B1xhdjf3dom52CB0Ya8jxg9oo9d47Bo7NZBY/l
+yPjZWwfg3uU1vky4uKiv3RM2qZP6Q0BHnV+HzdnCyVLGeyzhWpsbKwzgnuAO
+ZaEs4pzpPqAEc8pCdFVhb/bc7BzZj0cFrddlcN8iH6lBUp/Nsi6eMD97urWF
+nEdXGtdsgmmW+gd/g2vt3A1ZcKf32r5iuLgg9uJBOPKj/wJSX3pC/owA5khU
+J6bDdonb3zOw3vCL7FdppD/6H/ckw25HA5nZpP9G/ZvEEW+OOyPjBpy8dxnL
+isT/exG/isTT+elcFCzqFUg/I8+LwO5sOUwXHxglz8d44e7QLri0RSJYAvn5
+/SY/PQInCKNO68JMSZeQcTjJcUjSHk4dDBoUwWG2Ys+DSb2FP28Uwg3SCpmX
+yX5L3FWOh01So8zKyX7dt9A2JvPbdhT+FxZZ/hlegPiFt9RfvIWp10Qm95Gv
+XUSt7BeY6zJnWymN7yUKqZXiJqiPoKMoh4b3juR8CA3mmG3XPCaF/lAvWyoD
+h2/J07SThGkvu36EM9zvWqr/iOeF/G40Jr8zcEmw/gePeSis
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.425736195028037, 11.393326991679075}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJwt1AtMW1UYB/AbihlDHmUYLc8VKVLGQ4rEAivZDQMpuAzLEBnjMSvMDhSK
+MqGzGdmKwrAO5BE6xnQjRIq8BxtVmVLtxpvwlm1IGGwZjCKlg6VORvwf403u
+vfnlfveec/7fyXUTZ8emm1EUJcJJ7pQVuXBp6r/Dk6ZoG2GFM6y6cZJ9BJ6K
+yiyMhk1dD5Yvw7XiVmMRqU/5a9cceX6NszkOMw/qzC1x7xqv6uN40ZTaNHPa
+A2bLBl+Sw1JbXZgvnC8zvjkJmwZYX7rBSZVcpcc+1P1e0sOAZye0uiyYYs2U
+z+D7va86+jYRL633kPHNOev6P2Cpzbc3kuGuGuugJ7DaqvMzJ5jVYffxNjxb
+ynSce42mrLi+7E1Y0sNW1sNMgcBuDvYPuhIgg8NVk9bd8LJXYl0yXNgTqS2G
++6//+X4cXL9n8dS7sAU74pcUmBtwasiNjH9ho0tO3lfzJUasx8DQPGmGE/R+
+jUOw5rx8XQ/rIuXvdcBsix9tgzG/uOaSD7+HuVW79EqY7ZB7u5nUj1RUL8Ec
+oVnwLVjYKtniI4+PXj57eB1ePmKy/QIWKiIkXhhfE8XIug2bW5+clpL1fspL
+NcFSxTz1G8zMEuxnkZxLBltZ3jRVvCUtJX1J8zePkMLc5M/5LqRPk4sOOpj9
+cDqVAett7HW2PjTVHtKWc4f0OcLpRAy8UH91pQ5W7lMYCmDhmR2nNOKGgPjv
+4GVOy2PST3qjuK0Z9k+ryLmP9Ri6p6LUsISxt60B1j/2qKuANUsDfjI49/TE
+2znwWGPMz0dhVZhYFw6rh/tcDsG6+Un+Hthi6+81EdlvX/OD5zFf9U2nvEzY
+ZzQttwUWjgxcqyb79+ILKYUw7V2eOAUHHox5dAI26ZdsXDG/qZFzIQmwv2Kw
+TEry3dEUJpL3My9a9sG6vEtjWXC/oEXsTPpQWrJZCZc5/1SeCdfPiquGYIo3
+/rwNprSdoUzMb9Y96deHJN+FO0WpMLP/1tpu9CFQ5p1wHTa0Hx12hGuNIndr
+X+S9ylh5BVamOwrE8NiU0d0Mbr5Z5N4OJ/BUV+7he7Wzg9NGWFpgebUB3l55
+ZuPpR1NBB0IOZ5B9JX16LhouE3VLufBwdod5Enk+M+j6iKynSVRzDDbEHk9v
+gh/8o5WTek3kNxsyOHBNZ+ZNrK/pjSf1L67lU/A7JdX3wuHeXM+VUYx/nPeV
++1uwYPXydA3c7yrgHYOHWRdWJbBQth2tgH2yQztD4SCDfU4P7G//QZgLrN7Z
+LCD7y3CX/9QSZpo20+PguQN3g3fD7VEGyQ9wl/Z+kgPx6Bt5FPKQZyzL98P5
+i2FnRHBlrlKRBausWrQquJ5jHUzyYhVyfCZgbk54xnOSV5uk6hnJW/fJ3lis
+x9QRb7JF32rLeQuNJI/ss1V2MJP8917////nTf8Lzx3MNw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.261512611302877, 11.151252930219968}, \
+{-1, 1}], LineBox[{{5., 4.4999999999976925`}, {5., 11.49999999999251}}], 
+        PolygonBox[{{5., 7.4}, {5.4, 8.6}, {4.6, 8.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.0548, 8.}, {1, 0}], 
+        LineBox[{{4.9999999999976925`, 4.5}, {11.99999999999251, 4.5}}], 
+        PolygonBox[{{9.1, 4.5}, {7.9, 4.1}, {7.9, 4.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.5, 3.5548}, {0, 1}], 
+        LineBox[{{4.9999999999976925`, 11.5}, {11.99999999999251, 11.5}}], 
+        PolygonBox[{{7.9, 11.5}, {9.1, 11.1}, {9.1, 11.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.5, 10.5548}, {0, 1}], 
+        LineBox[{{12., 4.4999999999976925`}, {12., 11.49999999999251}}], 
+        PolygonBox[{{12., 8.6}, {12.4, 7.4}, {11.6, 7.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.0548, 8.}, {1, 0}], 
+        {PointSize[0.04], PointBox[{15.5, 13.5}], PointBox[{5., 4.5}], 
+         PointBox[{5., 11.5}], PointBox[{12., 4.5}], PointBox[{12., 11.5}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T10", " ", "P1", " ", "N19"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdief/fjghgihjij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdief/fjghgihjij.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {0, 44}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwl2Hk8VN//B/ArlQkxRdZElkEkZclWM0qaolASIVJKUhFpShgljeLTRAlF
+SklJaaWyp5CKUlGpRlmzjSVF6Ps6v59/7uPpfc495/0+9557mOuzd53vJIqi
+zEQoilyp/n/4MWBRNAI9FlXiu1FQAgvvdtp8mMeiun/WWx2EMzJXiOTPY3ET
+s9/KGcB+PmuzMxHfJnnikmA+iwqs5OumwWXTH+kmwqWHzrQhzt30wHJsJcxW
+yrqF/lS2Wbq9CEw72V/aAB/+XTm7TJ9F1S18/24Sxj+XVMOIhdXGZ+gs1mNx
+zc6/qd4EO7paJuyD43nCUVO4So5/4S7a721LsZhDfNs4bQhxrY/0U3RYp+7S
+OxN9FleUoR09ndxvTCQuGN6qu9xQFmYXGBjlwFM+hi7VIPE+kfBPuM6YZjZu
+hitVU875h3iKvHzQehJfevaawnwWN8Twqn8g6c/7J6mFPKTYyenxcMG6WnNN
+eKezekk2TFdqc5SDlZW3nS2BBV35U8ZwrXz2XbEO19IZ8Wc+4Fq+YeBEI648
+9ab71zDegzgVbgPM1VgfEwTbj90fqYEzlLccRN7c32s+7npAxl+w3HgE+c9M
+jKlIhBvbi/cXwuWxngE74Lwpr4aPwB8q5i5bCAtFou0dUJ82tTmnB/D7PwX/
+1Wjg+sjr46RcXF1v+O9B/bnnMgvifGDeqRMl3Vgfm5xNm2bBbEmHqh9wl+T5
+B5W48p6fntKB9U0rsu0Jgzkp1j4jsHtBiqUxrBBuZyaPfjriGbkDuhhP+vlG
+Fu5fln1C8hGsFkyXDUb8UsNANQ8281jvQuaR5NzW5wPTis7d70b7zviAWWzY
+9XFwnAHyOBwv6moG86W01cg6BNl4bDKCC5Ra799CfdbUbmWTeMfAeF474vse
+BghWkP6LUgqwflRy+syoTbA361klE+54sNQyBGZbPmG7w+vuH2vnw4a3t2j5
+Y7399g4uuQULntrX74ID7Jf0VcN+vvlu3jA/fEVxM+wYYuTERv+bMe+TB8l4
+AbJfyPPgoht5axym631J/435tZtei54g+V2wvFKO+R0caZr6C+aYuDnyYKvs
+6gQBccUhazu0v9ho9K8UTv4w01gKcZpudVoSqdeamJZ61CdBNHUxqVfg3H5h
+Oupn2797shassMe8MAjx/cMOaQId1JuTt34t4p2e7T+TYN4SX1dTePtPL/pq
+OJut0TMP7W0SX6wf00Z/Qct1fcQ9p45NzoMb/ZaftUR8x+DE1h0wjWeguRHx
+tiZjnibsqtPDjEC86JLZqk4G2v/WWncb1tx/ZF4+rMD2d+lAe9/tt1afgmnr
+ooQM5Bezes7GfbCfR3iMH/I7fTIy2hsO3HPI8wZsY3I8zg3mN1bld6L9+u6x
+PA/S3sJ0UAP1z3o58NQPNgxgZLmg3rfFao0PwwUtFo8jEe8YSpp7lrS38jma
+hnj61sJdd2CWntPbW3Dd1uO1r8l8JVJE7sEbRZXGf8K87TVj1+GHvSN3RJEf
+75679Rncbx5j6ls5mJ5k8nEf4mWbn0Wowx1rljtgn+MufC+hrwWXSmxNl4ED
+L8neUYF17I4rY3/h6qc5bZCAHR8Puqchv0sLtzX2YLy8hfcUvBGXv90W8ozM
+fzSKroX4Lon2LwlwciWnsxf1Gw0zWLyRxE9WypSivlaCGzRZWFDw9FYqvOdt
+9PwaLbzvRcFBXPiFRlpJBFyqfP4c2T8ddjtTC2H6FYV35Pngh6UxWzQxn8z5
+q7B+1IDznvJUmOcmevwc4kZXb1x3gbOVI/lkf6GU0z4pkvZ3FrR1If71r+jP
+Vg3cT/ZzEtlHqzKSxQvhgohfzluQz9XBt/8uwMkhsvzLcMCMsFmxsJqfzekW
+tG8d9Z3Nhdl1YinkfZEWiwqIgqsM7497wUdmz+o+Se53/gub1J+S71dOJ+Pd
+ObmuBHH3a0PaD2HuRQm3byReZvP3DUzNcZUdRNzKY/XGPpijaF0xAi+/Gt4t
+gfl71z00I3Hnnq5gLZj/qqke/SmJws1V5rDw46tjpXDkfqkJW7gxg1mehPu3
+SH4+YAdzfDmB2xBviFAbWUH8ZeUHPcTfqPncM4HzvLoi+sh6Zpg4KMF1twfm
+3IUHu8SFg2S+n9xDQ5G/78+sRU9hlqfhIia8cssWBqlPxubB1+R9v+sbaL0S
+FjzXDm9HvR94ljv+U8f7NqQyrQZe+1Vh2z2Yx5etfEy+h0tY+b4wfxkvOh/x
+nBKvFAW4Ltc5sozEg4PXv54LN9K2NiK+SlVcOhZmR8XZ/0X8QMnm4tUwndZb
+r4PxpcbeT50FNx7tVvbC/MMjXhl0qsGqCW3nEX9jESNdRTw0mttE9jPTZxJ3
+4bpA09I5qI/e3ASJa7COqrQnWU9u0LLwLJh9f++786hXl/wz99twNm/WlTfw
+i88d5qUwK5idOIH2Qq7augbYW+Bbo4ZzR6+bXOoAzFMx7DY1YHHnDJh+lMb8
+uKkiyizEd7WZl+nDpQ5WklawpXKq2EqSn2r8VD34N7MlwgMu0Pn2bTr6D/pU
+GOyC/zxUG2rFeNVa1TuDSPscptwD8v126/62G3bUEj0cDpfYyeZ6wbQfGVet
+4aoDPT62cNWI8rLJmP/NsNvT1WGeXPqMKtQjwDPZaBDzpTfMrDwFc/w1ah+T
+es3Y8NMTrrC1tDlE8s1aXGgMBy/96mgEc3+nq8jBU0sKB2tVsf6exYdEYW1F
+zU5jWKjk9WQc68VybZidOgf1y/tqNgXxl58ltSfDecvXP1Yk56Z9R/0PqGA9
+7lAHLOBXQbSW37ORv56o6nZYcbvvBA/WCa3tTIUlai8EzIep4I7r5HwS6iUv
+2a6M+lDCFnKemWEqUfcQzlad1ucKrzWj8i/AyVc9aKlwb3HLi3MwtfZQWAN5
+fwfz9LJIPMj2iRTqnxKnrvkMZr/QjVwC5y7MWdkP83vtmrbAboG2yQyM3/Gz
+bNMh2Fbl7F1v2FCuckoMHCWycSIV5tPWhEbD3Ed6zXWwmuKehv1w+13//nGY
+vfJ0yybY37yZMQf5s+Scm43h5iIPMQOYn5p4cooBeS9mvZoHs1sMaLWYr92V
+dcdmwoZGG2vIOdbLoV+rBfcTxASHk+9LQGlb8kWYM1L+RRHW919ctIKMbz/p
+igD1WuPh7tlI8hPb5pNLzifqHOVNcB5de+cROG7uaufXSng+K6bkbiH7+4GJ
+ETOYbp58xx5+/ficX7oi1vdGMseGnEevl5iIwoEaT0NXkfaXlSZ2KWA8j5r/
+3Mn5JmHNoi/y2C8uZsw8BGs4/WzdBHMz+19kwvGHt1zukMPzZpU2mZwrf+t2
+M2PhDHZY5gzMf9lFledL4TqpW+ZOcKsdZ4M4zHY8pE7yj9g5rtQ9C/1Z4Rff
+wdp01tofsHfS+PBM1K/Hnm7RCzvm0hLsYIMcTwfS309GWvEwfFoQaW0MVwVV
+xF+Gn2TenOcHB8ppbSmCqbti+Zfg7KHc6Br4o0eQcxNMiUwLfQm7C0R9ZZCP
+kJZrUwqfZc/ctwxm9S46fQ3+ZxTq6QuzM3bEHIULd0ie4sA6DjteboCttfxn
+H4SzFziGkv2juU62cxvM+erSRd533Y6GIgtSrzDzl9mwluJil1GM711g+gHn
+Peqzy46tV2BOUnXFQpjjlBttAess4RiNo55ZX0NMSkg9+KJR5Fz/Prbtjgks
+FDV9QNZ//jPd+kuyqI9lsH8SbBbxtUVMlrSnCk/Cj1Wv7A+QwfrvemH+H6wk
+9kTz3Uys77X538n5QO9Cz57lsHfxNPXHcM/m4cPFM1CfLqXPzbB8/vFfbNh1
+YkMgzhvUB/GBd6101NuyqMGenF8cGPbn4DqxzryT8InLUdmbYfZyO69X8Hzx
+3Sus4IIJcW1p1IeTu5e3AHbkm9uthU0WfW03hf8sldHnwfNTmv46wH4rx7c+
+htNFhpMPwKVj1Pfv8PC4xuB1WMi/SFELMC+b8srvMD1kUjId9rS+GKeC+fIP
+lojLwnITcy9vgAVvMu3FYU6je0wMrPPJ4scg7mcV/3bqTeI+ccEb2HTelz3l
+sLCp8t1V+I7VmbznMM9kvCwIfr74dMxDOLuvjzKDK61p8XyYFZuj+xf5jpYz
+nJxhP2u34SJ4kbukyyTSfkxF6yj8NoEhfYHkW1LjtgY+81m/ToPU68YDShXe
+Zvlpu7k08vrSYTSK+kveoPXJSuF+bgOZ5P0PPPY357sk+qctOlYPf51ucz1H
+AvvZifgjxIVNQ4yD4jgPF017SNrf/OZj5DwN35O/edfI/YR/JVauoOE+s4vX
+qZHzS+tw23ox/F7tm6Ej/Of3OaeYqRhPKGXHg4vl35o3T8Hzu9ve4TksO1cq
+cQfsWrT0hhjylxLPClSCWfY5mavgoYvio38mI5+/Rw7HwhYhWiEU4rzNFvEV
+8MzqeC992LBaZesfONTC+kYonLfA87M61sfl6aOBBthM76rFMmK7sI8rMR9h
+LIu1AU59kehZBNON+ozc4buX6awFmL9f4see9fDscFX/M3BHDbuRCf/JCXZq
+gV2v0LtU4YoVF1zkkb/Zty8ZvzB+dIu5ojbM+vu1rRxetnlfsRTsWhUmdgL2
+MExm1KB/ad3U02vgOL/70u5wozTXnA6XuoRolGA+ai0ZpWT/8nn5rW8E86d0
+Dr8hfw88bGLUSMMdcpNad8MtlkWZU1EfmiCXQf5v0bixvrh1Eq49JzxwvqNM
+Myi/ByJ4vyadr1eGJyqSzkZQqFfHfifyPYiW0ZY4O8GkFG6WSZDzbEFj/y2b
+MSYlLG++akmen/tda1VGmZRa9rAxOQ+FnArdbPCHSWWUiqyOh+OGjJujh5mU
+mWuRSAXZb56bf573C+2jDiqKIB/9897fGUNMqlRLnrYM1nl25n3YIJOqU52u
+RL6H0Tk6RTqwY5r1KbKeGYnJ74l5v3Y/Iu8ju35pRTBsxihSNIULtfMGx+Hk
+as/DPrDCrjKZR7i/YFIDPRo2LruVfwbjc+7KRKTAwld8iUjMj3vJtv8SfHOJ
+fYrvbyZVtURUOw3WLAmXNUU+Qg5jz0n4/rpkzW9w4/W9V3bDdamRmk4jqM94
+r/4KmHroXhsBC2TuCWTgqrZF9Z5w4/Dm0c8GZJ1/LWtH/9Ly2PGLcIDLjB/y
+MDX5T6oPTH9pukaI+TSeaE5gwGrRNZ0hmG+GelxSL+r3kmFbkov8dKadnEfe
+d276KcWsfibl+qfrxBnyPu0MUmrsRX2cjyWEkvNcbU2+6k8m1REdmkXO99ln
+HaNsW9FerSiLrFd2p4RrkADj7Ypt2QGzLK8KYhuYFH120RxyPuQyjIT8VxhP
+6Ul0OnHGjeUHnjApP8OdJS/g//u5XvT//28zYP0PCMornA==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.191470063271683, 16.391592056605244}, \
+{0, -1}], LineBox[CompressedData["
+1:eJw11Q0wlHkcB/C/FVZRK+8Sq3C1TSG1KtY+OtFpxmx0uutlW9UWbuu2ay4n
+JclRIpvr6BR2epHrVHvyUg3NcuFovR293Cq0h/LWLsnLiO77NNMzY5757PP8
+f//v7/c3u067vw8RMwghYvzRdzLzEZc5RT5d8ylSIjXh/gzH52xWFJpRxG2p
+x5lpfN7cULT6IBywkjsqgeVfOxwIhMXmJa3PcJdPR7itw13i71m6Hnf2uUkf
++nlQgjWniIV6nNOf1ldZy89yYPZ9/uVbMFNCbu6aRxHlgPkbBupK48Q9KXMp
+4r77Yl4UnGha7f3CFPtPup7ogu21xse3wsSl6MYu5OxK6iicMaGI4D3VpoEL
+yzIHW2B3Sd0vey0oMnq3PqYJljUMJXbC+UcVle9glp3p+WBLityzE55eS9fb
+6+B8C357zH9RNqwkI8JxWNQdVWGKPFKPP/04VhRxHQ4oOwvr9OtVX8L1Tqem
+ZiO/dFOHFW3u9mv7E2C5TXXYEvr9xq/c+mBqxP3VKOo9tBHmLkD/slQLuz/g
+sta2RythauW+bXSegWw21wvW5YU/1iBvgPZOvyvcFd6+5gDdT2jGQwKT5uwX
+I+i3KlXvw2nUj9/zwTkGZoyuaupBPoVhSIwB7Gobs3EBPc++9JnLmN9F1qXI
+FehP4NMi9IefViTfcsE8dIudMj/iPLieSyuZc9BPxIOaFjjJ1smtyxj1z+Va
+VcC7r0zrlTCxv3gmqwpuy9GKZEY4H340TwP3mm1YFmuI9db5ajvULxJOZh43
+wHOv2R70ee6wTnmaOwvz7fyd2UDvn6Ot69bHPPSjQvnIy65a+DAUZmkufFsO
+rzjSzHvLQP8b8od80f8Fv5vvi2F5svP1Sjgo/ElhPqycY2XBx/xKbaJDlDAl
+SWIWwWpTkeM0zBpL+8sS5+F7MKk+DPUFFyOX74P7XzIbq+n9CvYz5PDEskf3
+/ZCPyi4fU8IfQofTK2Hd1dKmWljS1/qFD91Ps/ehYrixxjejAJalz3Qkw1um
+5LEzsDx6u4c//IgRkczFPFg7t8UNWtL1G+RBMDXQWJYIF3Rn8ejnJMQk3gyu
+mTuRPob17rONxrPQH+P8luspMLtjfsJCeN/wA+k75FHk5ctuYD5WI7FKT5it
+uiPyhjUVYkcBPc8gg+qXmK+70+CVYPSvCDyky6DPf0hUwNVDnt6sQCEc4G+b
+yCKYH6fEez1caKXdVD/NJ8oTj90o2L8p7WDsFJ+IoiMjv4HbmniSgEnY8bZp
+Cqx7st7FZ5xP2AWFnFb4TZv82nfv+YQs+1vljjxbEgaPvnqH99X2jnnwrJ6t
+q26M8IkuJuNXW/RT3NKjrRrmE8VAncMlWDHhZ+8Fi8SV2x0wD0G//U4GrKRU
+6hzYuXF5tiP9vi4s1II+jykPryQ43uh15zF6/kPxP3BQnypXe7bChQbOvdOw
+clF2vbk1/v/Ur110yCPYvGquD/z8cd5h7Sjeb1ceDoILfDUn+5BfGhyc6kv7
+vx4f1Rgf329XjW3hNbU9siT0SzRXSttRv5ib5mI8gbyc3/acgY8J9xoGwlIv
+Ua0LbHHA0IMLk9qssBLk35jG1G/GeunZivk8WPKjOsEMVv6zNrQK/U8UxcVP
+YX9WQHlKEKx7rkjNoPNFSOa0Y347lM9qOuj5HYlT/QRfE/eeGtAh34rbnkvg
+e+vGr6YN4TlvrHsQ59F1Ymm5Xh/6VWVm18Gyk5rEsG6cF7XISEl/jw/YWIZ3
+Yp5b/61qhgWr11IRT/lEJl68YYpeX5tLzVPBkqh+Hv078UxsMn4fee7aGWZ+
+/t34fFlQ/wOCa1H0
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.3457692355174515, 3.812492355174517}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{19.99999999999909, 17.}, {4.999999999998181, 11.5}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.899390194486315, 16.096286839465897}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt1ws4lGkbB/AXxWxJs9aGlBAaERM6WfKykihrsNvk1Cw6sJRTZRmFVWtT
+OSTksI0R0XHCJ1ttjWNEIiXRYYS0hZRjNbL/5/s+18Vcv+t55n7u++9557pG
+23ev6w5ZiqJq8EteKUXyh0VT//1Rpim+1qzgb+GQUPbqZNg9db/2ajjl1iRL
+9Rua2m1gnfwzzFNkO5+Es9Y7VmSQdQ/N0zNwSv1yk4dk/erBQq4KTal4K1io
+GcC6ad05MMPTrI0HjyheSbpDrHz51gViQ2OqG+YFF5RNwJL+8YQOmP9hlGe9
+HHVd3PxvwH1Wt5N/g9n5tk+SYDuNwbVVsNZ05aQj7G9cnj0B04zBJCn6Kfd0
+dtIxpCmx1+j7s7DD/fcbv4ddfEIHHOCHfmkzXJj3PXvbEOZNP93H9SPrck3G
+mXDDnoAyX5iOOrHACe7UOdC7lfjwTbd5cKxKgIEdPOJnk9rzNfrmuOsakPM2
+37x+FzYfvydmkP1dkc+IFTWidPvRHy9PqNxL9vtbZorJfPrZ4d+gnpGhNDCP
+9L91QM0Tjrwy/TIGdjF4uLQS1lreoeEPh8xxfLAM/ddafRrjwCMzmrlFsMve
+R1IHkkdeDpeNPCIC1vMcST3+hUAxLNCfevYTzJTrfc/5Fn2o1t3aQ+o3cr68
+gCPEvAepMMX4XLtjAU2xWLGht0l/AfUPnsNjvTUJJF+XoqbvNqrSVNAwJ2UV
+5hO9l6nLgTc/yamJgtl3M+W74Cl+iWIt8e3Dhyk1mjrWudB4vhH2K2yuUYIl
+kxMd22DBdrPvZ8PcXMcb+XCs3ZOEfry/uTvlYh+ckmszdhW+aP1SpLUC+W5V
+bQ0mVhlTdYcFTGOFxaSf94zjMbDL1TKlWvQrnaeilwtrtbaU7oK9In/dfQWO
+LcnvVYSbm+W414ir78dWYn5qsiuoHBa9K9PbC7vH8k+egyXjQVPmsFf/G+00
+ct6Fhph5sBGL37gP5p3rCf+MfCU2zxNIPyMu0nIK6/5OzN/YxKmdSzXh1sMm
+TEWYKXUQusGMo0ox/2A+LTpcWQBL2k/LN8HMqxd9ZdCfO3P+rVIy/8eIggg4
+YVwuXAhL7hbqT8Dlm/QFOTD9+7GiOMxP98d5niF5PnIOV0aefapjjpdhnnrl
+2QJYJXJjXgPMbvNxZqvjvmfZMIZJ/YbJsjLYLvZa02Iyz/j5aIOFNKW7LvGv
+n+DW565Pj8OiPJZtJsn30vW6Z3DkgMXhZySfRmMZVQ2aWhQYt2OZMfI8MnvT
+WrjBnHsmjNhb7ycbmL2/XnITph9OvTSFp4TLXsqZYP4MUYESnKC38+AGeGSl
+vvljUl+5vvEQzNygJU2Gzau36F+FYy2WzLWCg3JH3Tthl1qzoZfov7ixK34M
+5hmdjzoCR5h/VSLLxv7gY2eNYJ0tf++ZDVP7NOku5OGl1t5N1ukz8e0n4Vlz
+6vom8H6JfPEOb7i5/PH9F8T6cW4WcKLCme+qSX8LNhmtgMW/D5gI4BCha8Ya
+eEx3sjea9HcvzsoDrrWQPbeVzCc2aE6HW5vy76yCqcbs4X64IemHaDVYUGvx
+s5M6+fwarJch83qmMaph/qFNAaPIS/DkB2V7kn9MbsMwzHTqWdxO5u/J7R2D
+JeKJQH/k5x4xYi9Pzn/zZe448QdXhaXk/EuHF8Yuwv57lWJHMs96h7fUYsxt
+sD+bT/oxf2QdDrOnrFyukf1txeHtsMPR09YfSZ5P+oWamjQVJjhrqYW8BM+U
+Gl1h9o03gRtgkc6vHXvgMZ6F/C8w+1H6jTA48GNJfzLcGpkWsB1Oq9J8XUre
+X+rTsBp2YG+h2mGt+duFn3FeWtQr63ewS9CdI1dhdz6/R34lfL2mwAs+NqvM
+RR2m8xjZMnBI1i62PhybVuBUiPmku074rIBFWd8Wb4YDE3PGjeGRLy8OSJGH
+6HiAkyHMLhUZ/AXXWpYM6cAh45sKjsCDK6ncBTBPqK62Gz74SoVWWEnu55qB
+7TAj5mnvOPoTrzWP3wv3WaQW9ZJ5D1V7Z2qQ565e1Aan6EgGO+BEXQ1WFckn
+9EqREfqxG529tAwOuVi7IANu3rcpr5jsf7ducj7mSbE9GCxkk+cvwi0Ddp4x
+sMwn+aSvKNVFXj6nbvMLyX1unrCrgLUi2ndfIXmlczTsl9BUl7Ri+hY80rR8
+631YSZguJfkK7JxE+lo0ZSqYOzQEJ+7kzPWBmadNdBQxX5ZF3nQSHPaqoork
+x72vY3QFtl839x6HzG+x/nI9fGLeU8MDJN9OL9UHcHVY9bVcmJl9KLoNLnKP
+cqiCUzg799TBf9qaiHuJB4OmL8M6o9tU5Uzx3Hd5nk2Gc4NFuzRhh0qhVQBc
+fql83Bwunl04bEX62cxfa0/Wj75hMuHAQp8XHJh662Rai/l0rLc82gpLMld/
+CiLzzimz4cJM5UnTJbDlxrYjbsQRGStfIK9FCResHOEUz78rRbDo8yUTK1iw
+TtyaAY/UcJxXkHoVu86dhH2jVUs0YHpRU2QxnNhm6/sVsb9p/CP4Q3yLcBLz
+UXpJM+o471Wp2okBcl85SWYRcErK3VVdsDjOMKoH7rgXfaKV5OnpYWqCeTRL
+j+5ogtUGNfaGw8KWdC7x6w/7DG+QPNTftpD9YpbbJzltfF4v2zjeTe7njlV+
+TnAg/e7GILzW9YD0BOxl4v1YFv01SEYSmmHuW17NYjj29dBnGR3c97q8BkuY
+tyCyYgXMur5s1naY9dfXoc6wbce7kN9gl3pdbz/YNCznQzGcpZ1pEAS/eub6
+cwus1smSDyD7//kq4wPM3R+Z7wE3F97er2KG5ySjWtsWPm9kJmsGv35QoqYN
+lyqkemyBO03/CPuI/oo6z7X4kvV9sr734Nw/bHvCYFZTvsMZ2I7h4RwDO2xL
+zguF+TED8+JhQbFnuz2crbvOPY7U2zltpQ13OtcnR8ORXSqfZLXJfTrtHwpX
+Vkd3DCHPitT4Qj+Y6p1v0wtv3v6jkxuxbsKaPjiDmRVoQ/rZ88TyPazixWCZ
+wMWfh93moF4rZ9/FxaS/Kr8ZYzgkPFhNCWY637X3gV317CJl4MTHk+IM0m/d
+UOUUyUdDpqADlnSz/hwj+c+yb9dAHmwl7+vjJM/+qhmSd4fPkd1S8v/wKKu4
+CIuigxsY5PzRU7Gj8KeAH/9eCGeVbPu0ainud6nRu5UwfaBqOBQW/7KqheTL
+9e8OLoT77KezgmGRX1ZPC5yrstM/hfQ7Uaw5BCduCdD7D5lf/23IDPxcZHyz
+i9Q/1S+crUv/70uC+f+/H+jS/wKhtFvA
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.984279526590164, 4.521860800255244}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJwl1ws4lGkbB/BRWrMMRsjkHCmlcqymDxk5pByWqBxjI40KU6ko5yiVajaH
+nHKcShFqZ7CZCqvYPso5FWu2iEIRK9rk+z/7vdflcv2uZ97nue/7ud/nnVm2
+N3THvgUUCmUQf+T//y99FuX7PK7VLEqtHtvfEm6P+v1tLzwesdIoCl4xUigo
+h3W5Xv534c0hzMAImCXTYtYLv1kVZm0Ki743BXyDeRuVxqdXsSijqZLhVAMW
+Rdx4xK4M1jxVJaDBChP+Xv5wr/PScUnYu/6oPQPOd50LWgjnmAdvfq7LojA3
+mlqNYT5JlxfW5+GKBLmrT+HSNoaNPTy8rSI9H6ZMvhiSJ7ag7DwM8717zgyu
+ZFFa441ULGDmr1SNOpgbpOVCg80O/mR7Ew4fPRnweh2Lcvx7jE4G7B6cX14G
+T/Eqj6fAFZJ7f06C+Q56SWSccy448AC8JHKP1Q2YXRiycxf8bHInswZmDd7Y
+4wjzpI+Vdv27/k0LZ9i7eHfpJJmPV2LqC+se+qJB4m1a/4ZxEjZKsRcZkvzo
+v2vlww1KCS2OJJ+Y3YatsMGLrwMBcNLAagEV8Z9Rm9l5DOY6sRu3wg4KYalR
+MOdetPkF2G+TfFAkPDMf+6gVZpytnuPADclr/623aI3eO0844CVHZQ1cuen4
+8v/A46o+Ndvhjw2durIkPiGtYR+8Zp1eyyvEr9B01ykSblI2c8gl9Xr5rvAi
+zKVOmXjBtec1N2fCPe1OnvKweMLnnlz4W01UbdMK1CV3Ioh4HUUuKQqOtFdc
+kQFrxXx7YQyXbk2NTobTuzwbx3SQf80OVbJeQnvn1juwGVXu5X7YLzxZLgxm
+CwsqneHWWc9frGC73LjOjfChBUtfqcINruYB6jBT7VwmBc7PVb22CK44ukvu
+03LMr6/j24f6/PA1VGEYzvB/f1hA+ovxmjoC9zR8DE0j/df+YWwanuE/E4+B
+t6hlB0pivtbqxRFH4c+nrzdqw7rHJ3nEMvwHupYknvq8IfL5akPrcD+Y+mif
+dga8eLKIGwMXXxt8WANPh0U75cAVNyxL3sNZJ+pu8En+XYkb6Yh3i399zROY
+efmRsj78wTVxvBUudRVwSP6SqezZNviQ+Gm5o/Ar7aT3TWQ+zvvGNHhG6GQm
+gBn9TT5VZL71ba/Sift4xd2wTJFQNYTU88eKtM9weHBLgymJf89bE0lDFuV+
+yeQMqZ/u7rJ6Vbj767ENj1CPsMbX5avghMMXt4TDfrUeNw1g6zdLGetg3fvF
+vxjCnyv0Ot5oo38inqWtgRlDG7IzYP7reiUtmLKwLdkFnnkZyF8M1xf3F8nC
+yRx903nEk1y59GanFvKdenx9GI4NL1MshPmBU9Kt8C52q1IETJu0KayEF/xd
+f8QTzjdoy7wGZx1/F2sLMxxurzwDX1qnsM4cZndGhxyGd9wJnSFWWPk6zA9W
+nuX9vRVOzbyi7AY7mfj0esA5wipZR3i5cpLcEdh5LK7FHo7Wn6i+BGvGBf1C
+9mOAe6zpDmw3X+rpRc47AwW1Ftj7H/cPB+F7BvPcD+R+8/bHcaQ/bz+VE0e+
+bmJNpjlwb3uHQAkWt/Y6eB8uO7ewVRtOtTN0fE2ev8WaYithEV/+4RzsPPnV
+RhM2S604r4n6GW0YFiP16x2jRG6Bp+8tXjSJ9YS9Xf574VclBy81k3rESq6K
+gaPPLNuWA1PretuvwjduV9n4wwnXv1wpgbM6f/ikBY/6N7b8Bm9PvvpP7zKc
+S0p1mvUw3eyjVwrM1vAJbIDPUGNX2MHeEtlVtTC/XiN+TpOcz/MHquAe1frL
+ApihoSh3C86RinE7ArtZZIakw6llv/LWw/lpSWGx8D1PVTkxYu/ADWyY2+16
+p0QD6waq9TvBIo8jRUEw5ckn3nq42dfvgxnsnjghVIN1f7h/QQeuvn/ZiQrP
+tJzna8Ga/bz906hf84H2B0awc0TaBOmvgQfp5q5k/NzgTRE8WtCuEQcHDNyk
+/wkP67GeVMPLryqe+Ase961cOw2zFRKHP8Dqoc0XlBFvc4LI+Cucu+hFFhM2
+eZA/IkOejzJ7PVe4+hDzgC68xp9rx4ZHh+t6bIgl3DYch91Lbm8MJPXbHhV/
+CvZbtDAoCa7dr6JwAi7OlDAj+0PVebiB3L88KjiiBW649ajACU6ifP40Rvrh
+osmp1eR+39JYKSOcE3KNpTOIlyVVuFoH5gwVe52Hae90FP8D+5Xvv0eDBwyv
+ZmwzIu+poe/x6tifRh0bV1gUypGaUEN/p+8c2gUPm5/54gkH1C4+7wbnC7ZJ
+P1bF/j9lHXeAHe6uSDOGqYf/0LeA3SRTbt1WQd9f2sZZC6t+vUVbB3urp2gw
+4PByD7E6ZeQhctlOIeMS/FWBcKmLsdIQ8tGUfnhQAw5nLKgh+bqVdveNLUX8
+XfqHBKR/DkfXtMGjdKddeXBGzeTepzD94ZeLyaSeKTVe3bCfcvGiaNK/+zr2
+TcLWxp9Ph8HhFz5y1cl6i6KzOfBU83NPN3h4SO36EdJPaYkdXPiQ3SbhSdJ/
+GvJPnsOM6rsPyP40Kb19S0M+tTzHbTmwuLfVhBXM0856zIcNnqtPcGC6UCWw
+jazPN3TiwlM/XTKegL0/y1DyyPj3PxXlkT8v88TtLHhmYUT/epgWViuIgx3+
+5ni4w5pK23xdYfdcunMEXNroUSerQt6LlnlX4dGAJe1ViK941H3zPbi1jevh
+CPdO1W1vgk1Mf+5vR/7JPivlXpL7A+K59vDyoDKFAThpa6x6DQNxpIgpvCf9
+c8ohUweueDopNQwzt1rZXFZCHzkXbPwL7rwmH/ptCc6jSZpMF9xM22FxGP5m
+vcO8AaaOxV2eUES+sblF5TC/27k+FjZpZtpmwGFL8/KXwW4Xpm1jSP+semjW
+rYB4OpJ69sED2dJ9ebBDr4qRI9yzpONjNBzr1xS/Ac452yl2FM7Jdh/Ugr+l
+/9V8EjbZ0u9G6hmro2aaCk9tTi+kkvpxouKE8Lem4OCFcHUfz3Qcpk4UqojD
+7CfvL+khnoxned2SpH+fa+84oEi+P/10TgmmmPGYxfB48axoFenf3mvfReTz
+LmnOlnCFk1EaHfnTPkYu8SH93OjjYAxn5JpZR8IsX/qsDcz2MWy6BhvojSja
+wnSvlPBa2D3eqc8Q5g9HaLwl6zeXeFHh0j7vs+LG6Md574g/sF6q05Wz2rBD
+evY/x2Daua10CzggNzlSFvbLili/C056+KtnBvJjfD3FZMMNJuH58rDzq9uX
+w+BWUfVAgjzmT5wdOQnz9/B1xhdjf3dom52CB0Ya8jxg9oo9d47Bo7NZBY/l
+yPjZWwfg3uU1vky4uKiv3RM2qZP6Q0BHnV+HzdnCyVLGeyzhWpsbKwzgnuAO
+ZaEs4pzpPqAEc8pCdFVhb/bc7BzZj0cFrddlcN8iH6lBUp/Nsi6eMD97urWF
+nEdXGtdsgmmW+gd/g2vt3A1ZcKf32r5iuLgg9uJBOPKj/wJSX3pC/owA5khU
+J6bDdonb3zOw3vCL7FdppD/6H/ckw25HA5nZpP9G/ZvEEW+OOyPjBpy8dxnL
+isT/exG/isTT+elcFCzqFUg/I8+LwO5sOUwXHxglz8d44e7QLri0RSJYAvn5
+/SY/PQInCKNO68JMSZeQcTjJcUjSHk4dDBoUwWG2Ys+DSb2FP28Uwg3SCpmX
+yX5L3FWOh01So8zKyX7dt9A2JvPbdhT+FxZZ/hlegPiFt9RfvIWp10Qm95Gv
+XUSt7BeY6zJnWymN7yUKqZXiJqiPoKMoh4b3juR8CA3mmG3XPCaF/lAvWyoD
+h2/J07SThGkvu36EM9zvWqr/iOeF/G40Jr8zcEmw/gePeSis
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.425736195028037, 11.393326991679075}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJwt1AtMW1UYB/AbihlDHmUYLc8VKVLGQ4rEAivZDQMpuAzLEBnjMSvMDhSK
+MqGzGdmKwrAO5BE6xnQjRIq8BxtVmVLtxpvwlm1IGGwZjCKlg6VORvwf403u
+vfnlfveec/7fyXUTZ8emm1EUJcJJ7pQVuXBp6r/Dk6ZoG2GFM6y6cZJ9BJ6K
+yiyMhk1dD5Yvw7XiVmMRqU/5a9cceX6NszkOMw/qzC1x7xqv6uN40ZTaNHPa
+A2bLBl+Sw1JbXZgvnC8zvjkJmwZYX7rBSZVcpcc+1P1e0sOAZye0uiyYYs2U
+z+D7va86+jYRL633kPHNOev6P2Cpzbc3kuGuGuugJ7DaqvMzJ5jVYffxNjxb
+ynSce42mrLi+7E1Y0sNW1sNMgcBuDvYPuhIgg8NVk9bd8LJXYl0yXNgTqS2G
++6//+X4cXL9n8dS7sAU74pcUmBtwasiNjH9ho0tO3lfzJUasx8DQPGmGE/R+
+jUOw5rx8XQ/rIuXvdcBsix9tgzG/uOaSD7+HuVW79EqY7ZB7u5nUj1RUL8Ec
+oVnwLVjYKtniI4+PXj57eB1ePmKy/QIWKiIkXhhfE8XIug2bW5+clpL1fspL
+NcFSxTz1G8zMEuxnkZxLBltZ3jRVvCUtJX1J8zePkMLc5M/5LqRPk4sOOpj9
+cDqVAett7HW2PjTVHtKWc4f0OcLpRAy8UH91pQ5W7lMYCmDhmR2nNOKGgPjv
+4GVOy2PST3qjuK0Z9k+ryLmP9Ri6p6LUsISxt60B1j/2qKuANUsDfjI49/TE
+2znwWGPMz0dhVZhYFw6rh/tcDsG6+Un+Hthi6+81EdlvX/OD5zFf9U2nvEzY
+ZzQttwUWjgxcqyb79+ILKYUw7V2eOAUHHox5dAI26ZdsXDG/qZFzIQmwv2Kw
+TEry3dEUJpL3My9a9sG6vEtjWXC/oEXsTPpQWrJZCZc5/1SeCdfPiquGYIo3
+/rwNprSdoUzMb9Y96deHJN+FO0WpMLP/1tpu9CFQ5p1wHTa0Hx12hGuNIndr
+X+S9ylh5BVamOwrE8NiU0d0Mbr5Z5N4OJ/BUV+7he7Wzg9NGWFpgebUB3l55
+ZuPpR1NBB0IOZ5B9JX16LhouE3VLufBwdod5Enk+M+j6iKynSVRzDDbEHk9v
+gh/8o5WTek3kNxsyOHBNZ+ZNrK/pjSf1L67lU/A7JdX3wuHeXM+VUYx/nPeV
++1uwYPXydA3c7yrgHYOHWRdWJbBQth2tgH2yQztD4SCDfU4P7G//QZgLrN7Z
+LCD7y3CX/9QSZpo20+PguQN3g3fD7VEGyQ9wl/Z+kgPx6Bt5FPKQZyzL98P5
+i2FnRHBlrlKRBausWrQquJ5jHUzyYhVyfCZgbk54xnOSV5uk6hnJW/fJ3lis
+x9QRb7JF32rLeQuNJI/ss1V2MJP8917////nTf8Lzx3MNw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.261512611302877, 11.151252930219968}, \
+{-1, 1}], LineBox[{{5., 4.4999999999976925`}, {5., 11.49999999999251}}], 
+        PolygonBox[{{5., 8.6}, {5.4, 7.4}, {4.6, 7.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.0548, 8.}, {1, 0}], 
+        LineBox[{{4.9999999999976925`, 4.5}, {11.99999999999251, 4.5}}], 
+        PolygonBox[{{7.9, 4.5}, {9.1, 4.1}, {9.1, 4.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.5, 3.5548}, {0, 1}], 
+        LineBox[{{4.9999999999976925`, 11.5}, {11.99999999999251, 11.5}}], 
+        PolygonBox[{{9.1, 11.5}, {7.9, 11.1}, {7.9, 11.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.5, 10.5548}, {0, 1}], 
+        LineBox[{{12., 4.4999999999976925`}, {12., 11.49999999999251}}], 
+        PolygonBox[{{12., 7.4}, {12.4, 8.6}, {11.6, 8.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.0548, 8.}, {1, 0}], 
+        {PointSize[0.04], PointBox[{15.5, 13.5}], PointBox[{5., 4.5}], 
+         PointBox[{5., 11.5}], PointBox[{12., 4.5}], PointBox[{12., 11.5}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T10", " ", "P2", " ", "N20"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdief/fjghgihjij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdief/fjghgihjij.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {22, 44}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwl1ws41NkbB/BfJdcSuiCXxi1CkiiFZroubUlCbmVKdBOjVLZUkxQraWxk
+bLWNJUQrXVZUNCLdtCmWITIKKRNDuiv/77t/z+M5z2fOOe953/d3fuNhtCHC
+M2QkwzAD+KWRkQ/jR5vDKBO0OEyRQ0z6dliybtF3R7LEp6xzEofR8c44mAhz
+U7kXt8NFU6fnD8CcRc0vVWD5mt0p4eMx1lTJyiZyGKmxwbqvcG3vgblJMGtn
++96UCXBrwY9dcIJ70CMbjFxJ+bR9NJ9g9KYGo+CchPs7RsbVYmMo4rIOybSe
+wrWdbaM+wtLn207pYZRkHBy9B3nK2Sreu+DoL11enXDtk/iRTbDtotVlLjrw
+AaUWDj7neueOOwAL4ppkObC4ab/zediWl+M9GqOryRPuVVrfcvI3H4xFG1Or
+LmAUfzYpS8OYoPrLo0SM8pBb1eUYWbarJH4YRS90L/yDkam7YKqHkRsRnliJ
+UTLXO7mO8gveV3eG1m9asTYB5i08NzuA1vdmKrBp/vrhXAZWvr++fQh5c0v/
+WSTA53lGiV+ryX2y6eqw1OFTVSbM978ccBCjSGraK8CosU074A36k3fIyTad
+Ps9+O84T5o/YM7MY5r3dtv02+s5fEs7rhQX5zjPmwPePmM+n87k67anleE6O
+Uk71f33pVzPxh0uUakyNqf71mdvHwjrNjQl/Ub3HP8qa8dwlz1U3LNZFHYYr
+pJWwjtb09HZY1NYz/z65YULlwcnY//hoSRec12ewS1cP/b7cX6WPeDxzix0X
+YLFg/Z1QWHJwwntLfeQ3ro4lhl2PNbRmwBoXk4UmyHdzHO/jAMxTYG85Bpfk
+pIy2N8DzGsz5ox8WeKu+D4CZrXfWeND9621+tpXmDZmxf8Ilkxd2rIfFSSue
+tcOOvg2xi2h+rzRFjfrYF6g6nuZjGBd9uDa0sLAe54lsE+WaNK8e73YcZmVF
+q8mw38Ppd9ZC2GPU5tkFsKv/6ZzPqMdDpyRgFc3rWc8rhjU8LgrakR8TV9J5
+EOa4/y4PgnlN8038YdaiF9ueot7Psmc5rrDo5xdJTrBwcaCdO1nW4pBN71ma
+KCoMri0v8teEPWaZfciCufl5pQma9FwlYwdhwfTeU+NgUXPtgD/yq83P2J+v
+gXFbxb1/YX77ZpW1sNzK8g4X9bKuim5Og0uOZft8ggUdBq2asIWfXUSqIdYP
+fg2fCPuOUcizmwIXx1rOonjVbSdqYJE/T7AZvr/nZJQNC+9NdLXiFQ3qk2NU
+BFw7SzJKDflElXfPzoUFdw8tDocVHqrp1dN6XWW1Btha+JL5ANu2XQp2pu+d
+6/1rVIzQPx/JttMwy63MTBP28HcVvoPlRUdGj4X5SqGfptP3zHFlox/Y7+G3
+MMwXlp48Y9wFi4evt22Bh1juRvdgLnt1CBe2r3sTn0XnJy/zpH7L2ww/76f8
++nYt+Yb4qYmaVn6waFTXlD/huIr62jmw/KedvXaw7ZSVPH2at1p19zLyH1Oi
+6qYCM2fXnDCBozf5OjK03su17jj6ca1CKWsk5VOc8Uo2DufOLd+oSc6NLa9W
+x/sxcO2uNSzVNCu9Nhb9nu27x4vmP4wIqRiDPrj0p8fTeeVDHR/UOMzgJZuy
+KjovyZbvB5uqqo9WpX5oflnWr4r7dDbA2htm2bDf3oa9Jt26kEX2btt5F+5Q
+GXo0AHO7srYPw/XjnZrZxohf0vZ2M+Il1EbaJ8DiyqX3vsL2Px7veEBWWjJU
+gHyqDMNjR5ggnlbjmB3I1z7OrNwGFiU3xy5APaIlRiM9YG7T0B511OvYcrh0
+I82rvzJ5DPNWeXeGkf+Isp+L/ghjdulvgTmNO633wnlOKXH+FD+uy/s83NIQ
+XrUQlj5amHIdlhg7yE1gefWD7kK46i8hj4EFun25ibBIV7urGflyWqqCf4Yv
+NqWrFMP8GvXuTpwvye8+lgpLX8y5oQx7dWV8iKb6rTR9lZA/P/pGQgjMcjVP
+6kG9+oatZoEw8+RUoBj9EPIuOKyj+K+48Sno33Lj0cIw6k+CxcetKhwmW+Fc
+RjzFf/5qhq8yvh9m+ckLyfZmT4KVcJ+OlZW3k19uGZWuiPfDf/UfhtSPfl+T
+L6NxTpV/UTD1w13L+wQcU2t2rZA8IdcjEBY8HGX8ndarnmZzYUlPjNtyU1h/
+8IYQti+NisyA+Rp9rxnEl9Vd+dwOS41GXklRpL/vK3aZmCHfzD1TFiKfluz9
+TwNgacXFW0rIV6Hy6MZfYZHNgE4j3DHjiGIBzD81d2U26kvtnmcohjmXbVKD
+UT/v5ay8+7R/zORKFfTHouHd7Lu0Xv71ZRI8pmaErJji6WWd7YC5Nplbz9H6
+gqVZquhvzUWlKj7MVWr5QPfNevGjdWthVvJ9nWuw6I1t8xw6b22m8Ry6ny+f
+92qRd1oXxeN8YeQK937Ux2K7lBYgP0FtSey/MHdphFsB8vfNKqitoPpnarIE
+qFc5/INeCSx+cMMpBP3Q+KL5tJTs/81nNvonqzWtvwdz3DiB4xTw/M+t2v2S
+4vfGNH4bieet1R+pgvMZB8cwRTjmx5N3TuStPB/HERh1PeOjqZ7cxUNCBu/n
+vOENZdRvq2Np0+Eoh78XKk9FfEVZc/8wm6mqiRL5wIw0KPYjPMbk15rzsFRp
+hIsd1jsrZo59P5Xuo4FOBhzm7F/hZI75Q7WPLXDeGEnpvv3kBwGRErg7Tde0
+GBZvyRCeRX7dbbbqHTDHIkwSNorDTLiqrq5oQd/flivmob4E+0lH9WCuX47F
+V7jIe024KSwOn8XORD+sLWVeRjT/Wuu4GfoV99xnzXhYaqtReAAWJc2YOETn
+LS1ZkANvdqg40wpzj/LnCGHHuzGeN2DWGo9hT3h5+Kb6VHKx5ZlGxHftkTRH
+0H5VXeE0WF76Q9ud6ol+3eSOfBitPG07yr8jf91K5C8zf84ypP2H/JrtUZ+9
+6bnJE2AmqHuRKuqPM+DsmkjrzfOzi9HPOFUDXROaVwtv3/Sdzdz69XGAC8x/
+VR7E/sZm7v9mNBRMHvCL9vzCZhIcrMxOkW+q3br6ic0sXmYT/YzyO9g8ccdH
+NhMdNKyvjfoZm0od4Qc2o2+iLlkPcyoCD1nBE0TjzYos6H1x67eGi8zNvIdp
+XrHgdTq83LaqcPk07D/f/3ED4gXe35acBvOPH3Xg03mxk442wmJN1Y7Wz1jv
+snivhiXms4MXbPqK+M5mN+fDjNnN2NFDbKbDrlxnPXnqvVci1Fc1ZWL/blhc
+UnrHCPUPqpXP4dP+yiWtjrg/CrLtu/fD3ArnNeXwoNrx6giYk2/QqoP+Cbon
+VvnCrLS27wvoPs9eu3cezd87dMoBtlif97M2nSeJHDWA/dfu/l3fj3ylDw3s
+o2GOY+LjGsp/bwo7HedvNP3cnU/1Nbg7diC/+qbga8n/1b9xxmv037pvyS97
+Yc7Jpl1X0X9fRYkRj9ZfnPR2HfoxKLQzjqR4P64OMNTvpHehB2j9mfehlwfY
+jDBu/DIhxfsyGBkvZzMtYbLkctp/9d9vtu/YjO3Dpxvl5MIDm3vf4D781MOz
+pn5ct3UJec1mPEyCXvDIESu68jvZjPM7+6ibVJ/YbdqjDjajc6/jkooV5lVG
+CO/BLTu8X/nCjHX//nSsH4x46ZVD86YcVwvEi5vXE9RH/l4YvA7nSfaFps60
+hkP1jk6SsRnTd8N1W8nfLL3M+7CeHbItA+aoXc+d2c9m+JNTp96CmbD3ex+j
+vgTNOUHPyPMfxqwcZDO87aEKLWSFynmZ6EdSGu90E+0/oXa4EPdJppA5t4bm
+tfK9Q9E/LxePPX/D4urDl27CPKvGwHRa71lhlgML3dyWRdH8R89lxnDLWO3n
+7rT/SGf9TMQTq/VUT6N8M4OSn+N8L3eHCiWydsuw5XvYs9u3B/VyWl93z0D+
+y1u6mxqo/vMvFL+h/851Z2fWUL86XZxXox/1ht2NZP40yYx09HOC2qmyJpp3
++MvkXRvqdTVd8J58ojuN3QivWm2pS/kYz3b99A+byVtZfXEZ2dmuQFKB5xOS
+FHmUzFz22VEIRxrnPiRzXJ3n7cR96pyuPXE6LGp4/DX9NtNSKeMEkzVOBjhl
+3GY0DhruuUKmH0HZ//8ftuH8D75reiM=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {1.2371675279736856, 11.129988497564629}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwl2Hk8lNsfB/BT9jUqSxIjiUKmorLUPDcpkaj8SoVGyVVZo6iUsUuK0qJw
+G0oRWapLqZhcSb8oZEti0kaUIW0iv8+5P//M6/065znn+/0c83geOtv91++c
+SAiZNoEQ+klE4/jRZsgIPsLZDAm9uk1PgsWQTuna+s1wUVbI018Yv3IsdMtC
+mK2iOvIc9n61u10BFm5bvDEF7th+Q7LZhCH1subhlnDRuqGu0zB57zTlmRZD
+BD8Cjd1gJc29Z9bB3jfVjpjA7GrrlY9mMGSNRsSgPOzk+nLYFM4piTH8Ng/r
+v7J9fFGTIXw5DYc+WKC7Sk4BTpboHqIOiDz+IWI6Q5qSIs2/U39cu0gM7lGN
+fCRH13fbaXNGgyGenas79GF+aniOJVyvmrljNSzs3aH8cxrWe10j7wdzrScs
+eAYHWy3xTIEDai7klsPeFS8+l8Csks6xatg1NN2mha63yYz/Hv5xX489QOvX
+UBjXwPrC04fuj9N+63ZkceEbn/9rJIa8WO5O62/C1aFBAwTmO762UUS9PhrT
+Lg1iPi9hlYsPbBAQdITmyaiO/1EDV42l1F2HBYKDzzXRf+jLPb6H6Pit6nk7
+YfXM3GIO3d8mcywdLvIY/c8o8uAGFmUKYKfcxt03YdY/d13r4HSdPcv+hJ2U
+DP0f0HyPmVlrwMkF+w3p9clF/OGnxgwRPSgac4NZyVF342Cliude0jDvjPPz
+lbDATbY/g+Zf5TJfkc6XyxvRgftHO/26jHD+t7UqU9GvesqB0rswr22LhBSc
+PHX07iU6vmz4XSDyc+qvu3YODnBUy+tUZ0it7Qdjam5ZV+x6at4Jv0zq6DTX
+RjWGzDLO1/qbzh8/mLAdvj3uEFcP17dI35GEg0tL0gZhoXLMjQeqDEmU11dS
+RX3E8r31GThfb3uQJZyc3mYQSd3VsHobrT/pvFg8HO08Y044HTeR8ciGGfZ4
+YyrMt35Y0wrXts9few1mblxom479fjS4jhbTfN5q7valfjEpv4D61QPBI9hg
+n/iVi3CRdlS5HvrxOTL572ia3/syzUh4RVy4gTutT7z6SivsOj+p3giu7+gM
+0kE+PWEHv9J+mG0FM7bCntoLVhfCLBPTQR4c3XC0yQtOlnmvlgzfjs8QatB8
+WqxKY2F26p5XdYb4XOUk4QmveXV/ZSTMv5y2zgBeopAUbwEnGyZMaMb+VZO1
+3/6Yi3PxGOT5wAYDrzdWwPxZs/WH0E+NJDc6CS5SaFPeDScr/r60m9rT6Xsb
+8vF0CQlaN5een/KQNcwa4c9bAQtTtWyLVBgi79GQuBxOnuDO1oVPq8hU2cMB
+6rmpmVNRp+udk+50/3qJARM4/2W17QG63pCfqGEKcmOM3p6n/m0fngDn7/Wd
+UQ7zPu2M2grbXnwd84aut+9ekw2cM1SWKYX+WHmzF6yGSdpFMQPa/6/ZKzzh
+Fccy/1xOx2c8zzsN95/YVesM18fNndEK19gfOepG85lfGqWPetqGCz22woR0
+m0TAPkxHsgP1DTG5LjinKbBpIcwoiJ5Z0n4vOPspUlvG2ZyC4+9NnNlJ+4uo
+DH0FO3VOM7pM651S+kUdeY3uuWC6HRY5Gg4w8FSvCCsNmLw5G7YeTn4UHfd0
+DhxXdsUeHr7dGxkBBxR6xhnC99QSr5nBrLqAdUNYX0nB2veTAfbpO7k2E75X
+0KycB7PZExosYJ/9+RkBMItfOK0S9d/T2VzOgZM3a5hawvGyAyXTYF7VhsfX
+kMfbE7/Wjetj/iezfhVYPrusTQQz5r+FEZPx/fTpnfQZFvg97P6izBBN0WaL
+bzCb794bAAvtDHWksR6/e+beMSV8P8PtdGbS/YcV12bAVtnZS5fD9Q9cQzbA
+OU9XmnnRekP9RTpwz0Nu+jFqi4jrMjBRW/y9EFYykk2QhWs9S5rrYcHOjXa6
+cFtkwuc+mJiY566DBcdjlozDwsM2gadgA6llE2SQF7stiP8aNhX1jEvB9e9z
+T1ugXlbOXzt+YX7AHjNOKqy+wKejm9b39rfrV1h+Tu1f5XT/XLHiNei/rYzr
+kQSLCo4vO0/zKJP6z0Y6/0MmrwUOjuarqdB+G63SCfITbVfNqqP5xM87NhWO
+L9i/IJLa585SJdjpp8RCM5i36XDxEK6Pl96l3Tsb57OwaPQunP9WbhcfFinr
+O/jCoa0/t7rBvMMWL6XhJg9niZkwt1et4STqTV8VoynSQ/9Dp/Tl4ej9c0Q1
+sNPA2IEw9K+pe3TTdZir/DH72SSGXG5YlptB57+41nNFEflb7is9D/MWXjQ/
+qoA+at418GF+mFUaT54h0hYRdcXUaY16Z+Xo75mv8hOYpXAkq0EW9Vc8zPmo
+R58LrpqawzURbi6KqI+Ja1JpkEH+WgmlC2HifssrDeYl9dq5wIKRCLVUePji
+t4sHaD9zi3uqYGdLC+8zdPxXT9QMrOdyue9ULjVZmJ8Gk8lvdtyCWbNWRy1G
+PemSwlhqppe8/kDrC3XQovO5STJ3slC/S3dX7Uk63yMlwQ39mYZk3fGjeQ5L
+NSugf83NK08wMD+4MjEXTgyq9pem9fJLEvSRFyukePARzUfJeCgcdnl3RTyC
+9r98Tnw+3LP3sdAMZqSv/8iB+yVVP/XMQr35LZJB1EuLL6fDRL8yWxYumuF8
+aAPMj1D/GYj9DE7KVk6CGY1VS6+jPvm6vcef62J+7J+plai/Ri/9Lz7MM33b
+fAf9+ZTEOobC3AONk9KRh5NQM3orzMhWrw5CfvxWB74d9eKoCXbS2M+hNMqG
+Xh+7s2yuFP4ecBWP2VPfTYjXlsT9YXjxOXo9K6mJP18C9yeXB9OC6fUqGUPe
+4vh9YubNTqHza48/eyLGkFvhW+NK6HwZn2x3WJ0n3fYSFnS9q9WFZxXvzyC0
+n/AI/+nw7bFv22fSPEzqY6zhDouFzctoHq9/fDoHj8aId9A8yGz++cnYr6Oy
+tHgbzF3MbsiDPX/d/8al4/PPHt2C+vo1Pws20vFn92qmon5bQUE2Awvfe0+t
+h/na58q1YN7ynPcR6De9YkPOIK3P8uFMFvIY7W0/VEb7m5MXkwm3mVlVHqR5
+y7bL/4aZZad2mMJ8nwBHE+R5S/D8ZO9MXP/b5yEbLrLxL0qHuS8VR8Yxn7dU
+YO4EswZ1r6bDnrHRlyRh4UGV29LwvZho60odrJuZbGqLelK/ZJjFwKTu9hQP
+Wr/u+hXr6Lh1y0/a39ScjiZ9mK+6480y9B8vKmyVgbnH9R+oIq/QQ+Ll3/Fc
+z0jcl/k0Affvfz4HD7Lo31Nrm1qC8wpb4PUNJs432YfHOUTpn8dHJHA9T+zh
+lQtjHGIU0moxAxbkqatOGOWQ1LTwEkvqvQqH749wiLjlx0p3Wo9kntaLnxzi
+Kh73O+rf+fenb4ZHn0YN5FB/7TRfBrO6HbWf0H4s3rRHw/VbRsx66PVVsnp6
+WI+psJz6m85/uGTLlF8cUlMs0yc7k96/vbcw2F9cpdBRAeallNjT+pyyjtqL
+w0zOXa4C6q+1KPcaoP0nrt6yHP1xNX2vP6V2jT3/FW6ablSYRfcrDvnjLPJg
+xdeG+tD9dikPa0xkiFF2cbwxtcL3o4dgloR5+QfkI3DQ9i2GfzzrX5FB89ov
+110KG7zxCnOieep4WiXCwamiV2Kw8FzxqDGcHCddGYT3Ip7cu+a/sB9bv6qi
+F+9BfKl9F7pRj+2hxhFfLXre5bq/Uf+SliINcZjYNQZ8R381a3+NF+C9iBQ0
+tFYiD6bc/3IAzBj5Tg5GfuyX38XtqP2mjWl/55CAOwWqlrDgu2nhy2EO8c7e
++mg5zJt+OfnuEIcIS1xltlFPVAppFHHIbd2wj4l0/ZOcXI/PHOLSV3yrhnpf
++MSaPpy37k41RdTDu1m9pq+XQ7hCj00u1B/cr7b0oJ51flFZ1B+9IhPh+KxF
+eR+o88qjJDFf6Gesqkv7P5NaZ/YRdh4PcaLenHlJrB/ruW5g+cDk4Jk/12N/
+3oJqXZoXc94gMBz18bw2h+3Qpt+nhHeiQQ4puv5Z24peXy5Z7v2FQwTpzXJj
+9D0zJ1HYgH5TXfpWXKX5Gfm2qH3D+pl2tVbUxo8L9ZFP6laZowLaf+ykFhHc
+s2FEfxHNj7u9aucP1N/fNpSJ9xzmqzAjDK5vvsT/973ntEOaCSw9sljHH+85
+TIS9/WFc7/Qw0Ksd7zUkdVeWN/brKVtk7Eitsar9B+qpOfvfmgY8ZwvcGR1z
+1MvuuTO0E+Y56mgtQT9cg8BMRZiYJVxQRP9stsOHOjx3k3C/sGDkF5qQ8vIy
+tVVy8JO3ON/29SdSYN5ehbtLhRySI3ND6jwdd+AX9bTiPHP+Xn+TWs2obG49
+h/D/EEvpop7Y/0n6Hw7uH0WzNOh+PSMXbhTh+7jvTpU7taBH9/Ve7Ge9Q5Dz
+73jqg8X8CsLN95/zhVrdlK1zpYIsKe+VN6f9OSWa+l+sILYrdK/to+a11M0K
+RD5VkVcvUxtUPp1SgPP2aV1eSe3ckX5SgDyPaxx6Qm2rZjvrCc5j3rP55dSG
+3LNOz3H/8Tq+/Dw1f7Hh/Bf4/ZK8leRK3XfCp6sT66XcFJOhvpZ+VLwb/ba/
+ieXT+iLyatnIpyfV+aMetV1QdeM75DMpuiad5mVfUf70PfIN3egmQ/MIdFig
+9IFDRMWymwLwHkM47SUJGK8/syirBc/RvAH9GAtc3/ZcfuEf1I7k0qw3HKJ+
+Y83TW3hu5tW55W1E/m2STJMZTJTW+9WiXp6qilINnpvJkFV7VwPyLCg+7ket
+NV9hcyXWb2kKMaSmP8n3//9/mCnM/wDXOWeR
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.475611817684063, 14.487402206687182}, \
+{1, -1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000004547`, 17.}, {15.000000000005002`, 16.5}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.370645165272702, 17.438748347272984}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt1Q0w1GkcB/A/l07e2jSTFeVlcZsor8XdLU+lyVZeptkxpkPrJcnFbUk5
+UdsRerlo9WK5w7o6rpSXlKWutnQh0UpqM9h1SatSKkrluO9zczuzu/OZ3/P8
+/r/f79ln1ibqhw2bdRmG2Yw3/WYM6ccSwvz34hCxvI39yh0W/v520oNDGLM9
+ujwRLG+9YxAJt7TqrLwIk4DE8J/guOYK/c8wV5BffAr7nbmBcauXEmZUnThZ
+gvjcgpsWebBKWudWhHhlkm+PCtYfyPz5IOIhsT5yExfCVGu5Q99zCDFMS3jp
+DOfcUkhXwcXGbVw+rG3jp5piveeLL+Wb4IleWWOPLSFh5c7s7XDFvOiHxbaE
+6c5xYdJh/69luyLhllhWdAYstqwT2GP9k9WxokyYDAZZjtgQsq8rVCKGlfHu
+gVfg7DCTrSkwk3vBTmJDFL4RHU3bYC+dJXuS4DHOwoIIuEWlahDaEKZp0vtD
+ICyUWN3eiHhVeoSuLxz66OlEJLyVRPUvhUtf1c7fhfyDJtxyW1gjM409if23
+rZKi2bSeNKO8G1jf11v2cQ7tJ1vwcBxxWUenPYvuV0tNXW2JYr/Vre1z4eAA
+q/si2D58aoklzDUoEtWiv5i9q5McYf2mZZ7v0L9HywUzH9qfZLvIhUMUocZr
+G0PoPJ4XSbdgvjHOgptJdJ7n/og/ifMZ622KPU7zj3I/NmLeQ73ay/XUfuva
+urA++c210730eWS+Vo14PjeDpeuKeuPt/+7H/osLjLod4Akjj14l7JAZ/oAP
+c8Oasy9j/Z/1L7+Ih+Ub0xccQ9xj7+yULFhrXhEUhfxuEWaJxXR9deVyJ9Rr
+LTkrqIFH8977vEF/j3WmO6/R9alpM+rgksna5tsw8+ij727MI/mMuaAVFh5i
+n+YhLmBGlDSe0nlfMcuWiPda7bx3HXbx2/CsD/NVq9aYXoK95GLWVcx/efqn
+zHK41Cyq+Qyc6TjlWgDrX7Bj/2JDxPsOeC3PgTW1sswS+KbFjYYU2u/iu1NV
+8LX24Me0P5X7uuG7yH9P5+Vvm2h8hvdCnKfC8UmgQSitv/XqZwfUu6iysFsA
+W38aSxbCK/wvFYfQ+q4mOJegfqVJY3M4zOpzOqhB/Xx5026af+KoZ5cN5tP1
+jidNg8nU2hAhPL6ysyefzo91bo8U1ixW11bB7MHUZ3cw/zVlcZvvwf5jlZK3
+8JV3C4ze0rjQb8DEjijW1/mWznPD76OdqVsI8zmDet/CLfLqnTZwqoM9OxJW
+tpVZmtkR5q8P1ZcyYf3E1x4M4nOj3NvPwKrIU8o+nKc1Z/bWJjjOUC6uwfN2
+Fw819MIVkyGr0uFKV7HVG9i/Y38C7jsz58TppYw78hXUHptJ6/98rnEWzAqS
+RLdiPq0OOe3GNO4SVHgU8xn28KwxgjVDd++HwouzTj2bCcsbxnc4Yl4K72H7
+f5Bfk7UlVw/xbYfH1o/C1Um/PniB8/CJEW0aoM/vydvZj/tp36/d1Un7mSo0
+pz4Zdr7+Bo1v+Ur9HOd7PNff7yJcOp0VPAP1BDQZupbDE+2jCYtw32JmL0sp
+pt7xYz3qUUhCvF9LYWJ+kJeHeqYfSniFsJZvcbkdHlAWdZfAoQfUJ0zQ/zBP
+9vosnf+Ig1MwXCNLyb4CszO2KXJxX7qqKsNofdoO92qcJ8kzJuMvYGuD94en
+MK9pPW2ZAfoXcTSui3A++ZoDh5xgxfNvnvrbEbFF55HzwfCoV0ZkGM6r329k
+LBl22b9OGwWXHjHmFVF3i/iIM9+tXR91HWZLHeh+hZtlRsAATFwfldP8evR/
+w+P//w878i+sw2/p
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.723883367797246, 8.115966322027525}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwt2HlcjOv7B/CnPe2brzaatDgqytRJ2XpKKp0OCamkpkiKKFmzNPYWlehk
+iWMUBwmpcCTTFCEVKdnimPZFEUmYyu9zef38wev9up/7uq/rc89SjEPX+YRJ
+MwyjL8Uw9C+jRH/pssyvP1osM0vt+CM+LCqKNPSBXXoehajpsQwnJs86DW79
+uenOWZi1NAsugiM1bmxw0mcZ3ryGF6Vw3f69H17B7Eh8cz5slb07Y50B6kek
+vz8An2g5KjcE5/fG7HSDV5h5um0zZJk+4Va7j5os0zmzoKcLtvF1PrYPls/5
+zW3OWJbxTkoeUYUt9JQ2JsOC7i2+KRroS8Fr322YHa/TrwiL7gxvaiBLOGdU
+1FnmcNjsWa9h3tj9V0ersczKlKp/q2DOhVbXqaosUxxhdzyP6lWP3R+nwjJe
+91zn8mn/uz2mHcos8zLD+Z4nre+QKO6BJw/9jNQgix5q+cB15sfqG9CvOOBF
+z2K4NaMm8zTMZC2SpMDF/gFj18Os9crQQThutNe6BTC/qNAsBecVn01ScIZF
+a8ODPdDPf8L1l2fDnCr3gxz02/3J0ncp1TuR3aWMedaHq6gn0nnuI+KfcJHb
+90/VsOD0JuEWzP8j3dXUHP1peA/3dcPNwtHiw2TJjOULkB9naOCAxjjk/URh
+/Xm4Vvvi3Sw42lveugu2lx19zsYI9Zv0Dmrjfgxtz9Q/gpl+nR2msIrDmP+4
+HJY5tGSRmgG8Y+hRyE6Y78yuG8T+zBpRSQWtv2b7iuG/0q63yhvj/vRmfgmH
+e6vqtFlYQ9n1uRRskOD0Zp0x5bvn3kH0q+fUNvUvmK9idlgVFg4VH7kKi7+N
+ldXGvJMn6D8XwkzsRT0V5JOz/EXwXZjz91UPTeS345W2Iq2LdMM/WiFfceCA
+Vj7VC9HZsAr5+87KM8mCeUaL31YpscwpuxCLXVRPP2PrMrj1Td28FbTfc9Nx
+Yzj1eupLN5g1Z3n6sEJx1WhL6mfAKc8dvlIhcdam9T+ddc/D/xuxjJKi+me/
+j7bDedKnZocNIg/RK09OJ9zSYZD9FWb3T5G5jf5OP/P6naH+tdzsc9C/qlGI
+UIf2x3fPycR8IuMvy+3IjSfdEjF/8BW5uiDKT+f2Pw7I59XNzJlHKD9dny9n
+YK/F4VG11H+Ab6UEjhna+EBnPJ6vFqm6IO8q50uhQXDf8NpdMfBX+48Gl2Ce
+k4z4ALztWunlb7DIoPv7HviaxKXS1QT5tEWXhcHDfWXWKXBfSeAfk2Erqeiq
+JzAnR1L+DudJ3NfdVzLFeX62Pjvg/hit0zNg7+TMESVY7d/tDitgXpvMD33M
+I9nS2c6HRY99JdqYd7mh6ubDsKBf1KaMPOY2+9gcp/X3Ly+qIq+KvJKnf8Ec
+27gqE3o/2ucmJtL629LeJcg/d7imcyPMX56/qmAUXv8qHbWBVM/FutcRlngP
+B7O0nmk5vV8RfWTJvRpP+/9y7BXD6o0fkuSpv7yXS2XwfG6i5c1ezCf+mH3c
+Dx5qf7LlNSyQOpTwBp7GXXL5McxXDlFIxPkVHeriKlg0zvl3X2V6H2k61lM+
+AfkPp6H/Db5x0W0wu0Ky0QrzLb8Sd18a57FGDTx6vx/UP8xYwuK1kzLo/X5S
+rLFmGfXzSn9bC+yn8KjtGOW5oNZiPvJkn//d3gj3TTOtOw5rjfhnmJrBrwdc
+HsMzkjjPo2FBdK0UfR7ISR9dLYRrve7mvIfXmN2WUzZHvSMK/9XBW4XBvEVw
+7WrHRAF9nny2WXoM1lCXOuYL55y30myAxcVmMn3oJ+xccq/iBNT/2uGsCben
+2N3hwpzmVzr6mOem7LfbC2BeGFOgg3n3GsqeCoNF0mY9ysijSpabuhZmLFbe
+VkJe2m9H2UfRfodJ9wyQZ9jg4bxQWHyhrMkDeRvZsuu8af1Nwq0TuC/dHzu8
+HcjdZ5bqwme2H11uCPM3f/9yXwHfM1JP20bQr0Bok3kRfltZaNYMMwtrNMvg
+kbqsiIewKMq8Xxn7MzpOPy+EeU9jU/fDpfGdfv/Qfq8/J1ri/Pjf41LPkNe+
+cfwMp5xadp3WedcViuvQb2NA16kblI+pdHI55rlQU3HmKa27DLTewLzZIlXB
+IJ1fPFBzVpWeuzkygeabNf7ILuRVV2B3LYTyUCuaNRt5DggUXHMov/4uuSa4
+UL28pxuunazYMBH3IZ9becr+N+w/PL3VE65cy4zdC/MVPin50P3H+Bs+JT+I
+KZsFG47yXGgwEXlZP8zRhC8vHjnKg8UnlZ4fQ/3LadMG/4YF07YWtdD3j3dT
+5TOYKVdnleFxmlMeMBbY3/ZgqS76r477qDUeZn3mqY3GfLfmtbs50PrZZdoq
+mN8jcO7m2bRe5xWmiHzC/RqmuMKMf89dHeS3JPfa5ulkYffM6cg7Ut2/wAIW
+9bwp24v7GVshc1abvLzg9jd5lrnHc1r0Df3wBuvLT8Kn45O+v6Z+FTYEboCT
+XN6L79C627/P+PC7/JRFOTSfS4RNGbyneNfuFFh0sGIqF/XPWl1dsZOenyh1
+4jE8IUvx0maqp9o9IQ39CNJ7L8TRfgNLk9XoVzYo0S2BnHf3bz/MI/f5yVcB
+1atK7vHCvPeSDhTco3VzVe2ZyIPhZn77TE456TYOeTmMP1RP8/GvbeO1w7OM
+PFsjLahf8byDyFcrQhJ9jeZ9q7xVEffRscNjyxDZ20R7MRyVseLBXEu4d0LQ
+Wlg3brHWUVjQNv+pDxxR+6dqM8wPGrCQgdVS5Pb/ZoXzJ4Ss2o368pe+bVsF
+8x9VnW3A+bkT+fYCmBcl1SQDJzg9XfKYnlcbc4Pu866UZs8nK/p+3f9VB/Np
+WD6PVZqE8/IqnVUwf7rzua4xMLvIKE2ePm9bLMr1Yf7E5CI15Nerx+3Qhnlx
+rh8nI1+l7NTLsrDoS8n6aNxHe33k/Q9W9P1oKNMoxzLHN2VZPYNZr4zTG+CO
+7AdqN8kJXNYZNstefPM4Pb/VMNcFrueax+6EBevlArfAG6/YbQmn9YVlR97B
+nKu2Nb60XlWwJpZeLwNc23k03/T7oyehH8tPrlrzKQ/rfwxl0e/qRd8jAshW
+PY8+wBel/e5HUz5cz/RmzDfH4LnjYZj5oLb9GeZ3HZcQKKR1+5+XbiEf11Un
+vL9Qff/5jw8gv9da76q4lI/RodTfke8uI0XzLZRH+7nhYviW2afIcpjR8+/S
+xP3srJwcrT4Z+2Vvcexhn28DPYHk9mXZZnBlr8+RC2SP5AIx9ldGHp/YB3Nm
+zXoZAY8oDmRPsUa9MR5lFfR946Rkv9qacrioJkF/q/SvRGfBfFGEshbs2fPa
+vQwWOKot0ME8/W1TTN7QfqtLy1Qwr/GDpJb3sLhblyOHPMSJc1v7YHbp/PhR
+yG9a3upBWuc/0ms2Qb4DSlsD/6P9ST4ly5D/8ImSgkpY5HbMvFQWP2/MWdZx
+lfrxleydBz9KMeQcIX/exmrAMdHncjbS89WhmfKwS1m0yB/mrTwYPwU2L1pY
+6Eznp9zMT4VvfK9Ntab1K/WFejivK2qGqRmdr+6gVw1P9b780YT6DzgnPIX+
+tExPKkwi50pP3If+w3+KNaieKOpbz2bMJ92VOZVH/cR1GNP7/YSC7aQkmk/F
+4/VC5KOn0WYppOcT2ZMTkF+ZluHPH5SfnXPDGzjo56oEIxvUL7owezXyv1+w
+b6YrzDNpWVANb3MKS42EOVGjgyXwD70Hfun0fDr384AKy9/62mrjzV92a8DP
+h3y+8rG7jTBfUDlmPp6/wB2YOkwebhosxHkLG3Pb9Kegfn5aYR/629RXPcoO
+Fq16MFsVHi/co+0Bc0I3ymqPYvnh7+bm+sJsk+2fKpj3knvJtWDaf2ziTxnk
+EbC5znM5LL4jUZGTZ/k3jsTUhdD+IkZaH3kqz4t8u5T2m3SmeMmy/DIpNa4P
++X2j3jkZ/D7z40zpHJj/T9FqC/iTp3rGVKov57y0SRrrg2ztb9Rf54uT1dIs
+f0FZfhb1L/bandMDc0ovjVGj/T/kTjrJsHwdo0YfWXr+msKuMphZeWLmiA3t
+X+m+BvcvXZJ1eghmxnVzHNCfzxYvdQbPM5cC6wzQv1Ds916RHLdKT1WB5b+6
+nek7hvrxfThWSpHlN7ftsbek880+d/bQ59W1CDtXOq9M410F7n/ZLd0yml/M
++5/dbiWWv1FHx2APLAhqXKKnzPIblTt9z1P94tOL9sIZ3t4RNbT/caOBEL7y
+7x3uF8pHVkN4F/fl5lqSrM9FPU3L5Ay4PzZ/gRMskjPW5+L5UZOCY0NggXvw
+VAHOO190fSgeZta/K25FP5FH5xufgNmxF9wVYD9XtzlXYf7nPYMa6D9Bt0um
+FObdSv+qjHn33dW2q6T6HtLaMnj9W7j1d9XQenzjHCnk5W9jvumXHVodNXGf
+QV+cQx+SJ39qmIG845tbIqkehz335CDuhxeZtrmQ6ikH/KGI+9SLKTx0juY5
+tCilSIrl5710fZZJ/VzMLc2AK9tWRyTQ+g//Jxfhh37VsduofyfN0M9S+P0u
+9It8DNU/ZNgWiXpjPm3XjyQ71hap4nwjy6D4cHJaaUA9Xk/G5b3PI8idmuIC
+3H/6mu7kX/tfRdhky7H8r4ubanZS/0MGiZmYd1wUJy2d1nd0f6SfJ/au8Np3
+kfKNnZAXivv/Y1yG1X3q11fujhnyDAwJqmmn/gQSd7p/04W2e5VsMa9k+w9H
++nzcnvSHDcwYPgzYifvZZKWpsMT21+8vsmkwt6AnbQett8yvicTzF3RiyrLJ
+S4LqteAWYem+Cpgvw1uXhPej8GZ5UyvMa4rVeEGfP/T/MHb///8xiuz/Aedf
+Llc=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.760300471822903, 2.1176044036804296}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwl1QtUzFkcB/C/0mOd2EnZHqbMUNGDGbvVlkf+yJZkjR4KPUYPPTY126LQ
+STSHSWKcTQqbKbKhx8ToscJUSrbSzDG2dHR2NpRITQ9pZ9F+7+7/nDm/87n3
+/7/3+7vzYkck+UXrUBSVgBep/18smpqYxrWQptRVjlZMeJZ90LVyOPhGl8AO
+1shf2wfBpWFbO63gder42xQsCp+kdeDiuMH0CjZNcQ2Cda8voCnDYeHeKGLH
+omdcWF8pnraF5dru8kvWNBVvzOp4j+fkc20rP1vRlM6rY8VPYbHD/dlB8A5x
+Lt0CS3JKom8yaeqK0faghzB9LmWhJZwqXJXdBfPcYvrz5iNHi2n2BKwuf/+J
+A0/+qHCZj/0Y9rsG31jSVLrYr8MLliZ667bBvjHrv9kPSww4Pkr46mKtYzGc
+EbmN9xFukdOXHxKvHPPzxnqNOWeH+0g/bWtSKuHYkhrDUTJ/SGLvgDwTx2sa
+R8j6HtL8Srj2WdJAL0yZZXm6op8Wlt2WO7BinFkgg+tdTftEMM+9J4uN83i+
+VprlDYsP1tnsg531i4w/kXN/GmpyDe65Eai9Rs7D21SnDp6oY9P+pN8+u/5i
+ODdpzFmLc1bPMFoQA6t0niQGwfwXgQJDmBnsN9KMKolrVmVjf54vK9wXlprs
+XDqFvNy143+NYFxTe0IZCEsOUE23YOniMoMK9OuUkrKmAM644Jk4C/bsiU6+
+RObP/Ba+F+eVOmdjZBOZTwvfMWFBU1NFYa4U1ucV/7T/DOyddunQFpjx5OUY
+D+Yt4Z8jfTGYZmoXmK7SrNZHXpbcepiGE6wjtSGwJu7nXQLi7rc1JbCUeZMj
+h/d+tt3wDJYf0aMdsH+7cLB1FM4w+KHzKtzqson9lty/b+mwE/IKb8ntmmBJ
+uIvxLdh72rbzAKzwsijnoN/2U/HLjMl+5q7KAri1vzsgB/nkGz/UDsKaQYvZ
+E+hPrDL1sUA13MNO90WVcBtTbFBnSrXVhbhPsPyI8Av49TyV4zj2YXHirR9h
+3Fx83skPFhyzCtgN5+r/GdqEnJLMuZH9GJcVX1i1GZauTIjgwa+/uycj5yio
+u9tZhnHmlKOyHuYLvtTTg50mtp64SrxwUBKBarM7plqKqh7Xe/PYnKaGhkOZ
+3eR5o0I3P5jR6FNqhufUN58mjpvRVP706N1YmMd9K6qB+ZXOV0geac8K3yI4
+KvmUDgs5uF0rLatgRveN2H2wdC3vzUs49fThrjuwgtcR74b1H0TYrh8i81mL
+vEpguUeQ3gz0qUiUnVqEHPLpr90nyf2bFS7X4QdRh7WPYEZJeSkH+7KSE4Rp
+sGRSP+Y6LEzrWcqA1RfSC41RzZdHrM/COGPTP3Wh8MW2zIZ3WId7se+5CG71
+iRv3JP1WhK47DT94Ev0xDzk0B88fTIJTl9f4DyG3INP2qAM5X2pkxWYz8vuk
+riJ9Rzk0fNvwFXIo80U0LGu7V/A9zO+t21pK1tVtMtHOQ35xfYUunBaWl9RC
+vGdgVgj2ERUW82UwdxutcwfrxobnpTbCdFNcsz2sSq/0eEfmG/yFUqxr6sGJ
+5aDKa9wHA1FpS/6yo6ia6pAya1Qb3u36XlQeFew1G1WcpSd1J3n9h9rZMPdk
+R2EOzPr18cB2uHbnH0VKWNGTQ1WR53pzVZ9h+f4lIhaqUc+C5i+Rk6uXHyGB
+Q3Iut1MwP0wcvxhVpq32UWCcOmGmXwb7Mjrvp8OSk6JGG/SrOstqngNr7C2H
+ReT7nZncJyQ5NjjYKuGZodmeA+hPUBnw+we4NqEveDWsPi7b9Td5v61GA06b
+oo+pzEcqmPmiXfrKBJ8X/yO+2XCG29FfvGH60PBJFuwcOnL4/lzMCzI2nic5
+x3JTefB/F/l8k/8rY/pfND5rUw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.834338870872151, 6.424344451651139}, \
+{-1, 0}], LineBox[{{7.9999999999976925`, 16.5}, {14.99999999999251, 16.5}}], 
+        PolygonBox[{{10.9, 16.5}, {12.1, 16.1}, {12.1, 16.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.5, 17.4452}, {0, -1}], 
+        LineBox[{{8., 16.50000000000231}, {8., 9.499999999998607}}], 
+        PolygonBox[{{8., 12.4}, {7.6, 13.6}, {8.4, 13.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.9452, 13.}, {-1, 0}], 
+        LineBox[{{15., 16.50000000000231}, {15., 9.499999999998607}}], 
+        PolygonBox[{{15., 13.6}, {14.6, 12.4}, {15.4, 12.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.9452, 13.}, {-1, 0}], 
+        LineBox[{{15.000000000001851`, 9.5}, {8.000000000002592, 9.5}}], 
+        PolygonBox[{{12.1, 9.5}, {10.9, 9.9}, {10.9, 9.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.5, 8.5548}, {0, 1}], 
+        {PointSize[0.04], PointBox[{6., 4.5}], PointBox[{8., 16.5}], 
+         PointBox[{15., 16.5}], PointBox[{15., 9.5}], PointBox[{8., 9.5}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T11", " ", "P1", " ", "N21"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdief/fjghgjhiij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdief/fjghgjhiij.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {44, 44}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwl1ws41NkbB/BfJdcSuiCXxi1CkiiFZroubUlCbmVKdBOjVLZUkxQraWxk
+bLWNJUQrXVZUNCLdtCmWITIKKRNDuiv/77t/z+M5z2fOOe953/d3fuNhtCHC
+M2QkwzAD+KWRkQ/jR5vDKBO0OEyRQ0z6dliybtF3R7LEp6xzEofR8c44mAhz
+U7kXt8NFU6fnD8CcRc0vVWD5mt0p4eMx1lTJyiZyGKmxwbqvcG3vgblJMGtn
++96UCXBrwY9dcIJ70CMbjFxJ+bR9NJ9g9KYGo+CchPs7RsbVYmMo4rIOybSe
+wrWdbaM+wtLn207pYZRkHBy9B3nK2Sreu+DoL11enXDtk/iRTbDtotVlLjrw
+AaUWDj7neueOOwAL4ppkObC4ab/zediWl+M9GqOryRPuVVrfcvI3H4xFG1Or
+LmAUfzYpS8OYoPrLo0SM8pBb1eUYWbarJH4YRS90L/yDkam7YKqHkRsRnliJ
+UTLXO7mO8gveV3eG1m9asTYB5i08NzuA1vdmKrBp/vrhXAZWvr++fQh5c0v/
+WSTA53lGiV+ryX2y6eqw1OFTVSbM978ccBCjSGraK8CosU074A36k3fIyTad
+Ps9+O84T5o/YM7MY5r3dtv02+s5fEs7rhQX5zjPmwPePmM+n87k67anleE6O
+Uk71f33pVzPxh0uUakyNqf71mdvHwjrNjQl/Ub3HP8qa8dwlz1U3LNZFHYYr
+pJWwjtb09HZY1NYz/z65YULlwcnY//hoSRec12ewS1cP/b7cX6WPeDxzix0X
+YLFg/Z1QWHJwwntLfeQ3ro4lhl2PNbRmwBoXk4UmyHdzHO/jAMxTYG85Bpfk
+pIy2N8DzGsz5ox8WeKu+D4CZrXfWeND9621+tpXmDZmxf8Ilkxd2rIfFSSue
+tcOOvg2xi2h+rzRFjfrYF6g6nuZjGBd9uDa0sLAe54lsE+WaNK8e73YcZmVF
+q8mw38Ppd9ZC2GPU5tkFsKv/6ZzPqMdDpyRgFc3rWc8rhjU8LgrakR8TV9J5
+EOa4/y4PgnlN8038YdaiF9ueot7Psmc5rrDo5xdJTrBwcaCdO1nW4pBN71ma
+KCoMri0v8teEPWaZfciCufl5pQma9FwlYwdhwfTeU+NgUXPtgD/yq83P2J+v
+gXFbxb1/YX77ZpW1sNzK8g4X9bKuim5Og0uOZft8ggUdBq2asIWfXUSqIdYP
+fg2fCPuOUcizmwIXx1rOonjVbSdqYJE/T7AZvr/nZJQNC+9NdLXiFQ3qk2NU
+BFw7SzJKDflElXfPzoUFdw8tDocVHqrp1dN6XWW1Btha+JL5ANu2XQp2pu+d
+6/1rVIzQPx/JttMwy63MTBP28HcVvoPlRUdGj4X5SqGfptP3zHFlox/Y7+G3
+MMwXlp48Y9wFi4evt22Bh1juRvdgLnt1CBe2r3sTn0XnJy/zpH7L2ww/76f8
++nYt+Yb4qYmaVn6waFTXlD/huIr62jmw/KedvXaw7ZSVPH2at1p19zLyH1Oi
+6qYCM2fXnDCBozf5OjK03su17jj6ca1CKWsk5VOc8Uo2DufOLd+oSc6NLa9W
+x/sxcO2uNSzVNCu9Nhb9nu27x4vmP4wIqRiDPrj0p8fTeeVDHR/UOMzgJZuy
+KjovyZbvB5uqqo9WpX5oflnWr4r7dDbA2htm2bDf3oa9Jt26kEX2btt5F+5Q
+GXo0AHO7srYPw/XjnZrZxohf0vZ2M+Il1EbaJ8DiyqX3vsL2Px7veEBWWjJU
+gHyqDMNjR5ggnlbjmB3I1z7OrNwGFiU3xy5APaIlRiM9YG7T0B511OvYcrh0
+I82rvzJ5DPNWeXeGkf+Isp+L/ghjdulvgTmNO633wnlOKXH+FD+uy/s83NIQ
+XrUQlj5amHIdlhg7yE1gefWD7kK46i8hj4EFun25ibBIV7urGflyWqqCf4Yv
+NqWrFMP8GvXuTpwvye8+lgpLX8y5oQx7dWV8iKb6rTR9lZA/P/pGQgjMcjVP
+6kG9+oatZoEw8+RUoBj9EPIuOKyj+K+48Sno33Lj0cIw6k+CxcetKhwmW+Fc
+RjzFf/5qhq8yvh9m+ckLyfZmT4KVcJ+OlZW3k19uGZWuiPfDf/UfhtSPfl+T
+L6NxTpV/UTD1w13L+wQcU2t2rZA8IdcjEBY8HGX8ndarnmZzYUlPjNtyU1h/
+8IYQti+NisyA+Rp9rxnEl9Vd+dwOS41GXklRpL/vK3aZmCHfzD1TFiKfluz9
+TwNgacXFW0rIV6Hy6MZfYZHNgE4j3DHjiGIBzD81d2U26kvtnmcohjmXbVKD
+UT/v5ay8+7R/zORKFfTHouHd7Lu0Xv71ZRI8pmaErJji6WWd7YC5Nplbz9H6
+gqVZquhvzUWlKj7MVWr5QPfNevGjdWthVvJ9nWuw6I1t8xw6b22m8Ry6ny+f
+92qRd1oXxeN8YeQK937Ux2K7lBYgP0FtSey/MHdphFsB8vfNKqitoPpnarIE
+qFc5/INeCSx+cMMpBP3Q+KL5tJTs/81nNvonqzWtvwdz3DiB4xTw/M+t2v2S
+4vfGNH4bieet1R+pgvMZB8cwRTjmx5N3TuStPB/HERh1PeOjqZ7cxUNCBu/n
+vOENZdRvq2Np0+Eoh78XKk9FfEVZc/8wm6mqiRL5wIw0KPYjPMbk15rzsFRp
+hIsd1jsrZo59P5Xuo4FOBhzm7F/hZI75Q7WPLXDeGEnpvv3kBwGRErg7Tde0
+GBZvyRCeRX7dbbbqHTDHIkwSNorDTLiqrq5oQd/flivmob4E+0lH9WCuX47F
+V7jIe024KSwOn8XORD+sLWVeRjT/Wuu4GfoV99xnzXhYaqtReAAWJc2YOETn
+LS1ZkANvdqg40wpzj/LnCGHHuzGeN2DWGo9hT3h5+Kb6VHKx5ZlGxHftkTRH
+0H5VXeE0WF76Q9ud6ol+3eSOfBitPG07yr8jf91K5C8zf84ypP2H/JrtUZ+9
+6bnJE2AmqHuRKuqPM+DsmkjrzfOzi9HPOFUDXROaVwtv3/Sdzdz69XGAC8x/
+VR7E/sZm7v9mNBRMHvCL9vzCZhIcrMxOkW+q3br6ic0sXmYT/YzyO9g8ccdH
+NhMdNKyvjfoZm0od4Qc2o2+iLlkPcyoCD1nBE0TjzYos6H1x67eGi8zNvIdp
+XrHgdTq83LaqcPk07D/f/3ED4gXe35acBvOPH3Xg03mxk442wmJN1Y7Wz1jv
+snivhiXms4MXbPqK+M5mN+fDjNnN2NFDbKbDrlxnPXnqvVci1Fc1ZWL/blhc
+UnrHCPUPqpXP4dP+yiWtjrg/CrLtu/fD3ArnNeXwoNrx6giYk2/QqoP+Cbon
+VvnCrLS27wvoPs9eu3cezd87dMoBtlif97M2nSeJHDWA/dfu/l3fj3ylDw3s
+o2GOY+LjGsp/bwo7HedvNP3cnU/1Nbg7diC/+qbga8n/1b9xxmv037pvyS97
+Yc7Jpl1X0X9fRYkRj9ZfnPR2HfoxKLQzjqR4P64OMNTvpHehB2j9mfehlwfY
+jDBu/DIhxfsyGBkvZzMtYbLkctp/9d9vtu/YjO3Dpxvl5MIDm3vf4D781MOz
+pn5ct3UJec1mPEyCXvDIESu68jvZjPM7+6ibVJ/YbdqjDjajc6/jkooV5lVG
+CO/BLTu8X/nCjHX//nSsH4x46ZVD86YcVwvEi5vXE9RH/l4YvA7nSfaFps60
+hkP1jk6SsRnTd8N1W8nfLL3M+7CeHbItA+aoXc+d2c9m+JNTp96CmbD3ex+j
+vgTNOUHPyPMfxqwcZDO87aEKLWSFynmZ6EdSGu90E+0/oXa4EPdJppA5t4bm
+tfK9Q9E/LxePPX/D4urDl27CPKvGwHRa71lhlgML3dyWRdH8R89lxnDLWO3n
+7rT/SGf9TMQTq/VUT6N8M4OSn+N8L3eHCiWydsuw5XvYs9u3B/VyWl93z0D+
+y1u6mxqo/vMvFL+h/851Z2fWUL86XZxXox/1ht2NZP40yYx09HOC2qmyJpp3
++MvkXRvqdTVd8J58ojuN3QivWm2pS/kYz3b99A+byVtZfXEZ2dmuQFKB5xOS
+FHmUzFz22VEIRxrnPiRzXJ3n7cR96pyuPXE6LGp4/DX9NtNSKeMEkzVOBjhl
+3GY0DhruuUKmH0HZ//8ftuH8D75reiM=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {1.2371675279736856, 11.129988497564629}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwl2Hk8lNsfB/BT9jUqSxIjiUKmorLUPDcpkaj8SoVGyVVZo6iUsUuK0qJw
+G0oRWapLqZhcSb8oZEti0kaUIW0iv8+5P//M6/065znn+/0c83geOtv91++c
+SAiZNoEQ+klE4/jRZsgIPsLZDAm9uk1PgsWQTuna+s1wUVbI018Yv3IsdMtC
+mK2iOvIc9n61u10BFm5bvDEF7th+Q7LZhCH1subhlnDRuqGu0zB57zTlmRZD
+BD8Cjd1gJc29Z9bB3jfVjpjA7GrrlY9mMGSNRsSgPOzk+nLYFM4piTH8Ng/r
+v7J9fFGTIXw5DYc+WKC7Sk4BTpboHqIOiDz+IWI6Q5qSIs2/U39cu0gM7lGN
+fCRH13fbaXNGgyGenas79GF+aniOJVyvmrljNSzs3aH8cxrWe10j7wdzrScs
+eAYHWy3xTIEDai7klsPeFS8+l8Csks6xatg1NN2mha63yYz/Hv5xX489QOvX
+UBjXwPrC04fuj9N+63ZkceEbn/9rJIa8WO5O62/C1aFBAwTmO762UUS9PhrT
+Lg1iPi9hlYsPbBAQdITmyaiO/1EDV42l1F2HBYKDzzXRf+jLPb6H6Pit6nk7
+YfXM3GIO3d8mcywdLvIY/c8o8uAGFmUKYKfcxt03YdY/d13r4HSdPcv+hJ2U
+DP0f0HyPmVlrwMkF+w3p9clF/OGnxgwRPSgac4NZyVF342Cliude0jDvjPPz
+lbDATbY/g+Zf5TJfkc6XyxvRgftHO/26jHD+t7UqU9GvesqB0rswr22LhBSc
+PHX07iU6vmz4XSDyc+qvu3YODnBUy+tUZ0it7Qdjam5ZV+x6at4Jv0zq6DTX
+RjWGzDLO1/qbzh8/mLAdvj3uEFcP17dI35GEg0tL0gZhoXLMjQeqDEmU11dS
+RX3E8r31GThfb3uQJZyc3mYQSd3VsHobrT/pvFg8HO08Y044HTeR8ciGGfZ4
+YyrMt35Y0wrXts9few1mblxom479fjS4jhbTfN5q7valfjEpv4D61QPBI9hg
+n/iVi3CRdlS5HvrxOTL572ia3/syzUh4RVy4gTutT7z6SivsOj+p3giu7+gM
+0kE+PWEHv9J+mG0FM7bCntoLVhfCLBPTQR4c3XC0yQtOlnmvlgzfjs8QatB8
+WqxKY2F26p5XdYb4XOUk4QmveXV/ZSTMv5y2zgBeopAUbwEnGyZMaMb+VZO1
+3/6Yi3PxGOT5wAYDrzdWwPxZs/WH0E+NJDc6CS5SaFPeDScr/r60m9rT6Xsb
+8vF0CQlaN5een/KQNcwa4c9bAQtTtWyLVBgi79GQuBxOnuDO1oVPq8hU2cMB
+6rmpmVNRp+udk+50/3qJARM4/2W17QG63pCfqGEKcmOM3p6n/m0fngDn7/Wd
+UQ7zPu2M2grbXnwd84aut+9ekw2cM1SWKYX+WHmzF6yGSdpFMQPa/6/ZKzzh
+Fccy/1xOx2c8zzsN95/YVesM18fNndEK19gfOepG85lfGqWPetqGCz22woR0
+m0TAPkxHsgP1DTG5LjinKbBpIcwoiJ5Z0n4vOPspUlvG2ZyC4+9NnNlJ+4uo
+DH0FO3VOM7pM651S+kUdeY3uuWC6HRY5Gg4w8FSvCCsNmLw5G7YeTn4UHfd0
+DhxXdsUeHr7dGxkBBxR6xhnC99QSr5nBrLqAdUNYX0nB2veTAfbpO7k2E75X
+0KycB7PZExosYJ/9+RkBMItfOK0S9d/T2VzOgZM3a5hawvGyAyXTYF7VhsfX
+kMfbE7/Wjetj/iezfhVYPrusTQQz5r+FEZPx/fTpnfQZFvg97P6izBBN0WaL
+bzCb794bAAvtDHWksR6/e+beMSV8P8PtdGbS/YcV12bAVtnZS5fD9Q9cQzbA
+OU9XmnnRekP9RTpwz0Nu+jFqi4jrMjBRW/y9EFYykk2QhWs9S5rrYcHOjXa6
+cFtkwuc+mJiY566DBcdjlozDwsM2gadgA6llE2SQF7stiP8aNhX1jEvB9e9z
+T1ugXlbOXzt+YX7AHjNOKqy+wKejm9b39rfrV1h+Tu1f5XT/XLHiNei/rYzr
+kQSLCo4vO0/zKJP6z0Y6/0MmrwUOjuarqdB+G63SCfITbVfNqqP5xM87NhWO
+L9i/IJLa585SJdjpp8RCM5i36XDxEK6Pl96l3Tsb57OwaPQunP9WbhcfFinr
+O/jCoa0/t7rBvMMWL6XhJg9niZkwt1et4STqTV8VoynSQ/9Dp/Tl4ej9c0Q1
+sNPA2IEw9K+pe3TTdZir/DH72SSGXG5YlptB57+41nNFEflb7is9D/MWXjQ/
+qoA+at418GF+mFUaT54h0hYRdcXUaY16Z+Xo75mv8hOYpXAkq0EW9Vc8zPmo
+R58LrpqawzURbi6KqI+Ja1JpkEH+WgmlC2HifssrDeYl9dq5wIKRCLVUePji
+t4sHaD9zi3uqYGdLC+8zdPxXT9QMrOdyue9ULjVZmJ8Gk8lvdtyCWbNWRy1G
+PemSwlhqppe8/kDrC3XQovO5STJ3slC/S3dX7Uk63yMlwQ39mYZk3fGjeQ5L
+NSugf83NK08wMD+4MjEXTgyq9pem9fJLEvSRFyukePARzUfJeCgcdnl3RTyC
+9r98Tnw+3LP3sdAMZqSv/8iB+yVVP/XMQr35LZJB1EuLL6fDRL8yWxYumuF8
+aAPMj1D/GYj9DE7KVk6CGY1VS6+jPvm6vcef62J+7J+plai/Ri/9Lz7MM33b
+fAf9+ZTEOobC3AONk9KRh5NQM3orzMhWrw5CfvxWB74d9eKoCXbS2M+hNMqG
+Xh+7s2yuFP4ecBWP2VPfTYjXlsT9YXjxOXo9K6mJP18C9yeXB9OC6fUqGUPe
+4vh9YubNTqHza48/eyLGkFvhW+NK6HwZn2x3WJ0n3fYSFnS9q9WFZxXvzyC0
+n/AI/+nw7bFv22fSPEzqY6zhDouFzctoHq9/fDoHj8aId9A8yGz++cnYr6Oy
+tHgbzF3MbsiDPX/d/8al4/PPHt2C+vo1Pws20vFn92qmon5bQUE2Awvfe0+t
+h/na58q1YN7ynPcR6De9YkPOIK3P8uFMFvIY7W0/VEb7m5MXkwm3mVlVHqR5
+y7bL/4aZZad2mMJ8nwBHE+R5S/D8ZO9MXP/b5yEbLrLxL0qHuS8VR8Yxn7dU
+YO4EswZ1r6bDnrHRlyRh4UGV29LwvZho60odrJuZbGqLelK/ZJjFwKTu9hQP
+Wr/u+hXr6Lh1y0/a39ScjiZ9mK+6480y9B8vKmyVgbnH9R+oIq/QQ+Ll3/Fc
+z0jcl/k0Affvfz4HD7Lo31Nrm1qC8wpb4PUNJs432YfHOUTpn8dHJHA9T+zh
+lQtjHGIU0moxAxbkqatOGOWQ1LTwEkvqvQqH749wiLjlx0p3Wo9kntaLnxzi
+Kh73O+rf+fenb4ZHn0YN5FB/7TRfBrO6HbWf0H4s3rRHw/VbRsx66PVVsnp6
+WI+psJz6m85/uGTLlF8cUlMs0yc7k96/vbcw2F9cpdBRAeallNjT+pyyjtqL
+w0zOXa4C6q+1KPcaoP0nrt6yHP1xNX2vP6V2jT3/FW6ablSYRfcrDvnjLPJg
+xdeG+tD9dikPa0xkiFF2cbwxtcL3o4dgloR5+QfkI3DQ9i2GfzzrX5FB89ov
+110KG7zxCnOieep4WiXCwamiV2Kw8FzxqDGcHCddGYT3Ip7cu+a/sB9bv6qi
+F+9BfKl9F7pRj+2hxhFfLXre5bq/Uf+SliINcZjYNQZ8R381a3+NF+C9iBQ0
+tFYiD6bc/3IAzBj5Tg5GfuyX38XtqP2mjWl/55CAOwWqlrDgu2nhy2EO8c7e
++mg5zJt+OfnuEIcIS1xltlFPVAppFHHIbd2wj4l0/ZOcXI/PHOLSV3yrhnpf
++MSaPpy37k41RdTDu1m9pq+XQ7hCj00u1B/cr7b0oJ51flFZ1B+9IhPh+KxF
+eR+o88qjJDFf6Gesqkv7P5NaZ/YRdh4PcaLenHlJrB/ruW5g+cDk4Jk/12N/
+3oJqXZoXc94gMBz18bw2h+3Qpt+nhHeiQQ4puv5Z24peXy5Z7v2FQwTpzXJj
+9D0zJ1HYgH5TXfpWXKX5Gfm2qH3D+pl2tVbUxo8L9ZFP6laZowLaf+ykFhHc
+s2FEfxHNj7u9aucP1N/fNpSJ9xzmqzAjDK5vvsT/973ntEOaCSw9sljHH+85
+TIS9/WFc7/Qw0Ksd7zUkdVeWN/brKVtk7Eitsar9B+qpOfvfmgY8ZwvcGR1z
+1MvuuTO0E+Y56mgtQT9cg8BMRZiYJVxQRP9stsOHOjx3k3C/sGDkF5qQ8vIy
+tVVy8JO3ON/29SdSYN5ehbtLhRySI3ND6jwdd+AX9bTiPHP+Xn+TWs2obG49
+h/D/EEvpop7Y/0n6Hw7uH0WzNOh+PSMXbhTh+7jvTpU7taBH9/Ve7Ge9Q5Dz
+73jqg8X8CsLN95/zhVrdlK1zpYIsKe+VN6f9OSWa+l+sILYrdK/to+a11M0K
+RD5VkVcvUxtUPp1SgPP2aV1eSe3ckX5SgDyPaxx6Qm2rZjvrCc5j3rP55dSG
+3LNOz3H/8Tq+/Dw1f7Hh/Bf4/ZK8leRK3XfCp6sT66XcFJOhvpZ+VLwb/ba/
+ieXT+iLyatnIpyfV+aMetV1QdeM75DMpuiad5mVfUf70PfIN3egmQ/MIdFig
+9IFDRMWymwLwHkM47SUJGK8/syirBc/RvAH9GAtc3/ZcfuEf1I7k0qw3HKJ+
+Y83TW3hu5tW55W1E/m2STJMZTJTW+9WiXp6qilINnpvJkFV7VwPyLCg+7ket
+NV9hcyXWb2kKMaSmP8n3//9/mCnM/wDXOWeR
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.475611817684063, 14.487402206687182}, \
+{1, -1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000004547`, 17.}, {15.000000000005002`, 16.5}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.370645165272702, 17.438748347272984}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt1Q0w1GkcB/A/l07e2jSTFeVlcZsor8XdLU+lyVZeptkxpkPrJcnFbUk5
+UdsRerlo9WK5w7o6rpSXlKWutnQh0UpqM9h1SatSKkrluO9zczuzu/OZ3/P8
+/r/f79ln1ibqhw2bdRmG2Yw3/WYM6ccSwvz34hCxvI39yh0W/v520oNDGLM9
+ujwRLG+9YxAJt7TqrLwIk4DE8J/guOYK/c8wV5BffAr7nbmBcauXEmZUnThZ
+gvjcgpsWebBKWudWhHhlkm+PCtYfyPz5IOIhsT5yExfCVGu5Q99zCDFMS3jp
+DOfcUkhXwcXGbVw+rG3jp5piveeLL+Wb4IleWWOPLSFh5c7s7XDFvOiHxbaE
+6c5xYdJh/69luyLhllhWdAYstqwT2GP9k9WxokyYDAZZjtgQsq8rVCKGlfHu
+gVfg7DCTrSkwk3vBTmJDFL4RHU3bYC+dJXuS4DHOwoIIuEWlahDaEKZp0vtD
+ICyUWN3eiHhVeoSuLxz66OlEJLyVRPUvhUtf1c7fhfyDJtxyW1gjM409if23
+rZKi2bSeNKO8G1jf11v2cQ7tJ1vwcBxxWUenPYvuV0tNXW2JYr/Vre1z4eAA
+q/si2D58aoklzDUoEtWiv5i9q5McYf2mZZ7v0L9HywUzH9qfZLvIhUMUocZr
+G0PoPJ4XSbdgvjHOgptJdJ7n/og/ifMZ622KPU7zj3I/NmLeQ73ay/XUfuva
+urA++c210730eWS+Vo14PjeDpeuKeuPt/+7H/osLjLod4Akjj14l7JAZ/oAP
+c8Oasy9j/Z/1L7+Ih+Ub0xccQ9xj7+yULFhrXhEUhfxuEWaJxXR9deVyJ9Rr
+LTkrqIFH8977vEF/j3WmO6/R9alpM+rgksna5tsw8+ij727MI/mMuaAVFh5i
+n+YhLmBGlDSe0nlfMcuWiPda7bx3HXbx2/CsD/NVq9aYXoK95GLWVcx/efqn
+zHK41Cyq+Qyc6TjlWgDrX7Bj/2JDxPsOeC3PgTW1sswS+KbFjYYU2u/iu1NV
+8LX24Me0P5X7uuG7yH9P5+Vvm2h8hvdCnKfC8UmgQSitv/XqZwfUu6iysFsA
+W38aSxbCK/wvFYfQ+q4mOJegfqVJY3M4zOpzOqhB/Xx5026af+KoZ5cN5tP1
+jidNg8nU2hAhPL6ysyefzo91bo8U1ixW11bB7MHUZ3cw/zVlcZvvwf5jlZK3
+8JV3C4ze0rjQb8DEjijW1/mWznPD76OdqVsI8zmDet/CLfLqnTZwqoM9OxJW
+tpVZmtkR5q8P1ZcyYf3E1x4M4nOj3NvPwKrIU8o+nKc1Z/bWJjjOUC6uwfN2
+Fw819MIVkyGr0uFKV7HVG9i/Y38C7jsz58TppYw78hXUHptJ6/98rnEWzAqS
+RLdiPq0OOe3GNO4SVHgU8xn28KwxgjVDd++HwouzTj2bCcsbxnc4Yl4K72H7
+f5Bfk7UlVw/xbYfH1o/C1Um/PniB8/CJEW0aoM/vydvZj/tp36/d1Un7mSo0
+pz4Zdr7+Bo1v+Ur9HOd7PNff7yJcOp0VPAP1BDQZupbDE+2jCYtw32JmL0sp
+pt7xYz3qUUhCvF9LYWJ+kJeHeqYfSniFsJZvcbkdHlAWdZfAoQfUJ0zQ/zBP
+9vosnf+Ig1MwXCNLyb4CszO2KXJxX7qqKsNofdoO92qcJ8kzJuMvYGuD94en
+MK9pPW2ZAfoXcTSui3A++ZoDh5xgxfNvnvrbEbFF55HzwfCoV0ZkGM6r329k
+LBl22b9OGwWXHjHmFVF3i/iIM9+tXR91HWZLHeh+hZtlRsAATFwfldP8evR/
+w+P//w878i+sw2/p
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.723883367797246, 8.115966322027525}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwt2HlcjOv7B/CnPe2brzaatDgqytRJ2XpKKp0OCamkpkiKKFmzNPYWlehk
+iWMUBwmpcCTTFCEVKdnimPZFEUmYyu9zef38wev9up/7uq/rc89SjEPX+YRJ
+MwyjL8Uw9C+jRH/pssyvP1osM0vt+CM+LCqKNPSBXXoehajpsQwnJs86DW79
+uenOWZi1NAsugiM1bmxw0mcZ3ryGF6Vw3f69H17B7Eh8cz5slb07Y50B6kek
+vz8An2g5KjcE5/fG7HSDV5h5um0zZJk+4Va7j5os0zmzoKcLtvF1PrYPls/5
+zW3OWJbxTkoeUYUt9JQ2JsOC7i2+KRroS8Fr322YHa/TrwiL7gxvaiBLOGdU
+1FnmcNjsWa9h3tj9V0ersczKlKp/q2DOhVbXqaosUxxhdzyP6lWP3R+nwjJe
+91zn8mn/uz2mHcos8zLD+Z4nre+QKO6BJw/9jNQgix5q+cB15sfqG9CvOOBF
+z2K4NaMm8zTMZC2SpMDF/gFj18Os9crQQThutNe6BTC/qNAsBecVn01ScIZF
+a8ODPdDPf8L1l2fDnCr3gxz02/3J0ncp1TuR3aWMedaHq6gn0nnuI+KfcJHb
+90/VsOD0JuEWzP8j3dXUHP1peA/3dcPNwtHiw2TJjOULkB9naOCAxjjk/URh
+/Xm4Vvvi3Sw42lveugu2lx19zsYI9Zv0Dmrjfgxtz9Q/gpl+nR2msIrDmP+4
+HJY5tGSRmgG8Y+hRyE6Y78yuG8T+zBpRSQWtv2b7iuG/0q63yhvj/vRmfgmH
+e6vqtFlYQ9n1uRRskOD0Zp0x5bvn3kH0q+fUNvUvmK9idlgVFg4VH7kKi7+N
+ldXGvJMn6D8XwkzsRT0V5JOz/EXwXZjz91UPTeS345W2Iq2LdMM/WiFfceCA
+Vj7VC9HZsAr5+87KM8mCeUaL31YpscwpuxCLXVRPP2PrMrj1Td28FbTfc9Nx
+Yzj1eupLN5g1Z3n6sEJx1WhL6mfAKc8dvlIhcdam9T+ddc/D/xuxjJKi+me/
+j7bDedKnZocNIg/RK09OJ9zSYZD9FWb3T5G5jf5OP/P6naH+tdzsc9C/qlGI
+UIf2x3fPycR8IuMvy+3IjSfdEjF/8BW5uiDKT+f2Pw7I59XNzJlHKD9dny9n
+YK/F4VG11H+Ab6UEjhna+EBnPJ6vFqm6IO8q50uhQXDf8NpdMfBX+48Gl2Ce
+k4z4ALztWunlb7DIoPv7HviaxKXS1QT5tEWXhcHDfWXWKXBfSeAfk2Erqeiq
+JzAnR1L+DudJ3NfdVzLFeX62Pjvg/hit0zNg7+TMESVY7d/tDitgXpvMD33M
+I9nS2c6HRY99JdqYd7mh6ubDsKBf1KaMPOY2+9gcp/X3Ly+qIq+KvJKnf8Ec
+27gqE3o/2ucmJtL629LeJcg/d7imcyPMX56/qmAUXv8qHbWBVM/FutcRlngP
+B7O0nmk5vV8RfWTJvRpP+/9y7BXD6o0fkuSpv7yXS2XwfG6i5c1ezCf+mH3c
+Dx5qf7LlNSyQOpTwBp7GXXL5McxXDlFIxPkVHeriKlg0zvl3X2V6H2k61lM+
+AfkPp6H/Db5x0W0wu0Ky0QrzLb8Sd18a57FGDTx6vx/UP8xYwuK1kzLo/X5S
+rLFmGfXzSn9bC+yn8KjtGOW5oNZiPvJkn//d3gj3TTOtOw5rjfhnmJrBrwdc
+HsMzkjjPo2FBdK0UfR7ISR9dLYRrve7mvIfXmN2WUzZHvSMK/9XBW4XBvEVw
+7WrHRAF9nny2WXoM1lCXOuYL55y30myAxcVmMn3oJ+xccq/iBNT/2uGsCben
+2N3hwpzmVzr6mOem7LfbC2BeGFOgg3n3GsqeCoNF0mY9ysijSpabuhZmLFbe
+VkJe2m9H2UfRfodJ9wyQZ9jg4bxQWHyhrMkDeRvZsuu8af1Nwq0TuC/dHzu8
+HcjdZ5bqwme2H11uCPM3f/9yXwHfM1JP20bQr0Bok3kRfltZaNYMMwtrNMvg
+kbqsiIewKMq8Xxn7MzpOPy+EeU9jU/fDpfGdfv/Qfq8/J1ri/Pjf41LPkNe+
+cfwMp5xadp3WedcViuvQb2NA16kblI+pdHI55rlQU3HmKa27DLTewLzZIlXB
+IJ1fPFBzVpWeuzkygeabNf7ILuRVV2B3LYTyUCuaNRt5DggUXHMov/4uuSa4
+UL28pxuunazYMBH3IZ9becr+N+w/PL3VE65cy4zdC/MVPin50P3H+Bs+JT+I
+KZsFG47yXGgwEXlZP8zRhC8vHjnKg8UnlZ4fQ/3LadMG/4YF07YWtdD3j3dT
+5TOYKVdnleFxmlMeMBbY3/ZgqS76r477qDUeZn3mqY3GfLfmtbs50PrZZdoq
+mN8jcO7m2bRe5xWmiHzC/RqmuMKMf89dHeS3JPfa5ulkYffM6cg7Ut2/wAIW
+9bwp24v7GVshc1abvLzg9jd5lrnHc1r0Df3wBuvLT8Kn45O+v6Z+FTYEboCT
+XN6L79C627/P+PC7/JRFOTSfS4RNGbyneNfuFFh0sGIqF/XPWl1dsZOenyh1
+4jE8IUvx0maqp9o9IQ39CNJ7L8TRfgNLk9XoVzYo0S2BnHf3bz/MI/f5yVcB
+1atK7vHCvPeSDhTco3VzVe2ZyIPhZn77TE456TYOeTmMP1RP8/GvbeO1w7OM
+PFsjLahf8byDyFcrQhJ9jeZ9q7xVEffRscNjyxDZ20R7MRyVseLBXEu4d0LQ
+Wlg3brHWUVjQNv+pDxxR+6dqM8wPGrCQgdVS5Pb/ZoXzJ4Ss2o368pe+bVsF
+8x9VnW3A+bkT+fYCmBcl1SQDJzg9XfKYnlcbc4Pu866UZs8nK/p+3f9VB/Np
+WD6PVZqE8/IqnVUwf7rzua4xMLvIKE2ePm9bLMr1Yf7E5CI15Nerx+3Qhnlx
+rh8nI1+l7NTLsrDoS8n6aNxHe33k/Q9W9P1oKNMoxzLHN2VZPYNZr4zTG+CO
+7AdqN8kJXNYZNstefPM4Pb/VMNcFrueax+6EBevlArfAG6/YbQmn9YVlR97B
+nKu2Nb60XlWwJpZeLwNc23k03/T7oyehH8tPrlrzKQ/rfwxl0e/qRd8jAshW
+PY8+wBel/e5HUz5cz/RmzDfH4LnjYZj5oLb9GeZ3HZcQKKR1+5+XbiEf11Un
+vL9Qff/5jw8gv9da76q4lI/RodTfke8uI0XzLZRH+7nhYviW2afIcpjR8+/S
+xP3srJwcrT4Z+2Vvcexhn28DPYHk9mXZZnBlr8+RC2SP5AIx9ldGHp/YB3Nm
+zXoZAY8oDmRPsUa9MR5lFfR946Rkv9qacrioJkF/q/SvRGfBfFGEshbs2fPa
+vQwWOKot0ME8/W1TTN7QfqtLy1Qwr/GDpJb3sLhblyOHPMSJc1v7YHbp/PhR
+yG9a3upBWuc/0ms2Qb4DSlsD/6P9ST4ly5D/8ImSgkpY5HbMvFQWP2/MWdZx
+lfrxleydBz9KMeQcIX/exmrAMdHncjbS89WhmfKwS1m0yB/mrTwYPwU2L1pY
+6Eznp9zMT4VvfK9Ntab1K/WFejivK2qGqRmdr+6gVw1P9b780YT6DzgnPIX+
+tExPKkwi50pP3If+w3+KNaieKOpbz2bMJ92VOZVH/cR1GNP7/YSC7aQkmk/F
+4/VC5KOn0WYppOcT2ZMTkF+ZluHPH5SfnXPDGzjo56oEIxvUL7owezXyv1+w
+b6YrzDNpWVANb3MKS42EOVGjgyXwD70Hfun0fDr384AKy9/62mrjzV92a8DP
+h3y+8rG7jTBfUDlmPp6/wB2YOkwebhosxHkLG3Pb9Kegfn5aYR/629RXPcoO
+Fq16MFsVHi/co+0Bc0I3ymqPYvnh7+bm+sJsk+2fKpj3knvJtWDaf2ziTxnk
+EbC5znM5LL4jUZGTZ/k3jsTUhdD+IkZaH3kqz4t8u5T2m3SmeMmy/DIpNa4P
++X2j3jkZ/D7z40zpHJj/T9FqC/iTp3rGVKov57y0SRrrg2ztb9Rf54uT1dIs
+f0FZfhb1L/bandMDc0ovjVGj/T/kTjrJsHwdo0YfWXr+msKuMphZeWLmiA3t
+X+m+BvcvXZJ1eghmxnVzHNCfzxYvdQbPM5cC6wzQv1Ds916RHLdKT1WB5b+6
+nek7hvrxfThWSpHlN7ftsbek880+d/bQ59W1CDtXOq9M410F7n/ZLd0yml/M
++5/dbiWWv1FHx2APLAhqXKKnzPIblTt9z1P94tOL9sIZ3t4RNbT/caOBEL7y
+7x3uF8pHVkN4F/fl5lqSrM9FPU3L5Ay4PzZ/gRMskjPW5+L5UZOCY0NggXvw
+VAHOO190fSgeZta/K25FP5FH5xufgNmxF9wVYD9XtzlXYf7nPYMa6D9Bt0um
+FObdSv+qjHn33dW2q6T6HtLaMnj9W7j1d9XQenzjHCnk5W9jvumXHVodNXGf
+QV+cQx+SJ39qmIG845tbIqkehz335CDuhxeZtrmQ6ikH/KGI+9SLKTx0juY5
+tCilSIrl5710fZZJ/VzMLc2AK9tWRyTQ+g//Jxfhh37VsduofyfN0M9S+P0u
+9It8DNU/ZNgWiXpjPm3XjyQ71hap4nwjy6D4cHJaaUA9Xk/G5b3PI8idmuIC
+3H/6mu7kX/tfRdhky7H8r4ubanZS/0MGiZmYd1wUJy2d1nd0f6SfJ/au8Np3
+kfKNnZAXivv/Y1yG1X3q11fujhnyDAwJqmmn/gQSd7p/04W2e5VsMa9k+w9H
++nzcnvSHDcwYPgzYifvZZKWpsMT21+8vsmkwt6AnbQett8yvicTzF3RiyrLJ
+S4LqteAWYem+Cpgvw1uXhPej8GZ5UyvMa4rVeEGfP/T/MHb///8xiuz/Aedf
+Llc=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           
+           9.996694214876033]& ], {12.760300471822903, 2.1176044036804296}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwl1QtUzFkcB/C/0mOd2EnZHqbMUNGDGbvVlkf+yJZkjR4KPUYPPTY126LQ
+STSHSWKcTQqbKbKhx8ToscJUSrbSzDG2dHR2NpRITQ9pZ9F+7+7/nDm/87n3
+/7/3+7vzYkck+UXrUBSVgBep/18smpqYxrWQptRVjlZMeJZ90LVyOPhGl8AO
+1shf2wfBpWFbO63gder42xQsCp+kdeDiuMH0CjZNcQ2Cda8voCnDYeHeKGLH
+omdcWF8pnraF5dru8kvWNBVvzOp4j+fkc20rP1vRlM6rY8VPYbHD/dlB8A5x
+Lt0CS3JKom8yaeqK0faghzB9LmWhJZwqXJXdBfPcYvrz5iNHi2n2BKwuf/+J
+A0/+qHCZj/0Y9rsG31jSVLrYr8MLliZ667bBvjHrv9kPSww4Pkr46mKtYzGc
+EbmN9xFukdOXHxKvHPPzxnqNOWeH+0g/bWtSKuHYkhrDUTJ/SGLvgDwTx2sa
+R8j6HtL8Srj2WdJAL0yZZXm6op8Wlt2WO7BinFkgg+tdTftEMM+9J4uN83i+
+VprlDYsP1tnsg531i4w/kXN/GmpyDe65Eai9Rs7D21SnDp6oY9P+pN8+u/5i
+ODdpzFmLc1bPMFoQA6t0niQGwfwXgQJDmBnsN9KMKolrVmVjf54vK9wXlprs
+XDqFvNy143+NYFxTe0IZCEsOUE23YOniMoMK9OuUkrKmAM644Jk4C/bsiU6+
+RObP/Ba+F+eVOmdjZBOZTwvfMWFBU1NFYa4U1ucV/7T/DOyddunQFpjx5OUY
+D+Yt4Z8jfTGYZmoXmK7SrNZHXpbcepiGE6wjtSGwJu7nXQLi7rc1JbCUeZMj
+h/d+tt3wDJYf0aMdsH+7cLB1FM4w+KHzKtzqson9lty/b+mwE/IKb8ntmmBJ
+uIvxLdh72rbzAKzwsijnoN/2U/HLjMl+5q7KAri1vzsgB/nkGz/UDsKaQYvZ
+E+hPrDL1sUA13MNO90WVcBtTbFBnSrXVhbhPsPyI8Av49TyV4zj2YXHirR9h
+3Fx83skPFhyzCtgN5+r/GdqEnJLMuZH9GJcVX1i1GZauTIjgwa+/uycj5yio
+u9tZhnHmlKOyHuYLvtTTg50mtp64SrxwUBKBarM7plqKqh7Xe/PYnKaGhkOZ
+3eR5o0I3P5jR6FNqhufUN58mjpvRVP706N1YmMd9K6qB+ZXOV0geac8K3yI4
+KvmUDgs5uF0rLatgRveN2H2wdC3vzUs49fThrjuwgtcR74b1H0TYrh8i81mL
+vEpguUeQ3gz0qUiUnVqEHPLpr90nyf2bFS7X4QdRh7WPYEZJeSkH+7KSE4Rp
+sGRSP+Y6LEzrWcqA1RfSC41RzZdHrM/COGPTP3Wh8MW2zIZ3WId7se+5CG71
+iRv3JP1WhK47DT94Ev0xDzk0B88fTIJTl9f4DyG3INP2qAM5X2pkxWYz8vuk
+riJ9Rzk0fNvwFXIo80U0LGu7V/A9zO+t21pK1tVtMtHOQ35xfYUunBaWl9RC
+vGdgVgj2ERUW82UwdxutcwfrxobnpTbCdFNcsz2sSq/0eEfmG/yFUqxr6sGJ
+5aDKa9wHA1FpS/6yo6ia6pAya1Qb3u36XlQeFew1G1WcpSd1J3n9h9rZMPdk
+R2EOzPr18cB2uHbnH0VKWNGTQ1WR53pzVZ9h+f4lIhaqUc+C5i+Rk6uXHyGB
+Q3Iut1MwP0wcvxhVpq32UWCcOmGmXwb7Mjrvp8OSk6JGG/SrOstqngNr7C2H
+ReT7nZncJyQ5NjjYKuGZodmeA+hPUBnw+we4NqEveDWsPi7b9Td5v61GA06b
+oo+pzEcqmPmiXfrKBJ8X/yO+2XCG29FfvGH60PBJFuwcOnL4/lzMCzI2nic5
+x3JTefB/F/l8k/8rY/pfND5rUw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.834338870872151, 6.424344451651139}, \
+{-1, 0}], LineBox[{{7.9999999999976925`, 16.5}, {14.99999999999251, 16.5}}], 
+        PolygonBox[{{12.1, 16.5}, {10.9, 16.1}, {10.9, 16.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.5, 17.4452}, {0, -1}], 
+        LineBox[{{8., 16.50000000000231}, {8., 9.499999999998607}}], 
+        PolygonBox[{{8., 13.6}, {7.6, 12.4}, {8.4, 12.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.9452, 13.}, {-1, 0}], 
+        LineBox[{{15., 16.50000000000231}, {15., 9.499999999998607}}], 
+        PolygonBox[{{15., 12.4}, {14.6, 13.6}, {15.4, 13.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.9452, 13.}, {-1, 0}], 
+        LineBox[{{15.000000000001851`, 9.5}, {8.000000000002592, 9.5}}], 
+        PolygonBox[{{10.9, 9.5}, {12.1, 9.9}, {12.1, 9.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.5, 8.5548}, {0, 1}], 
+        {PointSize[0.04], PointBox[{6., 4.5}], PointBox[{8., 16.5}], 
+         PointBox[{15., 16.5}], PointBox[{15., 9.5}], PointBox[{8., 9.5}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T11", " ", "P2", " ", "N22"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdief/fjghgjhiij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdief/fjghgjhiij.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {0, 22}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwd0gk0lesaB/A3SSqHcrJudffp7JAhlE6JBn2foiRDhtiU2irLvicdNCBT
+u2XIKV3DkUxlE6HSRKUu2SSXqOQ6G2U6XZwGzbioy/0/d69l7fXzvN/zPs9/
+f4v2BLj4KjHGMvBH36x3Eh8NnqkRFvFMdqG/SqHOsyuOtZL5MCuNLKj+jmdu
+uQEJHCy1/ZzfqMYzkb3HiSCqN6aYTczimbVdfV8J1Ue6u8RwbX/n9c+w2Ny9
+bXQmz8q/SpIstdH/0ZEn9fDhg21dp8i/jVQ3w5LBtIbnsPRYp5I69dOOj9DX
+4Zm80n17ONz64p9rAmBhbpfpHNyva70k9hos6woX1MHzkh6bD8DizDbtRMyb
+Xe2QP0cXfukvEmOfVGXPi6aw7HDCARPsO6RVfGMD2Urb5g08qnanfTM8OyKu
+1mY2z4zb2hp5mF8ekhkN98U1NS+FtzVI4i/BSU0mpd/Dver9J+/AQ+uDrn7C
+/R8fdL8ogq03nHFphNkqiWoUXN5Qve8CzWfy04g5+ZJ3ZQTtoy68cQP3S4PN
+F3vRvqnqRvWYV2Tjv2I9LN0rsajAPu2jJSZG5AXMOx37vrpwYFCb+tlEW0mQ
+T5EDV6tHPn1b1wJ5ZksSjpjDvb1Sm7kzeNas462znZ4v/WSvqsoz++fFzsfo
+fpeAqoXTeVYWu+VtGd1v/u9wsQrmL17pNETzO2g4tU6Dl4ftW4t95a68LApe
+l/Kp9ATlN+611gcuUwmIU5CtO9aEw33x01UWL6Z86zQb4OyrTeJAmN+/vMIa
+/a/fcn97CxY/UJ7sh1PPHbH6QnW7MkUe5pFMPbpXTw/POw0NBmBetYCiJw7k
+yDRdK+wz2iRPlMD8+z9NZmLfBO0zjsHkh8E/VMGmJ61dQmDpa9UJN+TTx7VE
++sPsY717DRyTt8XGAxbqczmTsEDwJWs19VecypqOfG1zDnVq6dHvEZbdhnpS
+xfjl95hPqrVbFgDHN/R01MHCTEPXFrqfX2OZS/tq3HynTO+7y4IUKe3T2jCs
+jnmFvrNEfmRl7Zdj2E9NFlbqQf26/S82Y38WE+rqSu7baJKDvALt/uK9g/q3
+rK0LUsb/zfd6U369j4WJblPxnhrkbkiB5arJPS5KmD9Kz1tO9Ysa94OnYD5X
+ud8Y3ee2yreewXM2nl1L+zYPdDvAulejr8dQPn7b7s2E580v0WmhfITF8slJ
+jrXn5Rkt0kf/WJ94I9RTY95/+IV8Yavjr3BEcnZhOSyMny/RxH2qX7b/4yss
+5peNVcIr9QT9ZgaoX+uMOo75UusW2vvCYjuBszPmjznrkRUPyyxFyxdhv3LP
+9jk5sPQ3cW8fHMFNTSii86d8y5KQR8xxy9gCOn+uQX8B8pKnT9c8S/2HRzxD
+YYv4By1RMP9YIyIfFmk19uwiT7XVzYTbpQ3XVsO9foPRHnQ+KGVsDj0viI7s
+Qn+3DwMpb2ifn0cylsHp4/cd6mBZumOXK+apOCb/vVCf3p9ZkS6YvzPqZGIy
+7XujINwM+1ko+YbHkoO/mqhi/16dSgGZ/87QpwR5mjZl+NF5+YPzF73+y7Gk
+ysGyS1TP/2ma6VeO1R91ut9M/T0bft44xrHsBHGuEuZjHbceF/6HY0Ur0t+s
+p31+DLL2H+HYaJlGYTTl1VlrnzXMsVf+PhFPqB65cesamK+LeCgwRL3ZbMsW
+WJqmVrofZvcNhmrgovSXB8qpfkbYk41+c4U1q9kSzOftolSP++pv96TxsPSp
+9aHlmMfib+HiEJh3OWH/YJxjIuMf/8yjeujAXd9vHLvuzk+rgdnEJgGb4Fj+
+xGaTVqqfX2Yehv1rO90DO8gOj67swvvzbf3ByBY6//eOu89htz26GXJY1uip
+Yoj87BtGThfAvU+XxG2ERWExadGwcPbxQj24YofpBm+aNyY96hme3+f7eLsZ
+LO4ab7aBVVXKi9WpHnJ+UgP3C49NqgxiX/meo/mWyD8+Y8u0Zpjf222th/yb
+xZpvK6iu2P+ye5Rj6X80JZdRPoPPHkUhn3Vn1jhRXuxrSNjCIeRzQKO/nuqV
+skDFJ44x98shA+SFj1QiPnDMwGRHwmzaV1EV3foW5wdXaWyifesO9XW8wn1m
+28WxVP/ri4DCAfxeUTf9mqh+eV+HYz/HWp+1XZ1nhHq7QNLWxzHjZJVjfjDL
+iz5niXrSihCl2+RfvMSH8HzRwe/9phjDrTuLxegvtFKaspm84Hxx3xuOyVx2
+7Y8hFwbtbHuH+y/GFdyB5YFPy2M/cmynZ55RjzH93ivWGXzmWOhroxnjVH/n
+l37vC8dsPXP7ppvgeYnPF128P6LQR1NnwNKEH7ydkU+El4/tBPXfynUa4/3p
+nbtp8Wty4m73Irh1uDqhEeavDNvehUdXlrYX0n0Lley8YP9fa0ukdJ65251C
+v20ls1+IqK6wT3PGfayg0nwFzdPyIfUO5onJXSnVpH41WbZNyL9svWzlGOVx
+IGqpDfJPCt4a9pqs/emhDPuHZomm9JNrbL49R372Ms2Pg5TvfiuNxX+gfkjR
++v/87u0e3tXBMXGgVY4OeYeRg9Mz5PdkVOZMlggGFbV4H6pZ2kly/ty830uR
+v6FlWRNZevpfHcnIV+FdrUV5yU9kvkqsYhZHDZfuJZu+Ppx9porJ0trNbpLp
+k1TJlOl7Kf8/bdOG9w==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {1.2847296091079567, 11.54244899022028}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwt1gtYjNsaB/BVOjWJjEJF2UNRkdOgzUSaqXQTutmU0BSFUkbqlESzky4k
+41pOZCREYlLtomQSUXZMJrq4jVISatKhEO3/8px5np55fq3vW+t933m/tb4p
+gVu9glQJIWX4o99kcBif33jk18eYRwRXGeQezGFHupZO5ZFM4dFDUTBr/9qe
+7XCX89CJ0XBZ/+tUDtxMLmsdnswj+hP0fTRg0tt3Wx1mGflMapuC65lvVgmM
+eITXYK1RB0vU9ryVG2J8/sJrt2Bid+npPFhqXa5dDbtEXziUPQn3eZ0MldPx
+ilg3JjyYlRzXC7Nb79wSTUR8KWGbx2M9XqPLN2PYY3DfG3u6flbO9HoDHlHG
+vneMglk1ESHpcIo6K/8iLGbcfrAJ5nlcNXhB87GqN1kDu0Tk5oxC/i7Sumkb
+YenaI3t/hzlTj25IhvOmbfP8A9bvi95xnc5vU6YSAisGn5t+peOjd02IgPOq
+GkR2iCem0vv8FphVNSvsACysnr3ZFzazPLi0Cb6fVFvOgfnLnZ4aID+FMSdL
+Cy4rNNX0gDdVcE7IafytbtFRsMf4kNrDsLTwU2wSvb52b54bLPumEyiEpbmS
+nwQebE9LD4B5C5wqS1Av6Y7dqeawS1++Ygss9H7MaKHxLH1kb07H99zt3AZ3
++Q0kfGRh3su1WgO0Xgf/fF3OonV64LaF5us/PO04nLd2J+epPuLU/pK6C5ZG
+VnZbwz67bC9FwMrpD++e1EMcn4rio+CUmvZ5ajDHPdV/L50/ISwyagLyLuGN
+OAMTiZz7eTziEXRm1MBiq5LLyTCD0SLvp+sF8pSWsMhyos50xCta/2GBchyu
+N2/bthpmLfHLroVZwUODB+h4QRapgPN+eJXepJ4aYFQDS3JIdyc8mGJyrAMW
+xToZ/urX8GhNPcwvPvx8sSHtZzHHcSXMd+G+NIElmXXh2XR9edPgb/R50Pps
+1w0rIkydRtN+OndruRXyERoIDD9ifoG3z4JomKN6NUIKNyt//iyAWYYGT1Jo
+PLu/mzbC0uM5Xi4w8+1j9U7YrDZsgwpclmX7SgEPhjrJ/kL+/OAWjWpYzEtN
+DoXvb/n2Yz8sUR2ROBUWpshCbWg9H8ldbuK59FgTyXpK4z82d5wjLExw/+YH
+KyN9+hV4LqXXWu80IH9icS/+KGzmsFTLBhbn+nICYd69FW2ndTF+ctt6N7hs
+Z0S+Ksy8XDnsTp/rYknjZh3MU7XsTjjM15NntI7F/31fW56DmzX6y31hMurZ
++d7J9HeMWfOeibg+eGS7Ip7BTN2yw7DsptvjAlgwVnOkFxzT52WvRfupLn3r
+DLjrU73CFjbbt7d1EqxUhMnDaT16jXWmwSLu6xWZdHzjgSoH2KxN+qEMFiw7
+fyQS5miPOvCQ9q9zy+oimNhfudQES47323+H71t0u8tpv2nWjHRGvJkOD02r
+aD+GPLM/BIsCZyTQ/hT81ye9EY5xa3Kn/SyII+1ayL+ZH6dH49M/5393Dszs
+u1bzne6LWz13O8Ks5mee4TBvcJ2zHa3XLttVLaiHLK0j1AT2eBlbak/r9S56
+bQ+tX8/zYAn2SY5+0o3TMN/beboZtey70wJYFp1gexX75CbTWU1SxC91NLFb
+Ameaj/73fJqfs+rjITzn4uWJYocxuJ5xY2ctzOYHnNTShl1WHSqk+0ay2piG
+UbA0YXIJLDT5/CRbC/EUful8TPcRXavQ+JGoUyk3ioH5lRrmm+I0cd0RA44X
+LAkYrZvNwPdbRkE+3cfvzxzq1sD6f1sdH4N4yfj0qxthZckQJwb2aK/cPQEW
+aPrnvIL5f5oEDagjruDhj1zkL8pfxGBgnFkQl3YEZltXyB3ofDaP9j6BhS9n
+sXPp/dEZxSr0HOo438DC+tIZJwbG0X5X3pkoYdD+HL+KnkuytWEHnRGvKNjZ
+sJvO59br+VyT9k9nSz6sZJbkrkd+ihLvoBUwMYkNkcPKsUXSTsQns9M6PZXW
+4zBjIJjGP7v3tissOPX5fQvyVTT1WTnAYvG6KY6weOL6KC1YufBK1BXUT6bS
+4X6Gznel5sUkmLm08d2/YP6ZDqMj2Gd5mtnFNohHMPtBogEsqshd7Ib4hXGr
+Lxdhn2XfOK1tjXwVF/Lsg2DJN5H2GNSLdI18yaau3bGmSQ1xVbNf6tFz7LOs
+6OQI3Pex3G8i7OHg179ZFfO2GZjOh0l2QJarCuo1ruBpKCxy9PZwJJjf72R7
+MT3nLvg+qvvJJUpPpXw0jW9AVTPgB5eIFmoI6LlAgg+JVg5xieyegrTS8Rfc
++ZLvXEICfI/a0X4LMjEOh4Wzpi/Oof0VFlW/H5ZY2cd9gcnZDA7B/WzNxEXW
+tH5+4X6VsEecnW8w7Z91PRUlWI/30fpsLB2vK+LIEY+we7teJMxvu95HEC+/
+cMknT9p/Bt6qx2FpQ9r1cbBwTvuoyciPZ8edV0n7ffL+9+kwy8Xd3xNmPfmc
+9goWOM2e9xjxs0tO8Rmoj9JMJ8MRlqoaF46AFRef/JSgHsyMnV31uJ5td8yV
+1lP56sGNIBX6fBVsSdan70ldv/+N9YlBluVPnGuypNvFarAk/EfnHpiYV4Sb
+0/ibe6yMYLElz14D+QqLrzXU031/zMyq4q+od76rfybd1+NEmk4DqHcWWbKb
+nhMrePtk/8N47bbSeHq9Y7NqyCcuYWZXJ2bBCnU9oamSSwQt1isewTztyVWc
+D/h9LKIv6mE94ZS21mtdqG+wka4AlopDTZo7uIT1V6u/HOa9+hJT3o779UKe
+L0Q+QlO9puA23G+ck3EWlialvmt9DUcFXVSj/fNt5bA2xkWnpu3wpf02//T2
+PpitcpWcouPxc4Wb3sBnWIwH1PXsbd6dmD94sY+COsNxZhriUR7pVbTCQvf/
+fOrqxvj9Mw30PYrozF1j+xHjOovO7qL9+G7fHwG96C/79TpmdPx6/uGjyFeS
+Wz6ygsaXYHWR08clYj/9xEUw339P/gGY9WiidyHN726pegpM1NN6DWn9w2YG
+smBmuv7cJFrffZwBb8zHz4nV7ce5SL42b3DtwfgPb7/N9D3kjaX1nPdwKSOo
+B+ei1PeEQcxbzP+hsTWJvnesbl7GQf2YOfrx86ijXYosXiD//duHh3+dm2Mv
+RsqRn0Vt4xvqr/EWNtWI/2b+7A7d/79ni28SJX3v1uX9A3iCJcM=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.4677856382145418, 5.536752147784559}, \
+{-1, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000004547`, 17.}, {15.000000000005002`, 16.5}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.370645165272702, 17.438748347272984}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt1Q0w1GkcB/A/l07e2jSTFeVlcZsor8XdLU+lyVZeptkxpkPrJcnFbUk5
+UdsRerlo9WK5w7o6rpSXlKWutnQh0UpqM9h1SatSKkrluO9zczuzu/OZ3/P8
+/r/f79ln1ibqhw2bdRmG2Yw3/WYM6ccSwvz34hCxvI39yh0W/v520oNDGLM9
+ujwRLG+9YxAJt7TqrLwIk4DE8J/guOYK/c8wV5BffAr7nbmBcauXEmZUnThZ
+gvjcgpsWebBKWudWhHhlkm+PCtYfyPz5IOIhsT5yExfCVGu5Q99zCDFMS3jp
+DOfcUkhXwcXGbVw+rG3jp5piveeLL+Wb4IleWWOPLSFh5c7s7XDFvOiHxbaE
+6c5xYdJh/69luyLhllhWdAYstqwT2GP9k9WxokyYDAZZjtgQsq8rVCKGlfHu
+gVfg7DCTrSkwk3vBTmJDFL4RHU3bYC+dJXuS4DHOwoIIuEWlahDaEKZp0vtD
+ICyUWN3eiHhVeoSuLxz66OlEJLyVRPUvhUtf1c7fhfyDJtxyW1gjM409if23
+rZKi2bSeNKO8G1jf11v2cQ7tJ1vwcBxxWUenPYvuV0tNXW2JYr/Vre1z4eAA
+q/si2D58aoklzDUoEtWiv5i9q5McYf2mZZ7v0L9HywUzH9qfZLvIhUMUocZr
+G0PoPJ4XSbdgvjHOgptJdJ7n/og/ifMZ622KPU7zj3I/NmLeQ73ay/XUfuva
+urA++c210730eWS+Vo14PjeDpeuKeuPt/+7H/osLjLod4Akjj14l7JAZ/oAP
+c8Oasy9j/Z/1L7+Ih+Ub0xccQ9xj7+yULFhrXhEUhfxuEWaJxXR9deVyJ9Rr
+LTkrqIFH8977vEF/j3WmO6/R9alpM+rgksna5tsw8+ij727MI/mMuaAVFh5i
+n+YhLmBGlDSe0nlfMcuWiPda7bx3HXbx2/CsD/NVq9aYXoK95GLWVcx/efqn
+zHK41Cyq+Qyc6TjlWgDrX7Bj/2JDxPsOeC3PgTW1sswS+KbFjYYU2u/iu1NV
+8LX24Me0P5X7uuG7yH9P5+Vvm2h8hvdCnKfC8UmgQSitv/XqZwfUu6iysFsA
+W38aSxbCK/wvFYfQ+q4mOJegfqVJY3M4zOpzOqhB/Xx5026af+KoZ5cN5tP1
+jidNg8nU2hAhPL6ysyefzo91bo8U1ixW11bB7MHUZ3cw/zVlcZvvwf5jlZK3
+8JV3C4ze0rjQb8DEjijW1/mWznPD76OdqVsI8zmDet/CLfLqnTZwqoM9OxJW
+tpVZmtkR5q8P1ZcyYf3E1x4M4nOj3NvPwKrIU8o+nKc1Z/bWJjjOUC6uwfN2
+Fw819MIVkyGr0uFKV7HVG9i/Y38C7jsz58TppYw78hXUHptJ6/98rnEWzAqS
+RLdiPq0OOe3GNO4SVHgU8xn28KwxgjVDd++HwouzTj2bCcsbxnc4Yl4K72H7
+f5Bfk7UlVw/xbYfH1o/C1Um/PniB8/CJEW0aoM/vydvZj/tp36/d1Un7mSo0
+pz4Zdr7+Bo1v+Ur9HOd7PNff7yJcOp0VPAP1BDQZupbDE+2jCYtw32JmL0sp
+pt7xYz3qUUhCvF9LYWJ+kJeHeqYfSniFsJZvcbkdHlAWdZfAoQfUJ0zQ/zBP
+9vosnf+Ig1MwXCNLyb4CszO2KXJxX7qqKsNofdoO92qcJ8kzJuMvYGuD94en
+MK9pPW2ZAfoXcTSui3A++ZoDh5xgxfNvnvrbEbFF55HzwfCoV0ZkGM6r329k
+LBl22b9OGwWXHjHmFVF3i/iIM9+tXR91HWZLHeh+hZtlRsAATFwfldP8evR/
+w+P//w878i+sw2/p
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.723883367797246, 8.115966322027525}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwl2Hk8VO37B/CxJEmMQtYaPUKKhihLMpWQEGVvMSqVqJSILEnWkpB2RfaE
+hkramFRSlmhV4REqa1GeGlr8Ptf35x+vt/s+931dn3PmzDnUNu1e4y3MYDDW
+CjEY9Pv/f5gchmAcPywOQ2X2iE0K3MFr6VVU4zBE9+85qC3DYYir7v2kCfMH
+pvTUwA4NmuNasJ/PiiteUzmM4IygRhXYNkpe+AfsXxcQLQIvfvxs58FpGDe5
+2t2G9XNkr/aNkmXOmhXDXGMF1U2yHAbPr849AJZd4r3/Blyh2u6rD9vOznP5
+BvMPru5/O5PDSHeRlFOQw/5vJ7itgrnx+jKaZKkrvMoZqPfK18ss8sFNe41h
+xvFu3Ykwb7y1hq+K3//trWnDetwhExt32O/zcpsCeChZ640YzF86qOxLXhW2
+rl6Fw4hsu/hdG84ULLl5BXZIEr4ygPqH2pPzc+H6ihyxG7BDh1vlLbgjdFVk
+PMx0Ut72CS6oOS3rC/sbVwu0sP68fA15Lsx7mfQiHLZYM1d8B8z53ZXQAe+L
+0Ig6ArOtZky1Rf0jXqOq1bT++pXjt+Ei9xl7mKiHZWpQqYn+50k4yeyDmxiG
+LxNhJ/W4nD7YIeqtykc4bZf1L3/0zxX6LCSPPLv7cg1E5DmMlt6Frbrwb6mX
+vemwIGh9kSksWnfH03g61jf5GE8u8DG/+wJW0NBTovlnDNoXb1PgMNzYdhen
+wQ+nr/b7CkdW+NfT+VERLnfarojjf28+G0TnZ9SsqBHmVgzbCcFMWbWxmUro
+39CeG0H9TAwv84AjZTQ7vqH/3223rSLI5/PMtsAsuRr2UZjVbCzZgjzTbjZ0
+RcGMrU8frIV7dOsebYP9Y+cfblVGXtMSpM1oXOvI6yCYtdnjshiNh8pFa8DW
+M5THa1FPsusVry9Ux38+jfFUb/A7gyaYs2LVsA2cGfXfxXp4fd0xTVmy4i+5
+LqprseuHHvTLbc7rk8F6HaV6Uxqo/7db17nAFuF1/Q/IBl7XiuDuAY/+Z+Ss
+ufuYqLe7emniNziT4RUfBts6qTvMw/rMCe/D+lXo86V/PQwe2ihZ6Yr+ox0/
+Leyk/LJqX9+BDeK+bqe8eFo3i6civ8Vj6eKdSnQ93q10hSucD2kEYt+mVa/t
+4uD4b1WO0li3qVM95SKczpV8StdxZr1z03l4yzTtGyuwbpM1I5jOR3xYinML
+fU62qrGsYNbd5+ae+M2T8ov5ib9XKKxPfA1H1lUEpsI5cgEipjivHa17eMqw
+ZJD/0iMwI8zz7mnso9KS11z9v/Gr1yfDjLGHS7rpOpgZIh1O5yPw1/SvcObN
+xdxhyje2qI/Gm66wFHfBiVcH2bU03/6SnQA5OAxnGqbT+N6dIWkwYx/36xby
+lCE7S9jiVPsLDdi/tzKeCTsJl+Z+Qr3JE6tfjiB3weCdJZdh/vldN7/D6c5n
+3AOov7s9RyQx32DpuvUrqe9XdjFmtH6IrOZ82L/nVf1heLuZXo8mja/tPf0e
+rt1SLDCE2UbVrhzUG52Te98D5k673V8Ed4TvKzpFNhd+r4x+ed8kZ/TCnHaz
+1Dg4593jcAfK565VVh8sLuxm9RTm+Xj9Maf7R/uxE3PwOYvco8Q+DHP7a47T
+fZL/eNcJHrzFR+E9H2YUfw58BAfH/pkqjfsuM++rMR9mfo95ug52uCeyPROW
+35+XmwNzpf+7tpWug6K6gM9wx57xEVl4l8Nh61mzsN5uKZkS1JOqppGyFuZY
+KbUawroqSRoHaPyZ5CAP/eUEy3ichCPbp+1Qh0ss2X9y4MzD+Y0nkY+268XN
+l2FmX1OxBLymNtUzG3YY3R4Qj/wLlOOM0mB/eRlNWVjcpzE9HOa1py0ow33n
+79L8JC86vkfPcCvMy75gt4zWbx1p0ocLy0zNqF4Hsf9OKcK/WRpPRcjT7w0p
+wa1Vz+170R9ncr7KQrhSSXL0Jczb4LnQBy755FtaCyf3zbcthTt//DuhBo5k
+/hMpQZ/zJXMVGmn+jiML/OG/hZopHyi/+HGTNviMndtZBvV/9KSCLfqTOjPz
+jTbVW1tkfBP+rVKy15Py2skzVEQ+Fb3hMy/A7Ce/JHbCm9SGtDupfw9j1xJ4
+IHf78Xn/YDyXH/8WfjfInHwAbrpUIzYAC/+71LgWZnSft++GCyKCimXVsd9w
+iWg1XPTutNQGOFL1hCAG/ha9Sy8D5p9tV9aHx+Kk9d7CQ0WWfk8U6fOqFz1p
+Nn1/DTWvhmuUQ6Tmw/7l+74/QX9hPWPzVsKM3HAhM1jdfMs9V7L5urAS5DVk
+FDZzHdxRJvPjH1h7UT/bCWaPZb/IwvdKolbIcgtaP9edyYYVqthSOjCv5MqE
+JnwvBS2VPseEky1Wm8TCW7KV5g6jvkzrGBNn+h7/9q9GM/Xz3S90CcyZEzJa
+RuMa6TbL4KefV46dUaf7wo2nnvCs7FzHGDj5+uw/abDKqbiOEJofm9LSDkfs
+3Dk3mPLaM9HXGPUcCFq28hAdr+stlgm3Bii/OQnzusUCp6AfwQK74Rtwk5qf
+QRgc9WGu/geYMd382ie4NvBQuTzq57eIJFshnyO7EzSdYW5T8auzcHCj0NNz
+lNeUPQvewvqSBSkfqd9iDx1h5N39ydJogQY9ZyQunwr3RDu6HoKTbbZIicNR
+af1RDTCre6V9F44vfKXjLaeJ3LMjvuTAZRUBLS6wQ+/9MXu45WjC+HGYO8Mq
+vhv1KV0o9Kgie/5Npev9Zcmmli6Y6X2zqRP9Jh9N+/Ab9l+gEOYML3abwZXQ
+ghn3FB8jryHx5ipJmL9JwcQMvruZ1ysKDy1/ZnIPzxn7/EqNR3A8h+coYQs7
+yfnuboV5K92GBvHc4vLZ+xztHzlQviEP1oruEc6k/UKzHu2n5yBrS2Ykzd+p
+GrUZljRq1tkEsyzvP/SBtRMyrlpTfzLJaQmw7UTXCkPa79CnFj7M6lFXm0t5
+nJ+2RxL7f7Ic2qKtSd8nia7b4Y3zS48b0Px3es+ewRY5+fo2cLJV7hnqp3HN
+zw2+MIO5UacIlp8+lHEaZje0/pFDHi9LJ0s0Uj0rLXmBcFLHdtMp6L9jVvb6
+GnjIzN5/LdzUofpQhJ6TMsROXYTZas2R2pT30UWbBsjWk+cZwfPUr/iZzMF+
+EW4hc+n8iPjaxMJM61krROHM8rGCBpgrMD/1gM7H54jtUtqof8PWVF+43r3w
+miXMVhj1Hke9oszNsoHw0Hx71mFY9sXC6DPk8z9ifqHfwuqP+3nkLqn3O+GL
+45Ef78IOqSP5/yK/kdstFpU0bvD7gAvcp2Z45AbMMPt4+Q2e41u+n1TOgVm1
+dXLbYRO9b/yjcKT24pHJcE3inORdNF/neQa9F8hmJbyyp3r/C957Dm50+Tqq
+S+OGI4XxsEFC/jYZmGfRujEFTv2Hs1uAfjObC0OuwfxloTqfKI/3nbUDcLlj
+QkAr5eFeJ2uC/d5xT5aRIw/mWZyGX15L6P9MXtGYOA7r//Mg+y/cEXc1Zyf6
+KUvW/5eF/ZJdLIRb4R1luiyqjy/tr7ACeVgeF/jFUB7LDp7MhhnD1z0ewU0n
+JmfQe4d9lqeq5Fysp3ZJXBf5iptOSHeFm+7fi1oDiwk843PhzHMK/A3wgdcN
+wd/n0ucn6bg93d+OhoqYz0MewUd71eFqo9S3MeS8LUMf6D0n1vDDI5gXfKwr
+Du5T1rH7AzPTVoopwSaluqXaOvS8+uVAOuq3lumWsYMZSc6ysvQeFSH4upls
+c2xmLPoXVi612w0zK7W0BMjPPq65hNyx4Pmt3fAMs8apW8kibWrf8J530TOp
+dy3ctPzUgmi4/KepiCk89Oy7jDb8SettqCrMOjdJuFGaw4jdFZlN9bFqN0Yd
+gK+vXNfdRnYv618Hy3P35fPhjtO6envhnIenjAvILwa+3YaZQb6lp2DGetd6
+Bay/V0Hw5hic6fS0ehu8RDdO9jit92aFXg3MefB+/XmY3SW/ZD7qj7DepH2N
+7Dh2+gLM2Niy7zXsMGG0lK7H9f35ZaKol7vso9A+OLpluH0x5Zd+a0kzfOCR
+aEw42UQ5fQbyWyZb1fQQ9md5MdzgAnX1bKYu6myr0j8Av15kVrgRZm9KGY+C
+O+cbhxbBDmyW4x5YMJBT/FOXns/aTVfAWUkJP8zmw9yDf+h6FB9csiycrP/n
+SzZsOf9Z3TWYqThnhwGc1NTF7oA5675m30A/66qK+Qw29S0Imwd7ZQzkTIY7
+ZKtsLiKPHcK+9Uw2fV8dPM+ED377E0GONPH4KoN8hY16l9J8frGTlaIUh7Fn
+UOi5EJzp9qOWMwXPG15VC/uoHg+dtGRJ1GcxsqGeLOYhIg3v2Lx6ZxF5ScNm
+/mS8bzVMakok31r/KA/m/yoZ3A13NOl03Ydv/5GUdiN33dGg4/+2RVhYwQwf
+wcMEWNa2zN58Pn2uzUa0sX952eCRpeQbZUZ9sGTy9S57cmXDg3uo91RbUM02
+mHv4euc59GNRUTWD9ue4u5qa0vVRqeh6B2bPmnsrC673y/AcofnpIlf+wmV/
+f7QqoV9urMRaG+QnsRovHNS/+ZPCQ3D+kT2vttC4c1jyJThXO6/rKOUl6taX
+D/Nyy2+VwbwV7MoT8F3BIvUWyvdJyGJv2KX8zvgYzPquWakKm83LWqGkh+vn
+w8EbVdhfV65guiHMzjmaag/fPF38xAbmW9caXUA/bp7WvR4wSzA5KgH9BsTX
+LfOGIz9m3PFDHvIPE7t8YG6ukdga5Je41E6RzD9u4muBvEV1G3Zt1qP/Rxzg
+2ktg/3herjvMcYxcEzKJw0hYNFZsS8cv3GXSIM5hnA4MP28Gd7y1tHCAJUPv
+ntXRo/tFQIIYfJJxr12V9h/M6ByeiPe/R1svSNP6s0eey2A81G+CQIT2b086
+thl29Y75/ouuz3AJuU643/OXr4D8IjcgFvs7mP+UoHwyM85NskZ9oxulOUK0
+XzD7iwrqj5MWmErRftLWnmOw5emNX1i0Pm+/ySv0azyaIWZM/VR7H8hCHoE5
+a3860/Gy7WWuyIu3Mep3EPWTMy+2H+7NXq5+ntablCblgnw/ZHPd79N8V9NF
+KXCJfszuHnLsZcZZuMc3kC2tj+PTnxb7whsXX/MxgBmrDr+ZBN+fNDbqArN8
+fngHYX3dMEFbIMx3qN1djnpahitMk8kzmxnNkvR+aeSXC3PqHjxtRD9tQveE
+b8CRWtYPbqF/t8eXmithbvfra+nIx+XL2oFqGo+25EchPy21kLz7tB7TqzcI
++c/hcJLvUH1OYimHxXC9Myf5l9LxL20nlE3A/Uiq0DgHzjzxcLoEfLe5XOQk
+WSLoUYoo8nxk/iuajtcN/W4Lnzc46UL1M65qLTeDI5OzrLZRvXuvj3vBD7eF
+fllH/dZralTAvFWltk40f7ZFnAnWlxcWMnGk+ZPbhDrhQufXHmtpfsT0F7mo
+r5gto0jHd7yfOBqK+md5bsjYTvX8dct2R3839zq+CaXxdvHiBeg/ibljRxqN
+R3YojsM/H79+RP1xTsxKLUVeP1oHWS9o/vD466XIMzrlb8xPqsemTLsA3lk9
+o011AfqYUpDfDjvbHBBYwNyg/qgPsFzq2Uu+cKZzy8Kr8ILqSfnJMIdrnmYN
+GxfX95bR8f2Gt3jYjzcm8GkmPxwdHEA9jaa/HfvJgn0+ovD/fgxQD/1/dCLn
+/wA7d3r3
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.041811450678379, 3.90656724560653}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwl1g1UTOsaB/CNUPoaUqJi0ncqgyjVqZ2P1Ck1FZVEY276cKIOQ0mYiCQy
+NCeVQUI6R1cTlQoZTEqlGVTiRONUblEM5SvR/b/3zlqtWb/17P2+z//Z7+yV
+MTcuYONYiqKu4Y98U8pRfGbR1Ai+9rJoipVTc2Myk6b2cCwM18Ce1s0ndOHM
+rw0jLLj+5z/ySbDAd66+GszXrxr8B/cL1sTeq51LU4wWyywhXJbNjNsL5zMd
+VtvCOfOHCtxhZVO5Z+lM1MNvcLXI9Y0f9pnBSjNH2//Y0RTtf6zzmBHuE7v0
+NcFUUX7FZ0OaYud5P78N83NFRzhw/V/LTxMzdppLnhjQVNFFX9tGmNlftjgI
+jv/8l1IBx9/UMB6YQVP26wabfpL1FzqLRHCv41n32difEi09FQUPzctO84Rp
+U51rfnBss1PZFlhhl6m2Gi5+veDlcVJnXQ3cAbdYmi0pIfWnXT1iWNSdtlEK
+S6aKWinSj/rAQhnMrmy03gDnnJtp0gwzQ9NmNsFh3KfzJWQemT3/ckYeeoa+
+5kXSz93EhCJYOm0vtRsWrEv6oIF5LLuy6SfpT1yS18aFVQ2nHZsEsyQ7uy7A
+Q3Yra+4hHzuOIWuGc2TCMQkkb/g9/gs4cR9rugWseMhzkMHRyuiBNlvMp//S
+2fOwwv1lTDrMNzrzdC0s97sS4m5L8jttGEY/R77TbmNgwau1Y/fDQz4Jro02
+uJ+/9I9h5PnqIfuSD8sfBzVGwu3VssT9sEDo0/MQ86kcvm27DWbP84pYBDeN
+BnTEEXvLrxdORw7t9MJEWEJn95vCyTrndY+Q+zPmcSr0cf1PkU0RzNDdsjsc
+ts9YntIAK9NOpprArKCKUCVMVyZyVWCb0stP9EieB1NzxsKqLyeNOhGPeNsb
+wbHWDRqhMMv9Zqc/XFwVs/l3WPJjxbAIlqu7ftwDsxmy+m+w4dZPvXyYM/BM
+zEV/ERU/WDtg+pHH3kdwmd9Nr/VkPhP2VLgh36rmnpDFZL1JgYpCmOFzwVKV
+rFeZ3knOR6/svFETyd807OIJ619MMUsjeYwOxybCKqW7zjjDrI60CZmwhtqJ
+xf1zsD5d9PEgnOqT1X4Klmhu28eFKUoSsxJmf+vYaUyub5HdHQdTW86Mv4/9
+y6rn7L5jjedVc+dsICw4w2w9BMtT73U1o3+BwZ9H18JUQNyqX+Ch3PnPnWB2
+a5DeReSXHtvhZ0Hq3v4FGvAyI4sOJkwHtW5LmkZT/Z6ND8xhSeSC60N6yCO6
+XetA1ler/M6HWZP6PvjDipGMARPY8a3HyFaY86V2xitdPF+Wk0sOzHgtvF8N
+J1ozWmpIv5nXm0rh9jyr1i5yvfGf2bUwg/U5QgX5WHbqJkPwIfuPCiNYnvt+
+phPWP/JOMWoLM7Sl2lkwR+fcu/mkXt6c8Q02nMaKmkPq/rw9UehfFF4t0SPW
+f8trg+NlA1+GSB7rrPduyGuaYVZyn+Q//vHaaXJe4mPNj5L6ml8N3sCio9Vz
+fiXW7lnDxPykTxaoUDDLL++GC2woOuhXaoX912c8/p8fPn7NgRVHG/6YBYdp
+3aicDDNtN23pwXpi3sYL9y3Rj6vvfAEsrHFdvY84eKwmOe9htV7GK2BJdGVw
+AfotLr/wVg/Or4jh6sA5SZUagxbYr7+ZlYy8xUw39w5YXLDbrgvzCtv3Jf8x
+qU/se+ELW0bvOt0K8+8uPVg7FfPe6aHWTeoNvt0+cNgzofkIqb/6/qpPB++/
+JetuGWA/6s22kHzY5x3bgSZentm5FRbn7pVEwoI6w39z4a8Px/12BBZzig7E
+wWFxnwKvkDzS9bdPwolyed0DYg+N4HY49nBaRAe5v3i6ni32/9pz1KGbOKCk
+TkD6oze1dRJ/Ck/6AXd/EsQ3k/sTZjXGIk9E8eVnJWQeIS0L22FP74aMVFjZ
+kBG1GPOwP73h3EqYv2Bp5mF4aIBbp0H6cwopuA/n7zOwlCKvJIgq7IOTB3r8
+dpD8vMKnSlJfNV7TnMxHfLXlOZz6w82nzRzP82+Vy5fgnIovg+kwS3V5ewgc
+P3z89lI4vnOKwwf0E/32h+EE4u1j/ubBPgXqWk/M8HsTmL/oRZ4QE33tYpjS
+qDMIhKXdK1VOwPQhH2UV5tNxNtLuAMwctO40gaPtky2IJVVFy09Owe8hhdEr
+IG7IVpsBO3pptBTCcnm/b+lkPL9chkwKcw4OLtoAm/ZOD+6FGQF2xTawJcf0
+ghb6yz8p/EUXnspY0mgPc5hvJhnAnr7RXcGw3NPungvMXmdqvZ3kqVpYngCH
+XI02PwzTwtMf6uBU7s06IczYEJtsiX7sny7lZ5H1V7/PyILb60NDDpB5nbvx
+aCw5L9vqh2NgytO5gZyXfvWhSndyv/9zrRb4yKzug5qwRFhXaIX5KIad3jeT
+eTB9A36DbVTrRtNgsRbjoZC49dRcZzKPiy/HnYdNJw+7vTVF/zfTnEk9OT1z
++ilYsv6KeTTMOF5zaSVM1eT1zYJ5Oo+ujYfpDY/Ua7C/ZH/tnVoTnL9TFiEe
+sLRGqDwGswS9xbeQh6eM7dwIMy2jaqzg3mynXE9YWaAiE2AetHZKmiMcv8qR
+842B/i5abl5IrjfYrYiBFfH7Y1xhhTK8TK6N3+9+7rgAUv95y3dIC+/fiSXO
+W2D+7yfCVsBTZ4sKBTAtkQbKNfH+D15wuILUQ+eMzYJVq6uoF3C+0Yl1Ajhs
+oovRGJJ39pmE+7D9Ax6DCednW2SzsB5vu7OPA8nf27alDh5Rqzm/DOYH6e1P
+QT+9du8jPWBxUW+jFfrleckSnGHBosxzObCcTg0xgdkakdIJyKt0zJz3k8yn
+1Pj2Zjj5boOsifTnVLaDnI8Wm/A80j/ba22CFuZVVKSa4k0cv2mxK2zaKO4a
+nY3zt4sXGkislcQTw/l3qXpvct5bbulyYLFF6TNz2OdNUflkmL03c00P1o+Q
+uFvVG2M/0ZSkdJjpcln1IMzo3lytB1/gR2WuhKnyyOrj6D9nueMuJjH5MP7/
+//Eok/4vULcBlA==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.592338820250189, 12.901430589874906}, \
+{1, -1}], LineBox[{{7.9999999999976925`, 9.5}, {14.99999999999251, 9.5}}], 
+        PolygonBox[{{10.9, 9.5}, {12.1, 9.1}, {12.1, 9.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.5, 8.5548}, {0, 1}], 
+        LineBox[{{8., 9.499999999997693}, {8., 16.49999999999251}}], 
+        PolygonBox[{{8., 13.6}, {8.4, 12.4}, {7.6, 12.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.9452, 13.}, {-1, 0}], 
+        LineBox[{{15., 16.50000000000231}, {15., 9.499999999998607}}], 
+        PolygonBox[{{15., 12.4}, {14.6, 13.6}, {15.4, 13.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.9452, 13.}, {-1, 0}], 
+        LineBox[{{15.000000000001851`, 16.5}, {8.000000000002592, 16.5}}], 
+        PolygonBox[{{12.1, 16.5}, {10.9, 16.9}, {10.9, 16.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.5, 17.4452}, {0, -1}], 
+        {PointSize[0.04], PointBox[{4., 8.5}], PointBox[{8., 9.5}], 
+         PointBox[{15., 16.5}], PointBox[{15., 9.5}], PointBox[{8., 16.5}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T12", " ", "P1", " ", "N23"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdief/fjgigjhihj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdief/fjgigjhihj.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {22, 22}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwd0gk0lesaB/A3SSqHcrJudffp7JAhlE6JBn2foiRDhtiU2irLvicdNCBT
+u2XIKV3DkUxlE6HSRKUu2SSXqOQ6G2U6XZwGzbioy/0/d69l7fXzvN/zPs9/
+f4v2BLj4KjHGMvBH36x3Eh8NnqkRFvFMdqG/SqHOsyuOtZL5MCuNLKj+jmdu
+uQEJHCy1/ZzfqMYzkb3HiSCqN6aYTczimbVdfV8J1Ue6u8RwbX/n9c+w2Ny9
+bXQmz8q/SpIstdH/0ZEn9fDhg21dp8i/jVQ3w5LBtIbnsPRYp5I69dOOj9DX
+4Zm80n17ONz64p9rAmBhbpfpHNyva70k9hos6woX1MHzkh6bD8DizDbtRMyb
+Xe2QP0cXfukvEmOfVGXPi6aw7HDCARPsO6RVfGMD2Urb5g08qnanfTM8OyKu
+1mY2z4zb2hp5mF8ekhkN98U1NS+FtzVI4i/BSU0mpd/Dver9J+/AQ+uDrn7C
+/R8fdL8ogq03nHFphNkqiWoUXN5Qve8CzWfy04g5+ZJ3ZQTtoy68cQP3S4PN
+F3vRvqnqRvWYV2Tjv2I9LN0rsajAPu2jJSZG5AXMOx37vrpwYFCb+tlEW0mQ
+T5EDV6tHPn1b1wJ5ZksSjpjDvb1Sm7kzeNas462znZ4v/WSvqsoz++fFzsfo
+fpeAqoXTeVYWu+VtGd1v/u9wsQrmL17pNETzO2g4tU6Dl4ftW4t95a68LApe
+l/Kp9ATlN+611gcuUwmIU5CtO9aEw33x01UWL6Z86zQb4OyrTeJAmN+/vMIa
+/a/fcn97CxY/UJ7sh1PPHbH6QnW7MkUe5pFMPbpXTw/POw0NBmBetYCiJw7k
+yDRdK+wz2iRPlMD8+z9NZmLfBO0zjsHkh8E/VMGmJ61dQmDpa9UJN+TTx7VE
++sPsY717DRyTt8XGAxbqczmTsEDwJWs19VecypqOfG1zDnVq6dHvEZbdhnpS
+xfjl95hPqrVbFgDHN/R01MHCTEPXFrqfX2OZS/tq3HynTO+7y4IUKe3T2jCs
+jnmFvrNEfmRl7Zdj2E9NFlbqQf26/S82Y38WE+rqSu7baJKDvALt/uK9g/q3
+rK0LUsb/zfd6U369j4WJblPxnhrkbkiB5arJPS5KmD9Kz1tO9Ysa94OnYD5X
+ud8Y3ee2yreewXM2nl1L+zYPdDvAulejr8dQPn7b7s2E580v0WmhfITF8slJ
+jrXn5Rkt0kf/WJ94I9RTY95/+IV8Yavjr3BEcnZhOSyMny/RxH2qX7b/4yss
+5peNVcIr9QT9ZgaoX+uMOo75UusW2vvCYjuBszPmjznrkRUPyyxFyxdhv3LP
+9jk5sPQ3cW8fHMFNTSii86d8y5KQR8xxy9gCOn+uQX8B8pKnT9c8S/2HRzxD
+YYv4By1RMP9YIyIfFmk19uwiT7XVzYTbpQ3XVsO9foPRHnQ+KGVsDj0viI7s
+Qn+3DwMpb2ifn0cylsHp4/cd6mBZumOXK+apOCb/vVCf3p9ZkS6YvzPqZGIy
+7XujINwM+1ko+YbHkoO/mqhi/16dSgGZ/87QpwR5mjZl+NF5+YPzF73+y7Gk
+ysGyS1TP/2ma6VeO1R91ut9M/T0bft44xrHsBHGuEuZjHbceF/6HY0Ur0t+s
+p31+DLL2H+HYaJlGYTTl1VlrnzXMsVf+PhFPqB65cesamK+LeCgwRL3ZbMsW
+WJqmVrofZvcNhmrgovSXB8qpfkbYk41+c4U1q9kSzOftolSP++pv96TxsPSp
+9aHlmMfib+HiEJh3OWH/YJxjIuMf/8yjeujAXd9vHLvuzk+rgdnEJgGb4Fj+
+xGaTVqqfX2Yehv1rO90DO8gOj67swvvzbf3ByBY6//eOu89htz26GXJY1uip
+Yoj87BtGThfAvU+XxG2ERWExadGwcPbxQj24YofpBm+aNyY96hme3+f7eLsZ
+LO4ab7aBVVXKi9WpHnJ+UgP3C49NqgxiX/meo/mWyD8+Y8u0Zpjf222th/yb
+xZpvK6iu2P+ye5Rj6X80JZdRPoPPHkUhn3Vn1jhRXuxrSNjCIeRzQKO/nuqV
+skDFJ44x98shA+SFj1QiPnDMwGRHwmzaV1EV3foW5wdXaWyifesO9XW8wn1m
+28WxVP/ri4DCAfxeUTf9mqh+eV+HYz/HWp+1XZ1nhHq7QNLWxzHjZJVjfjDL
+iz5niXrSihCl2+RfvMSH8HzRwe/9phjDrTuLxegvtFKaspm84Hxx3xuOyVx2
+7Y8hFwbtbHuH+y/GFdyB5YFPy2M/cmynZ55RjzH93ivWGXzmWOhroxnjVH/n
+l37vC8dsPXP7ppvgeYnPF128P6LQR1NnwNKEH7ydkU+El4/tBPXfynUa4/3p
+nbtp8Wty4m73Irh1uDqhEeavDNvehUdXlrYX0n0Lley8YP9fa0ukdJ65251C
+v20ls1+IqK6wT3PGfayg0nwFzdPyIfUO5onJXSnVpH41WbZNyL9svWzlGOVx
+IGqpDfJPCt4a9pqs/emhDPuHZomm9JNrbL49R372Ms2Pg5TvfiuNxX+gfkjR
++v/87u0e3tXBMXGgVY4OeYeRg9Mz5PdkVOZMlggGFbV4H6pZ2kly/ty830uR
+v6FlWRNZevpfHcnIV+FdrUV5yU9kvkqsYhZHDZfuJZu+Ppx9porJ0trNbpLp
+k1TJlOl7Kf8/bdOG9w==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {1.2847296091079567, 11.54244899022028}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwt1gtYjNsaB/BVOjWJjEJF2UNRkdOgzUSaqXQTutmU0BSFUkbqlESzky4k
+41pOZCREYlLtomQSUXZMJrq4jVISatKhEO3/8px5np55fq3vW+t933m/tb4p
+gVu9glQJIWX4o99kcBif33jk18eYRwRXGeQezGFHupZO5ZFM4dFDUTBr/9qe
+7XCX89CJ0XBZ/+tUDtxMLmsdnswj+hP0fTRg0tt3Wx1mGflMapuC65lvVgmM
+eITXYK1RB0vU9ryVG2J8/sJrt2Bid+npPFhqXa5dDbtEXziUPQn3eZ0MldPx
+ilg3JjyYlRzXC7Nb79wSTUR8KWGbx2M9XqPLN2PYY3DfG3u6flbO9HoDHlHG
+vneMglk1ESHpcIo6K/8iLGbcfrAJ5nlcNXhB87GqN1kDu0Tk5oxC/i7Sumkb
+YenaI3t/hzlTj25IhvOmbfP8A9bvi95xnc5vU6YSAisGn5t+peOjd02IgPOq
+GkR2iCem0vv8FphVNSvsACysnr3ZFzazPLi0Cb6fVFvOgfnLnZ4aID+FMSdL
+Cy4rNNX0gDdVcE7IafytbtFRsMf4kNrDsLTwU2wSvb52b54bLPumEyiEpbmS
+nwQebE9LD4B5C5wqS1Av6Y7dqeawS1++Ygss9H7MaKHxLH1kb07H99zt3AZ3
++Q0kfGRh3su1WgO0Xgf/fF3OonV64LaF5us/PO04nLd2J+epPuLU/pK6C5ZG
+VnZbwz67bC9FwMrpD++e1EMcn4rio+CUmvZ5ajDHPdV/L50/ISwyagLyLuGN
+OAMTiZz7eTziEXRm1MBiq5LLyTCD0SLvp+sF8pSWsMhyos50xCta/2GBchyu
+N2/bthpmLfHLroVZwUODB+h4QRapgPN+eJXepJ4aYFQDS3JIdyc8mGJyrAMW
+xToZ/urX8GhNPcwvPvx8sSHtZzHHcSXMd+G+NIElmXXh2XR9edPgb/R50Pps
+1w0rIkydRtN+OndruRXyERoIDD9ifoG3z4JomKN6NUIKNyt//iyAWYYGT1Jo
+PLu/mzbC0uM5Xi4w8+1j9U7YrDZsgwpclmX7SgEPhjrJ/kL+/OAWjWpYzEtN
+DoXvb/n2Yz8sUR2ROBUWpshCbWg9H8ldbuK59FgTyXpK4z82d5wjLExw/+YH
+KyN9+hV4LqXXWu80IH9icS/+KGzmsFTLBhbn+nICYd69FW2ndTF+ctt6N7hs
+Z0S+Ksy8XDnsTp/rYknjZh3MU7XsTjjM15NntI7F/31fW56DmzX6y31hMurZ
++d7J9HeMWfOeibg+eGS7Ip7BTN2yw7DsptvjAlgwVnOkFxzT52WvRfupLn3r
+DLjrU73CFjbbt7d1EqxUhMnDaT16jXWmwSLu6xWZdHzjgSoH2KxN+qEMFiw7
+fyQS5miPOvCQ9q9zy+oimNhfudQES47323+H71t0u8tpv2nWjHRGvJkOD02r
+aD+GPLM/BIsCZyTQ/hT81ye9EY5xa3Kn/SyII+1ayL+ZH6dH49M/5393Dszs
+u1bzne6LWz13O8Ks5mee4TBvcJ2zHa3XLttVLaiHLK0j1AT2eBlbak/r9S56
+bQ+tX8/zYAn2SY5+0o3TMN/beboZtey70wJYFp1gexX75CbTWU1SxC91NLFb
+Ameaj/73fJqfs+rjITzn4uWJYocxuJ5xY2ctzOYHnNTShl1WHSqk+0ay2piG
+UbA0YXIJLDT5/CRbC/EUful8TPcRXavQ+JGoUyk3ioH5lRrmm+I0cd0RA44X
+LAkYrZvNwPdbRkE+3cfvzxzq1sD6f1sdH4N4yfj0qxthZckQJwb2aK/cPQEW
+aPrnvIL5f5oEDagjruDhj1zkL8pfxGBgnFkQl3YEZltXyB3ofDaP9j6BhS9n
+sXPp/dEZxSr0HOo438DC+tIZJwbG0X5X3pkoYdD+HL+KnkuytWEHnRGvKNjZ
+sJvO59br+VyT9k9nSz6sZJbkrkd+ihLvoBUwMYkNkcPKsUXSTsQns9M6PZXW
+4zBjIJjGP7v3tissOPX5fQvyVTT1WTnAYvG6KY6weOL6KC1YufBK1BXUT6bS
+4X6Gznel5sUkmLm08d2/YP6ZDqMj2Gd5mtnFNohHMPtBogEsqshd7Ib4hXGr
+Lxdhn2XfOK1tjXwVF/Lsg2DJN5H2GNSLdI18yaau3bGmSQ1xVbNf6tFz7LOs
+6OQI3Pex3G8i7OHg179ZFfO2GZjOh0l2QJarCuo1ruBpKCxy9PZwJJjf72R7
+MT3nLvg+qvvJJUpPpXw0jW9AVTPgB5eIFmoI6LlAgg+JVg5xieyegrTS8Rfc
++ZLvXEICfI/a0X4LMjEOh4Wzpi/Oof0VFlW/H5ZY2cd9gcnZDA7B/WzNxEXW
+tH5+4X6VsEecnW8w7Z91PRUlWI/30fpsLB2vK+LIEY+we7teJMxvu95HEC+/
+cMknT9p/Bt6qx2FpQ9r1cbBwTvuoyciPZ8edV0n7ffL+9+kwy8Xd3xNmPfmc
+9goWOM2e9xjxs0tO8Rmoj9JMJ8MRlqoaF46AFRef/JSgHsyMnV31uJ5td8yV
+1lP56sGNIBX6fBVsSdan70ldv/+N9YlBluVPnGuypNvFarAk/EfnHpiYV4Sb
+0/ibe6yMYLElz14D+QqLrzXU031/zMyq4q+od76rfybd1+NEmk4DqHcWWbKb
+nhMrePtk/8N47bbSeHq9Y7NqyCcuYWZXJ2bBCnU9oamSSwQt1isewTztyVWc
+D/h9LKIv6mE94ZS21mtdqG+wka4AlopDTZo7uIT1V6u/HOa9+hJT3o779UKe
+L0Q+QlO9puA23G+ck3EWlialvmt9DUcFXVSj/fNt5bA2xkWnpu3wpf02//T2
+PpitcpWcouPxc4Wb3sBnWIwH1PXsbd6dmD94sY+COsNxZhriUR7pVbTCQvf/
+fOrqxvj9Mw30PYrozF1j+xHjOovO7qL9+G7fHwG96C/79TpmdPx6/uGjyFeS
+Wz6ygsaXYHWR08clYj/9xEUw339P/gGY9WiidyHN726pegpM1NN6DWn9w2YG
+smBmuv7cJFrffZwBb8zHz4nV7ce5SL42b3DtwfgPb7/N9D3kjaX1nPdwKSOo
+B+ei1PeEQcxbzP+hsTWJvnesbl7GQf2YOfrx86ijXYosXiD//duHh3+dm2Mv
+RsqRn0Vt4xvqr/EWNtWI/2b+7A7d/79ni28SJX3v1uX9A3iCJcM=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.4677856382145418, 5.536752147784559}, \
+{-1, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000004547`, 17.}, {15.000000000005002`, 16.5}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.370645165272702, 17.438748347272984}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt1Q0w1GkcB/A/l07e2jSTFeVlcZsor8XdLU+lyVZeptkxpkPrJcnFbUk5
+UdsRerlo9WK5w7o6rpSXlKWutnQh0UpqM9h1SatSKkrluO9zczuzu/OZ3/P8
+/r/f79ln1ibqhw2bdRmG2Yw3/WYM6ccSwvz34hCxvI39yh0W/v520oNDGLM9
+ujwRLG+9YxAJt7TqrLwIk4DE8J/guOYK/c8wV5BffAr7nbmBcauXEmZUnThZ
+gvjcgpsWebBKWudWhHhlkm+PCtYfyPz5IOIhsT5yExfCVGu5Q99zCDFMS3jp
+DOfcUkhXwcXGbVw+rG3jp5piveeLL+Wb4IleWWOPLSFh5c7s7XDFvOiHxbaE
+6c5xYdJh/69luyLhllhWdAYstqwT2GP9k9WxokyYDAZZjtgQsq8rVCKGlfHu
+gVfg7DCTrSkwk3vBTmJDFL4RHU3bYC+dJXuS4DHOwoIIuEWlahDaEKZp0vtD
+ICyUWN3eiHhVeoSuLxz66OlEJLyVRPUvhUtf1c7fhfyDJtxyW1gjM409if23
+rZKi2bSeNKO8G1jf11v2cQ7tJ1vwcBxxWUenPYvuV0tNXW2JYr/Vre1z4eAA
+q/si2D58aoklzDUoEtWiv5i9q5McYf2mZZ7v0L9HywUzH9qfZLvIhUMUocZr
+G0PoPJ4XSbdgvjHOgptJdJ7n/og/ifMZ622KPU7zj3I/NmLeQ73ay/XUfuva
+urA++c210730eWS+Vo14PjeDpeuKeuPt/+7H/osLjLod4Akjj14l7JAZ/oAP
+c8Oasy9j/Z/1L7+Ih+Ub0xccQ9xj7+yULFhrXhEUhfxuEWaJxXR9deVyJ9Rr
+LTkrqIFH8977vEF/j3WmO6/R9alpM+rgksna5tsw8+ij727MI/mMuaAVFh5i
+n+YhLmBGlDSe0nlfMcuWiPda7bx3HXbx2/CsD/NVq9aYXoK95GLWVcx/efqn
+zHK41Cyq+Qyc6TjlWgDrX7Bj/2JDxPsOeC3PgTW1sswS+KbFjYYU2u/iu1NV
+8LX24Me0P5X7uuG7yH9P5+Vvm2h8hvdCnKfC8UmgQSitv/XqZwfUu6iysFsA
+W38aSxbCK/wvFYfQ+q4mOJegfqVJY3M4zOpzOqhB/Xx5026af+KoZ5cN5tP1
+jidNg8nU2hAhPL6ysyefzo91bo8U1ixW11bB7MHUZ3cw/zVlcZvvwf5jlZK3
+8JV3C4ze0rjQb8DEjijW1/mWznPD76OdqVsI8zmDet/CLfLqnTZwqoM9OxJW
+tpVZmtkR5q8P1ZcyYf3E1x4M4nOj3NvPwKrIU8o+nKc1Z/bWJjjOUC6uwfN2
+Fw819MIVkyGr0uFKV7HVG9i/Y38C7jsz58TppYw78hXUHptJ6/98rnEWzAqS
+RLdiPq0OOe3GNO4SVHgU8xn28KwxgjVDd++HwouzTj2bCcsbxnc4Yl4K72H7
+f5Bfk7UlVw/xbYfH1o/C1Um/PniB8/CJEW0aoM/vydvZj/tp36/d1Un7mSo0
+pz4Zdr7+Bo1v+Ur9HOd7PNff7yJcOp0VPAP1BDQZupbDE+2jCYtw32JmL0sp
+pt7xYz3qUUhCvF9LYWJ+kJeHeqYfSniFsJZvcbkdHlAWdZfAoQfUJ0zQ/zBP
+9vosnf+Ig1MwXCNLyb4CszO2KXJxX7qqKsNofdoO92qcJ8kzJuMvYGuD94en
+MK9pPW2ZAfoXcTSui3A++ZoDh5xgxfNvnvrbEbFF55HzwfCoV0ZkGM6r329k
+LBl22b9OGwWXHjHmFVF3i/iIM9+tXR91HWZLHeh+hZtlRsAATFwfldP8evR/
+w+P//w878i+sw2/p
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.723883367797246, 8.115966322027525}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwl2Hk8VO37B/CxJEmMQtYaPUKKhihLMpWQEGVvMSqVqJSILEnWkpB2RfaE
+hkramFRSlmhV4REqa1GeGlr8Ptf35x+vt/s+931dn3PmzDnUNu1e4y3MYDDW
+CjEY9Pv/f5gchmAcPywOQ2X2iE0K3MFr6VVU4zBE9+85qC3DYYir7v2kCfMH
+pvTUwA4NmuNasJ/PiiteUzmM4IygRhXYNkpe+AfsXxcQLQIvfvxs58FpGDe5
+2t2G9XNkr/aNkmXOmhXDXGMF1U2yHAbPr849AJZd4r3/Blyh2u6rD9vOznP5
+BvMPru5/O5PDSHeRlFOQw/5vJ7itgrnx+jKaZKkrvMoZqPfK18ss8sFNe41h
+xvFu3Ykwb7y1hq+K3//trWnDetwhExt32O/zcpsCeChZ640YzF86qOxLXhW2
+rl6Fw4hsu/hdG84ULLl5BXZIEr4ygPqH2pPzc+H6ihyxG7BDh1vlLbgjdFVk
+PMx0Ut72CS6oOS3rC/sbVwu0sP68fA15Lsx7mfQiHLZYM1d8B8z53ZXQAe+L
+0Ig6ArOtZky1Rf0jXqOq1bT++pXjt+Ei9xl7mKiHZWpQqYn+50k4yeyDmxiG
+LxNhJ/W4nD7YIeqtykc4bZf1L3/0zxX6LCSPPLv7cg1E5DmMlt6Frbrwb6mX
+vemwIGh9kSksWnfH03g61jf5GE8u8DG/+wJW0NBTovlnDNoXb1PgMNzYdhen
+wQ+nr/b7CkdW+NfT+VERLnfarojjf28+G0TnZ9SsqBHmVgzbCcFMWbWxmUro
+39CeG0H9TAwv84AjZTQ7vqH/3223rSLI5/PMtsAsuRr2UZjVbCzZgjzTbjZ0
+RcGMrU8frIV7dOsebYP9Y+cfblVGXtMSpM1oXOvI6yCYtdnjshiNh8pFa8DW
+M5THa1FPsusVry9Ux38+jfFUb/A7gyaYs2LVsA2cGfXfxXp4fd0xTVmy4i+5
+LqprseuHHvTLbc7rk8F6HaV6Uxqo/7db17nAFuF1/Q/IBl7XiuDuAY/+Z+Ss
+ufuYqLe7emniNziT4RUfBts6qTvMw/rMCe/D+lXo86V/PQwe2ihZ6Yr+ox0/
+Leyk/LJqX9+BDeK+bqe8eFo3i6civ8Vj6eKdSnQ93q10hSucD2kEYt+mVa/t
+4uD4b1WO0li3qVM95SKczpV8StdxZr1z03l4yzTtGyuwbpM1I5jOR3xYinML
+fU62qrGsYNbd5+ae+M2T8ov5ib9XKKxPfA1H1lUEpsI5cgEipjivHa17eMqw
+ZJD/0iMwI8zz7mnso9KS11z9v/Gr1yfDjLGHS7rpOpgZIh1O5yPw1/SvcObN
+xdxhyje2qI/Gm66wFHfBiVcH2bU03/6SnQA5OAxnGqbT+N6dIWkwYx/36xby
+lCE7S9jiVPsLDdi/tzKeCTsJl+Z+Qr3JE6tfjiB3weCdJZdh/vldN7/D6c5n
+3AOov7s9RyQx32DpuvUrqe9XdjFmtH6IrOZ82L/nVf1heLuZXo8mja/tPf0e
+rt1SLDCE2UbVrhzUG52Te98D5k673V8Ed4TvKzpFNhd+r4x+ed8kZ/TCnHaz
+1Dg4593jcAfK565VVh8sLuxm9RTm+Xj9Maf7R/uxE3PwOYvco8Q+DHP7a47T
+fZL/eNcJHrzFR+E9H2YUfw58BAfH/pkqjfsuM++rMR9mfo95ug52uCeyPROW
+35+XmwNzpf+7tpWug6K6gM9wx57xEVl4l8Nh61mzsN5uKZkS1JOqppGyFuZY
+KbUawroqSRoHaPyZ5CAP/eUEy3ichCPbp+1Qh0ss2X9y4MzD+Y0nkY+268XN
+l2FmX1OxBLymNtUzG3YY3R4Qj/wLlOOM0mB/eRlNWVjcpzE9HOa1py0ow33n
+79L8JC86vkfPcCvMy75gt4zWbx1p0ocLy0zNqF4Hsf9OKcK/WRpPRcjT7w0p
+wa1Vz+170R9ncr7KQrhSSXL0Jczb4LnQBy755FtaCyf3zbcthTt//DuhBo5k
+/hMpQZ/zJXMVGmn+jiML/OG/hZopHyi/+HGTNviMndtZBvV/9KSCLfqTOjPz
+jTbVW1tkfBP+rVKy15Py2skzVEQ+Fb3hMy/A7Ce/JHbCm9SGtDupfw9j1xJ4
+IHf78Xn/YDyXH/8WfjfInHwAbrpUIzYAC/+71LgWZnSft++GCyKCimXVsd9w
+iWg1XPTutNQGOFL1hCAG/ha9Sy8D5p9tV9aHx+Kk9d7CQ0WWfk8U6fOqFz1p
+Nn1/DTWvhmuUQ6Tmw/7l+74/QX9hPWPzVsKM3HAhM1jdfMs9V7L5urAS5DVk
+FDZzHdxRJvPjH1h7UT/bCWaPZb/IwvdKolbIcgtaP9edyYYVqthSOjCv5MqE
+JnwvBS2VPseEky1Wm8TCW7KV5g6jvkzrGBNn+h7/9q9GM/Xz3S90CcyZEzJa
+RuMa6TbL4KefV46dUaf7wo2nnvCs7FzHGDj5+uw/abDKqbiOEJofm9LSDkfs
+3Dk3mPLaM9HXGPUcCFq28hAdr+stlgm3Bii/OQnzusUCp6AfwQK74Rtwk5qf
+QRgc9WGu/geYMd382ie4NvBQuTzq57eIJFshnyO7EzSdYW5T8auzcHCj0NNz
+lNeUPQvewvqSBSkfqd9iDx1h5N39ydJogQY9ZyQunwr3RDu6HoKTbbZIicNR
+af1RDTCre6V9F44vfKXjLaeJ3LMjvuTAZRUBLS6wQ+/9MXu45WjC+HGYO8Mq
+vhv1KV0o9Kgie/5Npev9Zcmmli6Y6X2zqRP9Jh9N+/Ab9l+gEOYML3abwZXQ
+ghn3FB8jryHx5ipJmL9JwcQMvruZ1ysKDy1/ZnIPzxn7/EqNR3A8h+coYQs7
+yfnuboV5K92GBvHc4vLZ+xztHzlQviEP1oruEc6k/UKzHu2n5yBrS2Ykzd+p
+GrUZljRq1tkEsyzvP/SBtRMyrlpTfzLJaQmw7UTXCkPa79CnFj7M6lFXm0t5
+nJ+2RxL7f7Ic2qKtSd8nia7b4Y3zS48b0Px3es+ewRY5+fo2cLJV7hnqp3HN
+zw2+MIO5UacIlp8+lHEaZje0/pFDHi9LJ0s0Uj0rLXmBcFLHdtMp6L9jVvb6
+GnjIzN5/LdzUofpQhJ6TMsROXYTZas2R2pT30UWbBsjWk+cZwfPUr/iZzMF+
+EW4hc+n8iPjaxMJM61krROHM8rGCBpgrMD/1gM7H54jtUtqof8PWVF+43r3w
+miXMVhj1Hke9oszNsoHw0Hx71mFY9sXC6DPk8z9ifqHfwuqP+3nkLqn3O+GL
+45Ef78IOqSP5/yK/kdstFpU0bvD7gAvcp2Z45AbMMPt4+Q2e41u+n1TOgVm1
+dXLbYRO9b/yjcKT24pHJcE3inORdNF/neQa9F8hmJbyyp3r/C957Dm50+Tqq
+S+OGI4XxsEFC/jYZmGfRujEFTv2Hs1uAfjObC0OuwfxloTqfKI/3nbUDcLlj
+QkAr5eFeJ2uC/d5xT5aRIw/mWZyGX15L6P9MXtGYOA7r//Mg+y/cEXc1Zyf6
+KUvW/5eF/ZJdLIRb4R1luiyqjy/tr7ACeVgeF/jFUB7LDp7MhhnD1z0ewU0n
+JmfQe4d9lqeq5Fysp3ZJXBf5iptOSHeFm+7fi1oDiwk843PhzHMK/A3wgdcN
+wd/n0ucn6bg93d+OhoqYz0MewUd71eFqo9S3MeS8LUMf6D0n1vDDI5gXfKwr
+Du5T1rH7AzPTVoopwSaluqXaOvS8+uVAOuq3lumWsYMZSc6ysvQeFSH4upls
+c2xmLPoXVi612w0zK7W0BMjPPq65hNyx4Pmt3fAMs8apW8kibWrf8J530TOp
+dy3ctPzUgmi4/KepiCk89Oy7jDb8SettqCrMOjdJuFGaw4jdFZlN9bFqN0Yd
+gK+vXNfdRnYv618Hy3P35fPhjtO6envhnIenjAvILwa+3YaZQb6lp2DGetd6
+Bay/V0Hw5hic6fS0ehu8RDdO9jit92aFXg3MefB+/XmY3SW/ZD7qj7DepH2N
+7Dh2+gLM2Niy7zXsMGG0lK7H9f35ZaKol7vso9A+OLpluH0x5Zd+a0kzfOCR
+aEw42UQ5fQbyWyZb1fQQ9md5MdzgAnX1bKYu6myr0j8Av15kVrgRZm9KGY+C
+O+cbhxbBDmyW4x5YMJBT/FOXns/aTVfAWUkJP8zmw9yDf+h6FB9csiycrP/n
+SzZsOf9Z3TWYqThnhwGc1NTF7oA5675m30A/66qK+Qw29S0Imwd7ZQzkTIY7
+ZKtsLiKPHcK+9Uw2fV8dPM+ED377E0GONPH4KoN8hY16l9J8frGTlaIUh7Fn
+UOi5EJzp9qOWMwXPG15VC/uoHg+dtGRJ1GcxsqGeLOYhIg3v2Lx6ZxF5ScNm
+/mS8bzVMakok31r/KA/m/yoZ3A13NOl03Ydv/5GUdiN33dGg4/+2RVhYwQwf
+wcMEWNa2zN58Pn2uzUa0sX952eCRpeQbZUZ9sGTy9S57cmXDg3uo91RbUM02
+mHv4euc59GNRUTWD9ue4u5qa0vVRqeh6B2bPmnsrC673y/AcofnpIlf+wmV/
+f7QqoV9urMRaG+QnsRovHNS/+ZPCQ3D+kT2vttC4c1jyJThXO6/rKOUl6taX
+D/Nyy2+VwbwV7MoT8F3BIvUWyvdJyGJv2KX8zvgYzPquWakKm83LWqGkh+vn
+w8EbVdhfV65guiHMzjmaag/fPF38xAbmW9caXUA/bp7WvR4wSzA5KgH9BsTX
+LfOGIz9m3PFDHvIPE7t8YG6ukdga5Je41E6RzD9u4muBvEV1G3Zt1qP/Rxzg
+2ktg/3herjvMcYxcEzKJw0hYNFZsS8cv3GXSIM5hnA4MP28Gd7y1tHCAJUPv
+ntXRo/tFQIIYfJJxr12V9h/M6ByeiPe/R1svSNP6s0eey2A81G+CQIT2b086
+thl29Y75/ouuz3AJuU643/OXr4D8IjcgFvs7mP+UoHwyM85NskZ9oxulOUK0
+XzD7iwrqj5MWmErRftLWnmOw5emNX1i0Pm+/ySv0azyaIWZM/VR7H8hCHoE5
+a3860/Gy7WWuyIu3Mep3EPWTMy+2H+7NXq5+ntablCblgnw/ZHPd79N8V9NF
+KXCJfszuHnLsZcZZuMc3kC2tj+PTnxb7whsXX/MxgBmrDr+ZBN+fNDbqArN8
+fngHYX3dMEFbIMx3qN1djnpahitMk8kzmxnNkvR+aeSXC3PqHjxtRD9tQveE
+b8CRWtYPbqF/t8eXmithbvfra+nIx+XL2oFqGo+25EchPy21kLz7tB7TqzcI
++c/hcJLvUH1OYimHxXC9Myf5l9LxL20nlE3A/Uiq0DgHzjzxcLoEfLe5XOQk
+WSLoUYoo8nxk/iuajtcN/W4Lnzc46UL1M65qLTeDI5OzrLZRvXuvj3vBD7eF
+fllH/dZralTAvFWltk40f7ZFnAnWlxcWMnGk+ZPbhDrhQufXHmtpfsT0F7mo
+r5gto0jHd7yfOBqK+md5bsjYTvX8dct2R3839zq+CaXxdvHiBeg/ibljRxqN
+R3YojsM/H79+RP1xTsxKLUVeP1oHWS9o/vD466XIMzrlb8xPqsemTLsA3lk9
+o011AfqYUpDfDjvbHBBYwNyg/qgPsFzq2Uu+cKZzy8Kr8ILqSfnJMIdrnmYN
+GxfX95bR8f2Gt3jYjzcm8GkmPxwdHEA9jaa/HfvJgn0+ovD/fgxQD/1/dCLn
+/wA7d3r3
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.041811450678379, 3.90656724560653}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwl1g1UTOsaB/CNUPoaUqJi0ncqgyjVqZ2P1Ck1FZVEY276cKIOQ0mYiCQy
+NCeVQUI6R1cTlQoZTEqlGVTiRONUblEM5SvR/b/3zlqtWb/17P2+z//Z7+yV
+MTcuYONYiqKu4Y98U8pRfGbR1Ai+9rJoipVTc2Myk6b2cCwM18Ce1s0ndOHM
+rw0jLLj+5z/ySbDAd66+GszXrxr8B/cL1sTeq51LU4wWyywhXJbNjNsL5zMd
+VtvCOfOHCtxhZVO5Z+lM1MNvcLXI9Y0f9pnBSjNH2//Y0RTtf6zzmBHuE7v0
+NcFUUX7FZ0OaYud5P78N83NFRzhw/V/LTxMzdppLnhjQVNFFX9tGmNlftjgI
+jv/8l1IBx9/UMB6YQVP26wabfpL1FzqLRHCv41n32difEi09FQUPzctO84Rp
+U51rfnBss1PZFlhhl6m2Gi5+veDlcVJnXQ3cAbdYmi0pIfWnXT1iWNSdtlEK
+S6aKWinSj/rAQhnMrmy03gDnnJtp0gwzQ9NmNsFh3KfzJWQemT3/ckYeeoa+
+5kXSz93EhCJYOm0vtRsWrEv6oIF5LLuy6SfpT1yS18aFVQ2nHZsEsyQ7uy7A
+Q3Yra+4hHzuOIWuGc2TCMQkkb/g9/gs4cR9rugWseMhzkMHRyuiBNlvMp//S
+2fOwwv1lTDrMNzrzdC0s97sS4m5L8jttGEY/R77TbmNgwau1Y/fDQz4Jro02
+uJ+/9I9h5PnqIfuSD8sfBzVGwu3VssT9sEDo0/MQ86kcvm27DWbP84pYBDeN
+BnTEEXvLrxdORw7t9MJEWEJn95vCyTrndY+Q+zPmcSr0cf1PkU0RzNDdsjsc
+ts9YntIAK9NOpprArKCKUCVMVyZyVWCb0stP9EieB1NzxsKqLyeNOhGPeNsb
+wbHWDRqhMMv9Zqc/XFwVs/l3WPJjxbAIlqu7ftwDsxmy+m+w4dZPvXyYM/BM
+zEV/ERU/WDtg+pHH3kdwmd9Nr/VkPhP2VLgh36rmnpDFZL1JgYpCmOFzwVKV
+rFeZ3knOR6/svFETyd807OIJ619MMUsjeYwOxybCKqW7zjjDrI60CZmwhtqJ
+xf1zsD5d9PEgnOqT1X4Klmhu28eFKUoSsxJmf+vYaUyub5HdHQdTW86Mv4/9
+y6rn7L5jjedVc+dsICw4w2w9BMtT73U1o3+BwZ9H18JUQNyqX+Ch3PnPnWB2
+a5DeReSXHtvhZ0Hq3v4FGvAyI4sOJkwHtW5LmkZT/Z6ND8xhSeSC60N6yCO6
+XetA1ler/M6HWZP6PvjDipGMARPY8a3HyFaY86V2xitdPF+Wk0sOzHgtvF8N
+J1ozWmpIv5nXm0rh9jyr1i5yvfGf2bUwg/U5QgX5WHbqJkPwIfuPCiNYnvt+
+phPWP/JOMWoLM7Sl2lkwR+fcu/mkXt6c8Q02nMaKmkPq/rw9UehfFF4t0SPW
+f8trg+NlA1+GSB7rrPduyGuaYVZyn+Q//vHaaXJe4mPNj5L6ml8N3sCio9Vz
+fiXW7lnDxPykTxaoUDDLL++GC2woOuhXaoX912c8/p8fPn7NgRVHG/6YBYdp
+3aicDDNtN23pwXpi3sYL9y3Rj6vvfAEsrHFdvY84eKwmOe9htV7GK2BJdGVw
+AfotLr/wVg/Or4jh6sA5SZUagxbYr7+ZlYy8xUw39w5YXLDbrgvzCtv3Jf8x
+qU/se+ELW0bvOt0K8+8uPVg7FfPe6aHWTeoNvt0+cNgzofkIqb/6/qpPB++/
+JetuGWA/6s22kHzY5x3bgSZentm5FRbn7pVEwoI6w39z4a8Px/12BBZzig7E
+wWFxnwKvkDzS9bdPwolyed0DYg+N4HY49nBaRAe5v3i6ni32/9pz1KGbOKCk
+TkD6oze1dRJ/Ck/6AXd/EsQ3k/sTZjXGIk9E8eVnJWQeIS0L22FP74aMVFjZ
+kBG1GPOwP73h3EqYv2Bp5mF4aIBbp0H6cwopuA/n7zOwlCKvJIgq7IOTB3r8
+dpD8vMKnSlJfNV7TnMxHfLXlOZz6w82nzRzP82+Vy5fgnIovg+kwS3V5ewgc
+P3z89lI4vnOKwwf0E/32h+EE4u1j/ubBPgXqWk/M8HsTmL/oRZ4QE33tYpjS
+qDMIhKXdK1VOwPQhH2UV5tNxNtLuAMwctO40gaPtky2IJVVFy09Owe8hhdEr
+IG7IVpsBO3pptBTCcnm/b+lkPL9chkwKcw4OLtoAm/ZOD+6FGQF2xTawJcf0
+ghb6yz8p/EUXnspY0mgPc5hvJhnAnr7RXcGw3NPungvMXmdqvZ3kqVpYngCH
+XI02PwzTwtMf6uBU7s06IczYEJtsiX7sny7lZ5H1V7/PyILb60NDDpB5nbvx
+aCw5L9vqh2NgytO5gZyXfvWhSndyv/9zrRb4yKzug5qwRFhXaIX5KIad3jeT
+eTB9A36DbVTrRtNgsRbjoZC49dRcZzKPiy/HnYdNJw+7vTVF/zfTnEk9OT1z
++ilYsv6KeTTMOF5zaSVM1eT1zYJ5Oo+ujYfpDY/Ua7C/ZH/tnVoTnL9TFiEe
+sLRGqDwGswS9xbeQh6eM7dwIMy2jaqzg3mynXE9YWaAiE2AetHZKmiMcv8qR
+842B/i5abl5IrjfYrYiBFfH7Y1xhhTK8TK6N3+9+7rgAUv95y3dIC+/fiSXO
+W2D+7yfCVsBTZ4sKBTAtkQbKNfH+D15wuILUQ+eMzYJVq6uoF3C+0Yl1Ajhs
+oovRGJJ39pmE+7D9Ax6DCednW2SzsB5vu7OPA8nf27alDh5Rqzm/DOYH6e1P
+QT+9du8jPWBxUW+jFfrleckSnGHBosxzObCcTg0xgdkakdIJyKt0zJz3k8yn
+1Pj2Zjj5boOsifTnVLaDnI8Wm/A80j/ba22CFuZVVKSa4k0cv2mxK2zaKO4a
+nY3zt4sXGkislcQTw/l3qXpvct5bbulyYLFF6TNz2OdNUflkmL03c00P1o+Q
+uFvVG2M/0ZSkdJjpcln1IMzo3lytB1/gR2WuhKnyyOrj6D9nueMuJjH5MP7/
+//Eok/4vULcBlA==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.592338820250189, 12.901430589874906}, \
+{1, -1}], LineBox[{{7.9999999999976925`, 9.5}, {14.99999999999251, 9.5}}], 
+        PolygonBox[{{12.1, 9.5}, {10.9, 9.1}, {10.9, 9.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.5, 8.5548}, {0, 1}], 
+        LineBox[{{8., 9.499999999997693}, {8., 16.49999999999251}}], 
+        PolygonBox[{{8., 12.4}, {8.4, 13.6}, {7.6, 13.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.9452, 13.}, {-1, 0}], 
+        LineBox[{{15., 16.50000000000231}, {15., 9.499999999998607}}], 
+        PolygonBox[{{15., 13.6}, {14.6, 12.4}, {15.4, 12.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.9452, 13.}, {-1, 0}], 
+        LineBox[{{15.000000000001851`, 16.5}, {8.000000000002592, 16.5}}], 
+        PolygonBox[{{10.9, 16.5}, {12.1, 16.9}, {12.1, 16.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.5, 17.4452}, {0, -1}], 
+        {PointSize[0.04], PointBox[{4., 8.5}], PointBox[{8., 9.5}], 
+         PointBox[{15., 16.5}], PointBox[{15., 9.5}], PointBox[{8., 16.5}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T12", " ", "P2", " ", "N24"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdief/fjgigjhihj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdief/fjgigjhihj.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {44, 22}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJxN1Xs8lPkeB/AnlEnK1KIhMqF1GYWjNkXmsYhdjuSyCbUT0iCZIpelNbax
+0UVYplmpIym32GFVhEztii2Fs9albOueXCKVS2k7n985/5x5vbzm9X79fs/v
++/1+5nke6/zD3Q/IURTViD/yTc19xEeD/t+3Nk0xnKbWhMPC2hdlmmtpiqdf
+caWfRVOtT8QlzvBcnuztPtgtyz0sA5ZYjaqPrKYpy/PcsxOw92OXlES49+a1
+dh8dmuI/+95wIzyScs6jE5Z0nFaeUqcpwbu99aZsrO93iGyCu0xGi6JhanNP
+1S3YMsTI9i7cut34yzqYut/grLSOpnIPfVPZCUdaM8Ru8Nxu358UcH7TFTdG
+BjyybmKTLewWcri2GW49VpubAscHUSs/wow9k+3dcPMm9dsGuuiX5RS4AfNM
+FQc/doCbfHfVJ8BVZUWt3vCU67B/M8zqiK7kwUyW9RIV5OOmMvxsLxyz4vx9
+O5JXQLjuLpih+NL1IExPZN60gi1Ln89Hwcy4SI4OPHeic1wAL3h17vlA+j1X
+YOwJ117ydesi/c5MXGTDlHWMTQWZ73GjRifqJ9uZ7zsLC30Eu2LheAven6Gw
+5Y7R+0vhyuroxp0wJQotP435Nr28OrUNZrql9cjBgUuNBzbCvIIriRHIL2ZL
+TosJ7P30pFa/Gk25GDUJN8Nm0pntHnByqtjjC3iqZszvoSp+NwtvCz45P1S1
+yBUWVkuy0+HeB+q9vZ/QlDRNIPkVFhwIMEiC4/t1npC8KSPW+HY43ymtyhbz
+V8VaP1CGA10tvkiGDWM94qdX0ZQyL/1IG8zeP/77S3jc9+6Cph7uixfxNRT2
+V56cKPeHBVVHbT+FGYuo0Gswv0jpuh9saX/OeBD2NtDLyoXddDlmmvrYbzOh
+/JLUW2+l5Ai3MjTv0eg/074qPximDEY3ZMIKAxzPRDjtm733BmDBOlHPWZjV
+VsLiIA+pQkzEOZgXZrI2CO4xCrjzPSxM7t+eDh96UfYwkniTYlIRLFRXZvjC
+fGutu9fhTL0xUyu464yX+EeyXnt/+2pY8ijybDg53+mt1yv0L5lOYZnCaUot
+0ofwnDs/tZvkf1lRVAhbRv+tdQS2fr1uPAV2qljz8xzm8xQNdhyBzSaS+iNI
+XmbFk/thw6i0mmHkKfzcO9UXlk5eu+IFey8UFH0Np6lFGDasxP1Xt/PRYbi3
+JahtKyzkCVTJ+Ywi0atbTDx3HQmGZbBsn02cHTxnWmv/J8z09pbWq2C+P+Rt
+1Eh+RwVndODIrnupnrCMaR9dvIKmrkfGBf1I1vMmr/rDOauca/tI/n35CU4w
+P70sgLMe6/KpP/rAzXXlupGw0GZHQxYsOlTQVA33futh/hZmu39n/w5uPeCV
+fRT1lM+PVlt8ivnDYh3k0V+79tbMQJgWLXh4wjkLYvFpeM6kTa4QNvsrZ6QA
+Zu3ZeXcedmt4tbYaZr68uMoB83f5pHPr4bSOuJokmBeVevc2LJgPmbgF29t6
+Jl+H2a9FYV0wHS5+kgULG8JuDMK5f7l4xcCSatXlT+FMJ+5TL1J/2fac27BI
+0pRoRurXrIk4AedriOOUYOpqRcpnsBtlJTeM+ZKjJm/8gf4GlY9zG2DWh2lJ
+AMxot91STOZfnsBoxPyBrz5UiOFc9fqfKpCPp1aM6RmyrldzI2M57oPg7Een
+Yaqc1hEoY3/P+A6yX3qmdZnnMtxXmqbDJWS/1klvRyWa0h/2EzWT32N1oYP7
+Uly3yPrULCzTC9aNZ2DOzIAZDsnnq91yDxWRw4WEg3wy/9VdCXawVtBB4xKS
+/2z6qZElNGWyM9p5GpZW57vWLCHvpfhiKwP0+yxRj1hZLoiZBMse0llDcE9U
+n0MzWc/WPf4ZznP7dMZIxRD1rk5zCuF4kzuNzrBws3K+Bfq57uwXIiQ+XNnb
+Ck9xAstKYLPLkwbR6L8yXD6tGWb6pAZoYz7Vfb7H+sl5xkPHb8OU7PKmCZhS
+OX7HAXmwzj9QI2bPKundgpvbilrIfjdrvXJF5Ce1Lxa2kHUjfp05THMCr1TC
+Uu1964n1Y09+/IHUXyaJlYeTpT+fDyf9iVPVC3HeoN1M5hfEd/Q5bJidLDPT
+J9cnnr9+GP1IJjZfWgTzXD0sJehfMFP9egB50Lz+wTzMl/Y6T+0RLDz3u7wY
+eeTMjubdgVtdV3XGIr835vmD1SS/9kLr3YtxTm23rJ5cf9DRc4sCef79y1uJ
+izi6evKoH6pYPw5T3doWenJ4T4v0Ez9B/altpg7cRfj/cKp7nT3Jr7hy7jiF
+60WpQcdJ/51OGr995FKtBxNq62CZUNV94m8uZfaPh07yRqifExxxCKaf+793
+htliixs7YEu51flZsDDoaGkMzPcaZzwj61K1iPdwu0f7gq4x+n5/cvBXnK/Q
+33vMH5bGnVEMRH1lw5V52bBsMqP7HRzoODD/Gywc6wm/hH7NSiZ2TsJTB6pa
+HDAPT6GvZykH/Yw/7XwOMwpiHDXg1iOpF+Mw/6ZvGYXaZH1vbuMczD8qOrka
+Fn4iHtiNvHjWy54owr3X/lWeAac5mrwl55sF7w7MJ3ned/6uDWY31LWlwMm5
+P4WVETsk/GBL1t/0/TuZ+I2VWjPOZ6wyf07moUQ2aRzYW89wwIbM++vjNwHo
+T2A1PLaWzOOy5N43ZJ6FbR8U4NYo2aMozBuzmf/HNMlXdvdDPfLime0eeEHy
+ZB6eP77ApVwOzG4ZI24MLt36jkt56vjFzRJfmd+5eI5LsbwZwytIfe545PRb
+LsXYX2pjDtNDlj4r33CpqbiInr1wb7HV54JpLtWz5kbpD6T/Ik6/5isulbN8
+5HMyr1A3e1RjikvZKzv8qYp8ZEoJe4decqnexRKhH3GIbc8/4crlJxSvET8L
+TwqGa5cc2DoJUyNl/A2TXCrya4W+zSbkvZIwZYfzWHHqA9Ewmw7LN0M9+6E6
+j5/h3ItNx1zRz6Ca/qlhWCbWVTv7mkspTwaZMzfg+vf8wSfofzByw1emsCyv
+tHj9DJeSBO0R2MHUYTVX31n0pxTBd4Fple/PhCAPraUSyZfEv90ssZvnUsyB
+gSYbsv9trkY33FwZZWAM8x6Mz+ggz4WEUOsVZH9NZxITVi2xfDKOfig/49hr
+2G8ypLGsifTnqMHuw/kxXfTCZZj3YlfYL6j/pin3eTzcyxzr8kB/CslbPviQ
++dxD1+ag//jwGhcbkodCUnch5tUyyJAakuvZcYtTkM/C6+Hba8j5Kheassfh
+25evskh9zaQClRHkd7bfgU2u19q2MWuAS1lXJspbEM8oRVx6hjw2jrW7kf0i
+Sru+g0sdWizkxhIXVShmtGC9NNavhNgrXemvX3D/nNLuHyLWv3Ah5Aae1/R+
+MwOSjzR4gnOZi/e6XGAYMdWxf0c07sexx4E3/+v/+2yk/wOlpIPo
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.683481921675783, 10.839657665452343}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwV2HkgVFscB/CbpYUwRCliJBGJkERxlZJ9QkLKFsmSiSRRzZPsvaYoKpWK
+yhbZipSJlK2MFkKhxWuTJllaed/z132fd879nd8yc+dKxSfU0U+IoijbKRRF
+rpwPk5OTh3RpiglQM2lqq9bmLZ6w1/WRh47iNM/z21baBOaU6Ms/EaOpxDf7
+GmXJfv0dpnHwFbGMjd06sNZh/RB4RoXchhSYNl0Q8q8YzdG+6DVuStzk2/of
+7L9ib934UsQzkS0IE6c5EzHu/JswU+PI1CU4v/Vd+zCHOHf+AzEJmqNXK3rc
+GaYm/eaJStKcl3MlMvTJ/c56AikpmqOpqxCkBGc3baySYtCcqRpPPsjCXG2R
+ljQGTXmkCHxmw143LzhKStOcHLd1BSpkXZU7ECVNU1FvU5nL4ZLix43tcPm2
+tHv2ZN3ZX0NGhqZcImssgmFWj6eFkQzNybzRo5cCswenHl+D9YH6BSJ5xLkS
+TbqwTvmT1fUk3u8qgTBcWux0rBNm5Ixb3UX8/vRtX96S+rZ1r/SFZet/5v1H
+6ln/kDmOfGue6yT2kvMC5NUPwcnDmc3NJP5EOjUF9dV1i68qIPVKzHASlaKp
+yO0MPdIvr889tCz6s1t3LNGa9Es10swY/Wufdue0OInf+av8H/S345uFZoM2
+8vhSe/A7+u9qd8g1CuaIWCadEqepYPmT/2jCVMLXg6FYX6a9aFHPErhk2XEO
+fCnufetRmCPo3dYEVzz4+c4C7tfN+LF+Js0Zf+ycJ0TWOabCI7DJjMypTVqw
+be9YowRNRXuEx50m3iYVWYN8C77e0I+AveR6efWoxySh6qIHzJ9zLH0n6rWf
+YDxxIPu9bzh+RT+i9640tSfr2nlLQtC/8H97elxgtt4Q9xXm63p1UiMAppTG
+U0wwr6m77q3mwPSSTUKH4fgr199kkXXm+/4SzCcrtzn/NsyzHaLrybqdKKOb
++Mi2g1Vw0KNO7igsWO9rlg53TRY8Ekd97Hf3gjfB5+9X5MyDS6aHKVCIF/hy
+3JoJ0yvCAzKRn3WfvbcCzNiTsEEV+X0MThEh9/NNZthfQX1HQns7hxCfuyBh
+hzrq83muOOMhybdqg4Eb+tFpes0+nTitNyJSkqa+35Tt2wwz/+twLkc/j0l9
+8ZkF96cNaM7FvC8fX/W6URP9Kr4SU4R5y22vu7of9hL2uLgXrh4b0NEiDl8Z
+Fwlf0s6f8mox/JQZW0I+H0UjJ0/A1C1PP2XE7zkTv9Iezja/eKgW3jf++5s0
+zKPe9ichn8Jfkv59GjjP8v21CHwf5TQNm2/C/dLlK1ahvpJ7nCdnyXqaimc9
+6hPS2pyfAtN5U2yt0R/3v4eG42FWg71QC+xoz2lIhbkto4/N0N8zB1XryP00
+pzr5Mpx04LpCKcybVtrxDV4xjyp+BDNHjzqoz6Kpe45XFAbJeeu2VZjPwvfB
+ta5PjOT/Z1yUhnlGeyLUYdaD5sQF2O9oHsE2I/Xyz7R8wvx46vFnWDB/5Tru
+WcTflOcr4QazB7YX4vtPKW2SttoMM2c5vXyAee4Y2bPOmvTjaFqKDWzcF35w
+GSxwNzrZinotG4R/zST3m6lPOqAfxi7vLV+R/K3b/G9iviF+c6Mvk355hER8
+Qj/NNunP9yb1fmaOr4FX2fkoysPZRY5TmjDfqPa75c3q2F8weiIW9rvKcImG
+mZML7MMxn2ea+glLYCokzC4LHjYObOxfhHhDInP+YH9hoMjeM3C2a1fRv4hP
+Xb1cuAVmHrzAs8P8DEXCdBfB1ONvUfLIP0nY3/W3GvL1lluQAUveTJroIR6s
+XT0f8/pm8DeiEc52ie/OgX3XL07gwYIJ9xF19O9Rsn1YPcx+uLgmG6474vij
+jdwfIvpyBuah3+uz8x3MXPGgYhvmYVxUd2uC7LcwOX0W9rLpSlck+b4J+3oH
++23tA2JN4P5lSm73sd5xLO+nK8zlFdy9Du99P3k4jNjEY+NBeFFS74sjxIct
+DiyH29ak/+CSfix73dqJeY6yeWtPkHgvEmt3wjtTt/2bCPN9c9IFmOftukTt
+cLL/rLxkGOrrGnCY3AizQsuWjGCe59fZBquR/D5XfIxBfw6ffuYzhPy5HRUC
+abjthoztddIfC8VqNuatWxzx2x/m7O78/QH9/8Zfe3oeTHuEWKbBVg6WSS0L
+sX+u83A4no96+bX2MTAv4cHTVLhz5utdOjC9WEPnFfb7xK1yeq+K/PkFNd6Y
+X1ZHsPYVmF/1eYcY+f374PwqhKxbMuwikW+elVKPGVziYFU/jPV6j19q82HO
+P2qbIlGvXgjbaCrMKGQtmIQP3bon9HsB5lB8dGEc+qPalfP5F8yICN5LYR6h
+sQ6dIthP/TyQuQvWOxBtMAdm2XXfaILvlz+S1CXxTgg3ScjS1O7FD9XsyHkn
+kodXyNKcxzF604Jh3sjG8PVwvvILrWTYa3HvMyM48ZiGXC6JN1D/SQqWGuQE
+VsO6u0YbHyG+K79UtpHED/YqiID/lqW6tJJ4Wr/axDFv/flrXzeQev3HLU7i
+8yem3PK2jKxHRRbNgZktu2VPwVy5LZN4XnMW5puVk3zoKvvVynDxTCrViPRT
+1FS3BP3z40q+JfVTs4JVN6J/3oEu7ApYV9z+ylSsjxjqrw8k/bolfP0a5v1y
+h3K1AkynFIRGYT75j+2sWlXweXe8qhoLu2iyow/C9Hrnljr450KhBgM4uzgn
+SBHxlg1GBH5jIr5O2aVQeKfeSb9KmGnAD+mEH+9wsD9CXBxs6oB8j58X3eDJ
+JPMbaiLvM2fP6IxYwDT/saUb6r1wbizQEM7Wj67owzxnuika65N17htFT/Rr
+fJ9xoDHMrwnqbkc/B4sUk63J+R4L+/TQ/6+ni2u9yXlGSoMH4JSsO68OwIK+
+NfeLMV8zu/0Hssj6vE2OD7D+abhk3m3Yi+1zj4f1zfE2yzph3uL4+AtwwNwX
+7kPkfKOULdvh6rOlgRNkv1Chpgzub+xOTBBFPzgxWwcLkV9LvIS5EMyurNy3
+EvmlXu/J/k7q9cywv4P68l3vL++CqQUaTqaoL9JuytwymHs5L7UO/XmeLfXl
+H5Lf3Ls96BeV9sO0Yz3Mjguq/Ix+7g2xDREm66nUhzOYL6vDxi1cGa5udfWG
+zU/7lnYqoV5F835zWD/Fpc0IZiinq5rC41NP156dj/r2s2Nd4Hd5egdE4X79
+EzLJ8PBsh9L9ijhP8Uh+B9wxtC92UgH9vTz1txHyGSwRcs+A6dL+ikI4xuZF
+gwXMXhrBW4J63Occ3zQDFvhfCy2DS1apJA3MQ72dgc3G6M+bSqrlBUxPPGur
+gbWrxSNfw3zH83f00d+vrc1f/sA8VrnTGfhZsFmZOjn/2AvpQVhStSVjKzn/
+T1iwmhyej7dZH0/DJXlLxtbC5UyH/E6YWhEUsx5mnQ9tlUY9nPZtctrwptld
+QWth3thfpZ+IN7eeOz0AFrz6tbQIviywvB1N1s/tGrGFYzO0fIlZd87NfIV8
+H+3Jat4Olxi3t/rAzhnMe4Ywf3Wt8DvUu2f71sXfcD6jzbvCHy60j/iVTvIP
+2fJMQJ7PxrcMFpL8TRf9SYD5IZrNF0m9UeY6y2DX+yPR0nD2kHeWAP038XW6
+HjkX606uIU3wXcb05V3yqEdh6OId+Ni1onkmcL94yI9HsFpqvN+lOTjfaeDd
+T9ir9sDLWXBJZmaGGZmXCqMtbTacZSqTBet8LnmjBlOcxTbiyNdY5s/7VvTJ
+q6/QIxF2ViuqSob5w2fuSqDetBW9i7xgRopBwkn4ctbRj7YwM/R4yVz062X3
+izwHuN/O0TMdTp5okPAn8Q5vU6dw3SH9+lkqmYtUgo0rrhLfAyZqcaVUFo5m
+4vpUwebHL1x1XzC9yf/fLXjwzGg2eZ/dTjXD0fvXxu2BdQeUk2/By2JuMPJg
+7m/lyRTYsOFeZzvcv33meTL/73vW3fsEs5Qkmz4jn615xqECcv8ehd5DsLy8
+o18/2c+8JTwdzrk5f1EV6YfK4cEk1FeacdxiP7l/6+Z08ry2bZu+cyHM7JH6
+dQL9Cb1ywqoK52TXqnepwfrBr0+akHo2sP2b0N+L1xo6ryNu9sNhmVhp0t+r
+VnNgQUDrZifYLvZNThTi6ioEHCXzGShz+tSNOIKc0TZL8nz0PKVOw2yW93AQ
+fHz2DZPruHJs/Dj5uCYbvz23GFduQFYbeb9vczRcXIm5My49UgqCP7QZfyXf
+c3YVVUc+n1u7hWUlYQHTxS0A58oWSQdW4XdAIKPEEMCBH9VuHYEZU6xfRyBP
+ltCFvwdhql229zv5Pv6Um32RvCdwc8K3o84NqjMmBuDsqD2FdfBA8u2Zqoiv
+25YQKIY+PZHKXO8BM9uqM8gcN/T4PD1N8mP8trKBFzhrXiXPGXb03S5zOOhz
+1F0J1MNk3/ioCLcf03Yzhlm/zD17Ef9LjY6eK1mP97RNgv+7lH6D/J3K/Rne
+ogI/738w2x32KlnVVoh8uZ86MlcSq9/6oAPXFO2OngJnH2sXvYF6bXgJc0rJ
++V2NWoawZbVppy3pz1CCbgP6VVdaaU1+J1m5C/b6kvfvhNaLp/Bew72QWyAH
+9yoUtwbjPZZjMO9UH+IaiKhQBvg7hcVc964etlC/zBwTQ75d6lL34QdH7O3v
+zIBjKzf0w4GtgpC06bg/42gUfu+pE6Kvy/+ZhufD8jq7HXDwk9eruFPRrwBD
+Viu8qGRaboMo8gvVnbUG+TJ9qfuLYL6K6/Z68vdCr01opQjW628mWaPe6Zsp
+9wgR8n4wEtcOL9U/P9MHZvbnujmiX0/GNo7tg+l/s5wewumFnafKyf3ybVZa
+6L98nEytBOKXjH7ujoLFdnkPRMNeFrzsYpgR+SRplORTo+DaDMd6nMtlI19W
+2NbfjbD/jybmW5I/I+xxATzT58KGtajP61PlFvI95u4NNU+EKff/vMlzKGY0
+cVc+zHZ9XUY+T0pWR1suw8z5fPGN8OM5Mvpssl/42tPnqCd4zcZjEjD/4MUB
+F/jup/zhaJxHZSdYdqMftOaLU3eQH1dv2js/+My8jroO1EeZmqybRD+5flWZ
+j4RxnukVpwLS/86KR3lCyPdqmuIuOHkg12HPFOz3jb9kDf+YWPHSkMJ5km+r
+yL+vaNxQmT/+14zqF4747gLTLy3aM3+bUayU5pPx5Hvc43zb76cZpbu8MrcN
+jjHc/2DXONa9jv9dinxGIj8q1I2aUYy8pWHZcHDytZjAETPKS79ZWBn1NO5y
+r9/13Yzi/L0lnwuXH+5Kax+GxRbVLkE/BnPsVh2Hs490DRfDe5LUmq7CzLsd
+bzXIc/OPiI047s/WTjc+AT/rCLW5DvPFilzewxonnwdycB7v3ZIjC/E74Rp3
+hxmKfJi+P7Qs4T+rLU76jyFfcZcPdrDz0+9JjsifMax7wQg2umZrqfwD9191
+OTgd5vcqxVXDrMaLQ7WIb2CluEoW9fO8yiJ94PuhbUHKcElN/KkR5Gs04p73
+BPs5OxsSo+HCjVSaBtxvsU7qL+qNYW2RZOI8gV6sJnlex7wM2FSD/NidWs+m
+wa7PavgiyJ+vJlSVhf4tSTjPE0H9PHWjMfL9oGRmhJ38ivMWBr2aQP+p0rHB
+tk9mFG3w9d5TYutz6n0DyLfmfns9ma/5fqfP/ehX1JQ/ZF4c/RmpK1+YUVRJ
+18A4+f7Pc4sJeIz9ts1DeL+jeNUsBYManCdctjaNnEf+0bL4DsUg/yFL/w/m
++JGP
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.109669593634097, 3.3111655299750593}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000005002`, 17.000000000003638`}, {
+          6.500000000004093, 14.5}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.013283961763, 16.423466606479796}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt1gs0lHkfB/DBamRVTNK4zyAk29hY4WWbWCoMU1u9MitDxawXYVVqvKUt
+yiXRyOayuXQhrc2yuSUz2EopjSxp6xVScstYtRhj7fe/+845c57zOc/8n//v
++z3PM+dhBu/ftk+ZQqGk4UuO/3zWsP85GrEptCRmsiVcEfybmQhu7FJu203O
+W89/oW3MpnjXjPQVwtIg6Vg8bHBU2XEM7kt5uLSVnDeeqnOxZlOiuvZzfoeT
+3F1lmTA3L8FaDsdc72a/hhlpbeZ9cFya2NDuE+z32KjkKjyg5uQkJO5+O7gV
+9rgvr6+BbZYcvzqEeSgbZgOH4Izw4rFIWI+364raWjZF89F46oQhm+I8cO6Z
+HkyRcOuj4W0WIgsjuC+/N3vegE2x6nbPWk7OO8src2H/zGsTClwvQTfvki8c
+/6dn/QtYekypiAk3mpZRqmHG011O2rCEUbQ2jTj8OnM1fG7h3/8Lhguvf7yc
+D/soFV10gblWCT3V8IPuxlZj8vucnWGrMc8RYYa7Bszv0LWqhL9ijoeqwhL6
+XTtP5AlLKrxPzkvbUu4Nw08+kduakvV0v59Ok36jN2VthmUfAvYtY6C/2X4F
+6Uvqkmu/DU5/0VJ5i+ShiaKT4Y+ozz1Ukdfy2aJ9lbDM9lrdDrgwvdSmDabn
+mJdcgyvWZfc9gWnOe+PmYf6Qp/A+bFamc4HDwvq9bKUK+GcetSQblq1w330a
+3v4wvLwL3lwRwNkBB6WuMf3IBv1qttvowW8U/kE6xOmrmm6S+V0UDCZcqLtx
+0B5+F7Q/0Ay2+cJ1Voy84kf9pxhwRpVNvR/s+qd1BFnPZdXPUeEFzn0XKhzl
+4bqlE/11yxe/fov9NWl3RI3wt/yZaDFcOLV2pg3WWKJbfR6uUIstnIMV+ju3
+7Cf+w6rJi1x/8jORL0z5/VFVLUx/pZ7jCDOsTKxdMF97/+0OFsk7Vpv4BNb0
+vqVkB9dWp59zQL7cBBpzE9lPP/Mb0odC7Mb5mszjMtv2K3xx6Zl7ObDgatpN
+XSabUtbweKEbZjt1VH8JB9+t2bGM5NUY+nAMng6KnLKH+xhuwfnwv2TvbvDh
+1pdDT0rg7HKdlhRYkMpfWQxHJ3cEVsFvnybJU+GVFw6298DSuWH7UHiINZI4
+C0s0jwfYw8xHK1y1P8X8IfoVCswXphWhYwnPTPw8eRv+/NNooR2c0StgHYWn
+T0bsdITV4i0TN8JT3yrk9rCfcm7/x/A7nw3ma+G+G0Y5TejHjL70vTHMrmsI
+SYKd/ytuXwInCAziw+C9hrH+ZB4K97vAKNh2XDtgkDjiVekFmGO857KU3B88
+wUw/+X+ozRoVw/zz1xPNsF/I9wtNJK/aiRsH9sKlV9xjy0nesuK8cjixy3eW
+ePMiIzbJR9vFGrwJl9Zwed7I7769incHln0z+zgHtjNn0V+Q9ZLckj64Wf9c
+KJlvRvuwt6EJnqeJrPUGmF+mQmv0hsPWCVa5kb68NG6Hwz7v5zPDYUsvwzEh
+zIu8U5cNl35QGjwMfzYS3y6G+SUhjqHw4bwCrTfETqGx7jB929g4dR3y9pjK
+deCF7WeXmsE9I5XDvZhn8fH8GEeY8V30u0J4z2SDcBNc+9JXPQg+3eU4zYH5
+lVY8U1he0McgrghJ7x1F/rs/ZBe4w5rOX65vhAcb24UOsKV6WNz38IByuKYF
+7ODwajoVbhZN/EEj61OarIlv2dNk85hXwkvLyYN5nzMeDMM2X//2SwN8Ymu6
+Rw+xuSt7HLbw2UJpI9b1vG2FeeoVDttbYIa1BSsG1vPjcJrhqCu8aTHsK3I6
+30r63FOmp4n8T6+1hHXDUqqfcDccpGZycRQWjOxbUQJLd4lFpC+/gh2Ob+CX
+/bqc1TB3nN5MN0UfAVsP+cIZWXQ3Z3i5/6mjccTPb6zxhYUm05eL4VbjFb1c
+OL83xuAhud4vgbUb4dFIKWPq774slpnCw5PNWjq2uJ/GFutNYz/qkasptrCf
+iWOnBD7b0n/QE6Ycet12AmYOVTH9YUbn4hk3+AXrFDsYdjidGasK3zu2bpq4
+NNDS6yF5PqNGu76CEw6uWk+e91kRtYMLF/pORsbBTRmqtmy4tk71wB7YMrgs
+2Zr4nv3Ubji/xuPsSlgmCij+D0wtitJSgQXhrRuS4ZmB4m4Z8lyoUc+shhcl
+u50cgAUP3h+YhOMyziQ9I/lVyqnrMZ8rs3Gum9x/Z0xbSB5P1+pLz2GJWWxD
+J3xpktI1RPo84NFjgn74db2H5sj60dfUCHhJTQGV9KX2Q9HJH+Gwyw659jC3
+cxl1EFbRujzOI/O+UZ9WN0PfI15HTsJxd8symXBsXkTyj7BkQEPFAuYV2Pj0
+kP6UY2L04b9fWuz+/75ixv4LgmodCA==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.540947421444628, 7.668074278969414}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwtlA1Qk3Ucx/9jMJ7xdihk0J0xYSF5pkD4kkD9B4o6phBQSxIdeCqWtIaK
+XiT9DaTi1qzbialBgI4DIZyhRfj2QHBDXhISktsGTba43YGSynkNUPr9vJ67
+53nuc9/v//f63LMkR522240QshFufDMBPiIpeX75UKbeM1BTCVw1ezHve2Dr
+UTHlUR/qKfbzpUxr7B+0A7Nd2vupvpSc/ufeJi4K2FuRpQK+rDj8yXJgamLG
+WGBOVilPAbatCZqzQzydMq9ejf7gi2y7DyWmJyertcBEL/3igjdlW94YzDEA
+V+m8lw55UXJe3CP/FePl5rkcYkpWzE5MmFA/v/SqnaNM0ByycADjW21jFk/K
+XqRzHYMYTxC0clhEmUqj2XgH842ER9k9KDGOPwjsA5ZcjzKLgPWLwqzt6Dc5
+/RTulO0zaA9fAVYlXklqFVLiCFjpeF6P+uN1SiFl60j/6pPAfGZQbTjo+cHR
+35Rg/tIIyTLQTbf7/A+h/2wqlw1sTv66dy/mS9ig6wKe8VlwMwvzLcruf9+d
+krD2OV6J+Y53+Qd6UCa8wRe9i/FP/P7MCfUFJq3XZKLfWrhgQERJ11l+eBfG
+F+2cavOkpOWue2s+zic+7i8jR8ntY3S0FM+rB+L0MC/ne8qhH7B/wy+TO2Ce
+wiWGmWvIhw50e3lT0nfjaeEIxmv08DkB8z/4eUUOiQbee7P8b+BbyroKKTCT
+X5d5wb5CSzt9NwOrlKuEs6C7irZ9ux+YGOtFLcBRB4b9dejP8GtIBL6W1lDW
+CCyJeJJbA/k1Ja+8bML4rbZqM9R32RzwwgjGO3c1cxr2WXzm04n76G/TOv6F
+/h6+FveOC/X5uYJH0H9MgUw2j+wMbJuAeY1WJ5mRedv4wSmY55Y/n5XMYvx7
+wXc8gZuNvZZHwPT0ptg3YV8RRyLrxpHF051n3Ciz1a0y30X/BtVkGPB8fHwR
+1sfveSlhVEBZwJj+0s/Y39HwxF4BJctWp5bXAtvKHq99AOwufZr0HXJ37JoE
+N9Czyru1eF7xOLIDuLJ+m/g4ziMxW/oR7P+3mvH2Y+hPL9m+FurTJQeVFqNe
+MNMRDP3kxj+8UIbnNRYFB99v+Tnr1lOYPyAtwwXsmtyfXo/1hiZLxmA+hVzt
+Th770W1NaYH9r0/ptFvQ/3aZPB/mm7V4RwjOgx98q8nTi7KQpi9fXfw6+KWh
+Bg3sY3lM9wxF/rAtugH0ZoX8yG5k0/C+S6BP/Wj57CtgW9UKbTHoMkfGdAOw
+KqJxYRjoevbTrR5g8kd6BX5vqR8U+TuBJU2dPWbu//9KDDC+OfofUZmlXA==
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.931801948466052, 1.6274136392623755}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwl1wk8lNsbB/ApQqUaSxpbTZImhKSM5WoqIVFjSZIyZBm3zRqlxb3pUknK
+kizXZMlSoRKKNP43JclSaFxi1IgSzbU17f/fudfn4/P4et855zzPc94zM4t9
+Djr7TadQKAP4JfG/Hz3Wf3EFi1LFdB2wgEMqX1i267Mo7IjQviDY1fzjxmw4
+SHJvdhbsc+Oykw8sXhb1uhbudS0aWgjzhx/ZdMCHNhV2diK2joxf6EOMS7Bd
+EI8YNO6a/grx0T5hHQtRrmiovAVxdL5gfEoXrz80fLMC/lOz/l4ZLHx+sD0J
+HnrC/HkQFnx2qefCY2dkg9fA7H71301hjltP+AyYfptjNx2+3tGo1rsc8wUU
+H3+K/+fYhc+sg+3qczJS4NbJ1b+VwDSlHPk98K3oi65XYV5gpgYZN91YabiA
+XL8a0kOFxZO/2t6CW89nzJlEtLQtU3iIyImZRhUh2hz5Jb8bUdDV8oLMm6BY
+tPgTovuJ/7UMICoqLDuujHHK2nd+k8Amtmf/XAmnaRm3L0Bk/aMU6EDyT3Da
+sY78v069xweR8+3IojDEzpAXWqGIdqqdHiWIIpF+YRTJ//3xsRHEKVeTZcR0
+Z8NUI+TvX2JQFQQ3jGp3hsIlppNdO2FGnIPlHdizYEWEJVylVuo3RuoVyBhU
+JPN1qKovRx85XTvf92GdjI3TudtJ3y/ycvJgiuq9kihY8vV4rA/MKlh8Nxk2
+eSuzXR0WJ+jXX4FLpp5JtTGQ77TK+By4dXEL7xQsKfGwuwTXcL9utoA5Ujo3
+ouHU1B20iWUsipGb44AXHGd1SXITFicvjlkDP08ZKj4E2/U3hMvAzUtlCzbA
+acHew21Yv3DzzHlqcMMcT+sMuHGqJPeLDotSaCWZ9IVl1mfWDMBpsX3BK8n+
+Gm6z7obFs97KS8F/tMRW/w3H+U2+7UYdErZzzN7Awki1jvtw8tfaw+MwqyZt
+SzHc49A/OBPz8YIe7cqBlbeuKtWGCz87plwl/bi8pnkdTLfYMKsSHvvFTM8L
+dp9h7/ICtrorU3wE5rA747/A61feXneR5OPr4aOH9WjL8hTyYDlDaY1/1/9U
+GFYCJ45FleWQfpkxlcpIPXRHukRw8Y3vowVkvvDoFQzUZ/qGnQdTYL6Wq8mv
+pJ9pR/wj4ehj/8QUwrQFHCUnWNBp2iOElR28F9FhRl+1iQLOgXY2+9JbUo/7
+Rd2m8NSdHGE+zJ3p/LsL3PtD6poXTDO6vnkPHCkY6p1P7k9a3+EPa1u/PN24
+FPPR9C12w603DZ+cgLnS71Xs4dHjzuWmMLt39WE9eNYbKdsJbewvn5+9UrB9
+zYhDJVy4XV6rA+uTmaW09Xc4yL7Lj+yvmLKJk24wrzl62l5Y3nj2XyawEf9c
+gAlcdkrlqCbs7nlLngIvjMm6RYWZkYFbWlEvN/rT73Ngu/exHgVwYWJxvDKZ
+7+g9WixsHZlqsARmtAlUguHk7pNeTFjsJoj0J/ttuGi7M7n+Q3okgPRHZUDz
+IBxp8jkvnJxz2Qsy48l4FVku58l+S7tTXghzX240KoeVu7Lc6+BEzYYfr+ED
+F3ZntsOc4rUaaljvxODMJiHJ58HYefL8SVqfHRWR6/+ULroMJzpfzuglbmvx
+74HVqk0jm2H6kZHRhajfH00Hmm6T+WvcNpH6N8h11iYQa69gpMEJUZv6vUg+
+q00ONcJ5TbJ6DFjY57ZvHL5uXjU6tAT9uTUjT8EAfYl90JQL80ZLl2rDdM3g
+HA9Y3FgXogvb2TcemgfTz/HPkOsxguN+D7VQb97WYUU484nh6SjYaO/Cs1MY
+3+DsjYE1MHfbeEsrbBKh4yJZjP0/Yh6dC6c+p+2tgykny8qCYLH2s4gkmNf2
+qsQc1jgmFXAQpkmz35H9kjBvF38bbDQR0dmMejiPi7JtYIaNWXcWbMQQl68j
+468yNA6F3aw4G8l1dvjVdjZcXqOz2oVclzf3Z8LF8dUKAbCd/8ASPThHmro4
+GmammL/893xc7xuaCUdmsZrJfqO223y6CwdVOAo2k/Nstzihk9z/5bvtAdjn
+3UIdMbG58Zd0WGR7/rE08o972OzdSsaXrLmpSOoh5F+SRz76mfv9aTAtN/+A
+I3ked9g/UIYj19qeToR/sFMnZOCqLLnQF7DMAUHBKMZ3n7PhrhKpN3PZ4FNY
+OC9Reivc8Heafjapz9fPRifh5I9uOwJhyWFV3xLSr4a463okHzcLegtcNRlc
+MUjH/RkNLiJYfqW9XTZxtZPvCKxSF+7tCieeaTR5D3NThWozYd7pCp1u+FtA
+rtaJRai/p5lKHRyva5A9vhDrUTdxyiLzXXkZEgpT/Z+eDobLVw18nAYLovof
+roVrbmi0XdFEfXhmG2fBNEGS5jbYyEsjjOSb5lCnpAmztQ80ZMFDNlc1vmhg
+v6Sb3dgLh4WlPB6G7VrKuWthued1zWKYY/iXtDrcM9dfW5aM9/qtGfnc477l
+m6w+XPX9yC4x+pFJvablCdt9G3H5AOu31hUlwWVpZ2InYFZk/6lmWKJjIJLD
+6xPvWh6Tw/rZuTQBA6Z4WHr9AhdSm3eQ85K1qt4wELYLbRr7A7Ze682Ogxnd
+Bc11cPmtnPxLMOWM+Nk05OsgsqpMhrma9ExrUj/llCfHYM6ua49j4aaPaR+d
+SP2WsLobYN8lAcoKMD9HN2KGIeoTRv9WjfXRa7sDLWCjL9MsXWHuxMVHXFhU
+N1u3B/UYurXu81nYPbP3oRss3v93Zy78Ibgx+bE61if0KSqFy2iOscZwdLqD
+KTFvQ9SjDDXMM/i4PgfOC/l0ThYWTErmk/FqqCY/D6tiPm39XYFwpnb91BQN
+7wPyHsy1MENwRPQbLOd9NGMuzFzUX6AJG4153e8i+4+eFNK0AOOdeEjJhdvT
+k2+eh8v4Fd37YBY//UcAzNq9pNaM7O9v3arbyP0pRZLZcNDn/A/EnAs38wZI
+v2/8mcyFGfvuJzTAnh8sIs6Q1z9sX1IBC5mFnlUwP7/Rp5Scf1Y/E0dhdtNk
+Wzk5P4fOzFqO9fHZ9YcfwfJZh5L2wENFgaI3cIy//eRlsv7jKVrymJ8fvF+7
+geRnsrTjF9KvttHA97Awc5NFBFy2fOD0dzg6Ote6AqZ2CEQ/YDo95aoEjlve
+d/EDGe/yyDjpn8h7S0Q9zON/vnMMllO3cjgNs1I/naqGaRLPfCYZz29g6Tjc
+lPr9XTvWL1nYuVnBCO83fZdsOHCYXjdNG54wdk19pYL+2M51XwnnnYjbyIap
+d3p4TOKt7gY187FPDR0bzGAqfyBoKcycXfPaBP6mW2qXqIz6vpHboAtzEp8L
+KXCarVWEGkxX/8qIUkKecp3rZWBfjYrr0+G45uIVrwxJXV8cSFdEHqFLqUVk
+/yhvabSG3VcpxoXA0pypHVKwkenOmZZw5JqBwU4F8j0iVlYOLjd083sA82K4
+PQLyfNRuGK6GmYOtpWVwnkzNX40wherkfYGcN9/PRb2DW1NehR0l+2lB2ldl
+jG/nx5AKhVtX3C7cBHOfOpaEw2IDcdxJeGiLfUYMbLm3cF8tub/laFC2Aflc
+UKU6Ra5vst5RDyur6UboID/ex6S5k6TfXicrN8OSn9oifdIPY8VoH5hiXtv1
+KzwUeXE2F06M7S29Die+a7HxgOlxkz8+wtHTVd+aKpHzUpOhivrxPfJDKDDz
+0vkM0p8gR9+t5Yrk/cNg9TbST/60O66KpM9PRvbDwjub8t8gX5bW+re/wa5X
+9nXugY3M4oMS4arKL6kCKtZbUqFyGT76rPLaRji66np2Brke4ey0ex55DmMU
+0mCea/8547nIP8zqZgLpb/jWEOqc/743RsNy5A951v8BbdEu9Q==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.235352284295374, 12.365864399803508}, \
+{-1, 0}], LineBox[{{6.5, 7.4999999999976925`}, {6.5, 14.49999999999251}}], 
+        PolygonBox[{{6.5, 10.4}, {6.9, 11.6}, {6.1, 11.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.355394937518537, 13.000446064907765}, \
+{1, 0}], LineBox[{{6.4999999999976925`, 7.5}, {13.49999999999251, 7.5}}], 
+        PolygonBox[{{10.6, 7.5}, {9.4, 7.1}, {9.4, 7.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 6.5548}, {0, 1}], 
+        LineBox[{{6.4999999999976925`, 14.5}, {13.49999999999251, 14.5}}], 
+        PolygonBox[{{9.4, 14.5}, {10.6, 14.1}, {10.6, 14.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 13.5548}, {0, 1}], 
+        LineBox[{{13.5, 7.4999999999976925`}, {13.5, 14.49999999999251}}], 
+        PolygonBox[{{13.5, 11.6}, {13.9, 10.4}, {13.1, 10.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.5548, 11.}, {1, 0}], 
+        {PointSize[0.04], PointBox[{6.5, 7.5}], PointBox[{16.5, 3.5}], 
+         PointBox[{6.5, 14.5}], PointBox[{13.5, 7.5}], 
+         PointBox[{13.5, 14.5}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T13", " ", "P1", " ", "N25"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdieg/gjfhfihjij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdieg/gjfhfihjij.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {0, 0}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJxN1Xs8lPkeB/AnlEnK1KIhMqF1GYWjNkXmsYhdjuSyCbUT0iCZIpelNbax
+0UVYplmpIym32GFVhEztii2Fs9albOueXCKVS2k7n985/5x5vbzm9X79fs/v
++/1+5nke6/zD3Q/IURTViD/yTc19xEeD/t+3Nk0xnKbWhMPC2hdlmmtpiqdf
+caWfRVOtT8QlzvBcnuztPtgtyz0sA5ZYjaqPrKYpy/PcsxOw92OXlES49+a1
+dh8dmuI/+95wIzyScs6jE5Z0nFaeUqcpwbu99aZsrO93iGyCu0xGi6JhanNP
+1S3YMsTI9i7cut34yzqYut/grLSOpnIPfVPZCUdaM8Ru8Nxu358UcH7TFTdG
+BjyybmKTLewWcri2GW49VpubAscHUSs/wow9k+3dcPMm9dsGuuiX5RS4AfNM
+FQc/doCbfHfVJ8BVZUWt3vCU67B/M8zqiK7kwUyW9RIV5OOmMvxsLxyz4vx9
+O5JXQLjuLpih+NL1IExPZN60gi1Ln89Hwcy4SI4OPHeic1wAL3h17vlA+j1X
+YOwJ117ydesi/c5MXGTDlHWMTQWZ73GjRifqJ9uZ7zsLC30Eu2LheAven6Gw
+5Y7R+0vhyuroxp0wJQotP435Nr28OrUNZrql9cjBgUuNBzbCvIIriRHIL2ZL
+TosJ7P30pFa/Gk25GDUJN8Nm0pntHnByqtjjC3iqZszvoSp+NwtvCz45P1S1
+yBUWVkuy0+HeB+q9vZ/QlDRNIPkVFhwIMEiC4/t1npC8KSPW+HY43ymtyhbz
+V8VaP1CGA10tvkiGDWM94qdX0ZQyL/1IG8zeP/77S3jc9+6Cph7uixfxNRT2
+V56cKPeHBVVHbT+FGYuo0Gswv0jpuh9saX/OeBD2NtDLyoXddDlmmvrYbzOh
+/JLUW2+l5Ai3MjTv0eg/074qPximDEY3ZMIKAxzPRDjtm733BmDBOlHPWZjV
+VsLiIA+pQkzEOZgXZrI2CO4xCrjzPSxM7t+eDh96UfYwkniTYlIRLFRXZvjC
+fGutu9fhTL0xUyu464yX+EeyXnt/+2pY8ijybDg53+mt1yv0L5lOYZnCaUot
+0ofwnDs/tZvkf1lRVAhbRv+tdQS2fr1uPAV2qljz8xzm8xQNdhyBzSaS+iNI
+XmbFk/thw6i0mmHkKfzcO9UXlk5eu+IFey8UFH0Np6lFGDasxP1Xt/PRYbi3
+JahtKyzkCVTJ+Ywi0atbTDx3HQmGZbBsn02cHTxnWmv/J8z09pbWq2C+P+Rt
+1Eh+RwVndODIrnupnrCMaR9dvIKmrkfGBf1I1vMmr/rDOauca/tI/n35CU4w
+P70sgLMe6/KpP/rAzXXlupGw0GZHQxYsOlTQVA33futh/hZmu39n/w5uPeCV
+fRT1lM+PVlt8ivnDYh3k0V+79tbMQJgWLXh4wjkLYvFpeM6kTa4QNvsrZ6QA
+Zu3ZeXcedmt4tbYaZr68uMoB83f5pHPr4bSOuJokmBeVevc2LJgPmbgF29t6
+Jl+H2a9FYV0wHS5+kgULG8JuDMK5f7l4xcCSatXlT+FMJ+5TL1J/2fac27BI
+0pRoRurXrIk4AedriOOUYOpqRcpnsBtlJTeM+ZKjJm/8gf4GlY9zG2DWh2lJ
+AMxot91STOZfnsBoxPyBrz5UiOFc9fqfKpCPp1aM6RmyrldzI2M57oPg7Een
+Yaqc1hEoY3/P+A6yX3qmdZnnMtxXmqbDJWS/1klvRyWa0h/2EzWT32N1oYP7
+Uly3yPrULCzTC9aNZ2DOzIAZDsnnq91yDxWRw4WEg3wy/9VdCXawVtBB4xKS
+/2z6qZElNGWyM9p5GpZW57vWLCHvpfhiKwP0+yxRj1hZLoiZBMse0llDcE9U
+n0MzWc/WPf4ZznP7dMZIxRD1rk5zCuF4kzuNzrBws3K+Bfq57uwXIiQ+XNnb
+Ck9xAstKYLPLkwbR6L8yXD6tGWb6pAZoYz7Vfb7H+sl5xkPHb8OU7PKmCZhS
+OX7HAXmwzj9QI2bPKundgpvbilrIfjdrvXJF5Ce1Lxa2kHUjfp05THMCr1TC
+Uu1964n1Y09+/IHUXyaJlYeTpT+fDyf9iVPVC3HeoN1M5hfEd/Q5bJidLDPT
+J9cnnr9+GP1IJjZfWgTzXD0sJehfMFP9egB50Lz+wTzMl/Y6T+0RLDz3u7wY
+eeTMjubdgVtdV3XGIr835vmD1SS/9kLr3YtxTm23rJ5cf9DRc4sCef79y1uJ
+izi6evKoH6pYPw5T3doWenJ4T4v0Ez9B/altpg7cRfj/cKp7nT3Jr7hy7jiF
+60WpQcdJ/51OGr995FKtBxNq62CZUNV94m8uZfaPh07yRqifExxxCKaf+793
+htliixs7YEu51flZsDDoaGkMzPcaZzwj61K1iPdwu0f7gq4x+n5/cvBXnK/Q
+33vMH5bGnVEMRH1lw5V52bBsMqP7HRzoODD/Gywc6wm/hH7NSiZ2TsJTB6pa
+HDAPT6GvZykH/Yw/7XwOMwpiHDXg1iOpF+Mw/6ZvGYXaZH1vbuMczD8qOrka
+Fn4iHtiNvHjWy54owr3X/lWeAac5mrwl55sF7w7MJ3ned/6uDWY31LWlwMm5
+P4WVETsk/GBL1t/0/TuZ+I2VWjPOZ6wyf07moUQ2aRzYW89wwIbM++vjNwHo
+T2A1PLaWzOOy5N43ZJ6FbR8U4NYo2aMozBuzmf/HNMlXdvdDPfLime0eeEHy
+ZB6eP77ApVwOzG4ZI24MLt36jkt56vjFzRJfmd+5eI5LsbwZwytIfe545PRb
+LsXYX2pjDtNDlj4r33CpqbiInr1wb7HV54JpLtWz5kbpD6T/Ik6/5isulbN8
+5HMyr1A3e1RjikvZKzv8qYp8ZEoJe4decqnexRKhH3GIbc8/4crlJxSvET8L
+TwqGa5cc2DoJUyNl/A2TXCrya4W+zSbkvZIwZYfzWHHqA9Ewmw7LN0M9+6E6
+j5/h3ItNx1zRz6Ca/qlhWCbWVTv7mkspTwaZMzfg+vf8wSfofzByw1emsCyv
+tHj9DJeSBO0R2MHUYTVX31n0pxTBd4Fple/PhCAPraUSyZfEv90ssZvnUsyB
+gSYbsv9trkY33FwZZWAM8x6Mz+ggz4WEUOsVZH9NZxITVi2xfDKOfig/49hr
+2G8ypLGsifTnqMHuw/kxXfTCZZj3YlfYL6j/pin3eTzcyxzr8kB/CslbPviQ
++dxD1+ag//jwGhcbkodCUnch5tUyyJAakuvZcYtTkM/C6+Hba8j5Kheassfh
+25evskh9zaQClRHkd7bfgU2u19q2MWuAS1lXJspbEM8oRVx6hjw2jrW7kf0i
+Sru+g0sdWizkxhIXVShmtGC9NNavhNgrXemvX3D/nNLuHyLWv3Ah5Aae1/R+
+MwOSjzR4gnOZi/e6XGAYMdWxf0c07sexx4E3/+v/+2yk/wOlpIPo
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.683481921675783, 10.839657665452343}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwV2HkgVFscB/CbpYUwRCliJBGJkERxlZJ9QkLKFsmSiSRRzZPsvaYoKpWK
+yhbZipSJlK2MFkKhxWuTJllaed/z132fd879nd8yc+dKxSfU0U+IoijbKRRF
+rpwPk5OTh3RpiglQM2lqq9bmLZ6w1/WRh47iNM/z21baBOaU6Ms/EaOpxDf7
+GmXJfv0dpnHwFbGMjd06sNZh/RB4RoXchhSYNl0Q8q8YzdG+6DVuStzk2/of
+7L9ib934UsQzkS0IE6c5EzHu/JswU+PI1CU4v/Vd+zCHOHf+AzEJmqNXK3rc
+GaYm/eaJStKcl3MlMvTJ/c56AikpmqOpqxCkBGc3baySYtCcqRpPPsjCXG2R
+ljQGTXmkCHxmw143LzhKStOcHLd1BSpkXZU7ECVNU1FvU5nL4ZLix43tcPm2
+tHv2ZN3ZX0NGhqZcImssgmFWj6eFkQzNybzRo5cCswenHl+D9YH6BSJ5xLkS
+TbqwTvmT1fUk3u8qgTBcWux0rBNm5Ixb3UX8/vRtX96S+rZ1r/SFZet/5v1H
+6ln/kDmOfGue6yT2kvMC5NUPwcnDmc3NJP5EOjUF9dV1i68qIPVKzHASlaKp
+yO0MPdIvr889tCz6s1t3LNGa9Es10swY/Wufdue0OInf+av8H/S345uFZoM2
+8vhSe/A7+u9qd8g1CuaIWCadEqepYPmT/2jCVMLXg6FYX6a9aFHPErhk2XEO
+fCnufetRmCPo3dYEVzz4+c4C7tfN+LF+Js0Zf+ycJ0TWOabCI7DJjMypTVqw
+be9YowRNRXuEx50m3iYVWYN8C77e0I+AveR6efWoxySh6qIHzJ9zLH0n6rWf
+YDxxIPu9bzh+RT+i9640tSfr2nlLQtC/8H97elxgtt4Q9xXm63p1UiMAppTG
+U0wwr6m77q3mwPSSTUKH4fgr199kkXXm+/4SzCcrtzn/NsyzHaLrybqdKKOb
++Mi2g1Vw0KNO7igsWO9rlg53TRY8Ekd97Hf3gjfB5+9X5MyDS6aHKVCIF/hy
+3JoJ0yvCAzKRn3WfvbcCzNiTsEEV+X0MThEh9/NNZthfQX1HQns7hxCfuyBh
+hzrq83muOOMhybdqg4Eb+tFpes0+nTitNyJSkqa+35Tt2wwz/+twLkc/j0l9
+8ZkF96cNaM7FvC8fX/W6URP9Kr4SU4R5y22vu7of9hL2uLgXrh4b0NEiDl8Z
+Fwlf0s6f8mox/JQZW0I+H0UjJ0/A1C1PP2XE7zkTv9Iezja/eKgW3jf++5s0
+zKPe9ichn8Jfkv59GjjP8v21CHwf5TQNm2/C/dLlK1ahvpJ7nCdnyXqaimc9
+6hPS2pyfAtN5U2yt0R/3v4eG42FWg71QC+xoz2lIhbkto4/N0N8zB1XryP00
+pzr5Mpx04LpCKcybVtrxDV4xjyp+BDNHjzqoz6Kpe45XFAbJeeu2VZjPwvfB
+ta5PjOT/Z1yUhnlGeyLUYdaD5sQF2O9oHsE2I/Xyz7R8wvx46vFnWDB/5Tru
+WcTflOcr4QazB7YX4vtPKW2SttoMM2c5vXyAee4Y2bPOmvTjaFqKDWzcF35w
+GSxwNzrZinotG4R/zST3m6lPOqAfxi7vLV+R/K3b/G9iviF+c6Mvk355hER8
+Qj/NNunP9yb1fmaOr4FX2fkoysPZRY5TmjDfqPa75c3q2F8weiIW9rvKcImG
+mZML7MMxn2ea+glLYCokzC4LHjYObOxfhHhDInP+YH9hoMjeM3C2a1fRv4hP
+Xb1cuAVmHrzAs8P8DEXCdBfB1ONvUfLIP0nY3/W3GvL1lluQAUveTJroIR6s
+XT0f8/pm8DeiEc52ie/OgX3XL07gwYIJ9xF19O9Rsn1YPcx+uLgmG6474vij
+jdwfIvpyBuah3+uz8x3MXPGgYhvmYVxUd2uC7LcwOX0W9rLpSlck+b4J+3oH
++23tA2JN4P5lSm73sd5xLO+nK8zlFdy9Du99P3k4jNjEY+NBeFFS74sjxIct
+DiyH29ak/+CSfix73dqJeY6yeWtPkHgvEmt3wjtTt/2bCPN9c9IFmOftukTt
+cLL/rLxkGOrrGnCY3AizQsuWjGCe59fZBquR/D5XfIxBfw6ffuYzhPy5HRUC
+abjthoztddIfC8VqNuatWxzx2x/m7O78/QH9/8Zfe3oeTHuEWKbBVg6WSS0L
+sX+u83A4no96+bX2MTAv4cHTVLhz5utdOjC9WEPnFfb7xK1yeq+K/PkFNd6Y
+X1ZHsPYVmF/1eYcY+f374PwqhKxbMuwikW+elVKPGVziYFU/jPV6j19q82HO
+P2qbIlGvXgjbaCrMKGQtmIQP3bon9HsB5lB8dGEc+qPalfP5F8yICN5LYR6h
+sQ6dIthP/TyQuQvWOxBtMAdm2XXfaILvlz+S1CXxTgg3ScjS1O7FD9XsyHkn
+kodXyNKcxzF604Jh3sjG8PVwvvILrWTYa3HvMyM48ZiGXC6JN1D/SQqWGuQE
+VsO6u0YbHyG+K79UtpHED/YqiID/lqW6tJJ4Wr/axDFv/flrXzeQev3HLU7i
+8yem3PK2jKxHRRbNgZktu2VPwVy5LZN4XnMW5puVk3zoKvvVynDxTCrViPRT
+1FS3BP3z40q+JfVTs4JVN6J/3oEu7ApYV9z+ylSsjxjqrw8k/bolfP0a5v1y
+h3K1AkynFIRGYT75j+2sWlXweXe8qhoLu2iyow/C9Hrnljr450KhBgM4uzgn
+SBHxlg1GBH5jIr5O2aVQeKfeSb9KmGnAD+mEH+9wsD9CXBxs6oB8j58X3eDJ
+JPMbaiLvM2fP6IxYwDT/saUb6r1wbizQEM7Wj67owzxnuika65N17htFT/Rr
+fJ9xoDHMrwnqbkc/B4sUk63J+R4L+/TQ/6+ni2u9yXlGSoMH4JSsO68OwIK+
+NfeLMV8zu/0Hssj6vE2OD7D+abhk3m3Yi+1zj4f1zfE2yzph3uL4+AtwwNwX
+7kPkfKOULdvh6rOlgRNkv1Chpgzub+xOTBBFPzgxWwcLkV9LvIS5EMyurNy3
+EvmlXu/J/k7q9cywv4P68l3vL++CqQUaTqaoL9JuytwymHs5L7UO/XmeLfXl
+H5Lf3Ls96BeV9sO0Yz3Mjguq/Ix+7g2xDREm66nUhzOYL6vDxi1cGa5udfWG
+zU/7lnYqoV5F835zWD/Fpc0IZiinq5rC41NP156dj/r2s2Nd4Hd5egdE4X79
+EzLJ8PBsh9L9ijhP8Uh+B9wxtC92UgH9vTz1txHyGSwRcs+A6dL+ikI4xuZF
+gwXMXhrBW4J63Occ3zQDFvhfCy2DS1apJA3MQ72dgc3G6M+bSqrlBUxPPGur
+gbWrxSNfw3zH83f00d+vrc1f/sA8VrnTGfhZsFmZOjn/2AvpQVhStSVjKzn/
+T1iwmhyej7dZH0/DJXlLxtbC5UyH/E6YWhEUsx5mnQ9tlUY9nPZtctrwptld
+QWth3thfpZ+IN7eeOz0AFrz6tbQIviywvB1N1s/tGrGFYzO0fIlZd87NfIV8
+H+3Jat4Olxi3t/rAzhnMe4Ywf3Wt8DvUu2f71sXfcD6jzbvCHy60j/iVTvIP
+2fJMQJ7PxrcMFpL8TRf9SYD5IZrNF0m9UeY6y2DX+yPR0nD2kHeWAP038XW6
+HjkX606uIU3wXcb05V3yqEdh6OId+Ni1onkmcL94yI9HsFpqvN+lOTjfaeDd
+T9ir9sDLWXBJZmaGGZmXCqMtbTacZSqTBet8LnmjBlOcxTbiyNdY5s/7VvTJ
+q6/QIxF2ViuqSob5w2fuSqDetBW9i7xgRopBwkn4ctbRj7YwM/R4yVz062X3
+izwHuN/O0TMdTp5okPAn8Q5vU6dw3SH9+lkqmYtUgo0rrhLfAyZqcaVUFo5m
+4vpUwebHL1x1XzC9yf/fLXjwzGg2eZ/dTjXD0fvXxu2BdQeUk2/By2JuMPJg
+7m/lyRTYsOFeZzvcv33meTL/73vW3fsEs5Qkmz4jn615xqECcv8ehd5DsLy8
+o18/2c+8JTwdzrk5f1EV6YfK4cEk1FeacdxiP7l/6+Z08ry2bZu+cyHM7JH6
+dQL9Cb1ywqoK52TXqnepwfrBr0+akHo2sP2b0N+L1xo6ryNu9sNhmVhp0t+r
+VnNgQUDrZifYLvZNThTi6ioEHCXzGShz+tSNOIKc0TZL8nz0PKVOw2yW93AQ
+fHz2DZPruHJs/Dj5uCYbvz23GFduQFYbeb9vczRcXIm5My49UgqCP7QZfyXf
+c3YVVUc+n1u7hWUlYQHTxS0A58oWSQdW4XdAIKPEEMCBH9VuHYEZU6xfRyBP
+ltCFvwdhql229zv5Pv6Um32RvCdwc8K3o84NqjMmBuDsqD2FdfBA8u2Zqoiv
+25YQKIY+PZHKXO8BM9uqM8gcN/T4PD1N8mP8trKBFzhrXiXPGXb03S5zOOhz
+1F0J1MNk3/ioCLcf03Yzhlm/zD17Ef9LjY6eK1mP97RNgv+7lH6D/J3K/Rne
+ogI/738w2x32KlnVVoh8uZ86MlcSq9/6oAPXFO2OngJnH2sXvYF6bXgJc0rJ
++V2NWoawZbVppy3pz1CCbgP6VVdaaU1+J1m5C/b6kvfvhNaLp/Bew72QWyAH
+9yoUtwbjPZZjMO9UH+IaiKhQBvg7hcVc964etlC/zBwTQ75d6lL34QdH7O3v
+zIBjKzf0w4GtgpC06bg/42gUfu+pE6Kvy/+ZhufD8jq7HXDwk9eruFPRrwBD
+Viu8qGRaboMo8gvVnbUG+TJ9qfuLYL6K6/Z68vdCr01opQjW628mWaPe6Zsp
+9wgR8n4wEtcOL9U/P9MHZvbnujmiX0/GNo7tg+l/s5wewumFnafKyf3ybVZa
+6L98nEytBOKXjH7ujoLFdnkPRMNeFrzsYpgR+SRplORTo+DaDMd6nMtlI19W
+2NbfjbD/jybmW5I/I+xxATzT58KGtajP61PlFvI95u4NNU+EKff/vMlzKGY0
+cVc+zHZ9XUY+T0pWR1suw8z5fPGN8OM5Mvpssl/42tPnqCd4zcZjEjD/4MUB
+F/jup/zhaJxHZSdYdqMftOaLU3eQH1dv2js/+My8jroO1EeZmqybRD+5flWZ
+j4RxnukVpwLS/86KR3lCyPdqmuIuOHkg12HPFOz3jb9kDf+YWPHSkMJ5km+r
+yL+vaNxQmT/+14zqF4747gLTLy3aM3+bUayU5pPx5Hvc43zb76cZpbu8MrcN
+jjHc/2DXONa9jv9dinxGIj8q1I2aUYy8pWHZcHDytZjAETPKS79ZWBn1NO5y
+r9/13Yzi/L0lnwuXH+5Kax+GxRbVLkE/BnPsVh2Hs490DRfDe5LUmq7CzLsd
+bzXIc/OPiI047s/WTjc+AT/rCLW5DvPFilzewxonnwdycB7v3ZIjC/E74Rp3
+hxmKfJi+P7Qs4T+rLU76jyFfcZcPdrDz0+9JjsifMax7wQg2umZrqfwD9191
+OTgd5vcqxVXDrMaLQ7WIb2CluEoW9fO8yiJ94PuhbUHKcElN/KkR5Gs04p73
+BPs5OxsSo+HCjVSaBtxvsU7qL+qNYW2RZOI8gV6sJnlex7wM2FSD/NidWs+m
+wa7PavgiyJ+vJlSVhf4tSTjPE0H9PHWjMfL9oGRmhJ38ivMWBr2aQP+p0rHB
+tk9mFG3w9d5TYutz6n0DyLfmfns9ma/5fqfP/ehX1JQ/ZF4c/RmpK1+YUVRJ
+18A4+f7Pc4sJeIz9ts1DeL+jeNUsBYManCdctjaNnEf+0bL4DsUg/yFL/w/m
++JGP
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.109669593634097, 3.3111655299750593}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000005002`, 17.000000000003638`}, {
+          6.500000000004093, 14.5}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.013283961763, 16.423466606479796}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt1gs0lHkfB/DBamRVTNK4zyAk29hY4WWbWCoMU1u9MitDxawXYVVqvKUt
+yiXRyOayuXQhrc2yuSUz2EopjSxp6xVScstYtRhj7fe/+845c57zOc/8n//v
++z3PM+dhBu/ftk+ZQqGk4UuO/3zWsP85GrEptCRmsiVcEfybmQhu7FJu203O
+W89/oW3MpnjXjPQVwtIg6Vg8bHBU2XEM7kt5uLSVnDeeqnOxZlOiuvZzfoeT
+3F1lmTA3L8FaDsdc72a/hhlpbeZ9cFya2NDuE+z32KjkKjyg5uQkJO5+O7gV
+9rgvr6+BbZYcvzqEeSgbZgOH4Izw4rFIWI+364raWjZF89F46oQhm+I8cO6Z
+HkyRcOuj4W0WIgsjuC+/N3vegE2x6nbPWk7OO8src2H/zGsTClwvQTfvki8c
+/6dn/QtYekypiAk3mpZRqmHG011O2rCEUbQ2jTj8OnM1fG7h3/8Lhguvf7yc
+D/soFV10gblWCT3V8IPuxlZj8vucnWGrMc8RYYa7Bszv0LWqhL9ijoeqwhL6
+XTtP5AlLKrxPzkvbUu4Nw08+kduakvV0v59Ok36jN2VthmUfAvYtY6C/2X4F
+6Uvqkmu/DU5/0VJ5i+ShiaKT4Y+ozz1Ukdfy2aJ9lbDM9lrdDrgwvdSmDabn
+mJdcgyvWZfc9gWnOe+PmYf6Qp/A+bFamc4HDwvq9bKUK+GcetSQblq1w330a
+3v4wvLwL3lwRwNkBB6WuMf3IBv1qttvowW8U/kE6xOmrmm6S+V0UDCZcqLtx
+0B5+F7Q/0Ay2+cJ1Voy84kf9pxhwRpVNvR/s+qd1BFnPZdXPUeEFzn0XKhzl
+4bqlE/11yxe/fov9NWl3RI3wt/yZaDFcOLV2pg3WWKJbfR6uUIstnIMV+ju3
+7Cf+w6rJi1x/8jORL0z5/VFVLUx/pZ7jCDOsTKxdMF97/+0OFsk7Vpv4BNb0
+vqVkB9dWp59zQL7cBBpzE9lPP/Mb0odC7Mb5mszjMtv2K3xx6Zl7ObDgatpN
+XSabUtbweKEbZjt1VH8JB9+t2bGM5NUY+nAMng6KnLKH+xhuwfnwv2TvbvDh
+1pdDT0rg7HKdlhRYkMpfWQxHJ3cEVsFvnybJU+GVFw6298DSuWH7UHiINZI4
+C0s0jwfYw8xHK1y1P8X8IfoVCswXphWhYwnPTPw8eRv+/NNooR2c0StgHYWn
+T0bsdITV4i0TN8JT3yrk9rCfcm7/x/A7nw3ma+G+G0Y5TejHjL70vTHMrmsI
+SYKd/ytuXwInCAziw+C9hrH+ZB4K97vAKNh2XDtgkDjiVekFmGO857KU3B88
+wUw/+X+ozRoVw/zz1xPNsF/I9wtNJK/aiRsH9sKlV9xjy0nesuK8cjixy3eW
+ePMiIzbJR9vFGrwJl9Zwed7I7769incHln0z+zgHtjNn0V+Q9ZLckj64Wf9c
+KJlvRvuwt6EJnqeJrPUGmF+mQmv0hsPWCVa5kb68NG6Hwz7v5zPDYUsvwzEh
+zIu8U5cNl35QGjwMfzYS3y6G+SUhjqHw4bwCrTfETqGx7jB929g4dR3y9pjK
+deCF7WeXmsE9I5XDvZhn8fH8GEeY8V30u0J4z2SDcBNc+9JXPQg+3eU4zYH5
+lVY8U1he0McgrghJ7x1F/rs/ZBe4w5rOX65vhAcb24UOsKV6WNz38IByuKYF
+7ODwajoVbhZN/EEj61OarIlv2dNk85hXwkvLyYN5nzMeDMM2X//2SwN8Ymu6
+Rw+xuSt7HLbw2UJpI9b1vG2FeeoVDttbYIa1BSsG1vPjcJrhqCu8aTHsK3I6
+30r63FOmp4n8T6+1hHXDUqqfcDccpGZycRQWjOxbUQJLd4lFpC+/gh2Ob+CX
+/bqc1TB3nN5MN0UfAVsP+cIZWXQ3Z3i5/6mjccTPb6zxhYUm05eL4VbjFb1c
+OL83xuAhud4vgbUb4dFIKWPq774slpnCw5PNWjq2uJ/GFutNYz/qkasptrCf
+iWOnBD7b0n/QE6Ycet12AmYOVTH9YUbn4hk3+AXrFDsYdjidGasK3zu2bpq4
+NNDS6yF5PqNGu76CEw6uWk+e91kRtYMLF/pORsbBTRmqtmy4tk71wB7YMrgs
+2Zr4nv3Ubji/xuPsSlgmCij+D0wtitJSgQXhrRuS4ZmB4m4Z8lyoUc+shhcl
+u50cgAUP3h+YhOMyziQ9I/lVyqnrMZ8rs3Gum9x/Z0xbSB5P1+pLz2GJWWxD
+J3xpktI1RPo84NFjgn74db2H5sj60dfUCHhJTQGV9KX2Q9HJH+Gwyw659jC3
+cxl1EFbRujzOI/O+UZ9WN0PfI15HTsJxd8symXBsXkTyj7BkQEPFAuYV2Pj0
+kP6UY2L04b9fWuz+/75ixv4LgmodCA==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.540947421444628, 7.668074278969414}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwtlA1Qk3Ucx/9jMJ7xdihk0J0xYSF5pkD4kkD9B4o6phBQSxIdeCqWtIaK
+XiT9DaTi1qzbialBgI4DIZyhRfj2QHBDXhISktsGTba43YGSynkNUPr9vJ67
+53nuc9/v//f63LMkR522240QshFufDMBPiIpeX75UKbeM1BTCVw1ezHve2Dr
+UTHlUR/qKfbzpUxr7B+0A7Nd2vupvpSc/ufeJi4K2FuRpQK+rDj8yXJgamLG
+WGBOVilPAbatCZqzQzydMq9ejf7gi2y7DyWmJyertcBEL/3igjdlW94YzDEA
+V+m8lw55UXJe3CP/FePl5rkcYkpWzE5MmFA/v/SqnaNM0ByycADjW21jFk/K
+XqRzHYMYTxC0clhEmUqj2XgH842ER9k9KDGOPwjsA5ZcjzKLgPWLwqzt6Dc5
+/RTulO0zaA9fAVYlXklqFVLiCFjpeF6P+uN1SiFl60j/6pPAfGZQbTjo+cHR
+35Rg/tIIyTLQTbf7/A+h/2wqlw1sTv66dy/mS9ig6wKe8VlwMwvzLcruf9+d
+krD2OV6J+Y53+Qd6UCa8wRe9i/FP/P7MCfUFJq3XZKLfWrhgQERJ11l+eBfG
+F+2cavOkpOWue2s+zic+7i8jR8ntY3S0FM+rB+L0MC/ne8qhH7B/wy+TO2Ce
+wiWGmWvIhw50e3lT0nfjaeEIxmv08DkB8z/4eUUOiQbee7P8b+BbyroKKTCT
+X5d5wb5CSzt9NwOrlKuEs6C7irZ9ux+YGOtFLcBRB4b9dejP8GtIBL6W1lDW
+CCyJeJJbA/k1Ja+8bML4rbZqM9R32RzwwgjGO3c1cxr2WXzm04n76G/TOv6F
+/h6+FveOC/X5uYJH0H9MgUw2j+wMbJuAeY1WJ5mRedv4wSmY55Y/n5XMYvx7
+wXc8gZuNvZZHwPT0ptg3YV8RRyLrxpHF051n3Ciz1a0y30X/BtVkGPB8fHwR
+1sfveSlhVEBZwJj+0s/Y39HwxF4BJctWp5bXAtvKHq99AOwufZr0HXJ37JoE
+N9Czyru1eF7xOLIDuLJ+m/g4ziMxW/oR7P+3mvH2Y+hPL9m+FurTJQeVFqNe
+MNMRDP3kxj+8UIbnNRYFB99v+Tnr1lOYPyAtwwXsmtyfXo/1hiZLxmA+hVzt
+Th770W1NaYH9r0/ptFvQ/3aZPB/mm7V4RwjOgx98q8nTi7KQpi9fXfw6+KWh
+Bg3sY3lM9wxF/rAtugH0ZoX8yG5k0/C+S6BP/Wj57CtgW9UKbTHoMkfGdAOw
+KqJxYRjoevbTrR5g8kd6BX5vqR8U+TuBJU2dPWbu//9KDDC+OfofUZmlXA==
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.931801948466052, 1.6274136392623755}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwl1wk8lNsbB/ApQqUaSxpbTZImhKSM5WoqIVFjSZIyZBm3zRqlxb3pUknK
+kizXZMlSoRKKNP43JclSaFxi1IgSzbU17f/fudfn4/P4et855zzPc94zM4t9
+Djr7TadQKAP4JfG/Hz3Wf3EFi1LFdB2wgEMqX1i267Mo7IjQviDY1fzjxmw4
+SHJvdhbsc+Oykw8sXhb1uhbudS0aWgjzhx/ZdMCHNhV2diK2joxf6EOMS7Bd
+EI8YNO6a/grx0T5hHQtRrmiovAVxdL5gfEoXrz80fLMC/lOz/l4ZLHx+sD0J
+HnrC/HkQFnx2qefCY2dkg9fA7H71301hjltP+AyYfptjNx2+3tGo1rsc8wUU
+H3+K/+fYhc+sg+3qczJS4NbJ1b+VwDSlHPk98K3oi65XYV5gpgYZN91YabiA
+XL8a0kOFxZO/2t6CW89nzJlEtLQtU3iIyImZRhUh2hz5Jb8bUdDV8oLMm6BY
+tPgTovuJ/7UMICoqLDuujHHK2nd+k8Amtmf/XAmnaRm3L0Bk/aMU6EDyT3Da
+sY78v069xweR8+3IojDEzpAXWqGIdqqdHiWIIpF+YRTJ//3xsRHEKVeTZcR0
+Z8NUI+TvX2JQFQQ3jGp3hsIlppNdO2FGnIPlHdizYEWEJVylVuo3RuoVyBhU
+JPN1qKovRx85XTvf92GdjI3TudtJ3y/ycvJgiuq9kihY8vV4rA/MKlh8Nxk2
+eSuzXR0WJ+jXX4FLpp5JtTGQ77TK+By4dXEL7xQsKfGwuwTXcL9utoA5Ujo3
+ouHU1B20iWUsipGb44AXHGd1SXITFicvjlkDP08ZKj4E2/U3hMvAzUtlCzbA
+acHew21Yv3DzzHlqcMMcT+sMuHGqJPeLDotSaCWZ9IVl1mfWDMBpsX3BK8n+
+Gm6z7obFs97KS8F/tMRW/w3H+U2+7UYdErZzzN7Awki1jvtw8tfaw+MwqyZt
+SzHc49A/OBPz8YIe7cqBlbeuKtWGCz87plwl/bi8pnkdTLfYMKsSHvvFTM8L
+dp9h7/ICtrorU3wE5rA747/A61feXneR5OPr4aOH9WjL8hTyYDlDaY1/1/9U
+GFYCJ45FleWQfpkxlcpIPXRHukRw8Y3vowVkvvDoFQzUZ/qGnQdTYL6Wq8mv
+pJ9pR/wj4ehj/8QUwrQFHCUnWNBp2iOElR28F9FhRl+1iQLOgXY2+9JbUo/7
+Rd2m8NSdHGE+zJ3p/LsL3PtD6poXTDO6vnkPHCkY6p1P7k9a3+EPa1u/PN24
+FPPR9C12w603DZ+cgLnS71Xs4dHjzuWmMLt39WE9eNYbKdsJbewvn5+9UrB9
+zYhDJVy4XV6rA+uTmaW09Xc4yL7Lj+yvmLKJk24wrzl62l5Y3nj2XyawEf9c
+gAlcdkrlqCbs7nlLngIvjMm6RYWZkYFbWlEvN/rT73Ngu/exHgVwYWJxvDKZ
+7+g9WixsHZlqsARmtAlUguHk7pNeTFjsJoj0J/ttuGi7M7n+Q3okgPRHZUDz
+IBxp8jkvnJxz2Qsy48l4FVku58l+S7tTXghzX240KoeVu7Lc6+BEzYYfr+ED
+F3ZntsOc4rUaaljvxODMJiHJ58HYefL8SVqfHRWR6/+ULroMJzpfzuglbmvx
+74HVqk0jm2H6kZHRhajfH00Hmm6T+WvcNpH6N8h11iYQa69gpMEJUZv6vUg+
+q00ONcJ5TbJ6DFjY57ZvHL5uXjU6tAT9uTUjT8EAfYl90JQL80ZLl2rDdM3g
+HA9Y3FgXogvb2TcemgfTz/HPkOsxguN+D7VQb97WYUU484nh6SjYaO/Cs1MY
+3+DsjYE1MHfbeEsrbBKh4yJZjP0/Yh6dC6c+p+2tgykny8qCYLH2s4gkmNf2
+qsQc1jgmFXAQpkmz35H9kjBvF38bbDQR0dmMejiPi7JtYIaNWXcWbMQQl68j
+468yNA6F3aw4G8l1dvjVdjZcXqOz2oVclzf3Z8LF8dUKAbCd/8ASPThHmro4
+GmammL/893xc7xuaCUdmsZrJfqO223y6CwdVOAo2k/Nstzihk9z/5bvtAdjn
+3UIdMbG58Zd0WGR7/rE08o972OzdSsaXrLmpSOoh5F+SRz76mfv9aTAtN/+A
+I3ked9g/UIYj19qeToR/sFMnZOCqLLnQF7DMAUHBKMZ3n7PhrhKpN3PZ4FNY
+OC9Reivc8Heafjapz9fPRifh5I9uOwJhyWFV3xLSr4a463okHzcLegtcNRlc
+MUjH/RkNLiJYfqW9XTZxtZPvCKxSF+7tCieeaTR5D3NThWozYd7pCp1u+FtA
+rtaJRai/p5lKHRyva5A9vhDrUTdxyiLzXXkZEgpT/Z+eDobLVw18nAYLovof
+roVrbmi0XdFEfXhmG2fBNEGS5jbYyEsjjOSb5lCnpAmztQ80ZMFDNlc1vmhg
+v6Sb3dgLh4WlPB6G7VrKuWthued1zWKYY/iXtDrcM9dfW5aM9/qtGfnc477l
+m6w+XPX9yC4x+pFJvablCdt9G3H5AOu31hUlwWVpZ2InYFZk/6lmWKJjIJLD
+6xPvWh6Tw/rZuTQBA6Z4WHr9AhdSm3eQ85K1qt4wELYLbRr7A7Ze682Ogxnd
+Bc11cPmtnPxLMOWM+Nk05OsgsqpMhrma9ExrUj/llCfHYM6ua49j4aaPaR+d
+SP2WsLobYN8lAcoKMD9HN2KGIeoTRv9WjfXRa7sDLWCjL9MsXWHuxMVHXFhU
+N1u3B/UYurXu81nYPbP3oRss3v93Zy78Ibgx+bE61if0KSqFy2iOscZwdLqD
+KTFvQ9SjDDXMM/i4PgfOC/l0ThYWTErmk/FqqCY/D6tiPm39XYFwpnb91BQN
+7wPyHsy1MENwRPQbLOd9NGMuzFzUX6AJG4153e8i+4+eFNK0AOOdeEjJhdvT
+k2+eh8v4Fd37YBY//UcAzNq9pNaM7O9v3arbyP0pRZLZcNDn/A/EnAs38wZI
+v2/8mcyFGfvuJzTAnh8sIs6Q1z9sX1IBC5mFnlUwP7/Rp5Scf1Y/E0dhdtNk
+Wzk5P4fOzFqO9fHZ9YcfwfJZh5L2wENFgaI3cIy//eRlsv7jKVrymJ8fvF+7
+geRnsrTjF9KvttHA97Awc5NFBFy2fOD0dzg6Ote6AqZ2CEQ/YDo95aoEjlve
+d/EDGe/yyDjpn8h7S0Q9zON/vnMMllO3cjgNs1I/naqGaRLPfCYZz29g6Tjc
+lPr9XTvWL1nYuVnBCO83fZdsOHCYXjdNG54wdk19pYL+2M51XwnnnYjbyIap
+d3p4TOKt7gY187FPDR0bzGAqfyBoKcycXfPaBP6mW2qXqIz6vpHboAtzEp8L
+KXCarVWEGkxX/8qIUkKecp3rZWBfjYrr0+G45uIVrwxJXV8cSFdEHqFLqUVk
+/yhvabSG3VcpxoXA0pypHVKwkenOmZZw5JqBwU4F8j0iVlYOLjd083sA82K4
+PQLyfNRuGK6GmYOtpWVwnkzNX40wherkfYGcN9/PRb2DW1NehR0l+2lB2ldl
+jG/nx5AKhVtX3C7cBHOfOpaEw2IDcdxJeGiLfUYMbLm3cF8tub/laFC2Aflc
+UKU6Ra5vst5RDyur6UboID/ex6S5k6TfXicrN8OSn9oifdIPY8VoH5hiXtv1
+KzwUeXE2F06M7S29Die+a7HxgOlxkz8+wtHTVd+aKpHzUpOhivrxPfJDKDDz
+0vkM0p8gR9+t5Yrk/cNg9TbST/60O66KpM9PRvbDwjub8t8gX5bW+re/wa5X
+9nXugY3M4oMS4arKL6kCKtZbUqFyGT76rPLaRji66np2Brke4ey0ex55DmMU
+0mCea/8547nIP8zqZgLpb/jWEOqc/743RsNy5A951v8BbdEu9Q==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.235352284295374, 12.365864399803508}, \
+{-1, 0}], LineBox[{{6.5, 7.4999999999976925`}, {6.5, 14.49999999999251}}], 
+        PolygonBox[{{6.5, 11.6}, {6.9, 10.4}, {6.1, 10.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.355394937518537, 13.000446064907765}, \
+{1, 0}], LineBox[{{6.4999999999976925`, 7.5}, {13.49999999999251, 7.5}}], 
+        PolygonBox[{{9.4, 7.5}, {10.6, 7.1}, {10.6, 7.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 6.5548}, {0, 1}], 
+        LineBox[{{6.4999999999976925`, 14.5}, {13.49999999999251, 14.5}}], 
+        PolygonBox[{{10.6, 14.5}, {9.4, 14.1}, {9.4, 14.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 13.5548}, {0, 1}], 
+        LineBox[{{13.5, 7.4999999999976925`}, {13.5, 14.49999999999251}}], 
+        PolygonBox[{{13.5, 10.4}, {13.9, 11.6}, {13.1, 11.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.5548, 11.}, {1, 0}], 
+        {PointSize[0.04], PointBox[{6.5, 7.5}], PointBox[{16.5, 3.5}], 
+         PointBox[{6.5, 14.5}], PointBox[{13.5, 7.5}], 
+         PointBox[{13.5, 14.5}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T13", " ", "P2", " ", "N26"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdieg/gjfhfihjij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdieg/gjfhfihjij.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {22, 0}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJw11glUU1caB/AHVglCISRgESnbwLAMixEkVJE8ZZFFmBQZiBVEEQVUUBaL
+LFUUFxYNDKNAESRjbRqppREBWQoFsUoVKzIMhiqbhRaDQFQglIrp/3pm3jkc
+zu/cd+/9lnvfiXnUweA96hRFZeOP/KfeqvCspKl3jwNNaQzwrU7BzPDxyV57
+mtpQHDjyxpCm+NUR9rWwKLXecj9cmJDPrYS1C2779n5AU1l/PaZZAm8McR5y
+hw8VR+mWw6UWPx+7uoKmpO13LavhLa/Uik1gUee6C11w249iJ5EB3l/PsJyD
+jxt8382BGexnK20Rzw3hp1v69GkqtqkrbDccfYAhLoClW7ITLsP/8Clc2AG3
+veQ3/gLPDP2Q4gXzbbkZlo40ZXHGLoAH7zxpurgLdhY0dwbCbrL7X38Oc+7c
+jYyHDZ+sc/kRfqhlfKeM7MfxrZiCWTm+K3tgUXZ8BMOJph6NHdbURXzSsdr9
+BjBDbYoRCAsemwcQu40EHj0Di2zZTPK+uoqrbISz0qMiyXpfFwq2DcOx0/4x
+ZL8SI5GuEvaN3NNTBjczb3H+IPUI9KuLhpfzva7IYb5pRaotzBxqcboNywKL
+GieQb42/l5Dsd6T7pWs1fEuZlLCWzB9XSpJhlqd8/0PEL7gSIPGAFfGli2Hw
+cHBEoR78YEnBJz1srF8bs2cK9W9/UhC6CTarX9PaB/+aLONeY9FU96pzNfdh
+Z3rxjD4sTfN4+ACWuAyMHNNDn/PndAdgdeO+1ldM1Lsvc2ge5l3c550IK7JN
+TMxIfy7Nur7VRXwn2I4fw3Z1epkecINh8NI8WF6T1/aVDk3lrNX26iTxml0S
+u8NuIYNBmsj/6MCu6cX34Q8L9vvDKcUZSXJYcdViKAeO+teknQoW3Z7VugXP
+2e8TcDF/3PmC8DWszm65cRZebcMWrEJ/ThZr1CrhLGHDbS7sZd47cpDEs86w
+ejMZN493eQEPt32X6g+Xnm5s4iCfwqAxAxp2D3XZuhemfDV0bGGj7yauF8AC
+tm7iMnJerEfNqogjKx/2k/jV7wtr4IaIbpsv4Umje1IxnKXh0LsPzt3QveoU
+WU85HOMAO4xzQwJhWZxz+TTqsW58g1iFeAx/ynWoJbaNUXeH27LcWz+DjdJ3
+BIWQfBLzGoNgi+atV4NQDwbrhRu5T2Lrusw12ujvk4kXOnDx4WQ7hhbqN5K9
+XI3M5wilMk3kafrTBvI9OFk26v0NA/0KLrusDSfN/3NGqEFTdOD6Dis4Qcx1
+Pb0M53KitMIf7hs8Xly2FPX5Nqg6DTbZOB3Z8x7qLwhXuw6npCeGroEla6Sb
+p+Cz1qMnWpagvhkVCkdy35rK9Q7DnbNWPofgcp1sbwHMLBnM+xZuyudlRcOS
+BitDOXyH9ZfIC3COKCLjQ9Rb51LOxCh5f+3zQtI/FlX2NAD7yWLbL+6F3xhf
+/q0dLkyvFKTB53VTV3kg3rbBca1j8HvU+543l5L6deSmwpdevfa3RH6rp+e5
+u+F6RdSXmbDil/OanrCP/ISkAZaExacYwnmP5M8ewbHZmrvGEF+ReVVUB5n/
+osTgGjmvNT0TubCo/onxQVi2YG38bv3TVnYcuOvjuPQi7C/rP/vHDOozbHXu
+0GPEu9qpZn0L7OvzN44S+Yn2hkWfhasVH+Uq1dGfZtYX0aTfYiPRkBrGM/za
+N5N+pNyU3KQwfjqDyYXLLR109FQ8avWSxu3OcKf3+af1b3gUdffZoDu5b36T
+s0kLPOrInIHXVlgyJqoInedRom2RXx2GDwi6ohLnMH7mnIh8f8sTxCndMzxq
+Z3ZdsAz2EhrpHX3No9xyW7P0Sf++GWAffwX/nSUOgfXz+quevsT88F2sYvia
+1MG5EGba+Gn0wYo0b7oEzll6oU+P3K//Xu96Dpv5dql84GjPq0WZWO/IvbsB
+yTBzbHvORuzH/4/J2Hl4Z/L36TaIp9t2x4Eq+MommzbTWR4lvWincYN8nz1U
+C/qIn79WElcNN+i7jM7COUWt/eXwjGe9/nUl5vutsH93HuL8f3BF/rISRVMo
+fISXkZkG0/YeYVZwuKndFwnwfPjnLpMk/sRtv+vApZHUIykc3WTzayjWEyzb
+3p8EM+KElT7YTzS4oOUKa3eusHmGeH3lnxgton47h1ssOMgn9tSB/Huw4YrO
+ox7If1yjsVIE83cnvHWa4lGMgny346R/jh/4XHyOeGZdOuLh+a665yOjPKqz
+I8g2hvjGtSKbYcTzoOoOGac2RvVaP0b9Tu3YQ+a3qUrZxg8wv96A/jcZlweo
+dJp51KG5ouVdDv/7XfD/x5H+E14X+cg=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.4225671224906584, 16.38857259237856}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt1H1Uk1UcB/DL8g0cazCUFzk5FA8q8tJA3UB4nsnEAKGhSJxAQWCmZsox
+k4kiAw3BwWmFYeEs9ABHPYBTStEJgRkilizlIKkJmPKSMuZwwgS17z35x/ac
+z7l3v/v9/e555pG6fbWCQwhJxIc+CY9+ObKEvH1WRZTE7XFgCd9JXVSJZ35+
+7df9fHhh9WYFLA5zlEfCKl+H4DB44s7y1WveZYm/vpEnhSvs8ludeSzRiYOl
+ybByXVWYkYv126eUWlhTH8F/OJ0lJo3zBQs8LXFkaMIO9bdw9m/E+a1244fC
+Yd1ky9xBWDuz0P2qLUvYMzamXQKWyI47uyjhpmOcqmlOLElIEjmmwqa/utpL
+4aLswKv7YMP0TC+3GSw5yflJ3ArzB5KtajjuWoj7Elq/JTWnD9YMufk2whrv
+Nt95M1mSEuV1Iw75DKK7Fhkct2CDegjWNa9XUKdHPRjcg36Ei52vzoU1e8ON
+I7D82pjdY9Rr+qb7ZqQ9+hVntdHzArcezcuEDdbYl+6w//j24M9h+fWA8z8g
+L/fj3CsSWHVv1hNnOCMo5Ox11COTDlq/Qr8d0SkHPKkVxbE8OD2s92AM8mRE
+zeeVYT7zl97UxiB/xrbRwxJYaedz34fOY94xxoz5yh5fnzU6FfVzVgpa4bia
+zMTzU5Dff9mhBvj5yfw5ysnIkxax4za9r2xu5weT0If0Ye801Ou5+5If+A7y
+X8ySJcIH/h6cIuNgntas7BZ4Z8WgVWWD3/9umr0C+VzcqttMBOfxufUGeKDy
+2clSWJ6cNycV/V1mPhvYQegcJEPPYHa9YiIPZovfu6zEfB6ZIsqaqcVt1cMw
+a/7Exgv1myob6uR03i5DaadgVYDEWErvx6f60xDkUeWmPWqkttfe7oTLg0Lr
+W2Ch63P7zciv0g+F1sJJDrON/TBb+IqTCfeYC6Npv5oHeX6e8JhN2QkVXF60
+VHEJ53PH23ML6fqBP/cwMP+SjLMeFvb1iS4hvzzMl0ygnjCouPN9mH+lT5JO
+698suF9D76tmcEUZ8vh7hOcshsXfRqVW0HmpLYntmJ9/X5BQjX6J96hLLsxX
+vuk++5ohbGOc64fwwBmJV8AEQ5pS4qXL4E0bXN+cszKEZH7UHkHXcxzTI0cZ
+Iqw0RmbChlCtwMHCENXMaPUVOIH3XaT7CPaf3tfhhfO77Coqs59hffdr2xNw
+ecFh0XITQ8oXmUcWIr8uZlPOP0as39tQoqf3c1z2yB3O2DqqWoX+Dd6/xS6A
+NcPS2E6YPAlJekH3z/CzxmJ+5NfxugDUY+VbfC7C9Yp1pd44L0VdemGKM96v
+tKQ7q8wM0b3qubwE1km5ETnIx9qKzOHw2K3OjlPP4TGJnq4r5bPb62g/u34W
+TYUTuoJX5L9gCL939yw96htqhYH26F91WqCPh+Ur1xwRw7pC04/dyFfQckv6
+CvvZSZ7xSXD9tb1frH1B6zXxOtCfUjXoL0X98iM7Q2Ngk4fWrwV5hKMl4luY
+z9i5fdph5M/4pffGRlg+I8tSNoz9X67rcxDQ/w3z9/3/Yn35iKwL89YlHuWO
+PMZ89DEBDbB829MqYw9DDFxxMr0PVXaoyLUL+dd2NvfDTQkiW8sfDDGd55Z7
+C+h7v8hWoWeIvO7p8UOCt//LRQ3/P53Y/wDkBwX3
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.078831134583988, 3.8142802112558902}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.00000000000182, 17.}, {13.5, 14.5}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.28332719689847, 16.358549288063976}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt1gs0lHkfB/DBamRVTNK4zyAk29hY4WWbWCoMU1u9MitDxawXYVVqvKUt
+yiXRyOayuXQhrc2yuSUz2EopjSxp6xVScstYtRhj7fe/+845c57zOc/8n//v
++z3PM+dhBu/ftk+ZQqGk4UuO/3zWsP85GrEptCRmsiVcEfybmQhu7FJu203O
+W89/oW3MpnjXjPQVwtIg6Vg8bHBU2XEM7kt5uLSVnDeeqnOxZlOiuvZzfoeT
+3F1lmTA3L8FaDsdc72a/hhlpbeZ9cFya2NDuE+z32KjkKjyg5uQkJO5+O7gV
+9rgvr6+BbZYcvzqEeSgbZgOH4Izw4rFIWI+364raWjZF89F46oQhm+I8cO6Z
+HkyRcOuj4W0WIgsjuC+/N3vegE2x6nbPWk7OO8src2H/zGsTClwvQTfvki8c
+/6dn/QtYekypiAk3mpZRqmHG011O2rCEUbQ2jTj8OnM1fG7h3/8Lhguvf7yc
+D/soFV10gblWCT3V8IPuxlZj8vucnWGrMc8RYYa7Bszv0LWqhL9ijoeqwhL6
+XTtP5AlLKrxPzkvbUu4Nw08+kduakvV0v59Ok36jN2VthmUfAvYtY6C/2X4F
+6Uvqkmu/DU5/0VJ5i+ShiaKT4Y+ozz1Ukdfy2aJ9lbDM9lrdDrgwvdSmDabn
+mJdcgyvWZfc9gWnOe+PmYf6Qp/A+bFamc4HDwvq9bKUK+GcetSQblq1w330a
+3v4wvLwL3lwRwNkBB6WuMf3IBv1qttvowW8U/kE6xOmrmm6S+V0UDCZcqLtx
+0B5+F7Q/0Ay2+cJ1Voy84kf9pxhwRpVNvR/s+qd1BFnPZdXPUeEFzn0XKhzl
+4bqlE/11yxe/fov9NWl3RI3wt/yZaDFcOLV2pg3WWKJbfR6uUIstnIMV+ju3
+7Cf+w6rJi1x/8jORL0z5/VFVLUx/pZ7jCDOsTKxdMF97/+0OFsk7Vpv4BNb0
+vqVkB9dWp59zQL7cBBpzE9lPP/Mb0odC7Mb5mszjMtv2K3xx6Zl7ObDgatpN
+XSabUtbweKEbZjt1VH8JB9+t2bGM5NUY+nAMng6KnLKH+xhuwfnwv2TvbvDh
+1pdDT0rg7HKdlhRYkMpfWQxHJ3cEVsFvnybJU+GVFw6298DSuWH7UHiINZI4
+C0s0jwfYw8xHK1y1P8X8IfoVCswXphWhYwnPTPw8eRv+/NNooR2c0StgHYWn
+T0bsdITV4i0TN8JT3yrk9rCfcm7/x/A7nw3ma+G+G0Y5TejHjL70vTHMrmsI
+SYKd/ytuXwInCAziw+C9hrH+ZB4K97vAKNh2XDtgkDjiVekFmGO857KU3B88
+wUw/+X+ozRoVw/zz1xPNsF/I9wtNJK/aiRsH9sKlV9xjy0nesuK8cjixy3eW
+ePMiIzbJR9vFGrwJl9Zwed7I7769incHln0z+zgHtjNn0V+Q9ZLckj64Wf9c
+KJlvRvuwt6EJnqeJrPUGmF+mQmv0hsPWCVa5kb68NG6Hwz7v5zPDYUsvwzEh
+zIu8U5cNl35QGjwMfzYS3y6G+SUhjqHw4bwCrTfETqGx7jB929g4dR3y9pjK
+deCF7WeXmsE9I5XDvZhn8fH8GEeY8V30u0J4z2SDcBNc+9JXPQg+3eU4zYH5
+lVY8U1he0McgrghJ7x1F/rs/ZBe4w5rOX65vhAcb24UOsKV6WNz38IByuKYF
+7ODwajoVbhZN/EEj61OarIlv2dNk85hXwkvLyYN5nzMeDMM2X//2SwN8Ymu6
+Rw+xuSt7HLbw2UJpI9b1vG2FeeoVDttbYIa1BSsG1vPjcJrhqCu8aTHsK3I6
+30r63FOmp4n8T6+1hHXDUqqfcDccpGZycRQWjOxbUQJLd4lFpC+/gh2Ob+CX
+/bqc1TB3nN5MN0UfAVsP+cIZWXQ3Z3i5/6mjccTPb6zxhYUm05eL4VbjFb1c
+OL83xuAhud4vgbUb4dFIKWPq774slpnCw5PNWjq2uJ/GFutNYz/qkasptrCf
+iWOnBD7b0n/QE6Ycet12AmYOVTH9YUbn4hk3+AXrFDsYdjidGasK3zu2bpq4
+NNDS6yF5PqNGu76CEw6uWk+e91kRtYMLF/pORsbBTRmqtmy4tk71wB7YMrgs
+2Zr4nv3Ubji/xuPsSlgmCij+D0wtitJSgQXhrRuS4ZmB4m4Z8lyoUc+shhcl
+u50cgAUP3h+YhOMyziQ9I/lVyqnrMZ8rs3Gum9x/Z0xbSB5P1+pLz2GJWWxD
+J3xpktI1RPo84NFjgn74db2H5sj60dfUCHhJTQGV9KX2Q9HJH+Gwyw659jC3
+cxl1EFbRujzOI/O+UZ9WN0PfI15HTsJxd8symXBsXkTyj7BkQEPFAuYV2Pj0
+kP6UY2L04b9fWuz+/75ixv4LgmodCA==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.557702928444957, 7.254772386043117}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwt2HlYTevbB/DVPA9Ko2SniZQmx5haTlGGNBly+LGThKRQkVKrAQ2aIxrY
+KeHQqI5C2qdCEw3qVKg2Epo00UDH+33O9fZP16f7Ge7nvp+197rS2O/l6MZP
+UdRKPooiv6lvv/Azh6ZG/v/3hmUOFowcTRml6vs54be8nvN5KXma4pb6zCbA
+A3l/tGTBRmtc80vhtr6Bx+Zz4ePd957Chr0x9zrhePF2ExL/kRwh4q1AU971
+92/Ew3mxVQdn4ZEvakH28AtZ72dnFRFP375jBvvfaTlUNARzhd7mJ8D6tXuO
+blJC3C7yjSocNqwunkjc0vMsVZamPpo0RFURcy4/VYQ5tt3vumF2xencRTI0
+9eR+4WQvzMhMNRpL09SKXP/r7TBPfb2pkxRNNdjKhZXBHMspicuSNFU7FCcU
+C1OtE2r8cFBT8/xdZL7IXZcMCZoavlait4DEe/gaPODvXo2VvciXVVKp7AUL
+73wUkkfyT3F/nAO7165oY2DGnvVFButp+qxu2AdTZfW5N2GDbfP6txL7xem7
+IJ+kvupf9sQn7vetQr6OIpclD5H5CQGqOjiPzAHbRZdIvTL9U6Rw3sHOMb8O
+2N4odO4FePugla4xOc+Em9wMrOT3OCADZv2cPOiC+k2WV3WpKsOx7w+Vwgdp
+25mbMPuunuYP+HZpbN9qFez/rp/RQX9O3dm0uQ32/uTitRJ+9rE22VsV/Tvx
+dsIQTg8/oS06j6ZkXwSukYJN4xoiUuAmocNxzVgvcqAiW1UNcd5J+2B4R15/
+XwzMVelpV4Ev2aseHYbjrXc53US+x3eYslbPx/7nmy7rwIK9Om1eMFfR+OV6
+nH+sd8ouDuY9dQ22QH0a/aw3X4XpSx7661E/M5eVXiTOLBM1c0F9xxN1LHxg
+zvK0+aR/TOXr2U0k/m8/j4LVkkMjlch6cvJdieI0ZZ0yYdSNfNiW/kd2wsIa
+KuFZMDPSUGQPa7uf0zhK4kcWXg2CuwR9w8zIeZaaPOqGk8a2vVSGOVvzoo9i
+fcFcvixBEneKDtdAPmqJhd/5YV7cHK9v8CfJDWMKMK2X9qQb+Z/MP/raHGYN
+z51pwfkqtl7hCyLr3Sw2fI7zP8/1rG4h9XIbX+6M+hRN1cevQf6s8vnqlfDm
++VqTJXCTZswFNdR3SI791Fwdlrnu7AqrWBnrtcAj4b/ZJcEmS+gejwU0VXCs
+TPvPOTTz8Ohv9wRYGG+x/F4OHDAt8MMOZi/1b4uAvSX50q/AI19vPHCAZTTr
+T72B7fO1GQGst3Lv878UNWDZ4t2ZsjTTFHW2zQZu8lriZAgHXnUo8Yap0pm1
+B3Aem5J3t2Ngdqx43/9wXnMfJuA6zGxQjNqBekTXnT6ZA3Mz3rJ2SdJMuLyA
+XRaJK+qaeqO+602lzFJg2u6g+03U33TKqD6M2HOuEh8sJXG4+whZX/rUWKQY
+zVilWyZvhVlOj/6ygrXTTxsZw5ymtGlTMdz/nx/5FWCeW4ukM7xxjvDWnzgf
+zzhhJg/jH3ROG3whvrU4bZk4zVhnrg7pIvWpGat8j/1u6U28eg2zmk+eL5Sg
+mTN7B7a+h5lX7xNS0O+K/Xl/TrD+u8/xUTjftpdpunIk31WmGcHSNNNlrxK9
+muSnMFXugfowE8oLPUn9vKUNFqJ+o2HNNbfh+M/eHcFw6YLtkwNkfuzpG3Xo
+/0mDgJZlCzE/XHn+L8SXvd1Ph8BMTW0TPj+Z/MS7v17CvAcvd5L7sTt8P3ee
+JvIvy/ZE/5jpPxPWusEjW6ZHm7Be6R/bd9yBuTV8PefJ503vfu0+2DuDY7qI
+fL4I/lRQ1UI8Pyn7OPJdsc/9myVMC+ndO4N+ukoaUK4wxyCvwleKZhKHw/v9
+YGbf8ENP9FNEKPVDMMx7wkvzRL3eTgUlBcHUWkMxBvU8+6Ff3gdmJUS+JfUf
++Czd60L2W9Ncwo/+pDlLdGwk40Ob00JFaWaOxSPBpWS9C9fzTOH0rJLbsiSf
+1B/DyqL4vPkjVH4C+XOeaM0n8Uy5uRdfk/PVXixgEG+3zFzxjNTjSs3nWdg1
+apSvjMQD+Sazsb/quFZEMcw6om5+DP0XD+kRfgjTUbwce9xH1Z6MLXVkfoij
+4O84X92+uoKPMI/+LXwFzj8s/01GkuR7OV5HB/XJVtj1wow42nyFAOqXd+1a
+53/1OWdSXQ3rpMY9KSX5nygQMkY/9W+szae0sb5S9dBh1P+Wxqe0LfBI9z/H
+o+DzlRU2qTDvzNfv8TBNcw5+IuOzd/CdheMvXrxnrANvHV5lh/Xu8r6N+MHe
+s30HxWAXOnNdCcztsS7Yg/1bBfSm+2HOiG18GPI9FmLSrKgLMw/c4nF/5zz1
+H1kBc/Xn2sTgfsfXrp6wJTbT+RWOerR2e044w+ywquhQ1Msjtjx0F8xbui4v
+HvUc/LQ62x5muu54laHeS7SUnlnAlGl3kRA8FtSTu4jsF3SoJVAE9yXni5sU
+mR9pYacFt0vV6ozokHpOJ/0Sphk/lWfmr2DW39KNMiI0ldHrNlVK4mH1H53I
++Ip5IVkw/b8wpgZx/ow1zclkvNZZw0PYb/nr5ZdjYZ4j360lyK8pR56VSOpx
+ZFxGHPkLFQ84ckj8ZODhaVgzQi6jjFg5fnIY93dJuP1YF/HNC2U96H/wDfcG
+SVKPrOIPXNTrwqW3RuvJeUrv7ojA865eVv3oHDmvu4aMAep98W+N/AbiheGR
+t2RoZi9HQ1h5EcZHCCuMwVbjntFuMKtuXaQg+tXmlDxaBDNrz6kNIC6U6D84
+C9OjRYpX4RcbnmyyWoz9V85qKmJ9/ec/pMJhlsN4mDv2r9zygnkEs3UrnZNx
+P/dcKdz4hcSX7XUm7ydr7Cf8JfXI+4PF0Wz0s/PATIqWHrnfbyzTcf53H4Kz
+jWHO4ZjuFDyPiZwY1WUwVaModwP1lD6v269P4qv65J6i3hfLhj3nk3i7s4A4
++qHurrdHBOaub4o9LYz3r+dv7w+SfLZNJSuinzbHS3IaiW99+PxJiGbMg1uZ
+InKernqdYVhZ80hcCsykWd9YhPmnczaJhMC89w89k2FN17hBb5i6lX9GH/sJ
+Zjr8PETmXyps/gJPL/K9eoTEvax6qvB50Ji7o9yP7Gea1VKA/ps5iwzFkPV7
+jcVzcN671y+aFsC06kTEFfS7ftMBjS6Y0/jd6yzq9dTBsVmenO+Dl98m9Lt8
+2HLMkdSr3HX3d3jV19dtV0h86PNmfzxPdDUV9oGcf971VS/ggIXF9UZL8Pdt
+GfOH0R+7JSy3IJh9YlzrNXwjb4yqg5m4luoEuGh558E5+tg/5GyJEuzaLh7j
+qE/eH1e1eqOfpesa86JJXDJ6KIu83/aLsR8Rd8mdKEP+m4xG03kwt9pa5RHO
+97XTsm2GzK9Q9LuPfmpuDhkTM0D8p3hoLvrZMdnjLA0zOWJaxahfUOfke1ES
+39T1oBn92qbn0EHmM0VVaTKof5YM3fORrLdquMZXiKZmcu/018PsHI8AcfTv
+m06gVj6xgc1QsyDNRDg8b0vQJ/ftje5LQZoqkQmy9SPxt5uH/kW8+M33Z3vJ
+etbLHrlgfsdHKwdb4mCXvlF4pN6/1JLsX7X/5W3sv26o7jgxe12FThDyPZ7i
+G03Gs85nO5Ln/Z3E3Mz9xHKqjXtw3j9O9raGkvnq2rfwvsewt215mQvTOZ2D
+K1EvtZ13yt+TuMQCEwk837Hx691YpB5PRn+Uo76TDyV13WD2iO6Sjaj/5vke
+ivmkPnKmO3LQ/yFuvNTP/8bPyjQjPvrV4OnGpbivTv8oP0f898AbQ5dgjuvG
+UxGINxhH2nQTC3eeUoJdmsL/ZhnivNuSk05jvx1aZud2w1zh2+ZFyC9j5rxC
+DMyTlchswPenVsfgrmIS5+02a8b5kpZW3G0i88dbQutw/oYzG7veGZLv61bX
+KtRHZ3HNms9k/BOVV89Qvzd9shd7YZbgfbse9G/7/Tn8HTDzXtxbEfW2/BVu
+Wk3Wk/p5ygf9qaWOCd+F2Y9DZn8JoP9d6umxZD3D79fLYb19BauOE6vwt+UL
+0AyP+rp0O1mv1PvFP4hXybc8NiPzU+aeNMJ6PmWXfy4mtmwNLoWfHUmoUSf5
+XuTdO4T909+V3FIj510sMbUS+aodePBYi4xfR/9cgPPM6wkoW0Hye+OwSx7n
+Db12tJ3sx55J1RHF8+3fMt0aRNaTivAYR328/jo6VUhMNV+pQ/2kE78oDZP5
+OxfPhuHzL6BU65WyEfKP2mOkJEnTZf3q+9fC7NTl3nj+uVvimD9dYVbEbwOF
+6I9FUHtUFIm31n6DadcDGm8KYI5Epy4Z/z0ryb8NpuaauSggfpJR3zlpRN7n
+REqCJGh6o6ZGmIIx5geGmVWI09xR6sVvhsTm1a+6xWiuZPnTDkuYt/FlZZ8o
+TXesuSblBHPEhXa+E6G5N80HCvfArEbH4514PsfuPuGxyXi5CanX6KebQ8Do
+PuJzivVDqG/HBmmfP8j6byJOqgvS3IKOB3oOML0uOtFHgObGPb/Nt56s5+Sh
+MMmP9/nLTYIryPiO2X//hDPO225bRNYztTRK4qepywOzSqokXnTVpoCf5trI
+Pj4hRdz09hqF/gdENfsKkHyPlTsx6L/1KX2FWVK/sIjAxYI0za7qUPtBLB9+
+YAI2KTZe9C+pX7fs+3YhmuZN66cJk3zKex/V4nw9J8SuzSXrcX+pVKD/ur4J
+80g+jFfg7D3U57SwYCUNU2yZhxGon6dWmvBekk/2pIeNOE37OEcsCSZxxsbt
+A57/0WRtmyyYa9Ma44j+9w/8cqwl55tIKoyXoLn7dG0NRkh99i16mIrnrzLW
+Nl/RBPvbTTeR/wf4v5ctWQPTE6cPzcH4m1Zzluwl8X3a+mFY/9/LyqpniWen
+2utw/3ILBgtTYNZ18emvyDfSdYtjLsz8UEn9ge9Py++dCeUwdTirZxL3/fb9
+nN9rYB5Tn/JViOaa+hr4vDAh93O6Ev2kc/1yThBTejaqs6jvM7nHVWQ87S5x
+VRcOnq1mccn+nRHSfujX1i9Vx4rJfhNZj7/y0fSg/LniHJLP8kKRVFhgfIPM
+FbLemY+rT/PRlKKZR04ksdi4azQfzYhqlV4LJOurHbRuQfzvM39JnSD5OK87
+thHrWwmXDh0hlrDaMoD7kGolLn+I7FdgerYA9yu9uWEhiXO0whXjcR8PZjVF
+Hyfrf+sQY3Bf4/pfhgQRjyxI9kW/zZP0f8ST8a3+xW7od7m1a+Ftsp5v4831
+ojQ3JUNC66kJuc+vtkuI0bSGsPu1j2S8un1rLp7/RB99CzFTrJfXX6KN/gdm
+ruM3hNmD2gc98bzZBnyr3w5zgyTcQhAv4lj4BsIc+9eebMRFPc52ZJJ4nMQ5
+CfSz6OqC7moyP0V+6Bz22779cUQvzJjv5m/D+8Us+T8b2Y/8iNL/BzsuQUc=
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.033270561564573, 2.115262469500575}, \
+{0, 1}], LineBox[CompressedData["
+1:eJw91H9MU1cUB/Crc6yxbpQqv8qvV1GDgW38UKAM5jNuSN3E4nQUYaVlKrAW
+WkvSlXWulYG2k6VPdGtJhqkIQbcllDhZ8cfsZrqxMCZZHcFtJtV0WKZAo6j9
+Y8R9r3+sycvJ552bc+8596XiOu3OfUsJIVI8NJLwE/wSWRKhMYUlukubHwtE
+LLHszp3Vw+G+ghV82GibyQsms4T9XtY9i/XeDV+XyOGJ8yV3PbD1krPSn8QS
+V+SPkmZarzLpcBXsXTANRsPZt+zVc7TuWlGmKwHvp1r9J2A3T7otHc74bjxv
+B6zsXZPdE88Srtb6MBVmrB6FEA4rOs4vg7m3PrceiWPJmdU5LxFYdrBVuQQO
+P3676Om5bf80tMeyxFkwF8iFwzK/bxXMM2sa99F6/Nsxw6tg6dj7fbSe9oBE
+DY/eSXv5Hs2/21KTDwdqVFWFOL/go+OeBJhU/9DVDnNZ+i+EsCf5luEXmD1r
+2psONzz/7zgf87CUmQ5J4SnJHs+rdD4fD1jbaD5z/aQKDo8denMMdpfmv6en
++eZPFtNwPuZCqqGZ5suNFR/CgY3Xf90FM7GqwT9hVnM6Yy2sc/JrJehXzrGi
+APZnbB0jHJxQdiHuCKyU8KpuwsoHnCKZ3odqU2kS5uesOBrqpfMxp4m3woHW
+/C10vlz0wBYFzBvYpuvCPbkMa25SM7Kmi8/AAeOdZWV0/d3IpwbcU7ij52oi
+TJzHNs8jZssjwt+xX0S758EB2G3u9ZtgzwvdVUthZcPMiICez2/qOU3PlRvM
+caAf90xnkRx2q/OLV8JlQ+K/xTBz/cZrNjq/yLiR3qvuR8fDxZWYU8g+/wjr
+ZBufizLA8qboOpp32xeXPxKyJFQxJ0iDLfv3b22Djb5Rw3aYFdVbUuFIS1ad
+jdb3HZscj2FJYf0HcddggXq4vwu2fKPUi2if1T2aZth1slZUD7te77usgjPK
++/rd1OK/CjUwZ1aP3af9aoP2TpgpSLSvp/NJqTnuhT1RbGMFLAi/I30W+/Oi
+7qvrYV2peEUlPJUzrWyEA7vaB4fg0U3Fgd3whHfxKwH6s9xYUGTRfPCV7Vo4
+VGPbMIv9LEu6bo/CnLrR0R1P58LO0+8zO7GNy4MF5Et5Nf3e+sunL6M/8jPH
+dcKMV0qK6fwd346chROuBa8OYZ7KLIXPDZ9padKkw95cvdVFfe9g7WeI3kzH
+T0bqc54nfETuik1SROu3nTIfxTkCv/nM04hMaO9wPCL74sVYC6J38o3IOSG9
+z5KC5fT9hH6hDiYOyRUroixlXfc6xKf/PzH/x/8AlpCa2Q==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.232686837739852, 6.643275441506765}, \
+{1, -1}], LineBox[{{6.4999999999976925`, 14.5}, {13.49999999999251, 14.5}}], 
+        PolygonBox[{{9.4, 14.5}, {10.6, 14.1}, {10.6, 14.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 15.4452}, {0, -1}], 
+        LineBox[{{6.5, 14.500000000002307`}, {6.5, 7.499999999998607}}], 
+        PolygonBox[{{6.5, 10.4}, {6.1, 11.6}, {6.9, 11.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.5548, 11.}, {1, 0}], 
+        LineBox[{{13.5, 14.500000000002307`}, {13.5, 7.499999999998607}}], 
+        PolygonBox[{{13.5, 11.6}, {13.1, 10.4}, {13.9, 10.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.4452, 11.}, {-1, 0}], 
+        LineBox[{{13.500000000001851`, 7.5}, {6.500000000002592, 7.5}}], 
+        PolygonBox[{{10.6, 7.5}, {9.4, 7.9}, {9.4, 7.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 6.5548}, {0, 1}], 
+        {PointSize[0.04], PointBox[{6.5, 14.5}], PointBox[{4.5, 4.5}], 
+         PointBox[{13.5, 14.5}], PointBox[{13.5, 7.5}], PointBox[{6.5, 7.5}]},
+         InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T14", " ", "P1", " ", "N27"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdieg/gjfhfjhiij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdieg/gjfhfjhiij.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {44, 0}, {0, 0}, {22, 22}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["g",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {21.75, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["g",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {26.25, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["\[RightArrow]",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {30.75, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["H",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {35.25, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["g",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {39.75, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["g",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {44.25, 69.96}, {0, 0}]},
+  AspectRatio->1.0999999999999999`,
+  ImageSize->{288, 288},
+  PlotRange->{{0, 66}, {0, 72.6}}]], "Print",
+ CellChangeTimes->{3.769419771050458*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"4909787c-6f76-40ff-ab6e-5078194faf99"],
+
+Cell[BoxData[
+ GraphicsBox[{InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJw11glUU1caB/AHVglCISRgESnbwLAMixEkVJE8ZZFFmBQZiBVEEQVUUBaL
+LFUUFxYNDKNAESRjbRqppREBWQoFsUoVKzIMhiqbhRaDQFQglIrp/3pm3jkc
+zu/cd+/9lnvfiXnUweA96hRFZeOP/KfeqvCspKl3jwNNaQzwrU7BzPDxyV57
+mtpQHDjyxpCm+NUR9rWwKLXecj9cmJDPrYS1C2779n5AU1l/PaZZAm8McR5y
+hw8VR+mWw6UWPx+7uoKmpO13LavhLa/Uik1gUee6C11w249iJ5EB3l/PsJyD
+jxt8382BGexnK20Rzw3hp1v69GkqtqkrbDccfYAhLoClW7ITLsP/8Clc2AG3
+veQ3/gLPDP2Q4gXzbbkZlo40ZXHGLoAH7zxpurgLdhY0dwbCbrL7X38Oc+7c
+jYyHDZ+sc/kRfqhlfKeM7MfxrZiCWTm+K3tgUXZ8BMOJph6NHdbURXzSsdr9
+BjBDbYoRCAsemwcQu40EHj0Di2zZTPK+uoqrbISz0qMiyXpfFwq2DcOx0/4x
+ZL8SI5GuEvaN3NNTBjczb3H+IPUI9KuLhpfzva7IYb5pRaotzBxqcboNywKL
+GieQb42/l5Dsd6T7pWs1fEuZlLCWzB9XSpJhlqd8/0PEL7gSIPGAFfGli2Hw
+cHBEoR78YEnBJz1srF8bs2cK9W9/UhC6CTarX9PaB/+aLONeY9FU96pzNfdh
+Z3rxjD4sTfN4+ACWuAyMHNNDn/PndAdgdeO+1ldM1Lsvc2ge5l3c550IK7JN
+TMxIfy7Nur7VRXwn2I4fw3Z1epkecINh8NI8WF6T1/aVDk3lrNX26iTxml0S
+u8NuIYNBmsj/6MCu6cX34Q8L9vvDKcUZSXJYcdViKAeO+teknQoW3Z7VugXP
+2e8TcDF/3PmC8DWszm65cRZebcMWrEJ/ThZr1CrhLGHDbS7sZd47cpDEs86w
+ejMZN493eQEPt32X6g+Xnm5s4iCfwqAxAxp2D3XZuhemfDV0bGGj7yauF8AC
+tm7iMnJerEfNqogjKx/2k/jV7wtr4IaIbpsv4Umje1IxnKXh0LsPzt3QveoU
+WU85HOMAO4xzQwJhWZxz+TTqsW58g1iFeAx/ynWoJbaNUXeH27LcWz+DjdJ3
+BIWQfBLzGoNgi+atV4NQDwbrhRu5T2Lrusw12ujvk4kXOnDx4WQ7hhbqN5K9
+XI3M5wilMk3kafrTBvI9OFk26v0NA/0KLrusDSfN/3NGqEFTdOD6Dis4Qcx1
+Pb0M53KitMIf7hs8Xly2FPX5Nqg6DTbZOB3Z8x7qLwhXuw6npCeGroEla6Sb
+p+Cz1qMnWpagvhkVCkdy35rK9Q7DnbNWPofgcp1sbwHMLBnM+xZuyudlRcOS
+BitDOXyH9ZfIC3COKCLjQ9Rb51LOxCh5f+3zQtI/FlX2NAD7yWLbL+6F3xhf
+/q0dLkyvFKTB53VTV3kg3rbBca1j8HvU+543l5L6deSmwpdevfa3RH6rp+e5
+u+F6RdSXmbDil/OanrCP/ISkAZaExacYwnmP5M8ewbHZmrvGEF+ReVVUB5n/
+osTgGjmvNT0TubCo/onxQVi2YG38bv3TVnYcuOvjuPQi7C/rP/vHDOozbHXu
+0GPEu9qpZn0L7OvzN44S+Yn2hkWfhasVH+Uq1dGfZtYX0aTfYiPRkBrGM/za
+N5N+pNyU3KQwfjqDyYXLLR109FQ8avWSxu3OcKf3+af1b3gUdffZoDu5b36T
+s0kLPOrInIHXVlgyJqoInedRom2RXx2GDwi6ohLnMH7mnIh8f8sTxCndMzxq
+Z3ZdsAz2EhrpHX3No9xyW7P0Sf++GWAffwX/nSUOgfXz+quevsT88F2sYvia
+1MG5EGba+Gn0wYo0b7oEzll6oU+P3K//Xu96Dpv5dql84GjPq0WZWO/IvbsB
+yTBzbHvORuzH/4/J2Hl4Z/L36TaIp9t2x4Eq+MommzbTWR4lvWincYN8nz1U
+C/qIn79WElcNN+i7jM7COUWt/eXwjGe9/nUl5vutsH93HuL8f3BF/rISRVMo
+fISXkZkG0/YeYVZwuKndFwnwfPjnLpMk/sRtv+vApZHUIykc3WTzayjWEyzb
+3p8EM+KElT7YTzS4oOUKa3eusHmGeH3lnxgton47h1ssOMgn9tSB/Huw4YrO
+ox7If1yjsVIE83cnvHWa4lGMgny346R/jh/4XHyOeGZdOuLh+a665yOjPKqz
+I8g2hvjGtSKbYcTzoOoOGac2RvVaP0b9Tu3YQ+a3qUrZxg8wv96A/jcZlweo
+dJp51KG5ouVdDv/7XfD/x5H+E14X+cg=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.4225671224906584, 16.38857259237856}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt1H1Uk1UcB/DL8g0cazCUFzk5FA8q8tJA3UB4nsnEAKGhSJxAQWCmZsox
+k4kiAw3BwWmFYeEs9ABHPYBTStEJgRkilizlIKkJmPKSMuZwwgS17z35x/ac
+z7l3v/v9/e555pG6fbWCQwhJxIc+CY9+ObKEvH1WRZTE7XFgCd9JXVSJZ35+
+7df9fHhh9WYFLA5zlEfCKl+H4DB44s7y1WveZYm/vpEnhSvs8ludeSzRiYOl
+ybByXVWYkYv126eUWlhTH8F/OJ0lJo3zBQs8LXFkaMIO9bdw9m/E+a1244fC
+Yd1ky9xBWDuz0P2qLUvYMzamXQKWyI47uyjhpmOcqmlOLElIEjmmwqa/utpL
+4aLswKv7YMP0TC+3GSw5yflJ3ArzB5KtajjuWoj7Elq/JTWnD9YMufk2whrv
+Nt95M1mSEuV1Iw75DKK7Fhkct2CDegjWNa9XUKdHPRjcg36Ei52vzoU1e8ON
+I7D82pjdY9Rr+qb7ZqQ9+hVntdHzArcezcuEDdbYl+6w//j24M9h+fWA8z8g
+L/fj3CsSWHVv1hNnOCMo5Ox11COTDlq/Qr8d0SkHPKkVxbE8OD2s92AM8mRE
+zeeVYT7zl97UxiB/xrbRwxJYaedz34fOY94xxoz5yh5fnzU6FfVzVgpa4bia
+zMTzU5Dff9mhBvj5yfw5ysnIkxax4za9r2xu5weT0If0Ye801Ou5+5If+A7y
+X8ySJcIH/h6cIuNgntas7BZ4Z8WgVWWD3/9umr0C+VzcqttMBOfxufUGeKDy
+2clSWJ6cNycV/V1mPhvYQegcJEPPYHa9YiIPZovfu6zEfB6ZIsqaqcVt1cMw
+a/7Exgv1myob6uR03i5DaadgVYDEWErvx6f60xDkUeWmPWqkttfe7oTLg0Lr
+W2Ch63P7zciv0g+F1sJJDrON/TBb+IqTCfeYC6Npv5oHeX6e8JhN2QkVXF60
+VHEJ53PH23ML6fqBP/cwMP+SjLMeFvb1iS4hvzzMl0ygnjCouPN9mH+lT5JO
+698suF9D76tmcEUZ8vh7hOcshsXfRqVW0HmpLYntmJ9/X5BQjX6J96hLLsxX
+vuk++5ohbGOc64fwwBmJV8AEQ5pS4qXL4E0bXN+cszKEZH7UHkHXcxzTI0cZ
+Iqw0RmbChlCtwMHCENXMaPUVOIH3XaT7CPaf3tfhhfO77Coqs59hffdr2xNw
+ecFh0XITQ8oXmUcWIr8uZlPOP0as39tQoqf3c1z2yB3O2DqqWoX+Dd6/xS6A
+NcPS2E6YPAlJekH3z/CzxmJ+5NfxugDUY+VbfC7C9Yp1pd44L0VdemGKM96v
+tKQ7q8wM0b3qubwE1km5ETnIx9qKzOHw2K3OjlPP4TGJnq4r5bPb62g/u34W
+TYUTuoJX5L9gCL939yw96htqhYH26F91WqCPh+Ur1xwRw7pC04/dyFfQckv6
+CvvZSZ7xSXD9tb1frH1B6zXxOtCfUjXoL0X98iM7Q2Ngk4fWrwV5hKMl4luY
+z9i5fdph5M/4pffGRlg+I8tSNoz9X67rcxDQ/w3z9/3/Yn35iKwL89YlHuWO
+PMZ89DEBDbB829MqYw9DDFxxMr0PVXaoyLUL+dd2NvfDTQkiW8sfDDGd55Z7
+C+h7v8hWoWeIvO7p8UOCt//LRQ3/P53Y/wDkBwX3
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.078831134583988, 3.8142802112558902}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.00000000000182, 17.}, {13.5, 14.5}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.28332719689847, 16.358549288063976}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt1gs0lHkfB/DBamRVTNK4zyAk29hY4WWbWCoMU1u9MitDxawXYVVqvKUt
+yiXRyOayuXQhrc2yuSUz2EopjSxp6xVScstYtRhj7fe/+845c57zOc/8n//v
++z3PM+dhBu/ftk+ZQqGk4UuO/3zWsP85GrEptCRmsiVcEfybmQhu7FJu203O
+W89/oW3MpnjXjPQVwtIg6Vg8bHBU2XEM7kt5uLSVnDeeqnOxZlOiuvZzfoeT
+3F1lmTA3L8FaDsdc72a/hhlpbeZ9cFya2NDuE+z32KjkKjyg5uQkJO5+O7gV
+9rgvr6+BbZYcvzqEeSgbZgOH4Izw4rFIWI+364raWjZF89F46oQhm+I8cO6Z
+HkyRcOuj4W0WIgsjuC+/N3vegE2x6nbPWk7OO8src2H/zGsTClwvQTfvki8c
+/6dn/QtYekypiAk3mpZRqmHG011O2rCEUbQ2jTj8OnM1fG7h3/8Lhguvf7yc
+D/soFV10gblWCT3V8IPuxlZj8vucnWGrMc8RYYa7Bszv0LWqhL9ijoeqwhL6
+XTtP5AlLKrxPzkvbUu4Nw08+kduakvV0v59Ok36jN2VthmUfAvYtY6C/2X4F
+6Uvqkmu/DU5/0VJ5i+ShiaKT4Y+ozz1Ukdfy2aJ9lbDM9lrdDrgwvdSmDabn
+mJdcgyvWZfc9gWnOe+PmYf6Qp/A+bFamc4HDwvq9bKUK+GcetSQblq1w330a
+3v4wvLwL3lwRwNkBB6WuMf3IBv1qttvowW8U/kE6xOmrmm6S+V0UDCZcqLtx
+0B5+F7Q/0Ay2+cJ1Voy84kf9pxhwRpVNvR/s+qd1BFnPZdXPUeEFzn0XKhzl
+4bqlE/11yxe/fov9NWl3RI3wt/yZaDFcOLV2pg3WWKJbfR6uUIstnIMV+ju3
+7Cf+w6rJi1x/8jORL0z5/VFVLUx/pZ7jCDOsTKxdMF97/+0OFsk7Vpv4BNb0
+vqVkB9dWp59zQL7cBBpzE9lPP/Mb0odC7Mb5mszjMtv2K3xx6Zl7ObDgatpN
+XSabUtbweKEbZjt1VH8JB9+t2bGM5NUY+nAMng6KnLKH+xhuwfnwv2TvbvDh
+1pdDT0rg7HKdlhRYkMpfWQxHJ3cEVsFvnybJU+GVFw6298DSuWH7UHiINZI4
+C0s0jwfYw8xHK1y1P8X8IfoVCswXphWhYwnPTPw8eRv+/NNooR2c0StgHYWn
+T0bsdITV4i0TN8JT3yrk9rCfcm7/x/A7nw3ma+G+G0Y5TejHjL70vTHMrmsI
+SYKd/ytuXwInCAziw+C9hrH+ZB4K97vAKNh2XDtgkDjiVekFmGO857KU3B88
+wUw/+X+ozRoVw/zz1xPNsF/I9wtNJK/aiRsH9sKlV9xjy0nesuK8cjixy3eW
+ePMiIzbJR9vFGrwJl9Zwed7I7769incHln0z+zgHtjNn0V+Q9ZLckj64Wf9c
+KJlvRvuwt6EJnqeJrPUGmF+mQmv0hsPWCVa5kb68NG6Hwz7v5zPDYUsvwzEh
+zIu8U5cNl35QGjwMfzYS3y6G+SUhjqHw4bwCrTfETqGx7jB929g4dR3y9pjK
+deCF7WeXmsE9I5XDvZhn8fH8GEeY8V30u0J4z2SDcBNc+9JXPQg+3eU4zYH5
+lVY8U1he0McgrghJ7x1F/rs/ZBe4w5rOX65vhAcb24UOsKV6WNz38IByuKYF
+7ODwajoVbhZN/EEj61OarIlv2dNk85hXwkvLyYN5nzMeDMM2X//2SwN8Ymu6
+Rw+xuSt7HLbw2UJpI9b1vG2FeeoVDttbYIa1BSsG1vPjcJrhqCu8aTHsK3I6
+30r63FOmp4n8T6+1hHXDUqqfcDccpGZycRQWjOxbUQJLd4lFpC+/gh2Ob+CX
+/bqc1TB3nN5MN0UfAVsP+cIZWXQ3Z3i5/6mjccTPb6zxhYUm05eL4VbjFb1c
+OL83xuAhud4vgbUb4dFIKWPq774slpnCw5PNWjq2uJ/GFutNYz/qkasptrCf
+iWOnBD7b0n/QE6Ycet12AmYOVTH9YUbn4hk3+AXrFDsYdjidGasK3zu2bpq4
+NNDS6yF5PqNGu76CEw6uWk+e91kRtYMLF/pORsbBTRmqtmy4tk71wB7YMrgs
+2Zr4nv3Ubji/xuPsSlgmCij+D0wtitJSgQXhrRuS4ZmB4m4Z8lyoUc+shhcl
+u50cgAUP3h+YhOMyziQ9I/lVyqnrMZ8rs3Gum9x/Z0xbSB5P1+pLz2GJWWxD
+J3xpktI1RPo84NFjgn74db2H5sj60dfUCHhJTQGV9KX2Q9HJH+Gwyw659jC3
+cxl1EFbRujzOI/O+UZ9WN0PfI15HTsJxd8symXBsXkTyj7BkQEPFAuYV2Pj0
+kP6UY2L04b9fWuz+/75ixv4LgmodCA==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.557702928444957, 7.254772386043117}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwt2HlYTevbB/DVPA9Ko2SniZQmx5haTlGGNBly+LGThKRQkVKrAQ2aIxrY
+KeHQqI5C2qdCEw3qVKg2Epo00UDH+33O9fZP16f7Ge7nvp+197rS2O/l6MZP
+UdRKPooiv6lvv/Azh6ZG/v/3hmUOFowcTRml6vs54be8nvN5KXma4pb6zCbA
+A3l/tGTBRmtc80vhtr6Bx+Zz4ePd957Chr0x9zrhePF2ExL/kRwh4q1AU971
+92/Ew3mxVQdn4ZEvakH28AtZ72dnFRFP375jBvvfaTlUNARzhd7mJ8D6tXuO
+blJC3C7yjSocNqwunkjc0vMsVZamPpo0RFURcy4/VYQ5tt3vumF2xencRTI0
+9eR+4WQvzMhMNRpL09SKXP/r7TBPfb2pkxRNNdjKhZXBHMspicuSNFU7FCcU
+C1OtE2r8cFBT8/xdZL7IXZcMCZoavlait4DEe/gaPODvXo2VvciXVVKp7AUL
+73wUkkfyT3F/nAO7165oY2DGnvVFButp+qxu2AdTZfW5N2GDbfP6txL7xem7
+IJ+kvupf9sQn7vetQr6OIpclD5H5CQGqOjiPzAHbRZdIvTL9U6Rw3sHOMb8O
+2N4odO4FePugla4xOc+Em9wMrOT3OCADZv2cPOiC+k2WV3WpKsOx7w+Vwgdp
+25mbMPuunuYP+HZpbN9qFez/rp/RQX9O3dm0uQ32/uTitRJ+9rE22VsV/Tvx
+dsIQTg8/oS06j6ZkXwSukYJN4xoiUuAmocNxzVgvcqAiW1UNcd5J+2B4R15/
+XwzMVelpV4Ev2aseHYbjrXc53US+x3eYslbPx/7nmy7rwIK9Om1eMFfR+OV6
+nH+sd8ouDuY9dQ22QH0a/aw3X4XpSx7661E/M5eVXiTOLBM1c0F9xxN1LHxg
+zvK0+aR/TOXr2U0k/m8/j4LVkkMjlch6cvJdieI0ZZ0yYdSNfNiW/kd2wsIa
+KuFZMDPSUGQPa7uf0zhK4kcWXg2CuwR9w8zIeZaaPOqGk8a2vVSGOVvzoo9i
+fcFcvixBEneKDtdAPmqJhd/5YV7cHK9v8CfJDWMKMK2X9qQb+Z/MP/raHGYN
+z51pwfkqtl7hCyLr3Sw2fI7zP8/1rG4h9XIbX+6M+hRN1cevQf6s8vnqlfDm
++VqTJXCTZswFNdR3SI791Fwdlrnu7AqrWBnrtcAj4b/ZJcEmS+gejwU0VXCs
+TPvPOTTz8Ohv9wRYGG+x/F4OHDAt8MMOZi/1b4uAvSX50q/AI19vPHCAZTTr
+T72B7fO1GQGst3Lv878UNWDZ4t2ZsjTTFHW2zQZu8lriZAgHXnUo8Yap0pm1
+B3Aem5J3t2Ngdqx43/9wXnMfJuA6zGxQjNqBekTXnT6ZA3Mz3rJ2SdJMuLyA
+XRaJK+qaeqO+602lzFJg2u6g+03U33TKqD6M2HOuEh8sJXG4+whZX/rUWKQY
+zVilWyZvhVlOj/6ygrXTTxsZw5ymtGlTMdz/nx/5FWCeW4ukM7xxjvDWnzgf
+zzhhJg/jH3ROG3whvrU4bZk4zVhnrg7pIvWpGat8j/1u6U28eg2zmk+eL5Sg
+mTN7B7a+h5lX7xNS0O+K/Xl/TrD+u8/xUTjftpdpunIk31WmGcHSNNNlrxK9
+muSnMFXugfowE8oLPUn9vKUNFqJ+o2HNNbfh+M/eHcFw6YLtkwNkfuzpG3Xo
+/0mDgJZlCzE/XHn+L8SXvd1Ph8BMTW0TPj+Z/MS7v17CvAcvd5L7sTt8P3ee
+JvIvy/ZE/5jpPxPWusEjW6ZHm7Be6R/bd9yBuTV8PefJ503vfu0+2DuDY7qI
+fL4I/lRQ1UI8Pyn7OPJdsc/9myVMC+ndO4N+ukoaUK4wxyCvwleKZhKHw/v9
+YGbf8ENP9FNEKPVDMMx7wkvzRL3eTgUlBcHUWkMxBvU8+6Ff3gdmJUS+JfUf
++Czd60L2W9Ncwo/+pDlLdGwk40Ob00JFaWaOxSPBpWS9C9fzTOH0rJLbsiSf
+1B/DyqL4vPkjVH4C+XOeaM0n8Uy5uRdfk/PVXixgEG+3zFzxjNTjSs3nWdg1
+apSvjMQD+Sazsb/quFZEMcw6om5+DP0XD+kRfgjTUbwce9xH1Z6MLXVkfoij
+4O84X92+uoKPMI/+LXwFzj8s/01GkuR7OV5HB/XJVtj1wow42nyFAOqXd+1a
+53/1OWdSXQ3rpMY9KSX5nygQMkY/9W+szae0sb5S9dBh1P+Wxqe0LfBI9z/H
+o+DzlRU2qTDvzNfv8TBNcw5+IuOzd/CdheMvXrxnrANvHV5lh/Xu8r6N+MHe
+s30HxWAXOnNdCcztsS7Yg/1bBfSm+2HOiG18GPI9FmLSrKgLMw/c4nF/5zz1
+H1kBc/Xn2sTgfsfXrp6wJTbT+RWOerR2e044w+ywquhQ1Msjtjx0F8xbui4v
+HvUc/LQ62x5muu54laHeS7SUnlnAlGl3kRA8FtSTu4jsF3SoJVAE9yXni5sU
+mR9pYacFt0vV6ozokHpOJ/0Sphk/lWfmr2DW39KNMiI0ldHrNlVK4mH1H53I
++Ip5IVkw/b8wpgZx/ow1zclkvNZZw0PYb/nr5ZdjYZ4j360lyK8pR56VSOpx
+ZFxGHPkLFQ84ckj8ZODhaVgzQi6jjFg5fnIY93dJuP1YF/HNC2U96H/wDfcG
+SVKPrOIPXNTrwqW3RuvJeUrv7ojA865eVv3oHDmvu4aMAep98W+N/AbiheGR
+t2RoZi9HQ1h5EcZHCCuMwVbjntFuMKtuXaQg+tXmlDxaBDNrz6kNIC6U6D84
+C9OjRYpX4RcbnmyyWoz9V85qKmJ9/ec/pMJhlsN4mDv2r9zygnkEs3UrnZNx
+P/dcKdz4hcSX7XUm7ydr7Cf8JfXI+4PF0Wz0s/PATIqWHrnfbyzTcf53H4Kz
+jWHO4ZjuFDyPiZwY1WUwVaModwP1lD6v269P4qv65J6i3hfLhj3nk3i7s4A4
++qHurrdHBOaub4o9LYz3r+dv7w+SfLZNJSuinzbHS3IaiW99+PxJiGbMg1uZ
+InKernqdYVhZ80hcCsykWd9YhPmnczaJhMC89w89k2FN17hBb5i6lX9GH/sJ
+Zjr8PETmXyps/gJPL/K9eoTEvax6qvB50Ji7o9yP7Gea1VKA/ps5iwzFkPV7
+jcVzcN671y+aFsC06kTEFfS7ftMBjS6Y0/jd6yzq9dTBsVmenO+Dl98m9Lt8
+2HLMkdSr3HX3d3jV19dtV0h86PNmfzxPdDUV9oGcf971VS/ggIXF9UZL8Pdt
+GfOH0R+7JSy3IJh9YlzrNXwjb4yqg5m4luoEuGh558E5+tg/5GyJEuzaLh7j
+qE/eH1e1eqOfpesa86JJXDJ6KIu83/aLsR8Rd8mdKEP+m4xG03kwt9pa5RHO
+97XTsm2GzK9Q9LuPfmpuDhkTM0D8p3hoLvrZMdnjLA0zOWJaxahfUOfke1ES
+39T1oBn92qbn0EHmM0VVaTKof5YM3fORrLdquMZXiKZmcu/018PsHI8AcfTv
+m06gVj6xgc1QsyDNRDg8b0vQJ/ftje5LQZoqkQmy9SPxt5uH/kW8+M33Z3vJ
+etbLHrlgfsdHKwdb4mCXvlF4pN6/1JLsX7X/5W3sv26o7jgxe12FThDyPZ7i
+G03Gs85nO5Ln/Z3E3Mz9xHKqjXtw3j9O9raGkvnq2rfwvsewt215mQvTOZ2D
+K1EvtZ13yt+TuMQCEwk837Hx691YpB5PRn+Uo76TDyV13WD2iO6Sjaj/5vke
+ivmkPnKmO3LQ/yFuvNTP/8bPyjQjPvrV4OnGpbivTv8oP0f898AbQ5dgjuvG
+UxGINxhH2nQTC3eeUoJdmsL/ZhnivNuSk05jvx1aZud2w1zh2+ZFyC9j5rxC
+DMyTlchswPenVsfgrmIS5+02a8b5kpZW3G0i88dbQutw/oYzG7veGZLv61bX
+KtRHZ3HNms9k/BOVV89Qvzd9shd7YZbgfbse9G/7/Tn8HTDzXtxbEfW2/BVu
+Wk3Wk/p5ygf9qaWOCd+F2Y9DZn8JoP9d6umxZD3D79fLYb19BauOE6vwt+UL
+0AyP+rp0O1mv1PvFP4hXybc8NiPzU+aeNMJ6PmWXfy4mtmwNLoWfHUmoUSf5
+XuTdO4T909+V3FIj510sMbUS+aodePBYi4xfR/9cgPPM6wkoW0Hye+OwSx7n
+Db12tJ3sx55J1RHF8+3fMt0aRNaTivAYR328/jo6VUhMNV+pQ/2kE78oDZP5
+OxfPhuHzL6BU65WyEfKP2mOkJEnTZf3q+9fC7NTl3nj+uVvimD9dYVbEbwOF
+6I9FUHtUFIm31n6DadcDGm8KYI5Epy4Z/z0ryb8NpuaauSggfpJR3zlpRN7n
+REqCJGh6o6ZGmIIx5geGmVWI09xR6sVvhsTm1a+6xWiuZPnTDkuYt/FlZZ8o
+TXesuSblBHPEhXa+E6G5N80HCvfArEbH4514PsfuPuGxyXi5CanX6KebQ8Do
+PuJzivVDqG/HBmmfP8j6byJOqgvS3IKOB3oOML0uOtFHgObGPb/Nt56s5+Sh
+MMmP9/nLTYIryPiO2X//hDPO225bRNYztTRK4qepywOzSqokXnTVpoCf5trI
+Pj4hRdz09hqF/gdENfsKkHyPlTsx6L/1KX2FWVK/sIjAxYI0za7qUPtBLB9+
+YAI2KTZe9C+pX7fs+3YhmuZN66cJk3zKex/V4nw9J8SuzSXrcX+pVKD/ur4J
+80g+jFfg7D3U57SwYCUNU2yZhxGon6dWmvBekk/2pIeNOE37OEcsCSZxxsbt
+A57/0WRtmyyYa9Ma44j+9w/8cqwl55tIKoyXoLn7dG0NRkh99i16mIrnrzLW
+Nl/RBPvbTTeR/wf4v5ctWQPTE6cPzcH4m1Zzluwl8X3a+mFY/9/LyqpniWen
+2utw/3ILBgtTYNZ18emvyDfSdYtjLsz8UEn9ge9Py++dCeUwdTirZxL3/fb9
+nN9rYB5Tn/JViOaa+hr4vDAh93O6Ev2kc/1yThBTejaqs6jvM7nHVWQ87S5x
+VRcOnq1mccn+nRHSfujX1i9Vx4rJfhNZj7/y0fSg/LniHJLP8kKRVFhgfIPM
+FbLemY+rT/PRlKKZR04ksdi4azQfzYhqlV4LJOurHbRuQfzvM39JnSD5OK87
+thHrWwmXDh0hlrDaMoD7kGolLn+I7FdgerYA9yu9uWEhiXO0whXjcR8PZjVF
+Hyfrf+sQY3Bf4/pfhgQRjyxI9kW/zZP0f8ST8a3+xW7od7m1a+Ftsp5v4831
+ojQ3JUNC66kJuc+vtkuI0bSGsPu1j2S8un1rLp7/RB99CzFTrJfXX6KN/gdm
+ruM3hNmD2gc98bzZBnyr3w5zgyTcQhAv4lj4BsIc+9eebMRFPc52ZJJ4nMQ5
+CfSz6OqC7moyP0V+6Bz22779cUQvzJjv5m/D+8Us+T8b2Y/8iNL/BzsuQUc=
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.033270561564573, 2.115262469500575}, \
+{0, 1}], LineBox[CompressedData["
+1:eJw91H9MU1cUB/Crc6yxbpQqv8qvV1GDgW38UKAM5jNuSN3E4nQUYaVlKrAW
+WkvSlXWulYG2k6VPdGtJhqkIQbcllDhZ8cfsZrqxMCZZHcFtJtV0WKZAo6j9
+Y8R9r3+sycvJ552bc+8596XiOu3OfUsJIVI8NJLwE/wSWRKhMYUlukubHwtE
+LLHszp3Vw+G+ghV82GibyQsms4T9XtY9i/XeDV+XyOGJ8yV3PbD1krPSn8QS
+V+SPkmZarzLpcBXsXTANRsPZt+zVc7TuWlGmKwHvp1r9J2A3T7otHc74bjxv
+B6zsXZPdE88Srtb6MBVmrB6FEA4rOs4vg7m3PrceiWPJmdU5LxFYdrBVuQQO
+P3676Om5bf80tMeyxFkwF8iFwzK/bxXMM2sa99F6/Nsxw6tg6dj7fbSe9oBE
+DY/eSXv5Hs2/21KTDwdqVFWFOL/go+OeBJhU/9DVDnNZ+i+EsCf5luEXmD1r
+2psONzz/7zgf87CUmQ5J4SnJHs+rdD4fD1jbaD5z/aQKDo8denMMdpfmv6en
++eZPFtNwPuZCqqGZ5suNFR/CgY3Xf90FM7GqwT9hVnM6Yy2sc/JrJehXzrGi
+APZnbB0jHJxQdiHuCKyU8KpuwsoHnCKZ3odqU2kS5uesOBrqpfMxp4m3woHW
+/C10vlz0wBYFzBvYpuvCPbkMa25SM7Kmi8/AAeOdZWV0/d3IpwbcU7ij52oi
+TJzHNs8jZssjwt+xX0S758EB2G3u9ZtgzwvdVUthZcPMiICez2/qOU3PlRvM
+caAf90xnkRx2q/OLV8JlQ+K/xTBz/cZrNjq/yLiR3qvuR8fDxZWYU8g+/wjr
+ZBufizLA8qboOpp32xeXPxKyJFQxJ0iDLfv3b22Djb5Rw3aYFdVbUuFIS1ad
+jdb3HZscj2FJYf0HcddggXq4vwu2fKPUi2if1T2aZth1slZUD7te77usgjPK
++/rd1OK/CjUwZ1aP3af9aoP2TpgpSLSvp/NJqTnuhT1RbGMFLAi/I30W+/Oi
+7qvrYV2peEUlPJUzrWyEA7vaB4fg0U3Fgd3whHfxKwH6s9xYUGTRfPCV7Vo4
+VGPbMIv9LEu6bo/CnLrR0R1P58LO0+8zO7GNy4MF5Et5Nf3e+sunL6M/8jPH
+dcKMV0qK6fwd346chROuBa8OYZ7KLIXPDZ9padKkw95cvdVFfe9g7WeI3kzH
+T0bqc54nfETuik1SROu3nTIfxTkCv/nM04hMaO9wPCL74sVYC6J38o3IOSG9
+z5KC5fT9hH6hDiYOyRUroixlXfc6xKf/PzH/x/8AlpCa2Q==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.232686837739852, 6.643275441506765}, \
+{1, -1}], LineBox[{{6.4999999999976925`, 14.5}, {13.49999999999251, 14.5}}], 
+        PolygonBox[{{10.6, 14.5}, {9.4, 14.1}, {9.4, 14.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 15.4452}, {0, -1}], 
+        LineBox[{{6.5, 14.500000000002307`}, {6.5, 7.499999999998607}}], 
+        PolygonBox[{{6.5, 11.6}, {6.1, 10.4}, {6.9, 10.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.5548, 11.}, {1, 0}], 
+        LineBox[{{13.5, 14.500000000002307`}, {13.5, 7.499999999998607}}], 
+        PolygonBox[{{13.5, 10.4}, {13.1, 11.6}, {13.9, 11.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.4452, 11.}, {-1, 0}], 
+        LineBox[{{13.500000000001851`, 7.5}, {6.500000000002592, 7.5}}], 
+        PolygonBox[{{9.4, 7.5}, {10.6, 7.9}, {10.6, 7.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 6.5548}, {0, 1}], 
+        {PointSize[0.04], PointBox[{6.5, 14.5}], PointBox[{4.5, 4.5}], 
+         PointBox[{13.5, 14.5}], PointBox[{13.5, 7.5}], PointBox[{6.5, 7.5}]},
+         InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T14", " ", "P2", " ", "N28"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdieg/gjfhfjhiij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdieg/gjfhfjhiij.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {0, 44}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJw11glUU1caB/AHVglCISRgESnbwLAMixEkVJE8ZZFFmBQZiBVEEQVUUBaL
+LFUUFxYNDKNAESRjbRqppREBWQoFsUoVKzIMhiqbhRaDQFQglIrp/3pm3jkc
+zu/cd+/9lnvfiXnUweA96hRFZeOP/KfeqvCspKl3jwNNaQzwrU7BzPDxyV57
+mtpQHDjyxpCm+NUR9rWwKLXecj9cmJDPrYS1C2779n5AU1l/PaZZAm8McR5y
+hw8VR+mWw6UWPx+7uoKmpO13LavhLa/Uik1gUee6C11w249iJ5EB3l/PsJyD
+jxt8382BGexnK20Rzw3hp1v69GkqtqkrbDccfYAhLoClW7ITLsP/8Clc2AG3
+veQ3/gLPDP2Q4gXzbbkZlo40ZXHGLoAH7zxpurgLdhY0dwbCbrL7X38Oc+7c
+jYyHDZ+sc/kRfqhlfKeM7MfxrZiCWTm+K3tgUXZ8BMOJph6NHdbURXzSsdr9
+BjBDbYoRCAsemwcQu40EHj0Di2zZTPK+uoqrbISz0qMiyXpfFwq2DcOx0/4x
+ZL8SI5GuEvaN3NNTBjczb3H+IPUI9KuLhpfzva7IYb5pRaotzBxqcboNywKL
+GieQb42/l5Dsd6T7pWs1fEuZlLCWzB9XSpJhlqd8/0PEL7gSIPGAFfGli2Hw
+cHBEoR78YEnBJz1srF8bs2cK9W9/UhC6CTarX9PaB/+aLONeY9FU96pzNfdh
+Z3rxjD4sTfN4+ACWuAyMHNNDn/PndAdgdeO+1ldM1Lsvc2ge5l3c550IK7JN
+TMxIfy7Nur7VRXwn2I4fw3Z1epkecINh8NI8WF6T1/aVDk3lrNX26iTxml0S
+u8NuIYNBmsj/6MCu6cX34Q8L9vvDKcUZSXJYcdViKAeO+teknQoW3Z7VugXP
+2e8TcDF/3PmC8DWszm65cRZebcMWrEJ/ThZr1CrhLGHDbS7sZd47cpDEs86w
+ejMZN493eQEPt32X6g+Xnm5s4iCfwqAxAxp2D3XZuhemfDV0bGGj7yauF8AC
+tm7iMnJerEfNqogjKx/2k/jV7wtr4IaIbpsv4Umje1IxnKXh0LsPzt3QveoU
+WU85HOMAO4xzQwJhWZxz+TTqsW58g1iFeAx/ynWoJbaNUXeH27LcWz+DjdJ3
+BIWQfBLzGoNgi+atV4NQDwbrhRu5T2Lrusw12ujvk4kXOnDx4WQ7hhbqN5K9
+XI3M5wilMk3kafrTBvI9OFk26v0NA/0KLrusDSfN/3NGqEFTdOD6Dis4Qcx1
+Pb0M53KitMIf7hs8Xly2FPX5Nqg6DTbZOB3Z8x7qLwhXuw6npCeGroEla6Sb
+p+Cz1qMnWpagvhkVCkdy35rK9Q7DnbNWPofgcp1sbwHMLBnM+xZuyudlRcOS
+BitDOXyH9ZfIC3COKCLjQ9Rb51LOxCh5f+3zQtI/FlX2NAD7yWLbL+6F3xhf
+/q0dLkyvFKTB53VTV3kg3rbBca1j8HvU+543l5L6deSmwpdevfa3RH6rp+e5
+u+F6RdSXmbDil/OanrCP/ISkAZaExacYwnmP5M8ewbHZmrvGEF+ReVVUB5n/
+osTgGjmvNT0TubCo/onxQVi2YG38bv3TVnYcuOvjuPQi7C/rP/vHDOozbHXu
+0GPEu9qpZn0L7OvzN44S+Yn2hkWfhasVH+Uq1dGfZtYX0aTfYiPRkBrGM/za
+N5N+pNyU3KQwfjqDyYXLLR109FQ8avWSxu3OcKf3+af1b3gUdffZoDu5b36T
+s0kLPOrInIHXVlgyJqoInedRom2RXx2GDwi6ohLnMH7mnIh8f8sTxCndMzxq
+Z3ZdsAz2EhrpHX3No9xyW7P0Sf++GWAffwX/nSUOgfXz+quevsT88F2sYvia
+1MG5EGba+Gn0wYo0b7oEzll6oU+P3K//Xu96Dpv5dql84GjPq0WZWO/IvbsB
+yTBzbHvORuzH/4/J2Hl4Z/L36TaIp9t2x4Eq+MommzbTWR4lvWincYN8nz1U
+C/qIn79WElcNN+i7jM7COUWt/eXwjGe9/nUl5vutsH93HuL8f3BF/rISRVMo
+fISXkZkG0/YeYVZwuKndFwnwfPjnLpMk/sRtv+vApZHUIykc3WTzayjWEyzb
+3p8EM+KElT7YTzS4oOUKa3eusHmGeH3lnxgton47h1ssOMgn9tSB/Huw4YrO
+ox7If1yjsVIE83cnvHWa4lGMgny346R/jh/4XHyOeGZdOuLh+a665yOjPKqz
+I8g2hvjGtSKbYcTzoOoOGac2RvVaP0b9Tu3YQ+a3qUrZxg8wv96A/jcZlweo
+dJp51KG5ouVdDv/7XfD/x5H+E14X+cg=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.4225671224906584, 16.38857259237856}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwl1QtUzFkcB/CLDmMrJk30ovFYBtWOShI786dWD5XZ4eihGKm0s8XUolCM
+yqNTalLJsxI2poPRklHZnaI8wrZtJ4Me06omRNNDjVft97/bOdPvfOZ/7+/+
+7u/O3JkZul0YPpYQIsGLjmQK/W8qRZh0ZFLE2SX3erQZRUThGabrJ1NEuHFE
+/5hFkcKottTXkyiiDNx9dw6sGXRTVsHik9HbE0zhngld7XBZz9SQl1MoQj69
+sfTCfB7LdL8nzLZ5YNcPGxRs7XtoQhHuGo+JYqxX+6fj2TBYsT9+UR+s/z7p
+vRUs0L40OozoYHu6kH6fKWh0nY08c46+Ot8Jsxf7fa6E69v+mjEEq1RvSlej
+jkse3ak2mFfvMxJ1H/6VZdgZDDNDb62dT9ftZTTuEp2fFzAtClZPGer6CLOr
+onjpcP78bLvVyCtYuDLoCJzg9SUhB9a0HbHeDB8vyRt4CiuKnvtYwBtdiWyQ
+fh5UmX8T61nOu5lGEKWFl8XLEX32LT3fi+ciibPfTURhTaiHClEay7zNQXSY
+8+5GLN2vZdnRBajDMqxXx4B1RXu+zIRZNqHyQ4iiIqmbEvtsWpIylu6HIjZ1
+KBLRuiKU74dISja7LkX06Vnwwht9FtUx/G1h9+OZXZ+NUV/HjENucLrjVe/f
+jTBeFapJhJW8H4oLDCkicwn4WQ2Hddg9LPmGIhKB5yo/rNsdxhp+OxHPU/sH
+1HCKMDA8gnZsbqUEdcZfEamn076cMssY+2XsbdxjAnOPiUMvwkyt75vlcP30
+C8NcFn0u53afgAUZWutLcHNc2wULrKdKL1hhgM9dwm6u4jeYvJ4UTcGVi+dF
+BqA+KicsNRD2dFis18OkWnjMDyaLTj06hP3ojMUX2LBg1tmwQZjdJOhpQH7r
+iywHZ3r/ur93ieGOcsrJDRZ8Pd/xDvXVmxWnmsEqe974cFjt/b5WjvmCLdpw
+NX2uQ3FWBrAs5FqtAN4Rf5Q/F+szTcwLm9APA2OOHV0/xeHmx8DWt5OLtQyc
+z8IrdhzYqTTnRP4ErHO/2XIU/U2x+eDrMx71OXO8PsLdUU8LRw3g9JjD0zA+
+uENqdn8c5ue0JgfAleHeRDEW37/ih21K2LyuvaJmDM6nWx7qiHrcH/R8ZcLM
+mXrPKtjoWMzaPIJ8L4XyIOxnh2TCkyBYt+mLbgiW+ZS1BcLc/KQNR9GPS+f8
+EzLhwtERqRn6Z7DaNHgArm+3qD9M9ztXkrgH+XX/rBvTCjcfzHs0DfWwL7fu
+NMW9YdTX11oJU20Bid/CjT+laIJQv070yz76ud7wO9ErWHRveJSer+QUOHph
+v1RJZVYa3LjJcvkBWJbefHwGzOVETUqGBekbBvNRX1Tk5Fh6vNSGcZkFC7xN
+FQ3IR/HK1x3BfnRJJlfYsGY9s2ws3DhV/tgF9dR7B85NRz9utNgXzkb9oppd
+Vrb099ow45F6lE9kyfNvdaOfslVrldRXPuE+2SauhamQzpHTn/iE6b+19D4c
+uapWyNDziaLlTn8PHND9PqLoA/y8ZrsT8pmftV2WMoB85iWRp2DPPt/su318
+InKaK7Cg6/Nbe1Wi45PCjGC2HBZIrIoW9PKJSjt8zx37kZR7h0e+x/j5Drka
+WNYcXZwF63zPNe1AP2QVDSmZGK/IM1zxkf68q7Z5FCAfZZ+4NwL9VXeVxiix
+nuYIL60MjnTUSvT9fCI5ybbvhBW34xasHOQT8rzOUgcrDRh9caiffcVj9jOY
+U5vpnjiE+hnXl5yBddXXpC7DGO867OkGm1e82pRDOyTAuAHrx/f+sfwArNlp
+I18DS929Rj5gvtSk3OMe6o9ct/OcDvm5cUnHXWCOr8J/F9avf5a0mr4fqVvZ
+LtmoT5rVe2YlrDi4JS0Q+1HEWNVq6XtPaB1R9Rbz/V1Oyel7tqXr5OEujP/R
+3zYTVqll9lQ7LH6RlQdTVZYtPmr09+Kn6rv0PSrWP6x7gvMbwzttgvxEulVQ
+XY76I5o+0r9T//3l3Pn/945F/Qu0rYWt
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.472727570790026, 3.579801639345143}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000003638`, 17.000000000003638`}, {
+          13.500000000003638`, 7.500000000001819}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.296859253185694, 9.004142007228563}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJwd1gs0lHkfB/BZEZtiziuZtz3Oukw1btEUDTv0SE1CkttOksbtbYo0q4li
+aELxbimtyKXsMHLt4lq2ze6krabtposSEpFmM+tS8o6S3u9/55w5v/M5/+f5
+3eZ5HOYRu/2jtWg02s/4kkib/oKPNUX752NH0aqstD5721A0s4ltJrNhs/Tt
+RwpgRRf9xy+2FE2wd4vpACwItzRQwyqfH7+zQtx3wkt9B5G6ySgVIkop+fTP
+iCfrtgWRmKMyO7MDsSdrXRu5rqB0bpk1onol7ybJ40nx3F8jb2w9+9pXqLuP
+sXyqGNZ+GVo8B9brSRBvglXCwpu6MF94OUYP7pE7On/E/XoxbYevY44W83mR
+A3BLbbzbIbh8hmt6g/RnV6PYCPvMX5pXCjtUlTxjwmrdweXJxJY5HTqwJqQ6
+LZD0v+PBofdWFI2+3dfAAZb1tVqOwGuWu3vRYU2ZLf8DbFt1Q/w/9CE6w3HV
+w/11yqyUN7BsOlG4CJ7uuDDaD/fV63zyggMfB/aR87Ho5ksJcHuK96sp2LP1
+gEkFzL2Y/8UE+ekfZoueknxvPra4w8pfxnR1cJ3tyhL9BDLvylYXe1J3RiJp
+hKuaW/P84YzPDlYa0v+7p+9jYVaHzwt37IvDfZIngbmLQmyOwe3rVzpJYbr5
+tqwumDYoN0mExbJGIXMp5jvrMS8cljb0hu6AW463SdxsyPyOdpVw+/N7m+kw
+/+8v77phvr3nN53o96pSf+lse4rmN3i+5hTZv+PFDiasdynadxPMzE+PWgkr
+OBPHdWHtwg29rvakf6dvW7FPRs7DBxxY2D3cKIalPXmeVrCqbWDEAc5I6rpP
+J/mLVnAnWLhO7Os7jvpZJTcuK+DTZeu07sG0xO3GBbDi057QCljWkJWdDE+f
+sPzrAEz1Cx7EwJrEaHYoOX+5dEoIiyfc5K4ww+JVfjx819wjdjFMt3SrzIRZ
+4dd2MmDpbdfKCli7Sm5kDHs+d5TfI/WHhiNMYbPYCZ+PMCfpSPsyWKR6ZWyN
+/oWGRt7+cNVuLZ8Q8nxxEzmpsN+mJE4WXOXVL2ki+2eFudXDMu6qzPdk382+
+mkfwk3HtSGfMX7D1bMAw3JMRdD+d7MNoslIDTwwUBrTDdU97bk/Bqi31bAMH
+5PvenUGe3zLFuVY2LGMmpXfAscGSU4EwY+NMdh3sK4iojYeVF87wpPDkY6Hh
+UZgKOcjlwUO9vxnI4PZ8yS5t+F3xr8suwFkzCfatmHf+1zYel0g9pzHjPXCU
+SbV/C0y/dvsJC9ZbMtbYBPu5l5n3L8HfkUGLT7Uw/3fTvBI47dp3kyXkfuPE
+7Eh4caVafgymfVNlxIbj04JZElhYyP9DH274naEQkv42F7aOL6ZoYcneDUFw
+379cfhqEfbbPWr2G5Kte70EsOjpL5ggLqDnUGKw95fbCGjY7uzlWF/lcbK73
+Msk8eWvtWLDD3JMBxNJo12Q/eI63+pwVOZ9nNJUCqzqc/03y8Y1vGVyAJ10N
+03hkn3dHZ/fCqyPMs7fCqqI4O33MP7aKJ9tPvNlkhE2er+vrVIWwaN7IuD+c
+H+ca0Up+ny0XnXfA0kmtN69IvaqEFWK4ge7F+XoZ9qGUPiTP58L1jQb2sKDc
+/WgU7DbflxUAj5V6xK+HuWXdwWJYOu+YhQXMk7GzT8Bm0YU3R9Gf7d82w9Uw
+K9lcpwlm9+Xcugq3LIgZFcFeEUWXb8OMcw//Ivu4oqjNbYdVnpU5vdifQY7R
+/oewMqmo6CScr/xNeZfk04z/sgGWTaotrsP8tx9T5sJHQxcImmFZqLbT40WY
+63JgZjksLHV4JofNjv/aRvorWLt26AAsCmL6p8J+z8T/EcIfGdopMSSf4PW9
+rbBEMJweQurv30sTwLK0wJ98SH3rT35xsK1HeP1qmNozkpUJz3lhetWV7OMG
+a7IaLhPcD3Ij8zaappJ+TrObXq0h+13V2PwV+i04fCZ9E5m3pnZ6GRzI/GF+
+FFzH21kcDrNpt+wksOjhtf5sMt+5ZKtCOIe7e20TvFo9x/oKzFnyJvURHOEY
+xuwl/Qbby4fgK9/Khmex8d4/LXEehUvuHHOzhh1eZvsMw2m8Sx0b4QJDjriL
+1C8c/2EPTI8K6r4Kd2my3+bCigZH11yYqt7tUge3WItfhMGPwuVHbsEaeul+
+c3hfdyf1HN6XluH4AvPGqUOmB2H+hq60k7DS2Kn8LdzuWaTjBQ/FhUUS95Xr
+JtDgVM2tSnI948+ug1eYeB8NM027YFbswPkkOGynQ+Udkl8r2dkDTvB4EHAF
+NrPT11kAc6sH/Cth5SmlZMISfa8YHyL963Fys17CsmKn7w8S7204+Azm6Dr0
+i0h/O/uX9sBaUVk1kbCK1nlTDfMGGE0h5Jy1YkoX+RcO//d+MOy5MeyzDTyy
+fMEJPnGqoiIYFtZ2+gtggU1MyiG4ZmxscRxMldO7muEMy5ruf+rrLdR+DU83
+nZ8ugjv7pX50zM/ZZdXZAufIDSlHWB1/4TCZnzZcX7wJ9lsr+jAD14XkZkfC
+lyp3v2Mux/s4Mdq8A+ZV6bp4w31N1S7kfMLa45AINkt4176ROJZfkAtrdp1W
+2MNpKyr8GuGWE8N9s+DOt7n192Ga/tzj99Afta9tdBBm6RSVHIOjnhgkfYAV
+4rdr1sMz5P87ko9ES+r/pF+h5A==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.487957619455987, 11.899719917065077}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJwtmHk41d3Xxr/GSDpJNFBRUiFEmky7QUmGEE3ihDIVQvPgoBRCJQ1veI5o
+okGJkuQICUUhPUllKEmhVCpD/e71XG9/1PW51tpr32vde+8vqbsHOGwU5zhu
+shjH0b+cLP2lzLimv/jDY9w6n2CFPWC1wT6flSMYN3XHQU5iNONEF3rSE8GK
+IpsFJ8CCt9EdInBPreUHrTHIH967qg58bIlk1QNwoEOYWDVYzJZXsmos40aE
+TRzIAnv6BeW+Bwd2xLvsofq8Tw3e47C+cLqOPnjcwKwXr8H8FMHFdOhpqS9v
+XaCCuFZvX8VwxukcudZ+HCxIuvX6lTzjahQ0EqrBoh+td5qGMc6qb63HT+Iw
+66BWOcYdXpF0Y6gq47g1pVJdQxl3/cXNDGJBauH4oeCJoXcX/ab8mAnXmSzj
+VnXWTXlJ9c/7JJ2RYVzFy8TjV8GsZJynClhrpsXC3eCm006vK4Yw7nTKStNF
+YE5YJJUJVjh56uYwWp8V23IPnL2uq7KB+vvxettf8KbdGhE3wFy5QnkA6l3/
+I9p5AixU3yEni/3X3A2qiqT4rRklJeCfJ5OlY8DM0UjpLPTW8dZ0nKN83a/D
+ItDfQZ/O7dVgUUGteDD6F3saXzuC9IYE9/MxHyXjR3abaH7r+3mLMD8v++O+
+VaS/sKyOh/kWSH1pXoJ5MLsh+ffBzxRtKh6D+T65szTgR4h90RWX8dDzSueA
+I1if/yujB8xeGJn7gWcfsLoYPYFxKwr22viCswo3BahNRH0Zj5MrwOGHaz9c
+B4v8/opNBJ9wXnB2nBr0aAe+vYb9Vlm5bXMGi5ZnW/yGPsMVPiOiwQLWvlwD
+/Cbgj90tyn9gYz0X/XSuz9tZR/muWfFmw5jg26TSOR1gvptBJ5NjAsc8ows/
+wMJX9p7LMC8VU3HLn2CuzSZnA+b59mSm9Beqz1cdOC7DBE5ryqY2g9mSIQ7v
+4Y+j/DPzx7TfqOJdbmCTCxXq2bTexeOMNFi20unxKcr/V1zqjTQTnL0p67QX
+3GS3VPUDuGH/qxp30rNa00Qd+cVHdlraUD3b/aVR4PaCoHhT0m9mPlcV/t+z
+ULYwovyzQ91roGc9/3oesWBgU0o69JrN7Gwxp/Uzu6dED2WCe++67FeSnhhL
+n13w39PefUYw1TM1CPGG/3pLv+ol0fq4zJU2mJeU5vDMKtIrIRk+YTgTDJOV
+iJNVx35+l81rwXFpfYHLwYL47J8e8MP34tG04+CmkvCoCrDnSwez1xRXSl0s
+Bv8SPPbNnj4J93n361zJEUwQmDslOATcFJic8Qb5ui6/Wu6BheZ6uRE8Jrg5
++dIxbjL0Fkzu68d+CbP175mC+R3GWdbwt7VDuTUILLqremUv9A52fHuZQvGY
+2FEn4G9Q2elaEVgYNjA8Cf3aybj6/gtuenSLn4J57Go3S38PFlgny57HvH5s
+PtPTDlbzPdOYh/kuvp84o5XWuxeMbcP832Z5xjyn+Kxtww2GMMH47VkJRRTP
+3l+YDv8KREW8y6SnfqZwEfhc1uDPWIobyKwdKY33YvZeN9LLeV65QPzcPNp1
+NdWbPc5sMThKrXdgAa1PPPyS6j0USY+fCWZ6f630sV+31U+vqZR/PO1SEzhn
+TZGJJnHsYNQ1+L+x+UOqLtX3uLPyGPqJHlE//796faWJoeh3wxa2wJXyKyw9
+AnDej0o/CT9I89C0LXaG/+WWKh65xPH6ijqYp0Whcks37R8W5NcmzwR2+x0v
+6GtgfZn0wD7M34UnK7cDLDy2bP1n8kNJZWYRcaZ7jQ78TJ4UOlJ+Cp0X/m4T
+cEj07FOrwYIRw/3HgV+cF89MBauNWVFeBn81WY9DG+XvPP/PUnDrsfYiDU30
+I2HRmIL9wx9Z+q3TpPdRnVcHvadCJBWjiM+0TeuGv7bemxquUP5g5rTf6PfH
+AaVlD4kT797vxzxKWY/9c7CwZnI7B75QkOTYAFbLMj80EvPLWZEyqh7c9IAN
+zqP3OdY1v5zq35EoD4U/vf5zHuRSPSlZvU9STLDZVqM9BSzaNq0rDOwbmDHh
+AK33GippKYU+onK3eWvS/amOMEd8/k1zaVvKj48XeCMuaj/SOBvMDz49rAjx
+i72DLdSv8K2HjQX2C7UxrBpL+W6Rad3gTFN3udFUr6f73R3433jgyI3xpC9c
+8+JpnNdit1nbdamf0btOHpRlAr6V+IVlVD86vX4b3jPp+kvqAcSXOR83zMtg
+7FQ30s/xFE/MxX1p++0SQP2LXJ0tf4FrHt8eojwV/SxR338S89/AEuLXgfmV
+bw8Pg9875Ev0z4O5z+YuTuAUsdSOL2DhsgOiLfDP7m/JBZNpqDflTfBK8JyU
+m7aRYK4mZM5Q5Lu17GyuBPO3JpQdQ32DoJ2H5aaDZ9oWdmN/sbKtGYuIVUu9
+teD3ravKA0FgUea3PctwfpltcOxpsHDqjSon+C1bmVabDW5ymvh7Nfr/yQVd
+K6H8MpMeF8zHLyTVp5Ly3VMv+WF+xUsb8x6BuaUJZ+PofnptyCkAC0JSdlbB
+H3lp0aNMyj+VUWQAf5ZuULp0AqxmYxBaJInvxcONprup/roisVBJ3Lf7ZSdc
+qd70BTlbwBuydctIv2hWy5A4sObRrHfaVN/jwsY3lG889e0YMFt413Id6g/I
+y20fRnGF7+v/grvLnTVkKJ73J78Y+hxP6yvIU/29P7SEOJ+Z33slVKl+Y/Su
+GJxf/+AZLkakr9qycQ/6/70gWX4NrY/gOXphPrzyZ8JI4vm3RyzG/PpyPs+h
+foUGaU0ymO+kq/+c6qd467TIq5h/1NsuQ6aF/fZ0KWjjPRi6eS6LAov2V07H
+eyuoD2koqgMLpy1kyYjXx+amq2mDZznkHUE8I6/gqa82vV9T+60Qt/M4b34D
+rLbkh08D6h9WfKfQQ/kxenbmYOnxque0dcBPx1wNhb63T7VOuoBFvXu4NOj3
+W6XdGQFWEyp8u4H76/bnlWwquKnrtlgu+j/m0Xcnm/KnThyXB38fVq00vEf5
+/m2GpZhfy5k9KvlUv9nhYyv8XfVaa8cNYodqxQmYt9enrHQhsZNx4B748zOt
+0Dqa6vsV2oqDHa4b2wdS/UOe9rcl8PNOXn7eSso3HGWSLIHveXpYyjywYE3P
+i1tgT7uykepg/rJ5nwbAw+PMefJUb/lniyCcnysFl9f/Rf9NDq9beNhfce3y
+yN9gwefrKtXQV+DGEw3QvHrvd17E96D2a3erLO2fqmJzDP2tKNXxpPoiE6vw
+MPSfG3t56SLigq9x/phP+ZX06QFg7rtvoi3uv9TmctN04ll/zMZgvhWvglc3
+03zqMlWL8R5YfnvapzED++uc+LMU52EgYL37FuIXIWap8Gfs50ln74D55bP7
+KhAfOao3QVIX+r/NMCkGO0m8M7QDc7I+vGjkL9n+JeAkcbZZqDp4UH8R/1+w
+WpdqeCz2j2tod1TUQz3n7U9r4W+v69oWCzAL2HGZ3usInlKfP5h73nFIHqy4
+6MqnWLCa7qoKvNdc++vmwHNgkUybvRLuw8HAvdevgJumi6tOxLxm1hTMuUrr
+PWoa5mG+qcHRf9LBgtNFR/3hp6HlfsfE/+prGJbCn+uLnWtDqZ7zw1WLwUqu
+xqs2Ub24zC9fxHH/NJOarfTovP47pkqcCaY4r4vSo3orJ39vBHuVaHkqUz/2
+nmmqOB+qlT2BYlSft98mGvX0T06J6KH+W9+YqMN/A6c6vU/EkstHvAJP0bQq
++AwWfvgxcB16t0XVK/3Spe+v2cRT6Ofi8hX35Unf/Ir6SPj/np/9dAbpS16s
+tQ3zkLyn0L+K2PKuLt4/Ltm7JTzmv3nx/TXhv+LnI9ZlNN/OZKsXYOewrd8k
+9el74u7kAf+rB2SeTNOn3w+mpZTAn3X+d0xswU3Nod29cky0b2uecQixVE7f
+TznGXJJ2FJwB8ztzAsqwnnct8G4BWCTlwHmB/bSb5r8Fq02/bNswlLH8rDL+
+IPGt8DLoYbItnwJHz0S+hKKvoyxjag+8G3TAgsjtod4yTBTbHGdiCuY21iwO
+GMJYWeZjX0twk0pizFbc5yzPPf62YP6J2467MC/3Ffsi7Sh/0XjPo5KMjZt8
+Q8Oa6itbvC+EHx8tnT4upvxqT/ER8CO6KzppPliYUXriEPz1GG2iqUv5/VWN
+2uJMdDHnzgE1sNq25OUceHaf34ORxJFr3aSRL+E16pMU5f8qSTAVZ2zxnC6u
+n+bxO9orDfFBY9bTQzzZbLuhBBN12N+O76L+O+rOf8D+jQu/RxA3GbdsvCPJ
+RHbRadbfyI/K74NJuP/7EjYZ0byYa8+HGGnGIs2KVw4jvcZlBntoHkfmxZA+
+vqvfR74MY5rKUQfmkb4ehd2G8P/MwrH5zsS3ncZ24HvgrLph3w6aj4Xr+H1D
+mehMlfKP/6N6821s2uDHg42NeiKKF+arq8Pvf97zprdRf1GZ37TAXl9X18kZ
+gE9JjpEAnz8cOU0fzG0Jb8tAvYjR1loOYDVeeeYUnK/Lfv69gWDBeINDO2WZ
+iNfXWxEDFpbeMsrAeb0gM5x3DsxMeY8f4P42OGmtyaZ8TtqjEuddR8c5uBDM
+nzs+7wnmEZC3fv1D4pTkJ7XwV9fgqfUj4rD+nZinqL6xNqOU6u14Jj1SgjHt
+K608Wi/Mi3++DvezMPOcaQ7pe1/6t1IM+q2lRl8m/VOjRnqDxz1TP3WW4nJf
+aw3BRf3SZbHUr/cflZngOCPxbAHpMw4rchNj3FOdErdtxIbFZwvEGHu0tK5w
+M7ip6P3pJdjvlLLoshfpURrW/h3nZ7TL5upNpCciyagIep+fac71pf12Tf95
+Dv2ICt7cCqb4s+7io1Lw19T3Y9h/epxzBTjvRfYHzRJJj83uGm/c/xftw32u
+0n5XLm0xx3257fDkUznNwyvqeD++B7EWoaodtD7/1/pE3K+gV4Va8ob0823p
+Cmn43a+9fZoBWFgok4Dfd0WzR+1SXA3GSdF0QVxkJNG0D6xm/kjSFH6+z4+O
+OAfmTzqp3Yl6JR5H/paARZ71RwPAH8te+r0jPlwpWQ49YvT/Q7P+//+HhrD/
+AfsDqP8=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.595195293865398, 1.860131761048288}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwl1A1MU1cUB/AHiCmEyGOCsIGxTOa6xWBX2OjGNA+ZXQkUKxhogpIXmyIr
+OOrXRNeZzmwiWweFaXykdakKg2YS60RnRaUoFMbXqmsBQ8iKm0jZgh0rzSBI
+97/ZS5qTX+895557381L3ldVoAqlKCoHPxL/f15hqP4gnvUMxXTQ4Zmw1V1Y
+dBKmdu/sYmGmdJjvT2Io86UBcRVMF9hZFcxO+tUqMn7zQ8loIkPZ6bScbPjs
+uU3hubDzYml3BMzPOmXpQ/Q9Sfvx9ssMdeX19LmdsH03Pa6ATU/Ydc8QhdF9
+1mcJWP+wZ7AednLtxRXwB78/DMuDrV8XlszEM1Rz15HZJFhez9UpYYU3fiyU
+zO8NG5tax1BDXJP0BfLsvpKl/XC52DQbSfI31hxYikMf0+9efgPWNP6w6QKs
+oCxtRTD/6EdHCmGOnb9QB1OHHk5sgD3qhhvDsLnt6EoY/H5203g0+mfjzbUU
+7Nw15JTDntCSLXEkf83CYT3Z75pvLQxsLr4/cg92jov6dHB528eyP8h4wbVT
+j+AzeQbPImx4/mayCP2ao7ikF7Cup1dhhP3Hbxf8RfJtbm0E9rvqRPYlB0xx
+S+3H4GrzxRCynrxLGjUF89yD27aS+uJqL4NzOGNfDkyQ81LHLTbClDbhtBrW
+vfpA+yu8eaJs7k9E+jWHOog4c8doUyJq4mXfxGIeb7LC5UZdulbUFAO7VlLK
+JLDwXH5mAPNi9d4WG/q0z4wkPiDnLpNeTYN9nYfGjsNDpufFt7BPzWnfXBLc
+HyPk5RLrhe1XUcc//PT8XCzyHqvC34HTQ0VvtcC+hX3qDtThFYne08AMM2ze
+Ams5o0QO882r666Q93lnMGYH7Jx3hAthe3f95zLYEFnJ3UMUVOmu7UcUNgWV
+exClpbrVDYjyslFvFGI63ZjjIPV/1s4+Wot+D/7dT96zp1qZY4UrBxJP7oD5
+EZrFFviL5m0ZNWTdgPif63Aeq7zfQ+bf2vX2Y3iV1phA7plm6PLIWtTVtx6s
+2Yi+NSr1PAtrLQujW2Fqe1jcXXhmekItgRlZJZ2CPO2/JXszYfZ6IL8B1k3Z
+GhPJeEL1UpDcH5u1Z5rcq9zY1Ar8v2dZ+iW5x9TKd4IR2PDLsjiL9Ndb91kK
+zjMqpIznwjo6tna7GmYNvAEFOb/IjgwTXD65/inZt/N7gfcnWOzWp0pgNiSj
+vxM21R/rvvkS1ps9kNlK7p/B7xLAzqCj+QTsSm01mGOw/lc39mbAy58GppJh
+ekOW5Tf042w2FlppnD/TafoE5roE3nyYJt8fMk6+P9HMf1UepsE=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.441371117808147, 6.3681225377691}, \
+{1, 0}], LineBox[{{6.4999999999976925`, 14.5}, {13.49999999999251, 14.5}}], 
+        PolygonBox[{{9.4, 14.5}, {10.6, 14.1}, {10.6, 14.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 15.4452}, {0, -1}], 
+        LineBox[{{6.5, 14.500000000002307`}, {6.5, 7.499999999998607}}], 
+        PolygonBox[{{6.5, 10.4}, {6.1, 11.6}, {6.9, 11.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.5548, 11.}, {1, 0}], 
+        LineBox[{{13.5, 7.4999999999976925`}, {13.5, 14.49999999999251}}], 
+        PolygonBox[{{13.5, 11.6}, {13.9, 10.4}, {13.1, 10.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.5548, 11.}, {1, 0}], 
+        LineBox[{{13.500000000001851`, 7.5}, {6.500000000002592, 7.5}}], 
+        PolygonBox[{{10.6, 7.5}, {9.4, 7.9}, {9.4, 7.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 6.5548}, {0, 1}], 
+        {PointSize[0.04], PointBox[{6.5, 14.5}], PointBox[{5.5, 4.}], 
+         PointBox[{13.5, 7.5}], PointBox[{13.5, 14.5}], PointBox[{6.5, 7.5}]},
+         InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T15", " ", "P1", " ", "N29"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdieg/gjfifjhihj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdieg/gjfifjhihj.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {22, 44}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJw11glUU1caB/AHVglCISRgESnbwLAMixEkVJE8ZZFFmBQZiBVEEQVUUBaL
+LFUUFxYNDKNAESRjbRqppREBWQoFsUoVKzIMhiqbhRaDQFQglIrp/3pm3jkc
+zu/cd+/9lnvfiXnUweA96hRFZeOP/KfeqvCspKl3jwNNaQzwrU7BzPDxyV57
+mtpQHDjyxpCm+NUR9rWwKLXecj9cmJDPrYS1C2779n5AU1l/PaZZAm8McR5y
+hw8VR+mWw6UWPx+7uoKmpO13LavhLa/Uik1gUee6C11w249iJ5EB3l/PsJyD
+jxt8382BGexnK20Rzw3hp1v69GkqtqkrbDccfYAhLoClW7ITLsP/8Clc2AG3
+veQ3/gLPDP2Q4gXzbbkZlo40ZXHGLoAH7zxpurgLdhY0dwbCbrL7X38Oc+7c
+jYyHDZ+sc/kRfqhlfKeM7MfxrZiCWTm+K3tgUXZ8BMOJph6NHdbURXzSsdr9
+BjBDbYoRCAsemwcQu40EHj0Di2zZTPK+uoqrbISz0qMiyXpfFwq2DcOx0/4x
+ZL8SI5GuEvaN3NNTBjczb3H+IPUI9KuLhpfzva7IYb5pRaotzBxqcboNywKL
+GieQb42/l5Dsd6T7pWs1fEuZlLCWzB9XSpJhlqd8/0PEL7gSIPGAFfGli2Hw
+cHBEoR78YEnBJz1srF8bs2cK9W9/UhC6CTarX9PaB/+aLONeY9FU96pzNfdh
+Z3rxjD4sTfN4+ACWuAyMHNNDn/PndAdgdeO+1ldM1Lsvc2ge5l3c550IK7JN
+TMxIfy7Nur7VRXwn2I4fw3Z1epkecINh8NI8WF6T1/aVDk3lrNX26iTxml0S
+u8NuIYNBmsj/6MCu6cX34Q8L9vvDKcUZSXJYcdViKAeO+teknQoW3Z7VugXP
+2e8TcDF/3PmC8DWszm65cRZebcMWrEJ/ThZr1CrhLGHDbS7sZd47cpDEs86w
+ejMZN493eQEPt32X6g+Xnm5s4iCfwqAxAxp2D3XZuhemfDV0bGGj7yauF8AC
+tm7iMnJerEfNqogjKx/2k/jV7wtr4IaIbpsv4Umje1IxnKXh0LsPzt3QveoU
+WU85HOMAO4xzQwJhWZxz+TTqsW58g1iFeAx/ynWoJbaNUXeH27LcWz+DjdJ3
+BIWQfBLzGoNgi+atV4NQDwbrhRu5T2Lrusw12ujvk4kXOnDx4WQ7hhbqN5K9
+XI3M5wilMk3kafrTBvI9OFk26v0NA/0KLrusDSfN/3NGqEFTdOD6Dis4Qcx1
+Pb0M53KitMIf7hs8Xly2FPX5Nqg6DTbZOB3Z8x7qLwhXuw6npCeGroEla6Sb
+p+Cz1qMnWpagvhkVCkdy35rK9Q7DnbNWPofgcp1sbwHMLBnM+xZuyudlRcOS
+BitDOXyH9ZfIC3COKCLjQ9Rb51LOxCh5f+3zQtI/FlX2NAD7yWLbL+6F3xhf
+/q0dLkyvFKTB53VTV3kg3rbBca1j8HvU+543l5L6deSmwpdevfa3RH6rp+e5
+u+F6RdSXmbDil/OanrCP/ISkAZaExacYwnmP5M8ewbHZmrvGEF+ReVVUB5n/
+osTgGjmvNT0TubCo/onxQVi2YG38bv3TVnYcuOvjuPQi7C/rP/vHDOozbHXu
+0GPEu9qpZn0L7OvzN44S+Yn2hkWfhasVH+Uq1dGfZtYX0aTfYiPRkBrGM/za
+N5N+pNyU3KQwfjqDyYXLLR109FQ8avWSxu3OcKf3+af1b3gUdffZoDu5b36T
+s0kLPOrInIHXVlgyJqoInedRom2RXx2GDwi6ohLnMH7mnIh8f8sTxCndMzxq
+Z3ZdsAz2EhrpHX3No9xyW7P0Sf++GWAffwX/nSUOgfXz+quevsT88F2sYvia
+1MG5EGba+Gn0wYo0b7oEzll6oU+P3K//Xu96Dpv5dql84GjPq0WZWO/IvbsB
+yTBzbHvORuzH/4/J2Hl4Z/L36TaIp9t2x4Eq+MommzbTWR4lvWincYN8nz1U
+C/qIn79WElcNN+i7jM7COUWt/eXwjGe9/nUl5vutsH93HuL8f3BF/rISRVMo
+fISXkZkG0/YeYVZwuKndFwnwfPjnLpMk/sRtv+vApZHUIykc3WTzayjWEyzb
+3p8EM+KElT7YTzS4oOUKa3eusHmGeH3lnxgton47h1ssOMgn9tSB/Huw4YrO
+ox7If1yjsVIE83cnvHWa4lGMgny346R/jh/4XHyOeGZdOuLh+a665yOjPKqz
+I8g2hvjGtSKbYcTzoOoOGac2RvVaP0b9Tu3YQ+a3qUrZxg8wv96A/jcZlweo
+dJp51KG5ouVdDv/7XfD/x5H+E14X+cg=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.4225671224906584, 16.38857259237856}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwl1QtUzFkcB/CLDmMrJk30ovFYBtWOShI786dWD5XZ4eihGKm0s8XUolCM
+yqNTalLJsxI2poPRklHZnaI8wrZtJ4Me06omRNNDjVft97/bOdPvfOZ/7+/+
+7u/O3JkZul0YPpYQIsGLjmQK/W8qRZh0ZFLE2SX3erQZRUThGabrJ1NEuHFE
+/5hFkcKottTXkyiiDNx9dw6sGXRTVsHik9HbE0zhngld7XBZz9SQl1MoQj69
+sfTCfB7LdL8nzLZ5YNcPGxRs7XtoQhHuGo+JYqxX+6fj2TBYsT9+UR+s/z7p
+vRUs0L40OozoYHu6kH6fKWh0nY08c46+Ot8Jsxf7fa6E69v+mjEEq1RvSlej
+jkse3ak2mFfvMxJ1H/6VZdgZDDNDb62dT9ftZTTuEp2fFzAtClZPGer6CLOr
+onjpcP78bLvVyCtYuDLoCJzg9SUhB9a0HbHeDB8vyRt4CiuKnvtYwBtdiWyQ
+fh5UmX8T61nOu5lGEKWFl8XLEX32LT3fi+ciibPfTURhTaiHClEay7zNQXSY
+8+5GLN2vZdnRBajDMqxXx4B1RXu+zIRZNqHyQ4iiIqmbEvtsWpIylu6HIjZ1
+KBLRuiKU74dISja7LkX06Vnwwht9FtUx/G1h9+OZXZ+NUV/HjENucLrjVe/f
+jTBeFapJhJW8H4oLDCkicwn4WQ2Hddg9LPmGIhKB5yo/rNsdxhp+OxHPU/sH
+1HCKMDA8gnZsbqUEdcZfEamn076cMssY+2XsbdxjAnOPiUMvwkyt75vlcP30
+C8NcFn0u53afgAUZWutLcHNc2wULrKdKL1hhgM9dwm6u4jeYvJ4UTcGVi+dF
+BqA+KicsNRD2dFis18OkWnjMDyaLTj06hP3ojMUX2LBg1tmwQZjdJOhpQH7r
+iywHZ3r/ur93ieGOcsrJDRZ8Pd/xDvXVmxWnmsEqe974cFjt/b5WjvmCLdpw
+NX2uQ3FWBrAs5FqtAN4Rf5Q/F+szTcwLm9APA2OOHV0/xeHmx8DWt5OLtQyc
+z8IrdhzYqTTnRP4ErHO/2XIU/U2x+eDrMx71OXO8PsLdUU8LRw3g9JjD0zA+
+uENqdn8c5ue0JgfAleHeRDEW37/ih21K2LyuvaJmDM6nWx7qiHrcH/R8ZcLM
+mXrPKtjoWMzaPIJ8L4XyIOxnh2TCkyBYt+mLbgiW+ZS1BcLc/KQNR9GPS+f8
+EzLhwtERqRn6Z7DaNHgArm+3qD9M9ztXkrgH+XX/rBvTCjcfzHs0DfWwL7fu
+NMW9YdTX11oJU20Bid/CjT+laIJQv070yz76ud7wO9ErWHRveJSer+QUOHph
+v1RJZVYa3LjJcvkBWJbefHwGzOVETUqGBekbBvNRX1Tk5Fh6vNSGcZkFC7xN
+FQ3IR/HK1x3BfnRJJlfYsGY9s2ws3DhV/tgF9dR7B85NRz9utNgXzkb9oppd
+Vrb099ow45F6lE9kyfNvdaOfslVrldRXPuE+2SauhamQzpHTn/iE6b+19D4c
+uapWyNDziaLlTn8PHND9PqLoA/y8ZrsT8pmftV2WMoB85iWRp2DPPt/su318
+InKaK7Cg6/Nbe1Wi45PCjGC2HBZIrIoW9PKJSjt8zx37kZR7h0e+x/j5Drka
+WNYcXZwF63zPNe1AP2QVDSmZGK/IM1zxkf68q7Z5FCAfZZ+4NwL9VXeVxiix
+nuYIL60MjnTUSvT9fCI5ybbvhBW34xasHOQT8rzOUgcrDRh9caiffcVj9jOY
+U5vpnjiE+hnXl5yBddXXpC7DGO867OkGm1e82pRDOyTAuAHrx/f+sfwArNlp
+I18DS929Rj5gvtSk3OMe6o9ct/OcDvm5cUnHXWCOr8J/F9avf5a0mr4fqVvZ
+LtmoT5rVe2YlrDi4JS0Q+1HEWNVq6XtPaB1R9Rbz/V1Oyel7tqXr5OEujP/R
+3zYTVqll9lQ7LH6RlQdTVZYtPmr09+Kn6rv0PSrWP6x7gvMbwzttgvxEulVQ
+XY76I5o+0r9T//3l3Pn/945F/Qu0rYWt
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.472727570790026, 3.579801639345143}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000003638`, 17.000000000003638`}, {
+          13.500000000003638`, 7.500000000001819}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.296859253185694, 9.004142007228563}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJwd1gs0lHkfB/BZEZtiziuZtz3Oukw1btEUDTv0SE1CkttOksbtbYo0q4li
+aELxbimtyKXsMHLt4lq2ze6krabtposSEpFmM+tS8o6S3u9/55w5v/M5/+f5
+3eZ5HOYRu/2jtWg02s/4kkib/oKPNUX752NH0aqstD5721A0s4ltJrNhs/Tt
+RwpgRRf9xy+2FE2wd4vpACwItzRQwyqfH7+zQtx3wkt9B5G6ySgVIkop+fTP
+iCfrtgWRmKMyO7MDsSdrXRu5rqB0bpk1onol7ybJ40nx3F8jb2w9+9pXqLuP
+sXyqGNZ+GVo8B9brSRBvglXCwpu6MF94OUYP7pE7On/E/XoxbYevY44W83mR
+A3BLbbzbIbh8hmt6g/RnV6PYCPvMX5pXCjtUlTxjwmrdweXJxJY5HTqwJqQ6
+LZD0v+PBofdWFI2+3dfAAZb1tVqOwGuWu3vRYU2ZLf8DbFt1Q/w/9CE6w3HV
+w/11yqyUN7BsOlG4CJ7uuDDaD/fV63zyggMfB/aR87Ho5ksJcHuK96sp2LP1
+gEkFzL2Y/8UE+ekfZoueknxvPra4w8pfxnR1cJ3tyhL9BDLvylYXe1J3RiJp
+hKuaW/P84YzPDlYa0v+7p+9jYVaHzwt37IvDfZIngbmLQmyOwe3rVzpJYbr5
+tqwumDYoN0mExbJGIXMp5jvrMS8cljb0hu6AW463SdxsyPyOdpVw+/N7m+kw
+/+8v77phvr3nN53o96pSf+lse4rmN3i+5hTZv+PFDiasdynadxPMzE+PWgkr
+OBPHdWHtwg29rvakf6dvW7FPRs7DBxxY2D3cKIalPXmeVrCqbWDEAc5I6rpP
+J/mLVnAnWLhO7Os7jvpZJTcuK+DTZeu07sG0xO3GBbDi057QCljWkJWdDE+f
+sPzrAEz1Cx7EwJrEaHYoOX+5dEoIiyfc5K4ww+JVfjx819wjdjFMt3SrzIRZ
+4dd2MmDpbdfKCli7Sm5kDHs+d5TfI/WHhiNMYbPYCZ+PMCfpSPsyWKR6ZWyN
+/oWGRt7+cNVuLZ8Q8nxxEzmpsN+mJE4WXOXVL2ki+2eFudXDMu6qzPdk382+
+mkfwk3HtSGfMX7D1bMAw3JMRdD+d7MNoslIDTwwUBrTDdU97bk/Bqi31bAMH
+5PvenUGe3zLFuVY2LGMmpXfAscGSU4EwY+NMdh3sK4iojYeVF87wpPDkY6Hh
+UZgKOcjlwUO9vxnI4PZ8yS5t+F3xr8suwFkzCfatmHf+1zYel0g9pzHjPXCU
+SbV/C0y/dvsJC9ZbMtbYBPu5l5n3L8HfkUGLT7Uw/3fTvBI47dp3kyXkfuPE
+7Eh4caVafgymfVNlxIbj04JZElhYyP9DH274naEQkv42F7aOL6ZoYcneDUFw
+379cfhqEfbbPWr2G5Kte70EsOjpL5ggLqDnUGKw95fbCGjY7uzlWF/lcbK73
+Msk8eWvtWLDD3JMBxNJo12Q/eI63+pwVOZ9nNJUCqzqc/03y8Y1vGVyAJ10N
+03hkn3dHZ/fCqyPMs7fCqqI4O33MP7aKJ9tPvNlkhE2er+vrVIWwaN7IuD+c
+H+ca0Up+ny0XnXfA0kmtN69IvaqEFWK4ge7F+XoZ9qGUPiTP58L1jQb2sKDc
+/WgU7DbflxUAj5V6xK+HuWXdwWJYOu+YhQXMk7GzT8Bm0YU3R9Gf7d82w9Uw
+K9lcpwlm9+Xcugq3LIgZFcFeEUWXb8OMcw//Ivu4oqjNbYdVnpU5vdifQY7R
+/oewMqmo6CScr/xNeZfk04z/sgGWTaotrsP8tx9T5sJHQxcImmFZqLbT40WY
+63JgZjksLHV4JofNjv/aRvorWLt26AAsCmL6p8J+z8T/EcIfGdopMSSf4PW9
+rbBEMJweQurv30sTwLK0wJ98SH3rT35xsK1HeP1qmNozkpUJz3lhetWV7OMG
+a7IaLhPcD3Ij8zaappJ+TrObXq0h+13V2PwV+i04fCZ9E5m3pnZ6GRzI/GF+
+FFzH21kcDrNpt+wksOjhtf5sMt+5ZKtCOIe7e20TvFo9x/oKzFnyJvURHOEY
+xuwl/Qbby4fgK9/Khmex8d4/LXEehUvuHHOzhh1eZvsMw2m8Sx0b4QJDjriL
+1C8c/2EPTI8K6r4Kd2my3+bCigZH11yYqt7tUge3WItfhMGPwuVHbsEaeul+
+c3hfdyf1HN6XluH4AvPGqUOmB2H+hq60k7DS2Kn8LdzuWaTjBQ/FhUUS95Xr
+JtDgVM2tSnI948+ug1eYeB8NM027YFbswPkkOGynQ+Udkl8r2dkDTvB4EHAF
+NrPT11kAc6sH/Cth5SmlZMISfa8YHyL963Fys17CsmKn7w8S7204+Azm6Dr0
+i0h/O/uX9sBaUVk1kbCK1nlTDfMGGE0h5Jy1YkoX+RcO//d+MOy5MeyzDTyy
+fMEJPnGqoiIYFtZ2+gtggU1MyiG4ZmxscRxMldO7muEMy5ruf+rrLdR+DU83
+nZ8ugjv7pX50zM/ZZdXZAufIDSlHWB1/4TCZnzZcX7wJ9lsr+jAD14XkZkfC
+lyp3v2Mux/s4Mdq8A+ZV6bp4w31N1S7kfMLa45AINkt4176ROJZfkAtrdp1W
+2MNpKyr8GuGWE8N9s+DOt7n192Ga/tzj99Afta9tdBBm6RSVHIOjnhgkfYAV
+4rdr1sMz5P87ko9ES+r/pF+h5A==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.487957619455987, 11.899719917065077}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJwtmHk41d3Xxr/GSDpJNFBRUiFEmky7QUmGEE3ihDIVQvPgoBRCJQ1veI5o
+okGJkuQICUUhPUllKEmhVCpD/e71XG9/1PW51tpr32vde+8vqbsHOGwU5zhu
+shjH0b+cLP2lzLimv/jDY9w6n2CFPWC1wT6flSMYN3XHQU5iNONEF3rSE8GK
+IpsFJ8CCt9EdInBPreUHrTHIH967qg58bIlk1QNwoEOYWDVYzJZXsmos40aE
+TRzIAnv6BeW+Bwd2xLvsofq8Tw3e47C+cLqOPnjcwKwXr8H8FMHFdOhpqS9v
+XaCCuFZvX8VwxukcudZ+HCxIuvX6lTzjahQ0EqrBoh+td5qGMc6qb63HT+Iw
+66BWOcYdXpF0Y6gq47g1pVJdQxl3/cXNDGJBauH4oeCJoXcX/ab8mAnXmSzj
+VnXWTXlJ9c/7JJ2RYVzFy8TjV8GsZJynClhrpsXC3eCm006vK4Yw7nTKStNF
+YE5YJJUJVjh56uYwWp8V23IPnL2uq7KB+vvxettf8KbdGhE3wFy5QnkA6l3/
+I9p5AixU3yEni/3X3A2qiqT4rRklJeCfJ5OlY8DM0UjpLPTW8dZ0nKN83a/D
+ItDfQZ/O7dVgUUGteDD6F3saXzuC9IYE9/MxHyXjR3abaH7r+3mLMD8v++O+
+VaS/sKyOh/kWSH1pXoJ5MLsh+ffBzxRtKh6D+T65szTgR4h90RWX8dDzSueA
+I1if/yujB8xeGJn7gWcfsLoYPYFxKwr22viCswo3BahNRH0Zj5MrwOGHaz9c
+B4v8/opNBJ9wXnB2nBr0aAe+vYb9Vlm5bXMGi5ZnW/yGPsMVPiOiwQLWvlwD
+/Cbgj90tyn9gYz0X/XSuz9tZR/muWfFmw5jg26TSOR1gvptBJ5NjAsc8ows/
+wMJX9p7LMC8VU3HLn2CuzSZnA+b59mSm9Beqz1cdOC7DBE5ryqY2g9mSIQ7v
+4Y+j/DPzx7TfqOJdbmCTCxXq2bTexeOMNFi20unxKcr/V1zqjTQTnL0p67QX
+3GS3VPUDuGH/qxp30rNa00Qd+cVHdlraUD3b/aVR4PaCoHhT0m9mPlcV/t+z
+ULYwovyzQ91roGc9/3oesWBgU0o69JrN7Gwxp/Uzu6dED2WCe++67FeSnhhL
+n13w39PefUYw1TM1CPGG/3pLv+ol0fq4zJU2mJeU5vDMKtIrIRk+YTgTDJOV
+iJNVx35+l81rwXFpfYHLwYL47J8e8MP34tG04+CmkvCoCrDnSwez1xRXSl0s
+Bv8SPPbNnj4J93n361zJEUwQmDslOATcFJic8Qb5ui6/Wu6BheZ6uRE8Jrg5
++dIxbjL0Fkzu68d+CbP175mC+R3GWdbwt7VDuTUILLqremUv9A52fHuZQvGY
+2FEn4G9Q2elaEVgYNjA8Cf3aybj6/gtuenSLn4J57Go3S38PFlgny57HvH5s
+PtPTDlbzPdOYh/kuvp84o5XWuxeMbcP832Z5xjyn+Kxtww2GMMH47VkJRRTP
+3l+YDv8KREW8y6SnfqZwEfhc1uDPWIobyKwdKY33YvZeN9LLeV65QPzcPNp1
+NdWbPc5sMThKrXdgAa1PPPyS6j0USY+fCWZ6f630sV+31U+vqZR/PO1SEzhn
+TZGJJnHsYNQ1+L+x+UOqLtX3uLPyGPqJHlE//796faWJoeh3wxa2wJXyKyw9
+AnDej0o/CT9I89C0LXaG/+WWKh65xPH6ijqYp0Whcks37R8W5NcmzwR2+x0v
+6GtgfZn0wD7M34UnK7cDLDy2bP1n8kNJZWYRcaZ7jQ78TJ4UOlJ+Cp0X/m4T
+cEj07FOrwYIRw/3HgV+cF89MBauNWVFeBn81WY9DG+XvPP/PUnDrsfYiDU30
+I2HRmIL9wx9Z+q3TpPdRnVcHvadCJBWjiM+0TeuGv7bemxquUP5g5rTf6PfH
+AaVlD4kT797vxzxKWY/9c7CwZnI7B75QkOTYAFbLMj80EvPLWZEyqh7c9IAN
+zqP3OdY1v5zq35EoD4U/vf5zHuRSPSlZvU9STLDZVqM9BSzaNq0rDOwbmDHh
+AK33GippKYU+onK3eWvS/amOMEd8/k1zaVvKj48XeCMuaj/SOBvMDz49rAjx
+i72DLdSv8K2HjQX2C7UxrBpL+W6Rad3gTFN3udFUr6f73R3433jgyI3xpC9c
+8+JpnNdit1nbdamf0btOHpRlAr6V+IVlVD86vX4b3jPp+kvqAcSXOR83zMtg
+7FQ30s/xFE/MxX1p++0SQP2LXJ0tf4FrHt8eojwV/SxR338S89/AEuLXgfmV
+bw8Pg9875Ev0z4O5z+YuTuAUsdSOL2DhsgOiLfDP7m/JBZNpqDflTfBK8JyU
+m7aRYK4mZM5Q5Lu17GyuBPO3JpQdQ32DoJ2H5aaDZ9oWdmN/sbKtGYuIVUu9
+teD3ravKA0FgUea3PctwfpltcOxpsHDqjSon+C1bmVabDW5ymvh7Nfr/yQVd
+K6H8MpMeF8zHLyTVp5Ly3VMv+WF+xUsb8x6BuaUJZ+PofnptyCkAC0JSdlbB
+H3lp0aNMyj+VUWQAf5ZuULp0AqxmYxBaJInvxcONprup/roisVBJ3Lf7ZSdc
+qd70BTlbwBuydctIv2hWy5A4sObRrHfaVN/jwsY3lG889e0YMFt413Id6g/I
+y20fRnGF7+v/grvLnTVkKJ73J78Y+hxP6yvIU/29P7SEOJ+Z33slVKl+Y/Su
+GJxf/+AZLkakr9qycQ/6/70gWX4NrY/gOXphPrzyZ8JI4vm3RyzG/PpyPs+h
+foUGaU0ymO+kq/+c6qd467TIq5h/1NsuQ6aF/fZ0KWjjPRi6eS6LAov2V07H
+eyuoD2koqgMLpy1kyYjXx+amq2mDZznkHUE8I6/gqa82vV9T+60Qt/M4b34D
+rLbkh08D6h9WfKfQQ/kxenbmYOnxque0dcBPx1wNhb63T7VOuoBFvXu4NOj3
+W6XdGQFWEyp8u4H76/bnlWwquKnrtlgu+j/m0Xcnm/KnThyXB38fVq00vEf5
+/m2GpZhfy5k9KvlUv9nhYyv8XfVaa8cNYodqxQmYt9enrHQhsZNx4B748zOt
+0Dqa6vsV2oqDHa4b2wdS/UOe9rcl8PNOXn7eSso3HGWSLIHveXpYyjywYE3P
+i1tgT7uykepg/rJ5nwbAw+PMefJUb/lniyCcnysFl9f/Rf9NDq9beNhfce3y
+yN9gwefrKtXQV+DGEw3QvHrvd17E96D2a3erLO2fqmJzDP2tKNXxpPoiE6vw
+MPSfG3t56SLigq9x/phP+ZX06QFg7rtvoi3uv9TmctN04ll/zMZgvhWvglc3
+03zqMlWL8R5YfnvapzED++uc+LMU52EgYL37FuIXIWap8Gfs50ln74D55bP7
+KhAfOao3QVIX+r/NMCkGO0m8M7QDc7I+vGjkL9n+JeAkcbZZqDp4UH8R/1+w
+WpdqeCz2j2tod1TUQz3n7U9r4W+v69oWCzAL2HGZ3usInlKfP5h73nFIHqy4
+6MqnWLCa7qoKvNdc++vmwHNgkUybvRLuw8HAvdevgJumi6tOxLxm1hTMuUrr
+PWoa5mG+qcHRf9LBgtNFR/3hp6HlfsfE/+prGJbCn+uLnWtDqZ7zw1WLwUqu
+xqs2Ub24zC9fxHH/NJOarfTovP47pkqcCaY4r4vSo3orJ39vBHuVaHkqUz/2
+nmmqOB+qlT2BYlSft98mGvX0T06J6KH+W9+YqMN/A6c6vU/EkstHvAJP0bQq
++AwWfvgxcB16t0XVK/3Spe+v2cRT6Ofi8hX35Unf/Ir6SPj/np/9dAbpS16s
+tQ3zkLyn0L+K2PKuLt4/Ltm7JTzmv3nx/TXhv+LnI9ZlNN/OZKsXYOewrd8k
+9el74u7kAf+rB2SeTNOn3w+mpZTAn3X+d0xswU3Nod29cky0b2uecQixVE7f
+TznGXJJ2FJwB8ztzAsqwnnct8G4BWCTlwHmB/bSb5r8Fq02/bNswlLH8rDL+
+IPGt8DLoYbItnwJHz0S+hKKvoyxjag+8G3TAgsjtod4yTBTbHGdiCuY21iwO
+GMJYWeZjX0twk0pizFbc5yzPPf62YP6J2467MC/3Ffsi7Sh/0XjPo5KMjZt8
+Q8Oa6itbvC+EHx8tnT4upvxqT/ER8CO6KzppPliYUXriEPz1GG2iqUv5/VWN
+2uJMdDHnzgE1sNq25OUceHaf34ORxJFr3aSRL+E16pMU5f8qSTAVZ2zxnC6u
+n+bxO9orDfFBY9bTQzzZbLuhBBN12N+O76L+O+rOf8D+jQu/RxA3GbdsvCPJ
+RHbRadbfyI/K74NJuP/7EjYZ0byYa8+HGGnGIs2KVw4jvcZlBntoHkfmxZA+
+vqvfR74MY5rKUQfmkb4ehd2G8P/MwrH5zsS3ncZ24HvgrLph3w6aj4Xr+H1D
+mehMlfKP/6N6821s2uDHg42NeiKKF+arq8Pvf97zprdRf1GZ37TAXl9X18kZ
+gE9JjpEAnz8cOU0fzG0Jb8tAvYjR1loOYDVeeeYUnK/Lfv69gWDBeINDO2WZ
+iNfXWxEDFpbeMsrAeb0gM5x3DsxMeY8f4P42OGmtyaZ8TtqjEuddR8c5uBDM
+nzs+7wnmEZC3fv1D4pTkJ7XwV9fgqfUj4rD+nZinqL6xNqOU6u14Jj1SgjHt
+K608Wi/Mi3++DvezMPOcaQ7pe1/6t1IM+q2lRl8m/VOjRnqDxz1TP3WW4nJf
+aw3BRf3SZbHUr/cflZngOCPxbAHpMw4rchNj3FOdErdtxIbFZwvEGHu0tK5w
+M7ip6P3pJdjvlLLoshfpURrW/h3nZ7TL5upNpCciyagIep+fac71pf12Tf95
+Dv2ICt7cCqb4s+7io1Lw19T3Y9h/epxzBTjvRfYHzRJJj83uGm/c/xftw32u
+0n5XLm0xx3257fDkUznNwyvqeD++B7EWoaodtD7/1/pE3K+gV4Va8ob0823p
+Cmn43a+9fZoBWFgok4Dfd0WzR+1SXA3GSdF0QVxkJNG0D6xm/kjSFH6+z4+O
+OAfmTzqp3Yl6JR5H/paARZ71RwPAH8te+r0jPlwpWQ49YvT/Q7P+//+HhrD/
+AfsDqP8=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.595195293865398, 1.860131761048288}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwl1A1MU1cUB/AHiCmEyGOCsIGxTOa6xWBX2OjGNA+ZXQkUKxhogpIXmyIr
+OOrXRNeZzmwiWweFaXykdakKg2YS60RnRaUoFMbXqmsBQ8iKm0jZgh0rzSBI
+97/ZS5qTX+895557381L3ldVoAqlKCoHPxL/f15hqP4gnvUMxXTQ4Zmw1V1Y
+dBKmdu/sYmGmdJjvT2Io86UBcRVMF9hZFcxO+tUqMn7zQ8loIkPZ6bScbPjs
+uU3hubDzYml3BMzPOmXpQ/Q9Sfvx9ssMdeX19LmdsH03Pa6ATU/Ydc8QhdF9
+1mcJWP+wZ7AednLtxRXwB78/DMuDrV8XlszEM1Rz15HZJFhez9UpYYU3fiyU
+zO8NG5tax1BDXJP0BfLsvpKl/XC52DQbSfI31hxYikMf0+9efgPWNP6w6QKs
+oCxtRTD/6EdHCmGOnb9QB1OHHk5sgD3qhhvDsLnt6EoY/H5203g0+mfjzbUU
+7Nw15JTDntCSLXEkf83CYT3Z75pvLQxsLr4/cg92jov6dHB528eyP8h4wbVT
+j+AzeQbPImx4/mayCP2ao7ikF7Cup1dhhP3Hbxf8RfJtbm0E9rvqRPYlB0xx
+S+3H4GrzxRCynrxLGjUF89yD27aS+uJqL4NzOGNfDkyQ81LHLTbClDbhtBrW
+vfpA+yu8eaJs7k9E+jWHOog4c8doUyJq4mXfxGIeb7LC5UZdulbUFAO7VlLK
+JLDwXH5mAPNi9d4WG/q0z4wkPiDnLpNeTYN9nYfGjsNDpufFt7BPzWnfXBLc
+HyPk5RLrhe1XUcc//PT8XCzyHqvC34HTQ0VvtcC+hX3qDtThFYne08AMM2ze
+Ams5o0QO882r666Q93lnMGYH7Jx3hAthe3f95zLYEFnJ3UMUVOmu7UcUNgWV
+exClpbrVDYjyslFvFGI63ZjjIPV/1s4+Wot+D/7dT96zp1qZY4UrBxJP7oD5
+EZrFFviL5m0ZNWTdgPif63Aeq7zfQ+bf2vX2Y3iV1phA7plm6PLIWtTVtx6s
+2Yi+NSr1PAtrLQujW2Fqe1jcXXhmekItgRlZJZ2CPO2/JXszYfZ6IL8B1k3Z
+GhPJeEL1UpDcH5u1Z5rcq9zY1Ar8v2dZ+iW5x9TKd4IR2PDLsjiL9Ndb91kK
+zjMqpIznwjo6tna7GmYNvAEFOb/IjgwTXD65/inZt/N7gfcnWOzWp0pgNiSj
+vxM21R/rvvkS1ps9kNlK7p/B7xLAzqCj+QTsSm01mGOw/lc39mbAy58GppJh
+ekOW5Tf042w2FlppnD/TafoE5roE3nyYJt8fMk6+P9HMf1UepsE=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.441371117808147, 6.3681225377691}, \
+{1, 0}], LineBox[{{6.4999999999976925`, 14.5}, {13.49999999999251, 14.5}}], 
+        PolygonBox[{{10.6, 14.5}, {9.4, 14.1}, {9.4, 14.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 15.4452}, {0, -1}], 
+        LineBox[{{6.5, 14.500000000002307`}, {6.5, 7.499999999998607}}], 
+        PolygonBox[{{6.5, 11.6}, {6.1, 10.4}, {6.9, 10.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.5548, 11.}, {1, 0}], 
+        LineBox[{{13.5, 7.4999999999976925`}, {13.5, 14.49999999999251}}], 
+        PolygonBox[{{13.5, 10.4}, {13.9, 11.6}, {13.1, 11.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.5548, 11.}, {1, 0}], 
+        LineBox[{{13.500000000001851`, 7.5}, {6.500000000002592, 7.5}}], 
+        PolygonBox[{{9.4, 7.5}, {10.6, 7.9}, {10.6, 7.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 6.5548}, {0, 1}], 
+        {PointSize[0.04], PointBox[{6.5, 14.5}], PointBox[{5.5, 4.}], 
+         PointBox[{13.5, 7.5}], PointBox[{13.5, 14.5}], PointBox[{6.5, 7.5}]},
+         InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T15", " ", "P2", " ", "N30"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdieg/gjfifjhihj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdieg/gjfifjhihj.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {44, 44}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwt1Q8wlGkcB/DHfxNlSZ1SYpLZkb+J3RTvKxXXFUuq5VjOnR1xsRn5d9LW
+SXtXBl3uuLqr64S9IuW6XKid8Xf9O1Rjr4jUsRdXRNkjue9zdzuz+85nnmff
+3/f3e96dtYlODI7RJoSI8aZXspF+mLPk35cDS7R9bf2zlrJEaG2p7l/PkriC
+yslJM5Zwe3TONsL2Zv0WkbDCPZpXA+fnaFm3mbJE42V6gjrqN6GUBxO/4rIm
+OMSqr/gKhyWqEDEzCHsozbLtYY1tp1gX9djnsY2JJiwpaqqudYM1redTK5bA
+Fw4nxMPGJUdrzOAaWfReObxlvUHypcUsEQzo647BrcmjnRFwzXOfPxwdWdKx
+ap/5NpirNN2fSK051RIM+yf82XwVZm2rfz4By/SiOp/Cxn5Wa/vo+k8m/mZO
+uI/zE1MW9Qz5uRIPWLjc7fMamLPu+MsAOFM3sZeHvBNzK8fC4I1ay0xvwqyv
+M4d63/yh6qXoTxKhKNwFt/1wjO8LV7XIPd3gjDirgBiYm3vOywR2+oCpTYGF
+9jcDh5Enyd1yNhkeGhEcr4Sf5QXuEcGtBxtcUmAXddiEK73f7LuRzbCu+H3l
+IOrzZ+x3aMOZ/VGhG2DF1D51O+Zja23oF4n8ssL0bedgfqR4IB79Rk2qv0qC
+ORZtDSJjlqTNHbi9Bx6aWvILY4Q8j1SuLOzSHOn63iL04719lk/P49p9ixeG
+mFePY543fLq+aW+nAc6rP2BYQM9zRJVar4/5TG8OT4TVoQ+EzXrIw9wZLoLH
+K1e3vtBlSWzFjWc0X7g80mcLXLNTHaeP/EWZeddv6KC/V/6OO+DGx/JdIbAk
+K/aKDFZ76KTYwPnzh/zaYf6cTZ0FrDAPijbCPKPKA7EF+T9Rp+6AZWE8m1Q4
+VrTOMwPmc1etuUfXN3XJS+BxXnKiL+oLHRfWN8Lln3Ga7sKcgcRzfbDGNymI
+QX4Lp5aQx/R5eJK79le4eyHNSwWzoQsnbdFv0djTxiZa365MnA53G/w4WAbX
+9SiKq+Dy+e3zR2F1ULtnIyzRDGgC6fcDDIevwfw8Pb2VsMOm0QcSmI33PDuE
+/qouRXD1YYXpSe9SuHXbhEKC+jKHossHYU76QnA18pbfPSDcBAt232F70Z+a
+W3/LCBY6G316Txt9iKX9I5i3Q4XtTL0Wcvp7HuuA73cMzxQTzEee8LKenreH
+yGfoHUNkrg2TtXC3j7LpzFuGaHrS25vhojzO6ohZhuT3nHd/TB3fNRKoYYih
+avYjLdSzTnczyXjDEFVHr44zzZsjclJPM8RlRW9EDNxdoCQlUwyxyO0KuQRz
+raTvql8xhO+alEN/jy6nc5ZZUg8+i7aj8zkk+lI1yRBOYKR/LHwxQ7MwCqub
+si6Uwq0Pa0t9sF+Rw52h56N2K81/COdPdFuZOOM5tdfYXUY9xddG3u6w7IuM
+ugLkYZ+I1YHwxUcbPfJeMyStpN5BRL0/q+EU8gumQy9EwoLUiu8OzzCkdUOm
+KASeyA5t2Yx+WfkyUy/qI3YNXfCQoHFwJcxPSfC0+ZshVbwPY1/S/IuUp7mw
+NPfI1Tp4KPrA1gE6rxiDt9lwmkl2OL1f98cO/Tthybdh0q2oJ9AXjnNgQaHl
+3GvkE+6dUv5Oz/uvuO/Dkb+7j5kug8vFi1Ol6Nf/dsr1I/DFMWVUwgTWC3a/
+CYeHXplr4sbRX7ha4AeTthXLO0cZEnXCUuVF9y/SZNg9RZ6tN9b4wFIH61b3
+AYZMfMPbEET3Z+iriu8zhMxm59PnTbpHJkxSMkTCWPIK6Xq4eaXzLZxnsLG8
+2fH//5EzXv9dndh/AIX0Veo=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.9412613040609137, 16.101506520304568}, \
+{0, -1}], LineBox[CompressedData["
+1:eJw11Qs0VHkcB/B/5FGhmWS8a7QrTkpjk93Ezq2k9kzlYhWVjCK0tlQe2dAU
+SrY9hpZjHTRGG0nLZotNZbKK6DFbUauHQaLjsZZk8tzv/+zZOce55+P///9e
+994Zq90HvII1CCHh+KNXMjiNjyHz39WcIXH635wqg5m0Y9eC4WI5R8LAiiTu
+4TYzhvjWx++unIf10oSKSPiGxQoPM1isE+dkB8/vMLgUwWUI/4goXxvmn7Us
+quUwJIK9tFIXVsojq01gxfXmVnu4atRs9QcDhnBaurgxsO7TW1Ed+gxhD8e4
+vqDn2wIlGvBgVM9Hb9RTNStjX4Ae4hUcyHwOq99U7Z2aw5DysZC8AAuGSEWK
+KBXMnH4W0wZz1rds1cB+gfWh6S2W+P9G7xs7YZWvg8kFmO0Oqn0DK0oNV7yG
+pX3vz51BPtl0UdUQLA7IPOmG+shXhd7tsKBJWDhuQOPc5ZXQ/YkFywvm4vyX
+pUc9YHKcvT2P9ueS5dyC/OGysFOusPJizaQb/HWg/zkRzM8wGSlE/eKCMOkq
+WHBgnecE+g2fcOnTgqWL3H/ZBm8MPXF/N+Ir7UNiakwxh5J4aTzyK54u3OIC
+P5+0Sg1GvdK41vhmE4Y05Kb72qAfkhycLIX5vo46j2djXp7ymxHU+5aZRs/C
++T2Wn8TAqhB13Ke68G8z3eWwJG91bL825hZ0PHAALtcWnW/Twpxmfcz2Qb5Q
+c5tRbVi13WubErZ1mjEnfCbiXlne6IN6BSTnB0NYkC46+BK2PeE5MqmJeUW/
+rNqOfgXOV2Nt6P6yzzLr6f1UEc8Uuv9WmZE55pPiUWxvhPgK27quLfCgWedY
+DcxY36nYBatlWZVHUF/5o/kxG+l+YpFkr4N4m5ek61Ef3VemhCXDgfWXEV9l
+5Vbvgf74emNGDnDoCoez+bD0FS8gD/WJjXf2XqFOGxwbQz9H5hb7n4Ql7msF
+3nS+BxOzeDBTdzavDPNgrjecDEZ8Nq4/1xROGVrjFot6JLEdl34yxrWt8cIO
+1KtUZrY7wT1PthWboj/Jw4SjH3h4rs7NzqjVwPlHrikv4Gzrm5ohM1CHXe/V
+t3CD3f0uY4I813Q38HCeDcotbZwUEtJ9z36vMa3Dx716XEj4VW+9lHRdI/QP
+kzEhYWWNA5tQj9hhMmhYLSRM6mPuE5i1ffKdNxyh/lHgh374fX4vv6DrCWM1
+zbBUK7Q3BxZ0blYKMQ9FHssP+ygknKzw/DS4PPkw7wziK4Xt3Bo6L2dX3W7k
+H+zsWdhI389dx+R+qE+11Fy/DGYNTnBrp4RE5n/m9H5YEpO8eHpaSCSJsp/n
+wA0d366Kpf3tXy/7nj4/Ikfz23BEUHX6CK2Xyz3+gK4/91Z7wqF607HZMGdD
+lH0J+lXEmbrwCe3j/GMdmP8wIfEh8rFZznaRmN9g/rW1PRPIZ1GSNmqE9fcV
+bnLUT6aGVdkwWeO01Bj9ciz/MvWHy5cPTQWP4Hxl76Q7LJV5LSsfwv4l8r6t
+sOLB6CHjQSERJ7u/SIVVqvGgmF4hKb9rHf2aOuPG64PdmJ9e514R8ouH8vRF
+bzCfnujqe9R7NE5bdSD+bY8QFvXKjp16qtmO+5EU0NJM6y9Ojvxbhfk6KlJY
++v4tKuL9Sdfr9C9X0vs5NNyU3AnnXizTxLzESf7Mqy7EUyuv2sMk9V5Tbg+c
+XjnhCCs+tCxJRH2qlnyeEcy0qeWbBtCv12wNJX3/m/yKdqAfWX22aRjN12p+
+Yd0/QiINTXnVhXoEOZ+vvwOzh7bnbKbPc9yO8QewuJkZKqb9PGvo9YKZ/lZ2
+BsyJnM7yRDxGy8ZLjHlIBoa0Zf1CfD/tWvxoPvIt+LWy6h36UxdN+MCyoDCu
+CeofZAwTxunvzEih17s21LPWP7DOkL4/3bVmzYh3kV1QAZPfV5Zk1mG+ucV3
+6qnpR3rz/9+tfwEFv4pt
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.075655548348861, 5.165661129127848}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000010004`, 17.000000000003638`}, {
+          12.000000000010914`, 14.000000000003638`}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.54353952593509, 16.112427930839758}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwd1Xs0lGkcB/B3rVDUiFnr1hj327YplyXqvEmyJTRsLusyQksZZMXslEiy
+gzG0FdJU09aRVJJbqIOlyyyJYwvt2tKNzoakRBrs9/HHvM/5nOd5n+f3+77v
+mddwZzwnSoGiqD34kZFSIRcbmmKTUZemdGUGXYtgFZdKexF8YdHsR3XYx/lN
+GFOPpoqZyUGGZN56b8RxmHl4wyUHuOV8eZKKPk31qs3v9IE97rW58OCcJ6wB
+Hvx6G2emGZYZxbuJ4UGVzZI5mFvDuFYJT7ONe81X0JS24UG9h3A9ffkbZ7gx
+OTxtCk4Ilcw4woWKdd06q3G/jh3PCDY6NclYC5ddr+B/wn5n5vq3+8Pp7tZ3
+WuAgR19ZAkxlXz++f6G++PYjcKWe//mV8Mz9P/4+Ab/m3lL4B/0IjtldkcI+
+g5smfoWf0JMmpeT+9UW1jvC0MDFswdJXu98hn8q0wEvn4Jb2+ue1sFvWmfRi
+WKh7QZANN4oqxLlkv8gIeRyZL5w6t5+c/0iSEQ0rnlUujSH7tW2PTIEzO8Ul
+O2D1pffMJXB6oyR7I+wxGpnaC3805Keuhh0dWlxNUQ97bVKyIUzzr+VlkXrV
+zMOZZP27+aYp2COLu1SVrG/VlOxDv43Fa82U4GlufJwcdjEssCbmOylYCJGn
+h1CXR9b3s2Q5TBZNWXyMUtYiDqE5p2HFyYbnpnC3pWkIy4CmlJy+qCH580Ud
+j47B6TcuzvuSfiak/jNw0zyHtReW37MWmrNpSnTOfeNROOlQ0+hm2ErdIbOa
+5CGuuxwCT6d897wX5o7G/BIN90ym+c6Q/QxWLHj6XXan/hq8J8PVDqHwQLCr
+9zqYtg38fQu8y/vxf0FwQSZHeRV8y6z3QRLcfz1gXg3W5Wl55RDffHHnPuob
+OhgzVAKzxR1xAlgeJ9xUCpe9/WRvDtdUOXlegVsWF3P70P/Y50OMq7BQWK6R
+D8vKe/vK4PG+k2YcOK46kCUlzshRNoEj5U7CY2T9vsl8Zbh3R9TgYbje/e7o
+HPK2OPUnIxHm3mDkqWJ+Z1YCMwxO32C25Fv4jFnn1FZSX2CZ9S64THTythPs
+U17xsgpOb714wBIeVGSEaaBer7zFDJJP/7NtSzPgVue3XhqwNDG/bQ4uuF/4
+Ro04asseV+ThGlQSQyzz6jAQwnLfpyuWw9EVXeEP4ASDACs9OMkycZmmIfob
+u3HACqZkbhp+sEamadd6kvcqSWo+3KQ7VO4PV5amFrXB7pyhWJJ/UlXy2Bi8
+pO3D1uMwP7Vhl7oRTU2s28utg0Uj793M4dIM06uPyX6bUuxtYcXH4xazcHDo
+bm87WPB+WGZgS1OejGFNa3gNMyuHhhNOqsZow7E9uamhMJdjc3QW57GXWHfy
+YXZZEWsAjgwzk4lhidLyl7XwE8UTw2dh2bTJCxFc0Kzy8DKsPcZ3jIBvjb2I
+roIVeVbKznD78ubaalie8SZCC66y7Z69BgcXXqGnkNcMM6j2Ipl3Lwl8St5f
+I5fUU3C/gqVJN1yc90BfBOv3/9XSDrfy3AUCuOCqzngX/NBl5OhPcGaAieog
+XMETxPrBNd+HU59hIxuFr1xhqepKPzbOL9FtEK+GY9VzTb1hNa5mhzHpp/Om
+QxY87Zcr1SH1h4Z8Is+D+3NCqybc7SU9rYS8Pny5rFEDDjCTG3vCLH7sMy24
+rL4u4Tc4uGcwjA1/yEzj9sGNPbkWq0i/9T/8q22M3Ev7Zkg9tzNHJvzg135v
+I38k54fffZYNB8m+lqWQfrd62tTBzFfNoUWwX6tTQz8s3qHm1gC77emuG4fv
+2p84MACPnI5qn4UXvk92+D8kown9P0h0WZg=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.876835367704164, 7.161502436909525}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJwt1Qs0lGkYB/BvbTZDGJJGW9LN5SS5FVvH9tUpTSJ2CmMrlEtyqZkhl66I
+I7cZS9nZCtOWcsuO6rQV1USmabXW7ro0ExbRkmKQEl32/7bNOTPf+Z33e9/n
+/zxzvpkFu/dzQjQoiorAm1z//7ClqU+vOTRF/xZ+fBEsW91wcsqEpo6WjlW7
+wmGtkqhuWD2HPhcGl6REC6pgqVO/0wmYmS8OjIQXljPPXCD312XVzYTFfpaa
+t+FEhrKvlEVTW5bFtDXBYl75LTu4bNl8yT9wF+OjrHI2TY2m5ZkOwJb8qO7F
+sPG7kQ0vyf3uExvFxqibJXJ5AecU0Kt1YePymIBnsLr61mjaLPQheeHYTuqf
+iYuaAYf3ufIb4cdmxpsLjWjq+R/vn5M8rNnfl9CwT25qXjnMzaulXs+kKee6
+mfvE5Dwp21gGs3NvpqaS+Wx36CqCeQK7p9Ekn/RS0il4VUddcjDJp8lhS2Cj
+wWI3Lukn2/HqHXjHo+UaXiSvtV/SELx+iHZzJ+uabQ+sUX+LwdwfPeB+5Ta9
+WDiefrN0G5ln+whPDltPhbMCYd7IJrkJ+vlZonTiw7a6CxUR8PPxZvs0ksdr
+ucsN+OyymORzsPRC4MIpWDWYcOAurLCf/Zct5pUzg+XUBcebNlr4wJSFfpuG
+HeZa01wYBoceUXHMYa3MofBQ2KhWWLSJWPlv+hZyv4vOtQhYNin43QyWXTbJ
+y4Sbgl+2d6CeW5+JdwlMe0zZkO/j3SGV7T14wt95ypTkM2Afb4G7ROmLS9Df
+2a5LLb3kPE7vXHPYsMKsZ4jk2VFUdxbzul8ckj8Gxxfkr2HCBx32GhGzGk62
+phhinveZVS/hHIGo7oMBTd0QvFY/Jed1e+gmwxku3OOtsGKafoAhvCM6dLWc
+5Cur7L3CpCmB0l7rGtzPLVkaCpcliAYlMHetubYN3B68Up0Ns3/Vz9aBV5ae
+nn8YNsvOevJeHzm/lMdFwmEHxkXTsV7ofrE7gNRLzpi+GF7nbWXpS9z2kzkH
+Zk07qubAvBNlhiKY6yG/uhUWM8SBbbD2D3G3/Eg/w29XWCDv3KR8kxBST9iw
+7yD8Oneg6gAsrX5a/wj2UlrZkfmLg6o+mGAeF6Xms4philGs5w/bnr8trSX9
+hF5Zfwpm6sXak/mwGvdE1cCrtBMrNO3xfLisGm2C9U4o5lnBUtXfn9w7/PCQ
+O8yeF+VbDR/1v1mzD1ZoHHkigtnU5W4h3C/yZXrCGWwuVQF3jUh8J5Hvqwcf
+NtfD3KyGljyY0nGdpyL7rZbsNIV7GacnBki9nTSnAP3XxvXlviLrpooMI7i5
+c3/zW1gimObFxLzd99QriWX3OtsndHFNKBol93ulWDgPzqApm7HHhYPEPR+P
+DOvg+ajPTO8kVvt/rQsbd6YlN8JmkYmpbtrIuyEotoasqx5OVjBoKsWeH1JK
+8psIPZ1hjV0TfvlwU+p5xZAW8u3V8k+Bbcu/0fwT9or+jh8DByrkEx3w/YRd
+x/aQ/Y7scUPs5yZe9PEn55/i10fAxnHZEj/S75qGlh7Y+q72E2LZIZsIPvII
+Ixu2BsA8WWavPvIaOny7JBxOvBeveR12HMtZcRCmnSpdt6Pf6w8qnERkPgZB
+Vm/g8C8sKktI/SyfjCTMpydYW03mTwftHBmFY6Y2LX8G5ziEqdbr0RQnvTBR
+ywGucR7nw686k3qXwnSSj18sfGWz2suTrK91rfCE13XkVPMdSD2h83ucl7Kg
+e1EunHjmwqtjsP0YVfALzBOmJaiQZ/TwHZ+HcOBG7wEmHDuYXtxJ9nv3yC3R
+z+5JDcYwOT+29a4l+h/Cr9MkLIsLjGAxPv8vOX6+atH/ASL6aNo=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.123164632295836, 3.6615024369095255}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwt1AswXFccBvCrjYioZjfJIqwgmRAJwkzrudZV2qDitTHtILVeaZBhPaKx
+rGFI0xKtVxEbsolGjdjYpmy9GiYeFdKZVbQqKtYWExK2mso2pPod0zuzc+c3
+59xzv+8/O9ciOjkk7jWKooLxI3fq1RYuK5ravtg0VbA3s9vnKE3JmkPk0bCL
+596IGlgSbc6ph1mnFwfVsPrpxSfdsF7BP2UnrbEeld4ihUPrBwJriDUCtww4
+UeH38x+w4lnm8gH4r7SE7MPHaMr8/bqKOhOamj04JeTBgo59Zm/A7y3l/Z0K
+yyLG/000pqlKd70TeWT/o8HSoQM4p6igNAfmh3gn2cB/sr2+OQ8HPZ+S3jCi
+qTJRDhVAfDuRdoAFLxJ0LOHZGAfenCHuBX0DGuQxf3d5ogMutGm+PgxTlpGW
+nfCmY9EuCaxO+22R7OeGzjiKyP6gSF1ynkZlMR1H/Kb1yzo4dLVmPoL0u6na
+dQR5Wve4+8US94YvdsDVX2s/yYb5poO+PPQpMNAXNpDneVuVCzDLOrD8MSzr
+f1kbj/7DblO9R5CXCuN6j8FazAd3LsC0c48FG/PjfuUSPQLnTn67xYUd5Cmi
+Q8exzhh1cIHLmPWFGbDi4qH+3fCdt/19+uAg1lGhHOcFHzde22GDOVgVX/eE
+q7bO5TnDue6Z0u+QZ2GDqQwn60biYRY8fpbBTCLOy7JLRZ9PXcVOycQx5alj
+6K8+V1LHJ+ZOTnvB1yoja71hgZGy5SHmV72xKjgI238Zd+UCHMJ02LFG8pi1
+rHjBZ6P0pCQf30CucIVPqWzmqkj+Y/afhMG9M7dWUrfXNeclcI2voPFDWLbM
+lurgfbUdD+z8iZceaD6D8yvutwaS/cW+PBPkNXlRER5LzjszJW6FV674mBXC
+Jen6bn7oN6+n/qUHFggNJ0fh20sin9eRl3J+rvsO5tOXPxMQDCvy8jVlcHLV
+wz0NMN9wcu4efNrgR/dXpF97V959eKz0XlSILfpdVXjUwvtGiqxuwL2ff+EV
+DOe3MRrn4dwugZ8K7+M46Tez7fB/8Bz5IAzeDLBTecGU9vecHuQNLW/UC4Nl
+UaZabLhd2K4TCTMWNp2y0Le68OpjHvFmjN8i5lOcNt7iCtMJnIF4+HDX/ksG
+5Hn5aNtueD5szWoZ71c3bZkpDGhq/13b6W5Y0s+t+gG2tL5rWAIzriVrjcPR
+Sg/HeJhvnX2ZiefPiCfs/GGFaqI1BbZfnwjkkPPc5X3P4IRAwU5iQZQuU4R8
+q+msNrKfPuUtYyF/QFOPOAmWPfVmSWF9m1tjEth8fXbIGf09RJKPlGReQwx2
+C9yU4eNrS/oUdP6kg/mxRlJ+zyV9VrSrObDpzk7lr6S/Z7/YF95Yf6S0PYFc
+/V03bWF7t3VhDmwe+/FbSzjv5KXGhgGYoRjMyjemc7e/e/b/f/+M6f8ASfvM
+Jg==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.72092184717428, 5.122174777394248}, \
+{0, 1}], LineBox[{{5., 14.000000000002307`}, {5., 6.999999999998607}}], 
+        PolygonBox[{{5., 11.1}, {4.6, 9.9}, {5.4, 9.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.0548, 10.5}, {1, 0}], 
+        LineBox[{{4.9999999999976925`, 14.}, {11.99999999999251, 14.}}], 
+        PolygonBox[{{9.1, 14.}, {7.9, 13.6}, {7.9, 14.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.5, 14.9452}, {0, -1}], 
+        LineBox[{{4.9999999999976925`, 7.}, {11.99999999999251, 7.}}], 
+        PolygonBox[{{7.9, 7.}, {9.1, 6.6}, {9.1, 7.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.5, 6.0548}, {0, 1}], 
+        LineBox[{{12., 14.000000000002307`}, {12., 6.999999999998607}}], 
+        PolygonBox[{{12., 9.9}, {11.6, 11.1}, {12.4, 11.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.9452, 10.5}, {-1, 0}], 
+        {PointSize[0.04], PointBox[{5., 14.}], PointBox[{5., 7.}], 
+         PointBox[{12., 14.}], PointBox[{16., 6.5}], PointBox[{12., 7.}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T16", " ", "P1", " ", "N31"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdiei/ijfgfhgjhj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdiei/ijfgfhgjhj.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {0, 22}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwt1Q8wlGkcB/DHfxNlSZ1SYpLZkb+J3RTvKxXXFUuq5VjOnR1xsRn5d9LW
+SXtXBl3uuLqr64S9IuW6XKid8Xf9O1Rjr4jUsRdXRNkjue9zdzuz+85nnmff
+3/f3e96dtYlODI7RJoSI8aZXspF+mLPk35cDS7R9bf2zlrJEaG2p7l/PkriC
+yslJM5Zwe3TONsL2Zv0WkbDCPZpXA+fnaFm3mbJE42V6gjrqN6GUBxO/4rIm
+OMSqr/gKhyWqEDEzCHsozbLtYY1tp1gX9djnsY2JJiwpaqqudYM1redTK5bA
+Fw4nxMPGJUdrzOAaWfReObxlvUHypcUsEQzo647BrcmjnRFwzXOfPxwdWdKx
+ap/5NpirNN2fSK051RIM+yf82XwVZm2rfz4By/SiOp/Cxn5Wa/vo+k8m/mZO
+uI/zE1MW9Qz5uRIPWLjc7fMamLPu+MsAOFM3sZeHvBNzK8fC4I1ay0xvwqyv
+M4d63/yh6qXoTxKhKNwFt/1wjO8LV7XIPd3gjDirgBiYm3vOywR2+oCpTYGF
+9jcDh5Enyd1yNhkeGhEcr4Sf5QXuEcGtBxtcUmAXddiEK73f7LuRzbCu+H3l
+IOrzZ+x3aMOZ/VGhG2DF1D51O+Zja23oF4n8ssL0bedgfqR4IB79Rk2qv0qC
+ORZtDSJjlqTNHbi9Bx6aWvILY4Q8j1SuLOzSHOn63iL04719lk/P49p9ixeG
+mFePY543fLq+aW+nAc6rP2BYQM9zRJVar4/5TG8OT4TVoQ+EzXrIw9wZLoLH
+K1e3vtBlSWzFjWc0X7g80mcLXLNTHaeP/EWZeddv6KC/V/6OO+DGx/JdIbAk
+K/aKDFZ76KTYwPnzh/zaYf6cTZ0FrDAPijbCPKPKA7EF+T9Rp+6AZWE8m1Q4
+VrTOMwPmc1etuUfXN3XJS+BxXnKiL+oLHRfWN8Lln3Ga7sKcgcRzfbDGNymI
+QX4Lp5aQx/R5eJK79le4eyHNSwWzoQsnbdFv0djTxiZa365MnA53G/w4WAbX
+9SiKq+Dy+e3zR2F1ULtnIyzRDGgC6fcDDIevwfw8Pb2VsMOm0QcSmI33PDuE
+/qouRXD1YYXpSe9SuHXbhEKC+jKHossHYU76QnA18pbfPSDcBAt232F70Z+a
+W3/LCBY6G316Txt9iKX9I5i3Q4XtTL0Wcvp7HuuA73cMzxQTzEee8LKenreH
+yGfoHUNkrg2TtXC3j7LpzFuGaHrS25vhojzO6ohZhuT3nHd/TB3fNRKoYYih
+avYjLdSzTnczyXjDEFVHr44zzZsjclJPM8RlRW9EDNxdoCQlUwyxyO0KuQRz
+raTvql8xhO+alEN/jy6nc5ZZUg8+i7aj8zkk+lI1yRBOYKR/LHwxQ7MwCqub
+si6Uwq0Pa0t9sF+Rw52h56N2K81/COdPdFuZOOM5tdfYXUY9xddG3u6w7IuM
+ugLkYZ+I1YHwxUcbPfJeMyStpN5BRL0/q+EU8gumQy9EwoLUiu8OzzCkdUOm
+KASeyA5t2Yx+WfkyUy/qI3YNXfCQoHFwJcxPSfC0+ZshVbwPY1/S/IuUp7mw
+NPfI1Tp4KPrA1gE6rxiDt9lwmkl2OL1f98cO/Tthybdh0q2oJ9AXjnNgQaHl
+3GvkE+6dUv5Oz/uvuO/Dkb+7j5kug8vFi1Ol6Nf/dsr1I/DFMWVUwgTWC3a/
+CYeHXplr4sbRX7ha4AeTthXLO0cZEnXCUuVF9y/SZNg9RZ6tN9b4wFIH61b3
+AYZMfMPbEET3Z+iriu8zhMxm59PnTbpHJkxSMkTCWPIK6Xq4eaXzLZxnsLG8
+2fH//5EzXv9dndh/AIX0Veo=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.9412613040609137, 16.101506520304568}, \
+{0, -1}], LineBox[CompressedData["
+1:eJw11Qs0VHkcB/B/5FGhmWS8a7QrTkpjk93Ezq2k9kzlYhWVjCK0tlQe2dAU
+SrY9hpZjHTRGG0nLZotNZbKK6DFbUauHQaLjsZZk8tzv/+zZOce55+P///9e
+994Zq90HvII1CCHh+KNXMjiNjyHz39WcIXH635wqg5m0Y9eC4WI5R8LAiiTu
+4TYzhvjWx++unIf10oSKSPiGxQoPM1isE+dkB8/vMLgUwWUI/4goXxvmn7Us
+quUwJIK9tFIXVsojq01gxfXmVnu4atRs9QcDhnBaurgxsO7TW1Ed+gxhD8e4
+vqDn2wIlGvBgVM9Hb9RTNStjX4Ae4hUcyHwOq99U7Z2aw5DysZC8AAuGSEWK
+KBXMnH4W0wZz1rds1cB+gfWh6S2W+P9G7xs7YZWvg8kFmO0Oqn0DK0oNV7yG
+pX3vz51BPtl0UdUQLA7IPOmG+shXhd7tsKBJWDhuQOPc5ZXQ/YkFywvm4vyX
+pUc9YHKcvT2P9ueS5dyC/OGysFOusPJizaQb/HWg/zkRzM8wGSlE/eKCMOkq
+WHBgnecE+g2fcOnTgqWL3H/ZBm8MPXF/N+Ir7UNiakwxh5J4aTzyK54u3OIC
+P5+0Sg1GvdK41vhmE4Y05Kb72qAfkhycLIX5vo46j2djXp7ymxHU+5aZRs/C
++T2Wn8TAqhB13Ke68G8z3eWwJG91bL825hZ0PHAALtcWnW/Twpxmfcz2Qb5Q
+c5tRbVi13WubErZ1mjEnfCbiXlne6IN6BSTnB0NYkC46+BK2PeE5MqmJeUW/
+rNqOfgXOV2Nt6P6yzzLr6f1UEc8Uuv9WmZE55pPiUWxvhPgK27quLfCgWedY
+DcxY36nYBatlWZVHUF/5o/kxG+l+YpFkr4N4m5ek61Ef3VemhCXDgfWXEV9l
+5Vbvgf74emNGDnDoCoez+bD0FS8gD/WJjXf2XqFOGxwbQz9H5hb7n4Ql7msF
+3nS+BxOzeDBTdzavDPNgrjecDEZ8Nq4/1xROGVrjFot6JLEdl34yxrWt8cIO
+1KtUZrY7wT1PthWboj/Jw4SjH3h4rs7NzqjVwPlHrikv4Gzrm5ohM1CHXe/V
+t3CD3f0uY4I813Q38HCeDcotbZwUEtJ9z36vMa3Dx716XEj4VW+9lHRdI/QP
+kzEhYWWNA5tQj9hhMmhYLSRM6mPuE5i1ffKdNxyh/lHgh374fX4vv6DrCWM1
+zbBUK7Q3BxZ0blYKMQ9FHssP+ygknKzw/DS4PPkw7wziK4Xt3Bo6L2dX3W7k
+H+zsWdhI389dx+R+qE+11Fy/DGYNTnBrp4RE5n/m9H5YEpO8eHpaSCSJsp/n
+wA0d366Kpf3tXy/7nj4/Ikfz23BEUHX6CK2Xyz3+gK4/91Z7wqF607HZMGdD
+lH0J+lXEmbrwCe3j/GMdmP8wIfEh8rFZznaRmN9g/rW1PRPIZ1GSNmqE9fcV
+bnLUT6aGVdkwWeO01Bj9ciz/MvWHy5cPTQWP4Hxl76Q7LJV5LSsfwv4l8r6t
+sOLB6CHjQSERJ7u/SIVVqvGgmF4hKb9rHf2aOuPG64PdmJ9e514R8ouH8vRF
+bzCfnujqe9R7NE5bdSD+bY8QFvXKjp16qtmO+5EU0NJM6y9Ojvxbhfk6KlJY
++v4tKuL9Sdfr9C9X0vs5NNyU3AnnXizTxLzESf7Mqy7EUyuv2sMk9V5Tbg+c
+XjnhCCs+tCxJRH2qlnyeEcy0qeWbBtCv12wNJX3/m/yKdqAfWX22aRjN12p+
+Yd0/QiINTXnVhXoEOZ+vvwOzh7bnbKbPc9yO8QewuJkZKqb9PGvo9YKZ/lZ2
+BsyJnM7yRDxGy8ZLjHlIBoa0Zf1CfD/tWvxoPvIt+LWy6h36UxdN+MCyoDCu
+CeofZAwTxunvzEih17s21LPWP7DOkL4/3bVmzYh3kV1QAZPfV5Zk1mG+ucV3
+6qnpR3rz/9+tfwEFv4pt
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.075655548348861, 5.165661129127848}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000010004`, 17.000000000003638`}, {
+          12.000000000010914`, 14.000000000003638`}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.54353952593509, 16.112427930839758}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwd1Xs0lGkcB/B3rVDUiFnr1hj327YplyXqvEmyJTRsLusyQksZZMXslEiy
+gzG0FdJU09aRVJJbqIOlyyyJYwvt2tKNzoakRBrs9/HHvM/5nOd5n+f3+77v
+mddwZzwnSoGiqD34kZFSIRcbmmKTUZemdGUGXYtgFZdKexF8YdHsR3XYx/lN
+GFOPpoqZyUGGZN56b8RxmHl4wyUHuOV8eZKKPk31qs3v9IE97rW58OCcJ6wB
+Hvx6G2emGZYZxbuJ4UGVzZI5mFvDuFYJT7ONe81X0JS24UG9h3A9ffkbZ7gx
+OTxtCk4Ilcw4woWKdd06q3G/jh3PCDY6NclYC5ddr+B/wn5n5vq3+8Pp7tZ3
+WuAgR19ZAkxlXz++f6G++PYjcKWe//mV8Mz9P/4+Ab/m3lL4B/0IjtldkcI+
+g5smfoWf0JMmpeT+9UW1jvC0MDFswdJXu98hn8q0wEvn4Jb2+ue1sFvWmfRi
+WKh7QZANN4oqxLlkv8gIeRyZL5w6t5+c/0iSEQ0rnlUujSH7tW2PTIEzO8Ul
+O2D1pffMJXB6oyR7I+wxGpnaC3805Keuhh0dWlxNUQ97bVKyIUzzr+VlkXrV
+zMOZZP27+aYp2COLu1SVrG/VlOxDv43Fa82U4GlufJwcdjEssCbmOylYCJGn
+h1CXR9b3s2Q5TBZNWXyMUtYiDqE5p2HFyYbnpnC3pWkIy4CmlJy+qCH580Ud
+j47B6TcuzvuSfiak/jNw0zyHtReW37MWmrNpSnTOfeNROOlQ0+hm2ErdIbOa
+5CGuuxwCT6d897wX5o7G/BIN90ym+c6Q/QxWLHj6XXan/hq8J8PVDqHwQLCr
+9zqYtg38fQu8y/vxf0FwQSZHeRV8y6z3QRLcfz1gXg3W5Wl55RDffHHnPuob
+OhgzVAKzxR1xAlgeJ9xUCpe9/WRvDtdUOXlegVsWF3P70P/Y50OMq7BQWK6R
+D8vKe/vK4PG+k2YcOK46kCUlzshRNoEj5U7CY2T9vsl8Zbh3R9TgYbje/e7o
+HPK2OPUnIxHm3mDkqWJ+Z1YCMwxO32C25Fv4jFnn1FZSX2CZ9S64THTythPs
+U17xsgpOb714wBIeVGSEaaBer7zFDJJP/7NtSzPgVue3XhqwNDG/bQ4uuF/4
+Ro04asseV+ThGlQSQyzz6jAQwnLfpyuWw9EVXeEP4ASDACs9OMkycZmmIfob
+u3HACqZkbhp+sEamadd6kvcqSWo+3KQ7VO4PV5amFrXB7pyhWJJ/UlXy2Bi8
+pO3D1uMwP7Vhl7oRTU2s28utg0Uj793M4dIM06uPyX6bUuxtYcXH4xazcHDo
+bm87WPB+WGZgS1OejGFNa3gNMyuHhhNOqsZow7E9uamhMJdjc3QW57GXWHfy
+YXZZEWsAjgwzk4lhidLyl7XwE8UTw2dh2bTJCxFc0Kzy8DKsPcZ3jIBvjb2I
+roIVeVbKznD78ubaalie8SZCC66y7Z69BgcXXqGnkNcMM6j2Ipl3Lwl8St5f
+I5fUU3C/gqVJN1yc90BfBOv3/9XSDrfy3AUCuOCqzngX/NBl5OhPcGaAieog
+XMETxPrBNd+HU59hIxuFr1xhqepKPzbOL9FtEK+GY9VzTb1hNa5mhzHpp/Om
+QxY87Zcr1SH1h4Z8Is+D+3NCqybc7SU9rYS8Pny5rFEDDjCTG3vCLH7sMy24
+rL4u4Tc4uGcwjA1/yEzj9sGNPbkWq0i/9T/8q22M3Ev7Zkg9tzNHJvzg135v
+I38k54fffZYNB8m+lqWQfrd62tTBzFfNoUWwX6tTQz8s3qHm1gC77emuG4fv
+2p84MACPnI5qn4UXvk92+D8kown9P0h0WZg=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           
+           9.996694214876033]& ], {18.876835367704164, 7.161502436909525}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJwt1Qs0lGkYB/BvbTZDGJJGW9LN5SS5FVvH9tUpTSJ2CmMrlEtyqZkhl66I
+I7cZS9nZCtOWcsuO6rQV1USmabXW7ro0ExbRkmKQEl32/7bNOTPf+Z33e9/n
+/zxzvpkFu/dzQjQoiorAm1z//7ClqU+vOTRF/xZ+fBEsW91wcsqEpo6WjlW7
+wmGtkqhuWD2HPhcGl6REC6pgqVO/0wmYmS8OjIQXljPPXCD312XVzYTFfpaa
+t+FEhrKvlEVTW5bFtDXBYl75LTu4bNl8yT9wF+OjrHI2TY2m5ZkOwJb8qO7F
+sPG7kQ0vyf3uExvFxqibJXJ5AecU0Kt1YePymIBnsLr61mjaLPQheeHYTuqf
+iYuaAYf3ufIb4cdmxpsLjWjq+R/vn5M8rNnfl9CwT25qXjnMzaulXs+kKee6
+mfvE5Dwp21gGs3NvpqaS+Wx36CqCeQK7p9Ekn/RS0il4VUddcjDJp8lhS2Cj
+wWI3Lukn2/HqHXjHo+UaXiSvtV/SELx+iHZzJ+uabQ+sUX+LwdwfPeB+5Ta9
+WDiefrN0G5ln+whPDltPhbMCYd7IJrkJ+vlZonTiw7a6CxUR8PPxZvs0ksdr
+ucsN+OyymORzsPRC4MIpWDWYcOAurLCf/Zct5pUzg+XUBcebNlr4wJSFfpuG
+HeZa01wYBoceUXHMYa3MofBQ2KhWWLSJWPlv+hZyv4vOtQhYNin43QyWXTbJ
+y4Sbgl+2d6CeW5+JdwlMe0zZkO/j3SGV7T14wt95ypTkM2Afb4G7ROmLS9Df
+2a5LLb3kPE7vXHPYsMKsZ4jk2VFUdxbzul8ckj8Gxxfkr2HCBx32GhGzGk62
+phhinveZVS/hHIGo7oMBTd0QvFY/Jed1e+gmwxku3OOtsGKafoAhvCM6dLWc
+5Cur7L3CpCmB0l7rGtzPLVkaCpcliAYlMHetubYN3B68Up0Ns3/Vz9aBV5ae
+nn8YNsvOevJeHzm/lMdFwmEHxkXTsV7ofrE7gNRLzpi+GF7nbWXpS9z2kzkH
+Zk07qubAvBNlhiKY6yG/uhUWM8SBbbD2D3G3/Eg/w29XWCDv3KR8kxBST9iw
+7yD8Oneg6gAsrX5a/wj2UlrZkfmLg6o+mGAeF6Xms4philGs5w/bnr8trSX9
+hF5Zfwpm6sXak/mwGvdE1cCrtBMrNO3xfLisGm2C9U4o5lnBUtXfn9w7/PCQ
+O8yeF+VbDR/1v1mzD1ZoHHkigtnU5W4h3C/yZXrCGWwuVQF3jUh8J5Hvqwcf
+NtfD3KyGljyY0nGdpyL7rZbsNIV7GacnBki9nTSnAP3XxvXlviLrpooMI7i5
+c3/zW1gimObFxLzd99QriWX3OtsndHFNKBol93ulWDgPzqApm7HHhYPEPR+P
+DOvg+ajPTO8kVvt/rQsbd6YlN8JmkYmpbtrIuyEotoasqx5OVjBoKsWeH1JK
+8psIPZ1hjV0TfvlwU+p5xZAW8u3V8k+Bbcu/0fwT9or+jh8DByrkEx3w/YRd
+x/aQ/Y7scUPs5yZe9PEn55/i10fAxnHZEj/S75qGlh7Y+q72E2LZIZsIPvII
+Ixu2BsA8WWavPvIaOny7JBxOvBeveR12HMtZcRCmnSpdt6Pf6w8qnERkPgZB
+Vm/g8C8sKktI/SyfjCTMpydYW03mTwftHBmFY6Y2LX8G5ziEqdbr0RQnvTBR
+ywGucR7nw686k3qXwnSSj18sfGWz2suTrK91rfCE13XkVPMdSD2h83ucl7Kg
+e1EunHjmwqtjsP0YVfALzBOmJaiQZ/TwHZ+HcOBG7wEmHDuYXtxJ9nv3yC3R
+z+5JDcYwOT+29a4l+h/Cr9MkLIsLjGAxPv8vOX6+atH/ASL6aNo=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.123164632295836, 3.6615024369095255}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwt1AswXFccBvCrjYioZjfJIqwgmRAJwkzrudZV2qDitTHtILVeaZBhPaKx
+rGFI0xKtVxEbsolGjdjYpmy9GiYeFdKZVbQqKtYWExK2mso2pPod0zuzc+c3
+59xzv+8/O9ciOjkk7jWKooLxI3fq1RYuK5ravtg0VbA3s9vnKE3JmkPk0bCL
+596IGlgSbc6ph1mnFwfVsPrpxSfdsF7BP2UnrbEeld4ihUPrBwJriDUCtww4
+UeH38x+w4lnm8gH4r7SE7MPHaMr8/bqKOhOamj04JeTBgo59Zm/A7y3l/Z0K
+yyLG/000pqlKd70TeWT/o8HSoQM4p6igNAfmh3gn2cB/sr2+OQ8HPZ+S3jCi
+qTJRDhVAfDuRdoAFLxJ0LOHZGAfenCHuBX0DGuQxf3d5ogMutGm+PgxTlpGW
+nfCmY9EuCaxO+22R7OeGzjiKyP6gSF1ynkZlMR1H/Kb1yzo4dLVmPoL0u6na
+dQR5Wve4+8US94YvdsDVX2s/yYb5poO+PPQpMNAXNpDneVuVCzDLOrD8MSzr
+f1kbj/7DblO9R5CXCuN6j8FazAd3LsC0c48FG/PjfuUSPQLnTn67xYUd5Cmi
+Q8exzhh1cIHLmPWFGbDi4qH+3fCdt/19+uAg1lGhHOcFHzde22GDOVgVX/eE
+q7bO5TnDue6Z0u+QZ2GDqQwn60biYRY8fpbBTCLOy7JLRZ9PXcVOycQx5alj
+6K8+V1LHJ+ZOTnvB1yoja71hgZGy5SHmV72xKjgI238Zd+UCHMJ02LFG8pi1
+rHjBZ6P0pCQf30CucIVPqWzmqkj+Y/afhMG9M7dWUrfXNeclcI2voPFDWLbM
+lurgfbUdD+z8iZceaD6D8yvutwaS/cW+PBPkNXlRER5LzjszJW6FV674mBXC
+Jen6bn7oN6+n/qUHFggNJ0fh20sin9eRl3J+rvsO5tOXPxMQDCvy8jVlcHLV
+wz0NMN9wcu4efNrgR/dXpF97V959eKz0XlSILfpdVXjUwvtGiqxuwL2ff+EV
+DOe3MRrn4dwugZ8K7+M46Tez7fB/8Bz5IAzeDLBTecGU9vecHuQNLW/UC4Nl
+UaZabLhd2K4TCTMWNp2y0Le68OpjHvFmjN8i5lOcNt7iCtMJnIF4+HDX/ksG
+5Hn5aNtueD5szWoZ71c3bZkpDGhq/13b6W5Y0s+t+gG2tL5rWAIzriVrjcPR
+Sg/HeJhvnX2ZiefPiCfs/GGFaqI1BbZfnwjkkPPc5X3P4IRAwU5iQZQuU4R8
+q+msNrKfPuUtYyF/QFOPOAmWPfVmSWF9m1tjEth8fXbIGf09RJKPlGReQwx2
+C9yU4eNrS/oUdP6kg/mxRlJ+zyV9VrSrObDpzk7lr6S/Z7/YF95Yf6S0PYFc
+/V03bWF7t3VhDmwe+/FbSzjv5KXGhgGYoRjMyjemc7e/e/b/f/+M6f8ASfvM
+Jg==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.72092184717428, 5.122174777394248}, \
+{0, 1}], LineBox[{{5., 14.000000000002307`}, {5., 6.999999999998607}}], 
+        PolygonBox[{{5., 9.9}, {4.6, 11.1}, {5.4, 11.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.0548, 10.5}, {1, 0}], 
+        LineBox[{{4.9999999999976925`, 14.}, {11.99999999999251, 14.}}], 
+        PolygonBox[{{7.9, 14.}, {9.1, 13.6}, {9.1, 14.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.5, 14.9452}, {0, -1}], 
+        LineBox[{{4.9999999999976925`, 7.}, {11.99999999999251, 7.}}], 
+        PolygonBox[{{9.1, 7.}, {7.9, 6.6}, {7.9, 7.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.5, 6.0548}, {0, 1}], 
+        LineBox[{{12., 14.000000000002307`}, {12., 6.999999999998607}}], 
+        PolygonBox[{{12., 11.1}, {11.6, 9.9}, {12.4, 9.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.9452, 10.5}, {-1, 0}], 
+        {PointSize[0.04], PointBox[{5., 14.}], PointBox[{5., 7.}], 
+         PointBox[{12., 14.}], PointBox[{16., 6.5}], PointBox[{12., 7.}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T16", " ", "P2", " ", "N32"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdiei/ijfgfhgjhj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdiei/ijfgfhgjhj.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {22, 22}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwl1ws4lGkbB/B3HUIGIyqJHMJg6OgwOfQOqRxKIpqidhwqW2hqVZO0OUah
+RqWwQ6OVnbUJ0aZSqaRJJ/qy6WAb0iZRimpyWPt/vp3rcrl+nue5n/99z2su
+zCK2Bm5QoijqIb7I9/9ehlxKMY7XdC7Vot3sGjmNSwXo95ibGnEp0/G9P943
+4FKcCyWVobBoUe8xLzjzsF5aNcwbzO+9PxUWNs01Mca++13tsXCVw69GJXBS
+D7+MBQs7K6XzZnApSXJi4NgU/HzQKf4BLCywSfwAt2z6ThxnwqUoAWMtWU+c
+25EywZRLDSyMbbTAeeqV6M+VsLVOYkAELC5lCo/DLR5Ze6rhOd8pv2uF5cHG
+3QzkG2LYs5TMcP7wYE4cvCzU/JwlLJrdYN8CK+oGq13J+k9XhWz029038HUR
+LGd5xifADfLPSjQsUQ64fgGOD7L6Zg/XaafL/yLrazYVTIKllR8398FyS3/L
+D7jf22G6O1lfdaPQq4nk26lypAZO6yl7VQgrfHoYsbBDn0BbQPbLbKsZsNdv
+k5u9Sb+sN7I8Mt81kvcsOMkl9DLpR+yop8yETU+4t+1Ev9KOrcbKMC/2iuoz
+zMvAZpVMCa5LSDjqBi/L2P1BB5Zus7lfOplL5WtpP7aF1dktFw1gniJBIwjO
+P3DwXpE+l3I7fT0hg7hIfJIDG9FsIckfneByqU8POZ8X3dNCv5mP/46shy3e
+ZD5dS/rPKcqQwtEBanXlsEGQs7SKrL89um4Y5iwv+PsR8c59N5aYY/5bIqYx
+UJ8n81DPgVt4vUOrYYHf9aJmuD3thEc1zN/W9P0Ysc8L40nIKxqlamfOxL5P
+J7zj4bBBnyI34v2zBK3wvTxz2VJ4QGNrykz0H3P10aHFxEoh36LI89b1acgJ
+5th1mebC1raFhcYwb8qBwFLYK+/RryO4T9AQNlMMM0+HVP8P5v/wc8ouuPbm
+wAkpyV/Buu0Ei/cZRO2FB9oW/v4c98sXF5gEw9T6X5x+gF94sirnwZmeK/Jf
+oR+JlazCgJw/k/txBWx3+i8/DVjRMn9yLebDke2eP4F4Tbv7FLjx7JIfmXD0
+I+driZPwPO2bvc0a5j4x/qNfF/lnrXy9nMxv3PByHCydntmxjzjrys8qMPfG
+xjv1cFJZi3ENk0vJVMZzlNBvS+gvDxPh6LxUiT/snVXzJgJOcxFYFcPRviGO
+G+CquyXT3sOmX0xmpsAi9bw4Vwvk3NDf/Adcu6bHJRWOXicyHIfDti94dgPO
+vO2vFoL7A5qydRSw+lHp/fOwfn2+mZkl3k9ldxcD9JPtd3jADRZMdFTshAUT
+glT8YGFTYOddeIAXdYR44EO1ny7mIQ5320PDdXERKz1huw9OtDXcs2WVdij8
+ou7EOzWYcz6jlQefSS6kOnE/f4Uu7QK7VbSt/ANmin3Cx1E/LeenroNwj5Gv
+9Dd49EHgtXBYYXX9iStsGqze7g4bdFDdF5E/X5P9zAzOz1JqsIbFvIU6THhO
+cduMQ+j/2O0H9EQ4YJLZarkOPi84XWJdWCAo3VmujTlHdFdZkfsHQ4f3a+Hz
+o/EBzwcemNu/OpmB3G+7bgnJ+szsrF80cc6tM6MGrhqsKPg8Eea6nvxK7FRs
+sxe2q1573BP9BhwadneHX6RekeSSee4u1naCrZ+FXe2EG7Z2qm6AhbeKO2db
+YR5TfTsbYUnFp8m74QC2wdBy3CdTzD59CZYsXZv5BXbY9deCT2S/3Y01Ncg3
+xLswasxCvyILCyHyz1Hv/d0N5roXLOSgP3Xb8fLlsMgm1/UNbLEud+JKsu4x
+nL4b8+BsTshYSlx6drAbXrZ7X/I8OClp+BQT83Ob/emtHjkf0+GtT55PPXP2
+e9zPDI86+BX7DdY+1miEKZ/k33Pgvl8XpeTDLc2r6X7cZ9offioOrrIb9JgO
+R3ktiPSBk4bMzU2QV6qxKpVN1vX2RyqhH6Of1aKmwqJtXlYtmIdXH++dNtmv
+sbHwmAbmwlRs0SP139VtCFPH+zSQcsyS5NHsUnZQw3zDXm1cTOrR+6xZE/D8
+9DtytsPybBabq4p6i1wvlhOnF6ZlqCC3tGdCPzyn/nikMty+f8kNJ9Kvbun6
+C8rIw4ublQ63+FYtKYWF/nZBbXBVdb2RDG5Ydcjcwhr7V5iwZ+C8NSP9ZBzc
+UjfV4yTcYHJW+RwsOdWo5alK+tzc9Q5mhg7njcAcVspSQxvMKcjq2jXkrTd/
+/tAVDhgJ70lGPwqPsUsryPpOi4OO6LdH7dhQMMwvqXz8AG6g4yaTdZFsw+JF
+mE/apY+hbnDSWyn7IOzlHCE2gZmq56cUwWLGDZsR3C/QncgSwrxcQV0r3JAa
+ThvCjcu+uZbBVbNuTUpHfaP7N6/vIfnjJutcQR5O3h7fYFieq2V5B3mNPk8t
+dYSTjA8IzqEf/sfIJSbEJetupaJ/B0XTfH1Sf8cuKx/MK37/05eT4YDuYXsd
+JfiMmrEluc//bWwXhfmzbSd5kvrbA08VjdNU2oxCTgy53yhf4+oYTcVUP4k4
+RerVaHQ5j9JUYvvWu12w6f5hkcEITfVFRLHZ6JeKcdoUPUxTBueH/xSSeWxs
+cbaF5/DTXsrI/I5EO4TCma92cAxscf5SBXMQvmf/pSMS5q7nbelGvVHV8WEp
+LFkRu8sY9/Md7bReww2zozsy/6EpeVu8yhQ25pmSF6WG/FFj7utc4Cq3Cs27
+cPThvfNXwkyF5E7Kd/j76fLI8rUwN+dWoTn6T3SzNAuBG/5WLT8JS3t97yyG
++WFtTwdgwYYTo7ZwwKYtzjqYX/6smM9qsKlHQeAXrKtvdw55iTzyRd07SuEe
+Cyv1WpJXbFpvCHPMVk85AIs27lFah/uj7fkZ4SS/Z+mFbchnt0TTmUv2547p
+30Q/FkOzz7HIPJrqFbGY76qxbVMMbcnvSWzdyDeaktbs/UrmJT9SHJH+laYY
+9/T9LImbKxZYfKYpWXpPGE3qBYfGD3yiKVP7580bSb2HWZrUR7w/R9sPFJL5
+Ule9776nqVJv9cF2OCmq0vv7PppySz7XboL+qKC9Xx700lSj5cOSGGJR+mpz
+uF2pa3M9md/cxLkh8ONpabYMO6xres0Pe0dT3uK7T3jEPJ3y6f00JS45IzoJ
+cwdbL27/QFMqnNirHcRtt1WMkKdeme+kaw8/Zm8qRl7+66XBHLhBmpnDGqKp
+btlE/UA4ya2fXYz+GJFn9dfDVGOX/O0XmgrTHSkLgyVZlT8MYR5RmQcb/YmP
+3rpcrqApio5XcSJeuvvzGFwXMD9DH+b3mhh2w8Lam8/7kKdhqr+IB9d7+768
+TvIvGA0NQ70hB3n+cTip+JzuF9yvouSnF0f231mfOhf51OelO/nBkvR3tibI
+b1QxdmoOWf9nsKYM/Qq71otMST0Tle3NmFe2bkq1EXGC1uLnr2kqv/PjDCtS
+n13WqtmJ81kMH3fi73VXGz7F/Nbv+BROnH2v1aCVpo65GM0/Ss7vFEmuN9IU
+s7429SGxXanZtVqaitdmtJL+KPXskbFCmupJ8z7OJ6Yc04K8rlGmxU2jlf/3
+f69R8v+NPfdfycmXuQ==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {1.5107511663023216, 12.046515310090086}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwl1wk4lGsbB/A3VCI1GFG2EWnyUSRROs04kiFpjqVoFTqWEyYh7aPl5Fiy
+HNspJDl2GlkqRVPJfjRK6KAmWiRJQirL93++z3W55vp5n7mf+/7PM+MdLfcA
+hwMSFEW9xC95pPpn8LOYTQ2Tx/+wKTbLXTR3CTzaFlgGSz8zcv6K61LJ6yK9
+4c6RUMUW2K427YYGLKbWpEfBha5zNzzXY1NmBQtj18CjM1W2l+AJ2Y9H61XY
+lJCaqfSAhUUDtVvgqG8VcqZk/Vnt5AfKbIrZqOGiBPcbVMYbwTohQ6YzK9BH
+x5KbaYvYlOGN7OZRmN2ZypgPH7ReXzEG3ypqexKmxKa8a5YtnoXni8ZGwyTh
+GkF9DqkXvjluXyIdczAuCYzg4abhwfUwLzbN0FGPzPeqbVyRTenftn9/BGaW
+FrU0wufYSkfTYGrAO/ImfOJfk+D7sMuIb/FdONRM99wrmHeY1doJsxcvO/ID
+ptHexs9D/ZS3M/vlkA9TXFmyBWavkhQokTyrPq68DNMMVpsowtzQOce+wOFz
+Zcxnk3w9UzO3oX+pL1bhH1CPPa59MR8evbzNoxbmxIavmoH1TS1iksg83Wuq
+OcgjJf0vyz2k/zGjgTNw0J+TGmrE65bJ5sPDhjFKz5AX76A+5w7s6SvYFQHX
+u76pKINrjMa2boT5Ifa8RFhQ57fjC5NN5d5IvbQH7j5n11EAu2hd9loA29nJ
+zfWFKePsuaS/oCOmvavg/ghRnDGskvWANrMc89wy6S3GfGsWyzzrhG+tHQhg
+wGWFitNVcK6vo1o08qO9uPeiGOYYf5/6poD8TS1tC2B+juqKg/Bd54VJN+B6
+ulNovzz2SVp09SHMHK/ecRjmyKiKu+H+gqYEGuy2/oz/JNnP7umahzQ2NWkw
+vpSB/lIsVztFw8KskWwrWFC0ZSEPFj/5KZbMw+PzQn6DNymZHo8i80qvjD4F
+S6v36OTBDEtZ5xy4+Wfe2Wpy3YLd1wuPfsjqbiT17I/zDbA/92RQZzPJw2xn
+6xk4VlcY8xDOYL+c/QKmW+smFcMiZo/cesyn9uuV6WiYm6gpioPLeIKd7nDo
+9/H9Ypjftb5MH+a8a9yghbwSWgzODGG+iVrfAC7Jb+OfKXmwyiHJBl+Y45lN
+dyPXZ7354QdLb262opN8i9IqXOC2ae+Eel3M89eOG3qwaOSa12mYNtVd/hr7
+2TWZyZrD3ASt6HB4fklg0tQyXK8sGlOBJ9Pcn9XDnDYh/y/yerjYmKTDzJe8
+gwvg3AaZ8lOwyvKA4BPIJ4Pj9K8vTOW1bW5diHlYgwXupB4VpiNYgPNJ9yk5
+QK7rFQVdkcP7381hIhAWVL4Nyp2P13NTkMYfcEZLh+1TWeRnMOqWDbMdIwp0
+YaHNmeukH0bmrvgcGfzdr/3BRzjW/I6MK6ymftZEEfOIOiUWboBpdrT0tTAv
+UHRyG8zxsshzhqlpZ91YuDvL29gfjh1R+TABc4dK952CDaNyvp3BfjVdwYXn
+SL0Hb+i66K+MdlGST/LjNQx1wncPb6wNIPWlyqPjMM/usMGnjqS+s9ZtK8wb
+qn0+Up/UY371/gA3iw7XfUe/biFdq48in3qBS9s9kodFneAtTCvodT8JSztu
+9l+EPGtMvYJN4JR4o5XasJoBZTugg3XKqS+U4RP31X9Oh4Xl1inv8PzRpqR6
+R1gU757pD4d3/2IqB7MHzLPqsL+bTXZVszacIb/7K/p1iYniJMCMnu82UnCs
+8KrfAXg4leYzjvnPDfe6WpDri4I725HPwdk9NUxYyBs6cn0e9rve3a8K837n
+noiQxudD+WH+EljsYEsFzsX1Y/4N2uS6wCEpYA7m8lwcvZb4Fw9x5Gz0eeW4
+wS+knstnoxYpnLfx8YpDsEBGm70BpjhRY4mw6E1233NJ9FHXHXUHztgnGsqF
+1Xb2yoth7pv7i/Ngt67Ny2ZhXu6z47M7Yf3fzKPViBnXnY1QL+hsxVZDmJ+7
+XlwMM6do1ethRqX9MAf9uL1cdJmYp7n70jhcdrCOvgo2dPtJvRj9M5+s7FCG
+M/4ItTuA+RI0v8mNkf6D6DPyZP6IZPc6ki/X9lQ+/Fpy/lgMbGi959My5JWx
+M28bl/SfuajsBDyxcOt2GdK/S2NVLpywtcFIuBT5Z+18/Dc8OWefWRBseNK3
+4BDM9eS0MWFGY63+fJj+2NtHrEX+P09aH8F+g54W5mkwt2HOeAX6k6q3ctoP
+G66QnteK/p22pwesJOuvPRtsxnxmvrZvZ8PUtsXbS5FHbggvo5+B8zV9uC8a
++RWanZDtgAWfC8p+lcD5FYYotcLiwr2T1rNwvqSbDNph3vd3seYUPodj/Le8
+gRkNPInEaRbVn6s3MUls7eT5bZJFhRtHuqliP76VnHzJDxYl7qnx2ggzyuo3
+P/rOojJ6b1d7wG7mfzuawzr2S6fCSb+FH3fRYX7eozsF5PnX87duhbm/5RY3
+wBlXFSRewkF6tGqSB3/Bwchq1N/kYK/+CWbbKxb2YH/adte9X8j6kwmH/oP+
+XAz2hQ0Sj1t8TJhBvYKcmeekH1XTWWfJPD9xW++Qfj7fZ5hgXrPUTL94Ur/X
+qa8d1kmSqN1L8kvZMG8f8kmVyjdfCguCa30ewW3embEvSF7FK+wkkSf38pW2
+RJKnU71Akbg90t6W5L0778IXrA9dcrhuUhP1DJ63XoUZfvE/vGFu+KZCTZj2
+pVrco4H36c/Jljzsz7uacG8fnLH8WkkK+hWyHR1H1PE4Ly6ShXlCbxlfTVEn
+5/tksOoUi/JeerLDCc5IbrndgbwmHghNmGT9qjGb8AkWFctgzygQM+qSLMaR
+V6B8KB1mVzWVKI+yqHoXrY96MNWZGqg+wqIYaytrHcn6Tzl5HsMsildemxVJ
+rmfRnwx/ZFFsictnW2D+7mvtzR9YlJlL6Ttl9EsZ2vzkM8Cict9HLPCA+VoJ
+N5resyjpJyFLC4jpEcGfiddyAz6Q9T45wY+x3oUuSNREHsLXe5scBlGfEVNp
+CbPHfpzfP8SiUjwtS5xgtxrFPj/0w+lQ0ODCGUW/R7V8xn43e2PWEPdcl2B9
+YVG3WIMxs8jz+wq68zEfI7Mp+yb2c/untG9qDFa8sd2FmOn6Secr8ir9JvOW
+5ClpVbEAeYnu/jPlQfKJS4oohCnr2UrtaujXo+vbCCyYLr7JhtmHRDb/kvWP
+VdNzVXEevl5q3gtPNASmK8CUbK90GOrTDk0fOYv78gxHxTIr5D/x8tAVct/O
+cJU/XY7+xDWuCyJhvsPxm93IP7y9UXkFuf4q+X4j5s110N3UTe7DX69+tRT5
+pzw5bZINU6YPw8P7cR6iWxMvEN9X0PvUx6LcFO4v5KuQeu/bpl/g9WdaOlwk
+TtB0FLbj/dA5riEg6xuueT1twfnJv+TeS1zO+BHwAO9HxbjtWtifOqM541+C
+ehvn5HsT06o2iC9i3qBxQSmxKPnd+ah7FHWOnjxFzL++l/PnPUocfiDBAvNS
+lPx5Sct7FNPYWes4Mb20/v017HdBlplNrKYzUHMLeZh9MLxHbJXGL36E83bK
+Kfzh/9bvurNChDxi5HeXEPeHPep6hs+fbP3HF4iXa3qldmGerB2S1jD/YpxU
+tBjno/6U8jDJU2NqXAJ5dDYkqp4nVqh+JPsG9Qq0v0vD7HNFogtvWZShc5jL
+aZJv95rgPe9wPm10AgbxPYbKLlp2DFaJ+LvLiTggyfgp1nOMj/pX4T6aypi2
+/BX1hkOPjevBwvjVPuuwn1nhhfmZuI/m18WId5J+/Hxe6cKUSvaQ8Dleb7fl
+tCrcR1NlP9b908qimAl3Q7yIe5vLNyB/b07nIiYx+eFX/f/7nSL7v9BwJ/Q=
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.0993812489835673, 6.458569381796186}, \
+{-1, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{19.999999999996362`, 17.}, {13.499999999992724`, 
+          13.999999999996362`}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.81002436929973, 16.075547199850586}, \
+{1, -1}], LineBox[CompressedData["
+1:eJwd1X00VHkYB/C7DpIUabyslZi8TFOKTKWi7lJMqKymVydHhgmxstnJtpOd
+JuUl1bSxXrZE7Wp6URaVvBQ6aRJDZWRzTIqdYzPZqUaLauz3t3/ce8/n/O59
+nt/zvfec6xSVFBZjQFEUHwe5/n8Se9CULYEdTd2ZemLjYdgx7/rKX+BVHyPe
+5sA9DSkG876iKWbXr4ozcOanprlVcM09j6xKWBzb/XiRPU1Z1FHidjg0UdZT
+BJ84bNOtIfWm6Nq1sEqfITL3pCluXoD3otk0VV18ZBUH1oavu8KDRecWdmyH
+PV4b90TCpv5xPWlwhVeylKwbTmebnofFbOqOJzwjKmVeM2yxuyv4I+oX28Y7
+qOCadduMbsATEQ+pUVK/vC+eD5vxgpjGizFPGSttGiw0EljPhMUfvLIqMQ/D
+duEtK7ixvOHlTjh14LMrA2a92XDVEq6uf6swgwv4+0uVyOfV+JIdFLztbu+z
+yzDHh3/tH/RL/ZSWlwdv8Fz9sheWtoezC+C2pi0LWmBv/ZiyCo7mTKquw6xw
+19tDMMMmYmMRnDme3rUE/YyHmY+Owp13h2cVwkNzSjOFZN6drgJz7H/vdV1B
+PNz/bPJFLqx92tHLJ/kOmvztjHyGog+ORsGxA3Z7a2EfTnZgLCzvX+0S6kBT
+11LiNPtIPobxN/vhWKuAm0dI3ofXmO2eg7plMzzPknkqBekqWLjrt4u3YV2L
+22knR5ry+/R2/nM4ujlmiAvLGo6XfoadD6oWRhMzEluZyIcxsaXvOzg72nYz
+dzHpnzmRAn97vH44Ab7qpbTfAw/2J/qfhM8k5fC3wHLzEfY1OMHyy3hvWLcm
+pEAO0+nnlsyCU9rvVffB3vsfrXyC/UnbvlFryPtqtYr5Aa4ozO0ehbkPJSud
+4DP8MuEYuV9eNa0D8wpZDyZ1xAb/9mXAAQcU2mGYsmnxIflIVktMVHBkxAC1
+AJ6YPsu3Da5IFrg4wDXr5/xxi7z/wvLfWbDoeG1ZKdzfXiMIgVcwpycfI+ut
+2gVZsNrXI0YIh2oUxX1wp/B9Kx8eawzkBWJ/fvLlCh4sE3HfNcMcQV5yEOzx
+11GWK+a9fLJOshY2WdaxOQnWS3inAsj32u2yp5bk0SQdWg/Xpw/WGzrRVLdD
++7FwOHOKvSwYzrFPWJpE8vG9VZEDJ2xSR2TCIZWvzt6H7V6M+JSRfJX7Tuvg
+J2kxTx6Q+tbubrZM1JtS8YHkU5A/vHcRzAkc58/0wvNLjaxWMMl30XB/KczZ
+Fsn1hq1NKfkO2KfUWsGGm2OFriLixoYRS9jSwqiuEKbYtXHv0E/WpMquhPsf
+++96BNNxNx/fh7n5X/iVwOLGQ6ZP4XRR2MV9cJlZ3OifcOrZQ75cWEuXFD2H
+qzOWX3CEF1tMDVKS581ygyeRD9vtfH4rWT9qH6WGG9doeHWw7XLDymdwUa40
+Q0b6d1w41QULDKp2noYdR72e9sG87u8dD8LarXvq3sM/53JddsMsv0S9FfoV
+vLl0JwzuUcy/5w+HqE3dvybz+diU/wgLRn+SesFm6ivDdbBz1UAvGzY54L7R
+AHmI1uofusGMpvO7QmDTS+5Ksi5r1kny4ZodI54cmGegNX4J03pJmz+sG+vc
+5DoXcw0q122HNVn6yWj4dUz2tBS4JLX4TRGsEZsvI/P0bJVHtcDSzqi7N+Dc
+qX6z1XCLHSOZ5FeiGYgchw3Jf4GD/ZGrM/0fbeE9zg==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {19.236190257669733, 7.2638097423302685}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJwd1Q0w1GkcB/C/l2t211tIceccc8hrLVHI6J8Uxp62Lto0SS9swx2bFJHs
+SQllHN0qb3db6c5LZ69ORE2L2tZrSyJutpauQ5lahD2jc9+nnfnPzmee5//8
+Xp7fzN/mYMLOaG2Kog7hIf+ULh4hm6YYBJ/TlP/rt/mVsMPQ45ZpC5o6sbac
+7oDNTbN8umCrDLV8Ej5fV/DoAmxdcvyDnhtNsad8//KEd37hdMcefm76cand
+nKZkWunrfImnxL9yYG6lcU8IfF5XZdC6iqao3X1OYbDD2YnP1sK5TVrrebB1
+5ta2yytpapRjaUvWNTMRFbrwVZYwgQNTXbsHk81o6p7FbJ8frEpeEzG/gqYE
+JuGbXeHL5bvPZcOpcQ3D5uT8rOFFZ/hPx9yX2mR/3cCJMVOaqvjIuUrq8XrD
+v9EMx8clpAzC0p8Dv66CtzWb1jyE2YmMw3Ww6vm+I/Uwz8D7YReseD9XXw0X
+mDsU/webP9gfTfoXZHRs22bEOzgjYt2An/vopBXAuZtOz9bCas310DFYLgpe
+0wQL1+hk0agnys/meDeJfy27VQQvvF8I+Ie8/23S079h/+KcIR3kLxCmKe3Q
+j3ezSxvsiP1dy8JgQ29/n2CYK5EWCGBF47KyeLjgO5ZTErxes515CWasHRyJ
+hD1+KHFthI+4RoSyyXnWxm1DMK96zH4C8cpqLcTzsPDwo415cOqrovbl7uhH
+avwBC9hjxD3JFqaMvLjFqEfkl7DKHY5itp9kwrrpNfHesPBmyEAS+sMTBKT7
+wJrvK2pemNBUz5XYfE+yv8NgBwd+uEHm5gz/cipoutUY+eboe1rC49LAXYGw
+VeuTEiZMT/ZUKJejf8rp/A+k3g61Sw58LnHrnhfkfrsbYzjwrluqUDnsdeVm
+pQPMmJ5svQ1LjsbYWcFZ0vR5MRwU+YpygaVn3YxIfzQrZb5cWDToReXBy7Xn
+ldmwoGxPTjax/LbeE5gbE+eYS+K3Z260QX4p6363KCLrHWbRJ+FL7r4hV8k8
+J3du7INNmm/zG+AUxqY4e9TrozZ+1gsrbN37BbDDV4X31OR+Xpo/roXLEres
+MEW9Xvxq7wE4s3SsegN8pMV4dgI++LbQcx/M+HCz6TUc7p8YmQnzFu7tk8NS
+HcP+Slie1an4ES6s2MuTwaqL2+23wLZ7pnpGYcGtmKwXyK/kzd3gBVhyJkCf
+D0fkiUz11+F93dg7KtQr6zzeuIpYtcmO9Me2NJP1JSyUeaqSjDD/LmxbS1gg
+N+4LNkT+XD2+GXHd0gNHA9yfKjKZCVNNnC4rfZqaW6H0+BfxFBmDq931MH/j
+Yslrkt80syqOhTnopGwUZN7ucBJ7mTTl61f19C7x4lQNH27skVpdJ/NX2rCL
+Dfe3le0oIPlrPjo5w/bLOiozSH2nG+rC4PAthm7HyP7H7/xr4HxL7aE42Hq4
+nGeHeO/GeoNiYe7etLZmOH/hykQ8rJ7km0Qjv7maeuVJMs/f7FhcifxZ4vVL
+uSTe3uZnMjh27KcRMYlXJGHFot7F8ryB+6Se7t+K52DtmWezShI/jDp1CP3R
+vi9arUX6wR+1roLPR/Wy7WG630DSAoceSG0JgdUNheFk3UEr5YwAjnK6KIiE
+U06NOxbB1objpSM4fy5gKeMW6fcw9w9PONT3yYluWKWovbYf+Y06H3Z7Rc7T
+nAmM0SP3KjacgSVpE7o7UW/o3FHJIll33J/sgv58+kh40NSnH4P+H+y3Mbo=
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.263809742330267, 3.7638097423302685}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwt0w1MjHEcB/B/kkTZzcupK3OnEKo7RJHu/r1HRTunSy/kiIy4OGNJ3bRJ
+b6SXUd5CRxm50jSNOmPdLqObqbxMpShEy8sunF2+f/Nsz5599nue///3/T3P
+I1DslSaPI4T442RXYh7DsZCSf4cLJYnlab+CF1Giq/ILl8Mmm91Bp2BjAW0u
+ghe87M59yxw763Y17LK+zn+JByWioI4d5+HLXJUhC+ZUrJi/F87MTmtthXVl
+ZQF8eI3PJOF4T7h196cGZ0qsQ/fnL4OL7of9XgKbFki4G+HKg+5nLvEoORRf
+2pkKi3Kr2yfCnw2FtftZfeZbpzQnSswzvibsYs9/G+vpc6SkWzhnXwxsDG2z
+JMPqkZ++PvCIj0RqBTepjKUcmG8/PbppJiUXZus736O/otODd0rhsqnVBU0w
+MXXFFMMBEllkMZwkqDXVw5mahkwlrF3uIf8B8ywhnrHwSGWUTIr1FZr5HRFs
+vcLCOXp4IDA0MIrNI7emKgL9Wjs9VCXC/Pah512wsEdQnAFHVw36bUW+lqVO
+/TVs/+a21PfwDdO87n7Y2Ds+Jwbz6bGOErujf6Uf59ItOPnKVTcVnORV7jsE
+j80aCHzE6oddsmww753FIfYzvLD+m8CSP6iPenE/KWA1v/GcEfa19Cmvw8rk
+V4Zs+MndaSUfWL3mkJAHp8wWPOUJkcc9oaAc/XR+ubdOAkd3iH+w95FH9ZwN
+sOilzQ4l8tSmHX0Xz+6vi4l7gfwTXOcelsFJ4s2rVsOv5Ro5hTnSKaNtmN/Q
+A9ldAazd/D19G/zuREW6GftTcV6sM5xvaBwwwpXhfanfuZRMy7TN1cCiZ4qb
+w7B3W/7PDFi7yUwccL9HQvvlOJi07IyIhBee9SgPYPlk2TnVsJ0kZas3nPS5
+3toF/bgeF79iFh30u3MRlk13sA9mlm3RLEKek3wvz3/zCjuQ2Aj7pHwpPQH3
+KoZTVyK/oyZYr2f1cPnADdhw0Zg3meVf2/HYFvMraGyyk7O8wiPqELghXGu+
+Cuu607kKeLgrvXMUrnywKi+evc9r3lauInxPx4J7FztTteCFzjYM1ln63QZ5
+VC3ds1S1Hdb2f4zKgi34fbNE//9fHv0LInZaNQ==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.630102278562946, 5.135413671377677}, \
+{0, 1}], LineBox[{{6.5, 6.9999999999976925`}, {6.5, 13.99999999999251}}], 
+        PolygonBox[{{6.5, 9.9}, {6.9, 11.1}, {6.1, 11.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.445200000000001, 10.5}, {-1, 0}], 
+        LineBox[{{6.4999999999976925`, 7.}, {13.49999999999251, 7.}}], 
+        PolygonBox[{{10.6, 7.}, {9.4, 6.6}, {9.4, 7.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 6.0548}, {0, 1}], 
+        LineBox[{{6.4999999999976925`, 14.}, {13.49999999999251, 14.}}], 
+        PolygonBox[{{9.4, 14.}, {10.6, 13.6}, {10.6, 14.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 14.9452}, {0, -1}], 
+        LineBox[{{13.5, 14.000000000002307`}, {13.5, 6.999999999998607}}], 
+        PolygonBox[{{13.5, 11.1}, {13.1, 9.9}, {13.9, 9.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.4452, 10.5}, {-1, 0}], 
+        {PointSize[0.04], PointBox[{6.5, 7.}], PointBox[{6.5, 14.}], 
+         PointBox[{13.5, 14.}], PointBox[{16.5, 6.5}], PointBox[{13.5, 7.}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T17", " ", "P1", " ", "N33"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdiei/ijfgfjghhj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdiei/ijfgfjghhj.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {44, 22}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwl1ws4lGkbB/B3HUIGIyqJHMJg6OgwOfQOqRxKIpqidhwqW2hqVZO0OUah
+RqWwQ6OVnbUJ0aZSqaRJJ/qy6WAb0iZRimpyWPt/vp3rcrl+nue5n/99z2su
+zCK2Bm5QoijqIb7I9/9ehlxKMY7XdC7Vot3sGjmNSwXo95ibGnEp0/G9P943
+4FKcCyWVobBoUe8xLzjzsF5aNcwbzO+9PxUWNs01Mca++13tsXCVw69GJXBS
+D7+MBQs7K6XzZnApSXJi4NgU/HzQKf4BLCywSfwAt2z6ThxnwqUoAWMtWU+c
+25EywZRLDSyMbbTAeeqV6M+VsLVOYkAELC5lCo/DLR5Ze6rhOd8pv2uF5cHG
+3QzkG2LYs5TMcP7wYE4cvCzU/JwlLJrdYN8CK+oGq13J+k9XhWz029038HUR
+LGd5xifADfLPSjQsUQ64fgGOD7L6Zg/XaafL/yLrazYVTIKllR8398FyS3/L
+D7jf22G6O1lfdaPQq4nk26lypAZO6yl7VQgrfHoYsbBDn0BbQPbLbKsZsNdv
+k5u9Sb+sN7I8Mt81kvcsOMkl9DLpR+yop8yETU+4t+1Ev9KOrcbKMC/2iuoz
+zMvAZpVMCa5LSDjqBi/L2P1BB5Zus7lfOplL5WtpP7aF1dktFw1gniJBIwjO
+P3DwXpE+l3I7fT0hg7hIfJIDG9FsIckfneByqU8POZ8X3dNCv5mP/46shy3e
+ZD5dS/rPKcqQwtEBanXlsEGQs7SKrL89um4Y5iwv+PsR8c59N5aYY/5bIqYx
+UJ8n81DPgVt4vUOrYYHf9aJmuD3thEc1zN/W9P0Ysc8L40nIKxqlamfOxL5P
+J7zj4bBBnyI34v2zBK3wvTxz2VJ4QGNrykz0H3P10aHFxEoh36LI89b1acgJ
+5th1mebC1raFhcYwb8qBwFLYK+/RryO4T9AQNlMMM0+HVP8P5v/wc8ouuPbm
+wAkpyV/Buu0Ei/cZRO2FB9oW/v4c98sXF5gEw9T6X5x+gF94sirnwZmeK/Jf
+oR+JlazCgJw/k/txBWx3+i8/DVjRMn9yLebDke2eP4F4Tbv7FLjx7JIfmXD0
+I+driZPwPO2bvc0a5j4x/qNfF/lnrXy9nMxv3PByHCydntmxjzjrys8qMPfG
+xjv1cFJZi3ENk0vJVMZzlNBvS+gvDxPh6LxUiT/snVXzJgJOcxFYFcPRviGO
+G+CquyXT3sOmX0xmpsAi9bw4Vwvk3NDf/Adcu6bHJRWOXicyHIfDti94dgPO
+vO2vFoL7A5qydRSw+lHp/fOwfn2+mZkl3k9ldxcD9JPtd3jADRZMdFTshAUT
+glT8YGFTYOddeIAXdYR44EO1ny7mIQ5320PDdXERKz1huw9OtDXcs2WVdij8
+ou7EOzWYcz6jlQefSS6kOnE/f4Uu7QK7VbSt/ANmin3Cx1E/LeenroNwj5Gv
+9Dd49EHgtXBYYXX9iStsGqze7g4bdFDdF5E/X5P9zAzOz1JqsIbFvIU6THhO
+cduMQ+j/2O0H9EQ4YJLZarkOPi84XWJdWCAo3VmujTlHdFdZkfsHQ4f3a+Hz
+o/EBzwcemNu/OpmB3G+7bgnJ+szsrF80cc6tM6MGrhqsKPg8Eea6nvxK7FRs
+sxe2q1573BP9BhwadneHX6RekeSSee4u1naCrZ+FXe2EG7Z2qm6AhbeKO2db
+YR5TfTsbYUnFp8m74QC2wdBy3CdTzD59CZYsXZv5BXbY9deCT2S/3Y01Ncg3
+xLswasxCvyILCyHyz1Hv/d0N5roXLOSgP3Xb8fLlsMgm1/UNbLEud+JKsu4x
+nL4b8+BsTshYSlx6drAbXrZ7X/I8OClp+BQT83Ob/emtHjkf0+GtT55PPXP2
+e9zPDI86+BX7DdY+1miEKZ/k33Pgvl8XpeTDLc2r6X7cZ9offioOrrIb9JgO
+R3ktiPSBk4bMzU2QV6qxKpVN1vX2RyqhH6Of1aKmwqJtXlYtmIdXH++dNtmv
+sbHwmAbmwlRs0SP139VtCFPH+zSQcsyS5NHsUnZQw3zDXm1cTOrR+6xZE/D8
+9DtytsPybBabq4p6i1wvlhOnF6ZlqCC3tGdCPzyn/nikMty+f8kNJ9Kvbun6
+C8rIw4ublQ63+FYtKYWF/nZBbXBVdb2RDG5Ydcjcwhr7V5iwZ+C8NSP9ZBzc
+UjfV4yTcYHJW+RwsOdWo5alK+tzc9Q5mhg7njcAcVspSQxvMKcjq2jXkrTd/
+/tAVDhgJ70lGPwqPsUsryPpOi4OO6LdH7dhQMMwvqXz8AG6g4yaTdZFsw+JF
+mE/apY+hbnDSWyn7IOzlHCE2gZmq56cUwWLGDZsR3C/QncgSwrxcQV0r3JAa
+ThvCjcu+uZbBVbNuTUpHfaP7N6/vIfnjJutcQR5O3h7fYFieq2V5B3mNPk8t
+dYSTjA8IzqEf/sfIJSbEJetupaJ/B0XTfH1Sf8cuKx/MK37/05eT4YDuYXsd
+JfiMmrEluc//bWwXhfmzbSd5kvrbA08VjdNU2oxCTgy53yhf4+oYTcVUP4k4
+RerVaHQ5j9JUYvvWu12w6f5hkcEITfVFRLHZ6JeKcdoUPUxTBueH/xSSeWxs
+cbaF5/DTXsrI/I5EO4TCma92cAxscf5SBXMQvmf/pSMS5q7nbelGvVHV8WEp
+LFkRu8sY9/Md7bReww2zozsy/6EpeVu8yhQ25pmSF6WG/FFj7utc4Cq3Cs27
+cPThvfNXwkyF5E7Kd/j76fLI8rUwN+dWoTn6T3SzNAuBG/5WLT8JS3t97yyG
++WFtTwdgwYYTo7ZwwKYtzjqYX/6smM9qsKlHQeAXrKtvdw55iTzyRd07SuEe
+Cyv1WpJXbFpvCHPMVk85AIs27lFah/uj7fkZ4SS/Z+mFbchnt0TTmUv2547p
+30Q/FkOzz7HIPJrqFbGY76qxbVMMbcnvSWzdyDeaktbs/UrmJT9SHJH+laYY
+9/T9LImbKxZYfKYpWXpPGE3qBYfGD3yiKVP7580bSb2HWZrUR7w/R9sPFJL5
+Ule9776nqVJv9cF2OCmq0vv7PppySz7XboL+qKC9Xx700lSj5cOSGGJR+mpz
+uF2pa3M9md/cxLkh8ONpabYMO6xres0Pe0dT3uK7T3jEPJ3y6f00JS45IzoJ
+cwdbL27/QFMqnNirHcRtt1WMkKdeme+kaw8/Zm8qRl7+66XBHLhBmpnDGqKp
+btlE/UA4ya2fXYz+GJFn9dfDVGOX/O0XmgrTHSkLgyVZlT8MYR5RmQcb/YmP
+3rpcrqApio5XcSJeuvvzGFwXMD9DH+b3mhh2w8Lam8/7kKdhqr+IB9d7+768
+TvIvGA0NQ70hB3n+cTip+JzuF9yvouSnF0f231mfOhf51OelO/nBkvR3tibI
+b1QxdmoOWf9nsKYM/Qq71otMST0Tle3NmFe2bkq1EXGC1uLnr2kqv/PjDCtS
+n13WqtmJ81kMH3fi73VXGz7F/Nbv+BROnH2v1aCVpo65GM0/Ss7vFEmuN9IU
+s7429SGxXanZtVqaitdmtJL+KPXskbFCmupJ8z7OJ6Yc04K8rlGmxU2jlf/3
+f69R8v+NPfdfycmXuQ==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {1.5107511663023216, 12.046515310090086}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwl1wk4lGsbB/A3VCI1GFG2EWnyUSRROs04kiFpjqVoFTqWEyYh7aPl5Fiy
+HNspJDl2GlkqRVPJfjRK6KAmWiRJQirL93++z3W55vp5n7mf+/7PM+MdLfcA
+hwMSFEW9xC95pPpn8LOYTQ2Tx/+wKTbLXTR3CTzaFlgGSz8zcv6K61LJ6yK9
+4c6RUMUW2K427YYGLKbWpEfBha5zNzzXY1NmBQtj18CjM1W2l+AJ2Y9H61XY
+lJCaqfSAhUUDtVvgqG8VcqZk/Vnt5AfKbIrZqOGiBPcbVMYbwTohQ6YzK9BH
+x5KbaYvYlOGN7OZRmN2ZypgPH7ReXzEG3ypqexKmxKa8a5YtnoXni8ZGwyTh
+GkF9DqkXvjluXyIdczAuCYzg4abhwfUwLzbN0FGPzPeqbVyRTenftn9/BGaW
+FrU0wufYSkfTYGrAO/ImfOJfk+D7sMuIb/FdONRM99wrmHeY1doJsxcvO/ID
+ptHexs9D/ZS3M/vlkA9TXFmyBWavkhQokTyrPq68DNMMVpsowtzQOce+wOFz
+Zcxnk3w9UzO3oX+pL1bhH1CPPa59MR8evbzNoxbmxIavmoH1TS1iksg83Wuq
+OcgjJf0vyz2k/zGjgTNw0J+TGmrE65bJ5sPDhjFKz5AX76A+5w7s6SvYFQHX
+u76pKINrjMa2boT5Ifa8RFhQ57fjC5NN5d5IvbQH7j5n11EAu2hd9loA29nJ
+zfWFKePsuaS/oCOmvavg/ghRnDGskvWANrMc89wy6S3GfGsWyzzrhG+tHQhg
+wGWFitNVcK6vo1o08qO9uPeiGOYYf5/6poD8TS1tC2B+juqKg/Bd54VJN+B6
+ulNovzz2SVp09SHMHK/ecRjmyKiKu+H+gqYEGuy2/oz/JNnP7umahzQ2NWkw
+vpSB/lIsVztFw8KskWwrWFC0ZSEPFj/5KZbMw+PzQn6DNymZHo8i80qvjD4F
+S6v36OTBDEtZ5xy4+Wfe2Wpy3YLd1wuPfsjqbiT17I/zDbA/92RQZzPJw2xn
+6xk4VlcY8xDOYL+c/QKmW+smFcMiZo/cesyn9uuV6WiYm6gpioPLeIKd7nDo
+9/H9Ypjftb5MH+a8a9yghbwSWgzODGG+iVrfAC7Jb+OfKXmwyiHJBl+Y45lN
+dyPXZ7354QdLb262opN8i9IqXOC2ae+Eel3M89eOG3qwaOSa12mYNtVd/hr7
+2TWZyZrD3ASt6HB4fklg0tQyXK8sGlOBJ9Pcn9XDnDYh/y/yerjYmKTDzJe8
+gwvg3AaZ8lOwyvKA4BPIJ4Pj9K8vTOW1bW5diHlYgwXupB4VpiNYgPNJ9yk5
+QK7rFQVdkcP7381hIhAWVL4Nyp2P13NTkMYfcEZLh+1TWeRnMOqWDbMdIwp0
+YaHNmeukH0bmrvgcGfzdr/3BRzjW/I6MK6ymftZEEfOIOiUWboBpdrT0tTAv
+UHRyG8zxsshzhqlpZ91YuDvL29gfjh1R+TABc4dK952CDaNyvp3BfjVdwYXn
+SL0Hb+i66K+MdlGST/LjNQx1wncPb6wNIPWlyqPjMM/usMGnjqS+s9ZtK8wb
+qn0+Up/UY371/gA3iw7XfUe/biFdq48in3qBS9s9kodFneAtTCvodT8JSztu
+9l+EPGtMvYJN4JR4o5XasJoBZTugg3XKqS+U4RP31X9Oh4Xl1inv8PzRpqR6
+R1gU757pD4d3/2IqB7MHzLPqsL+bTXZVszacIb/7K/p1iYniJMCMnu82UnCs
+8KrfAXg4leYzjvnPDfe6WpDri4I725HPwdk9NUxYyBs6cn0e9rve3a8K837n
+noiQxudD+WH+EljsYEsFzsX1Y/4N2uS6wCEpYA7m8lwcvZb4Fw9x5Gz0eeW4
+wS+knstnoxYpnLfx8YpDsEBGm70BpjhRY4mw6E1233NJ9FHXHXUHztgnGsqF
+1Xb2yoth7pv7i/Ngt67Ny2ZhXu6z47M7Yf3fzKPViBnXnY1QL+hsxVZDmJ+7
+XlwMM6do1ethRqX9MAf9uL1cdJmYp7n70jhcdrCOvgo2dPtJvRj9M5+s7FCG
+M/4ItTuA+RI0v8mNkf6D6DPyZP6IZPc6ki/X9lQ+/Fpy/lgMbGi959My5JWx
+M28bl/SfuajsBDyxcOt2GdK/S2NVLpywtcFIuBT5Z+18/Dc8OWefWRBseNK3
+4BDM9eS0MWFGY63+fJj+2NtHrEX+P09aH8F+g54W5mkwt2HOeAX6k6q3ctoP
+G66QnteK/p22pwesJOuvPRtsxnxmvrZvZ8PUtsXbS5FHbggvo5+B8zV9uC8a
++RWanZDtgAWfC8p+lcD5FYYotcLiwr2T1rNwvqSbDNph3vd3seYUPodj/Le8
+gRkNPInEaRbVn6s3MUls7eT5bZJFhRtHuqliP76VnHzJDxYl7qnx2ggzyuo3
+P/rOojJ6b1d7wG7mfzuawzr2S6fCSb+FH3fRYX7eozsF5PnX87duhbm/5RY3
+wBlXFSRewkF6tGqSB3/Bwchq1N/kYK/+CWbbKxb2YH/adte9X8j6kwmH/oP+
+XAz2hQ0Sj1t8TJhBvYKcmeekH1XTWWfJPD9xW++Qfj7fZ5hgXrPUTL94Ur/X
+qa8d1kmSqN1L8kvZMG8f8kmVyjdfCguCa30ewW3embEvSF7FK+wkkSf38pW2
+RJKnU71Akbg90t6W5L0778IXrA9dcrhuUhP1DJ63XoUZfvE/vGFu+KZCTZj2
+pVrco4H36c/Jljzsz7uacG8fnLH8WkkK+hWyHR1H1PE4Ly6ShXlCbxlfTVEn
+5/tksOoUi/JeerLDCc5IbrndgbwmHghNmGT9qjGb8AkWFctgzygQM+qSLMaR
+V6B8KB1mVzWVKI+yqHoXrY96MNWZGqg+wqIYaytrHcn6Tzl5HsMsildemxVJ
+rmfRnwx/ZFFsictnW2D+7mvtzR9YlJlL6Ttl9EsZ2vzkM8Cict9HLPCA+VoJ
+N5resyjpJyFLC4jpEcGfiddyAz6Q9T45wY+x3oUuSNREHsLXe5scBlGfEVNp
+CbPHfpzfP8SiUjwtS5xgtxrFPj/0w+lQ0ODCGUW/R7V8xn43e2PWEPdcl2B9
+YVG3WIMxs8jz+wq68zEfI7Mp+yb2c/untG9qDFa8sd2FmOn6Secr8ir9JvOW
+5ClpVbEAeYnu/jPlQfKJS4oohCnr2UrtaujXo+vbCCyYLr7JhtmHRDb/kvWP
+VdNzVXEevl5q3gtPNASmK8CUbK90GOrTDk0fOYv78gxHxTIr5D/x8tAVct/O
+cJU/XY7+xDWuCyJhvsPxm93IP7y9UXkFuf4q+X4j5s110N3UTe7DX69+tRT5
+pzw5bZINU6YPw8P7cR6iWxMvEN9X0PvUx6LcFO4v5KuQeu/bpl/g9WdaOlwk
+TtB0FLbj/dA5riEg6xuueT1twfnJv+TeS1zO+BHwAO9HxbjtWtifOqM541+C
+ehvn5HsT06o2iC9i3qBxQSmxKPnd+ah7FHWOnjxFzL++l/PnPUocfiDBAvNS
+lPx5Sct7FNPYWes4Mb20/v017HdBlplNrKYzUHMLeZh9MLxHbJXGL36E83bK
+Kfzh/9bvurNChDxi5HeXEPeHPep6hs+fbP3HF4iXa3qldmGerB2S1jD/YpxU
+tBjno/6U8jDJU2NqXAJ5dDYkqp4nVqh+JPsG9Qq0v0vD7HNFogtvWZShc5jL
+aZJv95rgPe9wPm10AgbxPYbKLlp2DFaJ+LvLiTggyfgp1nOMj/pX4T6aypi2
+/BX1hkOPjevBwvjVPuuwn1nhhfmZuI/m18WId5J+/Hxe6cKUSvaQ8Dleb7fl
+tCrcR1NlP9b908qimAl3Q7yIe5vLNyB/b07nIiYx+eFX/f/7nSL7v9BwJ/Q=
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.0993812489835673, 6.458569381796186}, \
+{-1, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{19.999999999996362`, 17.}, {13.499999999992724`, 
+          13.999999999996362`}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.81002436929973, 16.075547199850586}, \
+{1, -1}], LineBox[CompressedData["
+1:eJwd1X00VHkYB/C7DpIUabyslZi8TFOKTKWi7lJMqKymVydHhgmxstnJtpOd
+JuUl1bSxXrZE7Wp6URaVvBQ6aRJDZWRzTIqdYzPZqUaLauz3t3/ce8/n/O59
+nt/zvfec6xSVFBZjQFEUHwe5/n8Se9CULYEdTd2ZemLjYdgx7/rKX+BVHyPe
+5sA9DSkG876iKWbXr4ozcOanprlVcM09j6xKWBzb/XiRPU1Z1FHidjg0UdZT
+BJ84bNOtIfWm6Nq1sEqfITL3pCluXoD3otk0VV18ZBUH1oavu8KDRecWdmyH
+PV4b90TCpv5xPWlwhVeylKwbTmebnofFbOqOJzwjKmVeM2yxuyv4I+oX28Y7
+qOCadduMbsATEQ+pUVK/vC+eD5vxgpjGizFPGSttGiw0EljPhMUfvLIqMQ/D
+duEtK7ixvOHlTjh14LMrA2a92XDVEq6uf6swgwv4+0uVyOfV+JIdFLztbu+z
+yzDHh3/tH/RL/ZSWlwdv8Fz9sheWtoezC+C2pi0LWmBv/ZiyCo7mTKquw6xw
+19tDMMMmYmMRnDme3rUE/YyHmY+Owp13h2cVwkNzSjOFZN6drgJz7H/vdV1B
+PNz/bPJFLqx92tHLJ/kOmvztjHyGog+ORsGxA3Z7a2EfTnZgLCzvX+0S6kBT
+11LiNPtIPobxN/vhWKuAm0dI3ofXmO2eg7plMzzPknkqBekqWLjrt4u3YV2L
+22knR5ry+/R2/nM4ujlmiAvLGo6XfoadD6oWRhMzEluZyIcxsaXvOzg72nYz
+dzHpnzmRAn97vH44Ab7qpbTfAw/2J/qfhM8k5fC3wHLzEfY1OMHyy3hvWLcm
+pEAO0+nnlsyCU9rvVffB3vsfrXyC/UnbvlFryPtqtYr5Aa4ozO0ehbkPJSud
+4DP8MuEYuV9eNa0D8wpZDyZ1xAb/9mXAAQcU2mGYsmnxIflIVktMVHBkxAC1
+AJ6YPsu3Da5IFrg4wDXr5/xxi7z/wvLfWbDoeG1ZKdzfXiMIgVcwpycfI+ut
+2gVZsNrXI0YIh2oUxX1wp/B9Kx8eawzkBWJ/fvLlCh4sE3HfNcMcQV5yEOzx
+11GWK+a9fLJOshY2WdaxOQnWS3inAsj32u2yp5bk0SQdWg/Xpw/WGzrRVLdD
++7FwOHOKvSwYzrFPWJpE8vG9VZEDJ2xSR2TCIZWvzt6H7V6M+JSRfJX7Tuvg
+J2kxTx6Q+tbubrZM1JtS8YHkU5A/vHcRzAkc58/0wvNLjaxWMMl30XB/KczZ
+Fsn1hq1NKfkO2KfUWsGGm2OFriLixoYRS9jSwqiuEKbYtXHv0E/WpMquhPsf
+++96BNNxNx/fh7n5X/iVwOLGQ6ZP4XRR2MV9cJlZ3OifcOrZQ75cWEuXFD2H
+qzOWX3CEF1tMDVKS581ygyeRD9vtfH4rWT9qH6WGG9doeHWw7XLDymdwUa40
+Q0b6d1w41QULDKp2noYdR72e9sG87u8dD8LarXvq3sM/53JddsMsv0S9FfoV
+vLl0JwzuUcy/5w+HqE3dvybz+diU/wgLRn+SesFm6ivDdbBz1UAvGzY54L7R
+AHmI1uofusGMpvO7QmDTS+5Ksi5r1kny4ZodI54cmGegNX4J03pJmz+sG+vc
+5DoXcw0q122HNVn6yWj4dUz2tBS4JLX4TRGsEZsvI/P0bJVHtcDSzqi7N+Dc
+qX6z1XCLHSOZ5FeiGYgchw3Jf4GD/ZGrM/0fbeE9zg==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {19.236190257669733, 7.2638097423302685}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJwd1Q0w1GkcB/C/l2t211tIceccc8hrLVHI6J8Uxp62Lto0SS9swx2bFJHs
+SQllHN0qb3db6c5LZ69ORE2L2tZrSyJutpauQ5lahD2jc9+nnfnPzmee5//8
+Xp7fzN/mYMLOaG2Kog7hIf+ULh4hm6YYBJ/TlP/rt/mVsMPQ45ZpC5o6sbac
+7oDNTbN8umCrDLV8Ej5fV/DoAmxdcvyDnhtNsad8//KEd37hdMcefm76cand
+nKZkWunrfImnxL9yYG6lcU8IfF5XZdC6iqao3X1OYbDD2YnP1sK5TVrrebB1
+5ta2yytpapRjaUvWNTMRFbrwVZYwgQNTXbsHk81o6p7FbJ8frEpeEzG/gqYE
+JuGbXeHL5bvPZcOpcQ3D5uT8rOFFZ/hPx9yX2mR/3cCJMVOaqvjIuUrq8XrD
+v9EMx8clpAzC0p8Dv66CtzWb1jyE2YmMw3Ww6vm+I/Uwz8D7YReseD9XXw0X
+mDsU/webP9gfTfoXZHRs22bEOzgjYt2An/vopBXAuZtOz9bCas310DFYLgpe
+0wQL1+hk0agnys/meDeJfy27VQQvvF8I+Ie8/23S079h/+KcIR3kLxCmKe3Q
+j3ezSxvsiP1dy8JgQ29/n2CYK5EWCGBF47KyeLjgO5ZTErxes515CWasHRyJ
+hD1+KHFthI+4RoSyyXnWxm1DMK96zH4C8cpqLcTzsPDwo415cOqrovbl7uhH
+avwBC9hjxD3JFqaMvLjFqEfkl7DKHY5itp9kwrrpNfHesPBmyEAS+sMTBKT7
+wJrvK2pemNBUz5XYfE+yv8NgBwd+uEHm5gz/cipoutUY+eboe1rC49LAXYGw
+VeuTEiZMT/ZUKJejf8rp/A+k3g61Sw58LnHrnhfkfrsbYzjwrluqUDnsdeVm
+pQPMmJ5svQ1LjsbYWcFZ0vR5MRwU+YpygaVn3YxIfzQrZb5cWDToReXBy7Xn
+ldmwoGxPTjax/LbeE5gbE+eYS+K3Z260QX4p6363KCLrHWbRJ+FL7r4hV8k8
+J3du7INNmm/zG+AUxqY4e9TrozZ+1gsrbN37BbDDV4X31OR+Xpo/roXLEres
+MEW9Xvxq7wE4s3SsegN8pMV4dgI++LbQcx/M+HCz6TUc7p8YmQnzFu7tk8NS
+HcP+Slie1an4ES6s2MuTwaqL2+23wLZ7pnpGYcGtmKwXyK/kzd3gBVhyJkCf
+D0fkiUz11+F93dg7KtQr6zzeuIpYtcmO9Me2NJP1JSyUeaqSjDD/LmxbS1gg
+N+4LNkT+XD2+GXHd0gNHA9yfKjKZCVNNnC4rfZqaW6H0+BfxFBmDq931MH/j
+Yslrkt80syqOhTnopGwUZN7ucBJ7mTTl61f19C7x4lQNH27skVpdJ/NX2rCL
+Dfe3le0oIPlrPjo5w/bLOiozSH2nG+rC4PAthm7HyP7H7/xr4HxL7aE42Hq4
+nGeHeO/GeoNiYe7etLZmOH/hykQ8rJ7km0Qjv7maeuVJMs/f7FhcifxZ4vVL
+uSTe3uZnMjh27KcRMYlXJGHFot7F8ryB+6Se7t+K52DtmWezShI/jDp1CP3R
+vi9arUX6wR+1roLPR/Wy7WG630DSAoceSG0JgdUNheFk3UEr5YwAjnK6KIiE
+U06NOxbB1objpSM4fy5gKeMW6fcw9w9PONT3yYluWKWovbYf+Y06H3Z7Rc7T
+nAmM0SP3KjacgSVpE7o7UW/o3FHJIll33J/sgv58+kh40NSnH4P+H+y3Mbo=
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.263809742330267, 3.7638097423302685}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwt0w1MjHEcB/B/kkTZzcupK3OnEKo7RJHu/r1HRTunSy/kiIy4OGNJ3bRJ
+b6SXUd5CRxm50jSNOmPdLqObqbxMpShEy8sunF2+f/Nsz5599nue///3/T3P
+I1DslSaPI4T442RXYh7DsZCSf4cLJYnlab+CF1Giq/ILl8Mmm91Bp2BjAW0u
+ghe87M59yxw763Y17LK+zn+JByWioI4d5+HLXJUhC+ZUrJi/F87MTmtthXVl
+ZQF8eI3PJOF4T7h196cGZ0qsQ/fnL4OL7of9XgKbFki4G+HKg+5nLvEoORRf
+2pkKi3Kr2yfCnw2FtftZfeZbpzQnSswzvibsYs9/G+vpc6SkWzhnXwxsDG2z
+JMPqkZ++PvCIj0RqBTepjKUcmG8/PbppJiUXZus736O/otODd0rhsqnVBU0w
+MXXFFMMBEllkMZwkqDXVw5mahkwlrF3uIf8B8ywhnrHwSGWUTIr1FZr5HRFs
+vcLCOXp4IDA0MIrNI7emKgL9Wjs9VCXC/Pah512wsEdQnAFHVw36bUW+lqVO
+/TVs/+a21PfwDdO87n7Y2Ds+Jwbz6bGOErujf6Uf59ItOPnKVTcVnORV7jsE
+j80aCHzE6oddsmww753FIfYzvLD+m8CSP6iPenE/KWA1v/GcEfa19Cmvw8rk
+V4Zs+MndaSUfWL3mkJAHp8wWPOUJkcc9oaAc/XR+ubdOAkd3iH+w95FH9ZwN
+sOilzQ4l8tSmHX0Xz+6vi4l7gfwTXOcelsFJ4s2rVsOv5Ro5hTnSKaNtmN/Q
+A9ldAazd/D19G/zuREW6GftTcV6sM5xvaBwwwpXhfanfuZRMy7TN1cCiZ4qb
+w7B3W/7PDFi7yUwccL9HQvvlOJi07IyIhBee9SgPYPlk2TnVsJ0kZas3nPS5
+3toF/bgeF79iFh30u3MRlk13sA9mlm3RLEKek3wvz3/zCjuQ2Aj7pHwpPQH3
+KoZTVyK/oyZYr2f1cPnADdhw0Zg3meVf2/HYFvMraGyyk7O8wiPqELghXGu+
+Cuu607kKeLgrvXMUrnywKi+evc9r3lauInxPx4J7FztTteCFzjYM1ln63QZ5
+VC3ds1S1Hdb2f4zKgi34fbNE//9fHv0LInZaNQ==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.630102278562946, 5.135413671377677}, \
+{0, 1}], LineBox[{{6.5, 6.9999999999976925`}, {6.5, 13.99999999999251}}], 
+        PolygonBox[{{6.5, 11.1}, {6.9, 9.9}, {6.1, 9.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.445200000000001, 10.5}, {-1, 0}], 
+        LineBox[{{6.4999999999976925`, 7.}, {13.49999999999251, 7.}}], 
+        PolygonBox[{{9.4, 7.}, {10.6, 6.6}, {10.6, 7.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 6.0548}, {0, 1}], 
+        LineBox[{{6.4999999999976925`, 14.}, {13.49999999999251, 14.}}], 
+        PolygonBox[{{10.6, 14.}, {9.4, 13.6}, {9.4, 14.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 14.9452}, {0, -1}], 
+        LineBox[{{13.5, 14.000000000002307`}, {13.5, 6.999999999998607}}], 
+        PolygonBox[{{13.5, 9.9}, {13.1, 11.1}, {13.9, 11.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.4452, 10.5}, {-1, 0}], 
+        {PointSize[0.04], PointBox[{6.5, 7.}], PointBox[{6.5, 14.}], 
+         PointBox[{13.5, 14.}], PointBox[{16.5, 6.5}], PointBox[{13.5, 7.}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T17", " ", "P2", " ", "N34"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdiei/ijfgfjghhj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdiei/ijfgfjghhj.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {0, 0}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwt1wk41PkfB/Cfo3WVK0k61pUjci1LLWZKGFFLmxwdFEKpptZm2hxDtGNT
+JsLkqFRErWtTOy3l3EyHjHImmiJhi5GzpP7v7z7/eR6P5/V8r8/n8/3+vr8Z
+7T2HtgRLUhT1BX/kP/XuKz6GdOq/zyo6Zed50PAezF9jl/fciE4dT7I4cxQW
+lXzur4ZLM5atMYa5Fobq5XCKgOXba0CnZHdt/lICm7QzzFPhUM7ynjtwpEL7
+FANW1isLboFZSmfvS8M1A09qJ+BmS/f4Rn06Negsna2D9U0T79emwjVNK4x8
+Ycb94JoQmFef4JQBr8l8/qMLHHr8t/gOOL6W1mwBi4zuOGka0yntG2oGBjAn
+y6B/O7x2g8NDfbgw27X6PNxoK1VlBjOPBu9ugXdq12XRYXqqHY8yoVNP1r0v
+8Sbrm3Unr4T/NCyaO0Js8XuHA5xvv2EXFxZ3yKe4wY4pF84Ww0L/yC3E19wS
+/AQwlbRzE+nP0R1P7yX9EwasyXyW/zhuGYFtXbScJODZXLv+SZhRX2nUinhk
+84w+jpP2m82TF2Ffeev8t/+ND5YNgT8nBR8QwvyK+nFjuNKrzb2ErOeQvHsM
+9cj0GKqIg9mBPZN34ObsRI4biV9UbMmBO8x+Vl1A5tPO3rELVvPYNd24kk4F
+xHnscYDr2PP0YmBmSGqjEfxew49vAdMrhOe04bjWCHG/HuKr/OCmD1PRPvOz
+YG5w+2sbOPJJks1PMNPqXr0XPC8z8bAqPBNR9CwGni1WY3Xp0inDBs+Ycvis
+TFhFEaxx163xX9jhldA4AaaLuf4kv2Xj+RFhsG140r0DsMEpcakvzF2TaF8G
+q3lKcbbChYLjVmL4RsQKK9Jeltalboz6vor6wN4Le9zQTdkF+6sV9PwKm2c6
+8TjwmH9L+Dk4wC0y7Rq8N+e2Rjk8ONjk+zd8uvZF0ROYN81n1BA7LH45DFMP
++xl34JCYqUQp5GceYdOcD3+fyktVhwW5PR0n4aAlndY6MPtBTvdOWLR6SKxH
+6nGvt9oElulOyV8Os8Z06iYRf3Ig/bICTF2t8K+EvRvyi0awns+84rVsuDzP
+bvI+zOgOnnOGBSoDlukknk2p9qpw+vfJ0X6wrINNQD/qeWqRoacGzF93M7Ya
+/tnl+q9CHeT7anRrPuzfHiGdCNuW3NTLhGun12jZwvxnL8vTYY1aM6V32tiP
+aFPrPPitbrbcFVhc+MiPnK+Cqkp9f9jw2GunHth4cLmzDsw/MnNeAfGY7nad
+fa+F+qiXJ62HJz4URtXDHhm+w7Fw/+2gjCuw7dlQt1r4p713887A9I4PytKo
+j4mLc1wCLOs4leIED2/Tv0wseOxifAL2rtwiSfqHGv17iOzXyqyYHy7CrIpL
+ZkOwBtM19Tbp35bEW7Aaz7emjNxT2Kekj6EPT/d5/TIKazlJ7rKEm9N4mfMR
+P+vNULQFfMJy23cG8GDJim5duD0u0sAeDpCPs5SHrxVvT3Qn7Sab699gvQGX
+h/k/kXaX7HV8uPqPl2s9YWZHTz2J93Ouxa4NsKy56x8byf3xZ2qWCVkvfuqM
+ErwlTX5MDp5JHF3UhnrY9z3ufIH4hG0b+3PhTS2mawtIvq5px8LhiuKWoBBS
+n31l6o6w54NwCR1YNPxLvi5svjDva+m3yM+t74oSzHB/JLUY1miZWChrTPZP
+Iyl6BeoRc4u5gJynLcWKg8txX2TLFn0LO9S4DvrBogOBWg5k/I7tSs+XYf9M
+D90i95Gkq2g6dBm5z9yeZMFb2sb3ycOhdcNhJP6C9POhNUsRX6TQehHyM2xU
+VE2GOSscrnnD4b3JuQdg/tJ/1LNgqyiJrUHEUwt6umBu9zPeQfjSsQuH1FBv
+j8o9s0kwN3JvlAvMPxzleROmcgclD8OtBeVdA2T+CyNhKfBlF8UgLcSjldnD
+zYMdbGJjt8Oyz0a6C+CtT2aK0uBLOYK1F2FF3ta4BpiVamZ0CmbotX0YIuMl
+HhTth6l9m0Io1IMlafDDenjHyQXD0nDhN+mNynCQ6ShjkszvvpVL4o8/oG8i
+JOMdjRZdhJ/TW/XSSf3a1n8MhCUvVJVvgJVd8gZWwQGr3q0RIf4AgeXhKdRv
+3+eTc2HwzKfeTwJ4MCRorl8T9S0sO3/VmJyr2OdbYda4tcQp+M/QiyV3lyCe
++PnMaPixVPdLXThAtPty1H/jB8SnNHA/cj894MBVqnoenxajngHqyXnwgN05
+g5/hwseMeffhmKYis0/qyLt66bMJch/fHT2ZCjPk1XTJ/XX9vRXXgfhqxP0w
+eMWR4s6vi+hUp/Gw6w343j1tmQ54Zmi58ggsfeNVaz1MKSgfNEO9Tq5uVP4H
+FqTNE4TD90MN/uiEzYOFxVfgc4orW2bJfH85TLaQ/Tp4WMIY63F/T2uZhEd2
+mNrtgQtvyL1dYIr1Fm8zyoUHP5z2XQJblTxldMCspSrti+GgR86685GfaMP8
+DDm4hh35qw3Mn1PZOYr5NLs2RnrBPqYnmQ/hEq2wZ3vgUF57Ug6sM3H38w54
+xuxBfQgs8PexWA/Tn18/YQon1BxPVYGZ7V7+48jX2UvV9BHW7/QzkiDvCyFb
+88shmP+jjkI8XLVBrVcCZnM3f/KAl4lER0+QfH2FCobk/jId0Z5RQ36XM/Tk
+4NfUQEMgrNXcUkXeF+sX7b/2cCHyvS4lHIFL5pVssIBZed5PyX69k3mqmaOK
+erXfviFD3kdLLX5VgsW/NfH1YZ927rYUFdQhd6qFrO836LjsW5ixsc47AW6o
+kjtVq4znti5lQzW8bSWNx4ILFY6v/wq/8Lzi60Tax8sa1iH/nPmZHw2U/ztP
+ugmwtKnXrW9J/2WL/6qHDV9//2YVzLkSODMHy+8vUnSBZcP28syxHz4TKl+Z
+MOu9c7YvzNp/fOQqzDy7/0Ak/Ekjo7AXDlh6doIDH4l2/3sJ4hVV38s+DV8/
+8zXPE55Zle6bCNNb/al4mLKoKGOS8xHxtLEANmy1vO4BZ3wICK2COSeDH+rD
+ig+9p6ph1rpwipwvK86Ya6kKuR/Wnr0Lixf+pZ5EvGTuSzx8KSrzozup1+aB
+9+Q+GpRdET2L+GzrfpdRgrNseQszSD3kJXufk3r9sk+G1EP2h2+ExbDstmMN
+lkq4D5Too0kw+5U6T0UR5+Ry+xATvrR+XuPr+TgHFt/PkPuCFXtBp1QB6+U9
+ayZOHsgqi5XHuLiobNI/IeQ7151yOD+ikx/JfKxOcxsPWcRdNvG1BC4c/Njj
+L4P61Ox07oUrAplhqd+gvjetJheR540rderdPMRrXdv1E9nPlibnw7BP6VR0
+Ohw+3f9UGxYL9Bw74Spp2u9z0ojPMSCGPG8e9vxxCbQLZZjp22Dzd+9erCLj
+W6SXkv3Z4Vv32xHYI15u6G+YK1022AIXfh6x6SWWXzlORzwiyenySfixeZP4
+NsxfUhxHmWHfqqVEqxA/44LY7wva+eKItjSYrm0aMwpLX3+8YwhmqeffaoXd
+2dtbdZG/1p4O91I4p7Sl2g7WSIyVjIMLn6YomsG2sfmTbiT+Y2lbpjHeMODi
+GVW4oe/GGzI/t3YqqAP5iu7vmZWGOZqbdXPhmQdtF9wRHy/76L695P6/npFz
+EPkMLhdXWMPMGLYvE/XxWSdrR75/8BxoPB8prLep6iW5D5lPJc3NJJEPO1D1
+BXk/WrL++kyR99sXQRscWu3047mvNIoab2OSdurowkn6HI2i53QNj8LiQ6Vp
+yrM0iqE4lkzOm1aBbp/qRxrFbDI3Wgt3upX84jVNo0QTVzUPwj47z+r1TdIo
+drW+dxFsLjiYVT9BQ32OJw7BZf+aULPjNIpj+VjdBPkPct42J8HmTYF7DsK8
+smfN4bCt/4m6Ylh4wM06l/QPW1z+ljxvBvEjypjPo1Gtb4kZ+d5Xo1QJa+zw
+2r0eFgbH+ydjfduPA7n+sPLtlNmfp2gUL+NNAhNmBEopByDeQudVnAg41ILL
+c5hBPp4e+fthunyT7hfY0L45eBs5DyMM7hnkq1Vg2GUN11zdW/kKZolDkxTg
+wqgszXewx67IfV2IT/DwtG0+zPcabsiDbfndyrKkv53T8hCYqj3hvBDzi2h/
+aJD8qXO1lg8Qn3jMOmCcfP/oK3hkhviFt1QSqsn3gTO/BXogf43uypeppN5d
+Y442YzQqdCicfQimz456DLynUZdYXYresHBZj73REI3ykba6uxHmhgqu+fXT
+KO7sd2vdyH0yfMfN/iXm7ygp8iHnjX1TwaId8SQvvHKEzBd6zCr/EdZ70GnN
+g9k7+9OO3EH+Q8Xjjav//zuefZeaIb/rV9P/B0WH2cY=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {6.6054786274900135, 15.616941421812587}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwl1Qs0VHkcB/Cb2qXyGI/yjFGKjsd6JckxNxSVZVLLhDLk1WAbNqWNmhAq
+b0VJyCuP1YrIOupMeVVq1+KMsSlTKaOU8Vgisd979p4zZ87n/O/////+fv97
+Z3T9j7kHShEEwcWH+ibES7jWkASNghpJrPd/MHMZJoIEczGqJNFjW3tTkRpf
+ZnddEebvNzE/rUISGWXzj1rXkkTLsPF8vzJJcDn/ZObC2nqtsj/AvH2eRulw
+W5Rtb5ISSZh6WudVwY3a+jdGFUmiNkKzYwR2V3ph5g3zMsfz7bH+xTFlzhsa
+9umP29sAP6gq7o+H6SfjcqyR7+7tcJ49zFNsdmqDHVd01+rAoiidKjd1kvBS
+lBZrwMQhllwPHKDQN2QG02xmnR00SGKP/OBtNjVf5s7WfLh88f7yYmq8xmlD
+Pxyi6B81Ts0f6NKQwLssOt7uoPJdo5u8g8N2Zb/NhEXJdpcaYYGbnokQNjWJ
+PR0E+1cEKsij3qLc1TvmsL+9o1KXMSz58abgONxT4TFlDnM3m18RIb9aVku1
+Btw9MtvmCAcZhfa9xXpFaT70KtSfGG+kmQ6zLTcx1eE0oeWENpyhVh2Sh/49
+2OkYlIu8tQPtxyxh2Zf5gq8K8Mv7k2M4t/x9qUSdPOrzDK7rhBd8BCW+csj7
+/GdOB3XO8015yrKoL37zPTE8rfu37+Aq7Nd+QtMI6/WJf7LoXIl8ew5uSoGZ
+sZ/dh2RQvwetUQp5phvG3Ixh0q75QDJsmytJbZRGfToylSqoJ7o/eyIGJlO8
+pwvgvsJ3rWfgjJTBHG30I6Wf/Yy6n6xuybwEu0x3F2phPW7b7NIrmJtzWqcM
+Jvx+OaOM/ubLy+s6IA85xIrdCD87FbJFDNMqX0VR4z6c9LjzyC96c2AZNZ9s
+GCuRXQ2/Vu9OgvMPV8Rz4dqlRd4a+G79bno5TBbEeacin2X6F/My6n7fBckM
+6skPT/stBKa9cK/yggO2KkuNY31C94vzQ/TDaIu2ow3ME1f5W8DJeQ1LbshT
+dOvJUBP6Oax59oM18vMvv4pnwfwsM18C9dJTIpJUYT3Rqrr672Arg91zeK9o
+rqHBfiuwf+egxhKs5xTDUluOvIY1xga4n5zq73m/DOdgYFoQAVsnRfIHCORR
+VCsSwBmKtCezSwwi49DvHUzkuXp0Q2TVIoNgHhkJFMLivjtjfd8YRLeJ3feB
+1Pt88UzuKZj5rWT4E8xsFFzPhiWS3hMc9KOpud1KFfNpAuZYD8y80cWZhEVy
+nFI69X49fyotTe3/yD3LFU5+Ksy9BZOXAy4chB8n/uXmgry0UflwEg5JpntT
++fkphTtWwIN1hxODpbBu2ohWBda/qla3phXuXlc6awoXJRie/wzTszj+Zcj3
+2L1Q/w1cVJmwXo7KX1Oedw3OiLzSwkV9/LyPMiow78LklBD9cNHssTqA/bhM
+512u1PPNb2axkS/DmhUqRH+510o48VR9fH9RLPylV2Qus4D6h7UTHWCJftVe
+zhyD4HbJeBrBIqUoqc4ZBkFU+9lso+7XGf93+zSDqI28MBMCy8Sf9Hg3wSDY
+xTyHJpgUJUQ3jWO94l8XdLE/eyiHxRnD/O3Z4YUwTzDa9m2UQfAiaX8YID8p
+a/k+Toz5XCvXBri73aP46wj2L6rk2FL1Gi6e9ca4yKulgPp9ZJfaH0nGfH7x
+gIs6+mXasE7N5yPGh5K1/ODaO0HZ5Z9wvob2XsmwpF4/QE3CIOgPw+xSYGH/
+n1O+yMu0Y6mGUeM1vaEpk+iH/739m2Hx68PCc1N4XlwWwzqxn/O5pgR91NvN
+/1C3l8rzNIJ7FKZvcf3agrw81+zYbTCN2WezAeZKz+7MwHzmyAvZJKr+h6aX
+wrE+/2y02QT6E53gZyNEHtLNaSUHpvsGS7cgb5HC8No5/I+IrjqrbkR9kpio
+1FKYbZGdoDWM/swsn+LCfD/O4/qX8LzuIBsm1mlwTXvhxvG245S/sZ7vfoTz
+Me9cWU2Zum7f//9bhfwPJfGW7Q==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.027272429209974, 4.579801639345143}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.00000000000273, 16.999999999996362`}, {
+          5.500000000001819, 12.999999999996362`}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.404292302436444, 15.648390403667896}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwd0ws0VHkcB/Arw45HmTreJkYor1CeZeJKalpOa6VMtWo0U1mPNGvEiqNa
+OkOW8ehk5RRLDtYeWkTrsUJlS0vIVrRUOsnabSqPoanZ73/nnJl7PnPv//97
+/H/X8nBcyJFlFEXF4kuuFIP8bKApW3I1pCnRdE73kgtNlTrxA3+C9bOGUj7B
+dI9mYpgRTWVTvwTr4PmWmkxtJWxMDQ9yYOmdBM08Y5pyy/xa1weWq1aK9Exo
+6ivn8+cjyP4L8RlimGPPS86EJ55a5DbAjury1gayfrjg6hDM4/Ws+AsutZ3S
+HoRnUhXOmhuxXq3W9BpMLd1U2cH1HX7WCfBEplf5Dph3xmCtNez24O+ycDg4
+ejH2FvIp/HfPxyi41/eKdQQsethEx8En9sbfUyH/otFQKbkvU842VsPBtd1p
+ZH2vvirtKDxRbx+2E5ZS2y5z4ZQ1/Hpnsn9b9j8usEvOjfRVcJLcImo7XJ84
+rjGL/AfW2qhSYcGb08kjMM/gQ+IIzJ1xNG2Dk7KiC4KQz0z6zOtK0k9htuco
+XMXXLimCFSH63adQT0WSWkI+fCJNP3GtKfZV2+Z5AWbFnH03CEsi2UZlsCB2
+ojnJjKbaVkY3N5H7wvpGPTbObZfEeRCe6vXpksHSpQiTOfJ8YbvRPLxtRV4V
+G/nLY2WV3qvx//T229tJf3SZBw7BodoMVzHM1/puSwTsxhXU/ACf7noh9oeD
+vd0+64Ajlx8x0IaT3vQfGYMF3XLlr9i/atJs63u46PlKfjise+9WrporTTGv
+B/ssIl/d0fm7mrBMw8LpItz3OpNSh73OHMrwhWMife7Pk/iRig+LqLeINbf7
+BTmP57/Z3odPtOc53IWrnkYZd8BSnfKAn+EWFvNjPxxaIOzPgUtHtD6oY7+e
+1mV6pJ5Oto7RPti47KDvXpjT8U1AH8mnRBxDk3iSj8V85NumrAnZQObrsP2l
+BXjMketvT+ajuvpKGepVJuvrOZJ5ZIeH7DLHfHqOLnqQeO+/3DgHB69rafqc
+7L81yizHAvk3rY88CmcncCaZHMQPbm6WwrXLjay2wIr4kGd1MLfGqCYClouL
+hx+TeDLh7gTYzfJ6KAP9qdoZpJkEd05rsdeTfnJbW6JgdoWECoFFO0YPfQHT
+Wx8aiGFdxeMBW7iCauiTwrz+Y+vmkI9UZKFTRPrd27YnD+6sCfC5DJ9OK690
+Ip7KFV6C+VHPzjxEPbbcAaYMFsRpNH8PC5Kj/VPJ+d18Qh2EJaxVV0Su5P0y
+LQ6E9QNNNXiwy07m9D54soVx2Q5WnFq/Kwv2Osmq04F7j+cwxmCRDeOknPRz
+U6tnEOJz7WI1npDz6lp0GIEF+blW5LzpT+G3NqEe6qShUxfp1/FHwhw4qJHH
+6IbTF/L7JmGpj/liHxzqvrrDyxL9dtD/Y5zMY+pu83Mw32NV8xKZ19IH3r/D
+FWKrY2zkk5IxzlTBVa89bPzhnnz7IJs1eF+HSl7FwPQlv57NMDcsU3KR5F9V
+4u0LT6guZHSSeqm3511hrzCdmZewY1eJzATmj9Q1aLghXp261iz2D9381s8c
+rlBej7lN8itIjHOClXXWjYVwY35WsTvcc9XPRAjbGlpfc4Un73CG3eH6FL2N
+dnBRRM2fLDjyjbqNEey1WJ6/gPr7BJ7aKsRPn3/fMgMrp+K6nsNKpdT4HSzp
+ZYl7yLykFKQwsV52gNpfSeaJMVbqDAsqz7VnwfJvKY+jliQvUWM8LAncM18N
+cy5ErBDC1qXmdxfgAQeh+36yfnZCEYh6h6+NGxIrzjaLfoRrO1gG5Hl+6ad7
+83DbyyEqAW4s3Lw8wArv16Nidi7p70FVZCacbca1rSf5G7a3d8LpWa8kI+T5
+haYbU/D/H9SrS67W9H9qGVzk
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {19.767313162260148, 7.106724558493235}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJwl1A8wm3cYB/D3MoxgUyKzlkp6tOlm/qylqsOLzkYnTTNd0bVllrLrjGPF
++fuytpTNhVbdzEhbNRyb2zCr1uVsKFp/ZkoxM9aiapcVKTq172O5S9773O/N
+7/k+z+9NxB9EyxU8hmEO4k3X/z+cWEafrkKWiXc43GIHc5uHnHVhj7YELghm
+FCGGk+YsYzrT3cLBshPHtxfBZzQrjlfhoErd5R3wyQCDJzdhV+kvacUCljE6
+ZtPcC9flRo1ozVgm7/PyziHYRHP/J1843r3B6i6sGW6vuWjKMmkdVWHdcGKX
+q2JuE8uE9jJTTWQ3xZNAWBs+n6SivE58mxET7G9rHHVmY11zPQMuz7nqEQEr
+rQNFMni10/X8ATjy3Yk1X3gy+k73LurnUKuNAm6afOS+jfr1WrpSQV5s/8aC
+8sx683VRL4nZ6k12DX82lQD/LfZXiWH2wRG/JbhkYuzabvjtgEuFscgvbC7L
+ltG6sM72PnxDr2s8jvqt7X7JB/3m8KKbSqj+gv3aZ/C27Udbb1H9FovYy3BX
+x3z0Es331oCyiOZj+0wieh3z+2hmj4K+X5af6AsPOydvNYJTel7eexJ2bI9s
+UKJe9T6r5lR4IunA0Ary+c/mT+XCjJFxgAz+9nS7p5L8sN6hFP2KtLHGG+tf
+2inGXmSZRnmoC33fpEfeVvgC5tqz6BkJq37c259szDLS8h4HKaxeX2goNUKu
+jpAIJ1jD7Qjmw0Y6y4kCcsdCZpsh8mZXr6xQf49mw/vh7ODL8r/oecirSN+J
++y/+0184SPMe+WLtZ9ovrTGInhf13FpwAeq5lN4u+hXue3j2VCbycCaD5X/A
+ofadVenIK//KTKyleZ3LPeiGflIatc+Zo75F23FnOk9B/Xe1bvByarzlKlx9
+KkpHQf02/u5vj3l4GNoV58MSTYOXO1zDix2+CWdPOYps4MDHD+ynaR7lEUOT
+NK+WVC/DXThf28hXU2A9m8emEliV1c2bQx6VeYnkDbjuvNVaDfJG6pld86X7
+n974V4Z+JMvqI2/BHLfvtznMo7L4HbUHzHCjqwV8PEcOX+vaw8q+LfyjBixz
+KWPzn0LYRDDt/54++gksS3+KPNxAwscXnsfzKpKGjNN579+UYgm7LhrwW8kZ
+lo5aPfzefBosquA++bEL1liv9+AGCul8Zp2EBXBLZYo4h873XoWON/bXWIaG
+ZdF6tCDYGvXvnhiT5VH/80ljQuSL4fmtl9L9Xu9zZshv6ZV3uwkO3dl+bx2O
+H/3w0xE45vr0lQ6cp5QR2/KQX1MqkASj/9Y7n6heg9WZWecqYJ3RH8JDqN/e
+uAqyKsxz8CwsU3eNH4YtqrfE1dK8kl/Z04j9EgudmV6al/KQTy/qib6vqZmB
+Y/yqimuRT/rmaZcVmv9y5lIY8m/8v+1mmY2XPvsfs/y8/w==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.664385100754924, 3.1263021209059043}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwl1As0VHkcB/BLXmuJNAZppd3EhEy7ydpOuRik2l2PlMfxWHucaBmzqJQw
+S14tpVPsei3Sht1i5LGEOaxXHLNGsloaTbGRpTWb9Qz7/dt7zsycz/n/7+/+
+ft977+wMDHcLkqcoygcf8vv/F4umNg5dmqJ96jzs4Nm/oiK9YXGTiVU68aB7
+di7MH50fGoZ5/a/bm+B3j4abmu6hqRaOrUwIn4kdVb8I013twiL4+2BmeDss
+NjuZ8iXcf30mRtmUpjTDJ4+owq6sxHYans1avZSjQ1Oeh2x9ubDLsupTJvED
+yeJVuMVlTSONSVPPdJaXimF24KrXgjZNrQZHxpTC1G5jdgicJv3nsyKYnkt9
+8ieDpi6tP5JlwFKdIqUoeP/V2egIUt+6gK8H3+FciHKBeY8t+4e30tRB8wOi
+PbChyEi1ERbWGhcokP2Hi3OJGWGpis8xj7Rn8uBTeDGAq9AGCz5W/ncb6oXp
+Hzl+j8zblWRJrvdql9eOWzBbqUJxDPaW27WvhOw/0Ov8BfotKfe/VgXzd40z
+JmHvKsENEUy9jVbiYd6b0xOj88R5ERUy2L5S2c8M/WTWDMmCkI9ZRK9nKPF1
+la86SV7Nc6k1JN/hwBZ15NubrG4tb4b6/PppK7iW8X6IGyztaztrBzd4+C0U
+w4L8ugwzuFt6qWcGpoXvGSygnpNz68qH5ujfManxNpyV6rDGhWeVkhKs4bHs
+pNZCWPCRhvQB+uMtnRC1wZl/v3GygCOy2zyGyXpRrKQA8+kLxh3GYLFCp9Zm
+OLHsJf2MrEc8t09BPp2JYTl9cEuXpbsmnLjpjk0dTHvbHa9E3iMNCqVZML+3
+c0sIXDPH+JFHHJevb0vu11vdY0fhgI5WJ2u4fimhyYisc7RaXeH7B6MVlEj9
+c/KrqbBPYsE0mZe3M1Y8AifEew09gwMiH+Y6kOdFLr1QQvKL2Xu5Bc7p58ZP
+wmI9PZED+rcJn1unUE/aEcH6Db72ebJsN6m/7/wHbphfdDOJ60XmHW3g98CN
+28Imssm8Uaq32cgv1lFmJYGpQZWJOFh5C9XO2ovzbX9+KYDVenTzLsB0Ybmw
+DR4Y2F7UDVNpZew6mCmIrWZa4PreW2pTYYvodIkvzHt1P+oQbLN291w+TJ38
+xvQJrl8fd+yYGOYny837wi+49xoW4IABdbVB0n+zwrgKmzyPP4Ry4OVhia4G
+nHlDJb6aQfOLf/+6djPM0xRWsOC7mgafbuyfEitVIL/qFH7aEuq1VGY9ciT5
+uu/PGIYzo0KOLGnRVGkkI6gOdpHfYd8NS86PMjNhwbxIvQEWGgV1nCFW7uSQ
+9Qnt7cnOpN+0o6JFeOqyp5UFPGuQPM5BffZUjJcBWfeY5pTDrO+0Z3RJ/XMa
+AYa4X/qlHacMST8rI+Ul8DunXVwtN+rZyEzJfH0v/jhF5g/+trUK/iVG7ZMU
+kqdKaJc58hGyeGq/kv20wf4c2N/ihMkmzBtw8Zbea7iMy24zIfM3qzUak/fR
+KO+0C8mHU9VrB2fkP7wSDbPfdBXhfvBXFK3yCuHZn1iHdcn7mjej3Q5rOr/x
+f4x6CwPzueOw4PhWv7PwOjnIOvl/ZtL/AbFTDo0=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.501529066331596, 4.118561596984358}, \
+{0, 1}], LineBox[{{12.500000000001851`, 13.}, {5.500000000002592, 13.}}], 
+        PolygonBox[{{9.6, 13.}, {8.4, 13.4}, {8.4, 12.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {9., 12.0548}, {0, 1}], 
+        LineBox[{{12.5, 13.000000000002307`}, {12.5, 5.999999999998607}}], 
+        PolygonBox[{{12.5, 8.9}, {12.1, 10.1}, {12.9, 10.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.4452, 9.5}, {-1, 0}], 
+        LineBox[{{5.5, 5.9999999999976925`}, {5.5, 12.99999999999251}}], 
+        PolygonBox[{{5.5, 10.1}, {5.9, 8.9}, {5.1, 8.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.5548, 9.5}, {1, 0}], 
+        LineBox[{{5.4999999999976925`, 6.}, {12.49999999999251, 6.}}], 
+        PolygonBox[{{8.4, 6.}, {9.6, 5.6}, {9.6, 6.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {9., 5.0548}, {0, 1}], 
+        {PointSize[0.04], PointBox[{12.5, 13.}], PointBox[{5.5, 6.}], 
+         PointBox[{5.5, 13.}], PointBox[{17., 5.5}], PointBox[{12.5, 6.}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T18", " ", "P1", " ", "N35"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdiei/ijfhfjghgj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdiei/ijfhfjghgj.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {22, 0}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwt1wk41PkfB/Cfo3WVK0k61pUjci1LLWZKGFFLmxwdFEKpptZm2hxDtGNT
+JsLkqFRErWtTOy3l3EyHjHImmiJhi5GzpP7v7z7/eR6P5/V8r8/n8/3+vr8Z
+7T2HtgRLUhT1BX/kP/XuKz6GdOq/zyo6Zed50PAezF9jl/fciE4dT7I4cxQW
+lXzur4ZLM5atMYa5Fobq5XCKgOXba0CnZHdt/lICm7QzzFPhUM7ynjtwpEL7
+FANW1isLboFZSmfvS8M1A09qJ+BmS/f4Rn06Negsna2D9U0T79emwjVNK4x8
+Ycb94JoQmFef4JQBr8l8/qMLHHr8t/gOOL6W1mwBi4zuOGka0yntG2oGBjAn
+y6B/O7x2g8NDfbgw27X6PNxoK1VlBjOPBu9ugXdq12XRYXqqHY8yoVNP1r0v
+8Sbrm3Unr4T/NCyaO0Js8XuHA5xvv2EXFxZ3yKe4wY4pF84Ww0L/yC3E19wS
+/AQwlbRzE+nP0R1P7yX9EwasyXyW/zhuGYFtXbScJODZXLv+SZhRX2nUinhk
+84w+jpP2m82TF2Ffeev8t/+ND5YNgT8nBR8QwvyK+nFjuNKrzb2ErOeQvHsM
+9cj0GKqIg9mBPZN34ObsRI4biV9UbMmBO8x+Vl1A5tPO3rELVvPYNd24kk4F
+xHnscYDr2PP0YmBmSGqjEfxew49vAdMrhOe04bjWCHG/HuKr/OCmD1PRPvOz
+YG5w+2sbOPJJks1PMNPqXr0XPC8z8bAqPBNR9CwGni1WY3Xp0inDBs+Ycvis
+TFhFEaxx163xX9jhldA4AaaLuf4kv2Xj+RFhsG140r0DsMEpcakvzF2TaF8G
+q3lKcbbChYLjVmL4RsQKK9Jeltalboz6vor6wN4Le9zQTdkF+6sV9PwKm2c6
+8TjwmH9L+Dk4wC0y7Rq8N+e2Rjk8ONjk+zd8uvZF0ROYN81n1BA7LH45DFMP
++xl34JCYqUQp5GceYdOcD3+fyktVhwW5PR0n4aAlndY6MPtBTvdOWLR6SKxH
+6nGvt9oElulOyV8Os8Z06iYRf3Ig/bICTF2t8K+EvRvyi0awns+84rVsuDzP
+bvI+zOgOnnOGBSoDlukknk2p9qpw+vfJ0X6wrINNQD/qeWqRoacGzF93M7Ya
+/tnl+q9CHeT7anRrPuzfHiGdCNuW3NTLhGun12jZwvxnL8vTYY1aM6V32tiP
+aFPrPPitbrbcFVhc+MiPnK+Cqkp9f9jw2GunHth4cLmzDsw/MnNeAfGY7nad
+fa+F+qiXJ62HJz4URtXDHhm+w7Fw/+2gjCuw7dlQt1r4p713887A9I4PytKo
+j4mLc1wCLOs4leIED2/Tv0wseOxifAL2rtwiSfqHGv17iOzXyqyYHy7CrIpL
+ZkOwBtM19Tbp35bEW7Aaz7emjNxT2Kekj6EPT/d5/TIKazlJ7rKEm9N4mfMR
+P+vNULQFfMJy23cG8GDJim5duD0u0sAeDpCPs5SHrxVvT3Qn7Sab699gvQGX
+h/k/kXaX7HV8uPqPl2s9YWZHTz2J93Ouxa4NsKy56x8byf3xZ2qWCVkvfuqM
+ErwlTX5MDp5JHF3UhnrY9z3ufIH4hG0b+3PhTS2mawtIvq5px8LhiuKWoBBS
+n31l6o6w54NwCR1YNPxLvi5svjDva+m3yM+t74oSzHB/JLUY1miZWChrTPZP
+Iyl6BeoRc4u5gJynLcWKg8txX2TLFn0LO9S4DvrBogOBWg5k/I7tSs+XYf9M
+D90i95Gkq2g6dBm5z9yeZMFb2sb3ycOhdcNhJP6C9POhNUsRX6TQehHyM2xU
+VE2GOSscrnnD4b3JuQdg/tJ/1LNgqyiJrUHEUwt6umBu9zPeQfjSsQuH1FBv
+j8o9s0kwN3JvlAvMPxzleROmcgclD8OtBeVdA2T+CyNhKfBlF8UgLcSjldnD
+zYMdbGJjt8Oyz0a6C+CtT2aK0uBLOYK1F2FF3ta4BpiVamZ0CmbotX0YIuMl
+HhTth6l9m0Io1IMlafDDenjHyQXD0nDhN+mNynCQ6ShjkszvvpVL4o8/oG8i
+JOMdjRZdhJ/TW/XSSf3a1n8MhCUvVJVvgJVd8gZWwQGr3q0RIf4AgeXhKdRv
+3+eTc2HwzKfeTwJ4MCRorl8T9S0sO3/VmJyr2OdbYda4tcQp+M/QiyV3lyCe
++PnMaPixVPdLXThAtPty1H/jB8SnNHA/cj894MBVqnoenxajngHqyXnwgN05
+g5/hwseMeffhmKYis0/qyLt66bMJch/fHT2ZCjPk1XTJ/XX9vRXXgfhqxP0w
+eMWR4s6vi+hUp/Gw6w343j1tmQ54Zmi58ggsfeNVaz1MKSgfNEO9Tq5uVP4H
+FqTNE4TD90MN/uiEzYOFxVfgc4orW2bJfH85TLaQ/Tp4WMIY63F/T2uZhEd2
+mNrtgQtvyL1dYIr1Fm8zyoUHP5z2XQJblTxldMCspSrti+GgR86685GfaMP8
+DDm4hh35qw3Mn1PZOYr5NLs2RnrBPqYnmQ/hEq2wZ3vgUF57Ug6sM3H38w54
+xuxBfQgs8PexWA/Tn18/YQon1BxPVYGZ7V7+48jX2UvV9BHW7/QzkiDvCyFb
+88shmP+jjkI8XLVBrVcCZnM3f/KAl4lER0+QfH2FCobk/jId0Z5RQ36XM/Tk
+4NfUQEMgrNXcUkXeF+sX7b/2cCHyvS4lHIFL5pVssIBZed5PyX69k3mqmaOK
+erXfviFD3kdLLX5VgsW/NfH1YZ927rYUFdQhd6qFrO836LjsW5ixsc47AW6o
+kjtVq4znti5lQzW8bSWNx4ILFY6v/wq/8Lzi60Tax8sa1iH/nPmZHw2U/ztP
+ugmwtKnXrW9J/2WL/6qHDV9//2YVzLkSODMHy+8vUnSBZcP28syxHz4TKl+Z
+MOu9c7YvzNp/fOQqzDy7/0Ak/Ekjo7AXDlh6doIDH4l2/3sJ4hVV38s+DV8/
+8zXPE55Zle6bCNNb/al4mLKoKGOS8xHxtLEANmy1vO4BZ3wICK2COSeDH+rD
+ig+9p6ph1rpwipwvK86Ya6kKuR/Wnr0Lixf+pZ5EvGTuSzx8KSrzozup1+aB
+9+Q+GpRdET2L+GzrfpdRgrNseQszSD3kJXufk3r9sk+G1EP2h2+ExbDstmMN
+lkq4D5Too0kw+5U6T0UR5+Ry+xATvrR+XuPr+TgHFt/PkPuCFXtBp1QB6+U9
+ayZOHsgqi5XHuLiobNI/IeQ7151yOD+ikx/JfKxOcxsPWcRdNvG1BC4c/Njj
+L4P61Ox07oUrAplhqd+gvjetJheR540rderdPMRrXdv1E9nPlibnw7BP6VR0
+Ohw+3f9UGxYL9Bw74Spp2u9z0ojPMSCGPG8e9vxxCbQLZZjp22Dzd+9erCLj
+W6SXkv3Z4Vv32xHYI15u6G+YK1022AIXfh6x6SWWXzlORzwiyenySfixeZP4
+NsxfUhxHmWHfqqVEqxA/44LY7wva+eKItjSYrm0aMwpLX3+8YwhmqeffaoXd
+2dtbdZG/1p4O91I4p7Sl2g7WSIyVjIMLn6YomsG2sfmTbiT+Y2lbpjHeMODi
+GVW4oe/GGzI/t3YqqAP5iu7vmZWGOZqbdXPhmQdtF9wRHy/76L695P6/npFz
+EPkMLhdXWMPMGLYvE/XxWSdrR75/8BxoPB8prLep6iW5D5lPJc3NJJEPO1D1
+BXk/WrL++kyR99sXQRscWu3047mvNIoab2OSdurowkn6HI2i53QNj8LiQ6Vp
+yrM0iqE4lkzOm1aBbp/qRxrFbDI3Wgt3upX84jVNo0QTVzUPwj47z+r1TdIo
+drW+dxFsLjiYVT9BQ32OJw7BZf+aULPjNIpj+VjdBPkPct42J8HmTYF7DsK8
+smfN4bCt/4m6Ylh4wM06l/QPW1z+ljxvBvEjypjPo1Gtb4kZ+d5Xo1QJa+zw
+2r0eFgbH+ydjfduPA7n+sPLtlNmfp2gUL+NNAhNmBEopByDeQudVnAg41ILL
+c5hBPp4e+fthunyT7hfY0L45eBs5DyMM7hnkq1Vg2GUN11zdW/kKZolDkxTg
+wqgszXewx67IfV2IT/DwtG0+zPcabsiDbfndyrKkv53T8hCYqj3hvBDzi2h/
+aJD8qXO1lg8Qn3jMOmCcfP/oK3hkhviFt1QSqsn3gTO/BXogf43uypeppN5d
+Y442YzQqdCicfQimz456DLynUZdYXYresHBZj73REI3ykba6uxHmhgqu+fXT
+KO7sd2vdyH0yfMfN/iXm7ygp8iHnjX1TwaId8SQvvHKEzBd6zCr/EdZ70GnN
+g9k7+9OO3EH+Q8Xjjav//zuefZeaIb/rV9P/B0WH2cY=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {6.6054786274900135, 15.616941421812587}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwl1Qs0VHkcB/Cb2qXyGI/yjFGKjsd6JckxNxSVZVLLhDLk1WAbNqWNmhAq
+b0VJyCuP1YrIOupMeVVq1+KMsSlTKaOU8Vgisd979p4zZ87n/O/////+fv97
+Z3T9j7kHShEEwcWH+ibES7jWkASNghpJrPd/MHMZJoIEczGqJNFjW3tTkRpf
+ZnddEebvNzE/rUISGWXzj1rXkkTLsPF8vzJJcDn/ZObC2nqtsj/AvH2eRulw
+W5Rtb5ISSZh6WudVwY3a+jdGFUmiNkKzYwR2V3ph5g3zMsfz7bH+xTFlzhsa
+9umP29sAP6gq7o+H6SfjcqyR7+7tcJ49zFNsdmqDHVd01+rAoiidKjd1kvBS
+lBZrwMQhllwPHKDQN2QG02xmnR00SGKP/OBtNjVf5s7WfLh88f7yYmq8xmlD
+Pxyi6B81Ts0f6NKQwLssOt7uoPJdo5u8g8N2Zb/NhEXJdpcaYYGbnokQNjWJ
+PR0E+1cEKsij3qLc1TvmsL+9o1KXMSz58abgONxT4TFlDnM3m18RIb9aVku1
+Btw9MtvmCAcZhfa9xXpFaT70KtSfGG+kmQ6zLTcx1eE0oeWENpyhVh2Sh/49
+2OkYlIu8tQPtxyxh2Zf5gq8K8Mv7k2M4t/x9qUSdPOrzDK7rhBd8BCW+csj7
+/GdOB3XO8015yrKoL37zPTE8rfu37+Aq7Nd+QtMI6/WJf7LoXIl8ew5uSoGZ
+sZ/dh2RQvwetUQp5phvG3Ixh0q75QDJsmytJbZRGfToylSqoJ7o/eyIGJlO8
+pwvgvsJ3rWfgjJTBHG30I6Wf/Yy6n6xuybwEu0x3F2phPW7b7NIrmJtzWqcM
+Jvx+OaOM/ubLy+s6IA85xIrdCD87FbJFDNMqX0VR4z6c9LjzyC96c2AZNZ9s
+GCuRXQ2/Vu9OgvMPV8Rz4dqlRd4a+G79bno5TBbEeacin2X6F/My6n7fBckM
+6skPT/stBKa9cK/yggO2KkuNY31C94vzQ/TDaIu2ow3ME1f5W8DJeQ1LbshT
+dOvJUBP6Oax59oM18vMvv4pnwfwsM18C9dJTIpJUYT3Rqrr672Arg91zeK9o
+rqHBfiuwf+egxhKs5xTDUluOvIY1xga4n5zq73m/DOdgYFoQAVsnRfIHCORR
+VCsSwBmKtCezSwwi49DvHUzkuXp0Q2TVIoNgHhkJFMLivjtjfd8YRLeJ3feB
+1Pt88UzuKZj5rWT4E8xsFFzPhiWS3hMc9KOpud1KFfNpAuZYD8y80cWZhEVy
+nFI69X49fyotTe3/yD3LFU5+Ksy9BZOXAy4chB8n/uXmgry0UflwEg5JpntT
++fkphTtWwIN1hxODpbBu2ohWBda/qla3phXuXlc6awoXJRie/wzTszj+Zcj3
+2L1Q/w1cVJmwXo7KX1Oedw3OiLzSwkV9/LyPMiow78LklBD9cNHssTqA/bhM
+512u1PPNb2axkS/DmhUqRH+510o48VR9fH9RLPylV2Qus4D6h7UTHWCJftVe
+zhyD4HbJeBrBIqUoqc4ZBkFU+9lso+7XGf93+zSDqI28MBMCy8Sf9Hg3wSDY
+xTyHJpgUJUQ3jWO94l8XdLE/eyiHxRnD/O3Z4YUwTzDa9m2UQfAiaX8YID8p
+a/k+Toz5XCvXBri73aP46wj2L6rk2FL1Gi6e9ca4yKulgPp9ZJfaH0nGfH7x
+gIs6+mXasE7N5yPGh5K1/ODaO0HZ5Z9wvob2XsmwpF4/QE3CIOgPw+xSYGH/
+n1O+yMu0Y6mGUeM1vaEpk+iH/739m2Hx68PCc1N4XlwWwzqxn/O5pgR91NvN
+/1C3l8rzNIJ7FKZvcf3agrw81+zYbTCN2WezAeZKz+7MwHzmyAvZJKr+h6aX
+wrE+/2y02QT6E53gZyNEHtLNaSUHpvsGS7cgb5HC8No5/I+IrjqrbkR9kpio
+1FKYbZGdoDWM/swsn+LCfD/O4/qX8LzuIBsm1mlwTXvhxvG245S/sZ7vfoTz
+Me9cWU2Zum7f//9bhfwPJfGW7Q==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.027272429209974, 4.579801639345143}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.00000000000273, 16.999999999996362`}, {
+          5.500000000001819, 12.999999999996362`}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.404292302436444, 15.648390403667896}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwd0ws0VHkcB/Arw45HmTreJkYor1CeZeJKalpOa6VMtWo0U1mPNGvEiqNa
+OkOW8ehk5RRLDtYeWkTrsUJlS0vIVrRUOsnabSqPoanZ73/nnJl7PnPv//97
+/H/X8nBcyJFlFEXF4kuuFIP8bKApW3I1pCnRdE73kgtNlTrxA3+C9bOGUj7B
+dI9mYpgRTWVTvwTr4PmWmkxtJWxMDQ9yYOmdBM08Y5pyy/xa1weWq1aK9Exo
+6ivn8+cjyP4L8RlimGPPS86EJ55a5DbAjury1gayfrjg6hDM4/Ws+AsutZ3S
+HoRnUhXOmhuxXq3W9BpMLd1U2cH1HX7WCfBEplf5Dph3xmCtNez24O+ycDg4
+ejH2FvIp/HfPxyi41/eKdQQsethEx8En9sbfUyH/otFQKbkvU842VsPBtd1p
+ZH2vvirtKDxRbx+2E5ZS2y5z4ZQ1/Hpnsn9b9j8usEvOjfRVcJLcImo7XJ84
+rjGL/AfW2qhSYcGb08kjMM/gQ+IIzJ1xNG2Dk7KiC4KQz0z6zOtK0k9htuco
+XMXXLimCFSH63adQT0WSWkI+fCJNP3GtKfZV2+Z5AWbFnH03CEsi2UZlsCB2
+ojnJjKbaVkY3N5H7wvpGPTbObZfEeRCe6vXpksHSpQiTOfJ8YbvRPLxtRV4V
+G/nLY2WV3qvx//T229tJf3SZBw7BodoMVzHM1/puSwTsxhXU/ACf7noh9oeD
+vd0+64Ajlx8x0IaT3vQfGYMF3XLlr9i/atJs63u46PlKfjise+9WrporTTGv
+B/ssIl/d0fm7mrBMw8LpItz3OpNSh73OHMrwhWMife7Pk/iRig+LqLeINbf7
+BTmP57/Z3odPtOc53IWrnkYZd8BSnfKAn+EWFvNjPxxaIOzPgUtHtD6oY7+e
+1mV6pJ5Oto7RPti47KDvXpjT8U1AH8mnRBxDk3iSj8V85NumrAnZQObrsP2l
+BXjMketvT+ajuvpKGepVJuvrOZJ5ZIeH7DLHfHqOLnqQeO+/3DgHB69rafqc
+7L81yizHAvk3rY88CmcncCaZHMQPbm6WwrXLjay2wIr4kGd1MLfGqCYClouL
+hx+TeDLh7gTYzfJ6KAP9qdoZpJkEd05rsdeTfnJbW6JgdoWECoFFO0YPfQHT
+Wx8aiGFdxeMBW7iCauiTwrz+Y+vmkI9UZKFTRPrd27YnD+6sCfC5DJ9OK690
+Ip7KFV6C+VHPzjxEPbbcAaYMFsRpNH8PC5Kj/VPJ+d18Qh2EJaxVV0Su5P0y
+LQ6E9QNNNXiwy07m9D54soVx2Q5WnFq/Kwv2Osmq04F7j+cwxmCRDeOknPRz
+U6tnEOJz7WI1npDz6lp0GIEF+blW5LzpT+G3NqEe6qShUxfp1/FHwhw4qJHH
+6IbTF/L7JmGpj/liHxzqvrrDyxL9dtD/Y5zMY+pu83Mw32NV8xKZ19IH3r/D
+FWKrY2zkk5IxzlTBVa89bPzhnnz7IJs1eF+HSl7FwPQlv57NMDcsU3KR5F9V
+4u0LT6guZHSSeqm3511hrzCdmZewY1eJzATmj9Q1aLghXp261iz2D9381s8c
+rlBej7lN8itIjHOClXXWjYVwY35WsTvcc9XPRAjbGlpfc4Un73CG3eH6FL2N
+dnBRRM2fLDjyjbqNEey1WJ6/gPr7BJ7aKsRPn3/fMgMrp+K6nsNKpdT4HSzp
+ZYl7yLykFKQwsV52gNpfSeaJMVbqDAsqz7VnwfJvKY+jliQvUWM8LAncM18N
+cy5ErBDC1qXmdxfgAQeh+36yfnZCEYh6h6+NGxIrzjaLfoRrO1gG5Hl+6ad7
+83DbyyEqAW4s3Lw8wArv16Nidi7p70FVZCacbca1rSf5G7a3d8LpWa8kI+T5
+haYbU/D/H9SrS67W9H9qGVzk
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {19.767313162260148, 7.106724558493235}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJwl1A8wm3cYB/D3MoxgUyKzlkp6tOlm/qylqsOLzkYnTTNd0bVllrLrjGPF
++fuytpTNhVbdzEhbNRyb2zCr1uVsKFp/ZkoxM9aiapcVKTq172O5S9773O/N
+7/k+z+9NxB9EyxU8hmEO4k3X/z+cWEafrkKWiXc43GIHc5uHnHVhj7YELghm
+FCGGk+YsYzrT3cLBshPHtxfBZzQrjlfhoErd5R3wyQCDJzdhV+kvacUCljE6
+ZtPcC9flRo1ozVgm7/PyziHYRHP/J1843r3B6i6sGW6vuWjKMmkdVWHdcGKX
+q2JuE8uE9jJTTWQ3xZNAWBs+n6SivE58mxET7G9rHHVmY11zPQMuz7nqEQEr
+rQNFMni10/X8ATjy3Yk1X3gy+k73LurnUKuNAm6afOS+jfr1WrpSQV5s/8aC
+8sx683VRL4nZ6k12DX82lQD/LfZXiWH2wRG/JbhkYuzabvjtgEuFscgvbC7L
+ltG6sM72PnxDr2s8jvqt7X7JB/3m8KKbSqj+gv3aZ/C27Udbb1H9FovYy3BX
+x3z0Es331oCyiOZj+0wieh3z+2hmj4K+X5af6AsPOydvNYJTel7eexJ2bI9s
+UKJe9T6r5lR4IunA0Ary+c/mT+XCjJFxgAz+9nS7p5L8sN6hFP2KtLHGG+tf
+2inGXmSZRnmoC33fpEfeVvgC5tqz6BkJq37c259szDLS8h4HKaxeX2goNUKu
+jpAIJ1jD7Qjmw0Y6y4kCcsdCZpsh8mZXr6xQf49mw/vh7ODL8r/oecirSN+J
++y/+0184SPMe+WLtZ9ovrTGInhf13FpwAeq5lN4u+hXue3j2VCbycCaD5X/A
+ofadVenIK//KTKyleZ3LPeiGflIatc+Zo75F23FnOk9B/Xe1bvByarzlKlx9
+KkpHQf02/u5vj3l4GNoV58MSTYOXO1zDix2+CWdPOYps4MDHD+ynaR7lEUOT
+NK+WVC/DXThf28hXU2A9m8emEliV1c2bQx6VeYnkDbjuvNVaDfJG6pld86X7
+n974V4Z+JMvqI2/BHLfvtznMo7L4HbUHzHCjqwV8PEcOX+vaw8q+LfyjBixz
+KWPzn0LYRDDt/54++gksS3+KPNxAwscXnsfzKpKGjNN579+UYgm7LhrwW8kZ
+lo5aPfzefBosquA++bEL1liv9+AGCul8Zp2EBXBLZYo4h873XoWON/bXWIaG
+ZdF6tCDYGvXvnhiT5VH/80ljQuSL4fmtl9L9Xu9zZshv6ZV3uwkO3dl+bx2O
+H/3w0xE45vr0lQ6cp5QR2/KQX1MqkASj/9Y7n6heg9WZWecqYJ3RH8JDqN/e
+uAqyKsxz8CwsU3eNH4YtqrfE1dK8kl/Z04j9EgudmV6al/KQTy/qib6vqZmB
+Y/yqimuRT/rmaZcVmv9y5lIY8m/8v+1mmY2XPvsfs/y8/w==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.664385100754924, 3.1263021209059043}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwl1As0VHkcB/BLXmuJNAZppd3EhEy7ydpOuRik2l2PlMfxWHucaBmzqJQw
+S14tpVPsei3Sht1i5LGEOaxXHLNGsloaTbGRpTWb9Qz7/dt7zsycz/n/7+/+
+ft977+wMDHcLkqcoygcf8vv/F4umNg5dmqJ96jzs4Nm/oiK9YXGTiVU68aB7
+di7MH50fGoZ5/a/bm+B3j4abmu6hqRaOrUwIn4kdVb8I013twiL4+2BmeDss
+NjuZ8iXcf30mRtmUpjTDJ4+owq6sxHYans1avZSjQ1Oeh2x9ubDLsupTJvED
+yeJVuMVlTSONSVPPdJaXimF24KrXgjZNrQZHxpTC1G5jdgicJv3nsyKYnkt9
+8ieDpi6tP5JlwFKdIqUoeP/V2egIUt+6gK8H3+FciHKBeY8t+4e30tRB8wOi
+PbChyEi1ERbWGhcokP2Hi3OJGWGpis8xj7Rn8uBTeDGAq9AGCz5W/ncb6oXp
+Hzl+j8zblWRJrvdql9eOWzBbqUJxDPaW27WvhOw/0Ov8BfotKfe/VgXzd40z
+JmHvKsENEUy9jVbiYd6b0xOj88R5ERUy2L5S2c8M/WTWDMmCkI9ZRK9nKPF1
+la86SV7Nc6k1JN/hwBZ15NubrG4tb4b6/PppK7iW8X6IGyztaztrBzd4+C0U
+w4L8ugwzuFt6qWcGpoXvGSygnpNz68qH5ujfManxNpyV6rDGhWeVkhKs4bHs
+pNZCWPCRhvQB+uMtnRC1wZl/v3GygCOy2zyGyXpRrKQA8+kLxh3GYLFCp9Zm
+OLHsJf2MrEc8t09BPp2JYTl9cEuXpbsmnLjpjk0dTHvbHa9E3iMNCqVZML+3
+c0sIXDPH+JFHHJevb0vu11vdY0fhgI5WJ2u4fimhyYisc7RaXeH7B6MVlEj9
+c/KrqbBPYsE0mZe3M1Y8AifEew09gwMiH+Y6kOdFLr1QQvKL2Xu5Bc7p58ZP
+wmI9PZED+rcJn1unUE/aEcH6Db72ebJsN6m/7/wHbphfdDOJ60XmHW3g98CN
+28Imssm8Uaq32cgv1lFmJYGpQZWJOFh5C9XO2ovzbX9+KYDVenTzLsB0Ybmw
+DR4Y2F7UDVNpZew6mCmIrWZa4PreW2pTYYvodIkvzHt1P+oQbLN291w+TJ38
+xvQJrl8fd+yYGOYny837wi+49xoW4IABdbVB0n+zwrgKmzyPP4Ry4OVhia4G
+nHlDJb6aQfOLf/+6djPM0xRWsOC7mgafbuyfEitVIL/qFH7aEuq1VGY9ciT5
+uu/PGIYzo0KOLGnRVGkkI6gOdpHfYd8NS86PMjNhwbxIvQEWGgV1nCFW7uSQ
+9Qnt7cnOpN+0o6JFeOqyp5UFPGuQPM5BffZUjJcBWfeY5pTDrO+0Z3RJ/XMa
+AYa4X/qlHacMST8rI+Ul8DunXVwtN+rZyEzJfH0v/jhF5g/+trUK/iVG7ZMU
+kqdKaJc58hGyeGq/kv20wf4c2N/ihMkmzBtw8Zbea7iMy24zIfM3qzUak/fR
+KO+0C8mHU9VrB2fkP7wSDbPfdBXhfvBXFK3yCuHZn1iHdcn7mjej3Q5rOr/x
+f4x6CwPzueOw4PhWv7PwOjnIOvl/ZtL/AbFTDo0=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.501529066331596, 4.118561596984358}, \
+{0, 1}], LineBox[{{12.500000000001851`, 13.}, {5.500000000002592, 13.}}], 
+        PolygonBox[{{8.4, 13.}, {9.6, 13.4}, {9.6, 12.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {9., 12.0548}, {0, 1}], 
+        LineBox[{{12.5, 13.000000000002307`}, {12.5, 5.999999999998607}}], 
+        PolygonBox[{{12.5, 10.1}, {12.1, 8.9}, {12.9, 8.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.4452, 9.5}, {-1, 0}], 
+        LineBox[{{5.5, 5.9999999999976925`}, {5.5, 12.99999999999251}}], 
+        PolygonBox[{{5.5, 8.9}, {5.9, 10.1}, {5.1, 10.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.5548, 9.5}, {1, 0}], 
+        LineBox[{{5.4999999999976925`, 6.}, {12.49999999999251, 6.}}], 
+        PolygonBox[{{9.6, 6.}, {8.4, 5.6}, {8.4, 6.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {9., 5.0548}, {0, 1}], 
+        {PointSize[0.04], PointBox[{12.5, 13.}], PointBox[{5.5, 6.}], 
+         PointBox[{5.5, 13.}], PointBox[{17., 5.5}], PointBox[{12.5, 6.}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T18", " ", "P2", " ", "N36"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdiei/ijfhfjghgj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdiei/ijfhfjghgj.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {44, 0}, {0, 0}, {22, 22}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["g",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {21.75, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["g",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {26.25, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["\[RightArrow]",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {30.75, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["H",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {35.25, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["g",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {39.75, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["g",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {44.25, 69.96}, {0, 0}]},
+  AspectRatio->1.0999999999999999`,
+  ImageSize->{288, 288},
+  PlotRange->{{0, 66}, {0, 72.6}}]], "Print",
+ CellChangeTimes->{3.769419771215928*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"a1d695a8-6b7f-4c0c-b5a0-efde83f82c9d"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbf/cgdhei/fjghgihjij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 1, " ", "afbf/cgdhei/fjghgihjij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419771235794*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"8289f544-f4e9-49a0-afb4-d0518ee201dc"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "2", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbf/cgdhei/fjghgjhiij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 2, " ", "afbf/cgdhei/fjghgjhiij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419771242425*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"5dfb408f-578a-4763-bae2-57be854ace19"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "3", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbf/cgdhei/fjgigjhihj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 3, " ", "afbf/cgdhei/fjgigjhihj.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197712490377`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"7997a7d7-02c3-4b7a-bb30-60f55297c0c4"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "4", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdfei/fjghgihjij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 4, " ", "afbg/chdfei/fjghgihjij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197712553473`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"815a1deb-5e75-4989-a9ce-dedb92a3c6fa"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "5", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdfei/fjghgjhiij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 5, " ", "afbg/chdfei/fjghgjhiij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197712619123`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"9a588a87-148a-45d7-b829-ee521fc8b534"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "6", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdfei/fjgigjhihj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 6, " ", "afbg/chdfei/fjgigjhihj.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419771268382*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"a619c015-fc96-4bed-9e7c-47615ff8c958"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "7", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdgei/gjfhfihjij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 7, " ", "afbg/chdgei/gjfhfihjij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419771275031*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"943d135c-d0e8-458a-b10f-5896bb7dfc5a"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "8", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdgei/gjfhfjhiij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 8, " ", "afbg/chdgei/gjfhfjhiij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197712821083`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"906b9afa-4404-4b7a-9fbf-54b554fa3b3c"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "9", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdgei/gjfifjhihj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 9, " ", "afbg/chdgei/gjfifjhihj.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419771288517*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"f96d0ac0-d312-45fb-b70e-6f30a2c318a1"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "10", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdief/fjghgihjij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 10, " ", "afbg/chdief/fjghgihjij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419771295043*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"bd269577-c1b8-4067-9282-d248754ce10f"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "11", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdief/fjghgjhiij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 11, " ", "afbg/chdief/fjghgjhiij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197713016567`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"7e2210b4-20c6-47cb-b765-6186e5f55ff0"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "12", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdief/fjgigjhihj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 12, " ", "afbg/chdief/fjgigjhihj.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76941977130822*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"3160068d-dbe9-48d1-96e7-eb84163e5c78"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "13", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdieg/gjfhfihjij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 13, " ", "afbg/chdieg/gjfhfihjij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419771314443*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"df6e3fcb-7ddc-42ca-be0b-6d95b9fd38f5"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "14", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdieg/gjfhfjhiij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 14, " ", "afbg/chdieg/gjfhfjhiij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197713210487`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"f8825dd2-2c0d-456a-b45b-af739b0ca4ab"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "15", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdieg/gjfifjhihj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 15, " ", "afbg/chdieg/gjfifjhihj.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419771327628*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"f5437035-851f-445e-915f-3f5dea41ad12"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "16", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdiei/ijfgfhgjhj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 16, " ", "afbg/chdiei/ijfgfhgjhj.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197713341093`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"fcc3444c-88de-4ae3-90fb-897d0944fba2"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "17", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdiei/ijfgfjghhj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 17, " ", "afbg/chdiei/ijfgfjghhj.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419771341064*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"015c0356-7120-4005-9972-9c500e5040d7"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "18", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdiei/ijfhfjghgj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 18, " ", "afbg/chdiei/ijfhfjghgj.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.76941977134765*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"986c3431-dc35-445a-b2ab-4041a3dd5e52"]
+}, Open  ]],
+
+Cell[BoxData["\.1c"], "Output",
+ CellChangeTimes->{3.769419773083962*^9},
+ CellLabel->"Out[28]=",ExpressionUUID->"ff3afdd3-458e-4a26-a454-93ab7fe359f9"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["\<\"\"\>"], "Print",
+ CellChangeTimes->{3.769419773096052*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"6cf863c8-4577-4392-9dde-2ad752a77806"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"creating amplitudes at level(s) \"\>", "\[InvisibleSpace]", 
+   RowBox[{"{", "Particles", "}"}]}],
+  SequenceForm["creating amplitudes at level(s) ", {FeynArts`Particles}],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419773102675*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"1513ec06-85f4-4e9e-9a33-ca2cf384a552"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles amplitudes\"\>"}],
+  SequenceForm["> Top. ", 1, ": ", "2 Particles amplitudes"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197731129513`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"81dcff6a-5b08-4a52-a0fb-8e2d5e543a72"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "2", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles amplitudes\"\>"}],
+  SequenceForm["> Top. ", 2, ": ", "2 Particles amplitudes"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419773138116*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"1a9ed642-45c0-4e59-a831-a38cfb39daf9"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "3", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles amplitudes\"\>"}],
+  SequenceForm["> Top. ", 3, ": ", "2 Particles amplitudes"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419773145261*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"0c955cdc-047d-4aa7-9736-b65399fcec78"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "4", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles amplitudes\"\>"}],
+  SequenceForm["> Top. ", 4, ": ", "2 Particles amplitudes"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419773152411*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"900260b3-c99c-4adf-965e-4f55b8e6dc4c"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "5", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"1 Particles amplitude\"\>"}],
+  SequenceForm["> Top. ", 5, ": ", "1 Particles amplitude"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419773168891*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"27078933-f3a9-41d6-803f-89ee056ea1d4"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"in total: \"\>", 
+   "\[InvisibleSpace]", "\<\"9 Particles amplitudes\"\>"}],
+  SequenceForm["in total: ", "9 Particles amplitudes"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419773174801*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"0e2b189f-4e20-458b-a8fd-02cf4f4d9b77"],
+
+Cell[BoxData["\<\"\\npreparing FORM code in \
+/Users/josegabrielreyes/Documents/Higgs/Mathematica \
+Scripts/ggHgg/FinalSetUp/fc-amp-2.frm\"\>"], "Print",
+ CellChangeTimes->{3.769419773209095*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"469abe51-6516-4a0b-9037-7f4be311eee7"],
+
+Cell[BoxData["\<\"running FORM... \"\>"], "Print",
+ CellChangeTimes->{3.769419773227894*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"714c3095-a8df-44e8-ad5f-c168cb4bee85"],
+
+Cell[BoxData["\<\"ok\\n\"\>"], "Print",
+ CellChangeTimes->{3.7694197793302937`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"82db79c3-91d2-4d15-8361-00b63715f011"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"loading \"\>", 
+   "\[InvisibleSpace]", "\<\"keep/6707686115368009465.m\"\>"}],
+  SequenceForm["loading ", "keep/6707686115368009465.m"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419779336658*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"18364dc7-e343-4295-9070-6190387cbb70"]
+}, Open  ]],
+
+Cell[BoxData[
+ TemplateBox[{
+  "RegisterAbbr","conflict",
+   "\"Conflict of definitions for \
+\\\\!\\\\(\\\\*RowBox[{\\\"Abb400\\\"}]\\\\).\"",2,35,5,17439211854332621036,
+   "Alternate Kernel","FormCalc`RegisterAbbr"},
+  "MessageTemplate2"]], "Message", "MSG",
+ CellChangeTimes->{3.769419779461619*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"e0744e9d-e2ef-4a76-bd2f-fa7b3575d7ef"],
+
+Cell[BoxData[
+ TemplateBox[{
+  "RegisterAbbr","conflict",
+   "\"Conflict of definitions for \
+\\\\!\\\\(\\\\*RowBox[{\\\"Abb441\\\"}]\\\\).\"",2,35,6,17439211854332621036,
+   "Alternate Kernel","FormCalc`RegisterAbbr"},
+  "MessageTemplate2"]], "Message", "MSG",
+ CellChangeTimes->{3.769419779561949*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"23b07601-e675-4ee5-8f25-8b0bdf7a5ad5"],
+
+Cell[BoxData[
+ TemplateBox[{
+  "RegisterAbbr","conflict",
+   "\"Conflict of definitions for \
+\\\\!\\\\(\\\\*RowBox[{\\\"Abb444\\\"}]\\\\).\"",2,35,7,17439211854332621036,
+   "Alternate Kernel","FormCalc`RegisterAbbr"},
+  "MessageTemplate2"]], "Message", "MSG",
+ CellChangeTimes->{3.769419779653287*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"ac70579a-eda8-480d-92eb-abd167b49968"],
+
+Cell[BoxData[
+ TemplateBox[{
+  "General","stop",
+   "\"Further output of \\\\!\\\\(\\\\*StyleBox[RowBox[{\\\"RegisterAbbr\\\", \
+\\\"::\\\", \\\"conflict\\\"}], \\\"MessageName\\\"]\\\\) will be suppressed \
+during this calculation.\"",2,35,8,17439211854332621036,"Alternate Kernel"},
+  "MessageTemplate"]], "Message", "MSG",
+ CellChangeTimes->{3.769419779734187*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"2479bce6-8bad-4ae2-89c6-44e875b32ef3"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["\<\"\"\>"], "Print",
+ CellChangeTimes->{3.7694197937044153`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"bf220334-165a-42a0-a103-0f1f677641c5"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"creating amplitudes at level(s) \"\>", "\[InvisibleSpace]", 
+   RowBox[{"{", "Particles", "}"}]}],
+  SequenceForm["creating amplitudes at level(s) ", {FeynArts`Particles}],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419793711794*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"1a507720-2dd7-4c46-b79b-33d9b6e1b3a7"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"1 Particles amplitude\"\>"}],
+  SequenceForm["> Top. ", 1, ": ", "1 Particles amplitude"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419793727751*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"216509b2-4e52-4995-986f-23fb433e820c"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "2", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles amplitudes\"\>"}],
+  SequenceForm["> Top. ", 2, ": ", "2 Particles amplitudes"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197937377567`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"2de11935-a6c3-4459-8353-525a400a8178"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "3", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles amplitudes\"\>"}],
+  SequenceForm["> Top. ", 3, ": ", "2 Particles amplitudes"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419793774415*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"24add32f-f221-4043-9ba1-b50bc64ab4e9"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "4", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles amplitudes\"\>"}],
+  SequenceForm["> Top. ", 4, ": ", "2 Particles amplitudes"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197937817583`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"a29ca9a1-308e-4cdd-b809-7c30d8140fd8"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "5", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles amplitudes\"\>"}],
+  SequenceForm["> Top. ", 5, ": ", "2 Particles amplitudes"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419793791811*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"c3e78189-1864-4e59-aeac-543d34077095"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"in total: \"\>", 
+   "\[InvisibleSpace]", "\<\"9 Particles amplitudes\"\>"}],
+  SequenceForm["in total: ", "9 Particles amplitudes"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694197937990093`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"fc8813f9-37c9-4faa-b480-3462c870c98e"],
+
+Cell[BoxData["\<\"\\npreparing FORM code in \
+/Users/josegabrielreyes/Documents/Higgs/Mathematica \
+Scripts/ggHgg/FinalSetUp/fc-amp-2.frm\"\>"], "Print",
+ CellChangeTimes->{3.769419793837657*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"9217e22f-3c3c-4953-b200-3c4a85426d3a"],
+
+Cell[BoxData["\<\"running FORM... \"\>"], "Print",
+ CellChangeTimes->{3.769419793847934*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"351c5b47-65a4-4e20-b498-26d08f7d90d7"],
+
+Cell[BoxData["\<\"ok\\n\"\>"], "Print",
+ CellChangeTimes->{3.769419799083416*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"aeeb27bc-4328-4853-8228-60cacec4bb3f"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"loading \"\>", 
+   "\[InvisibleSpace]", "\<\"keep/6707686115368009465.m\"\>"}],
+  SequenceForm["loading ", "keep/6707686115368009465.m"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419799089582*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"5269c6ed-3df5-4066-9bd6-3c08e140fa43"],
+
+Cell[BoxData["\<\"\"\>"], "Print",
+ CellChangeTimes->{3.769419815156547*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"012e7324-2342-4b04-9c6e-e4803478b0fd"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"creating amplitudes at level(s) \"\>", "\[InvisibleSpace]", 
+   RowBox[{"{", "Particles", "}"}]}],
+  SequenceForm["creating amplitudes at level(s) ", {FeynArts`Particles}],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419815163783*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"37772824-a3ef-4df4-a3fe-095b9db5eb3a"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles amplitudes\"\>"}],
+  SequenceForm["> Top. ", 1, ": ", "2 Particles amplitudes"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694198151746073`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"e41fe5f0-abca-4c39-97c7-b65021b6cbc0"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "2", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles amplitudes\"\>"}],
+  SequenceForm["> Top. ", 2, ": ", "2 Particles amplitudes"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694198152068787`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"481aa61d-33cf-4ab0-830e-394581885c18"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "3", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles amplitudes\"\>"}],
+  SequenceForm["> Top. ", 3, ": ", "2 Particles amplitudes"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419815213922*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"2b52494c-de6d-4411-aa24-ae7abf19eb80"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "4", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles amplitudes\"\>"}],
+  SequenceForm["> Top. ", 4, ": ", "2 Particles amplitudes"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694198152254066`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"3e2644c3-b340-4924-9e27-7aa4c88e1d0e"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "5", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"1 Particles amplitude\"\>"}],
+  SequenceForm["> Top. ", 5, ": ", "1 Particles amplitude"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419815257728*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"7ea3683b-d2ef-41c2-81db-a798cbd96880"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"in total: \"\>", 
+   "\[InvisibleSpace]", "\<\"9 Particles amplitudes\"\>"}],
+  SequenceForm["in total: ", "9 Particles amplitudes"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419815264596*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"6268c551-ec3d-4a51-918d-d957323dae49"],
+
+Cell[BoxData["\<\"\\npreparing FORM code in \
+/Users/josegabrielreyes/Documents/Higgs/Mathematica \
+Scripts/ggHgg/FinalSetUp/fc-amp-2.frm\"\>"], "Print",
+ CellChangeTimes->{3.769419815293236*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"287c4d08-7c5a-4014-8c80-8a3b9f294681"],
+
+Cell[BoxData["\<\"running FORM... \"\>"], "Print",
+ CellChangeTimes->{3.7694198153050823`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"6054ade0-a12f-4486-a7a3-3112838ef665"],
+
+Cell[BoxData["\<\"ok\\n\"\>"], "Print",
+ CellChangeTimes->{3.7694198214280577`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"59bd80a3-15bc-4109-b529-32a6c770941d"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"loading \"\>", 
+   "\[InvisibleSpace]", "\<\"keep/6707686115368009465.m\"\>"}],
+  SequenceForm["loading ", "keep/6707686115368009465.m"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419821433963*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"c46d6c33-f2c4-4939-a37a-221437c48baf"],
+
+Cell[BoxData["\<\"\"\>"], "Print",
+ CellChangeTimes->{3.7694198454318113`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"64769fd3-9b86-4f6a-a5c8-cfb3b4d05e36"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"creating amplitudes at level(s) \"\>", "\[InvisibleSpace]", 
+   RowBox[{"{", "Particles", "}"}]}],
+  SequenceForm["creating amplitudes at level(s) ", {FeynArts`Particles}],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419845438033*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"51968f08-7c0e-44c0-89d7-63e7acced7f7"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"1 Particles amplitude\"\>"}],
+  SequenceForm["> Top. ", 1, ": ", "1 Particles amplitude"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694198454523582`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"bcf17787-5bbe-475f-8b8e-43b0e63f8fb7"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "2", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles amplitudes\"\>"}],
+  SequenceForm["> Top. ", 2, ": ", "2 Particles amplitudes"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419845484919*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"51aa54ee-8217-42b7-abc5-3a62d1cc56cf"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "3", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles amplitudes\"\>"}],
+  SequenceForm["> Top. ", 3, ": ", "2 Particles amplitudes"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694198454908943`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"83fbe4e6-8bde-467d-bfc3-4eb8cccdea4c"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "4", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles amplitudes\"\>"}],
+  SequenceForm["> Top. ", 4, ": ", "2 Particles amplitudes"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419845497279*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"c0845eda-e096-4b18-9a25-47c98d66758f"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "5", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles amplitudes\"\>"}],
+  SequenceForm["> Top. ", 5, ": ", "2 Particles amplitudes"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419845503302*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"6f0ccfaa-b550-4a1d-9f04-376ab888f4a0"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"in total: \"\>", 
+   "\[InvisibleSpace]", "\<\"9 Particles amplitudes\"\>"}],
+  SequenceForm["in total: ", "9 Particles amplitudes"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419845509502*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"633e97f8-2861-4517-98a3-ca3924e2bfa5"],
+
+Cell[BoxData["\<\"\\npreparing FORM code in \
+/Users/josegabrielreyes/Documents/Higgs/Mathematica \
+Scripts/ggHgg/FinalSetUp/fc-amp-2.frm\"\>"], "Print",
+ CellChangeTimes->{3.7694198455476513`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"a9a7575c-dcca-4d0f-adbc-fc54ab994943"],
+
+Cell[BoxData["\<\"running FORM... \"\>"], "Print",
+ CellChangeTimes->{3.76941984557095*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"aa22d876-477a-4f12-9023-89205c2d7246"],
+
+Cell[BoxData["\<\"ok\\n\"\>"], "Print",
+ CellChangeTimes->{3.7694198504583263`*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"0ef1e206-18e1-40aa-9988-1ecb055deeb3"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"loading \"\>", 
+   "\[InvisibleSpace]", "\<\"keep/6707686115368009465.m\"\>"}],
+  SequenceForm["loading ", "keep/6707686115368009465.m"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.769419850465218*^9},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"b0637faf-f999-4bac-aca0-345cf1afd638"]
+}, Open  ]]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{
+ RowBox[{
+  RowBox[{"dTri", "=", 
+   RowBox[{"DiagramExtract", "[", 
+    RowBox[{"insT", ",", 
+     RowBox[{"{", "1", "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"dBox", " ", "=", " ", 
+   RowBox[{"DiagramExtract", "[", 
+    RowBox[{"insB", ",", 
+     RowBox[{"{", "31", "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"DoPaint", "[", 
+   RowBox[{"dTri", ",", "\"\<Triangle_Sample\>\"", ",", 
+    RowBox[{"SheetHeader", "\[Rule]", "None"}], ",", 
+    RowBox[{"ColumnsXRows", "\[Rule]", "1"}], ",", 
+    RowBox[{"Numbering", "\[Rule]", "None"}]}], "]"}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"DoPaint", "[", 
+   RowBox[{"dBox", ",", "\"\<Box_Sample\>\"", ",", 
+    RowBox[{"SheetHeader", "\[Rule]", "None"}], ",", 
+    RowBox[{"ColumnsXRows", "\[Rule]", "1"}], ",", 
+    RowBox[{"Numbering", "\[Rule]", "None"}]}], "]"}], ";"}]}], "Input",
+ CellLabel->"In[34]:=",ExpressionUUID->"02aec05b-cb5c-48e4-bef3-28ea0e943234"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdgeg/igfhfihi.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"1 diagram\"\>"}],
+  SequenceForm["> Top. ", 1, " ", "afbg/chdgeg/igfhfihi.m", ", ", "1 diagram"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694115028873034`*^9, 3.769411694448295*^9},
+ CellLabel->
+  "During evaluation of \
+In[34]:=",ExpressionUUID->"ab1aed8a-ccf7-4a1c-91c7-8a08c7ebf458"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdiei/ijfgfhgjhj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"1 diagram\"\>"}],
+  SequenceForm[
+  "> Top. ", 1, " ", "afbg/chdiei/ijfgfhgjhj.m", ", ", "1 diagram"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7694115028873034`*^9, 3.769411694619399*^9},
+ CellLabel->
+  "During evaluation of \
+In[34]:=",ExpressionUUID->"f526f36d-a5f7-41a6-b836-cc63614c6630"]
+}, Open  ]]
+}, Open  ]],
+
+Cell[BoxData[
+ RowBox[{"\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", 
+  "\[IndentingNewLine]", "\[IndentingNewLine]", 
+  "\[IndentingNewLine]"}]], "Input",
+ CellChangeTimes->{{3.775231658034355*^9, 
+  3.775231658759864*^9}},ExpressionUUID->"3d70a43d-88f7-4edd-9914-\
+fdec294abd06"],
+
+Cell[BoxData[{
+ RowBox[{
+  RowBox[{"process", " ", "=", " ", 
+   RowBox[{
+    RowBox[{"{", 
+     RowBox[{
+      RowBox[{"V", "[", "5", "]"}], ",", 
+      RowBox[{"V", "[", "5", "]"}]}], "}"}], "\[Rule]", 
+    RowBox[{"{", 
+     RowBox[{"S", "[", "1", "]"}], "}"}]}]}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"name", " ", "=", " ", "\"\<ggHgg-SM\>\""}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"SetOptions", "[", 
+   RowBox[{"InsertFields", ",", 
+    RowBox[{"Model", "\[Rule]", "\"\<SMQCD\>\""}]}], "]"}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"$PaintSE", " ", "=", " ", 
+   RowBox[{"MkDir", "[", 
+    RowBox[{"name", " ", "<>", " ", "\"\<.diagrams\>\""}], "]"}]}], 
+  ";"}], "\n", 
+ RowBox[{
+  RowBox[{"DoPaint", "[", 
+   RowBox[{"diags_", ",", " ", "file_", ",", " ", "opt___"}], "]"}], " ", ":=",
+   " ", 
+  RowBox[{"Paint", "[", 
+   RowBox[{"diags", ",", " ", "opt", ",", "\n", "  ", 
+    RowBox[{"DisplayFunction", " ", "->", " ", 
+     RowBox[{"(", 
+      RowBox[{
+       RowBox[{"Export", "[", 
+        RowBox[{
+         RowBox[{"ToFileName", "[", 
+          RowBox[{"$PaintSE", ",", " ", 
+           RowBox[{"file", " ", "<>", " ", "\"\<.png\>\""}]}], "]"}], ",", 
+         " ", "#"}], "]"}], "&"}], ")"}]}]}], 
+   "]"}]}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"ClearProcess", "[", "]"}], ";"}], "\[IndentingNewLine]"}], "Input",\
+
+ CellChangeTimes->{3.775231666527814*^9},
+ CellLabel->"In[5]:=",ExpressionUUID->"8a1b2c8b-00d6-46e3-89a1-77170c10da2a"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{
+ RowBox[{
+  RowBox[{"topsT", " ", "=", " ", 
+   RowBox[{"CreateTopologies", "[", 
+    RowBox[{"1", ",", 
+     RowBox[{"2", "\[Rule]", "1"}], ",", "TrianglesOnly"}], "]"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"insT", " ", "=", " ", 
+   RowBox[{"InsertFields", "[", 
+    RowBox[{"topsT", ",", "process", ",", 
+     RowBox[{"InsertionLevel", "\[Rule]", 
+      RowBox[{"{", "Particles", "}"}]}], ",", 
+     RowBox[{"Restrictions", "\[Rule]", 
+      RowBox[{"{", "NoLightFHCoupling", "}"}]}]}], "]"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"Paint", "[", "insT", "]"}], ";", "\.1c"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"amp", " ", "=", " ", 
+   RowBox[{"CalcFeynAmp", "[", 
+    RowBox[{
+     RowBox[{"CreateFeynAmp", "[", "insT", "]"}], ",", 
+     RowBox[{"SortDen", "\[Rule]", "True"}]}], "]"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"amp", "=", 
+   RowBox[{
+    RowBox[{
+     RowBox[{"amp", "//.", " ", 
+      RowBox[{"Abbr", "[", "]"}]}], " ", "//.", 
+     RowBox[{"Subexpr", "[", "]"}]}], "//.", 
+    RowBox[{"Abbr", "[", "]"}]}]}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"Export", "[", 
+   RowBox[{"\"\<ggH.m\>\"", ",", 
+    RowBox[{"amp", "[", 
+     RowBox[{"[", "1", "]"}], "]"}]}], "]"}], 
+  ";"}], "\[IndentingNewLine]"}], "Input",
+ CellChangeTimes->{{3.775231713578854*^9, 3.775231765949194*^9}, {
+  3.775231808435851*^9, 3.775231846020644*^9}},
+ CellLabel->"In[23]:=",ExpressionUUID->"f40f6a8e-04da-4014-9f19-bcf1eb59b485"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["\<\"\"\>"], "Print",
+ CellChangeTimes->{
+  3.775231768106307*^9, {3.7752318298241873`*^9, 3.775231846786357*^9}},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"e86efd00-6823-4cd9-9daf-a89335a65f3e"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"Excluding \"\>", "\[InvisibleSpace]", "18", 
+   "\[InvisibleSpace]", "\<\" field point(s) (incl. charge-conjugate \
+ones)\"\>"}],
+  SequenceForm[
+  "Excluding ", 18, " field point(s) (incl. charge-conjugate ones)"],
+  Editable->False]], "Print",
+ CellChangeTimes->{
+  3.775231768106307*^9, {3.7752318298241873`*^9, 3.775231846796583*^9}},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"c8555bd9-4bcb-4cff-9067-1d158370696e"],
+
+Cell[BoxData["\<\"\"\>"], "Print",
+ CellChangeTimes->{
+  3.775231768106307*^9, {3.7752318298241873`*^9, 3.775231846806231*^9}},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"2ff04487-325a-4813-864b-0a881fc6d69e"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"inserting at level(s) \"\>", "\[InvisibleSpace]", 
+   RowBox[{"{", "Particles", "}"}]}],
+  SequenceForm["inserting at level(s) ", {FeynArts`Particles}],
+  Editable->False]], "Print",
+ CellChangeTimes->{
+  3.775231768106307*^9, {3.7752318298241873`*^9, 3.775231846810871*^9}},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"062f6f1e-ea19-451e-90bd-4a60a3d17abf"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 1, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{
+  3.775231768106307*^9, {3.7752318298241873`*^9, 3.775231846815652*^9}},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"b370f17d-a61b-41c1-baf2-aae267a96506"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "2", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 2, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{
+  3.775231768106307*^9, {3.7752318298241873`*^9, 3.775231846822872*^9}},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"44455adc-9860-4adc-bf43-c0802a41d8c0"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "3", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 3, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{
+  3.775231768106307*^9, {3.7752318298241873`*^9, 3.7752318468314857`*^9}},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"4e379aec-32bc-49d2-8e78-b8b97b40991c"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "4", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 4, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{
+  3.775231768106307*^9, {3.7752318298241873`*^9, 3.775231846838798*^9}},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"e4de9e92-d325-4aa2-9ee1-30abab4b31b7"],
+
+Cell[BoxData["\<\"\"\>"], "Print",
+ CellChangeTimes->{
+  3.775231768106307*^9, {3.7752318298241873`*^9, 3.775231846845894*^9}},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"baa47514-8f48-4385-ba7e-f0d1f32d15ce"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"Restoring \"\>", "\[InvisibleSpace]", "18", 
+   "\[InvisibleSpace]", "\<\" field point(s)\"\>"}],
+  SequenceForm["Restoring ", 18, " field point(s)"],
+  Editable->False]], "Print",
+ CellChangeTimes->{
+  3.775231768106307*^9, {3.7752318298241873`*^9, 3.775231846852942*^9}},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"97a4f371-d445-44d5-8099-3bc8f8da4051"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"in total: \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["in total: ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{
+  3.775231768106307*^9, {3.7752318298241873`*^9, 3.775231846860085*^9}},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"6605c97c-6971-414b-9a6e-3e00d855a020"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"adbe/cf/dedfef.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm["> Top. ", 1, " ", "adbe/cf/dedfef.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{
+  3.775231768106307*^9, {3.7752318298241873`*^9, 3.77523184686703*^9}},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"57924dd8-adab-41e2-b09b-0f4893d6c7a8"],
+
+Cell[BoxData[
+ GraphicsBox[{InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwt1gs41GseB/C/SzUHRcbECDvlkhS5VKbtMv+EM8lRyaokjZZnR2mojZwu
+GomQELFjHyRH0ekoIqarSZ3OSNl5IqaSa03kXia60H7fszvPM888n+ed/+/6
+zvPMvN0RvqGaFEWl4U0+KdV3vObS1J+vxTQlu5jZfgBmRNqbNi+iKZMXpqoW
+U5qit6ZsrobdD0atdYZleQFHSuGql6qc02yairHVT7kCB5nHXe4zoSmOxtPj
+tbCXcmjCF7Yd9xH1wFbqbyFPjWmqM97yJAv59BYwXu6E5T4pNlvgPRZjOgw4
+5i9xc3JhoeXZVY1zUN/rkYIe2HBGoHUFXH44rN7BHvF0dvdcgznJsTnRcICq
+hSGHt90oWl4DG5mV3lPDkuLt9CDsac756oL4E7/c7WQ50FSjWXr9UVgqKtFa
+AjO0pgrqYdstq/e7wlV/d61hon5usUeHA+x35ttBP1j5k6eaPH/LwECWANOD
+y9cNIf6QYfuOIlj4r/WLbsHSgI9Ol+BO9TTZUditg5OaRuYRKpGsgOv6DFYG
+wI7suvwx9CddYVvyAxzDpZ9VwKqs+48LyLySZewoOE/NnGMOU0bpGm7wkP/m
+Ncnoz+CuftpcOLWj8ksvi6YEXc/0tWHfFU6VbrCypkRzEvP3y9lmnW9EU6Xc
+uInpOO+tCNf+zqQpvnr72XnwHaH+v0UwZ2OKeAPMlzwJHzVEPIbH+ROwMz92
+9DRMf3bWfQhrL+vbsBZmOB/eqEf6yTaez4SFub3ZW+HAYwMnNeBNwsTXF+CH
+11cO68Am1kku7+Cgeft3LIY7HaL7LTHPzFmZomDYNmBvkx88puFSXQzLOuKD
+D8EB60bUwzD/+afWZLjTZq54Feotn/9i52n41/vXzsXDXKad7lF41fhP9+/B
+he6x7wLhL2Xdq3ph6Ysdr8i+U137V3yFJQPG2eOoJ8W+zm4MHmmu3k3uT7XS
+bkwBlzIHNf8JC1QbdM+S+B/bIsj9M3y779gymGGeeGkQ83CrmdklI/PK1BVV
+we6HWE6uMGfi07xEuNDN41z+bOSvjzoRCgfKh5lfDLC/edwzfvBAiJnnFthR
+2yKYmPr5cscufewv2NOBfF96pmS9/SzEv7zbhcSTznrTZDoT9WtGyW/Ai/kz
+ap31cL5YED0KG2W1jhzVxX0685m9HPWmZqjip3SwH/dfDcRwm4fm8Ztw+Wyr
+8Aa4lxcp/Q1WCr3sjDCfbU1JqiZY7LdU5A8bFNW1LUA8KtKsJg2OufZotAAW
+tzoZ3oLzatuT7JGfepvg3gJT/qY1j2BhQ937LrIv36kvgahXsbM3tQ3WG0j9
+1g1PnPpU/Ag2Wzrl5Y3+NtXYSC7AvZFFM9Ng+X6jXyKIS8wLzhNrDd90gUuv
+h2sdgR3pmKBRcr+S2j3N4cht1qLf4KT7PxYkknwNNv1CWLKNFXYL9STphz6w
+g99IQ6ha1M9oyZOoyf1//igwH/3KZ1anPoFLB6/mCH7Afb22lHUdLn5zgc9i
+0FTGidXKErJPdv8r+XTM4TEn+yrMKG6sT5qGfLel7Edw+Zfnr4K1YWMXD3I/
+Am26onZpYS72Fibzkb88e+5YiibqudGsCIYNylut+zUwr8+VhpfJeUnNQDxs
+wh5ijcFc/ZPT/GHG1MbXa9C/9/Z7k0Ew/92kKAHmWIr9c+HOrO96D+GDFyuf
+fYMFfYf2jJN5X1w/EIt8JrFZL82WIE7fuzAmqac/M9oZNtOv1SuDBXQz1xW2
+re30XoP6M0J36C4i/kcR+xbs2KZTPwuWP92VZYR+M+KOOL1BfNmkT9U6uFCL
+oyiDN1nO6ODBDG+WUgRLflZ4acNyy6JPdnB5nPTHdMTb1DJgoUJ/SstC/27k
+V3g2bi6GZYfeMzXhjL91hYTBMRXjajX6kcdPNHDhgTK9nj8ozEuhIWSR/RYx
+18/4zqO4pcwgDZiTmxAb/o1Hmdzpm5jE/OVVZw++/MyjMvRP5uiS37Nr7529
+4zzKoH2waCF5/sP9D1w1XBpd6A9H9jwO3PqRRzlu7F2VAYunR99rHeVRDLfU
+A00k/te0sN9HeNTE1YWVZuR+vubnW8PyNompEFY0RR4aGuZR4mlmlypgkxOt
+L5xxzgjYs08N8y0WLGyAR96ufbkE8xRb6dwoQ3yF/Z5XO8l+0n36HnzgUUlB
+vgbHYHqv95Yx1GNr3PH+NMxxeahrhXrlIad+T4YFn0OXcT/xqN7yxIFouNTw
+j8PG6C/yY2GuH+xonx19BVZ43Oi2gifW63zogh0PzMl7j3oKu8felcHcLh/H
+y6Qf/uhqBnn+3umIENLPk1MLR5BP+iF4O4fs2yt15d4x9DNrpKcT8zA5Pmd2
+AuqVvU94QO6vojriqg/6K8/5uCyWzFPkanq7H+dr9jUL4Iyk583nVDyK8j0n
+2kIsZv9nVxfqm6wcIfMXsJV/LVbyKIHsvP9eMn/muqzYRh5Fjw9dSSc2PfDw
+5m0exTHMZNfZ//9/TObd/3060P8FjtJEEA==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.818198051533946, 16.122586360737625}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwl1gs8lOkeB/DXMBFiYtxZQ8olNKizJLxbue05ao5sOS0aIrYQx1ZssdNh
+HbetSTZ1XHbOshMtNZuaiEpoiS6yw8ntmJTWYjQoqVjn93zOfD4+7+f7Pu/z
+f/7///O+z4dV1OHgGAZFUafwR67U+DJ+ZjSlJFcjmor/eNr4DEzb2LhlwZt/
+i9HShgXTw3ssYTojuOmIKU1JBD61fYY01fbYfIXMhKZEH2Kf1RLviIlxgqlK
+u2ExrKHXUJpjjPnpA1V3YWu96JApxOE5/XZoEW7Zd7MxAub3av1zF64DU+Yu
+Y7hPmcvb78I/aJe/yYT5Y61XacQprc1UesHyE0YjHTC3nZHNhpNayvjBWHd3
+QnqmOnn+haN7L5x3ba+1ASzMP3gvEHk7eu6w2gx3v/zErRrOOCmeTYabI1f1
+K2CdOZ0lKSy4r5Ovj7o1xxwnGSRf59u9RjA7rIa5E2bdquS8x/PSo7cKi2DR
+5zJpI7zdXbrpISzvyry2Dw62zAucI89fkw1MIJ+wsdUuDORNabn/ZT/M6qg9
+P49xQYPLpm7cb6ZLf3xE5ofvOuAB/ykjipVH5mcZj4lxXfR7aOdA+lXencbB
+lZu5s/Vn5MvhKWjS/z9m7rHWEjcN+u7CtbJwMCrXAPMtNZyM4FMXIuQv2BhP
+/XXmA+5zjRqdvOEknm0Tg/S1Kk2nVB95iFS7HWBTWzUmExaozxSTPs23as5n
+6CHeTy33e+ApxRWZDiz6trQiAPn8cXtNWP1quKbf6wGs2Vo8kA4L/bcrPkM9
+owknWHyYOu8gGYbFgqdrI2CuOi36HP2YNeZJj8Ac1bdRHfDWB85zP8D8eoNC
+C/Rzq+h0v5yMd0kNd8MBqaI0ez3yPlYlJ5J+a2n/+ShM9a1VRJuS92wwtxnm
+Lq677gGbO4nPqaAeSc8r2TTi+03fCXEj9doum+TA3F85J3mw8NGHYU14y4LX
+UghMLX5/Mx35MhwrV3rDXNeh9eOo74EtO0GTzJ+NXRtM6t84+81N0p9D1f9u
+RX+q4nV9eSSfvVu422Euw0DvMenHhgN5A+i/rNa4xJP4WLJbAbwiRbOwhIXv
+segTh3BYwyzixoQu6mUel+yE1fT++sX3OogT8YVDNDxl71ERtQr7YxZvcgF+
+4FeyTGtj/RoPl0mYfXHinK8W2f/O7M+wvo13fWSaJvanOKjvCTx+1KphdCX2
+XfLpUCjyVws6u5gF8wXKplG4bc9oJH8l2f//psSi/rZT4bPJsPC5nd8ILOxS
+uV4HixKDuNvIOaCfomqB+EpdReC3pJ81KswKWNDYbdJA3vfqsQAP5NN87pve
+VphNWx3rgalOrdwaeCPPQycS+Ssv77f5Ei4N91rzFKbk7okWcIjjMRNH1EtV
+xw3VkHzunPbfBUueFIXYwbKGJYEfzF8T8PQc8uccNjmhAnfnhFhR8Pl4O91M
+xJObzrnFk+/8xgL9EOtLQpunRtGv10ozxzHky2VOCA8RJ4dKe1Bfc/C9A9pw
+TfZujkgDz7cWhHXiu5Ftak/5mzreM40tLVXwQiLnqdYKrLs1ybSajKcd+U+b
+GvI5O6nWBdus7i07o4pzVKnYRuI5nnnhlcFAfBujoTi4YJMN8zsV9GmzdtAg
+PO4a9/swhe/zZcNIGPKld1wyioBp2wHmS/h85fFLRnB3dcK9RNRXJLQvWAlz
++zc4vILrKzZnb4D5dTek+9Cfjauj0/9B5ucuPmqAQ0+I+hZI/HUhhgvw1M/3
+l7OxPt/3aqMh+r2QasnmID/hJcUVfbjtw4WzUlhwR711Gs/njA5ae6Ee3rU+
+cTWJ12QReBGWhE/1+cMFF3KsJmDOp6xYcq4tqtnOL8Kibu3GbbCdrLuxH252
+fbL+CjmvvnOKS4ep6NflxjDvsKrFONZLmo0xzEE/OI8PrLOAJaw8byY5v5yf
+dVkjX7qcrVKM/g6VrHurgnqEE3XW22ANcdnB/CUfipfMmFkFs0w93d6896Ek
+h3cy3+O7tTvJNQhbgFt+tNTAuKji5orBNz4U6ytL849hpZ3kYv6cD6W0/Ug1
+C66/8k6WNeNDNeufdJsg56bz7V+uvvKh5EmCyv3Ih76cauuswHquWZ6/wyK1
+d+X5k3An1yXFkMSLSXo0gfmTWoJ3ZD9jda0UxM5nd39Jzv3Ur5ef4HnBQEL2
+EDn3i8xCwxBPUlIwsR79ZD3b7heF9ZIC8m+Hw+5z6ln9SsQXfzWaCHMKWvu1
+ZzE+vEM9goznfa3PRf5y/+N3yXyN0/uY9q99KG5gnWAA8ZUxlUMjsOSgbwJ5
+fzr6jv2dRv203pKjAvmxnp8+6Anz3/QUhsP1yY2r2vG8suGZVzvqE2RtkI2Q
++N4MJ1d4IXKkOAfrC8rYQWL0p8NBO74T+UnU/TXWw/wtue5xqIeeLhv6hZyb
++m/rro7DjH8tZ8As+/sBFc8Rn/cRew/MaagaHxxCPR7X58m5TMUHl5/pgS+z
+K+LJ/K0/OVXexX7J926sIuPkJ7z1//9n9On/AWcfJf4=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.71920310216783, 4.570378284825192}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000002036`, 10.}, {13.500000000002405`, 10.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.75, 10.6952}, {0, -1}], 
+        LineBox[{{7., 14.000000000000908`}, {7., 6.000000000000008}}], 
+        PolygonBox[{{7., 10.6}, {6.6, 9.4}, {7.4, 9.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {6.0548, 10.}, {1, 0}], 
+        LineBox[{{6.999999999989086, 14.000000000007276`}, {
+         13.499999999987267`, 10.000000000007276`}}], 
+        PolygonBox[{{10.760994990022727`, 11.6855415446014}, {
+         9.529366039711539, 11.973795128716784`}, {9.948643980243007, 
+         12.655121782080418`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10.45755100977972, 12.715270390892044}, \
+{-1, -1}], LineBox[{{7.000000000001819, 6.}, {13.5, 9.999999999996362}}], 
+        PolygonBox[{{9.739005009977273, 7.685541544601399}, {
+         10.970633960288461`, 7.973795128716783}, {10.551356019756993`, 
+         8.655121782080418}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10.45755100977972, 7.2847296091079565}, \
+{-1, 1}], 
+        {PointSize[0.04], PointBox[{7., 14.}], PointBox[{7., 6.}], 
+         PointBox[{13.5, 10.}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T1", " ", "P1", " ", "N1"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"adbe/cf/dedfef.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "adbe/cf/dedfef.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {0, 44}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwt1gs41GseB/C/SzUHRcbECDvlkhS5VKbtMv+EM8lRyaokjZZnR2mojZwu
+GomQELFjHyRH0ekoIqarSZ3OSNl5IqaSa03kXia60H7fszvPM888n+ed/+/6
+zvPMvN0RvqGaFEWl4U0+KdV3vObS1J+vxTQlu5jZfgBmRNqbNi+iKZMXpqoW
+U5qit6ZsrobdD0atdYZleQFHSuGql6qc02yairHVT7kCB5nHXe4zoSmOxtPj
+tbCXcmjCF7Yd9xH1wFbqbyFPjWmqM97yJAv59BYwXu6E5T4pNlvgPRZjOgw4
+5i9xc3JhoeXZVY1zUN/rkYIe2HBGoHUFXH44rN7BHvF0dvdcgznJsTnRcICq
+hSGHt90oWl4DG5mV3lPDkuLt9CDsac756oL4E7/c7WQ50FSjWXr9UVgqKtFa
+AjO0pgrqYdstq/e7wlV/d61hon5usUeHA+x35ttBP1j5k6eaPH/LwECWANOD
+y9cNIf6QYfuOIlj4r/WLbsHSgI9Ol+BO9TTZUditg5OaRuYRKpGsgOv6DFYG
+wI7suvwx9CddYVvyAxzDpZ9VwKqs+48LyLySZewoOE/NnGMOU0bpGm7wkP/m
+Ncnoz+CuftpcOLWj8ksvi6YEXc/0tWHfFU6VbrCypkRzEvP3y9lmnW9EU6Xc
+uInpOO+tCNf+zqQpvnr72XnwHaH+v0UwZ2OKeAPMlzwJHzVEPIbH+ROwMz92
+9DRMf3bWfQhrL+vbsBZmOB/eqEf6yTaez4SFub3ZW+HAYwMnNeBNwsTXF+CH
+11cO68Am1kku7+Cgeft3LIY7HaL7LTHPzFmZomDYNmBvkx88puFSXQzLOuKD
+D8EB60bUwzD/+afWZLjTZq54Feotn/9i52n41/vXzsXDXKad7lF41fhP9+/B
+he6x7wLhL2Xdq3ph6Ysdr8i+U137V3yFJQPG2eOoJ8W+zm4MHmmu3k3uT7XS
+bkwBlzIHNf8JC1QbdM+S+B/bIsj9M3y779gymGGeeGkQ83CrmdklI/PK1BVV
+we6HWE6uMGfi07xEuNDN41z+bOSvjzoRCgfKh5lfDLC/edwzfvBAiJnnFthR
+2yKYmPr5cscufewv2NOBfF96pmS9/SzEv7zbhcSTznrTZDoT9WtGyW/Ai/kz
+ap31cL5YED0KG2W1jhzVxX0685m9HPWmZqjip3SwH/dfDcRwm4fm8Ztw+Wyr
+8Aa4lxcp/Q1WCr3sjDCfbU1JqiZY7LdU5A8bFNW1LUA8KtKsJg2OufZotAAW
+tzoZ3oLzatuT7JGfepvg3gJT/qY1j2BhQ937LrIv36kvgahXsbM3tQ3WG0j9
+1g1PnPpU/Ag2Wzrl5Y3+NtXYSC7AvZFFM9Ng+X6jXyKIS8wLzhNrDd90gUuv
+h2sdgR3pmKBRcr+S2j3N4cht1qLf4KT7PxYkknwNNv1CWLKNFXYL9STphz6w
+g99IQ6ha1M9oyZOoyf1//igwH/3KZ1anPoFLB6/mCH7Afb22lHUdLn5zgc9i
+0FTGidXKErJPdv8r+XTM4TEn+yrMKG6sT5qGfLel7Edw+Zfnr4K1YWMXD3I/
+Am26onZpYS72Fibzkb88e+5YiibqudGsCIYNylut+zUwr8+VhpfJeUnNQDxs
+wh5ijcFc/ZPT/GHG1MbXa9C/9/Z7k0Ew/92kKAHmWIr9c+HOrO96D+GDFyuf
+fYMFfYf2jJN5X1w/EIt8JrFZL82WIE7fuzAmqac/M9oZNtOv1SuDBXQz1xW2
+re30XoP6M0J36C4i/kcR+xbs2KZTPwuWP92VZYR+M+KOOL1BfNmkT9U6uFCL
+oyiDN1nO6ODBDG+WUgRLflZ4acNyy6JPdnB5nPTHdMTb1DJgoUJ/SstC/27k
+V3g2bi6GZYfeMzXhjL91hYTBMRXjajX6kcdPNHDhgTK9nj8ozEuhIWSR/RYx
+18/4zqO4pcwgDZiTmxAb/o1Hmdzpm5jE/OVVZw++/MyjMvRP5uiS37Nr7529
+4zzKoH2waCF5/sP9D1w1XBpd6A9H9jwO3PqRRzlu7F2VAYunR99rHeVRDLfU
+A00k/te0sN9HeNTE1YWVZuR+vubnW8PyNompEFY0RR4aGuZR4mlmlypgkxOt
+L5xxzgjYs08N8y0WLGyAR96ufbkE8xRb6dwoQ3yF/Z5XO8l+0n36HnzgUUlB
+vgbHYHqv95Yx1GNr3PH+NMxxeahrhXrlIad+T4YFn0OXcT/xqN7yxIFouNTw
+j8PG6C/yY2GuH+xonx19BVZ43Oi2gifW63zogh0PzMl7j3oKu8felcHcLh/H
+y6Qf/uhqBnn+3umIENLPk1MLR5BP+iF4O4fs2yt15d4x9DNrpKcT8zA5Pmd2
+AuqVvU94QO6vojriqg/6K8/5uCyWzFPkanq7H+dr9jUL4Iyk583nVDyK8j0n
+2kIsZv9nVxfqm6wcIfMXsJV/LVbyKIHsvP9eMn/muqzYRh5Fjw9dSSc2PfDw
+5m0exTHMZNfZ//9/TObd/3060P8FjtJEEA==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.818198051533946, 16.122586360737625}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwl1gs8lOkeB/DXMBFiYtxZQ8olNKizJLxbue05ao5sOS0aIrYQx1ZssdNh
+HbetSTZ1XHbOshMtNZuaiEpoiS6yw8ntmJTWYjQoqVjn93zOfD4+7+f7Pu/z
+f/7///O+z4dV1OHgGAZFUafwR67U+DJ+ZjSlJFcjmor/eNr4DEzb2LhlwZt/
+i9HShgXTw3ssYTojuOmIKU1JBD61fYY01fbYfIXMhKZEH2Kf1RLviIlxgqlK
+u2ExrKHXUJpjjPnpA1V3YWu96JApxOE5/XZoEW7Zd7MxAub3av1zF64DU+Yu
+Y7hPmcvb78I/aJe/yYT5Y61XacQprc1UesHyE0YjHTC3nZHNhpNayvjBWHd3
+QnqmOnn+haN7L5x3ba+1ASzMP3gvEHk7eu6w2gx3v/zErRrOOCmeTYabI1f1
+K2CdOZ0lKSy4r5Ovj7o1xxwnGSRf59u9RjA7rIa5E2bdquS8x/PSo7cKi2DR
+5zJpI7zdXbrpISzvyry2Dw62zAucI89fkw1MIJ+wsdUuDORNabn/ZT/M6qg9
+P49xQYPLpm7cb6ZLf3xE5ofvOuAB/ykjipVH5mcZj4lxXfR7aOdA+lXencbB
+lZu5s/Vn5MvhKWjS/z9m7rHWEjcN+u7CtbJwMCrXAPMtNZyM4FMXIuQv2BhP
+/XXmA+5zjRqdvOEknm0Tg/S1Kk2nVB95iFS7HWBTWzUmExaozxSTPs23as5n
+6CHeTy33e+ApxRWZDiz6trQiAPn8cXtNWP1quKbf6wGs2Vo8kA4L/bcrPkM9
+owknWHyYOu8gGYbFgqdrI2CuOi36HP2YNeZJj8Ac1bdRHfDWB85zP8D8eoNC
+C/Rzq+h0v5yMd0kNd8MBqaI0ez3yPlYlJ5J+a2n/+ShM9a1VRJuS92wwtxnm
+Lq677gGbO4nPqaAeSc8r2TTi+03fCXEj9doum+TA3F85J3mw8NGHYU14y4LX
+UghMLX5/Mx35MhwrV3rDXNeh9eOo74EtO0GTzJ+NXRtM6t84+81N0p9D1f9u
+RX+q4nV9eSSfvVu422Euw0DvMenHhgN5A+i/rNa4xJP4WLJbAbwiRbOwhIXv
+segTh3BYwyzixoQu6mUel+yE1fT++sX3OogT8YVDNDxl71ERtQr7YxZvcgF+
+4FeyTGtj/RoPl0mYfXHinK8W2f/O7M+wvo13fWSaJvanOKjvCTx+1KphdCX2
+XfLpUCjyVws6u5gF8wXKplG4bc9oJH8l2f//psSi/rZT4bPJsPC5nd8ILOxS
+uV4HixKDuNvIOaCfomqB+EpdReC3pJ81KswKWNDYbdJA3vfqsQAP5NN87pve
+VphNWx3rgalOrdwaeCPPQycS+Ssv77f5Ei4N91rzFKbk7okWcIjjMRNH1EtV
+xw3VkHzunPbfBUueFIXYwbKGJYEfzF8T8PQc8uccNjmhAnfnhFhR8Pl4O91M
+xJObzrnFk+/8xgL9EOtLQpunRtGv10ozxzHky2VOCA8RJ4dKe1Bfc/C9A9pw
+TfZujkgDz7cWhHXiu5Ftak/5mzreM40tLVXwQiLnqdYKrLs1ybSajKcd+U+b
+GvI5O6nWBdus7i07o4pzVKnYRuI5nnnhlcFAfBujoTi4YJMN8zsV9GmzdtAg
+PO4a9/swhe/zZcNIGPKld1wyioBp2wHmS/h85fFLRnB3dcK9RNRXJLQvWAlz
++zc4vILrKzZnb4D5dTek+9Cfjauj0/9B5ucuPmqAQ0+I+hZI/HUhhgvw1M/3
+l7OxPt/3aqMh+r2QasnmID/hJcUVfbjtw4WzUlhwR711Gs/njA5ae6Ee3rU+
+cTWJ12QReBGWhE/1+cMFF3KsJmDOp6xYcq4tqtnOL8Kibu3GbbCdrLuxH252
+fbL+CjmvvnOKS4ep6NflxjDvsKrFONZLmo0xzEE/OI8PrLOAJaw8byY5v5yf
+dVkjX7qcrVKM/g6VrHurgnqEE3XW22ANcdnB/CUfipfMmFkFs0w93d6896Ek
+h3cy3+O7tTvJNQhbgFt+tNTAuKji5orBNz4U6ytL849hpZ3kYv6cD6W0/Ug1
+C66/8k6WNeNDNeufdJsg56bz7V+uvvKh5EmCyv3Ih76cauuswHquWZ6/wyK1
+d+X5k3An1yXFkMSLSXo0gfmTWoJ3ZD9jda0UxM5nd39Jzv3Ur5ef4HnBQEL2
+EDn3i8xCwxBPUlIwsR79ZD3b7heF9ZIC8m+Hw+5z6ln9SsQXfzWaCHMKWvu1
+ZzE+vEM9goznfa3PRf5y/+N3yXyN0/uY9q99KG5gnWAA8ZUxlUMjsOSgbwJ5
+fzr6jv2dRv203pKjAvmxnp8+6Anz3/QUhsP1yY2r2vG8suGZVzvqE2RtkI2Q
++N4MJ1d4IXKkOAfrC8rYQWL0p8NBO74T+UnU/TXWw/wtue5xqIeeLhv6hZyb
++m/rro7DjH8tZ8As+/sBFc8Rn/cRew/MaagaHxxCPR7X58m5TMUHl5/pgS+z
+K+LJ/K0/OVXexX7J926sIuPkJ7z1//9n9On/AWcfJf4=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.71920310216783, 4.570378284825192}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000002036`, 10.}, {13.500000000002405`, 10.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.75, 10.6952}, {0, -1}], 
+        LineBox[{{7., 14.000000000000908`}, {7., 6.000000000000008}}], 
+        PolygonBox[{{7., 9.4}, {6.6, 10.6}, {7.4, 10.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {6.0548, 10.}, {1, 0}], 
+        LineBox[{{6.999999999989086, 14.000000000007276`}, {
+         13.499999999987267`, 10.000000000007276`}}], 
+        PolygonBox[{{9.739005009977273, 12.3144584553986}, {
+         10.551356019756993`, 11.344878217919582`}, {10.970633960288461`, 
+         12.026204871283216`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10.45755100977972, 12.715270390892044}, \
+{-1, -1}], LineBox[{{7.000000000001819, 6.}, {13.5, 9.999999999996362}}], 
+        PolygonBox[{{10.760994990022727`, 8.3144584553986}, {
+         9.948643980243007, 7.3448782179195815`}, {9.529366039711539, 
+         8.026204871283216}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10.45755100977972, 7.2847296091079565}, \
+{-1, 1}], 
+        {PointSize[0.04], PointBox[{7., 14.}], PointBox[{7., 6.}], 
+         PointBox[{13.5, 10.}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T1", " ", "P2", " ", "N2"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"adbe/cf/dedfef.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "adbe/cf/dedfef.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {22, 44}, {0, 0}, {22, 22}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["g",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {26.25, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["g",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {30.75, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["\[RightArrow]",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {35.25, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["H",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {39.75, 69.96}, {0, 0}]},
+  AspectRatio->1.0999999999999999`,
+  ImageSize->{288, 288},
+  PlotRange->{{0, 66}, {0, 72.6}}]], "Print",
+ CellChangeTimes->{
+  3.775231768106307*^9, {3.7752318298241873`*^9, 3.775231846880787*^9}},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"abfd3b28-08fb-4ab2-b36b-1643831733fb"]
+}, Open  ]],
+
+Cell[BoxData["\.1c"], "Output",
+ CellChangeTimes->{
+  3.7752317684344378`*^9, {3.775231829908722*^9, 3.775231846895412*^9}},
+ CellLabel->"Out[25]=",ExpressionUUID->"450770ee-1fbc-44c1-9c95-2cefa29d85a9"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["\<\"\"\>"], "Print",
+ CellChangeTimes->{
+  3.775231768106307*^9, {3.7752318298241873`*^9, 3.77523184690742*^9}},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"c2d54618-f2ab-488c-a248-dedc0fcfba78"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"creating amplitudes at level(s) \"\>", "\[InvisibleSpace]", 
+   RowBox[{"{", "Particles", "}"}]}],
+  SequenceForm["creating amplitudes at level(s) ", {FeynArts`Particles}],
+  Editable->False]], "Print",
+ CellChangeTimes->{
+  3.775231768106307*^9, {3.7752318298241873`*^9, 3.775231846912942*^9}},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"0a69aef8-78a8-4cf8-b66d-a37014e7be9d"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles amplitudes\"\>"}],
+  SequenceForm["> Top. ", 1, ": ", "2 Particles amplitudes"],
+  Editable->False]], "Print",
+ CellChangeTimes->{
+  3.775231768106307*^9, {3.7752318298241873`*^9, 3.775231846924202*^9}},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"9a16ae74-376e-4d33-9575-b8580e1dda90"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"in total: \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles amplitudes\"\>"}],
+  SequenceForm["in total: ", "2 Particles amplitudes"],
+  Editable->False]], "Print",
+ CellChangeTimes->{
+  3.775231768106307*^9, {3.7752318298241873`*^9, 3.7752318469290953`*^9}},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"8e0c3466-f808-4bca-b876-18a2b1476dd5"],
+
+Cell[BoxData["\<\"\\npreparing FORM code in \
+/Users/josegabrielreyes/Documents/Higgs/Mathematica \
+Scripts/ggHgg/FinalSetUp/fc-amp-2.frm\"\>"], "Print",
+ CellChangeTimes->{
+  3.775231768106307*^9, {3.7752318298241873`*^9, 3.77523184693394*^9}},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"35ee2603-e9bb-4b7e-a519-e78710c52746"],
+
+Cell[BoxData["\<\"running FORM... \"\>"], "Print",
+ CellChangeTimes->{
+  3.775231768106307*^9, {3.7752318298241873`*^9, 3.7752318469386873`*^9}},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"2ee79172-4eea-4f37-b17b-c22e5621d3bb"],
+
+Cell[BoxData["\<\"ok\\n\"\>"], "Print",
+ CellChangeTimes->{
+  3.775231768106307*^9, {3.7752318298241873`*^9, 3.77523184694348*^9}},
+ CellLabel->
+  "During evaluation of \
+In[23]:=",ExpressionUUID->"611d5430-681d-49d4-b788-84164592a054"]
+}, Open  ]]
+}, Open  ]],
+
+Cell[BoxData[{
+ RowBox[{
+  RowBox[{"process", " ", "=", " ", 
+   RowBox[{
+    RowBox[{"{", 
+     RowBox[{
+      RowBox[{"V", "[", "5", "]"}], ",", 
+      RowBox[{"V", "[", "5", "]"}]}], "}"}], "\[Rule]", 
+    RowBox[{"{", 
+     RowBox[{
+      RowBox[{"S", "[", "1", "]"}], ",", 
+      RowBox[{"V", "[", "5", "]"}]}], "}"}]}]}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"name", " ", "=", " ", "\"\<ggHgg-SM\>\""}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"SetOptions", "[", 
+   RowBox[{"InsertFields", ",", 
+    RowBox[{"Model", "\[Rule]", "\"\<SMQCD\>\""}]}], "]"}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"$PaintSE", " ", "=", " ", 
+   RowBox[{"MkDir", "[", 
+    RowBox[{"name", " ", "<>", " ", "\"\<.diagrams\>\""}], "]"}]}], 
+  ";"}], "\n", 
+ RowBox[{
+  RowBox[{"DoPaint", "[", 
+   RowBox[{"diags_", ",", " ", "file_", ",", " ", "opt___"}], "]"}], " ", ":=",
+   " ", 
+  RowBox[{"Paint", "[", 
+   RowBox[{"diags", ",", " ", "opt", ",", "\n", "  ", 
+    RowBox[{"DisplayFunction", " ", "->", " ", 
+     RowBox[{"(", 
+      RowBox[{
+       RowBox[{"Export", "[", 
+        RowBox[{
+         RowBox[{"ToFileName", "[", 
+          RowBox[{"$PaintSE", ",", " ", 
+           RowBox[{"file", " ", "<>", " ", "\"\<.png\>\""}]}], "]"}], ",", 
+         " ", "#"}], "]"}], "&"}], ")"}]}]}], 
+   "]"}]}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"ClearProcess", "[", "]"}], ";"}], "\[IndentingNewLine]"}], "Input",\
+
+ CellChangeTimes->{{3.775232524365862*^9, 3.775232526573709*^9}},
+ CellLabel->"In[5]:=",ExpressionUUID->"e57cdab3-afd9-427f-89f7-863e6dfd567d"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{
+ RowBox[{
+  RowBox[{"topsT", " ", "=", " ", 
+   RowBox[{"CreateTopologies", "[", 
+    RowBox[{"1", ",", 
+     RowBox[{"2", "\[Rule]", "2"}], ",", "TrianglesOnly"}], "]"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"insT", " ", "=", " ", 
+   RowBox[{"InsertFields", "[", 
+    RowBox[{"topsT", ",", "process", ",", 
+     RowBox[{"InsertionLevel", "\[Rule]", 
+      RowBox[{"{", "Particles", "}"}]}], ",", 
+     RowBox[{"Restrictions", "\[Rule]", 
+      RowBox[{"{", "NoLightFHCoupling", "}"}]}]}], "]"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"Paint", "[", "insT", "]"}], ";", "\.1c"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"amp", " ", "=", " ", 
+   RowBox[{"CalcFeynAmp", "[", 
+    RowBox[{
+     RowBox[{"CreateFeynAmp", "[", "insT", "]"}], ",", 
+     RowBox[{"SortDen", "\[Rule]", "True"}]}], "]"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"amp", "=", 
+   RowBox[{
+    RowBox[{
+     RowBox[{"amp", "//.", " ", 
+      RowBox[{"Abbr", "[", "]"}]}], " ", "//.", 
+     RowBox[{"Subexpr", "[", "]"}]}], "//.", 
+    RowBox[{"Abbr", "[", "]"}]}]}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"Export", "[", 
+   RowBox[{"\"\<ggHg.m\>\"", ",", 
+    RowBox[{"amp", "[", 
+     RowBox[{"[", "1", "]"}], "]"}]}], "]"}], ";"}]}], "Input",
+ CellChangeTimes->{{3.775233566129477*^9, 3.775233572343359*^9}},
+ CellLabel->"In[11]:=",ExpressionUUID->"25cf9944-5be2-40ab-999c-e1a6d72c9b57"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["\<\"\"\>"], "Print",
+ CellChangeTimes->{3.775233573905937*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"f2cd56db-9151-48dc-a86e-a305e8a23ac8"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"\"\>", "\[InvisibleSpace]", "\<\"loading \"\>", 
+   "\[InvisibleSpace]", "\<\"generic\"\>", 
+   "\[InvisibleSpace]", "\<\" model file \"\>", 
+   "\[InvisibleSpace]", \
+"\<\"/Users/josegabrielreyes/Documents/Higgs/FeynArts-3.10/Models/Lorentz.gen\
+\"\>"}],
+  SequenceForm[
+  "", "loading ", "generic", " model file ", 
+   "/Users/josegabrielreyes/Documents/Higgs/FeynArts-3.10/Models/Lorentz.gen"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775233573910882*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"97366807-d64a-4614-a114-c78895336738"],
+
+Cell[BoxData["\<\"> $GenericMixing is OFF\"\>"], "Print",
+ CellChangeTimes->{3.775233573919277*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"591c4cb2-c53e-4379-b00f-15b18c85f807"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"generic model \"\>", "\[InvisibleSpace]", 
+   RowBox[{"{", "\<\"Lorentz\"\>", "}"}], 
+   "\[InvisibleSpace]", "\<\" initialized\"\>"}],
+  SequenceForm["generic model ", {"Lorentz"}, " initialized"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.77523357392411*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"5ac74ad6-1dcc-4352-9c5b-20885c358649"],
+
+Cell[BoxData["\<\"\"\>"], "Print",
+ CellChangeTimes->{3.77523357392915*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"058cb2f3-6cb5-4bc1-b0ac-3ecaa2465aef"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"\"\>", "\[InvisibleSpace]", "\<\"loading \"\>", 
+   "\[InvisibleSpace]", "\<\"classes\"\>", 
+   "\[InvisibleSpace]", "\<\" model file \"\>", 
+   "\[InvisibleSpace]", \
+"\<\"/Users/josegabrielreyes/Documents/Higgs/FeynArts-3.10/Models/SMQCD.mod\"\
+\>"}],
+  SequenceForm[
+  "", "loading ", "classes", " model file ", 
+   "/Users/josegabrielreyes/Documents/Higgs/FeynArts-3.10/Models/SMQCD.mod"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775233573933951*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"18d6278c-bfd9-4a02-853c-aea62833816a"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"  \"\>", "\[InvisibleSpace]", "\<\"loading \"\>", 
+   "\[InvisibleSpace]", "\<\"classes\"\>", 
+   "\[InvisibleSpace]", "\<\" model file \"\>", 
+   "\[InvisibleSpace]", \
+"\<\"/Users/josegabrielreyes/Documents/Higgs/FeynArts-3.10/Models/SM.mod\"\>"}\
+],
+  SequenceForm[
+  "  ", "loading ", "classes", " model file ", 
+   "/Users/josegabrielreyes/Documents/Higgs/FeynArts-3.10/Models/SM.mod"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.77523357393896*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"322604d9-27bf-4686-837f-2e0ee3a20bc7"],
+
+Cell[BoxData["\<\"\"\>"], "Print",
+ CellChangeTimes->{3.775233573943948*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"444bbc44-83b9-4831-a0f3-7a477ec669d5"],
+
+Cell[BoxData[
+ InterpretationBox[GridBox[{
+    {GridBox[{
+       {
+        RowBox[{"$CKM", "=", "False"}]}
+      },
+      BaselinePosition->{Baseline, {1, 1}},
+      GridBoxAlignment->{
+       "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, 
+        "RowsIndexed" -> {}},
+      GridBoxItemSize->{"Columns" -> {{
+           Scaled[0.999]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}}, 
+        "RowsIndexed" -> {}}]}
+   },
+   BaselinePosition->{Baseline, {1, 1}},
+   GridBoxAlignment->{
+    "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, 
+     "RowsIndexed" -> {}}],
+  Definition[$CellContext`$CKM],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775233573949139*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"0c1ace26-0d15-4f70-8b7e-791b9f20a92d"],
+
+Cell[BoxData["\<\"\"\>"], "Print",
+ CellChangeTimes->{3.775233573954011*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"b6554e42-f28d-4abd-9e59-35185c0b9ab4"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> \"\>", "\[InvisibleSpace]", "49", 
+   "\[InvisibleSpace]", "\<\" particles (incl. antiparticles) in \"\>", 
+   "\[InvisibleSpace]", "18", "\[InvisibleSpace]", "\<\" classes\"\>"}],
+  SequenceForm[
+  "> ", 49, " particles (incl. antiparticles) in ", 18, " classes"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775233573961372*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"52b22c0d-1be7-45e1-b26f-62f56c686ad5"],
+
+Cell[BoxData["\<\"> $CounterTerms are ON\"\>"], "Print",
+ CellChangeTimes->{3.775233573968718*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"ae0fac83-3d76-4603-870c-b303847faecf"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> \"\>", "\[InvisibleSpace]", "93", 
+   "\[InvisibleSpace]", "\<\" vertices\"\>"}],
+  SequenceForm["> ", 93, " vertices"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775233573975807*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"515c0d38-9447-4913-81fa-858854a1a8ad"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> \"\>", "\[InvisibleSpace]", "121", 
+   "\[InvisibleSpace]", "\<\" counterterms of order 1\"\>"}],
+  SequenceForm["> ", 121, " counterterms of order 1"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775233573982625*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"ade41026-c5c4-4a87-a9d5-f1626f0db59b"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> \"\>", "\[InvisibleSpace]", "6", 
+   "\[InvisibleSpace]", "\<\" counterterms of order 2\"\>"}],
+  SequenceForm["> ", 6, " counterterms of order 2"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775233573989883*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"1919b7af-dc1f-4958-b112-78516e8bb11d"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"classes model \"\>", "\[InvisibleSpace]", 
+   RowBox[{"{", "\<\"SMQCD\"\>", "}"}], 
+   "\[InvisibleSpace]", "\<\" initialized\"\>"}],
+  SequenceForm["classes model ", {"SMQCD"}, " initialized"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775233573994588*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"56d8aaeb-9e82-4924-9b7f-f1007e7a6c7f"],
+
+Cell[BoxData["\<\"\"\>"], "Print",
+ CellChangeTimes->{3.775233574052476*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"218173f8-e193-4643-bda7-22c3083dfd5d"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"Excluding \"\>", "\[InvisibleSpace]", "18", 
+   "\[InvisibleSpace]", "\<\" field point(s) (incl. charge-conjugate \
+ones)\"\>"}],
+  SequenceForm[
+  "Excluding ", 18, " field point(s) (incl. charge-conjugate ones)"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775233574057172*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"ebc16c22-4a15-418d-9994-36b4211d3203"],
+
+Cell[BoxData["\<\"\"\>"], "Print",
+ CellChangeTimes->{3.775233574061633*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"a99734f3-02af-46cd-8ecc-2d966df3a023"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"inserting at level(s) \"\>", "\[InvisibleSpace]", 
+   RowBox[{"{", "Particles", "}"}]}],
+  SequenceForm["inserting at level(s) ", {FeynArts`Particles}],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7752335740664682`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"b0191d8f-94e2-456f-a6e0-8db9f1df6e93"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 1, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775233574089262*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"b684a907-4f41-4c15-a472-b20c034f079d"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "2", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 2, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775233574107688*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"406616fe-23e8-4694-bf2e-20f1f1b67dbc"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "3", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 3, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7752335741252737`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"d8cef9f3-3f74-42d8-811a-bce0f43cc9e3"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "4", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 4, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7752335741599607`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"521d1396-1d63-4409-9f36-5ac0d3e55cb8"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "5", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 5, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775233574198525*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"3e5ad14a-0e0d-484f-a305-2fd4096b9b65"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "6", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 6, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7752335742141953`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"25104315-57c2-41f9-a314-a74813661958"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "7", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 7, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775233574218885*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"368fc5f5-f94b-4e7d-9101-a74064024813"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "8", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 8, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775233574223363*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"0e31a2e1-23f1-49b2-a288-8b5329eec172"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "9", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 9, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775233574227847*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"21aa083d-9546-402b-af2c-d4b21724e2e0"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "10", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 10, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775233574232497*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"2c68120c-9a00-402f-a9fc-f12eb5ecfcd5"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "11", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 11, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7752335742370033`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"c973d02d-6dae-41b9-b0b9-074885ba0203"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "12", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 12, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775233574241647*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"b9cc82c2-c3a0-431c-9b12-55a74a2fd48d"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "13", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 13, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775233574246243*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"ad1a85cd-ece0-4b7e-b4e4-4008725176c1"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "14", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 14, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.77523357425105*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"f0b9c82a-174d-4ab4-9c52-2b68fa304f92"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "15", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 15, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775233574255945*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"e18e5077-47a7-4f5c-8a26-d7dc4748f769"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "16", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 16, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775233574261004*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"b67cdebb-2aa1-4b69-b4e6-edfcc425accb"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "17", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 17, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7752335742660837`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"85a8efca-f6b4-43ea-9018-d1eda30136cd"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "18", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 18, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775233574271112*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"51e6d271-ea79-4e14-9388-5d433aa4ea91"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "19", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 19, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775233574276095*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"599d632e-30f4-4141-b230-cbbc57d098f6"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "20", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 20, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775233574281044*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"efd668bc-7019-44b6-929d-cb0275ea466b"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "21", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 21, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775233574285932*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"57935798-9fc4-4d1b-8f4b-51e3b78d497b"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "22", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 22, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775233574291098*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"dca33d91-02ee-4ea3-8cfe-dd8d7ee51ac7"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "23", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 23, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.77523357429628*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"fb00eab7-4540-432c-bf2b-aabd8d52e80c"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "24", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 24, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775233574300679*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"cb8cb0d0-43ad-4a8b-9a92-3917da9ea54f"],
+
+Cell[BoxData["\<\"\"\>"], "Print",
+ CellChangeTimes->{3.775233574305369*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"2a91fd5c-e55f-4c43-a3b8-465708e93b22"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"Restoring \"\>", "\[InvisibleSpace]", "18", 
+   "\[InvisibleSpace]", "\<\" field point(s)\"\>"}],
+  SequenceForm["Restoring ", 18, " field point(s)"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7752335743100977`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"560f3c5e-5408-4bbe-9b17-97e16eaa19ca"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"in total: \"\>", 
+   "\[InvisibleSpace]", "\<\"6 Particles insertions\"\>"}],
+  SequenceForm["in total: ", "6 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775233574315154*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"f4458dab-a0e9-44a7-a3c1-2ed4232044e1"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"aebe/cfdg/ehfgfhgh.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm["> Top. ", 1, " ", "aebe/cfdg/ehfgfhgh.m", ", ", "2 diagrams"],
+  
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775233574320011*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"b3135132-833f-4e4c-9589-e9c3503078f0"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "2", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"aebf/cgde/ehfgfhgh.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm["> Top. ", 2, " ", "aebf/cgde/ehfgfhgh.m", ", ", "2 diagrams"],
+  
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775233574325057*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"4f78b7ae-5549-42fc-9314-36c2c698fa96"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "3", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"aebf/cgdf/fhegehgh.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm["> Top. ", 3, " ", "aebf/cgdf/fhegehgh.m", ", ", "2 diagrams"],
+  
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775233574329958*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"71f57b0a-511e-41a4-ae1e-8b4f43f11a60"],
+
+Cell[BoxData[
+ GraphicsBox[{InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwV0w9YzHccB/DvVdMfFCKpixNKujhL1Irfz5br1OQkNrTck0My9Fx/xNO2
+X6Z1PNecnkpatZv0x2TOaqtVm6tlpT+cEK20Q+ZQ60wUK7f3956n557X8/n+
+vp/P+/Pr5sYciNhpQQhJwx/9JiYzPg4ssaGYzxJ2vhfvjj1LUud+nOAAq8d5
+strJLBHm8lZ4w9rEDHHVJJbIjaW3I2DRgq/6OiayZIznsjEdNuk+eWIPm0aV
+Kxro89bNuz+zY4ng+6UaqwUs0fQrN7nBVUO3I9fBhkMeqSZbnHMbM+TB2oDj
+0a9gfWDvxX6Yy8tZJcT5dqd6r8UeLJEZNgVlwnKbT28oYJPqcOY09JM65Mi0
+MInNaa2EY2W59/thaWlV+G7My33RfsXeE/cXOJW4I09FZ/CIEJ5yzIn0wLK6
+6Y9WwdwB26p05I/ybTkWDBuacrTODjTHt3tpnex0f3EcNvJzc31g3XrJ4C1a
+z+TUjvR+Sd2fJripszrkXzrv590WPXBwnud4Gyz66fWDk3CV6odFxbDg4CnG
+CdYHjew6DGvez3fdi/55XTaSSJonxyU3B/P17upb4wur5V7aAuSJGo0omkXv
+c1wyrkRekfm7QFtaXxm3Wo79iEKKiixpfq8HFgHYJz/lVAetE2Pt1Gk2LFHZ
+X5Lw6f50gZPfTGBJUPUSq0BYm/L26Zt3WHJr1tvYnXQ+29J0t3fofTu25dP5
+nD3891ixpGZ/UchdmLs54/hDS5bcldz1daP7tGg2nYCn3Cvs2kXdOlh2AK4v
+6df+CItWnS5Og527Dix6C0v38gsaYX/VxovihegnkPn64P5svrjjGKz3G15a
+C+ssFeuvUF9e2C3DPIn+qo9GYG6NUjwT8zddnZow2wv9VOL+Trj+RN35AFid
+eva+0polBcJ9WRLYlDN0YTHyG7fMCw6D4wNL42thtuxc7Pv0vPveQ/OwLyuF
+h/cSWHD++pkYeHr7DaEj9Y2sYgVc4b9fYUJ/3d+/hErhoxc2rbsKG07dLX6D
++7JT56zWwJp3B3gJcCRn9/ggnV8fbqrHPKNR8foION5zn10f5lXWndzjC2s/
+sqm/h3w1edZ9rrDo6zsDTcjvvNiR2FPXhXxTiH19mvrIdyKsbrsTp7BgSXl8
+6/bpsGmc7x3OQ5+JA/e96PmBa1GBBL+Xte6qMDqfqjgx4y1DYgvMJSl03yOu
+WX+NMWS0zeLlRZgt4T1X/ceQAqO6dYieF5wvPf2GIVOWO89cjvxcpKNqIjw8
+40gaB+tORPz38DVDWl4b09phw42VujmoC1bFfD5zEe7f1hNUDUuCs43RsME8
+SVeE+/nClq0aWNOTbdeM/socYWU3zG4+NuaG+eqVjkJbb/y/JqftOGFmSM0M
+53gf2BDmaTqCPB/2i8+tgfVNEwb9kJdfXnh8A6yZeT+gC65oTNpIrUtoDdqK
+/cj3VbbT8+qs7MJfYJsvuhkRLJryw9lBuGXZ7thpsNaVy3gO80Uesn/ovILH
+RY2wZIsk4w9Y3bktXQbXPJHvKaR1h2TXDvRTHs7QJMGm0FzFJJiMn67eAEsL
+y4rmY17Zi0OTl9F9vLZ/8B7yaa/zamfDspgQhiC/XByQ7Ejzx3M1F7BPUl6n
+pBbYODV8PIL38aVv9Ry6r0tio9NLhph4J1f607rU/HDsXzy/fHtbFLVwbYnb
+c4aoHm/OUMH44fEchxgStWLCLDo/t2vD0/wB7PuDOTXWyMsVX/Z59JQhurjL
+7Hrq+XihTxgikrSE5dP9Ryfo78EVc/1C/6b13/rtjuK8+hu/MyIh6m38yt5n
+DIlMamxPhnVKXua1Qbzfq9sUP8OCuNnNfBNDeofPpQ/CnDlqQSrm477s3Ori
+g7re67oJ8yttU2oDYU14DLtzmCFWAZlDUlq3Vo78jrzl4dHXt8CyO9K40VcM
+uVWdVLcZNrQuHxrCfvS54kIJfX64/GT+KEOCk6/1iGBuu6L5GSx6VRw2Fdbt
+CDX/CZ/9ytNlAPOw0kALOaxNa6z6HTYEZM7LwH15nesu5MOahukr16Jf0E/d
+BQnUSQ4plZhPXeo+YQPNd8bc34n5reIsA/zoPl4ueFyNvP6mhf7udB/i7cNP
+se9hue+ZWbRfQl0Va8S8LZJv+fR8Q+LSgocMybZ6dtOb7ic84pS0jyHOXNmW
+EOrRwoOuXTivffHrfnr+tqvdlQ6G2NR+YP0d9dfuLi0N2Ac7V9dLHW2ZtfoS
+QxKXNVkLkJcIQvmp2XgfGfFlsdRs3s28HZdJxdES7ypq+lH/SibR78Xs/1a3
+8aQ=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {1.3944533453633028, 12.136522676290642}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwV1Q1Qk0caB/BFUPALoQhEpBDEIkqwcQANNfKuAilTTsBiQT6ESBVRFCIS
+pE7LxU/ChxrwC6kcORWFcrZpQUHFgkglgGiAa0HlxlhQqBaIQr2US+X+m5lM
+5je77+7z/N/diVtS+qfbphFCDuDLfolhCp95lBjZrzslwxlOe6fZUFJyuMKr
+Fpamtlr2YnziqOxKCmzzPH1cDu/ybbHkw/zezTkD1pToqFtT/yJK1OsSvnOH
+LW4GWv4TbqJzisRzKanXjN9Ogw3X7Ef85lBCFFdiPoZ1Dy+M82ZTorJ41ePF
+xhd1dY/NpKRBG1LuDAuXD6/7yYqSvq0+FxbAsum751yypERg8BQtgvkfKo6d
+mUGJ1U5zfz+YBhsDL0+n5PDlRTM2wKRcvuWJBSWe1x6d38v2S/JPE8OHu9df
+LWXrRf/6rtOcEuWB5tq7bLwzVlEMf3l0idPvsEIncc6HxW8vhtqiX80Rr7of
+YFHWgydClk/pVisrrFd/RlIWAutO9rYfgv9VJ78VBStMqy1cUI86LOFhDKzu
+e5DYCZtEx8Yi2HqOqSW5qD9zZvbN1TBVbBhZi/6yD3XHOsGkQ3b+NaybqDoy
+wvIta4wvRB4WbXEZ12GbTlGPFfKi8ub7WbBUJ/krAVZ+7XdByMY9BwqUcKGb
+3ycv3CjRr4z3OgAvDtGGlsI6B1WtBL60s5GGM1ekBj/C+psCXest4SbVGW41
+HLRqxoJ7fHhHnPce1CMbisotZI4mxw+g/oiViR3xzJf7CzLRn9asaI0IJqbM
+8kjkUXLIp84V5msb3ZcivzmVt5R2sCwsXj9lhnwl/lnM0kPG478SSiofmt10
+gdUtmubrUxwRj38x1xemO3uchv7iiNF0rm4Ds96ubZuJI4r9uWo52y825I+A
+/3FE9dvWHWWsntsrmvdPckQYE5LL6le0Thmc4eEPPaSjrJ6nF68vhmt9t6e8
+h37Vj39pKYQNOY84IcznpR4NxXoRu2vuB7ux87CmMBL7lTTLIzewPOVvPjiF
+eqwqy/KZ+Snfu06+40jIoKSKzVcFcWEi9KOy58m8Yc3GW2avWX9KO8FMWFp8
+bf959K86Lah5xPpR/FkunIb3I9DGqlk/nxZvucQcdGo4AbZxfOZqgJ0DknIc
+YV1d1DRr5Ckd7zI/54r78tlb/0mMZ3tZmJvBqvRvBDWwzS7h8l0uyNv777n+
+sGeX2+mn78MWb1aqsH/f2ekvE2Gp/7fBDahPLZoKfe2M/DySJHnIP7s4iHcW
+Vljcq/oc/Woc++5GwtKUiGULkQ/v2alGTzZfKWtrMXJEaWzf7gCTwQiPrLcc
+EcV7EGc2P2IsN2iCI3TFvIZVzJoPXgW+4Yg2y70nmc1PSHI9auBI/Q29ugKm
+fuFGn1HkTewfjLHx8jKZ/e8c6TMGHKSol2zl/fzjS47oY6tLi2F6q3aPHxyx
+p39Qz7zxTqYcFpVcjPFA/wp5pFPGK5yfgb9FJTDbbl/jMMKRTWGRXYdhUrU2
+JHgM56NGojwDN82oE48a2Pl5vLgI1g9lrIpFvTLXfdF7YXXmWEbXOJ4/6f5C
+DEsV364P+AP1yHjfjbI8TzmeL0D/2ZaD/8hn9TZy5yr+i/pFhaV2bHxpa+t+
+5CXlXUk4hv7UBzvrTbC++ulG00LMT12s4f/JEc/Qti3bYGra46LHuPDm6qud
+Tng+5t+vRHBTkWb7R8wPak54Y/2Q/4hPaBbAIzUTLahHdPzedV9Yb22+bBby
+1/iYutp5OK85yuezWT9piVZZsCJh/o069K91TioSwTRu38RC5EUNy7+2g4lV
+9GTaC7zv4+I1lsw/BM7uf4Z63gXue4/5cW2O0xO8f0OF2Id5k1d4ZA/262wo
+SGbujpOEteG+XLVVVTI72M4V3UY+X4x2TjBXFq/NrcZ+CzZ/JkG9REVP5hSj
+fmH45FlmdVreJzm47xXpJwaZjb1xeadxX53M3Jagf9KQvCrwKur3F3jHMUd9
+PPJbA/K2Duj9ktlyR+OlVo6ok1V2ecw3QqeWdHFEl7W0/StYwQvtffkLR/gV
+eaMxbPx+bP5P/Rh/V1LwPkwTv/lZiH7VTYK7bdifdti3XxvgSIrLsjtSuOmr
+SuuO5zivNn0XnrN+yqqmhw8hX+/syHiWJ6/3iMcw5u+rT2xzxHyH5HkBsO4j
+450VsGJXf1U+5tOn1VWlDvCzAeks5C3a+DmdyWxSxrZgP+1r2/SD9vDOoSNa
+Pd6/ue/lWczRLR2bHyNP3frqivmwnWFK0I37IDBPi5rP+t09cqIZz6/TvHBh
+Zh/VbTLM/v/t6P8BMRH5/w==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.6055466546366968, 7.136522676290642}, \
+{-1, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000003638`, 15.}, {16.000000000005457`, 13.5}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.543539525935092, 14.862427930839758}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt1A841HccB/Df/A9xODkX7TbsTsb8KVR77LdOWPmvNGM9DisrDZMZtp2e
+jsLouMZSjciU1NAx1XLS/Jl/U9h6Jutw/nQkkh6M7P3ds9/z3N3zej6f3/f7
++Xx+39+9EREb+IkKRVHB+JBf6jXyZU9T/11smlK17vHkwnJXUdZ2+MtQvswf
+TtP+kbsX7tpApaeQfLuXx3bDL8SrtaUwXT7MNYcDGg+ktpH4kplhjylNiVX7
++BOw/d8aGgL4iyTlHcoBflJ+fpBFU/XaymVDuLewVu4O7w1/nmwOV5s1jF4y
+oamHGaXvcGBKWspXgwMUzRkbYf+tryqObKAp/oWZEAYczi13GzWmqa9szo+v
+YT9G5uX3Poc/jN19awpuiu4QboK7ds0WDZB+VjRZ00yaKo1ixsjg2aA47hBc
+UGNleBWOm1uonYMb8lr3FZH8zRblXNz/tWdjey7MeVr3NAV+Ebn5eiZcssKX
+jcFb9EMmsmGx4P2JcNTHi/5s/DtST4HjDgUcLCmuqCDzPZ3PPIR+rD49XNNE
+9vMx7pfD0rHWjXJSj4cw6gPMY7lx7IIa+pMr/erOwptMqy6+DccNLVp1wXMm
+LaHBsHhy1+Aj+K7bo3EhyU9WLP0Ga4VEhleQeUnzmiVwzaKdeifMMOXnvgvr
+Djt7PyH2EVW2Y391xegq5Yh+Y7ksN3ibeaaHAcyx4dlfQv39C8+aTUnc3XqL
+Kukv2zWDDfvfsb4fif5jc+pYTLg36PG5HszP9qOBWE04TkOUuwc++YPk8QL2
+41R2nx42oqlvFP4aw2R/yx3aBXCM105pB4k3Ks/GwMX2M79LSX+2fw4chAs/
+3r/tIsk/fNNFBCfEZ1/LI3Fq1aIZZqu4V52ES5J8Dcywn8UDa4EIbgqL6c6G
+X//VMP8UnDbBHVyHejubPSVnSFxVTZED1xeIdl4m563qZ2d99Pegb1XrHlk/
+ibknHVaW+SpGSXxYyJ+E2cK2xHXob1YjMMoB84rTcTZxJP3mqKeEwrVWU/Oh
+sHiAx4uEh46dsEwnzhKYecJbW7o6r8J0deqbWrC3t4FTD8woCmJdwfrzi2yF
+Em7KCWy2g52+jZRRToi7GJ0oRr2sCM56fdhfN3lZBbbW454yhuX7lvME6Jcl
+Vo9gwk1nllbuYT7xfgxaF+bclkkd4e91JA6vsD51SJlUZ0hTYZa3iqeIw6b7
+A+H8hzzXP0i9RgWt+rB73fE+GWyfmBX9zADP60ZkSCVcPcNqfw5n/iUqKyT1
+l3n2s5Bvk1AiyCTzaFg7egDOsx1ZSyPuPFjYCN+UB+QJyXpLhTJST/VMhozM
+h75Gv3UD9kosapKQ8zS4PcCFvK/zs0FXYDnDNqcePp6s29pC5v9SHM9D//fH
+bf+ZgEu6vcPT4apUyzQ9Mo8R36VWuI/tU+IC07f9Uifhc78kCAWwOHVVZ4Kc
+h3A95yw47qjX6F14UGE58xM8u+i2n7zv7dft1npJ/vqWNiN4pMNNc5o8D4/Q
+IxLUs0Yup///T5n0v/Ty6cU=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.20997225642612, 4.248059350469649}, \
+{0, 1}], LineBox[CompressedData["
+1:eJw9lXs0lGkcxydbi5VLmdHMuI73fV1ySUUrWv0q16jccltlGmy0aWVV7rkl
+tI6w5DJMknAoiUpIZYWULlqVmmRzz4bKMF2wj/3jec+ZM+dz3vM8z/v8fr/v
+98vh/ebsL0Gj0cLRb/F/f+8Cegig/f+Q0HDT6HvGX4i5y1w6HxAQwrw1mx6N
+WLxWy7SUAEZqyETPWsTwwtzuFAFiuTpH/ltNoOVGTjvEEmDQs6/9biZix4Pe
+TxIJ0LKMH9tkhVjhp/mCXAIc0q3iHn7jAK3827OqBgKWKH5yXtaEOHjWyn6M
+gPv2XWbSJxBPJTuqaJLAq0uzT/BE/LiLtYVHgs5FpluyGeL6we+iLpAQPCGc
+TNVBLGWb7zVOgsBZtWo3gdhDrMUzoKC12qRbdjVijQc1mwIpSDqjGmRhjrj/
+KzFYQMEu+wxy3HXxPF3evRYK8nVaxitCEScH+4peofd6PhtbzixyZ57mMAU8
+ItjEsRHx6HHfrn4K6pVPKR0QIuaq15g9oKC6teO+lRixkVpqaAUFjnMysnuW
+o/v3sws3RVDw8l3DQpoS4tvcFBFQQBqu6NzAQCylJ5lIo+Do2bDL2yURi7dF
+6zaR4B6fVunzL9ovrHjE8xgJPcZFbbWti/tbr0k3IaHfKIO2OgOxbZ+xyhdU
+3/KBZxYuiGOzny7pIKBWyV9OtHyxXnZSHcUEzNx4U9N4WwNozNvr96QQMKz+
+OWfnYcQvstXnjhNwx/IKLYuD2HSrNCeJgEmHbufBcnVU/+tx4QUE+FqL1+1n
+IU6eDv7YTAD/ZJ7flTw1dF6K9J0JAqpsAmPmDBBDwmyEDgkGnwK50b2qaH1h
+kUkgCUOrjZvNihDHBj2tvEjCjoxHPbNRiLle2gEfSaCuSl/QOoI41+z8h/Wo
+fwIBZyoR8dRUnfgQBVHHbtEcKhCfdZqJO0uB4UDnV+0+xAENbcvbKMjJ4/7O
+V0Pni8eKa19TsHYnX6jnj9j2zQVL1D83ib6b0lWIR1/94PSGgvux0mX+7xGf
+Hq1Zd4+CUs1p72sEuh/39HnJUgrMbTWDlmxHXB9RWBJKgUG1aZqyN+LR9MAw
+MwomsrST+twQX56yP/qZhMIfOz84mSL2sJkfqiNh+XBsY+sC2j9AYGoRjPpn
+OMZ8dhFx2IuhGUMSHOz3ngiyRFw/a+M9TQBFL9M614buA2mOfkiHx/zmnmea
+LtaHtju5iIAw6/w3RgIVVB87udKTBLjyF/WrjNZD/FvUPyfw13jEVcbvnTUl
+dILa2Xh9IunRu2cjG+8fbV4ckdnIwudPuyuN6Dqz8PcVOcdYmtNY+Pv1d5nI
+XWpn4vsJPz4P51Qw8f1jUtpCBkuYuD7pFq8z568ycf20/GRK7IRMXN/+6yKP
+/JUsXP/QRM7WGRcW7k++qS/xdz4L948hKPrD9x8W7i+/xHjpCw4b93+nPCzU
+urHxfAzn+vTJR7Lx/JQ+EXn2prLxfEWL1qyWSmDj+bsre3/L3X1sPJ/8rGxB
+vBYbz6/q5pw4iW4Wnm/ZGv+CHb+w8Pz7g2RX7jAT66NhXP+isjsT60erOn++
+t2kV1te8tWw3T3UV1l9T62Z+cowS1uc2GZMBxjAD69dog6lzvCcD6/vdM+F8
+5Ws61v/Cw5aQ3KN07A8q8YPloE3H/tE8Kys48EER+wtPKPw1s0cR+49STQpt
+sFsR+5OMxciQ1Ygi9i+H6qCAUHk69jevXWPdejZ07H+jH9SyfVLo2B9l30Ja
+5GM69s8ck0idKiUG9le5c8Jrum4M7L/N7q1UQgoD+/M27T9/HqxkYP8+mNVa
+5nqDgf19vMJK490lBvb/cP2HLpOpDJwPQ48GAj47MHB+GE/6pb4X0XG+dHBZ
+XqKTdJw/CuzQOd73dJxPUfNf9JOOKOL8OiQ0Pxz6ciXOtxvsM3vbzVbi/BOE
+sAlX/gqcj8O74xT6l67A+bnhZuGnnnAFnK+iskX9yuP8/Q9W7QZF
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7., 11.645199999999999}, {0, -1}], 
+        LineBox[{{16., 13.500000000002307`}, {16., 6.499999999998607}}], 
+        PolygonBox[{{16., 10.6}, {15.6, 9.4}, {16.4, 9.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.9452, 10.}, {-1, 0}], 
+        LineBox[{{16.000000000007276`, 13.500000000003638`}, {
+         10.000000000005457`, 10.}}], 
+        PolygonBox[{{12.48173265946094, 11.447677384685548`}, {
+         13.316718930329426`, 12.397834175673825`}, {13.719815750748694`, 
+         11.706811054955079`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.823799910437668, 12.484057296392571}, \
+{1, -1}], 
+        LineBox[{{16., 6.499999999996362}, {10.000000000001819`, 
+         9.999999999996362}}], 
+        PolygonBox[{{13.51826734053906, 7.947677384685548}, {
+         12.683281069670574`, 8.897834175673825}, {12.280184249251306`, 
+         8.206811054955079}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.823799910437668, 7.515942703607429}, \
+{1, 1}], 
+        {PointSize[0.04], PointBox[{4., 10.}], PointBox[{16., 13.5}], 
+         PointBox[{16., 6.5}], PointBox[{10., 10.}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T1", " ", "P1", " ", "N1"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"aebe/cfdg/ehfgfhgh.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "aebe/cfdg/ehfgfhgh.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {0, 44}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwV0w9YzHccB/DvVdMfFCKpixNKujhL1Irfz5br1OQkNrTck0My9Fx/xNO2
+X6Z1PNecnkpatZv0x2TOaqtVm6tlpT+cEK20Q+ZQ60wUK7f3956n557X8/n+
+vp/P+/Pr5sYciNhpQQhJwx/9JiYzPg4ssaGYzxJ2vhfvjj1LUud+nOAAq8d5
+strJLBHm8lZ4w9rEDHHVJJbIjaW3I2DRgq/6OiayZIznsjEdNuk+eWIPm0aV
+Kxro89bNuz+zY4ng+6UaqwUs0fQrN7nBVUO3I9fBhkMeqSZbnHMbM+TB2oDj
+0a9gfWDvxX6Yy8tZJcT5dqd6r8UeLJEZNgVlwnKbT28oYJPqcOY09JM65Mi0
+MInNaa2EY2W59/thaWlV+G7My33RfsXeE/cXOJW4I09FZ/CIEJ5yzIn0wLK6
+6Y9WwdwB26p05I/ybTkWDBuacrTODjTHt3tpnex0f3EcNvJzc31g3XrJ4C1a
+z+TUjvR+Sd2fJripszrkXzrv590WPXBwnud4Gyz66fWDk3CV6odFxbDg4CnG
+CdYHjew6DGvez3fdi/55XTaSSJonxyU3B/P17upb4wur5V7aAuSJGo0omkXv
+c1wyrkRekfm7QFtaXxm3Wo79iEKKiixpfq8HFgHYJz/lVAetE2Pt1Gk2LFHZ
+X5Lw6f50gZPfTGBJUPUSq0BYm/L26Zt3WHJr1tvYnXQ+29J0t3fofTu25dP5
+nD3891ixpGZ/UchdmLs54/hDS5bcldz1daP7tGg2nYCn3Cvs2kXdOlh2AK4v
+6df+CItWnS5Og527Dix6C0v38gsaYX/VxovihegnkPn64P5svrjjGKz3G15a
+C+ssFeuvUF9e2C3DPIn+qo9GYG6NUjwT8zddnZow2wv9VOL+Trj+RN35AFid
+eva+0polBcJ9WRLYlDN0YTHyG7fMCw6D4wNL42thtuxc7Pv0vPveQ/OwLyuF
+h/cSWHD++pkYeHr7DaEj9Y2sYgVc4b9fYUJ/3d+/hErhoxc2rbsKG07dLX6D
++7JT56zWwJp3B3gJcCRn9/ggnV8fbqrHPKNR8foION5zn10f5lXWndzjC2s/
+sqm/h3w1edZ9rrDo6zsDTcjvvNiR2FPXhXxTiH19mvrIdyKsbrsTp7BgSXl8
+6/bpsGmc7x3OQ5+JA/e96PmBa1GBBL+Xte6qMDqfqjgx4y1DYgvMJSl03yOu
+WX+NMWS0zeLlRZgt4T1X/ceQAqO6dYieF5wvPf2GIVOWO89cjvxcpKNqIjw8
+40gaB+tORPz38DVDWl4b09phw42VujmoC1bFfD5zEe7f1hNUDUuCs43RsME8
+SVeE+/nClq0aWNOTbdeM/socYWU3zG4+NuaG+eqVjkJbb/y/JqftOGFmSM0M
+53gf2BDmaTqCPB/2i8+tgfVNEwb9kJdfXnh8A6yZeT+gC65oTNpIrUtoDdqK
+/cj3VbbT8+qs7MJfYJsvuhkRLJryw9lBuGXZ7thpsNaVy3gO80Uesn/ovILH
+RY2wZIsk4w9Y3bktXQbXPJHvKaR1h2TXDvRTHs7QJMGm0FzFJJiMn67eAEsL
+y4rmY17Zi0OTl9F9vLZ/8B7yaa/zamfDspgQhiC/XByQ7Ejzx3M1F7BPUl6n
+pBbYODV8PIL38aVv9Ry6r0tio9NLhph4J1f607rU/HDsXzy/fHtbFLVwbYnb
+c4aoHm/OUMH44fEchxgStWLCLDo/t2vD0/wB7PuDOTXWyMsVX/Z59JQhurjL
+7Hrq+XihTxgikrSE5dP9Ryfo78EVc/1C/6b13/rtjuK8+hu/MyIh6m38yt5n
+DIlMamxPhnVKXua1Qbzfq9sUP8OCuNnNfBNDeofPpQ/CnDlqQSrm477s3Ori
+g7re67oJ8yttU2oDYU14DLtzmCFWAZlDUlq3Vo78jrzl4dHXt8CyO9K40VcM
+uVWdVLcZNrQuHxrCfvS54kIJfX64/GT+KEOCk6/1iGBuu6L5GSx6VRw2Fdbt
+CDX/CZ/9ytNlAPOw0kALOaxNa6z6HTYEZM7LwH15nesu5MOahukr16Jf0E/d
+BQnUSQ4plZhPXeo+YQPNd8bc34n5reIsA/zoPl4ueFyNvP6mhf7udB/i7cNP
+se9hue+ZWbRfQl0Va8S8LZJv+fR8Q+LSgocMybZ6dtOb7ic84pS0jyHOXNmW
+EOrRwoOuXTivffHrfnr+tqvdlQ6G2NR+YP0d9dfuLi0N2Ac7V9dLHW2ZtfoS
+QxKXNVkLkJcIQvmp2XgfGfFlsdRs3s28HZdJxdES7ypq+lH/SibR78Xs/1a3
+8aQ=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {1.3944533453633028, 12.136522676290642}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwV1Q1Qk0caB/BFUPALoQhEpBDEIkqwcQANNfKuAilTTsBiQT6ESBVRFCIS
+pE7LxU/ChxrwC6kcORWFcrZpQUHFgkglgGiAa0HlxlhQqBaIQr2US+X+m5lM
+5je77+7z/N/diVtS+qfbphFCDuDLfolhCp95lBjZrzslwxlOe6fZUFJyuMKr
+Fpamtlr2YnziqOxKCmzzPH1cDu/ybbHkw/zezTkD1pToqFtT/yJK1OsSvnOH
+LW4GWv4TbqJzisRzKanXjN9Ogw3X7Ef85lBCFFdiPoZ1Dy+M82ZTorJ41ePF
+xhd1dY/NpKRBG1LuDAuXD6/7yYqSvq0+FxbAsum751yypERg8BQtgvkfKo6d
+mUGJ1U5zfz+YBhsDL0+n5PDlRTM2wKRcvuWJBSWe1x6d38v2S/JPE8OHu9df
+LWXrRf/6rtOcEuWB5tq7bLwzVlEMf3l0idPvsEIncc6HxW8vhtqiX80Rr7of
+YFHWgydClk/pVisrrFd/RlIWAutO9rYfgv9VJ78VBStMqy1cUI86LOFhDKzu
+e5DYCZtEx8Yi2HqOqSW5qD9zZvbN1TBVbBhZi/6yD3XHOsGkQ3b+NaybqDoy
+wvIta4wvRB4WbXEZ12GbTlGPFfKi8ub7WbBUJ/krAVZ+7XdByMY9BwqUcKGb
+3ycv3CjRr4z3OgAvDtGGlsI6B1WtBL60s5GGM1ekBj/C+psCXest4SbVGW41
+HLRqxoJ7fHhHnPce1CMbisotZI4mxw+g/oiViR3xzJf7CzLRn9asaI0IJqbM
+8kjkUXLIp84V5msb3ZcivzmVt5R2sCwsXj9lhnwl/lnM0kPG478SSiofmt10
+gdUtmubrUxwRj38x1xemO3uchv7iiNF0rm4Ds96ubZuJI4r9uWo52y825I+A
+/3FE9dvWHWWsntsrmvdPckQYE5LL6le0Thmc4eEPPaSjrJ6nF68vhmt9t6e8
+h37Vj39pKYQNOY84IcznpR4NxXoRu2vuB7ux87CmMBL7lTTLIzewPOVvPjiF
+eqwqy/KZ+Snfu06+40jIoKSKzVcFcWEi9KOy58m8Yc3GW2avWX9KO8FMWFp8
+bf959K86Lah5xPpR/FkunIb3I9DGqlk/nxZvucQcdGo4AbZxfOZqgJ0DknIc
+YV1d1DRr5Ckd7zI/54r78tlb/0mMZ3tZmJvBqvRvBDWwzS7h8l0uyNv777n+
+sGeX2+mn78MWb1aqsH/f2ekvE2Gp/7fBDahPLZoKfe2M/DySJHnIP7s4iHcW
+Vljcq/oc/Woc++5GwtKUiGULkQ/v2alGTzZfKWtrMXJEaWzf7gCTwQiPrLcc
+EcV7EGc2P2IsN2iCI3TFvIZVzJoPXgW+4Yg2y70nmc1PSHI9auBI/Q29ugKm
+fuFGn1HkTewfjLHx8jKZ/e8c6TMGHKSol2zl/fzjS47oY6tLi2F6q3aPHxyx
+p39Qz7zxTqYcFpVcjPFA/wp5pFPGK5yfgb9FJTDbbl/jMMKRTWGRXYdhUrU2
+JHgM56NGojwDN82oE48a2Pl5vLgI1g9lrIpFvTLXfdF7YXXmWEbXOJ4/6f5C
+DEsV364P+AP1yHjfjbI8TzmeL0D/2ZaD/8hn9TZy5yr+i/pFhaV2bHxpa+t+
+5CXlXUk4hv7UBzvrTbC++ulG00LMT12s4f/JEc/Qti3bYGra46LHuPDm6qud
+Tng+5t+vRHBTkWb7R8wPak54Y/2Q/4hPaBbAIzUTLahHdPzedV9Yb22+bBby
+1/iYutp5OK85yuezWT9piVZZsCJh/o069K91TioSwTRu38RC5EUNy7+2g4lV
+9GTaC7zv4+I1lsw/BM7uf4Z63gXue4/5cW2O0xO8f0OF2Id5k1d4ZA/262wo
+SGbujpOEteG+XLVVVTI72M4V3UY+X4x2TjBXFq/NrcZ+CzZ/JkG9REVP5hSj
+fmH45FlmdVreJzm47xXpJwaZjb1xeadxX53M3Jagf9KQvCrwKur3F3jHMUd9
+PPJbA/K2Duj9ktlyR+OlVo6ok1V2ecw3QqeWdHFEl7W0/StYwQvtffkLR/gV
+eaMxbPx+bP5P/Rh/V1LwPkwTv/lZiH7VTYK7bdifdti3XxvgSIrLsjtSuOmr
+SuuO5zivNn0XnrN+yqqmhw8hX+/syHiWJ6/3iMcw5u+rT2xzxHyH5HkBsO4j
+450VsGJXf1U+5tOn1VWlDvCzAeks5C3a+DmdyWxSxrZgP+1r2/SD9vDOoSNa
+Pd6/ue/lWczRLR2bHyNP3frqivmwnWFK0I37IDBPi5rP+t09cqIZz6/TvHBh
+Zh/VbTLM/v/t6P8BMRH5/w==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.6055466546366968, 7.136522676290642}, \
+{-1, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000003638`, 15.}, {16.000000000005457`, 13.5}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.543539525935092, 14.862427930839758}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt1A841HccB/Df/A9xODkX7TbsTsb8KVR77LdOWPmvNGM9DisrDZMZtp2e
+jsLouMZSjciU1NAx1XLS/Jl/U9h6Jutw/nQkkh6M7P3ds9/z3N3zej6f3/f7
++Xx+39+9EREb+IkKRVHB+JBf6jXyZU9T/11smlK17vHkwnJXUdZ2+MtQvswf
+TtP+kbsX7tpApaeQfLuXx3bDL8SrtaUwXT7MNYcDGg+ktpH4kplhjylNiVX7
++BOw/d8aGgL4iyTlHcoBflJ+fpBFU/XaymVDuLewVu4O7w1/nmwOV5s1jF4y
+oamHGaXvcGBKWspXgwMUzRkbYf+tryqObKAp/oWZEAYczi13GzWmqa9szo+v
+YT9G5uX3Poc/jN19awpuiu4QboK7ds0WDZB+VjRZ00yaKo1ixsjg2aA47hBc
+UGNleBWOm1uonYMb8lr3FZH8zRblXNz/tWdjey7MeVr3NAV+Ebn5eiZcssKX
+jcFb9EMmsmGx4P2JcNTHi/5s/DtST4HjDgUcLCmuqCDzPZ3PPIR+rD49XNNE
+9vMx7pfD0rHWjXJSj4cw6gPMY7lx7IIa+pMr/erOwptMqy6+DccNLVp1wXMm
+LaHBsHhy1+Aj+K7bo3EhyU9WLP0Ga4VEhleQeUnzmiVwzaKdeifMMOXnvgvr
+Djt7PyH2EVW2Y391xegq5Yh+Y7ksN3ibeaaHAcyx4dlfQv39C8+aTUnc3XqL
+Kukv2zWDDfvfsb4fif5jc+pYTLg36PG5HszP9qOBWE04TkOUuwc++YPk8QL2
+41R2nx42oqlvFP4aw2R/yx3aBXCM105pB4k3Ks/GwMX2M79LSX+2fw4chAs/
+3r/tIsk/fNNFBCfEZ1/LI3Fq1aIZZqu4V52ES5J8Dcywn8UDa4EIbgqL6c6G
+X//VMP8UnDbBHVyHejubPSVnSFxVTZED1xeIdl4m563qZ2d99Pegb1XrHlk/
+ibknHVaW+SpGSXxYyJ+E2cK2xHXob1YjMMoB84rTcTZxJP3mqKeEwrVWU/Oh
+sHiAx4uEh46dsEwnzhKYecJbW7o6r8J0deqbWrC3t4FTD8woCmJdwfrzi2yF
+Em7KCWy2g52+jZRRToi7GJ0oRr2sCM56fdhfN3lZBbbW454yhuX7lvME6Jcl
+Vo9gwk1nllbuYT7xfgxaF+bclkkd4e91JA6vsD51SJlUZ0hTYZa3iqeIw6b7
+A+H8hzzXP0i9RgWt+rB73fE+GWyfmBX9zADP60ZkSCVcPcNqfw5n/iUqKyT1
+l3n2s5Bvk1AiyCTzaFg7egDOsx1ZSyPuPFjYCN+UB+QJyXpLhTJST/VMhozM
+h75Gv3UD9kosapKQ8zS4PcCFvK/zs0FXYDnDNqcePp6s29pC5v9SHM9D//fH
+bf+ZgEu6vcPT4apUyzQ9Mo8R36VWuI/tU+IC07f9Uifhc78kCAWwOHVVZ4Kc
+h3A95yw47qjX6F14UGE58xM8u+i2n7zv7dft1npJ/vqWNiN4pMNNc5o8D4/Q
+IxLUs0Yup///T5n0v/Ty6cU=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.20997225642612, 4.248059350469649}, \
+{0, 1}], LineBox[CompressedData["
+1:eJw9lXs0lGkcxydbi5VLmdHMuI73fV1ySUUrWv0q16jccltlGmy0aWVV7rkl
+tI6w5DJMknAoiUpIZYWULlqVmmRzz4bKMF2wj/3jec+ZM+dz3vM8z/v8fr/v
+98vh/ebsL0Gj0cLRb/F/f+8Cegig/f+Q0HDT6HvGX4i5y1w6HxAQwrw1mx6N
+WLxWy7SUAEZqyETPWsTwwtzuFAFiuTpH/ltNoOVGTjvEEmDQs6/9biZix4Pe
+TxIJ0LKMH9tkhVjhp/mCXAIc0q3iHn7jAK3827OqBgKWKH5yXtaEOHjWyn6M
+gPv2XWbSJxBPJTuqaJLAq0uzT/BE/LiLtYVHgs5FpluyGeL6we+iLpAQPCGc
+TNVBLGWb7zVOgsBZtWo3gdhDrMUzoKC12qRbdjVijQc1mwIpSDqjGmRhjrj/
+KzFYQMEu+wxy3HXxPF3evRYK8nVaxitCEScH+4peofd6PhtbzixyZ57mMAU8
+ItjEsRHx6HHfrn4K6pVPKR0QIuaq15g9oKC6teO+lRixkVpqaAUFjnMysnuW
+o/v3sws3RVDw8l3DQpoS4tvcFBFQQBqu6NzAQCylJ5lIo+Do2bDL2yURi7dF
+6zaR4B6fVunzL9ovrHjE8xgJPcZFbbWti/tbr0k3IaHfKIO2OgOxbZ+xyhdU
+3/KBZxYuiGOzny7pIKBWyV9OtHyxXnZSHcUEzNx4U9N4WwNozNvr96QQMKz+
+OWfnYcQvstXnjhNwx/IKLYuD2HSrNCeJgEmHbufBcnVU/+tx4QUE+FqL1+1n
+IU6eDv7YTAD/ZJ7flTw1dF6K9J0JAqpsAmPmDBBDwmyEDgkGnwK50b2qaH1h
+kUkgCUOrjZvNihDHBj2tvEjCjoxHPbNRiLle2gEfSaCuSl/QOoI41+z8h/Wo
+fwIBZyoR8dRUnfgQBVHHbtEcKhCfdZqJO0uB4UDnV+0+xAENbcvbKMjJ4/7O
+V0Pni8eKa19TsHYnX6jnj9j2zQVL1D83ib6b0lWIR1/94PSGgvux0mX+7xGf
+Hq1Zd4+CUs1p72sEuh/39HnJUgrMbTWDlmxHXB9RWBJKgUG1aZqyN+LR9MAw
+MwomsrST+twQX56yP/qZhMIfOz84mSL2sJkfqiNh+XBsY+sC2j9AYGoRjPpn
+OMZ8dhFx2IuhGUMSHOz3ngiyRFw/a+M9TQBFL9M614buA2mOfkiHx/zmnmea
+LtaHtju5iIAw6/w3RgIVVB87udKTBLjyF/WrjNZD/FvUPyfw13jEVcbvnTUl
+dILa2Xh9IunRu2cjG+8fbV4ckdnIwudPuyuN6Dqz8PcVOcdYmtNY+Pv1d5nI
+XWpn4vsJPz4P51Qw8f1jUtpCBkuYuD7pFq8z568ycf20/GRK7IRMXN/+6yKP
+/JUsXP/QRM7WGRcW7k++qS/xdz4L948hKPrD9x8W7i+/xHjpCw4b93+nPCzU
+urHxfAzn+vTJR7Lx/JQ+EXn2prLxfEWL1qyWSmDj+bsre3/L3X1sPJ/8rGxB
+vBYbz6/q5pw4iW4Wnm/ZGv+CHb+w8Pz7g2RX7jAT66NhXP+isjsT60erOn++
+t2kV1te8tWw3T3UV1l9T62Z+cowS1uc2GZMBxjAD69dog6lzvCcD6/vdM+F8
+5Ws61v/Cw5aQ3KN07A8q8YPloE3H/tE8Kys48EER+wtPKPw1s0cR+49STQpt
+sFsR+5OMxciQ1Ygi9i+H6qCAUHk69jevXWPdejZ07H+jH9SyfVLo2B9l30Ja
+5GM69s8ck0idKiUG9le5c8Jrum4M7L/N7q1UQgoD+/M27T9/HqxkYP8+mNVa
+5nqDgf19vMJK490lBvb/cP2HLpOpDJwPQ48GAj47MHB+GE/6pb4X0XG+dHBZ
+XqKTdJw/CuzQOd73dJxPUfNf9JOOKOL8OiQ0Pxz6ciXOtxvsM3vbzVbi/BOE
+sAlX/gqcj8O74xT6l67A+bnhZuGnnnAFnK+iskX9yuP8/Q9W7QZF
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7., 11.645199999999999}, {0, -1}], 
+        LineBox[{{16., 13.500000000002307`}, {16., 6.499999999998607}}], 
+        PolygonBox[{{16., 9.4}, {15.6, 10.6}, {16.4, 10.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.9452, 10.}, {-1, 0}], 
+        LineBox[{{16.000000000007276`, 13.500000000003638`}, {
+         10.000000000005457`, 10.}}], 
+        PolygonBox[{{13.51826734053906, 12.052322615314452`}, {
+         12.280184249251306`, 11.793188945044921`}, {12.683281069670574`, 
+         11.102165824326175`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.823799910437668, 12.484057296392571}, \
+{1, -1}], 
+        LineBox[{{16., 6.499999999996362}, {10.000000000001819`, 
+         9.999999999996362}}], 
+        PolygonBox[{{12.48173265946094, 8.552322615314452}, {
+         13.719815750748694`, 8.293188945044921}, {13.316718930329426`, 
+         7.602165824326175}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.823799910437668, 7.515942703607429}, \
+{1, 1}], 
+        {PointSize[0.04], PointBox[{4., 10.}], PointBox[{16., 13.5}], 
+         PointBox[{16., 6.5}], PointBox[{10., 10.}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T1", " ", "P2", " ", "N2"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"aebe/cfdg/ehfgfhgh.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "aebe/cfdg/ehfgfhgh.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {22, 44}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwt1ws4VOkfB/BDaRBiV5Z1zXXKNZdSW81BomINsaYNqVYJyW1FksGICt20
+ppQoCt2kjVFLKkQ3U2Hxd123calImDL4f8/+//M8nnk+z/ue9/1d3nPOWLb7
+oJufOEEQ9fijvom+eXx0SOLfjzFJLDiW/kslLOybpjcYkWRc5oX9ETBrOLm9
+yIisatZ36dCF5SMYCueNSCKG5ZT7TpskBA3aM+lGJNts4dp6NmV68gwX7p7g
+7DGHx5qEWSW4fu9mL+bwMpKIig7JaMO4T6Wa6k1Y+WJiuxz2N2w2aYmET38s
+rHWCtZS1pVzgHJflumeMyarG6JgUS5hlVXuwxZgkh8LsjxrAzNEZkYYJWeWS
+9s2bcjHNbvkuE5L0yu3/YA4L9N6mZpmQRMUPGZ6O8BhzI/0lxodosaQftf69
+ptQPJiSbufHs0DGY/lgoIkxJYrOYonsRLCy9l7jQlGRzUsr3v4LNLgWICbFf
+3pyiPpUP/+VF43Z4qpX2mEC+3VMr0kpgT+MVL2Rhpq2STyzW18w39V4C0znb
+oxkYH/mWabAQ5p94ZiRCfpOr3TgjWK/b4bpcmTHJJl75JdTAVT0PX4cjX1a+
+Ud9Zar+6inkr1EdpyGCpB5UvY/s4+sc+83VKSQ4O8euN/hv98cw6uLdKiyRa
+Lto0PUL97XoYbcGw4OFY0l2YPNd6RA22/q2avI9+0JKcnnM1SaLA9EBvLaz/
+3GXxAphNs48cwnrr1+wxiNVAfIc2r1HB/le6Lhcshosrzj/ahv0bnsZIl6gj
+v+BlovOwjbFhShhsvUbmbDvmJ7/Pm3OGiUW/tumgHpIfNHrsYPJ1Od0ffvgi
+gnSDQwbrhPlwhIJG/+8wV3+Dehv6lyTDOlwEt2zlDIuhH5991tcNwzmPUn5V
+Rb/Ga6u+miEeQUKngR7G33V0D0fC/sSLTg2MH1ScPVwKM+uYvZLwPrXZziEq
+fo4osA/rO++a+7gY+fLFM0PvY/9wsUOByrCyT3lGFGxSarpKBuZmn/62CvO/
+4yof6cf1kmLF2p+Rr4vs89fX4BB3fd5t2NRhm54jzIrb6nsA5qvbtzZS+U22
+HreEmyw2xFL1YCv2bVgEvzq0sKRUDftrLxH1of6GFw4OLoV5MqtPvUP9eeKH
+vw9VRbzZa+dxfxJDGx13v/kR51HN6mgH7Mtj9VrALLXOvd/g2T8srG+ooB9D
+5vZ6qP/F9C5HY5inNDm0A/u1qSmIv1BGP64Ik7NgAyJFiw1r0Xmt3fBIopeM
+KyzQWu1MR76nFem162DmP30WwbB93MJBG2o8aG7iDuojG+x73xsmw1qsB2F9
+9ZuMVLhb/4SmIvpxMmI4r466XvKqtwXqr/4k2lYW8fCfd+y0g4+mxUm5w9YF
+m//1BS+DN3/AYza3AjGfXWS382IDHEK7H4D1CBuNmlkhZe7wYgH2G6nL+EUO
++QsVdUuKYY5F7RIZuMAjclsoPBP649tPmM9qSXY1Rvxt0ueyeXDdHSsnAeqz
+MuJW/15YEDg9lg/LzhYcEiFes+GT9fvhTxqrQ4/ABYkcmdXwdAJPfuQHnC8/
+wzB51Cs9gBXrDAt+ockLUX/NC6PxhUqYf3lg3Sf0M+gnkiEBC0nB0SlYSqO9
+de9SnK+3ERxZrPfblksGjYqol1QS3QLr2c747XKDhf2ieD/40HKVjv7vsZ/I
+aTYXrlcNeH8GJtXF4/rhVqm7liy4zjU8zQj59ZztS18D8yZ94sKRf8DvGxdZ
+wfxkidul8Md9fF9HmEg1zf2M+VFNlrohMFcxzUEX9bXYHVp9g5pvKaa0GfVX
+ednYPUSt13DXZCfGf9L+MdUM8flvl4j2w3hFf3fW73CL6v7iHXDmes+ZEpi5
+pGmfLbzH9JnoH1hLU0cc9yt7Vf71fAL5F8xGXsF5IcLIhHEaPHa+griJ+I5o
+8WhTmG/2XdVuPB+IxU2PdtVT6+0td8Pzg3h8Ir0rHib3/Xm0C/lXhYXXa1H1
+0lrJyYFLpKsrC6h6sG48Rv/YRkvrz6rDkrwQzQ2od09ZsArnO1yfdkikifG1
+hokDPQqY/7z8G/pJuFX2ia+Hxxo2TSjAjjEns7Lkcf8Vdgm0Md/86u07C2B/
+hXc0O4w7p9+NnJTDeYyTvxdCXd/o+0kall/2+VQh/OXjcR0XWdS7IbJ8GJZP
+8hXVyuC8/xr43gz50OR870TALYO+NlHU+VSozvKEx6TUPCrgTW/bvILguo7x
+OBH84UHFh1uwQD82wRz9MMimzctjfXqZIdcLTshw8kuH+Y5el6LggZiYXBXE
+4+usapAEpxtIxFyHWadmr8TD24+WXaMvQVyE2qZgeFNFuVcGbP2gxsgJ1lKR
+VOyClXcoGqvDaforP8/DfDfd172Ih3g4xByD2afXaVyDmw1sFG/Bxe9vnvOB
+n6TX9ayEWdcTGlXgQsvn5olUfU79cQLvc2JmhkPmIV5WwM6V2bC6RfHLLOQX
+NW8ziOcn8TH6/ZOwxYjnyEO7LfBkErfGQhr1suJaUu/D9nT1nGFJxOGs3mcK
+u2u0XL1GQ72OexeuhXnaTPHARTgfG+4s8IC/9vuYO0mgfmG/5cbC9arHnVwX
+Yr2aY6El8HVGYkrCAowfT3o8BuP3xet+cfT3K8fTCvH7D/n7HYUF8W73jsBP
+pZRfOcFkabXmMzg5+crtn2Hr7dLiEqjXiLz5gjiY0Nv2ZQMcKf29ZzPc8sZ+
+9gD1PkorpG/FfuSLngen4Oj48cB3MMuydP9VeKb2srov4uPSK43z4W1rV/QN
+wsU6xaOZcNt/Dj7wRj51car+MfCunxWiSmF5JXsTV/iv085cAcxr25JEvS+f
+DgSnjMLKs/lOHYjXco+afgUcZZbXfAHWy9ww7wk7JrU/codVnrWGVVD7E5NF
+CnC/lvatMSreQsbqRtQn010qahr55ATXFFyBt7BjplvFEJ+DLT8SfifhbX6V
+QL20d/Xg/UNMnRQtK5tjEIJYcw8m1R9HvWO6IgbB+iGg2R2eO7PbOv8rg1AW
+BllTz992l4F25jSD4A/eiE6FLxmW/b1ukkGQA3Jv/6LuN42HxjETmB8hXzsN
+dzYT51Q+MwjuikeuaxFvUTjtvtY4g+BVsmjxJtRzhv3XuTEGkXPc27YO5kw8
+WRUCMzdv9JRBfUqEi3TuwCHltdV4/hER2jX7SFxfN9q5Oxauzj7AXor16ctV
+0/JgbuIef2Xs79shs6kClpto/nPlFwaRUjPtWgt38p++cUS8UXk7HB7Dbv7Z
+6+ynGMTpL4czCuCp5wnDS5BfNzsjOhFOLePuzID9N6kLqf6l6GTzn8ApPv8p
+U4KLynTEUmHmzi29jYj/hEzp4AjWqwrVnz0Fs7o8ZLqp/Rw8722FO585XApC
+PDlrSq4thuWjDM2zEH/BtAHjPeqVPmnrcRj5cm+OJlPvv41j9gfWjDIIsyKx
+CQ5V7/q5ILNBBiFfxLAPp/p1KShW6h8G0dKbFRMKSxaN00ZbGYTW1YGKODgq
+d+aJE59BFFs88LoMd0/zrX6qRL3Wn2urM/7//x0XKv73bUL+F2Hoviw=
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.112359638123757, 16.39239276247515}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwl1g881GccB/AfGSbp5ggtukYS7e4ajVR3p41E6iJz2bWudOVfRNE/rRuS
+vJibiOTsKrUs6kqTxOVPCaUuyp/EjjalxMVQ+mOfZ7vXy+v3enue5/t8v9/n
++d3r5myO9BVrUxSVgD/ypNom8bHgUf99ZvAopkr75lFYPTDXNMeUR7U7B802
+gyXhDpLlcF3ntfg0cx6lMahs1IYDQn5/NWHGo9gn/NM6TXiUi0dDTRAsOSzz
+vQd/sFiWfRdxJS9Cksh4uONXlCtMszKLIuv5Ez4iBZ6q6dFcNzyVh/lXHYkN
+OmZk4dniMxFzG+ukD/9wmoAzxbMEETC7ctQsHHE4D2I87GGFYenlv+HA04Vu
+7+kYv0Gd2oQ8qD2LAv6CNde+CnkMv2X1yHtgiSDughfqyBIXrx6GFayemGK4
+I6K5nI548qMLBB/hcxPDScth2twDJYvRB082r3ofGQ/ltwhh5tDo9DJY5Oxv
+tBX++AW/Z5SM+1W0r4OP6vbLWMhbfnZZ43x48oJ/pwjWZKZn9yH+4ZSW1EMw
+W5ozSfoaeHKQlQvTptoXW8PnjzqNnIAZ/AyjIuS/VrbyUTJZX1ZjswCOzNS/
+vhHekW+zqhD1ewiv7WcQGx/Qmg+ztrT23kE+VbphZ0ifK/pX/RYEa4w+d3OH
+w+uyBS9QP69Eufol/h9YnLg8iPRrwCH5LLxl8LFnszGcdqtyL3yxdFfFElik
+G311KxzmXuBQ8Bnui+E4g5xLXdEwiwbzxjPi0+GDekFLEmk4z9i5Hg3wZWHo
+Nh2Y13Sh3hz73+2ITrebjng/bNm9D1YXHzu03QjnUWIx3g8/1Gl/2jkN98TQ
+e91m1OPq86VJLMzbfnVxNzyr21+2FBa1sxwE6Ict09SSCat06TWN8FbTAwEr
+yPqLj5+z0c8xI1lgAhm/PZ+eBBtNM/yDxBd1v46sI+c9OVzhif2pp0n0IXim
+JvmvalhS+cCM3AdF7wZzDvJljHIuDcO5k2LrK7DiQbxzE6xSLEmZhvoYoc1z
+0uGdsRH8RTDN7fqYK/x2sfqGD8yP8mY/RH7JezhdfmQ+s9J0I9x0auFud1j6
+0jtVTd6TgTTOHLhq3LVnA+xy6OfCJuzHF4vSn6A/Pytp8i9h1aUy7c1wK+PH
+EDHyZWyUCUfQb876+oa9qI/RunBJFuyqFzE1yhD15MYmecN24s/Lfaei7wVO
+7hZw5r2oNfMMcB+5efspeEZK6qNxfYzX6plqw/rtXglNeuh/aVuHJZzybdF3
+l3SRp017lC9Zf+jkpfOfkP6Z7JTBu1pzPtTqYD+tvXHv4GizmvUUzM6jfx+M
+fH1Z0gDxFPSvZavLn3Bu4sb6UW3ct1fV9wNRb3NDWP5lmJoeeO4RfHkipDcX
+3nFdvtYL/TJUOCvPwwol59cSeM9huzw1sa1VryH67eSXvd4R8TXpRrN84bjh
+1JQ8mCFrdJDAdt0Zd+jIR/HT3qFMOLTbwUoK74hhC8n52Ye88dYn9VhGHYmE
+iwaWr9oJi/i2iq/h0uas3+ph1TZ7y2fY3yvc+BGFfrCPvDRLhF1CEtNMYZWf
+u/IzmPlFPk0bFrlatWWinoruTetrSbxzFTJjuGZVDFcA08LMk6XoR7zXYEI1
+yWdhgYEJXCYyaNCC1TrzhKfQT2aDfYwl6lHrLVvKg8/d9oufifqrit4qX+M9
+Fh5zX0ppIR+zV7PL4dSPBuriSS7FH4nLPwFXsfIZaz5wKbnzTHE2vE5adWZs
+gkvxwsVxxbCNpjar9A3Gg+83PoFzVuR/Kh/jUlVnyhnW2M985Dt+zT9cSuGZ
+zT8Ar2M4ediPcCm1amjtM3IfHg7W9bzmUhr50+1C5D8rQd9tSIP5J2x2tsFO
+NwYj/GEpx3XIF/WHV4y70GF1bkZoA/w+82C1NRlXNhYsQv8UFbLcH2FVd9a9
+DJg/hWFtjvjU6E3lE3L+++p1e2Geny2DhvNxebfiyZ1h7Hfhm2P2sEmw3eNa
+5Ce6E9L2n//syr2K/Hl6neVkPkOV/ixzFPVtlrp2IV5en1rihXrZpTHBZD9p
+vnFXPbxDkR3gCKt6/Vu0xzFfnztRi3xTDz5fMIhxuW/EmCes06c0TYQlT09G
+30a99T7d26oRn39ct+tbWHpz7r2z2F+16/jFOtK/wimVLsiPZnvTkbxPgvYt
+bgdRjzqW5jmA/gvCNWumDiHfX2Lsj5Pv6X6m1pUXqCchfaUQLhOKdS36MH/B
+LSsXMj+p89qGHvTH56MxExYl5Fzx6eBSjK4ZkRxYetz25UIV8hVeFwST+1BS
+f75UifEyVWch/f/fBZLTlf//PjDh/QvVffZ3
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.368879573271343, 4.309365547472549}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000003638`, 15.000000000003638`}, {
+          13.500000000003638`, 5.500000000001819}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.245034441796587, 11.605529856236451}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJwt2Hs4lFv7B/CR0VGackhIyqGhk1Maoaa2pCiUdpNTkjSVRIYkhZ1ErzKk
+cs6Wc9LsUhSKIqNN6B2anEKmiDKpNA7p913v9Zs/zPWZ9ax73fe9nmc912Wp
+x4ldh6ZRKBQFKQqFfFOo5I8Wk/K/zyomJebSE+cdsLXBuvixlUyK/jYHmyQ4
+lVfm/AEWJr1Y1UPGzTcFv4CjOgXcZdqYLz6elgx3vJm9wxmuNBuZOgizF2Sm
+R8MhU0ccteDicYFpIWx8O7+scwWT0r3s1b5nZP59p8x4+LtLRN2/8OQ5SsEW
+2Dti8Qc+XJqSFz2mx6Qw/ipPfgzrn7n1hQdryQ7uyYSt1xa5+sDdLovGwmFl
+f7GiMSzYNfKM5EMJU/spDfuOnF1rSOZvbT/2Thf5XDQfmwFHBYfsq4U5Ry8+
+eYf6hk7lKJbDsisT1cvhycAQjwpYWZh89iYctu6w30t4ZoPm8H9g28XuQz3w
+5EIr9fPEDbtlpmE9fT/X9ZGkvw6Dl+gknzfsgWtk/t/1UrvhSX488x5sPFu/
+6hwcRbV43kb6yw6fnw8HfUlmyyE/3s1Cm0aYaZKcawNb8gt/foHpvdwoLuw9
++qtfBv2i+4jK2ki/KvL3LoArHQuLl+swKWpXG74T2xbMfMGBXayLxqbDjIhf
+m57CiVkF+iQeW3tHInU59uFl9k8+LKFP42yGFcIazBJh4+U7WwNhd6nPPq5k
+P35eXJUBZ1yvDVSBaXuYhytgLdH6G83ohz0rdbIB9jbXZl2Am8wPS5rhlR3m
+bAYZv3BttA623E8/95mO+2zNxsUlMPO0uWkuPFPFY14KXK25VZoNR52UaTsF
+mytVfzeAExpvdNjBvDOPy6fD5n8l3tEm8ZP2Xf6Ib9nttZMTqK/Qy0iuBaZJ
+DDgt8KTPfcdGEtc/IqmYOJb+nozrB07yUmBekncRmR9jZ3crBg552K8rjfh5
+tKKPUfCQm/c+Hbhpqu9kHByWMat/J2wcxCrMgasfDG8Ohr+Pux7hwxoDciXZ
+sKRHZ/gHWS9On/sKFvTpTKzCOnnqixkj8FDLtWYfuIN1xFEO/bF8c8jhIRxy
+8mqPBqzvzZedRuJuXredDkuY9EN2sJriztOacFTSnvwUWOFU7of5cN77aOM+
+uE9pTto3fFsrdsbo4PcMYblpHfn9WUOoO2xdyBZdhbNG4s245LmoqbXaA0fk
+ynsWw1lbkk7Mg7lW8cvqYfeWuupq5CWQ37vmDZxq3tlL9qXQ9pOghYzPFYau
+gJUflg7xYR6DatuLuo0521r+Idf7Sl6nw0EmgR7xuiTOVreDsETozPeGbfV1
+2g1gb+/R8D9gZsPG6jmw1vHLxovg+rJ82gju84xo0zgx8tJo4NNFMFXl/dp6
+uGPFzZ4+cg45q8cWkfvqWdk5MTknDjPLk2CaW/Hj6YjH1/0SGEvGp9W1aMPK
+Nzb85pJ9mj+zwAbuTnOce5PsS8yc6gBYEKZU94j0+1/D0L9h94ED/G6y743y
+WvXkOTvZLC+P/ELKa2Z8I/n3dhjYwWzZ1AJ59INqJlh3lZwjvmIB6c+k/ci7
+DlJP9F2eKXnuZkbf0sVzpNAT3mUGV/5cJAyExeOpFwzgLA/ZV1WwxrxIVxUy
+vy19eAae47zCPf+MYj1Gx90uKzgi7k+XWtKvBdO5IbA4W6fyMulvfqdHLjl3
+Jf8Wk/q+U28bvYCZbgH+0rDwwPojQjjrRXtICfoVoXJtgpzTzNpjIUdhjR8u
+nDdwacN53SUwLTypv4aMn9WlC3FuJapuHCqAfUvTP92A6xN/h0bBqdnG19zJ
+OehlMu4Oa838W2QExziMD5qQc7/mq7q8FrnP/yM9F+aayExMaaJv3/w+i8i5
+t2N15k84gfPP2mr4e5Fn/iSsnOOvVwCnBikunIv5/eVnqpLIe8Ha1Wc5XMxM
+CE+A6/frVW6DBZ3jvil65HwOr/KDm/wSZt2F7d0+ilJhlzl+RuSc7b5QGsKH
+y6XebZkg59xOetNXmNpNmWeI/Dq4pyyVyLk8daXHj/SzRSrQiNxfeTp5pXBM
+bLXjVtj8vvUvabz3GHs1ze1h/ulvVg5wzPw3MjvI9ZxkQRr8PXLVQgvYhbVs
+irxnsy5S2BqwwtOQzXp4L2voKZz/ifVpl/7yPARHtbwJfQ7znCojrsNitdc/
+LsDMuDnrymFJpPUnJqzV/SG+BW56N1o6in4J945Z9MLW2b2SfLhj3RJfYseP
+591cYd4dkbgV5qakpMrDGreuyFXBgnPqWxqXoU/u1NhMmMNNvh0PV949mnIW
+LqV6v9wPR200zXWEKbTRFQyYvm9qN8k/JlUkVIPz/ObtloLpX7bZysFDLyOs
+OlBvt6ysjyys4SbKrIAVoqgJSnCpSXd8Lqw241b0CliSy+pKgUMSGtO2wY4B
+fS3/889DD31gVkvuH3kwnXKMnQizQyw8qmCuuUi+Gg5xkG8j/WWmK08bhlMZ
+TjULSb7SdRFKqNelxvnxLtg2XVWRAWfQnrZfI/04e9/XAWZkSH3pgvlpj+67
+w1luq/xWrMZ1x7J8POH68lsVQXAM5/lDZ9g++N6yarjapUnfilzfHCczZw32
+ZckcRS2YJvL6vR3mKd9bOYp8OMFiSTgspn7jV8ArRembi2BLdsX9EDiMIZX3
+Cq4M1VZdC5fn5Z7thWPObQkaWIr5X9vyBmDHxicnU+HJF40ZfXCCSPOZPVwY
+Y31EQEy/LTcL1tr3PvIxXJ929XWtBuq3S/mcCNs2p1jEwpKVWz/5wRGh/1U9
+ANOylWdaw4zagcoNMF9p57fFZL5YJKHDVGe20yjqpQSPTy2BxXu3Nv4XNm9v
+D9aEC2fE5ZfCarGPIgxh1t8lgzkwNf32XRs4zK5lRQbMf6Cmchzm8A6HZ8O8
+Cf/zCXCpZUVQCSx2k/F6Cg/5ZMu2wt0jixUGSX53b+dQkE/3aGerAurjXWzX
+NoGrHc7OXQ8L/3w6yIGjWPE2LLi/kjpM6nf8/YtzHF6gGTQwTR/5xJm1noKn
+K28L14WjYifWBcLpgk0f7eDJK8s/H4ZfVn+q4cDC7XfabOEuM6+31+EsycMg
+bdh7AXWqGBbf29wwgvwmqzwsXhGz9ro/hPOuRr7tgfs+u+mdhFO/ee0ZhvNm
+nzxL+nl9U2zwKKx/2bilZAlsFO/8E2YPhFqrwxtijHaPwO5m+k+i1ZkUz7cO
+lH6Ycvnrod+LmZRLPk83vIUrV/0YOw/r6LkuroVpGaFRqnDBmoHme3BTi9GW
+OjUmZbWh3O00uFRjrWcsXE5xlIom9b2tpZyA+9vTlwfCrFMJNDZ8ZanY2Qtm
+HF7ieRq2ervwkROsvMq3OAOWq5vQdSTxcrZXtMF9/tP37yb5NNR7aGL9LO66
+FyxYsr6yOwCu3GwQ6Qn7UkOlGuBk6pkQsp4y4/s+TdSnbiu38QrMWy8T5Q9b
+aakuvU3i77jmWwrv/Nqwvp7U18QK/gxTp1X4i0l/Nrx+Jod+jYxdiFUywDrT
+lGwWwQn9s8wt4JkV9ipzYJUVWRoH4abscMf3mP9ne+HnSDiK52GZCTsqJhzL
+hfljc1jb4CLxx6jnMHfVaVo78m09fcurjYz/KOpzglcXMzwG4QybhkUNqN+7
+tUdtlPiP9jgTWJ8lCh2HNZrPX01VxfN4M6VCAnevt71MhTMv6dl9hcOGKG/8
+VbCf8vOH+8h4ti5neBHuv/EqroDMF21rOwOrHy3aU0XisyMr1GC54Q1hhXDQ
+8ymRQBn7JuNw6AaJV1AzLwduO9Ltch62tulv5cLmn2Lu+cH6Fkd5CbD+YNF1
+0g/69UjxXbjvYA7NCRYv+tL5DtbolPq2B2ZoaDdrYD3jZzKv95L13BLdfGAl
+CeXXftLfMxHRz+GVAWXBPnB/gdcvFdSz4NPyWWR94cYDNidgHVkXjTTS/+3N
+9DK499AdSRksCbEsHIM/HC282kWuF9IiddCfVxev10obIn67lOEGmB5aZqsH
++1p0LSEe6TWrt4et20aatGBBb+BwAJzxZMfAV8TL5AWcSISFwb1GOXDQi0zN
+Elj/2eGkP2DuIc15zXBT7t7ZDcif5mTqLTIk+0NztYJXP9Z98I2sb5mytBj9
+WPl1U8EEXGmoelwV9sl54PgLDrtodjN8Id47AcbTx2BJx1atISU8X9vN9wyT
++HL3Tdzhxx92KfXATIOuzF5FJmX8AWdXI1lPKIg9Bfd6LTcrgzWEwXbL4C+1
+j9RyYPo9B4ZIAXX729nFkfoCLl+qgmcmey4/R+KfKzpQAvO3hnw4DvOvbblf
+A0dE5BcegN2DxE6f4KG6pGNOsLidakTiZww+aGeR+EtfMY7AHn+1+ruSfgrK
+Hz+Gu60GD7LhoGTOlfnIf6Trdfxp0v/w7bZsmPXjzE0uWU8YefkRHHh7s6gQ
+ts9P06OgHzEWrPMNcL90XOA62LDknddXOK+2ieMMVx622bvQCOMVejOOwIwG
+b+oGmGbyaL4bHDH/mqIn3BRtcNWUuGehaRTMGD/Nm8B6rX1njfLhoAVS97Nh
+p4KSzzVk/MbAmClcaH8nvBMWSz/sKkM9gbOTLYdh5a6iK2vgBGr5q3GYrl3V
+lqTw//8nMcb+/cZHnvl/WbJfLQ==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.168383585437326, 12.327367955153331}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJw9k30sVXEYx09Gu2RhKP64ZOec4RyEZI2Lp3mrFK7krXB3S/NS3VW3pel6
+y2LMuiZU6JpYmbmsYaQ15S2Eq8RNpuvOSLaiqUuMfme139nOnn322zm/5/k+
+36+dWBKRpEcQhA96ufrvoWDBiqv2QMhvGFcPkuCR53YgV4A45uTlrhoSTJYt
+PipzEasnAzrySagfTXcoGkNsGjpmkE1Czhyf7rR1AOJY2oZlIQmGiuWWBgni
+8LbB0/UkZFUX+Y13Ia6x3WZVJEwXR4XPEI5AFEQmUDwKVP73mzTeiNcdUogT
+FOhlRJQWpCLOXvJZLaHAeKvb93AR4pW5zZHPFLRJGxf2VSO2ij4jJGkITll4
+caQGcXp0f8wFGjr6Db2yyxC3tA/YVdIwP5T0VZGJGOTSnF4aVOJe5+14xIRB
+mvksDTvV5aMlnojVfe7xCzR0CvP2tu9BrJrkz8/QoHhy1GBDg/oHQuTxhgaf
+MSP9xU7ELSZr6goaht0SLCcfcvN19weIaFB78hStdzg9dOlKGxrOJV8jZm8h
+Xgkb10xSQLXqlDoZYnlmlV4xBStvVRNqOWL1tFdsIAWE2HRG9hzxs7RkQ30K
+8kJ4Cp6Wu//Q4qd3JEzUxQhG+Nz8oxWbtSRExb0cTz2PuMNXMF1AgqyC3/K9
+GbGrvGY9i4RQG26/DD4vL9GGmYUz+Psgrb9LWRWD/++X97THXcvg+61WdSId
+n8X9mQ/8IHNPsbj/xusHWXsJi+dbkfKEvFwWzw8TxTt2d1msj+CnThRym8X6
+qYxqvzleZLG+U7G/Nq2CWKz/1oNXf3bbsng/cVMZq8fXGLy/qscpblcGGbzf
+gH7v97tqGbz/jquP9otyGOyPs+LffVmpDPZP5AfrwIFEBvsrsTXSeknMYP/d
+A7/XQ1IG+9NM2XTpZhmD/Tu8nhZh28tgf3tVNjSTOwz2P18h7XYJYHE+jAot
+wqLkLM5PabB2OkjD4nxJ4vKnpK5OOH/6vsuMUOaE86mpG/0i60H8P7/Oplx1
+hr8PJnw6
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {9.154900000000001, 13.}, {1, 0}], 
+        LineBox[{{6.4999999999976925`, 5.5}, {13.49999999999251, 5.5}}], 
+        PolygonBox[{{9.4, 5.5}, {10.6, 5.1}, {10.6, 5.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 4.5548}, {0, 1}], 
+        LineBox[{{6.499999999996362, 5.499999999998181}, {9.999999999996362, 
+         11.500000000001819`}}], 
+        PolygonBox[{{8.552322615314452, 9.01826734053906}, {8.293188945044921,
+          7.780184249251306}, {7.602165824326175, 8.183281069670574}}], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.515942703607428, 8.676200089562332}, \
+{1, -1}], LineBox[{{13.5, 5.5}, {10., 11.500000000001819`}}], 
+        PolygonBox[{{12.052322615314452`, 7.98173265946094}, {
+         11.793188945044921`, 9.219815750748694}, {11.102165824326175`, 
+         8.816718930329426}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.800156843998153, 7.716069211607572}, 
+         {-1, -1}], 
+        {PointSize[0.04], PointBox[{10., 14.5}], PointBox[{6.5, 5.5}], 
+         PointBox[{13.5, 5.5}], PointBox[{10., 11.5}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T2", " ", "P1", " ", "N3"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"aebf/cgde/ehfgfhgh.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "aebf/cgde/ehfgfhgh.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {44, 44}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwt1ws4VOkfB/BDaRBiV5Z1zXXKNZdSW81BomINsaYNqVYJyW1FksGICt20
+ppQoCt2kjVFLKkQ3U2Hxd123calImDL4f8/+//M8nnk+z/ue9/1d3nPOWLb7
+oJufOEEQ9fijvom+eXx0SOLfjzFJLDiW/kslLOybpjcYkWRc5oX9ETBrOLm9
+yIisatZ36dCF5SMYCueNSCKG5ZT7TpskBA3aM+lGJNts4dp6NmV68gwX7p7g
+7DGHx5qEWSW4fu9mL+bwMpKIig7JaMO4T6Wa6k1Y+WJiuxz2N2w2aYmET38s
+rHWCtZS1pVzgHJflumeMyarG6JgUS5hlVXuwxZgkh8LsjxrAzNEZkYYJWeWS
+9s2bcjHNbvkuE5L0yu3/YA4L9N6mZpmQRMUPGZ6O8BhzI/0lxodosaQftf69
+ptQPJiSbufHs0DGY/lgoIkxJYrOYonsRLCy9l7jQlGRzUsr3v4LNLgWICbFf
+3pyiPpUP/+VF43Z4qpX2mEC+3VMr0kpgT+MVL2Rhpq2STyzW18w39V4C0znb
+oxkYH/mWabAQ5p94ZiRCfpOr3TgjWK/b4bpcmTHJJl75JdTAVT0PX4cjX1a+
+Ud9Zar+6inkr1EdpyGCpB5UvY/s4+sc+83VKSQ4O8euN/hv98cw6uLdKiyRa
+Lto0PUL97XoYbcGw4OFY0l2YPNd6RA22/q2avI9+0JKcnnM1SaLA9EBvLaz/
+3GXxAphNs48cwnrr1+wxiNVAfIc2r1HB/le6Lhcshosrzj/ahv0bnsZIl6gj
+v+BlovOwjbFhShhsvUbmbDvmJ7/Pm3OGiUW/tumgHpIfNHrsYPJ1Od0ffvgi
+gnSDQwbrhPlwhIJG/+8wV3+Dehv6lyTDOlwEt2zlDIuhH5991tcNwzmPUn5V
+Rb/Ga6u+miEeQUKngR7G33V0D0fC/sSLTg2MH1ScPVwKM+uYvZLwPrXZziEq
+fo4osA/rO++a+7gY+fLFM0PvY/9wsUOByrCyT3lGFGxSarpKBuZmn/62CvO/
+4yof6cf1kmLF2p+Rr4vs89fX4BB3fd5t2NRhm54jzIrb6nsA5qvbtzZS+U22
+HreEmyw2xFL1YCv2bVgEvzq0sKRUDftrLxH1of6GFw4OLoV5MqtPvUP9eeKH
+vw9VRbzZa+dxfxJDGx13v/kR51HN6mgH7Mtj9VrALLXOvd/g2T8srG+ooB9D
+5vZ6qP/F9C5HY5inNDm0A/u1qSmIv1BGP64Ik7NgAyJFiw1r0Xmt3fBIopeM
+KyzQWu1MR76nFem162DmP30WwbB93MJBG2o8aG7iDuojG+x73xsmw1qsB2F9
+9ZuMVLhb/4SmIvpxMmI4r466XvKqtwXqr/4k2lYW8fCfd+y0g4+mxUm5w9YF
+m//1BS+DN3/AYza3AjGfXWS382IDHEK7H4D1CBuNmlkhZe7wYgH2G6nL+EUO
++QsVdUuKYY5F7RIZuMAjclsoPBP649tPmM9qSXY1Rvxt0ueyeXDdHSsnAeqz
+MuJW/15YEDg9lg/LzhYcEiFes+GT9fvhTxqrQ4/ABYkcmdXwdAJPfuQHnC8/
+wzB51Cs9gBXrDAt+ockLUX/NC6PxhUqYf3lg3Sf0M+gnkiEBC0nB0SlYSqO9
+de9SnK+3ERxZrPfblksGjYqol1QS3QLr2c747XKDhf2ieD/40HKVjv7vsZ/I
+aTYXrlcNeH8GJtXF4/rhVqm7liy4zjU8zQj59ZztS18D8yZ94sKRf8DvGxdZ
+wfxkidul8Md9fF9HmEg1zf2M+VFNlrohMFcxzUEX9bXYHVp9g5pvKaa0GfVX
+ednYPUSt13DXZCfGf9L+MdUM8flvl4j2w3hFf3fW73CL6v7iHXDmes+ZEpi5
+pGmfLbzH9JnoH1hLU0cc9yt7Vf71fAL5F8xGXsF5IcLIhHEaPHa+griJ+I5o
+8WhTmG/2XdVuPB+IxU2PdtVT6+0td8Pzg3h8Ir0rHib3/Xm0C/lXhYXXa1H1
+0lrJyYFLpKsrC6h6sG48Rv/YRkvrz6rDkrwQzQ2od09ZsArnO1yfdkikifG1
+hokDPQqY/7z8G/pJuFX2ia+Hxxo2TSjAjjEns7Lkcf8Vdgm0Md/86u07C2B/
+hXc0O4w7p9+NnJTDeYyTvxdCXd/o+0kall/2+VQh/OXjcR0XWdS7IbJ8GJZP
+8hXVyuC8/xr43gz50OR870TALYO+NlHU+VSozvKEx6TUPCrgTW/bvILguo7x
+OBH84UHFh1uwQD82wRz9MMimzctjfXqZIdcLTshw8kuH+Y5el6LggZiYXBXE
+4+usapAEpxtIxFyHWadmr8TD24+WXaMvQVyE2qZgeFNFuVcGbP2gxsgJ1lKR
+VOyClXcoGqvDaforP8/DfDfd172Ih3g4xByD2afXaVyDmw1sFG/Bxe9vnvOB
+n6TX9ayEWdcTGlXgQsvn5olUfU79cQLvc2JmhkPmIV5WwM6V2bC6RfHLLOQX
+NW8ziOcn8TH6/ZOwxYjnyEO7LfBkErfGQhr1suJaUu/D9nT1nGFJxOGs3mcK
+u2u0XL1GQ72OexeuhXnaTPHARTgfG+4s8IC/9vuYO0mgfmG/5cbC9arHnVwX
+Yr2aY6El8HVGYkrCAowfT3o8BuP3xet+cfT3K8fTCvH7D/n7HYUF8W73jsBP
+pZRfOcFkabXmMzg5+crtn2Hr7dLiEqjXiLz5gjiY0Nv2ZQMcKf29ZzPc8sZ+
+9gD1PkorpG/FfuSLngen4Oj48cB3MMuydP9VeKb2srov4uPSK43z4W1rV/QN
+wsU6xaOZcNt/Dj7wRj51car+MfCunxWiSmF5JXsTV/iv085cAcxr25JEvS+f
+DgSnjMLKs/lOHYjXco+afgUcZZbXfAHWy9ww7wk7JrU/codVnrWGVVD7E5NF
+CnC/lvatMSreQsbqRtQn010qahr55ATXFFyBt7BjplvFEJ+DLT8SfifhbX6V
+QL20d/Xg/UNMnRQtK5tjEIJYcw8m1R9HvWO6IgbB+iGg2R2eO7PbOv8rg1AW
+BllTz992l4F25jSD4A/eiE6FLxmW/b1ukkGQA3Jv/6LuN42HxjETmB8hXzsN
+dzYT51Q+MwjuikeuaxFvUTjtvtY4g+BVsmjxJtRzhv3XuTEGkXPc27YO5kw8
+WRUCMzdv9JRBfUqEi3TuwCHltdV4/hER2jX7SFxfN9q5Oxauzj7AXor16ctV
+0/JgbuIef2Xs79shs6kClpto/nPlFwaRUjPtWgt38p++cUS8UXk7HB7Dbv7Z
+6+ynGMTpL4czCuCp5wnDS5BfNzsjOhFOLePuzID9N6kLqf6l6GTzn8ApPv8p
+U4KLynTEUmHmzi29jYj/hEzp4AjWqwrVnz0Fs7o8ZLqp/Rw8722FO585XApC
+PDlrSq4thuWjDM2zEH/BtAHjPeqVPmnrcRj5cm+OJlPvv41j9gfWjDIIsyKx
+CQ5V7/q5ILNBBiFfxLAPp/p1KShW6h8G0dKbFRMKSxaN00ZbGYTW1YGKODgq
+d+aJE59BFFs88LoMd0/zrX6qRL3Wn2urM/7//x0XKv73bUL+F2Hoviw=
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.112359638123757, 16.39239276247515}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwl1g881GccB/AfGSbp5ggtukYS7e4ajVR3p41E6iJz2bWudOVfRNE/rRuS
+vJibiOTsKrUs6kqTxOVPCaUuyp/EjjalxMVQ+mOfZ7vXy+v3enue5/t8v9/n
++d3r5myO9BVrUxSVgD/ypNom8bHgUf99ZvAopkr75lFYPTDXNMeUR7U7B802
+gyXhDpLlcF3ntfg0cx6lMahs1IYDQn5/NWHGo9gn/NM6TXiUi0dDTRAsOSzz
+vQd/sFiWfRdxJS9Cksh4uONXlCtMszKLIuv5Ez4iBZ6q6dFcNzyVh/lXHYkN
+OmZk4dniMxFzG+ukD/9wmoAzxbMEETC7ctQsHHE4D2I87GGFYenlv+HA04Vu
+7+kYv0Gd2oQ8qD2LAv6CNde+CnkMv2X1yHtgiSDughfqyBIXrx6GFayemGK4
+I6K5nI548qMLBB/hcxPDScth2twDJYvRB082r3ofGQ/ltwhh5tDo9DJY5Oxv
+tBX++AW/Z5SM+1W0r4OP6vbLWMhbfnZZ43x48oJ/pwjWZKZn9yH+4ZSW1EMw
+W5ozSfoaeHKQlQvTptoXW8PnjzqNnIAZ/AyjIuS/VrbyUTJZX1ZjswCOzNS/
+vhHekW+zqhD1ewiv7WcQGx/Qmg+ztrT23kE+VbphZ0ifK/pX/RYEa4w+d3OH
+w+uyBS9QP69Eufol/h9YnLg8iPRrwCH5LLxl8LFnszGcdqtyL3yxdFfFElik
+G311KxzmXuBQ8Bnui+E4g5xLXdEwiwbzxjPi0+GDekFLEmk4z9i5Hg3wZWHo
+Nh2Y13Sh3hz73+2ITrebjng/bNm9D1YXHzu03QjnUWIx3g8/1Gl/2jkN98TQ
+e91m1OPq86VJLMzbfnVxNzyr21+2FBa1sxwE6Ict09SSCat06TWN8FbTAwEr
+yPqLj5+z0c8xI1lgAhm/PZ+eBBtNM/yDxBd1v46sI+c9OVzhif2pp0n0IXim
+JvmvalhS+cCM3AdF7wZzDvJljHIuDcO5k2LrK7DiQbxzE6xSLEmZhvoYoc1z
+0uGdsRH8RTDN7fqYK/x2sfqGD8yP8mY/RH7JezhdfmQ+s9J0I9x0auFud1j6
+0jtVTd6TgTTOHLhq3LVnA+xy6OfCJuzHF4vSn6A/Pytp8i9h1aUy7c1wK+PH
+EDHyZWyUCUfQb876+oa9qI/RunBJFuyqFzE1yhD15MYmecN24s/Lfaei7wVO
+7hZw5r2oNfMMcB+5efspeEZK6qNxfYzX6plqw/rtXglNeuh/aVuHJZzybdF3
+l3SRp017lC9Zf+jkpfOfkP6Z7JTBu1pzPtTqYD+tvXHv4GizmvUUzM6jfx+M
+fH1Z0gDxFPSvZavLn3Bu4sb6UW3ct1fV9wNRb3NDWP5lmJoeeO4RfHkipDcX
+3nFdvtYL/TJUOCvPwwol59cSeM9huzw1sa1VryH67eSXvd4R8TXpRrN84bjh
+1JQ8mCFrdJDAdt0Zd+jIR/HT3qFMOLTbwUoK74hhC8n52Ye88dYn9VhGHYmE
+iwaWr9oJi/i2iq/h0uas3+ph1TZ7y2fY3yvc+BGFfrCPvDRLhF1CEtNMYZWf
+u/IzmPlFPk0bFrlatWWinoruTetrSbxzFTJjuGZVDFcA08LMk6XoR7zXYEI1
+yWdhgYEJXCYyaNCC1TrzhKfQT2aDfYwl6lHrLVvKg8/d9oufifqrit4qX+M9
+Fh5zX0ppIR+zV7PL4dSPBuriSS7FH4nLPwFXsfIZaz5wKbnzTHE2vE5adWZs
+gkvxwsVxxbCNpjar9A3Gg+83PoFzVuR/Kh/jUlVnyhnW2M985Dt+zT9cSuGZ
+zT8Ar2M4ediPcCm1amjtM3IfHg7W9bzmUhr50+1C5D8rQd9tSIP5J2x2tsFO
+NwYj/GEpx3XIF/WHV4y70GF1bkZoA/w+82C1NRlXNhYsQv8UFbLcH2FVd9a9
+DJg/hWFtjvjU6E3lE3L+++p1e2Geny2DhvNxebfiyZ1h7Hfhm2P2sEmw3eNa
+5Ce6E9L2n//syr2K/Hl6neVkPkOV/ixzFPVtlrp2IV5en1rihXrZpTHBZD9p
+vnFXPbxDkR3gCKt6/Vu0xzFfnztRi3xTDz5fMIhxuW/EmCes06c0TYQlT09G
+30a99T7d26oRn39ct+tbWHpz7r2z2F+16/jFOtK/wimVLsiPZnvTkbxPgvYt
+bgdRjzqW5jmA/gvCNWumDiHfX2Lsj5Pv6X6m1pUXqCchfaUQLhOKdS36MH/B
+LSsXMj+p89qGHvTH56MxExYl5Fzx6eBSjK4ZkRxYetz25UIV8hVeFwST+1BS
+f75UifEyVWch/f/fBZLTlf//PjDh/QvVffZ3
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.368879573271343, 4.309365547472549}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000003638`, 15.000000000003638`}, {
+          13.500000000003638`, 5.500000000001819}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.245034441796587, 11.605529856236451}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJwt2Hs4lFv7B/CR0VGackhIyqGhk1Maoaa2pCiUdpNTkjSVRIYkhZ1ErzKk
+cs6Wc9LsUhSKIqNN6B2anEKmiDKpNA7p913v9Zs/zPWZ9ax73fe9nmc912Wp
+x4ldh6ZRKBQFKQqFfFOo5I8Wk/K/zyomJebSE+cdsLXBuvixlUyK/jYHmyQ4
+lVfm/AEWJr1Y1UPGzTcFv4CjOgXcZdqYLz6elgx3vJm9wxmuNBuZOgizF2Sm
+R8MhU0ccteDicYFpIWx8O7+scwWT0r3s1b5nZP59p8x4+LtLRN2/8OQ5SsEW
+2Dti8Qc+XJqSFz2mx6Qw/ipPfgzrn7n1hQdryQ7uyYSt1xa5+sDdLovGwmFl
+f7GiMSzYNfKM5EMJU/spDfuOnF1rSOZvbT/2Thf5XDQfmwFHBYfsq4U5Ry8+
+eYf6hk7lKJbDsisT1cvhycAQjwpYWZh89iYctu6w30t4ZoPm8H9g28XuQz3w
+5EIr9fPEDbtlpmE9fT/X9ZGkvw6Dl+gknzfsgWtk/t/1UrvhSX488x5sPFu/
+6hwcRbV43kb6yw6fnw8HfUlmyyE/3s1Cm0aYaZKcawNb8gt/foHpvdwoLuw9
++qtfBv2i+4jK2ki/KvL3LoArHQuLl+swKWpXG74T2xbMfMGBXayLxqbDjIhf
+m57CiVkF+iQeW3tHInU59uFl9k8+LKFP42yGFcIazBJh4+U7WwNhd6nPPq5k
+P35eXJUBZ1yvDVSBaXuYhytgLdH6G83ohz0rdbIB9jbXZl2Am8wPS5rhlR3m
+bAYZv3BttA623E8/95mO+2zNxsUlMPO0uWkuPFPFY14KXK25VZoNR52UaTsF
+mytVfzeAExpvdNjBvDOPy6fD5n8l3tEm8ZP2Xf6Ib9nttZMTqK/Qy0iuBaZJ
+DDgt8KTPfcdGEtc/IqmYOJb+nozrB07yUmBekncRmR9jZ3crBg552K8rjfh5
+tKKPUfCQm/c+Hbhpqu9kHByWMat/J2wcxCrMgasfDG8Ohr+Pux7hwxoDciXZ
+sKRHZ/gHWS9On/sKFvTpTKzCOnnqixkj8FDLtWYfuIN1xFEO/bF8c8jhIRxy
+8mqPBqzvzZedRuJuXredDkuY9EN2sJriztOacFTSnvwUWOFU7of5cN77aOM+
+uE9pTto3fFsrdsbo4PcMYblpHfn9WUOoO2xdyBZdhbNG4s245LmoqbXaA0fk
+ynsWw1lbkk7Mg7lW8cvqYfeWuupq5CWQ37vmDZxq3tlL9qXQ9pOghYzPFYau
+gJUflg7xYR6DatuLuo0521r+Idf7Sl6nw0EmgR7xuiTOVreDsETozPeGbfV1
+2g1gb+/R8D9gZsPG6jmw1vHLxovg+rJ82gju84xo0zgx8tJo4NNFMFXl/dp6
+uGPFzZ4+cg45q8cWkfvqWdk5MTknDjPLk2CaW/Hj6YjH1/0SGEvGp9W1aMPK
+Nzb85pJ9mj+zwAbuTnOce5PsS8yc6gBYEKZU94j0+1/D0L9h94ED/G6y743y
+WvXkOTvZLC+P/ELKa2Z8I/n3dhjYwWzZ1AJ59INqJlh3lZwjvmIB6c+k/ci7
+DlJP9F2eKXnuZkbf0sVzpNAT3mUGV/5cJAyExeOpFwzgLA/ZV1WwxrxIVxUy
+vy19eAae47zCPf+MYj1Gx90uKzgi7k+XWtKvBdO5IbA4W6fyMulvfqdHLjl3
+Jf8Wk/q+U28bvYCZbgH+0rDwwPojQjjrRXtICfoVoXJtgpzTzNpjIUdhjR8u
+nDdwacN53SUwLTypv4aMn9WlC3FuJapuHCqAfUvTP92A6xN/h0bBqdnG19zJ
+OehlMu4Oa838W2QExziMD5qQc7/mq7q8FrnP/yM9F+aayExMaaJv3/w+i8i5
+t2N15k84gfPP2mr4e5Fn/iSsnOOvVwCnBikunIv5/eVnqpLIe8Ha1Wc5XMxM
+CE+A6/frVW6DBZ3jvil65HwOr/KDm/wSZt2F7d0+ilJhlzl+RuSc7b5QGsKH
+y6XebZkg59xOetNXmNpNmWeI/Dq4pyyVyLk8daXHj/SzRSrQiNxfeTp5pXBM
+bLXjVtj8vvUvabz3GHs1ze1h/ulvVg5wzPw3MjvI9ZxkQRr8PXLVQgvYhbVs
+irxnsy5S2BqwwtOQzXp4L2voKZz/ifVpl/7yPARHtbwJfQ7znCojrsNitdc/
+LsDMuDnrymFJpPUnJqzV/SG+BW56N1o6in4J945Z9MLW2b2SfLhj3RJfYseP
+591cYd4dkbgV5qakpMrDGreuyFXBgnPqWxqXoU/u1NhMmMNNvh0PV949mnIW
+LqV6v9wPR200zXWEKbTRFQyYvm9qN8k/JlUkVIPz/ObtloLpX7bZysFDLyOs
+OlBvt6ysjyys4SbKrIAVoqgJSnCpSXd8Lqw241b0CliSy+pKgUMSGtO2wY4B
+fS3/889DD31gVkvuH3kwnXKMnQizQyw8qmCuuUi+Gg5xkG8j/WWmK08bhlMZ
+TjULSb7SdRFKqNelxvnxLtg2XVWRAWfQnrZfI/04e9/XAWZkSH3pgvlpj+67
+w1luq/xWrMZ1x7J8POH68lsVQXAM5/lDZ9g++N6yarjapUnfilzfHCczZw32
+ZckcRS2YJvL6vR3mKd9bOYp8OMFiSTgspn7jV8ArRembi2BLdsX9EDiMIZX3
+Cq4M1VZdC5fn5Z7thWPObQkaWIr5X9vyBmDHxicnU+HJF40ZfXCCSPOZPVwY
+Y31EQEy/LTcL1tr3PvIxXJ929XWtBuq3S/mcCNs2p1jEwpKVWz/5wRGh/1U9
+ANOylWdaw4zagcoNMF9p57fFZL5YJKHDVGe20yjqpQSPTy2BxXu3Nv4XNm9v
+D9aEC2fE5ZfCarGPIgxh1t8lgzkwNf32XRs4zK5lRQbMf6Cmchzm8A6HZ8O8
+Cf/zCXCpZUVQCSx2k/F6Cg/5ZMu2wt0jixUGSX53b+dQkE/3aGerAurjXWzX
+NoGrHc7OXQ8L/3w6yIGjWPE2LLi/kjpM6nf8/YtzHF6gGTQwTR/5xJm1noKn
+K28L14WjYifWBcLpgk0f7eDJK8s/H4ZfVn+q4cDC7XfabOEuM6+31+EsycMg
+bdh7AXWqGBbf29wwgvwmqzwsXhGz9ro/hPOuRr7tgfs+u+mdhFO/ee0ZhvNm
+nzxL+nl9U2zwKKx/2bilZAlsFO/8E2YPhFqrwxtijHaPwO5m+k+i1ZkUz7cO
+lH6Ycvnrod+LmZRLPk83vIUrV/0YOw/r6LkuroVpGaFRqnDBmoHme3BTi9GW
+OjUmZbWh3O00uFRjrWcsXE5xlIom9b2tpZyA+9vTlwfCrFMJNDZ8ZanY2Qtm
+HF7ieRq2ervwkROsvMq3OAOWq5vQdSTxcrZXtMF9/tP37yb5NNR7aGL9LO66
+FyxYsr6yOwCu3GwQ6Qn7UkOlGuBk6pkQsp4y4/s+TdSnbiu38QrMWy8T5Q9b
+aakuvU3i77jmWwrv/Nqwvp7U18QK/gxTp1X4i0l/Nrx+Jod+jYxdiFUywDrT
+lGwWwQn9s8wt4JkV9ipzYJUVWRoH4abscMf3mP9ne+HnSDiK52GZCTsqJhzL
+hfljc1jb4CLxx6jnMHfVaVo78m09fcurjYz/KOpzglcXMzwG4QybhkUNqN+7
+tUdtlPiP9jgTWJ8lCh2HNZrPX01VxfN4M6VCAnevt71MhTMv6dl9hcOGKG/8
+VbCf8vOH+8h4ti5neBHuv/EqroDMF21rOwOrHy3aU0XisyMr1GC54Q1hhXDQ
+8ymRQBn7JuNw6AaJV1AzLwduO9Ltch62tulv5cLmn2Lu+cH6Fkd5CbD+YNF1
+0g/69UjxXbjvYA7NCRYv+tL5DtbolPq2B2ZoaDdrYD3jZzKv95L13BLdfGAl
+CeXXftLfMxHRz+GVAWXBPnB/gdcvFdSz4NPyWWR94cYDNidgHVkXjTTS/+3N
+9DK499AdSRksCbEsHIM/HC282kWuF9IiddCfVxev10obIn67lOEGmB5aZqsH
++1p0LSEe6TWrt4et20aatGBBb+BwAJzxZMfAV8TL5AWcSISFwb1GOXDQi0zN
+Elj/2eGkP2DuIc15zXBT7t7ZDcif5mTqLTIk+0NztYJXP9Z98I2sb5mytBj9
+WPl1U8EEXGmoelwV9sl54PgLDrtodjN8Id47AcbTx2BJx1atISU8X9vN9wyT
++HL3Tdzhxx92KfXATIOuzF5FJmX8AWdXI1lPKIg9Bfd6LTcrgzWEwXbL4C+1
+j9RyYPo9B4ZIAXX729nFkfoCLl+qgmcmey4/R+KfKzpQAvO3hnw4DvOvbblf
+A0dE5BcegN2DxE6f4KG6pGNOsLidakTiZww+aGeR+EtfMY7AHn+1+ruSfgrK
+Hz+Gu60GD7LhoGTOlfnIf6Trdfxp0v/w7bZsmPXjzE0uWU8YefkRHHh7s6gQ
+ts9P06OgHzEWrPMNcL90XOA62LDknddXOK+2ieMMVx622bvQCOMVejOOwIwG
+b+oGmGbyaL4bHDH/mqIn3BRtcNWUuGehaRTMGD/Nm8B6rX1njfLhoAVS97Nh
+p4KSzzVk/MbAmClcaH8nvBMWSz/sKkM9gbOTLYdh5a6iK2vgBGr5q3GYrl3V
+lqTw//8nMcb+/cZHnvl/WbJfLQ==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.168383585437326, 12.327367955153331}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJw9k30sVXEYx09Gu2RhKP64ZOec4RyEZI2Lp3mrFK7krXB3S/NS3VW3pel6
+y2LMuiZU6JpYmbmsYaQ15S2Eq8RNpuvOSLaiqUuMfme139nOnn322zm/5/k+
+36+dWBKRpEcQhA96ufrvoWDBiqv2QMhvGFcPkuCR53YgV4A45uTlrhoSTJYt
+PipzEasnAzrySagfTXcoGkNsGjpmkE1Czhyf7rR1AOJY2oZlIQmGiuWWBgni
+8LbB0/UkZFUX+Y13Ia6x3WZVJEwXR4XPEI5AFEQmUDwKVP73mzTeiNcdUogT
+FOhlRJQWpCLOXvJZLaHAeKvb93AR4pW5zZHPFLRJGxf2VSO2ij4jJGkITll4
+caQGcXp0f8wFGjr6Db2yyxC3tA/YVdIwP5T0VZGJGOTSnF4aVOJe5+14xIRB
+mvksDTvV5aMlnojVfe7xCzR0CvP2tu9BrJrkz8/QoHhy1GBDg/oHQuTxhgaf
+MSP9xU7ELSZr6goaht0SLCcfcvN19weIaFB78hStdzg9dOlKGxrOJV8jZm8h
+Xgkb10xSQLXqlDoZYnlmlV4xBStvVRNqOWL1tFdsIAWE2HRG9hzxs7RkQ30K
+8kJ4Cp6Wu//Q4qd3JEzUxQhG+Nz8oxWbtSRExb0cTz2PuMNXMF1AgqyC3/K9
+GbGrvGY9i4RQG26/DD4vL9GGmYUz+Psgrb9LWRWD/++X97THXcvg+61WdSId
+n8X9mQ/8IHNPsbj/xusHWXsJi+dbkfKEvFwWzw8TxTt2d1msj+CnThRym8X6
+qYxqvzleZLG+U7G/Nq2CWKz/1oNXf3bbsng/cVMZq8fXGLy/qscpblcGGbzf
+gH7v97tqGbz/jquP9otyGOyPs+LffVmpDPZP5AfrwIFEBvsrsTXSeknMYP/d
+A7/XQ1IG+9NM2XTpZhmD/Tu8nhZh28tgf3tVNjSTOwz2P18h7XYJYHE+jAot
+wqLkLM5PabB2OkjD4nxJ4vKnpK5OOH/6vsuMUOaE86mpG/0i60H8P7/Oplx1
+hr8PJnw6
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {9.154900000000001, 13.}, {1, 0}], 
+        LineBox[{{6.4999999999976925`, 5.5}, {13.49999999999251, 5.5}}], 
+        PolygonBox[{{10.6, 5.5}, {9.4, 5.1}, {9.4, 5.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 4.5548}, {0, 1}], 
+        LineBox[{{6.499999999996362, 5.499999999998181}, {9.999999999996362, 
+         11.500000000001819`}}], 
+        PolygonBox[{{7.947677384685548, 7.98173265946094}, {8.897834175673825,
+          8.816718930329426}, {8.206811054955079, 9.219815750748694}}], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.515942703607428, 8.676200089562332}, \
+{1, -1}], LineBox[{{13.5, 5.5}, {10., 11.500000000001819`}}], 
+        PolygonBox[{{11.447677384685548`, 9.01826734053906}, {
+         12.397834175673825`, 8.183281069670574}, {11.706811054955079`, 
+         7.780184249251306}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.800156843998153, 7.716069211607572}, \
+{-1, -1}], 
+        {PointSize[0.04], PointBox[{10., 14.5}], PointBox[{6.5, 5.5}], 
+         PointBox[{13.5, 5.5}], PointBox[{10., 11.5}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T2", " ", "P2", " ", "N4"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"aebf/cgde/ehfgfhgh.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "aebf/cgde/ehfgfhgh.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {0, 22}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJw11glUU1caB/AHVglCISRgESnbwLAMixEkVJE8ZZFFmBQZiBVEEQVUUBaL
+LFUUFxYNDKNAESRjbRqppREBWQoFsUoVKzIMhiqbhRaDQFQglIrp/3pm3jkc
+zu/cd+/9lnvfiXnUweA96hRFZeOP/KfeqvCspKl3jwNNaQzwrU7BzPDxyV57
+mtpQHDjyxpCm+NUR9rWwKLXecj9cmJDPrYS1C2779n5AU1l/PaZZAm8McR5y
+hw8VR+mWw6UWPx+7uoKmpO13LavhLa/Uik1gUee6C11w249iJ5EB3l/PsJyD
+jxt8382BGexnK20Rzw3hp1v69GkqtqkrbDccfYAhLoClW7ITLsP/8Clc2AG3
+veQ3/gLPDP2Q4gXzbbkZlo40ZXHGLoAH7zxpurgLdhY0dwbCbrL7X38Oc+7c
+jYyHDZ+sc/kRfqhlfKeM7MfxrZiCWTm+K3tgUXZ8BMOJph6NHdbURXzSsdr9
+BjBDbYoRCAsemwcQu40EHj0Di2zZTPK+uoqrbISz0qMiyXpfFwq2DcOx0/4x
+ZL8SI5GuEvaN3NNTBjczb3H+IPUI9KuLhpfzva7IYb5pRaotzBxqcboNywKL
+GieQb42/l5Dsd6T7pWs1fEuZlLCWzB9XSpJhlqd8/0PEL7gSIPGAFfGli2Hw
+cHBEoR78YEnBJz1srF8bs2cK9W9/UhC6CTarX9PaB/+aLONeY9FU96pzNfdh
+Z3rxjD4sTfN4+ACWuAyMHNNDn/PndAdgdeO+1ldM1Lsvc2ge5l3c550IK7JN
+TMxIfy7Nur7VRXwn2I4fw3Z1epkecINh8NI8WF6T1/aVDk3lrNX26iTxml0S
+u8NuIYNBmsj/6MCu6cX34Q8L9vvDKcUZSXJYcdViKAeO+teknQoW3Z7VugXP
+2e8TcDF/3PmC8DWszm65cRZebcMWrEJ/ThZr1CrhLGHDbS7sZd47cpDEs86w
+ejMZN493eQEPt32X6g+Xnm5s4iCfwqAxAxp2D3XZuhemfDV0bGGj7yauF8AC
+tm7iMnJerEfNqogjKx/2k/jV7wtr4IaIbpsv4Umje1IxnKXh0LsPzt3QveoU
+WU85HOMAO4xzQwJhWZxz+TTqsW58g1iFeAx/ynWoJbaNUXeH27LcWz+DjdJ3
+BIWQfBLzGoNgi+atV4NQDwbrhRu5T2Lrusw12ujvk4kXOnDx4WQ7hhbqN5K9
+XI3M5wilMk3kafrTBvI9OFk26v0NA/0KLrusDSfN/3NGqEFTdOD6Dis4Qcx1
+Pb0M53KitMIf7hs8Xly2FPX5Nqg6DTbZOB3Z8x7qLwhXuw6npCeGroEla6Sb
+p+Cz1qMnWpagvhkVCkdy35rK9Q7DnbNWPofgcp1sbwHMLBnM+xZuyudlRcOS
+BitDOXyH9ZfIC3COKCLjQ9Rb51LOxCh5f+3zQtI/FlX2NAD7yWLbL+6F3xhf
+/q0dLkyvFKTB53VTV3kg3rbBca1j8HvU+543l5L6deSmwpdevfa3RH6rp+e5
+u+F6RdSXmbDil/OanrCP/ISkAZaExacYwnmP5M8ewbHZmrvGEF+ReVVUB5n/
+osTgGjmvNT0TubCo/onxQVi2YG38bv3TVnYcuOvjuPQi7C/rP/vHDOozbHXu
+0GPEu9qpZn0L7OvzN44S+Yn2hkWfhasVH+Uq1dGfZtYX0aTfYiPRkBrGM/za
+N5N+pNyU3KQwfjqDyYXLLR109FQ8avWSxu3OcKf3+af1b3gUdffZoDu5b36T
+s0kLPOrInIHXVlgyJqoInedRom2RXx2GDwi6ohLnMH7mnIh8f8sTxCndMzxq
+Z3ZdsAz2EhrpHX3No9xyW7P0Sf++GWAffwX/nSUOgfXz+quevsT88F2sYvia
+1MG5EGba+Gn0wYo0b7oEzll6oU+P3K//Xu96Dpv5dql84GjPq0WZWO/IvbsB
+yTBzbHvORuzH/4/J2Hl4Z/L36TaIp9t2x4Eq+MommzbTWR4lvWincYN8nz1U
+C/qIn79WElcNN+i7jM7COUWt/eXwjGe9/nUl5vutsH93HuL8f3BF/rISRVMo
+fISXkZkG0/YeYVZwuKndFwnwfPjnLpMk/sRtv+vApZHUIykc3WTzayjWEyzb
+3p8EM+KElT7YTzS4oOUKa3eusHmGeH3lnxgton47h1ssOMgn9tSB/Huw4YrO
+ox7If1yjsVIE83cnvHWa4lGMgny346R/jh/4XHyOeGZdOuLh+a665yOjPKqz
+I8g2hvjGtSKbYcTzoOoOGac2RvVaP0b9Tu3YQ+a3qUrZxg8wv96A/jcZlweo
+dJp51KG5ouVdDv/7XfD/x5H+E14X+cg=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.4225671224906584, 16.38857259237856}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt1wk81HkfB/B/jpUjR+4RjeOpRO1UK6LMn4gtaqhcZc0KW4ihrKdc07Ll
+KhN2i20zZTt0aFRscjRSrQhDJKuiErrWIDnj+fye5/F6ef1fb7/f/3v9/jP/
+Mg6M9AyWoSjqIX7JlRqbxY8pTf33R4empvxz02phzsFFpce1afELE2leAsz9
+IbTcVpum86PFBSyYdmqMm9WiqXEr893dJjQl+st67BXsocmayISZ25LS+7Ro
++o7QYs9amLNNtk9Rm6bWnPEulRrTFMu7U20T4tcIbuddgTmDWxLPYz1SITY8
+Gqb3Bbno6tD8p+tjZtbDPceKA0/AvvaKySYw/7Xb5EJdmm5K7UpShQXVuQ+K
+dGn+AbsP9xVg9aqyyGV6NNU6oLJ/HizJtJUW6tHi9+evyRjB4jnmI1/p0/ye
+leE+1jDz7egSD32aaj63uM8Llrr+eSwRTjMOfniAxMsYLMzUp8WcrJHhU+T+
+2/qZB7E+3214SxWp13M141t9mo7ZoTDSQerrrLo/qUfz25gFdu9I/uijaTmo
+Z2vN4okhWJidWqyHeiw/RqZ+JPdrVqQIUP9mjYK3XTAvoURVRpem1N4UNFaS
+eW3/sXC/Dk1PVLjmC4gHmJmDmFcsQzHYh+R7ZHj2AFxntatXm8Rv3jKih/le
+ujri08DEfmknr1WLFj/2souMg0XL264UwWERYgNzWDIVdEmI8/sQ39JXvBB2
+vnv3TziQ7SinCXOyUoQf4fTtU+tTjFDv83QPtjbN1xr8p0gB5nsmRVyEXY1y
+NpwxRL4577ab4rxGb3CpbTBfqTy2CM+XXdNQuDEs5bpeXYV+F2XWVSiS/ZOb
+8m7DsdadN5RhXukvStaYn5fPWK0ZzLRM33kWHtBw/ZcHLJhdLfmMeX736t28
+TJjjwu38Gufhs2DFUDOJ5xG/YyPOV4+tUK+D+kS7wx87wcZrLof5kXpza8MW
+wvkHf2zLJeu/Z0x2If78sZBEMUxtPD+QAGusZRU9hXnXteSUkO/85EheJ3F4
+Gvswzsc4Y1Mj2S+WPRc4gX67b8noH4Ulw4rXQtGvDLe6wp5YUznpJc6nMKrC
+twP1iTLmvQ7CvJ5mSvp8YcmbOscpLZpv8U9HYv0CzCdhp8Il+LI0Z/lymK9Z
+4RmD+TNshq6lG2A9z7YuAO6qXGXYx0C8MNaeUOx/4ahTsAHmje8/kot1l77F
+jOuYi3QmuakLfnqoqnsZLGqrDlyL/CuDT4VUoy+m0TLtEtQXc8tA7QdY5CZf
+tAr1/x7WPWoOcy94L66C200yOhRgyvjA2g04Lzq8/ysKFpxzzf8L83AemYpR
+h1llS/xsMb9eZmGLFcwLzfA9CV+kzYrDSD7KJvMZruKwhLtXcBUaTbFlcR6v
+HBy/HiF/z1+9WQl1bij1bbTBVXj8ls0Q7q9hxfNjYU6EN6sc+7rNjNOKYIn7
+pFwwvPJEdstDWFDxenYc9Q18NlzZBvdo2lw6CCePN1+8T+I11/wkxXm5VzUf
+OgXzbj45/z36mzfXLsIHpk5/jG7HfK78siV1ktTr2LtwK8y1uej0MyyZYQa+
+xLzP+nt6TKNvickfaocxX3bK/qAgmLv1Tosz1pMdDL7cRdyegqN9prBbW7y+
+ESzI2jdqjP2fXI73xWHufMbgOBvrfu9W7yXfoxTvpX08rqajdg7euApKNic9
+xlX7aObqbk2cp0PgXAfcpxMTxUyE+U27v1TD9UudTq+GhY+iz21Af0rdLuOK
+MMeMf1+CvEF3ElTH56Mei7g5XpgHx8/XbxbmTH20b4ajJGtlDbGftt8gtxp9
+SmsuyrmTeEaXmlMwf13GwqB0WGTdyv0Tdnv+Zl8zLLmuNFyP/ZXfWCzUQZ28
+ggB/8lxt+/2YnQ+pf4+MZTb2+y9t6MqCWeaMLFf45ImvC8j3DKUX4PgG+UPT
+KybqYaGast9ezPF8uEHUAxLvfdVMH+qfHuU0XCDxCvsYvuhPufcXywiYbys3
+U4/+v3vSZ8KAJeN5k+txXtly+aevknk1TMg2kHmW7npqAYs1lTxC4EcvTRfl
+oX/W2bdzDTB/xr074kkN7D8k+fIB+8pCNBO9YI5d44EXmjR/PPfCT9fVEf+q
+KlMKv4h3GdQirvfqZSLeiprjhgpqmJ+Coj6p67h8sbqCKp6HNt0ccn5XdC58
+s3Ie8nf88xLvP2rsbefdYyroxz/spATWN2jwZ8IikVqhH/o9c3JfT78y8l/+
+cP4V+fztfeL5Gu4xdw36HvMxr42RU8X+Hla7rgTe/m+HBi6xakj7Esz/mXPJ
+rlbiZJ+OELi4l/rojfw8Tk71YbgtXiXuDSzMqrhDnKNjURaBeoXqThVkf829
+In4/LHLXYpN4AlN2nhP64/eKopqQL4UaWxEPizun+/3hjCfX9h2Ghfce/vAM
+9VqPbej3J+sOEfkc2H92sHoW8WgO70YN+vW9/3wqDKbsh9SsyfvsFR1xjtS3
+7N1j8lyIWk5mlaB+Tmtw+kb43bHNa06if5FNZeMnnM/TmEi7XUqYr03o9G34
+9IRyp6EivC5mpgDe1shc0aaAePoRRufgH9XGfsv+CvU5G40/hGdPJMsHy+O8
+l9QlqCB+ZG2Mu5cc5vXuhuYeeFOUb2mkLPLN/Cr+mzyHvVFBt2SwftGNtwP1
+HmluUrCC1WW4zr1wSbYwp38Onqd1xqN70e+9aQ3zZuLKaPMheP9aWZMBWCC/
+/HUI5vXsgbyjJe7nKk501MGNT+SVcmCh4MwDDcxb3sl+6Xzkl1C5VevguqhE
+ldPE8lVbNsLmDj9HLkW9dKxGKfm8Cvu2KF+GRSfmtsvCi57VWmmhP5Z7vO1N
+xLcK1UnaAfc0HR/aBH8xu7vu3zA/f58H+X445VMmEwRTKjdvusCZfxQNMmBe
+tJ5ZOfpTOTj3/W+Iz3nmOG4Bt7DvFQ+gHk6cRSz5XLKOrimRh8WD2dEr4Roe
+9+0E+qXU0j+0Yt6nRkOimijsD/j7wVHyvRS8Sn/BLJvi1aUeCoFtRqnladNs
+ShLzUjmAnKdZ8qPpCTYlskq+FAsLVri6Zo1hvf7BSDF8sUzs5T3KprhJ11/N
+QT6/x/kvdo+w8b6Imw2DPQtaPjweYlP82pjf+uEI+4jnhVLEy3IzjED90i38
+w1WD2K99xHccpi/JL1OCOXNvDCeif0tzf39Tsp5iWTkJP9r5k9onWPxxOyMY
+82Mp+TQXI57whNWOW/Bk+arrp5CPa9MuI4VVRgMCrg6zKeneXQqK5N+jz/be
+qEN9nMShiTmwklh3uv0Tm2Ltuqzfhf0RDgHrq9BPz5lUzq+w7UirYPdn5Nt0
+Vt8afpJroX4f5qod9iTvldaQtnn3YOHTsYl1sIhlVrkDFoVmdovQz4J1g2VH
+EI8u8HQ1gWfc0+y/RT7151uP5mEeS5UZiy+gPtY3CuWGsMlNw4Sr6Ec63LOk
+FPNlVYv+6vyAeV8esg6G/6gICB/phz1Ux1bAqftt37e/ggucP5P3Bt/EwCuo
+i00xBxJNlsK8eY2PoltQT5ta+Xa458B3O0PFiP9w0OO05v//35Gx7n9XLfo/
+Yw2y2w==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.077403306263033, 4.30673387473934}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.00000000000432, 15.}, {13.500000000004775`, 14.5}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.650294551449843, 15.441370831152057}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt1wk41dkbB/CfvWS5lquU5U7KZGlcS1T/lkOShKiYKLpTkVK5tjGiuqKN
+jKsia+6g1dKdUsKoSwzVTG7LqElymag/ihZStv/3zPP3PD09n+c99z3ved/f
++V2+2Rq2LkieYZi7+Ef/l4xP4seEMP/+6BHJy9jwS45zCMOyZ5X/AG8NCc5M
+gb0sBl0u6xEy72/x7DZYNj2h/S89wgRcuBY4fy5huLzqqV1w42ij/UHq8vdT
+HuDzb6fF5f1JvUGjOQefz7pRdIVtivzqxk/dEA9z/OfVBlh6f8Sli00EErOH
+3x6HB2eXRgTDxa/bh8WwhFdW2a5LiMKRpJj7sFdGJGetLmG6T1QnPIN5305R
+rtchzMkIpUJq0WBs2VI4InCm9p8wqQjoadYmROtN6MVKmBMYc2WnNmHURg7d
+zqH7523omQPn1uzRi4XFCRrKE1qEyZ7oK/Gh9Z7MGxnWIpLVMS6ZtjR/k/m4
+pjYR2Mr1/U3Pww+5V7wK+TvnjpBJnJdoX+7OQb7kR38t+ADz4h6vUNIhpN5f
+WjgIiz+7qyfoEMmkYsizURrv/em8Cs7T31QWp0vPx7/WlQ732ebsXwwLliRv
+n8EmkoP+j2ftoefdm8ScZiOf3rPey7RegYfhBGymPPW/72HugkVq3uhv8nZh
+9vJvke9evM8xPSKoMZLMTYe5yUafRIif2W2a+A8sdIg5kI35xNX65dnOQz7R
+3EURiDsbbNx3AGbeR+vMR3zFNs/ddTBh7Un9E/VMaP5q8ZWuT3pybCPmdcao
+/qupGWxSq/JEl0jcdvbWuMDC1NdtLrB1ZhnjBzOf1qy5iX7sOM7XDIQFQSfK
+rXSIICmnscMX5ljv1ahAf5nPfPWVsPRqYuMaOOXL43pzmBfy2XwM8wj06sxV
+hSXH3rndxbwi84wTX6Me7lcn8XVYLT0tuYF6MtSpHq6ITqgvhnlhgYve4fN1
+4QmsFFg0rDzPAfmtWwRT9sH8rw8NsjFPo4PO9yJh6YrUVg3UWzbnzatY6vqX
+qifh4WsfHVPhwfGC6lmY1+JYA/1ymPP9tbRiPK9um33ftsFecjuXz0V/FMID
+TrHp+dju/ZmY19tuniPtB+upw6GPiL+8M36+mJ6vulPFHvfJ3dZVbYj2rye9
+0x/zC5lw+nGVOeqtT5bjIR7T3vYgi7opQ2El5vWsaL1GD+zVtMJmGtb72fVs
+s7RAf+bnRF/HfhkLhZt2wsJHbEtX+ED454kcmKnXGGzGfDonawZu0/VX0tyX
+of6u2oexT2FyKz3oCp7X7KG+vE6Y9x/7LBPYQrJfrYPGTRVmFOJ5b2tea/oQ
+Fsxa+7M1+ukZbi6rgr2u9kmeahHBlcbkslz6+YEa52zMw974TmAsNd+ZxGoR
+Yr+IjPrQ+q7sdoQFKd79WXYwJ/7CPKwnXwKkNjOo32eb03xv+IYJCtQt5m+s
+tIlkY+71JyM4P6e1Mvcs9jfuMRj5Aos36PgZ4vl6/nvE9Cm0nrWDm8/Bx/bd
+EJvA/MLTO6xw3ruNZqnu9DzztIwq0A/vBIuGBFhk8Wa3Jfrlwd/eVEf7MzLc
+kw4H3yqKUbWk9+3SrA7cB+G99Y5+1Oved2hiHkHXpi4vgcUNNke+wbxmdG3h
+jcOsA1byOnD7oNYp9/l4ngL0Pr9Cvrzn1v0ZMOkfKs9GPnt5j5ZWmGOnPGbH
+JoxHaKSW+nfIrxKs9Bvq/fjeTc8BFjSOyi1AvRP7Lnavh/mb9bvPYz4BN1IX
+boOFuk5y+ngfksb2+CCYN/jp3En0p/f+mZZNMPNGVDsTz/uKjO63q2Bpaze/
+Ev1u9mwytKTrM8cf70G/Q3IyNKfRfDxRoSNc/e5D1WvUx/UYUl+AeSqkato0
+wl7N8wtcEZf/YcOh8zCv04cbh/tmEHI24WdYUlc1ivtKzMosyw7CYkXtOi72
+L+hYphJPz/skaeIS6isaMBlLovG2g4vxfmCC2bPX5tJ8tqn+VZhfQfVC1m1Y
+YH1G3hH3b6+LS+4AzLqV//kWnPc1X2RB++H5qwDzkzhG59qH0/MKjeoS0c/R
+ItePtbR/3SwVCe6f865bappWWM8/ofoS8SpR6oEfYA4vQv8FbOe02OYqLCol
+31XDL767NG8C5rZvGoxlE46lhrn3N1ysl+vIN2ITHr9bp3AZLKudJSvFfBTq
+f57lCzNbtVPNUZ/bQCRnByxaY+Z3VodwLCZsd4XDPO6y/Zo6hHd7/1G1aJqv
+v8nnsDYRtZ3bHhUB850NGBX0x2y169ZdMPeq0mgO+r1czVgWAIvTL7a4aBGZ
+7x5fW0+ab++qJg30O0wovb8EJkF3fx1iEc6kfwHXAvbqVJSMsYhkLut430xa
+72RTpIkW4S1rDolSh4UZUed3aBFR69gBQ0VYuvrpuUbkM26rkmNoPf6VQQtx
+/643dw3J0fN1HLlThfr6n8fsV6Xn23jxmZMOkem8+/2OPt3v2lffPzBPD/0L
+2VZ0v85HvZ66hBfHG4hZQ+MWjvl36Py+HD+yG2bJxVvPQT8vCRsvpNN6VFJ+
+CsV9cRhwP1pF159uycxgExHbc6yki64PbnQQYb3FWHHKNGvMt9+5LJlNZNmj
+1wtsYNahohEfxIlJRawvzJ3pUKuIfDtf7G2Nhr2iPhjk6hKZUtZAeRqN938S
+GOG+LS0nLkXU6sNeGZhXddc6WzFMxvzzlXWI6OZEfPANut+pHyWx6MdUTXdz
+aqFH3+gQnv8HtdnGdD1zw2/6IS3CKTxruOAc3W9rlNIczMv1QW9OJl0fuuS0
+DPOoa0m4epjGz5yyrGERnt4q97FIWFqeWHwd8byb+xS2weKbBaZSFiFJiutW
+b4D5zF2rqZiXWes4dzUsexxdFIB5/eMx3O9E87vtGmrG/qomH/ZSS5Uqgldq
+E15y5JJNrrQ/BZXr/kD945YzGB96niGXY76YV1JTsXcIzTfBvvwC338tNXG9
+CTReJkj/HvPa9tcE6xdYMju6XILnvSuNVdcAi/hxW7TRf+stFVV9tH/VS5fi
++4dDHGSpujawYq7PFtw/Xkl+5VKY99BivS/u6/PW2NIgWKppmjYf920kx/pD
+Mo1zxWqvMR+SmmRTCgtsuwKOYH/5wDkezXT99I5IFuJHP7QEv6S+fHxzCt4X
+pcdaPr2FhYc8349rE1nmsEPDMI33O8eFweWyU2MjNP+eGO/X6F+YsMVwiNaX
+GvHjbrzfJGWJX/rofqZOi5VwPzRMv1yg+SVld7tvsIjgalNs7AOYrOyJPIz5
+3BVeffUbPBjF2hzJIrLXj3QiS2BWpSt+8yCSUH370lxYpqf6tJxFmMOPv5dL
+o5+faFX7gnlGRilXH6H7RzZqbsb8ag2HuxJpPqfVwkfYP7zh7fKjMN8xdJEv
+vn8dCpIc02l9BteUZHifMoWLJ3+h+4V754dgfjcT/2NfRes9kXvzDe5jmGu7
+eyssZokT/HQJ55S0xJ+eX3rRdBDff7Kd0gw7I1vES8b0hxEvmJoV7wLLSgTR
++rg/crm6FWGw18LmKYaY74pFsrVZsKTGJonB/KK0Rv64BYuyMlwa8TzIW91r
+6KT5Dv/tthf5//27w+7/f3/okv8Bh3rOqQ==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.887640361876242, 3.60760723752485}, \
+{0, 1}], LineBox[CompressedData["
+1:eJxTTMoPSmViYGCwBWIQDQEqDlp8IFrRgaGg63OSmYrDmepz92sPKzgwrNg8
+ySVexUEw+bVWYC2Qr6G5271CxSE7ov16iQGQ/2Gjwa96FQf9TUe29h6Qd2DY
+MYXtVamKw78XGvPWKAD5G7zM1kSpOCgLv2yI7ZBzYEh4wHhFX8WhJjI43v2f
+rANDxeqFt78rO/S/vb7ErgPI57g+7f9WZYc/nNE332kB+Q1ih/jylB3Ea+ua
+pr6UcWAQkGMxUlF22J6y0ujSUSD/xYpV6+4oOSxaZNzVtx/I71hhuXy2ksP8
+mW+6/18B8gM8Le6lKDlE7jDRP8AENO9AfnedtZLDhPXlS5hdgHyG31PeKCo5
+CL2+lHRnEpCvYXV2kaSSw7pV3x9NfgHkG2g+klZWcvigW/uV1w7o/gP/55+2
+VXLYdu3Vd8MeID/gA7d6hpJD5yvnq8FnQP6zt9w9X8khYef7g9N+APk7ONoD
+Hyo5VCyR/u/MAwwPgQ168prKDi94BBcJsAD5BY3Jf4uUHfwfx4X53QOq11A9
+umyXsgODzX13ltlAfsSU6d9+KztIbH9/8J01yP4zEmrGKg4VLP7tqUeA7nth
+mMESq+JQOrM9RssSyPc4eFi1XMVBTf7ofKUFQP9fyI9nb1BxmGoBil8ZuPwT
+ZuuEu/HScP1TOisWXz0mBTd/ktzGilnWUnD7BXcJ2AkekYS7j+u5wo7fKZJw
+9++yX7hyo6Ik3H+KYu9j3/+WgPt/w5knDHs+S8DDZ2WmgF0muyQ8/Bos9mit
+MZaEh2+wjyjHuWJJePhbODdzfTooCY+f6AoO2RxxKXj8fTfXnaucKwWP38ri
+jug/u6Xg8X9hx+kL9n+l4Okjq1O4hEFbGp5+MhrOlBY6SMPTV/C+sLO6VtLw
+9Cf0pbE2S0wanj75JJeqCV6VgqffKlON6IPlUvD03XtyzYIdjFLw9M8WJ16/
+qFwSnj94rK4nBt+XgOefWwXWXkX2EvD8FXzgY4DYfHF4/uNYrbkqllUcnj8L
+tJMdWCrFHGD5dysbiBZzAABx72bD
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.354800000000001, 7.}, {1, 0}], 
+        LineBox[{{6.4999999999976925`, 14.5}, {13.49999999999251, 14.5}}], 
+        PolygonBox[{{9.4, 14.5}, {10.6, 14.1}, {10.6, 14.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 15.4452}, {0, -1}], 
+        LineBox[{{6.499999999996362, 14.500000000005457`}, {10., 
+         8.500000000003638}}], 
+        PolygonBox[{{8.552322615314452, 10.98173265946094}, {
+         7.602165824326175, 11.816718930329426`}, {8.293188945044921, 
+         12.219815750748694`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.515942703607428, 11.323799910437668}, \
+{1, 1}], LineBox[{{13.500000000007276`, 14.500000000005457`}, {
+         10.000000000003638`, 8.500000000001819}}], 
+        PolygonBox[{{12.052322615314452`, 12.01826734053906}, {
+         11.102165824326175`, 11.183281069670574`}, {11.793188945044921`, 
+         10.780184249251306`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.484057296392571, 11.323799910437668}, \
+{-1, 1}], 
+        {PointSize[0.04], PointBox[{6.5, 14.5}], PointBox[{10., 5.5}], 
+         PointBox[{13.5, 14.5}], PointBox[{10., 8.5}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T3", " ", "P1", " ", "N5"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"aebf/cgdf/fhegehgh.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "aebf/cgdf/fhegehgh.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {22, 22}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJw11glUU1caB/AHVglCISRgESnbwLAMixEkVJE8ZZFFmBQZiBVEEQVUUBaL
+LFUUFxYNDKNAESRjbRqppREBWQoFsUoVKzIMhiqbhRaDQFQglIrp/3pm3jkc
+zu/cd+/9lnvfiXnUweA96hRFZeOP/KfeqvCspKl3jwNNaQzwrU7BzPDxyV57
+mtpQHDjyxpCm+NUR9rWwKLXecj9cmJDPrYS1C2779n5AU1l/PaZZAm8McR5y
+hw8VR+mWw6UWPx+7uoKmpO13LavhLa/Uik1gUee6C11w249iJ5EB3l/PsJyD
+jxt8382BGexnK20Rzw3hp1v69GkqtqkrbDccfYAhLoClW7ITLsP/8Clc2AG3
+veQ3/gLPDP2Q4gXzbbkZlo40ZXHGLoAH7zxpurgLdhY0dwbCbrL7X38Oc+7c
+jYyHDZ+sc/kRfqhlfKeM7MfxrZiCWTm+K3tgUXZ8BMOJph6NHdbURXzSsdr9
+BjBDbYoRCAsemwcQu40EHj0Di2zZTPK+uoqrbISz0qMiyXpfFwq2DcOx0/4x
+ZL8SI5GuEvaN3NNTBjczb3H+IPUI9KuLhpfzva7IYb5pRaotzBxqcboNywKL
+GieQb42/l5Dsd6T7pWs1fEuZlLCWzB9XSpJhlqd8/0PEL7gSIPGAFfGli2Hw
+cHBEoR78YEnBJz1srF8bs2cK9W9/UhC6CTarX9PaB/+aLONeY9FU96pzNfdh
+Z3rxjD4sTfN4+ACWuAyMHNNDn/PndAdgdeO+1ldM1Lsvc2ge5l3c550IK7JN
+TMxIfy7Nur7VRXwn2I4fw3Z1epkecINh8NI8WF6T1/aVDk3lrNX26iTxml0S
+u8NuIYNBmsj/6MCu6cX34Q8L9vvDKcUZSXJYcdViKAeO+teknQoW3Z7VugXP
+2e8TcDF/3PmC8DWszm65cRZebcMWrEJ/ThZr1CrhLGHDbS7sZd47cpDEs86w
+ejMZN493eQEPt32X6g+Xnm5s4iCfwqAxAxp2D3XZuhemfDV0bGGj7yauF8AC
+tm7iMnJerEfNqogjKx/2k/jV7wtr4IaIbpsv4Umje1IxnKXh0LsPzt3QveoU
+WU85HOMAO4xzQwJhWZxz+TTqsW58g1iFeAx/ynWoJbaNUXeH27LcWz+DjdJ3
+BIWQfBLzGoNgi+atV4NQDwbrhRu5T2Lrusw12ujvk4kXOnDx4WQ7hhbqN5K9
+XI3M5wilMk3kafrTBvI9OFk26v0NA/0KLrusDSfN/3NGqEFTdOD6Dis4Qcx1
+Pb0M53KitMIf7hs8Xly2FPX5Nqg6DTbZOB3Z8x7qLwhXuw6npCeGroEla6Sb
+p+Cz1qMnWpagvhkVCkdy35rK9Q7DnbNWPofgcp1sbwHMLBnM+xZuyudlRcOS
+BitDOXyH9ZfIC3COKCLjQ9Rb51LOxCh5f+3zQtI/FlX2NAD7yWLbL+6F3xhf
+/q0dLkyvFKTB53VTV3kg3rbBca1j8HvU+543l5L6deSmwpdevfa3RH6rp+e5
+u+F6RdSXmbDil/OanrCP/ISkAZaExacYwnmP5M8ewbHZmrvGEF+ReVVUB5n/
+osTgGjmvNT0TubCo/onxQVi2YG38bv3TVnYcuOvjuPQi7C/rP/vHDOozbHXu
+0GPEu9qpZn0L7OvzN44S+Yn2hkWfhasVH+Uq1dGfZtYX0aTfYiPRkBrGM/za
+N5N+pNyU3KQwfjqDyYXLLR109FQ8avWSxu3OcKf3+af1b3gUdffZoDu5b36T
+s0kLPOrInIHXVlgyJqoInedRom2RXx2GDwi6ohLnMH7mnIh8f8sTxCndMzxq
+Z3ZdsAz2EhrpHX3No9xyW7P0Sf++GWAffwX/nSUOgfXz+quevsT88F2sYvia
+1MG5EGba+Gn0wYo0b7oEzll6oU+P3K//Xu96Dpv5dql84GjPq0WZWO/IvbsB
+yTBzbHvORuzH/4/J2Hl4Z/L36TaIp9t2x4Eq+MommzbTWR4lvWincYN8nz1U
+C/qIn79WElcNN+i7jM7COUWt/eXwjGe9/nUl5vutsH93HuL8f3BF/rISRVMo
+fISXkZkG0/YeYVZwuKndFwnwfPjnLpMk/sRtv+vApZHUIykc3WTzayjWEyzb
+3p8EM+KElT7YTzS4oOUKa3eusHmGeH3lnxgton47h1ssOMgn9tSB/Huw4YrO
+ox7If1yjsVIE83cnvHWa4lGMgny346R/jh/4XHyOeGZdOuLh+a665yOjPKqz
+I8g2hvjGtSKbYcTzoOoOGac2RvVaP0b9Tu3YQ+a3qUrZxg8wv96A/jcZlweo
+dJp51KG5ouVdDv/7XfD/x5H+E14X+cg=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.4225671224906584, 16.38857259237856}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt1wk81HkfB/B/jpUjR+4RjeOpRO1UK6LMn4gtaqhcZc0KW4ihrKdc07Ll
+KhN2i20zZTt0aFRscjRSrQhDJKuiErrWIDnj+fye5/F6ef1fb7/f/3v9/jP/
+Mg6M9AyWoSjqIX7JlRqbxY8pTf33R4empvxz02phzsFFpce1afELE2leAsz9
+IbTcVpum86PFBSyYdmqMm9WiqXEr893dJjQl+st67BXsocmayISZ25LS+7Ro
++o7QYs9amLNNtk9Rm6bWnPEulRrTFMu7U20T4tcIbuddgTmDWxLPYz1SITY8
+Gqb3Bbno6tD8p+tjZtbDPceKA0/AvvaKySYw/7Xb5EJdmm5K7UpShQXVuQ+K
+dGn+AbsP9xVg9aqyyGV6NNU6oLJ/HizJtJUW6tHi9+evyRjB4jnmI1/p0/ye
+leE+1jDz7egSD32aaj63uM8Llrr+eSwRTjMOfniAxMsYLMzUp8WcrJHhU+T+
+2/qZB7E+3214SxWp13M141t9mo7ZoTDSQerrrLo/qUfz25gFdu9I/uijaTmo
+Z2vN4okhWJidWqyHeiw/RqZ+JPdrVqQIUP9mjYK3XTAvoURVRpem1N4UNFaS
+eW3/sXC/Dk1PVLjmC4gHmJmDmFcsQzHYh+R7ZHj2AFxntatXm8Rv3jKih/le
+ujri08DEfmknr1WLFj/2souMg0XL264UwWERYgNzWDIVdEmI8/sQ39JXvBB2
+vnv3TziQ7SinCXOyUoQf4fTtU+tTjFDv83QPtjbN1xr8p0gB5nsmRVyEXY1y
+NpwxRL4577ab4rxGb3CpbTBfqTy2CM+XXdNQuDEs5bpeXYV+F2XWVSiS/ZOb
+8m7DsdadN5RhXukvStaYn5fPWK0ZzLRM33kWHtBw/ZcHLJhdLfmMeX736t28
+TJjjwu38Gufhs2DFUDOJ5xG/YyPOV4+tUK+D+kS7wx87wcZrLof5kXpza8MW
+wvkHf2zLJeu/Z0x2If78sZBEMUxtPD+QAGusZRU9hXnXteSUkO/85EheJ3F4
+Gvswzsc4Y1Mj2S+WPRc4gX67b8noH4Ulw4rXQtGvDLe6wp5YUznpJc6nMKrC
+twP1iTLmvQ7CvJ5mSvp8YcmbOscpLZpv8U9HYv0CzCdhp8Il+LI0Z/lymK9Z
+4RmD+TNshq6lG2A9z7YuAO6qXGXYx0C8MNaeUOx/4ahTsAHmje8/kot1l77F
+jOuYi3QmuakLfnqoqnsZLGqrDlyL/CuDT4VUoy+m0TLtEtQXc8tA7QdY5CZf
+tAr1/x7WPWoOcy94L66C200yOhRgyvjA2g04Lzq8/ysKFpxzzf8L83AemYpR
+h1llS/xsMb9eZmGLFcwLzfA9CV+kzYrDSD7KJvMZruKwhLtXcBUaTbFlcR6v
+HBy/HiF/z1+9WQl1bij1bbTBVXj8ls0Q7q9hxfNjYU6EN6sc+7rNjNOKYIn7
+pFwwvPJEdstDWFDxenYc9Q18NlzZBvdo2lw6CCePN1+8T+I11/wkxXm5VzUf
+OgXzbj45/z36mzfXLsIHpk5/jG7HfK78siV1ktTr2LtwK8y1uej0MyyZYQa+
+xLzP+nt6TKNvickfaocxX3bK/qAgmLv1Tosz1pMdDL7cRdyegqN9prBbW7y+
+ESzI2jdqjP2fXI73xWHufMbgOBvrfu9W7yXfoxTvpX08rqajdg7euApKNic9
+xlX7aObqbk2cp0PgXAfcpxMTxUyE+U27v1TD9UudTq+GhY+iz21Af0rdLuOK
+MMeMf1+CvEF3ElTH56Mei7g5XpgHx8/XbxbmTH20b4ajJGtlDbGftt8gtxp9
+SmsuyrmTeEaXmlMwf13GwqB0WGTdyv0Tdnv+Zl8zLLmuNFyP/ZXfWCzUQZ28
+ggB/8lxt+/2YnQ+pf4+MZTb2+y9t6MqCWeaMLFf45ImvC8j3DKUX4PgG+UPT
+KybqYaGast9ezPF8uEHUAxLvfdVMH+qfHuU0XCDxCvsYvuhPufcXywiYbys3
+U4/+v3vSZ8KAJeN5k+txXtly+aevknk1TMg2kHmW7npqAYs1lTxC4EcvTRfl
+oX/W2bdzDTB/xr074kkN7D8k+fIB+8pCNBO9YI5d44EXmjR/PPfCT9fVEf+q
+KlMKv4h3GdQirvfqZSLeiprjhgpqmJ+Coj6p67h8sbqCKp6HNt0ccn5XdC58
+s3Ie8nf88xLvP2rsbefdYyroxz/spATWN2jwZ8IikVqhH/o9c3JfT78y8l/+
+cP4V+fztfeL5Gu4xdw36HvMxr42RU8X+Hla7rgTe/m+HBi6xakj7Esz/mXPJ
+rlbiZJ+OELi4l/rojfw8Tk71YbgtXiXuDSzMqrhDnKNjURaBeoXqThVkf829
+In4/LHLXYpN4AlN2nhP64/eKopqQL4UaWxEPizun+/3hjCfX9h2Ghfce/vAM
+9VqPbej3J+sOEfkc2H92sHoW8WgO70YN+vW9/3wqDKbsh9SsyfvsFR1xjtS3
+7N1j8lyIWk5mlaB+Tmtw+kb43bHNa06if5FNZeMnnM/TmEi7XUqYr03o9G34
+9IRyp6EivC5mpgDe1shc0aaAePoRRufgH9XGfsv+CvU5G40/hGdPJMsHy+O8
+l9QlqCB+ZG2Mu5cc5vXuhuYeeFOUb2mkLPLN/Cr+mzyHvVFBt2SwftGNtwP1
+HmluUrCC1WW4zr1wSbYwp38Onqd1xqN70e+9aQ3zZuLKaPMheP9aWZMBWCC/
+/HUI5vXsgbyjJe7nKk501MGNT+SVcmCh4MwDDcxb3sl+6Xzkl1C5VevguqhE
+ldPE8lVbNsLmDj9HLkW9dKxGKfm8Cvu2KF+GRSfmtsvCi57VWmmhP5Z7vO1N
+xLcK1UnaAfc0HR/aBH8xu7vu3zA/f58H+X445VMmEwRTKjdvusCZfxQNMmBe
+tJ5ZOfpTOTj3/W+Iz3nmOG4Bt7DvFQ+gHk6cRSz5XLKOrimRh8WD2dEr4Roe
+9+0E+qXU0j+0Yt6nRkOimijsD/j7wVHyvRS8Sn/BLJvi1aUeCoFtRqnladNs
+ShLzUjmAnKdZ8qPpCTYlskq+FAsLVri6Zo1hvf7BSDF8sUzs5T3KprhJ11/N
+QT6/x/kvdo+w8b6Imw2DPQtaPjweYlP82pjf+uEI+4jnhVLEy3IzjED90i38
+w1WD2K99xHccpi/JL1OCOXNvDCeif0tzf39Tsp5iWTkJP9r5k9onWPxxOyMY
+82Mp+TQXI57whNWOW/Bk+arrp5CPa9MuI4VVRgMCrg6zKeneXQqK5N+jz/be
+qEN9nMShiTmwklh3uv0Tm2Ltuqzfhf0RDgHrq9BPz5lUzq+w7UirYPdn5Nt0
+Vt8afpJroX4f5qod9iTvldaQtnn3YOHTsYl1sIhlVrkDFoVmdovQz4J1g2VH
+EI8u8HQ1gWfc0+y/RT7151uP5mEeS5UZiy+gPtY3CuWGsMlNw4Sr6Ec63LOk
+FPNlVYv+6vyAeV8esg6G/6gICB/phz1Ux1bAqftt37e/ggucP5P3Bt/EwCuo
+i00xBxJNlsK8eY2PoltQT5ta+Xa458B3O0PFiP9w0OO05v//35Gx7n9XLfo/
+Yw2y2w==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.077403306263033, 4.30673387473934}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.00000000000432, 15.}, {13.500000000004775`, 14.5}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.650294551449843, 15.441370831152057}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt1wk41dkbB/CfvWS5lquU5U7KZGlcS1T/lkOShKiYKLpTkVK5tjGiuqKN
+jKsia+6g1dKdUsKoSwzVTG7LqElymag/ihZStv/3zPP3PD09n+c99z3ved/f
++V2+2Rq2LkieYZi7+Ef/l4xP4seEMP/+6BHJy9jwS45zCMOyZ5X/AG8NCc5M
+gb0sBl0u6xEy72/x7DZYNj2h/S89wgRcuBY4fy5huLzqqV1w42ij/UHq8vdT
+HuDzb6fF5f1JvUGjOQefz7pRdIVtivzqxk/dEA9z/OfVBlh6f8Sli00EErOH
+3x6HB2eXRgTDxa/bh8WwhFdW2a5LiMKRpJj7sFdGJGetLmG6T1QnPIN5305R
+rtchzMkIpUJq0WBs2VI4InCm9p8wqQjoadYmROtN6MVKmBMYc2WnNmHURg7d
+zqH7523omQPn1uzRi4XFCRrKE1qEyZ7oK/Gh9Z7MGxnWIpLVMS6ZtjR/k/m4
+pjYR2Mr1/U3Pww+5V7wK+TvnjpBJnJdoX+7OQb7kR38t+ADz4h6vUNIhpN5f
+WjgIiz+7qyfoEMmkYsizURrv/em8Cs7T31QWp0vPx7/WlQ732ebsXwwLliRv
+n8EmkoP+j2ftoefdm8ScZiOf3rPey7RegYfhBGymPPW/72HugkVq3uhv8nZh
+9vJvke9evM8xPSKoMZLMTYe5yUafRIif2W2a+A8sdIg5kI35xNX65dnOQz7R
+3EURiDsbbNx3AGbeR+vMR3zFNs/ddTBh7Un9E/VMaP5q8ZWuT3pybCPmdcao
+/qupGWxSq/JEl0jcdvbWuMDC1NdtLrB1ZhnjBzOf1qy5iX7sOM7XDIQFQSfK
+rXSIICmnscMX5ljv1ahAf5nPfPWVsPRqYuMaOOXL43pzmBfy2XwM8wj06sxV
+hSXH3rndxbwi84wTX6Me7lcn8XVYLT0tuYF6MtSpHq6ITqgvhnlhgYve4fN1
+4QmsFFg0rDzPAfmtWwRT9sH8rw8NsjFPo4PO9yJh6YrUVg3UWzbnzatY6vqX
+qifh4WsfHVPhwfGC6lmY1+JYA/1ymPP9tbRiPK9um33ftsFecjuXz0V/FMID
+TrHp+dju/ZmY19tuniPtB+upw6GPiL+8M36+mJ6vulPFHvfJ3dZVbYj2rye9
+0x/zC5lw+nGVOeqtT5bjIR7T3vYgi7opQ2El5vWsaL1GD+zVtMJmGtb72fVs
+s7RAf+bnRF/HfhkLhZt2wsJHbEtX+ED454kcmKnXGGzGfDonawZu0/VX0tyX
+of6u2oexT2FyKz3oCp7X7KG+vE6Y9x/7LBPYQrJfrYPGTRVmFOJ5b2tea/oQ
+Fsxa+7M1+ukZbi6rgr2u9kmeahHBlcbkslz6+YEa52zMw974TmAsNd+ZxGoR
+Yr+IjPrQ+q7sdoQFKd79WXYwJ/7CPKwnXwKkNjOo32eb03xv+IYJCtQt5m+s
+tIlkY+71JyM4P6e1Mvcs9jfuMRj5Aos36PgZ4vl6/nvE9Cm0nrWDm8/Bx/bd
+EJvA/MLTO6xw3ruNZqnu9DzztIwq0A/vBIuGBFhk8Wa3Jfrlwd/eVEf7MzLc
+kw4H3yqKUbWk9+3SrA7cB+G99Y5+1Oved2hiHkHXpi4vgcUNNke+wbxmdG3h
+jcOsA1byOnD7oNYp9/l4ngL0Pr9Cvrzn1v0ZMOkfKs9GPnt5j5ZWmGOnPGbH
+JoxHaKSW+nfIrxKs9Bvq/fjeTc8BFjSOyi1AvRP7Lnavh/mb9bvPYz4BN1IX
+boOFuk5y+ngfksb2+CCYN/jp3En0p/f+mZZNMPNGVDsTz/uKjO63q2Bpaze/
+Ev1u9mwytKTrM8cf70G/Q3IyNKfRfDxRoSNc/e5D1WvUx/UYUl+AeSqkato0
+wl7N8wtcEZf/YcOh8zCv04cbh/tmEHI24WdYUlc1ivtKzMosyw7CYkXtOi72
+L+hYphJPz/skaeIS6isaMBlLovG2g4vxfmCC2bPX5tJ8tqn+VZhfQfVC1m1Y
+YH1G3hH3b6+LS+4AzLqV//kWnPc1X2RB++H5qwDzkzhG59qH0/MKjeoS0c/R
+ItePtbR/3SwVCe6f865bappWWM8/ofoS8SpR6oEfYA4vQv8FbOe02OYqLCol
+31XDL767NG8C5rZvGoxlE46lhrn3N1ysl+vIN2ITHr9bp3AZLKudJSvFfBTq
+f57lCzNbtVPNUZ/bQCRnByxaY+Z3VodwLCZsd4XDPO6y/Zo6hHd7/1G1aJqv
+v8nnsDYRtZ3bHhUB850NGBX0x2y169ZdMPeq0mgO+r1czVgWAIvTL7a4aBGZ
+7x5fW0+ab++qJg30O0wovb8EJkF3fx1iEc6kfwHXAvbqVJSMsYhkLut430xa
+72RTpIkW4S1rDolSh4UZUed3aBFR69gBQ0VYuvrpuUbkM26rkmNoPf6VQQtx
+/643dw3J0fN1HLlThfr6n8fsV6Xn23jxmZMOkem8+/2OPt3v2lffPzBPD/0L
+2VZ0v85HvZ66hBfHG4hZQ+MWjvl36Py+HD+yG2bJxVvPQT8vCRsvpNN6VFJ+
+CsV9cRhwP1pF159uycxgExHbc6yki64PbnQQYb3FWHHKNGvMt9+5LJlNZNmj
+1wtsYNahohEfxIlJRawvzJ3pUKuIfDtf7G2Nhr2iPhjk6hKZUtZAeRqN938S
+GOG+LS0nLkXU6sNeGZhXddc6WzFMxvzzlXWI6OZEfPANut+pHyWx6MdUTXdz
+aqFH3+gQnv8HtdnGdD1zw2/6IS3CKTxruOAc3W9rlNIczMv1QW9OJl0fuuS0
+DPOoa0m4epjGz5yyrGERnt4q97FIWFqeWHwd8byb+xS2weKbBaZSFiFJiutW
+b4D5zF2rqZiXWes4dzUsexxdFIB5/eMx3O9E87vtGmrG/qomH/ZSS5Uqgldq
+E15y5JJNrrQ/BZXr/kD945YzGB96niGXY76YV1JTsXcIzTfBvvwC338tNXG9
+CTReJkj/HvPa9tcE6xdYMju6XILnvSuNVdcAi/hxW7TRf+stFVV9tH/VS5fi
++4dDHGSpujawYq7PFtw/Xkl+5VKY99BivS/u6/PW2NIgWKppmjYf920kx/pD
+Mo1zxWqvMR+SmmRTCgtsuwKOYH/5wDkezXT99I5IFuJHP7QEv6S+fHxzCt4X
+pcdaPr2FhYc8349rE1nmsEPDMI33O8eFweWyU2MjNP+eGO/X6F+YsMVwiNaX
+GvHjbrzfJGWJX/rofqZOi5VwPzRMv1yg+SVld7tvsIjgalNs7AOYrOyJPIz5
+3BVeffUbPBjF2hzJIrLXj3QiS2BWpSt+8yCSUH370lxYpqf6tJxFmMOPv5dL
+o5+faFX7gnlGRilXH6H7RzZqbsb8ag2HuxJpPqfVwkfYP7zh7fKjMN8xdJEv
+vn8dCpIc02l9BteUZHifMoWLJ3+h+4V754dgfjcT/2NfRes9kXvzDe5jmGu7
+eyssZokT/HQJ55S0xJ+eX3rRdBDff7Kd0gw7I1vES8b0hxEvmJoV7wLLSgTR
++rg/crm6FWGw18LmKYaY74pFsrVZsKTGJonB/KK0Rv64BYuyMlwa8TzIW91r
+6KT5Dv/tthf5//27w+7/f3/okv8Bh3rOqQ==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.887640361876242, 3.60760723752485}, \
+{0, 1}], LineBox[CompressedData["
+1:eJxTTMoPSmViYGCwBWIQDQEqDlp8IFrRgaGg63OSmYrDmepz92sPKzgwrNg8
+ySVexUEw+bVWYC2Qr6G5271CxSE7ov16iQGQ/2Gjwa96FQf9TUe29h6Qd2DY
+MYXtVamKw78XGvPWKAD5G7zM1kSpOCgLv2yI7ZBzYEh4wHhFX8WhJjI43v2f
+rANDxeqFt78rO/S/vb7ErgPI57g+7f9WZYc/nNE332kB+Q1ih/jylB3Ea+ua
+pr6UcWAQkGMxUlF22J6y0ujSUSD/xYpV6+4oOSxaZNzVtx/I71hhuXy2ksP8
+mW+6/18B8gM8Le6lKDlE7jDRP8AENO9AfnedtZLDhPXlS5hdgHyG31PeKCo5
+CL2+lHRnEpCvYXV2kaSSw7pV3x9NfgHkG2g+klZWcvigW/uV1w7o/gP/55+2
+VXLYdu3Vd8MeID/gA7d6hpJD5yvnq8FnQP6zt9w9X8khYef7g9N+APk7ONoD
+Hyo5VCyR/u/MAwwPgQ168prKDi94BBcJsAD5BY3Jf4uUHfwfx4X53QOq11A9
+umyXsgODzX13ltlAfsSU6d9+KztIbH9/8J01yP4zEmrGKg4VLP7tqUeA7nth
+mMESq+JQOrM9RssSyPc4eFi1XMVBTf7ofKUFQP9fyI9nb1BxmGoBil8ZuPwT
+ZuuEu/HScP1TOisWXz0mBTd/ktzGilnWUnD7BXcJ2AkekYS7j+u5wo7fKZJw
+9++yX7hyo6Ik3H+KYu9j3/+WgPt/w5knDHs+S8DDZ2WmgF0muyQ8/Bos9mit
+MZaEh2+wjyjHuWJJePhbODdzfTooCY+f6AoO2RxxKXj8fTfXnaucKwWP38ri
+jug/u6Xg8X9hx+kL9n+l4Okjq1O4hEFbGp5+MhrOlBY6SMPTV/C+sLO6VtLw
+9Cf0pbE2S0wanj75JJeqCV6VgqffKlON6IPlUvD03XtyzYIdjFLw9M8WJ16/
+qFwSnj94rK4nBt+XgOefWwXWXkX2EvD8FXzgY4DYfHF4/uNYrbkqllUcnj8L
+tJMdWCrFHGD5dysbiBZzAABx72bD
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.354800000000001, 7.}, {1, 0}], 
+        LineBox[{{6.4999999999976925`, 14.5}, {13.49999999999251, 14.5}}], 
+        PolygonBox[{{10.6, 14.5}, {9.4, 14.1}, {9.4, 14.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 15.4452}, {0, -1}], 
+        LineBox[{{6.499999999996362, 14.500000000005457`}, {10., 
+         8.500000000003638}}], 
+        PolygonBox[{{7.947677384685548, 12.01826734053906}, {
+         8.206811054955079, 10.780184249251306`}, {8.897834175673825, 
+         11.183281069670574`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.515942703607428, 11.323799910437668}, \
+{1, 1}], LineBox[{{13.500000000007276`, 14.500000000005457`}, {
+         10.000000000003638`, 8.500000000001819}}], 
+        PolygonBox[{{11.447677384685548`, 10.98173265946094}, {
+         11.706811054955079`, 12.219815750748694`}, {12.397834175673825`, 
+         11.816718930329426`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           
+           9.996694214876033]& ], {12.484057296392571, 11.323799910437668}, \
+{-1, 1}], 
+        {PointSize[0.04], PointBox[{6.5, 14.5}], PointBox[{10., 5.5}], 
+         PointBox[{13.5, 14.5}], PointBox[{10., 8.5}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T3", " ", "P2", " ", "N6"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"aebf/cgdf/fhegehgh.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "aebf/cgdf/fhegehgh.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {44, 22}, {0, 0}, {22, 22}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["g",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {24., 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["g",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {28.5, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["\[RightArrow]",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {33., 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["H",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {37.5, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["g",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {42., 69.96}, {0, 0}]},
+  AspectRatio->1.0999999999999999`,
+  ImageSize->{288, 288},
+  PlotRange->{{0, 66}, {0, 72.6}}]], "Print",
+ CellChangeTimes->{3.7752335744414377`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"fb392009-4d65-47bd-85eb-5629d05d45e3"]
+}, Open  ]],
+
+Cell[BoxData["\.1c"], "Output",
+ CellChangeTimes->{3.7752335744543953`*^9},
+ CellLabel->"Out[13]=",ExpressionUUID->"9cc9531b-8eb7-4ab5-818b-9de5d93d28ed"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["\<\"\"\>"], "Print",
+ CellChangeTimes->{3.775233574462344*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"16617bf1-e485-4970-88b3-06adc5190045"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"creating amplitudes at level(s) \"\>", "\[InvisibleSpace]", 
+   RowBox[{"{", "Particles", "}"}]}],
+  SequenceForm["creating amplitudes at level(s) ", {FeynArts`Particles}],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775233574467429*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"394af361-158b-41d5-8cd7-253e4ec5f5e3"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles amplitudes\"\>"}],
+  SequenceForm["> Top. ", 1, ": ", "2 Particles amplitudes"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775233574475355*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"d486de6c-574d-4a9c-a677-357f07b8f393"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "2", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles amplitudes\"\>"}],
+  SequenceForm["> Top. ", 2, ": ", "2 Particles amplitudes"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775233574479745*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"bc32190a-6d1c-4aa4-b572-8d25596cf0e8"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "3", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles amplitudes\"\>"}],
+  SequenceForm["> Top. ", 3, ": ", "2 Particles amplitudes"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.77523357448415*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"11dd4fac-4a90-4b87-acef-17bdc660ca09"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"in total: \"\>", 
+   "\[InvisibleSpace]", "\<\"6 Particles amplitudes\"\>"}],
+  SequenceForm["in total: ", "6 Particles amplitudes"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7752335744885674`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"6bcd2aae-e83c-4de2-b882-bcc1277d3ab4"],
+
+Cell[BoxData["\<\"\\npreparing FORM code in \
+/Users/josegabrielreyes/Documents/Higgs/Mathematica \
+Scripts/ggHgg/FinalSetUp/fc-amp-2.frm\"\>"], "Print",
+ CellChangeTimes->{3.7752335745347023`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"519e3348-ebb1-4930-b680-2df877dc8d2b"],
+
+Cell[BoxData["\<\"running FORM... \"\>"], "Print",
+ CellChangeTimes->{3.775233574553753*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"c08d212b-cfe1-49af-ad05-d1c765cfd252"],
+
+Cell[BoxData["\<\"ok\\n\"\>"], "Print",
+ CellChangeTimes->{3.7752335746942177`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"8bbcd19c-afb7-45e9-8ae8-52caa8b873eb"]
+}, Open  ]]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{
+ RowBox[{
+  RowBox[{"Clear", "[", "triangle", "]"}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{"Print", "[", "\"\<Triangles\>\"", "]"}], "\n", 
+ RowBox[{
+  RowBox[{"topsT", " ", "=", " ", 
+   RowBox[{"CreateTopologies", "[", 
+    RowBox[{"1", ",", 
+     RowBox[{"2", "\[Rule]", "3"}], ",", "TrianglesOnly"}], "]"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"insT", " ", "=", " ", 
+   RowBox[{"InsertFields", "[", 
+    RowBox[{"topsT", ",", "process", ",", 
+     RowBox[{"InsertionLevel", "\[Rule]", 
+      RowBox[{"{", "Particles", "}"}]}], ",", 
+     RowBox[{"Restrictions", "\[Rule]", 
+      RowBox[{"{", "NoLightFHCoupling", "}"}]}]}], "]"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"Paint", "[", "insT", "]"}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"DoPaint", "[", 
+   RowBox[{"insT", ",", "\"\<triangle\>\""}], "]"}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"dT", " ", "=", " ", 
+   RowBox[{"DiagramExtract", "[", 
+    RowBox[{"insT", ",", 
+     RowBox[{"{", 
+      RowBox[{"1", ",", "2"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"triangle", "=", 
+   RowBox[{"CalcFeynAmp", "[", 
+    RowBox[{
+     RowBox[{"CreateFeynAmp", "[", "dT", "]"}], ",", 
+     RowBox[{"SortDen", "\[Rule]", "True"}]}], "]"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"triangle", " ", "=", " ", 
+   RowBox[{
+    RowBox[{
+     RowBox[{"triangle", " ", "//.", " ", 
+      RowBox[{"Abbr", "[", "]"}]}], " ", "//.", 
+     RowBox[{"Subexpr", "[", "]"}]}], "//.", 
+    RowBox[{"Abbr", "[", "]"}]}]}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{
+   RowBox[{"Export", "[", 
+    RowBox[{"\"\<ggHgg_triangle_FeynAmp_2diags.m\>\"", ",", "triangle"}], 
+    "]"}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]"}], "Input",
+ CellChangeTimes->{{3.7754888855317173`*^9, 3.77548900549756*^9}, {
+  3.7754890445516376`*^9, 3.7754890459279118`*^9}, {3.775489201342444*^9, 
+  3.775489209477962*^9}, {3.775489710556233*^9, 3.775489713859892*^9}},
+ CellLabel->"In[11]:=",ExpressionUUID->"00b2ebfa-faf2-401d-8f84-2e8996fb70f1"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["\<\"Triangles\"\>"], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897151317663`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"482b7b69-f6b4-45f1-9a2c-0ab150cda602"],
+
+Cell[BoxData["\<\"\"\>"], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489715329784*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"0c57c097-c2e6-40bd-9ede-f2c4dc3c9965"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"\"\>", "\[InvisibleSpace]", "\<\"loading \"\>", 
+   "\[InvisibleSpace]", "\<\"generic\"\>", 
+   "\[InvisibleSpace]", "\<\" model file \"\>", 
+   "\[InvisibleSpace]", \
+"\<\"/Users/josegabrielreyes/Documents/Higgs/FeynArts-3.10/Models/Lorentz.gen\
+\"\>"}],
+  SequenceForm[
+  "", "loading ", "generic", " model file ", 
+   "/Users/josegabrielreyes/Documents/Higgs/FeynArts-3.10/Models/Lorentz.gen"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489715338504*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"7b632676-1202-4f79-a69d-8d737bde6c17"],
+
+Cell[BoxData["\<\"> $GenericMixing is OFF\"\>"], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489715342578*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"efc9d648-68f3-4c34-96f0-b963370877bd"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"generic model \"\>", "\[InvisibleSpace]", 
+   RowBox[{"{", "\<\"Lorentz\"\>", "}"}], 
+   "\[InvisibleSpace]", "\<\" initialized\"\>"}],
+  SequenceForm["generic model ", {"Lorentz"}, " initialized"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897153829613`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"465fc068-514c-4e6f-8a5c-4d5fed7eff58"],
+
+Cell[BoxData["\<\"\"\>"], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489715394668*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"15604b7f-08c1-4262-927e-197c4eb46a1c"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"\"\>", "\[InvisibleSpace]", "\<\"loading \"\>", 
+   "\[InvisibleSpace]", "\<\"classes\"\>", 
+   "\[InvisibleSpace]", "\<\" model file \"\>", 
+   "\[InvisibleSpace]", \
+"\<\"/Users/josegabrielreyes/Documents/Higgs/FeynArts-3.10/Models/SMQCD.mod\"\
+\>"}],
+  SequenceForm[
+  "", "loading ", "classes", " model file ", 
+   "/Users/josegabrielreyes/Documents/Higgs/FeynArts-3.10/Models/SMQCD.mod"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897154020844`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"92ab9642-e7a8-40b2-a260-4fb5048c8e9f"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"  \"\>", "\[InvisibleSpace]", "\<\"loading \"\>", 
+   "\[InvisibleSpace]", "\<\"classes\"\>", 
+   "\[InvisibleSpace]", "\<\" model file \"\>", 
+   "\[InvisibleSpace]", \
+"\<\"/Users/josegabrielreyes/Documents/Higgs/FeynArts-3.10/Models/SM.mod\"\>"}\
+],
+  SequenceForm[
+  "  ", "loading ", "classes", " model file ", 
+   "/Users/josegabrielreyes/Documents/Higgs/FeynArts-3.10/Models/SM.mod"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489715410214*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"6c7d441d-fe7c-4fc0-9501-ad4b5c30c80d"],
+
+Cell[BoxData["\<\"\"\>"], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489715415415*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"37f80417-15b7-48cf-8bf2-cf4f12f655ee"],
+
+Cell[BoxData[
+ InterpretationBox[GridBox[{
+    {GridBox[{
+       {
+        RowBox[{"$CKM", "=", "False"}]}
+      },
+      BaselinePosition->{Baseline, {1, 1}},
+      GridBoxAlignment->{
+       "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, 
+        "RowsIndexed" -> {}},
+      GridBoxItemSize->{"Columns" -> {{
+           Scaled[0.999]}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}}, 
+        "RowsIndexed" -> {}}]}
+   },
+   BaselinePosition->{Baseline, {1, 1}},
+   GridBoxAlignment->{
+    "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, 
+     "RowsIndexed" -> {}}],
+  Definition[$CellContext`$CKM],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489715423286*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"86eb6596-d624-463b-8591-7765cce1e4c8"],
+
+Cell[BoxData["\<\"\"\>"], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489715431004*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"20329460-4c5a-4694-95bf-5fce24890b13"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> \"\>", "\[InvisibleSpace]", "49", 
+   "\[InvisibleSpace]", "\<\" particles (incl. antiparticles) in \"\>", 
+   "\[InvisibleSpace]", "18", "\[InvisibleSpace]", "\<\" classes\"\>"}],
+  SequenceForm[
+  "> ", 49, " particles (incl. antiparticles) in ", 18, " classes"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897154418907`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"45504770-301f-4888-a0e5-648d6f27e060"],
+
+Cell[BoxData["\<\"> $CounterTerms are ON\"\>"], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897154982653`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"6f91bd5e-4a6b-4381-a2ae-1f4dc802e7c5"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> \"\>", "\[InvisibleSpace]", "93", 
+   "\[InvisibleSpace]", "\<\" vertices\"\>"}],
+  SequenceForm["> ", 93, " vertices"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897155146637`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"74c3926f-183a-4796-9f57-f03092638243"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> \"\>", "\[InvisibleSpace]", "121", 
+   "\[InvisibleSpace]", "\<\" counterterms of order 1\"\>"}],
+  SequenceForm["> ", 121, " counterterms of order 1"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897155765257`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"fc1dd8ec-c4f8-4f22-98fc-f8943764731a"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> \"\>", "\[InvisibleSpace]", "6", 
+   "\[InvisibleSpace]", "\<\" counterterms of order 2\"\>"}],
+  SequenceForm["> ", 6, " counterterms of order 2"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489715591482*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"e8020980-812a-45ef-99b7-7d58bed40356"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"classes model \"\>", "\[InvisibleSpace]", 
+   RowBox[{"{", "\<\"SMQCD\"\>", "}"}], 
+   "\[InvisibleSpace]", "\<\" initialized\"\>"}],
+  SequenceForm["classes model ", {"SMQCD"}, " initialized"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489715597978*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"4233b12a-ff83-4b7d-993d-36f01140b6c8"],
+
+Cell[BoxData["\<\"\"\>"], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489715661771*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"47869948-ecd1-4af9-b875-01df3bf192d7"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"Excluding \"\>", "\[InvisibleSpace]", "18", 
+   "\[InvisibleSpace]", "\<\" field point(s) (incl. charge-conjugate \
+ones)\"\>"}],
+  SequenceForm[
+  "Excluding ", 18, " field point(s) (incl. charge-conjugate ones)"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489715666771*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"1ac59348-d86e-46cf-81f6-7f07deec8e69"],
+
+Cell[BoxData["\<\"\"\>"], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897156711273`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"be4046f4-afc7-46ab-9b4c-a12a208d214d"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"inserting at level(s) \"\>", "\[InvisibleSpace]", 
+   RowBox[{"{", "Particles", "}"}]}],
+  SequenceForm["inserting at level(s) ", {FeynArts`Particles}],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489715675189*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"590ed1f5-2d5e-4d52-aa2a-521524e47125"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 1, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489715690103*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"b00f9b05-f586-43f6-a3ac-47ee5596a4a4"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "2", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 2, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489715733206*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"4c16b8a2-7923-47bc-bf55-a401337b086e"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "3", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 3, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897157459908`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"9a4d1373-6745-46e2-bedf-084ceeeb3992"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "4", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 4, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897157703047`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"86eed2fa-2419-4af5-950e-468c5fc8760b"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "5", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 5, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489715798156*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"a2282fbf-8887-4e98-9477-9d5f6d1b2b9b"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "6", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 6, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897158151417`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"f91c9250-7da2-47b4-b52f-a65e91fecc0d"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "7", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 7, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489715838214*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"3fd83e52-022c-4dbd-84be-a23f1b8c12e9"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "8", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 8, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489715866551*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"ed764292-1653-4656-a2ea-b82e47346fda"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "9", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 9, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897159079933`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"d5b36eaf-2487-4de7-82f2-b741d9ff15c6"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "10", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 10, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489715925074*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"fa11260b-327f-4c3a-9b78-8fac30899110"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "11", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 11, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489715968299*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"cf4549a7-9aec-4ae6-b884-a3b47e57e099"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "12", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 12, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489716009945*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"a0755672-a28d-4254-9cac-c3e536d5488a"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "13", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 13, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897160770206`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"3d0c39fc-4140-4797-b15f-2a88b053444b"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "14", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 14, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.77548971611657*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"52f23fe7-2ec8-44d5-b8e2-6d9fefdbcf5f"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "15", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 15, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897161815*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"f84fac8b-9b5b-42cd-991e-5c15019c3cd9"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "16", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 16, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489716246056*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"44871153-0c3e-4261-b73e-52b51d05fc29"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "17", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 17, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489716285241*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"fe1e6cc7-5408-44e7-8eeb-74c2eb17bd31"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "18", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 18, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489716325119*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"cd8ba6ab-b5cd-4451-aa7a-29b82c645660"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "19", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 19, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.77548971636668*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"86b6b92f-22a6-41ea-a987-474e9174f33c"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "20", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 20, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489716409329*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"442012e3-dd0e-4dd2-b282-d35c7ffd1a11"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "21", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 21, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897164482727`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"072923e0-44bc-4646-8b2b-8029d067181f"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "22", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 22, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897164883423`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"40d18e24-52a9-42ea-b976-6b2bac192ef3"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "23", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 23, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489716530546*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"f741ced5-cc41-4bba-87d3-6967a7ce4de3"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "24", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 24, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489716572456*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"4a12258b-acbc-40e4-85d5-b71956bf9f9f"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "25", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 25, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897166142893`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"26ee02c5-01be-4a5b-8e23-7b5740ecf00b"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "26", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 26, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489716653975*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"909aa5cc-4cf1-4134-a6db-623eceea8f95"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "27", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 27, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489716694545*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"ab74d7c3-3bca-48f9-bf90-91962ad793e3"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "28", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 28, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489716734868*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"2c6d20cb-61d0-477f-9eff-cd5b3c58115b"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "29", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 29, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489716802451*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"9e1d5d63-95ee-468c-a45a-47a173b62ea5"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "30", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 30, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489716844831*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"ea1b6e3c-1593-4687-9e7e-bca79b39d679"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "31", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 31, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897169211903`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"2a96830a-2747-4078-94d6-30d3e432c5ec"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "32", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 32, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489716962727*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"d8801fc7-5e71-4a0b-b0da-acd196653a94"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "33", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 33, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489717030937*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"49d5de5e-b904-4599-a241-7c89f29d1c18"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "34", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 34, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489717103894*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"c409cffb-eb72-4313-9ded-9e7646df22b8"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "35", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 35, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489717146905*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"a9c42256-77b6-4966-953f-996e7f4424fd"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "36", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 36, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489717215189*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"c971b94c-7055-46e8-8f42-92bf62b417a1"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "37", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 37, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489717255866*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"fde8093f-3013-4f73-a87e-3fee062234c5"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "38", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 38, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489717325026*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"0d001629-ce93-4b92-a44e-6adbc7bbc315"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "39", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 39, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489717367073*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"9de29004-3c47-42de-97d9-7e5021721326"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "40", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 40, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.77548971740939*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"9e2c960c-02fe-4d54-9bf0-10ade211cdc6"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "41", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 41, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489717451429*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"f4d5c5bd-c09b-404f-83f1-6121f361aa55"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "42", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 42, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489717493026*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"c2b1216d-3ba1-4577-b3dd-8eb87edd64b9"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "43", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 43, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489717533836*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"ddae031d-a3a3-4573-a96f-d2a32183f65b"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "44", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 44, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897176065063`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"83080bc6-77f6-41f9-a6f7-5d45b0a3f5ee"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "45", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 45, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489717647771*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"5940abce-ac3d-439e-a874-8677dc5b62f9"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "46", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 46, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897177169867`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"a2a7e806-c823-4891-89c9-0514dcb2ba9f"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "47", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 47, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489717786447*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"eeda71c5-85db-4b6f-b072-1530f5f1b204"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "48", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 48, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489717824848*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"e6bbf982-d710-4652-a41f-fe78241c97ff"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "49", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 49, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897178933268`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"c2a7cf39-1dde-4342-bfba-3560297d5bf6"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "50", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 50, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489717932412*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"4a20e63b-cbef-4cce-83e8-c2c3f33bc1fd"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "51", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 51, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897179715776`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"c28ef418-a99d-4b61-8bda-90e9cd0dbc5d"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "52", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 52, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897180129633`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"bfd191bf-55aa-4710-bfe9-d73cb6383e16"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "53", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 53, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718084612*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"808f6012-a961-4e65-bd29-7a53e0ee4e62"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "54", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 54, ": ", "2 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718154158*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"e1e4a029-d8bb-42f1-8e4d-877284e9ddf5"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "55", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 55, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718194396*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"2f798775-721b-43c9-835a-b5ca45d457ac"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "56", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 56, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897182013197`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"80804efd-1ff8-442a-9e90-4a1205f6bd84"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "57", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 57, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718213079*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"fc10ef62-f7de-4da3-b483-c1d974b88f2b"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "58", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 58, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718227118*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"b5069cbe-8912-484a-beff-19781e878655"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "59", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 59, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897182378473`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"0966a11d-4882-4b30-8b31-023a0b8dddaf"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "60", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 60, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897182420387`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"8cd6cb1b-0482-4344-8799-19acc4683bb7"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "61", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 61, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.77548971825671*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"2549f2b3-f306-4cd4-a6f8-81daf0343e2a"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "62", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 62, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718272978*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"e992dbcc-c3eb-496c-9aac-5a1569a2a1ea"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "63", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 63, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897182799463`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"096a688f-5ef8-479f-82e9-f640aa79a4aa"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "64", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 64, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718287404*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"22ac10c8-525d-4e43-8c86-670c84529870"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "65", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 65, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897182931843`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"a0290ced-13d0-4a1e-a400-7e3373d885a6"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "66", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 66, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718297657*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"bcfae30e-7bcd-4dd3-8dc6-32b6a9fbba88"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "67", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 67, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718301962*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"e0c9f492-f3f4-473f-b226-e2f4e1da03be"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "68", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 68, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718307991*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"4a28e937-cbb7-4ff2-8b85-030bc207001b"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "69", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 69, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718315466*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"d43e20fa-75e4-44dc-bf1a-9a3930b2102f"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "70", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 70, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897183216267`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"f3470329-cbfe-4aab-9a92-7fe3182802d3"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "71", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 71, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718328244*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"33e6d154-8864-4961-84af-7b088d0c1d6d"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "72", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 72, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897183335733`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"0a1cc530-3504-4e6c-8ca2-108d9e0929dc"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "73", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 73, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897183378363`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"8859e214-8f28-458a-86f7-9845a83b59c6"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "74", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 74, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718350709*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"3494269d-7ca8-4840-94b7-7df30938c5c5"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "75", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 75, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718373087*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"64304681-dd46-4470-b392-15116814eed3"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "76", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 76, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718380456*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"b8bb4c71-bd91-47e1-85e7-7cc74ae339ea"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "77", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 77, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718387946*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"a9fc632b-ac2e-4d12-845f-6ba9bb0fb88a"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "78", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 78, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718395114*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"14e5e342-04db-42f9-9dcd-e54b27381556"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "79", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 79, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718402483*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"68cbb07b-ff1b-41d2-9408-97a139ca04b4"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "80", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 80, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718409083*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"ade50005-dc22-4549-8c48-ca1c2f4f6179"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "81", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 81, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718415762*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"f19201e5-fa6c-4df3-8177-4f4d85a0deb0"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "82", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 82, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.77548971842268*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"376cdf29-de05-4896-8cd1-d653f4329951"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "83", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 83, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718429989*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"5d1726ba-e7c8-4ea5-8383-70a46e2dca56"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "84", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 84, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718435113*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"6289e36d-04de-4e90-8bc7-fea404ee7ae6"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "85", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 85, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718440336*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"1596e7c3-f4a0-4f54-b46b-5c85de8d227b"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "86", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 86, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718447263*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"aa60764a-022f-4534-b590-7985930ab71d"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "87", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 87, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718451652*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"a63d9a20-9fcd-42aa-8251-229ed14fcf0b"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "88", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 88, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718455735*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"d5e47eff-33fd-4ab0-a3ec-3f56a6fef96b"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "89", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 89, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897184735603`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"237304f0-3673-4c2d-afe8-3d7a7ebe249b"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "90", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 90, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718490151*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"c829a173-07f8-4df8-8e1f-eb918a3bc6b1"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "91", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 91, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718497551*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"e4453bd4-d618-4b7a-b024-d657ef4957f5"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "92", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 92, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718515517*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"933e4c6a-54c2-4415-a419-34b52bcef5e4"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "93", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 93, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718539221*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"3754f430-9482-4b0e-8e5a-78228e95e7b7"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "94", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 94, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718546434*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"e5e28447-4da0-428d-adeb-3d0f178dc854"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "95", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 95, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.77548971855304*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"9e930076-0112-457d-9050-59d77b2c3f51"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "96", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 96, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718560438*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"83743332-28b4-4f4e-9a55-e7411e838cac"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "97", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 97, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897185764923`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"5a867892-be28-4a5c-913a-cd64118dc1aa"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "98", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 98, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718590556*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"29b71846-a025-4f89-ac63-d818a7f3b614"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "99", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 99, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897185975933`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"2bd90177-8624-44ca-892b-190c3a5e0d65"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "100", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 100, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718613126*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"989dc8a4-be6f-4994-baba-bfd5217241d3"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "101", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 101, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897186343307`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"1c9dc131-7797-4b61-86ac-5a0c1a0a4d7e"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "102", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 102, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718651444*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"1d94d72f-145b-438f-8c3f-eff4ed502617"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "103", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 103, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718672349*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"5d87cb98-4c45-4ac9-8d66-d3bacef1ff18"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "104", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 104, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718676862*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"9a5bfff7-85c1-4ea1-ac44-b7fe9bc3fabd"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "105", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 105, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718692144*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"5465c028-f2a0-4734-a77c-141afa5f82a0"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "106", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 106, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718705859*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"c3ca4913-3ce5-4844-9e77-ce5def9e7fbc"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "107", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 107, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718723625*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"ae7ec018-75eb-4d88-8e45-5e2518b17411"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "108", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 108, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718739016*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"cd4cfb19-6da6-4b99-a609-cb200d0a907d"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "109", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 109, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718745929*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"8751b8fd-1b76-40cd-a0f1-a95a97697501"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "110", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 110, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718760103*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"1e8c121e-fe1b-4f53-a047-bd73813541da"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "111", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 111, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.77548971877291*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"e66c3f4d-4baf-43ee-ad7d-f1cdb877d6d2"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "112", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 112, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718789297*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"307c1338-c863-48ee-ba46-8040507dbaf1"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "113", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 113, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718806192*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"8428cf6f-dc5d-4ec1-bda1-2e9ec4425dc7"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "114", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 114, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718812619*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"586bdfd8-dbe8-4cd4-ad63-16d68f420351"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "115", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 115, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718829645*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"1ce4b55a-4462-4f08-beec-bfc80aeafc16"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "116", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 116, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718850177*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"fbf84094-2be0-4b4e-b2a7-1f47a58f31a4"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "117", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 117, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718867133*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"c7c1d120-76e4-4976-bf75-6d286d33f0af"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "118", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 118, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718890278*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"40f00b9a-f076-4a98-b7fb-d2699bfe1e97"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "119", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 119, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718897571*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"9aea03ae-78fb-46a4-959c-a632ddd3daaa"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "120", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 120, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718905088*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"76d91400-d6dc-462b-b084-79572499fab2"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "121", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 121, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718910833*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"97422370-545d-42ab-bc13-4ee2d682e759"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "122", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 122, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718929118*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"b21763c2-bbe3-46ab-8865-385f591d934d"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "123", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 123, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718949257*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"23d43de6-7477-4fc9-a2c8-82a3b7649e4c"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "124", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 124, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489718969486*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"996eb42f-d851-402a-836d-d4d08d0227e0"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "125", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 125, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897189876204`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"994f9d96-4be2-4fd5-956b-db163a49ff23"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "126", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 126, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897190077467`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"5f2069c4-cd84-4600-b781-1e0cf77be806"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "127", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 127, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897190144567`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"525bc282-fd37-467e-8572-423278fbcdd4"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "128", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 128, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489719021163*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"8dbd8c81-2f54-4c1e-86e3-4068bebc0392"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "129", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 129, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489719039714*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"de29cfe5-bd1d-4218-8f3c-2ad061965406"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "130", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 130, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489719057173*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"d7bd272b-523a-4d0d-bdb9-13a8ab9c0035"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "131", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 131, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489719063994*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"8b339b22-b856-40eb-bfaf-5abe17906184"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "132", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 132, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.77548971907968*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"c1418234-3828-4e6b-a7e3-10dc4d4fd069"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "133", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 133, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897191028757`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"19079ee2-5f3c-44db-ab1c-2276bd747d64"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "134", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 134, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489719120647*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"184b99b6-3396-4806-8cc1-a8c97c30271e"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "135", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 135, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489719139132*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"9abf7886-0435-4716-adae-2b40526a092b"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "136", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 136, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897191436787`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"4cdb8b07-6ea3-4251-aea9-de18730afe7d"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "137", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 137, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489719148692*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"362ddbbc-9592-4a4a-9415-8ae9c7f530ad"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "138", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 138, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897191615343`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"4b1a34ec-d25c-4125-9e16-fa0442261592"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "139", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 139, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.77548971917342*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"ae0838c5-1d04-4af1-8968-3e10ca495bbf"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "140", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 140, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489719190353*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"1d9d9f94-eb7d-40a4-8e3f-2f0185517645"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "141", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 141, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897192054567`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"98b19f6e-57f2-4b12-8e98-66a70b62cffe"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "142", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 142, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897192099657`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"f51fe13e-3dc0-4302-91af-6b45682d4dc1"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "143", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 143, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489719215033*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"b8da9f1f-ca1b-4c13-9da7-68d2d30d181c"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "144", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 144, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897192229967`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"d03f960d-a985-4724-b525-dd7047d7d869"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "145", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 145, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489719236899*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"5fae7711-eb05-48a7-8e45-39de243c9901"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "146", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 146, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897192554407`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"9058a6ec-2677-4390-b62a-f7f1aa0bb92a"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "147", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 147, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489719259935*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"b0d7f8aa-1f5d-4d67-9741-4fc437add9f7"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "148", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 148, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897192649927`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"e15ab415-af93-4c41-bc39-e22f0c3c38be"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "149", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 149, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489719277667*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"e7d661ab-9386-45ff-8a04-87e1c95ff8b4"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "150", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 150, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489719289123*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"9f9aa58f-3b1f-4808-b047-c967807c4e93"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "151", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 151, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897192936697`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"d959dcef-4e60-48c1-a7a6-aafa63b4148a"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "152", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 152, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897193103456`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"ac11dbe3-d591-4f32-ad94-f779d0c8400b"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "153", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 153, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489719324011*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"ce4a7715-19ce-46fb-b822-28d77a0fabf1"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "154", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 154, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489719341488*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"6bb08b23-3c72-4e5b-abc7-73003c3fc261"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "155", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 155, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489719356524*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"b20c75c7-1181-4a1b-b8ac-e72e92b50561"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "156", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 156, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.77548971937158*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"ebd998cf-24bb-4eb2-83c3-8ad397fb14cc"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "157", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 157, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489719390924*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"bc838b1a-6863-4410-bda0-39dc771ed636"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "158", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 158, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.77548971939671*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"d9e7c7db-572d-4067-861e-cbf3afe77521"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "159", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 159, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489719415822*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"ae8782cc-581e-4f76-a939-956fffe0ace6"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "160", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 160, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489719433983*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"4a0d7cc3-4eba-4f89-a344-fd6a32562e1b"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "161", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 161, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897194576263`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"35db92c4-0d44-4217-afab-d426be163229"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "162", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 162, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897194653807`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"2fdcf078-527a-4c0d-8e30-58706d244691"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "163", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 163, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489719473246*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"fc6a23a1-f2b2-47b5-987d-323a5a88fd8b"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "164", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 164, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489719478553*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"5776850a-a04a-49e6-ac40-400c4f896b2d"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "165", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 165, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489719496035*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"e96f9759-0bef-4290-bd3b-3503f0b0a411"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "166", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 166, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489719512887*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"5b70a5af-6e87-4b06-a20e-1410998f03dd"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "167", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 167, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489719533362*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"7d094c60-e2f8-44a0-af91-9cf9d4e2fe15"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "168", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 168, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.77548971955414*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"3bf08d18-0602-4a03-909c-894e3bf74dcf"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "169", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 169, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489719573248*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"ec417ae3-5f5e-4017-bd56-96061adde86f"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "170", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 170, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489719591024*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"02e9025d-b120-4019-95e1-46e1763691fa"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "171", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 171, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897195990953`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"b07ab67e-435a-4b6e-a82b-5f77a8e91d93"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "172", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 172, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489719618421*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"938cd681-f9d7-4a43-81f2-07913fa20f2a"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "173", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 173, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489719635393*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"39c6fb30-8d6a-4d8d-9994-6f42bae345f9"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "174", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 174, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489719658021*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"93ebc516-cebb-441b-98b8-8f4f1603bce9"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "175", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 175, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489719666271*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"0cdd4c37-697f-4767-ad55-4f92221a433a"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "176", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 176, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489719673787*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"c99942db-c4ba-48f0-95e7-30dd8f17f0cd"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "177", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 177, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489719697462*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"2335ac84-67b9-49a9-a017-09a8e0c4a6ae"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "178", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 178, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489719756256*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"0eeed8f2-195e-40f1-802b-caf21bd038e7"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "179", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 179, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.77548971977162*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"4d4b5c1c-d382-41d3-a5ac-52ae3f900f67"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "180", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 180, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489719789381*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"9a772258-6339-4d3a-8514-d40583d2778f"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "181", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 181, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489719796521*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"9eb11ee9-9ac4-4873-b466-da4df949403c"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "182", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 182, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897198142567`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"8f962adb-c1f8-419e-9021-a9d089c460ce"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "183", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 183, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489719832803*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"de26d80c-4225-45fb-8024-3ad5d34d3057"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "184", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 184, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.77548971985709*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"1bbac5d9-41b5-41e7-9808-b25a5a990907"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "185", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 185, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897198624887`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"0efcbad6-30b2-45be-bf8e-31907797baec"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "186", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 186, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489719869927*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"876194c4-d5d3-4a7e-8bd1-daf467109e1c"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "187", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 187, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489719885252*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"44f91fba-ff48-4310-a043-4f7922319abe"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "188", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 188, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489719907349*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"1aaf8a65-c5ef-4f96-ab50-7955b095de96"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "189", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 189, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897199156*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"44adcac6-6fa2-4597-87be-3ffb65a19018"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "190", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 190, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489719923448*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"8fb3435b-6e9e-4561-b825-6e9f204aa4f7"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "191", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 191, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489719928542*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"78a848a3-9036-4d5e-a10c-a330d2a260c8"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "192", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 192, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489719945889*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"c8f2fbca-0008-4335-b6e6-c8697073261c"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "193", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 193, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897199684563`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"1dd6fc8d-3779-4636-802a-4189f9f826a1"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "194", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 194, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489719990138*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"388b48db-dd6b-4f2b-b280-7b5ee2a4632a"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "195", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 195, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489719994883*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"eab3aa0a-50a8-41ee-8336-7f644178464a"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "196", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 196, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489720009742*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"94f1163a-105e-471d-8089-7dc3b1dd1730"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "197", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 197, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897200237637`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"a47290ef-0229-4a79-9948-295c1804c33a"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "198", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 198, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489720039979*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"03f29486-c7a6-4203-9a7c-53159274b2b7"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "199", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 199, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897200580587`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"cbc2fb23-86f0-4eae-967b-646d27f0752f"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "200", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 200, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489720065681*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"02254409-5700-444c-96ee-cb7782f47981"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "201", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 201, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897200863523`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"9065b45d-d3e6-4550-9f25-f52c7ab5d2a1"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "202", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 202, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.77548972010463*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"cdc4b55a-8a55-4374-922f-4330437d08ae"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "203", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 203, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897201226797`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"d487652f-a859-4abc-afba-90fda9a6d284"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "204", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 204, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489720130175*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"e9a8016f-8abd-49e5-bd30-03487dac0600"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "205", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 205, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897201438828`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"f6627aa5-a63b-4689-a531-f9fd9f6ff3c1"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "206", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 206, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.77548972016718*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"82f0b7e8-37ef-41e4-96d9-dbaad94cf023"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "207", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 207, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489720189369*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"470836fa-a4ca-4f9b-bd23-4012d16256e0"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "208", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 208, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897201943617`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"7a3100cf-d9f4-4a9d-9228-68fb38a558fb"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "209", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 209, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489720207704*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"659b8e73-896e-4f34-bc5c-02830044a3d5"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "210", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 210, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489720221422*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"5e8da35f-7756-4964-a518-c013f255e3c4"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "211", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 211, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489720241439*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"46a50121-a9bf-4d85-bf5d-dc7b652d1144"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "212", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 212, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489720258441*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"0168d062-0bce-4e4b-9be3-0bceaac87900"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "213", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 213, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489720266201*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"67e103d4-033a-44ed-88f2-b30d4465084d"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "214", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 214, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897202847347`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"d896f028-eccb-4ef2-988b-6a7e9b0e3e27"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "215", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 215, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489720304941*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"dbee16e9-9956-4c34-b23a-8fa37f409128"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "216", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 216, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897203215857`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"e676c012-a4c6-4953-90bd-224568353817"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "217", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 217, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489720341267*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"dc5e52e2-92a9-45ec-8395-a9cf7f422b37"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "218", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 218, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897203469973`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"3ab2b64f-f0b7-4977-bf1d-7a0531297e92"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "219", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 219, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489720362857*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"7d1e18f1-81b5-4def-902f-f07f5c784261"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "220", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"0 Particles insertions\"\>"}],
+  SequenceForm["> Top. ", 220, ": ", "0 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489720384502*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"4b5c0666-679b-45ab-8f9c-57ef999a253e"],
+
+Cell[BoxData["\<\"\"\>"], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489720405278*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"d4b21011-912e-41ab-8f93-a111da7aa8f6"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"Restoring \"\>", "\[InvisibleSpace]", "18", 
+   "\[InvisibleSpace]", "\<\" field point(s)\"\>"}],
+  SequenceForm["Restoring ", 18, " field point(s)"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489720409787*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"16a9d063-9e47-4005-8b9a-4a83ec00a456"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"in total: \"\>", 
+   "\[InvisibleSpace]", "\<\"38 Particles insertions\"\>"}],
+  SequenceForm["in total: ", "38 Particles insertions"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489720414917*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"60607d17-8a34-4d71-8d39-5f6d6f4dc615"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdgeg/igfhfihi.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 1, " ", "afbg/chdgeg/igfhfihi.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489720419725*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"afa00712-e173-4895-a5f8-fa233ad4295b"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "2", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdfef/ifghgihi.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 2, " ", "afbg/chdfef/ifghgihi.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489720424492*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"37ce906d-2da6-487f-842b-f75452bcd614"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "3", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbf/cgdhef/ifghgihi.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 3, " ", "afbf/cgdhef/ifghgihi.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489720429263*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"af97715b-8780-4377-88e2-aec6617418f0"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "4", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbf/cgdfeh/ifghgihi.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 4, " ", "afbf/cgdfeh/ifghgihi.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489720437653*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"8957ac75-5a1e-4107-aa6f-de7b162718e5"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "5", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbf/cgdheh/fihjgigjij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 5, " ", "afbf/cgdheh/fihjgigjij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489720445388*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"74454467-d658-4fc9-aa06-a309b7b0df38"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "6", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbf/cgdhei/fhhjgigjij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 6, " ", "afbf/cgdhei/fhhjgigjij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489720453463*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"daf03625-85f6-44c4-a69b-3ca42a374fb1"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "7", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbf/cgdhei/fiijghgjhj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 7, " ", "afbf/cgdhei/fiijghgjhj.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489720461319*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"504ce6be-8fdf-43e3-aede-6d18388e9714"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "8", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdfeg/figjhihjij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 8, " ", "afbg/chdfeg/figjhihjij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489720469675*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"a4d9beca-397c-4845-9373-6d4f19730fcc"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "9", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdfei/fggjhihjij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 9, " ", "afbg/chdfei/fggjhihjij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489720477262*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"bc085677-7c1a-48f4-9cd5-dac4e0259c00"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "10", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdfei/fiijghgjhj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 10, " ", "afbg/chdfei/fiijghgjhj.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489720485121*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"4610ee3c-edec-4f45-a932-7994ef64cd37"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "11", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdgef/figjhihjij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 11, " ", "afbg/chdgef/figjhihjij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489720492548*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"54d75cf0-4e08-413c-be98-fdfd4703d4d9"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "12", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdgei/fgfjhihjij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 12, " ", "afbg/chdgei/fgfjhihjij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489720498502*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"3a41706a-380e-454e-a7f2-692e44ff77cc"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "13", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdgei/giijfhfjhj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 13, " ", "afbg/chdgei/giijfhfjhj.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.77548972050562*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"1d2a71d1-aaa2-4ad1-9129-b78664e7eab1"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "14", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdief/fggjhihjij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 14, " ", "afbg/chdief/fggjhihjij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.77548972051326*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"074c3978-eaf7-434c-ba91-2c3141f81334"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "15", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdief/fiijghgjhj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 15, " ", "afbg/chdief/fiijghgjhj.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489720518816*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"930c5b8f-719c-4dbf-958a-62d68fc46958"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "16", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdieg/fgfjhihjij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 16, " ", "afbg/chdieg/fgfjhihjij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489720524228*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"e4634487-cc5a-4ab4-a1c6-1721aee36cc1"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "17", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdieg/giijfhfjhj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 17, " ", "afbg/chdieg/giijfhfjhj.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489720531748*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"530f44b3-f7af-4032-a329-45c7bc81f7e4"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "18", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdiei/fifjghgjhj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 18, " ", "afbg/chdiei/fifjghgjhj.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897205400553`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"12f670a2-9c97-4115-b9b4-bd4acc18878c"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "19", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdiei/gigjfhfjhj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 19, " ", "afbg/chdiei/gigjfhfjhj.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.77548972054771*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"7b783d4c-0b65-4266-a396-41f3281ec481"],
+
+Cell[BoxData[
+ GraphicsBox[{InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwt1gtQU1caB/AjtjwEIshDtlAQzAKuRUOX54rJpUKxksGAvCqMIiOIGiVF
+aYMiG4Uqsm4LiDa6FHkEDUIhIkKwyvAqRJYuEW1BsBApICLViFgDIuz/dDcz
+mczv5jz+35d77sQxPjksQY8QkoU3/STqRbz+xJA/XhyGjPyrNboQLu755pBq
+PUOazpZyXOBV9iuCLsDpaYrCMhuGmI2djjgMbw8uDbGCxS3EOAa2bKkVSlYy
+xMfqt/AQuIj11e4n1livwFlK/TDQ6/twWNpVVEXHd6RPDnZYMSTa1nKYrld7
+0XliE2x4t0onhVPO/pDTY8mQzdku/A446aqbWghry8xVc3C7p/e79rDqaZH+
+e8ivb+FZNGrBEGXUpnZvOH2fm0sLPH8hPigCtkv4beN1uPvFmN9nMCfV+3wj
+LCs5F58DW68aMuiFp+62FVyCB+Tul2dhxXeVAzUwd65l+AO6n2hBdBMeXWZX
+vgfWPF7b2wRLkoYKyuGCEya3bsE7/vPx2hHYJKvmwzo4x9rzpQ3q8xtbJymn
+eWe/rg+EZaoc9zy4UL5QuRtmX6w2E8MaG4PiFNqP2xrbGJh/rHflAZhzY/bI
+Bjjfz14YBgvu96XQ+rd87DHoCGt81tdMoz9TBi55g9hf/At/vha+qP69XAL7
+REljxLDcqc7cAm6W57ED4bkAh2/OoV7pgu8OW7j+TVW5MazOZVXMr0OOpV4e
+aSsY4toZ6zYJ9/ePnxsxx/2gqPlqFO41Dgjmw4rDw6NPYTud/92bZrh/uKzv
+F+H0rkzRh7Dg628tHbC+X8OV9w8uZ4jOffyLzTTvxiIjKQv7eXEX0mDxC/uX
+j02Rb6Qo6Roc+0vTP3bBYvYynylYZLqzWR9WcLeNWqD+OBlf1meC60LPBg5s
+Kf1C1AvLDpl/EgyrvDvPv4TnD6oS4+HmhMYJT8y/df62Xiqce1Lekw9rqgOZ
+E/CUJrxAD3lUU3rHTsMzaypq0+H2js4oer+0p7l56WAP3Y26LNjPiWsrRD18
+/QNN9Pdjm00oemB26obRRPiZvPSoKepvDk78aStdn7gdXQ1rHG6mecCiyEfv
+uMAmofWPrWCB9SLLGpYEHLk2iXpNGpQPh7CeujPPW077Me7ZkQA3PxOy9sCu
+se1ercgTPZRxfw2sjl6Ieo164pZkvp1G/038P18wok4bbGiHmRWbUgn6IRVq
+7hfDfJfLviPLcF4vOt7IhsXziooGI9wvXSLfY7BrxM6K04aYdzWqMQPWueh9
+tMuAIRMDcYtnYJsyKyZIH+OzYoOv0PkV393b9C7q6ju1vZuObz/lveMd9PMB
+N3UO5gxnxxcuxfWSsuPrkTdr65sOPVixVfTeXjj3QbBTgR7ytryRy+D+a4Kd
+obDP9sjjw/R5pIk54wt337z8d2P0K2Bf5tgnsMbrn6Fsen6Cq6ePwcrhj6x9
+YSHLQdkDF/ZXPtgMk0zha2/s90Gh/lAYnR/oklENy/6qK4uEmc6fM/6CvLGP
+pp9vg5PasrWlMP/Kre4tdH7NuJaF+nQBczn0PBZnVbATYYms7bYzrD4RsaIE
+5txL9DClz4eQhEONsKvwb7/S/HLDQ+KrsKKN7V8MC1qPvBXBZlF7zHbAhg1v
+K41hw09lc/Q8svn5Rkexv/hkjPwh+qfm+ae0IK/GykRWCscNPl0YQX1aq0Ku
+CBZtVEePLUG+Rc7nQXBSKCu9h2D8nRzNGjpfnN8XtsgjysruCzawoGFD/et5
+HlnVcNDHElYI/L+9NMcjuSGDHXaw9ssfD8fqeEQ+8bbVna7Xd9Kf9zuPKKY7
+V4fBqtr6/VEzPCL6OXl3Orzq15mVtdM8YvbkeUE1rIz+TPrpCx6JmzVPHocl
+4ifz4VqM73JKdkR9zVXLz2x9ziMaS//nsbDGoD+j7BmPiOMdAs5TlzxeWgRn
+7yUDXbBkIdyPg/Hq1dcFOtqvn1gHnLBedkLNFhb9/dtaMjVwVkzmPH0+KoI8
+f2jF/u2apBJH+vzPrTZWIp/4wJUhakY1FV/9kkcMD1pcsoWzS8z/fRb1qJbP
+WCyHlVqj+chXPMLZ358wi/3IvXWOE/DmU3O7aB7lubVf+qIfTOf1V/mw2d4h
+ZwYW2CkjIqgvj3BmMF6ZZz1nQfPPKkJCYfGf92Xepf3Krx+MxH7Ni6FFubSf
+jrsmDZBH2ZU4vo2ev21qp/3ILzk9ced9en7MXV9Zon5BTnSy1g3rSUzzxiZ5
+RMq1L/oR1rrXpSSO84i2xaOyHubcOR7R+Aj9Yl3fV+VG+z2gXjqA71d3O9dQ
+L6krUKmxnlZe2AQzxvf0Wc3oZyB38YHb//8nFN/+3+c65r9ilhyv
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.907871335428632, 17.11903631971389}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt1wk81HkfB/B/jpUjR+4RjeOpRO1UK6LMn4gtaqhcZc0KW4ihrKdc07Ll
+KhN2i20zZTt0aFRscjRSrQhDJKuiErrWIDnj+fye5/F6ef1fb7/f/3v9/jP/
+Mg6M9AyWoSjqIX7JlRqbxY8pTf33R4empvxz02phzsFFpce1afELE2leAsz9
+IbTcVpum86PFBSyYdmqMm9WiqXEr893dJjQl+st67BXsocmayISZ25LS+7Ro
++o7QYs9amLNNtk9Rm6bWnPEulRrTFMu7U20T4tcIbuddgTmDWxLPYz1SITY8
+Gqb3Bbno6tD8p+tjZtbDPceKA0/AvvaKySYw/7Xb5EJdmm5K7UpShQXVuQ+K
+dGn+AbsP9xVg9aqyyGV6NNU6oLJ/HizJtJUW6tHi9+evyRjB4jnmI1/p0/ye
+leE+1jDz7egSD32aaj63uM8Llrr+eSwRTjMOfniAxMsYLMzUp8WcrJHhU+T+
+2/qZB7E+3214SxWp13M141t9mo7ZoTDSQerrrLo/qUfz25gFdu9I/uijaTmo
+Z2vN4okhWJidWqyHeiw/RqZ+JPdrVqQIUP9mjYK3XTAvoURVRpem1N4UNFaS
+eW3/sXC/Dk1PVLjmC4gHmJmDmFcsQzHYh+R7ZHj2AFxntatXm8Rv3jKih/le
+ujri08DEfmknr1WLFj/2souMg0XL264UwWERYgNzWDIVdEmI8/sQ39JXvBB2
+vnv3TziQ7SinCXOyUoQf4fTtU+tTjFDv83QPtjbN1xr8p0gB5nsmRVyEXY1y
+NpwxRL4577ab4rxGb3CpbTBfqTy2CM+XXdNQuDEs5bpeXYV+F2XWVSiS/ZOb
+8m7DsdadN5RhXukvStaYn5fPWK0ZzLRM33kWHtBw/ZcHLJhdLfmMeX736t28
+TJjjwu38Gufhs2DFUDOJ5xG/YyPOV4+tUK+D+kS7wx87wcZrLof5kXpza8MW
+wvkHf2zLJeu/Z0x2If78sZBEMUxtPD+QAGusZRU9hXnXteSUkO/85EheJ3F4
+Gvswzsc4Y1Mj2S+WPRc4gX67b8noH4Ulw4rXQtGvDLe6wp5YUznpJc6nMKrC
+twP1iTLmvQ7CvJ5mSvp8YcmbOscpLZpv8U9HYv0CzCdhp8Il+LI0Z/lymK9Z
+4RmD+TNshq6lG2A9z7YuAO6qXGXYx0C8MNaeUOx/4ahTsAHmje8/kot1l77F
+jOuYi3QmuakLfnqoqnsZLGqrDlyL/CuDT4VUoy+m0TLtEtQXc8tA7QdY5CZf
+tAr1/x7WPWoOcy94L66C200yOhRgyvjA2g04Lzq8/ysKFpxzzf8L83AemYpR
+h1llS/xsMb9eZmGLFcwLzfA9CV+kzYrDSD7KJvMZruKwhLtXcBUaTbFlcR6v
+HBy/HiF/z1+9WQl1bij1bbTBVXj8ls0Q7q9hxfNjYU6EN6sc+7rNjNOKYIn7
+pFwwvPJEdstDWFDxenYc9Q18NlzZBvdo2lw6CCePN1+8T+I11/wkxXm5VzUf
+OgXzbj45/z36mzfXLsIHpk5/jG7HfK78siV1ktTr2LtwK8y1uej0MyyZYQa+
+xLzP+nt6TKNvickfaocxX3bK/qAgmLv1Tosz1pMdDL7cRdyegqN9prBbW7y+
+ESzI2jdqjP2fXI73xWHufMbgOBvrfu9W7yXfoxTvpX08rqajdg7euApKNic9
+xlX7aObqbk2cp0PgXAfcpxMTxUyE+U27v1TD9UudTq+GhY+iz21Af0rdLuOK
+MMeMf1+CvEF3ElTH56Mei7g5XpgHx8/XbxbmTH20b4ajJGtlDbGftt8gtxp9
+SmsuyrmTeEaXmlMwf13GwqB0WGTdyv0Tdnv+Zl8zLLmuNFyP/ZXfWCzUQZ28
+ggB/8lxt+/2YnQ+pf4+MZTb2+y9t6MqCWeaMLFf45ImvC8j3DKUX4PgG+UPT
+KybqYaGast9ezPF8uEHUAxLvfdVMH+qfHuU0XCDxCvsYvuhPufcXywiYbys3
+U4/+v3vSZ8KAJeN5k+txXtly+aevknk1TMg2kHmW7npqAYs1lTxC4EcvTRfl
+oX/W2bdzDTB/xr074kkN7D8k+fIB+8pCNBO9YI5d44EXmjR/PPfCT9fVEf+q
+KlMKv4h3GdQirvfqZSLeiprjhgpqmJ+Coj6p67h8sbqCKp6HNt0ccn5XdC58
+s3Ie8nf88xLvP2rsbefdYyroxz/spATWN2jwZ8IikVqhH/o9c3JfT78y8l/+
+cP4V+fztfeL5Gu4xdw36HvMxr42RU8X+Hla7rgTe/m+HBi6xakj7Esz/mXPJ
+rlbiZJ+OELi4l/rojfw8Tk71YbgtXiXuDSzMqrhDnKNjURaBeoXqThVkf829
+In4/LHLXYpN4AlN2nhP64/eKopqQL4UaWxEPizun+/3hjCfX9h2Ghfce/vAM
+9VqPbej3J+sOEfkc2H92sHoW8WgO70YN+vW9/3wqDKbsh9SsyfvsFR1xjtS3
+7N1j8lyIWk5mlaB+Tmtw+kb43bHNa06if5FNZeMnnM/TmEi7XUqYr03o9G34
+9IRyp6EivC5mpgDe1shc0aaAePoRRufgH9XGfsv+CvU5G40/hGdPJMsHy+O8
+l9QlqCB+ZG2Mu5cc5vXuhuYeeFOUb2mkLPLN/Cr+mzyHvVFBt2SwftGNtwP1
+HmluUrCC1WW4zr1wSbYwp38Onqd1xqN70e+9aQ3zZuLKaPMheP9aWZMBWCC/
+/HUI5vXsgbyjJe7nKk501MGNT+SVcmCh4MwDDcxb3sl+6Xzkl1C5VevguqhE
+ldPE8lVbNsLmDj9HLkW9dKxGKfm8Cvu2KF+GRSfmtsvCi57VWmmhP5Z7vO1N
+xLcK1UnaAfc0HR/aBH8xu7vu3zA/f58H+X445VMmEwRTKjdvusCZfxQNMmBe
+tJ5ZOfpTOTj3/W+Iz3nmOG4Bt7DvFQ+gHk6cRSz5XLKOrimRh8WD2dEr4Roe
+9+0E+qXU0j+0Yt6nRkOimijsD/j7wVHyvRS8Sn/BLJvi1aUeCoFtRqnladNs
+ShLzUjmAnKdZ8qPpCTYlskq+FAsLVri6Zo1hvf7BSDF8sUzs5T3KprhJ11/N
+QT6/x/kvdo+w8b6Imw2DPQtaPjweYlP82pjf+uEI+4jnhVLEy3IzjED90i38
+w1WD2K99xHccpi/JL1OCOXNvDCeif0tzf39Tsp5iWTkJP9r5k9onWPxxOyMY
+82Mp+TQXI57whNWOW/Bk+arrp5CPa9MuI4VVRgMCrg6zKeneXQqK5N+jz/be
+qEN9nMShiTmwklh3uv0Tm2Ltuqzfhf0RDgHrq9BPz5lUzq+w7UirYPdn5Nt0
+Vt8afpJroX4f5qod9iTvldaQtnn3YOHTsYl1sIhlVrkDFoVmdovQz4J1g2VH
+EI8u8HQ1gWfc0+y/RT7151uP5mEeS5UZiy+gPtY3CuWGsMlNw4Sr6Ec63LOk
+FPNlVYv+6vyAeV8esg6G/6gICB/phz1Ux1bAqftt37e/ggucP5P3Bt/EwCuo
+i00xBxJNlsK8eY2PoltQT5ta+Xa458B3O0PFiP9w0OO05v//35Gx7n9XLfo/
+Yw2y2w==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.077403306263033, 4.30673387473934}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000002274`, 17.}, {13.500000000002274`, 16.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.552325660469876, 17.180083206945802}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwl1ws4lPkeB/C3miJsOwkhakS55DIJsYVXsbkU4xanJJWkVpnSZrZSUxGl
+llp3ZSeVW9g52Fw3kyJTsxqlci1Jsi41KnFQzvd/jufB83n+l/f7+83/fXl1
+doZ77Z5JUVQnvslvikl+6NHU/77UaCosaOflpTCXPhgQBzv+4qPDgWUt81sY
+C2lqSiB/LZbMb819zIU/m4ekPIBZi05wG+FGjyz9ectoStRQUS2vTlM1UW/Z
+/4JZXqXVZvDGtr0BOTCnZyR5Ldxq+8vaT8TqwiQyrs4pCbFdTlNBrGxdBTJe
+/X3CaThxi5KoCftLK7OuiWBhx5tOPlwzLWobhbt12DV6cEDP6DOWPk3RtwPt
+a0k9Bzbl0jD/eZbQFx7qbu3wgQWW+bHDqvCsG2e2wYlfzxtfgNM0KPZWmPLS
+qbaC4/gGw+4wM3dAPKJCU/2b46x+gGV1RVZ3Yf8ten2LYc4ji8lcOCmqZ8k0
+8nA3UEp5sOxFik0XLPspZF0dmZ/zWlANU+sWeH+Br8TNFF2BpY+9m9fhesGv
+pD2k3qA9cvY3YediOW0uqa8l2kAT+fNKGatCYNbpNW5X4bVLp2OIu5OD6g1R
+f3fVb4xDMEd6eWMVHJfuzToHC/rn73VBP49PPGy8RdY3fyxphnsnVoe1wfy2
+6/PcNfD5pvzzlYl6RCaL+irhbuH0DE9iL7OA+ZrIFS+flQpLee2RnvDa83eL
+ekj9b8848WCldOUOMwPUG9o+FA03Bq+uOA4LBlyrImG9lSPtDTBzIG+RF8y6
+lDimaIj1waaJanCoYd6ECywMPnuhEdcvEzuzTsLcS4t8wuDPvXVyBbD0xwDx
+HFgWzbwnhoPmKK6+inqCYte87oIp8bSKJayktTGiD5bdGHn4FP2Q5cYp9pL5
+ql8iTsDM0u/LX8CCeVtv2sAXshZ8rCP7c7aumQtbP16TmkvmNwyYyNBvkf7b
+h7Ekn+qJcOLP9w3f7Cb5n9IvFEi/31dvciTj74oW2sNl5yoOL4NZ9p/uxsPG
+E4LrpF7pswnf9zCrvmB4nPRLujtwF/LKn4hW+wCL7tOpfaQe/aQTxAI/kXYE
+6m09eGHBJJnvJ8uZhX5Z18/+UZnkix2pukzcl8CwJPWvNfuouQg56iJqdsL8
+v16tTIUZRtpBGSSfnNHbmVrIfb/3UDtZ/4nL3gJrOd3W0DHCessYrQw41LnV
+LAwWmbeXi2D5waHASlh40cX4b1gyf7HNnBXIF3qwsRYWMDg+HJgT6DiVDl+4
+arg7GaZujDgHwq3r7/k/JfOL2/SYMG3U9ZO8McZ/F7eUIl+ZZrrdKljWYbbW
+HW516HjjBYs8d+T0kvrMcgZDjMn+PvHHYd7hb3vCYfayvV6LYBX+kqEwmJ8z
+pNqAfjk+VzgbBAvTJveegis6KkvcYFrV0dCTnO9NRzax4USPNy7WpL83Fhxj
+woIqhxriIMHIpffISy8P8vUm+5m0TEtgbnBcfSwsZf5pWkzq5YszW4g9a/cm
+wawY9c2rkUckyL53itQbtSOqEJZqBU5HwonP3SVmqK9w+9njPLL/CdXtNbD0
+zRv9aJhpZDawEf0RuqkdzFxBPt+s0Q7ifqHTHVhqulwzWBvPm8tyykNk/ap6
+225YReP6A13SL+0Widti3N+Gqv/sgqXV64azYYZ1bkYBGb9bkd8Dqx8yLB8l
+9cvfVp67BM+3uPF360wwf7m9jypsMG1cmwALubq1crDK2aYnbbBg5+H611jf
+mNX+YrEp8s3ePHAT9hd/qA6ABQVdN/3gG71RNZdgyv4Hu0nks3blHa2BWWFt
+qcmwf3jR3E4y/49r31bA0Tnqkx9g7mDOwD1yXl5W7RiHhQdH6nbCjMj7zaMw
+5zPj2nfEdRpb/oH5ppKFYvQvqf8orwWWftxDpcN6JU/lK4kdFnvw4cTm/ex0
+sn6u20di/w3vnSLJuNn9mkxY3d6o3Jfsdyw7QAob/2ds2Irk8XgeqI3rpdWu
+sNQm9awIsufD0oUfshTgxPjImFFy3nddGqZIP4J3D/BQj1Lms5MzYHbZ9nOz
+0Q+DrnSH72CRzF0tBa4Zjb6mB8t+U9dYhv6qPzC5sIHk8XthVAQHGX8K+5ns
+/8UwXYWFenSPWRTB479dcHeFjbMSg4dh2tJL/DPcubiDZWGG59ChqoRkmH23
+bP1J4gzFW3kw19jyiASmY7aVFMMpn1beVGKjD1z241w4w9rq1krY4MCV6iSy
+Pr9Z3wemqkyqjsDUX2rKEXCanjjWA1YKVD13ER4vsXLWIfm0hV3ZMPu9f2fn
+EvJ3b31GCRy0UGIfAQu3iWNrYEHImLkivC+FFoqIo85rFaAfT4RrAmth6bCd
+qi88Uz9LoxLmVEqKmXC2x61rxSSPpEFEznvfYH6vAGbyMm0b4dD6X0YTYVFL
++nwxfPhRwvRJMr867Lte2I56ZRNO5ssmO9Wx39CvdNt2mA7VUAyBXed9mulN
+5kc1zxfDW6jGWhdYVpB7xA55nygnyBzhbs3okbtwawvt6ETq9/Rw10f9pqp+
+bDfigtzkcFi+IW9wM6xe+IdyOUzrzgoLhbnmOsqTcL9BZgjJJ2yql7PRoanz
+Z7y8M0n/wqcKDsD9B24dqib5XrkyM2CvdoPnL+G8ks47lXD3WM0+xkrcV/e+
+iSSwcEMzYwWcF/uy+AmstG7Hfk+Y+0il9BFcI0oKP0Lc2hhXAX+pcuhLgxuH
++RFkfwXFO43lsOCvSXYEGa88aPWE7B/977eOcJN/Hv8dzDN+wVCG+7JXmY/B
+BrTMogv1vNQ+rzLDHLl6lprnw1OpBuazYfXFGX/wyPlT0Ho+C5bSm2zcYTXD
+yrivK8n/AScWGsPjYTlzP5HrO7AtyXkP3XRsw1tYGFKkIA+XbfbyfQaPj6ld
+JJ55uy7wPswRF+qqwbKcBxmlMH+d63U2PMfEwO4GGV/vwvEj51dnbH8q7Kx+
+uy+OfD7pdea/wuoNvLx7sPuimfvPwf7ez7izSb9MnB4RM6dCJW6wxC2xLgHu
+n5GmkgQLBm3PZZL+2dtc7IAptasqRaQfp1edWbIU535nqAbJ5z/5575tsMyB
++X03nHi8cvIynPek1JJCP5zXxLvdgbW2xGTpwnzG+p4u+OHWtVYucNxui0cy
+uMCS1RwOi2Kyf/9C5jvrWacQV9jFf4BdK09bVcONO+1dO2H+LtvcLphK0tMh
++/cUD5+agmVpZ5tS4DvvvPvUVuF+vngxMhQ+XK233BjmNw8lWMINDrmSNXAj
+N/wOBfcdbbruBHOnnWvJeaO2Jd92gWlOpNMVuNf8DMcZDn0c33kQNnq6bcKB
+jOebSjzgkErTw6thXlTGt9Xw0cGuQkPYeZ7p4AqYGS8q14BbU2adNYZfNieI
+5GER7WT5A9w5w+PbGPILv/0p8YGP3C+52Q9blwoSjsE8RnZHB5z2daFNEWzh
+sCfvCak33Eihn5zXMp2hv2F6S1iXIeoxF435NJH5RVN2XLiQx/NrMSfvK+Ox
+FfC3x6cMu0n/2w2mpuGArN7aEZh5KLt/vS7y675uIvkqfCfunoJZhUf+1oPZ
+affocjjbf8ekIyw1WHCsB7YeOr03lPTDbfg/M/DetHGvP+NXWBhaKFaBFWzl
+BGVk/r78aE3y3tVzdHYH6bd+sd8CMk7e0yxwbv//3vZfCgDy3g==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.318520523989797, 6.302976613356011}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJwt1gk01WkfB/A/UrbJbSbLyHIlspMtpqG/JYQpW1PWsYWxhDaUqRtmDJP1
+teRa0qByUZYiMrqiV6GUUXJL7lCqmZabrqik9/vMeZ3Tuedznuc+z/f3/etf
+6iFxnrtFKYoaxh/ySS19xo8GTQnIpxxNLQ4JdzmvoylK6aaPgzxNObcrMIth
+fmxp4R7Yodf25AwctGFAMgUeuPr4k4UmTeV9cfJINKxdI7U7HXYXdptaw3tN
+bTWGYPqt+NQszmcfrr8lrYXzM7tqcuGh4MxQW/i2u9uIAvxM0BIQDefFhl7L
+W01TMXf7Bn+FqySsSylYkCvtVwrTXREPY7/CPTPFfhVk/R7PevJLmlI8atdV
+BDNU91n6weWhM0tpMLNZrOfpKnzfb4tmFMy6vPxjJtzZwylxgeNHaue3wAcZ
+ycu1Yf7MtlRVuMVY11kcNk764dNqeMEozvwJ5mFF1LjrwI4VZj8PwMbZv/3t
+A9u89+C0wwzGwp/VsGpu0YVzZP+qK3dFkSemutWiGY7XetuYQPI5h5hwYe6W
+AM+/4aVdFdIPyX7NB9+GY77Cu61py3C/e+fEH4/gR+cCuizJ/A+F7t+hj+Jf
+Wu0SYcHUN6/rYTevI+rdpA9Ott8czOHNv5dajzynb4dpot8c9151P5g6/kbJ
+CmbqV/fVk/VahtAQbmm1lfgA58W9m1wOl3s6Gdtr01TTTr7zVZznPDzHTYep
+A2yRMPi6bkFlF8ycv64uIHmjZLWfE/tojkTD7J6zrpI62H/YRnoC84WxwguV
+4SbXua0ucJfktJEGLPBIsO5EX4p2K16okPV+9l5TeG3jA/2VcJCMk0gXg6ZS
+Sl7z5kieVMPNPrDnTnPXMTj+eHKKLLx608/qF0m+9wnsXlma8mZ+a1QABwnn
++qphi1Nl2xNgLuP28yuww9+N9jtI3qh3PVL4vsPWA7k0bOwxVrYdlldU8zWH
+b3d6/8aBu6oGPYkpE+ExefL8R+3KbMm67JPSbPiEaHWHL8zyLwiSxHy+N7rz
+WSTfTR3tNDgl/Uh4C7lfZ5W/EL6+02z6FcyQVR39Hn1RSbH6ZpjX+Oi+tbUw
+Lz9m/igcr6x/nwdnXVt3Zpj0aR7zhxBOn3CMZerCK+Q/kP6p6u7YOJi/UsVg
+GOZoTU51kHVDj4Q8+JbIfvoTLJDZvX0jvJj+0WujHu67yK/oRx7e1YSgcJix
+vtjdEW763c0sE84LXLLqwHxKvALLk7AgvKRHC/5ebXvSWZjPeFpQhH76uCJV
+tXBQ89qtMqQ/C8W5Erhqzm3jWvQ9oje25RjMkuxQ9VpJU+c+p46EwtxHz4Mv
+fEFTMjNPje1gaq6nzQ1u4NXpqZH9Z4aVmHBM8ftKkp9W4FUZwcKDMd58mHV9
+W2gy7CLOnbwBV2VsKl+AJeQcj3TB3Ie1f9XiPs/pwg+kD3pmS1oi8kiM8Yt6
+YYZ1qugG5E3SUF0Yh4OCFHc1wC9Wt64n97mLqiutx7xdoesy9Uk/l9hn2PAh
+S+4M6YsbXNZJoa+c9KdHOcQdte1eMP3GTG2O9Lu/UJgD36v/0cJBH30Vlb49
+R/avubJUCBuHROQ2w4/blpU/hpkfveSL4bzcm7SxAWzB9AqA2QXTHgfg21Wz
+qeT3a1np5oxmWFAmblWJPPJ3HktMw5Ri3AYmed/pm/wiYYjnuMNGjjyfVzdS
+HdWJU56YiME2Wq4mBjCr+I3/FPrRtaJH9Yl3RvoNor9LPxzyJPvpEN6KWzLw
+sX9+kIEpf+O+OWm8P8f5WgKS7/JpFTdYtLjKYJhYIOV9XwrnD/1k0QBzPeSW
+KmF9v3fKWcQtu4dPwQWp/2mOhoPKPqdOwv9N3lHsRSzz/T9eOG9mR7SKA8y3
+UV6/ALtnPtDbTNa96YWryLN4Ilfdkcyrc82yDnm7O970+5D999oiKjGPw6YF
+p0Mw65iDUxGed8ussvYZ2D1S0Y7G/AcnfD0n4fhPOufr4JbRGfV/55V/tU4E
+/e0JfpcYRfrayOHawnRkzr1LZH6LCm4EHPVsOUvSCOuZaa3xsO/mi6U+ML/t
+cIkfeZ+5LHc/DQsGeme0yb8vgZs/vIDzus7l83CfWwujUs4Y/kZ1Zh95fzGm
+8o1g/tiewVnkPTiqcMoeprz6v/4L86iFdAd6wCzZCaUrmFc6cbBxF7FeIMVG
+H4+0j1/1IS6w0DiKvupFVzJ3wFzXG76H0e+TbTX5rsR6Bb5sSZpK7n/AtCH3
+hZipzkjQVNE7PwlDsn7SPjocvr7dv0aZrJ8UjWPC27ISgqVhZqkgRR4u1vx6
+xzzmqfIPeuME5yxXOTcBs0aPWzXDni/PmA4Zkb8HfZQb7nNsXPO4D6Z+3c+S
+RR4X6W3WN+AgpsJrARxo36DDg5l8tsRj5G+yqxWS81lLiXUPMN9U/UGNVeR+
+99H9A5hfJWO3nD5c5XHkp2r0o922RsaNuCb8uS/6O/+j8rJ40p9yesYMPK5q
+119M/NpfWw19R6UxFrthgXVTuCG87Ok1i6dwULJFI1m/4uAtvXID9ocMuJDv
+XwsNVDMhjqSnveEMlx2bPOEqc6UN+bh/3mXCJxZm8Uv/qEa+F13tF1LJ/kVq
+bQnyV89n38qHuc/SjyViPvsm9WQ2sdjwaw/MP3SicKwcZmZVDpqiL4sajn8p
+Oa++XU4Xfb63UbmWR/b/kjxEr8Dv229OK9PJ+YlW3qnLkWPk1I/74SBH/tt3
+4jRVVsExCIXptC0xNfBL58U+D3I+c9/5bHjpr7ByW3Kee+TlFrg2bYphBvP1
+TdgMnOd4MSJQl8wn7pNxCuZE2eZpEvffsAzA/VmN0/u0yPejfneyQr68tt4c
+A3Jf2MVWHeQv6rmisInk13U8rI75MtdECreR7/NZm7/C/K5zrp2RJP/N7Jdv
+4Nd/Wl3IIPfvnwltRl/1qRv+4ZDzv+qRdkKfA5xikzvEoZ8COXDCouTG92Qe
+SaHXXbJuaJCrboL5zUfr+mDjrp9uOsPcT9dXJcH8gLCCWJjfMGEyi/MPlRdW
+5JD1l3G/WsL3DvInOGS9874yef80drQf6YGZ4x0abshfa3h29g5MSc0nGWE+
+p1s+Hx7AVY2XpaQw/7H2c2cmybr5O/Pn6GuifNJ/AmaxA1R46DfAoKr/LnGR
+j9jzZTT10DTz/g2S10XkPBNWtjVv74TpkrHpTDGaGg4+3VpHzhMuzerCKkWN
+5idI3lH/6BVwyqBmfQbJl1XxQg2mX00dSCZ5RDzU9sLVKla8PeQ8vfSRBZjX
+v/Aqktg+2LoB990Zr8v911+yg1PJ819o9SD7qQFuZhzy99xZTDlELPCcCMfz
+tn7pI5FNbLhezA/zhuiKsWtJX/mWAzbkfZJOHe8leXqTboujr+hYP+ETkkc7
+Wq0WrolsaJI2Jf9/H2wjzz9sae9+U5ipErHkApu2pY77mZL3QdrXTvBWj4sJ
+acSbLimsgK9/Jzp+FmZl3aGycd7hWvn+AfJ9Z5XLE7j/o2iO2jOY+rj3JgX/
++2P2/08J+n/oho2Z
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.45429484366825, 2.671979374673003}, \
+{0, 1}], LineBox[CompressedData["
+1:eJxFlHtMU2cYxg8QkFERSFG59dDTc06lMCVOqsAQXic3I8xKQoqT65RRhImM
+gVoYFxGcCgPSIPwxucwLpKNctYMRZIyrDLlGbmFQjJAKbOpkOrPR7Gs0H01O
+vvzypt/lfZ/noT5PCok1JAjiJPr067sfA2quft0BRNXpgbbfaPhzTvt34UXE
+5RbPm27R8LS8t8HIeCcQlm2FJtdoSKwM4rrfRCw5eoibTUPniHVMqJcNEDYJ
+vZH5NJjFN3k7zSGuTZtQfE/D1wakOiXNFojom3fyumh4VPPVT37GdkD8sqzx
+eUVDdt2LHwJy9ZyyjXJloEWTWmayhpjYfVCXzEBkRnKTq5c9EIFGz4JbGVgi
+5WYdyYhb055IdQw0W0/aWBUgNj2vigMW4jtzNnTXEfO/VOnkLNTz+o93piAe
+2H7e6EdUHy00H/dHnF3av/qIhZkFV8eRDxBrBrTziyxIDn9xwOlXdH65rGl4
+iYWejiLuQiri1rbhvBkWivOaXdxcEJ/LuKHsYEErE1mGaNH7il94qhUsmJ+6
+/vxtM+LR9SlNBAvO1oMqcTFiS1GckSMLJ/NzldzLiC/c3Zs8ywBb8c9YUom+
+P/YPBxUMNMhmNENtiBv7nw19ykDbZLjWZwPxdNg8z4KBb6+dFSV9pj+f4DpM
+05DUbBR2exgx/+PUxjoaaoUNkpeh+v7IzHYV0eATf1wSu4o42nvCIoeGyZbv
+fj921QEIUFeLcmkYr8ieKRTx0P2lRFgpDSfKDG/N9SLmt7TcVtNA+/ot7Qkj
+kT6UXUFLNFzYUq3QzSI2XQmeJhmIX9/aXnbEEe3/oalXNAOtBU77wqoQa7zj
+DO8yMJhOjmrmEJvaXZKvMaDsakgX6xBrz2xdcWUhf3rtUKwhH3HeWGciC2t+
+UYmZf6E6382wp5KF8lR5efagfj9Z/+E+Fv7YRrLCEsTTO4bE8yyozGa9Go4i
+HlCOhC6zULBdr+fN+hm+sFtyj8T/d3Z4MjtzlsT7Z93Pi8sSk/h8l6UqRY45
+ie/HkQszxP/y8P0jPpFcHjQg8fuCGxZdHWkSvz+6YmqoJmqzP/X7X/nK1Jv9
+q6SjEg1YR9zf9eWf7cZqHHH/Fx5m1lvx+Hg+dJ8P1yOBj+dX3e5uFdbOx/Nd
+i56SBptReP7ul2qlW0IprI8hJ92EqpzC+gkcDUwYGKewvlyVY5xoAwHWn1uM
+osiWFmB9Xuwz2hl4QID1GxnywPn1QQHWdxrHXrSkr7/Xv/FpT9NcoQD7wyZm
+9c0kR4D90zMuXIldobC/lPvd0yx7Key/cE3Q09UKCvuzkpWds0mnsH+luz3e
+3ginsL/v5ztI+f4U9v+U2CeH8KRwPuzjlKa88aBwftiadMupAArnS7g0YJc2
+hsL58xHrd++/qxTOp6DOK3vCH1A4v+50+TMRGxTOt3Hrl0yfrwDnX1ZwjWa1
+RIDzsU6VeuzxogDn5+PeE69P7aVxvtod4TllfkPj/LWu4Rh7dCN+n8+NnHfr
+//aCKUQ=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {9.0548, 7.75}, {1, 0}], 
+        LineBox[{{6.4999999999976925`, 16.}, {13.49999999999251, 16.}}], 
+        PolygonBox[{{9.4, 16.}, {10.6, 15.6}, {10.6, 16.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 16.9452}, {0, -1}], 
+        LineBox[{{6.499999999996362, 16.000000000005457`}, {10., 
+         10.000000000003638`}}], 
+        PolygonBox[{{8.552322615314452, 12.48173265946094}, {
+         7.602165824326175, 13.316718930329426`}, {8.293188945044921, 
+         13.719815750748694`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.515942703607428, 12.823799910437668}, \
+{1, 1}], LineBox[{{13.500000000007276`, 16.000000000005457`}, {
+         10.000000000003638`, 10.000000000001819`}}], 
+        PolygonBox[{{12.052322615314452`, 13.51826734053906}, {
+         11.102165824326175`, 12.683281069670574`}, {11.793188945044921`, 
+         12.280184249251306`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.484057296392571, 12.823799910437668}, \
+{-1, 1}], 
+        {PointSize[0.04], PointBox[{6.5, 16.}], PointBox[{13.5, 16.}], 
+         PointBox[{10., 10.}], PointBox[{10., 5.5}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T1", " ", "P1", " ", "N1"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdgeg/igfhfihi.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdgeg/igfhfihi.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {0, 44}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwt1gtQU1caB/AjtjwEIshDtlAQzAKuRUOX54rJpUKxksGAvCqMIiOIGiVF
+aYMiG4Uqsm4LiDa6FHkEDUIhIkKwyvAqRJYuEW1BsBApICLViFgDIuz/dDcz
+mczv5jz+35d77sQxPjksQY8QkoU3/STqRbz+xJA/XhyGjPyrNboQLu755pBq
+PUOazpZyXOBV9iuCLsDpaYrCMhuGmI2djjgMbw8uDbGCxS3EOAa2bKkVSlYy
+xMfqt/AQuIj11e4n1livwFlK/TDQ6/twWNpVVEXHd6RPDnZYMSTa1nKYrld7
+0XliE2x4t0onhVPO/pDTY8mQzdku/A446aqbWghry8xVc3C7p/e79rDqaZH+
+e8ivb+FZNGrBEGXUpnZvOH2fm0sLPH8hPigCtkv4beN1uPvFmN9nMCfV+3wj
+LCs5F58DW68aMuiFp+62FVyCB+Tul2dhxXeVAzUwd65l+AO6n2hBdBMeXWZX
+vgfWPF7b2wRLkoYKyuGCEya3bsE7/vPx2hHYJKvmwzo4x9rzpQ3q8xtbJymn
+eWe/rg+EZaoc9zy4UL5QuRtmX6w2E8MaG4PiFNqP2xrbGJh/rHflAZhzY/bI
+Bjjfz14YBgvu96XQ+rd87DHoCGt81tdMoz9TBi55g9hf/At/vha+qP69XAL7
+REljxLDcqc7cAm6W57ED4bkAh2/OoV7pgu8OW7j+TVW5MazOZVXMr0OOpV4e
+aSsY4toZ6zYJ9/ePnxsxx/2gqPlqFO41Dgjmw4rDw6NPYTud/92bZrh/uKzv
+F+H0rkzRh7Dg628tHbC+X8OV9w8uZ4jOffyLzTTvxiIjKQv7eXEX0mDxC/uX
+j02Rb6Qo6Roc+0vTP3bBYvYynylYZLqzWR9WcLeNWqD+OBlf1meC60LPBg5s
+Kf1C1AvLDpl/EgyrvDvPv4TnD6oS4+HmhMYJT8y/df62Xiqce1Lekw9rqgOZ
+E/CUJrxAD3lUU3rHTsMzaypq0+H2js4oer+0p7l56WAP3Y26LNjPiWsrRD18
+/QNN9Pdjm00oemB26obRRPiZvPSoKepvDk78aStdn7gdXQ1rHG6mecCiyEfv
+uMAmofWPrWCB9SLLGpYEHLk2iXpNGpQPh7CeujPPW077Me7ZkQA3PxOy9sCu
+se1ercgTPZRxfw2sjl6Ieo164pZkvp1G/038P18wok4bbGiHmRWbUgn6IRVq
+7hfDfJfLviPLcF4vOt7IhsXziooGI9wvXSLfY7BrxM6K04aYdzWqMQPWueh9
+tMuAIRMDcYtnYJsyKyZIH+OzYoOv0PkV393b9C7q6ju1vZuObz/lveMd9PMB
+N3UO5gxnxxcuxfWSsuPrkTdr65sOPVixVfTeXjj3QbBTgR7ytryRy+D+a4Kd
+obDP9sjjw/R5pIk54wt337z8d2P0K2Bf5tgnsMbrn6Fsen6Cq6ePwcrhj6x9
+YSHLQdkDF/ZXPtgMk0zha2/s90Gh/lAYnR/oklENy/6qK4uEmc6fM/6CvLGP
+pp9vg5PasrWlMP/Kre4tdH7NuJaF+nQBczn0PBZnVbATYYms7bYzrD4RsaIE
+5txL9DClz4eQhEONsKvwb7/S/HLDQ+KrsKKN7V8MC1qPvBXBZlF7zHbAhg1v
+K41hw09lc/Q8svn5Rkexv/hkjPwh+qfm+ae0IK/GykRWCscNPl0YQX1aq0Ku
+CBZtVEePLUG+Rc7nQXBSKCu9h2D8nRzNGjpfnN8XtsgjysruCzawoGFD/et5
+HlnVcNDHElYI/L+9NMcjuSGDHXaw9ssfD8fqeEQ+8bbVna7Xd9Kf9zuPKKY7
+V4fBqtr6/VEzPCL6OXl3Orzq15mVtdM8YvbkeUE1rIz+TPrpCx6JmzVPHocl
+4ifz4VqM73JKdkR9zVXLz2x9ziMaS//nsbDGoD+j7BmPiOMdAs5TlzxeWgRn
+7yUDXbBkIdyPg/Hq1dcFOtqvn1gHnLBedkLNFhb9/dtaMjVwVkzmPH0+KoI8
+f2jF/u2apBJH+vzPrTZWIp/4wJUhakY1FV/9kkcMD1pcsoWzS8z/fRb1qJbP
+WCyHlVqj+chXPMLZ358wi/3IvXWOE/DmU3O7aB7lubVf+qIfTOf1V/mw2d4h
+ZwYW2CkjIqgvj3BmMF6ZZz1nQfPPKkJCYfGf92Xepf3Krx+MxH7Ni6FFubSf
+jrsmDZBH2ZU4vo2ev21qp/3ILzk9ced9en7MXV9Zon5BTnSy1g3rSUzzxiZ5
+RMq1L/oR1rrXpSSO84i2xaOyHubcOR7R+Aj9Yl3fV+VG+z2gXjqA71d3O9dQ
+L6krUKmxnlZe2AQzxvf0Wc3oZyB38YHb//8nFN/+3+c65r9ilhyv
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.907871335428632, 17.11903631971389}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt1wk81HkfB/B/jpUjR+4RjeOpRO1UK6LMn4gtaqhcZc0KW4ihrKdc07Ll
+KhN2i20zZTt0aFRscjRSrQhDJKuiErrWIDnj+fye5/F6ef1fb7/f/3v9/jP/
+Mg6M9AyWoSjqIX7JlRqbxY8pTf33R4empvxz02phzsFFpce1afELE2leAsz9
+IbTcVpum86PFBSyYdmqMm9WiqXEr893dJjQl+st67BXsocmayISZ25LS+7Ro
++o7QYs9amLNNtk9Rm6bWnPEulRrTFMu7U20T4tcIbuddgTmDWxLPYz1SITY8
+Gqb3Bbno6tD8p+tjZtbDPceKA0/AvvaKySYw/7Xb5EJdmm5K7UpShQXVuQ+K
+dGn+AbsP9xVg9aqyyGV6NNU6oLJ/HizJtJUW6tHi9+evyRjB4jnmI1/p0/ye
+leE+1jDz7egSD32aaj63uM8Llrr+eSwRTjMOfniAxMsYLMzUp8WcrJHhU+T+
+2/qZB7E+3214SxWp13M141t9mo7ZoTDSQerrrLo/qUfz25gFdu9I/uijaTmo
+Z2vN4okhWJidWqyHeiw/RqZ+JPdrVqQIUP9mjYK3XTAvoURVRpem1N4UNFaS
+eW3/sXC/Dk1PVLjmC4gHmJmDmFcsQzHYh+R7ZHj2AFxntatXm8Rv3jKih/le
+ujri08DEfmknr1WLFj/2souMg0XL264UwWERYgNzWDIVdEmI8/sQ39JXvBB2
+vnv3TziQ7SinCXOyUoQf4fTtU+tTjFDv83QPtjbN1xr8p0gB5nsmRVyEXY1y
+NpwxRL4577ab4rxGb3CpbTBfqTy2CM+XXdNQuDEs5bpeXYV+F2XWVSiS/ZOb
+8m7DsdadN5RhXukvStaYn5fPWK0ZzLRM33kWHtBw/ZcHLJhdLfmMeX736t28
+TJjjwu38Gufhs2DFUDOJ5xG/YyPOV4+tUK+D+kS7wx87wcZrLof5kXpza8MW
+wvkHf2zLJeu/Z0x2If78sZBEMUxtPD+QAGusZRU9hXnXteSUkO/85EheJ3F4
+Gvswzsc4Y1Mj2S+WPRc4gX67b8noH4Ulw4rXQtGvDLe6wp5YUznpJc6nMKrC
+twP1iTLmvQ7CvJ5mSvp8YcmbOscpLZpv8U9HYv0CzCdhp8Il+LI0Z/lymK9Z
+4RmD+TNshq6lG2A9z7YuAO6qXGXYx0C8MNaeUOx/4ahTsAHmje8/kot1l77F
+jOuYi3QmuakLfnqoqnsZLGqrDlyL/CuDT4VUoy+m0TLtEtQXc8tA7QdY5CZf
+tAr1/x7WPWoOcy94L66C200yOhRgyvjA2g04Lzq8/ysKFpxzzf8L83AemYpR
+h1llS/xsMb9eZmGLFcwLzfA9CV+kzYrDSD7KJvMZruKwhLtXcBUaTbFlcR6v
+HBy/HiF/z1+9WQl1bij1bbTBVXj8ls0Q7q9hxfNjYU6EN6sc+7rNjNOKYIn7
+pFwwvPJEdstDWFDxenYc9Q18NlzZBvdo2lw6CCePN1+8T+I11/wkxXm5VzUf
+OgXzbj45/z36mzfXLsIHpk5/jG7HfK78siV1ktTr2LtwK8y1uej0MyyZYQa+
+xLzP+nt6TKNvickfaocxX3bK/qAgmLv1Tosz1pMdDL7cRdyegqN9prBbW7y+
+ESzI2jdqjP2fXI73xWHufMbgOBvrfu9W7yXfoxTvpX08rqajdg7euApKNic9
+xlX7aObqbk2cp0PgXAfcpxMTxUyE+U27v1TD9UudTq+GhY+iz21Af0rdLuOK
+MMeMf1+CvEF3ElTH56Mei7g5XpgHx8/XbxbmTH20b4ajJGtlDbGftt8gtxp9
+SmsuyrmTeEaXmlMwf13GwqB0WGTdyv0Tdnv+Zl8zLLmuNFyP/ZXfWCzUQZ28
+ggB/8lxt+/2YnQ+pf4+MZTb2+y9t6MqCWeaMLFf45ImvC8j3DKUX4PgG+UPT
+KybqYaGast9ezPF8uEHUAxLvfdVMH+qfHuU0XCDxCvsYvuhPufcXywiYbys3
+U4/+v3vSZ8KAJeN5k+txXtly+aevknk1TMg2kHmW7npqAYs1lTxC4EcvTRfl
+oX/W2bdzDTB/xr074kkN7D8k+fIB+8pCNBO9YI5d44EXmjR/PPfCT9fVEf+q
+KlMKv4h3GdQirvfqZSLeiprjhgpqmJ+Coj6p67h8sbqCKp6HNt0ccn5XdC58
+s3Ie8nf88xLvP2rsbefdYyroxz/spATWN2jwZ8IikVqhH/o9c3JfT78y8l/+
+cP4V+fztfeL5Gu4xdw36HvMxr42RU8X+Hla7rgTe/m+HBi6xakj7Esz/mXPJ
+rlbiZJ+OELi4l/rojfw8Tk71YbgtXiXuDSzMqrhDnKNjURaBeoXqThVkf829
+In4/LHLXYpN4AlN2nhP64/eKopqQL4UaWxEPizun+/3hjCfX9h2Ghfce/vAM
+9VqPbej3J+sOEfkc2H92sHoW8WgO70YN+vW9/3wqDKbsh9SsyfvsFR1xjtS3
+7N1j8lyIWk5mlaB+Tmtw+kb43bHNa06if5FNZeMnnM/TmEi7XUqYr03o9G34
+9IRyp6EivC5mpgDe1shc0aaAePoRRufgH9XGfsv+CvU5G40/hGdPJMsHy+O8
+l9QlqCB+ZG2Mu5cc5vXuhuYeeFOUb2mkLPLN/Cr+mzyHvVFBt2SwftGNtwP1
+HmluUrCC1WW4zr1wSbYwp38Onqd1xqN70e+9aQ3zZuLKaPMheP9aWZMBWCC/
+/HUI5vXsgbyjJe7nKk501MGNT+SVcmCh4MwDDcxb3sl+6Xzkl1C5VevguqhE
+ldPE8lVbNsLmDj9HLkW9dKxGKfm8Cvu2KF+GRSfmtsvCi57VWmmhP5Z7vO1N
+xLcK1UnaAfc0HR/aBH8xu7vu3zA/f58H+X445VMmEwRTKjdvusCZfxQNMmBe
+tJ5ZOfpTOTj3/W+Iz3nmOG4Bt7DvFQ+gHk6cRSz5XLKOrimRh8WD2dEr4Roe
+9+0E+qXU0j+0Yt6nRkOimijsD/j7wVHyvRS8Sn/BLJvi1aUeCoFtRqnladNs
+ShLzUjmAnKdZ8qPpCTYlskq+FAsLVri6Zo1hvf7BSDF8sUzs5T3KprhJ11/N
+QT6/x/kvdo+w8b6Imw2DPQtaPjweYlP82pjf+uEI+4jnhVLEy3IzjED90i38
+w1WD2K99xHccpi/JL1OCOXNvDCeif0tzf39Tsp5iWTkJP9r5k9onWPxxOyMY
+82Mp+TQXI57whNWOW/Bk+arrp5CPa9MuI4VVRgMCrg6zKeneXQqK5N+jz/be
+qEN9nMShiTmwklh3uv0Tm2Ltuqzfhf0RDgHrq9BPz5lUzq+w7UirYPdn5Nt0
+Vt8afpJroX4f5qod9iTvldaQtnn3YOHTsYl1sIhlVrkDFoVmdovQz4J1g2VH
+EI8u8HQ1gWfc0+y/RT7151uP5mEeS5UZiy+gPtY3CuWGsMlNw4Sr6Ec63LOk
+FPNlVYv+6vyAeV8esg6G/6gICB/phz1Ux1bAqftt37e/ggucP5P3Bt/EwCuo
+i00xBxJNlsK8eY2PoltQT5ta+Xa458B3O0PFiP9w0OO05v//35Gx7n9XLfo/
+Yw2y2w==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.077403306263033, 4.30673387473934}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000002274`, 17.}, {13.500000000002274`, 16.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.552325660469876, 17.180083206945802}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwl1ws4lPkeB/C3miJsOwkhakS55DIJsYVXsbkU4xanJJWkVpnSZrZSUxGl
+llp3ZSeVW9g52Fw3kyJTsxqlci1Jsi41KnFQzvd/jufB83n+l/f7+83/fXl1
+doZ77Z5JUVQnvslvikl+6NHU/77UaCosaOflpTCXPhgQBzv+4qPDgWUt81sY
+C2lqSiB/LZbMb819zIU/m4ekPIBZi05wG+FGjyz9ectoStRQUS2vTlM1UW/Z
+/4JZXqXVZvDGtr0BOTCnZyR5Ldxq+8vaT8TqwiQyrs4pCbFdTlNBrGxdBTJe
+/X3CaThxi5KoCftLK7OuiWBhx5tOPlwzLWobhbt12DV6cEDP6DOWPk3RtwPt
+a0k9Bzbl0jD/eZbQFx7qbu3wgQWW+bHDqvCsG2e2wYlfzxtfgNM0KPZWmPLS
+qbaC4/gGw+4wM3dAPKJCU/2b46x+gGV1RVZ3Yf8ten2LYc4ji8lcOCmqZ8k0
+8nA3UEp5sOxFik0XLPspZF0dmZ/zWlANU+sWeH+Br8TNFF2BpY+9m9fhesGv
+pD2k3qA9cvY3YediOW0uqa8l2kAT+fNKGatCYNbpNW5X4bVLp2OIu5OD6g1R
+f3fVb4xDMEd6eWMVHJfuzToHC/rn73VBP49PPGy8RdY3fyxphnsnVoe1wfy2
+6/PcNfD5pvzzlYl6RCaL+irhbuH0DE9iL7OA+ZrIFS+flQpLee2RnvDa83eL
+ekj9b8848WCldOUOMwPUG9o+FA03Bq+uOA4LBlyrImG9lSPtDTBzIG+RF8y6
+lDimaIj1waaJanCoYd6ECywMPnuhEdcvEzuzTsLcS4t8wuDPvXVyBbD0xwDx
+HFgWzbwnhoPmKK6+inqCYte87oIp8bSKJayktTGiD5bdGHn4FP2Q5cYp9pL5
+ql8iTsDM0u/LX8CCeVtv2sAXshZ8rCP7c7aumQtbP16TmkvmNwyYyNBvkf7b
+h7Ekn+qJcOLP9w3f7Cb5n9IvFEi/31dvciTj74oW2sNl5yoOL4NZ9p/uxsPG
+E4LrpF7pswnf9zCrvmB4nPRLujtwF/LKn4hW+wCL7tOpfaQe/aQTxAI/kXYE
+6m09eGHBJJnvJ8uZhX5Z18/+UZnkix2pukzcl8CwJPWvNfuouQg56iJqdsL8
+v16tTIUZRtpBGSSfnNHbmVrIfb/3UDtZ/4nL3gJrOd3W0DHCessYrQw41LnV
+LAwWmbeXi2D5waHASlh40cX4b1gyf7HNnBXIF3qwsRYWMDg+HJgT6DiVDl+4
+arg7GaZujDgHwq3r7/k/JfOL2/SYMG3U9ZO8McZ/F7eUIl+ZZrrdKljWYbbW
+HW516HjjBYs8d+T0kvrMcgZDjMn+PvHHYd7hb3vCYfayvV6LYBX+kqEwmJ8z
+pNqAfjk+VzgbBAvTJveegis6KkvcYFrV0dCTnO9NRzax4USPNy7WpL83Fhxj
+woIqhxriIMHIpffISy8P8vUm+5m0TEtgbnBcfSwsZf5pWkzq5YszW4g9a/cm
+wawY9c2rkUckyL53itQbtSOqEJZqBU5HwonP3SVmqK9w+9njPLL/CdXtNbD0
+zRv9aJhpZDawEf0RuqkdzFxBPt+s0Q7ifqHTHVhqulwzWBvPm8tyykNk/ap6
+225YReP6A13SL+0Widti3N+Gqv/sgqXV64azYYZ1bkYBGb9bkd8Dqx8yLB8l
+9cvfVp67BM+3uPF360wwf7m9jypsMG1cmwALubq1crDK2aYnbbBg5+H611jf
+mNX+YrEp8s3ePHAT9hd/qA6ABQVdN/3gG71RNZdgyv4Hu0nks3blHa2BWWFt
+qcmwf3jR3E4y/49r31bA0Tnqkx9g7mDOwD1yXl5W7RiHhQdH6nbCjMj7zaMw
+5zPj2nfEdRpb/oH5ppKFYvQvqf8orwWWftxDpcN6JU/lK4kdFnvw4cTm/ex0
+sn6u20di/w3vnSLJuNn9mkxY3d6o3Jfsdyw7QAob/2ds2Irk8XgeqI3rpdWu
+sNQm9awIsufD0oUfshTgxPjImFFy3nddGqZIP4J3D/BQj1Lms5MzYHbZ9nOz
+0Q+DrnSH72CRzF0tBa4Zjb6mB8t+U9dYhv6qPzC5sIHk8XthVAQHGX8K+5ns
+/8UwXYWFenSPWRTB479dcHeFjbMSg4dh2tJL/DPcubiDZWGG59ChqoRkmH23
+bP1J4gzFW3kw19jyiASmY7aVFMMpn1beVGKjD1z241w4w9rq1krY4MCV6iSy
+Pr9Z3wemqkyqjsDUX2rKEXCanjjWA1YKVD13ER4vsXLWIfm0hV3ZMPu9f2fn
+EvJ3b31GCRy0UGIfAQu3iWNrYEHImLkivC+FFoqIo85rFaAfT4RrAmth6bCd
+qi88Uz9LoxLmVEqKmXC2x61rxSSPpEFEznvfYH6vAGbyMm0b4dD6X0YTYVFL
++nwxfPhRwvRJMr867Lte2I56ZRNO5ssmO9Wx39CvdNt2mA7VUAyBXed9mulN
+5kc1zxfDW6jGWhdYVpB7xA55nygnyBzhbs3okbtwawvt6ETq9/Rw10f9pqp+
+bDfigtzkcFi+IW9wM6xe+IdyOUzrzgoLhbnmOsqTcL9BZgjJJ2yql7PRoanz
+Z7y8M0n/wqcKDsD9B24dqib5XrkyM2CvdoPnL+G8ks47lXD3WM0+xkrcV/e+
+iSSwcEMzYwWcF/uy+AmstG7Hfk+Y+0il9BFcI0oKP0Lc2hhXAX+pcuhLgxuH
++RFkfwXFO43lsOCvSXYEGa88aPWE7B/977eOcJN/Hv8dzDN+wVCG+7JXmY/B
+BrTMogv1vNQ+rzLDHLl6lprnw1OpBuazYfXFGX/wyPlT0Ho+C5bSm2zcYTXD
+yrivK8n/AScWGsPjYTlzP5HrO7AtyXkP3XRsw1tYGFKkIA+XbfbyfQaPj6ld
+JJ55uy7wPswRF+qqwbKcBxmlMH+d63U2PMfEwO4GGV/vwvEj51dnbH8q7Kx+
+uy+OfD7pdea/wuoNvLx7sPuimfvPwf7ez7izSb9MnB4RM6dCJW6wxC2xLgHu
+n5GmkgQLBm3PZZL+2dtc7IAptasqRaQfp1edWbIU535nqAbJ5z/5575tsMyB
++X03nHi8cvIynPek1JJCP5zXxLvdgbW2xGTpwnzG+p4u+OHWtVYucNxui0cy
+uMCS1RwOi2Kyf/9C5jvrWacQV9jFf4BdK09bVcONO+1dO2H+LtvcLphK0tMh
++/cUD5+agmVpZ5tS4DvvvPvUVuF+vngxMhQ+XK233BjmNw8lWMINDrmSNXAj
+N/wOBfcdbbruBHOnnWvJeaO2Jd92gWlOpNMVuNf8DMcZDn0c33kQNnq6bcKB
+jOebSjzgkErTw6thXlTGt9Xw0cGuQkPYeZ7p4AqYGS8q14BbU2adNYZfNieI
+5GER7WT5A9w5w+PbGPILv/0p8YGP3C+52Q9blwoSjsE8RnZHB5z2daFNEWzh
+sCfvCak33Eihn5zXMp2hv2F6S1iXIeoxF435NJH5RVN2XLiQx/NrMSfvK+Ox
+FfC3x6cMu0n/2w2mpuGArN7aEZh5KLt/vS7y675uIvkqfCfunoJZhUf+1oPZ
+affocjjbf8ekIyw1WHCsB7YeOr03lPTDbfg/M/DetHGvP+NXWBhaKFaBFWzl
+BGVk/r78aE3y3tVzdHYH6bd+sd8CMk7e0yxwbv//3vZfCgDy3g==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.318520523989797, 6.302976613356011}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJwt1gk01WkfB/A/UrbJbSbLyHIlspMtpqG/JYQpW1PWsYWxhDaUqRtmDJP1
+teRa0qByUZYiMrqiV6GUUXJL7lCqmZabrqik9/vMeZ3Tuedznuc+z/f3/etf
+6iFxnrtFKYoaxh/ySS19xo8GTQnIpxxNLQ4JdzmvoylK6aaPgzxNObcrMIth
+fmxp4R7Yodf25AwctGFAMgUeuPr4k4UmTeV9cfJINKxdI7U7HXYXdptaw3tN
+bTWGYPqt+NQszmcfrr8lrYXzM7tqcuGh4MxQW/i2u9uIAvxM0BIQDefFhl7L
+W01TMXf7Bn+FqySsSylYkCvtVwrTXREPY7/CPTPFfhVk/R7PevJLmlI8atdV
+BDNU91n6weWhM0tpMLNZrOfpKnzfb4tmFMy6vPxjJtzZwylxgeNHaue3wAcZ
+ycu1Yf7MtlRVuMVY11kcNk764dNqeMEozvwJ5mFF1LjrwI4VZj8PwMbZv/3t
+A9u89+C0wwzGwp/VsGpu0YVzZP+qK3dFkSemutWiGY7XetuYQPI5h5hwYe6W
+AM+/4aVdFdIPyX7NB9+GY77Cu61py3C/e+fEH4/gR+cCuizJ/A+F7t+hj+Jf
+Wu0SYcHUN6/rYTevI+rdpA9Ott8czOHNv5dajzynb4dpot8c9151P5g6/kbJ
+CmbqV/fVk/VahtAQbmm1lfgA58W9m1wOl3s6Gdtr01TTTr7zVZznPDzHTYep
+A2yRMPi6bkFlF8ycv64uIHmjZLWfE/tojkTD7J6zrpI62H/YRnoC84WxwguV
+4SbXua0ucJfktJEGLPBIsO5EX4p2K16okPV+9l5TeG3jA/2VcJCMk0gXg6ZS
+Sl7z5kieVMPNPrDnTnPXMTj+eHKKLLx608/qF0m+9wnsXlma8mZ+a1QABwnn
++qphi1Nl2xNgLuP28yuww9+N9jtI3qh3PVL4vsPWA7k0bOwxVrYdlldU8zWH
+b3d6/8aBu6oGPYkpE+ExefL8R+3KbMm67JPSbPiEaHWHL8zyLwiSxHy+N7rz
+WSTfTR3tNDgl/Uh4C7lfZ5W/EL6+02z6FcyQVR39Hn1RSbH6ZpjX+Oi+tbUw
+Lz9m/igcr6x/nwdnXVt3Zpj0aR7zhxBOn3CMZerCK+Q/kP6p6u7YOJi/UsVg
+GOZoTU51kHVDj4Q8+JbIfvoTLJDZvX0jvJj+0WujHu67yK/oRx7e1YSgcJix
+vtjdEW763c0sE84LXLLqwHxKvALLk7AgvKRHC/5ebXvSWZjPeFpQhH76uCJV
+tXBQ89qtMqQ/C8W5Erhqzm3jWvQ9oje25RjMkuxQ9VpJU+c+p46EwtxHz4Mv
+fEFTMjNPje1gaq6nzQ1u4NXpqZH9Z4aVmHBM8ftKkp9W4FUZwcKDMd58mHV9
+W2gy7CLOnbwBV2VsKl+AJeQcj3TB3Ie1f9XiPs/pwg+kD3pmS1oi8kiM8Yt6
+YYZ1qugG5E3SUF0Yh4OCFHc1wC9Wt64n97mLqiutx7xdoesy9Uk/l9hn2PAh
+S+4M6YsbXNZJoa+c9KdHOcQdte1eMP3GTG2O9Lu/UJgD36v/0cJBH30Vlb49
+R/avubJUCBuHROQ2w4/blpU/hpkfveSL4bzcm7SxAWzB9AqA2QXTHgfg21Wz
+qeT3a1np5oxmWFAmblWJPPJ3HktMw5Ri3AYmed/pm/wiYYjnuMNGjjyfVzdS
+HdWJU56YiME2Wq4mBjCr+I3/FPrRtaJH9Yl3RvoNor9LPxzyJPvpEN6KWzLw
+sX9+kIEpf+O+OWm8P8f5WgKS7/JpFTdYtLjKYJhYIOV9XwrnD/1k0QBzPeSW
+KmF9v3fKWcQtu4dPwQWp/2mOhoPKPqdOwv9N3lHsRSzz/T9eOG9mR7SKA8y3
+UV6/ALtnPtDbTNa96YWryLN4Ilfdkcyrc82yDnm7O970+5D999oiKjGPw6YF
+p0Mw65iDUxGed8ussvYZ2D1S0Y7G/AcnfD0n4fhPOufr4JbRGfV/55V/tU4E
+/e0JfpcYRfrayOHawnRkzr1LZH6LCm4EHPVsOUvSCOuZaa3xsO/mi6U+ML/t
+cIkfeZ+5LHc/DQsGeme0yb8vgZs/vIDzus7l83CfWwujUs4Y/kZ1Zh95fzGm
+8o1g/tiewVnkPTiqcMoeprz6v/4L86iFdAd6wCzZCaUrmFc6cbBxF7FeIMVG
+H4+0j1/1IS6w0DiKvupFVzJ3wFzXG76H0e+TbTX5rsR6Bb5sSZpK7n/AtCH3
+hZipzkjQVNE7PwlDsn7SPjocvr7dv0aZrJ8UjWPC27ISgqVhZqkgRR4u1vx6
+xzzmqfIPeuME5yxXOTcBs0aPWzXDni/PmA4Zkb8HfZQb7nNsXPO4D6Z+3c+S
+RR4X6W3WN+AgpsJrARxo36DDg5l8tsRj5G+yqxWS81lLiXUPMN9U/UGNVeR+
+99H9A5hfJWO3nD5c5XHkp2r0o922RsaNuCb8uS/6O/+j8rJ40p9yesYMPK5q
+119M/NpfWw19R6UxFrthgXVTuCG87Ok1i6dwULJFI1m/4uAtvXID9ocMuJDv
+XwsNVDMhjqSnveEMlx2bPOEqc6UN+bh/3mXCJxZm8Uv/qEa+F13tF1LJ/kVq
+bQnyV89n38qHuc/SjyViPvsm9WQ2sdjwaw/MP3SicKwcZmZVDpqiL4sajn8p
+Oa++XU4Xfb63UbmWR/b/kjxEr8Dv229OK9PJ+YlW3qnLkWPk1I/74SBH/tt3
+4jRVVsExCIXptC0xNfBL58U+D3I+c9/5bHjpr7ByW3Kee+TlFrg2bYphBvP1
+TdgMnOd4MSJQl8wn7pNxCuZE2eZpEvffsAzA/VmN0/u0yPejfneyQr68tt4c
+A3Jf2MVWHeQv6rmisInk13U8rI75MtdECreR7/NZm7/C/K5zrp2RJP/N7Jdv
+4Nd/Wl3IIPfvnwltRl/1qRv+4ZDzv+qRdkKfA5xikzvEoZ8COXDCouTG92Qe
+SaHXXbJuaJCrboL5zUfr+mDjrp9uOsPcT9dXJcH8gLCCWJjfMGEyi/MPlRdW
+5JD1l3G/WsL3DvInOGS9874yef80drQf6YGZ4x0abshfa3h29g5MSc0nGWE+
+p1s+Hx7AVY2XpaQw/7H2c2cmybr5O/Pn6GuifNJ/AmaxA1R46DfAoKr/LnGR
+j9jzZTT10DTz/g2S10XkPBNWtjVv74TpkrHpTDGaGg4+3VpHzhMuzerCKkWN
+5idI3lH/6BVwyqBmfQbJl1XxQg2mX00dSCZ5RDzU9sLVKla8PeQ8vfSRBZjX
+v/Aqktg+2LoB990Zr8v911+yg1PJ819o9SD7qQFuZhzy99xZTDlELPCcCMfz
+tn7pI5FNbLhezA/zhuiKsWtJX/mWAzbkfZJOHe8leXqTboujr+hYP+ETkkc7
+Wq0WrolsaJI2Jf9/H2wjzz9sae9+U5ipErHkApu2pY77mZL3QdrXTvBWj4sJ
+acSbLimsgK9/Jzp+FmZl3aGycd7hWvn+AfJ9Z5XLE7j/o2iO2jOY+rj3JgX/
++2P2/08J+n/oho2Z
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.45429484366825, 2.671979374673003}, \
+{0, 1}], LineBox[CompressedData["
+1:eJxFlHtMU2cYxg8QkFERSFG59dDTc06lMCVOqsAQXic3I8xKQoqT65RRhImM
+gVoYFxGcCgPSIPwxucwLpKNctYMRZIyrDLlGbmFQjJAKbOpkOrPR7Gs0H01O
+vvzypt/lfZ/noT5PCok1JAjiJPr067sfA2quft0BRNXpgbbfaPhzTvt34UXE
+5RbPm27R8LS8t8HIeCcQlm2FJtdoSKwM4rrfRCw5eoibTUPniHVMqJcNEDYJ
+vZH5NJjFN3k7zSGuTZtQfE/D1wakOiXNFojom3fyumh4VPPVT37GdkD8sqzx
+eUVDdt2LHwJy9ZyyjXJloEWTWmayhpjYfVCXzEBkRnKTq5c9EIFGz4JbGVgi
+5WYdyYhb055IdQw0W0/aWBUgNj2vigMW4jtzNnTXEfO/VOnkLNTz+o93piAe
+2H7e6EdUHy00H/dHnF3av/qIhZkFV8eRDxBrBrTziyxIDn9xwOlXdH65rGl4
+iYWejiLuQiri1rbhvBkWivOaXdxcEJ/LuKHsYEErE1mGaNH7il94qhUsmJ+6
+/vxtM+LR9SlNBAvO1oMqcTFiS1GckSMLJ/NzldzLiC/c3Zs8ywBb8c9YUom+
+P/YPBxUMNMhmNENtiBv7nw19ykDbZLjWZwPxdNg8z4KBb6+dFSV9pj+f4DpM
+05DUbBR2exgx/+PUxjoaaoUNkpeh+v7IzHYV0eATf1wSu4o42nvCIoeGyZbv
+fj921QEIUFeLcmkYr8ieKRTx0P2lRFgpDSfKDG/N9SLmt7TcVtNA+/ot7Qkj
+kT6UXUFLNFzYUq3QzSI2XQmeJhmIX9/aXnbEEe3/oalXNAOtBU77wqoQa7zj
+DO8yMJhOjmrmEJvaXZKvMaDsakgX6xBrz2xdcWUhf3rtUKwhH3HeWGciC2t+
+UYmZf6E6382wp5KF8lR5efagfj9Z/+E+Fv7YRrLCEsTTO4bE8yyozGa9Go4i
+HlCOhC6zULBdr+fN+hm+sFtyj8T/d3Z4MjtzlsT7Z93Pi8sSk/h8l6UqRY45
+ie/HkQszxP/y8P0jPpFcHjQg8fuCGxZdHWkSvz+6YmqoJmqzP/X7X/nK1Jv9
+q6SjEg1YR9zf9eWf7cZqHHH/Fx5m1lvx+Hg+dJ8P1yOBj+dX3e5uFdbOx/Nd
+i56SBptReP7ul2qlW0IprI8hJ92EqpzC+gkcDUwYGKewvlyVY5xoAwHWn1uM
+osiWFmB9Xuwz2hl4QID1GxnywPn1QQHWdxrHXrSkr7/Xv/FpT9NcoQD7wyZm
+9c0kR4D90zMuXIldobC/lPvd0yx7Key/cE3Q09UKCvuzkpWds0mnsH+luz3e
+3ginsL/v5ztI+f4U9v+U2CeH8KRwPuzjlKa88aBwftiadMupAArnS7g0YJc2
+hsL58xHrd++/qxTOp6DOK3vCH1A4v+50+TMRGxTOt3Hrl0yfrwDnX1ZwjWa1
+RIDzsU6VeuzxogDn5+PeE69P7aVxvtod4TllfkPj/LWu4Rh7dCN+n8+NnHfr
+//aCKUQ=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {9.0548, 7.75}, {1, 0}], 
+        LineBox[{{6.4999999999976925`, 16.}, {13.49999999999251, 16.}}], 
+        PolygonBox[{{10.6, 16.}, {9.4, 15.6}, {9.4, 16.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 16.9452}, {0, -1}], 
+        LineBox[{{6.499999999996362, 16.000000000005457`}, {10., 
+         10.000000000003638`}}], 
+        PolygonBox[{{7.947677384685548, 13.51826734053906}, {
+         8.206811054955079, 12.280184249251306`}, {8.897834175673825, 
+         12.683281069670574`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.515942703607428, 12.823799910437668}, \
+{1, 1}], LineBox[{{13.500000000007276`, 16.000000000005457`}, {
+         10.000000000003638`, 10.000000000001819`}}], 
+        PolygonBox[{{11.447677384685548`, 12.48173265946094}, {
+         11.706811054955079`, 13.719815750748694`}, {12.397834175673825`, 
+         13.316718930329426`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.484057296392571, 12.823799910437668}, \
+{-1, 1}], 
+        {PointSize[0.04], PointBox[{6.5, 16.}], PointBox[{13.5, 16.}], 
+         PointBox[{10., 10.}], PointBox[{10., 5.5}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T1", " ", "P2", " ", "N2"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdgeg/igfhfihi.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdgeg/igfhfihi.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {22, 44}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwl1ns8lNkfB/BHQ27TppIIRcktNGFF0UxRaQmlorLMMlsTilAuYUdXxbYq
+onaTXDKVJLeQy4gy5DJJ0ZaioiG5hBq6+H3O/vzzvN7Oec75fr/nzDmPtnfA
+lt+nURS1WIqiyJMam8LfYhalSjCbRVkap+sWwy6O0/OVYWFBoux+WDxVuJJF
+HH2i2wDmGXquOQJLL/1R/2ER/r/f8thz2HG0KrkI7ji1u8d2DouSa6loiYVF
+PDGvEn533C1pN8x/eK5hnTL6G5xJdYYFXm35T2EdnywjOzg2tFm0dy6LalT+
+Q55Yv0ou4TtMZTeecoIZl8Ve8Sosirt66rw3aZ8/9WbWPBY1dj/3ZjQs52ar
+cRreuktK6iqxwu8pI3BhVPDROhKfbtzZdarIQ2DzZQgOLKPTj8FjRyLoqshP
+qX2y/yYsjFIPtYFZ+tlfy2HuWPF0T5ivkvflLtz2/eeKUFjkGxWVCnNkw9/G
+wl3rDk8FwZFvNdQTSP2+Cm5YwlQ43z+evL/IcP0o4knzSNgcBadsslDMhiPz
++aXesH2wXYQ7nPm1UZHMz1AfWkqH3b8Wa8+AO3b6X32I/HmFy5htiN9S5vVc
+Ug/q/Lh0IlzSG7mFDds7vvYi9VLKdzm5HnaZ7AuRIfnnmRiugeMHqbh72ohP
+zaxzMyzt8ftoEFzyb+uv4eR95xsjxrBlsUnUXbj2tU3moBaLSjgu0VYk8bwL
+GiyG+QrtrkEk/rFBTizMYLQ698M5lRtsOKR/w2hmAPK3Kwtf40D614y6/YAZ
+TmV1NrBqfBT9nBrW65fJ3FWkf463qe587I9ea7YdXFLUY14Mi12K2rbDkrVm
+N2zUWZSWg1/aAThthmZMCczaJKHOk3Z3m6WLNbAvWLVDJbDIvbk6ArZPlF7R
+DbuzShZXwKwvGbHyyI8/larYB5eYLrmwDA5MVdT8AQtundLfDMsZGIi/wYmT
+tiv8YSX+4NteuLzF/ns0PHzxk2cl3LiNoxhL6id1fM8JmKOo4nYC5m2VzVlL
+HLFjXTjM6qrf+gXxCvQG8tik/68THXy4o6nlgzUZL2mnaBfsbjNx7ycyn2VB
+jTKcssTJtR3xd4kbv7ejHsILdrYpJP/wCc/rsKpdpr8raY/uMY+HG9NnDSjA
+4okdqkdh+zR3uSMLkZ+fS+tfsKRgPX14AdoFgRsLYMZ8TjAH1nIrDfsIu2/+
+dvqtJuI3zg/4r95jKcsPwPxtBh5XYZ55b64SLHdtzmUVUu/c/LO1eKY0N3Ve
+xJPr6Zd0Bk++JN1SD/0k/boJAXBXvqlXGcz+c3LvHjhQYU6dE+alTn/SPAh3
+vH/d8RqOVcisvQDzqloW7kXc/Lj+7HqyjiFdob2wsI/mpYBxRDQvDUOy7za+
+H9kKC7hPbrnBgabcaVlwTox3UwRsaXl4Ypzkc9qj9hwc1v7QwhbziFrynK+Q
+fXLpPCsWLhnKSE+DWT2GnwRw4v5yTjLZt4a11/pghuHXG8fIPjOx85qC5Z5l
+DeyFtVI2dBM3xswbsyfvX1rRTPpvdTRvXAxz34bfKYc7wnjbJxA/67O+TDgs
+SBbfvQkzZHSMteDhwSgHH2KX69xCxJuW7uirQ/L/d+Y9S1LHbJ7CKPpZWp9t
+zCN1Vtx+oRVOiNldq0XqU5wvfACznQSaf2KdJJMdCc2kvcMtfBLryst1//GR
+xP0gfN8+so/UZlqQ8YU9h7f343eopcwPDITT7p42OAhzxbenPYaHt2c4zIKp
+ZSPF2shHn+ezv5qco5kxNt6wXKFGyEn4mMUlYz4s+MXRgwNLc+7uGYEpHVsr
+d1j0cu2NVeR3YMdd5g2n1Y7zj8GML5rRPLjW6LpOA/ndKX48mwebD1+epoBz
+SxxhtXCInMtlv3ivhd1d/ewsEU+ib3PeAXIPeBvkn4TDQm1KL8AuXOmODlj1
+jvadPJh7u2aOHvItl73JqoLDHnC7Sf5aRdYn7sP2IxJ58juKVzGdew/WatRr
+aYONZMRD1+GugQWzB2EO1z4qgZy7qx4Hf4KHzewiAsk9yInb1wXz1VvfO8CU
+bQ37Lqy0zeizDrnXzh+5HAqzN+gMfifnTpyh1yKYGjmk9pycOzfuVJUiXobJ
+vJslpD3n9VUWLH3Wh58KJzzkni8j9ZY1b4sn9dqnyV8Ku8Sl/EPql1d10zkF
+567/6un0k3DKZLaeDDwsiq9MhMO0Sh4dwjn+0vrYi1tk/IjWrBHcq8PHx+a0
+knuAFi0IhwXzhVkUuTf1h/6ZDfOKsn0sSX47C36qwj09ttykOpTcm6GcBTGw
++O74m3JS//HzYzvgHH77HRlyjxYKmzbCicnJw86w/qSixBnmxKm6XoQpyYJ/
+fWFu99ILr8m92DtDOgVuk6Ula+ng/fQQ+zaYobN5707YPmh/pzriKfRb4RcH
+S6xfHPWFO/qNt+fDlNC74B4sLLdybIYFN/fVKyBfO3lx1ys4Qc3YyhUO/Jin
++Y70F1WVJZB7TyophrRrjcWFVpF7lTfx9b/3L00zfQknbpe8KYZVucv3vIPN
+7WJ7kmHLzofcZ7CYS58MJtaI3H8HFmZMbdykQ/bLstSDMH/NGXVdks88LwUd
+WNItU0bB/Ab57ErEq5o+05Pkn9Id9rM9nNN5Q6UWdjcp1KtF/h067QV5pH3B
+40gLmJ7VUHCNfIepxSVn4LtKdSjULJvUz7VVSQlWukt7m0++4+7rxfLId5tP
++o96Uu/OguCJWdjPJ/UcB8h3xiO5T9Ew4xpbUw3xpBwPuKIMd/UtcnOGSxoi
+AiuUMP5f9yP//K/enPOHYUflqKrHpH5xB3a4wOLlFrPmL4GZjgbWcK3JAysO
+zHjzPGI1nHNp/OMtWBxb9XIbHNnt+H4M5u53o/HIeA6pXy10kY99VFcpLFIO
+NwuCXVgra6bIeA6xrzJhbp9s9CbE5xgxK6sJjrXXPJcK68/uTPoAq36Q9hyE
+dYoky37AosUXN1kif//gwT0yeshv1UH5MDhHdRVfCtY3Gs64Dte2/mgcRf9A
+w5bqelinVVm9E84rVKh4CsfOGzStgsM2rxY8gjOD7k79DbN/yn5+A36nFp5x
+EBZbDEgHw/GJ39lOMGvUcekSMn8N55g+6f+OMb8G8QVmbHOYTmwTFegMcwMe
+NPWhHvy9AUebkG+eyE7cBofNVbFeAxtpFurXw0pdf3f+OpOsm25lHSwwfORh
+8RP2g8tl/8fEJ4Ks5s7AOI+Vj/fCLtXeB2l08v3KfEPm0+oyDJZXxD61l+lf
+Dis9MbliogBH1Z7fDXf5Fi4Kl8f5UCoTnAGn9UpnfpRjUd8amA97yfq8slL5
+Cx6wUzxlgvoxiq9f8oQtNymeCoPZPYyDu2Cj7fmR92HB4cdzjsL+uZ/nK+hj
+/L93GDyG6dpSZpvgPJVvz5lkvlVd908RG9IldbDH3G30StJfa7fTb4jPcfmb
+a2KY3cQbn4b4xZd/OyNngLweFd3OgD0844w1YVEDbeNK5OvvOOWjCyvl+H6u
+gN/JJp7UIf2TZe7ooj70yE62KnGJ2al9cO3ET4tpcFpF0GA83CaO9+rFfFQI
+rY83g3yX547XwEqTNNsNpP8396nLsMvK7VdeY3z+hOW9QyT+y79HOcCUwZGD
+LrBWXabBGcRn57sw0JiMd87n7xzkUzLd6dFMkk+655pbyDdQLylgAvXSSteo
+Sib1Wvpj4gPxo4bLIbI4n6fvuimGh6cejTpOx/mzyn7XMCzyPzPdUAb70+5A
+AI2Mtz60X1maRYWYBbVrw4E8oY4KjUUps2JmOMACbRfXn6ehf+xz9WiYsfJg
+Z5gUzjdh7rVSeDjq6Z0eCuspXDv5lcS/R2fOHzDd7bSGLerTtcfz0HpYVH2j
+Ox52Gc8NXgWLjQ9Payf1+5bVsAv+J0TLfKEh3h9MCM+ArYubmT5wYJP0ezrm
+EwSVqV2FlWT61c/CGocdPj+D2UdvK+ojPukVxR60pZhvbsl7IcwqXWmxBFaq
+SYvwRT4db/2er4JZ3bdO0pDvyy/yszbAadJHDONgQanBAmL2SqbZBJw4drbI
+mvT/w/3wetRrIMdXog+7eGct2weXl53iziDzqZbS98Ia3U87PpB4r9DjVsCW
+o7/tfAiLXphOtGM8dhJN7wrsck72qAMsZNqeDoPz+GeWJCG+ErfE+q1wgpxU
+Qini5xc/oluQfFU3jFYi34F44YYFcFrVs+ocisS5QncmTJmqPVCZYlLDcqxJ
+edL+yaag7huTKjn0NJe08y6xn0VPMqnIFYxKLdK+5+whJwmTYlW+MLIh7TTz
+Vxs+Myn9BydOcWBBvfBaxBiTamy6OJJExn9tNW/sE5MKk+PMF8GsK1aXKkeY
+FN3vD89ZyJ/yXb+le5hJ2dG6m91gQXhhixcsd+Dd+qukfhYVH6zg2AtHjnwg
+/ZlzGvzgnLlNP5sbYb3Z/dQgbK9zTyecOONJTxHGH5bZvLIEplydvxVhfrqj
+aeoQsc/FmFejGD+kqk7TGM6SUVowzqQY0hN/roG7Tmxy9UY+8dVHzXbCacMx
+D1O+MKnEos379xBXDwffRv6cJ2m+e2FWu9XtpAkmZe3KqGfD7AT6fWvUS7ij
+KsWJjOd59lgKvNVO1cGctL/d9uIKXC5RuzYH5gVlzt0Ei2bvvDOI+LpqD+mn
+YjwxbcHVOjit/GpNIuazFx2rSoNZQ54sC8Tj8qZpayRpNxbvjUP8rPz8vzxI
+e/1vi9KQX8oW4X5b4lvV74+gHgyvJzdNYZ7RzsOxgxg/7931paS9uUJ6oI9J
+aQRIdi8j7pX229bDpFTLcw6shgVrpA70dTEpqjnirTt5f50c68JzxB+R6xX9
+n0NKzVuxPyi9ebmkvt+3BDXUMal/tMtEvcQhFhud7jGpwDNvxnVJvWOftozz
+Mf80iwx/Yq3ohuHT2G8bJPeKiMkfr+L/TxPW/wCX74+H
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {6.573901114580226, 6.782664290660753}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwt13s81Gn7B/B7FDmVUWJINcphpAOySgczu6UorSmJpKcpKomlZFHsM0mF
+ECHVpiZhC63DI6kcxqEQamxOUQyhlKSoCPl97n395h+v9+u6vvd9Xdd9D746
++7y37Zch+DAI+ffn4CQ+mjzSTX8u4xHmkdAJNS0eWaPC9rkL8/1SnWfCtjGJ
+HodgCev50m/IF+8xtZwHD271SCyH+1VyjZuW8ojw1xP5AbCnc8SBOOr2rDQW
+HFNOah1hnuNztzQW9hu4SfTgQZ3+LD04fsFXq/ElPCLqXN15RYNH2OumHm2H
+2TfqixRh8ZWA3hqYP5K07rg6j3CKwyIrqGUMjw3M5pGCob7GSliotHC+J5xX
+UFrWAEs2KWZ9U+ORqUXb+vtgEqnwPR5mTh+Ok8X+gnA5zY3wpX25d2k9vIvx
+G5iwZ0jDXGuYPWlU+WkW6mt0EXrQeu/cbHsP8/hRsRGwyDK4eAI+puY+L40+
+78DO1MPzAf4Gug9p/yfufBHAPsv+11MJM7uuz82E+W+X/HgC8yuVJ2RQr3ZQ
+o3c5HOMw9FEA2y5P/DsbFrtUyJXCi1e9Sb0AS/1VV89D/2avr94/BGe7maT6
+0nm4PSk1p/W+vZpdCEsWFzLG0K+xVqPtF9gp9b9aBbC0qoqlhXleahOOesNM
+m74zHNjTc6RcF/bR8xqZB4dpyIpbFqM/m6Sn43g+c8/+NdEwu9j3SBlc4NXg
+v5HGl1ltPgIXClTD5WCScfO+EpxiHmtdZ4S4tvZwPOrnZ1WvSYKlSS/7mLC0
+9U24P8xMztUIxTwq9ol6XGB+u47TEObpU/vn+S0wLyMuyxVOSXj2qw318ir1
+1pk8sn6f1NcOjjF4ZLULTonylf6Hxh0DTr5XxXkV6cz6HSbHDX6LhtdcjlgR
+R/dbEvd2A3z10SuLPLpf2OE36nCLm/yrJlgyuuvAJBPnaXPlnxHYuCRqF0F8
+sMb1uQb6EzQzC1hwZNqjeyawWNnAl64XGpkVvR4WFo9cPwNXODjl/krnI1cb
+2QhLXv3zgtrY+8i7pai31qhC/9/8up+/R8E+ubeWLqXxrDLxB1hUbDWpDEtl
+G1fZoP/hixrzOlEP28887k9Y27QsJIP2q6i1QwpnXi6J9KJx5xzRLMxTIrk/
+zIEH16RvMoXJ9sUPOhbhvtT3TFsFGyuozoiHBX+Qk4awmU7Qamsaz03ZS+j9
+jWOf/2GIebmouJRg/e2ZZZb3YZ/DIh13WPnLta3HYfLlMX8C9YbdLo1YBws5
+ijtDYE8L8x3qMF/JeccY+h8Zar4/xEE/Y8t6PGH5xQc2vYT59+w/tWHevBC+
+ngQW5m07uQXOPhX88SnND7/LiFLBfT3HetEM81YeYiXO4BHd6ZZpfbDYY+4f
+pdOx3kHDQhnsJ2BuVp0FK69zNNWB2ZstZsQqox/nnt5fYJHm/GZL2PizQ8J+
+Wu9seclc+KVsxcAZmKczYbcErqo7nZtC4xtVbnnAbq3mjwupC0e59fCIu6Ft
+HV3vmWGlM/YbzrC710D3X7ogYBLm11S11cPSXo/D+ai3Sn/vWDldv/TyVz/0
+k3dBWJcOG0cVK2ih3/EekxC6v4gbvd8XFnkvFDvS/EPK/DJY2eNu0ny6nv6P
+QBnMj20rSOig81sgMjGGid+A32VYUs+KsIa7HUzs7ODsqLzjNnBB7eSuKbAo
+N2nYBDY74/7ungHyRZwBBl3vhPo6b5h0rHJ9QPcXDMQYwT6q1Zt2w27n+6oH
+9JFnXTClDfWvLNe78gCW1o7tfIX+pgYrbIuBBS/+WvAE/Rd+Xt3iA5Mk5tN0
+zEscLCdyofHUp1vClXCem86k2MPCNZfSvRWRd7bT3YHmL9G/fFABfd0JnhDA
+4ll/zjwuj/lOmVTwo/vdKh7+exqes01rO099UfFvZVgyftQ/i+bryI8myuH7
+aWydVU/X8229bQ/HnDC1GP7XKjE8OFOvqVIN/QlGR7x2w0IdxkITWHjunexf
+cMFtZ+5GWBz/dA0L67d8Xb7dgfpoMj8dbgiMHdgJS8Pi2Q6oj5N3g2ynccfy
+Uyqo/2rNeP8vdJ6BJOMZ/PaNWZQ+3e9EaPg59KvGO7J8EvXw9przLJTo7zeZ
+v+qoT00/+0yJ/n2drR1H553MYW7A/AZlWvW30n4f+EsTYFZbRroCjbtbXbkP
+r89596hYD+tzT+XfgbP/u/vhUVhcfyzdB27pUGk1gEma/ogMPFyb4SbVxTn/
+xDA8iP0KFBwDr8G8gZzcG6jPU0F9zBUW95yrLED9DWppwaY0f+1utTz0m8dI
+M1OCBR5Bv13FPKrOlvYOLMTzQwF+JzC/FFv3nlewWGvP4l2yeH7+IYUW6nPN
+0VZT0X9EQt5LWKR0SX/9FHhiV8s7WOp9MXWPDH7vdKsyGLSesdXh1xn4vpUe
+2z+X7jf5+xMFODKxcHQtjbMmk5IJ+ivxPS2g8WjfjZ7wyMSihyG0/s2mjIMw
+J195azLN//Z2NAa+yrbRLIKlut8P9sKS7zs062H2wJucvVjfrI55/SWNa8xO
+H4PdM+u2tVNX7WnLQH2DsXlWjdTtbq/dUX9hRM6YmO7/0+0mDvrbHpbscwMW
+GgWld8LrT4ey/GHiZSgKxzx0h6+1/kLzExh3NDCvlnLpNDmaX97VegqWj260
+LaPzem+RVAk7hVZdD6TzKhhUb4fJhedGS2H2NZdfK+CRGQ8suhYgzpy6JZDe
+f9UzGpdgqVWv4Q/sF1naP7kVZqc0TzjA7FihzEyYZ+tddhr1ZednfXihg3yn
+N9rx6KdC5/jqDFiUZqARTs9D+w7jLEyOfKr2wjwC5mzp9aL5teKxzZhffMJt
+lgAW5nf57PrBJTH33Ox2w2IVRq3FOJe49J2qcaNeWXvX6juXVBi5C/yotzYO
+nx/hkuxhJ2EUXX/UKl//G5dYO87ZQvcX9l78qvaVSwo0uzNqadzdXnnfFy7h
+iZ7t+kidVLNTFXYv+ThdFf2ITUY4C+CWwoHgZTCJYP7vPJyZwYuwhoXhIfZb
+sV7hws5NzjS/enG3M/arkqbrudK4wlRuEurp9/Lp2Evnk1/UIYd6C5Ln33ag
+67mUXwsd45KV/7hyLGn+cEqwzASXeCZ4nJhD80NCgzzRv+6L5BUDqI+3KME7
+axLef8r1HixY/LrHBfOqmvLn4QA630R5k2LYp/g/s5bTeaTXCL/ArNlO+/rY
+iB95E/QDHm49EZ0EC3TSHjbBooaY7q2wdHZqWzBMxm9kybPp/wPVKu+x39vt
+sj+HzUd9HQM1IainxaPBUxnm5eq21+E8quR+sb8xD/Fppodb0Z+AsSHXhrpj
+xfL76D8s4Zv/NFj8raU9CPMSqny+0zYX+xC5lRbDXCL6/vNvj2HhuqIdMp+5
+RPqe30VNerQSmj9iPgvbNtN8YfblOJV+zK85WoNB15c52l77lkt8WqJGzKjd
+jbUX9XKJ0+oMJV/qAiXr1d2oL7Cf3IPJYMZL5ddcwoq6YDNO44nE7mYX1rtc
+Ym1J++vOaf8OrxzJCQ2AyXOD4mn0+dNnm9JoPDQoJr+HSyTScxcf0fjVOSs/
+vOES5nqL8nrqZ74fzr3D/TOz1amm+WvnX/jtA/qdFW+fTueVZay5YpBLOPEh
+fceoOX7bcj5xCbug3dWQ2vXRnJlDqOel+7JqWu/uoIwNmM9g2q2EHTBvckzF
+EveP430mpYHOQyOhuw82lsmbvpHayvy9Jb3f6rzJHG3M+7Z/6E+wddfIV02Y
+7CCMJ8gP6A28cGoO8j06qsaxPutZ9+4hvJeJd5g5/oP9nYrtb3pp0e/fdkV7
+nAepUVr7lb6nuXs/iUD9YRY7PWM06XlJ1FRpf8Z1+ZYwKTnGf4jzIAH8Ghka
+d9c6uArzWznFyOcV3svIwudhnh34flmIjz+lbj/ef6cJ/Ss41TdQR++dqlyH
++7On8/cBauYKzkAhl1zqWyai731k8EiIOAb91dfX21EHhO7J/7sE7zWWsrQe
+Ytt6QLeohHDUJc8bqKV+tZ5lJUQQWJKqqUX7d3hlVl5C+CLO653UaTEZMqUl
+RPiKqRdLbZ0frl1QQphee90eUg9KbuYll5DBzV26jdS3Xms9SuYSeYXDV9qo
+Mw81M0swv3lFj2upzVs+ratBfWHV0X9RS8wnk59jXpV/PD5MLXe+6/cXmI/2
+DVMt6inm85614/u08LIwj9ZrFLEop5NLRrLOm62l8zscnO2P+2q9KSH6HuYh
+rJ8rK8I82Y5DBw3ofIpsUmfjPlrHshRj8Z4ltL96sgZx3mgTGcV7E/ncFV6I
+592vtPW5Uj9c8vo91r+07cC6Jrw3ET3fyGrsL1Llr9lOPWmmcqwF98NYcLaT
+/p/fYJekWI/zdXi6/CR1k+WMS6V4niRG/kT9/x8pfd+fxfs/aePoPA==
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {0.4875589769853401, 8.878318388907438}, \
+{1, -1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000002274`, 17.}, {13.500000000002274`, 16.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.552325660469876, 17.180083206945802}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt1ws0lOkfB/A3USpqcp0Q41YaYhKbrNa4i1wrUZRKKalmc881bOWSJImi
+HZJLWaTkkrYhogs7CSG1UymWpYmKJP7fZ89/znGcz3luv9/3eWfOeVX3HHXd
+J0JR1Hv8kf/U5Cw+6mzqv48Um5KJzjmppMGmhOpWM6dhz5bjVyxg/phKj7g0
+m/KOlU0KhAUfa7eEw+wr25ilsPP8Pff74NTBTdRHMj+1VJ4pw6aKksKsDTXZ
+FE0yQ3s3zO3Wn4mC+XsVymJg6oyJ2GPYe7x842m4fGuntswKzG/ozAqFqxMd
+7XfAfP413c3w7XNWnjmwoKYhRAHuN85K6oY5G1aUPMP5jFxzh0UrUY/KUFEE
+zPvm6G8Al7/e8UiF1PfbVvnNMCXzreY++uvX/mdwPxl/qGm7G059Wjp8FPZu
+OMtaANPtR7OOwOwo09G7S9HP57zuvXDMrFNyJKzl+MuoM/El7QgXWKkkImgd
+TCuZ/tUYZoQ/37QMFtjW2xJ7r9CIm0S97GnVj2S+aN1x8xdwufkzrxNwI/dW
+TRXpR+LFxWY4W+SjWDbsbdh0Ww31mLyqVToJO18/9PksHEHvrAqBGR/ZLxeh
+v8bPbhbHSD79Hm5p5L7URP4KJvOvRL5XRl6ZOTZzyXr+YN6jEpgzFqbAJU6c
+MFwni/GAX183knq6gk/UwM4TtdfHST2blmzTk2NT7iXGAdroh1+77206zAqf
+afODU/V8Jz7APov588rJ+FnaWnV5NpX8+OOKbySPXrqMLcy2M5O21MK64aiF
+W2HhH/ScFJjR5xFpBwdaNmd1EbeWPVwFd+ybmVy2Cn2oR2l+wf4dmqq9bjCr
+Mq6gDA7MLfo9CeZ8rRP1IvVUtM/eIeNS3bFzYI33o0u7YeFpvfu56EfmHG/b
+KOy8VyreHC73udDwDU5l2mQMIg//ZX23puCYLy1xmXDLfsNvn2Da3ruBbrDO
+0MpGAcx3CqdWwO6VT3NayHj8KfGFMK1y3O0GOU+Ld0mU5Juw90siGZ/D6pMj
++Zt9vXKQ9GNh/INNnu9wv7iNxFThulhYtLe1SYfMN8jr6ibPt/DgflkyPrPd
+ltRbUiKvK0b6XXvG6K4s+V60Xf6BvJwD31WYol+uAatzFo6ZbLN/At++ef2S
+BKk3VM/RA3kqxVaaasDlPePD/bDM75xCa5KH772jB+k4X7/NKgBmv4o//BY+
+YLxes5jked5OaL+MTaVLRQs/kPGz3/Ly4Gq3C5Q2E+c96Bp7B3vW/XE4AOZ7
+0pmLFXBf2gNqf8Ic6bQTDLj6IH9cXBvnFd/XUoT7nr+qcIFpu3otZrE+/ss/
+NhmwQEdS0Aa3eHU3dcCMB2avk+FkvfCoRTqYn7m70wSmvo1Ir4d5Rb+MkHr7
+qipOesKc4Ku34mDWiVnTIDJf23pEHS7ntsvHkfm6v/m0oH9BQYrbSZgyGqoK
+gjkTkhXRMFsigMmC3TU3WXPIfuXJId+Rp9KwMMEDZkWeKumFtWb0TTfA3E9L
+F/DhzBulu5eT+XGzA33kPi4PL51G/bx59jfnYD/+rE/0S1g43d+5gXwfBF+f
+3YP54mGdZ2HbhCzpa8RTow5fYEraRfE8ccx8mUOovyWXeTwBZsfJbRmhk3oW
+HSJ2DkuoCUEeEsemm8h8bl3uZTHka6ngP1FEzlO8sDqN5B3y7HsLnFqmXk5X
+xO/Z9tZd4//Nz8tLhwUu7ZYrSV6jJz7NUcJ9qDD89pJ+lvgxvGC61Z31BbBz
+t9mRq3AMr6p7BPZ2yv/UTsb9M4yNVqO+XXklQ7BRpelPcTBtw9yLxN25R7Of
+wsKkrCvP4UBHC0cpXdxLc3FOITkvWXWzKxzDbrI5CPdZyY8kwsKyvyWVyHyv
+zuu1cKoKb+oB6q32zAgWkPXdJgn74NtWrrnfYb7eWJAYTMm1/rNID+MXXVOK
+0H+m+7ropXqk/wXRm+HsF1azEjD1vOLqQpKXVcfRWaynXnX2PEOegpwtBkMw
+o2fKvQTmuYTOtpH6qjjnsmEZZmF9GSwQLJfOhzXaJtNTYG7kzsgHcERcdOFh
+Un9fRugUXLeyUcMJppnX1djgPEbbDhVDmJ1XtqQYFgZGhavCrJOCMEXUny8W
+8VKW7B/raHMZ7sjrSZEm9XkUm2ggD//+pnhFmLN+Hu8mrGPEMdcl+8/sFzdd
+zqY+Hyt8ZU/yOKPl1AzfPjjxPYDU1+cxx1oZfbxx7LpG+uH9GL0DG20QNyN5
+0n5yCpZTwe/NuznVqiSvVtvi3bCz9cYjB2CW7vChDFgYfMe7AhakLEi8BRc9
+rvL7Qcbzax9Uw5uMfi5VZyF/m5G/Csh4VJW4DcxVm7c1Gu5aZffAF2bVtL+w
+hNtlkyfi4RiD2Nwp1FNgfeJdDixk3MzJh3V0/D/dhCmrgTU28NvyF/d4MM2H
+SRtAf9c7shQfw+z48HkJMHXqmmwbOU/UoHUNnC+VNfqUzHez6HqPvA40SCo3
+w4x/LVWK4bSkRvt7MOe4rXg0/PbsG9tyMn/iC8uPPI92EfNzYT4jyMsf3h/4
+MjWVrFdg+ZyE0z3qp6LJfIvVmtWwu/w6Tw7pJ84jicL5JrvtGvbAzpWVF73g
+jqX6mu4knxfjQU/h9JKNO13I+bvKsjaiv2B3exUnOFVZ+h0f/rBYffi/8eRj
+j7yQV+yGa7TtZP9y5cRhOPHyrkKS54G0RyXGDHwfja+lHIer86PtwmGF+38f
+SSN5jMmGVcIxv9DvlcJGywe2DsCXdM7zSF6huqZblqiyKTs/q0ufSN6TOx10
+4DTrTge5Nfjdm78neQM87fz4yc9wkWJypzlsnh077Q2zzlUcMIEvKUU8iYeF
+D4tmmHDDr5H6BbDRqsf1ZH+5FqZlI8xf8NHsX5zfEpdl+Bo+3W3r0wCXdkXv
+H4e7C546pcOJT274ztXH+qCvbj5wgUr0rCTM037ytwHsftdMRxqm6y+1F4cH
+h/U1iJ23RVfVIx+DevfNi2GOhqXpCZi5XmObGCx8bn7bFbZeLz85ifOoZUr9
+RvCRt3+oDsG8H/YPDWH9m6+7e2DvXb2+duT59ju/5hHMvh8jCIYzAk5Z1MDc
+HZUutXBU2IzyDTimoj1kAerZP9hc/zvJo0ewwBQevUlJZpLxTUt0IuBQox93
+02F3pvWrP2GtLTWeGTBt7uxbUeQ1Vqpkl0PW924U2MPJnY5FxfCg1E9HzpF8
+Jcz23oVbFK4aPIczGJF67XB5eqjIEjU2pfaedWYE5uTZ95vDrhNurRLoP9Tu
+lNFhWMa3ma4HcxNseMnwL4YDoZthrftGJVxYpDX7TSjJ0+FrfhHMjFAzuULW
+d55ry4ftflgfa4Anzyg3XyD73y0M6yfj95y4EbDWA87OuWtxP57+HdthXbe1
+DspwqNrCdfpw7anDlw3gFuHqt6Jw5hu/NiuYX5XO6EQ/GurruC4we7eY2zXY
+WZUj4g6zQrkfQmDvph5lDzimSEfZCWbZlW7dCmuZ7qKvhm1ZdesdYEGa7A1p
+kqfI8UQzMl/TezPJl7nEQWctqUddfQUFZ9e6qqjDjHdDjfNhiYRFQVKweK7v
+NkWSt6+rlQicWv48wZh8H5ZLXR1Hv6dzt6T6wPRjq88NwLRIA71M2PK8xORr
+8vyZXmkm96Nb93N2L3n+Vmw/IIt+g+dHyL2Eu1VfvSH5uCdltgpgyqmvL5fc
+zwXTsWHYNiJ8bABOWbgocprkPaTUxMR7nO2ep7qkPmfJdvoB+PPaZed14MEK
+zlAOzJSeEbUn+dJ2xj+GJxmFlf6k3+tGqf/C6SE1t1NhXsB1jbl4j/u6eP5U
+JcnbsKNNEk6uM+K8JPnVCzMk4Bny/rj2/++PGuz/AQ7UGzs=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.479517186987348, 5.883314205477544}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJwt1wlUjfkbB/C3tN+0oGPmKm5TUkKFQQpvJYQUZUmr20iNVEyRGrwto6SS
+GoU56hYVow1ZC7fFMkq0GEupG2lPm5RC/+8z53/Pwfmc531/v+f5/t73Fm2h
+/6ad0gzDVOAP/ctI0V+6LPPfZxLLfDc2ybOGC2qd9znAJdFjZomwsfBVQyy8
+eI1mzzuq7yzouwi//7m5auFM+EK7JBOO/OdjYyTMnvp+MAIuHaub/xwWRMXp
+WsGGKT7Tp+jh+sRHNW3qLDOo3LtlA8wtvvE6CI5SMlU/BLMX2VsDaizjomf5
+YxrV4z5U/QIHRn9tvgYLnO9NzVJlGUl7XGwR2VBacEyFZXQcTrfeIGeOpXMT
+WSajJ8s9m+6f+yT0jDLLDHFrP8eTffgvGnks05nZqBUAizceiXWC5z22T7Wl
+euCrUlXYPjvBfzbZsyRGBq65G5OoCHuUzBEvhudPye3owXyizGVKWbDp4NdJ
+b2Buzmp5G+yX5JBvTfMzjgWiqehnW6f8zzWweJZfuBz6/TXp2xcJ5RU8kK+A
+eeJ1nsh8gxO+B05VwLzsS52petjPuDbcPQr2aPVd7Uzel792DNbkFSj/RXbu
+inZFfuq8p5vew31f4q9ehFccrjxlMgv9rfE/8Qq+WjQoHQGLC5w3dMKrWz+c
+q4PVumf/3QC3hXXs0tHH/g7+o/mw3inbKF9YXPF5nhcclN7mmwtzZzfekIb3
+VRUPvYclwfn2Mehnv8m0KBUD9Pnxl2ppODviis4cWGSWeuED5p2jmBBsTn7D
+u1OKPHga3s0rYObcBc3LyGtfZ43nYpjVddibgzxLnzSm68KC05+n1CqxzMyc
+pHJFqqe8PmgA9/4R495B/Ti6pN5UZJkv3cp2D2EmqPF8ONxtF5J4HmY32x6P
+hXUaJLqR5CeV/Dp46OizF7/S/QfrehyxnuCap+52qi/9mCeP/W+nHZjuSFae
+EfwO9rglsqY6x1fY/Br9Nt3xCN1D9TF1SSPmCbWPH4qDPbITBlow75fhOLMi
+qtfUub3F+a734eZ8onynbdjsinw0mjVUaF4mUs/jFjx5wsrzYXDC2b6HozAj
+KLSphiWel8sFyLtRZpemzmyWCbDvUtSHd2Q//DEQZn3M61VhfrbxuhK4L6CM
+/xr3r1Dr75I3hG3SzI/SeQhy4qzhANF5vWkwL3vrkmCYXW44aor+JuvPiEw1
+pPeHf08H/Q8ua7x8E5Z87jSUwnw1ActTymBx1plgCfKQ+T5YXwpzMw6JnyG/
+pn7FGzfIecW2DchX78T5YRHZN7lDHX60SLE/gtbP2W0RooDnl2++SUj1udG7
+NOF/akTyK2DRFcP9X+XxvCw/OVmL9rf6y2ka6gd8q7zGMZ+o4nvZfnimxpvb
+7bDA++91ilhfXmOBTz0sfmN99Qk8nLF2y2u63tlwYwH6y534pOo95cX3y8xF
+/718v9AxmNm37VMhztPlutNWAe3f2jt+E/Ouj9pUsJHyaTItvYg85Cd/MIqn
+fosyZoYgr1WPR7pr4QTpqG1qyLMzoidSMAee5XLCBm47ObJ0L9xXMWX3Tjjm
+ua5mGdXFB7WFcLStpt7kuXj/ut6FrYAbKov93GCuek/vN6zvyfdbmwFLQg/3
+roLlXC38G2DR/birQvQzwuNN5s1DPUd2qQv6Tfbukp5LPuFtw2KeGapq1yxg
+0U/B9zQxb9X9Jmsb8qOmN+PIZ9mF+TErYY9H96OHkaf67Py+hTBjf+e8Gqw6
+/jJYk+r6bXZbcB61deXJ32j/eudd1XIs41XcNKmePOGpbDSsbmX34SYsyLZY
+cgiuUvyokgIzGcN1BXBbxPO9oVRXjj40g9azcL+8i+pnjSpKYVff4X5Xmt95
+KOMk9tdrqRt2h8V73HI59FuyqLzOj/ZrPdYVjvMsE5cMx1A+kROFMZiv3sdK
+u5DWc3n6PBrz83OCvTrInKtfAPJZ8nbLMgPKJ9P23ELk9/dIbcJeWGygkvgE
+Dti9quE+za/cLjFA3sUG4evVjbBfV1H3eng0YbxFaETv97/GJvALY53sK2RZ
+NeFL3B+xI/32KMykHNlpRetHjD3UMsb61pZav09kuSPqslKmsODDwMTj6E/+
+wbTlG4zp+T7UHIr+FzrNY1xhj/Y7T50xn+cfv0zfCYtCi1qXKLKcVeyiR14w
+J8ncqY18ZEMUDgth1q2w5yd5lktt8Z7iRPult76ykWO5xQ7r09bRegdST4lk
+WSZEq9bbjOp2h7SM4HPdjk0GVOdiY0dlWG793YTwH8jX1BtlUNePGXmmQP19
+C6tZD9+tWOQ2QvN2d4w/hbW83O61weLpg7wwOXo+tj1thjmnOGUXnGfL4Sxe
+O+W3xFrJAf1yqclOY7CkP+XcNpxnTEXT0ETKI944zU2J5fz1dS/okgel3m3h
+sdyl/Ul6FjDTnNezAHlVFYal0bxcaE5+hzLLVcZ8642ifl1l+X4436yvsQ/z
+KY9Df2bfRt6fXCIKXlF+o133HqE+N0h5rpQJrl9b8zEZ9R0rBsSzYKbUVMoA
+/u3dD0rryJ9uvQ/H+v3CgmofWHLlthd+HnEDh+doRlC98dq/+ej3bIzxomQT
++v2kOPAMzkfL6cHdDKqL3F/g+4kLNPHIvgiL/uHNw/vDbRoMXk7mKpadtcb5
+HFO8qE3XS5ImCDchT6OkI0tTyCWu66Jl8L2x/PiVaFhwdf943wSWy6yb0nSA
+1tdMP54EC8RBpl5k2fMygXDAt7cWm2FWTnUj6kx2e2zAKlpP7KvVi7pqzhFt
+M7reuHI0DOsfG0kMX0h12/lZVrIsZ3RFOnIB3d+wMMgA/XUbT65cQtf7z3+n
+h/5nCo/mraR+Fn8ynofzdJxuq7+V5qu01jHB/L13cpv8ab1W80JtPL8ZMxr1
+48khic8HkFeW2QuVK7C48E/pM8jzrZHE/SW5s16Bh/Nteb/57jjlUzDB3hLu
+STqbqz+fzkvPxgznsdvxaL49LPG9eHoI70vJXKMN+8n7eviBWO+jxaSFp2HG
++sa9YuwffTXN/DrM2vIXv8LzZrXGMqKS1jusdawa/SdN0fJ/S/erPAi5juc1
+LqflThssvqTVdRLP89IB3+AuWi+vbloQzmfXSLFqB3lr2ZAv3pc9IddNm+n+
+WOVNR5G3dnLC5zpYFGCysVKa5RpHb3IPqH7z8ePV0vg+eJhqXkh1dedn36VY
+xn/nb1kZ1E/Ydt9PUiwXNHJmeSJdr28foI/r8/N6gyLnUx7rDqRgPcWlb86G
+wIK9gRpm2M9LQ/NxEPWr8JuhEs7zksDuX8pD9Lub2xfYU1huf5jWY2Vzx9D/
+Pktnv1i637WdPwHn+T4+TyWd9nfQ9pZCHsLbxUVFNN+kksp2uLx+KL/+v/UV
+8nKQn6W5h2Scrq+etdIS+aos2KA0awFcpaifjvP9cXV/mR0s2FBdUob69qN9
+8cGweOzXxGz4OTexO42uP7HD0RZ+tfaFXzksKl49cAvPj5zF9uctsOTSzw79
+2H+cPgv+//8TBfZ/11uc6w==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.666233980906949, 2.1296932060463307}, \
+{0, 1}], LineBox[CompressedData["
+1:eJw9lQlQE2cUx7dQaURsyx0NJNnsrhU0ioBAKcWneJRDRUYq5VA8oBjEFMMl
+Rm4BE1shWEQUwVbKIai1pANoS7QEUTEYFC2HDqZaREektCgFRvptdb6dyez8
+Zr+8753/R26TBkUZEQQhRT/2/eahIWRqGj3mQNxK/Lm+nQKJq1mRONMC8Yaf
+4sspOPT90qxgG0sgAuu4bbkUELVp4cImxF/t9J2XQYHsafLQjm1WQHDD7MeV
+FHQ9Dw8qNrVG5yuvHKihILbfx9ejFjG3pJZzj4KVD+qWBHnaAJGv72k1pyF6
+CTeitwFxxbJXzp/TcPyZ9omFtS26/4LKrYIGvbS9qmsT4oLOLRHPaFg7cKRR
+vY9lVQnlwoDDjYx+50zEKYrYj2UM3E939T8iQRxp6aetYoDe1bPnzieIhQt4
+5TcZkCVaaiMn2PuftmYYGGjbbr6srQ5xRoPI4TEDpIPv+YBQxPBwnbSbgX12
+6hu5pux5he2qBgbiZz1pvt+K4rl1KaU6m4FXx95fLChA7LF4Mmc1A5N5nVqr
+PYiFDrpcggGXD/xnLpCy8RetM6hpCNcqtosViDXOWyxjaWipOWvHY+0JZyWU
+0DQsumYyaWuH7pu/NLH+T5SvuwbZ3sOIY5wrTNUUkDVlp1/MQfGM5G04o6LA
+8+Kx8qtqlsfnVWRS8PJxtIVPOBf5v9zrRRYFJRM6gjCZg+y5xuYUU7DW2CpE
+cgZx5NlM54sUZPUePOC0ai7ixlDtMAXuUdzZDR2ICZ9WahENJQNmoVIvHorv
+8kfpiTT88Jo+41eA+ImY+42GhvPi6uleLWJuDuhMGfjizm3vvH7E+TGXrq1H
++WpxjCzsZs8nnQ9TMiC/4G5q3IA4JMF4pImBEzG8O2lyxJr2Hc2/M5C9d/fE
+uCtiTnbQQ1SPmA75rbBHyJ/5moOlAwwc3RkaZ69iOXWh+zUGlJyQlx2s/4Fz
+DfxTDCR8WRtz0gTxQN2nzRIGrGZY9032onhHStVrHRh4vuaXflE74ozxqKsD
+qN98h/tv6xFzlaeyvqUhVxEm404gdkobfTeAhqY87Tv0cmRP01PQyKFhf1VG
+UWAl4g958upOCsZit4o9KORv5NaAFacpaCqYNh1Ss/womTxIwbRZRNWSTXao
+P+09BtMpkA+z82aHv493fheiq7bH//cOIMZs/PjYvnH8ya6r/Xx8vyI8fde5
+UAH2b73c83XfrwLsv8YrqO1vIyGOz+1+vrmNrRDHP3vzqcJhnhDnJzU90SLL
+Qojzd+RE8NGt/wpwfvdPVs10aRbg/MeXVqoMcQJcnwr37MWneQJcvwOKwhnv
+3eDj+sYef7QgM5uP639oQ/vYlD8f90fxyu7y3Y583D/lnIWXUyg+7q815zYR
+jCcf91/Qg96Naikf9+eWqdHKgt/4uH81yYOj/i4C3N9JRkmpnf/7/6b/I4iX
+t/0chXg+GnNKpqflQjw/Mw93JD3QC/F8RdMuTnYMiedPJv5RzJGReD4Nxe+v
+9mkk8fzGlcmN/vmLxPNN11fHj9qL8PwHl3uuG/IUYX2QpIbuk3wmwvph4s0t
+G1stwvrCUafEjLiLsP74TylFhay9t/rUJmNKL02QWL9kcX1VPV0k1rdjXskD
+J2pIrH9XXJLKOrNIrI8Sj6I2620k1s+vz0b1qv1IrK+D+S2F0ctIrL/BaWqK
+WUFifeZd59XZbCSxfruZlSmTEkms74FDMr2qksT6/1DlMHjXQOL9oLPc3PeH
+owjvj7lK/d2GVBHeL9fNVipv6kR4/xjXa/RSisL7ydvpsXd3AoX3l25wr9vO
+FsRv99s94zfv/wC2rKt2
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.844981764589882, 8.25073156171056}, \
+{-1, 0}], LineBox[{{6.4999999999976925`, 16.}, {13.49999999999251, 16.}}], 
+        PolygonBox[{{9.4, 16.}, {10.6, 15.6}, {10.6, 16.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 16.9452}, {0, -1}], 
+        LineBox[{{6.499999999996362, 16.000000000005457`}, {10., 
+         10.000000000003638`}}], 
+        PolygonBox[{{8.552322615314452, 12.48173265946094}, {
+         7.602165824326175, 13.316718930329426`}, {8.293188945044921, 
+         13.719815750748694`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.515942703607428, 12.823799910437668}, \
+{1, 1}], LineBox[{{13.500000000007276`, 16.000000000005457`}, {
+         10.000000000003638`, 10.000000000001819`}}], 
+        PolygonBox[{{12.052322615314452`, 13.51826734053906}, {
+         11.102165824326175`, 12.683281069670574`}, {11.793188945044921`, 
+         12.280184249251306`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.484057296392571, 12.823799910437668}, \
+{-1, 1}], 
+        {PointSize[0.04], PointBox[{6.5, 16.}], PointBox[{13.5, 16.}], 
+         PointBox[{10., 10.}], PointBox[{10., 4.5}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T2", " ", "P1", " ", "N3"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdfef/ifghgihi.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdfef/ifghgihi.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {44, 44}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwl1ns8lNkfB/BHQ27TppIIRcktNGFF0UxRaQmlorLMMlsTilAuYUdXxbYq
+onaTXDKVJLeQy4gy5DJJ0ZaioiG5hBq6+H3O/vzzvN7Oec75fr/nzDmPtnfA
+lt+nURS1WIqiyJMam8LfYhalSjCbRVkap+sWwy6O0/OVYWFBoux+WDxVuJJF
+HH2i2wDmGXquOQJLL/1R/2ER/r/f8thz2HG0KrkI7ji1u8d2DouSa6loiYVF
+PDGvEn533C1pN8x/eK5hnTL6G5xJdYYFXm35T2EdnywjOzg2tFm0dy6LalT+
+Q55Yv0ou4TtMZTeecoIZl8Ve8Sosirt66rw3aZ8/9WbWPBY1dj/3ZjQs52ar
+cRreuktK6iqxwu8pI3BhVPDROhKfbtzZdarIQ2DzZQgOLKPTj8FjRyLoqshP
+qX2y/yYsjFIPtYFZ+tlfy2HuWPF0T5ivkvflLtz2/eeKUFjkGxWVCnNkw9/G
+wl3rDk8FwZFvNdQTSP2+Cm5YwlQ43z+evL/IcP0o4knzSNgcBadsslDMhiPz
++aXesH2wXYQ7nPm1UZHMz1AfWkqH3b8Wa8+AO3b6X32I/HmFy5htiN9S5vVc
+Ug/q/Lh0IlzSG7mFDds7vvYi9VLKdzm5HnaZ7AuRIfnnmRiugeMHqbh72ohP
+zaxzMyzt8ftoEFzyb+uv4eR95xsjxrBlsUnUXbj2tU3moBaLSjgu0VYk8bwL
+GiyG+QrtrkEk/rFBTizMYLQ698M5lRtsOKR/w2hmAPK3Kwtf40D614y6/YAZ
+TmV1NrBqfBT9nBrW65fJ3FWkf463qe587I9ea7YdXFLUY14Mi12K2rbDkrVm
+N2zUWZSWg1/aAThthmZMCczaJKHOk3Z3m6WLNbAvWLVDJbDIvbk6ArZPlF7R
+DbuzShZXwKwvGbHyyI8/larYB5eYLrmwDA5MVdT8AQtundLfDMsZGIi/wYmT
+tiv8YSX+4NteuLzF/ns0PHzxk2cl3LiNoxhL6id1fM8JmKOo4nYC5m2VzVlL
+HLFjXTjM6qrf+gXxCvQG8tik/68THXy4o6nlgzUZL2mnaBfsbjNx7ycyn2VB
+jTKcssTJtR3xd4kbv7ejHsILdrYpJP/wCc/rsKpdpr8raY/uMY+HG9NnDSjA
+4okdqkdh+zR3uSMLkZ+fS+tfsKRgPX14AdoFgRsLYMZ8TjAH1nIrDfsIu2/+
+dvqtJuI3zg/4r95jKcsPwPxtBh5XYZ55b64SLHdtzmUVUu/c/LO1eKY0N3Ve
+xJPr6Zd0Bk++JN1SD/0k/boJAXBXvqlXGcz+c3LvHjhQYU6dE+alTn/SPAh3
+vH/d8RqOVcisvQDzqloW7kXc/Lj+7HqyjiFdob2wsI/mpYBxRDQvDUOy7za+
+H9kKC7hPbrnBgabcaVlwTox3UwRsaXl4Ypzkc9qj9hwc1v7QwhbziFrynK+Q
+fXLpPCsWLhnKSE+DWT2GnwRw4v5yTjLZt4a11/pghuHXG8fIPjOx85qC5Z5l
+DeyFtVI2dBM3xswbsyfvX1rRTPpvdTRvXAxz34bfKYc7wnjbJxA/67O+TDgs
+SBbfvQkzZHSMteDhwSgHH2KX69xCxJuW7uirQ/L/d+Y9S1LHbJ7CKPpZWp9t
+zCN1Vtx+oRVOiNldq0XqU5wvfACznQSaf2KdJJMdCc2kvcMtfBLryst1//GR
+xP0gfN8+so/UZlqQ8YU9h7f343eopcwPDITT7p42OAhzxbenPYaHt2c4zIKp
+ZSPF2shHn+ezv5qco5kxNt6wXKFGyEn4mMUlYz4s+MXRgwNLc+7uGYEpHVsr
+d1j0cu2NVeR3YMdd5g2n1Y7zj8GML5rRPLjW6LpOA/ndKX48mwebD1+epoBz
+SxxhtXCInMtlv3ivhd1d/ewsEU+ib3PeAXIPeBvkn4TDQm1KL8AuXOmODlj1
+jvadPJh7u2aOHvItl73JqoLDHnC7Sf5aRdYn7sP2IxJ58juKVzGdew/WatRr
+aYONZMRD1+GugQWzB2EO1z4qgZy7qx4Hf4KHzewiAsk9yInb1wXz1VvfO8CU
+bQ37Lqy0zeizDrnXzh+5HAqzN+gMfifnTpyh1yKYGjmk9pycOzfuVJUiXobJ
+vJslpD3n9VUWLH3Wh58KJzzkni8j9ZY1b4sn9dqnyV8Ku8Sl/EPql1d10zkF
+567/6un0k3DKZLaeDDwsiq9MhMO0Sh4dwjn+0vrYi1tk/IjWrBHcq8PHx+a0
+knuAFi0IhwXzhVkUuTf1h/6ZDfOKsn0sSX47C36qwj09ttykOpTcm6GcBTGw
++O74m3JS//HzYzvgHH77HRlyjxYKmzbCicnJw86w/qSixBnmxKm6XoQpyYJ/
+fWFu99ILr8m92DtDOgVuk6Ula+ng/fQQ+zaYobN5707YPmh/pzriKfRb4RcH
+S6xfHPWFO/qNt+fDlNC74B4sLLdybIYFN/fVKyBfO3lx1ys4Qc3YyhUO/Jin
++Y70F1WVJZB7TyophrRrjcWFVpF7lTfx9b/3L00zfQknbpe8KYZVucv3vIPN
+7WJ7kmHLzofcZ7CYS58MJtaI3H8HFmZMbdykQ/bLstSDMH/NGXVdks88LwUd
+WNItU0bB/Ab57ErEq5o+05Pkn9Id9rM9nNN5Q6UWdjcp1KtF/h067QV5pH3B
+40gLmJ7VUHCNfIepxSVn4LtKdSjULJvUz7VVSQlWukt7m0++4+7rxfLId5tP
++o96Uu/OguCJWdjPJ/UcB8h3xiO5T9Ew4xpbUw3xpBwPuKIMd/UtcnOGSxoi
+AiuUMP5f9yP//K/enPOHYUflqKrHpH5xB3a4wOLlFrPmL4GZjgbWcK3JAysO
+zHjzPGI1nHNp/OMtWBxb9XIbHNnt+H4M5u53o/HIeA6pXy10kY99VFcpLFIO
+NwuCXVgra6bIeA6xrzJhbp9s9CbE5xgxK6sJjrXXPJcK68/uTPoAq36Q9hyE
+dYoky37AosUXN1kif//gwT0yeshv1UH5MDhHdRVfCtY3Gs64Dte2/mgcRf9A
+w5bqelinVVm9E84rVKh4CsfOGzStgsM2rxY8gjOD7k79DbN/yn5+A36nFp5x
+EBZbDEgHw/GJ39lOMGvUcekSMn8N55g+6f+OMb8G8QVmbHOYTmwTFegMcwMe
+NPWhHvy9AUebkG+eyE7cBofNVbFeAxtpFurXw0pdf3f+OpOsm25lHSwwfORh
+8RP2g8tl/8fEJ4Ks5s7AOI+Vj/fCLtXeB2l08v3KfEPm0+oyDJZXxD61l+lf
+Dis9MbliogBH1Z7fDXf5Fi4Kl8f5UCoTnAGn9UpnfpRjUd8amA97yfq8slL5
+Cx6wUzxlgvoxiq9f8oQtNymeCoPZPYyDu2Cj7fmR92HB4cdzjsL+uZ/nK+hj
+/L93GDyG6dpSZpvgPJVvz5lkvlVd908RG9IldbDH3G30StJfa7fTb4jPcfmb
+a2KY3cQbn4b4xZd/OyNngLweFd3OgD0844w1YVEDbeNK5OvvOOWjCyvl+H6u
+gN/JJp7UIf2TZe7ooj70yE62KnGJ2al9cO3ET4tpcFpF0GA83CaO9+rFfFQI
+rY83g3yX547XwEqTNNsNpP8396nLsMvK7VdeY3z+hOW9QyT+y79HOcCUwZGD
+LrBWXabBGcRn57sw0JiMd87n7xzkUzLd6dFMkk+655pbyDdQLylgAvXSSteo
+Sib1Wvpj4gPxo4bLIbI4n6fvuimGh6cejTpOx/mzyn7XMCzyPzPdUAb70+5A
+AI2Mtz60X1maRYWYBbVrw4E8oY4KjUUps2JmOMACbRfXn6ehf+xz9WiYsfJg
+Z5gUzjdh7rVSeDjq6Z0eCuspXDv5lcS/R2fOHzDd7bSGLerTtcfz0HpYVH2j
+Ox52Gc8NXgWLjQ9Payf1+5bVsAv+J0TLfKEh3h9MCM+ArYubmT5wYJP0ezrm
+EwSVqV2FlWT61c/CGocdPj+D2UdvK+ojPukVxR60pZhvbsl7IcwqXWmxBFaq
+SYvwRT4db/2er4JZ3bdO0pDvyy/yszbAadJHDONgQanBAmL2SqbZBJw4drbI
+mvT/w/3wetRrIMdXog+7eGct2weXl53iziDzqZbS98Ia3U87PpB4r9DjVsCW
+o7/tfAiLXphOtGM8dhJN7wrsck72qAMsZNqeDoPz+GeWJCG+ErfE+q1wgpxU
+Qini5xc/oluQfFU3jFYi34F44YYFcFrVs+ocisS5QncmTJmqPVCZYlLDcqxJ
+edL+yaag7huTKjn0NJe08y6xn0VPMqnIFYxKLdK+5+whJwmTYlW+MLIh7TTz
+Vxs+Myn9BydOcWBBvfBaxBiTamy6OJJExn9tNW/sE5MKk+PMF8GsK1aXKkeY
+FN3vD89ZyJ/yXb+le5hJ2dG6m91gQXhhixcsd+Dd+qukfhYVH6zg2AtHjnwg
+/ZlzGvzgnLlNP5sbYb3Z/dQgbK9zTyecOONJTxHGH5bZvLIEplydvxVhfrqj
+aeoQsc/FmFejGD+kqk7TGM6SUVowzqQY0hN/roG7Tmxy9UY+8dVHzXbCacMx
+D1O+MKnEos379xBXDwffRv6cJ2m+e2FWu9XtpAkmZe3KqGfD7AT6fWvUS7ij
+KsWJjOd59lgKvNVO1cGctL/d9uIKXC5RuzYH5gVlzt0Ei2bvvDOI+LpqD+mn
+YjwxbcHVOjit/GpNIuazFx2rSoNZQ54sC8Tj8qZpayRpNxbvjUP8rPz8vzxI
+e/1vi9KQX8oW4X5b4lvV74+gHgyvJzdNYZ7RzsOxgxg/7931paS9uUJ6oI9J
+aQRIdi8j7pX229bDpFTLcw6shgVrpA70dTEpqjnirTt5f50c68JzxB+R6xX9
+n0NKzVuxPyi9ebmkvt+3BDXUMal/tMtEvcQhFhud7jGpwDNvxnVJvWOftozz
+Mf80iwx/Yq3ohuHT2G8bJPeKiMkfr+L/TxPW/wCX74+H
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {6.573901114580226, 6.782664290660753}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwt13s81Gn7B/B7FDmVUWJINcphpAOySgczu6UorSmJpKcpKomlZFHsM0mF
+ECHVpiZhC63DI6kcxqEQamxOUQyhlKSoCPl97n395h+v9+u6vvd9Xdd9D746
++7y37Zch+DAI+ffn4CQ+mjzSTX8u4xHmkdAJNS0eWaPC9rkL8/1SnWfCtjGJ
+HodgCev50m/IF+8xtZwHD271SCyH+1VyjZuW8ojw1xP5AbCnc8SBOOr2rDQW
+HFNOah1hnuNztzQW9hu4SfTgQZ3+LD04fsFXq/ElPCLqXN15RYNH2OumHm2H
+2TfqixRh8ZWA3hqYP5K07rg6j3CKwyIrqGUMjw3M5pGCob7GSliotHC+J5xX
+UFrWAEs2KWZ9U+ORqUXb+vtgEqnwPR5mTh+Ok8X+gnA5zY3wpX25d2k9vIvx
+G5iwZ0jDXGuYPWlU+WkW6mt0EXrQeu/cbHsP8/hRsRGwyDK4eAI+puY+L40+
+78DO1MPzAf4Gug9p/yfufBHAPsv+11MJM7uuz82E+W+X/HgC8yuVJ2RQr3ZQ
+o3c5HOMw9FEA2y5P/DsbFrtUyJXCi1e9Sb0AS/1VV89D/2avr94/BGe7maT6
+0nm4PSk1p/W+vZpdCEsWFzLG0K+xVqPtF9gp9b9aBbC0qoqlhXleahOOesNM
+m74zHNjTc6RcF/bR8xqZB4dpyIpbFqM/m6Sn43g+c8/+NdEwu9j3SBlc4NXg
+v5HGl1ltPgIXClTD5WCScfO+EpxiHmtdZ4S4tvZwPOrnZ1WvSYKlSS/7mLC0
+9U24P8xMztUIxTwq9ol6XGB+u47TEObpU/vn+S0wLyMuyxVOSXj2qw318ir1
+1pk8sn6f1NcOjjF4ZLULTonylf6Hxh0DTr5XxXkV6cz6HSbHDX6LhtdcjlgR
+R/dbEvd2A3z10SuLPLpf2OE36nCLm/yrJlgyuuvAJBPnaXPlnxHYuCRqF0F8
+sMb1uQb6EzQzC1hwZNqjeyawWNnAl64XGpkVvR4WFo9cPwNXODjl/krnI1cb
+2QhLXv3zgtrY+8i7pai31qhC/9/8up+/R8E+ubeWLqXxrDLxB1hUbDWpDEtl
+G1fZoP/hixrzOlEP28887k9Y27QsJIP2q6i1QwpnXi6J9KJx5xzRLMxTIrk/
+zIEH16RvMoXJ9sUPOhbhvtT3TFsFGyuozoiHBX+Qk4awmU7Qamsaz03ZS+j9
+jWOf/2GIebmouJRg/e2ZZZb3YZ/DIh13WPnLta3HYfLlMX8C9YbdLo1YBws5
+ijtDYE8L8x3qMF/JeccY+h8Zar4/xEE/Y8t6PGH5xQc2vYT59+w/tWHevBC+
+ngQW5m07uQXOPhX88SnND7/LiFLBfT3HetEM81YeYiXO4BHd6ZZpfbDYY+4f
+pdOx3kHDQhnsJ2BuVp0FK69zNNWB2ZstZsQqox/nnt5fYJHm/GZL2PizQ8J+
+Wu9seclc+KVsxcAZmKczYbcErqo7nZtC4xtVbnnAbq3mjwupC0e59fCIu6Ft
+HV3vmWGlM/YbzrC710D3X7ogYBLm11S11cPSXo/D+ai3Sn/vWDldv/TyVz/0
+k3dBWJcOG0cVK2ih3/EekxC6v4gbvd8XFnkvFDvS/EPK/DJY2eNu0ny6nv6P
+QBnMj20rSOig81sgMjGGid+A32VYUs+KsIa7HUzs7ODsqLzjNnBB7eSuKbAo
+N2nYBDY74/7ungHyRZwBBl3vhPo6b5h0rHJ9QPcXDMQYwT6q1Zt2w27n+6oH
+9JFnXTClDfWvLNe78gCW1o7tfIX+pgYrbIuBBS/+WvAE/Rd+Xt3iA5Mk5tN0
+zEscLCdyofHUp1vClXCem86k2MPCNZfSvRWRd7bT3YHmL9G/fFABfd0JnhDA
+4ll/zjwuj/lOmVTwo/vdKh7+exqes01rO099UfFvZVgyftQ/i+bryI8myuH7
+aWydVU/X8229bQ/HnDC1GP7XKjE8OFOvqVIN/QlGR7x2w0IdxkITWHjunexf
+cMFtZ+5GWBz/dA0L67d8Xb7dgfpoMj8dbgiMHdgJS8Pi2Q6oj5N3g2ynccfy
+Uyqo/2rNeP8vdJ6BJOMZ/PaNWZQ+3e9EaPg59KvGO7J8EvXw9przLJTo7zeZ
+v+qoT00/+0yJ/n2drR1H553MYW7A/AZlWvW30n4f+EsTYFZbRroCjbtbXbkP
+r89596hYD+tzT+XfgbP/u/vhUVhcfyzdB27pUGk1gEma/ogMPFyb4SbVxTn/
+xDA8iP0KFBwDr8G8gZzcG6jPU0F9zBUW95yrLED9DWppwaY0f+1utTz0m8dI
+M1OCBR5Bv13FPKrOlvYOLMTzQwF+JzC/FFv3nlewWGvP4l2yeH7+IYUW6nPN
+0VZT0X9EQt5LWKR0SX/9FHhiV8s7WOp9MXWPDH7vdKsyGLSesdXh1xn4vpUe
+2z+X7jf5+xMFODKxcHQtjbMmk5IJ+ivxPS2g8WjfjZ7wyMSihyG0/s2mjIMw
+J195azLN//Z2NAa+yrbRLIKlut8P9sKS7zs062H2wJucvVjfrI55/SWNa8xO
+H4PdM+u2tVNX7WnLQH2DsXlWjdTtbq/dUX9hRM6YmO7/0+0mDvrbHpbscwMW
+GgWld8LrT4ey/GHiZSgKxzx0h6+1/kLzExh3NDCvlnLpNDmaX97VegqWj260
+LaPzem+RVAk7hVZdD6TzKhhUb4fJhedGS2H2NZdfK+CRGQ8suhYgzpy6JZDe
+f9UzGpdgqVWv4Q/sF1naP7kVZqc0TzjA7FihzEyYZ+tddhr1ZednfXihg3yn
+N9rx6KdC5/jqDFiUZqARTs9D+w7jLEyOfKr2wjwC5mzp9aL5teKxzZhffMJt
+lgAW5nf57PrBJTH33Ox2w2IVRq3FOJe49J2qcaNeWXvX6juXVBi5C/yotzYO
+nx/hkuxhJ2EUXX/UKl//G5dYO87ZQvcX9l78qvaVSwo0uzNqadzdXnnfFy7h
+iZ7t+kidVLNTFXYv+ThdFf2ITUY4C+CWwoHgZTCJYP7vPJyZwYuwhoXhIfZb
+sV7hws5NzjS/enG3M/arkqbrudK4wlRuEurp9/Lp2Evnk1/UIYd6C5Ln33ag
+67mUXwsd45KV/7hyLGn+cEqwzASXeCZ4nJhD80NCgzzRv+6L5BUDqI+3KME7
+axLef8r1HixY/LrHBfOqmvLn4QA630R5k2LYp/g/s5bTeaTXCL/ArNlO+/rY
+iB95E/QDHm49EZ0EC3TSHjbBooaY7q2wdHZqWzBMxm9kybPp/wPVKu+x39vt
+sj+HzUd9HQM1IainxaPBUxnm5eq21+E8quR+sb8xD/Fppodb0Z+AsSHXhrpj
+xfL76D8s4Zv/NFj8raU9CPMSqny+0zYX+xC5lRbDXCL6/vNvj2HhuqIdMp+5
+RPqe30VNerQSmj9iPgvbNtN8YfblOJV+zK85WoNB15c52l77lkt8WqJGzKjd
+jbUX9XKJ0+oMJV/qAiXr1d2oL7Cf3IPJYMZL5ddcwoq6YDNO44nE7mYX1rtc
+Ym1J++vOaf8OrxzJCQ2AyXOD4mn0+dNnm9JoPDQoJr+HSyTScxcf0fjVOSs/
+vOES5nqL8nrqZ74fzr3D/TOz1amm+WvnX/jtA/qdFW+fTueVZay5YpBLOPEh
+fceoOX7bcj5xCbug3dWQ2vXRnJlDqOel+7JqWu/uoIwNmM9g2q2EHTBvckzF
+EveP430mpYHOQyOhuw82lsmbvpHayvy9Jb3f6rzJHG3M+7Z/6E+wddfIV02Y
+7CCMJ8gP6A28cGoO8j06qsaxPutZ9+4hvJeJd5g5/oP9nYrtb3pp0e/fdkV7
+nAepUVr7lb6nuXs/iUD9YRY7PWM06XlJ1FRpf8Z1+ZYwKTnGf4jzIAH8Ghka
+d9c6uArzWznFyOcV3svIwudhnh34flmIjz+lbj/ef6cJ/Ss41TdQR++dqlyH
++7On8/cBauYKzkAhl1zqWyai731k8EiIOAb91dfX21EHhO7J/7sE7zWWsrQe
+Ytt6QLeohHDUJc8bqKV+tZ5lJUQQWJKqqUX7d3hlVl5C+CLO653UaTEZMqUl
+RPiKqRdLbZ0frl1QQphee90eUg9KbuYll5DBzV26jdS3Xms9SuYSeYXDV9qo
+Mw81M0swv3lFj2upzVs+ratBfWHV0X9RS8wnk59jXpV/PD5MLXe+6/cXmI/2
+DVMt6inm85614/u08LIwj9ZrFLEop5NLRrLOm62l8zscnO2P+2q9KSH6HuYh
+rJ8rK8I82Y5DBw3ofIpsUmfjPlrHshRj8Z4ltL96sgZx3mgTGcV7E/ncFV6I
+592vtPW5Uj9c8vo91r+07cC6Jrw3ET3fyGrsL1Llr9lOPWmmcqwF98NYcLaT
+/p/fYJekWI/zdXi6/CR1k+WMS6V4niRG/kT9/x8pfd+fxfs/aePoPA==
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {0.4875589769853401, 8.878318388907438}, \
+{1, -1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000002274`, 17.}, {13.500000000002274`, 16.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.552325660469876, 17.180083206945802}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt1ws0lOkfB/A3USpqcp0Q41YaYhKbrNa4i1wrUZRKKalmc881bOWSJImi
+HZJLWaTkkrYhogs7CSG1UymWpYmKJP7fZ89/znGcz3luv9/3eWfOeVX3HHXd
+J0JR1Hv8kf/U5Cw+6mzqv48Um5KJzjmppMGmhOpWM6dhz5bjVyxg/phKj7g0
+m/KOlU0KhAUfa7eEw+wr25ilsPP8Pff74NTBTdRHMj+1VJ4pw6aKksKsDTXZ
+FE0yQ3s3zO3Wn4mC+XsVymJg6oyJ2GPYe7x842m4fGuntswKzG/ozAqFqxMd
+7XfAfP413c3w7XNWnjmwoKYhRAHuN85K6oY5G1aUPMP5jFxzh0UrUY/KUFEE
+zPvm6G8Al7/e8UiF1PfbVvnNMCXzreY++uvX/mdwPxl/qGm7G059Wjp8FPZu
+OMtaANPtR7OOwOwo09G7S9HP57zuvXDMrFNyJKzl+MuoM/El7QgXWKkkImgd
+TCuZ/tUYZoQ/37QMFtjW2xJ7r9CIm0S97GnVj2S+aN1x8xdwufkzrxNwI/dW
+TRXpR+LFxWY4W+SjWDbsbdh0Ww31mLyqVToJO18/9PksHEHvrAqBGR/ZLxeh
+v8bPbhbHSD79Hm5p5L7URP4KJvOvRL5XRl6ZOTZzyXr+YN6jEpgzFqbAJU6c
+MFwni/GAX183knq6gk/UwM4TtdfHST2blmzTk2NT7iXGAdroh1+77206zAqf
+afODU/V8Jz7APov588rJ+FnaWnV5NpX8+OOKbySPXrqMLcy2M5O21MK64aiF
+W2HhH/ScFJjR5xFpBwdaNmd1EbeWPVwFd+ybmVy2Cn2oR2l+wf4dmqq9bjCr
+Mq6gDA7MLfo9CeZ8rRP1IvVUtM/eIeNS3bFzYI33o0u7YeFpvfu56EfmHG/b
+KOy8VyreHC73udDwDU5l2mQMIg//ZX23puCYLy1xmXDLfsNvn2Da3ruBbrDO
+0MpGAcx3CqdWwO6VT3NayHj8KfGFMK1y3O0GOU+Ld0mU5Juw90siGZ/D6pMj
++Zt9vXKQ9GNh/INNnu9wv7iNxFThulhYtLe1SYfMN8jr6ibPt/DgflkyPrPd
+ltRbUiKvK0b6XXvG6K4s+V60Xf6BvJwD31WYol+uAatzFo6ZbLN/At++ef2S
+BKk3VM/RA3kqxVaaasDlPePD/bDM75xCa5KH772jB+k4X7/NKgBmv4o//BY+
+YLxes5jked5OaL+MTaVLRQs/kPGz3/Ly4Gq3C5Q2E+c96Bp7B3vW/XE4AOZ7
+0pmLFXBf2gNqf8Ic6bQTDLj6IH9cXBvnFd/XUoT7nr+qcIFpu3otZrE+/ss/
+NhmwQEdS0Aa3eHU3dcCMB2avk+FkvfCoRTqYn7m70wSmvo1Ir4d5Rb+MkHr7
+qipOesKc4Ku34mDWiVnTIDJf23pEHS7ntsvHkfm6v/m0oH9BQYrbSZgyGqoK
+gjkTkhXRMFsigMmC3TU3WXPIfuXJId+Rp9KwMMEDZkWeKumFtWb0TTfA3E9L
+F/DhzBulu5eT+XGzA33kPi4PL51G/bx59jfnYD/+rE/0S1g43d+5gXwfBF+f
+3YP54mGdZ2HbhCzpa8RTow5fYEraRfE8ccx8mUOovyWXeTwBZsfJbRmhk3oW
+HSJ2DkuoCUEeEsemm8h8bl3uZTHka6ngP1FEzlO8sDqN5B3y7HsLnFqmXk5X
+xO/Z9tZd4//Nz8tLhwUu7ZYrSV6jJz7NUcJ9qDD89pJ+lvgxvGC61Z31BbBz
+t9mRq3AMr6p7BPZ2yv/UTsb9M4yNVqO+XXklQ7BRpelPcTBtw9yLxN25R7Of
+wsKkrCvP4UBHC0cpXdxLc3FOITkvWXWzKxzDbrI5CPdZyY8kwsKyvyWVyHyv
+zuu1cKoKb+oB6q32zAgWkPXdJgn74NtWrrnfYb7eWJAYTMm1/rNID+MXXVOK
+0H+m+7ropXqk/wXRm+HsF1azEjD1vOLqQpKXVcfRWaynXnX2PEOegpwtBkMw
+o2fKvQTmuYTOtpH6qjjnsmEZZmF9GSwQLJfOhzXaJtNTYG7kzsgHcERcdOFh
+Un9fRugUXLeyUcMJppnX1djgPEbbDhVDmJ1XtqQYFgZGhavCrJOCMEXUny8W
+8VKW7B/raHMZ7sjrSZEm9XkUm2ggD//+pnhFmLN+Hu8mrGPEMdcl+8/sFzdd
+zqY+Hyt8ZU/yOKPl1AzfPjjxPYDU1+cxx1oZfbxx7LpG+uH9GL0DG20QNyN5
+0n5yCpZTwe/NuznVqiSvVtvi3bCz9cYjB2CW7vChDFgYfMe7AhakLEi8BRc9
+rvL7Qcbzax9Uw5uMfi5VZyF/m5G/Csh4VJW4DcxVm7c1Gu5aZffAF2bVtL+w
+hNtlkyfi4RiD2Nwp1FNgfeJdDixk3MzJh3V0/D/dhCmrgTU28NvyF/d4MM2H
+SRtAf9c7shQfw+z48HkJMHXqmmwbOU/UoHUNnC+VNfqUzHez6HqPvA40SCo3
+w4x/LVWK4bSkRvt7MOe4rXg0/PbsG9tyMn/iC8uPPI92EfNzYT4jyMsf3h/4
+MjWVrFdg+ZyE0z3qp6LJfIvVmtWwu/w6Tw7pJ84jicL5JrvtGvbAzpWVF73g
+jqX6mu4knxfjQU/h9JKNO13I+bvKsjaiv2B3exUnOFVZ+h0f/rBYffi/8eRj
+j7yQV+yGa7TtZP9y5cRhOPHyrkKS54G0RyXGDHwfja+lHIer86PtwmGF+38f
+SSN5jMmGVcIxv9DvlcJGywe2DsCXdM7zSF6huqZblqiyKTs/q0ufSN6TOx10
+4DTrTge5Nfjdm78neQM87fz4yc9wkWJypzlsnh077Q2zzlUcMIEvKUU8iYeF
+D4tmmHDDr5H6BbDRqsf1ZH+5FqZlI8xf8NHsX5zfEpdl+Bo+3W3r0wCXdkXv
+H4e7C546pcOJT274ztXH+qCvbj5wgUr0rCTM037ytwHsftdMRxqm6y+1F4cH
+h/U1iJ23RVfVIx+DevfNi2GOhqXpCZi5XmObGCx8bn7bFbZeLz85ifOoZUr9
+RvCRt3+oDsG8H/YPDWH9m6+7e2DvXb2+duT59ju/5hHMvh8jCIYzAk5Z1MDc
+HZUutXBU2IzyDTimoj1kAerZP9hc/zvJo0ewwBQevUlJZpLxTUt0IuBQox93
+02F3pvWrP2GtLTWeGTBt7uxbUeQ1Vqpkl0PW924U2MPJnY5FxfCg1E9HzpF8
+Jcz23oVbFK4aPIczGJF67XB5eqjIEjU2pfaedWYE5uTZ95vDrhNurRLoP9Tu
+lNFhWMa3ma4HcxNseMnwL4YDoZthrftGJVxYpDX7TSjJ0+FrfhHMjFAzuULW
+d55ry4ftflgfa4Anzyg3XyD73y0M6yfj95y4EbDWA87OuWtxP57+HdthXbe1
+DspwqNrCdfpw7anDlw3gFuHqt6Jw5hu/NiuYX5XO6EQ/GurruC4we7eY2zXY
+WZUj4g6zQrkfQmDvph5lDzimSEfZCWbZlW7dCmuZ7qKvhm1ZdesdYEGa7A1p
+kqfI8UQzMl/TezPJl7nEQWctqUddfQUFZ9e6qqjDjHdDjfNhiYRFQVKweK7v
+NkWSt6+rlQicWv48wZh8H5ZLXR1Hv6dzt6T6wPRjq88NwLRIA71M2PK8xORr
+8vyZXmkm96Nb93N2L3n+Vmw/IIt+g+dHyL2Eu1VfvSH5uCdltgpgyqmvL5fc
+zwXTsWHYNiJ8bABOWbgocprkPaTUxMR7nO2ep7qkPmfJdvoB+PPaZed14MEK
+zlAOzJSeEbUn+dJ2xj+GJxmFlf6k3+tGqf/C6SE1t1NhXsB1jbl4j/u6eP5U
+JcnbsKNNEk6uM+K8JPnVCzMk4Bny/rj2/++PGuz/AQ7UGzs=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.479517186987348, 5.883314205477544}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJwt1wlUjfkbB/C3tN+0oGPmKm5TUkKFQQpvJYQUZUmr20iNVEyRGrwto6SS
+GoU56hYVow1ZC7fFMkq0GEupG2lPm5RC/+8z53/Pwfmc531/v+f5/t73Fm2h
+/6ad0gzDVOAP/ctI0V+6LPPfZxLLfDc2ybOGC2qd9znAJdFjZomwsfBVQyy8
+eI1mzzuq7yzouwi//7m5auFM+EK7JBOO/OdjYyTMnvp+MAIuHaub/xwWRMXp
+WsGGKT7Tp+jh+sRHNW3qLDOo3LtlA8wtvvE6CI5SMlU/BLMX2VsDaizjomf5
+YxrV4z5U/QIHRn9tvgYLnO9NzVJlGUl7XGwR2VBacEyFZXQcTrfeIGeOpXMT
+WSajJ8s9m+6f+yT0jDLLDHFrP8eTffgvGnks05nZqBUAizceiXWC5z22T7Wl
+euCrUlXYPjvBfzbZsyRGBq65G5OoCHuUzBEvhudPye3owXyizGVKWbDp4NdJ
+b2Buzmp5G+yX5JBvTfMzjgWiqehnW6f8zzWweJZfuBz6/TXp2xcJ5RU8kK+A
+eeJ1nsh8gxO+B05VwLzsS52petjPuDbcPQr2aPVd7Uzel792DNbkFSj/RXbu
+inZFfuq8p5vew31f4q9ehFccrjxlMgv9rfE/8Qq+WjQoHQGLC5w3dMKrWz+c
+q4PVumf/3QC3hXXs0tHH/g7+o/mw3inbKF9YXPF5nhcclN7mmwtzZzfekIb3
+VRUPvYclwfn2Mehnv8m0KBUD9Pnxl2ppODviis4cWGSWeuED5p2jmBBsTn7D
+u1OKPHga3s0rYObcBc3LyGtfZ43nYpjVddibgzxLnzSm68KC05+n1CqxzMyc
+pHJFqqe8PmgA9/4R495B/Ti6pN5UZJkv3cp2D2EmqPF8ONxtF5J4HmY32x6P
+hXUaJLqR5CeV/Dp46OizF7/S/QfrehyxnuCap+52qi/9mCeP/W+nHZjuSFae
+EfwO9rglsqY6x1fY/Br9Nt3xCN1D9TF1SSPmCbWPH4qDPbITBlow75fhOLMi
+qtfUub3F+a734eZ8onynbdjsinw0mjVUaF4mUs/jFjx5wsrzYXDC2b6HozAj
+KLSphiWel8sFyLtRZpemzmyWCbDvUtSHd2Q//DEQZn3M61VhfrbxuhK4L6CM
+/xr3r1Dr75I3hG3SzI/SeQhy4qzhANF5vWkwL3vrkmCYXW44aor+JuvPiEw1
+pPeHf08H/Q8ua7x8E5Z87jSUwnw1ActTymBx1plgCfKQ+T5YXwpzMw6JnyG/
+pn7FGzfIecW2DchX78T5YRHZN7lDHX60SLE/gtbP2W0RooDnl2++SUj1udG7
+NOF/akTyK2DRFcP9X+XxvCw/OVmL9rf6y2ka6gd8q7zGMZ+o4nvZfnimxpvb
+7bDA++91ilhfXmOBTz0sfmN99Qk8nLF2y2u63tlwYwH6y534pOo95cX3y8xF
+/718v9AxmNm37VMhztPlutNWAe3f2jt+E/Ouj9pUsJHyaTItvYg85Cd/MIqn
+fosyZoYgr1WPR7pr4QTpqG1qyLMzoidSMAee5XLCBm47ObJ0L9xXMWX3Tjjm
+ua5mGdXFB7WFcLStpt7kuXj/ut6FrYAbKov93GCuek/vN6zvyfdbmwFLQg/3
+roLlXC38G2DR/birQvQzwuNN5s1DPUd2qQv6Tfbukp5LPuFtw2KeGapq1yxg
+0U/B9zQxb9X9Jmsb8qOmN+PIZ9mF+TErYY9H96OHkaf67Py+hTBjf+e8Gqw6
+/jJYk+r6bXZbcB61deXJ32j/eudd1XIs41XcNKmePOGpbDSsbmX34SYsyLZY
+cgiuUvyokgIzGcN1BXBbxPO9oVRXjj40g9azcL+8i+pnjSpKYVff4X5Xmt95
+KOMk9tdrqRt2h8V73HI59FuyqLzOj/ZrPdYVjvMsE5cMx1A+kROFMZiv3sdK
+u5DWc3n6PBrz83OCvTrInKtfAPJZ8nbLMgPKJ9P23ELk9/dIbcJeWGygkvgE
+Dti9quE+za/cLjFA3sUG4evVjbBfV1H3eng0YbxFaETv97/GJvALY53sK2RZ
+NeFL3B+xI/32KMykHNlpRetHjD3UMsb61pZav09kuSPqslKmsODDwMTj6E/+
+wbTlG4zp+T7UHIr+FzrNY1xhj/Y7T50xn+cfv0zfCYtCi1qXKLKcVeyiR14w
+J8ncqY18ZEMUDgth1q2w5yd5lktt8Z7iRPult76ykWO5xQ7r09bRegdST4lk
+WSZEq9bbjOp2h7SM4HPdjk0GVOdiY0dlWG793YTwH8jX1BtlUNePGXmmQP19
+C6tZD9+tWOQ2QvN2d4w/hbW83O61weLpg7wwOXo+tj1thjmnOGUXnGfL4Sxe
+O+W3xFrJAf1yqclOY7CkP+XcNpxnTEXT0ETKI944zU2J5fz1dS/okgel3m3h
+sdyl/Ul6FjDTnNezAHlVFYal0bxcaE5+hzLLVcZ8642ifl1l+X4436yvsQ/z
+KY9Df2bfRt6fXCIKXlF+o133HqE+N0h5rpQJrl9b8zEZ9R0rBsSzYKbUVMoA
+/u3dD0rryJ9uvQ/H+v3CgmofWHLlthd+HnEDh+doRlC98dq/+ej3bIzxomQT
++v2kOPAMzkfL6cHdDKqL3F/g+4kLNPHIvgiL/uHNw/vDbRoMXk7mKpadtcb5
+HFO8qE3XS5ImCDchT6OkI0tTyCWu66Jl8L2x/PiVaFhwdf943wSWy6yb0nSA
+1tdMP54EC8RBpl5k2fMygXDAt7cWm2FWTnUj6kx2e2zAKlpP7KvVi7pqzhFt
+M7reuHI0DOsfG0kMX0h12/lZVrIsZ3RFOnIB3d+wMMgA/XUbT65cQtf7z3+n
+h/5nCo/mraR+Fn8ynofzdJxuq7+V5qu01jHB/L13cpv8ab1W80JtPL8ZMxr1
+48khic8HkFeW2QuVK7C48E/pM8jzrZHE/SW5s16Bh/Nteb/57jjlUzDB3hLu
+STqbqz+fzkvPxgznsdvxaL49LPG9eHoI70vJXKMN+8n7eviBWO+jxaSFp2HG
++sa9YuwffTXN/DrM2vIXv8LzZrXGMqKS1jusdawa/SdN0fJ/S/erPAi5juc1
+LqflThssvqTVdRLP89IB3+AuWi+vbloQzmfXSLFqB3lr2ZAv3pc9IddNm+n+
+WOVNR5G3dnLC5zpYFGCysVKa5RpHb3IPqH7z8ePV0vg+eJhqXkh1dedn36VY
+xn/nb1kZ1E/Ydt9PUiwXNHJmeSJdr28foI/r8/N6gyLnUx7rDqRgPcWlb86G
+wIK9gRpm2M9LQ/NxEPWr8JuhEs7zksDuX8pD9Lub2xfYU1huf5jWY2Vzx9D/
+Pktnv1i637WdPwHn+T4+TyWd9nfQ9pZCHsLbxUVFNN+kksp2uLx+KL/+v/UV
+8nKQn6W5h2Scrq+etdIS+aos2KA0awFcpaifjvP9cXV/mR0s2FBdUob69qN9
+8cGweOzXxGz4OTexO42uP7HD0RZ+tfaFXzksKl49cAvPj5zF9uctsOTSzw79
+2H+cPgv+//8TBfZ/11uc6w==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.666233980906949, 2.1296932060463307}, \
+{0, 1}], LineBox[CompressedData["
+1:eJw9lQlQE2cUx7dQaURsyx0NJNnsrhU0ioBAKcWneJRDRUYq5VA8oBjEFMMl
+Rm4BE1shWEQUwVbKIai1pANoS7QEUTEYFC2HDqZaREektCgFRvptdb6dyez8
+Zr+8753/R26TBkUZEQQhRT/2/eahIWRqGj3mQNxK/Lm+nQKJq1mRONMC8Yaf
+4sspOPT90qxgG0sgAuu4bbkUELVp4cImxF/t9J2XQYHsafLQjm1WQHDD7MeV
+FHQ9Dw8qNrVG5yuvHKihILbfx9ejFjG3pJZzj4KVD+qWBHnaAJGv72k1pyF6
+CTeitwFxxbJXzp/TcPyZ9omFtS26/4LKrYIGvbS9qmsT4oLOLRHPaFg7cKRR
+vY9lVQnlwoDDjYx+50zEKYrYj2UM3E939T8iQRxp6aetYoDe1bPnzieIhQt4
+5TcZkCVaaiMn2PuftmYYGGjbbr6srQ5xRoPI4TEDpIPv+YBQxPBwnbSbgX12
+6hu5pux5he2qBgbiZz1pvt+K4rl1KaU6m4FXx95fLChA7LF4Mmc1A5N5nVqr
+PYiFDrpcggGXD/xnLpCy8RetM6hpCNcqtosViDXOWyxjaWipOWvHY+0JZyWU
+0DQsumYyaWuH7pu/NLH+T5SvuwbZ3sOIY5wrTNUUkDVlp1/MQfGM5G04o6LA
+8+Kx8qtqlsfnVWRS8PJxtIVPOBf5v9zrRRYFJRM6gjCZg+y5xuYUU7DW2CpE
+cgZx5NlM54sUZPUePOC0ai7ixlDtMAXuUdzZDR2ICZ9WahENJQNmoVIvHorv
+8kfpiTT88Jo+41eA+ImY+42GhvPi6uleLWJuDuhMGfjizm3vvH7E+TGXrq1H
++WpxjCzsZs8nnQ9TMiC/4G5q3IA4JMF4pImBEzG8O2lyxJr2Hc2/M5C9d/fE
+uCtiTnbQQ1SPmA75rbBHyJ/5moOlAwwc3RkaZ69iOXWh+zUGlJyQlx2s/4Fz
+DfxTDCR8WRtz0gTxQN2nzRIGrGZY9032onhHStVrHRh4vuaXflE74ozxqKsD
+qN98h/tv6xFzlaeyvqUhVxEm404gdkobfTeAhqY87Tv0cmRP01PQyKFhf1VG
+UWAl4g958upOCsZit4o9KORv5NaAFacpaCqYNh1Ss/womTxIwbRZRNWSTXao
+P+09BtMpkA+z82aHv493fheiq7bH//cOIMZs/PjYvnH8ya6r/Xx8vyI8fde5
+UAH2b73c83XfrwLsv8YrqO1vIyGOz+1+vrmNrRDHP3vzqcJhnhDnJzU90SLL
+Qojzd+RE8NGt/wpwfvdPVs10aRbg/MeXVqoMcQJcnwr37MWneQJcvwOKwhnv
+3eDj+sYef7QgM5uP639oQ/vYlD8f90fxyu7y3Y583D/lnIWXUyg+7q815zYR
+jCcf91/Qg96Naikf9+eWqdHKgt/4uH81yYOj/i4C3N9JRkmpnf/7/6b/I4iX
+t/0chXg+GnNKpqflQjw/Mw93JD3QC/F8RdMuTnYMiedPJv5RzJGReD4Nxe+v
+9mkk8fzGlcmN/vmLxPNN11fHj9qL8PwHl3uuG/IUYX2QpIbuk3wmwvph4s0t
+G1stwvrCUafEjLiLsP74TylFhay9t/rUJmNKL02QWL9kcX1VPV0k1rdjXskD
+J2pIrH9XXJLKOrNIrI8Sj6I2620k1s+vz0b1qv1IrK+D+S2F0ctIrL/BaWqK
+WUFifeZd59XZbCSxfruZlSmTEkms74FDMr2qksT6/1DlMHjXQOL9oLPc3PeH
+owjvj7lK/d2GVBHeL9fNVipv6kR4/xjXa/RSisL7ydvpsXd3AoX3l25wr9vO
+FsRv99s94zfv/wC2rKt2
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.844981764589882, 8.25073156171056}, \
+{-1, 0}], LineBox[{{6.4999999999976925`, 16.}, {13.49999999999251, 16.}}], 
+        PolygonBox[{{10.6, 16.}, {9.4, 15.6}, {9.4, 16.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 16.9452}, {0, -1}], 
+        LineBox[{{6.499999999996362, 16.000000000005457`}, {10., 
+         10.000000000003638`}}], 
+        PolygonBox[{{7.947677384685548, 13.51826734053906}, {
+         8.206811054955079, 12.280184249251306`}, {8.897834175673825, 
+         12.683281069670574`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.515942703607428, 12.823799910437668}, \
+{1, 1}], LineBox[{{13.500000000007276`, 16.000000000005457`}, {
+         10.000000000003638`, 10.000000000001819`}}], 
+        PolygonBox[{{11.447677384685548`, 12.48173265946094}, {
+         11.706811054955079`, 13.719815750748694`}, {12.397834175673825`, 
+         13.316718930329426`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.484057296392571, 12.823799910437668}, \
+{-1, 1}], 
+        {PointSize[0.04], PointBox[{6.5, 16.}], PointBox[{13.5, 16.}], 
+         PointBox[{10., 10.}], PointBox[{10., 4.5}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T2", " ", "P2", " ", "N4"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdfef/ifghgihi.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdfef/ifghgihi.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {0, 22}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwl1ws01GkfB/B/EuM+shjlMmxCSSrFomaEciuzIdNd7ktphFJrmRchEkq9
+FBltWxQx7WxU1JRLKlpKbql3WvQS1VC5Rb3f57xzjuN8zu/xPL/v7//M/xyG
+/ge2BMlQFPU3fshvavI7PgZsikZgyKZc7DOn9sDmH4XXvzPZVKtCjvl9fTal
+3Dgbr4J6ky7johkc6uIYbwYzYn+RL9JjU70OiXJesDTaJngxnBZ4sjENtql9
+11+ny6ZkM6qfNcFcLZ1TR+FK/wW1dCM2Ra/rW+tB3MkR7YKZP8oG/ARPOjCv
+lMFd9bVMB2IWK3yarN/+1XkvXM/bNeD4I5syDVTcfxa26g63TIEH555d3Av3
+e615cBdu+kW8Yhn6sUxNyBiGOTm5d5NgWp3CfKVF2O+X1Kpu2GnWMUkXzi4O
+ViX5pKYVdw1gKn6Qtg+OvRHrqwlX0jWPF8Jpo6szv2G/aqPxTbeIubr2r2Cb
+xp1mNfCJK781/En6ydE0vQT/oCkcTYYFj7Ou8uC8owPNXjBXXrzPCBZN5/F/
+hFsP9MTdQT8cg8KlE8hr6bjNkEXm+UVwuw2utPl3hRD5ythWdX/BaatoPgzY
+tE474A/iefUvYhci17ZY44twifsFx+4FqL8I+UjmGSsTJGTBnPH0zw2waQ79
+rVAH/UkyRCOw2ESosRr+fCRyDhP9MLffPNPCwLzDMlR3w9lKbbfi4cBbq1Mv
+wfQ8s7NusN8zrzIpzAv5+mEFPCNSOczCvMTTfeZWcE2e9r1MmDm4J9ATdrlR
+5N8F+53QiuDDIvrQfl1j5NsuVq2Dq7svsH1h3vrr5vPRj7kJrSIFLnH1oIfC
+yupH9Erhwb6Isrswl3M5txam7+p6p4Z8/d09LXWw5LHFlA+s6xuzpgbmvjhz
+KgOuPvKvd1fg1li39WWwX4DwchosPTRxXgTLrgu94Qc36X8Nvghbeg4/WEn2
+m/71djSc62fcPQcWXxuimcMz88oXtiFPSRh3wWP0Q7v6/vrvcKvSty8/w71K
+4ZlxMH/HyJ2HyOddpem/m8zj4TDPEnaanxnsTupi2r0cbZyrPL3BGeaEfSkf
+1WJTcS1vlTeR/Rqatm6F6zkG8wNgSeV/zjZo4rmvcZhJgSf9Kxqc4BNzV92v
+InV7q8iuHzDHzW6iT+R++3ovSoZrvI6etyF5uGq2bjDjVvyTJJJX+c97S+Hk
+V4Wuz+BQaWaIKRwY6jvKXIzvQ9/DE+tgj41GBftgm3fLXcJhfqCj6w3YZclE
+7lW4ekeD40fY8lxq0gQschc6GZqgz/yxwx7ob9KvK2sDsdEb3u8wL/mBwm7Y
+RifZaxz2cCh3DoE5EfU2LOTl275L9zch75e+qljY6uC2Ng6cl9C75ALMHVz6
+1ypSVzMdukbW6x33V4FNk6djimBxPOOoBP3EOt8sOgy35j76WEG8WTbLiszz
+bPxAPMw3aa/vxPkFppFJHFJn7ZQPhO0/OLeawDyGIusV8vQ/f5guD3NLdZ1d
+4Fjz5fJj5D4WcC9f1cB855epD5H7W9m7UxHmyJZ2vif3WyUzef98fN8qBroo
+/D2T06bSo86moosXvzEk+6ccOugDe/Q9UiTnt74M5/XTMfdWg8fHYU51Y0s6
+3JQ4SbXAk2/mmbnDUtsIHW3kFTClnYvhwMT8xUEwr0vYoQdH6+YoiODJ1WpN
+FjDt2Js8yhR1jRI5X5hRm9a0ER5MO9h4CmY+iWtNgWN76pxewYKxF553YKln
+quwK9GezRRLWB9uISjTSSL+M/H9m4crFTlt7Ye7NiEWKZth/d/9zE+R1Yv/2
+Mw3OG/smE0Tylw7bT2E9t/2zahbslx2/9zXMvm2keREOdet/egu29P7mcx72
+8LysdhL2o7f7HoHpixQUdpN+hBFTdrBuBq/DHA79UBPVj/OlOVoXZ8n9Gt3j
+FgP3Ksr99hz22zGwdAx5uo5tsRHCg+lr6/bAn3fEOuTDlaFRUylqmN+FK0mZ
+MKU2nrhBFff393jPLJhfH7ZNUQX3KTPErQi2lHkf91oJ+8eFB9fC7LFkg6eK
+2IfW988gzPwjQ7tPAfP3+OrDJPk07AKMYfHM2bt7YUlaTt05Gt5vuqWFV2H+
+m7SoDXCZU5PmJMmrb/fdFNb9O0xtI+Zn6T9lz4Z7nef45RJblIWmwoIIaqwX
+pnsb+k3Aeaclw3pLULd3n03BeftUjdu9Yfaa6eNL0R/19FJlAiwRbd3YDYuu
+pBkUwgK5MJlk5LnUUxdaBvP6dl83UCb3ZklqOVxZ83JGAAdaC02LiVNGR2bh
+zxNdf6TB4oAcVwvMhx1QKg0i1vFQNyc+tiDODpYuW/vgE9ZTifp6ynC21D8l
+GY5zbX/bg/4FOqvWSXC+KODK3Guw5NFAqBIssHDJTCD14OJhZTLfG4eCdsB8
+I+/b75FX+WuWugMstkgNrpbHvTS+dm4l8ZA4P1YO38eG7qgVcKWPaqLtPDY1
+Ut4Wsg5masxYK8riveU1eHIbnE07b/xJBu//xtebEkn9APPQ9zlsqj0hc1cV
+2a/a6Yw1nDes+nIc5szW1hdTOG/o/J51yEO/s6DFAZ4xH9HPIPNl/reFAfMH
+8xV7yDxyjy43hj06miZNlmK+55hV/rBLsUlzJMxXKqx5DMtW/HxeBHO0g+K9
+cZ5yeNGL9zD1bW/2F3iw43TAQnOcp1a35yL6vSTadN8O5udub9g8F8/d77r6
+Zjjbx63oA8zIcDLbAreWhIYdQl66VmS2C8xOf/L8Jcybcy1uJSyYcrPTwnxm
+kq3vq8OWvulMA9jeUbt6kPTbYhIzhvXsKfdFt2H62NzWkzBl/EH1OOm/QSfh
+C87b9+CJgEv6tZh3eAkcaB4zvRSWGMobWqFf0Wqhshyc3TWrsBB5BJc9ooYw
+H6Zr0ciz7ywqu3ShdxeZV5Kt2GeWRTU1PnVsJ/fTZmNzxzSL8g77tOI1uc89
+HwIjJlmUzVq9XeNk3pPb7q8aZ1Htm5966pLzzFQ67D6zqGYn57ebYeaDTve8
+MRaVqzm48wQs3scTbB1lUV3VucHPYD+75l8TpCzKZW2tqz7yi12L12vBBTdf
+y+wn83ofP8yA855cCLsD+5XnM/iwVWH5LrllWN8sE8PCftLTUf1uMNOtnLMB
+55kGnuGmwPy9qVH8TyzMKzrlJsx2tNbrRH/JdjKPumGBeseilejf6Vym/key
+fnnkkiMT6L8zdvU4TP1t+yQXeT1S1/NInVmw8tGBKdTnlEhewpJ5FdqT8KSG
+oW0tqYek3jPAvOJYe2rOkPrDwqxXqDdpS7RCyfk983OWwTMPpzZYk/NCQn9S
+x/6fr6oeJHkENAY3C/3Qihtqu5BXsuiY+E/0WyC/zlRIzEgVnUS+wKI1/qfI
+PE4MaVlhHpPWcuXxZF5sJUn0MIsqaf7h7mHigqriqLd4Pux1paQuVk5wPvMG
+zy/a8vlpcn89oh6r9+D5B0eO3CROCdH91Maiao54fHkLU9LIRMtG5DWMcTMi
+82jaPzh8k0UJvt+9FUysqxitLmBR0fIDhUJi8slb+///c5ax/wedUK1J
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.6273814311035784, 11.151823299819789}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwt1gs41OkeB/C/O60YGbfKNi5dFpVKUWimTdOFahYt9lgGFZ1aplUd5DIR
+DyWJCieH2YTQhVJRYlyKTTQuleQIjVxSTTEat+z3PXs8D/N8vP/3fX+/33v5
+j5FvkPM+eYqibuKXfP79h8Gi/vdjxKLoHc9e3l3EooT1cy/cw/8VV4UYuMI8
+F9rZY3BisH5B5/csSjak0cSEK+oCL+6C07VS8nRgm2nrgVJDFtVjxMsYRb/2
+wm5XbVhwtMK/Ey6720/xFrIo/lF1jR6YlSQ1aVnAouKprFw59J8uKH9gB+sX
+1hcx4KfOjbZl82GFUkVHeFvPwy3bYIa+oXIkbNkpd0hiwKJUnxxNvUueb66T
+vw3TzsywP8NOpRvkzsH6DRlZZsiv9I14LIE8n2Vq5g2LOBEqmbBNe1PZaVjR
+11qvDhZNrYu5Do+E6fTMwIJdizg18NjJ1VYOmH/wwoNzDbC7hgHrHLxtuXVY
+FdzAznnZTeJ7sVs5H+aEBNYvQT7Fp/gzUfAhheIlfrDAtHzAEfaMs8pNglUP
+m02ok/6imJYrxLRV0keIXxR82uUy3JHdrRYGq2Y36MfCyxbK51nArgYFQU4w
+1/BWWg3qOX25jDaB+VktkY/WwbJghs4ZWHQxml6BdRq5IO38jsQnqep1g20i
+aztCkR+jzdVHAz5kneXbpc+ikv89ub+PrFv/Y7/1sKXmLdZz2Cr7JC1ND/V9
+G5/7Dh6L3HB+Shfr6e9ZTkf/Ora06hAs6vZf7AmHO1x5+EkH+2nUw6EM7pIb
+bYyHLV8XepsgPquHbGVbmHVPdeoiPDJdbatKLJukKyO/9OEDLyV0FnWVmya1
+h9VV8jtHYZ7gbE0QXHojYFgDzzOqnIPSYdkB+8CNcLH9Y/87sDDlUVUE3LBy
+5606mHFRI6AeLlvRoUbqa/Xtur8O4uXF5X0kz3NF/bE+MFXz+loaqfdQ5eVc
+mPs8xf0g2U/53SpdMOP65arV8OCxD7dnYUladg7Zz+LRwkx11KenbLvcLtim
+mS0m7byjVqtKkb/dGvvZl6R/voH5fNj0RnXDeVgQEDsUh3ralBSctCbjrS6b
+KweHxFU015D6fTGKT8K5sfN3CNkA88omtlvBRzzz9+SgHnzBjMI4OUev/vgm
+DzOUyqXP4fDx3056a2O9etuftcMWP+cbVc3DfI8nCz+Tc3ZQY3ApTI3VaJth
+PP24A7xsLdTvvaZ5GLz3fm6yGcxStnjVBYuClBc20fD8eSUtJ8TH23q9OAEW
+7tZiVMMWu7Qv+MCc8dvKa0l+A+vzXWEWP6ddAF9T43mRdv4/wxW/wWOJqW9O
+wgxuawsb9VKtrDF+QPrfd4o9BtPHEpfNwlxJ360E+GmT2NYR8TAcFP0jSX3b
+A+0zYJ63G4vcU8I2x7E+Em905RF1+EjFWq4xyc/Kq7oA87nqlqo6wzzjULYl
+TO9y3vIbTCuZ4eQi/nQn4+M8uNgila4JSwxcnDxIvQyrPY4g/4Y9ofeWkHa3
+ANMu1I9idJi+wnyWSuZuO2HXACWf32HRgwT3ZpyzihLzWCnJJ2xf5V7YU2bc
+vB8W/PKjog58dXii4aIm9ouKAacP57DHTWTprIF8P9dta4YDtLt+UJ+LeC9Z
+Ua9g4Uolw5bvcD73hn+h0J8rXNN3bQ4+6R0Gm+GO+ZMmhWpkvVN0L8E2Mc2t
+Laro/5/HAQrknsjRuWmmSp7/WnaU3EszNEmZCp4/8MT8PZwcwVaPhBnViRWe
+yFfV2S4vBE6mt2fUwunqsVlX4B6HiCgDUq8Aix1TMH/aS82D7IfxO0+CMT5j
+T9BkBCz7fnGMAuKx/FxyJBbmCFSuZMFcrbmLAkn/VKd6GxL/+3nWNnB8fm/q
+I1jY036mH/NRhgXc9ci3J3I4KBQue+fbnEDy3zcYKkO8jKQMzg1YtCD2HwFw
+SHR0lgDm70xKfIb8k4dnlH6FeZaJX61gqvdgZh/GtzQLzcom74FXz3asgYvt
+ftyoC/PfZJe6ID7RiufSLNx71NCpyR3Ih2p0lm6EOzhensbIV3Ioef0kzrmg
+or9SrITxyg+7tcGySO2FWYrw+laPRphT0i3+RQH70a/6dq8eOWfUr0vlUW/d
++q10jBcvrzGhIYf5TotivOFBP2b9AgrtT12TK2GROOp50TcmRZVsSjZHfDyf
+S9y4GSZV/GnvRxI/JT4c0zTNpIQZzqV05MdR4MpOwKzQne+iyT3vP/4iC5b0
+BL95C9MOPm03QH+eG69gFeolzHdpegsLdX5w9If5jUUJQ5iP5c+dcwJ2H9Dx
+noN4uOHizHCYtnJ7eh7MsHzM9iDtLa+n7BA/j68q1oNlL0x9q+Eexvb/3sd8
+MkZr8jLkK3zwVYUN8/wMnwWQ/GWVwZVkP99dvD+MtO+5v9QMlhk2K7vD3Lyh
+1rPI3928W3OWjH9gKngc9eP51hUHwZLWiem9emTdlw9cQzyiwcyvvbg3e/7Q
+uxkyi3rJplYEk3t0zF7JidRr3jw/Q5ijm3hvYBLtLSpzxLhHaSm2p31lTIo2
+GGn8J3kvbXL72i6FL9gaNJH3StedXrdRJsVVjq/9CIsMt/ys8Bn95TMDzcl7
+74x1aucHJiVi2ytEkfkP+n3kDGM+cbWtGBZyPdvjBphU8ljhkCviZR3TPH62
+H/VlsLY+gRn0og3BYvRfMM6xR77CfxUuWkl8VsE4H+b7vde6Axdv9toth/pw
+U2qTRtC/uDbIjk2+l1gcH7mN8SWjJvsOwyy7E7p9Q4ivmZ8RRdr5oUXbRpgU
+I+zO0iBS78wNPnc/Yr13HfvCJPu9KLM+XIJ8FaN+HyX7LVHidRj50XYvzUkk
++//dqUSTL4hHqvZak8ST9afzCZhn/iglmqzHRkojgrTr1y98T/IXpC/TIO2N
+3T9xiJXDE1dhvGST7nXlqB8//2la2yfMv0SabUHea2KV2QjExws986IY7y3B
+puX3wgeZlKWhE9sRFuqyFUbfov7RJ9ZSMGWa5qXbDW8uT2zFe03o+lPtYBvG
+2+FSXAtTy67e4tcyKf4Ho8A27f9/r+U9/PuTzvoLN7T2Kw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           
+           9.996694214876033]& ], {4.016469192730548, 5.934756130901607}, \
+{-1, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000001556`, 17.}, {16.000000000002885`, 17.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18., 17.6952}, {0, -1}], 
+        LineBox[CompressedData["
+1:eJw91H1ME3cYB/B2dhtvS4skDhtmy93JcMy2dwdFMJsPZWKJIOVFrcjkpUCY
+lE3n2Ox8aZMFtqEgiK7qCiumgQoaOoowDS91dkx5ETWYoSJ1sgaJojjE4SRl
+v+6P3yV3l08ud/d7+T5PaN5naQWvcTicVHR67+8vQReODDj/HxQcn4V102Jk
+x0/hizEUmOy9Z9M2IPvs9yfyKRDTr7Ym70bOiU817qPAqZPMdZm8Li4cOkiB
+3fV4fdHvyCcyt1aWUCBLKFxNPkVWbTvgUVKgv1UzMRtIo/+ldB8NokAwXH81
+UoIsHmgeu06CVPqmyaZAVv+YlVZGQrpFL+rchLxmxI8rJyEPpJPhacg+NUfl
+DwnYq8oo1iUjQ741rIGAsLulyU1xyGbuYE0BAU2PMlIiZMijcc/2xBCwoOoT
+u4Te72dtcojQ82a3/d4SZIPPuERIQM1mXVT2tHc+kXMrVhHwHqchsPa2dz4l
+E9UbCVDfXVn1dT+yYcEvWk/Aw8FhXd8l5OqMpDoHAfZfLWsvOpDnTxH5/iQc
+Pv8xvewKspV/8FAmCSdutw77jXpt3n7FSgKXsy83asb7vivHNUPCuEFb38j3
+jmdziWc1BaHLQ8/8HYk830jysyiYFh3RJO5Atvm6F76ioPKjPN3x75EFSdVT
+egrePmwKMLcj7+3bn7yHgjB9SIP8HnJwXCUnnYJFOa9bxWWAsyu9NyKUgnfe
+8L3AiJDNLRLqTxImDULtoShkzvzrjJGEwUJFR0U8svqFZIOSBEFd8CdPlcjW
+gjPNLwmgn6nN/gnIskam3kaAJYcf17sW2XZTyfucgG9vFXmKIpBVpsoABQGl
+Y7Hua8uQ4bLoMUnAA543d8jB/ucblxOgDf9NSE/R+Hmm1Mg1jtD4/Q8sMz3g
+pPH3bUFN2c8v0Pj/du3kD4JOGo/vn9PdiaVdNB7/v9+4a7/op/H8nJ4XCUP3
+aTz/B0OvFK0eGq9PXcXEjqsEg9fv7AHNbPZGBq9vhqOufOeXDF7/53/tMnU0
+MHh/Lj0a3/LWAIP3z/1dbe62GQbv72Xfsvp+Pov3PzFCJZt7l8X52JJy+tpU
+NIvzI1Fsd65fx+J8vYyWlcd8yOL8FUvu7C6LYnE+O3nZT7RhLM5vamt5v3kp
+i/MdmylMIhYYnH+3PcYldjO4PkJWtNhGhhlcP12rKtrUPQyur53tLcfK2xhc
+f3rn9eA/zjG4PqtyDPeVPzO4fo/dmdekdDO4vttjc+UDNxhc/xrppyEBTxjc
+H9p6Tt4cE7C4f0hWBl00rmFxf1k8csMvXsPi/mMZ5VnbqljcnxJSIf3cLyzu
+X0mBvY6lLhb3tw6uN3+RuP/9B3PT46g=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18., 8.354800000000001}, {0, 1}], 
+        LineBox[CompressedData["
+1:eJwt2Hs4lGkfB/DHkgYlp2QrGYNyikEaEU3IKZVNMlpq8o5TVCqVsFFUEkKU
+YzsVosQkCSmULWWsKZPklWar3dSmJskx9X7vrrc/cn267+e+v7+vx1xddAN3
+rg/6iaIoBRmKIl8pGvmLzqZ+/NFlU0xu+841MEd+/pQ6TD3e1V4EawVMrpsL
+R46Vsj7AXOE5UzW4OM+jxw5fy+YIYyfx7zXei4YTYZsstb5uWHhgSrMVZp80
+zi8hz5kymROwW95FfhisIs6u0Gdg//XpXAM4VJWR4ghL+BHcGzr4+uUYz5vY
+U36TDsw00YjxhamurAXHF+Ac05KydXBzrJ/CpDabGp7fFWgPJzjcmxULz1jR
+XcSAM5JG9ynDX+tm1svAKmffZNbPZ1Ntbznc5ySfNOREPFxGq91WBwssMhwC
+4R6T+7U5P/Kf1CGWezwmHw17zZFZehCOiFZ4sRVutlc0qoHp2/k8H9LT6gp/
+Cve1imOdN5D1F70LNsPJp5KKtpDnW/Vf3oej3DuG9sMJTWqJLMwj9TUxKCK9
+6/Vml8Jso4aoP2GpYslVZcwfZbc0RRH5vayOPAyDaRk3j5H5qYXGe6rh5Eea
+9ALSh02ZwWvY2e3otXfEHVTsJJydlxhpp4d898t8RmBO2dd9KbB0+fhkFxzh
+4vRVDFNXV+jmwH2rhrZr6aOPqK99dvD7X9Wz1sNeTxsz2pFPnP35/CFY5N1z
+y43k1/EIKoYzInU76jAfzb+Q1UDWcz3adWG5lgVz78L8NZ7aKehLvEVQ2QRT
+jb8xx+bh/sxPzKtwpKuL8W6Ys+RZcB45z9u7YGou5i8/nhJD8gSq2v4OJynF
+mvnC9GvCi5uI72zUtiT51nOcLGHPxZosZbJ+dZfSInhAQ2vNB8zH91qfZQNH
++A5++zHvDUXZIJijl53XCme8/Y9NOVm/0jBxG2a/N3pNIc8wFXngD+LB4dZg
+uK8n6EkPLKp89EYMC/OzF4/D3MCcIWfMx06u/WaA+1UKlu8RwO+jrxhtJn3c
+3stURR8qVxJl+HBzROj+rbDXaj/uW1iSORhYCG9IXnaHZYD3o/yW1m047ngy
+LxkWULnjd+G28EOhPTC7gnanAk71nj2qvxD5WVb50XDCyDZeOOx1rE/dCM7N
+cPylHGanCjVbkMc/rrCtD2Z6/NZI8laEmXPkFiFP5vP59ZhnzDiOoQML/MuU
+9eFWpaK3psSSiP4T6Ieqdlczg/kFT7+P/Ez2vzurR5430LgVDi8xGmXMgtma
+rIGPWmzK8PaqqiHcJ8k7kpUM93hY14lgae/CjmVwdNVPo5dJ/kKfffJwrnWz
+6zFY5JA6WzoH5/AKjgTB1OZtbSNw3yuzEHcyX4Ljyp+x37+ryN8apn/Y+nQD
+HHFMZ5cJHJnnWlYCU3X7LRbDKqdN2uSRj96Ql2tH+gg+EL8bVkkKlfWFm9Ps
+s17CA6dNTeNJP6GK6V6Yd0P72OJrcILVsbm18NcZ4pOfSL4rDW4z0U+cqrav
+Dealm1k+9yL9PXSkH4EpneDMOLhmXtHyJ3CGhrF7GkxX/dRlYIj82qnLDsEi
+8dT0KJhNs//uS963Xh+tWzDXL+yCGiz+927SN0Py83Yv/RruL7yRZrrUCPuZ
+e8MdYJFwRlggzHWzHr1B8hv+wjgMS6wYbQawhkd7XzYsHXspn44+UmW8m/LJ
++rJruqPoM0q6IpOsM7fT4kJI3/9cFiSS8+2aFvytyabquH4y28j5FrURe2Hp
+Vo0n7mQ9JPHFfHjA9vqfBmTdNa2zfzY+jx6at1CwwI/tcQvW6vZIfY78zKrw
+sTpik7qx23DzZ1nNR7Bbx5qci6QP2ZpYWZwnZKmdyYMjr9+t94Sdwy7dOk36
+sZzmVEbu++OQPd+QfD5eLVFB3rjYRkEtLHAK74yHk3YJZvWSvqQ6fh9hqZzT
+VQXkUemRfcrB/PO3LPJ2JnmTHhnWwoX/njZKhvljvvdk0NcGheYvj0kfn4rk
+WKQ/Rpcuwxj7jZZ5rYdDP6/7azcsmfju9wtMxX33vgMnuPxjZQUzOX+XzzTB
+/txC/zGcL5wZ4rIelphz68/DA4c+SdJMyPvnftCavK/zks7dhvnDbPnryCsM
+b2S9gkUzMgsXwjQ1x38nYOmCm7YZmD/1xB/F00zxPpV32I+hP1ql7kdZmB73
+QjMI1pfLko5gv4pl1kSfBu719/aXwM3Hj58KgrnXAgPumJDPE/5NWdgtkRf7
+O8lX77nipjq+D/unx8bAlJN5ZTrMLdput5Gcl6FqFw+3sjyzrEm+gx8rUuEN
+9MOG88h5d25vvQ4Lm/o5CiRvjjhwBJaa16n9RCx4d3w17hNnNrXIw/SULzVV
+sHDlyuVapI8OZ3lt5F+SVlm3lKxv6VicBvs3fn64lfSTp1A3Ppt8HjWG5ZL7
+Np/e7I8+MpwCJ3tgZmHRxiryfj54H6aLPiRKtnmDcOTkPPudsFR1NUMdffrn
+rKpvglW+lzK04cIHsTIqizHvM5aeIuxl5GMXAKvsWD2nF8/TvudUF8OCCxYB
+6XCc3NTEK1jio3vFiNyXnqr8sxncu2y0CvmG7Z4EO8Kiwx6WC2FR1TSVLXBz
+633tLMw7JveoZgcskBkZH0c//s5nzu+C2Z/bl/FIfzaFf4SS/foBlk/V2NTr
+zXFFPuT8gJvtHFjUEGlsC9N9TFgfVDHfEk+xFkzZuFQWwLywcM9h5OMPWTjw
+4IrHyhGdJL964jl3WHT5rsoVMp96sbEneV4td+wkzEzrbNoGt9k8+z2GPF/T
+OXAezrWYztgJZ8Q8HZTCzS2HdIhVYoaneSFPT+PS8liYPfQkqwHuy1lnlQNL
+k74FG2MeSUHSyZsw12BYLQ+OowV8HIRFtEvWFPrQMGd/MEZ+/iOW0E+DvN+9
+5yPNyOf3eBwfju6fqm0kfZ7f3tsJa+1+nDTDHOcdOZH/mqzLDrICYFGZpIm8
+7xkDl6WXYYlwZ/UNmOanO/AFFhyY77oPbujiuc9n4uf11Krrc+E7WYslNjB7
+qWpsGfJtfJzx33Uw/XCrhT4sd+F+MReW/ua+4RTmU4yIGdoG8z9fnZhEH2Mv
+Nwh3kP0XZqWTvp3NS1IiyPn3/KK7VDDvQqXHPPL8OzfxWthStP0EB+aW6jvW
+zWJTjz8V9LiR5/v2TX5XZlPLJwzkWSRP863+WPibAyNWn5x3IWQbEx6LKL2o
+RnxrjKMDp2o8GvoJlkztPuEKaxkfWz+IeemhG+eUwD3L/3z2HOZzT+y3mEXm
+SV/zDGZni5+/gpcoBo9KSH/fQkQc5CtbGZhM+kp4l829Dx+VM0tWwvnMuS0r
+WJivNevMQQbJX9g7dQ6eGHyvsoLkEb7YJoN+9pXlBP7o64Dl63Ww6XDxr0dg
+L7dpBcnwnZzDtRWkv/Ldooswe3bnrCck/9s1cpfh/rLG0a+w4BpPIxO2lZeT
+07PA+6Z8yWMTXJyW/dcquJmf50eDLVMYQTyYe4hyPYs8KdzWvN9gkaK1Cx3u
+6XwjzIDZO08nnsI8MZcVzhSR/fsf3J/E/JUz7kouwJIKq73t6Mvr3ftXxAnx
+dV/Oz0SPckLDszB/YWdH+gw2VXojNP4UWY+6lpivxKYcrYK/JJHz6eGzRIps
+Stmup20P2T9gt5kFL2Q2craS+/5T8vGJAhz1VH0dTJ2szqiE28wfBTuQebZ/
+tWmBbb4FX2KS84PVlJTwvENBvtoicl6MU/RReOLgpd8ZZF2scNQE9zt/ylDV
+J8/711pIYSa/pN+E7LdLGGxDXsWa7sW2xL39zHLM45/bIl5L9l/Qm52EeWkh
+d/3CSB6zqhFP9BEY9GY8mewPfqU2BlveDKuuIF6anmaP/qo7fdd0wXSPlt5g
+2LBBEDkJS9nXh6Jg5T63Kj1LfP9GNEzI+trTRfkeMHePv6MtnGXdIN4B099p
+3nuN84WOa3VPEvfrGTPglzt09l6Cm/v9li9Bvn+6Z8s2k+eT40v0kd+Nu8Kl
+k+zf86H6G+Y1++RJ64ETarwf/Il+eJE2vF6YihQ9OIc+TbOHWrthiaviriQa
+m/pgYyTpIK6Rrzs8HXk6Q66Q8/luOQ4X5TE/TWaTgJz/NfvexDTsn+TYniW+
+m3YvEea0uNafIHnUh7Vc4GoVnksMWdeWFzrCdfPUncNh9vECjWhYMc1+ZAtZ
+35HK+ws+Gn9otx+5Xzn3wn7cV1xamsUh3jgt2QJ5yqqn3gaQPIOXFOWQtyzf
+/HYYuc+rVvoSPsrvlo0j58Ud4JH3JbJCaUs2eT7uYU4W5m9d89eiatKfhu4m
+D/RTfTF7t5js9zrX+hwWWSvPmyD9rCitdML78f4f/AfHCvtDdI33wkk5ryw9
+YHq0Tc92OFjT/OEuWNLwt44pnGJz2fIMzP72ceVVnLdc6qRbT9Yt2e4yMP+B
+z75umPuG08NAHsGv9as/wAnjId0LkPfHLyGW/P/3DzT2/wADNNc5
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.667326901390272, 4.30940414848786}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwt1Qs0lGkYB/BZRUOqySWztQZjjJHFnHJal40vK020LiVyTUVmp8aoHFSa
+ynbshJzaVtFFOklDZSeUkVwWue2k0bp201LbSCtJbYrs/93tO2fOc37nne95
+n+d5zztjsVmyNkaLRqNtx4fE/x9ziqZHogVFo87IbzebwT3yoLWwf5E/qwxm
+uJt0y2GFR8SmRrjGLNt7Gh6lDKUf4cgTCw4GsCmacHLdp8XI927+3ozTxCKH
+47HwB3sJ7T6cn2poo4B/GelfomdJ0eSJYjnZl7Fod8RiWCky3x0I35Bsq3WG
+KWe7O4XwgTeFcifY37FxZAyO3tuQwIPVW1SZjsi71Xk4YTZMt9H+QgiPH3Fo
+e4qYvM0vIx3xgOTqEiWivCVMegqxPOeW6jAiP0UTehJR1KvdGYHo1N7Zc5BE
+99pwJ0RqIK07DNFtp2i+KWLUwihPHmJqqOCfuWS93mH4BeqZmyxYziD9Pbm0
+lMxpGfcok032Tah6FA179/cpPGFm2o4yK9ijddg0Cd4waOD6CvNg1/glVrDJ
+fC+Ib8OqicgRLdKPcUDiZZgTWKwdBCsevJVeIOfl9bj2Cnw062VmCezVkvZM
+i4P807vjVfBN6QlBILxhblfzR3hBZxD9LEz5nDV2wf6TfRJ1H2yeuHboRzho
+o848uhVFk11wMemC+Q37WVzY/KXNJOk30NMzainML33UsgdWGtzx4sPMCrb6
+Nuk7OcyXBStWqO9po67HJeqn08j/xL7J8xt4ZAXfoxeOP3EkLRhuGvZzvAyP
+7hifFwOvuTTrzxRYc25UthG+Ed+eGgDTfZbdXQWrDPU4drD8NVdjBnfTxBGG
+MM99qv8F9i9enrFoFukvxTvnCmwfEyrRI+srh2Q/kPMrPLedBfP9Y5K4cBxN
+zPyOzCt8l40G/Z5StgmTYNmbaJMy+Ezm8fWV5P2wQ5YZMHP2rglt9KfMfhu6
+C96z+lVdCPFzVqOYnL88tUABC2Jrl++F9d8ai3S46FfTFn8aHq8oHQqC6759
+3aWCC1IYAXkwryaxXR/1FNqXbuqDmQOt7cFw4sP8i9rW6MfSIqcIHpshOmkB
+965K3jcFf9Luufk13BKX8asv5vFwjarAGmboTKXnwOn0jteGcN2EYrAb/ivv
+vu048su42QId9MWmzTr/O6yOTXflwG7yZ3akHvnPAyEOcHuT8pMEFhoN7LQm
+52BU7LOS1Nvfkz4HDnSijNhwTnBu2yDyl/qKH+vC5q5x4VfhzKjAfdNW5L5d
+dIqDPQ9sHZxJ1vtMnpF7Xv99ndYiUo9dka0G/Rg1t1avgJWHUlTFsPo3g6Ek
+mFFaxyf3JOG5b2QVmWeoliX5nTFf6Gami/7U17KOuZJ5hfqkRcAKXkckubfv
+je8cLIfj60s9BOT7sZxuXR7m6fZ3jQjes1+2OQSOfzHPOg8eEJlFnyM+WVbV
+D3NPmZf1wv7zLXtsUa+XlPVOywb9VpznSUn9aseWr2Dm6swPHfAtRcldK1jT
+2S9lYz7L1OUNLFjI8jHdBhdS8ihdYrPu6kvw+yiNjwb5eZwts7vgsbG7mhpY
+VtBRNAqPBF+0OAb3Tq8Ln4CdXKest8DC7sNfviL3xDmX70zqvcLU/wPm3DNy
+MIFzDCr3k/wbjl3PpsHyxuEqCaxnGG/6HvMQTpW1k/ONdi7JnSbzU1d4v0T9
+hakF98n7oy7jk0Xk/iUx8yk4v7IqTwzPvC45mwzTh8dkrvBYdVNWNannkUhs
+AksDbkbooz+BvGvhTLi8NWvdJphxy8pvBsza8dN6Jayc4XbaGN6ZlWs9ZzHO
+Jag2xAWuGXS7FgZH1csqJbAwgE7lw/nN7g9KyXra9YYe+L+H8/n/ypb6F1+a
+WGI=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.165661129127848, 11.57565554834886}, \
+{1, 0}], LineBox[{{16., 17.00000000000231}, {16., 9.999999999998607}}], 
+        PolygonBox[{{16., 14.1}, {15.6, 12.9}, {16.4, 12.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.9452, 13.5}, {-1, 0}], 
+        LineBox[{{16.000000000007276`, 17.000000000003638`}, {
+         10.000000000005457`, 13.5}}], 
+        PolygonBox[{{12.48173265946094, 14.947677384685548`}, {
+         13.316718930329426`, 15.897834175673825`}, {13.719815750748694`, 
+         15.206811054955079`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.823799910437668, 15.984057296392571}, \
+{1, -1}], 
+        LineBox[{{16., 9.999999999996362}, {10.000000000001819`, 
+         13.499999999996362`}}], 
+        PolygonBox[{{13.51826734053906, 11.447677384685548`}, {
+         12.683281069670574`, 12.397834175673825`}, {12.280184249251306`, 
+         11.706811054955079`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.823799910437668, 11.015942703607429}, \
+{1, 1}], 
+        {PointSize[0.04], PointBox[{16., 17.}], PointBox[{16., 10.}], 
+         PointBox[{10., 13.5}], PointBox[{8., 8.5}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T3", " ", "P1", " ", "N5"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbf/cgdhef/ifghgihi.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbf/cgdhef/ifghgihi.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {22, 22}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwl1ws01GkfB/B/EuM+shjlMmxCSSrFomaEciuzIdNd7ktphFJrmRchEkq9
+FBltWxQx7WxU1JRLKlpKbql3WvQS1VC5Rb3f57xzjuN8zu/xPL/v7//M/xyG
+/ge2BMlQFPU3fshvavI7PgZsikZgyKZc7DOn9sDmH4XXvzPZVKtCjvl9fTal
+3Dgbr4J6ky7johkc6uIYbwYzYn+RL9JjU70OiXJesDTaJngxnBZ4sjENtql9
+11+ny6ZkM6qfNcFcLZ1TR+FK/wW1dCM2Ra/rW+tB3MkR7YKZP8oG/ARPOjCv
+lMFd9bVMB2IWK3yarN/+1XkvXM/bNeD4I5syDVTcfxa26g63TIEH555d3Av3
+e615cBdu+kW8Yhn6sUxNyBiGOTm5d5NgWp3CfKVF2O+X1Kpu2GnWMUkXzi4O
+ViX5pKYVdw1gKn6Qtg+OvRHrqwlX0jWPF8Jpo6szv2G/aqPxTbeIubr2r2Cb
+xp1mNfCJK781/En6ydE0vQT/oCkcTYYFj7Ou8uC8owPNXjBXXrzPCBZN5/F/
+hFsP9MTdQT8cg8KlE8hr6bjNkEXm+UVwuw2utPl3hRD5ythWdX/BaatoPgzY
+tE474A/iefUvYhci17ZY44twifsFx+4FqL8I+UjmGSsTJGTBnPH0zw2waQ79
+rVAH/UkyRCOw2ESosRr+fCRyDhP9MLffPNPCwLzDMlR3w9lKbbfi4cBbq1Mv
+wfQ8s7NusN8zrzIpzAv5+mEFPCNSOczCvMTTfeZWcE2e9r1MmDm4J9ATdrlR
+5N8F+53QiuDDIvrQfl1j5NsuVq2Dq7svsH1h3vrr5vPRj7kJrSIFLnH1oIfC
+yupH9Erhwb6Isrswl3M5txam7+p6p4Z8/d09LXWw5LHFlA+s6xuzpgbmvjhz
+KgOuPvKvd1fg1li39WWwX4DwchosPTRxXgTLrgu94Qc36X8Nvghbeg4/WEn2
+m/71djSc62fcPQcWXxuimcMz88oXtiFPSRh3wWP0Q7v6/vrvcKvSty8/w71K
+4ZlxMH/HyJ2HyOddpem/m8zj4TDPEnaanxnsTupi2r0cbZyrPL3BGeaEfSkf
+1WJTcS1vlTeR/Rqatm6F6zkG8wNgSeV/zjZo4rmvcZhJgSf9Kxqc4BNzV92v
+InV7q8iuHzDHzW6iT+R++3ovSoZrvI6etyF5uGq2bjDjVvyTJJJX+c97S+Hk
+V4Wuz+BQaWaIKRwY6jvKXIzvQ9/DE+tgj41GBftgm3fLXcJhfqCj6w3YZclE
+7lW4ekeD40fY8lxq0gQschc6GZqgz/yxwx7ob9KvK2sDsdEb3u8wL/mBwm7Y
+RifZaxz2cCh3DoE5EfU2LOTl275L9zch75e+qljY6uC2Ng6cl9C75ALMHVz6
+1ypSVzMdukbW6x33V4FNk6djimBxPOOoBP3EOt8sOgy35j76WEG8WTbLiszz
+bPxAPMw3aa/vxPkFppFJHFJn7ZQPhO0/OLeawDyGIusV8vQ/f5guD3NLdZ1d
+4Fjz5fJj5D4WcC9f1cB855epD5H7W9m7UxHmyJZ2vif3WyUzef98fN8qBroo
+/D2T06bSo86moosXvzEk+6ccOugDe/Q9UiTnt74M5/XTMfdWg8fHYU51Y0s6
+3JQ4SbXAk2/mmbnDUtsIHW3kFTClnYvhwMT8xUEwr0vYoQdH6+YoiODJ1WpN
+FjDt2Js8yhR1jRI5X5hRm9a0ER5MO9h4CmY+iWtNgWN76pxewYKxF553YKln
+quwK9GezRRLWB9uISjTSSL+M/H9m4crFTlt7Ye7NiEWKZth/d/9zE+R1Yv/2
+Mw3OG/smE0Tylw7bT2E9t/2zahbslx2/9zXMvm2keREOdet/egu29P7mcx72
+8LysdhL2o7f7HoHpixQUdpN+hBFTdrBuBq/DHA79UBPVj/OlOVoXZ8n9Gt3j
+FgP3Ksr99hz22zGwdAx5uo5tsRHCg+lr6/bAn3fEOuTDlaFRUylqmN+FK0mZ
+MKU2nrhBFff393jPLJhfH7ZNUQX3KTPErQi2lHkf91oJ+8eFB9fC7LFkg6eK
+2IfW988gzPwjQ7tPAfP3+OrDJPk07AKMYfHM2bt7YUlaTt05Gt5vuqWFV2H+
+m7SoDXCZU5PmJMmrb/fdFNb9O0xtI+Zn6T9lz4Z7nef45RJblIWmwoIIaqwX
+pnsb+k3Aeaclw3pLULd3n03BeftUjdu9Yfaa6eNL0R/19FJlAiwRbd3YDYuu
+pBkUwgK5MJlk5LnUUxdaBvP6dl83UCb3ZklqOVxZ83JGAAdaC02LiVNGR2bh
+zxNdf6TB4oAcVwvMhx1QKg0i1vFQNyc+tiDODpYuW/vgE9ZTifp6ynC21D8l
+GY5zbX/bg/4FOqvWSXC+KODK3Guw5NFAqBIssHDJTCD14OJhZTLfG4eCdsB8
+I+/b75FX+WuWugMstkgNrpbHvTS+dm4l8ZA4P1YO38eG7qgVcKWPaqLtPDY1
+Ut4Wsg5masxYK8riveU1eHIbnE07b/xJBu//xtebEkn9APPQ9zlsqj0hc1cV
+2a/a6Yw1nDes+nIc5szW1hdTOG/o/J51yEO/s6DFAZ4xH9HPIPNl/reFAfMH
+8xV7yDxyjy43hj06miZNlmK+55hV/rBLsUlzJMxXKqx5DMtW/HxeBHO0g+K9
+cZ5yeNGL9zD1bW/2F3iw43TAQnOcp1a35yL6vSTadN8O5udub9g8F8/d77r6
+Zjjbx63oA8zIcDLbAreWhIYdQl66VmS2C8xOf/L8Jcybcy1uJSyYcrPTwnxm
+kq3vq8OWvulMA9jeUbt6kPTbYhIzhvXsKfdFt2H62NzWkzBl/EH1OOm/QSfh
+C87b9+CJgEv6tZh3eAkcaB4zvRSWGMobWqFf0Wqhshyc3TWrsBB5BJc9ooYw
+H6Zr0ciz7ywqu3ShdxeZV5Kt2GeWRTU1PnVsJ/fTZmNzxzSL8g77tOI1uc89
+HwIjJlmUzVq9XeNk3pPb7q8aZ1Htm5966pLzzFQ67D6zqGYn57ebYeaDTve8
+MRaVqzm48wQs3scTbB1lUV3VucHPYD+75l8TpCzKZW2tqz7yi12L12vBBTdf
+y+wn83ofP8yA855cCLsD+5XnM/iwVWH5LrllWN8sE8PCftLTUf1uMNOtnLMB
+55kGnuGmwPy9qVH8TyzMKzrlJsx2tNbrRH/JdjKPumGBeseilejf6Vym/key
+fnnkkiMT6L8zdvU4TP1t+yQXeT1S1/NInVmw8tGBKdTnlEhewpJ5FdqT8KSG
+oW0tqYek3jPAvOJYe2rOkPrDwqxXqDdpS7RCyfk983OWwTMPpzZYk/NCQn9S
+x/6fr6oeJHkENAY3C/3Qihtqu5BXsuiY+E/0WyC/zlRIzEgVnUS+wKI1/qfI
+PE4MaVlhHpPWcuXxZF5sJUn0MIsqaf7h7mHigqriqLd4Pux1paQuVk5wPvMG
+zy/a8vlpcn89oh6r9+D5B0eO3CROCdH91Maiao54fHkLU9LIRMtG5DWMcTMi
+82jaPzh8k0UJvt+9FUysqxitLmBR0fIDhUJi8slb+///c5ax/wedUK1J
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.6273814311035784, 11.151823299819789}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwt1gs41OkeB/C/O60YGbfKNi5dFpVKUWimTdOFahYt9lgGFZ1aplUd5DIR
+DyWJCieH2YTQhVJRYlyKTTQuleQIjVxSTTEat+z3PXs8D/N8vP/3fX+/33v5
+j5FvkPM+eYqibuKXfP79h8Gi/vdjxKLoHc9e3l3EooT1cy/cw/8VV4UYuMI8
+F9rZY3BisH5B5/csSjak0cSEK+oCL+6C07VS8nRgm2nrgVJDFtVjxMsYRb/2
+wm5XbVhwtMK/Ey6720/xFrIo/lF1jR6YlSQ1aVnAouKprFw59J8uKH9gB+sX
+1hcx4KfOjbZl82GFUkVHeFvPwy3bYIa+oXIkbNkpd0hiwKJUnxxNvUueb66T
+vw3TzsywP8NOpRvkzsH6DRlZZsiv9I14LIE8n2Vq5g2LOBEqmbBNe1PZaVjR
+11qvDhZNrYu5Do+E6fTMwIJdizg18NjJ1VYOmH/wwoNzDbC7hgHrHLxtuXVY
+FdzAznnZTeJ7sVs5H+aEBNYvQT7Fp/gzUfAhheIlfrDAtHzAEfaMs8pNglUP
+m02ok/6imJYrxLRV0keIXxR82uUy3JHdrRYGq2Y36MfCyxbK51nArgYFQU4w
+1/BWWg3qOX25jDaB+VktkY/WwbJghs4ZWHQxml6BdRq5IO38jsQnqep1g20i
+aztCkR+jzdVHAz5kneXbpc+ikv89ub+PrFv/Y7/1sKXmLdZz2Cr7JC1ND/V9
+G5/7Dh6L3HB+Shfr6e9ZTkf/Ora06hAs6vZf7AmHO1x5+EkH+2nUw6EM7pIb
+bYyHLV8XepsgPquHbGVbmHVPdeoiPDJdbatKLJukKyO/9OEDLyV0FnWVmya1
+h9VV8jtHYZ7gbE0QXHojYFgDzzOqnIPSYdkB+8CNcLH9Y/87sDDlUVUE3LBy
+5606mHFRI6AeLlvRoUbqa/Xtur8O4uXF5X0kz3NF/bE+MFXz+loaqfdQ5eVc
+mPs8xf0g2U/53SpdMOP65arV8OCxD7dnYUladg7Zz+LRwkx11KenbLvcLtim
+mS0m7byjVqtKkb/dGvvZl6R/voH5fNj0RnXDeVgQEDsUh3ralBSctCbjrS6b
+KweHxFU015D6fTGKT8K5sfN3CNkA88omtlvBRzzz9+SgHnzBjMI4OUev/vgm
+DzOUyqXP4fDx3056a2O9etuftcMWP+cbVc3DfI8nCz+Tc3ZQY3ApTI3VaJth
+PP24A7xsLdTvvaZ5GLz3fm6yGcxStnjVBYuClBc20fD8eSUtJ8TH23q9OAEW
+7tZiVMMWu7Qv+MCc8dvKa0l+A+vzXWEWP6ddAF9T43mRdv4/wxW/wWOJqW9O
+wgxuawsb9VKtrDF+QPrfd4o9BtPHEpfNwlxJ360E+GmT2NYR8TAcFP0jSX3b
+A+0zYJ63G4vcU8I2x7E+Em905RF1+EjFWq4xyc/Kq7oA87nqlqo6wzzjULYl
+TO9y3vIbTCuZ4eQi/nQn4+M8uNgila4JSwxcnDxIvQyrPY4g/4Y9ofeWkHa3
+ANMu1I9idJi+wnyWSuZuO2HXACWf32HRgwT3ZpyzihLzWCnJJ2xf5V7YU2bc
+vB8W/PKjog58dXii4aIm9ouKAacP57DHTWTprIF8P9dta4YDtLt+UJ+LeC9Z
+Ua9g4Uolw5bvcD73hn+h0J8rXNN3bQ4+6R0Gm+GO+ZMmhWpkvVN0L8E2Mc2t
+Laro/5/HAQrknsjRuWmmSp7/WnaU3EszNEmZCp4/8MT8PZwcwVaPhBnViRWe
+yFfV2S4vBE6mt2fUwunqsVlX4B6HiCgDUq8Aix1TMH/aS82D7IfxO0+CMT5j
+T9BkBCz7fnGMAuKx/FxyJBbmCFSuZMFcrbmLAkn/VKd6GxL/+3nWNnB8fm/q
+I1jY036mH/NRhgXc9ci3J3I4KBQue+fbnEDy3zcYKkO8jKQMzg1YtCD2HwFw
+SHR0lgDm70xKfIb8k4dnlH6FeZaJX61gqvdgZh/GtzQLzcom74FXz3asgYvt
+ftyoC/PfZJe6ID7RiufSLNx71NCpyR3Ih2p0lm6EOzhensbIV3Ioef0kzrmg
+or9SrITxyg+7tcGySO2FWYrw+laPRphT0i3+RQH70a/6dq8eOWfUr0vlUW/d
++q10jBcvrzGhIYf5TotivOFBP2b9AgrtT12TK2GROOp50TcmRZVsSjZHfDyf
+S9y4GSZV/GnvRxI/JT4c0zTNpIQZzqV05MdR4MpOwKzQne+iyT3vP/4iC5b0
+BL95C9MOPm03QH+eG69gFeolzHdpegsLdX5w9If5jUUJQ5iP5c+dcwJ2H9Dx
+noN4uOHizHCYtnJ7eh7MsHzM9iDtLa+n7BA/j68q1oNlL0x9q+Eexvb/3sd8
+MkZr8jLkK3zwVYUN8/wMnwWQ/GWVwZVkP99dvD+MtO+5v9QMlhk2K7vD3Lyh
+1rPI3928W3OWjH9gKngc9eP51hUHwZLWiem9emTdlw9cQzyiwcyvvbg3e/7Q
+uxkyi3rJplYEk3t0zF7JidRr3jw/Q5ijm3hvYBLtLSpzxLhHaSm2p31lTIo2
+GGn8J3kvbXL72i6FL9gaNJH3StedXrdRJsVVjq/9CIsMt/ys8Bn95TMDzcl7
+74x1aucHJiVi2ytEkfkP+n3kDGM+cbWtGBZyPdvjBphU8ljhkCviZR3TPH62
+H/VlsLY+gRn0og3BYvRfMM6xR77CfxUuWkl8VsE4H+b7vde6Axdv9toth/pw
+U2qTRtC/uDbIjk2+l1gcH7mN8SWjJvsOwyy7E7p9Q4ivmZ8RRdr5oUXbRpgU
+I+zO0iBS78wNPnc/Yr13HfvCJPu9KLM+XIJ8FaN+HyX7LVHidRj50XYvzUkk
++//dqUSTL4hHqvZak8ST9afzCZhn/iglmqzHRkojgrTr1y98T/IXpC/TIO2N
+3T9xiJXDE1dhvGST7nXlqB8//2la2yfMv0SabUHea2KV2QjExws986IY7y3B
+puX3wgeZlKWhE9sRFuqyFUbfov7RJ9ZSMGWa5qXbDW8uT2zFe03o+lPtYBvG
+2+FSXAtTy67e4tcyKf4Ho8A27f9/r+U9/PuTzvoLN7T2Kw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           
+           9.996694214876033]& ], {4.016469192730548, 5.934756130901607}, \
+{-1, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000001556`, 17.}, {16.000000000002885`, 17.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18., 17.6952}, {0, -1}], 
+        LineBox[CompressedData["
+1:eJw91H1ME3cYB/B2dhtvS4skDhtmy93JcMy2dwdFMJsPZWKJIOVFrcjkpUCY
+lE3n2Ox8aZMFtqEgiK7qCiumgQoaOoowDS91dkx5ETWYoSJ1sgaJojjE4SRl
+v+6P3yV3l08ud/d7+T5PaN5naQWvcTicVHR67+8vQReODDj/HxQcn4V102Jk
+x0/hizEUmOy9Z9M2IPvs9yfyKRDTr7Ym70bOiU817qPAqZPMdZm8Li4cOkiB
+3fV4fdHvyCcyt1aWUCBLKFxNPkVWbTvgUVKgv1UzMRtIo/+ldB8NokAwXH81
+UoIsHmgeu06CVPqmyaZAVv+YlVZGQrpFL+rchLxmxI8rJyEPpJPhacg+NUfl
+DwnYq8oo1iUjQ741rIGAsLulyU1xyGbuYE0BAU2PMlIiZMijcc/2xBCwoOoT
+u4Te72dtcojQ82a3/d4SZIPPuERIQM1mXVT2tHc+kXMrVhHwHqchsPa2dz4l
+E9UbCVDfXVn1dT+yYcEvWk/Aw8FhXd8l5OqMpDoHAfZfLWsvOpDnTxH5/iQc
+Pv8xvewKspV/8FAmCSdutw77jXpt3n7FSgKXsy83asb7vivHNUPCuEFb38j3
+jmdziWc1BaHLQ8/8HYk830jysyiYFh3RJO5Atvm6F76ioPKjPN3x75EFSdVT
+egrePmwKMLcj7+3bn7yHgjB9SIP8HnJwXCUnnYJFOa9bxWWAsyu9NyKUgnfe
+8L3AiJDNLRLqTxImDULtoShkzvzrjJGEwUJFR0U8svqFZIOSBEFd8CdPlcjW
+gjPNLwmgn6nN/gnIskam3kaAJYcf17sW2XZTyfucgG9vFXmKIpBVpsoABQGl
+Y7Hua8uQ4bLoMUnAA543d8jB/ucblxOgDf9NSE/R+Hmm1Mg1jtD4/Q8sMz3g
+pPH3bUFN2c8v0Pj/du3kD4JOGo/vn9PdiaVdNB7/v9+4a7/op/H8nJ4XCUP3
+aTz/B0OvFK0eGq9PXcXEjqsEg9fv7AHNbPZGBq9vhqOufOeXDF7/53/tMnU0
+MHh/Lj0a3/LWAIP3z/1dbe62GQbv72Xfsvp+Pov3PzFCJZt7l8X52JJy+tpU
+NIvzI1Fsd65fx+J8vYyWlcd8yOL8FUvu7C6LYnE+O3nZT7RhLM5vamt5v3kp
+i/MdmylMIhYYnH+3PcYldjO4PkJWtNhGhhlcP12rKtrUPQyur53tLcfK2xhc
+f3rn9eA/zjG4PqtyDPeVPzO4fo/dmdekdDO4vttjc+UDNxhc/xrppyEBTxjc
+H9p6Tt4cE7C4f0hWBl00rmFxf1k8csMvXsPi/mMZ5VnbqljcnxJSIf3cLyzu
+X0mBvY6lLhb3tw6uN3+RuP/9B3PT46g=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18., 8.354800000000001}, {0, 1}], 
+        LineBox[CompressedData["
+1:eJwt2Hs4lGkfB/DHkgYlp2QrGYNyikEaEU3IKZVNMlpq8o5TVCqVsFFUEkKU
+YzsVosQkCSmULWWsKZPklWar3dSmJskx9X7vrrc/cn267+e+v7+vx1xddAN3
+rg/6iaIoBRmKIl8pGvmLzqZ+/NFlU0xu+841MEd+/pQ6TD3e1V4EawVMrpsL
+R46Vsj7AXOE5UzW4OM+jxw5fy+YIYyfx7zXei4YTYZsstb5uWHhgSrMVZp80
+zi8hz5kymROwW95FfhisIs6u0Gdg//XpXAM4VJWR4ghL+BHcGzr4+uUYz5vY
+U36TDsw00YjxhamurAXHF+Ac05KydXBzrJ/CpDabGp7fFWgPJzjcmxULz1jR
+XcSAM5JG9ynDX+tm1svAKmffZNbPZ1Ntbznc5ySfNOREPFxGq91WBwssMhwC
+4R6T+7U5P/Kf1CGWezwmHw17zZFZehCOiFZ4sRVutlc0qoHp2/k8H9LT6gp/
+Cve1imOdN5D1F70LNsPJp5KKtpDnW/Vf3oej3DuG9sMJTWqJLMwj9TUxKCK9
+6/Vml8Jso4aoP2GpYslVZcwfZbc0RRH5vayOPAyDaRk3j5H5qYXGe6rh5Eea
+9ALSh02ZwWvY2e3otXfEHVTsJJydlxhpp4d898t8RmBO2dd9KbB0+fhkFxzh
+4vRVDFNXV+jmwH2rhrZr6aOPqK99dvD7X9Wz1sNeTxsz2pFPnP35/CFY5N1z
+y43k1/EIKoYzInU76jAfzb+Q1UDWcz3adWG5lgVz78L8NZ7aKehLvEVQ2QRT
+jb8xx+bh/sxPzKtwpKuL8W6Ys+RZcB45z9u7YGou5i8/nhJD8gSq2v4OJynF
+mvnC9GvCi5uI72zUtiT51nOcLGHPxZosZbJ+dZfSInhAQ2vNB8zH91qfZQNH
++A5++zHvDUXZIJijl53XCme8/Y9NOVm/0jBxG2a/N3pNIc8wFXngD+LB4dZg
+uK8n6EkPLKp89EYMC/OzF4/D3MCcIWfMx06u/WaA+1UKlu8RwO+jrxhtJn3c
+3stURR8qVxJl+HBzROj+rbDXaj/uW1iSORhYCG9IXnaHZYD3o/yW1m047ngy
+LxkWULnjd+G28EOhPTC7gnanAk71nj2qvxD5WVb50XDCyDZeOOx1rE/dCM7N
+cPylHGanCjVbkMc/rrCtD2Z6/NZI8laEmXPkFiFP5vP59ZhnzDiOoQML/MuU
+9eFWpaK3psSSiP4T6Ieqdlczg/kFT7+P/Ez2vzurR5430LgVDi8xGmXMgtma
+rIGPWmzK8PaqqiHcJ8k7kpUM93hY14lgae/CjmVwdNVPo5dJ/kKfffJwrnWz
+6zFY5JA6WzoH5/AKjgTB1OZtbSNw3yuzEHcyX4Ljyp+x37+ryN8apn/Y+nQD
+HHFMZ5cJHJnnWlYCU3X7LRbDKqdN2uSRj96Ql2tH+gg+EL8bVkkKlfWFm9Ps
+s17CA6dNTeNJP6GK6V6Yd0P72OJrcILVsbm18NcZ4pOfSL4rDW4z0U+cqrav
+Dealm1k+9yL9PXSkH4EpneDMOLhmXtHyJ3CGhrF7GkxX/dRlYIj82qnLDsEi
+8dT0KJhNs//uS963Xh+tWzDXL+yCGiz+927SN0Py83Yv/RruL7yRZrrUCPuZ
+e8MdYJFwRlggzHWzHr1B8hv+wjgMS6wYbQawhkd7XzYsHXspn44+UmW8m/LJ
++rJruqPoM0q6IpOsM7fT4kJI3/9cFiSS8+2aFvytyabquH4y28j5FrURe2Hp
+Vo0n7mQ9JPHFfHjA9vqfBmTdNa2zfzY+jx6at1CwwI/tcQvW6vZIfY78zKrw
+sTpik7qx23DzZ1nNR7Bbx5qci6QP2ZpYWZwnZKmdyYMjr9+t94Sdwy7dOk36
+sZzmVEbu++OQPd+QfD5eLVFB3rjYRkEtLHAK74yHk3YJZvWSvqQ6fh9hqZzT
+VQXkUemRfcrB/PO3LPJ2JnmTHhnWwoX/njZKhvljvvdk0NcGheYvj0kfn4rk
+WKQ/Rpcuwxj7jZZ5rYdDP6/7azcsmfju9wtMxX33vgMnuPxjZQUzOX+XzzTB
+/txC/zGcL5wZ4rIelphz68/DA4c+SdJMyPvnftCavK/zks7dhvnDbPnryCsM
+b2S9gkUzMgsXwjQ1x38nYOmCm7YZmD/1xB/F00zxPpV32I+hP1ql7kdZmB73
+QjMI1pfLko5gv4pl1kSfBu719/aXwM3Hj58KgrnXAgPumJDPE/5NWdgtkRf7
+O8lX77nipjq+D/unx8bAlJN5ZTrMLdput5Gcl6FqFw+3sjyzrEm+gx8rUuEN
+9MOG88h5d25vvQ4Lm/o5CiRvjjhwBJaa16n9RCx4d3w17hNnNrXIw/SULzVV
+sHDlyuVapI8OZ3lt5F+SVlm3lKxv6VicBvs3fn64lfSTp1A3Ppt8HjWG5ZL7
+Np/e7I8+MpwCJ3tgZmHRxiryfj54H6aLPiRKtnmDcOTkPPudsFR1NUMdffrn
+rKpvglW+lzK04cIHsTIqizHvM5aeIuxl5GMXAKvsWD2nF8/TvudUF8OCCxYB
+6XCc3NTEK1jio3vFiNyXnqr8sxncu2y0CvmG7Z4EO8Kiwx6WC2FR1TSVLXBz
+633tLMw7JveoZgcskBkZH0c//s5nzu+C2Z/bl/FIfzaFf4SS/foBlk/V2NTr
+zXFFPuT8gJvtHFjUEGlsC9N9TFgfVDHfEk+xFkzZuFQWwLywcM9h5OMPWTjw
+4IrHyhGdJL964jl3WHT5rsoVMp96sbEneV4td+wkzEzrbNoGt9k8+z2GPF/T
+OXAezrWYztgJZ8Q8HZTCzS2HdIhVYoaneSFPT+PS8liYPfQkqwHuy1lnlQNL
+k74FG2MeSUHSyZsw12BYLQ+OowV8HIRFtEvWFPrQMGd/MEZ+/iOW0E+DvN+9
+5yPNyOf3eBwfju6fqm0kfZ7f3tsJa+1+nDTDHOcdOZH/mqzLDrICYFGZpIm8
+7xkDl6WXYYlwZ/UNmOanO/AFFhyY77oPbujiuc9n4uf11Krrc+E7WYslNjB7
+qWpsGfJtfJzx33Uw/XCrhT4sd+F+MReW/ua+4RTmU4yIGdoG8z9fnZhEH2Mv
+Nwh3kP0XZqWTvp3NS1IiyPn3/KK7VDDvQqXHPPL8OzfxWthStP0EB+aW6jvW
+zWJTjz8V9LiR5/v2TX5XZlPLJwzkWSRP863+WPibAyNWn5x3IWQbEx6LKL2o
+RnxrjKMDp2o8GvoJlkztPuEKaxkfWz+IeemhG+eUwD3L/3z2HOZzT+y3mEXm
+SV/zDGZni5+/gpcoBo9KSH/fQkQc5CtbGZhM+kp4l829Dx+VM0tWwvnMuS0r
+WJivNevMQQbJX9g7dQ6eGHyvsoLkEb7YJoN+9pXlBP7o64Dl63Ww6XDxr0dg
+L7dpBcnwnZzDtRWkv/Ldooswe3bnrCck/9s1cpfh/rLG0a+w4BpPIxO2lZeT
+07PA+6Z8yWMTXJyW/dcquJmf50eDLVMYQTyYe4hyPYs8KdzWvN9gkaK1Cx3u
+6XwjzIDZO08nnsI8MZcVzhSR/fsf3J/E/JUz7kouwJIKq73t6Mvr3ftXxAnx
+dV/Oz0SPckLDszB/YWdH+gw2VXojNP4UWY+6lpivxKYcrYK/JJHz6eGzRIps
+Stmup20P2T9gt5kFL2Q2craS+/5T8vGJAhz1VH0dTJ2szqiE28wfBTuQebZ/
+tWmBbb4FX2KS84PVlJTwvENBvtoicl6MU/RReOLgpd8ZZF2scNQE9zt/ylDV
+J8/711pIYSa/pN+E7LdLGGxDXsWa7sW2xL39zHLM45/bIl5L9l/Qm52EeWkh
+d/3CSB6zqhFP9BEY9GY8mewPfqU2BlveDKuuIF6anmaP/qo7fdd0wXSPlt5g
+2LBBEDkJS9nXh6Jg5T63Kj1LfP9GNEzI+trTRfkeMHePv6MtnGXdIN4B099p
+3nuN84WOa3VPEvfrGTPglzt09l6Cm/v9li9Bvn+6Z8s2k+eT40v0kd+Nu8Kl
+k+zf86H6G+Y1++RJ64ETarwf/Il+eJE2vF6YihQ9OIc+TbOHWrthiaviriQa
+m/pgYyTpIK6Rrzs8HXk6Q66Q8/luOQ4X5TE/TWaTgJz/NfvexDTsn+TYniW+
+m3YvEea0uNafIHnUh7Vc4GoVnksMWdeWFzrCdfPUncNh9vECjWhYMc1+ZAtZ
+35HK+ws+Gn9otx+5Xzn3wn7cV1xamsUh3jgt2QJ5yqqn3gaQPIOXFOWQtyzf
+/HYYuc+rVvoSPsrvlo0j58Ud4JH3JbJCaUs2eT7uYU4W5m9d89eiatKfhu4m
+D/RTfTF7t5js9zrX+hwWWSvPmyD9rCitdML78f4f/AfHCvtDdI33wkk5ryw9
+YHq0Tc92OFjT/OEuWNLwt44pnGJz2fIMzP72ceVVnLdc6qRbT9Yt2e4yMP+B
+z75umPuG08NAHsGv9as/wAnjId0LkPfHLyGW/P/3DzT2/wADNNc5
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.667326901390272, 4.30940414848786}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwt1Qs0lGkYB/BZRUOqySWztQZjjJHFnHJal40vK020LiVyTUVmp8aoHFSa
+ynbshJzaVtFFOklDZSeUkVwWue2k0bp201LbSCtJbYrs/93tO2fOc37nne95
+n+d5zztjsVmyNkaLRqNtx4fE/x9ziqZHogVFo87IbzebwT3yoLWwf5E/qwxm
+uJt0y2GFR8SmRrjGLNt7Gh6lDKUf4cgTCw4GsCmacHLdp8XI927+3ozTxCKH
+47HwB3sJ7T6cn2poo4B/GelfomdJ0eSJYjnZl7Fod8RiWCky3x0I35Bsq3WG
+KWe7O4XwgTeFcifY37FxZAyO3tuQwIPVW1SZjsi71Xk4YTZMt9H+QgiPH3Fo
+e4qYvM0vIx3xgOTqEiWivCVMegqxPOeW6jAiP0UTehJR1KvdGYHo1N7Zc5BE
+99pwJ0RqIK07DNFtp2i+KWLUwihPHmJqqOCfuWS93mH4BeqZmyxYziD9Pbm0
+lMxpGfcok032Tah6FA179/cpPGFm2o4yK9ijddg0Cd4waOD6CvNg1/glVrDJ
+fC+Ib8OqicgRLdKPcUDiZZgTWKwdBCsevJVeIOfl9bj2Cnw062VmCezVkvZM
+i4P807vjVfBN6QlBILxhblfzR3hBZxD9LEz5nDV2wf6TfRJ1H2yeuHboRzho
+o848uhVFk11wMemC+Q37WVzY/KXNJOk30NMzainML33UsgdWGtzx4sPMCrb6
+Nuk7OcyXBStWqO9po67HJeqn08j/xL7J8xt4ZAXfoxeOP3EkLRhuGvZzvAyP
+7hifFwOvuTTrzxRYc25UthG+Ed+eGgDTfZbdXQWrDPU4drD8NVdjBnfTxBGG
+MM99qv8F9i9enrFoFukvxTvnCmwfEyrRI+srh2Q/kPMrPLedBfP9Y5K4cBxN
+zPyOzCt8l40G/Z5StgmTYNmbaJMy+Ezm8fWV5P2wQ5YZMHP2rglt9KfMfhu6
+C96z+lVdCPFzVqOYnL88tUABC2Jrl++F9d8ai3S46FfTFn8aHq8oHQqC6759
+3aWCC1IYAXkwryaxXR/1FNqXbuqDmQOt7cFw4sP8i9rW6MfSIqcIHpshOmkB
+965K3jcFf9Luufk13BKX8asv5vFwjarAGmboTKXnwOn0jteGcN2EYrAb/ivv
+vu048su42QId9MWmzTr/O6yOTXflwG7yZ3akHvnPAyEOcHuT8pMEFhoN7LQm
+52BU7LOS1Nvfkz4HDnSijNhwTnBu2yDyl/qKH+vC5q5x4VfhzKjAfdNW5L5d
+dIqDPQ9sHZxJ1vtMnpF7Xv99ndYiUo9dka0G/Rg1t1avgJWHUlTFsPo3g6Ek
+mFFaxyf3JOG5b2QVmWeoliX5nTFf6Gami/7U17KOuZJ5hfqkRcAKXkckubfv
+je8cLIfj60s9BOT7sZxuXR7m6fZ3jQjes1+2OQSOfzHPOg8eEJlFnyM+WVbV
+D3NPmZf1wv7zLXtsUa+XlPVOywb9VpznSUn9aseWr2Dm6swPHfAtRcldK1jT
+2S9lYz7L1OUNLFjI8jHdBhdS8ihdYrPu6kvw+yiNjwb5eZwts7vgsbG7mhpY
+VtBRNAqPBF+0OAb3Tq8Ln4CdXKest8DC7sNfviL3xDmX70zqvcLU/wPm3DNy
+MIFzDCr3k/wbjl3PpsHyxuEqCaxnGG/6HvMQTpW1k/ONdi7JnSbzU1d4v0T9
+hakF98n7oy7jk0Xk/iUx8yk4v7IqTwzPvC45mwzTh8dkrvBYdVNWNannkUhs
+AksDbkbooz+BvGvhTLi8NWvdJphxy8pvBsza8dN6Jayc4XbaGN6ZlWs9ZzHO
+Jag2xAWuGXS7FgZH1csqJbAwgE7lw/nN7g9KyXra9YYe+L+H8/n/ypb6F1+a
+WGI=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.165661129127848, 11.57565554834886}, \
+{1, 0}], LineBox[{{16., 17.00000000000231}, {16., 9.999999999998607}}], 
+        PolygonBox[{{16., 12.9}, {15.6, 14.1}, {16.4, 14.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.9452, 13.5}, {-1, 0}], 
+        LineBox[{{16.000000000007276`, 17.000000000003638`}, {
+         10.000000000005457`, 13.5}}], 
+        PolygonBox[{{13.51826734053906, 15.552322615314452`}, {
+         12.280184249251306`, 15.293188945044921`}, {12.683281069670574`, 
+         14.602165824326175`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.823799910437668, 15.984057296392571}, \
+{1, -1}], 
+        LineBox[{{16., 9.999999999996362}, {10.000000000001819`, 
+         13.499999999996362`}}], 
+        PolygonBox[{{12.48173265946094, 12.052322615314452`}, {
+         13.719815750748694`, 11.793188945044921`}, {13.316718930329426`, 
+         11.102165824326175`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.823799910437668, 11.015942703607429}, \
+{1, 1}], 
+        {PointSize[0.04], PointBox[{16., 17.}], PointBox[{16., 10.}], 
+         PointBox[{10., 13.5}], PointBox[{8., 8.5}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T3", " ", "P2", " ", "N6"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbf/cgdhef/ifghgihi.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbf/cgdhef/ifghgihi.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {44, 22}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwd1gs0VGsbB/BNqiFFSVFoCA0mDVHqqBlS6WoqNJxC5dZ9KjoKoYhKRe66
+jVBKZahVyGU4XYg0J5RqymCKk2QizhTx/d/PWq1Zv9n7fd7n+e93k+H2/Rv9
+lCmKGsI/8kkpRvGjz6FoBFM5VM2O32p74GLbig4TuOUyv+GjHofiaXRm7YA1
+Fc8stsKRTu22xbCdIPtE90xcF4ZdNtTmUOJ3C2LOwnbPFvZegnUW/Tl2Bay4
+f+2o6TQOxX+u1zqN3H/Y7XsJXKOq30rB1KKnqRunY7+qwtIxcIvlp6BuWJBr
+pGUA07UWJEXooN7Jtuh1pJ7hGEs1XfT5Qav6HBwY6NR9EvaJXfHwA1k/Q67W
+B9ck3Cu2Rb/yVxcTnGdwqPRPRg8SYYZylm8cHMIzOfQVDrR32y2Ei30XVXEw
+v8LELVEES4c3lZyCI8d61pfArAfr+6phKZWoeQUWrG4t7IJ9Ar8s5sM6tj+1
+FbBz3obv82HN/Q02vTBnk+XRHvRD36tu/YLU39gbn0X6l+x0vgALz97Vd4MZ
+rJnP2LD8nZXpRF3Sx+oxLejPLiF/XwPmF2+3WuoFFyuu8i7DLRZDka8xb2T0
+krvh5PqX/v3LSR5uTiEHYcFhpelkrhazDRJy3VmeWTgTFmUoj82CRSYF/LPY
+p4uprC0h9TJGOCRXxt9RJpb4lEfvTE4l33sv5abAwlOJrAUwbWHG40moE9jY
+r/IVz4n7l+RzKpwXsE6tlDy3WdwQM/TR5XifmQXnzdv2tIo8xxc8B2KfnoaP
+npiDm7KNVgLbLct82gvTLtYv/kzqPXMtDCXnsPpRtgmZS2vngl8wpaXldIjM
+IVE/HmCA7wslx57D6ZnlESI4wTxmrSn6TE/hDyvPQv5XHxyMgrmrhirmEm/z
+r3hN5qvLTeHAfMeEJYbkuY5yefaw8wODw1tgmoZuqxGct/tKWjQsZkl6Bsl+
+Qym5ZE6pJE67DOaNv52eANs1x8YfhjVNmcEHSL6DilFzWPhL7raIrN9T6/0R
+/Wv6LN79L3muxh03Usi5iQ/rOUHOQXVznhuZ16dURZ08jx3er4xggVFYbgzm
+446aKiuRc2ja6TuAfAKb63j95Fwc+LDcB053mTN9GE5/5RFVh/eKW7EsRg/3
+c2kH19rD4qsGMldS/+XxKw/xXtboNO/KIefYivbLAaa7e7qoot/AdycXt+K9
+5jE2v4uEWcx7Oy+Q9/6HW8x45CENKLq8FdYJ7zbMgFn0njYHuOnM1GgdOvYp
+CbJgw5xuMxM/uIUK93CFmV/EAwUw7YTMIYKsz2s4MwjLHTm1ZXDQ3I78BYbI
+Y5P3WFXye6Th/PZ9cGDS00BvWN1cpHsJVpg6DJTC6WF+typgfsWmQ9Mwn/Ns
+h53NMDfX/PYeOOcs11IKF7MjsovJ/JFx7q1wnE1fwwD8+FJ9ZSMs/u+QM52c
+x0GXSlJPwY//aQMzT9VOuQbThFnlVnBOEv1FBLmeUnVEG46fG8D2hAW3PzOk
+qDfV36h1PiylsyQXYF+r3+Ya5P7dagXz4D1a2ue/YV5WZ11BCfqPVpm6ugkW
+JtWU28D8lY6u1TDPwc0rF3nkWeauKiX5tKWe1oRdVQ145bCga3VIqBbOhxbX
+uh6Wxvd4d0/Bfvat4zuJ2SJHP1iq53ViIvanL7a51zOZQ9VvVm5YSuYvNLoW
+B+stHUw/YkjqjJ+/CA60lFqUwaJ2wwwlmE8f+UvFCH00jx9t10ReMmoeF46b
+fOfIB1jYnye5BLNiwsbL4T1TacpdMD0q5qIO1v8YsLOaNxu5Wi6zcYVb/uEx
++DAVR/2+AsuS077kwdIzfiE/YKcdzq/fwF2prkUuZJ6Hvx8MwbzKnsP5sL1b
+1ystY3jINV4Z89t9lfXNguP4JV9d4GLHVl86HJmvO3IOZqbzFdowp8njySNY
+2PJxQAnu0gye0gjrnZRqfEZ9QUdr9itYxfZv7mNigyR2CVyW9WTMVdJ/+U3R
+SS3yd0VwMQTm3/ilYw8zhLy0TTA9+dKK9+hPJI71tybrnWqWBMBiscv66TCH
+M6mmA/NR7cZcFZiWv8bTDQ4LPak1hLyKT7E6RMhvy/srjcOwwCss2QLW2Zey
+QQ33i15kbbTVwFyuzPrZMCt7Ac90EurvGvfbGZbPsw6fPxHzOt+feQTWrK+v
+91XH++Dv/7kI5l7OFokmoP+GjoIfsPBZnWINvFbV/KA98pAbHqCpwny7Tlks
+rPnsDw+FGqnflNoEJ2SVmurgep77axrdBPc1jr3gC28ZflAbAEsTK+rfwHFW
+Tok3yXWzcx67sP9jea5HByz86e6thf6SbRuDtUzRT+zRCbWwYiUzxw4WH5CP
+RGIedds9ehthAedgFUuDnB/3dG84UlZm2wA7WTx230ac8k2FQfJqkenw4HQf
+V43NsHFou+5yUv9tv5wPC47YKJmTesbZaw7Ba4OXiWlwnPmhp1tgTSPTetKf
+IixHby4cFLXPtxymNi53eI798qhZOulkvge1fhPh+BP9HodhlszK0wz9tiis
+gj1hzZej0SaYh+/OClpB1r+7f0cN8/uOyVe1J3lEe15sR557UjvDiaXf+m88
+VMX5KggWOJN68vh1yTT8PySEWekDC161Fx4fjzz0aq9Fw5zyItv4cfh+eFPi
+PXK9PlG9ZCzO8Qxr96+waGNTmwacPvGUy1zMx5eFnEtR4VDDuT6RQSRf2fqO
+tXBgdvH1SpjuVXBqAfxDdslVfQ7OxcjsYS7MWGM4gQeL29alpcNOvrruApiu
+z60ej/qRA5s722HOsWFmGvy1dqVQnwFP0zBciv64N6sU62Eq6Ht7H5xHNzoY
+DAsmv9LPxzzy8LrlCbBI2dt9C+Z1/uOQwVWYft7Me5j4baPFNVh6+HptFPKJ
+35xJz4Q1s2XrZbCN33XzOFi+nW+hjzxDVvV/2gv7/Buwaw45r0Wlq9fB4oBI
+PQruOpGWxiD93coIuY71xlMv2imT+0cOy2bCNQ47b0swjzzL/tMO7H87Pyaw
+FBZkblWcQL/R4WMrLsORk/PdT2Ae2UhTZRzM6mDk7ML8ZffuWoSTvM7SE5Yh
+L7HmY/cwOOFG5k6dMcj37TeDWHLdvOt2vxLOa5dGG6lHrbI+30oh79RxwSJY
+WvjHjLpRNsV6uXfeN1h09L2y3gib4iZO+NeE5OOyL6FymE0ZswUT/Mk8/l6f
+KofYFOPP2OzbJE+9av3Z8HCuX/B/JP+F4RO6f7Ep9bP905zM0P9bVSNtXKe5
+iFUTYGlP7YVMeGrR/DctsM/n3HQ+6lMXV1vomaP+3YLeuN9squzWpN7NsMg7
+7dAr9OOqctT7NLESrVcP/X/9R9uwCBZq89c3wzn5ai4NML3X7H0s5r3fOyHm
+IyxfoOVhrow8rYUd7f9f77f0HhwoGqchIZ6aoT8DecnHHJ1TZ05+3/xU5sE2
+devKC2Gf5BdVAbCeiVNlIhyZVDt3BRy02sxvL9m/zHlpH+oFHbWZvpLsn/RU
+dy8slq7fZEj2b5yhWop+mL8DE0cwL+eGyqaP6DcwfTKjDRakWo+pRv7cy8es
+62A6i81IwfzDjowjFTA1FOywCnkpYn5tLYNFvYrGPgWbqmH+rH9C1pv3vL0+
+iHyWKFm/J/d7nX575AebkvfqBg2TfI8wlSL68Dy8Tw0ySH/H12x8JmdTa9Wz
+rnqTeeqsaqu+san4h4OyKySPO90Xbn9FPzlREhnxHIO5W7rZVI7Sxw3zLFCf
+tn9R8xc2JVR6/jEUjjT0uqSF6zbb6sfWEEd03lLDeuc5knWTmVi/cunD3B42
+Fe3xeqsbzGk/PljTy6a25CdMuwD7dJR5mn1nU3GPAm49gaWcvQHn0K/o+LLC
+bzCdE2o22o88fs63U5+LemrmN/wH2NQeuaJOH6ZPql4nxPzcA9Sx2bBP1Uhz
+zX/IKyqng1wXvZw+4yry4v0t1JhEnGjQZPyTTQna/jo5QPafzLd3gWt+DzNf
+k/1XeUVNJ67tnl9E/KRtSijWx511Hj1D7rdXrwxF/celnyb4k/mqqCuzsL9m
+xJNGR3K/r0sDH/lLXmcUGcPUpGsq4ZjHlZ9cNxEW/Ezrd0X+jzk3v48iL5Fl
+g/F05FV8ZU3SMMnPMS15VyebCmLE3lIheY3Uz2lox/u2w6RIh9QrDln0WoL3
+8RNPYAdHuvF3ipuQT5hZ5w5yPbRwmqAOz7/60tEM4kcdnfoivG8F7pI3xGWz
+ftTcwfPsYzFJPhRX4zTvLPZL1VwSQCwYtV8YVEnlWU+5c4+Y/CSUUyrk05Lz
+P4Clt9A=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.1148, 9.674800000000001}, {1, 1}], 
+        LineBox[CompressedData["
+1:eJw9lglQVFcWhttmkwg08F73Q5QlEhgkstgYAZF5Z3ASFBEQo4IK1coqBEFF
+NpE0AsqA7IM6EEOjAyIYNtkUhBaEFIvQamQUrQpoQkBBGmURWZz7ku7bVV1d
+X73X955z7zn/fz4/Eubhz2axWJfQl/mdevsJffSA9eeHhKvG2prLyYirwnpf
+5BPwbrdxEX9hLbCEa8edXQiwcO76ZqMfYsPyr010CKj5kGD2t841wBqCE8ss
+9H78Gel/TBBn6aTMqhAQW7/DcV2aLlov5kH9BgJ6LyoEG8+vRutprDweSoDd
+wSMR2acQhx/kz3USwPpR1apQEbFVSsyrTSR8dAzkXbmhAyxN/oX+ahIOdA/f
+7ghALNh79rINFxK5xe1GDojdp1VutnIh63joUNIGxELJpwPbeFB4MY+Os0Y8
+NJNh3swDnmdvYoQbYtG34Zu+oEDtUL+jJA6xISdnTyQF2qmSWKqB4WqPsxUU
+pF6vu2c5z7zPsVnuoqBiF/HdDw4oPlZFQejPFIzGLiW3xyPW7P1JWkJB7GSu
+/aYGJv4/BgyCKUgX6zu8GUY8dL5ijqDAIm+kPfsjYsnOY7dKedBmpmVYu8Tw
+q9ZL5jxIC+n+fGIUsSAgoaqUC3b8XHvFJoZdxEmGXHh7c+XLxZPM/jkl9wtI
+sM6qCeBxEYs6D88YknA7VejaLELxSuONDeoJcPYR/xGoy+S/zz1BgO5j2zdX
+Is5RaL3GUPcvCDjdU/Tl2BgPnVedR4IiARl5hUdtnRFbRU5eYxNgY9rcuniT
+i943u9GvT0CCeP9P1RRiUbf11f0ELNUbPT6WSaL1DT66lxFQ/4+Fkes6iN2X
+bXu1SYifdmmYRnGw4CXxLo2EkL6jy6++Qyw0MezncKH+bJzDc3vEkpYtY5e4
+kBpbx1dCcbGGtBay9Hjw4gav041hYUbbV/k8WN/VnhyzBbFgzqlRhYKuWFMV
+C1/EorKsBgEFdTvpny1R3bLE/lm/iCgoJXVOpw8i1qzRG7tPwe40X/6QPorP
+MDbFsoeChce+dOZhxKyjw563KGjSjs7kXWGebx7MiqfA6u1LlksvYsl6jTBL
+Cn4tNnUTvUZc1RQy0MUDjklkgOc0k2+V530PHiRB2a7mEeY8cme1JFxQXz3r
+aSdGLB4qMNvOBXvvgNlTQsTwWq/pHgmibl/dfaaINY1fem8j4VyKCyG9zeS/
+dsDpMQH/qkp0O2HL5LPzyMdIAnTnnvssXNdG/VVgvswnIP29xDhAHbH4R52y
+z9B9HFfqUzumhdZfcJj/pA0prQERyf2a6LwurDxBENAniPrtoA1i997LBv8k
+oPKmRvmlvRyUT1HvlUwCnPg+VsuHNND+Jh427whQzHEeLr6gjvpz0pkMJGFx
+tuiT62s1pl43RY2SMPmU3BoVg1jqrqsUzoWkvqFBc3vEQqUz3DkuBFqtD1W2
+YN534ihH8YC0zm43c0U89FAvA9XdRhf25rQ8xCJejvoOCtaFVf9qtojYsLL8
+cRYFceOPOEnRaP+q1R+87lIw9gujV4ilA9fCeynYd3eD9PR5Dfy8eour4RMF
+Dv5/kfdSV0QwB6/fEnls65NqDt4/JGYgZ/4hB8fn9lzf+NF9Do7/N8nr9pRz
+HJzfQI03q5rLwfn3U3X6B05q4PNJiyrqX3FNHZ+f0ZL026AyNXy+m0c1bbZn
+r8Lnf8+MT80IPsP387Rj2nfESBXfX0Obd6317yr4fgubnBxVq5Tx/Yu3fxCs
+yVTC9dFxOeCZwQVFXD+5pG3PnkoFXF+HJvkE+YmN6+92FOGa/j0b12e3abnf
+eT4b12+tN2HtRrFxfZM+FYdbzdi4/iMe2C0HBrJxf/gkcYYfdbBx/7xYYZsw
+vFUB9xc/17aAblPA/Zco7Ff93VkR92eQdsJxUY8i7l/H2oqpa3ZKuL+FVPS0
+WpoS7n/dfY9OChqUsD6Ia/+dP8OwTD8C/6ucvCNFCevLotoGBVsTJaw/A2L/
+bF6OItanIBNVflWfAtavZ/aNXuuG2VjfJKbuxT9IVmD98/c6L1QuYWF9DFsS
+eun/b5mW62eDcfTug56LtFxf73w9kmo+Mk/L9TducEkguDhHy/VZbLrUoXFm
+hpbr91Ptr/xLyt/Tcn0fL3wRpWb1jpbrf1tqjdYkMUXL/SG2+En0zkNSWu4f
+otI731uqIpb5y/iyn7SRy/Bf/hOxO2nVnmjEMn9qyavUsjRC68n8SzlIdXRK
+Ee0n87fgvbfcMlRRPDL/i68znYc107TcH32+vEteNULxy/wz8tW96Ra1WVru
+r67vH0jN2xDL/Ld0Y9kKDp/J/y9/9kvfET++C7HMv/OXgqfCVyGW+fvfzaJ1
+xvzQ/2X+3+J0pCTNC+0nmw9MyEE6cQLFJ5sfxCOnLO6sR/HL5ouID9L9wWtQ
+vrL5I+J91cREyRtaPp+IK7XjrHpGaPn80ugxVd7ZN0zL55uq8qDcN83PaPn8
+E25ZOvHERULL5yPxw5CF08IWWj4/MVOVUCX/rny++j9tFrxA
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.75, 4.0548}, {0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000001556`, 17.}, {16.000000000002885`, 17.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18., 17.6952}, {0, -1}], 
+        LineBox[CompressedData["
+1:eJwV2Hk81PkfB/CJbRLR5JzkLFeuxlGr09eEVY5GK12Sm9VhEJGEqFiRYoVc
+STX5ReNc2bZEjig7OWJlmZRSW9skJMTv9emfeTwfn+v1fj8+Y77fNL2CdvqK
+0Wg0mQU0GvmkTc3jnypFE5FPOYoW0Xp+iaManDpyPUmeoqlkb1Yqh1nXW39e
+qEDRAr62nlmtTtEKezYyjsL1zb+0VsDUsp6mB3BVnQdbSwPzE/Yc+wqL1muO
+hMCx1f0ucooU7eTlnhsNsChc55MsnG/v1c3QxH4VPupkvvts+dN9cNrgQ6kG
+uDmMo50Pc9pTJI/DGoxrf/aR8RzpE8owR+A+LLES+8++Si5HXlNxyQNGMMc1
+ic6GL728FG8Dcxc3zT9DfcVqDpQznKZ3JN0f7qv9JEvMTR7MloBbbXIlbWGG
+c5FnnSxFm7ZXuGsCe/hdCIqDP2gL1RVh/qEAO0/YJ1MjawJ5hBIJtm7wFLW7
+phOu7z4ZHQrfLt1lwIe5hptLb8CBsv9cS4Njb4rZjMOyG4/wwmHWoHn4Xpzf
+0NZ8ygcWTBq6dsLDTy7IuJH5rbul96Ge24t82txJ/Y+ilv0Lz57wzT9C+tfo
+GxCDfvS7q48kkv3y+z8x0F/RiJU3OV/jn0M3s2HOhcDtr8h8Yc2UnBLm9/ay
+NVCPRilv+gQ8VZAe5Uv6w8m93QYLMp3r+bDgj2QdGpOitWlOp8+T/hyWubcc
+5nVdddqxiqLRtGMZSrDt5oTNeTDV5bbiG9b78GMb38CC2VyVBtgj5WLEai3s
+/yU/LgzmGzfaesMC81d/KME3eh3jL8Ee2ilSZcjLqC8Wq4HrywypLXArK0nn
+KbFeW0gHuS8NESO9MG3u1D0feF+zavtzWNgu85EOV4zd+9wGa0SPW9ehX1qF
+n8arYRbDaF08rHFw+2A2HHuo1tgXHsvqWxJJ8hX/HOQFT06nM12JZ9xEUbDP
+LeNKM5gbrOtK7pvd4Zvn5Mm45fYJGs7bVG6kPEP6saP2jT/5fhT13noHe8iX
+6Q/DDUOZCsOkH0+e9QWing8J5U0jsHDv1v2zcIPEXzkTMMOtpzwN/Zj28321
+jOzfY1unif6u9KDv2QAzNjNP3ILL7t9VO0r6tTPeb+Vy+NKmnv/B1Gazm+fg
+tlUlVz/DhaHZnB741y9Ndpu1keueRrqEMkU7at5vdx4W5Sz8Rx126Hvz9QUZ
+X7fpozJc5V19bbUO6pmNeT6N9aljThUhcOFn/7GHsNt+x4dVsChsRVMozHRJ
+bfgIe9jPdsrD900+yavoYj+GdWAJyfv07eUtsGi3lvcGeN8c864LzPgz8G9y
+306KDKLcyXz7qWFP2EWTH+YGUyfjbBfC+qJvT3cQB0usqyN/P/7avXoDMc2V
+cYbcF0XrbFWyX4Wn4S9wd17c6VmS30qzPAB28XOK/ZvkExRFJcBsLt3mdzjN
++Jb8Pbht6E5kFsz5ZlsjjfNyiifzYsh6k7We4bBeB/P9UVhY8Jo2Rr4/F4zM
+A+BYr6zcKNTj0ibRf5isl9yYLo369fOb+NFkvEJt6Cr8w5X70zkwNRHhbor+
+Ui2HfR7BGmdNVe/CxRk/S3wj8xdcymWtoGjPu9sif0Q9aQxvhQy487XW82jY
+wyS6fAgejvF68RgWrJy4y1CBi7zEl+uh/oNPfteGee22RQFwfU3GGTV42iqP
+XgPTAsycZ7E+4PHT7DmY8ilLeQiLqbHnLVdj/86ynmDYTqqLFQEztFTql8EV
+dK3L12F+dj/vBvK+92xVaYFFL2256+AfpB02DsAaX46bt6De/Nj4BSPE4lcW
+HYRPOvTKDsOUqfCGOPxGM6Ogm+x/xH9tHfpXtzTX9T7Zv+Tw3FnYdaW281VY
+aH3F6gjsMxPxLYbk+2dCKgjuG3v90Q2mDeqpp8B+TIuXG2DBBu5oMywY3HZC
+hZzfFX1OGed1fllq/gM5nys9kgC/Nm+0HEf9HkOKfQuQP0ItKvA/WDQ8uPs8
+8eXoRWS8fuh8rRrqz0+0Ey4keVIPf6qAR18oGGiRvOduvGCjv0XJDolOMCvp
+h7RWOGfyOz2BnJexLWcLfme1KtazGuG03gbrQngq7Q5TUh85m2c63sFVEe3H
+XWGhzfscJn53c8+ZN16H+TkhDgawjLKP4wRMcVr+1oR3Tr/yZRvgvl0bSv6O
+9QmGdyJ/hfndc//Vw3Pb15i2G5B7Rq8Kgq2dPC+KGSJf6qIEGZiS/2vxGph2
+YFVrEfJe2r/54g7ijsAAU3iuxajUGxYqNSQ0ol7zwfyIQ3AsV9fADWb82FTk
+D3ONOmXE4E0FT/32woxHl7fWoX+nT0tFs+E0LQEtCRZN2NC1yX6xWUeDYdlt
+KiHiMKfieUwYnDFe7Skkeaea+n+DZazUEu/DgjGdZ8/gXJnWpELiGm6ALs4b
+96kfSIQ1ggqD02GOv8z/ImHG+qQ7y5D/ie312mMwK7F3cR68b/FKpyi4/pJX
+2xrUbxG4a3Uq6d/69y8b4ZJAl2OlcKE33eRn9JebG9XYB4vU+p/1wktORCsv
+RV6+m9xBBzz3uK6xnHKCC4OF5rfhEvmJgExYNPuE9wU25xerviL9zh9TZuC5
+R+0/0TlTI4x/O+PIhI2jX07FwRbXJcNkYfYu04cdsMdp0dk5rOdJ3nBWNEa/
+094r1sOpGT17XWHB1i6PI/B0kuTr83BaZ4K6FDx5p/twLUzxPrfmI6/5VsuJ
+XjJ+0s/BGP5g1S7zLyxMZLY/QL069ALhZ5hl6Oa0Fz5tUar9ERbZzZ6iwXpl
+71YNwvWdKp516B+XNZnbTMZVBpSSYb/M+Voe7KGYVBkGC3c//nCW5DNpWnIS
+bs1VH/CGOZaOZflwiZTcBjY5z/JYxwD5flid5GmRfPH5e8xxnmKhY5Y0zJez
+pxeR+5vNMpxHP+rZp86S+96xQaA2A1PRleWlcH8WvUwM82lXRloo1D+4fjSZ
+9IuW3FjdDa987/l8Hcw7MFpmgv5ShzoUSB6LK7TgUNjil9/YOcbk98Jo4jb8
+5qe0Z/1kfdSNsRdw4tWC5pVrUJ+Sa8EczPzt4pMgWHDUv0kOz1FH+y2cH8Dc
+d73PlOGOBSY7F7EoWtZDzxdknPWaed4Ibj0feHUe68d1KxnOcGKXWPwQrHt8
+po4Laxh5H62GZwScjGSY2Vn6OB5+4iMtLCTzq5a4OsJCbR8tPpwmkyijANNz
+lrPukvXXtkncQ70MdpfKPZglNRnsCofShx3JOOsTbWoO/ZpwzzxUDlPj4al1
+8II41/3XiXtGt6bA3W095pkwY2E24wQco/DJ/AzMpz+oOA3PTT0oCyXnrUrN
+vkneCyRrZ7zI+JWZobewZe3+Qy6wBzN+txXOr5A/ZbYN5nb7F/HhXM4dTzas
+F7CijNx/Vc6FDgrmHHfWPQg3LsmTs4F5hep9PPjp1e/xO+DCGNnqMTiEdUnP
+A47ILOCvR3/vfE1+EA4HfH49dAIWvYp/cInM39iaVwmLnRAdqCT9cu8oeQmX
+7Lud1Uvq1TW0E8dzrHieMnuOjL987KAEO/Ncl+qYID9/k5kqGT//6KYjPGou
+raEAl2+xrQ6F9frnh+axX0vYzvFM4qDQwUF4zTaDrTUwn7ldvgr+Hhl9RwAz
+E/VFcXBc+KO4Edgu9cf19vDB1e9txuHYjvyPsrD7XJ1gFk7ce1FtAPWO/v7B
+ap6sl9jTfgtWGC0QI+MUnfrzFMxjHa3/AkvcW+Z3AL45QPm+JU653vATHLBw
+55I+Uo/DFNsSlooYGG82Ic8nQ7XWcKSPcmg13Gqm77QHTln7k7CY5LtQdjqS
+zO/3+ZXUx7ljb3oT/lp6rjiZ5PW6WUTub9Skr8UZuHDBt8sayK/Y0rc8AQ5I
+eR/kDxsOvB5IJPvvdrAqh89mNHakw30vVeen4Wuq1Bg5ry/ANs8K/a3qzpj/
+g8w337r2NKx9u82f5C9kyq6ug3cphez/RuqvqmS/hUPSfLpVTXG/Jh53LMJz
+c6Tx8iJrOEBbtlwZXlP29fhheE9DY7A67G39fTbdlLwvmm5VhO1vT764C+u9
+CZkn7zVq/yZ3DcDMLjm1QXhxvFvTDGwRFVlUAVcahTcqmOF7WJMnHgvLrUxY
+oQ/rDXnLbIODuKyDFrCE/XAjA2b9tfMXCtYY+3FtP+oVry47yIY9yq6682Dt
+7wblW2BOXLL4KbiyuICxjqx3cEo5ADeEeR9eDceq6f9nB6c3ab5aTs437U+y
+ghfP7q+RgHmbBrTIuPeg48avJL+8+Qvy3rjG9lXbG1JfvbJ6DPl7pR5X3gdL
+lPAelMKr8N7dAdM69b++gX3Zu5Rb4b7b4bF6yL/IxiW4BaZMNlUEwTuihRVP
+YFacdMFd+DvXSofsV/s6x0Ic/XyrY9j6juynG3VsG5zU9W77AuRj8pq4SbCK
+YG65GsyPb8qsh1981/a0hGsnVtV9gN3OOSj6wFPZsmZL8N5i9rsCPZnUa79h
+TJW8ty3hDFfAo9xTKZpw6E+lzv1wWt+0tRI8S/4fg6wnn6uo/wPv2Bb8
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.502886362674069, 4.972562773393563}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwl1gs4lGkbB/DRN0kqTTk02tmJIlOpUEkO9Va0oxymkSUmjRArNGVrbfQ1
+4nOISq1Escl5Zm05pEbJYRsbkUaIYjOWighJPruLvv9zfXNdrvf6Xe97P899
+38/9ztA/dJTvN4tGo2Xhj1z//zGhaHRyNaBojIm8RStgVvx0X98KiiZsany8
+E87s9bpQCcse5fwjhCNCvOTn4UKb0sIf4dTnnjUusOBI1bzzsGD0mMFiuGJQ
+GnUNNtCv7n6ynKL5tjVV3YStxZwVYpgTl3o7Cy4qPmK7EZbLt8ZmwLY++bkD
++hRN6RD78DLM9XS6ngWP+pepRpH1z93le8Pusg6Ho3AXw+W+EdwVrsh1h4dq
+MoL+q0fRTPxE31BwjnXKz80wI4d7yojke+LK4nuwLOFmwkJSv+VsRgHMG4z9
+96f1WP+ZqzAHFtq5RDXB/dn8vb/AajXu5iWwbVhFxQM4M/eMfSas90+bVivM
+rfWeToOth/afGCM+e0OT3Oc80ZdpIT8TnZ9/J/F3Wq8nWsDi5eqPm+HUaMYl
+T5hRtGXbFFxXlx0UDid6GoQwkZ9ox0T/FTg6YNewOWxc5KQugTmW3pdIveM3
+dhqWwpTtpZUR8FTe5GgJbGBZ4p9J4qVGV/JhtcPcOXLSv3RBaRJccPx+5Rs4
+OnomMASedKQEdFOKxhT/5bYdNh4bfsaGOSuZieqwbxx/80a49f2+qAbUl6jN
+fLcTTl+frRkDizUOHHeErR173K3hvp59t3nw5NMMq55lyDN3UTm5z3urGrMb
+jjgsGLYl9vtgX86maGGlkg/mcEFdMN0MLpJ+e8EAdu9prJV9jbyOhLVrwB2e
+urP3wvTArPEJ5G9S4nZqmoV5FLBXvYZlrDZaNWzho/9bLdwx0nc2DR5dfkXt
+Nhz2pW8kHrbVYGy4DgsjPlsnwfK5Ke4JZD0dgUgK16mW+IphZb/2vTY4Ojhw
+QTgc11wYpYH9G4dONxAnvfxyhwcr3W3azsLUY7dHV2FZlSUrCVZb1/XxNdw/
+9tYxGxbHOp7VR32UQqf9Adw/9KzfA07ttX/fQfJnX5qOgaeGg+P+guvy1qzO
+YpP5q0pgoX7h6vYkCVwo5d+hYPHJ8jXX4ehXZWW+cHWeSu8J2EKy3C4WDnDp
+TN0Cm9DSjPKJi++ufod81B44b3tE+m/T7i+Gg9a/vfoKrnt7cXoO7JvWLBoi
+65fQPSJR/1BIst0kzD1fHDP6FUXbV+vXMk3OYylvaj/M/aTOIraonzn221KK
+prVT7jdBnt9WJVkH82IcLd7DlNEZ62xdnDNf0+0leX5Fr78BHGbTJZOTebOb
+7C5jYr/t20//SuqNrM3zgOVBAcpkuMjs5KAWzByIXRtBns+KGnuzhKIpGuVF
+pH4Tq545TXDH33MkznBcU014I0w1+1huJfnImNJuuF/vhrcpia+Inj8b66UL
+gwdWkX7MKF23wA7l9d4cePSgc0oYXLipRXct6a/ZhsOVsFA9mGVB6kn8RkcV
++edUP15vT+Ifyv/cDSv3drQfhPuHDxvFwfS9WZ7hJH4J+3I5PP/YV0+vkf27
+bPidcJeAr/mQ3O9cteM97KAfOKEk+b6/O7cPrg58ZzzbDHOyqn7zY7jVv/I7
+DhyWpsP/CWYpYwPtYeFB71dcuOLbHbP94QLzUe4A8uVOqG0SwzxO5NRJONl1
+k2Eyud/pp/cZ/dgYcNwyC2ZE9sX7ww5+B3SlcNIHtwvPddBPTpD0F5j2oqPF
+Eo72H16aD9c1nGDnaiPuHrszHVYuM2TpwEkX3NPOw0UJEtPLWvheyMi3PEXi
+e6/u/hpuVKg0+5B8suJv3ddE/3pTLu6BLfyc/wiC1czLHprBmcWS0E2wA6el
+YCnM5BfrasMBZ1xT6CS/8lvh8+Ap41tlH8n3BfOW4xKYmnVEs5fMe3XBfnPY
+OKnmPJk3PSPJVT/itdoNbeR59p9ON+FE8WuzDlgk4G19Q/af2D5A+l+3ZU2D
+MfKVm//n6QjMMFq9IRSmvv8+nOyv+OFUdSkscihwZpP8I9dND8CphadDrGHu
+pfHeRdrkPQp9eoDUI1WZz4FHveK3RpLzYvKaVsE5OstO55L45GuHtOEwr2dW
+9bDs1Ysxsl6HNN9skPTL2SMnHw76bLhWfQPy3G2b4gwrdh1aYgjzVLe19SJ/
+sU/rXCu4v51l5w/LP2502QPrOe+K/GMx5m2JhtgVHj3FL9sNF70sOLgfVm4O
+O1q6CL9TLvqqbjCj/EkIC7bQSmhwgt29vI+eY2D/8XXc7XBHxM0JFbgxfp7T
+erjaoHKnxkKch013ty7ZT6t7zFID7yWdvXIWrFCYJl9cgOv+PYcGUI+JOn0B
+A77TsKNHQeZD2eNTOR/7dNI/lJP+jJyWXoPTPbIrSX948vGpLFg0+lZ0hfRz
+5HhKCxwQt208nsTPeP69EutZ2EfRo83IeZuapMCtI4N6xElu0oW6yKfwgyTm
+HCz69VFaHpweyl13lczrlnGPTcg/tWumQULiq7yeP4BlM4PPa8j7sqshiIl6
+DQyY4a/hyQE7+i641XCqfgYOWHFLzQdOyjbJ0Ee9wlCNuCBYVKe4a0f643rN
+Twhrhc5t+I7cnyUX2cBD1dSFRJj5wub4v2CByOpRIUzFFgsOY//MtFxuPTkv
+lT3l6ciX1hNo2AMX8f1X30Z9NCu3nz6R9Y/+EJCDfgxpJc6hbUS8fUtg9Dys
+FxBsoQorlpcy3NUx/4O1esTKCttqzlyc1xd8yHmT/wfVqP8BWpudvQ==
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.57964504524893, 4.283992682631731}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwl1g041NkeB/AxtxUKs0iIjCivSUxCrcZL5KUoTDbqqiyjuEaJiUIScsUo
+yYZ2vFRTVFLKSlJUREVYE2rH646yGkIKu/d79s7zeL7Px5n///z+v3POH519
+4Tt+olIolAr8kPz/ZzmTYkBShUlJGKGvfazFpBwbVbE9B7fKtawugN03R3mZ
+LcF4mYidA89V/3K5jbhkhegG3HpoYn+EKhyUrTgAm4WPtMkuZVLq2hfNWOD+
+MhXbeOfh8qs3rApgvbGmPkU1XDcna6Ohjfkk/n9EwgGsO+zLcKRuU9tj2FfO
+3FaTjvkPB383BXMVlAOD4Owd10wV1JkUWl/t8xuwVfsPTsR1RSamn+CkkStJ
+X/B9/v5agb4Ok7Ig9v3mlzDv2dVqb5huFPX+HCwTKeBGkvF2n0BPUs/QqcJT
+sMr67jAZMp61+GYK7H8688Vj1M/jtHTFkPE8FetEWCS/QTUANlvTpeUBc5P/
+rWQNe09ss10NCwsvfy8DJ9joJtFhtY4h4WvUJxyzbzaG2eHKp8/BAdUHHnrC
+VSyvaBbcOPyhJhNuNeFSyfPT19b8/geZv3RB6yv0J91Dd5ZF+jXIWxcNM/s8
+Hr1VI+t3y8YSriu40HcQ/Qgw6a1XhPMnLbxkNJgUibbjfmlY6NV44hpMi55d
+vwxmDB+95LIM99Eo+30rPOkmL+6HJXHHY/Nhycudk+GaTIrgt68DUqjHbODH
+qY9wVbxr8SZYwuBN78C6i/wKHyTB5cMHFYtgmjpD8RU8WBqW2gV77mG6qpH+
+M+XGJ2DmhTh50j92tN3KKdiXqq9eRNYjqdBeBHOZgVE9sFqbw5n7sKBtRYHs
+Cialw1HLKR4Wsv2yjWDRg3uRG2Hx4Y2LfoC9W6hXJ1EfT2sihAknRJ68foPU
+P2j5lgE3rHS2D4Nndrozl8Hl4aHvrODUZ0espzCfXnHH9iWwpDRlvgE28OJe
+koYbvXnOZ+DGuPAqRZg5RzXfTiy9/idzuJyro6gCd1Sq6JF+0T0KbN/i+QXN
+1fpPYY4gnVoCq2gdDzBHvQa7hD7RpF91OTl3YLX/rnvmAzuyzM854pyo7eR5
+2cHe4UYsEcyPSGFtgA0kHT4nyLrn2YY7wiWtnf00ZK7d/uP+xFKrJLuRFIum
+wkSkzb0MtctIbn2aSyX5vdfM6ABZN/vl9hPIBS2ZbLIuag4BnZbIoMrTcnZk
+XYpNRuOR4p89RvyRMvda1r1AbulfUXsQKdrksEMJ/TurUigOI78v2TXvDV+h
+zocEkuupnlaZ8EaOkdATrutdyKmFTaP5LutgmuFQgYisF7vShvTNU4e/dxKW
++IrDJKiLH9Ou9BUumS1rbIF93QOaxuCxshjTMph9+wf/32CblCm/LNJnZj3r
+Nlw7KN0QB4tbpgdPwIcoRZwoWC1MeN8Vni55Ij5KzqFYfkAB7vcb10yDPW2K
+K9vIeS3Z7HeVXH+5IzOH1LUv3q2NfL9j7j7Zr5wHIZ+lkTPcFjMLZJKMZ70T
++V6l6CwNaXJq+FoGuc+loo/fcJ2/2zXTXlhSr1r8mdRxdG+WCebl638MmSXr
+EWH75zG4qllgpkSus6rf/QIWbj5qsB5eHFSuq6SLfRIR9ZJN5ldXbtwOt6ZQ
+vpXAFVq/bkiBKSW61BGYF8wdL4fpQzc71+I+7j9+G38JCydc9Mk81xkK4new
+r0pOTgP8rWZIrw+mOdv1LET+xZbOFyI9e4bG7JGaibpdT5FVGXyLw0j+s2P9
+15E8vYjzOciNp2rM05Bqcw9KSpHJH4tOBSHFzy4KbiPTtio8IvfJ/VNJIECy
+PJY36CAFFjUhWcjIF84saWQqtTckDOk9tEYygbrMgg8/t4XvaihcGYG3rFlr
+KAN3yBgsGiXneo6f14IMmK3SmiUOczpA9lvosc02S0k/WNlTXrD06zlVJmy1
+VpiiRfbLrf3PI+G6Q5uMP5F109NovEP6GaFwshl+0bZKaZb0gzpz7S78RP8N
+Y4se6uE4LC2Da0efR+bC/IdL0yvI9+UnxsRw6pdu2UbYqMvjoeVK8n6jv/kI
+axh/XhYP0x/rczQxf6u1W/ojuFGD07yT7E/R18kpMj4UbZ8HC74rqKGvQr7f
+2jIAR4nWvbeFPf1ctU1Jn54YTnvAqSypnig4+46lszfMd2DdqSbro6h13x1O
+WJJ+cRou22ZYbwPzZK3F+qjT/5VZGLk/9/TqWHd4VeWkDgWmjRd07INN5M0v
+9q4kfWUYH4BVRCP3q2Duo2VHyLhEOX/vBTK+J5pNrufdc9kdCwtUWYcMYVdl
+1dXBcB0rvoT0scbC5ZM/bJWlkEf2UfJeN4c9sIRp6Ef2jdH8OCOU+ATXZCvM
+ubJyTQqckLg9/HvyPIz06ZuwTHxRRDf6wZ2PKeuHzYRNjqXwcNDibvI8YueI
+nGTyPpluTgwm/eoJyPgPzGMssr0L10n9VREI087n+yzQx3l439kZAmuGh4q9
+YYm/sWwc7Blnq1hMxv0UfuHDGU+rpUZhGm+heStckSuxXm2AurZ8uCdH9pV2
+WnYgzEkU55D6aydVQnkwxTm/9TycfuRfN2/BtKyA5SL4Jn+X+DGc6kCjk35Z
+mu/xeA4LTqgmh8EVUp+r62Bf2dIN1+HBs2/z/rl+QDujF47scx05D7ducvOg
+og/Dqf0Lo2BJE2tcHc4vVy3dAc+MZl1cAXfvqq8wNSB/51zNNOG05ARpeVK/
+to7vQjj3aA5HgucLyGgKH8L9NRzYMT0we74gtgrOeK3u3gozY4YWn4TzH8pn
+EfNpKjrkXPSf/HnfO5h37sqsHNwQ+7f1F5i+K2HuFVn/d3s/aGE+9pd3kRfI
+uXKaK/KE68yox4PhuPGUr2fgqm2/ttjBiTVOc+2wVcv1XAMy7vDalW6I+fUZ
+UVpkPxjuYXBgNTOGM3mPyIkMu+tgg55GUwY5D11Ub0Uj8v9kZqYPfCA6tNMX
+zi0/ppxE3mtUn7aL8JY3H2oekveQRolGO/zPB/UrkTRm/g8iD+gn
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.867783472564531, 9.687357802186902}, \
+{1, 0}], LineBox[{{16., 17.00000000000231}, {16., 9.999999999998607}}], 
+        PolygonBox[{{16., 14.1}, {15.6, 12.9}, {16.4, 12.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.9452, 13.5}, {-1, 0}], 
+        LineBox[{{16.000000000007276`, 17.000000000003638`}, {
+         10.000000000005457`, 13.5}}], 
+        PolygonBox[{{12.48173265946094, 14.947677384685548`}, {
+         13.316718930329426`, 15.897834175673825`}, {13.719815750748694`, 
+         15.206811054955079`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.823799910437668, 15.984057296392571}, \
+{1, -1}], 
+        LineBox[{{16., 9.999999999996362}, {10.000000000001819`, 
+         13.499999999996362`}}], 
+        PolygonBox[{{13.51826734053906, 11.447677384685548`}, {
+         12.683281069670574`, 12.397834175673825`}, {12.280184249251306`, 
+         11.706811054955079`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.823799910437668, 11.015942703607429}, \
+{1, 1}], 
+        {PointSize[0.04], PointBox[{16., 17.}], PointBox[{16., 10.}], 
+         PointBox[{10., 13.5}], PointBox[{7.5, 5.}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T4", " ", "P1", " ", "N7"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbf/cgdfeh/ifghgihi.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbf/cgdfeh/ifghgihi.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {0, 0}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwd1gs0VGsbB/BNqiFFSVFoCA0mDVHqqBlS6WoqNJxC5dZ9KjoKoYhKRe66
+jVBKZahVyGU4XYg0J5RqymCKk2QizhTx/d/PWq1Zv9n7fd7n+e93k+H2/Rv9
+lCmKGsI/8kkpRvGjz6FoBFM5VM2O32p74GLbig4TuOUyv+GjHofiaXRm7YA1
+Fc8stsKRTu22xbCdIPtE90xcF4ZdNtTmUOJ3C2LOwnbPFvZegnUW/Tl2Bay4
+f+2o6TQOxX+u1zqN3H/Y7XsJXKOq30rB1KKnqRunY7+qwtIxcIvlp6BuWJBr
+pGUA07UWJEXooN7Jtuh1pJ7hGEs1XfT5Qav6HBwY6NR9EvaJXfHwA1k/Q67W
+B9ck3Cu2Rb/yVxcTnGdwqPRPRg8SYYZylm8cHMIzOfQVDrR32y2Ei30XVXEw
+v8LELVEES4c3lZyCI8d61pfArAfr+6phKZWoeQUWrG4t7IJ9Ar8s5sM6tj+1
+FbBz3obv82HN/Q02vTBnk+XRHvRD36tu/YLU39gbn0X6l+x0vgALz97Vd4MZ
+rJnP2LD8nZXpRF3Sx+oxLejPLiF/XwPmF2+3WuoFFyuu8i7DLRZDka8xb2T0
+krvh5PqX/v3LSR5uTiEHYcFhpelkrhazDRJy3VmeWTgTFmUoj82CRSYF/LPY
+p4uprC0h9TJGOCRXxt9RJpb4lEfvTE4l33sv5abAwlOJrAUwbWHG40moE9jY
+r/IVz4n7l+RzKpwXsE6tlDy3WdwQM/TR5XifmQXnzdv2tIo8xxc8B2KfnoaP
+npiDm7KNVgLbLct82gvTLtYv/kzqPXMtDCXnsPpRtgmZS2vngl8wpaXldIjM
+IVE/HmCA7wslx57D6ZnlESI4wTxmrSn6TE/hDyvPQv5XHxyMgrmrhirmEm/z
+r3hN5qvLTeHAfMeEJYbkuY5yefaw8wODw1tgmoZuqxGct/tKWjQsZkl6Bsl+
+Qym5ZE6pJE67DOaNv52eANs1x8YfhjVNmcEHSL6DilFzWPhL7raIrN9T6/0R
+/Wv6LN79L3muxh03Usi5iQ/rOUHOQXVznhuZ16dURZ08jx3er4xggVFYbgzm
+446aKiuRc2ja6TuAfAKb63j95Fwc+LDcB053mTN9GE5/5RFVh/eKW7EsRg/3
+c2kH19rD4qsGMldS/+XxKw/xXtboNO/KIefYivbLAaa7e7qoot/AdycXt+K9
+5jE2v4uEWcx7Oy+Q9/6HW8x45CENKLq8FdYJ7zbMgFn0njYHuOnM1GgdOvYp
+CbJgw5xuMxM/uIUK93CFmV/EAwUw7YTMIYKsz2s4MwjLHTm1ZXDQ3I78BYbI
+Y5P3WFXye6Th/PZ9cGDS00BvWN1cpHsJVpg6DJTC6WF+typgfsWmQ9Mwn/Ns
+h53NMDfX/PYeOOcs11IKF7MjsovJ/JFx7q1wnE1fwwD8+FJ9ZSMs/u+QM52c
+x0GXSlJPwY//aQMzT9VOuQbThFnlVnBOEv1FBLmeUnVEG46fG8D2hAW3PzOk
+qDfV36h1PiylsyQXYF+r3+Ya5P7dagXz4D1a2ue/YV5WZ11BCfqPVpm6ugkW
+JtWU28D8lY6u1TDPwc0rF3nkWeauKiX5tKWe1oRdVQ145bCga3VIqBbOhxbX
+uh6Wxvd4d0/Bfvat4zuJ2SJHP1iq53ViIvanL7a51zOZQ9VvVm5YSuYvNLoW
+B+stHUw/YkjqjJ+/CA60lFqUwaJ2wwwlmE8f+UvFCH00jx9t10ReMmoeF46b
+fOfIB1jYnye5BLNiwsbL4T1TacpdMD0q5qIO1v8YsLOaNxu5Wi6zcYVb/uEx
++DAVR/2+AsuS077kwdIzfiE/YKcdzq/fwF2prkUuZJ6Hvx8MwbzKnsP5sL1b
+1ystY3jINV4Z89t9lfXNguP4JV9d4GLHVl86HJmvO3IOZqbzFdowp8njySNY
+2PJxQAnu0gye0gjrnZRqfEZ9QUdr9itYxfZv7mNigyR2CVyW9WTMVdJ/+U3R
+SS3yd0VwMQTm3/ilYw8zhLy0TTA9+dKK9+hPJI71tybrnWqWBMBiscv66TCH
+M6mmA/NR7cZcFZiWv8bTDQ4LPak1hLyKT7E6RMhvy/srjcOwwCss2QLW2Zey
+QQ33i15kbbTVwFyuzPrZMCt7Ac90EurvGvfbGZbPsw6fPxHzOt+feQTWrK+v
+91XH++Dv/7kI5l7OFokmoP+GjoIfsPBZnWINvFbV/KA98pAbHqCpwny7Tlks
+rPnsDw+FGqnflNoEJ2SVmurgep77axrdBPc1jr3gC28ZflAbAEsTK+rfwHFW
+Tok3yXWzcx67sP9jea5HByz86e6thf6SbRuDtUzRT+zRCbWwYiUzxw4WH5CP
+RGIedds9ehthAedgFUuDnB/3dG84UlZm2wA7WTx230ac8k2FQfJqkenw4HQf
+V43NsHFou+5yUv9tv5wPC47YKJmTesbZaw7Ba4OXiWlwnPmhp1tgTSPTetKf
+IixHby4cFLXPtxymNi53eI798qhZOulkvge1fhPh+BP9HodhlszK0wz9tiis
+gj1hzZej0SaYh+/OClpB1r+7f0cN8/uOyVe1J3lEe15sR557UjvDiaXf+m88
+VMX5KggWOJN68vh1yTT8PySEWekDC161Fx4fjzz0aq9Fw5zyItv4cfh+eFPi
+PXK9PlG9ZCzO8Qxr96+waGNTmwacPvGUy1zMx5eFnEtR4VDDuT6RQSRf2fqO
+tXBgdvH1SpjuVXBqAfxDdslVfQ7OxcjsYS7MWGM4gQeL29alpcNOvrruApiu
+z60ej/qRA5s722HOsWFmGvy1dqVQnwFP0zBciv64N6sU62Eq6Ht7H5xHNzoY
+DAsmv9LPxzzy8LrlCbBI2dt9C+Z1/uOQwVWYft7Me5j4baPFNVh6+HptFPKJ
+35xJz4Q1s2XrZbCN33XzOFi+nW+hjzxDVvV/2gv7/Buwaw45r0Wlq9fB4oBI
+PQruOpGWxiD93coIuY71xlMv2imT+0cOy2bCNQ47b0swjzzL/tMO7H87Pyaw
+FBZkblWcQL/R4WMrLsORk/PdT2Ae2UhTZRzM6mDk7ML8ZffuWoSTvM7SE5Yh
+L7HmY/cwOOFG5k6dMcj37TeDWHLdvOt2vxLOa5dGG6lHrbI+30oh79RxwSJY
+WvjHjLpRNsV6uXfeN1h09L2y3gib4iZO+NeE5OOyL6FymE0ZswUT/Mk8/l6f
+KofYFOPP2OzbJE+9av3Z8HCuX/B/JP+F4RO6f7Ep9bP905zM0P9bVSNtXKe5
+iFUTYGlP7YVMeGrR/DctsM/n3HQ+6lMXV1vomaP+3YLeuN9squzWpN7NsMg7
+7dAr9OOqctT7NLESrVcP/X/9R9uwCBZq89c3wzn5ai4NML3X7H0s5r3fOyHm
+IyxfoOVhrow8rYUd7f9f77f0HhwoGqchIZ6aoT8DecnHHJ1TZ05+3/xU5sE2
+devKC2Gf5BdVAbCeiVNlIhyZVDt3BRy02sxvL9m/zHlpH+oFHbWZvpLsn/RU
+dy8slq7fZEj2b5yhWop+mL8DE0cwL+eGyqaP6DcwfTKjDRakWo+pRv7cy8es
+62A6i81IwfzDjowjFTA1FOywCnkpYn5tLYNFvYrGPgWbqmH+rH9C1pv3vL0+
+iHyWKFm/J/d7nX575AebkvfqBg2TfI8wlSL68Dy8Tw0ySH/H12x8JmdTa9Wz
+rnqTeeqsaqu+san4h4OyKySPO90Xbn9FPzlREhnxHIO5W7rZVI7Sxw3zLFCf
+tn9R8xc2JVR6/jEUjjT0uqSF6zbb6sfWEEd03lLDeuc5knWTmVi/cunD3B42
+Fe3xeqsbzGk/PljTy6a25CdMuwD7dJR5mn1nU3GPAm49gaWcvQHn0K/o+LLC
+bzCdE2o22o88fs63U5+LemrmN/wH2NQeuaJOH6ZPql4nxPzcA9Sx2bBP1Uhz
+zX/IKyqng1wXvZw+4yry4v0t1JhEnGjQZPyTTQna/jo5QPafzLd3gWt+DzNf
+k/1XeUVNJ67tnl9E/KRtSijWx511Hj1D7rdXrwxF/celnyb4k/mqqCuzsL9m
+xJNGR3K/r0sDH/lLXmcUGcPUpGsq4ZjHlZ9cNxEW/Ezrd0X+jzk3v48iL5Fl
+g/F05FV8ZU3SMMnPMS15VyebCmLE3lIheY3Uz2lox/u2w6RIh9QrDln0WoL3
+8RNPYAdHuvF3ipuQT5hZ5w5yPbRwmqAOz7/60tEM4kcdnfoivG8F7pI3xGWz
+ftTcwfPsYzFJPhRX4zTvLPZL1VwSQCwYtV8YVEnlWU+5c4+Y/CSUUyrk05Lz
+P4Clt9A=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.1148, 9.674800000000001}, {1, 1}], 
+        LineBox[CompressedData["
+1:eJw9lglQVFcWhttmkwg08F73Q5QlEhgkstgYAZF5Z3ASFBEQo4IK1coqBEFF
+NpE0AsqA7IM6EEOjAyIYNtkUhBaEFIvQamQUrQpoQkBBGmURWZz7ku7bVV1d
+X73X955z7zn/fz4/Eubhz2axWJfQl/mdevsJffSA9eeHhKvG2prLyYirwnpf
+5BPwbrdxEX9hLbCEa8edXQiwcO76ZqMfYsPyr010CKj5kGD2t841wBqCE8ss
+9H78Gel/TBBn6aTMqhAQW7/DcV2aLlov5kH9BgJ6LyoEG8+vRutprDweSoDd
+wSMR2acQhx/kz3USwPpR1apQEbFVSsyrTSR8dAzkXbmhAyxN/oX+ahIOdA/f
+7ghALNh79rINFxK5xe1GDojdp1VutnIh63joUNIGxELJpwPbeFB4MY+Os0Y8
+NJNh3swDnmdvYoQbYtG34Zu+oEDtUL+jJA6xISdnTyQF2qmSWKqB4WqPsxUU
+pF6vu2c5z7zPsVnuoqBiF/HdDw4oPlZFQejPFIzGLiW3xyPW7P1JWkJB7GSu
+/aYGJv4/BgyCKUgX6zu8GUY8dL5ijqDAIm+kPfsjYsnOY7dKedBmpmVYu8Tw
+q9ZL5jxIC+n+fGIUsSAgoaqUC3b8XHvFJoZdxEmGXHh7c+XLxZPM/jkl9wtI
+sM6qCeBxEYs6D88YknA7VejaLELxSuONDeoJcPYR/xGoy+S/zz1BgO5j2zdX
+Is5RaL3GUPcvCDjdU/Tl2BgPnVedR4IiARl5hUdtnRFbRU5eYxNgY9rcuniT
+i943u9GvT0CCeP9P1RRiUbf11f0ELNUbPT6WSaL1DT66lxFQ/4+Fkes6iN2X
+bXu1SYifdmmYRnGw4CXxLo2EkL6jy6++Qyw0MezncKH+bJzDc3vEkpYtY5e4
+kBpbx1dCcbGGtBay9Hjw4gav041hYUbbV/k8WN/VnhyzBbFgzqlRhYKuWFMV
+C1/EorKsBgEFdTvpny1R3bLE/lm/iCgoJXVOpw8i1qzRG7tPwe40X/6QPorP
+MDbFsoeChce+dOZhxKyjw563KGjSjs7kXWGebx7MiqfA6u1LlksvYsl6jTBL
+Cn4tNnUTvUZc1RQy0MUDjklkgOc0k2+V530PHiRB2a7mEeY8cme1JFxQXz3r
+aSdGLB4qMNvOBXvvgNlTQsTwWq/pHgmibl/dfaaINY1fem8j4VyKCyG9zeS/
+dsDpMQH/qkp0O2HL5LPzyMdIAnTnnvssXNdG/VVgvswnIP29xDhAHbH4R52y
+z9B9HFfqUzumhdZfcJj/pA0prQERyf2a6LwurDxBENAniPrtoA1i997LBv8k
+oPKmRvmlvRyUT1HvlUwCnPg+VsuHNND+Jh427whQzHEeLr6gjvpz0pkMJGFx
+tuiT62s1pl43RY2SMPmU3BoVg1jqrqsUzoWkvqFBc3vEQqUz3DkuBFqtD1W2
+YN534ihH8YC0zm43c0U89FAvA9XdRhf25rQ8xCJejvoOCtaFVf9qtojYsLL8
+cRYFceOPOEnRaP+q1R+87lIw9gujV4ilA9fCeynYd3eD9PR5Dfy8eour4RMF
+Dv5/kfdSV0QwB6/fEnls65NqDt4/JGYgZ/4hB8fn9lzf+NF9Do7/N8nr9pRz
+HJzfQI03q5rLwfn3U3X6B05q4PNJiyrqX3FNHZ+f0ZL026AyNXy+m0c1bbZn
+r8Lnf8+MT80IPsP387Rj2nfESBXfX0Obd6317yr4fgubnBxVq5Tx/Yu3fxCs
+yVTC9dFxOeCZwQVFXD+5pG3PnkoFXF+HJvkE+YmN6+92FOGa/j0b12e3abnf
+eT4b12+tN2HtRrFxfZM+FYdbzdi4/iMe2C0HBrJxf/gkcYYfdbBx/7xYYZsw
+vFUB9xc/17aAblPA/Zco7Ff93VkR92eQdsJxUY8i7l/H2oqpa3ZKuL+FVPS0
+WpoS7n/dfY9OChqUsD6Ia/+dP8OwTD8C/6ucvCNFCevLotoGBVsTJaw/A2L/
+bF6OItanIBNVflWfAtavZ/aNXuuG2VjfJKbuxT9IVmD98/c6L1QuYWF9DFsS
+eun/b5mW62eDcfTug56LtFxf73w9kmo+Mk/L9TducEkguDhHy/VZbLrUoXFm
+hpbr91Ptr/xLyt/Tcn0fL3wRpWb1jpbrf1tqjdYkMUXL/SG2+En0zkNSWu4f
+otI731uqIpb5y/iyn7SRy/Bf/hOxO2nVnmjEMn9qyavUsjRC68n8SzlIdXRK
+Ee0n87fgvbfcMlRRPDL/i68znYc107TcH32+vEteNULxy/wz8tW96Ra1WVru
+r67vH0jN2xDL/Ld0Y9kKDp/J/y9/9kvfET++C7HMv/OXgqfCVyGW+fvfzaJ1
+xvzQ/2X+3+J0pCTNC+0nmw9MyEE6cQLFJ5sfxCOnLO6sR/HL5ouID9L9wWtQ
+vrL5I+J91cREyRtaPp+IK7XjrHpGaPn80ugxVd7ZN0zL55uq8qDcN83PaPn8
+E25ZOvHERULL5yPxw5CF08IWWj4/MVOVUCX/rny++j9tFrxA
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.75, 4.0548}, {0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000001556`, 17.}, {16.000000000002885`, 17.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18., 17.6952}, {0, -1}], 
+        LineBox[CompressedData["
+1:eJwV2Hk81PkfB/CJbRLR5JzkLFeuxlGr09eEVY5GK12Sm9VhEJGEqFiRYoVc
+STX5ReNc2bZEjig7OWJlmZRSW9skJMTv9emfeTwfn+v1fj8+Y77fNL2CdvqK
+0Wg0mQU0GvmkTc3jnypFE5FPOYoW0Xp+iaManDpyPUmeoqlkb1Yqh1nXW39e
+qEDRAr62nlmtTtEKezYyjsL1zb+0VsDUsp6mB3BVnQdbSwPzE/Yc+wqL1muO
+hMCx1f0ucooU7eTlnhsNsChc55MsnG/v1c3QxH4VPupkvvts+dN9cNrgQ6kG
+uDmMo50Pc9pTJI/DGoxrf/aR8RzpE8owR+A+LLES+8++Si5HXlNxyQNGMMc1
+ic6GL728FG8Dcxc3zT9DfcVqDpQznKZ3JN0f7qv9JEvMTR7MloBbbXIlbWGG
+c5FnnSxFm7ZXuGsCe/hdCIqDP2gL1RVh/qEAO0/YJ1MjawJ5hBIJtm7wFLW7
+phOu7z4ZHQrfLt1lwIe5hptLb8CBsv9cS4Njb4rZjMOyG4/wwmHWoHn4Xpzf
+0NZ8ygcWTBq6dsLDTy7IuJH5rbul96Ge24t82txJ/Y+ilv0Lz57wzT9C+tfo
+GxCDfvS7q48kkv3y+z8x0F/RiJU3OV/jn0M3s2HOhcDtr8h8Yc2UnBLm9/ay
+NVCPRilv+gQ8VZAe5Uv6w8m93QYLMp3r+bDgj2QdGpOitWlOp8+T/hyWubcc
+5nVdddqxiqLRtGMZSrDt5oTNeTDV5bbiG9b78GMb38CC2VyVBtgj5WLEai3s
+/yU/LgzmGzfaesMC81d/KME3eh3jL8Ee2ilSZcjLqC8Wq4HrywypLXArK0nn
+KbFeW0gHuS8NESO9MG3u1D0feF+zavtzWNgu85EOV4zd+9wGa0SPW9ehX1qF
+n8arYRbDaF08rHFw+2A2HHuo1tgXHsvqWxJJ8hX/HOQFT06nM12JZ9xEUbDP
+LeNKM5gbrOtK7pvd4Zvn5Mm45fYJGs7bVG6kPEP6saP2jT/5fhT13noHe8iX
+6Q/DDUOZCsOkH0+e9QWing8J5U0jsHDv1v2zcIPEXzkTMMOtpzwN/Zj28321
+jOzfY1unif6u9KDv2QAzNjNP3ILL7t9VO0r6tTPeb+Vy+NKmnv/B1Gazm+fg
+tlUlVz/DhaHZnB741y9Ndpu1keueRrqEMkU7at5vdx4W5Sz8Rx126Hvz9QUZ
+X7fpozJc5V19bbUO6pmNeT6N9aljThUhcOFn/7GHsNt+x4dVsChsRVMozHRJ
+bfgIe9jPdsrD900+yavoYj+GdWAJyfv07eUtsGi3lvcGeN8c864LzPgz8G9y
+306KDKLcyXz7qWFP2EWTH+YGUyfjbBfC+qJvT3cQB0usqyN/P/7avXoDMc2V
+cYbcF0XrbFWyX4Wn4S9wd17c6VmS30qzPAB28XOK/ZvkExRFJcBsLt3mdzjN
++Jb8Pbht6E5kFsz5ZlsjjfNyiifzYsh6k7We4bBeB/P9UVhY8Jo2Rr4/F4zM
+A+BYr6zcKNTj0ibRf5isl9yYLo369fOb+NFkvEJt6Cr8w5X70zkwNRHhbor+
+Ui2HfR7BGmdNVe/CxRk/S3wj8xdcymWtoGjPu9sif0Q9aQxvhQy487XW82jY
+wyS6fAgejvF68RgWrJy4y1CBi7zEl+uh/oNPfteGee22RQFwfU3GGTV42iqP
+XgPTAsycZ7E+4PHT7DmY8ilLeQiLqbHnLVdj/86ynmDYTqqLFQEztFTql8EV
+dK3L12F+dj/vBvK+92xVaYFFL2256+AfpB02DsAaX46bt6De/Nj4BSPE4lcW
+HYRPOvTKDsOUqfCGOPxGM6Ogm+x/xH9tHfpXtzTX9T7Zv+Tw3FnYdaW281VY
+aH3F6gjsMxPxLYbk+2dCKgjuG3v90Q2mDeqpp8B+TIuXG2DBBu5oMywY3HZC
+hZzfFX1OGed1fllq/gM5nys9kgC/Nm+0HEf9HkOKfQuQP0ItKvA/WDQ8uPs8
+8eXoRWS8fuh8rRrqz0+0Ey4keVIPf6qAR18oGGiRvOduvGCjv0XJDolOMCvp
+h7RWOGfyOz2BnJexLWcLfme1KtazGuG03gbrQngq7Q5TUh85m2c63sFVEe3H
+XWGhzfscJn53c8+ZN16H+TkhDgawjLKP4wRMcVr+1oR3Tr/yZRvgvl0bSv6O
+9QmGdyJ/hfndc//Vw3Pb15i2G5B7Rq8Kgq2dPC+KGSJf6qIEGZiS/2vxGph2
+YFVrEfJe2r/54g7ijsAAU3iuxajUGxYqNSQ0ol7zwfyIQ3AsV9fADWb82FTk
+D3ONOmXE4E0FT/32woxHl7fWoX+nT0tFs+E0LQEtCRZN2NC1yX6xWUeDYdlt
+KiHiMKfieUwYnDFe7Skkeaea+n+DZazUEu/DgjGdZ8/gXJnWpELiGm6ALs4b
+96kfSIQ1ggqD02GOv8z/ImHG+qQ7y5D/ie312mMwK7F3cR68b/FKpyi4/pJX
+2xrUbxG4a3Uq6d/69y8b4ZJAl2OlcKE33eRn9JebG9XYB4vU+p/1wktORCsv
+RV6+m9xBBzz3uK6xnHKCC4OF5rfhEvmJgExYNPuE9wU25xerviL9zh9TZuC5
+R+0/0TlTI4x/O+PIhI2jX07FwRbXJcNkYfYu04cdsMdp0dk5rOdJ3nBWNEa/
+094r1sOpGT17XWHB1i6PI/B0kuTr83BaZ4K6FDx5p/twLUzxPrfmI6/5VsuJ
+XjJ+0s/BGP5g1S7zLyxMZLY/QL069ALhZ5hl6Oa0Fz5tUar9ERbZzZ6iwXpl
+71YNwvWdKp516B+XNZnbTMZVBpSSYb/M+Voe7KGYVBkGC3c//nCW5DNpWnIS
+bs1VH/CGOZaOZflwiZTcBjY5z/JYxwD5flid5GmRfPH5e8xxnmKhY5Y0zJez
+pxeR+5vNMpxHP+rZp86S+96xQaA2A1PRleWlcH8WvUwM82lXRloo1D+4fjSZ
+9IuW3FjdDa987/l8Hcw7MFpmgv5ShzoUSB6LK7TgUNjil9/YOcbk98Jo4jb8
+5qe0Z/1kfdSNsRdw4tWC5pVrUJ+Sa8EczPzt4pMgWHDUv0kOz1FH+y2cH8Dc
+d73PlOGOBSY7F7EoWtZDzxdknPWaed4Ibj0feHUe68d1KxnOcGKXWPwQrHt8
+po4Laxh5H62GZwScjGSY2Vn6OB5+4iMtLCTzq5a4OsJCbR8tPpwmkyijANNz
+lrPukvXXtkncQ70MdpfKPZglNRnsCofShx3JOOsTbWoO/ZpwzzxUDlPj4al1
+8II41/3XiXtGt6bA3W095pkwY2E24wQco/DJ/AzMpz+oOA3PTT0oCyXnrUrN
+vkneCyRrZ7zI+JWZobewZe3+Qy6wBzN+txXOr5A/ZbYN5nb7F/HhXM4dTzas
+F7CijNx/Vc6FDgrmHHfWPQg3LsmTs4F5hep9PPjp1e/xO+DCGNnqMTiEdUnP
+A47ILOCvR3/vfE1+EA4HfH49dAIWvYp/cInM39iaVwmLnRAdqCT9cu8oeQmX
+7Lud1Uvq1TW0E8dzrHieMnuOjL987KAEO/Ncl+qYID9/k5kqGT//6KYjPGou
+raEAl2+xrQ6F9frnh+axX0vYzvFM4qDQwUF4zTaDrTUwn7ldvgr+Hhl9RwAz
+E/VFcXBc+KO4Edgu9cf19vDB1e9txuHYjvyPsrD7XJ1gFk7ce1FtAPWO/v7B
+ap6sl9jTfgtWGC0QI+MUnfrzFMxjHa3/AkvcW+Z3AL45QPm+JU653vATHLBw
+55I+Uo/DFNsSlooYGG82Ic8nQ7XWcKSPcmg13Gqm77QHTln7k7CY5LtQdjqS
+zO/3+ZXUx7ljb3oT/lp6rjiZ5PW6WUTub9Skr8UZuHDBt8sayK/Y0rc8AQ5I
+eR/kDxsOvB5IJPvvdrAqh89mNHakw30vVeen4Wuq1Bg5ry/ANs8K/a3qzpj/
+g8w337r2NKx9u82f5C9kyq6ug3cphez/RuqvqmS/hUPSfLpVTXG/Jh53LMJz
+c6Tx8iJrOEBbtlwZXlP29fhheE9DY7A67G39fTbdlLwvmm5VhO1vT764C+u9
+CZkn7zVq/yZ3DcDMLjm1QXhxvFvTDGwRFVlUAVcahTcqmOF7WJMnHgvLrUxY
+oQ/rDXnLbIODuKyDFrCE/XAjA2b9tfMXCtYY+3FtP+oVry47yIY9yq6682Dt
+7wblW2BOXLL4KbiyuICxjqx3cEo5ADeEeR9eDceq6f9nB6c3ab5aTs437U+y
+ghfP7q+RgHmbBrTIuPeg48avJL+8+Qvy3rjG9lXbG1JfvbJ6DPl7pR5X3gdL
+lPAelMKr8N7dAdM69b++gX3Zu5Rb4b7b4bF6yL/IxiW4BaZMNlUEwTuihRVP
+YFacdMFd+DvXSofsV/s6x0Ic/XyrY9j6juynG3VsG5zU9W77AuRj8pq4SbCK
+YG65GsyPb8qsh1981/a0hGsnVtV9gN3OOSj6wFPZsmZL8N5i9rsCPZnUa79h
+TJW8ty3hDFfAo9xTKZpw6E+lzv1wWt+0tRI8S/4fg6wnn6uo/wPv2Bb8
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.502886362674069, 4.972562773393563}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwl1gs4lGkbB/DRN0kqTTk02tmJIlOpUEkO9Va0oxymkSUmjRArNGVrbfQ1
+4nOISq1Escl5Zm05pEbJYRsbkUaIYjOWighJPruLvv9zfXNdrvf6Xe97P899
+38/9ztA/dJTvN4tGo2Xhj1z//zGhaHRyNaBojIm8RStgVvx0X98KiiZsany8
+E87s9bpQCcse5fwjhCNCvOTn4UKb0sIf4dTnnjUusOBI1bzzsGD0mMFiuGJQ
+GnUNNtCv7n6ynKL5tjVV3YStxZwVYpgTl3o7Cy4qPmK7EZbLt8ZmwLY++bkD
++hRN6RD78DLM9XS6ngWP+pepRpH1z93le8Pusg6Ho3AXw+W+EdwVrsh1h4dq
+MoL+q0fRTPxE31BwjnXKz80wI4d7yojke+LK4nuwLOFmwkJSv+VsRgHMG4z9
+96f1WP+ZqzAHFtq5RDXB/dn8vb/AajXu5iWwbVhFxQM4M/eMfSas90+bVivM
+rfWeToOth/afGCM+e0OT3Oc80ZdpIT8TnZ9/J/F3Wq8nWsDi5eqPm+HUaMYl
+T5hRtGXbFFxXlx0UDid6GoQwkZ9ox0T/FTg6YNewOWxc5KQugTmW3pdIveM3
+dhqWwpTtpZUR8FTe5GgJbGBZ4p9J4qVGV/JhtcPcOXLSv3RBaRJccPx+5Rs4
+OnomMASedKQEdFOKxhT/5bYdNh4bfsaGOSuZieqwbxx/80a49f2+qAbUl6jN
+fLcTTl+frRkDizUOHHeErR173K3hvp59t3nw5NMMq55lyDN3UTm5z3urGrMb
+jjgsGLYl9vtgX86maGGlkg/mcEFdMN0MLpJ+e8EAdu9prJV9jbyOhLVrwB2e
+urP3wvTArPEJ5G9S4nZqmoV5FLBXvYZlrDZaNWzho/9bLdwx0nc2DR5dfkXt
+Nhz2pW8kHrbVYGy4DgsjPlsnwfK5Ke4JZD0dgUgK16mW+IphZb/2vTY4Ojhw
+QTgc11wYpYH9G4dONxAnvfxyhwcr3W3azsLUY7dHV2FZlSUrCVZb1/XxNdw/
+9tYxGxbHOp7VR32UQqf9Adw/9KzfA07ttX/fQfJnX5qOgaeGg+P+guvy1qzO
+YpP5q0pgoX7h6vYkCVwo5d+hYPHJ8jXX4ehXZWW+cHWeSu8J2EKy3C4WDnDp
+TN0Cm9DSjPKJi++ufod81B44b3tE+m/T7i+Gg9a/vfoKrnt7cXoO7JvWLBoi
+65fQPSJR/1BIst0kzD1fHDP6FUXbV+vXMk3OYylvaj/M/aTOIraonzn221KK
+prVT7jdBnt9WJVkH82IcLd7DlNEZ62xdnDNf0+0leX5Fr78BHGbTJZOTebOb
+7C5jYr/t20//SuqNrM3zgOVBAcpkuMjs5KAWzByIXRtBns+KGnuzhKIpGuVF
+pH4Tq545TXDH33MkznBcU014I0w1+1huJfnImNJuuF/vhrcpia+Inj8b66UL
+gwdWkX7MKF23wA7l9d4cePSgc0oYXLipRXct6a/ZhsOVsFA9mGVB6kn8RkcV
++edUP15vT+Ifyv/cDSv3drQfhPuHDxvFwfS9WZ7hJH4J+3I5PP/YV0+vkf27
+bPidcJeAr/mQ3O9cteM97KAfOKEk+b6/O7cPrg58ZzzbDHOyqn7zY7jVv/I7
+DhyWpsP/CWYpYwPtYeFB71dcuOLbHbP94QLzUe4A8uVOqG0SwzxO5NRJONl1
+k2Eyud/pp/cZ/dgYcNwyC2ZE9sX7ww5+B3SlcNIHtwvPddBPTpD0F5j2oqPF
+Eo72H16aD9c1nGDnaiPuHrszHVYuM2TpwEkX3NPOw0UJEtPLWvheyMi3PEXi
+e6/u/hpuVKg0+5B8suJv3ddE/3pTLu6BLfyc/wiC1czLHprBmcWS0E2wA6el
+YCnM5BfrasMBZ1xT6CS/8lvh8+Ap41tlH8n3BfOW4xKYmnVEs5fMe3XBfnPY
+OKnmPJk3PSPJVT/itdoNbeR59p9ON+FE8WuzDlgk4G19Q/af2D5A+l+3ZU2D
+MfKVm//n6QjMMFq9IRSmvv8+nOyv+OFUdSkscihwZpP8I9dND8CphadDrGHu
+pfHeRdrkPQp9eoDUI1WZz4FHveK3RpLzYvKaVsE5OstO55L45GuHtOEwr2dW
+9bDs1Ysxsl6HNN9skPTL2SMnHw76bLhWfQPy3G2b4gwrdh1aYgjzVLe19SJ/
+sU/rXCu4v51l5w/LP2502QPrOe+K/GMx5m2JhtgVHj3FL9sNF70sOLgfVm4O
+O1q6CL9TLvqqbjCj/EkIC7bQSmhwgt29vI+eY2D/8XXc7XBHxM0JFbgxfp7T
+erjaoHKnxkKch013ty7ZT6t7zFID7yWdvXIWrFCYJl9cgOv+PYcGUI+JOn0B
+A77TsKNHQeZD2eNTOR/7dNI/lJP+jJyWXoPTPbIrSX948vGpLFg0+lZ0hfRz
+5HhKCxwQt208nsTPeP69EutZ2EfRo83IeZuapMCtI4N6xElu0oW6yKfwgyTm
+HCz69VFaHpweyl13lczrlnGPTcg/tWumQULiq7yeP4BlM4PPa8j7sqshiIl6
+DQyY4a/hyQE7+i641XCqfgYOWHFLzQdOyjbJ0Ee9wlCNuCBYVKe4a0f643rN
+Twhrhc5t+I7cnyUX2cBD1dSFRJj5wub4v2CByOpRIUzFFgsOY//MtFxuPTkv
+lT3l6ciX1hNo2AMX8f1X30Z9NCu3nz6R9Y/+EJCDfgxpJc6hbUS8fUtg9Dys
+FxBsoQorlpcy3NUx/4O1esTKCttqzlyc1xd8yHmT/wfVqP8BWpudvQ==
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.57964504524893, 4.283992682631731}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwl1g041NkeB/AxtxUKs0iIjCivSUxCrcZL5KUoTDbqqiyjuEaJiUIScsUo
+yYZ2vFRTVFLKSlJUREVYE2rH646yGkIKu/d79s7zeL7Px5n///z+v3POH519
+4Tt+olIolAr8kPz/ZzmTYkBShUlJGKGvfazFpBwbVbE9B7fKtawugN03R3mZ
+LcF4mYidA89V/3K5jbhkhegG3HpoYn+EKhyUrTgAm4WPtMkuZVLq2hfNWOD+
+MhXbeOfh8qs3rApgvbGmPkU1XDcna6Ohjfkk/n9EwgGsO+zLcKRuU9tj2FfO
+3FaTjvkPB383BXMVlAOD4Owd10wV1JkUWl/t8xuwVfsPTsR1RSamn+CkkStJ
+X/B9/v5agb4Ok7Ig9v3mlzDv2dVqb5huFPX+HCwTKeBGkvF2n0BPUs/QqcJT
+sMr67jAZMp61+GYK7H8688Vj1M/jtHTFkPE8FetEWCS/QTUANlvTpeUBc5P/
+rWQNe09ss10NCwsvfy8DJ9joJtFhtY4h4WvUJxyzbzaG2eHKp8/BAdUHHnrC
+VSyvaBbcOPyhJhNuNeFSyfPT19b8/geZv3RB6yv0J91Dd5ZF+jXIWxcNM/s8
+Hr1VI+t3y8YSriu40HcQ/Qgw6a1XhPMnLbxkNJgUibbjfmlY6NV44hpMi55d
+vwxmDB+95LIM99Eo+30rPOkmL+6HJXHHY/Nhycudk+GaTIrgt68DUqjHbODH
+qY9wVbxr8SZYwuBN78C6i/wKHyTB5cMHFYtgmjpD8RU8WBqW2gV77mG6qpH+
+M+XGJ2DmhTh50j92tN3KKdiXqq9eRNYjqdBeBHOZgVE9sFqbw5n7sKBtRYHs
+Cialw1HLKR4Wsv2yjWDRg3uRG2Hx4Y2LfoC9W6hXJ1EfT2sihAknRJ68foPU
+P2j5lgE3rHS2D4Nndrozl8Hl4aHvrODUZ0espzCfXnHH9iWwpDRlvgE28OJe
+koYbvXnOZ+DGuPAqRZg5RzXfTiy9/idzuJyro6gCd1Sq6JF+0T0KbN/i+QXN
+1fpPYY4gnVoCq2gdDzBHvQa7hD7RpF91OTl3YLX/rnvmAzuyzM854pyo7eR5
+2cHe4UYsEcyPSGFtgA0kHT4nyLrn2YY7wiWtnf00ZK7d/uP+xFKrJLuRFIum
+wkSkzb0MtctIbn2aSyX5vdfM6ABZN/vl9hPIBS2ZbLIuag4BnZbIoMrTcnZk
+XYpNRuOR4p89RvyRMvda1r1AbulfUXsQKdrksEMJ/TurUigOI78v2TXvDV+h
+zocEkuupnlaZ8EaOkdATrutdyKmFTaP5LutgmuFQgYisF7vShvTNU4e/dxKW
++IrDJKiLH9Ou9BUumS1rbIF93QOaxuCxshjTMph9+wf/32CblCm/LNJnZj3r
+Nlw7KN0QB4tbpgdPwIcoRZwoWC1MeN8Vni55Ij5KzqFYfkAB7vcb10yDPW2K
+K9vIeS3Z7HeVXH+5IzOH1LUv3q2NfL9j7j7Zr5wHIZ+lkTPcFjMLZJKMZ70T
++V6l6CwNaXJq+FoGuc+loo/fcJ2/2zXTXlhSr1r8mdRxdG+WCebl638MmSXr
+EWH75zG4qllgpkSus6rf/QIWbj5qsB5eHFSuq6SLfRIR9ZJN5ldXbtwOt6ZQ
+vpXAFVq/bkiBKSW61BGYF8wdL4fpQzc71+I+7j9+G38JCydc9Mk81xkK4new
+r0pOTgP8rWZIrw+mOdv1LET+xZbOFyI9e4bG7JGaibpdT5FVGXyLw0j+s2P9
+15E8vYjzOciNp2rM05Bqcw9KSpHJH4tOBSHFzy4KbiPTtio8IvfJ/VNJIECy
+PJY36CAFFjUhWcjIF84saWQqtTckDOk9tEYygbrMgg8/t4XvaihcGYG3rFlr
+KAN3yBgsGiXneo6f14IMmK3SmiUOczpA9lvosc02S0k/WNlTXrD06zlVJmy1
+VpiiRfbLrf3PI+G6Q5uMP5F109NovEP6GaFwshl+0bZKaZb0gzpz7S78RP8N
+Y4se6uE4LC2Da0efR+bC/IdL0yvI9+UnxsRw6pdu2UbYqMvjoeVK8n6jv/kI
+axh/XhYP0x/rczQxf6u1W/ojuFGD07yT7E/R18kpMj4UbZ8HC74rqKGvQr7f
+2jIAR4nWvbeFPf1ctU1Jn54YTnvAqSypnig4+46lszfMd2DdqSbro6h13x1O
+WJJ+cRou22ZYbwPzZK3F+qjT/5VZGLk/9/TqWHd4VeWkDgWmjRd07INN5M0v
+9q4kfWUYH4BVRCP3q2Duo2VHyLhEOX/vBTK+J5pNrufdc9kdCwtUWYcMYVdl
+1dXBcB0rvoT0scbC5ZM/bJWlkEf2UfJeN4c9sIRp6Ef2jdH8OCOU+ATXZCvM
+ubJyTQqckLg9/HvyPIz06ZuwTHxRRDf6wZ2PKeuHzYRNjqXwcNDibvI8YueI
+nGTyPpluTgwm/eoJyPgPzGMssr0L10n9VREI087n+yzQx3l439kZAmuGh4q9
+YYm/sWwc7Blnq1hMxv0UfuHDGU+rpUZhGm+heStckSuxXm2AurZ8uCdH9pV2
+WnYgzEkU55D6aydVQnkwxTm/9TycfuRfN2/BtKyA5SL4Jn+X+DGc6kCjk35Z
+mu/xeA4LTqgmh8EVUp+r62Bf2dIN1+HBs2/z/rl+QDujF47scx05D7ducvOg
+og/Dqf0Lo2BJE2tcHc4vVy3dAc+MZl1cAXfvqq8wNSB/51zNNOG05ARpeVK/
+to7vQjj3aA5HgucLyGgKH8L9NRzYMT0we74gtgrOeK3u3gozY4YWn4TzH8pn
+EfNpKjrkXPSf/HnfO5h37sqsHNwQ+7f1F5i+K2HuFVn/d3s/aGE+9pd3kRfI
+uXKaK/KE68yox4PhuPGUr2fgqm2/ttjBiTVOc+2wVcv1XAMy7vDalW6I+fUZ
+UVpkPxjuYXBgNTOGM3mPyIkMu+tgg55GUwY5D11Ub0Uj8v9kZqYPfCA6tNMX
+zi0/ppxE3mtUn7aL8JY3H2oekveQRolGO/zPB/UrkTRm/g8iD+gn
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.867783472564531, 9.687357802186902}, \
+{1, 0}], LineBox[{{16., 17.00000000000231}, {16., 9.999999999998607}}], 
+        PolygonBox[{{16., 12.9}, {15.6, 14.1}, {16.4, 14.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.9452, 13.5}, {-1, 0}], 
+        LineBox[{{16.000000000007276`, 17.000000000003638`}, {
+         10.000000000005457`, 13.5}}], 
+        PolygonBox[{{13.51826734053906, 15.552322615314452`}, {
+         12.280184249251306`, 15.293188945044921`}, {12.683281069670574`, 
+         14.602165824326175`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.823799910437668, 15.984057296392571}, \
+{1, -1}], 
+        LineBox[{{16., 9.999999999996362}, {10.000000000001819`, 
+         13.499999999996362`}}], 
+        PolygonBox[{{12.48173265946094, 12.052322615314452`}, {
+         13.719815750748694`, 11.793188945044921`}, {13.316718930329426`, 
+         11.102165824326175`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.823799910437668, 11.015942703607429}, \
+{1, 1}], 
+        {PointSize[0.04], PointBox[{16., 17.}], PointBox[{16., 10.}], 
+         PointBox[{10., 13.5}], PointBox[{7.5, 5.}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T4", " ", "P2", " ", "N8"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbf/cgdfeh/ifghgihi.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbf/cgdfeh/ifghgihi.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {22, 0}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwl1gk4lfkeB/C/rmTJmj3pdAnZxjVpyqj3bbG3nETpxtyTaCrkmI7BRDQo
+y0myTCrLYWJaEC22yOnGkEqHkSzTHddWo2UOI1nH/f6f+z7Pec7z8f7/v//v
+933f8zxW+YV4BCwihJzFh37//9JgydQCLiOWrE9+9PG4OktISu82JWOWvHH4
+QX5AjSV1Ra7vVsGxatX3fOEh8YGarbBN3uYtT1VZsv37gNkQWKq0+MW8CkvW
+/sMyqwiWBO5W3QvHZoTLD8Lckm/de5RZIphMTzBZjb97uK1OhkX2Bn8Fw+Iy
+tX8dhTv9fO2r4DSTnJ4wWPOZh3QB5gdM5JfA3sPH+xxNWKKmt1ROAfW9U4w7
+z8C854498fDVZ1tHxHB5yHORLvp7M84GjMM2e754ex9mv8+Y1zPF+mOKv9hi
+npbPI/+9Dm4Z0N90hs5nk/qFC+x9grnyC5yz5aXXTthstOWcNvJJbFUQusKx
+cxar3WGfmyq19rDo5uBimp9/1QdTI7q/yEUYBbvcPxMhC3cHTLwWwL/OCbP7
+0U/ahkzrvXS9VfaNGpidOxLAgeWHJ6UXYJGW+ulOnJ8o2FgZCEs78g4IYIFz
+tJ0rPPXgYMEiOKLUIM4SJrqexxZjPv8wJlwH7l/irj+GvMR5ostKdP/5+GXt
+S5Gv4VVtRTg2NS6tTAk5eTldXwaLQ4uH0xVZ4lB6ONeM1gvZwTmrwJLGy/XN
+LjAn7bdrGfJ4HuW5iSdof/dPvW1YQusEd/xE65V+VNSAS0Ivrh2i+/tIQaoc
+SzKLokZNML84LjF1PXw1qv19MMxJr3ulBj8dL1SqgrlzLlXaMC/JYnaBrm/V
+CHSGs9ckhzmZoV7934V5MGnx35FIbXrFUBvnOQSdTngEx+r0vSiGPTmBAZMw
+p8eF54J+M4u3p6xcgzntyuvHYONe55mNsGjLnZxLmG/7invGu2F+WNz9dZg/
+vrR/zJtaOukshmUjFRu8YIm61pfWyEtgnnfABZb+4F8SCTfebCW2MPe7K3q5
+sKe7ZJsmrLb7cX4mvNYgSXEM/Ygv3DT6Cq5z7ApuhUUPkr6eRv1q6/rSQtim
+uVL5COxzSkcrClZLyT1biv7im5oHvGHuzJLxNvRfIj5q+yXc/16jvwPz8mz5
+I8Z0feiE9kPkU16QkalD85Ds21i4GOe7+4ZpwvzbGadjZJH//sh9BnD5A197
+v7/hvWM9L35G7/+3O2HPIuyL+OfynbTeT+9GD8jgnEoZr3Daf3sdiSOYbyDN
+6QbNf7CCyVtgMMexc8M0b70yNvkvhhhw+XxTzM+JWrpLMs+Qtd8MjwVTxyWq
+nICv/rhiqJK6M50XCjda6xNijnqvxkN+hrPLreed4NjnUwNHUU9NUHktCea1
+2dlycV73qaG5JljioJ9mh34MMh/azcD8ghsmL2CfoFODxhao/2lEGo3+Hax8
+prdZ0N/HiR9NMF+QKK17PywdnvyzCebvvbf3EBybLJz2QB5mBjENB+l+dkNS
+EzylWNLuBfO+qkjWRn5mWi5VrAX9XU1tZmEf++xpI5jvMJi8Ce4XrQmVgVlD
+VVlVWLPjum0f+uNcuGhagXqxt3dG3qH9xsdxTeBrq8rOC6k77pWEop+c7z5W
+HaHzWo4tz0b/uuJwTTfYZp/jfD7mk+9KuGALi4oGe1YhD7b/23YjmL3UNToy
+h7zty5evpPlVBwcXzDAkKMh312pYvDNA1X+KIb9u8OtdR++XOZpvnmTI3OzQ
+3T1wf/OArNsEQ2Qb8g+epO6dXZk6zpD1QxPjJfS82i1Z+mMM8UxI13xN908U
+G/75B57nEVbPjOZXuE186AMs77r0OM0n2kNw7j1DhHdbmipp/lqBhiHw3VpV
+GWIJu/lYEqzPVP5M4AyzWlZ/2KAe72nt62SYp7yQFyZliA95uqMFFmctK0vC
++f5PPF7Ow/3FOcJG9GfW1ydnbgXrXj6vif7fnZQTu8M8v1s2X39kiFRZaY8f
+vX+J33Yd8/qH9cYFw+yTR8GtnxjCeSwUUoskMYJq5MNdIbf8EF1fWu0VMM2Q
+nJHfXXfB4pQHZk2wUMUk63NaX1xh/BzmRgtb1WHOqxuz0XBnrf6nt+hP1Nak
+LkG9zrqK3Y10npgX55pxXkuqvnEunT9dY+sx9BO/zulOBJ3frkTwEP1POTWY
+7qfrVUvDejBffNHmcJbOb6S75iHyiLA7yLWh+591tWkgz3KJhoI5vf8qIz/x
+DUPEWs/SrKlHf9ZRGGKIt0v74U10/eDg+m9+Y4jufpksWj925rBb+Euc1xVx
+K4a6N6yQJ8HzUXnffYuuX9R6sqWRIduHi5+8oRZezL1diffFqGbEDPOSbsMP
+NYV4P/7z+6bj1JzHNeIo9GuSf7uSml5p9WSO/n9hxf4PT74hSw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {1.7026940733168927, 12.067904665985203}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwl0w00lPkeB/A/dd1pZZJG5KVGKsPZJrfSmXTb53HlrYhSim27k+rm2lCb
+rBDTOzXLKLUVjjlWm5abt6Kd2hoW11u3oS2TIVNGXnMnidHqut//2ecc5zmf
++b/9ft//wyE8Zut+Y0LIOfzR9x+PBUumpvE4sqT0u9YnhrkskSzLK6+EfWsc
+pR2w68uBL6Jhkp/mdgM2X/LzGwGsLXF4EAr79v7Y3L+YJaJ89YdJc5bIuW/V
+JfAhWeiFVJi0x5ekwMrqw50c2DrU6HIoLPbiKj5x8fZt/ccXsIRjq+4ywzzL
+xzIhrPff6H9/NkseqCxmucD8kSNf55myJNZtT5Ar7Brv7HXpM5Yk3fD4loVl
+vbe88maxZKbPIye6P78q7mUTB7+v8a6Ih1nWcq0dXJtusySXzre2n/j+zyxR
+PSjbUgvLM12MPeBOhc3EEK130c0oa9j/uLRpLvo1V8i/todTucsur4KVhY7b
+A+DTbwb8AmGZlbLuBzrf3sR2Lyy2Wdhog/PsGqXSKJpv+b+ti+Cgox2nqFWb
+Cw/4o95+M9PgcLrf+5X3PsCGRBPlJjiouOznXPTH02hMXGj+buOCdehf3Ly1
+/RPN75jEtY6atAQ0wFrF6tpVyOtgi6LvPM3/bf9YCiwzWxHrA5e67xcVwKWK
+OUaEWjyUn0PH7zTUVTrQexqZcwDO4vjNjoblfwsRzYClEewCAazK3333G3re
+mYu8Pj7WWxjr76G+Dbqx0WJYlZ3+qQP1jz3M25MI6wVdkd3olzOluxMMa3cG
+GB4jn7G14R1r6HpHP78SE5bsO/hV4FJYXJF1XvonlnzuXmq7iK7/nDsvZiZL
+BNq4VkfY/JbCWDwD9/r8TOZKWP6UqztgjN+V3/I2wuzyjcHpRrifhA9VEfS8
+xKSSFwT37XA7Qwq7xkSoN8NZ5ZuPVdDxX19NvJpmCL/t1koNLDm7dvAkrJI7
+HzZCv5IablIKvMv96qQjzHrmDrbBqy19q1iax6P6OHfsZ/isuHU7HT96xORf
+sLldyqM9NE+bWbPdUU9EyN2QvbCyT7rrBbxLLlOH0vWcBXNOon7R8l2TG2DZ
+7u0vXNBfxMHkniV0v197Y5pgQVa120eal3Xvmx3I47dk3VQdzef7U9xmmMRW
+FqbBskyTBjvkV1Aq/OQNkyuVgT5wi9CGENr/w/vx3jDfZ11D1CLUWXNMbQVL
+dE09moXI831htwL7+cq12s2wmOukdYVFx5/ZNNujHqHndBLqkdc6fLcNNg+d
+Z1mA+lVRM34asUN9C50SitGf9bs7a3Jg1iO/Lhd5xEsKhX+HSbZ6iiA/34rR
+2yJYuzvozP0phuy8ohgUwEp7q7bjH2FPJ+cVdP2SDibMwJB7+7QtfnTcVG8b
+Ps6QiBNP98XR8cFafcEY7u9CRl0ZLDl8UbfiPUMKp4QuBlh+ctjVbJQh4q8S
+vvRCvfyuwnue7xhSeqFYkwWLd0cpn+sZIhdZWL6m/Zk2ttTBV6/I0wToX9m6
+5uZszBfvuGy0j+bR+SztB1i77a9VMliyyOJQCvbnj/KSi2AtbzL1Is7nfFnd
+U0bHE67Vt6A+mXukXz5dn5V32g71i+5kjCXC/IBoJmaCISTg2nyGjrf6bStH
+v0r2edMwrae8sebpJNarjU3PweSsoq8G+egzGq+b0/ojO5wP/84QQTBvSErz
+NInObIPlFjvGp20xv/Pshpdwaa+XVTSsnRh5nU7nT+ZrNDZY7/e/X15jP86m
+yd8CYPkN3qAG56X2CP/ZsADr04ydJajH2l5TEAhLutnbatTPF6+b22eN9Yv3
+P3qH/uRuiRmZMN++YnUH8igNe+y+BWZ7DC/zkeehIulWJ1j58G3Z/WHsv953
+OY+Odz+9sq4f+a73cLOCJXklIYM96H8weURIPUc38KybIf1ha01CqVUW3go1
+8k//GHmRunBkpKqNIexAwsF2mCRqt75vRn9Nb1850vpV8cvd6zA/zHX7EWrv
+I0Z7q7H/5IK/VFPvHIqLVuJ7iTN7x0H/JP28J1OD+dFdgd7UMZKw7Hp8fyH2
+sUepq157Cx+jnqx51peomzn+9Tg/6MztohxY0rZlYU475u+xi5FRh4Y+aetE
+vwdGT0dRVywONn+F72um0++rYKVHTVIu+tX2nmjS0Xpq+q8P9+L7yD7XcgJm
+s5/0afqQ73y/QjNYGSmUBAwwpKGpq/IC7X9/xjXBIPq9fkM7bYX1G345FQan
+1ilio2FlxfPIdswnR0VTmvnYL3Bp23XkrR9eahoAK4MUNTffMMSw7L/m9ZZY
+3zpUxNExJD58p8sm6tTJ8f9ocZ8zm8e7ebAhuQD/kkR5ouqbc7BkZU5cdyu+
+z02X1J50vCrdxwH56S3vps2nps/V9X+8eez/AXlZLnI=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.7973059266831077, 7.067904665985203}, \
+{-1, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000002274`, 17.}, {13.500000000002274`, 16.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.552325660469876, 17.180083206945802}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwd1Xs0lGkcB/B3rVDUiFnr1hj327YplyXqvEmyJTRsLusyQksZZMXslEiy
+gzG0FdJU09aRVJJbqIOlyyyJYwvt2tKNzoakRBrs9/HHvM/5nOd5n+f3+77v
+mddwZzwnSoGiqD34kZFSIRcbmmKTUZemdGUGXYtgFZdKexF8YdHsR3XYx/lN
+GFOPpoqZyUGGZN56b8RxmHl4wyUHuOV8eZKKPk31qs3v9IE97rW58OCcJ6wB
+Hvx6G2emGZYZxbuJ4UGVzZI5mFvDuFYJT7ONe81X0JS24UG9h3A9ffkbZ7gx
+OTxtCk4Ilcw4woWKdd06q3G/jh3PCDY6NclYC5ddr+B/wn5n5vq3+8Pp7tZ3
+WuAgR19ZAkxlXz++f6G++PYjcKWe//mV8Mz9P/4+Ab/m3lL4B/0IjtldkcI+
+g5smfoWf0JMmpeT+9UW1jvC0MDFswdJXu98hn8q0wEvn4Jb2+ue1sFvWmfRi
+WKh7QZANN4oqxLlkv8gIeRyZL5w6t5+c/0iSEQ0rnlUujSH7tW2PTIEzO8Ul
+O2D1pffMJXB6oyR7I+wxGpnaC3805Keuhh0dWlxNUQ97bVKyIUzzr+VlkXrV
+zMOZZP27+aYp2COLu1SVrG/VlOxDv43Fa82U4GlufJwcdjEssCbmOylYCJGn
+h1CXR9b3s2Q5TBZNWXyMUtYiDqE5p2HFyYbnpnC3pWkIy4CmlJy+qCH580Ud
+j47B6TcuzvuSfiak/jNw0zyHtReW37MWmrNpSnTOfeNROOlQ0+hm2ErdIbOa
+5CGuuxwCT6d897wX5o7G/BIN90ym+c6Q/QxWLHj6XXan/hq8J8PVDqHwQLCr
+9zqYtg38fQu8y/vxf0FwQSZHeRV8y6z3QRLcfz1gXg3W5Wl55RDffHHnPuob
+OhgzVAKzxR1xAlgeJ9xUCpe9/WRvDtdUOXlegVsWF3P70P/Y50OMq7BQWK6R
+D8vKe/vK4PG+k2YcOK46kCUlzshRNoEj5U7CY2T9vsl8Zbh3R9TgYbje/e7o
+HPK2OPUnIxHm3mDkqWJ+Z1YCMwxO32C25Fv4jFnn1FZSX2CZ9S64THTythPs
+U17xsgpOb714wBIeVGSEaaBer7zFDJJP/7NtSzPgVue3XhqwNDG/bQ4uuF/4
+Ro04asseV+ThGlQSQyzz6jAQwnLfpyuWw9EVXeEP4ASDACs9OMkycZmmIfob
+u3HACqZkbhp+sEamadd6kvcqSWo+3KQ7VO4PV5amFrXB7pyhWJJ/UlXy2Bi8
+pO3D1uMwP7Vhl7oRTU2s28utg0Uj793M4dIM06uPyX6bUuxtYcXH4xazcHDo
+bm87WPB+WGZgS1OejGFNa3gNMyuHhhNOqsZow7E9uamhMJdjc3QW57GXWHfy
+YXZZEWsAjgwzk4lhidLyl7XwE8UTw2dh2bTJCxFc0Kzy8DKsPcZ3jIBvjb2I
+roIVeVbKznD78ubaalie8SZCC66y7Z69BgcXXqGnkNcMM6j2Ipl3Lwl8St5f
+I5fUU3C/gqVJN1yc90BfBOv3/9XSDrfy3AUCuOCqzngX/NBl5OhPcGaAieog
+XMETxPrBNd+HU59hIxuFr1xhqepKPzbOL9FtEK+GY9VzTb1hNa5mhzHpp/Om
+QxY87Zcr1SH1h4Z8Is+D+3NCqybc7SU9rYS8Pny5rFEDDjCTG3vCLH7sMy24
+rL4u4Tc4uGcwjA1/yEzj9sGNPbkWq0i/9T/8q22M3Ev7Zkg9tzNHJvzg135v
+I38k54fffZYNB8m+lqWQfrd62tTBzFfNoUWwX6tTQz8s3qHm1gC77emuG4fv
+2p84MACPnI5qn4UXvk92+D8kown9P0h0WZg=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.876835367704164, 7.161502436909525}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJwt1Qs0lGkYB/BvbTZDGJJGW9LN5SS5FVvH9tUpTSJ2CmMrlEtyqZkhl66I
+I7cZS9nZCtOWcsuO6rQV1USmabXW7ro0ExbRkmKQEl32/7bNOTPf+Z33e9/n
+/zxzvpkFu/dzQjQoiorAm1z//7ClqU+vOTRF/xZ+fBEsW91wcsqEpo6WjlW7
+wmGtkqhuWD2HPhcGl6REC6pgqVO/0wmYmS8OjIQXljPPXCD312XVzYTFfpaa
+t+FEhrKvlEVTW5bFtDXBYl75LTu4bNl8yT9wF+OjrHI2TY2m5ZkOwJb8qO7F
+sPG7kQ0vyf3uExvFxqibJXJ5AecU0Kt1YePymIBnsLr61mjaLPQheeHYTuqf
+iYuaAYf3ufIb4cdmxpsLjWjq+R/vn5M8rNnfl9CwT25qXjnMzaulXs+kKee6
+mfvE5Dwp21gGs3NvpqaS+Wx36CqCeQK7p9Ekn/RS0il4VUddcjDJp8lhS2Cj
+wWI3Lukn2/HqHXjHo+UaXiSvtV/SELx+iHZzJ+uabQ+sUX+LwdwfPeB+5Ta9
+WDiefrN0G5ln+whPDltPhbMCYd7IJrkJ+vlZonTiw7a6CxUR8PPxZvs0ksdr
+ucsN+OyymORzsPRC4MIpWDWYcOAurLCf/Zct5pUzg+XUBcebNlr4wJSFfpuG
+HeZa01wYBoceUXHMYa3MofBQ2KhWWLSJWPlv+hZyv4vOtQhYNin43QyWXTbJ
+y4Sbgl+2d6CeW5+JdwlMe0zZkO/j3SGV7T14wt95ypTkM2Afb4G7ROmLS9Df
+2a5LLb3kPE7vXHPYsMKsZ4jk2VFUdxbzul8ckj8Gxxfkr2HCBx32GhGzGk62
+phhinveZVS/hHIGo7oMBTd0QvFY/Jed1e+gmwxku3OOtsGKafoAhvCM6dLWc
+5Cur7L3CpCmB0l7rGtzPLVkaCpcliAYlMHetubYN3B68Up0Ns3/Vz9aBV5ae
+nn8YNsvOevJeHzm/lMdFwmEHxkXTsV7ofrE7gNRLzpi+GF7nbWXpS9z2kzkH
+Zk07qubAvBNlhiKY6yG/uhUWM8SBbbD2D3G3/Eg/w29XWCDv3KR8kxBST9iw
+7yD8Oneg6gAsrX5a/wj2UlrZkfmLg6o+mGAeF6Xms4philGs5w/bnr8trSX9
+hF5Zfwpm6sXak/mwGvdE1cCrtBMrNO3xfLisGm2C9U4o5lnBUtXfn9w7/PCQ
+O8yeF+VbDR/1v1mzD1ZoHHkigtnU5W4h3C/yZXrCGWwuVQF3jUh8J5Hvqwcf
+NtfD3KyGljyY0nGdpyL7rZbsNIV7GacnBki9nTSnAP3XxvXlviLrpooMI7i5
+c3/zW1gimObFxLzd99QriWX3OtsndHFNKBol93ulWDgPzqApm7HHhYPEPR+P
+DOvg+ajPTO8kVvt/rQsbd6YlN8JmkYmpbtrIuyEotoasqx5OVjBoKsWeH1JK
+8psIPZ1hjV0TfvlwU+p5xZAW8u3V8k+Bbcu/0fwT9or+jh8DByrkEx3w/YRd
+x/aQ/Y7scUPs5yZe9PEn55/i10fAxnHZEj/S75qGlh7Y+q72E2LZIZsIPvII
+Ixu2BsA8WWavPvIaOny7JBxOvBeveR12HMtZcRCmnSpdt6Pf6w8qnERkPgZB
+Vm/g8C8sKktI/SyfjCTMpydYW03mTwftHBmFY6Y2LX8G5ziEqdbr0RQnvTBR
+ywGucR7nw686k3qXwnSSj18sfGWz2suTrK91rfCE13XkVPMdSD2h83ucl7Kg
+e1EunHjmwqtjsP0YVfALzBOmJaiQZ/TwHZ+HcOBG7wEmHDuYXtxJ9nv3yC3R
+z+5JDcYwOT+29a4l+h/Cr9MkLIsLjGAxPv8vOX6+atH/ASL6aNo=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.123164632295836, 3.6615024369095255}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwt1A1Qk3UcB/A/AjlexFHIazAUkJERxEENAntADpUXJW68nHgMZtRQKIPV
+ASoN2nByunjLKEYspGMIcYsY7tJiFHnzRFkkuHlcIpBwNAILhUCi7/+u5+65
+/33uefl9f7/nf89O4btp+VsIIYdx0pWYNnF4M2SOrlyGGF3GzDNwe2xrVQfM
+M/T2tsGSr9M/48Oq9HESDc807wlxhEPV7wxrn2cIKy+ieDSQIdzqDb4bPHQ4
+RX4ZXjoxoijwYoiN47GMi/DkK1cr+z0ZEs7JyaFmWUkbWXCoaU3bCUuKGn4p
+8GBItHOC22041yYybNqdIcr3FXYE9SR2/hun4NLFOc5rtP6H7+2LhLvjHxwo
+h+UlEpk3bJn+LkgHm9r+knFh+cHxikVYvUYOZcInZSXlXkEMYTuNCdvh8C6u
+Fw/WGQO5LNQX318tiYMNVbyCMljXsz5Jr4emnvl3AWY7TPnT53nPHJdmI/9c
+VELRPJ3fNbGrDtY5lMV00nrHw6zW4aecg7HZcNaktcAb89BxHtnbwiKP5EZP
+2H3QqO9Cv6kZJ9uWcH9pi07Pp/OpNSSpYEeflNdtYd7qE9tgmFlImh/cjfVG
+81Ul8liCkxsVsMTekLeCfriK2cUimARrRAnwzNYAQR4s79E6N7rB/nX3RPDS
+yA/9864MuaMfelQFm8z3tvPh3JbU37upCw9JTTuwH6KjTFOwMZbfUAEn913Y
+4Ys88tIwQSLMlfnkC+DaNbMwBn4qlRQ0w+7X92dmwP7nlGQEJm/JEuvg6KOu
+qsewceflh7OwTmrb4YB5sNiT02+gvmXbvlYn+r19TrT8DLdz+gs2cL9vXdQA
+D/kJ+SjNBOsjf91Uwaz6bxy+hNWJleZlWJTcpThC52m6GfEi+leb+x6y4KZx
+j02G7o+agDkN+pls368IgSfKysyZcO2fYssTPC+NO+JiDWsi355pgoeVSV9d
+CUA/FQlTHrRe/o9LZXDTJ6uXJMjHuunwZgrM5lwZGEM/Bq+Lr4bDoqZCOz9Y
+o/o7IQT2tb/2oNiFIaerRVZ7YbUn99TIcwzhB3mKc+AsS8WuONi0HFh0AU6t
+Kvl09FmGHDCHa6/D8rPcymrY4MjPtkU+vVUpKw+Ov02c4qlHvVqF8HLNb+Vn
+qGu+XZHDXIGsh35P34GIkBE4+e4XRbdgXeC0/0uoxxvfXjlB99MLijUl7Lg0
+tngXZjeG9zkjr2bq7K4BOp+PtX9UwvzZtYV6OCvG+vw03C1MkabTet4d1cHo
+V/35sRR7+v7Hdz7IgsUNyk4t8s+9XL9bAA9v3XbpKJ2XuM6yF2ZH3ai3gXMj
+AiZW8L4hU4u+158hq4OzP52n3rNhXQgTVcj6FjjUaCwMp9dd7lsJkff0rbQ1
+J1j3Pf+fXvSnKXbJ3/D7/7/mjH1OVz/mP8lKx0w=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.16438510075492, 12.373697879094095}, \
+{1, -1}], LineBox[CompressedData["
+1:eJwl1AdMU1EUBuDnQsBSI45UaLHuAZYqEFGoPhSwisQiEjWiVHBgBSxqFKmD
+RK2ioDWGpQYbqEnVxjgogiuiKHVECeJi6Au2igmBgqtiLf5HX9LcfL05955z
+8s4bm7x12Yb+DMMsxI/W/48/ywykdRzLhJYnauRw5MGaQ71jWWbCD73yBMz0
+VjJfYMf9rsgGmOMdKXwKc+Z+X/gBiNNs7CyD3ftK4xbATpd9qhrmeQa3psP2
+XO5tMCwYUJiQDxtD3Np7xCxTkR7yRw9XrI7PM8GRVkmREVZm1k9bT/Zu22yA
+rWVH5gph5Y2esAKYu87TXB7DMlXbGmP2wMx7L6cEtpbI5q+G60u859z1Q172
+EeJgWNBW/DwJVseem+IBu49THxsFW/jNlhbUE/rJPdEqYpl7DSP3XoUd+Trp
+E1gnbTHnwu3OW1/rYKeX6s4m2DL+yrEWeHn57dJYWJnksg3CefdSEobKYH3M
+TH4EbLxwLnEWxT/5HXsUNmU+WEP78gNFCa2wYfF+1VI4NeWuKgT51zrSVqTD
+RoPobD5coXq3q5D2F03+ycG8wcLzj+l+k2PtSPQjr0AUM4jqKU+LDYJ36LW7
+F8K67JZNctiU0+SgfocfSAiMh9O0JcmvqZ9dioJlcJUhJcxvOs73nDU4GpaL
++7xSYGnW2R3T4fBuobYMXrnt+1IPWCG7kdsEX8nOGG5GPsvpfwnL5LTN5kXB
+ARQHF7Mu30eobz2dC2ctqtsZDnN0L9zOC3poQv+klBes7Gfu9oXzKG/Yznp9
+PS7Ee0l1wWL/sEJPuJbqJvNDF5/yRR6GUxo78sl5da0rAFY08J8/gnXd7y43
++WB/RpL5NKwocDWWwvqapxczYOVH7a1sWG37MymK6oufV50BP5s4+rCY4usu
++tG+KbCvpz/VG71bdgbmhr2N6qT3TdiY/YLiXa2/PsJT1lVtGY77v0XLBTa4
++Lx/bzIs2D5Q0kMWVZ6shplhVVFDcF776blx3qjHPXPJ50A4i5vKpsLWJR6i
+JLg+SHOwEnZ0uu0rovpsxiIH3LFKK3sDWzJsu6ahXxzNBfqhm1D7Ug4n0tyQ
+LWskcbCR5gpWN6t6I2ADzR3MugVc8oE7aC4D0c8RqTeb6T6aW1jgkpVr4WCa
+a9iyZUCDCG6kuYcZ7YdcA+px/sJ3AVZ0RNT4wSx9N+Cs6OofOvTn3yNFnbT6
+sH8BRImRiQ==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.763809742330267, 6.7638097423302685}, \
+{1, 1}], LineBox[{{13.500000000007276`, 16.000000000003638`}, {
+         7.500000000005457, 12.5}}], 
+        PolygonBox[{{11.01826734053906, 14.552322615314452`}, {
+         9.780184249251306, 14.293188945044921`}, {10.183281069670574`, 
+         13.602165824326175`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10.323799910437668, 14.984057296392571}, \
+{1, -1}], LineBox[{{13.5, 16.00000000000231}, {13.5, 8.999999999998607}}], 
+        PolygonBox[{{13.5, 11.9}, {13.1, 13.1}, {13.9, 13.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.4452, 12.5}, {-1, 0}], 
+        LineBox[{{7.5, 12.500000000003638`}, {13.500000000003638`, 
+         9.000000000003638}}], 
+        PolygonBox[{{9.98173265946094, 11.052322615314452`}, {
+         10.816718930329426`, 10.102165824326175`}, {11.219815750748694`, 
+         10.793188945044921`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10.323799910437668, 10.015942703607429}, \
+{1, 1}], 
+        {PointSize[0.04], PointBox[{4.5, 10.}], PointBox[{13.5, 16.}], 
+         PointBox[{16., 6.5}], PointBox[{7.5, 12.5}], PointBox[{13.5, 9.}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T5", " ", "P1", " ", "N9"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbf/cgdheh/fihjgigjij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbf/cgdheh/fihjgigjij.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {44, 0}, {0, 0}, {22, 22}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["g",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {21.75, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["g",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {26.25, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["\[RightArrow]",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {30.75, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["H",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {35.25, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["g",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {39.75, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["g",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {44.25, 69.96}, {0, 0}]},
+  AspectRatio->1.0999999999999999`,
+  ImageSize->{288, 288},
+  PlotRange->{{0, 66}, {0, 72.6}}]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.77548972111089*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ImageCache->GraphicsData["CompressedBitmap", "\<\
+eJx83QW8tVlVP/DL2zH9DsNQE3TMkAIiKFiIKAoyNga2YmCign9ERbG7E7sL
+UTFQsVtRULG7u/P813c/67fPvpcL5/OZuOc8z95rr/it2PXEp33Y+7znBzzt
+w9733Z9205t8yNOe8T7v++4fetPjPuhD6quTtzs4uN1N/rnpwP/vDg7yr/G5
+2b/6j/7/Lxr/Obn7v//7v90//uM/jr8e09/927/9264/B5f6u3/5l3+Z350Z
+/z69+8///M/di1/84t1nfuZn7n7gB35AWwd325q/09LUP/zDP4y/LvR3n/AJ
+n7D72Z/92fHXiW7wl37pl3af93mfN9r/oz/6o91Hf/RHe/dU//zDP/zDu8/5
+nM8JBbuXv/zlu4//+I8/0YR8+Id/+O7zP//zx0/PfOYzd7/927998IDu7b/+
+6792f/u3f3uIgq//+q/ffeVXfuUhCv7u7/5u97Ef+7GjDe884xnP8N7289W7
+//iP/9i9y7u8y+6pT33q+Of93u/9xnf//M//vPuwD/uw3b/+67+OVz/7sz97
+95znPGdQ+NZv/da7pzzlKbuP+qiP8uzBI0dbF3df9VVftfvGb/zG8TwGfczH
+fMzuHd/xHXdv93Zvt/vDP/zD0T0GFCMONg5csfvd3/3d8V0+yP3Ij/zIKZcv
+/MIv3H3ER3zE7i//8i937/AO7zBo/YIv+IKzPbqv+Zqv2d3jHvfYfdZnfdbu
+Ld7iLQaX/vd//7eV4Y7NRxJ47GMfu3vLt3zLMf5/+qd/OjjfRL/N27zN7nu+
+53tGZz/4gz+4+5Iv+ZLde7/3e+8e+chH7l75ylfi+e4JT3gC4pvoy0ev7/M+
+7zOJ/omf+InBFB+Kc+7cucE8H/+t/ltGp4YWfOmXfunui7/4iw3+xibxm77p
+m3av93qvt3vSk560e8/3fM/dX/3VX00Sn/e85+2e9axnjeZ++Zd/ebxKpPe9
+7313L3nJS3b//d//vXv0ox+NdweRK/1/93d/90GmIejWd/j7mMc8Zsj4N37j
+N3bXXXfdkJE+n/vc5w6VeqM3eiOsODjXJP/Zn/3ZUKviu3dubbKe/exn7z7p
+kz5pkKWpiOnjPu7jdh/0QR80zOjxj3/87vd///ebc1fufvVXf3X3pm/6ppNz
+f/7nf7573OMeN9QFmXe60512b/Zmb7b76Z/+6d2nfMqnjN/f9m3flh21eZ4Z
+qvRzP/dzwzRJ7oEPfODuF37hF47I/AM+4AN23/3d3z2Ip9Ql92bo5WPA3/u9
+3zso+OAP/uDdO73TOw1lNXCM+r3f+73d67zO6wxGs6lf//Vfb8ZeMf7Wdj4/
+9VM/Nd6HBkZGv2ihz8/8zM/s3uqt3mr3P//zP+eaeDJ41KMetXvnd37nARiv
++7qvq4kb+ucy/sFqfMRfLZc+b2/fsPvkT/7kYYU+HvM2qbzWa73WgJ5oAkz5
+2q/92kGcD2t++tOfvnvXd33X3R//8R9PS8N6vzGCD/mQD9l94Ad+4BApbXjR
+i160e8M3fEMWf3Yh/slPfvJQUqTgUUnhltY5Ovmpn/qpo/V///d/HxSVqe2e
+//zn797t3d5t2L8evfp1X/d1gzpN+vzar/0aA242X9z9xV/8xe6JT3zieB8T
+UEdscAGV/p/gC2+mYhSbd7fddtvgipFeccUVuHNIMc4MtfzQD/3Q3Zu/+ZsP
+o33AAx5A68/1IFbdIAWswGIE+PzO7/zO7mEPe9juEz/xE4dRer30Y/xmUKUb
+E3sN8GlPe9qQ5Kd/+qfvXvjCF9K37eeTwza/67u+a/x1tv+NH7/4i784VAcc
+wUJjKiU4uOsiBkYGlozzLne5y+5P//RPj1MSg8Uu0Aw+fZg+FSQu+kZ5vvmb
+v3nYlaa//Mu/fAjeu3//938/xMAVvu/7vu+w3/d6r/ca9nf/+99/9wZv8AZD
+pKV46whI0wiYKDPWXD1ycP9jNIWkb7311uF9APTLXvay0bV3GBL0I+nv+I7v
+GM//yq/8yqtoCg7xUNpAoqGyD9z5kz/5kyFrIBxNKW6NNgG8DyGX4I9oyrd9
+27cN51Lgsvvcz/3c3YULF8hm4/OFoSnf//3fP5EAZt397ncffPL5zd/8TQOK
+M8dGKP8t3/ItY7wFkXMMP//zP7+7973vPRCdtbzHe7zHcP60/w/+4A92P/qj
+P7p74zd+Y7Z7ECShXDfffPOwDuK84YYbdn/zN38TJXnpS186fuab+CvGUCYd
+JSGVhAU+hM+cQSAJUhIuEwU+VB20gT7mYXAohh6eedCDHjQo4O6oO93+jM/4
+jKF8zOjBD36wPkL8K17xisFaAnuTN3mT3ZVXXunn6AdP9Gmf9mkTSd7+7d9+
+9+M//uMDmKEIFCBTsvWhJwCcCHi3GsXk7V//9V8PFcfz3/qt3xoRjIjkq7/6
+q0f39AeolShbP86O9h/xiEeM+MyHBggIBAE3HVYSlvP6r//6k5GwsfzG1tKl
+AQl607uB6hGvfVhA/Dop68Hv0Ji20FKOkUEWN+aIWNcd73jHoY9wALbiL0ji
+LGm/WOL7vu/7prboiyvywUWYUUYcbRFGgM3AMY9ZYdk2ipuGMpEBDcEXqk8n
+fThZUZlX2S04CBVsGJqRi/DMqAS0nsVj+n67291uRJK06173utfuh37oh4Z3
+xEiaVDzPIL7sy75sRAc+IgOvF4Det3n9Yz/2Y4MyFLIIfOSD8Mj/o+gnf/In
+h5+gPaTuO+IDaLyn3guiJ695SbrNXnzwHqSjHmqIg8mwtPQgbpImGq1nmN8d
+7nAHwc0RxaGL97nPfYZD8dFD4VUgStwC6kRW/AtYrE5OtIYmLkezFvyMtuqz
+PMtuhCqkkQ971qOEhCXxO6SBw35jZSxrBhtnRigPAqITouKKs+/aFBTW7O55
+z3sO2/BhT0YtWzrdTeAePGbu/kFlfbcN4tQADx89lFGc8Hu9q+WV7nJCLY/z
+6BvjJS+yLB0fXpyf9Kl3O9TelJrlG5cPr1/Ict8ewFHicJu/243sqQyvGElV
+mrqD48hrEqfH93xSnZBfkozH75SxCdheIUmROvPDbjZQttXacqd+So7E2YIb
+Y3roQx+qk7uMn0+PSJXv4TgoFQC8rF+tVGJEKV41FnBUxpyQU6zIYgS2IgrI
+UIh+l0UL7na3uw2Q4TIf8pCHULqLPQY6/vCHP3wQoHHAwURpwZNbzBgLcyBx
+ifzIyGiwt5ElzJCA1VPpn+H62ofScjo1ogyOjF/7tV972DAM9Hjp/blmuC5Z
+kr+u6VeQ+Q3f8A2jQ05GZLYM2ECDynBLSlIiTYdcNXDVITjsZCod8oWN7wdv
+0d9Rc1bCe5zs7/CtEqPx11aLOHh09yCPEqznwy0UjF3eoqZ+WqO+PKvIML3L
+DuGxv16rmxPiwdN8WP13fud3pjkqaUwSP5xamzMQacR+MKdG+CIpJ7IaUDSb
+h+iw+eh4QDCpsTUwA7UrGLu2GyQOfrazgTQo+O30ZQ5FuMY8gCq1IfgKYm7f
+r8A2XkmkmWZ4n07vewjnBq3f+q3fOoYW9FKHgMAFABthB6/bDKKP7INtMqNC
+moNruyW51Pu///sPnr/gBS8YY5HGyqFKEx6+2BAjoTOciey4Hr3UrWA9ocOy
+L/qiLxq4zWj585LwI5pRSJSJ4H79/+27cXkaZBPrEg57LsFtPx+8Xr8svoC+
+amLV9rVtvrpCuOBawPn//t//G7WUMteD124GCEMoVr86TPtSvw/ndApbKJos
+SagsY762RSDAah/SwdMGehJVeCXA564L0q9cJGmoyIjFyCekNqWsB3fYBvd2
+PTjBKH1htkXRU/prkqAPBlbWcqnH42t1Cc4K4JXyTbpoFTfKRRKHV8u9XNkt
+CkBoj2iqNCWhvZAdNnJEwpZSqoPm//2beuFK++OpmxgKYer7g3v1dxwI0/JX
+viOAMDDvYrx3ual793df8RVfMQxst4AdtojJAaH/p4bF1Yz3R37kR3Y33njj
+CGnIwP8XIlwxfr5sFquIlIqIt/l5KE/HYRHl5ruqh7acy/ttY2Gq6NKKFtDB
+b6/fQbKK3U5g78H1u2//9m8ffthjQl9Mz2Prq7wBAsjKcxI++mQM5EvvfIQM
+MJ55l7u4ubklN2VKJe7JVWGAiH03Yg3/vucAR+kzHDBWkqSfIcN3uoI0SPAd
+c1i/867cD15DnDznuzynD5KnQDIpmUAq1qQPrTjCeuYgY6Dd4umC2DkGmKQt
+ZnptKyiMAD7idDGbNqICskDxh49gUxhRtpaasggmjmpNuXlOwbPckiL6+H/d
+0CZDeOELX3hwSCduGBqlDAJI+EqcZISsHXf4StzQjJH5znOkADBIjA75jnug
+z7irPe+KC7kFCuE5TufcuXMnxqzBmVTHBxlcABuvwYZ31I6V8NR3bnQGCTJZ
+qqfGoAeRNAZUD5ua3HVoJ41kIpy7R0TMkg9+1XdwSroO8XwHBaGN1B7SMHTf
+UUOlEKJZ3+XGQSD+l8EUwduoWLEP8qklxhSTMyqYwEMVfw7u0sCNBLETTZE3
+cfWarti6Nf/UED3t9nvZcgJW1IgC+QliEYqW3UWf2I+8Lx9KUro+9OkETnZl
+Zf3Q4yI6UbTxiWI1pXOVgkqqDqnS2ZmX5IPjPEAFstMYKLTQuQxtfqcAIO05
++p13y5fNWJ4UFBYQixXccVGyqdLFOWkgshUz0syE/SCHLfMT3EtiS16YpvtN
+pIrj9d2FHhHAXD+gRpG42DcppQ90quQ8v6M3XTk+9J3n9t9dGt8prfD41Fr3
+JgBMqJ0+fXqWiwUkqnxGvEIQZUAP+MiQ0AjKGJwCB5QtSVxsHdJURZsjrqku
+U2Ch5fxNepR2C7KKAwc3Llpwyy23DP7jjMC19OxC2yWM5Yv5plRUABVbLU2P
+FPFLvZbX9zH28g6tS1eP/9w8fA79MZIIUb9STfCyficOW7+DI0efExN5jnlB
+BeABJSGC53ELJSBOGaKA5CBZcbBJbbGAPQLl6nq2p2sI23dILiEcXNlDwUoI
+SlgQ0MekFCSU9iR99Z3MTN63fuc53/Xk4iBD5IgkET5pCulVWjwPcMAqCZsA
+KTbOoQAkLPB82UuGAkFglqJJhqI7JgSArujvcBvnNklu/4afmV+BuarQZUIb
++pwe6J20jELddtttBzEvqsxFibWZBqFT14LsjjI3E1TBgvQ+AETIrgZxadWZ
+GwekYigFjOVytFBLvJHvMA4TjC7f6ZqAyB9Y+NAT78JVzp4usRPv+QgfBQzV
+VjFYOfviFDBdk4jQq+ggC6ccaCmAPUia1DWO8Vckoj+W7K+N+7cM29SehCJl
+YN/Rc0aW70gI3caS78RkFMPMa6o8vhPLURT8SDEEGKLVR5ynT3RDtM7dh4IK
+OvE6pS98E4wSYfEyw9NdNzeHh9VdZ2v3saUlifWiXAptAnm4LRUCjCXSm1ud
+UcFkBO4VmFzWX1ME+sJhVM8pfgEn+IUHyuAnTpzgLw9p0ZYEQIJStEOJge/K
+Kx2soUlPwB76julVbNDfXTPe9R3bUVJlEOyEGVN6+O07YSj8BxU0jGRIWvi5
+lOiEM5BWoFTEp2fWmlR7A55zAxy0rqXomGCULEvvk9tRY2KrjudAuFffrXEs
+NfZdhWfzO+8a3P7da8Z35Eh1uHB+mWxJQ7xMlkyL4KSnBkyFqR2GmvF45Stf
+uUIW+CO9ct0rZBkwyMqAxa5YasCZicAYbCysSYXFYwjBWXhhFUeWmlA4eq18
+iRjJ7a2tP107jK0Ou5jTfKdHPizd4dCZBSVo3brn+M9lgzWII0CPoYI01FGE
+r+J0Vur7yYIrhwoBKsGdluMdRDrmfzR5FGQ0V5DevDk7PJXnGL3JSMABd2Ht
+PZo8fZAcdrMfQRnpirCpv1k9fwPEUteQx8CNDObBCFFNMMJs/nEYQQnEeyGP
+EiCZs8N75NFdyWDiS+KGU/7h9PSn7Xr2IJUd8qFAsh3k97M9kRhI8lQzrFu/
+MDQhs4dGhAG8B4WCxpxVaUCCbtp71EznMp7DZjpZdXIYvqHJZy4ueoO7ckHQ
+adVICGU3qSCEUGZN9XwMgt0gXNFDOzS+xBFCwSyEZ2IIlsgV544zr9KREEpe
+VEU5I4SSDXed6f8irok6P6JR9hJ/wlZ8+B+oZoXPg7sdSCf2Sr5QlB0kHxT1
+8s/5AI2S+1YbP0jFSNguSTVppLJQcNLV9Y3FKNhNd7OVaHlqBkSBTcpcOGJc
+lJwXXY2LlzhqXP6mqTx4XBft7em3SSMxMBh0isNFCaGRLnX0MWnEcT5CgYYR
+WnAUGukjGkTErGL1wiRBAVcLowaxsNAoJO8p+xnPeR8817uzrEdjKbe/Htj9
+i2qoJmtivfoQZVx++eXDJSvFJmKAZaxS9GGV0F1X0Z0ZbIZZ6gM0X7JaoHux
+e5cVUMeNJ5vdo1oQ7YPaVLuLw3M6VT2U/oE+3BAMz4LgFsJLAdjOYo5k1Mn0
+HD/zFGTu9efkCKuzkjADoZkiPJauZiDILR24uDSNDetAhNio8NGNQTDLUuc5
+EOwzwCxJk5VWFpWB0G7awTYXb0j4BKdymYFwcxRzHQjuN8jNiiRhYoJ6tUK4
+YKQM5AEte5ZsIFAdouENm6F3ponF/ol6U7zgIEz8texT9eKDqIoKxP3udz8q
+1bWNM3PWQYqr1MKEi+WnmnUGCOCyxg2qQebS1EOWTAtZOR1IwiQJVXJdc0mD
+xmZt8R8bg84NZOF/oIWcwEcc3nNSt++RUDduxry6itfTn/70JuP0MGDdM3xO
+RL0hw0gAoAuukgvzTKn1HAbIRCZGpzCFO4xV6UTbWY3pe8aOFVYXZBgEolgF
+UBisj3YZcVneNf0Y2cJDKiEeEf2wa7Zb2cBWK79qBI2BFx6J9zGnzo4F0zTN
+BzzFCGWeGFyWd8NhLWDx6OBOOKMnPvGJrf3nxngQRMWNESFiRb0UYae6CdIX
+paXkK0q74tUgARGVZqxIQI3VPCcSnB1yp3aMSKKh45jmdd0yF89AWLulG8qf
+pW/nFpjiGJgovlMfalTZyEHWF6eQg3DWTeNLFS/vn6EfxUe73vVSfmg1fuDI
+1UzjPzsaNXeKUewDc1NIv9Sv0mG6rtVCs+ABBBb4+CuJPwbqheu/vF9X7BQ1
+MvhqKq+LwsRGso5T/Z0CMR+1922nhn+V8rHgUqA7rgpxZlSDsrAHQcoEJbGz
+rRNKgdFhH86QjrCfkmD6Ba7B6Gv630GETF8xoV49MBBhzc6DCGgkfZ4GxpXi
+36EJ5c5JLqCi1FHDDaF4nLXlPno2avFPWVgIZWS07yihCOFUiG+1eSKFEbFA
+3wvDMFnTfBpHVGqQsBECAtvtr+3fJJ80/Pr+zsIAixiEnJf3KDgmg0QCqPJR
+GRAbFayc6cdARo9ifDgkf9OcEsMREUt85UY+7FoF52Uve9nZpsPUDzGv9Man
+7L87MzrJMqfIrNgST8bbER3zIQhGMU3//ICumL4Cmrc9iiDSlkpmEpcQRJf5
+WOJRPYdgISxiVoKjXOt37AYG7BYfnPLLbmDrbnp9hp/wme+Yhn9+QDdNMnaB
+ug8VoDYiIxMJm5JucacCCOq5BigQeVvF0CtRZ1ZFJ3BF+7I1/+V2zGdEs7kt
+8gfLSOVaMJpN1ftHhC1yBvI8CsdkQVkxYdOcU+NnDQDnIu5804Fu8Ck2pgv0
+1SPgc0OxvWuk39Q/k5feU8kFC0TAdYI1sMFEJMKRrHcUI03Ry7NPnTrlmVBH
+7UEANhVsnG8OoAp++pk7BN7QgnAL3a5pAlc7FoBnLpE2WoGJYZgpmAKcCPRb
++Y52M2fnZB44Fw3xqp4rf9JC3jaWSCq2XjfK4xQJvXz8+dYH/BD2CTwFXnxl
+1JNDkYlJR3t+PBGOyAT8YZOwrqKajmMvG56OpvJyVEbCpnkGZfSwgXioS5ln
+rBcVSg6qHOyPtCqyzOIWLMZONaeL3VNW+lJm+CHIpoB0SEgmhtAzhS8+r8u6
+YtFX94CwVfgkp9OzcCkD4jtI0ztYKArgGwK5fmcTcLF4lto0yeCPhQukLHIm
+Oe4wSMG88KnQokd1YYwA/8RIsn7rpMAuBPE+9S5OnFgjfFUA7TP1q1vi0hIa
+xUxmSn9y/Al4/BWPQCHVPktB5zo00V82Hxip92Ywcm5IL1U0n1TSBPcFDq0v
+W3B3xVAjepIPSBEe0GBqxh0pymCzdZo9m36ypcNKKXXwmeSiGFh79dVXU+xG
+rSuHLmlKQCIOE7MRB4KhHHRKRpqSGEyHBHdqkvHIc4kAeCE0cLgiMTp60003
+jUFzYOa7KqcMybqnSPQPySQTksHE+fPnPTNJpqtgAySqaSNZKKkCI5JmMevk
+nrY7EJnFab6DvzenEyNmC0nsb9+ageTLLrtshKxlDFmAiSxTwXe+852H4jKh
+UrwrWuJaQl0WakAgOuexQpeW+F27XzS2QbRvuzC+W500nWHDWmJcQr2y1VWp
+ez/dQRJn0GhZl01pIcxzYjZJR8pcYIFElto4Zea+9FZKk72BPEGWAKbagihW
+DrKAdgmnfnvRi15Uhmu6aY3j6AdhMOtQSRCCGN41VHpOepF9HJlP5G3GatqN
+SjxhWzhbzjv70BgJmIczpYmpKlNEQ4UTFNS8V1bqwQtLH2lSEZcElFB6X+bu
+5MlR0ZiBhuCeAQNa4SzzrN+vOyxa8To+Q4uz3aryAPiFjxZQl3M4NDXQs27z
+O5zIhs+AoRlmNdXddFuXDVZkAQlLJRl+OeGUQJuTaYuOUFlSo9Ms3pttsK5f
+NMxwK/6b5BgSxihE5jvvd7mv29i0mtVY+nRVkyjU8mxI5BuRmIV0almAqKfn
+IwdfWSsKewR0hXFzQ4MoLmsHYZ7MBQCYi8g6PW40VcWUSVTmrEyxe4R8LfSq
+LuMRUCeVRUlR18vysjRAZUKn/A5TogQV/KY4wRasC+V+fMQ7yjVWoCbXBDTU
+MLmOIIauqwVHytjfC3ZnAsk0wQs7qvYSEiRZ5w01p2xXhpAl+RAYh+ge300Q
+JbCVYEt1MNCHwTFKziMEZ0UWVaQzCIZnNkGGYCUsYcEm7U14OEmFqab3tRmq
+OY6k6f7LlxXXL/bPBECeHAOL5ndr/KdakDSGcfGOxpxdAfJCg2REWdOvKb3E
+SKTH3dtUE6oU/G87vnO/Dop1wcXwmFitPlfKO7cEKGPFcWfT0Vwhv82/C8Up
+MD5LNwT2FkgkZqb/Xrv22msJOPMFXuU3eRurhGFl0sdk5qxdyNPrWLPlIet5
+KQBp+RlxXLiAX7hQr6esIqLM5imRjIBqBkSbnnAC9N5Y2AE/h4sZA89LlwQa
+Je+MQW5oS4lF53KaUtg5OZ1sRDgHtdnEWDC9rM3CeWuzsgFHUFAO8HTrgldZ
+YaZn+QZOzfYrQCswv1NTqDsqRYj1Xtw/pe5VDHPuAVXyNc6QP+W5eoFN8BOb
+qMa6Npu64GzJeaoHBZb8Ch2kZfhTsV6CIOYlUhYhwwU1+bNNMLYLjCxwLJMJ
+S0W63FJcVGUPB0lW1uIdpRRT5WSAzHXtd5+cGs8bKGQvJkQfIKfiDPaSis1Z
+xboQndWCWVRsM0mIpoSU0jKsCgpCNGMNwdYN0IMQHTigWghhGpG/TJQr8tE0
+FazUMnBOQGuzlHguJd+q3lmNwsx5bsprKWnKSQuEzMDAO1nxUY7riOjBWrxw
+tGg9iiFcpFVCCz6MnxG8lbLmFfVNnnC32x94oBlsEDgksRcqeVYNCxQaKy0S
+ciWcAgcZxKWlrawHSZ+eibKf7n9r1wpTkRBTA255Xlmxq9OTxpR99jv6z45U
+iCZAheuvv37QCLKs4wqN7K+nNad4FTu5zOxblelV9JByNvRQZ7zmmmtGkwyJ
+F2Rk1XSmkohZ8Rm6EZlWimsJSVYJb1u756Z6ys07We8I2EU3WekncIKZWq/v
+k7Sy0tSQfJDOjLidq/sZutNp3niG21G+MJ93c3edMrfVchLRYsXsOt5e15V+
+pGuSyKSKD+/G1mzYStf+JlFNsnhoL1+0DC0VEoakig72aYnogZMxrbtJ5vwA
+Hk5Y1uV3JBkq32UohWGzNMARaYuILl68OFazJJM7hvnXNxm4yJGzSKWSTFRQ
+mgxHeMmGCANOGj4Qswo0hZtMmyijzHLlltdlN/pN3Rw4EQzrWgIHndlbjWx2
+SUelsOIJ6Swb0rRcNF3ivPf8NlctnBxuNuXKlJqMQCG1YveC3cq1u6x5GC02
+s6IzJe+5YpeuYT4zlB9IAYsLVy56L1hUgjMfyPOVKr4G1t+hDYve97rSQUWW
+igpZS3NSEAZPaBeNooGBlS4nKBVRCSm9OQO0bQ66p2l77eu50ZEOM/MOQ2E+
+cy1HlQ5lBDSTPdJgmvySl7wkkWFq2uAurrx6S8caz/au61s3sRW7icFrbCWH
+d7ADWSRCzBMbHofs2SxSRIWAno7bCE8TtJE4l01SYpTSGN41SPlqBbBV7EWU
+/lozPmUezV/TzRMxyTM9z1tulGV6mga6ui6TC9y9Kvu3eruRrN1R1hS/011i
+BJGKUduvFOYrgZmrZYYwsx3p6WOYv2HcVSPglbEYhcf9jTTfCUvZiuYUvwQU
+kkKJld/KVLNuf43iy9qyIuM1sJdtYqXUK9/B8szVZQUttYRwgFhpFRirhRJB
+spvj+Jkqiegv7QP0nvCZ2oEpalWQkYXSjrS7MmzDp2tGlmyk+ZAHTSRi0CcY
+JZdMR6Jf6GgM2WFXvipBOYXH8w55s2LxGMalup/VJ/IO0IKRpQzxHASJlpT8
+8EY9rYBiVhFY0FVXXTXGbIGLyu35Y3iZrfrUXpfwWEmF/pWqp0uEYkGgiiOi
+9daSJoygIMIXYb9EiqEWVrx6Tm87jXpRTEc7lw+cyMh8cBUkhym64THUkqxA
+KCM+SEwMS7J0IyHmVT0E1rLuXY8+F10H99n4n4SNnwNDHuGIWAKBq1mU6ocp
+WVrNSzMmOYHXZNmZ5McwvBZfSZtKThOZVjncpbuWO4nfeiIxSwNHWaVsJ10L
+CnRpkETFdnvr3Ix8UZ61f9TWaIoB0YJVHtm1zVurPyg+E5/XSn03pbpyVDA5
+Y/poogZSKP4yVmLyamqOnBmWa2Jf7t+mEngyi3wCggZnf5260RFRkHTH5+OT
+WFFX1UQmtbNURYbD/PnoigWjFwkFsamXph2si7WOSkElIutBfIIqYLLis/Sq
+N+k2nkj0en39yTb8RIHcTH2ddXMr4+/aHSIC5tI8EOI1imxccx/4haEJWiMI
+P7FahV6aZf6GShQ6JfkgTvui95sntjqy1Yb+OsTrk9Pb7jlxanhagTVxV1yQ
+oWXWAWQX1GUpHnTHlH0LJ0ds0gv4Z0aTdNBf13WTPCPZkHYhcHrCEfqGxyWG
+9LQy8S5Lq8bAopNbYyLg7UWRa0GaqZre5FK3HVpWb54caX2mxcNJaghKt1We
+23dMtI95CifjwU3dQWSMNn7L60MlqjuEmlQS+RLDJcD1GO/MPorj6Zhe0URr
+WzLTSSMEhzYLAwSpfXqk3TRl7ZFEOCX8KmZctbA16Wq6U74iATHxGk+3i5xC
+xdPs9jjfCstwsiMDQiSHVIUilt4mdHW/JCtWXMhyzGxs0YTs2PxtszqJAlTr
+9W8jhMQYGARoU0GEBtwM9cxmTBYmE0zRWXZoskkYX24lg1c26xOLDrK9HUbr
+ks8nHkETXpZpzf2dyMmUDdnQbAgkEyyvFDT0M3xe+a1OjD8ysEQEHJdRUGM4
+x9Br5An7KEpYn51s8AsoZSE7B7ag0ZX9MEWQ9yk6gP1IS+B26dKlnES27QZv
+Z7olm4adHEqJ7wT+FzE5W9KTqYGLgVRelCXsu6RjhWvXNPO5KnMe5F5Z4eDE
+Ce722lYMpm3MOVjB3wbHDbAOjj5Hf9A5NQp9GZUwsTxQTJnXNqh9ff3kEIFK
+pb/iebBcJMe5IZ+6ggWwMVe1bAtP+TOzQlI/aXnp2BU9MrInOGhdBnBVN76G
+lz4KAEIvBZT6/0PcPjl0vKcHDs1WAWblgju3VDynKJVinPw84C5UwnmrpNNG
+FmAI0MMeQz288nybTqJOJknTF3tJP/5hb+lLqcN36yYb4KQGt6/inhtGkQPY
+fNAPkdlvsTosJgnOke2oVVkkU3lCZgMpPz1YN8zMo1UOx9khRnAShh7hdRa+
+QvUULARxItsU/Uy1ZEP3NYtaIWztBuLRQEW68Je3MRj11bQPddWXtW95AXDh
+Rskq+ESr1e89U/2nC1YvtlznUjAiaLDu88yC+MwAGZbzt0yeUF2bo0tfU1BS
+puFKhKB+suogQdMxycsVPRg9ZZuGCQNNEDLB39jPoI5LpVQsRJgKmyyEvnph
+VE/pTK/FBsU6qC2gSmjPerIIyWrTLGrAv3QpgKElRM9mpR4dErbsL4x4SVph
+rhvSZm9HTrpTPy5ZhUEqDbw5H6H6UPnSXAHPhHgs0QxyQGmpw1pRML9Dmop+
+TjZ5DQWLrGbxGsIE3T48DEUhosLNezSbWAR+UIRy/Mk4saC3pUyOgnsORa1t
+bqfbjieA4zmDgdPg6gizNP0ey9vsyGir9XTk64TUa8AhseRjym4iOmIA4AyX
+SRGbUVlLlsQSWHo1Hws+a3gpV2lZQZRSOGaCI5mL3l4jOwWH61mL9ELYxh2U
+4O7VpHNyWhHsFtym8rEmDomBtNjnJhyEG9QkJY+Yo2dYObnfq8cB/TDSs6wd
+ws8J2cMR73p6DdHsuzszmK+Z3nE1YqiymxPUcJ3QwaqOCofrecYznpFgUoCj
+aR6ep5ZVJo1/tezc5lKyZOuWbir7MqSKQgoF+uMyryzxkgVkv8et3YZkF6Io
+hxCuWe8Yy8qVtJGUdGV4tlTsp/a2CjzXLb4zLCCncCGYuEPL3jtgoqOmBFyv
+gQvUMT89oHvyHXOCCAo6cC076I6rcK27jrNz7gHNDc85Chp0aM+Ijsvp0wZw
+7J0WB1miTyc8J8enbgCuJHV9D/pI0JLKbtZ9LoN+bBOFRYkEREKvbmCPawLA
+opUllkSaWfTf0vVzx4zjjce/zx3r5o2L6Vd3m7IcvH4TxMWePXt2hGNCDwQd
+V5t9035e67Ao+3q5jjPHUPMmLVEWhB/wytI9NTZzGvT7lpWUM3OHPfCGLu3o
+Th9DzZu1AMiHtbSDOq66+6j+joFFvCmo+s4ijEhERU4eLc7btsM0V7fVV4ur
+WHO5nuQ6eGI/mjpmn6eQR/nywFuIgiecqCAnq2AFqwlORRw4LjTXe0cm8wTP
+Ytm227j5fe5QwSH7hviz3hX9lv1YMHQ9akKtsk9OCH2ChKxSuazpE4t4TYTp
+w/Y015HUYCqW6LGcRoBFBgdGJeM3bjQ/vokJ9iXvM58ixYQ3FRI+qaUF3jSq
+jCj59YhVFlp8ne4FEssL/XVdmzL/0GvTxkduRIw0JIVORVMkYNX+iI8+he5k
+tgMvyrPhF81WDNlKIqeGjJQBOIW5CPD8qID4ijEkVsIP32Enoxt7mk+AlMA+
+dBEurR14g5/037nm5fxQQ18JpFMzks/6jpdgpbd0s9gobfbXVla7OIkiQyjA
+srNKJTMRAgCljV5f8OhuDscswyrhtYpcGhYsh6HCVg/iuHxBJTyZsC6R10cb
+TBL87jue38TGw7qfHAX7vOc9r/s5N4aoHqofiw3YPXfh/RJDuMNqfCUrDXcA
+qxEZrZrFLW28/KH0QQBX3d+9vyYLOiLOK3s5wgOOVHLhEIC4t5i7yOWN+jum
+fNe73nWE73lOq8zJspRHdW/QDxGCuSLuUYd7o4gSc+fc3dbfcdv29lg+/Ob9
+HcPtrePd8tRnK++SvKYJPk6EuZv4uqlgQPMQFVucCh7AV6lYTv1jbNasiQ+K
+We+2aXUJ97iS5o2v2qSw13xM4dfapA0adotXlPVu3RBjsrzZUoSAjOhHUr00
+niGThwREGJBc8ciJT4POPA8Z+pDrmWqttJ845rs37e9AozzVrpo8RwF9t+Df
+6/VPItGsc0kwzBx0b9YmTVCz9ghzWFmW5q/kCkDDFEw+lMOMcWVAB09Y2ie6
+8hWHDq3qo0JD4pO7SZzLIb8+SHZUrazwSf264KjPp51NSmw5OX89odtCmue0
+ZxrTLssW+eFuT44aUorwadLffSTtwVv2d4xIeqgUmOd4QZMOotR0zS9x8hZp
+iIcsZlVuc6rokRFLsoxQzQ+VahkmRSvvnSOGcyZMywtVt/VEfWdSFikWRYXZ
+8J/sV/JEBwTgrxvWrrf1Dre//e2HJkuxUMli2VQZf/yhnuye9LPHpKYotqUm
+PVMPa+Psq0rPEBJqUqNDPW9aYdbcmsA8jrdCT6ffZ+CiRhWRVS68dTAl/FbP
+yPUMPsjpkCNdv1U/asNPm+74QDl1OKv00y1cxMe1NqeWJGDw1wetTW574nP6
+bB6H710VmNojOJBprM3ypHm3mx1k9dkiG6JvK0YF29Z9kShX8hvrI2eGzplc
+UlGw7pglFgi84vBTOMNPyeEFJooe5Z+OPJVFhZCBUtKSSg8OPbVNQstas05N
+Ap3y5bbtssPaM0NoHSkPT85rV6jbT927R5lzuH2AyVYS3g47D4buT1XYAjpE
+sA8cSoqtjTnbeNkh+PVToDSrUJWZ5BpWaVVUPEKWE56KkIRlHPn+DPCTcx/Q
+9tderQOw2TR/9LS/vIfmwvxHvUpnXtCZSdoTywjWgxCzqDm5pMby+zLNmr78
+JCY2x/uAleUXByjmYEnyY/sWN3G5winBOpPZ6+xlI1KT6QobPAflfNiB9pqK
+oYHznqvz8yCGUOT/s8QSgLLAhzZZdDzngVMvJSZAQCFlTkaGTJXcLFxibiYN
+wgi+Q4iQ9IQ/sCUKHTAN6Z6nZbncSmrAufsITPkV/QoAek/jOEbVEqBtXFcP
+Iah1oQ1LLNViZvIdiJE1GnBTNZOWQiBzC+jg+W89LBVD68W0A4yYi+DVq4au
+aKrLvQu8epDmO4vGkZ7DcmQ6huGjeMQv5TAKK4ORzAoce5/ioABSG/qqdiIV
+CgKSfSTauReK78r3pGleIlJBNk5HKuJrESS7xVGzQjiXpMz3oOfFL37xlAoF
+s7rVh6FGyWiJ01INtTWjbfGqkfzjvmDD7/q3kE7b2Ei5eTGSFVGIPDxHSyoc
+OCSQGw7dF+QD3kFd5o0YLCZiKEp7WdnQASWP3l4xvuMXUY0yeu8dusG3KkbJ
+jZlOvfvIxoTlsp+SkTTujsMdgFU5lMGxXCUcUZk8PsYvLzMLvQoA6UhTQDfB
+6uh/QQK/qs7P3QsqH9nDX2/yoWesO/Ppat36wkhM17+EJM8ZFr3MBiBCsDZC
+/94RbptkkVjRc0EMdle7h4Rw1/Gt8NaHBWjJTD0QoTpwSe2Ho2HEapOwLStH
+VOox1kdK6MgphuhZEYQAkjFz9aI20drrNAfW65ZYB+EZOQ4GkPQt4edXFN38
+P3XOOoBVAtRV4kTt5CIUIkU7XFHQLKdwnACAPV1SpNJNnzU0Fp6oW9BmArSK
+lPB1Sx8piHexjNFrE/6oY7BQ72X3F9JKQC2ArfZz43Q5BoNh7MhgCQZKo0Y8
+iyEQG/KhzISG1n3HfpUzcsML4cjdMcSzwrbeNjVKHPLY+rvPqb80nkEDtQJj
+aJBgQ2mOXLvZgwmLcugF4SouU0MKU9yaJ10LzMSAYuwcZqo0JmTHEXhjfAKb
+7Zz+mwYd+mZy2WQrstG/MgmB5txP41dvQIe2RNK8BPSgHMokaGASzEDWLbcz
+LvNcJIcOeAbeS9kPSebOA41xUFANU8hVQAw5cYY6U1FqK7Xzu+e1yFdZjQGj
+PNsrcAcQ4ABT8VEPK8SfERD96gNUZ+ZK3XGv3j24e3NK4ZTBkwYNsRGShPoq
+nOFFcjENzfJsfCMz9wEK4oWYEJ+OK9mkl+uKSAmI2JuD09VuBIbRmmWlSCEU
+K97hKGFRJoiCDOU+v3seueBdHQC5fGn2G1AWziwnyXgHJhKeUEPpUL3jqClt
+mzgYIiwgdpiSuLQEFUfsK3GMnyteznwR5VvuNB0011DXOLQ/c3IlJ9Llo+Ne
+EDzdPnZkvU41f7emlVtEADq95v8TXcyKy3bPj5/8Mw+B3nZvJwQyHOrX9ekh
+VsW2ZTnIstT0IATQDq2GWRi3EJDt1+lpIeIgofBSPslzc0MBCcNeHzkxcyxf
+EorSk7+2GZmuKF8zXHnq03kbyPTG7vEd9RfL8T7ZA88rMSvV84qwH9WEeLXT
+3fG6dK4QPEsaPK08YF9Grl1RP6SBETloq3wyr+gcmloX3LXmN+ifcKRPfZ5H
+h8fMmLVxGQdzFNzxdqGfWzEmTmC9aZKX5Ka25UdbP2wnV9hmQtOzwFG8YASy
+i+wnJjlxjbDJDKPlf0VHliYhI/ftlj6nFyDW1M1eODs+WCtGJCxNL55n3UAP
+hJ85c0bkkl6EEDxFT7GtiWD2h/cprJuH3u6ZWpczszfsMHEe9iqJ829YlBMh
++UM9YafnVaxS4eIHsjeEXSRCXPdOS895c1GAYoLQT+aEpTljDBNEpwoN4Ajc
+LddK5ZAcgadHrFVM2ZhL9RtAT0qbqzg0Gy2HhD1Nn14pB4/Kb8gQhDqFKuk1
+J7FxhsKTcmqzVwbOIlGSXrkjwtdzFsVhSi8c7FL5FiaMEtjQLhAXsYgRBU3L
+epx5qJVVG6lj+C1zidJmbOWqOSTRKmpZD02lO1hKrNruBRnzyhKDV29Rtsgy
+ZbrHgoyGE+XyKxXaMvPLBjjyj9i+oNxoln+kKcRk4EV+WoV8AiY85YIpUL3y
+gNZocRm35ee5OWs7/Erwx5GK6I27+NGnctyt5WE00mup8qb3V4w3Tbb0YceD
+TCGH+pP0KKvEyVlOIHCZV9tdOUbHzCmYiEUhiUe3MIcblar2WcmjGTAjhlJN
+zCYJ3AF43LW8TXW3bOi+i7UypX2yfmrwHeN4/Xnm3HaIJMshqj77u7F+uy1I
+VCeJAYQ2pFd8nF5oAu3Zn1a9nQfYJzDiW3qR7xI4MSHEOo7eXJ8NkIhQ/iVo
+eYBjNraVXNsEI11cj6AUeeB4YIKLBy9gYr+k/8qRYMI7cGPml3HK9pCBJKzD
+brBFNHwKm97fir4t5Oz7R0dfdL/yqfv2oDk0xsmB1CMBKBbA9IWYOXWvs5te
+vLitkRFqosyHr6w4IS2TO+IMrPQgLfO+WtZiLxofnSsY3nFl65l5e1XO7BUE
+VqfbBN91Q8TKOiqAICs3TcAmysjiU9JBhNiOi8haKxLwG3sgc1yd16adGQdS
+JlJN9bOYefceB7kK3HPXCAUUKIPwezT6KVekgOCDQj3z4POMqm1rFaIZIBE7
+HSHHPhikHDGHDbKoXHqQbhhwtrr44BfEwOp5wuO2fJj0deEfKUNpyp1W1Dg9
+XBO3A18YjT1PG8evGi48q2b8I3ElQ8RLSph0cvMseuN5YXRBQJb1Eb1wDQBB
+OIsRi3336J/pGU7iHPBzl2qhQWZbcwIxq170ioKoDeSKKjYnxVNeikKRvo6p
+JpsS6ReT0jLQY0Y8eg1r1Vjegmeh80Ys6DPFesNhjSUJcxA6B73+v1rM6g06
+gqbso7OQn2aKEekGfIPMsp6STBYa8SNogpoKPpS7fE1WqvKUvWl/rk2Cbyof
+UiyKDApLkje2xgiyAkg+/h8KILBMP/G3GodEjxnjr1gsQWrKCrtdDpE+PRBA
+j3DIP4rD6ZIiixDyQQK/i0015nSJPWocqoTEpc66NXHodghqI1O4usdLlUg2
+iOr1QuNtOcbF0ZmByKRBfA7U40EoqDgMeFvrnXyMqAUd9lNlNzsw5bJ7DiOH
+bPiKzzIeyo3orF3HWooF44tnN/TXhIbjcvzqIbqW43eZe5amiFIcUZcIOUuh
+9OY5mUV6o/kp4NT7N/ZYQJ1Az16NdCUUkD7nbhxE4osNGHdfOb7tLECZ6K6i
+gUwlp1rTE3uDm4QAAs8351lCTuymRj6SFL0KpSCsKGAfHZ+aV6ppt7pMQpki
+Uo4/7/thhnDru/s1VUvmN3JQvbLL4vZMLAGWSoOQy+9OcF93rzNxay6yktd3
+us6hSmCUyvXSn/stZrV+DAAw08aZ8m5+DVzq3SPixmURhOFDTDtR+9jsTPyT
+T7Z6ZuU+9yXnAEmiHYvoirazjQfZ4kD8GI5k3p3oIRov2bnCwB3ijyCwEsbD
+pQp/QuBSkZhX1RmDCRA6TbbC0hpI7j/k2kyD7jOSbdEDN7W/Lms79SVH2FPI
+/fEmZwblJgK4Q7XwrvwGAuRpYE7v/sGrGnwooO7iq70JnJwH/bv5LBSIgOk5
+U0eFHGDdDKpgBYRzDmVZ3J0PCynA4a+scsddZb2sNTcFlnvIYRZwIhWqQTFz
+E5m6FeOlbPxir1MeXq4PcB5YgCJKHBEJE0SPbk7fRHR+GIHsisfBSzhBLrQA
+pojA7tmS7yP7B1jOytaZ0ZXk239Bj2HWcFPhglbQSyQtH8Oj0v3gBRcH3xGG
+vYhQVHFfUmaM1yrY3ZoY4XUuPKl3QgxtFaXARxqKXwXwIUbol52JXIYyYIng
+iLBEEzmc/85tMpghrV5Xo7FTbprdAlmekiCFOfsJvdMD29Aq9OuKwTQnKIJr
+hFZ93tivMKfes5jsfDanDEQ3fB+sv6FJx05dbAcW+u7CCOd9RzcChLmoChRz
+gDXknAIpp0n1WerZl4Rn6ySqIKzWqpUQBf3IMLZuxVqIEnsyqf11QRfmElPN
+JQ3JXjTpPQMoCYUo2mM6Q9zCvXAp87i/GeGwCD5XnYjZY+pyKCBlz5Epa7mJ
+YleIe+jaoujbtkL43EASxpoIiReht71xPjZGDbpC2ZnLdkUCNCWvTD2Sr781
+6TvvJNekYu1EWv1ODZfI2wr5JtfPjFdFfkw/68pLy8IPk9SqbxgstLHMaG4q
+vnzoMMXIoUKxM/9vbIAJYSxF4r8VcYq0UCVEgkS6LSUPVXgl5ZX5owpwlYcK
+VcasAoOVTMjCxULYQ7I8O0YqHodw9C2HxKhIZjk9Q9W4Tor4eGsq4PGvHHcp
+uv3w5CwTbS9uhFD+nFJIGBzIsv6aISh3aSa7T6mtkCasAiQ4wLzHnbhby9JG
+bilXeJBPaVWicxqh073nOzViXgDTp0nGrlTygZmf0auekbsMJCC5+lyTstEy
+9gQosIDOxDWzc5Eo/ZqnrG43ABEHOMjFt6UkoTVVkf2Ww1NDIdBK/UopQivn
+gI9o5bThXGjNHJEP5kkFyrkdEvoWEoA2p7vGGqm+eMZfOfmM9YmUoI1ylNUf
+euZCswkPiugFBxOM10ByYCmuUAr/aAaKZnw5DZR+l5xubEPOWeJ0Jmf1YDIK
+ulYyDNdr1BeVnRnMFaT4QunZ0yxbnR1IxW/hKJji3vqivZnPKBf2HMvouhUs
+p5+b1pL/4sN6xxYL9z0jgmwJcHjbTkImdbkNyggL1UId7ZYKAWsaTx8glcVr
+oc4zUttkW2Ki8vst4GSI6zb4bFbN7as5TizHyYPqirpCRA4UZlssguEDBEvM
+szXbuGWKLCX5rBKPOnrpRiwbhw1/t9vfa5GVEGoD0QMqI7Tvswaj5wImaXDu
+F+HrssKcDSznXw310jsoKy1OE9RHwiG+w01zNznvDSWiSMDOvK3zKZ9/aSE0
+J8SEUCGi9ID3nBW708PomIavcVgNMoTiQXaH+IhQESpaKE0LOtBn+q04hFBi
+nifab2UIrl+sqbbAw1TA0FLPZHKOwXRqbnZP5RD+3eKMPcNwLOxdnXEffTLP
+4CETuYuouC/HnaBO5FAuR/DTw/JNEb3Y0poIp+0m76aAyRAKbbLMLW5QD7lt
+Q6vAiHJZmH2um+D3PYsXy9GiTNbRcQhCGIb3Nvd5I4P8kTPwOtdSeNUO7op5
+6QNNi8vRpkStLw0fgvP/Ob6kbDpUER6cbucdqnLJltaZgXQUSth5EKq0TOas
+SXYpaWipJsnMaRkGKATmhUvSMXWCy9H2m3AuHpq89Qnn2a1eGFwf7TfDXWM1
+sWt8Fv0Ui+exrHhHufiNWdU8NQNJFaH66cZWeQhI/qtDNAAzF0VpVF41Xq0x
+l/zAq5LveuoU7AGES5GK5LmuXPvA+T2sO85dwIm+qQKx9k6ZdOxrI829j7hR
+qJWOCfeY6hh9YnqkiVS+c1sqMUsVRoS2xFNUBiOMcO5N3hBWwGDQEmmpcQt1
+bhkG0ioKngNiep13l2/Znl5onajQzs8aZW4KwYDswZfa8DfSWdo3p5ROTpMQ
+H21Gum2z8xjWp36OAHk5LIh7U5kFWCjpE7kPciK0MWMV6jzrGZ7W1O7rdj/a
+kchwLVmJrh1/M1FRIQViNIIBsVBfwDf7YWAKWLyYIaeMVjCQXTFJp3L+F4SY
+LmY7y6aP5Jj7/6kD6cWx5RYQVwdGPJkV9U8mkAtpIx4pBictrJVGmiwvCacI
+z24kr2yHAqrbzysNTg7k6fsNZwmXPvR9eOODAIW43t0cyCH0XF+qCUEZRy6c
+jaHjMG+Vy5fdjJYdL9n8ta/UnJobwfqk2XQFrlWd0lVf/rGs+d5mtJHj2VTb
+avAtm7go2gnBdrv9NcTUMIWcCEtcSNROacnpz1Ap57VQATWA+m+CU1xWFU+q
+aZbkmc98Zo7WMKw+NGr2AqmkGgVqcxM1U8t+k5LEJsdL89xPYVLcBoMF5uv6
+GPPVJlpk1jCBTqfSxneotL12d4X7dFrFrqA2XeWswyyR9CFcPpay6l48JMnT
+lYEyb5iLFIoM2EShmwnO0zZYFT45UyynUxlFTyTPulaztrVo42+OWchIWWTh
+UI6aZbSgKTNkVEhhyoAv62foTcJSfIbMZOCZyATTdFO+awbCuGCyjEaQlxnK
+Ciw3C70wfAGlii/QBEwTGWOmT3Vzss/MgsNM0TRLNpLm5DywdevSq4QAdAEF
+RZJyQ+kVgiEmuUOK4NAua94qJMqu0b71aNhGPZINplnaYs3VQzZhXdPcyiHq
+1EeeZ3lTZ73z6kOOCyjxKzTWRHtum+EyWaQeuUrEzYPEz4yQW37EaUi1LPgu
+luTOZp48ckKgQ1uiHloW2BfH5tlWWUOe++Bl0uQrU7vQLPO7UZAvDc5d52bc
+3FllUXIhxHr4nFlJtfJbl24EWDhPHcQIbG3thmTkUgYMpoRBnrOMwpnfihIl
+guCPRXdSsVcRwbkRXMopWD2ZgiDBFJAr88pFhLgrIMRKEuHUuBY7vnIYKkGz
+VIqqWfBd8dd6vo3Ym5oLBmQqZV056QducrP7Oud2rgPZ2v+X5IGPuPnmm4dA
+VRslD/M6mivm4UhZIZ5rCOis8DXr9UR54AfnirM56gCIWYpAyza5XxwOHTuy
+/C0VQazKcbldTJpUghxrlwUVVNB64hrsxqrLB3XYiCe5d5mT6Dv3xt8chN84
+R3FCTpVQp2Sw/rqqSeSiYXdOEMHMXDDtA1yptHbusCrAFkvoomO2sJ7JiVp2
+M4Pa5kv7aoApIq1CIO49Bx6IdIgt808UQwkDg053t9lf4p/if3Awy7yijmrJ
+9XqyXL7ISg0fcZxl24XsYStz4pW5HK0ELo2PlbNcBHuVNjuaMGxlHz2vOO+R
+wT5mRkmwN0fRsgZJOGoTNJW4InxwxhB8RHEGUYYSKglYXpKbhwKvJEBv6Jbe
+PAexBbSh0khUSVcq+0iZMUKjpuLYD9t6z/ewV+0Wd1r+ub+PkHtbxRQ01et1
+3xMROdCedj/IIcSExx/3US5b1L3NKwMK/wCJtU6BVdAsEYaF8MXimC/XbcyM
+A+3yFCCYNb+96GhIQNPQoJpK7qpVwqcj5a0uaz7lrpIsu+5i0gAHtBs/50Y/
+SAZPetHItGhpgNnRxCvMsIAzhHsFoVkbC/wwnUUSEJ3gajUPIA1uHv96akCW
+9b4er0FcbMJFISJ6UJN1Dj5wYT35XtgqhyFysUK1HjtfY9D+zLNg8EKl1HUZ
+ufrA6xANGxFtxd2Vi2BNpjjKBbUqEpm3pa2kxdBJim7MGaDt0hKxK3NipsrO
+T33qU8/3QL3tp3DX5KnETZaQG0Ppdw4kyrJjULQWLrDYwqISxcbDq0bTekO0
+1fl8KzNR7iNwv1MECs/8BJl8L3Ms5ThuB34mJfTIGvktojJ9VBRkUH7WU5+3
+OnqSW4GNbDMkRZDEYWbNJJyMYtApEQKPPt3cVQNWXSZhrJQ9M4t4Qzlgii5I
+IwsEOQRaXNI9ohta6BLsQS4Wp268Xg6O48k6BJ0rP0Q4IFlxi2JLqemMOZ8s
+5TGo9RREk/RZ7pjdNkk7FMdSKOJlhQhmFc0m9nE+qWvkNmsqN+saFwdS05tY
+OIPIqhFOkauCG7aZx+ezDFvPXQexKc2lge7reYoQkVlTYQaJv7A7O1KJWP5o
+8oyCGZl+eZiMCCcsWBRfiAksMltGRMHEBWy8Ap+MCG9zP50PoOlj4wbSGw3J
+q8PFEhLXU55q9kIPiigzIBuLMi8lKGXyRK4paQDRGqQwS7RGPVQ+TJFh1LWH
+NciYcgHx6dbR7PXiMTOFSUsSkmmO98gRMJm+7nBivbS3HznIgcFZ+ivWtYXU
+kSgBNc2glqKmTp+d0iwrKymyucanQ7mZCRKpqFj4zk0D+zKfjaQt/E49kFFj
+Ev8C8GUV7QyiYHqiPPuzwbZpVFOe/AQoNRKr+eAF5YVEDDmVQQn8iS4WoEp7
+qVZjavWRiO7IoGLQghdrKgA+E8ndsXuDvjCcYIKmFPG5ZAODi7Siekw0wnf2
+ot0e2LVj7DBBsmVQ/EVOAu751UG4QSI8gwzkZlC0ac5+Tj2zZKf3Gh/kHC7a
+LrYxUZHdSG3jg8IKfqNLmQLcLyrYdqgobznyJ9cvWRMghUMgPVjvKMA/hQkl
+6oe3kbIcYUtWDkMm4SveKUUrt6iBODE5+ZAAAxxIckRFlGjuOzo3Z9X8pHlN
+in7o27zt7vRxxfFDB8X2p+eiLw5m9UFy4wdaIXrAKHPsqEQtfQulugTBficm
+lJYDCqU0vu8sGdEDSjUDPuZqtNOvchQCSo/bsnZE4tgIgDbyt6aEOvwFXBQR
+r5fjEqezSJyynhKlrrE504yiy2r37NKFuSjZUQ6CgjhAqxTr0GEOnqXCuXeW
+S1T3L02JV8Ri/CBB/zCovoOufcG2/pNkGWCBTSQmw/K1v+7T3wEba85KpScl
++CX2QwHdzaovkXVJKFagdWYrWhgLQGoEoYBOqVZRhpe//OWhgIV0Renw4s1t
+4ZsI2Nzp+YUluGnCjHYiSPUJtyuWTUJBS7kIh9aeW5rLHYNrubI3fU7zBjDe
+VRh4aAuUakFKBqL6KwCrtnMYAvZ4jTlCApGlydF1G7b41Os5PINi4xf22+iS
+Jaue4yQFbgUbx92rc69F8LmgVSavQATH98W/syOsQVZOKmcoIHJ9RjiUYgME
+Cnwq31xc+vJJjZsjzYmesSoej0OleEdkiWliR6nZJpDzc8WVmhaG0wzqDtio
+ubPXYjKch9BrE8f2HaEgA5khATb0LatToGzBkgRz0Q9pPcJl3M+xF8JhmG7Y
+NawgEbOS8yvXKWo5YKhGGcaJ9iivt6gW2XJ1Vl7nhiDAR3XofjHxuMMcI0+9
+sTLaC61lC8GEUKQZVKAIRtrpUIMORcJ7mgMbvZ6rxSyMyTI1cZCclubpsk9I
+D2WvQYrZOejEp0iRj6V8ItHsnhL1c2Oka3FnQk7QwgU5Bqi4HEESdhbPRN+x
+M9cwnOp/85LOjlDrKBB7UD+aEpzsOdMuBoEPvXMt3AMZfdL70HiyLdHnZxhv
+dyPbpEVmAKv1bGqmSEntM/MEeCzoOe6em3s2iyAMWMiHLXmfKzl85fCZoT5Z
+gkRQFLdsOhSqHMgAyQz2obgElThCywQh4hYQrXHqMXJNTUZebqYNB2NJy+UB
+B+vkrpDOrrniTTRG4NOHDxysWhTjjPzgEGPH9XKbD2yixe1gTMbF5e8XOZ2c
+GRvcCA9gBAjLx7R+2XJ+TkVEgpxMeC71PT3iRQZkVhGb6s1jD9C9ez8P7AjP
+WhpHdexXtJycJ4+zrnSvYkC/E34A5TLW/Mw10nfU9Y431CVy0CJrsg1ZoqHi
+PNfEHyvDbUffFkoLFYG5eQvc1FFKssC6rCTeUNBOz1x6HJlpuXelHirN5dTw
+2KbqrgzFXznjWNe9BmEkohRUNE9wmfcV1wF6NkNn1ClLeDlfK2uDfLgt+NyX
+x+8XTm6LPlBl7oEALZI57jzouzVlWa2vdwAF8gT9dgCHMq6ESgEtESoTK00N
+ZVlK7EOJkzP0wcnJ4jgRuKwsIWQUdM05jWOFt03iXpwBY86bwUXIAAV1RGkJ
+1W6aKGuHeOOvKKQMD5IqsK3ZYM+iTQnmRC9/3boMMuwPDdAI2hWERkORkjqJ
+FZnImltEtnVyokOsMWsgm+YCxfDzrLBtEXRWpvMW7L5aOU6OW/Hm/Lo7YXxy
++2/22O6D8q35lD4EYV2yWsNZTfGQQjk4x+GaSatmEs4m0cCVGkcm0V6tHLfz
+9Q4ffb/tpZSTZfmnUoxQh7UUXifHYKcSc/NLDE6AFhEaDqb67sH9vMqtiCVR
+8P6IiW3pIIbzvSnsEUzgcLl2mscQXLFVHKe/c2XvPm/QQ3EoM9wKQVyPv25s
+gjgRuCt3lyiZDE4zrJ0uAccaRFR4oWfWg02aWVBINnwNF5ZmkkMQ9yte8YpQ
+c4xA1oXBQl9LMrLwhfWKTLinnPiCcAtfIg0ctB8JwEhP1wkx4Qet57Yf2G3y
+YX2i/1AAAsYzx7jevqmndb1aar+KZn/at3ClbO3KVndZnJwCDDCi5BGsBX/U
+ye/YvVM7vYuCgC8hikntBLuuqe49iYuenJ5LaRLMY2D2l+Q4izXBRw99M3Pd
+G0gztY48TOCsOWTlfBi4LkQgbugks0qYgcyj0zzUH+Oh8QSFU4MaX5vCKXAK
+blFRKUNOqGHIxGvZROnidf0YBwXKQKRXMvPXdZ+rmgJOyAFRloGIpMJ2/89D
+oP36fjb3sKWg6L9yrFRzKMjtu3sKJpaHBt6TqFOQDr6zCJWTwuGVbbBRybTg
+6CjXsw1QpKhWRodw1NrUgIdek+NGhRkZnu12u7lFlE9VQMPiAsX799f0EK9k
+X2UhkRtZ9wUR8+APhRj5iNDKibvQuQwgdUI5l4JB302U4WlYsuyv3AbHJnQq
+uCrlPLmQSLcNu/Qy12NRe8aq35T/lhN1uGWLiPaAtM1riq381TyNCGhADpjO
+4/wwftllkWCYd8AF6lhGeX55PfuykgOCS+VjwW8JPhs+VX3BtJwP1ImpjHi9
+m6pjiPFX9tEy2XWywOGFATztOVdg3ZzADq2CALPZnJCt+8wCIAptkb1f63b4
+Lov0navw/CNIBazpGyznMqi0QYpymOVY3jBaqaIXL044UD3K5uzgNQfPqeha
+bEw4cHS91AGSMTk2kkoK02UY+ig1vW9bouYpUWqnbKODeE7nTt1rpvGsMlIo
+90oftT43ClA84cW6BzirF/1W319qu6P8sCKnA4r/xRUGZzAMPnBOheS5uhaJ
+4qv5EsuUsgmCXGJMT3va09I7KLXtTCBZXR7ahbuVmUVclsWACv4hiyj4W34g
+W0h9sqs6XAbeuRci62jWEtq9FqUFO2tGThr6YJxl8rmcz6NcD3aDGs1DNG4/
+isLSct3guuvBngODrd8jEUEilLDcNKjBeKk2p1CmFAFzhuw3p5zmGmcanSuh
+sNM0mzKk+C1VMFUypxSbEi0/02zOGlhlIZ0pDVMZrIaFbogKTOhVIdOW8yg/
+1hy9KzN59H4Xy77Ixb9sZ09cHM9lc5SUU/onVIj/SonSzMJNzRgcyNRI2Wc8
+/6veAnlqbvcQ95RWZ2OsHIIkSIxSQREOdQ0aeIXceHljN5c58L7V/opmd45U
+62BuEu//AWTPYDa7c48TQ0ZAMm5Pa5h5FUsyrNzdvHKXG4CO/lqvcqMX/soO
+/twBTbV8SI5aMaZS9FwVdaTWl7LZcXc3McVMZSXkM1xc6TViQz7iA8311seu
+KW0ZTuKHRD4Vm2QRZKI3r6y10Qz2EAtPzlXKe5Fv85r4oEIQSM3iSFupCwzS
+MswjgfUmQTBLcTmUsFHu2OnR+HiGcRBN/TcHc68lcKi83hr1qnccnR8KkPWh
+PqRFgT0Hc/m9XLOVkDc3esOPgq8knq+h+KlemFsjsg6OxACd3nMYkehVEzmr
+rK9LnjmiEeX2wZv7O/bRl7lM/jMEUrcc675tbyJMjLauRHaNcVzmeuHScbdA
+5VDHtX0IpMAJ7+7bnBeopK4iYlDoDWIdw5oNSC4MpuqSjWJDTlXMHKtQvNLF
+pCK5qVeMclv3nNjBPxY9C9aOG1GukEIpjDMXJvYTzC1XSB1DbHjdF6stIfZW
+LoZfJpILadMKh8RhA+nEcpQNmAPXMtCnNP3KCGh36pX6mI6Pu0Hq8U0/KowB
+i4QW2FSQcebV03/P7okPskBGrC5TMQ09JkWrVfZpaYkJSdGkEKvw9fz4easZ
+WFEisCBmavlWTRB1zTbmXMhYcjtuviL3VHlF+b8z19cwgRDUwrzcS58jZstS
+z2q6xM0BWnyUBSPKNlBckrE9c3IYtlD89OnTfX/QdjUIE4QtmciiZJYaPKmJ
+zdJ1BZ1ll+U6rlx1JSYRqtDRuR7/NcqENB1zKANR3bZQLYtj2Jn6jxZL4pse
+XT3iRo+r+UgGmSfx5aghgQDCOnAY34GbQAVQfLOGBbi6+J3xbE/tHuRejdVh
+rAvspTRbEDHDN2oPpShNrH+dMQ8igm/P8RCb4m6bp0zsZVEIMfCU4ozyawEf
+ySqKhCO5VG2FfWEx1LBDw/xvRoGMVCyEVoILMYkzOFomT24ac2RyPtJAMmBp
+wWYemLJLETB0W+h6fuAsUVtSzc5sjxCzcKGiOjM+2YGJ0b5T4wqXvO87OCNq
+T7tZoSdylT2ZhsMx2QAlwPHMBOGiNhht6B1lI8p1ctb1dzN0OXiH1jhv5m7I
+eixLDLyBVy94wQvmBluhxtF1Z0BDca+ayBh97Su8ygoQ4sHPPres16ZsBmpK
+nuO/2N2kdJMrdPFFbKHNqRVbIq9JepygZlw4RpFPTtNehvy5ixlzA/YHXNZG
+iQ3QjpVxD0Lo3Fnlb9MfkD01P1kM47Vw02+c6t0Od0OfNGnCJ1YALXBb82/c
+35ll74uFDta9FwwZKLWqPnQxLmKmVu/c30k7BC/+ymVW3LVTLP31kMNNMATa
+al38evfj0aiCXeZOyce2vpAoioXXNYrb+msBIVeML0Xhgw93SF1VVWhjOoS/
+6NsfBbnN3Kurrx0iQC2EZMra0yHLULvotadHOmTPYhJF7bXebnOG5ZXpkOPq
+M4r7EsaT84plxGZ7DYBdT7XOPhhiz91d+sx5zfV7cl6vJVFbCzXZ4NXHQb5W
+/yQr6uP0Z60EC1C03oQlbnAap3V7oZxspN1AMJSLUmxDyidHLSpg5wYtdZfc
+xhqyuT7PrWSb7g5td1wZvrlBj/NQBZqpHHFcKjqwy9ukpVrqNJ+37lZhgpLl
+qggoVr7xV+4oAuUqHapDeU4khefHUIS/iDUzWoFHKDJ3gUhRNffmv0o2FXlP
+iiCOqRVnk6Unkbm1pxx6KBKTUXor5/IcQNS+utwR0TInhQFl4Sgl9Dp6Y5jg
+Ugl5t1gzFTBBVSTUc8XW+k44K6ijArnVkmIqA5lxw3xM97dDGEvMTVFQfsmb
+p7IpNDKTdWbdjHvuan3rZiSRSi3YsVkTMRXxuJwjt1WZDUH1dplWPVXfQc3s
+Qe0zy998IYde8xDpmifN8VORj8wpUs9zQPronWjcAxRYn3OIed8Ml+6/qX/i
+ZBRp1tkxzim3aabZnHlpZiPPQV+Lfo5pluhUedYrmgB47i5OsxRWys1685wA
+r+sIada/cwfXhiqn5/5JfsBCk0LjTtP6ka3ejheZo1diLq+8LeSbrk5Ab96N
+5kf1aLnvVNlu69ZIKhfzWvKqkl5I0629YZMl7ZFhwDRP2LCYFEI0RRWQi3Es
+uVQxKZIA2Y4Fmofsev3gUOvbInzRYngJZ6rVJ/fPuZdWqOVRrrjCh6f0z1kY
+48Mjy4LKMO+98uP0SFL9YpGnixv2Izg9TwOwsgpaPOtZzzpI6zxkrnLjFzi6
+CkHvfXgEMgGmBrO5CZnaU57ylLDImdOsi3SV6eBrMT4/Q2wegJZrQTJUkXP3
+kRMBMbA3Bc9osScbB3X+2zd9ZprXtFNW8ftAhGpme/uyebiWT9YLCJ9UR3Li
+jXAAWpYpBf0UpXul/SREL72RbzADSysI2X6+bqQn1kewV1BCR3IOrJpmInZV
+ROmaCDGrmb1DOikhySZVZgtbNoouDmqkpD4KI1Y1eU2pQGDKVWKNedmNN7cf
+QX1Wd/jw7OsV6gwFQ9TUzMVJWnmh9corygSuRDsyqpbYTc2oNXvKGgzrE7KF
+IcwTt/DcPqybby0ytleuHXhsuimfHKfuw/hErr0wZ6gocTF/5pyriJiW9U9l
+S7e+BupyTsxKHZuPEpEXvCk0i2j1yL7xQB4He30njpBAeQX4MSzUmLHmgfCX
+kslNvE8B8ZrnKTcR0UoFc6Eb9TUIYiNuCsfaernUQa4Dk/N1xDM+8izI5FmJ
+NEvl8OR64EkC4m8p0jpxkdLyPBj0IHsPSQkq8EHYDOnDw+Uar7kaJJfz+Jjn
+IXGYSnzTTK4dam+SNh9ORHO5tYZXyM2luY2JOXCtduLQCl0ptpSS3b+pzR4L
+qKScz6mE2sO3fvn3DcN8JB0+zIFCGRFsTjbGZyBJu8lTEzqybAvn9Ed78J0l
+MyHk+t27tjUh2bnWZT6byC8/dA+VD1I82ucjDi0xWgEfkvaX5l45VAKM54Nc
+77JagIKDOEoYfY5jjg/L/Xg3tN7nXBBBAuppylwmdJyYLxs9RcwYlAkkr7KF
+bJwGZSXnWBgxK3rJhIjfwIrYKA/VzL5KrPS2lBxh1eL9uxWs0ImlDuzVNGbp
+Wug9TtA4sgraKxQE2oj2hHC+h430LidkKHQYK7crfPMc4ebMYY7MNGWEzbmT
+nsStRrIJ+upDgqbOHpV2UuHeAT6iDeyjR8LrXh08nitB91AuDkFmES/SRAL+
+DtNIkv9XazkiaBTjJ8+MQ4KZeXzwhdF7nAsfK5AEUrmPgsCLCVldQ/syfWO7
+RyHz3PikECAGIiZNETTVAkqMTs8l0Qc3YcYv4dajuj/UKFe0EXbNmGzsS64H
+XHGwFmBkFxxpYF/SXU1QL55RHMXVV/R7YtQwLgxcF3lluxVAz+4HH16pwrBH
+tvAYfg5sYUnswUeYkgIXXuS8P9UAFGieE6zmpvD4B7zCm9T3gAd/0ov8hp7Z
+LnRIeHeaE+/Zwg1LsolRzQ97yZ2RI4FKUlf+AG9jqnQrC2iFa0gwLO9UPBgJ
+YozwLEsSU/bKci7NFkmZDlu382530txr1FvMFyjz6pW2+7BfoiEyDlLPFEaX
+NDmrRBkkCikMij3rNyGy7jEdSfpW8pVYes4HNjBwcSQIZdCspRTwmmNI3upg
+l0YcqQl6izy44TvMJSffs+/c3M5YPQ9PWJZylFC13OWUOZ8lpYi/47TpDWeN
+NLlabi4NbQRnCLt9ErXpwXUDDKXKqUDjQK8vGrDD1HKiIYzIc4wgxXOcFdz6
+vefYIncjy7maPkYkesmcF1WZh1ltM3tZaZv5e65JFmJt9F2aamaL/9JuH56A
+tjJZmgrqMRaYoCpuACCv950JRkXynqnRbmRcMZpg6etuJPFZlwfnxRM+nDdV
+q67DbvYh9rJmeqtdXjYvhUQRylCebfK6iotDVY3mRO/6Ty/57H32hcF+Vp8F
+dQaXBTP+X2icQwxO7Bf0np/HTRp11BbcmDzhV5yXeUhNzg7G8so91T+CMCmd
+osQtPWzDsciN5q0LTwjH9/VsbviiZckOMbnvl0lLMJ7IzbilJcQqgwgvSoRb
+7fiaQfdS6Z6HXkikkpLAKajBN/YJbENGvS3VoHq4NzZ9WoAVnubaBIY1vKSU
+uMEo9kvPzg/fTcC9DHN0Yr6A4UC7tfjBiFoN58VToCXJLC4rEs5kdpuHRe++
+MnR+2JoQQdUn6RUFQIZscF2dhuRUtx/VHYuoozBRa2znoogAKVI1+ABWcrYo
+qBFys54oBGWUX/RKnkObPvow8NzKFibn4A1hsuaFciWWu/WbNLNXnXVr1wzr
+IZucX+NDEMCNquVmBtzg1jXJFFBhpKyyAHQrAp4eRQOwDzf7mLp5rZbmZYP7
+7UbXDJDL+c8J3lkgfMXwrATzLo238MPgKaLAC2NLjR7S/Mezdc4ti77oaprP
+wfXUvu+sH/pMreguHQD3cjJWxUgF5eueTW7FrGO2vbF9FV+kQ0ZmRcvV+3t/
+781tdUeuZ9/g4Or1IsjxEedJpTktlMnvxEUQBWWRCw1jIBXBTmoEMYJso8TE
+bDUAdXdZdKE/M4JZLnkfHz7fUm/aL5QTWPHxNFLbEQ6Oo4HAM7wc+qaEaE0R
+mkmh3NMmrHuO7vhiKhQ/AHyQuxztOHSG08zuPx/ql93ivUJiBF5iN1uVk3Rn
+p6vkDmZAWY4COQSFzZlY3K+Vn7dGsgJx2P62s3OjGXaue4CtKMJulXkrUo0v
+0TMmiVCMiIYTSkZl9KWuObtRi4IYs0tBI3LnyfSkMMFOIYbgVCq2X0FyfjCM
+vjCmPn5yZihZipCrBnhONm7LeO6342owkybnrgyGRnZIznfkm6HU+1v3V81j
+tzWtVqU4AujkXuYJkE51DcnIGRym8ahFXh+am8mjnI6zr4bffoARcWBGFJVG
+gGphtnf0wmT1TByoInGYKCjJNYbcGz+b/gAaxmFI+uMGUKi/BDhZw+C7nOtK
+PRin4JY7wfQciqs/BiomMxWVc2BonYjTdJQo9vnPf34v3jw3UA0ox7j0TaCQ
+tZQjKISR5L1n0ZVDRjIQ4T8Gkxv2IMvwxXeCYo6RwUEs31u8sFUK+yDLbf2e
+LvwUFWODwFGmF/jgrMBDH742IynPiMdxXr0NbivmWniAHJwtW48AoJ+mTTul
+O4/Jm3Lrio/INSew7ZfTXxg2Ka/CdJNzMhvFeYt4KA7mVTyYRXgYANBUaIEc
+yuq/uR/PzyrzVgsAkvTOWeGfQSeVZS8m1qAAvqMOEImGcgQbW1tufsDXnkIa
+H566kOLmVQLXD90Fnn0F0njSdziH29m7hHVAWsZCqHHMShqelXoINwAHXRIY
+VhT1mOYyzlBXRhsf5DVmg8v7lSaXD5un6lQ/DlhBmsqDOTmkaodu5H8WTGVl
+n+cEYzyrlctuDspSpFzF7h9ZMynn2DI+h4nIO9GJz2IRQMPLkpWAIjvvyIXM
+JH3ZeFGK2My9okcNAEiHxHJOcq6oohRraImh7W3be54bVgOZcSjgkFjv2c9+
+drIeXyliA+McF9yOeLwiyulLWsbfku6P+ZiPybpSkIa39C41nizVYN/rpGJO
+UN5Tef28/VLEkpTRcxwuXx15GyGfjkxQCm7IJAUTdSXlnIy094rcp1nO1YMS
+3eWip9LG3N2XK+SUlBzBQAF5FT1JxliMsL43EeYcLQ6J7vLoCgzF1sbPXvly
+9QgM0Cr9pcc5E5ku5+hDTgcPc1cEhNAzEThm88SI7S5m//8YM60A0ckmRZW0
+QsCwrijICcC7XeYtzg2RM/AUX2kUBOPOloQRGUyGaGgFMjNr1QXIg5zDq3tl
+GoXs3Dskvub+L7VpZnMqsrNjPG1DC6zoy24HsLrv5cS4auDKMWRqYhKOR6Nu
+aOD+yZRwclRbUgh/7/F+m5COkWSjtHYzmeqzAfZm+EEvH8CPF/oOL7q2kvsC
+wwpkQVv4jhWiIOyAAOsF5qS5362yXYUiFDHV40PvQDA7z1WHtELli6EG/YSO
+yYfVbenx3kdtKQ1Q3h/SeziyPqSw2w17a/zPKHPdY5qkMIByO4jHIK4ZJUAR
+LAWnuMjBWR5WjJnLiUnQ3wyZxHMDCJwpjTgxVqScHF8LLyyr2K7+uXLE9fBX
+GJMDnzVn3QlYgnhsS2iSex6QYflGtmYjDa5IPymrDKiGfGkZ/ZpiMB2ClCNu
+o791QIxJNHqQc4SYHkwxEiapayYvFWVa/l/iFvMHZYYoXvE3Hc61j9plFzlo
+0hCZpmEavv8GnXEYOpuDoAjJS0iQmWuDAmW1tu+wqhStxlOY1XYRZcjWqWxV
+VYMuu81RsKqsmSQ1TCF0hce5D1LrKScbaR/bP4DOCFAonrSnKjuPcMaITV0W
+1dtm4VkGZHcU3bKtaJ8QslcyH9rUT/HdbrFuqlGy3VRoN6tVRO9I+nwnrcFT
+WwQ3bT4zIi6oDpJZgPYvXLiQxdQ520kISby8PqV2tGD20qw2NgpNJ0ZF/uIw
+2hRR6YQQwnjyQq6/tKI7NJKjKYZ1zCIpyzn2322HkithaU8fdJOpwGb9MocK
+B0/2OKgKdhqPBeIe4XntOsg41gshszuBMfcxr/MoRcJXVpHYyATFtQUQm+Zd
+PkZA28V8PIH4T+RNuzkjyAofUIuV6+5eWk136rmDBx1WEOrWW2vm41TPQMuw
+5nd9c+s4rS/fcUB8oMtD8x0Se9Xt/I6kGauFswmbKCVDAls+WQVpusMaU3RR
+Ik4om+lr2CuCGqXC3hbx32V0QRdZQ0L3nBVMMPmONcEbw0zYL79RKMrVsj4S
+E2TiXoTo7y42ZSTcKqFkxYhuqJWRAHkkEAzIAVVUs/Q8I8HoLh32Uv+TAwUP
+bwM6PbfS8NQo3TZj+O3agRHUKTcjmERkUtBNFMHbcnGYnVUo1NYzEgG6BJY8
+N++Q3M4jlW5rptTpfoc1R5gBnjez377jOXiE1cywmfbs1zvcZRAKuEJMCilE
+tX5HbBLr3pk5r76KSKM5OTPeb9yArME7vVYjA2LROb2zsCR7EZiMEH5/u+u9
+hqBZtEfX6wATZMXJka7eMnHoYwRi+Vwe7JNYmzKt31HkVcGMgLboy+/a9v/q
+giWqjMTjzIKZlMSjOHpMtLrtfr1s5tL5UF9Wagq9bxIZMK2XMqfMLGM7XaMn
+RGoZX3yOxaoe7wNXWjFyYIC0bj3CEa19FOuhhYx9bPL8jq+WQq6nH0m9eTaT
+QqknA13ZMGWLUuTq2F7sdOjWEf+PpWgQUDLAeYP5qXlyHR5NXdlSQszfr9A/
+mZrS+CuFWNH4elt4ovR1HawuFNZXT8pzGdkaF+aQ7aJ8JuRElRs4fHKlU9bg
+8qy4BBOY0HoxDFqItiuo6cYQeCDB/bZJ88wI7ImUUHggNl+BT24M5SvbMGfr
+OERFTUmV38wuHlpuEPuqwrbM1QBc6ZUlIqt/3/S3kfyyGZ3lo/de9joNhacG
+K3NB0+VzBocrzP0/8rlc/kdUgJ9Kq1E4uXE1KMbE5ktMD24iV+eddTfrxFn0
+iyEZ0LKJJuC1vXZp9Iq7LJxQ/VeIBeh9n3O6KR3/0QfDTRVP1alUfNYodGm0
+3tUGTPa+VWLFmJy9lnRJGpyDpHg3+kbQAE0zxaxc2yOIok6MTRCp3lIDCgLQ
+LCUCBBVxLb8sAQOofJDcBbCaUjvVQkKelE7/oslsDvehhH3N9hCguut+CmY7
+48KzrLyCg3V/XYT0sCYBwJjBUTG0MF4zIUGQIBfqS8JGdzk7jzB5piCi+us6
+NZsLNHG6AOU4EnLACF3IBeL1eGwBqPYM/DzVxKAJgYlhHGEUZUmJtS617fLJ
+qImrG4rxchWg3ii7weHd/ry4UwM/oB9nXs8dktaZEYTLKohcgtI74ANwuZpO
+9JcrCjQIGHMpMPBhOfRXoKLkL4fve2ozdPVYyaNDCh7evXOwCo4CSUYqXqkm
+cogX/ctsG3mJJspi0rGoGH8Zko6JUxLfBeV0jG4zLwA4J2AcnQnLrId0Lyfq
+iGQxPaEjZc1s6gSeM0OkMJgtER24KxZk1ePS00GOe9OiqJGuBWS8xgEWpEev
+jK+9S8r3EZu3cuk2R2KV2HLorVinPeA8lZN4YCZgpG44NS9R3u4vgUq0sdQl
+EqIARuhp1izXmwfTnpx3xJrWT0d0hbR0RMCWYJUFrp5DCNiLB+/aLTH/nDlx
+7fJd162nDQJgHoY05kmp29lNy7nrKVEBGakfJKB81mlkybrHU0DRmvxrnoS5
+HV7BOgiqhHhEAFITTBc1E52y9swLzs4d6MwK9mtfWW5/W+a2GMVzuegppQRi
+13HfLRtWZ1GPpQJZtsc3KrtiCFY7HKleXe1HhkKT/Qx5CkJWAnLesXFE0VUe
+sshtTmtsJ0qgy8H8wS7gxHOaHeYlJCA1jpTqel/+ovybymTBUmwI4JpQ0QXX
+h2VTuNuxqSQYvySyLyeUq3doFGQUVc2rE7ZjWTL7UXw+IkB8UVlMzVuBsjQl
+rGOaBsS5UkNKXp4nV0Nl0tHX8ABwlalGG4myL+8DGRFXFqJFUQHVbbfdlj5T
+hm8xDVQpNE+fMmKjTxFQfXPJbzLbLqcr8wuKEbKIIFe+mtXQkrC+BJ0CBNay
+StpuGpEgCwwz6wI8lEHoqUfxtlQmAhKiyC+hhOgcSpS658JLWp7Ih8bgg+KY
+qdxS52gGPcwVTXdepXV2sMNMT/aKUBCF1f0WuDMzAvRP7sMsl5DdumSSzjkS
+W37DO0EilvKr83DCbSeV+VWb725pSqgud9xqPVcD7ovl22VZOUAex/C6cr1Q
+QiQoUaLNuYChhK6RA+MvUa3Ln7S2v35j21XLqtvh5FGxVY4hz5wzImEEZ8rK
+Wbaeec+ScuI+82lAHhhAK+pU5phhwQVTgNRIIODSgBJjzgZmfr6GOhY487ex
+RS4anfCjONXS3Xh6+Vw7RnXVhezgztwUfvc1VkPNcpvpekIQt4bf4gRDV0Gr
+hPJgNY1cy1C/39rdsjOLf5gGvHNqRc5rhFIUKaBMAVU3020uZ+V3kC0qFVbu
+a6OnZhEDQBaJqf+BK1/zdNnjLUjvO2nn68DTyGFrAX1ivT4sdLyC2n09+MxQ
+WNNvuYtUSFModnEhiCUT/4zMTg3EhTVYVEp1RDgpsZikFVQr/GdKdRWOvlmv
+WtY1TSsvCYL5ep26Rye9ssOuYFC8qK8mNYPZ29zycKwD800SiOSyxCa4QqVh
+Ko6Vx0/vMu/0zrr3W6E3O+uy5LZ4dOsdh8wdWRaRWpcYIndvR16Cg2xIXY8/
+yqVDERabzVVfmKFwl8CeCplFT3LPOB3srKyZ6zeT2wn6U5KHnPv8esMB2Iee
+EtamZr2BeDvQW9iAkqy2qNau7Q4AC2QQ4+EX1gL6fbl2UxvQzUYqin9Qtyzt
+BfZMQMuC3zKlXGhPKN4wBEMjVJ6FwGroa9UQTU6UzN1afBS0MFK5utGVIeYG
+TS1rlWGYu2HquUGTrIXRWRZDp4u4GAg67RvPljtnZNQ4coMmscpTWITOVwhT
+g6Ax9LgcwhE2C7HMZotkWKWgo8LonCAJRrA401YmvOep+tu59X0zgH/CYbBt
+YQ3ZabTnvNNo1lgnY2aZ02dsm9mBBRMo1IsvIHGcwwL+Tl4tIOAL5q3p54bW
+S8HVimhuQN8AS8tyqp/H5IyUmP7AQYzdnwt2epQQZP2GItc0LZ8jA9ihmGN/
+MMmpocgp5pZyN6cf2j2m+gkoRExEqoy5P+Dw3JwFQjguMUuxiZplwW8O1c2B
+udgPFzXFh9ivn6ZArXUxsIXjZs1iRdFFWeoVTTOqeNQ+dmrN96nqHhO2jNDw
+5CIZsgSdF7P1qcKCpFJUBdYyfRKGlUVsThhkVuzEY1qggIYoG7vDyrWNPnau
+lWotlT+NA2EMZb8QtkaYChjooXymtPKK9ER65xX/MNDidyZJl3Wu89R0UN81
+lskFaJmTrIOgwCcBYN5FNNOAitkTmbvSiJ2ymIW4fh3vhhHWrJjzlRWVh5mv
+Z56a3zYC7MpdAdLLHFBmqd3+TNwtbvMeEmGMzUw5VZpa0G3Jbm/le5WjGE3E
+53mqp1CC6UwLoOcUTe2jGQ0WoFoGlI2+2fHMhu5weMg0eL2YzjbhLEiEAVwg
+KYALTd7Sv4nb1iN6hDB5LxONlAB27c/R2DyLWTtFJx7a1pwytDOLccl/uE47
+b5QqkgInTc75fPSJAkMw3blJOuuE1gNh+5K3SZ6oDFnQtstmWY6dXQAUH0Ot
+1E6kymNSWwf6ZKfeegMCb0vfrm/jIUCWQjlqWOumazK0qjRNGxGn7pgZ8aBA
+Ik3Tu751dDZNnupWEKrIWhMqj1o6aKUbVS4r2Hh7cTxNAwEWtAVggneYh9hE
+nmptgRhiT6q+TKZKuXNIbm6j07zAWFHDnrH9+rsNvbhCddHcRkcMUqh97Way
+n5lasFkufvLIeNkdinkgdpTmKZr1xPT70f2dPOm6664bhyWkDV5M2kBBccBB
+gmmD99aG9QzZeYn30jYlXZDBtiuaXe8qpKzsYzk6nTeDEoLL+in1u+QcfTnK
+ADsisEC6JBYac8JG1l7Rk9AI6uxXMVX+oMMs41JxX6EnTQnks0RLiONYlDTF
+TZoz4LXCMloszrFuKW1kKb0PqYOjtCEFksWKurOBiWuWlfWRnoOtZiL3p2Vu
+sCf+4+MY4XpOpOFbLlJK2jScmdPqPrQMOMwrI7d7BaT5lmA1V3JrmA1+2QSd
++3IwMXm4D7XvM/Wmn2GgklZzAOGO50xPmGqL38Ld3iMzZ660nTNUc/ggPVek
+4b3DKe2ZQmdaPpQT98FRAiVKDOoES9BSKtUVwskx1X/+bj/GbWMX5F4P+yGJ
+roRMupQC8ci5QkdYR+fFWLvF/RIO7w7m4n6FE2FBmjU0a6QoUhZzC4d6K9qh
+87Fz5Gbawyo2SqnW9noGaO5qYmEWS7BLZuVAvBJ1ypSsTVYPCz0mMPco3WGg
+Ip7S1VBCHQl3ZSJUCcitc7w5+DjvWoTc+207Imir3A6rkoNatVWWlDfEfH0f
+6zzogKHlsNtcTQTr1EtgUFHyqP7a2HRqNXrZeFqVWmWaKK0qeckP1la5XtGK
+UmAh5o2tEQhSzTa1IobnTsNN9sDNihX7epmR8crkcsxluZDUVrlPcQ08rQxh
+tapeVzAJFDknoguBPCZUJLeK0o7w1OjFdjYQvPSlL42OABVRwKo3TIq+ih7S
+OP1S3Occy0zC06zZ5N0rRjnuwqj1pk1GyQrSKiDncgUG5fSzwZLfY5vPec5z
+poLTyj46c6oaEVnDZOltusFENrzeheS7GEy6zvXs1s9XavPAw2YMjxMqphUO
+vfe4TSXmx+DsKhsoFmSJGZN4F3Lmc7LxnE2d9qDsUWUUawpA+IKtRrvtNODW
+uTxIBj1T6fZ8cWuGxGy2N+rONvmFXtYx+4bKWXqQ52RkqpSWlDSLHtg/yft4
+2r1ATs0TecwvVHOP768zXdqnP0R8cSG23Ty4TYZIFVrpINykm1yRjNnA5Lel
+xlnzR4Eo2n6u59S8HESP1cVWNei7rbag3jKw/bV3p6dtOEHG0mCg/Lj+jc2y
+b7+x4f2l4dtyE2GgaCBs4RtyaWF2uaFE3YXf4o8k57mWuew/hS7sYdh7ju4v
+yOJWVfqt++4R5cQfTIcyZUgz/mCAoD8nMDO6jAiF4NFvRiYlW+8SURU2onAM
+/uRso0RlEghZOQzqnHsAKXEWhy4uIxLU7u8/2kZEpXTvjCPH1vSIbmkJEn5u
+vis8zZ0xsEoqcbvb3U6s+7j+Gvx7EncLpvI0z+Br5fHCocxFifikQEgQF5hK
+mZPwm6di0A5ADPRQqBh+lIzK8M2KWs997nPTKZXlM3Vc0u1xZbkGCORZ/WrP
+NsVfD3nvmfyW1Mmh2Z4noUSBTMvOD22QOn3MbRiQR1xE3zCL5RsrPSuJxu6M
+pRfvz/Gws2R+Jeysv6e1fTpl575TSFrgDdSqi8C8wSLZl+p6Tq2DTGgx45+j
+tzHarjLRd0W99+1HKS5a9hsDTs1JWyazTEUSAd1kbWVVuXAISgjR+eoC9hgX
+rM8Zmg9ZR3JyOFdoRhy5hkrgn4Pd37C/o1E5FDDD4FrkWAgpIjKM7N/f28zJ
+HOzTL25GTkrCQJhP0kmuSTygKvcXgXp3uYhAbahD+gzo/v0TL5JLH4KUa7z+
+Bv0dVvWWuFkkxIyEbzkRm1BQAOsEt/urRs4NwEIGn5ulYwSm3Xmd3j7O2E8n
+HQ6t+3zY+/VP7KgvL5lzA6hNyPzYZVQpRly9dIUaIc09ms94p94nWsMdy288
+Y2NIsC9lqv0kz7byus+TmT5xDXDX0moC3CNDER6BS3/lCA71gUStj1k0Ltc3
+5zmwmzg0ayNzCfd+3eOpIWzvClnKsKLEssk4lIyIosZtp5s1mux8JlX6HHqJ
+YhXRwt2uhW3BQWLHrEJg6nHId+s22EgCGzZlZiptrIy7tIwwkWJGDdIO32Oy
+CZ9xWImZSy0IPwvzKlZYF0IkKry0fJeo8NCorxjpMnwTuGCYPAWDMpWRNd/Z
+eQXMCrHCd3ib2mrW16yR4s1tmfycJg0OALE9DOWTaDWKMb5PqBiI5/8ZUWBA
+FNdZ/uyLaiWKzE0J3jPl4q/NUi4Mzcbo7HfP/dNZp9FRYs7C9XgCxEPbX64a
+vJR7ZA2Xwhgx5NQEgUBm6FMXkW1jbjE7nmm9riu95rIl5dB7NeMEUH2a/NBQ
+0CocMQAk6MpAcvwHrQT+RJ2+aAqnsL/Y7XBE+rBmEqEhXwifa6YIyHe5tbq0
+ODPOIvE+iaQjqAlMsspOpNscL40pVmFIlqYp35v1Mu1hNLQsd2SxC0mE3kEt
+bkkhhTJmguOCPRdRx78bPUqJugRw934U6Gh+f8XSpYHwSuuZjidPckOS0FwI
+njtSMICxyEdyqpXfuGrF42Drcu79vKPOe6ICwqpkIUeDJ0leIwBwawuEtKq6
+iO6L5bK8Kd4yKaVWy0XeelgEvm1XPRtHN2gzniUSNGQFpP325QvDPVgclflD
+0nE2gqhJCuy7MrQxk1WxplFr3UoM1T2raIqms/0zk8xBZzlMv2AjkAfuiG2/
+E+jUyNEyPzD3EJwcIGJ6YD9lcGE8qjrOdrLWN1MWZjzwuCgIMRRGEd3MAjbD
+kOLvuYVWVpat/GguMM3SRWjnImk/OTKEmi6MIGpvAzX5AJ6VR1gZAWscaKAF
+G9rKpG45LDuIpsJieilbfwkApYw2qz+xFH+EF/uzfrbLnK1LTG0X/hTN21a5
+k7m+ZGyfOTP+vW3GEs5X9nWQ5ySCIM1KojzHqoTKZ86c6edODSuWubLWCmNu
+7FFwWJyTLXaDshPjmJLt+secUwHXejZ9zG5lCDnoLYsyyLCyoZAmqkEKok6P
+f5+blqrug7cKfoqMKgr129llBAIkDWUE8CqnfhSzHtpEJLHyz+nTp0dUWK+f
+7Q4hlWydspuZyWNKFfXbxrLzg9VMer1JwgQGKYnSQPV9DytAVpXtlhiAh5aw
+7q8p3A6KzVE9Wdrk3Zz8kYVtkAbLbNOl9i4eyLoHGMqBkb4MksvdsPSqoWgW
+FXhPpkHhkM7Ksj87S3zxNdvXe0lVQh/IdXg41w6dzO292ZOQs88YcM429K4h
+wtuc9WyIakGmb4DBXH26RXGYbXEcHTJ1sI306gHvih5e41cBKIrXnere761l
+c2d9FogpFdyv++FTYQ7OqGTu+9nyfjjOC8FQAs6eS0M0feE90jQ8ffPfOVaK
+hwxMb4cNbGzkguIENiPr4PLyVzkHKqcngOlw1+sgkmeDLGuBPpvwE9etZyuf
+W57LHRynGpVy9V3fAjPZJfgVb03bb8/oGW7muqb76Ip540DfemMLkfgObOzP
+OdrcZ24Re033/WQzuPDnTP9ivMYTJU6ATWSy2bRDaz2jKpgdcXjQ5xgeyjnT
+b8Ku9LHb7SuP2VCwP1Bv2xEgPIPkkSP14lmKt33IUaJbjrkpnGm93nFpf7LH
+dvcNuxHDpFXzc4wCVZQ5W7GsQuFzcPKW1gNtggY1tIxOKEYKCdF8cqIKDShp
+PmERrFcjRHbmNbaVvW0gQMblN0rRk7yZZFk3/KFY/M8LSriedMwzuQIMSsim
+12cyAl2r4kF2ddHucvx286v+f/bdCL+AEsbXqJ7SX5NS1siVf99Wxx5kIZWk
+UdmIGzOhYP1o6X92UKlqmKQxYZrggqBMhjrlWZoCcwtv8woAM/vi4KfciUDu
+AKjgvWciJwEMk0fjJcAnyKwIOq1xqSIYN7ElLQDsRy9y5s6SkN6xmwZRYBNE
+ynIQW7Cbpg1d5GVtZJoWHnpsv+3i5Nyg5K9H9Hf8iYmd8inzXQiJheuFFBif
+yYcbV3GdGcUE2yiw14SLiLQojjvKGZrijXXgXrEoOz2IEqwt9Nedummqbm8E
+PyK4QGkZ+urphAOFJbPp3C+93vajoGoRDj5n4HRUyOiQgbybY+/Lag/thzdX
+jJFHBs7zyRZ96KrKYDURsSA6FZFk0CJSPexjze3mGGV4y0wycFGUdaI+MIQT
+LcNN033WzqGmASA+Y0aapoviSpLMqWHyTeHu+i4FYwn7Uz62HfriaZPbRwYu
+kzP4fMTV5fvu0IYKdv0s2St+5AaeLD4OMKkok5RVPRm3QN7u1XzYXwUHaRmd
+IiuWWlqalnXkydSkVQfEfeT4iH4VLvGRllbXkPKqGMzGjxDFRkQL+7ntOWp4
+3Hf5Dtr+f3V3kBxFDEMBNDBJseAImVOw4ThN5yjcAa4b9Gx9t4fKhiWpIkUm
+HbdlS19fsmzT89Ks9I0l6QhuWowwL0A7QoH00axaG3SUQ6SGt3QsZwFqpiKK
+tAz81chaEyh42G80sqQLvtKyMh2bRL9vAyZqldmvnuRP0UDHG/gz/5QM0pMK
+KB+5zstIdxgztsIUawafoob8PHol+xUbMojivfeNTJNdQmI3bT6BSTN5QZ/l
+/pqjHTW8dr85DGUAMNfZpLcReKWOIaYNpB0/vkMt2NT9/RIpAYa591NfO56S
+LrE8NoeR1OxEYEokoXZtMZzLshaL98vUxSmqBLj91x5IgyVfi5SFEkRaYMSl
+oxRp16tp4hWnzTSD8nJgFHvWbi/RLnvmeA3qfrQDzOWA7OVtaXP/kjQjIJOh
+zuPocdZWclMRvO1V34et8Z0eXhxAyJpbkH3x3EIEHKBfPT7/gAP87/+fN0Y9
+r7OSmUP54pQYm/yc31CK9K0/Fnejj1xBkakkyQGpuBWmoW6Cxbf5nqOHmuaw
+XlWVFmat5QLZa2lv7igBLzRCFAXECmhToc61WzCFz1bOmF3NfqrxsQhFhFpn
+feCmdOh87AegkcjLoi2N5I1cNfi1n8mW7uy/JxLAUvsfak/F5B/9lPJhltD7
+81cYhQplAWW/nV4KJF857p61ZCxkc3M9jeH1+1Lflubsp6R9FGJZ+uWOQH0N
+fhrhau1J5zKBj2Ep+hIZTLIxlgyMDEirQRaKRAYwn0sI0zScQl25VK+wnFuf
+ZTIAt86Iw8O3yj382JXvy/Ajrk1kqxTQSr2G4HQmg/eQFxMHyaqaYqBpkCMI
+vfN3e9WHSZSS9FkEAXcmct4MMds3uPg4gEWOeCf5GGcNpQ9QVgFln90y/IFB
+cpv1XyL5NcaY5DGL4WkLpFdzOEcu8fCFSssrYj/pvnlgL8dxlN35fhuia0v4
+nPCbz2Uze6kQIuZZdXQRk55D/5xlIhJjROWvV784Ei4/WTiBoaFXAPog5m2k
+kXCi/SxxZKcv7livNXs4Y9L7whuiMqWIyhQRvfK81ZbvL+uaK2KYMQmPPM+w
+mcM85GRum5HrRBTk1qLK3CsnVO5z9ZHBwA2uOc8xYyzsKmC+Db0NEzgeReeE
+oJcK4Twun9N3Vy3RWQgF3I9gV3bisKsorpk3jGUIa0FZ3pQC3u/3sYEXDcd5
+KGAhVyYLPWZVObvbxGJZdm1GMiAFHipIWl0VMOFCm2RnNynbqjeYK1MxoEwS
+4Y9UqV7RO71XMKO353muNJG42GIYr57yDqNAd5UHfh5lZc8jHlTy0Ycu5hXc
+gCJDVo5nQy+vUGId6elfkmyyJJirORTht1RvDUViXdPJL0h0ka4sLS0xBHkk
+XsVyh1yPKQB2yRXR3j4qZgkkQvJGcVkMT2rOZ8QLUNJ4ronGCoV6f3SAUvwL
+vRmP3vEFNX4tw6+tA0YUqc3LBOp2kRrRn/Px3/0rjiP3gGfeARL8FNH140Nv
+/oEzPH36AyoG5UE=\
+\>"],ExpressionUUID->"4c5ec22e-95a1-49ef-b741-eeca0945f7d7"],
+
+Cell[BoxData[
+ GraphicsBox[{InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwl1gk4lfkeB/C/rmTJmj3pdAnZxjVpyqj3bbG3nETpxtyTaCrkmI7BRDQo
+y0myTCrLYWJaEC22yOnGkEqHkSzTHddWo2UOI1nH/f6f+z7Pec7z8f7/v//v
+933f8zxW+YV4BCwihJzFh37//9JgydQCLiOWrE9+9PG4OktISu82JWOWvHH4
+QX5AjSV1Ra7vVsGxatX3fOEh8YGarbBN3uYtT1VZsv37gNkQWKq0+MW8CkvW
+/sMyqwiWBO5W3QvHZoTLD8Lckm/de5RZIphMTzBZjb97uK1OhkX2Bn8Fw+Iy
+tX8dhTv9fO2r4DSTnJ4wWPOZh3QB5gdM5JfA3sPH+xxNWKKmt1ROAfW9U4w7
+z8C854498fDVZ1tHxHB5yHORLvp7M84GjMM2e754ex9mv8+Y1zPF+mOKv9hi
+npbPI/+9Dm4Z0N90hs5nk/qFC+x9grnyC5yz5aXXTthstOWcNvJJbFUQusKx
+cxar3WGfmyq19rDo5uBimp9/1QdTI7q/yEUYBbvcPxMhC3cHTLwWwL/OCbP7
+0U/ahkzrvXS9VfaNGpidOxLAgeWHJ6UXYJGW+ulOnJ8o2FgZCEs78g4IYIFz
+tJ0rPPXgYMEiOKLUIM4SJrqexxZjPv8wJlwH7l/irj+GvMR5ostKdP/5+GXt
+S5Gv4VVtRTg2NS6tTAk5eTldXwaLQ4uH0xVZ4lB6ONeM1gvZwTmrwJLGy/XN
+LjAn7bdrGfJ4HuW5iSdof/dPvW1YQusEd/xE65V+VNSAS0Ivrh2i+/tIQaoc
+SzKLokZNML84LjF1PXw1qv19MMxJr3ulBj8dL1SqgrlzLlXaMC/JYnaBrm/V
+CHSGs9ckhzmZoV7934V5MGnx35FIbXrFUBvnOQSdTngEx+r0vSiGPTmBAZMw
+p8eF54J+M4u3p6xcgzntyuvHYONe55mNsGjLnZxLmG/7invGu2F+WNz9dZg/
+vrR/zJtaOukshmUjFRu8YIm61pfWyEtgnnfABZb+4F8SCTfebCW2MPe7K3q5
+sKe7ZJsmrLb7cX4mvNYgSXEM/Ygv3DT6Cq5z7ApuhUUPkr6eRv1q6/rSQtim
+uVL5COxzSkcrClZLyT1biv7im5oHvGHuzJLxNvRfIj5q+yXc/16jvwPz8mz5
+I8Z0feiE9kPkU16QkalD85Ds21i4GOe7+4ZpwvzbGadjZJH//sh9BnD5A197
+v7/hvWM9L35G7/+3O2HPIuyL+OfynbTeT+9GD8jgnEoZr3Daf3sdiSOYbyDN
+6QbNf7CCyVtgMMexc8M0b70yNvkvhhhw+XxTzM+JWrpLMs+Qtd8MjwVTxyWq
+nICv/rhiqJK6M50XCjda6xNijnqvxkN+hrPLreed4NjnUwNHUU9NUHktCea1
+2dlycV73qaG5JljioJ9mh34MMh/azcD8ghsmL2CfoFODxhao/2lEGo3+Hax8
+prdZ0N/HiR9NMF+QKK17PywdnvyzCebvvbf3EBybLJz2QB5mBjENB+l+dkNS
+EzylWNLuBfO+qkjWRn5mWi5VrAX9XU1tZmEf++xpI5jvMJi8Ce4XrQmVgVlD
+VVlVWLPjum0f+uNcuGhagXqxt3dG3qH9xsdxTeBrq8rOC6k77pWEop+c7z5W
+HaHzWo4tz0b/uuJwTTfYZp/jfD7mk+9KuGALi4oGe1YhD7b/23YjmL3UNToy
+h7zty5evpPlVBwcXzDAkKMh312pYvDNA1X+KIb9u8OtdR++XOZpvnmTI3OzQ
+3T1wf/OArNsEQ2Qb8g+epO6dXZk6zpD1QxPjJfS82i1Z+mMM8UxI13xN908U
+G/75B57nEVbPjOZXuE186AMs77r0OM0n2kNw7j1DhHdbmipp/lqBhiHw3VpV
+GWIJu/lYEqzPVP5M4AyzWlZ/2KAe72nt62SYp7yQFyZliA95uqMFFmctK0vC
++f5PPF7Ow/3FOcJG9GfW1ydnbgXrXj6vif7fnZQTu8M8v1s2X39kiFRZaY8f
+vX+J33Yd8/qH9cYFw+yTR8GtnxjCeSwUUoskMYJq5MNdIbf8EF1fWu0VMM2Q
+nJHfXXfB4pQHZk2wUMUk63NaX1xh/BzmRgtb1WHOqxuz0XBnrf6nt+hP1Nak
+LkG9zrqK3Y10npgX55pxXkuqvnEunT9dY+sx9BO/zulOBJ3frkTwEP1POTWY
+7qfrVUvDejBffNHmcJbOb6S75iHyiLA7yLWh+591tWkgz3KJhoI5vf8qIz/x
+DUPEWs/SrKlHf9ZRGGKIt0v74U10/eDg+m9+Y4jufpksWj925rBb+Euc1xVx
+K4a6N6yQJ8HzUXnffYuuX9R6sqWRIduHi5+8oRZezL1diffFqGbEDPOSbsMP
+NYV4P/7z+6bj1JzHNeIo9GuSf7uSml5p9WSO/n9hxf4PT74hSw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {1.7026940733168927, 12.067904665985203}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwl0w00lPkeB/A/dd1pZZJG5KVGKsPZJrfSmXTb53HlrYhSim27k+rm2lCb
+rBDTOzXLKLUVjjlWm5abt6Kd2hoW11u3oS2TIVNGXnMnidHqut//2ecc5zmf
++b/9ft//wyE8Zut+Y0LIOfzR9x+PBUumpvE4sqT0u9YnhrkskSzLK6+EfWsc
+pR2w68uBL6Jhkp/mdgM2X/LzGwGsLXF4EAr79v7Y3L+YJaJ89YdJc5bIuW/V
+JfAhWeiFVJi0x5ekwMrqw50c2DrU6HIoLPbiKj5x8fZt/ccXsIRjq+4ywzzL
+xzIhrPff6H9/NkseqCxmucD8kSNf55myJNZtT5Ar7Brv7HXpM5Yk3fD4loVl
+vbe88maxZKbPIye6P78q7mUTB7+v8a6Ih1nWcq0dXJtusySXzre2n/j+zyxR
+PSjbUgvLM12MPeBOhc3EEK130c0oa9j/uLRpLvo1V8i/todTucsur4KVhY7b
+A+DTbwb8AmGZlbLuBzrf3sR2Lyy2Wdhog/PsGqXSKJpv+b+ti+Cgox2nqFWb
+Cw/4o95+M9PgcLrf+5X3PsCGRBPlJjiouOznXPTH02hMXGj+buOCdehf3Ly1
+/RPN75jEtY6atAQ0wFrF6tpVyOtgi6LvPM3/bf9YCiwzWxHrA5e67xcVwKWK
+OUaEWjyUn0PH7zTUVTrQexqZcwDO4vjNjoblfwsRzYClEewCAazK3333G3re
+mYu8Pj7WWxjr76G+Dbqx0WJYlZ3+qQP1jz3M25MI6wVdkd3olzOluxMMa3cG
+GB4jn7G14R1r6HpHP78SE5bsO/hV4FJYXJF1XvonlnzuXmq7iK7/nDsvZiZL
+BNq4VkfY/JbCWDwD9/r8TOZKWP6UqztgjN+V3/I2wuzyjcHpRrifhA9VEfS8
+xKSSFwT37XA7Qwq7xkSoN8NZ5ZuPVdDxX19NvJpmCL/t1koNLDm7dvAkrJI7
+HzZCv5IablIKvMv96qQjzHrmDrbBqy19q1iax6P6OHfsZ/isuHU7HT96xORf
+sLldyqM9NE+bWbPdUU9EyN2QvbCyT7rrBbxLLlOH0vWcBXNOon7R8l2TG2DZ
+7u0vXNBfxMHkniV0v197Y5pgQVa120eal3Xvmx3I47dk3VQdzef7U9xmmMRW
+FqbBskyTBjvkV1Aq/OQNkyuVgT5wi9CGENr/w/vx3jDfZ11D1CLUWXNMbQVL
+dE09moXI831htwL7+cq12s2wmOukdYVFx5/ZNNujHqHndBLqkdc6fLcNNg+d
+Z1mA+lVRM34asUN9C50SitGf9bs7a3Jg1iO/Lhd5xEsKhX+HSbZ6iiA/34rR
+2yJYuzvozP0phuy8ohgUwEp7q7bjH2FPJ+cVdP2SDibMwJB7+7QtfnTcVG8b
+Ps6QiBNP98XR8cFafcEY7u9CRl0ZLDl8UbfiPUMKp4QuBlh+ctjVbJQh4q8S
+vvRCvfyuwnue7xhSeqFYkwWLd0cpn+sZIhdZWL6m/Zk2ttTBV6/I0wToX9m6
+5uZszBfvuGy0j+bR+SztB1i77a9VMliyyOJQCvbnj/KSi2AtbzL1Is7nfFnd
+U0bHE67Vt6A+mXukXz5dn5V32g71i+5kjCXC/IBoJmaCISTg2nyGjrf6bStH
+v0r2edMwrae8sebpJNarjU3PweSsoq8G+egzGq+b0/ojO5wP/84QQTBvSErz
+NInObIPlFjvGp20xv/Pshpdwaa+XVTSsnRh5nU7nT+ZrNDZY7/e/X15jP86m
+yd8CYPkN3qAG56X2CP/ZsADr04ydJajH2l5TEAhLutnbatTPF6+b22eN9Yv3
+P3qH/uRuiRmZMN++YnUH8igNe+y+BWZ7DC/zkeehIulWJ1j58G3Z/WHsv953
+OY+Odz+9sq4f+a73cLOCJXklIYM96H8weURIPUc38KybIf1ha01CqVUW3go1
+8k//GHmRunBkpKqNIexAwsF2mCRqt75vRn9Nb1850vpV8cvd6zA/zHX7EWrv
+I0Z7q7H/5IK/VFPvHIqLVuJ7iTN7x0H/JP28J1OD+dFdgd7UMZKw7Hp8fyH2
+sUepq157Cx+jnqx51peomzn+9Tg/6MztohxY0rZlYU475u+xi5FRh4Y+aetE
+vwdGT0dRVywONn+F72um0++rYKVHTVIu+tX2nmjS0Xpq+q8P9+L7yD7XcgJm
+s5/0afqQ73y/QjNYGSmUBAwwpKGpq/IC7X9/xjXBIPq9fkM7bYX1G345FQan
+1ilio2FlxfPIdswnR0VTmvnYL3Bp23XkrR9eahoAK4MUNTffMMSw7L/m9ZZY
+3zpUxNExJD58p8sm6tTJ8f9ocZ8zm8e7ebAhuQD/kkR5ouqbc7BkZU5cdyu+
+z02X1J50vCrdxwH56S3vps2nps/V9X+8eez/AXlZLnI=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.7973059266831077, 7.067904665985203}, \
+{-1, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000002274`, 17.}, {13.500000000002274`, 16.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.552325660469876, 17.180083206945802}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwd1Xs0lGkcB/B3rVDUiFnr1hj327YplyXqvEmyJTRsLusyQksZZMXslEiy
+gzG0FdJU09aRVJJbqIOlyyyJYwvt2tKNzoakRBrs9/HHvM/5nOd5n+f3+77v
+mddwZzwnSoGiqD34kZFSIRcbmmKTUZemdGUGXYtgFZdKexF8YdHsR3XYx/lN
+GFOPpoqZyUGGZN56b8RxmHl4wyUHuOV8eZKKPk31qs3v9IE97rW58OCcJ6wB
+Hvx6G2emGZYZxbuJ4UGVzZI5mFvDuFYJT7ONe81X0JS24UG9h3A9ffkbZ7gx
+OTxtCk4Ilcw4woWKdd06q3G/jh3PCDY6NclYC5ddr+B/wn5n5vq3+8Pp7tZ3
+WuAgR19ZAkxlXz++f6G++PYjcKWe//mV8Mz9P/4+Ab/m3lL4B/0IjtldkcI+
+g5smfoWf0JMmpeT+9UW1jvC0MDFswdJXu98hn8q0wEvn4Jb2+ue1sFvWmfRi
+WKh7QZANN4oqxLlkv8gIeRyZL5w6t5+c/0iSEQ0rnlUujSH7tW2PTIEzO8Ul
+O2D1pffMJXB6oyR7I+wxGpnaC3805Keuhh0dWlxNUQ97bVKyIUzzr+VlkXrV
+zMOZZP27+aYp2COLu1SVrG/VlOxDv43Fa82U4GlufJwcdjEssCbmOylYCJGn
+h1CXR9b3s2Q5TBZNWXyMUtYiDqE5p2HFyYbnpnC3pWkIy4CmlJy+qCH580Ud
+j47B6TcuzvuSfiak/jNw0zyHtReW37MWmrNpSnTOfeNROOlQ0+hm2ErdIbOa
+5CGuuxwCT6d897wX5o7G/BIN90ym+c6Q/QxWLHj6XXan/hq8J8PVDqHwQLCr
+9zqYtg38fQu8y/vxf0FwQSZHeRV8y6z3QRLcfz1gXg3W5Wl55RDffHHnPuob
+OhgzVAKzxR1xAlgeJ9xUCpe9/WRvDtdUOXlegVsWF3P70P/Y50OMq7BQWK6R
+D8vKe/vK4PG+k2YcOK46kCUlzshRNoEj5U7CY2T9vsl8Zbh3R9TgYbje/e7o
+HPK2OPUnIxHm3mDkqWJ+Z1YCMwxO32C25Fv4jFnn1FZSX2CZ9S64THTythPs
+U17xsgpOb714wBIeVGSEaaBer7zFDJJP/7NtSzPgVue3XhqwNDG/bQ4uuF/4
+Ro04asseV+ThGlQSQyzz6jAQwnLfpyuWw9EVXeEP4ASDACs9OMkycZmmIfob
+u3HACqZkbhp+sEamadd6kvcqSWo+3KQ7VO4PV5amFrXB7pyhWJJ/UlXy2Bi8
+pO3D1uMwP7Vhl7oRTU2s28utg0Uj793M4dIM06uPyX6bUuxtYcXH4xazcHDo
+bm87WPB+WGZgS1OejGFNa3gNMyuHhhNOqsZow7E9uamhMJdjc3QW57GXWHfy
+YXZZEWsAjgwzk4lhidLyl7XwE8UTw2dh2bTJCxFc0Kzy8DKsPcZ3jIBvjb2I
+roIVeVbKznD78ubaalie8SZCC66y7Z69BgcXXqGnkNcMM6j2Ipl3Lwl8St5f
+I5fUU3C/gqVJN1yc90BfBOv3/9XSDrfy3AUCuOCqzngX/NBl5OhPcGaAieog
+XMETxPrBNd+HU59hIxuFr1xhqepKPzbOL9FtEK+GY9VzTb1hNa5mhzHpp/Om
+QxY87Zcr1SH1h4Z8Is+D+3NCqybc7SU9rYS8Pny5rFEDDjCTG3vCLH7sMy24
+rL4u4Tc4uGcwjA1/yEzj9sGNPbkWq0i/9T/8q22M3Ev7Zkg9tzNHJvzg135v
+I38k54fffZYNB8m+lqWQfrd62tTBzFfNoUWwX6tTQz8s3qHm1gC77emuG4fv
+2p84MACPnI5qn4UXvk92+D8kown9P0h0WZg=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.876835367704164, 7.161502436909525}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJwt1Qs0lGkYB/BvbTZDGJJGW9LN5SS5FVvH9tUpTSJ2CmMrlEtyqZkhl66I
+I7cZS9nZCtOWcsuO6rQV1USmabXW7ro0ExbRkmKQEl32/7bNOTPf+Z33e9/n
+/zxzvpkFu/dzQjQoiorAm1z//7ClqU+vOTRF/xZ+fBEsW91wcsqEpo6WjlW7
+wmGtkqhuWD2HPhcGl6REC6pgqVO/0wmYmS8OjIQXljPPXCD312XVzYTFfpaa
+t+FEhrKvlEVTW5bFtDXBYl75LTu4bNl8yT9wF+OjrHI2TY2m5ZkOwJb8qO7F
+sPG7kQ0vyf3uExvFxqibJXJ5AecU0Kt1YePymIBnsLr61mjaLPQheeHYTuqf
+iYuaAYf3ufIb4cdmxpsLjWjq+R/vn5M8rNnfl9CwT25qXjnMzaulXs+kKee6
+mfvE5Dwp21gGs3NvpqaS+Wx36CqCeQK7p9Ekn/RS0il4VUddcjDJp8lhS2Cj
+wWI3Lukn2/HqHXjHo+UaXiSvtV/SELx+iHZzJ+uabQ+sUX+LwdwfPeB+5Ta9
+WDiefrN0G5ln+whPDltPhbMCYd7IJrkJ+vlZonTiw7a6CxUR8PPxZvs0ksdr
+ucsN+OyymORzsPRC4MIpWDWYcOAurLCf/Zct5pUzg+XUBcebNlr4wJSFfpuG
+HeZa01wYBoceUXHMYa3MofBQ2KhWWLSJWPlv+hZyv4vOtQhYNin43QyWXTbJ
+y4Sbgl+2d6CeW5+JdwlMe0zZkO/j3SGV7T14wt95ypTkM2Afb4G7ROmLS9Df
+2a5LLb3kPE7vXHPYsMKsZ4jk2VFUdxbzul8ckj8Gxxfkr2HCBx32GhGzGk62
+phhinveZVS/hHIGo7oMBTd0QvFY/Jed1e+gmwxku3OOtsGKafoAhvCM6dLWc
+5Cur7L3CpCmB0l7rGtzPLVkaCpcliAYlMHetubYN3B68Up0Ns3/Vz9aBV5ae
+nn8YNsvOevJeHzm/lMdFwmEHxkXTsV7ofrE7gNRLzpi+GF7nbWXpS9z2kzkH
+Zk07qubAvBNlhiKY6yG/uhUWM8SBbbD2D3G3/Eg/w29XWCDv3KR8kxBST9iw
+7yD8Oneg6gAsrX5a/wj2UlrZkfmLg6o+mGAeF6Xms4philGs5w/bnr8trSX9
+hF5Zfwpm6sXak/mwGvdE1cCrtBMrNO3xfLisGm2C9U4o5lnBUtXfn9w7/PCQ
+O8yeF+VbDR/1v1mzD1ZoHHkigtnU5W4h3C/yZXrCGWwuVQF3jUh8J5Hvqwcf
+NtfD3KyGljyY0nGdpyL7rZbsNIV7GacnBki9nTSnAP3XxvXlviLrpooMI7i5
+c3/zW1gimObFxLzd99QriWX3OtsndHFNKBol93ulWDgPzqApm7HHhYPEPR+P
+DOvg+ajPTO8kVvt/rQsbd6YlN8JmkYmpbtrIuyEotoasqx5OVjBoKsWeH1JK
+8psIPZ1hjV0TfvlwU+p5xZAW8u3V8k+Bbcu/0fwT9or+jh8DByrkEx3w/YRd
+x/aQ/Y7scUPs5yZe9PEn55/i10fAxnHZEj/S75qGlh7Y+q72E2LZIZsIPvII
+Ixu2BsA8WWavPvIaOny7JBxOvBeveR12HMtZcRCmnSpdt6Pf6w8qnERkPgZB
+Vm/g8C8sKktI/SyfjCTMpydYW03mTwftHBmFY6Y2LX8G5ziEqdbr0RQnvTBR
+ywGucR7nw686k3qXwnSSj18sfGWz2suTrK91rfCE13XkVPMdSD2h83ucl7Kg
+e1EunHjmwqtjsP0YVfALzBOmJaiQZ/TwHZ+HcOBG7wEmHDuYXtxJ9nv3yC3R
+z+5JDcYwOT+29a4l+h/Cr9MkLIsLjGAxPv8vOX6+atH/ASL6aNo=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.123164632295836, 3.6615024369095255}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwt1A1Qk3UcB/A/AjlexFHIazAUkJERxEENAntADpUXJW68nHgMZtRQKIPV
+ASoN2nByunjLKEYspGMIcYsY7tJiFHnzRFkkuHlcIpBwNAILhUCi7/+u5+65
+/33uefl9f7/nf89O4btp+VsIIYdx0pWYNnF4M2SOrlyGGF3GzDNwe2xrVQfM
+M/T2tsGSr9M/48Oq9HESDc807wlxhEPV7wxrn2cIKy+ieDSQIdzqDb4bPHQ4
+RX4ZXjoxoijwYoiN47GMi/DkK1cr+z0ZEs7JyaFmWUkbWXCoaU3bCUuKGn4p
+8GBItHOC22041yYybNqdIcr3FXYE9SR2/hun4NLFOc5rtP6H7+2LhLvjHxwo
+h+UlEpk3bJn+LkgHm9r+knFh+cHxikVYvUYOZcInZSXlXkEMYTuNCdvh8C6u
+Fw/WGQO5LNQX318tiYMNVbyCMljXsz5Jr4emnvl3AWY7TPnT53nPHJdmI/9c
+VELRPJ3fNbGrDtY5lMV00nrHw6zW4aecg7HZcNaktcAb89BxHtnbwiKP5EZP
+2H3QqO9Cv6kZJ9uWcH9pi07Pp/OpNSSpYEeflNdtYd7qE9tgmFlImh/cjfVG
+81Ul8liCkxsVsMTekLeCfriK2cUimARrRAnwzNYAQR4s79E6N7rB/nX3RPDS
+yA/9864MuaMfelQFm8z3tvPh3JbU37upCw9JTTuwH6KjTFOwMZbfUAEn913Y
+4Ys88tIwQSLMlfnkC+DaNbMwBn4qlRQ0w+7X92dmwP7nlGQEJm/JEuvg6KOu
+qsewceflh7OwTmrb4YB5sNiT02+gvmXbvlYn+r19TrT8DLdz+gs2cL9vXdQA
+D/kJ+SjNBOsjf91Uwaz6bxy+hNWJleZlWJTcpThC52m6GfEi+leb+x6y4KZx
+j02G7o+agDkN+pls368IgSfKysyZcO2fYssTPC+NO+JiDWsi355pgoeVSV9d
+CUA/FQlTHrRe/o9LZXDTJ6uXJMjHuunwZgrM5lwZGEM/Bq+Lr4bDoqZCOz9Y
+o/o7IQT2tb/2oNiFIaerRVZ7YbUn99TIcwzhB3mKc+AsS8WuONi0HFh0AU6t
+Kvl09FmGHDCHa6/D8rPcymrY4MjPtkU+vVUpKw+Ov02c4qlHvVqF8HLNb+Vn
+qGu+XZHDXIGsh35P34GIkBE4+e4XRbdgXeC0/0uoxxvfXjlB99MLijUl7Lg0
+tngXZjeG9zkjr2bq7K4BOp+PtX9UwvzZtYV6OCvG+vw03C1MkabTet4d1cHo
+V/35sRR7+v7Hdz7IgsUNyk4t8s+9XL9bAA9v3XbpKJ2XuM6yF2ZH3ai3gXMj
+AiZW8L4hU4u+158hq4OzP52n3rNhXQgTVcj6FjjUaCwMp9dd7lsJkff0rbQ1
+J1j3Pf+fXvSnKXbJ3/D7/7/mjH1OVz/mP8lKx0w=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.16438510075492, 12.373697879094095}, \
+{1, -1}], LineBox[CompressedData["
+1:eJwl1AdMU1EUBuDnQsBSI45UaLHuAZYqEFGoPhSwisQiEjWiVHBgBSxqFKmD
+RK2ioDWGpQYbqEnVxjgogiuiKHVECeJi6Au2igmBgqtiLf5HX9LcfL05955z
+8s4bm7x12Yb+DMMsxI/W/48/ywykdRzLhJYnauRw5MGaQ71jWWbCD73yBMz0
+VjJfYMf9rsgGmOMdKXwKc+Z+X/gBiNNs7CyD3ftK4xbATpd9qhrmeQa3psP2
+XO5tMCwYUJiQDxtD3Np7xCxTkR7yRw9XrI7PM8GRVkmREVZm1k9bT/Zu22yA
+rWVH5gph5Y2esAKYu87TXB7DMlXbGmP2wMx7L6cEtpbI5q+G60u859z1Q172
+EeJgWNBW/DwJVseem+IBu49THxsFW/jNlhbUE/rJPdEqYpl7DSP3XoUd+Trp
+E1gnbTHnwu3OW1/rYKeX6s4m2DL+yrEWeHn57dJYWJnksg3CefdSEobKYH3M
+TH4EbLxwLnEWxT/5HXsUNmU+WEP78gNFCa2wYfF+1VI4NeWuKgT51zrSVqTD
+RoPobD5coXq3q5D2F03+ycG8wcLzj+l+k2PtSPQjr0AUM4jqKU+LDYJ36LW7
+F8K67JZNctiU0+SgfocfSAiMh9O0JcmvqZ9dioJlcJUhJcxvOs73nDU4GpaL
++7xSYGnW2R3T4fBuobYMXrnt+1IPWCG7kdsEX8nOGG5GPsvpfwnL5LTN5kXB
+ARQHF7Mu30eobz2dC2ctqtsZDnN0L9zOC3poQv+klBes7Gfu9oXzKG/Yznp9
+PS7Ee0l1wWL/sEJPuJbqJvNDF5/yRR6GUxo78sl5da0rAFY08J8/gnXd7y43
++WB/RpL5NKwocDWWwvqapxczYOVH7a1sWG37MymK6oufV50BP5s4+rCY4usu
++tG+KbCvpz/VG71bdgbmhr2N6qT3TdiY/YLiXa2/PsJT1lVtGY77v0XLBTa4
++Lx/bzIs2D5Q0kMWVZ6shplhVVFDcF776blx3qjHPXPJ50A4i5vKpsLWJR6i
+JLg+SHOwEnZ0uu0rovpsxiIH3LFKK3sDWzJsu6ahXxzNBfqhm1D7Ug4n0tyQ
+LWskcbCR5gpWN6t6I2ADzR3MugVc8oE7aC4D0c8RqTeb6T6aW1jgkpVr4WCa
+a9iyZUCDCG6kuYcZ7YdcA+px/sJ3AVZ0RNT4wSx9N+Cs6OofOvTn3yNFnbT6
+sH8BRImRiQ==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.763809742330267, 6.7638097423302685}, \
+{1, 1}], LineBox[{{13.500000000007276`, 16.000000000003638`}, {
+         7.500000000005457, 12.5}}], 
+        PolygonBox[{{9.98173265946094, 13.947677384685548`}, {
+         10.816718930329426`, 14.897834175673825`}, {11.219815750748694`, 
+         14.206811054955079`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10.323799910437668, 14.984057296392571}, \
+{1, -1}], LineBox[{{13.5, 16.00000000000231}, {13.5, 8.999999999998607}}], 
+        PolygonBox[{{13.5, 13.1}, {13.1, 11.9}, {13.9, 11.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.4452, 12.5}, {-1, 0}], 
+        LineBox[{{7.5, 12.500000000003638`}, {13.500000000003638`, 
+         9.000000000003638}}], 
+        PolygonBox[{{11.01826734053906, 10.447677384685548`}, {
+         9.780184249251306, 10.706811054955079`}, {10.183281069670574`, 
+         11.397834175673825`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10.323799910437668, 10.015942703607429}, \
+{1, 1}], 
+        {PointSize[0.04], PointBox[{4.5, 10.}], PointBox[{13.5, 16.}], 
+         PointBox[{16., 6.5}], PointBox[{7.5, 12.5}], PointBox[{13.5, 9.}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T5", " ", "P2", " ", "N10"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbf/cgdheh/fihjgigjij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbf/cgdheh/fihjgigjij.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {0, 44}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwt1As0lekaB/DXuDZGKjTOFLnsQ27RkKOi79MuNuM2KoRmqShEzDkOKp12
+LQ3nRGl0IbLcRqYyo6HGbaKxNbvk0lRnq8SOQmVcdyWk83/OOd9ae+31W8/7
+vt/z/L9vb+Mdcf4RHzHG0vCh7/9dGjyb/YDLmGdhz6v2K9R4Vtl5Vc/QhGf8
+7ukPs6o8S72mkesGy0Mb3hjD1cVR15Jh1lJWEK2CdZm5jlWwOH1Q0q3MM6mN
+xzEFrTcfS0uBJSquvWtMedb0VaW1Fxx0M8oiFTbyU1UnO/mOurbDYev8E/fD
+Q/HFU4sFsMuuN/dgL6UrVqFwofcH4SbcT8NS+iSPvCsuexxeKqj3vA+LT1nJ
+ytCf6JOud8p/xv653TrRmEdaYd1mQV4bWr9SHfdlBlobycLdugo4I/Be3BbY
+6ButvAvIozDIZWkI3NRSEyGch/kHE8sDYHG/0+FGOPRClY4HrX++Uaj3Mc8c
+3Abq7am+49IJDk4YzvLVJ+v7aa2Fy/u/bJhCf/zdSZEavCDk6WcymKWulRTh
+vPBq39yrVL8RN6YNd7+ICD9DHjXV24J+En5YdPIA2brNNAn9Die1q+2med30
+9h/EfHzjv/cEw0abok7HY359iZZuIOVzubtuK/LZfMtuchvVAyfOrEeeclvF
+t3G0X9v+ocNHqG+P0cqgvM2KO1Yr8UxF9l6ziva/EKgFM/SZ3Hu7H24KPfF4
+9QeOKWY/Njag+YQKw4VzHFs6KsrYBvNOrefWv+fYgk8f8yVUD74bfW+WY37p
+Js7D5AnjNgncFXtoq6MZHOijp4v13YUnIw+RNxhJ62C72xPCFrLdQM8POH9q
+4uCgqjnVj9v24/5eFi5HOZhXvjRdgv78lAQ58bD8L651EehfVHF/8iy5xWWr
+DeYL//xOZzVc+H2UwTicXJZ0/6Y5Pb/8hAvIg3X16LbDTaOLg9yRV+Tx65+2
+0v7EFRelsKJ3Sdt1qkdk/EuAfDVm0o9epH4OpZ/fQr+HYPGzE9TP4WZhEBzT
+s7Pjv/1sut5oCYdpdG71pfr5Ifc2nCcP1K60gVnOHpX1cIp5JptP530mncpA
+PzEjKyMmML98wPZRFfrNacxu64Z5fc/7v2A+tuvJy3Y4rFe6rgrzD7c7G96m
+vI6VZ65BPjW+J6I7yIKcZZrI83KjPKqX9o/sK3g1jefzs6X7NNx0aEXnyBTH
+lpucblhG86XvX2T2lmORRzwXU7/scV1Z4WuO6Rb9ujqN7CnW2aPgWI6K0xXK
+j42Li49Pwkvu1mkux/7tZmwhbJ3RG7wZFpuXMMUEx5ynkuILyCaKjFWoz1pk
+tA7CzD27pgNe8LZIuMIC+7+cnqvB+UY9a9rjYLFTYtkz3D+1UvnURbJQtEGI
+/jZsH1N+AvO9P4c2o3/n+oP9qpbYr3dG3x/zbUiMDxGQvR5odM/g/SvMZE4w
+b+I25o08FAYTMh5mSl8cO433S/+v3QEcLJZEeRfT+23zapsDXLj2GzV75Juf
+omRnDMtvurRGwwmedhHqdH7F/KwEOEti9WgI/RhdL/b2gZ0vTOX/Rv3t8+kZ
+xXnOl3Nl35FDPMoGcL8EwbnaozTPrZXx6ehnrPir7VHkOScrOfrNmWd+05/M
+ef828w752JeVCMnhiaWvML/IWDnShc7b2T90A/mIyuYErlQ/f0xyEnkqJmWp
+vlRfo3Zx7zjuX76zORJmRZvnyUY4FhRw/lIGrZf5DNm/4hhTacuto/qeJVY6
+QxxrSLI8Mk52C//1+HOOOSXVzthSXimqorp+jpULRnwSyHOp9sV96M/7cFoD
+5XctP+gLOGZTfbqaFerKf7r6E1wt3WHqR+7QzWrDfvGNaOuzsLjP58U/cX6Q
+8O/ZD6m+Q8ehY5BjoUp8sp41rGYacOglxyRKBus8yI6cPOkPPE/zivy/kfse
+1HqMceyUjW1FNswHLyp5gHnH7B9OlpPTNgZ7IY8s3e7wKlqvPR2Vh/druPH/
+XhUzdQX5lfb1SL6HxdaxiYffYL1/a+1ZsnqK4xzc5fiy4x90Hv/6+TLkr3Hr
+90dhcJNffP9T1K0dk/o4qmve2SuEu/UXzjckV7+tdMf5yz+5lfke8/Gi5Xmv
+0U+nplKq3Ir+b9oKAvH7UFlpMyqlPM45uB7APIofjU7XkCW7DJ8Oc0w+991Y
+JeVTZP/Ht3g+NaHGJlVUj1+l//kzjj37+kl/I9UTZ3VbeznWJD1wREaOLaot
+kyFvuezhO3Kn6NS6To5VRh4MMKP513dMlDbjeRYUz4SQw+bphf2E+e9ExuaS
+jdRfaKVxzCFmaq6b7LfPcFFeIxN7DjQLbGCN5OyW0kYmemRdupfcZRGrXdiI
+//+XX9eQ6cr6hanQ9wr+PwSlKl4=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.5944997717265688, 13.169947406655712}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJwt1Q001WccB/AnoXtauM1NuMrl1qgktVhW/P9JEV0RRTi6Mb3S9DqsuKVJ
+7Za7jVBebmrFUZFsySHXKLJR3bFipRuSMK6XoYR9n23/c+6553N+z/P8Xv7P
+OX+z4C83hWoQQkLxo/9EPYlnGkv+fcxZwp5XKfU4LCk9OKTxsxlLuOeScnoR
+r9IQduyFxQVdxRdh+Rl9/jyYvWERZAgfLW9+pxKwRLB5kfYubZbMuxZ47QrM
+iqpnyLRYoqhRjEfANtteS1I0WRL4xjjShdpH82n8VJZYvrIwXwAXbN8m3amB
+/2NPpAaw4mDpvTVTWDJjx0i1Hqwm/mXzCUt8vqnYzoPlxyVLlkwwJMEybq+Q
+rr8hD1r7gSFW70fjVsKquRflme8Z8thsf4c/LD6RdMP1HdbX2sXE0vqi7z0Q
+jWJ92t7xq/S8ffVri0YY4kl8hutpPz0i3xh4xSUyPETPc1O05sINXJssA/RP
+HmVfssH+Io5T1VJYZef+BQfnO+82jXWm8cRbx4XIX9TKXSeCBb0B4fvHGBLW
+kPXBDZbPIeEvUW/7pprJVTTupb9jK/rxyxy2EsKSR5EltZMMWe4T1zaO/I87
+wpIT0b/JQAah9ckHIpvNMB+1h7IxifZ/WFj4A9z5UGbsA0cUL9Jugdvv+Dbp
+0PonBQfG4BpBWmGCKeImF2M64eL5h6cPzYVrNlRfhmXJH2cHwzJr0XRruj4r
+3aFpDvKEq03PIL/rHOf1gbA4ZOadKNTHrruZ02eC/K/qr6eNM2SX2FF6HpYr
+az1Ool9uj56HN6wa4/M2YD4FAeZ+FjAbeHRAE/MkDkqePo3rmsdVDjEkco9b
+1yy6f8EFQfoAQ2Tmpqut6fkZftOy1Xg/JrXJW6mthFp1fzHEku+SlET9kTJQ
+3cUQzvJLq/6EJVNt86s6GdLZ16K7APWSod4JvzcMEXy3Z1UULKk10C/qwPrW
+p88f0HjtM6sGWGBRJdRB/5J7Wcb5WM/VPp7sAiuaBq8te8sQRa7rigPUd5xD
+13YzJPX0y/LT1JHc8mrUIzt6/9a3MEm2v+6Gegvcd0uOwGJtoaiyH/fv9PL0
+9dQuzcvsBxkiySuK0qJ2/r07Bf0LcjOkeahH4KPU/O1vhhjGP//MkVr4dUvl
+MENG+btuK9CfWKrcF4H5yUd6O+3o/BaHdtyH/cJeu/7IR/6rY0tLYcsXtWlc
+WLzDzXsj3PmqtPKYMdbr1EtjcZ64IeVCvxHOv9sf5IV83J1DORGwJDlzSx3q
+Sy10nZgwxHkuPvmTqJ9VemrIqd9eSevrQ3773I1bYPaBzbxEzCOhxzZFSOPN
+I/ZamJ+kV3aWQ+0gfRHdinreu7dpUgtFVsueM6R4t7/rbOriaH/dBoZEnDwW
+7UDdoTt++SHO8+UFHaKOCJR1lzAkR9dRUEydOt/2ShbmG/lUrIl6iefcosak
+csJdGh/sQ61urNuQU05SCyocL1O3Jx6oyS0nbHcmv4da5Wz9UybM525faExd
+XjN0Cu8vwbN7K3WrU1VIIe6jn/eKr6jPTtn88BfMY/Wac7HU1YR3tw7znBlu
+tB+WHPm1vRD113BExJ3Go45onG9Gf4ZtYTo0vn7qIyMV7nv6mzN3kZ/d8r1d
+JubxuGUw2ovO+6Zv5e125PuwcOUz9Cfh51Z8jvtoeTM43gtWuLZdMMI8Of2f
+5lXMxn7j8F4HWBVSFLgYVqRLAzKwXjHREpNmAJ8KHrR9jXkdalVPh8mJTzx0
+2xjyrDHbN34W9ktLnGxRj8K8pEsPlkSFnDrRhPvHWK7L49H8SU8yn6Af73yn
+AB5932VlHPQ/Gib7w4z3/3cjtey/74g++w/yhW0e
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {0.30479999999999996, 7.7452}, {1, -1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{19.999999999998543`, 17.}, {14.999999999997012`, 17.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.5, 17.6952}, {0, -1}], 
+        LineBox[CompressedData["
+1:eJwd2Hk8VPv/B/CxJCqSGzeUkAoNKWuWa8oSskzIlsrWj0q2XI31zi1JlkxJ
+TdahCKFJKVGyJURGhEIpQuWiRVlavq/P74/yePqc897Omc85Q8Er0P4gP4VC
+4efDP/ykKJH/5GgUcfJzNY0SOla+xB0eYnTxh8Gxni0urTDvM9N5EFZKWmNj
+sZZGoaW2a29dQ6Mwfy8ueAYzK+MuBcNede0dW+VpFI8Aa5fL8H5mVnIMzLGQ
+si6E01NDD7aS9TundmXDIdOmm1cqYF0xVjsKzrud2edK3CU7agJbzR+NuAwH
+PfmoOIv8fcOiRzth3k7BmExY/AbblaJIo2h47tfQhq3kBS3Ww+JJ4f81ydIo
+EWnWRcYwpe7TTSd48k/7fXZk/YVkynsZGsVCTvm2I8yTzf87Fn56svUwncSr
+G+ajwqwktysmMG1u464RaRqlqVj7xWbYI2Sgkguf0PbulIJrx6tfpcLLLv04
+PY/65J0eeKbAyooOsoMwXax99Aps5VtWUQvTFISXdZLz85LCrsHMJXX+ksgn
+vtTRPZX0G7KOGwDH7TiwOY70azGY+wLOnqcF/kvim7U62KOf1Q0CJmSdZkjb
+2Q273Fh6NA1mnbPKdMM8hEOkTW7A4ldHTIdgukZDcRc8JCit74H5iofEy/Cj
+fo5xL/c5fFY+LGcbHDTiaG2I674/Yu0Yg3jL+C4WfMfopE0NzNSMKH8KD0xb
+TS5eh3qYnw7OwG+7yyodYLroLjMB3Bf3NdVO5cDMIobWLNZvR2pQ38NB1Pg1
+z+HCZxWZ6ko0yrTm4rEM2J636PNR2IMp7GEH902ln86Ha6WzFL+gvtAEnyXd
+cFDn96OJcIHIzbhZYpeWudVws4VaiMR65N9X3FiCfv32sW4qwCzRrNfGsE9M
+5eUNMO1Zu14/5jV9RW2CrA+9q/c9CbNa1DtWwrV6stGG8IfwrDoKOZ7V2ysC
+779snjiGfPInJvkmcT26w9VUn8AU85y0DzAjLetBKcwJyKBScPzhnFeB5+Ah
+y0pXdTjpY+gBBulv5eHSYzB3fiDeB2ZOvGhshy8uXL/pTOLJzHptQ73Z8dN7
+HGD6oZPny+EIz0tsF1jDhNOhhX6X2TF0/Uj8CivdamKRMydPkHmsuFlFw/z+
+Ohy/7xqZL2uvYy2caWam20Py//vZUBvX5+zdY9Ji6I+jxViTASd1dpXawNPV
+o4aT8NDvv2xSyfrrwi5JfG6/+gmvGCTzCWQUKMOsv+dGlTegfrHRpZthuc2r
+roXChatTF8i6l6W9ag0cz5CaloL7dsl5CmxE/qaxhi+I39qkdGgHLG/UEVEA
+zz8SzQ2HubrDBZbE7nn3rsHiqyKT36D+brezDU/gWkvPDyGwafOWbe/gIWuJ
+Gn642UpW8CuJ56UqfRHzkNn0OXqWxItRHdsC+3Gb/L8QzzVUvcQ80x9PzZPz
+6UatWRfggPNPijtJPoeGUS9YPm3YvJKs/+yWtIA5y2Q7Mkj+0pgqM7hmtsQ7
+hvSzRcvbHWY69ah7wUzqqUuJsOCMlK0lqe+B2GAnnFDyvVobnnYSeExFPY1u
+xgYqMK8ifznZL/klg03XwxrB16sk0M+G1U7fVEk9AnLGabCPvs4SA5gSw39X
+FvOJSNdv20Pqc+mSyIU5/rtWRcIWtc4bxTFvqYwze4vhyonTDlawDn1P+luY
+ddb/XRRcsyEvQlEZ9/fbfYIFcH0s1d4PrvXjN2iEaVXzuuWwR86VuB44oip4
+1S9YubHdcwCOWqP6xFIF83zV2vKcXN/8HJVUmObx8K8G2DSlbX0fzFT2rcmH
+1TvrX0upYq7mxffIc4Gq4XHPBmYvPb6IDt9fZOsbCU8/ZT6Whds00n9lw+Lc
+vQ+b0Z8g0+3XXXiIa5LtAn9LnXFsgikVPQYTmI8630uPVph+p5MZD1PCMyca
+ST63+fktsPXv/A3kfO4B09IJzNuwquVCHszyL35HPj8lz0wFz5B8X0Jl8uCB
+w7wwf7LeuZfHge09k0TtSP7t5xMq4SElzuetMC/F59E4PO8btUMGrpXgLGxG
+vtiQkhkhUl9O0p1Esv9R5NvmMQ/x8o5rZD8cNX+s/53M65RKWwj6kTq6w/0n
+PKSfkzZD9s9cs3ei5Pyi66J/YR5iwtQ1KjCNxy5gwtavFvfbkvp8YlbWwrEi
+dqdjYGWB5O9zcGi5hCLpd5ZPU5WKfb+qiWnznawLl/Y6wnp8292NNsFJZikh
+cGiQlPdpmP2I4RAL/1pYatMF09r3XT0DD2Q4f5Kj4vp4jcWegN+Oiar6wazl
+jyICSXyZux9KYO7wu/jd8MuZ3j0fYcbZHiVVOEAsiaeghvvp6uGNC6hvJNL7
+DzuYd9T+XhNcVfdMNwRmBB4yTIGtZq7VJcAau0u2OhMvUrzKhpl+g+sUyDy+
+hu7IhDlTLxa9xrxi31QcuQjTDcOVz8CNc6728XBQM/u6KRzVkPvPMZjmcql7
+Jawj8HeDK8yt71r+gzzPbrooGJHjq3R6F2D3N+bVa0m83dw8cnx6unm1ADwk
+YD1sRu6/oTJD0h9zUkzkLFyZLKDTB4uf8Ur9AJeHO/q0kf7rb0hSUa9F2Xe9
+FjjePcT7EPn8VOxv7YCVebHvi+GCjILmIdjF9s+tk7C9zN6wHzBeWG5rYH7u
+tvfyFZG/9n7aJzLvTImUKntYbyY6oQimXrjCTSTrD4T29cMTUwc3tKmRfdeN
+LYDnthsn+IiEOuIZBfDk4QIJ+nl3mB72bdlWWCf1fmwhPO1/qUsH/mGdJv0V
+bk6eoJL3nvqg85uMNuP+eKt2VRbWi+y+8S8sns/Y/hP5xm3cnzyEGW++xTyH
+/Z0SR2eIDVy2FcD7fKf2r9DAPkw1zgyGc9Qz7irClReDlurDid7JderE7AoR
+fniqrpOhDWvcOS7XhnkMCvms0IWF66jV6WT/ml42ownTe4oUgmAZ5SUPqfC4
+7hFrW/jXozJtEr9WrfWFDvl8BBrvkCTxLRbmVeEk5oExIVg+47TvJlg4fsx/
+GvWyjjTu0YPTjbvju2HlYDZjN2w7ddfwPsz7mc8fRuKrLYougvX6Ksuuwv5G
+wwLZcPyOte398LJGIeMMcvwirz3S6KfGqJSWBwsH5S64wVbrXW/fgsff3bHI
+hguZj3o74NrkNbeHYDmtvYxvMHPwXM1azHvnudyIP1AvzZy+zBU+1/ZbUQPm
+KLyOToDj3l85QYcLTQ6Yl8PC9S8eHiP9JjB+PYVrVjx9y4bFvWVvvYYHJ6pf
+18DNAlFTw3DxxMfcEXjowKu6ftjIacWfIlvQvx2l+jHsWpCsvwmm/6E8Xgi3
+8CvJW8Hi1ZLNTHj5kpKfPrDerV0Gu+H/JPZrRsJ9zx2CVsOSdzztk2BOBK9t
+BP2197gqsGF2uVV3CZwaV5OdDVtcaBI9DkfpTlA4MNde870ZLFM/disTdtn5
+NF8W/vh80jGNnC8Wpz+PeRfFCJQkwKz6PduH4dzzd65Ewxrrg0d74QHD08aB
+8PiRz/19MINreM4D9hBOtB+FuS1FpfYk/8bY77/h6gR6rjk5/+W6WSXkE7nn
+ftCI9GvqsITsnz7Oh57rkvUZ1YhEuCs0qkCHxNfsNWiBE2TYB/RhebtVfEvR
+/7pz6o4mpH7l6N225Hr43ebshguPuV5lwdXHQ1UOkvrH/y+yAz5gUZ5B6h9P
+nIsSxntzvsry4HSYcvVW0jbY2VJspgquzKl44wF7vo22fgUL53pIR8PlrOMx
+AlsR323ULBmWkrwcowJXLhedZcHt30X07GDeTK1J/Dry/viSfQyeHtnx8Bi8
+e832rDSY/vFHlCMsWmbpdpusFxpRqHCzVtjiDpg9T1f7gXrDhxaE3sEuhlna
+5H7x0zOcmIE1LC8yU2DHB9uYfJr4fRbjvDOc2t/XsBget+j5pAB7X3s+JQzz
+KpeKfsL8tn0NCFkE021vyT8m8/V6/eEn4sVrKsmT/WSnULfiF5jj9IWTAvfY
+rBcahYM6bFrJ88t8rcrlXtgjst+CfE+SrBKYbIYpfEU7L5D9NM5XuhoWz/AO
+KIM3j2zbeIP0s2VuhHxPOqV5YXkBcWmYO9k/hc5eKOGQfnwfrzaAb2gdupkD
+M+wfSYXDgi++5l0h9RkMzFXBNuquz0q2kue1u/Uvsp+a5rqSfJVf/jlFw/y2
+j5TJkPlZiIoo/wMn2YXVjpH6AwIH7sLRuZH1guh/1bPIM+PwD4Wjh9eTeag6
+H16O9/hV93L6LWBKs6LCJti9QW51AMywdHqkD6tPT8ldIOdTrf8zgl0V13bc
+g4Pi2eVa5HvDCjnZV2Td5gd3LbyE/B1AC/fP//9xgPY/mqO4+g==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.0723744310654, 6.280370328210516}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwl1gk4VekfB/BDhmsrdBMSyhITum0yBp1QabNniRCKtJAwikSZukq6leWq
+JqbuY4ksIes/opFUY4non61Edjf7UJrv+//f5/Hc5/Occ97f8v7ec63y8LM5
+LEhR1CP8kW/q2w98dOj/f6vSFMe9VsZSl6ZUNraqDsHa+c3eSbBhDWvwBUzf
+XPHyAyw3pc5KhNte/nNs6TqaCvl9Y/QB8rztgKwxnGI2qsWEKXPO1gNw2229
+uprVeN70hrI3sXF4RBAcU7Cowgtm1EhxVWGJM8KTtnCgxi2v5lU05R8b4KAH
+MwuXLrsKp9fsWLcYputEo3fD7p58y07kY14VrbUMvvtjyXQG3LBQXDusgrzS
+Km4Hwmqj+tFNcKBsxvNtcFxQ8981sNrI4TYmbKZg/MtLOF3i0SAf/agMV89o
+gzcVFyW0wXZebpYTcPn8kg9v4NkU279kEU9T58FCI2wW7q1Dww1VF8/3wnI7
+c5yOw7OSphIMrD8p3jGdCIdcMWTrwyEWWiUVcEw3VyEIfu3Wyu6G+T8b7yyD
+2+lvmTOwttpBKQbqlYu2HRJEf9zj3yk5wu2HWLkUHNjuMJYGC12bkufjfjb7
+jcAkzG35KtoIt/+5P0qRhT5qUuo8WHj1X2IGcJtkS50vzEg+5G4Nx02cXLQG
+vvfrNO8QLGTM8/yAevV3VTn4wtp2JoNXYMPvZq7H4Fqv+FZ9+AL7wU+HYU2b
+WcFGZfQ/NWHBAVZpe7zXAJZ4Kmu3HWZ5si/kK9EUr8LsoC7xmZjqbXCtvUUm
+E56t5MgMrET/L0X1TyD/Yr0F5Sw4S7RvpgJmL45Wj4GHbehZDuxukt7ChkNC
+rBR84XTVHLcU2GdmXsWC1C9rza6HFfVEDLfCuWFmLdKIV6B/fZDMp7ti8ctD
+MN3Q3LcPdrx6jFUCM98cVTxO5lflop808u9+bJbBJesfyfroCTuezBpohDUH
+u9Y9hC3SdF6IIf8QX6G0TtjEufUgi9QTNhr1DRb0UZZzhPsH9ytS6NeVp776
+EXBKcsHNL7h+83LJfCpMpwR/yoPjRgLy6kh/xjN+uMHB3fpNA3B6KN94Evn5
+OF1nLlqP+Yx1sgmAnw5vDV8G+1ufXt6FemMux55SgYsNr+2nYcf/xBSqwuld
+PL+7ijiPjBVnlMnz1YqL51bg3Oz3s2LCs+Kvn7vBBq4mOmR92kqj9K0C5uUP
+SZsRxO/uXGvnDMucEt7WDFNtF8fm5NHHW+VpJTDnTSKvEN7g6meeTPKVfbXy
+Gjy3ee+nS2TeeqnISNh+/p18AMy9n3ziBqwgV+bhAReXrF1SCpdyWcOkX9zY
+cNMZ4q7vHHvYfCy+yRTxNZ6MvHIm+RiJFybB5i7783xguebQw+Pw53GB0TAW
+6RNXfyfqMSm68yqRzD9Pr+gGPNpvalBM8lNOnXoFZ6cPdbbDUszMHj657nlf
+XQj1s/u/cL7B5a8+22vDDQbLPYbhDeWvs21hVtyOTRWwnsBAYAgxb9PxILhq
+6OzSJFgzXPCrFCyY26VdQPZnxXmZeOT3cJVQdi1Z/6KPizBcaTXQ3gJz8384
++qLe1Jwgjw/Ekro7XsjRVM2MpOV74oesZ6qw3b0i+QY4t9noxKXleD9xGpIq
+4e6j7UlTspizjXnzmSTf0PSRYPj+6abcW7CKspDCEjhO28LlDMzZVXrn2TKc
+pz+elbvCIV6DVzmwRml53HY4Yk3RxTC49sm3m+vIvIjoxUXBCh8f/6pE5stN
+3DYVzjor1ixD5uc5Y74DpqcFrBeTeXNclqyBeFXz4bulYSm3vONnYe75PRMr
+YPOpW3NN8IE5b1ldUp+TcbIW6unseSe/E7ZiT9b9BltUlwkfgRn3XdyL4Gwr
+94RoUv9mOZEe+Kmov2kuqWfv/Olp2Lws0rWN1N8q9WAU1n37Xo3agPW5zlQd
+fFd/Q5s6cfXac2w44NyOdzthuTX9nLXwuGlfthfMTtmq/gT58dieW0Jhd++/
+T2rDDYr2t6/AlNWegluot0+ty+MmnBJvJDLOxHuebr5A3Ob64+s+2GQ03PYq
+8eNDytlL8Tsh0sc5B1vZ3qXkYb76R0tfWCVgd3CcDE35aoaN2cAMf/FIdZhz
+2l/4F7K+yMz3emnE88vep0TyUQ4MSIANnOSjhWCfkPWDZ+Du8hy/EdTvniQ2
+QFye4RH3X5jPSTgVB0fQzVZvYMd4EZUa+Ozvivk1cEo530EM8XT9r/i9IPtp
+yb7gDGt4rWqtJ/s/q3QgH862t33bRfanrtFYHPl3mqz/Mk3225PiuMAbegX0
+mKTe1Pqf/oS9+npj9eDZfZTwW5h9ejjMheSrlTw2AgfbVRyIIv1sv+40Cpcy
+Onyy4IbVPLoJfty5qbcJTn9ZvzoJzmL1rZ4m/SthCJvBTf98TGFuhKOCfFuQ
+36UhQyUd2KePp2kNx1goZxrD+vwEo3LUq5F+otAcZuTYX1aE3UfCpfbAnKH8
+oBApmgqf+G1mO9ytdvvIoyWYT0NtMQO48rNAYuhi5Hkw20wTpnJkeN6SNPVu
+peC4NByh0LgqTAL7v513exb50dz5yGfiOO+7msc6iEMY943guZaigmqy30fn
+QifEcP5Ur6VmwhyW3sInWOiOzuFEcl0sWEIU94+OrTzIJs/nv85wg3Pf2xac
+J/0pi9jVCQs3FRiEk+c3nzM5i/hNYspupJ+cNBO3Nchv+hxHi8xjRFbVhTaY
+mio1SIMrJYOdIlBPXJlYYxWJ5+0gKYN6Dbe0N/UQ7zabiIR9Cu07GKhPqv6e
+Zg18T1LNgQXnSnbItcJ1bMYlx43k93i2Jwe2T9ySeh5OOWmdYgFTFj8L8sj+
+zMcGFiBe7MNC0eekf0ZMdi/yiUrX9O4k94/01PUj/+I8O+lxmC/5OfEF6otI
+iHFaIPFbgvWuoT9R1e2TgpvwPnWWNdkhSlP/+8B88v+rCP0vmGLqoA==
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.28233829669103, 4.3021661698002225}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwd1Q1Uk1UYB/D3oM6hk40Pa8R0I3FNAwRkOgXhTRZsKLCQD5EUNPBMhISD
+FB+KJAOmWE4OJAnogqBpM2d+AQ3BEALF45LpwbAUlUaQSk4UAbX/bee8u+e3
+3fu8z/Pc+57XdcuOyGQbiqI+wUVGikO+5tPU6Bt8XGjKV2aQ7phHU4LNByJv
+wT2Ltaf6eDTVZo3b1QGXi6pWfAAbqtgzrsOGooLBkxgFrZZgK8aopS+LF2DU
+UMdTvDFPnS8rbXiHpuiVQRklsIpxqnMl8Yna0KdwtbxO9sAZ6x3Ojqfhvrou
+s6QW1vBtW8bgy/b7L2bDhucOESrkyYvKtG6FCxqKuU58muLeKrm/HVa8lmQd
+g52aJsqK4LahqzkcAU3949w9/zSsfLyjWw6bRv7sHYYla9zyc4gZsZs8kY8u
+c+3vNTB38unLz+DE8BffnoMNrApdKyzyeSlqg6WmsO3TUB+9qGpDC8zszMhb
+BQ+1lDSfhN3c3/9iG+lH8/CmMrhP6NxRCHOGGA9TYae7HRv2waKS63GB8PRH
+dquzYaU61p1F7ldmkx9B4seEcPSo594edwEbpujlnwcS15tCGpFP+g+PPfrI
+vkXz5obB2scelXnww5C7GhPqo1JTjnnCXO+BfcHwqIcul/RTk5Kw7QwX/WkJ
+ze+FmVl1FA/WKqc/vwKbo59+VPQ25u88POsP2Dc2NPbZW/ChirO2iFfulN+d
+BnP454wRMKtr+fDYXOSV1tith6Oawtdp4HRzSN485DveWXUtEKZDSjU1sHKJ
+mzcDNlmSWE6oN/EXhuKhE+qO+fdmPNy4hvfoNly5cE5UHayyOX9xEPby82+y
+wD2v43bPwPpKTmq80JWm/PeaX4lhZuzWGx/DibGZ0Zmw4KtIx32wLq+H0QQn
+JrPUx+F7A2yxDfLP3i51bYHdtd/0y+Ehx+ot7fB3R+UzS2GvGz5KI9zztz37
+Esy1JA3qXMn5EHdb4HH3K7z9sMy7v3kSplaZfttM4tdcDZyANR+W+/rAGv96
+3QCsPHa/6xXyv3eHF34aXt+QI/+VnL+i7MptMHN+n/oQ6UfGyMRsEu/gpCKB
+nJ9pzAdHSD2yPUFLyXkTTq9xJs5W/8yGp7xYngfQH0XDj8mP0N9niZHCF46I
+07Alphc251hSE+DRwbCVxKpaw8wrDtifKettMn90xeSAHyzIXbDVHvGiVIHl
+TfY01bVBv0oCK1sqloTAErcAlxRYMbCMPcRB3ecLRfUwK37eT0dhdfBiIdkf
+Sr/raCos8S8r8kD90o0xikgOeb5nFWfBKh/r0ggy/5U0ivTXqNij3wwXnKhf
+/AY283cLS/7/fyTd712sD/ATG8n6of7bn8JKxlTTFNx3ZP/uw7B/oZ2jFPlx
+Lyx8coZ42UXFl/B6s19YO1lfY0zrhbUZPWs6YF+7ArU96jWl65c3w/oupksQ
+bNjItdbCxuqDnkkwXV01UgCvpU3qDNjL2GobA1cnD5uUsMgroMoN3lnke0IG
+NyadlDxB/sqxa+0ceH3/ze8bYVoQcOcS6afYxlhI6n39vHEjsfyseB2czndx
+sJB64r3qFsGj2rRM0o8+YXCQLaw1VL9Xy8b57KkfsZL+hruGZtnBYX9Zh2FZ
+cIN/8Bycs2wP4ROYvpzL4LNQj0V0nsJ6aiIu2nY2fl/XGsCHu6TtdnazsI9f
+l3fKifWrh31tEeeC+9V8cr8xsbOKiecm1zOS7A+XvB/gcfJ+cKX/A1GYJ70=
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.225285377617156, 7.188392099638602}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwl1QdUU1ccBvAHIo5qIIiUImCQsFQkzGLV8CpTBKTWSRFTZZWhyWkUtCC0
+IsMqBhRKiZYhRQqKESUgRUTZGGhEiwzFNAeRikakDFuw9Ls25+S888t9793/
+/e6Iyb6DW0PUKYpKxpdc//+soKmF5LqKpngHL19kwTsSJ3+/tZKmShauFzvB
++c/KGg7DIkFvGw0/7j7fuRrW3vMknQu7eVcYKK1oKqciUmYDn3tX8SAHztcv
+H9aFa3K+1PscFhnmtalMaMpryLlPB367OfNeHey/4NrjXkv8bvqkIhlWjxhO
+/wWmtJx/9IJrOwSax+H6PvEjTfhAx/M3obBiJOlVA4umijTrMrbD+hoFod/B
+rDRxpR/co5q57QavWBVQ9xlpvyLzXQxHfZlVtAeW5zS61y6nqTHH43MEMF9c
+NiGADzQXWZyER11St3Bhzs7rrEvk/ur2+aZw0tzF3U3ERz/qZsHHxtsMB2Ge
+sXL/xzA7JqNzltQX17Y7BDb4k6vQw3jlyu7wEjhXFRZjAUs2NO1/B3ML/3hn
+A1NWGzgc1HfeLcaOmP+wgB8Kr49d4cSGSxKXqOfBtbK1WQzy/LTVF49gg1oH
+HxX6s4yTjS9CPh7XuloayPhNHwZvgE/aXFScgSW98TGhMO+pUdfnMO2e50Hy
+jppXYs2EwzeW+orhfZNa7W0WmL/msiNF8E+bV0sS4LepFxwK4KOekXMd4VSt
+s5EZsNLWYWLEHPOv9u2ZQ7A0ZEFuMVx9OlvkB9/9NPB5KMyf2P3QCM5WzZxb
+A88/M2r+DPXnv/l30awZ8oqxLimGNVPvB/bCOdI1lcFkPscsV9bBsR3C30xg
+1SHry1dgSjSpcYfk1/bxL5dgjtr9DA9YKrQ7UgbXrxsY7DFGLvLkRdWwRDas
+FwdXb/KZugfLpVPp9rBOv2viM5guPTygBtdcVLuujvokOZbFw0ao2+mE0ARO
+FKidIF4hCfvRhYwnQ8wk929dIp0JIO1Npwc4MC8kJVsAj24Sph2CS5W8jG9h
+7ZOMh/dglmPKnjS43vWrZhvUq7dPcCcFZgVf6TkP+7hLhr4h7ZJo5jyMV7f4
+7r4QYg7XywX+rjl2nRsc7q/7vRAOHq8e0ifPn935dRG80O2S+yDJz+tRlwxe
+bb1fTPKhuhvbR2CZX21CMMmr4Kuns3AOJ6LTEG5tbZ03H/PD+TXmbBcb8/1b
+SvUceLhSMpECixzK/hzD/W63x5e7wD38F3rdsHw4aOU/pti/Uz98Ug4zpu00
+foXzh7c2xMF23kf2Hoepta+TXOFuLitvGzwqsP9ZAy5cwGu1gf29Dyw8QeYz
+/Z+YpaTds8B/FnnduNnaPxemjznYx8NjjF4JBddb+hTOgfmv7TxIOz9hwv4H
+zE+Fs0mSDpzY9/tf62BDRtWUOWmPPuU8YYj+bJYqaVixPSWxCW5s7fQOgrW5
+dTvL4eKBMt140j87zFMCD95QLRGT+rr85e0w/7qtmRRmCYz5M/C4xStXGanP
+1fraRvRXr6jK6yfjZce75cJKzf1XlaTd9Hv2LGywzPJTxfvxXr0dRdbjLW7K
+A+KDLpYDMOPKdlYtzDGO8/JDHv6ZWctySZ7ZbP1qOMBkzttouKesLvwD5JdZ
+55HnbErmsYNpDwft0g6cxrnrnPrK5jOyvyLiZFVwjmagP9lPh30X3D8IhzPM
+hJHwkKc81gzWf3vRgJw3B2RdI32Yd7q502Mb7FdMb8uEq+V6CU5kvciKW3zh
+nsqnLeQ89c+a4mjBkjenbatQXwVz2/oe0m9DQK4rPPQo0r0U5oV5mzRhfDJj
+603J5Dm2hYiGM7UD+6Ng7cCXozXIJ3PkGCsI5ruU71oLcx8EyXbDot2LK+qR
+d6xstdleci58FJG2HdYQWn0QTd6n+vvx9DKsw8PHNMj/gFwsHZPC3FKZz3lY
+Uax0TIN1Gtuf3yTvf3naSAh78zhSUq8i39woFv7EkHlqkrzf9mbeOVi0t9aT
+ifEl6jAZrTBvue2wOczSPPpUC/077Vpb6EjaEwQ3wuFmqy1/rSPnrJ3N0U64
+szLpmjPJpyI9az3GY+zX8uEq8r/nmb2kHE6tnenQMSH7U/zECHm8UP/55Wv0
+LxErVckkn6V903dJPjVxaYNwfnvVq1Mw5esabod8RYWhulvgUY/ukSg4QsNO
+l6wLRUkbnQGPS2KLyL4aPR4dfwHXqI2MO6PkHLo5WSmCLzNd5V/AnMf2mpFw
+Y1cz+x7qUvwRJrIm73+3aZCsa1bNDkEf7tOnW/qbyT54oVYqhJPshTsD4Pcf
+eBG5GtL/AZvf91E=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {6.662419809687106, 10.755933890072207}, \
+{1, 0}], LineBox[{{15., 17.00000000000231}, {15., 9.999999999998607}}], 
+        PolygonBox[{{15., 14.1}, {14.6, 12.9}, {15.4, 12.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.9452, 13.5}, {-1, 0}], 
+        LineBox[{{15.000000000007276`, 17.000000000003638`}, {
+         9.000000000005457, 13.5}}], 
+        PolygonBox[{{11.48173265946094, 14.947677384685548`}, {
+         12.316718930329426`, 15.897834175673825`}, {12.719815750748694`, 
+         15.206811054955079`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.823799910437668, 15.984057296392571}, \
+{1, -1}], 
+        LineBox[{{15., 9.999999999996362}, {9.000000000001819, 
+         13.499999999996362`}}], 
+        PolygonBox[{{12.51826734053906, 11.447677384685548`}, {
+         11.683281069670574`, 12.397834175673825`}, {11.280184249251306`, 
+         11.706811054955079`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.823799910437668, 11.015942703607429}, \
+{1, 1}], 
+        {PointSize[0.04], PointBox[{3., 9.}], PointBox[{15., 17.}], 
+         PointBox[{7.5, 7.}], PointBox[{15., 10.}], PointBox[{9., 13.5}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T6", " ", "P1", " ", "N11"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbf/cgdhei/fhhjgigjij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbf/cgdhei/fhhjgigjij.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {22, 44}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwt1As0lekaB/DXuDZGKjTOFLnsQ27RkKOi79MuNuM2KoRmqShEzDkOKp12
+LQ3nRGl0IbLcRqYyo6HGbaKxNbvk0lRnq8SOQmVcdyWk83/OOd9ae+31W8/7
+vt/z/L9vb+Mdcf4RHzHG0vCh7/9dGjyb/YDLmGdhz6v2K9R4Vtl5Vc/QhGf8
+7ukPs6o8S72mkesGy0Mb3hjD1cVR15Jh1lJWEK2CdZm5jlWwOH1Q0q3MM6mN
+xzEFrTcfS0uBJSquvWtMedb0VaW1Fxx0M8oiFTbyU1UnO/mOurbDYev8E/fD
+Q/HFU4sFsMuuN/dgL6UrVqFwofcH4SbcT8NS+iSPvCsuexxeKqj3vA+LT1nJ
+ytCf6JOud8p/xv653TrRmEdaYd1mQV4bWr9SHfdlBlobycLdugo4I/Be3BbY
+6ButvAvIozDIZWkI3NRSEyGch/kHE8sDYHG/0+FGOPRClY4HrX++Uaj3Mc8c
+3Abq7am+49IJDk4YzvLVJ+v7aa2Fy/u/bJhCf/zdSZEavCDk6WcymKWulRTh
+vPBq39yrVL8RN6YNd7+ICD9DHjXV24J+En5YdPIA2brNNAn9Die1q+2med30
+9h/EfHzjv/cEw0abok7HY359iZZuIOVzubtuK/LZfMtuchvVAyfOrEeeclvF
+t3G0X9v+ocNHqG+P0cqgvM2KO1Yr8UxF9l6ziva/EKgFM/SZ3Hu7H24KPfF4
+9QeOKWY/Njag+YQKw4VzHFs6KsrYBvNOrefWv+fYgk8f8yVUD74bfW+WY37p
+Js7D5AnjNgncFXtoq6MZHOijp4v13YUnIw+RNxhJ62C72xPCFrLdQM8POH9q
+4uCgqjnVj9v24/5eFi5HOZhXvjRdgv78lAQ58bD8L651EehfVHF/8iy5xWWr
+DeYL//xOZzVc+H2UwTicXJZ0/6Y5Pb/8hAvIg3X16LbDTaOLg9yRV+Tx65+2
+0v7EFRelsKJ3Sdt1qkdk/EuAfDVm0o9epH4OpZ/fQr+HYPGzE9TP4WZhEBzT
+s7Pjv/1sut5oCYdpdG71pfr5Ifc2nCcP1K60gVnOHpX1cIp5JptP530mncpA
+PzEjKyMmML98wPZRFfrNacxu64Z5fc/7v2A+tuvJy3Y4rFe6rgrzD7c7G96m
+vI6VZ65BPjW+J6I7yIKcZZrI83KjPKqX9o/sK3g1jefzs6X7NNx0aEXnyBTH
+lpucblhG86XvX2T2lmORRzwXU7/scV1Z4WuO6Rb9ujqN7CnW2aPgWI6K0xXK
+j42Li49Pwkvu1mkux/7tZmwhbJ3RG7wZFpuXMMUEx5ynkuILyCaKjFWoz1pk
+tA7CzD27pgNe8LZIuMIC+7+cnqvB+UY9a9rjYLFTYtkz3D+1UvnURbJQtEGI
+/jZsH1N+AvO9P4c2o3/n+oP9qpbYr3dG3x/zbUiMDxGQvR5odM/g/SvMZE4w
+b+I25o08FAYTMh5mSl8cO433S/+v3QEcLJZEeRfT+23zapsDXLj2GzV75Juf
+omRnDMtvurRGwwmedhHqdH7F/KwEOEti9WgI/RhdL/b2gZ0vTOX/Rv3t8+kZ
+xXnOl3Nl35FDPMoGcL8EwbnaozTPrZXx6ehnrPir7VHkOScrOfrNmWd+05/M
+ef828w752JeVCMnhiaWvML/IWDnShc7b2T90A/mIyuYErlQ/f0xyEnkqJmWp
+vlRfo3Zx7zjuX76zORJmRZvnyUY4FhRw/lIGrZf5DNm/4hhTacuto/qeJVY6
+QxxrSLI8Mk52C//1+HOOOSXVzthSXimqorp+jpULRnwSyHOp9sV96M/7cFoD
+5XctP+gLOGZTfbqaFerKf7r6E1wt3WHqR+7QzWrDfvGNaOuzsLjP58U/cX6Q
+8O/ZD6m+Q8ehY5BjoUp8sp41rGYacOglxyRKBus8yI6cPOkPPE/zivy/kfse
+1HqMceyUjW1FNswHLyp5gHnH7B9OlpPTNgZ7IY8s3e7wKlqvPR2Vh/druPH/
+XhUzdQX5lfb1SL6HxdaxiYffYL1/a+1ZsnqK4xzc5fiy4x90Hv/6+TLkr3Hr
+90dhcJNffP9T1K0dk/o4qmve2SuEu/UXzjckV7+tdMf5yz+5lfke8/Gi5Xmv
+0U+nplKq3Ir+b9oKAvH7UFlpMyqlPM45uB7APIofjU7XkCW7DJ8Oc0w+991Y
+JeVTZP/Ht3g+NaHGJlVUj1+l//kzjj37+kl/I9UTZ3VbeznWJD1wREaOLaot
+kyFvuezhO3Kn6NS6To5VRh4MMKP513dMlDbjeRYUz4SQw+bphf2E+e9ExuaS
+jdRfaKVxzCFmaq6b7LfPcFFeIxN7DjQLbGCN5OyW0kYmemRdupfcZRGrXdiI
+//+XX9eQ6cr6hanQ9wr+PwSlKl4=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           
+           9.996694214876033]& ], {2.5944997717265688, 13.169947406655712}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJwt1Q001WccB/AnoXtauM1NuMrl1qgktVhW/P9JEV0RRTi6Mb3S9DqsuKVJ
+7Za7jVBebmrFUZFsySHXKLJR3bFipRuSMK6XoYR9n23/c+6553N+z/P8Xv7P
+OX+z4C83hWoQQkLxo/9EPYlnGkv+fcxZwp5XKfU4LCk9OKTxsxlLuOeScnoR
+r9IQduyFxQVdxRdh+Rl9/jyYvWERZAgfLW9+pxKwRLB5kfYubZbMuxZ47QrM
+iqpnyLRYoqhRjEfANtteS1I0WRL4xjjShdpH82n8VJZYvrIwXwAXbN8m3amB
+/2NPpAaw4mDpvTVTWDJjx0i1Hqwm/mXzCUt8vqnYzoPlxyVLlkwwJMEybq+Q
+rr8hD1r7gSFW70fjVsKquRflme8Z8thsf4c/LD6RdMP1HdbX2sXE0vqi7z0Q
+jWJ92t7xq/S8ffVri0YY4kl8hutpPz0i3xh4xSUyPETPc1O05sINXJssA/RP
+HmVfssH+Io5T1VJYZef+BQfnO+82jXWm8cRbx4XIX9TKXSeCBb0B4fvHGBLW
+kPXBDZbPIeEvUW/7pprJVTTupb9jK/rxyxy2EsKSR5EltZMMWe4T1zaO/I87
+wpIT0b/JQAah9ckHIpvNMB+1h7IxifZ/WFj4A9z5UGbsA0cUL9Jugdvv+Dbp
+0PonBQfG4BpBWmGCKeImF2M64eL5h6cPzYVrNlRfhmXJH2cHwzJr0XRruj4r
+3aFpDvKEq03PIL/rHOf1gbA4ZOadKNTHrruZ02eC/K/qr6eNM2SX2FF6HpYr
+az1Ool9uj56HN6wa4/M2YD4FAeZ+FjAbeHRAE/MkDkqePo3rmsdVDjEkco9b
+1yy6f8EFQfoAQ2Tmpqut6fkZftOy1Xg/JrXJW6mthFp1fzHEku+SlET9kTJQ
+3cUQzvJLq/6EJVNt86s6GdLZ16K7APWSod4JvzcMEXy3Z1UULKk10C/qwPrW
+p88f0HjtM6sGWGBRJdRB/5J7Wcb5WM/VPp7sAiuaBq8te8sQRa7rigPUd5xD
+13YzJPX0y/LT1JHc8mrUIzt6/9a3MEm2v+6Gegvcd0uOwGJtoaiyH/fv9PL0
+9dQuzcvsBxkiySuK0qJ2/r07Bf0LcjOkeahH4KPU/O1vhhjGP//MkVr4dUvl
+MENG+btuK9CfWKrcF4H5yUd6O+3o/BaHdtyH/cJeu/7IR/6rY0tLYcsXtWlc
+WLzDzXsj3PmqtPKYMdbr1EtjcZ64IeVCvxHOv9sf5IV83J1DORGwJDlzSx3q
+Sy10nZgwxHkuPvmTqJ9VemrIqd9eSevrQ3773I1bYPaBzbxEzCOhxzZFSOPN
+I/ZamJ+kV3aWQ+0gfRHdinreu7dpUgtFVsueM6R4t7/rbOriaH/dBoZEnDwW
+7UDdoTt++SHO8+UFHaKOCJR1lzAkR9dRUEydOt/2ShbmG/lUrIl6iefcosak
+csJdGh/sQ61urNuQU05SCyocL1O3Jx6oyS0nbHcmv4da5Wz9UybM525faExd
+XjN0Cu8vwbN7K3WrU1VIIe6jn/eKr6jPTtn88BfMY/Wac7HU1YR3tw7znBlu
+tB+WHPm1vRD113BExJ3Go45onG9Gf4ZtYTo0vn7qIyMV7nv6mzN3kZ/d8r1d
+JubxuGUw2ovO+6Zv5e125PuwcOUz9Cfh51Z8jvtoeTM43gtWuLZdMMI8Of2f
+5lXMxn7j8F4HWBVSFLgYVqRLAzKwXjHREpNmAJ8KHrR9jXkdalVPh8mJTzx0
+2xjyrDHbN34W9ktLnGxRj8K8pEsPlkSFnDrRhPvHWK7L49H8SU8yn6Af73yn
+AB5932VlHPQ/Gib7w4z3/3cjtey/74g++w/yhW0e
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {0.30479999999999996, 7.7452}, {1, -1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{19.999999999998543`, 17.}, {14.999999999997012`, 17.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.5, 17.6952}, {0, -1}], 
+        LineBox[CompressedData["
+1:eJwd2Hk8VPv/B/CxJCqSGzeUkAoNKWuWa8oSskzIlsrWj0q2XI31zi1JlkxJ
+TdahCKFJKVGyJURGhEIpQuWiRVlavq/P74/yePqc897Omc85Q8Er0P4gP4VC
+4efDP/ykKJH/5GgUcfJzNY0SOla+xB0eYnTxh8Gxni0urTDvM9N5EFZKWmNj
+sZZGoaW2a29dQ6Mwfy8ueAYzK+MuBcNede0dW+VpFI8Aa5fL8H5mVnIMzLGQ
+si6E01NDD7aS9TundmXDIdOmm1cqYF0xVjsKzrud2edK3CU7agJbzR+NuAwH
+PfmoOIv8fcOiRzth3k7BmExY/AbblaJIo2h47tfQhq3kBS3Ww+JJ4f81ydIo
+EWnWRcYwpe7TTSd48k/7fXZk/YVkynsZGsVCTvm2I8yTzf87Fn56svUwncSr
+G+ajwqwktysmMG1u464RaRqlqVj7xWbYI2Sgkguf0PbulIJrx6tfpcLLLv04
+PY/65J0eeKbAyooOsoMwXax99Aps5VtWUQvTFISXdZLz85LCrsHMJXX+ksgn
+vtTRPZX0G7KOGwDH7TiwOY70azGY+wLOnqcF/kvim7U62KOf1Q0CJmSdZkjb
+2Q273Fh6NA1mnbPKdMM8hEOkTW7A4ldHTIdgukZDcRc8JCit74H5iofEy/Cj
+fo5xL/c5fFY+LGcbHDTiaG2I674/Yu0Yg3jL+C4WfMfopE0NzNSMKH8KD0xb
+TS5eh3qYnw7OwG+7yyodYLroLjMB3Bf3NdVO5cDMIobWLNZvR2pQ38NB1Pg1
+z+HCZxWZ6ko0yrTm4rEM2J636PNR2IMp7GEH902ln86Ha6WzFL+gvtAEnyXd
+cFDn96OJcIHIzbhZYpeWudVws4VaiMR65N9X3FiCfv32sW4qwCzRrNfGsE9M
+5eUNMO1Zu14/5jV9RW2CrA+9q/c9CbNa1DtWwrV6stGG8IfwrDoKOZ7V2ysC
+779snjiGfPInJvkmcT26w9VUn8AU85y0DzAjLetBKcwJyKBScPzhnFeB5+Ah
+y0pXdTjpY+gBBulv5eHSYzB3fiDeB2ZOvGhshy8uXL/pTOLJzHptQ73Z8dN7
+HGD6oZPny+EIz0tsF1jDhNOhhX6X2TF0/Uj8CivdamKRMydPkHmsuFlFw/z+
+Ohy/7xqZL2uvYy2caWam20Py//vZUBvX5+zdY9Ji6I+jxViTASd1dpXawNPV
+o4aT8NDvv2xSyfrrwi5JfG6/+gmvGCTzCWQUKMOsv+dGlTegfrHRpZthuc2r
+roXChatTF8i6l6W9ag0cz5CaloL7dsl5CmxE/qaxhi+I39qkdGgHLG/UEVEA
+zz8SzQ2HubrDBZbE7nn3rsHiqyKT36D+brezDU/gWkvPDyGwafOWbe/gIWuJ
+Gn642UpW8CuJ56UqfRHzkNn0OXqWxItRHdsC+3Gb/L8QzzVUvcQ80x9PzZPz
+6UatWRfggPNPijtJPoeGUS9YPm3YvJKs/+yWtIA5y2Q7Mkj+0pgqM7hmtsQ7
+hvSzRcvbHWY69ah7wUzqqUuJsOCMlK0lqe+B2GAnnFDyvVobnnYSeExFPY1u
+xgYqMK8ifznZL/klg03XwxrB16sk0M+G1U7fVEk9AnLGabCPvs4SA5gSw39X
+FvOJSNdv20Pqc+mSyIU5/rtWRcIWtc4bxTFvqYwze4vhyonTDlawDn1P+luY
+ddb/XRRcsyEvQlEZ9/fbfYIFcH0s1d4PrvXjN2iEaVXzuuWwR86VuB44oip4
+1S9YubHdcwCOWqP6xFIF83zV2vKcXN/8HJVUmObx8K8G2DSlbX0fzFT2rcmH
+1TvrX0upYq7mxffIc4Gq4XHPBmYvPb6IDt9fZOsbCU8/ZT6Whds00n9lw+Lc
+vQ+b0Z8g0+3XXXiIa5LtAn9LnXFsgikVPQYTmI8630uPVph+p5MZD1PCMyca
+ST63+fktsPXv/A3kfO4B09IJzNuwquVCHszyL35HPj8lz0wFz5B8X0Jl8uCB
+w7wwf7LeuZfHge09k0TtSP7t5xMq4SElzuetMC/F59E4PO8btUMGrpXgLGxG
+vtiQkhkhUl9O0p1Esv9R5NvmMQ/x8o5rZD8cNX+s/53M65RKWwj6kTq6w/0n
+PKSfkzZD9s9cs3ei5Pyi66J/YR5iwtQ1KjCNxy5gwtavFvfbkvp8YlbWwrEi
+dqdjYGWB5O9zcGi5hCLpd5ZPU5WKfb+qiWnznawLl/Y6wnp8292NNsFJZikh
+cGiQlPdpmP2I4RAL/1pYatMF09r3XT0DD2Q4f5Kj4vp4jcWegN+Oiar6wazl
+jyICSXyZux9KYO7wu/jd8MuZ3j0fYcbZHiVVOEAsiaeghvvp6uGNC6hvJNL7
+DzuYd9T+XhNcVfdMNwRmBB4yTIGtZq7VJcAau0u2OhMvUrzKhpl+g+sUyDy+
+hu7IhDlTLxa9xrxi31QcuQjTDcOVz8CNc6728XBQM/u6KRzVkPvPMZjmcql7
+Jawj8HeDK8yt71r+gzzPbrooGJHjq3R6F2D3N+bVa0m83dw8cnx6unm1ADwk
+YD1sRu6/oTJD0h9zUkzkLFyZLKDTB4uf8Ur9AJeHO/q0kf7rb0hSUa9F2Xe9
+FjjePcT7EPn8VOxv7YCVebHvi+GCjILmIdjF9s+tk7C9zN6wHzBeWG5rYH7u
+tvfyFZG/9n7aJzLvTImUKntYbyY6oQimXrjCTSTrD4T29cMTUwc3tKmRfdeN
+LYDnthsn+IiEOuIZBfDk4QIJ+nl3mB72bdlWWCf1fmwhPO1/qUsH/mGdJv0V
+bk6eoJL3nvqg85uMNuP+eKt2VRbWi+y+8S8sns/Y/hP5xm3cnzyEGW++xTyH
+/Z0SR2eIDVy2FcD7fKf2r9DAPkw1zgyGc9Qz7irClReDlurDid7JderE7AoR
+fniqrpOhDWvcOS7XhnkMCvms0IWF66jV6WT/ml42ownTe4oUgmAZ5SUPqfC4
+7hFrW/jXozJtEr9WrfWFDvl8BBrvkCTxLRbmVeEk5oExIVg+47TvJlg4fsx/
+GvWyjjTu0YPTjbvju2HlYDZjN2w7ddfwPsz7mc8fRuKrLYougvX6Ksuuwv5G
+wwLZcPyOte398LJGIeMMcvwirz3S6KfGqJSWBwsH5S64wVbrXW/fgsff3bHI
+hguZj3o74NrkNbeHYDmtvYxvMHPwXM1azHvnudyIP1AvzZy+zBU+1/ZbUQPm
+KLyOToDj3l85QYcLTQ6Yl8PC9S8eHiP9JjB+PYVrVjx9y4bFvWVvvYYHJ6pf
+18DNAlFTw3DxxMfcEXjowKu6ftjIacWfIlvQvx2l+jHsWpCsvwmm/6E8Xgi3
+8CvJW8Hi1ZLNTHj5kpKfPrDerV0Gu+H/JPZrRsJ9zx2CVsOSdzztk2BOBK9t
+BP2197gqsGF2uVV3CZwaV5OdDVtcaBI9DkfpTlA4MNde870ZLFM/disTdtn5
+NF8W/vh80jGNnC8Wpz+PeRfFCJQkwKz6PduH4dzzd65Ewxrrg0d74QHD08aB
+8PiRz/19MINreM4D9hBOtB+FuS1FpfYk/8bY77/h6gR6rjk5/+W6WSXkE7nn
+ftCI9GvqsITsnz7Oh57rkvUZ1YhEuCs0qkCHxNfsNWiBE2TYB/RhebtVfEvR
+/7pz6o4mpH7l6N225Hr43ebshguPuV5lwdXHQ1UOkvrH/y+yAz5gUZ5B6h9P
+nIsSxntzvsry4HSYcvVW0jbY2VJspgquzKl44wF7vo22fgUL53pIR8PlrOMx
+AlsR323ULBmWkrwcowJXLhedZcHt30X07GDeTK1J/Dry/viSfQyeHtnx8Bi8
+e832rDSY/vFHlCMsWmbpdpusFxpRqHCzVtjiDpg9T1f7gXrDhxaE3sEuhlna
+5H7x0zOcmIE1LC8yU2DHB9uYfJr4fRbjvDOc2t/XsBget+j5pAB7X3s+JQzz
+KpeKfsL8tn0NCFkE021vyT8m8/V6/eEn4sVrKsmT/WSnULfiF5jj9IWTAvfY
+rBcahYM6bFrJ88t8rcrlXtgjst+CfE+SrBKYbIYpfEU7L5D9NM5XuhoWz/AO
+KIM3j2zbeIP0s2VuhHxPOqV5YXkBcWmYO9k/hc5eKOGQfnwfrzaAb2gdupkD
+M+wfSYXDgi++5l0h9RkMzFXBNuquz0q2kue1u/Uvsp+a5rqSfJVf/jlFw/y2
+j5TJkPlZiIoo/wMn2YXVjpH6AwIH7sLRuZH1guh/1bPIM+PwD4Wjh9eTeag6
+H16O9/hV93L6LWBKs6LCJti9QW51AMywdHqkD6tPT8ldIOdTrf8zgl0V13bc
+g4Pi2eVa5HvDCjnZV2Td5gd3LbyE/B1AC/fP//9xgPY/mqO4+g==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.0723744310654, 6.280370328210516}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwl1gk4VekfB/BDhmsrdBMSyhITum0yBp1QabNniRCKtJAwikSZukq6leWq
+JqbuY4ksIes/opFUY4non61Edjf7UJrv+//f5/Hc5/Occ97f8v7ec63y8LM5
+LEhR1CP8kW/q2w98dOj/f6vSFMe9VsZSl6ZUNraqDsHa+c3eSbBhDWvwBUzf
+XPHyAyw3pc5KhNte/nNs6TqaCvl9Y/QB8rztgKwxnGI2qsWEKXPO1gNw2229
+uprVeN70hrI3sXF4RBAcU7Cowgtm1EhxVWGJM8KTtnCgxi2v5lU05R8b4KAH
+MwuXLrsKp9fsWLcYputEo3fD7p58y07kY14VrbUMvvtjyXQG3LBQXDusgrzS
+Km4Hwmqj+tFNcKBsxvNtcFxQ8981sNrI4TYmbKZg/MtLOF3i0SAf/agMV89o
+gzcVFyW0wXZebpYTcPn8kg9v4NkU279kEU9T58FCI2wW7q1Dww1VF8/3wnI7
+c5yOw7OSphIMrD8p3jGdCIdcMWTrwyEWWiUVcEw3VyEIfu3Wyu6G+T8b7yyD
+2+lvmTOwttpBKQbqlYu2HRJEf9zj3yk5wu2HWLkUHNjuMJYGC12bkufjfjb7
+jcAkzG35KtoIt/+5P0qRhT5qUuo8WHj1X2IGcJtkS50vzEg+5G4Nx02cXLQG
+vvfrNO8QLGTM8/yAevV3VTn4wtp2JoNXYMPvZq7H4Fqv+FZ9+AL7wU+HYU2b
+WcFGZfQ/NWHBAVZpe7zXAJZ4Kmu3HWZ5si/kK9EUr8LsoC7xmZjqbXCtvUUm
+E56t5MgMrET/L0X1TyD/Yr0F5Sw4S7RvpgJmL45Wj4GHbehZDuxukt7ChkNC
+rBR84XTVHLcU2GdmXsWC1C9rza6HFfVEDLfCuWFmLdKIV6B/fZDMp7ti8ctD
+MN3Q3LcPdrx6jFUCM98cVTxO5lflop808u9+bJbBJesfyfroCTuezBpohDUH
+u9Y9hC3SdF6IIf8QX6G0TtjEufUgi9QTNhr1DRb0UZZzhPsH9ytS6NeVp776
+EXBKcsHNL7h+83LJfCpMpwR/yoPjRgLy6kh/xjN+uMHB3fpNA3B6KN94Evn5
+OF1nLlqP+Yx1sgmAnw5vDV8G+1ufXt6FemMux55SgYsNr+2nYcf/xBSqwuld
+PL+7ijiPjBVnlMnz1YqL51bg3Oz3s2LCs+Kvn7vBBq4mOmR92kqj9K0C5uUP
+SZsRxO/uXGvnDMucEt7WDFNtF8fm5NHHW+VpJTDnTSKvEN7g6meeTPKVfbXy
+Gjy3ee+nS2TeeqnISNh+/p18AMy9n3ziBqwgV+bhAReXrF1SCpdyWcOkX9zY
+cNMZ4q7vHHvYfCy+yRTxNZ6MvHIm+RiJFybB5i7783xguebQw+Pw53GB0TAW
+6RNXfyfqMSm68yqRzD9Pr+gGPNpvalBM8lNOnXoFZ6cPdbbDUszMHj657nlf
+XQj1s/u/cL7B5a8+22vDDQbLPYbhDeWvs21hVtyOTRWwnsBAYAgxb9PxILhq
+6OzSJFgzXPCrFCyY26VdQPZnxXmZeOT3cJVQdi1Z/6KPizBcaTXQ3gJz8384
++qLe1Jwgjw/Ekro7XsjRVM2MpOV74oesZ6qw3b0i+QY4t9noxKXleD9xGpIq
+4e6j7UlTspizjXnzmSTf0PSRYPj+6abcW7CKspDCEjhO28LlDMzZVXrn2TKc
+pz+elbvCIV6DVzmwRml53HY4Yk3RxTC49sm3m+vIvIjoxUXBCh8f/6pE5stN
+3DYVzjor1ixD5uc5Y74DpqcFrBeTeXNclqyBeFXz4bulYSm3vONnYe75PRMr
+YPOpW3NN8IE5b1ldUp+TcbIW6unseSe/E7ZiT9b9BltUlwkfgRn3XdyL4Gwr
+94RoUv9mOZEe+Kmov2kuqWfv/Olp2Lws0rWN1N8q9WAU1n37Xo3agPW5zlQd
+fFd/Q5s6cfXac2w44NyOdzthuTX9nLXwuGlfthfMTtmq/gT58dieW0Jhd++/
+T2rDDYr2t6/AlNWegluot0+ty+MmnBJvJDLOxHuebr5A3Ob64+s+2GQ03PYq
+8eNDytlL8Tsh0sc5B1vZ3qXkYb76R0tfWCVgd3CcDE35aoaN2cAMf/FIdZhz
+2l/4F7K+yMz3emnE88vep0TyUQ4MSIANnOSjhWCfkPWDZ+Du8hy/EdTvniQ2
+QFye4RH3X5jPSTgVB0fQzVZvYMd4EZUa+Ozvivk1cEo530EM8XT9r/i9IPtp
+yb7gDGt4rWqtJ/s/q3QgH862t33bRfanrtFYHPl3mqz/Mk3225PiuMAbegX0
+mKTe1Pqf/oS9+npj9eDZfZTwW5h9ejjMheSrlTw2AgfbVRyIIv1sv+40Cpcy
+Onyy4IbVPLoJfty5qbcJTn9ZvzoJzmL1rZ4m/SthCJvBTf98TGFuhKOCfFuQ
+36UhQyUd2KePp2kNx1goZxrD+vwEo3LUq5F+otAcZuTYX1aE3UfCpfbAnKH8
+oBApmgqf+G1mO9ytdvvIoyWYT0NtMQO48rNAYuhi5Hkw20wTpnJkeN6SNPVu
+peC4NByh0LgqTAL7v513exb50dz5yGfiOO+7msc6iEMY943guZaigmqy30fn
+QifEcP5Ur6VmwhyW3sInWOiOzuFEcl0sWEIU94+OrTzIJs/nv85wg3Pf2xac
+J/0pi9jVCQs3FRiEk+c3nzM5i/hNYspupJ+cNBO3Nchv+hxHi8xjRFbVhTaY
+mio1SIMrJYOdIlBPXJlYYxWJ5+0gKYN6Dbe0N/UQ7zabiIR9Cu07GKhPqv6e
+Zg18T1LNgQXnSnbItcJ1bMYlx43k93i2Jwe2T9ySeh5OOWmdYgFTFj8L8sj+
+zMcGFiBe7MNC0eekf0ZMdi/yiUrX9O4k94/01PUj/+I8O+lxmC/5OfEF6otI
+iHFaIPFbgvWuoT9R1e2TgpvwPnWWNdkhSlP/+8B88v+rCP0vmGLqoA==
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.28233829669103, 4.3021661698002225}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwd1Q1Uk1UYB/D3oM6hk40Pa8R0I3FNAwRkOgXhTRZsKLCQD5EUNPBMhISD
+FB+KJAOmWE4OJAnogqBpM2d+AQ3BEALF45LpwbAUlUaQSk4UAbX/bee8u+e3
+3fu8z/Pc+57XdcuOyGQbiqI+wUVGikO+5tPU6Bt8XGjKV2aQ7phHU4LNByJv
+wT2Ltaf6eDTVZo3b1QGXi6pWfAAbqtgzrsOGooLBkxgFrZZgK8aopS+LF2DU
+UMdTvDFPnS8rbXiHpuiVQRklsIpxqnMl8Yna0KdwtbxO9sAZ6x3Ojqfhvrou
+s6QW1vBtW8bgy/b7L2bDhucOESrkyYvKtG6FCxqKuU58muLeKrm/HVa8lmQd
+g52aJsqK4LahqzkcAU3949w9/zSsfLyjWw6bRv7sHYYla9zyc4gZsZs8kY8u
+c+3vNTB38unLz+DE8BffnoMNrApdKyzyeSlqg6WmsO3TUB+9qGpDC8zszMhb
+BQ+1lDSfhN3c3/9iG+lH8/CmMrhP6NxRCHOGGA9TYae7HRv2waKS63GB8PRH
+dquzYaU61p1F7ldmkx9B4seEcPSo594edwEbpujlnwcS15tCGpFP+g+PPfrI
+vkXz5obB2scelXnww5C7GhPqo1JTjnnCXO+BfcHwqIcul/RTk5Kw7QwX/WkJ
+ze+FmVl1FA/WKqc/vwKbo59+VPQ25u88POsP2Dc2NPbZW/ChirO2iFfulN+d
+BnP454wRMKtr+fDYXOSV1tith6Oawtdp4HRzSN485DveWXUtEKZDSjU1sHKJ
+mzcDNlmSWE6oN/EXhuKhE+qO+fdmPNy4hvfoNly5cE5UHayyOX9xEPby82+y
+wD2v43bPwPpKTmq80JWm/PeaX4lhZuzWGx/DibGZ0Zmw4KtIx32wLq+H0QQn
+JrPUx+F7A2yxDfLP3i51bYHdtd/0y+Ehx+ot7fB3R+UzS2GvGz5KI9zztz37
+Esy1JA3qXMn5EHdb4HH3K7z9sMy7v3kSplaZfttM4tdcDZyANR+W+/rAGv96
+3QCsPHa/6xXyv3eHF34aXt+QI/+VnL+i7MptMHN+n/oQ6UfGyMRsEu/gpCKB
+nJ9pzAdHSD2yPUFLyXkTTq9xJs5W/8yGp7xYngfQH0XDj8mP0N9niZHCF46I
+07Alphc251hSE+DRwbCVxKpaw8wrDtifKettMn90xeSAHyzIXbDVHvGiVIHl
+TfY01bVBv0oCK1sqloTAErcAlxRYMbCMPcRB3ecLRfUwK37eT0dhdfBiIdkf
+Sr/raCos8S8r8kD90o0xikgOeb5nFWfBKh/r0ggy/5U0ivTXqNij3wwXnKhf
+/AY283cLS/7/fyTd712sD/ATG8n6of7bn8JKxlTTFNx3ZP/uw7B/oZ2jFPlx
+Lyx8coZ42UXFl/B6s19YO1lfY0zrhbUZPWs6YF+7ArU96jWl65c3w/oupksQ
+bNjItdbCxuqDnkkwXV01UgCvpU3qDNjL2GobA1cnD5uUsMgroMoN3lnke0IG
+NyadlDxB/sqxa+0ceH3/ze8bYVoQcOcS6afYxlhI6n39vHEjsfyseB2czndx
+sJB64r3qFsGj2rRM0o8+YXCQLaw1VL9Xy8b57KkfsZL+hruGZtnBYX9Zh2FZ
+cIN/8Bycs2wP4ROYvpzL4LNQj0V0nsJ6aiIu2nY2fl/XGsCHu6TtdnazsI9f
+l3fKifWrh31tEeeC+9V8cr8xsbOKiecm1zOS7A+XvB/gcfJ+cKX/A1GYJ70=
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.225285377617156, 7.188392099638602}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwl1QdUU1ccBvAHIo5qIIiUImCQsFQkzGLV8CpTBKTWSRFTZZWhyWkUtCC0
+IsMqBhRKiZYhRQqKESUgRUTZGGhEiwzFNAeRikakDFuw9Ls25+S888t9793/
+/e6Iyb6DW0PUKYpKxpdc//+soKmF5LqKpngHL19kwTsSJ3+/tZKmShauFzvB
++c/KGg7DIkFvGw0/7j7fuRrW3vMknQu7eVcYKK1oKqciUmYDn3tX8SAHztcv
+H9aFa3K+1PscFhnmtalMaMpryLlPB367OfNeHey/4NrjXkv8bvqkIhlWjxhO
+/wWmtJx/9IJrOwSax+H6PvEjTfhAx/M3obBiJOlVA4umijTrMrbD+hoFod/B
+rDRxpR/co5q57QavWBVQ9xlpvyLzXQxHfZlVtAeW5zS61y6nqTHH43MEMF9c
+NiGADzQXWZyER11St3Bhzs7rrEvk/ur2+aZw0tzF3U3ERz/qZsHHxtsMB2Ge
+sXL/xzA7JqNzltQX17Y7BDb4k6vQw3jlyu7wEjhXFRZjAUs2NO1/B3ML/3hn
+A1NWGzgc1HfeLcaOmP+wgB8Kr49d4cSGSxKXqOfBtbK1WQzy/LTVF49gg1oH
+HxX6s4yTjS9CPh7XuloayPhNHwZvgE/aXFScgSW98TGhMO+pUdfnMO2e50Hy
+jppXYs2EwzeW+orhfZNa7W0WmL/msiNF8E+bV0sS4LepFxwK4KOekXMd4VSt
+s5EZsNLWYWLEHPOv9u2ZQ7A0ZEFuMVx9OlvkB9/9NPB5KMyf2P3QCM5WzZxb
+A88/M2r+DPXnv/l30awZ8oqxLimGNVPvB/bCOdI1lcFkPscsV9bBsR3C30xg
+1SHry1dgSjSpcYfk1/bxL5dgjtr9DA9YKrQ7UgbXrxsY7DFGLvLkRdWwRDas
+FwdXb/KZugfLpVPp9rBOv2viM5guPTygBtdcVLuujvokOZbFw0ao2+mE0ARO
+FKidIF4hCfvRhYwnQ8wk929dIp0JIO1Npwc4MC8kJVsAj24Sph2CS5W8jG9h
+7ZOMh/dglmPKnjS43vWrZhvUq7dPcCcFZgVf6TkP+7hLhr4h7ZJo5jyMV7f4
+7r4QYg7XywX+rjl2nRsc7q/7vRAOHq8e0ifPn935dRG80O2S+yDJz+tRlwxe
+bb1fTPKhuhvbR2CZX21CMMmr4Kuns3AOJ6LTEG5tbZ03H/PD+TXmbBcb8/1b
+SvUceLhSMpECixzK/hzD/W63x5e7wD38F3rdsHw4aOU/pti/Uz98Ug4zpu00
+foXzh7c2xMF23kf2Hoepta+TXOFuLitvGzwqsP9ZAy5cwGu1gf29Dyw8QeYz
+/Z+YpaTds8B/FnnduNnaPxemjznYx8NjjF4JBddb+hTOgfmv7TxIOz9hwv4H
+zE+Fs0mSDpzY9/tf62BDRtWUOWmPPuU8YYj+bJYqaVixPSWxCW5s7fQOgrW5
+dTvL4eKBMt140j87zFMCD95QLRGT+rr85e0w/7qtmRRmCYz5M/C4xStXGanP
+1fraRvRXr6jK6yfjZce75cJKzf1XlaTd9Hv2LGywzPJTxfvxXr0dRdbjLW7K
+A+KDLpYDMOPKdlYtzDGO8/JDHv6ZWctySZ7ZbP1qOMBkzttouKesLvwD5JdZ
+55HnbErmsYNpDwft0g6cxrnrnPrK5jOyvyLiZFVwjmagP9lPh30X3D8IhzPM
+hJHwkKc81gzWf3vRgJw3B2RdI32Yd7q502Mb7FdMb8uEq+V6CU5kvciKW3zh
+nsqnLeQ89c+a4mjBkjenbatQXwVz2/oe0m9DQK4rPPQo0r0U5oV5mzRhfDJj
+603J5Dm2hYiGM7UD+6Ng7cCXozXIJ3PkGCsI5ruU71oLcx8EyXbDot2LK+qR
+d6xstdleci58FJG2HdYQWn0QTd6n+vvx9DKsw8PHNMj/gFwsHZPC3FKZz3lY
+Uax0TIN1Gtuf3yTvf3naSAh78zhSUq8i39woFv7EkHlqkrzf9mbeOVi0t9aT
+ifEl6jAZrTBvue2wOczSPPpUC/077Vpb6EjaEwQ3wuFmqy1/rSPnrJ3N0U64
+szLpmjPJpyI9az3GY+zX8uEq8r/nmb2kHE6tnenQMSH7U/zECHm8UP/55Wv0
+LxErVckkn6V903dJPjVxaYNwfnvVq1Mw5esabod8RYWhulvgUY/ukSg4QsNO
+l6wLRUkbnQGPS2KLyL4aPR4dfwHXqI2MO6PkHLo5WSmCLzNd5V/AnMf2mpFw
+Y1cz+x7qUvwRJrIm73+3aZCsa1bNDkEf7tOnW/qbyT54oVYqhJPshTsD4Pcf
+eBG5GtL/AZvf91E=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {6.662419809687106, 10.755933890072207}, \
+{1, 0}], LineBox[{{15., 17.00000000000231}, {15., 9.999999999998607}}], 
+        PolygonBox[{{15., 12.9}, {14.6, 14.1}, {15.4, 14.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.9452, 13.5}, {-1, 0}], 
+        LineBox[{{15.000000000007276`, 17.000000000003638`}, {
+         9.000000000005457, 13.5}}], 
+        PolygonBox[{{12.51826734053906, 15.552322615314452`}, {
+         11.280184249251306`, 15.293188945044921`}, {11.683281069670574`, 
+         14.602165824326175`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.823799910437668, 15.984057296392571}, \
+{1, -1}], 
+        LineBox[{{15., 9.999999999996362}, {9.000000000001819, 
+         13.499999999996362`}}], 
+        PolygonBox[{{11.48173265946094, 12.052322615314452`}, {
+         12.719815750748694`, 11.793188945044921`}, {12.316718930329426`, 
+         11.102165824326175`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.823799910437668, 11.015942703607429}, \
+{1, 1}], 
+        {PointSize[0.04], PointBox[{3., 9.}], PointBox[{15., 17.}], 
+         PointBox[{7.5, 7.}], PointBox[{15., 10.}], PointBox[{9., 13.5}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T6", " ", "P2", " ", "N12"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbf/cgdhei/fhhjgigjij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbf/cgdhei/fhhjgigjij.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {44, 44}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwt1Qs01FkcB/DrtU3eCnmlSYxHapFoO/L/yyNKJSShktgUbW0R67XDVEaZ
+kJSNI6FY65GpRMRkh2NFrcfBSmuOPCY9tsN4JLK/356dc5w5H/fe3/39vuc6
+1gad9gyRJoREwg9+E9ESfJbRhIEwpAmJtYhq+wa+P94K0gGLXDpNyuVoslBc
+Lu8Ipl0o+UeyNPH1s2+PBjMv+Sl/kKFJepViSy2ed1riHQIHJN+IlTGC/ckJ
+PQrg4K7EWU8ws8Wn97M0TQYZaZIicODMOk0WrDNKB+Vn0Nr2tVfArnOMoe0s
+mrBzxG0GcF/+rrseXDCpOl0qAkczo+/+Dqbt7fNqoL/+FNvKSXCgyiwnF/oP
+5fDfrjSG/Z/lr8fDfAHs1jQWWPTjlo27GVD3tdI9M3THWOEi2CLn8jwTTI+c
+mk5aDr93v6mtAGZWqEZ3gwNCz255h/f5PPQXg4PlqjWFYFG97vIGsKGyd382
+9nssw8sbHGHAGgjHfvL3xVZA/fToExxHMLMzk3RDP/X1v2oycX/7bbfn0K+v
+2r0Lclhfvo1ZCPOIXfMdMQ9ywF8tFOd/4LZBAmZnW5WZYD43jEIInk+gGqak
+aDJ3Ruiqi06t5fQRmtyf5Z90wnomO1ueLVEkOPBYdgxY4PZL5OavFLkf2ThR
+h3nWlV/XWaRIqlKCSA7nr7NNjF2giFj7JXs/5vfl5bg/OO5j/IViXM/TzagB
+hw7s5czhetPeq8lwfq7EbJ2zCaw3/9ZUA/UjrM67XAaL+uyO6kI/C6tsbZtx
+vfTZ4hQ4NPpq+xSua/+k0A/99zhmc9VNYV2uTlAD7yPgtkI5C8wcsk9Khnm1
++GxnM7Bg1rLcBvIo83/BYoLJmkGvJ2D2EvfNcjz/TcEwA/IzLHCofov3ucYV
+6eL7VeQHNYFJcP2af2C/t+RnlZtgdu9qFw5YNaJYJwwcuONK5Cu4T7RpfMIB
+zNzEc/sK/Yyo8QX64PykUWoa+lVfZZkii/XGXTa3wzxCR+GjachDUBuXtBby
+Dh+20pFgXpSPpADycv/zSDfB+0wHfLbOU8QuWmSrh04PUpOdo8hIuHs35keG
+/+rSnqGI77Lk8Di0+56NGRKK1DuXaTbgPG/9z8RMUcQkp3oXA+dlZT0dmqRI
+DS9cxRddqX9JCH5oydcqxXxstHyMYD+9QnppHswuCpGbA3Orbp7YYQb7H293
+Mp+miF5mw7ZUMPugXHwZ3G/9SfhHC9qp7+th6M9amZ6QgAUR244aQ/+09m1j
+jfWwnmmlJP5CEVXZiDYWmP77Wi8H3oPsRb9RUzAxrkkbgvdQ0iHxWoP7+88n
+voF8PIIUKxlg5vEbB+0hP/bRWBsx1o/NmtsDDkhT4QvAzGvFDkyw+QqNXVlg
+QqZSguE81yE38ATu9zBfUIX66t29vjRaeH6HF+QdqKl2djXOFzKfZQ/9DuZ2
+ZsngecXI5olZyNMx1WIa8zqlufoczF9yS1NVgnmlGvRIID9RaMVOKaxXUR/P
++0QR77z332I9snRsiP+eIgv5kU6YH9tBGDEipghjXaFrAlppkjcwSpF8znM3
+7J9s/e7wozfQH9f2qTzm8cK8njtMEa1Jj0I/zCNDVcUfbJhoUFWGLto8Ywj7
+GScn4hfRLZqVnSMU6VFy5buZw/nEcmt6HOZ7EmVzFcz+/hzDeQLe0x29Q624
+ftI7tewDRdib3Bgz5vj3yh7Lg/7V5VpaNDbA/h+W2g7DfIM90mIW+nRYF74H
+u/S8i6ZgEpU+vg/y4KrKJOmD6YV3UZ7wHoosTeKW4XqOoHYcrHjHuHYM73s3
+UykLeQbv75NtxH7WC18XwHo/R+9KJq5HBOc3Qb3sGKWy4+hXqmZh8J4tcukO
+e9zvGaVfCv1cn+ww08N+T63svQb9trrySqVxvXXD3RjIW6y38ECCeWwtGU2B
++UOLZ5TR5LHVJx7k58RQey6F9aWamjmvKBIQNmahj6a4l+u7KCLUM2twRZ+p
+Fh9ogfrRVeZsdM3rLzkPIc9LGhea0IIjiSU8eM9Gc9ZKOK+FzL7irEZiwThn
+dwhN75FyvtVImLzm3ZXo/z///f/cSP8LkEup2w==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.8245590828532245, 13.052815449711932}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJwdlQs0lGkYx193RdbEMDKuJVQTjksXl+9ru7iXQjnKLiLpgopNmzS5NONS
+LqGUGJuk1opSR1nNbItVjprcomwHuSUnQyPXap9nv3PmzPmd533/z//5zzMz
+RsGRu0JlCSEx8MJ3IvoOjxJNBvB9OU0MC2RTbZRpIklv8LyLrPjb9tXA6son
+HAKAe4vi9/TDecmKGZslwCKGkeFeYMvzzKSnxjQh+dHnrirSpDq2ag0XWDRd
+EVGmQJMS9qonLsC00JmXIQ+6h4cs9bG+83PiPjmaaCozmmWwPpF7Xk+WJn63
+vqhJjaB+oXp3H6FJPXvhPjLJHjM/+p0iZS4X7sji/XJ+n+9XikRNtqxiY/8V
+4x058xQZu0a3OGE97drPjnMUSfp1SXkYcpu9ccAsRWoS2WmXsJ/mIq/5GYpY
++r6WFwJzQ6htLKiPCUwfDaGenCb/D+BoK7M4JZiX8CNZFaDnpy6XoI/zZ+Rw
+lBYows4sTDbHehaxLQY/Te2yIyuRg87qBIFfqXxjIxPzHBztyYF5Aq1dlb+A
+fq/J+7oIGZrMCNgBTeivqH3SAubf9/ik3UXsv31jTjNwyRKXe67AgrzjT+0g
+r4Hw0TNfIQ/Dt/YO4cBSrnFVOXBvs1QcANw+4XXDH/OqOla2FFjMW1e3GJiO
+S9yXAnrcxGZXkSH4GH/R3wj9B4xvuMQDE2Lq0gb+egQxW5yBuV6bE46Df5vC
+MQs95BP/rlaB+f48WOEmg+ezP/SnQx4jNhzDEQPQl6ZuZEKesTxW0Cgw96rC
+ob+mKCIueJUrB+dFG1Nqyj9TxEGLcRz1RBVtcuMTkE9rpx+Net9Vf7kmoYjP
+poLAcOz3MGg2fpwiykuZ7rnI6nf06j9RxCPjh3vonwSX5itC3SPotN0I1k1T
+4tlw3yFY9a4yztvlHGUI+tEtUm8DZKOj5nGTFBlI8h80Rz7SMqktpciCXPTz
+lZhX2tPCLvBro1NkygTmPjaTKZ6miLwaPSpFvzfnErxhHxbG6581IjvX1bbB
+/GPZTxzTgem9V+dwH2KrLodjfqJnw7ffAB9cIf9tCvPx6jtlD/mZ7Q+x8kHu
+PvSjIbJut36lPvTXKslIhvMS26OX1ZHvV72KgH1mpflx4vRAT28lZwj6Z6qp
+dc+wgSOuf5oHf/zuK6VpwKTT5HYD+LeUiCLXA3OFt1UCIG+WQFgqA0xvTTzz
+DvKJqg+1GdGF8yEDq16OUSSQxz/8EZgrDSerR+Dz5AQvXYT3rZu7FQcoIlge
+cs4R9ftazbN74XzYi45EZFfGy8G38H0a3m7bidzDluV1UcRw5Lv+WvBL6vR6
+jF9TpEsnpCEJuXl8tAa4d3PikTZkJYMgzhvo943xjwbO6xSV5/YO+GGBJw3M
+TZCf7uuDPPbLpPkgj2p8ZQ/C/E7a/p54/rJuaxH4deFZMsyRd88qW8I8mRJ2
+/jDqF6mezob9uGIREZEKzN3g4+gM+xAYMpauCUw7Vh6LhX3g7/Tdlor5BA1E
+OENe/OoixQnMQ96SVQJc0zOvvAOY3tIUn4R160KZ35ch7zo8CPfFyxZEKsCi
+BwdSn4M+62N8x0kd6N/1YIMT5C0WNVpOsUCvRWeiGPzR46EdfGQFWSUr8C/u
+42fZAZPrtjsC3lPEa437c4K8zSRG2EMREnbJf0Qb+M7d2aFWmDeL5o0hr5c7
+4P43+DP2WKSC5720H57No8j6U94cGpllc+jlAyHplbQq8pCdtDZsbRAS/haP
+6m7k1tqs3mYhIeyySiv0e2BrbfILISlbfITDRx5afG5di5DEigeiOpFd3u22
+aBISbv5aay2Yl4i646qFQuJix5zahJzJvuh+Q0gyH+t6+CK3C+I9K+H3kmQZ
+eCKrZojWNcI+KIa2mf7Pamr2ME+URuRPg6gfk1A+B/tTRkvceMjGtWUfYB9m
+8tyK1ZHzlXRfwT6YSRhPktG/SdStMMir0vsRE/PgDpeUsmBfKxn6H1wxn36F
+CjHU+SVy4ze1gD/JNqX0Q35qnGlFYO5QbqM77HNvsE76CSbup0LFHtjHqOq4
+KxOawI0xj/LAX+WOvczzyB4z6X6Qt+itbYMNMj6COiLG/08N+j/4tL4C
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {0.17544091714677545, 8.052815449711936}, \
+{1, -1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000000416`, 17.}, {15.49999999999958, 17.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.75, 17.6952}, {0, -1}], 
+        LineBox[CompressedData["
+1:eJxFlAtMFFcUhoeisYKCluWhVh4zI9BIKcywsK2UHm2KUA0KLBZEZXWBWooV
+2fAQEOVVd8lCjYq81rIoBeRVUGK1lZfQEhYEUSuSSOVhk+Vhu0UoCAvbO9bc
+nWQy+XLvnHPvOf/57Y4cD4h4iyCIUPRyX56Oe5yBeP3Q0CCeWfjN8wMgRMUe
+3m401LSNDqSlIz6qWed3gIZGv/LVil7EGu/YV3E0yJ0/CzY3dQGivrF56jQN
+bSE1pkYeiNUXPyo9SYNV/NkXioOIg2VO0WIaeoqeHvNPQ6w8sj/Ji4ZXm+6o
++5WIYYNN6xoaVLFDPxj8wrH8nz/uU9AYcmDKuA8x8fCuQS4F+9K/33H8KeJb
+WovrOymozuR7rxhD7CPbXGlAQUKUqEU3inheGlDQQoJ904lHf3P7h88HGGSR
+UCgRZzT2IxZMSLVCEr7QdndK7iI+EyXgMSTw8wbXZtcjtvWwtLMmwWRirCPh
+MuKj+X6uG0mwyZ8yupfN5fN2TbInYUBolMlLQnwu46ugHSSk9o4mN0cjjjH9
+1TeaBFlm7NdrwxG7GDvaXCEhYEA5seIwYs3jAu0wOh+ZOhPKrUtDenO3UFAV
+4i6QfMPV57k7P5qC9/mWC3tOI94rsGAbKDCsCFUVX0LsWGE3qqFAqyEsrt3g
+8uumxhxoiGjZKkz5nbtvR/aeQBpeCHnCwQXuvPmzT2JoqL8ingskXVH8NidN
+Kg3+pChe/DniVt9Dj1NokChbHRNOII6p1FVE0SDd63/b+BLi4d27Q31pSPZU
+l7XcRCwK8rqxkYafPNr/iniAeN78usMIBbWkao2Fmov/cK69hILvCle5CeYQ
+27YVLIVQsGpy8lCOjtv/56ksMwqGI/9VMgYMEFZ5L83vk2DVY1lcokXrVknO
+cIEEuwvW9sppLn/30jYRCfEnd8p8n3Px8gV3PiQhMtG9b5LL7zjOquzI/3Xc
+ilgQ5FK1AfX7bJcLr1a/Lvv2VvzNYv3/S1+ODIbl6OOrWXW4KEOf37Zwddi9
+VFd8vnkerzT2jP78MZHz3Z1S/f0Ch/gvx/P1949s91xfVKuvT1a7ZSh06euX
++GOd98y4vr7ysE8GpCYMrn/dUIlMwWdwf44FK96uOcjg/plVT1bbZzG4v8Xw
+qDqjisH9NzTVje/rYbA+loLL+OHjDNbPA5V6ZT3BYn1JSrs65etZrL/BoTTj
+sk0s1medY5j5ojWL9RufnHNxmlt/o+80182Z281YrP/3qmeTJ1eyeD6WxWaz
+zCyD52fa/N1t0lEGz1d3lP10XB+D56/S0E0gb2LwfEbKFSm76hg8v3Mf525d
+d5XB8y3NKwHiMoPnX5isur2oYLA/XDt1uOkct/+Nf+wqv2o2U89gf3HPIfcv
+dzDYf7Y8+9TS+RmD/YmNoM7XLTPYv9SyxHfEJIv9zas8UDPrw2L/k/T/XDER
+w2J/LH/itNhQwGL/9Cky4bU0s9hfHXqz0hUjLPbfuNeCdsP+/B9S6DsJ
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.75, 8.354800000000001}, {0, 1}], 
+        LineBox[CompressedData["
+1:eJwt2Hs4lNsXB/CX3C+FijBpdCIiplCSNGlcKjEkl1yanEguNR1CJU1CkphK
+JVQTFUo4pahUQyoj50RyQhekRIcaNRUiv+8+z88f1vN59rvXXmvNfkdP+kHb
+PYKlKYrSlKIoEikZ8ovOpP77mcOkhMFj/i6wj/JsjjIsWCvtmAM7TykzUYKp
+on0WH2BBNb33529MyiVGrpihz6QUtDwKu+C2gVT3aDh1C1fnFll/8Y92OZz9
+PCgmBa7WMnd+C4t//dq+GqY7tWcqzmZS/PhCQ3lY5kzfLAPiAwyV+4iv1vNK
+LBGr7tNE0Yhx3ow/rBFTayP1TIiVWBYLiAcDH71D3grb2eZ02Lo/cv0FONSH
+Pk0epszVZkbAY/ZhAx8QZ6gEqduRuhXb5B4iCkpGrukiSnKqXgkQu262j8si
+qjnd+baX9PMPK3AcfYsbFz0JJPsGxVekEMslU0scSD/rmkw0EG0X5+Rbkn0S
+/+z5iEUnnAJIrDKRZ3iQ+hbe1l2AGNcxR0Ty0vWSBEzEtn0JH68iNmqmGfkj
+cvt//9CJKFzmFnqA9PGX4i819DF20iXzBjx88UWMHexy1cx9CLbeaP8gGI4X
+8SVkXpzQ1pwkxPr2jJAExPJV9OmnEZnGbI8niM5aQffPIwqa9y3VxtyFUWMl
+Z4gjUnKC4T69r/vT4WlRrJGrsOAmFbsNtu2UmyKGjVZqeLNgFjuuwxj3wmeh
+Y8wUuOT+lipfmGvYmt+MupKebopJgJvm8dWOkLnbruKcgqvCXy9nkXkNrnO+
+AIded+sewXyHJeqHLsLiSN3Kcph7fotUHpyqW7czHK4/XaR0CG77J/iiKbmX
+1ayt22C29mfFwVn4/GbesHYl+9Wzu0/AjRFHWubBama9OV4w81JNlRzM2/f8
+MwOOuOK2/R364XUKYg1gmn/G1kdkHnZaAgtYKNzSXwqzZVQrfGEO61bvObI+
+6cGnLDidPzacAzNWeeR2w9F+ixzOwz5/bjw3E/V5Kg5zr8OhceHBrnDbIfnc
+ZpizTBTOI+uvqQ3kPeLQlolJv/wxqsaczOfgxRWvyfNcg7BI0k9p+htpzKvu
+8daUa3C2zpmjs8h9nWn+ZYzMx+xmGrlXvB9Ja1cbYC7pB6IWw8z2WVrZcCjr
+agJ5Ty0PPqnvgXkmEi6N3KOG6ZJ5hji/+lnBT5yXJD0QEA6nFiZJPSX3PX1I
+qwBuW5w/egqult5+somsVz/c6QOrtXTVfIGN3ktuacDWlwMmKc7FPPpTio9h
+Hj63ndZMhbsiLo+O6+E9/DqmrgHzTNX/jYDz0hI85GCxCrv13UzU0eGybwj5
+KE/l0jD4VeT3Ha2wMKTiiTRs6jHdqwJWc3W5UU7DfUos5vNhQZbvaAxsG9N3
+IYL0k/Niujdcdeqm1hpY/DU0wB2W8Zm8zgzmcw6Pb4ZLAk+nzSD5Qoal+TAr
+61q+MtnvWM99Cou3Degowrx1/kGzcH6q1JRxdZgrx1+8B04qdW02hLtyl4pe
+wzI2K7KdyP6dFQUr0J9aX2tDFMnvdZ11HuZbu3Muw4z6bt8f8OZ8hY5+Yl/n
+cTtyv3b6ejIwj3LrzwNRsFigk7cH5pguuUPmWWd60klE1lkt37JhmZFPzZpG
+yFuZsCIZZl2/U7kJFgzFbfWGu1SOHS8k6zeebVIj+5uXLemFqfJc22s4vyRh
+29+6xji/NECDCQtrajsdYU73lzd30Y9/rv2OEFgscfRkwOlN6Yq7Ye4S2Yt5
+mI9CmXXlflit/ugqBbiJZq6WAJfPHaiJ08X7lSVtwiXr7bbeX3Vwzvejx3xh
+wZ1nnfGw+EuipS3Jx1mSqg1nBfqt0TEm835R0KiNz3PjQofvqJfeOv9gNiwZ
+nlH0DGYYhEQmwHOWRX37E+au8gkjdnY8eOQksbB46ym44lJSViLMnD156WOY
+YbyoI5b0/0jvihLOa0rY8ZCYX1tWGEAsa8Y6QPLby227Awtm/hDmkHzDPUI9
+9GP91wK9e8SHpOckwpZJ4ZUDsFjkp9MFC/0KQg1Qv7B2z2YLzIMevTSXzE94
+a4ZtLNzWPuFdSua90iWtEH51JiZglMxriaxmDSxUil/iPA/rlflFxM5rFYJP
+wMzPWnOLYMbCHk4nLNTaczYazn4/0fybCfaf4q40IvtD7PI4cJfers0PUQ8t
+JWj0OCzcfM/NDWYOmR+rhhmxqfMb0J910aMD7TBnk1yzDWy0/GjUR5Lvr8T9
+l8j89DwzPhMvi7qnASuIzA/2w+wbSlLJM/B3bKIkk+xnC6clSMNVkfNX18CU
+U8fHTC18PhZ+lfkwf7jUaQFcFx42iwc3lSRf69fE35cl5sN+sOBzxso7cFaB
+mcia1Dv0x7dLcETsh8naMH2nZU4JWf+WrTdB5lFp87oBTt3/WHmQzIsV7jEB
+N+Ve4b+DufFFRx1xHo9zcrQXZk/ZG5AHX+g01v0Gi9uXtfyEk76qLJ+C/OJ5
+vPyNqN+WnjTPClbT2b6qFmbaa9JCyDznrlunh/6FLrNaBaTehSknt8FiXXFh
+D8zVn7a9lHjDyzRTU5y7dNvXdrgxxdt8F1zu3EH/RO5zvjntMczfdmG8jzzP
+Pi2aOh/rqpllIng4aOiuP8xN3p/Mh9vc2orPETfIS+zI/dbbntgBq11qSHqB
++sQRadnKZoinq28FwNyWlisL4C6Dle9b0V+bDjWyBha46I+wYO7DOPsNMJ3h
+7lqOeUWnarb4w+xbq0NnwnN6/trtSfbLbr15dDo+39dRyfYwL8bKSwPOpsmU
+GMHUU8/2gmn4vnk7RUoRLg8vVl8NG8Vatr+fT97z7+/lYcGuC+U1MD30K6Nz
+Kr6vzosnk374LTYlTfDz5ewwHsw+M63vJUz3L1MOhQW7t7AnYMrrvsQbFqte
+sLNGvldWDJE7zJF9qXWAnN8zrdoLpjKKd76EPZ0dErfATWMmPraol9fmszqJ
+7FcQBgpg2rGs2yVkf4qGrDT6HTZ8J+kkz+c+6PaDy3f9KaCReTI6eorgd6om
+oxzSf55L+jvYyM+l9zLxRzV9Zcxz+E2d0jB5fiv3hTacXl3a52COekLufp0M
+VxS/Hz5q/t/3xWty32mO1fXtMG9m429XiJ+/S1NlYB6/7u7xhBPSRV+NYbHt
+8qI+1PtM94fHCljNWisgHD6WmDF9HdyksmlaN/oNGwnrCyTPs6+/dIVpn5rv
+bCbP/3tX5zbm56VjUEfM+dG/3gi2682I3UjOe1Lx+awGkzIsfJC6Hi4POPLv
+bHg0bmqnE8n3o7+iSh3/nhwwTF8M05Vpg7/D6TYv7xvAbBdd+7nwvIHHt6fC
+VKwuWwZeJCcvlCbruQ6ZP9Xw+VrUqvaRfq02u6pgXXxswreZeNe925ZwX07K
+ugdwV51IsgOusjqRch/mZD9iCOH6yeuVH8NspxfdOqiPMX37rg6YX1A4GA/H
+m7p3j5D9Z/16u2D+slvBGqTfaAvnFeg3dNtTvfmkv1zjqmzYpVXudxeYue8B
+8y2sYNTjsJ2szw1K08b8GqIb/8yCubLHVZbCdUcCo++Q/v0Zi1iwZvfEmrdk
+fgsOpVnA06INvssvIN/nDtcUyH38fn6ZCcwcY+2rQ/429wCFNTCH494TCjc8
+afs9BOa2ynYMo97VIUOZ8TD72yfHOPi2WYj8EZg6vlH0L/o3yqhJPkXyjw8d
+9IEruEFKeSS/rNL3B5hvY0tiWw7c5SQ+YQHnH14anQULlx+O9p2Cc10L8w7B
+PJHx8dDJeP/qt6zcQ+op3KR6RpWcN7g/jDwvvCwcV2FSlxeNpvuQfEuCsjLh
+YZsvlxxhgZ2+/Xr4D9oR9UXkfPHfi9zg3drHJ+aS/Qsbj+yBu2LtD84k+Wdx
+Df+BNZxGTmiR/endz3xwnr9e2XtNmB5rc/YnPGp6U6JL8g22G95AfYZ0fYrk
+4/3qUdiD+m9yVaWsybzKdOfpo7+sD+ISV7hcyk2GB/NkP8SR+rsi/ETP4Vcj
+befSYLGifL4O5kVF2ZiUwvzeg5y18L3lw+MtZP/rkbKtsNpDWvcomf9hK5tI
+OPrvnKP6C7HfakOtF1xKy//bEeZ9ebXQEM740LFlK7Hp3rOvcJ7t8d7VqTD7
+9lTLePjyjPTMfLI++7GBAhxYJZtYCQuVExQV0Y/k6ejlR8RXew0G0P+FuU+e
+PyW+56xTh3n5H/+s2gIzVR68yVVmUpcknkVNZP1FUmSCEvpUvWUlggXmJo4x
+ikxqw9mF++/CnLX87+kKTConzCyllJxfvL60QZ5JxZQ5BZ+BKZ8f3VawULTb
++zDcdT1FqkUO3/f7Vgp2wfT1axwvwKZJrH2kP2Zs8uli2EVJd7Y/2a/KPdEF
+x82aOOlBzteKFbCQbzS1XriW1PcwUv8prCDpdHEl+T2jG2JRj1xqxhVPYnfb
+H5aod3TKJOVNpN6Pe3XGSP0rHNZHkXWvOqta9Fcdbbbg8H/zWeEVj/6/9PnL
+FZF+BujqdMyn6a1kEumf5/ZspAA2Ne4xHiTPq2uoUpjnzfeLPadaoP7QfmUz
++C1N29kGprzP1RrDm0W3ajhk/csf1kPYryBTmZgMCwKpR0kwTc6aUwjTf7mr
+f8D51F4G+yHMS234TINP7jDb+YbYys58PuoNSZ9v9IXkW3TFma74//9Hsfx/
+VGD+D6J4HSk=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           
+           9.996694214876033]& ], {13.471090192570806, 5.161297472978525}, \
+{1, 1}], LineBox[CompressedData["
+1:eJw9lXlQE1ccxxcLNYCYDSErJgri7lKtyGWHVDvVn+JBCw5gsRILSCkEWxA5
+goLgBRJxMAoZ5FIGGSynpam24oEKapCrXqhUUauIFKIVi1Qy0EJf+sfvzezs
+fGbn7ftd3+9ziti6LmoKRVFR5DG9C0cnyXIE6v/FwcZiv8LQQ4RbNZ4Jt1go
+nOI2cc+GMLzIPVrLQsHAqklJhgNQ9t9sc8hloXT/zNJVQ7OBis+sn5XBQuV6
+67iHCsLV58bd9rIw8jqhQtkyC6iiKbsjNCzkPV9+X7mYsLHWx7WSBaNY1kw3
+yID6TTgjs52F9gilBe9N+Knc/I6RhRy9dlT/VEp4uNzBjQNoF8jXawlTma12
+MRyoVPtzFArC2Uvnza3l4JzTduc4LxMHZmkHOfBs3DH5yXzC7nnRPzjzsE+7
+IX+nO+GUWGNXGA97PYJ6p31u4lnXSw/zsDphdGIs0bT/K/nbMzzccj7lp6si
+PHAkheviwefS5UFxH+GPj1n+08tDe3Nq9VmWxBtw8d+OFzyMHXtTYRMhM+Wf
+kNzDQ/Sf00JySwhntzz59hoPuk7DoolWU77STyvLechb2rgoc5Cw8esF1Soe
+ak+m2/QZCdtbaUOX8SCtTCwsHyFcZEgWmvOwpGPcy67HdF5Br4+eA++q8Om7
+6gjHF02ez+Jg+7vdvFhJ2H08w9GHg4UN9KJRa1M86XqpkINneZSDRxmJH940
+OTxmgUtLupw/l3D8OnnAzywcnit9UFE8k+yPmb+1gIXlC1T50QLClKbs6j4W
+XI23PVYm2QO1+WChcA8LH9hNvdH6ZAZQc3JOqbNJf42vA3b6Ew5+f6KjlIWb
+H82v07UxQOXuevP3JdLPPRL1Z4GEdQNbigwsOMVaxx0dlJB63Iu668BB+GT8
+2hVHCNNnN8UqONB1l7dZfEnYXS1+XMhBT+/1C3oXwgFaKrWbg+HurKPxMwnr
+tF1ZEh5W7DR4m8sIC4SKjf48hGnUlsVupv1xp9MyeCi74lK1LYhwk0X+2ZM8
+hLjJZZ5qwgOxfss7eeiOcV3Y1UT4uJnuwu88JBtM+iBsn/UysJ8Hj4bbd1yW
+Mfhd831r36+pDO73te0KPlDH4P9z1qS+U95i8PyqDZLG8T4G45vhuyPycD+D
+8U8flq9c0sVgfgrfMK+xGgbzP3Dv0KmL3zFYn4EzI3mRDIP1CwsypJ6pl2B9
+pcfvB/l7SbD+wY/oHzN0dtifK01GD7mTHfav50PXGxcOirG/1TU5MUWjttj/
+HVS/c4jSFudDrzgIMY9FOD8C78lnN8JFOF+Ns4c6BSM0zl/ik90PXxXTOJ8t
+aWV/7Q2icX51luZtLzka53soXbM5zJrG+Yd5mcOyqTTqI6XPuzOdoVE/iwWS
+TjM5jfrK/GO4YmsUjfoTqoUhw6U06nOOWL1hzSMa9dscCcwrmQj1La1fe9o/
+WIT6v/qTwMxCI0J/2FxRN/vtLyL0D+WK6piMmyL0lwb7LOrafRH6j/vp7Ad5
+bSL0pyP1KarKShH6V43VaGvtFhH6267QLYIljiL0P8fE4rGHjTT6o63wxdIh
+Hxr9U9eb9oWnRoj+auiQnfNMmo7+21IyyPr62aA/F5d06lVO09C/+1Uqs7vj
+VujvJ06UvxfUZ4n+v0kcfXvlcwHeDyfOm/QxFe+P/wBzMXw3
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.5, 9.0548}, {0, 1}], 
+        LineBox[CompressedData["
+1:eJwt0w9Q02UYB/BXioG38WcxYlDSEISBKOgdCfLHn2ODAc6I02utEJLoAE9F
+0LH4szAFByVDizI5Ok7GEgrYIjzDi6vAThDYFKgEzoQgVwhbIPEnjL5v13v3
+u/c+97zv83uf597X5/DxlEw7QogMH53J8jrGZobY6BzEEFeyb8DNlyGaptWP
+u+AHr060boIVbF1JIcysOxPqQ0nRRWGw3LG3hAuP5x/J+DOQIVlFvIS/kS/l
+XCoxwOEzI9Oj8OMi5ql8OHTN6UUjLI+9/DgSlk+3nXgHFtc/78+h61Wpz8XD
+uax8/ZSQIfV/5M5vhIdTi3f9ACdXjEz2+jBkyi0p3ghf6hQvaGDnsOBHjTSu
+eW9nApy7bfTXBjh8uEzHgZ89PVnTDJMldciIgCF5AqHn17BhrKFSBxfvfSlq
+EGa+EW4vhtM7eqot8K25rySpcJdutYCF8wm5Fxul8Lui9J3+cP0Fu+4Y2Mar
+tErgb0NYhj3wW1WL9zNofXXtXkkwz3uAUcNXI7clp8OhVq7yA/hng3usGq7y
+/8jlCl3fJa1pgKWp0WNX4epatW4QznLaaNXT/D6ZnzyBP31UaayFiaJBtR31
+GXYc/6Wc5hMFhaXBwZqZ81n0fxcDu8/D+k1rgXthjWQl6Dqc03zqJBcuFSTU
+jsO7a1yLRlGvo/3c2yuwKLmlqg5WtRjznND/UOPWXa/D/KHaMx5wZYVkCx+2
+cGNZ1LsDrJuHAnB/XjN1sGk8cNBOCycrlMZF5POqTtPK4NA7iqIR2Pwwq9A1
+gN6vewufwzyTTHbPH3W6HXu5EJb2jSqaYBKmdhfBpbOO7adhi/joP0/Dy9qt
+nhkwv1291IN+xM1Mrsng0t/5Dmdh3RBPKaL7h52ixLDXNVcxA9umay470H62
+/WaKg9O/U7jVv8CQuZmxHQfpfndyJga2XOuNyIEN+eyCWW+GHGjyLDwLV//U
+k9AGJ8avHLgCM2qXz8rg8vlE9vdwaPxy8Qk4hdPXP0Et8F7Ig/sDB26tww9u
+x2ZXwH3vs/d4of5chl/SDidzbmtD4FIx8bDCfPeJxBjaT+ZISQTOc0i0FiWh
+/btLjmnhVduNwljY8EVX5Cz8ZVpIdjiN71OpAlBf1MOj3b6wOXsqQg7f1fDq
+7GHVK74/lsOVNy68cZ+eT8s6aKRxk8TcCgs6M6fo+zCX1S4W0HrNC5Z5+l6U
+cp9IWLjf08kB/d+vU4+ubMH5+YkyLqz0CLnTAV9ffnMDtWXaxZQL8203J+3h
+5vGb+mAajxhytiFf6yUv3xk/1H141t4Mq2w5f7XAUlm/Xk+9YalZCcufOel/
+Cha6NH4YBwv8OPbR9D0+6ezxhv8bgv9nP+ZfkwGqQQ==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           
+           9.996694214876033]& ], {7.286723682459369, 12.031518421803128}, \
+{1, -1}], LineBox[{{15.5, 17.00000000000231}, {15.5, 9.999999999998607}}], 
+        PolygonBox[{{15.5, 14.1}, {15.1, 12.9}, {15.9, 12.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.4452, 13.5}, {-1, 0}], 
+        LineBox[{{15.500000000007276`, 17.000000000003638`}, {
+         9.500000000005457, 13.5}}], 
+        PolygonBox[{{11.98173265946094, 14.947677384685548`}, {
+         12.816718930329426`, 15.897834175673825`}, {13.219815750748694`, 
+         15.206811054955079`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.323799910437668, 15.984057296392571}, \
+{1, -1}], 
+        LineBox[{{15.5, 9.999999999996362}, {9.500000000001819, 
+         13.499999999996362`}}], 
+        PolygonBox[{{13.01826734053906, 11.447677384685548`}, {
+         12.183281069670574`, 12.397834175673825`}, {11.780184249251306`, 
+         11.706811054955079`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.323799910437668, 11.015942703607429}, \
+{1, 1}], 
+        {PointSize[0.04], PointBox[{3., 10.}], PointBox[{15.5, 17.}], 
+         PointBox[{15.5, 10.}], PointBox[{8., 10.}], PointBox[{9.5, 13.5}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T7", " ", "P1", " ", "N13"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbf/cgdhei/fiijghgjhj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbf/cgdhei/fiijghgjhj.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {0, 22}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwt1Qs01FkcB/DrtU3eCnmlSYxHapFoO/L/yyNKJSShktgUbW0R67XDVEaZ
+kJSNI6FY65GpRMRkh2NFrcfBSmuOPCY9tsN4JLK/356dc5w5H/fe3/39vuc6
+1gad9gyRJoREwg9+E9ESfJbRhIEwpAmJtYhq+wa+P94K0gGLXDpNyuVoslBc
+Lu8Ipl0o+UeyNPH1s2+PBjMv+Sl/kKFJepViSy2ed1riHQIHJN+IlTGC/ckJ
+PQrg4K7EWU8ws8Wn97M0TQYZaZIicODMOk0WrDNKB+Vn0Nr2tVfArnOMoe0s
+mrBzxG0GcF/+rrseXDCpOl0qAkczo+/+Dqbt7fNqoL/+FNvKSXCgyiwnF/oP
+5fDfrjSG/Z/lr8fDfAHs1jQWWPTjlo27GVD3tdI9M3THWOEi2CLn8jwTTI+c
+mk5aDr93v6mtAGZWqEZ3gwNCz255h/f5PPQXg4PlqjWFYFG97vIGsKGyd382
+9nssw8sbHGHAGgjHfvL3xVZA/fToExxHMLMzk3RDP/X1v2oycX/7bbfn0K+v
+2r0Lclhfvo1ZCPOIXfMdMQ9ywF8tFOd/4LZBAmZnW5WZYD43jEIInk+gGqak
+aDJ3Ruiqi06t5fQRmtyf5Z90wnomO1ueLVEkOPBYdgxY4PZL5OavFLkf2ThR
+h3nWlV/XWaRIqlKCSA7nr7NNjF2giFj7JXs/5vfl5bg/OO5j/IViXM/TzagB
+hw7s5czhetPeq8lwfq7EbJ2zCaw3/9ZUA/UjrM67XAaL+uyO6kI/C6tsbZtx
+vfTZ4hQ4NPpq+xSua/+k0A/99zhmc9VNYV2uTlAD7yPgtkI5C8wcsk9Khnm1
++GxnM7Bg1rLcBvIo83/BYoLJmkGvJ2D2EvfNcjz/TcEwA/IzLHCofov3ucYV
+6eL7VeQHNYFJcP2af2C/t+RnlZtgdu9qFw5YNaJYJwwcuONK5Cu4T7RpfMIB
+zNzEc/sK/Yyo8QX64PykUWoa+lVfZZkii/XGXTa3wzxCR+GjachDUBuXtBby
+Dh+20pFgXpSPpADycv/zSDfB+0wHfLbOU8QuWmSrh04PUpOdo8hIuHs35keG
+/+rSnqGI77Lk8Di0+56NGRKK1DuXaTbgPG/9z8RMUcQkp3oXA+dlZT0dmqRI
+DS9cxRddqX9JCH5oydcqxXxstHyMYD+9QnppHswuCpGbA3Orbp7YYQb7H293
+Mp+miF5mw7ZUMPugXHwZ3G/9SfhHC9qp7+th6M9amZ6QgAUR244aQ/+09m1j
+jfWwnmmlJP5CEVXZiDYWmP77Wi8H3oPsRb9RUzAxrkkbgvdQ0iHxWoP7+88n
+voF8PIIUKxlg5vEbB+0hP/bRWBsx1o/NmtsDDkhT4QvAzGvFDkyw+QqNXVlg
+QqZSguE81yE38ATu9zBfUIX66t29vjRaeH6HF+QdqKl2djXOFzKfZQ/9DuZ2
+ZsngecXI5olZyNMx1WIa8zqlufoczF9yS1NVgnmlGvRIID9RaMVOKaxXUR/P
++0QR77z332I9snRsiP+eIgv5kU6YH9tBGDEipghjXaFrAlppkjcwSpF8znM3
+7J9s/e7wozfQH9f2qTzm8cK8njtMEa1Jj0I/zCNDVcUfbJhoUFWGLto8Ywj7
+GScn4hfRLZqVnSMU6VFy5buZw/nEcmt6HOZ7EmVzFcz+/hzDeQLe0x29Q624
+ftI7tewDRdib3Bgz5vj3yh7Lg/7V5VpaNDbA/h+W2g7DfIM90mIW+nRYF74H
+u/S8i6ZgEpU+vg/y4KrKJOmD6YV3UZ7wHoosTeKW4XqOoHYcrHjHuHYM73s3
+UykLeQbv75NtxH7WC18XwHo/R+9KJq5HBOc3Qb3sGKWy4+hXqmZh8J4tcukO
+e9zvGaVfCv1cn+ww08N+T63svQb9trrySqVxvXXD3RjIW6y38ECCeWwtGU2B
++UOLZ5TR5LHVJx7k58RQey6F9aWamjmvKBIQNmahj6a4l+u7KCLUM2twRZ+p
+Fh9ogfrRVeZsdM3rLzkPIc9LGhea0IIjiSU8eM9Gc9ZKOK+FzL7irEZiwThn
+dwhN75FyvtVImLzm3ZXo/z///f/cSP8LkEup2w==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.8245590828532245, 13.052815449711932}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJwdlQs0lGkYx193RdbEMDKuJVQTjksXl+9ru7iXQjnKLiLpgopNmzS5NONS
+LqGUGJuk1opSR1nNbItVjprcomwHuSUnQyPXap9nv3PmzPmd533/z//5zzMz
+RsGRu0JlCSEx8MJ3IvoOjxJNBvB9OU0MC2RTbZRpIklv8LyLrPjb9tXA6son
+HAKAe4vi9/TDecmKGZslwCKGkeFeYMvzzKSnxjQh+dHnrirSpDq2ag0XWDRd
+EVGmQJMS9qonLsC00JmXIQ+6h4cs9bG+83PiPjmaaCozmmWwPpF7Xk+WJn63
+vqhJjaB+oXp3H6FJPXvhPjLJHjM/+p0iZS4X7sji/XJ+n+9XikRNtqxiY/8V
+4x058xQZu0a3OGE97drPjnMUSfp1SXkYcpu9ccAsRWoS2WmXsJ/mIq/5GYpY
++r6WFwJzQ6htLKiPCUwfDaGenCb/D+BoK7M4JZiX8CNZFaDnpy6XoI/zZ+Rw
+lBYows4sTDbHehaxLQY/Te2yIyuRg87qBIFfqXxjIxPzHBztyYF5Aq1dlb+A
+fq/J+7oIGZrMCNgBTeivqH3SAubf9/ik3UXsv31jTjNwyRKXe67AgrzjT+0g
+r4Hw0TNfIQ/Dt/YO4cBSrnFVOXBvs1QcANw+4XXDH/OqOla2FFjMW1e3GJiO
+S9yXAnrcxGZXkSH4GH/R3wj9B4xvuMQDE2Lq0gb+egQxW5yBuV6bE46Df5vC
+MQs95BP/rlaB+f48WOEmg+ezP/SnQx4jNhzDEQPQl6ZuZEKesTxW0Cgw96rC
+ob+mKCIueJUrB+dFG1Nqyj9TxEGLcRz1RBVtcuMTkE9rpx+Net9Vf7kmoYjP
+poLAcOz3MGg2fpwiykuZ7rnI6nf06j9RxCPjh3vonwSX5itC3SPotN0I1k1T
+4tlw3yFY9a4yztvlHGUI+tEtUm8DZKOj5nGTFBlI8h80Rz7SMqktpciCXPTz
+lZhX2tPCLvBro1NkygTmPjaTKZ6miLwaPSpFvzfnErxhHxbG6581IjvX1bbB
+/GPZTxzTgem9V+dwH2KrLodjfqJnw7ffAB9cIf9tCvPx6jtlD/mZ7Q+x8kHu
+PvSjIbJut36lPvTXKslIhvMS26OX1ZHvV72KgH1mpflx4vRAT28lZwj6Z6qp
+dc+wgSOuf5oHf/zuK6VpwKTT5HYD+LeUiCLXA3OFt1UCIG+WQFgqA0xvTTzz
+DvKJqg+1GdGF8yEDq16OUSSQxz/8EZgrDSerR+Dz5AQvXYT3rZu7FQcoIlge
+cs4R9ftazbN74XzYi45EZFfGy8G38H0a3m7bidzDluV1UcRw5Lv+WvBL6vR6
+jF9TpEsnpCEJuXl8tAa4d3PikTZkJYMgzhvo943xjwbO6xSV5/YO+GGBJw3M
+TZCf7uuDPPbLpPkgj2p8ZQ/C/E7a/p54/rJuaxH4deFZMsyRd88qW8I8mRJ2
+/jDqF6mezob9uGIREZEKzN3g4+gM+xAYMpauCUw7Vh6LhX3g7/Tdlor5BA1E
+OENe/OoixQnMQ96SVQJc0zOvvAOY3tIUn4R160KZ35ch7zo8CPfFyxZEKsCi
+BwdSn4M+62N8x0kd6N/1YIMT5C0WNVpOsUCvRWeiGPzR46EdfGQFWSUr8C/u
+42fZAZPrtjsC3lPEa437c4K8zSRG2EMREnbJf0Qb+M7d2aFWmDeL5o0hr5c7
+4P43+DP2WKSC5720H57No8j6U94cGpllc+jlAyHplbQq8pCdtDZsbRAS/haP
+6m7k1tqs3mYhIeyySiv0e2BrbfILISlbfITDRx5afG5di5DEigeiOpFd3u22
+aBISbv5aay2Yl4i646qFQuJix5zahJzJvuh+Q0gyH+t6+CK3C+I9K+H3kmQZ
+eCKrZojWNcI+KIa2mf7Pamr2ME+URuRPg6gfk1A+B/tTRkvceMjGtWUfYB9m
+8tyK1ZHzlXRfwT6YSRhPktG/SdStMMir0vsRE/PgDpeUsmBfKxn6H1wxn36F
+CjHU+SVy4ze1gD/JNqX0Q35qnGlFYO5QbqM77HNvsE76CSbup0LFHtjHqOq4
+KxOawI0xj/LAX+WOvczzyB4z6X6Qt+itbYMNMj6COiLG/08N+j/4tL4C
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {0.17544091714677545, 8.052815449711936}, \
+{1, -1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000000416`, 17.}, {15.49999999999958, 17.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.75, 17.6952}, {0, -1}], 
+        LineBox[CompressedData["
+1:eJxFlAtMFFcUhoeisYKCluWhVh4zI9BIKcywsK2UHm2KUA0KLBZEZXWBWooV
+2fAQEOVVd8lCjYq81rIoBeRVUGK1lZfQEhYEUSuSSOVhk+Vhu0UoCAvbO9bc
+nWQy+XLvnHPvOf/57Y4cD4h4iyCIUPRyX56Oe5yBeP3Q0CCeWfjN8wMgRMUe
+3m401LSNDqSlIz6qWed3gIZGv/LVil7EGu/YV3E0yJ0/CzY3dQGivrF56jQN
+bSE1pkYeiNUXPyo9SYNV/NkXioOIg2VO0WIaeoqeHvNPQ6w8sj/Ji4ZXm+6o
++5WIYYNN6xoaVLFDPxj8wrH8nz/uU9AYcmDKuA8x8fCuQS4F+9K/33H8KeJb
+WovrOymozuR7rxhD7CPbXGlAQUKUqEU3inheGlDQQoJ904lHf3P7h88HGGSR
+UCgRZzT2IxZMSLVCEr7QdndK7iI+EyXgMSTw8wbXZtcjtvWwtLMmwWRirCPh
+MuKj+X6uG0mwyZ8yupfN5fN2TbInYUBolMlLQnwu46ugHSSk9o4mN0cjjjH9
+1TeaBFlm7NdrwxG7GDvaXCEhYEA5seIwYs3jAu0wOh+ZOhPKrUtDenO3UFAV
+4i6QfMPV57k7P5qC9/mWC3tOI94rsGAbKDCsCFUVX0LsWGE3qqFAqyEsrt3g
+8uumxhxoiGjZKkz5nbtvR/aeQBpeCHnCwQXuvPmzT2JoqL8ingskXVH8NidN
+Kg3+pChe/DniVt9Dj1NokChbHRNOII6p1FVE0SDd63/b+BLi4d27Q31pSPZU
+l7XcRCwK8rqxkYafPNr/iniAeN78usMIBbWkao2Fmov/cK69hILvCle5CeYQ
+27YVLIVQsGpy8lCOjtv/56ksMwqGI/9VMgYMEFZ5L83vk2DVY1lcokXrVknO
+cIEEuwvW9sppLn/30jYRCfEnd8p8n3Px8gV3PiQhMtG9b5LL7zjOquzI/3Xc
+ilgQ5FK1AfX7bJcLr1a/Lvv2VvzNYv3/S1+ODIbl6OOrWXW4KEOf37Zwddi9
+VFd8vnkerzT2jP78MZHz3Z1S/f0Ch/gvx/P1949s91xfVKuvT1a7ZSh06euX
++GOd98y4vr7ysE8GpCYMrn/dUIlMwWdwf44FK96uOcjg/plVT1bbZzG4v8Xw
+qDqjisH9NzTVje/rYbA+loLL+OHjDNbPA5V6ZT3BYn1JSrs65etZrL/BoTTj
+sk0s1medY5j5ojWL9RufnHNxmlt/o+80182Z281YrP/3qmeTJ1eyeD6WxWaz
+zCyD52fa/N1t0lEGz1d3lP10XB+D56/S0E0gb2LwfEbKFSm76hg8v3Mf525d
+d5XB8y3NKwHiMoPnX5isur2oYLA/XDt1uOkct/+Nf+wqv2o2U89gf3HPIfcv
+dzDYf7Y8+9TS+RmD/YmNoM7XLTPYv9SyxHfEJIv9zas8UDPrw2L/k/T/XDER
+w2J/LH/itNhQwGL/9Cky4bU0s9hfHXqz0hUjLPbfuNeCdsP+/B9S6DsJ
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.75, 8.354800000000001}, {0, 1}], 
+        LineBox[CompressedData["
+1:eJwt2Hs4lNsXB/CX3C+FijBpdCIiplCSNGlcKjEkl1yanEguNR1CJU1CkphK
+JVQTFUo4pahUQyoj50RyQhekRIcaNRUiv+8+z88f1vN59rvXXmvNfkdP+kHb
+PYKlKYrSlKIoEikZ8ovOpP77mcOkhMFj/i6wj/JsjjIsWCvtmAM7TykzUYKp
+on0WH2BBNb33529MyiVGrpihz6QUtDwKu+C2gVT3aDh1C1fnFll/8Y92OZz9
+PCgmBa7WMnd+C4t//dq+GqY7tWcqzmZS/PhCQ3lY5kzfLAPiAwyV+4iv1vNK
+LBGr7tNE0Yhx3ow/rBFTayP1TIiVWBYLiAcDH71D3grb2eZ02Lo/cv0FONSH
+Pk0epszVZkbAY/ZhAx8QZ6gEqduRuhXb5B4iCkpGrukiSnKqXgkQu262j8si
+qjnd+baX9PMPK3AcfYsbFz0JJPsGxVekEMslU0scSD/rmkw0EG0X5+Rbkn0S
+/+z5iEUnnAJIrDKRZ3iQ+hbe1l2AGNcxR0Ty0vWSBEzEtn0JH68iNmqmGfkj
+cvt//9CJKFzmFnqA9PGX4i819DF20iXzBjx88UWMHexy1cx9CLbeaP8gGI4X
+8SVkXpzQ1pwkxPr2jJAExPJV9OmnEZnGbI8niM5aQffPIwqa9y3VxtyFUWMl
+Z4gjUnKC4T69r/vT4WlRrJGrsOAmFbsNtu2UmyKGjVZqeLNgFjuuwxj3wmeh
+Y8wUuOT+lipfmGvYmt+MupKebopJgJvm8dWOkLnbruKcgqvCXy9nkXkNrnO+
+AIded+sewXyHJeqHLsLiSN3Kcph7fotUHpyqW7czHK4/XaR0CG77J/iiKbmX
+1ayt22C29mfFwVn4/GbesHYl+9Wzu0/AjRFHWubBama9OV4w81JNlRzM2/f8
+MwOOuOK2/R364XUKYg1gmn/G1kdkHnZaAgtYKNzSXwqzZVQrfGEO61bvObI+
+6cGnLDidPzacAzNWeeR2w9F+ixzOwz5/bjw3E/V5Kg5zr8OhceHBrnDbIfnc
+ZpizTBTOI+uvqQ3kPeLQlolJv/wxqsaczOfgxRWvyfNcg7BI0k9p+htpzKvu
+8daUa3C2zpmjs8h9nWn+ZYzMx+xmGrlXvB9Ja1cbYC7pB6IWw8z2WVrZcCjr
+agJ5Ty0PPqnvgXkmEi6N3KOG6ZJ5hji/+lnBT5yXJD0QEA6nFiZJPSX3PX1I
+qwBuW5w/egqult5+somsVz/c6QOrtXTVfIGN3ktuacDWlwMmKc7FPPpTio9h
+Hj63ndZMhbsiLo+O6+E9/DqmrgHzTNX/jYDz0hI85GCxCrv13UzU0eGybwj5
+KE/l0jD4VeT3Ha2wMKTiiTRs6jHdqwJWc3W5UU7DfUos5vNhQZbvaAxsG9N3
+IYL0k/Niujdcdeqm1hpY/DU0wB2W8Zm8zgzmcw6Pb4ZLAk+nzSD5Qoal+TAr
+61q+MtnvWM99Cou3Degowrx1/kGzcH6q1JRxdZgrx1+8B04qdW02hLtyl4pe
+wzI2K7KdyP6dFQUr0J9aX2tDFMnvdZ11HuZbu3Muw4z6bt8f8OZ8hY5+Yl/n
+cTtyv3b6ejIwj3LrzwNRsFigk7cH5pguuUPmWWd60klE1lkt37JhmZFPzZpG
+yFuZsCIZZl2/U7kJFgzFbfWGu1SOHS8k6zeebVIj+5uXLemFqfJc22s4vyRh
+29+6xji/NECDCQtrajsdYU73lzd30Y9/rv2OEFgscfRkwOlN6Yq7Ye4S2Yt5
+mI9CmXXlflit/ugqBbiJZq6WAJfPHaiJ08X7lSVtwiXr7bbeX3Vwzvejx3xh
+wZ1nnfGw+EuipS3Jx1mSqg1nBfqt0TEm835R0KiNz3PjQofvqJfeOv9gNiwZ
+nlH0DGYYhEQmwHOWRX37E+au8gkjdnY8eOQksbB46ym44lJSViLMnD156WOY
+YbyoI5b0/0jvihLOa0rY8ZCYX1tWGEAsa8Y6QPLby227Awtm/hDmkHzDPUI9
+9GP91wK9e8SHpOckwpZJ4ZUDsFjkp9MFC/0KQg1Qv7B2z2YLzIMevTSXzE94
+a4ZtLNzWPuFdSua90iWtEH51JiZglMxriaxmDSxUil/iPA/rlflFxM5rFYJP
+wMzPWnOLYMbCHk4nLNTaczYazn4/0fybCfaf4q40IvtD7PI4cJfers0PUQ8t
+JWj0OCzcfM/NDWYOmR+rhhmxqfMb0J910aMD7TBnk1yzDWy0/GjUR5Lvr8T9
+l8j89DwzPhMvi7qnASuIzA/2w+wbSlLJM/B3bKIkk+xnC6clSMNVkfNX18CU
+U8fHTC18PhZ+lfkwf7jUaQFcFx42iwc3lSRf69fE35cl5sN+sOBzxso7cFaB
+mcia1Dv0x7dLcETsh8naMH2nZU4JWf+WrTdB5lFp87oBTt3/WHmQzIsV7jEB
+N+Ve4b+DufFFRx1xHo9zcrQXZk/ZG5AHX+g01v0Gi9uXtfyEk76qLJ+C/OJ5
+vPyNqN+WnjTPClbT2b6qFmbaa9JCyDznrlunh/6FLrNaBaTehSknt8FiXXFh
+D8zVn7a9lHjDyzRTU5y7dNvXdrgxxdt8F1zu3EH/RO5zvjntMczfdmG8jzzP
+Pi2aOh/rqpllIng4aOiuP8xN3p/Mh9vc2orPETfIS+zI/dbbntgBq11qSHqB
++sQRadnKZoinq28FwNyWlisL4C6Dle9b0V+bDjWyBha46I+wYO7DOPsNMJ3h
+7lqOeUWnarb4w+xbq0NnwnN6/trtSfbLbr15dDo+39dRyfYwL8bKSwPOpsmU
+GMHUU8/2gmn4vnk7RUoRLg8vVl8NG8Vatr+fT97z7+/lYcGuC+U1MD30K6Nz
+Kr6vzosnk374LTYlTfDz5ewwHsw+M63vJUz3L1MOhQW7t7AnYMrrvsQbFqte
+sLNGvldWDJE7zJF9qXWAnN8zrdoLpjKKd76EPZ0dErfATWMmPraol9fmszqJ
+7FcQBgpg2rGs2yVkf4qGrDT6HTZ8J+kkz+c+6PaDy3f9KaCReTI6eorgd6om
+oxzSf55L+jvYyM+l9zLxRzV9Zcxz+E2d0jB5fiv3hTacXl3a52COekLufp0M
+VxS/Hz5q/t/3xWty32mO1fXtMG9m429XiJ+/S1NlYB6/7u7xhBPSRV+NYbHt
+8qI+1PtM94fHCljNWisgHD6WmDF9HdyksmlaN/oNGwnrCyTPs6+/dIVpn5rv
+bCbP/3tX5zbm56VjUEfM+dG/3gi2682I3UjOe1Lx+awGkzIsfJC6Hi4POPLv
+bHg0bmqnE8n3o7+iSh3/nhwwTF8M05Vpg7/D6TYv7xvAbBdd+7nwvIHHt6fC
+VKwuWwZeJCcvlCbruQ6ZP9Xw+VrUqvaRfq02u6pgXXxswreZeNe925ZwX07K
+ugdwV51IsgOusjqRch/mZD9iCOH6yeuVH8NspxfdOqiPMX37rg6YX1A4GA/H
+m7p3j5D9Z/16u2D+slvBGqTfaAvnFeg3dNtTvfmkv1zjqmzYpVXudxeYue8B
+8y2sYNTjsJ2szw1K08b8GqIb/8yCubLHVZbCdUcCo++Q/v0Zi1iwZvfEmrdk
+fgsOpVnA06INvssvIN/nDtcUyH38fn6ZCcwcY+2rQ/429wCFNTCH494TCjc8
+afs9BOa2ynYMo97VIUOZ8TD72yfHOPi2WYj8EZg6vlH0L/o3yqhJPkXyjw8d
+9IEruEFKeSS/rNL3B5hvY0tiWw7c5SQ+YQHnH14anQULlx+O9p2Cc10L8w7B
+PJHx8dDJeP/qt6zcQ+op3KR6RpWcN7g/jDwvvCwcV2FSlxeNpvuQfEuCsjLh
+YZsvlxxhgZ2+/Xr4D9oR9UXkfPHfi9zg3drHJ+aS/Qsbj+yBu2LtD84k+Wdx
+Df+BNZxGTmiR/endz3xwnr9e2XtNmB5rc/YnPGp6U6JL8g22G95AfYZ0fYrk
+4/3qUdiD+m9yVaWsybzKdOfpo7+sD+ISV7hcyk2GB/NkP8SR+rsi/ETP4Vcj
+befSYLGifL4O5kVF2ZiUwvzeg5y18L3lw+MtZP/rkbKtsNpDWvcomf9hK5tI
+OPrvnKP6C7HfakOtF1xKy//bEeZ9ebXQEM740LFlK7Hp3rOvcJ7t8d7VqTD7
+9lTLePjyjPTMfLI++7GBAhxYJZtYCQuVExQV0Y/k6ejlR8RXew0G0P+FuU+e
+PyW+56xTh3n5H/+s2gIzVR68yVVmUpcknkVNZP1FUmSCEvpUvWUlggXmJo4x
+ikxqw9mF++/CnLX87+kKTConzCyllJxfvL60QZ5JxZQ5BZ+BKZ8f3VawULTb
++zDcdT1FqkUO3/f7Vgp2wfT1axwvwKZJrH2kP2Zs8uli2EVJd7Y/2a/KPdEF
+x82aOOlBzteKFbCQbzS1XriW1PcwUv8prCDpdHEl+T2jG2JRj1xqxhVPYnfb
+H5aod3TKJOVNpN6Pe3XGSP0rHNZHkXWvOqta9Fcdbbbg8H/zWeEVj/6/9PnL
+FZF+BujqdMyn6a1kEumf5/ZspAA2Ne4xHiTPq2uoUpjnzfeLPadaoP7QfmUz
++C1N29kGprzP1RrDm0W3ajhk/csf1kPYryBTmZgMCwKpR0kwTc6aUwjTf7mr
+f8D51F4G+yHMS234TINP7jDb+YbYys58PuoNSZ9v9IXkW3TFma74//9Hsfx/
+VGD+D6J4HSk=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.471090192570806, 5.161297472978525}, \
+{1, 1}], LineBox[CompressedData["
+1:eJw9lXlQE1ccxxcLNYCYDSErJgri7lKtyGWHVDvVn+JBCw5gsRILSCkEWxA5
+goLgBRJxMAoZ5FIGGSynpam24oEKapCrXqhUUauIFKIVi1Qy0EJf+sfvzezs
+fGbn7ftd3+9ziti6LmoKRVFR5DG9C0cnyXIE6v/FwcZiv8LQQ4RbNZ4Jt1go
+nOI2cc+GMLzIPVrLQsHAqklJhgNQ9t9sc8hloXT/zNJVQ7OBis+sn5XBQuV6
+67iHCsLV58bd9rIw8jqhQtkyC6iiKbsjNCzkPV9+X7mYsLHWx7WSBaNY1kw3
+yID6TTgjs52F9gilBe9N+Knc/I6RhRy9dlT/VEp4uNzBjQNoF8jXawlTma12
+MRyoVPtzFArC2Uvnza3l4JzTduc4LxMHZmkHOfBs3DH5yXzC7nnRPzjzsE+7
+IX+nO+GUWGNXGA97PYJ6p31u4lnXSw/zsDphdGIs0bT/K/nbMzzccj7lp6si
+PHAkheviwefS5UFxH+GPj1n+08tDe3Nq9VmWxBtw8d+OFzyMHXtTYRMhM+Wf
+kNzDQ/Sf00JySwhntzz59hoPuk7DoolWU77STyvLechb2rgoc5Cw8esF1Soe
+ak+m2/QZCdtbaUOX8SCtTCwsHyFcZEgWmvOwpGPcy67HdF5Br4+eA++q8Om7
+6gjHF02ez+Jg+7vdvFhJ2H08w9GHg4UN9KJRa1M86XqpkINneZSDRxmJH940
+OTxmgUtLupw/l3D8OnnAzywcnit9UFE8k+yPmb+1gIXlC1T50QLClKbs6j4W
+XI23PVYm2QO1+WChcA8LH9hNvdH6ZAZQc3JOqbNJf42vA3b6Ew5+f6KjlIWb
+H82v07UxQOXuevP3JdLPPRL1Z4GEdQNbigwsOMVaxx0dlJB63Iu668BB+GT8
+2hVHCNNnN8UqONB1l7dZfEnYXS1+XMhBT+/1C3oXwgFaKrWbg+HurKPxMwnr
+tF1ZEh5W7DR4m8sIC4SKjf48hGnUlsVupv1xp9MyeCi74lK1LYhwk0X+2ZM8
+hLjJZZ5qwgOxfss7eeiOcV3Y1UT4uJnuwu88JBtM+iBsn/UysJ8Hj4bbd1yW
+Mfhd831r36+pDO73te0KPlDH4P9z1qS+U95i8PyqDZLG8T4G45vhuyPycD+D
+8U8flq9c0sVgfgrfMK+xGgbzP3Dv0KmL3zFYn4EzI3mRDIP1CwsypJ6pl2B9
+pcfvB/l7SbD+wY/oHzN0dtifK01GD7mTHfav50PXGxcOirG/1TU5MUWjttj/
+HVS/c4jSFudDrzgIMY9FOD8C78lnN8JFOF+Ns4c6BSM0zl/ik90PXxXTOJ8t
+aWV/7Q2icX51luZtLzka53soXbM5zJrG+Yd5mcOyqTTqI6XPuzOdoVE/iwWS
+TjM5jfrK/GO4YmsUjfoTqoUhw6U06nOOWL1hzSMa9dscCcwrmQj1La1fe9o/
+WIT6v/qTwMxCI0J/2FxRN/vtLyL0D+WK6piMmyL0lwb7LOrafRH6j/vp7Ad5
+bSL0pyP1KarKShH6V43VaGvtFhH6267QLYIljiL0P8fE4rGHjTT6o63wxdIh
+Hxr9U9eb9oWnRoj+auiQnfNMmo7+21IyyPr62aA/F5d06lVO09C/+1Uqs7vj
+VujvJ06UvxfUZ4n+v0kcfXvlcwHeDyfOm/QxFe+P/wBzMXw3
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.5, 9.0548}, {0, 1}], 
+        LineBox[CompressedData["
+1:eJwt0w9Q02UYB/BXioG38WcxYlDSEISBKOgdCfLHn2ODAc6I02utEJLoAE9F
+0LH4szAFByVDizI5Ok7GEgrYIjzDi6vAThDYFKgEzoQgVwhbIPEnjL5v13v3
+u/c+97zv83uf597X5/DxlEw7QogMH53J8jrGZobY6BzEEFeyb8DNlyGaptWP
+u+AHr060boIVbF1JIcysOxPqQ0nRRWGw3LG3hAuP5x/J+DOQIVlFvIS/kS/l
+XCoxwOEzI9Oj8OMi5ql8OHTN6UUjLI+9/DgSlk+3nXgHFtc/78+h61Wpz8XD
+uax8/ZSQIfV/5M5vhIdTi3f9ACdXjEz2+jBkyi0p3ghf6hQvaGDnsOBHjTSu
+eW9nApy7bfTXBjh8uEzHgZ89PVnTDJMldciIgCF5AqHn17BhrKFSBxfvfSlq
+EGa+EW4vhtM7eqot8K25rySpcJdutYCF8wm5Fxul8Lui9J3+cP0Fu+4Y2Mar
+tErgb0NYhj3wW1WL9zNofXXtXkkwz3uAUcNXI7clp8OhVq7yA/hng3usGq7y
+/8jlCl3fJa1pgKWp0WNX4epatW4QznLaaNXT/D6ZnzyBP31UaayFiaJBtR31
+GXYc/6Wc5hMFhaXBwZqZ81n0fxcDu8/D+k1rgXthjWQl6Dqc03zqJBcuFSTU
+jsO7a1yLRlGvo/3c2yuwKLmlqg5WtRjznND/UOPWXa/D/KHaMx5wZYVkCx+2
+cGNZ1LsDrJuHAnB/XjN1sGk8cNBOCycrlMZF5POqTtPK4NA7iqIR2Pwwq9A1
+gN6vewufwzyTTHbPH3W6HXu5EJb2jSqaYBKmdhfBpbOO7adhi/joP0/Dy9qt
+nhkwv1291IN+xM1Mrsng0t/5Dmdh3RBPKaL7h52ixLDXNVcxA9umay470H62
+/WaKg9O/U7jVv8CQuZmxHQfpfndyJga2XOuNyIEN+eyCWW+GHGjyLDwLV//U
+k9AGJ8avHLgCM2qXz8rg8vlE9vdwaPxy8Qk4hdPXP0Et8F7Ig/sDB26tww9u
+x2ZXwH3vs/d4of5chl/SDidzbmtD4FIx8bDCfPeJxBjaT+ZISQTOc0i0FiWh
+/btLjmnhVduNwljY8EVX5Cz8ZVpIdjiN71OpAlBf1MOj3b6wOXsqQg7f1fDq
+7GHVK74/lsOVNy68cZ+eT8s6aKRxk8TcCgs6M6fo+zCX1S4W0HrNC5Z5+l6U
+cp9IWLjf08kB/d+vU4+ubMH5+YkyLqz0CLnTAV9ffnMDtWXaxZQL8203J+3h
+5vGb+mAajxhytiFf6yUv3xk/1H141t4Mq2w5f7XAUlm/Xk+9YalZCcufOel/
+Cha6NH4YBwv8OPbR9D0+6ezxhv8bgv9nP+ZfkwGqQQ==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.286723682459369, 12.031518421803128}, \
+{1, -1}], LineBox[{{15.5, 17.00000000000231}, {15.5, 9.999999999998607}}], 
+        PolygonBox[{{15.5, 12.9}, {15.1, 14.1}, {15.9, 14.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.4452, 13.5}, {-1, 0}], 
+        LineBox[{{15.500000000007276`, 17.000000000003638`}, {
+         9.500000000005457, 13.5}}], 
+        PolygonBox[{{13.01826734053906, 15.552322615314452`}, {
+         11.780184249251306`, 15.293188945044921`}, {12.183281069670574`, 
+         14.602165824326175`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.323799910437668, 15.984057296392571}, \
+{1, -1}], 
+        LineBox[{{15.5, 9.999999999996362}, {9.500000000001819, 
+         13.499999999996362`}}], 
+        PolygonBox[{{11.98173265946094, 12.052322615314452`}, {
+         13.219815750748694`, 11.793188945044921`}, {12.816718930329426`, 
+         11.102165824326175`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.323799910437668, 11.015942703607429}, \
+{1, 1}], 
+        {PointSize[0.04], PointBox[{3., 10.}], PointBox[{15.5, 17.}], 
+         PointBox[{15.5, 10.}], PointBox[{8., 10.}], PointBox[{9.5, 13.5}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T7", " ", "P2", " ", "N14"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbf/cgdhei/fiijghgjhj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbf/cgdhei/fiijghgjhj.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {22, 22}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwl1gk4ldkfB/A30c1OSdas6dqvLUTuaynNpAkjLmWZwpjIUiglrmhki6JJ
+EpUWKkJlFIosoyRL0hXFIG5GISPbLf/vO//7PB7P5/md95zf73fuOe9V2Rvi
+7MdHEMQz/FH/idklfNRI4r+PPkksemYl1cP0zZlvm/XI2veqkxeOw6VGD/Zc
+0iPJnIO1+QxY+epITaweScyZaAb0q5IEZ+jisTDYaTVjPhWWuMXccgjjn1zW
+/s0Spt9aNp2AuPkVtweTKiSRfXs88Trmr8t4dOEOXDi7gfkK8RDa4aCD8GXz
+8gJhfZLNsY34bguH2ruVbYfdrQTjVeHaMI1v6fok+fJUb6wYvM37x6EuxKMs
+xhtpsN3dT7uFGSTRyRUJF4WNC8R4dAZZ+8+Nu3zrqPnI59XWDJI9YBjEMqWe
+P7r5RxeMb7u+YcQVtuwsLvCGk1T8nkXBDYOL9H143jF9+ksuXBq8osAL8VUO
+X3bWwBlZaVudGSQZsZs2/Qb2iQwps8L8Xcr5FmPw/T37BtUx/ue6DfNTVL3q
+V7VXYD6dTyGnPlH1JnnaNCP/nyTzP/bClY9ZtDjsh/iH/NZqql9aVU6bUO98
+1bacDFgmXKJpFv06LCfox4LJEbGOarjZZN/wGrh99GZUKvp7q3ia1aKM8XNB
+Zr/Br1wtQo7BrLX7u13gwOBaeU2Ye9xwlyOeH4/uGClRglV/+Xs3vJdpw78a
+LrS3aY+Ek3ct2iasQ77BjYX5eiRbauJzEQ0mi5imXfC2dZlbrygiX2LmliTq
+mbnnQ7jA5Mm+KhfUY/FyKkgFPsK41n0BcY3U5ipBWObbdYd38GHTnnvC8J4D
+15+Kon+urNl6dXhliup57B+bK7ltvRM8/ET0/mb002twTDQV7pJkfd0OsxQM
+ptpgB6n+P7AfbBkm7bk08tOR6zV2glXMbwd6wMofJt/awzlHI7uy4KDRq983
+wqtm/WNqYfZZzaNKsKQlo4gD5+oIxPFh/hsL0xd6YLOKBqV61KOSsr2VGj8Q
+51wWjfz7K/lk0+CA+QQ3E8T5fB5XWcHcpJNPJtG/grAq9zfIj9P4e1g5+sVJ
+bR9xh7kHfa8ch7U/v4l5roBzZVWyfBd8ezJTTw+uTfIs2oTn5cym7ibLI+6g
+OKwP91YbKY7IYT6TbGMTjH9vI52/FTaLfmT7I+L2IxvkymXR7yXr0QMwJ66m
+Xxdm7fc2yMN4Q79c/8cyOK/pfyRzEI+olBf/FWbdONEli/wvBfbPaMKlr25n
+esGvVVPe0GB2huW6AtRLBo2uIOBmZ/XWIcS3TC9GSMCpusl/iKF/w8oFHSZw
+7tu90hpwIaleEgivJMTUTNHP2sDjT+/AhX99byMRH7S20Z+m1ruRlmmD+NYH
+7q1myDdAXe8nS8TrGNHsw3BW7xoHPcT71VWSiuDwTCtrWdjw/NmOZ3Dzu6lY
+HvLjflU07IInBRV21cDxc22FjbLU+fCxPgLvqGmLy4XNPAJfMZC/6EqLYBZM
+tEU+HEN/7pzbeWqB6o/Kl/Qi2Mes0O4kHBArURYKX/V0duKthSU7abboHzMh
+3NcXLi3q56oiHm8t/+2pNNZv2zotCTt0Rcuug5v/ergggfH/2p8ZObYG5yPt
+ME8JcY+xjQcGpbB+ZaiSFeJqMxbWbnAz6+YTnF9iTVrqxv7V2H9lg4TLsHRE
+mHIMTP56P6Yffq5ll7cRdvR/6KyG+oT67ecEYfqq2r0BqM/3yXGxuVXI51wN
+cRtxRw93jyW48Ftk/igc1m65XBHjM9Il43D+iMm6Qv4dcGHimJEK+r9WTsk3
+GR5PM+bowg7vPhxqg+/fOVFtiPHVxtpK0si3b9TtvD7scum0BQv2zSFScP+x
+PbVaetNhh+QmtVVw9nn9/D+pelP1r3zB+vuTq+afw+2JAsUVyPdGkHxYE1w5
+4xV7CObNOLbcpPrhdChNB+OFh8/pBMOkIl/sB9Tv1T2iKgcH8By+XUE/z/Ln
+5BVT/frAi/Oj+vlgH0cbHhA8STeCX/ytpnEB9ct0hCeIYrxcw5PaBUmMJ7kx
+X3VJosJ/dYwrXHhpxHJCl2TPZd08US6B8+pKk5iD30fbT0jBAX7aB6n9NKg7
+o0gTx/0YnyBiCp8RKJGgiZEEYyzlGbV/d6RvGhuKYv3A2Um8/4jZjz1PT4ug
+nhITBy4sK9/iqQyzOIlOuqj3SvahgVFhrL8r8ucw6vwd6HYegiel1MtLYc36
+CH4xjA/NHhPmwruOWLf4wJXx7iZC6H/flrJ9nSLU96X7AXU+SoaJT25YX6Hr
+2l3sJ9EVLXLsA8wd+vyfM6W1K4KRL52/o4QaX9dQxB6Fg1Y3ilPzZagxL9ih
+PvIgxwzfFyKBmDWIhgeCvk+XwCnddw/9DjsODhsFw6azW0c9qbiy6Q467Lk0
+8XgJ8ynTK3sGUK9747vFQJjIn0u8SL3PBsng68inUnrmI/X+Ke3ITi9D/vSP
+hlvWw2OnfzLPFqbu+ff+C9gfTkSIxT4h9FfBJOYdnDcv3KMoiOfyNi21wS6t
+ygZdNMwnYpreCUeKz148uwLfL1Vx3jC8dD5ewE8A96PUsNUK6vdHfcQOV370
+c6YnyRjeHub+IGQ51ovd7kPdn6HDYb6VfPjvolFZDCe2vaSZwCuXlap+gcvO
+Xs4cXYb3X17GwkbU28CT1GyDZbweZuG+IcItl6ty4Wa+82H34L4mARsdPF+a
+wAschlu7BYQyYbpvYRg/+i1gZ6W1CusbE34h4nBzWIxIHhxuPZGJ80NoWp8M
+0UK+7Z52xdR5vTyyU/g2PL7eZoaANfrqTaRQX7aGleJbzG+yXzp2Nxw62jx3
+Hf6m/nTzEZhsfUin7odcVgWfL0ys8HiL+4NIvVY0IQebmYuc7UN9IkdX/nMR
+89ODVXjn4A5mQwkX+RTWnKv6GWakmZcJwAOHfzCXhetCfT7Oo142bUvkR/Q7
+d8Y/7CWB8foHhppgRz8jWYUlJmHm20Deg81mCL0kHpPgPpo8eZfaT/X4F7x5
+JsHJsX5dBWcYbNuWPsvEeRuKegMXVtS6us0wiVKm+xSB9Txe5bwPmGYS7c01
+S3gfEs75HeOvpphE7d+PWvF7lAi2Cn5XMIn57G+I/QlP7mT/XjOB8cn1OjyY
+vCWgKwTTE9yjmKhfR9PTUw12tJH2Og6/2HNC/F944KtWWjnMEGK1lWC+9pYc
+3T544aFReS7WY+TuXzYHi8x4exd/YRLRvRxr6vdDZ9+Be83IL8s7OobaH6Ha
+tbzX/zKJ7LLXqZ8wPtja27YG9Uw62tFb4E3TnRkBX7He+o7Ui3B3lrZEI1xK
+s9X8Be707xJtgB3HF3nr4FKGevVumGXSFEK9zxU2T1QkYr7LOzXVz8DfdyRZ
+/YD1Tn0uanKAtYTlNtxEfjI58X1isOp9xePFqOdIVGjWW/SX8bj0r55x7Mfr
+uYvl8LUq76DpUZieuJgNnwrf9M/rQbhNdfE0zFaVd/XtZRIS4UzJc3CoaOuL
+gx3IZyyx7xY8EOW1Z38tk5gbnqVT5/O/T8rm///XI/8Hiw6/aw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.887640361876243, 16.89239276247515}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwl1QtUzFkcB/CLDmMrJk30ovFYBtWOShI786dWD5XZ4eihGKm0s8XUolCM
+yqNTalLJsxI2poPRklHZnaI8wrZtJ4Me06omRNNDjVft97/bOdPvfOZ/7+/+
+7u/O3JkZul0YPpYQIsGLjmQK/W8qRZh0ZFLE2SX3erQZRUThGabrJ1NEuHFE
+/5hFkcKottTXkyiiDNx9dw6sGXRTVsHik9HbE0zhngld7XBZz9SQl1MoQj69
+sfTCfB7LdL8nzLZ5YNcPGxRs7XtoQhHuGo+JYqxX+6fj2TBYsT9+UR+s/z7p
+vRUs0L40OozoYHu6kH6fKWh0nY08c46+Ot8Jsxf7fa6E69v+mjEEq1RvSlej
+jkse3ak2mFfvMxJ1H/6VZdgZDDNDb62dT9ftZTTuEp2fFzAtClZPGer6CLOr
+onjpcP78bLvVyCtYuDLoCJzg9SUhB9a0HbHeDB8vyRt4CiuKnvtYwBtdiWyQ
+fh5UmX8T61nOu5lGEKWFl8XLEX32LT3fi+ciibPfTURhTaiHClEay7zNQXSY
+8+5GLN2vZdnRBajDMqxXx4B1RXu+zIRZNqHyQ4iiIqmbEvtsWpIylu6HIjZ1
+KBLRuiKU74dISja7LkX06Vnwwht9FtUx/G1h9+OZXZ+NUV/HjENucLrjVe/f
+jTBeFapJhJW8H4oLDCkicwn4WQ2Hddg9LPmGIhKB5yo/rNsdxhp+OxHPU/sH
+1HCKMDA8gnZsbqUEdcZfEamn076cMssY+2XsbdxjAnOPiUMvwkyt75vlcP30
+C8NcFn0u53afgAUZWutLcHNc2wULrKdKL1hhgM9dwm6u4jeYvJ4UTcGVi+dF
+BqA+KicsNRD2dFis18OkWnjMDyaLTj06hP3ojMUX2LBg1tmwQZjdJOhpQH7r
+iywHZ3r/ur93ieGOcsrJDRZ8Pd/xDvXVmxWnmsEqe974cFjt/b5WjvmCLdpw
+NX2uQ3FWBrAs5FqtAN4Rf5Q/F+szTcwLm9APA2OOHV0/xeHmx8DWt5OLtQyc
+z8IrdhzYqTTnRP4ErHO/2XIU/U2x+eDrMx71OXO8PsLdUU8LRw3g9JjD0zA+
+uENqdn8c5ue0JgfAleHeRDEW37/ih21K2LyuvaJmDM6nWx7qiHrcH/R8ZcLM
+mXrPKtjoWMzaPIJ8L4XyIOxnh2TCkyBYt+mLbgiW+ZS1BcLc/KQNR9GPS+f8
+EzLhwtERqRn6Z7DaNHgArm+3qD9M9ztXkrgH+XX/rBvTCjcfzHs0DfWwL7fu
+NMW9YdTX11oJU20Bid/CjT+laIJQv070yz76ud7wO9ErWHRveJSer+QUOHph
+v1RJZVYa3LjJcvkBWJbefHwGzOVETUqGBekbBvNRX1Tk5Fh6vNSGcZkFC7xN
+FQ3IR/HK1x3BfnRJJlfYsGY9s2ws3DhV/tgF9dR7B85NRz9utNgXzkb9oppd
+Vrb099ow45F6lE9kyfNvdaOfslVrldRXPuE+2SauhamQzpHTn/iE6b+19D4c
+uapWyNDziaLlTn8PHND9PqLoA/y8ZrsT8pmftV2WMoB85iWRp2DPPt/su318
+InKaK7Cg6/Nbe1Wi45PCjGC2HBZIrIoW9PKJSjt8zx37kZR7h0e+x/j5Drka
+WNYcXZwF63zPNe1AP2QVDSmZGK/IM1zxkf68q7Z5FCAfZZ+4NwL9VXeVxiix
+nuYIL60MjnTUSvT9fCI5ybbvhBW34xasHOQT8rzOUgcrDRh9caiffcVj9jOY
+U5vpnjiE+hnXl5yBddXXpC7DGO867OkGm1e82pRDOyTAuAHrx/f+sfwArNlp
+I18DS929Rj5gvtSk3OMe6o9ct/OcDvm5cUnHXWCOr8J/F9avf5a0mr4fqVvZ
+LtmoT5rVe2YlrDi4JS0Q+1HEWNVq6XtPaB1R9Rbz/V1Oyel7tqXr5OEujP/R
+3zYTVqll9lQ7LH6RlQdTVZYtPmr09+Kn6rv0PSrWP6x7gvMbwzttgvxEulVQ
+XY76I5o+0r9T//3l3Pn/945F/Qu0rYWt
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.472727570790026, 3.579801639345143}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20., 17.00000000000182}, {13.500000000003638`, 
+          6.500000000005457}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.644786852214096, 8.754409509855492}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJw11wk0lVsbB/CTIZIylFJcUTJXh+i6kQ65hlC4J1SSRJHhGiJl6FTK0eTo
+Cg1kdpKKhi9JOiQUlanbIWRKkoRK6jZ8/+d+67OWtddv7Xd49n/vd7/vUfP6
+09lHhMFgvMI/tf/7U2cxJKldxmK0Hjm5wBYerBxNkYYVe8emJ8M2Rq1PZsBC
+2RMpXXBdWKG6KCxWUZKssZjF4BQa84aXshg32kQn/OBGWY+4R7B02uO2fHj0
+WvBQOhxgsjP7Bew4o1nRFxYOvRGX0GAxGG+VH+jAjc84SlqwTXTU+OslLIb9
+myfeZtS/vqMjC5Yck2ixhbvVOns2wZnx3Nq18KjGJl8FOKBtQMYCjlydUdui
+h+sr5XUyYdkYw2Vp8Lf7L24rwrwsNs8bjmRuDv8H9aQVtySshDveDSpQfbJZ
+O12V4Oqjmypvw6p9Q9UScHGPT8EZOHLRIg0GLPt1+ttomLvY8w8xOPhC/HEf
+ePCUwqVZcLJ/DnsDzFy9VXEJbBhuX+VAx/P1VNbD7LsL/lkPG0dmDuyBc28n
+3XOnfLaJu+TBjaY623dTnreSVZ/B0aPqD1Ng4eiSXjGMN+2PMz73Kf+FUr8a
+wOf3qqz5Amu5B7RSPo4JxdK/Yrycu+szo2E38VClKMrzpErtaThX4k78fcrr
+WdKTXJixo8Z0pibyd5jI5cPRp/VnboSZ94yLMuFW/ZAnWXBmgrXgOGwp5+wz
+AHPXxhsHwgKjjFfqWsgh267fAq6rEM/aDJcmR4rI0PwMxPyWAAvn5xjS/HSw
+va4WwaPyK4KSKM/sGv8H8GS7bbcdXOR6wqoFVhT92Uv5SieKc/+G3XSsOit0
+WQy98z9ePYU59jJ60bDWsuBoAZ3f1j1tNTwqLVp1EeZea94zDW5QHIs8ATde
+btfq1GEx3HXbzgfC/K2s4DtwZrrFOnu4eNm75XmwokluuS48+GNx31nY90ST
+zEy6nvTM0PN0/IlbTp8wfsYutU0X4eSYdRv7YGP57AsC2FDr7K02mH/p3otu
+2DIhuoCsaiBnJ4l6ygVTpvTDpbr1Lw3hbl8+8wvMCp9w8YbTnBnL5+F+3fkN
+65Nh78mG5DUwT2jjXQU3/lm4Zw+NZ9p782E4Tln83HXYWPtRpQzyqquR8Jug
+PGr4P3RofdZ+nWqmjf6ka76m8Mct/r5cuFjp+DMLel5CN3i3wEwJr+OrYF/d
+8Hpl1M2Y9HDQg2/kt8V6wdylq9l0/W8Hnx7Ohlm/vN7wGvevPsBa+ALmjyvs
+vUl5H7vZK4VWkLt/bRRaYR2rhIk2+NTDopVov8Xd7LJDy3KTefAJ56n23tZ2
+J1vd7r8CS673q9wGOyYmhPjCHfkBa7bApVefN6hTnh3nbq6n3N5+WTmAuqNX
++UfRdYvb2+uvwJZNSdYL4LrKot85cId9jBQD5malyLvDWnNtu7ponmcoGqyB
+Wbskxu7SPPPKlq6gHLpNgy7AvH/2KRrBrYMRvodh41Xqcavp/Kj++yF0fkR2
+Ihsuan+8cAcse0ntbSj8bexG63bYUeTsQBrMd2mo84e1qlYdqqbzMxzjYul4
+AwXuBzq/QPMXWlec7A9pi2h9hX43ribzhOuc0bq1vpadoLznVzrGoDUt8t9L
+eWa6v/GneSgSSRoJobzkDhXeg70TE3JKKfeciZ0tsL2RzWkRzJuqc+e2Dlg6
+wfaCA+2DtWIP2nRo//lPUir1p34yqqe6lX9Yd9E+tCO3tRgWVH2uWIDnWPac
+pskxWgcqJdq0z7C6Y/dsprpSJMVoX3AbKWJQ/ZPH3RbegEetkgv6MD5hbeLd
+JtrH9y+PuwAnK62M6odLlUW73SiPLRohwzC3iK0iDzt+PaQ+BEeaF+Q8xjqW
+PXYgrgtWXDNaTs9xnX5u9yOY2fQ8nk3rXmjyopjqU+vqWETPaTTH7RSdH2Rn
++l2TjpfwD4G7za5W9MCDz9zMHKl/9OS0Ztj0SjxDn/atzaU2T2Blr0v19F7h
+BcTo/Q3nlunyGOSRoeFB2F2rjPEB+XD82pzEad8rqOOM0HP3PO6eNjz8xmDO
+R3jQTtua6rMpu+xB+/bo3C9lB2HLHL8EytMzIKP6GtWbrbPhd7q/jOf3Htr3
+ygblw2lfFr6fOhN5RIZ1FV2mvDN7cwxhTkl5yTsaT1/rkz/g2R687cvxHmXU
+2D/1gxvWCh5Gw9yMA3bhtP7/8ntQC/OXObmQd6+20ZTHe7xUszmSjm8ts63Z
+CBsPq95yovt1vzx9nvoljHhLYeUrS+4IYdnPgkkGnO88z3EqE/Pt4eT0iObH
+cu5BJSaNX87tONw8bhunC0uefDTH9t99aMovK2DHrsbHIpSX1L61JnBxeXXH
+HeQ5/+qQBTnTfHphBHwwwjWUjvcViB41gtkmyyOWwJExn/O/4r3Vmyg2V436
+48qHauk9z3FgycPc2PGhDJhpIPV5CvUfyhNyYHe2U0Yv6hdU/gwLglunPBZU
+wY2TXDFfWDhbJiIfzqxY4xII57Zfv51IebjV3ImB4yTHHTiw1pHfFNLg2RtD
+Lu6FJZU/vSiDLbcuGYyGfVMtDPrh6liG4CjMU8iZkEP9ejYOe3Poenea2sxh
+MQn54RrYk30hIgT2bIw78JG+uxqKd2VQHk2z0hVQP69H9c8a2Ex8eochjT9l
+avBreOacJA1XGu+yd1k/4YX1c49EwfzWrckzkO/sXcdHMuHSaQ9ZsnCDmrZt
+DRy8VFpBAs5g39w/RPO1zf/LGL2HIgTx0voYf220UxMs8NoeqEu2XTyZB38b
+UNxiBfODqlZQvbuLrYvc4eLrXbcM4Y9mi7sDYeHwl/BxjF+1oPDaXji4fG5B
+EeX5aqcCB3aMfp3nA59KVTQ4ADPLQtoWUL/2R98YWHDG6nwnvmN4EvX24dS/
+f4l6FjwpPy/dD5ad7+QfAKtUrTXbDBtzWpTMYYOXcUw7uFQtPVYVNjNZd3gl
+nMZQDJoOhy4+wtaBObM9HUTgdXnzSpToelVrxMThYanhdBl4sGAVYxacYu8j
+KgHzSras1IUtP8jli8B1+/rN7WG+w00VUdjm9CI7+k4LvrWgVZLy0J9mQfUG
+n5D8PAuOrE592Qj35s/hqMOq0wIqGRgv66ouk+pjRXkcXArPDHx/ik35tpu3
+uNL6eswRDaPxyN07tY/W0xbl68lUz4BrXzI89WJYSSnVP1JklkfPw6atE53U
+H776cCF8Yz43QNQA/YHSUrlw3WTqN0141Jp7JgneUcVJWwvXpV6PCqPn4aKX
+1S7Yt9MghL6rneOydY7ArPz4S3NhHataXjr1+98RdGA8VVPvj1+Fgx/8c/Yc
+bKjv/qOcvLvJ2wVuHolNq4a1nlaEysDnD7O7aqh/XE/3IX5HVIcpqFM/d0/m
+u8Owd1L2GJ3PfGb01RouipX8XgKXnvXaJAdnLtNYlAsbH3lb37cI6yGryiMZ
+9swavCKAm4cDKw7Bqj94n/nwLouUjWFwZK6nejo8etH8d2/Kw+WHMXlI2M11
+pfE9Vqig47MPX5m1Dm78qVlTAQe1S163ofrvLfjcCV87oyVFNu6xThNDPdK7
+jh2zp/v3yecyYYNVG3a7wJJHv3VshecfEj70of73l/sT4aCrHhv3wcUy4ewK
+mOu1vOwvWKAy6+9BWP3XTica76R7j8kM5HW2zG1TM+U16JyqDWtsUBj6RNfv
+GbI3hffd3vZ9/nLks1eobglf+WuAw4JH9U+4smCdlffdfWDe1PrTTOo/1raf
+C0faPJ+uAHcwW4f4MF+0ZOsI7t9gFl72gM7fs6XwLvlcFbMLDv6SGBAH72aV
+lI/Bk0kL91vC//6INGT9/3fkfwHRDx6s
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.31544096567158, 14.714519496373413}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJwtmHk41d3Xxr/GSDpJNFBRUiFEmky7QUmGEE3ihDIVQvPgoBRCJQ1veI5o
+okGJkuQICUUhPUllKEmhVCpD/e71XG9/1PW51tpr32vde+8vqbsHOGwU5zhu
+shjH0b+cLP2lzLimv/jDY9w6n2CFPWC1wT6flSMYN3XHQU5iNONEF3rSE8GK
+IpsFJ8CCt9EdInBPreUHrTHIH967qg58bIlk1QNwoEOYWDVYzJZXsmos40aE
+TRzIAnv6BeW+Bwd2xLvsofq8Tw3e47C+cLqOPnjcwKwXr8H8FMHFdOhpqS9v
+XaCCuFZvX8VwxukcudZ+HCxIuvX6lTzjahQ0EqrBoh+td5qGMc6qb63HT+Iw
+66BWOcYdXpF0Y6gq47g1pVJdQxl3/cXNDGJBauH4oeCJoXcX/ab8mAnXmSzj
+VnXWTXlJ9c/7JJ2RYVzFy8TjV8GsZJynClhrpsXC3eCm006vK4Yw7nTKStNF
+YE5YJJUJVjh56uYwWp8V23IPnL2uq7KB+vvxettf8KbdGhE3wFy5QnkA6l3/
+I9p5AixU3yEni/3X3A2qiqT4rRklJeCfJ5OlY8DM0UjpLPTW8dZ0nKN83a/D
+ItDfQZ/O7dVgUUGteDD6F3saXzuC9IYE9/MxHyXjR3abaH7r+3mLMD8v++O+
+VaS/sKyOh/kWSH1pXoJ5MLsh+ffBzxRtKh6D+T65szTgR4h90RWX8dDzSueA
+I1if/yujB8xeGJn7gWcfsLoYPYFxKwr22viCswo3BahNRH0Zj5MrwOGHaz9c
+B4v8/opNBJ9wXnB2nBr0aAe+vYb9Vlm5bXMGi5ZnW/yGPsMVPiOiwQLWvlwD
+/Cbgj90tyn9gYz0X/XSuz9tZR/muWfFmw5jg26TSOR1gvptBJ5NjAsc8ows/
+wMJX9p7LMC8VU3HLn2CuzSZnA+b59mSm9Beqz1cdOC7DBE5ryqY2g9mSIQ7v
+4Y+j/DPzx7TfqOJdbmCTCxXq2bTexeOMNFi20unxKcr/V1zqjTQTnL0p67QX
+3GS3VPUDuGH/qxp30rNa00Qd+cVHdlraUD3b/aVR4PaCoHhT0m9mPlcV/t+z
+ULYwovyzQ91roGc9/3oesWBgU0o69JrN7Gwxp/Uzu6dED2WCe++67FeSnhhL
+n13w39PefUYw1TM1CPGG/3pLv+ol0fq4zJU2mJeU5vDMKtIrIRk+YTgTDJOV
+iJNVx35+l81rwXFpfYHLwYL47J8e8MP34tG04+CmkvCoCrDnSwez1xRXSl0s
+Bv8SPPbNnj4J93n361zJEUwQmDslOATcFJic8Qb5ui6/Wu6BheZ6uRE8Jrg5
++dIxbjL0Fkzu68d+CbP175mC+R3GWdbwt7VDuTUILLqremUv9A52fHuZQvGY
+2FEn4G9Q2elaEVgYNjA8Cf3aybj6/gtuenSLn4J57Go3S38PFlgny57HvH5s
+PtPTDlbzPdOYh/kuvp84o5XWuxeMbcP832Z5xjyn+Kxtww2GMMH47VkJRRTP
+3l+YDv8KREW8y6SnfqZwEfhc1uDPWIobyKwdKY33YvZeN9LLeV65QPzcPNp1
+NdWbPc5sMThKrXdgAa1PPPyS6j0USY+fCWZ6f630sV+31U+vqZR/PO1SEzhn
+TZGJJnHsYNQ1+L+x+UOqLtX3uLPyGPqJHlE//796faWJoeh3wxa2wJXyKyw9
+AnDej0o/CT9I89C0LXaG/+WWKh65xPH6ijqYp0Whcks37R8W5NcmzwR2+x0v
+6GtgfZn0wD7M34UnK7cDLDy2bP1n8kNJZWYRcaZ7jQ78TJ4UOlJ+Cp0X/m4T
+cEj07FOrwYIRw/3HgV+cF89MBauNWVFeBn81WY9DG+XvPP/PUnDrsfYiDU30
+I2HRmIL9wx9Z+q3TpPdRnVcHvadCJBWjiM+0TeuGv7bemxquUP5g5rTf6PfH
+AaVlD4kT797vxzxKWY/9c7CwZnI7B75QkOTYAFbLMj80EvPLWZEyqh7c9IAN
+zqP3OdY1v5zq35EoD4U/vf5zHuRSPSlZvU9STLDZVqM9BSzaNq0rDOwbmDHh
+AK33GippKYU+onK3eWvS/amOMEd8/k1zaVvKj48XeCMuaj/SOBvMDz49rAjx
+i72DLdSv8K2HjQX2C7UxrBpL+W6Rad3gTFN3udFUr6f73R3433jgyI3xpC9c
+8+JpnNdit1nbdamf0btOHpRlAr6V+IVlVD86vX4b3jPp+kvqAcSXOR83zMtg
+7FQ30s/xFE/MxX1p++0SQP2LXJ0tf4FrHt8eojwV/SxR338S89/AEuLXgfmV
+bw8Pg9875Ev0z4O5z+YuTuAUsdSOL2DhsgOiLfDP7m/JBZNpqDflTfBK8JyU
+m7aRYK4mZM5Q5Lu17GyuBPO3JpQdQ32DoJ2H5aaDZ9oWdmN/sbKtGYuIVUu9
+teD3ravKA0FgUea3PctwfpltcOxpsHDqjSon+C1bmVabDW5ymvh7Nfr/yQVd
+K6H8MpMeF8zHLyTVp5Ly3VMv+WF+xUsb8x6BuaUJZ+PofnptyCkAC0JSdlbB
+H3lp0aNMyj+VUWQAf5ZuULp0AqxmYxBaJInvxcONprup/roisVBJ3Lf7ZSdc
+qd70BTlbwBuydctIv2hWy5A4sObRrHfaVN/jwsY3lG889e0YMFt413Id6g/I
+y20fRnGF7+v/grvLnTVkKJ73J78Y+hxP6yvIU/29P7SEOJ+Z33slVKl+Y/Su
+GJxf/+AZLkakr9qycQ/6/70gWX4NrY/gOXphPrzyZ8JI4vm3RyzG/PpyPs+h
+foUGaU0ymO+kq/+c6qd467TIq5h/1NsuQ6aF/fZ0KWjjPRi6eS6LAov2V07H
+eyuoD2koqgMLpy1kyYjXx+amq2mDZznkHUE8I6/gqa82vV9T+60Qt/M4b34D
+rLbkh08D6h9WfKfQQ/kxenbmYOnxque0dcBPx1wNhb63T7VOuoBFvXu4NOj3
+W6XdGQFWEyp8u4H76/bnlWwquKnrtlgu+j/m0Xcnm/KnThyXB38fVq00vEf5
+/m2GpZhfy5k9KvlUv9nhYyv8XfVaa8cNYodqxQmYt9enrHQhsZNx4B748zOt
+0Dqa6vsV2oqDHa4b2wdS/UOe9rcl8PNOXn7eSso3HGWSLIHveXpYyjywYE3P
+i1tgT7uykepg/rJ5nwbAw+PMefJUb/lniyCcnysFl9f/Rf9NDq9beNhfce3y
+yN9gwefrKtXQV+DGEw3QvHrvd17E96D2a3erLO2fqmJzDP2tKNXxpPoiE6vw
+MPSfG3t56SLigq9x/phP+ZX06QFg7rtvoi3uv9TmctN04ll/zMZgvhWvglc3
+03zqMlWL8R5YfnvapzED++uc+LMU52EgYL37FuIXIWap8Gfs50ln74D55bP7
+KhAfOao3QVIX+r/NMCkGO0m8M7QDc7I+vGjkL9n+JeAkcbZZqDp4UH8R/1+w
+WpdqeCz2j2tod1TUQz3n7U9r4W+v69oWCzAL2HGZ3usInlKfP5h73nFIHqy4
+6MqnWLCa7qoKvNdc++vmwHNgkUybvRLuw8HAvdevgJumi6tOxLxm1hTMuUrr
+PWoa5mG+qcHRf9LBgtNFR/3hp6HlfsfE/+prGJbCn+uLnWtDqZ7zw1WLwUqu
+xqs2Ub24zC9fxHH/NJOarfTovP47pkqcCaY4r4vSo3orJ39vBHuVaHkqUz/2
+nmmqOB+qlT2BYlSft98mGvX0T06J6KH+W9+YqMN/A6c6vU/EkstHvAJP0bQq
++AwWfvgxcB16t0XVK/3Spe+v2cRT6Ofi8hX35Unf/Ir6SPj/np/9dAbpS16s
+tQ3zkLyn0L+K2PKuLt4/Ltm7JTzmv3nx/TXhv+LnI9ZlNN/OZKsXYOewrd8k
+9el74u7kAf+rB2SeTNOn3w+mpZTAn3X+d0xswU3Nod29cky0b2uecQixVE7f
+TznGXJJ2FJwB8ztzAsqwnnct8G4BWCTlwHmB/bSb5r8Fq02/bNswlLH8rDL+
+IPGt8DLoYbItnwJHz0S+hKKvoyxjag+8G3TAgsjtod4yTBTbHGdiCuY21iwO
+GMJYWeZjX0twk0pizFbc5yzPPf62YP6J2467MC/3Ffsi7Sh/0XjPo5KMjZt8
+Q8Oa6itbvC+EHx8tnT4upvxqT/ER8CO6KzppPliYUXriEPz1GG2iqUv5/VWN
+2uJMdDHnzgE1sNq25OUceHaf34ORxJFr3aSRL+E16pMU5f8qSTAVZ2zxnC6u
+n+bxO9orDfFBY9bTQzzZbLuhBBN12N+O76L+O+rOf8D+jQu/RxA3GbdsvCPJ
+RHbRadbfyI/K74NJuP/7EjYZ0byYa8+HGGnGIs2KVw4jvcZlBntoHkfmxZA+
+vqvfR74MY5rKUQfmkb4ehd2G8P/MwrH5zsS3ncZ24HvgrLph3w6aj4Xr+H1D
+mehMlfKP/6N6821s2uDHg42NeiKKF+arq8Pvf97zprdRf1GZ37TAXl9X18kZ
+gE9JjpEAnz8cOU0fzG0Jb8tAvYjR1loOYDVeeeYUnK/Lfv69gWDBeINDO2WZ
+iNfXWxEDFpbeMsrAeb0gM5x3DsxMeY8f4P42OGmtyaZ8TtqjEuddR8c5uBDM
+nzs+7wnmEZC3fv1D4pTkJ7XwV9fgqfUj4rD+nZinqL6xNqOU6u14Jj1SgjHt
+K608Wi/Mi3++DvezMPOcaQ7pe1/6t1IM+q2lRl8m/VOjRnqDxz1TP3WW4nJf
+aw3BRf3SZbHUr/cflZngOCPxbAHpMw4rchNj3FOdErdtxIbFZwvEGHu0tK5w
+M7ip6P3pJdjvlLLoshfpURrW/h3nZ7TL5upNpCciyagIep+fac71pf12Tf95
+Dv2ICt7cCqb4s+7io1Lw19T3Y9h/epxzBTjvRfYHzRJJj83uGm/c/xftw32u
+0n5XLm0xx3257fDkUznNwyvqeD++B7EWoaodtD7/1/pE3K+gV4Va8ob0823p
+Cmn43a+9fZoBWFgok4Dfd0WzR+1SXA3GSdF0QVxkJNG0D6xm/kjSFH6+z4+O
+OAfmTzqp3Yl6JR5H/paARZ71RwPAH8te+r0jPlwpWQ49YvT/Q7P+//+HhrD/
+AfsDqP8=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.595195293865398, 1.860131761048288}, \
+{0, 1}], LineBox[CompressedData["
+1:eJw9k38slHEcx5+MdmRhKP44sud5lh/P41ey5uenOVTKr+RX4Xal4SqrrqXp
+/LgsxqwzoUJnYmWGW8NIawonhFPikunc7CRb0dQRo++t9n22Z5+99t3zfD+f
+9+f9dhBkRqcaEAThj159/fdQoLXRVycgpDdMa4dI8CrwOCDxQxx/8nJPHQlm
+y1YfWyWIVVO8rkISGseyHEvGEZuHjxvlkZA/z6W77Z2BOCbcsC4mwVi2LG/K
+RBzZMXS6kYTc2pLAiR7EdfbbLkoSZkpjI2cJFyCKYpIpDgXKoPstal/E647p
+xAkKDLKjy4syEOct+a+WUWC61RtwuATxyvzm6GcKOkTN2n21iG3izkSRNISm
+a18cqUOcFaeIv0BDl8LYJ68Csbxz0KGahoXh1K+yHMQgFeX306AU9LPbSYgJ
+I6HlHA07tZVjZd6IVQOeSVoauqMK9nbuQayc4i7M0iB7ctRoQ436B4Lv9YYG
+/3ETw8VuxHKzNVUVDSMeydZTD/Xz9Sp4fBpU3hxZ+x29HrqsVjsazqVdI+Zu
+IV6JmFBPUUC161p1YsTSnBqDUgpW3ionVVLEqhmfhGAKCIH5rPg54mfCNGND
+CgrCODKORn//ocVP70iYbIj3G+Xq5x+r2qwnITbx5UTGecRdAX4zRSSIq7jy
+722I3aV167kkhNvp98vg88oyTYRFJIO/D9EEuVbUMPj/gQVP+zw1DL7fZlXH
+13FZ3J/l4A9ScorF/Tdfd3M5mMni+VZEnCiOhMXzw2TpjsNdFuvj91PHD7vN
+Yv2UJvXfnC6yWN/phF+bNiEs1n/rwas/u+1ZvJ/E6ezV42sM3l/N43SPK0MM
+3i9P4ft+Vz2D99919dF+fj6D/XFW8HsgN4PB/on5YBs8mMJgf6W0x9guCRjs
+v3sQ+HpYxGB/WrS2XLpZwWD/jqwLo+37Gexvn+qmNnKHwf7nykS9rjwW58Ok
+2CoiVsri/JSHamZC1CzOV2Zi4bTI3RXnzzBg2TlK7IrzqW4Y+yLuQ/w/v6y5
+vrrBX/TafLQ=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {9.0548, 14.}, {1, 0}], 
+        LineBox[CompressedData["
+1:eJwl0wlIk2EYB/CPeZCmNe9pHohFORPMIsycfpKZqHkfiZozTczSrbCmUTHy
+jOZtLUxIY4WkxnQJZeXZMTBrc7NATWdLmZQwdGoeYf+XPhgPv+19n+f/vtvc
+z/HizjMoijqKF6n/Hyea2trG40hTwvyq6CCY+Tp7PBlmfi5WJcDGI5y+pyya
+0kSxVziwWrCUvOZAU7XB2pxNrOsINrglwApVo30drL6z2vHBnqYGjLK1JrDo
+od96EnFq4Z4s9NFZpIyYw/pR8YgM+5jqubA5O8yPX140gm2fDPfOwzSbVZGB
+dZHX1BUWqJQ4bUiJ91v2B+XEwi3aCNds2M/3eX8nzExUvXSBj8zYBbPQZ4BR
+JGfAlaGpd8thH7Eo0pb0VcrXFslcxumNaFgSI88MQS5q4mSuFFZo/swLYalg
+rNAbfV9kFdQ0w3Sxq+YNXHqrXVlPPHVqVzz6WNxs1GXC/PBQrZbcy85tgzks
+XIxrI+cVdnJ1deR+er4ufISZMi//v+gTE3CZswP3U7qQmp9IzpdeMOsKPxgN
+5EmQg2s36WkGy89kTRps0Ze9T0b2y6uafWPhlp6ypLMwy2vdZtgGeZqtZ1WY
+E5LCK4+DqSvT9YdgiVk/1wQWDnbzbpP8QYqJaWus784oGMMcn5q+mBmYS9ve
+94YjBTYBxlivjy5zeoQ5tLgjK4z0M+uv8IGpL28DJTBzI9ZyAVXnIy7ZRfJM
++q9+gnP1Td9uwMyuxuTvZJ91esNPWGpw2HJA5XtcFB3HHKnlryoB3HZQOV5E
+7t2zc3MZVmS6X7gH81tPWJWQ73tQ2C4iddrlmCPy7331410ayT0lSX4Gq69v
+D5nCtVebpGyc94DgUlk1yenGe18DG69EFG4gR201y1kJl65umsaT/A7SGR28
+1dXr8Rjn14QtR6lhXbxz9pIVzp8n0DeQzzmHI6NgPtVd6QX/Dgsv6Wfi9yVr
+GGvFfEmewTkK1pP/EXIMkLqb/gf1UjjI
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.515727445508166, 6.085629021796733}, \
+{1, 0}], LineBox[{{13.5, 6.5}, {10., 12.500000000001819`}}], 
+        PolygonBox[{{12.052322615314452`, 8.98173265946094}, {
+         11.793188945044921`, 10.219815750748694`}, {11.102165824326175`, 
+         9.816718930329426}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.484057296392571, 9.676200089562332}, \
+{-1, -1}], LineBox[{{13.500000000001851`, 6.5}, {6.500000000002592, 6.5}}], 
+        PolygonBox[{{9.4, 6.5}, {10.6, 6.9}, {10.6, 6.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 5.5548}, {0, 1}], 
+        LineBox[{{10.000000000007276`, 12.500000000005457`}, {
+         6.500000000003638, 6.500000000001819}}], 
+        PolygonBox[{{8.552322615314452, 10.01826734053906}, {
+         7.602165824326175, 9.183281069670574}, {8.293188945044921, 
+         8.780184249251306}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.515942703607428, 9.676200089562332}, \
+{1, -1}], 
+        {PointSize[0.04], PointBox[{10., 15.5}], PointBox[{5.5, 4.}], 
+         PointBox[{13.5, 6.5}], PointBox[{10., 12.5}], PointBox[{6.5, 6.5}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T8", " ", "P1", " ", "N15"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdfeg/figjhihjij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdfeg/figjhihjij.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {44, 22}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwl1gk4ldkfB/A30c1OSdas6dqvLUTuaynNpAkjLmWZwpjIUiglrmhki6JJ
+EpUWKkJlFIosoyRL0hXFIG5GISPbLf/vO//7PB7P5/md95zf73fuOe9V2Rvi
+7MdHEMQz/FH/idklfNRI4r+PPkksemYl1cP0zZlvm/XI2veqkxeOw6VGD/Zc
+0iPJnIO1+QxY+epITaweScyZaAb0q5IEZ+jisTDYaTVjPhWWuMXccgjjn1zW
+/s0Spt9aNp2AuPkVtweTKiSRfXs88Trmr8t4dOEOXDi7gfkK8RDa4aCD8GXz
+8gJhfZLNsY34bguH2ruVbYfdrQTjVeHaMI1v6fok+fJUb6wYvM37x6EuxKMs
+xhtpsN3dT7uFGSTRyRUJF4WNC8R4dAZZ+8+Nu3zrqPnI59XWDJI9YBjEMqWe
+P7r5RxeMb7u+YcQVtuwsLvCGk1T8nkXBDYOL9H143jF9+ksuXBq8osAL8VUO
+X3bWwBlZaVudGSQZsZs2/Qb2iQwps8L8Xcr5FmPw/T37BtUx/ue6DfNTVL3q
+V7VXYD6dTyGnPlH1JnnaNCP/nyTzP/bClY9ZtDjsh/iH/NZqql9aVU6bUO98
+1bacDFgmXKJpFv06LCfox4LJEbGOarjZZN/wGrh99GZUKvp7q3ia1aKM8XNB
+Zr/Br1wtQo7BrLX7u13gwOBaeU2Ye9xwlyOeH4/uGClRglV/+Xs3vJdpw78a
+LrS3aY+Ek3ct2iasQ77BjYX5eiRbauJzEQ0mi5imXfC2dZlbrygiX2LmliTq
+mbnnQ7jA5Mm+KhfUY/FyKkgFPsK41n0BcY3U5ipBWObbdYd38GHTnnvC8J4D
+15+Kon+urNl6dXhliup57B+bK7ltvRM8/ET0/mb002twTDQV7pJkfd0OsxQM
+ptpgB6n+P7AfbBkm7bk08tOR6zV2glXMbwd6wMofJt/awzlHI7uy4KDRq983
+wqtm/WNqYfZZzaNKsKQlo4gD5+oIxPFh/hsL0xd6YLOKBqV61KOSsr2VGj8Q
+51wWjfz7K/lk0+CA+QQ3E8T5fB5XWcHcpJNPJtG/grAq9zfIj9P4e1g5+sVJ
+bR9xh7kHfa8ch7U/v4l5roBzZVWyfBd8ezJTTw+uTfIs2oTn5cym7ibLI+6g
+OKwP91YbKY7IYT6TbGMTjH9vI52/FTaLfmT7I+L2IxvkymXR7yXr0QMwJ66m
+Xxdm7fc2yMN4Q79c/8cyOK/pfyRzEI+olBf/FWbdONEli/wvBfbPaMKlr25n
+esGvVVPe0GB2huW6AtRLBo2uIOBmZ/XWIcS3TC9GSMCpusl/iKF/w8oFHSZw
+7tu90hpwIaleEgivJMTUTNHP2sDjT+/AhX99byMRH7S20Z+m1ruRlmmD+NYH
+7q1myDdAXe8nS8TrGNHsw3BW7xoHPcT71VWSiuDwTCtrWdjw/NmOZ3Dzu6lY
+HvLjflU07IInBRV21cDxc22FjbLU+fCxPgLvqGmLy4XNPAJfMZC/6EqLYBZM
+tEU+HEN/7pzbeWqB6o/Kl/Qi2Mes0O4kHBArURYKX/V0duKthSU7abboHzMh
+3NcXLi3q56oiHm8t/+2pNNZv2zotCTt0Rcuug5v/ergggfH/2p8ZObYG5yPt
+ME8JcY+xjQcGpbB+ZaiSFeJqMxbWbnAz6+YTnF9iTVrqxv7V2H9lg4TLsHRE
+mHIMTP56P6Yffq5ll7cRdvR/6KyG+oT67ecEYfqq2r0BqM/3yXGxuVXI51wN
+cRtxRw93jyW48Ftk/igc1m65XBHjM9Il43D+iMm6Qv4dcGHimJEK+r9WTsk3
+GR5PM+bowg7vPhxqg+/fOVFtiPHVxtpK0si3b9TtvD7scum0BQv2zSFScP+x
+PbVaetNhh+QmtVVw9nn9/D+pelP1r3zB+vuTq+afw+2JAsUVyPdGkHxYE1w5
+4xV7CObNOLbcpPrhdChNB+OFh8/pBMOkIl/sB9Tv1T2iKgcH8By+XUE/z/Ln
+5BVT/frAi/Oj+vlgH0cbHhA8STeCX/ytpnEB9ct0hCeIYrxcw5PaBUmMJ7kx
+X3VJosJ/dYwrXHhpxHJCl2TPZd08US6B8+pKk5iD30fbT0jBAX7aB6n9NKg7
+o0gTx/0YnyBiCp8RKJGgiZEEYyzlGbV/d6RvGhuKYv3A2Um8/4jZjz1PT4ug
+nhITBy4sK9/iqQyzOIlOuqj3SvahgVFhrL8r8ucw6vwd6HYegiel1MtLYc36
+CH4xjA/NHhPmwruOWLf4wJXx7iZC6H/flrJ9nSLU96X7AXU+SoaJT25YX6Hr
+2l3sJ9EVLXLsA8wd+vyfM6W1K4KRL52/o4QaX9dQxB6Fg1Y3ilPzZagxL9ih
+PvIgxwzfFyKBmDWIhgeCvk+XwCnddw/9DjsODhsFw6azW0c9qbiy6Q467Lk0
+8XgJ8ynTK3sGUK9747vFQJjIn0u8SL3PBsng68inUnrmI/X+Ke3ITi9D/vSP
+hlvWw2OnfzLPFqbu+ff+C9gfTkSIxT4h9FfBJOYdnDcv3KMoiOfyNi21wS6t
+ygZdNMwnYpreCUeKz148uwLfL1Vx3jC8dD5ewE8A96PUsNUK6vdHfcQOV370
+c6YnyRjeHub+IGQ51ovd7kPdn6HDYb6VfPjvolFZDCe2vaSZwCuXlap+gcvO
+Xs4cXYb3X17GwkbU28CT1GyDZbweZuG+IcItl6ty4Wa+82H34L4mARsdPF+a
+wAschlu7BYQyYbpvYRg/+i1gZ6W1CusbE34h4nBzWIxIHhxuPZGJ80NoWp8M
+0UK+7Z52xdR5vTyyU/g2PL7eZoaANfrqTaRQX7aGleJbzG+yXzp2Nxw62jx3
+Hf6m/nTzEZhsfUin7odcVgWfL0ys8HiL+4NIvVY0IQebmYuc7UN9IkdX/nMR
+89ODVXjn4A5mQwkX+RTWnKv6GWakmZcJwAOHfzCXhetCfT7Oo142bUvkR/Q7
+d8Y/7CWB8foHhppgRz8jWYUlJmHm20Deg81mCL0kHpPgPpo8eZfaT/X4F7x5
+JsHJsX5dBWcYbNuWPsvEeRuKegMXVtS6us0wiVKm+xSB9Txe5bwPmGYS7c01
+S3gfEs75HeOvpphE7d+PWvF7lAi2Cn5XMIn57G+I/QlP7mT/XjOB8cn1OjyY
+vCWgKwTTE9yjmKhfR9PTUw12tJH2Og6/2HNC/F944KtWWjnMEGK1lWC+9pYc
+3T544aFReS7WY+TuXzYHi8x4exd/YRLRvRxr6vdDZ9+Be83IL8s7OobaH6Ha
+tbzX/zKJ7LLXqZ8wPtja27YG9Uw62tFb4E3TnRkBX7He+o7Ui3B3lrZEI1xK
+s9X8Be707xJtgB3HF3nr4FKGevVumGXSFEK9zxU2T1QkYr7LOzXVz8DfdyRZ
+/YD1Tn0uanKAtYTlNtxEfjI58X1isOp9xePFqOdIVGjWW/SX8bj0r55x7Mfr
+uYvl8LUq76DpUZieuJgNnwrf9M/rQbhNdfE0zFaVd/XtZRIS4UzJc3CoaOuL
+gx3IZyyx7xY8EOW1Z38tk5gbnqVT5/O/T8rm///XI/8Hiw6/aw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.887640361876243, 16.89239276247515}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwl1QtUzFkcB/CLDmMrJk30ovFYBtWOShI786dWD5XZ4eihGKm0s8XUolCM
+yqNTalLJsxI2poPRklHZnaI8wrZtJ4Me06omRNNDjVft97/bOdPvfOZ/7+/+
+7u/O3JkZul0YPpYQIsGLjmQK/W8qRZh0ZFLE2SX3erQZRUThGabrJ1NEuHFE
+/5hFkcKottTXkyiiDNx9dw6sGXRTVsHik9HbE0zhngld7XBZz9SQl1MoQj69
+sfTCfB7LdL8nzLZ5YNcPGxRs7XtoQhHuGo+JYqxX+6fj2TBYsT9+UR+s/z7p
+vRUs0L40OozoYHu6kH6fKWh0nY08c46+Ot8Jsxf7fa6E69v+mjEEq1RvSlej
+jkse3ak2mFfvMxJ1H/6VZdgZDDNDb62dT9ftZTTuEp2fFzAtClZPGer6CLOr
+onjpcP78bLvVyCtYuDLoCJzg9SUhB9a0HbHeDB8vyRt4CiuKnvtYwBtdiWyQ
+fh5UmX8T61nOu5lGEKWFl8XLEX32LT3fi+ciibPfTURhTaiHClEay7zNQXSY
+8+5GLN2vZdnRBajDMqxXx4B1RXu+zIRZNqHyQ4iiIqmbEvtsWpIylu6HIjZ1
+KBLRuiKU74dISja7LkX06Vnwwht9FtUx/G1h9+OZXZ+NUV/HjENucLrjVe/f
+jTBeFapJhJW8H4oLDCkicwn4WQ2Hddg9LPmGIhKB5yo/rNsdxhp+OxHPU/sH
+1HCKMDA8gnZsbqUEdcZfEamn076cMssY+2XsbdxjAnOPiUMvwkyt75vlcP30
+C8NcFn0u53afgAUZWutLcHNc2wULrKdKL1hhgM9dwm6u4jeYvJ4UTcGVi+dF
+BqA+KicsNRD2dFis18OkWnjMDyaLTj06hP3ojMUX2LBg1tmwQZjdJOhpQH7r
+iywHZ3r/ur93ieGOcsrJDRZ8Pd/xDvXVmxWnmsEqe974cFjt/b5WjvmCLdpw
+NX2uQ3FWBrAs5FqtAN4Rf5Q/F+szTcwLm9APA2OOHV0/xeHmx8DWt5OLtQyc
+z8IrdhzYqTTnRP4ErHO/2XIU/U2x+eDrMx71OXO8PsLdUU8LRw3g9JjD0zA+
+uENqdn8c5ue0JgfAleHeRDEW37/ih21K2LyuvaJmDM6nWx7qiHrcH/R8ZcLM
+mXrPKtjoWMzaPIJ8L4XyIOxnh2TCkyBYt+mLbgiW+ZS1BcLc/KQNR9GPS+f8
+EzLhwtERqRn6Z7DaNHgArm+3qD9M9ztXkrgH+XX/rBvTCjcfzHs0DfWwL7fu
+NMW9YdTX11oJU20Bid/CjT+laIJQv070yz76ud7wO9ErWHRveJSer+QUOHph
+v1RJZVYa3LjJcvkBWJbefHwGzOVETUqGBekbBvNRX1Tk5Fh6vNSGcZkFC7xN
+FQ3IR/HK1x3BfnRJJlfYsGY9s2ws3DhV/tgF9dR7B85NRz9utNgXzkb9oppd
+Vrb099ow45F6lE9kyfNvdaOfslVrldRXPuE+2SauhamQzpHTn/iE6b+19D4c
+uapWyNDziaLlTn8PHND9PqLoA/y8ZrsT8pmftV2WMoB85iWRp2DPPt/su318
+InKaK7Cg6/Nbe1Wi45PCjGC2HBZIrIoW9PKJSjt8zx37kZR7h0e+x/j5Drka
+WNYcXZwF63zPNe1AP2QVDSmZGK/IM1zxkf68q7Z5FCAfZZ+4NwL9VXeVxiix
+nuYIL60MjnTUSvT9fCI5ybbvhBW34xasHOQT8rzOUgcrDRh9caiffcVj9jOY
+U5vpnjiE+hnXl5yBddXXpC7DGO867OkGm1e82pRDOyTAuAHrx/f+sfwArNlp
+I18DS929Rj5gvtSk3OMe6o9ct/OcDvm5cUnHXWCOr8J/F9avf5a0mr4fqVvZ
+LtmoT5rVe2YlrDi4JS0Q+1HEWNVq6XtPaB1R9Rbz/V1Oyel7tqXr5OEujP/R
+3zYTVqll9lQ7LH6RlQdTVZYtPmr09+Kn6rv0PSrWP6x7gvMbwzttgvxEulVQ
+XY76I5o+0r9T//3l3Pn/945F/Qu0rYWt
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.472727570790026, 3.579801639345143}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20., 17.00000000000182}, {13.500000000003638`, 
+          6.500000000005457}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.644786852214096, 8.754409509855492}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJw11wk0lVsbB/CTIZIylFJcUTJXh+i6kQ65hlC4J1SSRJHhGiJl6FTK0eTo
+Cg1kdpKKhi9JOiQUlanbIWRKkoRK6jZ8/+d+67OWtddv7Xd49n/vd7/vUfP6
+09lHhMFgvMI/tf/7U2cxJKldxmK0Hjm5wBYerBxNkYYVe8emJ8M2Rq1PZsBC
+2RMpXXBdWKG6KCxWUZKssZjF4BQa84aXshg32kQn/OBGWY+4R7B02uO2fHj0
+WvBQOhxgsjP7Bew4o1nRFxYOvRGX0GAxGG+VH+jAjc84SlqwTXTU+OslLIb9
+myfeZtS/vqMjC5Yck2ixhbvVOns2wZnx3Nq18KjGJl8FOKBtQMYCjlydUdui
+h+sr5XUyYdkYw2Vp8Lf7L24rwrwsNs8bjmRuDv8H9aQVtySshDveDSpQfbJZ
+O12V4Oqjmypvw6p9Q9UScHGPT8EZOHLRIg0GLPt1+ttomLvY8w8xOPhC/HEf
+ePCUwqVZcLJ/DnsDzFy9VXEJbBhuX+VAx/P1VNbD7LsL/lkPG0dmDuyBc28n
+3XOnfLaJu+TBjaY623dTnreSVZ/B0aPqD1Ng4eiSXjGMN+2PMz73Kf+FUr8a
+wOf3qqz5Amu5B7RSPo4JxdK/Yrycu+szo2E38VClKMrzpErtaThX4k78fcrr
+WdKTXJixo8Z0pibyd5jI5cPRp/VnboSZ94yLMuFW/ZAnWXBmgrXgOGwp5+wz
+AHPXxhsHwgKjjFfqWsgh267fAq6rEM/aDJcmR4rI0PwMxPyWAAvn5xjS/HSw
+va4WwaPyK4KSKM/sGv8H8GS7bbcdXOR6wqoFVhT92Uv5SieKc/+G3XSsOit0
+WQy98z9ePYU59jJ60bDWsuBoAZ3f1j1tNTwqLVp1EeZea94zDW5QHIs8ATde
+btfq1GEx3HXbzgfC/K2s4DtwZrrFOnu4eNm75XmwokluuS48+GNx31nY90ST
+zEy6nvTM0PN0/IlbTp8wfsYutU0X4eSYdRv7YGP57AsC2FDr7K02mH/p3otu
+2DIhuoCsaiBnJ4l6ygVTpvTDpbr1Lw3hbl8+8wvMCp9w8YbTnBnL5+F+3fkN
+65Nh78mG5DUwT2jjXQU3/lm4Zw+NZ9p782E4Tln83HXYWPtRpQzyqquR8Jug
+PGr4P3RofdZ+nWqmjf6ka76m8Mct/r5cuFjp+DMLel5CN3i3wEwJr+OrYF/d
+8Hpl1M2Y9HDQg2/kt8V6wdylq9l0/W8Hnx7Ohlm/vN7wGvevPsBa+ALmjyvs
+vUl5H7vZK4VWkLt/bRRaYR2rhIk2+NTDopVov8Xd7LJDy3KTefAJ56n23tZ2
+J1vd7r8CS673q9wGOyYmhPjCHfkBa7bApVefN6hTnh3nbq6n3N5+WTmAuqNX
++UfRdYvb2+uvwJZNSdYL4LrKot85cId9jBQD5malyLvDWnNtu7ponmcoGqyB
+Wbskxu7SPPPKlq6gHLpNgy7AvH/2KRrBrYMRvodh41Xqcavp/Kj++yF0fkR2
+Ihsuan+8cAcse0ntbSj8bexG63bYUeTsQBrMd2mo84e1qlYdqqbzMxzjYul4
+AwXuBzq/QPMXWlec7A9pi2h9hX43ribzhOuc0bq1vpadoLznVzrGoDUt8t9L
+eWa6v/GneSgSSRoJobzkDhXeg70TE3JKKfeciZ0tsL2RzWkRzJuqc+e2Dlg6
+wfaCA+2DtWIP2nRo//lPUir1p34yqqe6lX9Yd9E+tCO3tRgWVH2uWIDnWPac
+pskxWgcqJdq0z7C6Y/dsprpSJMVoX3AbKWJQ/ZPH3RbegEetkgv6MD5hbeLd
+JtrH9y+PuwAnK62M6odLlUW73SiPLRohwzC3iK0iDzt+PaQ+BEeaF+Q8xjqW
+PXYgrgtWXDNaTs9xnX5u9yOY2fQ8nk3rXmjyopjqU+vqWETPaTTH7RSdH2Rn
++l2TjpfwD4G7za5W9MCDz9zMHKl/9OS0Ztj0SjxDn/atzaU2T2Blr0v19F7h
+BcTo/Q3nlunyGOSRoeFB2F2rjPEB+XD82pzEad8rqOOM0HP3PO6eNjz8xmDO
+R3jQTtua6rMpu+xB+/bo3C9lB2HLHL8EytMzIKP6GtWbrbPhd7q/jOf3Htr3
+ygblw2lfFr6fOhN5RIZ1FV2mvDN7cwxhTkl5yTsaT1/rkz/g2R687cvxHmXU
+2D/1gxvWCh5Gw9yMA3bhtP7/8ntQC/OXObmQd6+20ZTHe7xUszmSjm8ts63Z
+CBsPq95yovt1vzx9nvoljHhLYeUrS+4IYdnPgkkGnO88z3EqE/Pt4eT0iObH
+cu5BJSaNX87tONw8bhunC0uefDTH9t99aMovK2DHrsbHIpSX1L61JnBxeXXH
+HeQ5/+qQBTnTfHphBHwwwjWUjvcViB41gtkmyyOWwJExn/O/4r3Vmyg2V436
+48qHauk9z3FgycPc2PGhDJhpIPV5CvUfyhNyYHe2U0Yv6hdU/gwLglunPBZU
+wY2TXDFfWDhbJiIfzqxY4xII57Zfv51IebjV3ImB4yTHHTiw1pHfFNLg2RtD
+Lu6FJZU/vSiDLbcuGYyGfVMtDPrh6liG4CjMU8iZkEP9ejYOe3Poenea2sxh
+MQn54RrYk30hIgT2bIw78JG+uxqKd2VQHk2z0hVQP69H9c8a2Ex8eochjT9l
+avBreOacJA1XGu+yd1k/4YX1c49EwfzWrckzkO/sXcdHMuHSaQ9ZsnCDmrZt
+DRy8VFpBAs5g39w/RPO1zf/LGL2HIgTx0voYf220UxMs8NoeqEu2XTyZB38b
+UNxiBfODqlZQvbuLrYvc4eLrXbcM4Y9mi7sDYeHwl/BxjF+1oPDaXji4fG5B
+EeX5aqcCB3aMfp3nA59KVTQ4ADPLQtoWUL/2R98YWHDG6nwnvmN4EvX24dS/
+f4l6FjwpPy/dD5ad7+QfAKtUrTXbDBtzWpTMYYOXcUw7uFQtPVYVNjNZd3gl
+nMZQDJoOhy4+wtaBObM9HUTgdXnzSpToelVrxMThYanhdBl4sGAVYxacYu8j
+KgHzSras1IUtP8jli8B1+/rN7WG+w00VUdjm9CI7+k4LvrWgVZLy0J9mQfUG
+n5D8PAuOrE592Qj35s/hqMOq0wIqGRgv66ouk+pjRXkcXArPDHx/ik35tpu3
+uNL6eswRDaPxyN07tY/W0xbl68lUz4BrXzI89WJYSSnVP1JklkfPw6atE53U
+H776cCF8Yz43QNQA/YHSUrlw3WTqN0141Jp7JgneUcVJWwvXpV6PCqPn4aKX
+1S7Yt9MghL6rneOydY7ArPz4S3NhHataXjr1+98RdGA8VVPvj1+Fgx/8c/Yc
+bKjv/qOcvLvJ2wVuHolNq4a1nlaEysDnD7O7aqh/XE/3IX5HVIcpqFM/d0/m
+u8Owd1L2GJ3PfGb01RouipX8XgKXnvXaJAdnLtNYlAsbH3lb37cI6yGryiMZ
+9swavCKAm4cDKw7Bqj94n/nwLouUjWFwZK6nejo8etH8d2/Kw+WHMXlI2M11
+pfE9Vqig47MPX5m1Dm78qVlTAQe1S163ofrvLfjcCV87oyVFNu6xThNDPdK7
+jh2zp/v3yecyYYNVG3a7wJJHv3VshecfEj70of73l/sT4aCrHhv3wcUy4ewK
+mOu1vOwvWKAy6+9BWP3XTica76R7j8kM5HW2zG1TM+U16JyqDWtsUBj6RNfv
+GbI3hffd3vZ9/nLks1eobglf+WuAw4JH9U+4smCdlffdfWDe1PrTTOo/1raf
+C0faPJ+uAHcwW4f4MF+0ZOsI7t9gFl72gM7fs6XwLvlcFbMLDv6SGBAH72aV
+lI/Bk0kL91vC//6INGT9/3fkfwHRDx6s
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.31544096567158, 14.714519496373413}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJwtmHk41d3Xxr/GSDpJNFBRUiFEmky7QUmGEE3ihDIVQvPgoBRCJQ1veI5o
+okGJkuQICUUhPUllKEmhVCpD/e71XG9/1PW51tpr32vde+8vqbsHOGwU5zhu
+shjH0b+cLP2lzLimv/jDY9w6n2CFPWC1wT6flSMYN3XHQU5iNONEF3rSE8GK
+IpsFJ8CCt9EdInBPreUHrTHIH967qg58bIlk1QNwoEOYWDVYzJZXsmos40aE
+TRzIAnv6BeW+Bwd2xLvsofq8Tw3e47C+cLqOPnjcwKwXr8H8FMHFdOhpqS9v
+XaCCuFZvX8VwxukcudZ+HCxIuvX6lTzjahQ0EqrBoh+td5qGMc6qb63HT+Iw
+66BWOcYdXpF0Y6gq47g1pVJdQxl3/cXNDGJBauH4oeCJoXcX/ab8mAnXmSzj
+VnXWTXlJ9c/7JJ2RYVzFy8TjV8GsZJynClhrpsXC3eCm006vK4Yw7nTKStNF
+YE5YJJUJVjh56uYwWp8V23IPnL2uq7KB+vvxettf8KbdGhE3wFy5QnkA6l3/
+I9p5AixU3yEni/3X3A2qiqT4rRklJeCfJ5OlY8DM0UjpLPTW8dZ0nKN83a/D
+ItDfQZ/O7dVgUUGteDD6F3saXzuC9IYE9/MxHyXjR3abaH7r+3mLMD8v++O+
+VaS/sKyOh/kWSH1pXoJ5MLsh+ffBzxRtKh6D+T65szTgR4h90RWX8dDzSueA
+I1if/yujB8xeGJn7gWcfsLoYPYFxKwr22viCswo3BahNRH0Zj5MrwOGHaz9c
+B4v8/opNBJ9wXnB2nBr0aAe+vYb9Vlm5bXMGi5ZnW/yGPsMVPiOiwQLWvlwD
+/Cbgj90tyn9gYz0X/XSuz9tZR/muWfFmw5jg26TSOR1gvptBJ5NjAsc8ows/
+wMJX9p7LMC8VU3HLn2CuzSZnA+b59mSm9Beqz1cdOC7DBE5ryqY2g9mSIQ7v
+4Y+j/DPzx7TfqOJdbmCTCxXq2bTexeOMNFi20unxKcr/V1zqjTQTnL0p67QX
+3GS3VPUDuGH/qxp30rNa00Qd+cVHdlraUD3b/aVR4PaCoHhT0m9mPlcV/t+z
+ULYwovyzQ91roGc9/3oesWBgU0o69JrN7Gwxp/Uzu6dED2WCe++67FeSnhhL
+n13w39PefUYw1TM1CPGG/3pLv+ol0fq4zJU2mJeU5vDMKtIrIRk+YTgTDJOV
+iJNVx35+l81rwXFpfYHLwYL47J8e8MP34tG04+CmkvCoCrDnSwez1xRXSl0s
+Bv8SPPbNnj4J93n361zJEUwQmDslOATcFJic8Qb5ui6/Wu6BheZ6uRE8Jrg5
++dIxbjL0Fkzu68d+CbP175mC+R3GWdbwt7VDuTUILLqremUv9A52fHuZQvGY
+2FEn4G9Q2elaEVgYNjA8Cf3aybj6/gtuenSLn4J57Go3S38PFlgny57HvH5s
+PtPTDlbzPdOYh/kuvp84o5XWuxeMbcP832Z5xjyn+Kxtww2GMMH47VkJRRTP
+3l+YDv8KREW8y6SnfqZwEfhc1uDPWIobyKwdKY33YvZeN9LLeV65QPzcPNp1
+NdWbPc5sMThKrXdgAa1PPPyS6j0USY+fCWZ6f630sV+31U+vqZR/PO1SEzhn
+TZGJJnHsYNQ1+L+x+UOqLtX3uLPyGPqJHlE//796faWJoeh3wxa2wJXyKyw9
+AnDej0o/CT9I89C0LXaG/+WWKh65xPH6ijqYp0Whcks37R8W5NcmzwR2+x0v
+6GtgfZn0wD7M34UnK7cDLDy2bP1n8kNJZWYRcaZ7jQ78TJ4UOlJ+Cp0X/m4T
+cEj07FOrwYIRw/3HgV+cF89MBauNWVFeBn81WY9DG+XvPP/PUnDrsfYiDU30
+I2HRmIL9wx9Z+q3TpPdRnVcHvadCJBWjiM+0TeuGv7bemxquUP5g5rTf6PfH
+AaVlD4kT797vxzxKWY/9c7CwZnI7B75QkOTYAFbLMj80EvPLWZEyqh7c9IAN
+zqP3OdY1v5zq35EoD4U/vf5zHuRSPSlZvU9STLDZVqM9BSzaNq0rDOwbmDHh
+AK33GippKYU+onK3eWvS/amOMEd8/k1zaVvKj48XeCMuaj/SOBvMDz49rAjx
+i72DLdSv8K2HjQX2C7UxrBpL+W6Rad3gTFN3udFUr6f73R3433jgyI3xpC9c
+8+JpnNdit1nbdamf0btOHpRlAr6V+IVlVD86vX4b3jPp+kvqAcSXOR83zMtg
+7FQ30s/xFE/MxX1p++0SQP2LXJ0tf4FrHt8eojwV/SxR338S89/AEuLXgfmV
+bw8Pg9875Ev0z4O5z+YuTuAUsdSOL2DhsgOiLfDP7m/JBZNpqDflTfBK8JyU
+m7aRYK4mZM5Q5Lu17GyuBPO3JpQdQ32DoJ2H5aaDZ9oWdmN/sbKtGYuIVUu9
+teD3ravKA0FgUea3PctwfpltcOxpsHDqjSon+C1bmVabDW5ymvh7Nfr/yQVd
+K6H8MpMeF8zHLyTVp5Ly3VMv+WF+xUsb8x6BuaUJZ+PofnptyCkAC0JSdlbB
+H3lp0aNMyj+VUWQAf5ZuULp0AqxmYxBaJInvxcONprup/roisVBJ3Lf7ZSdc
+qd70BTlbwBuydctIv2hWy5A4sObRrHfaVN/jwsY3lG889e0YMFt413Id6g/I
+y20fRnGF7+v/grvLnTVkKJ73J78Y+hxP6yvIU/29P7SEOJ+Z33slVKl+Y/Su
+GJxf/+AZLkakr9qycQ/6/70gWX4NrY/gOXphPrzyZ8JI4vm3RyzG/PpyPs+h
+foUGaU0ymO+kq/+c6qd467TIq5h/1NsuQ6aF/fZ0KWjjPRi6eS6LAov2V07H
+eyuoD2koqgMLpy1kyYjXx+amq2mDZznkHUE8I6/gqa82vV9T+60Qt/M4b34D
+rLbkh08D6h9WfKfQQ/kxenbmYOnxque0dcBPx1wNhb63T7VOuoBFvXu4NOj3
+W6XdGQFWEyp8u4H76/bnlWwquKnrtlgu+j/m0Xcnm/KnThyXB38fVq00vEf5
+/m2GpZhfy5k9KvlUv9nhYyv8XfVaa8cNYodqxQmYt9enrHQhsZNx4B748zOt
+0Dqa6vsV2oqDHa4b2wdS/UOe9rcl8PNOXn7eSso3HGWSLIHveXpYyjywYE3P
+i1tgT7uykepg/rJ5nwbAw+PMefJUb/lniyCcnysFl9f/Rf9NDq9beNhfce3y
+yN9gwefrKtXQV+DGEw3QvHrvd17E96D2a3erLO2fqmJzDP2tKNXxpPoiE6vw
+MPSfG3t56SLigq9x/phP+ZX06QFg7rtvoi3uv9TmctN04ll/zMZgvhWvglc3
+03zqMlWL8R5YfnvapzED++uc+LMU52EgYL37FuIXIWap8Gfs50ln74D55bP7
+KhAfOao3QVIX+r/NMCkGO0m8M7QDc7I+vGjkL9n+JeAkcbZZqDp4UH8R/1+w
+WpdqeCz2j2tod1TUQz3n7U9r4W+v69oWCzAL2HGZ3usInlKfP5h73nFIHqy4
+6MqnWLCa7qoKvNdc++vmwHNgkUybvRLuw8HAvdevgJumi6tOxLxm1hTMuUrr
+PWoa5mG+qcHRf9LBgtNFR/3hp6HlfsfE/+prGJbCn+uLnWtDqZ7zw1WLwUqu
+xqs2Ub24zC9fxHH/NJOarfTovP47pkqcCaY4r4vSo3orJ39vBHuVaHkqUz/2
+nmmqOB+qlT2BYlSft98mGvX0T06J6KH+W9+YqMN/A6c6vU/EkstHvAJP0bQq
++AwWfvgxcB16t0XVK/3Spe+v2cRT6Ofi8hX35Unf/Ir6SPj/np/9dAbpS16s
+tQ3zkLyn0L+K2PKuLt4/Ltm7JTzmv3nx/TXhv+LnI9ZlNN/OZKsXYOewrd8k
+9el74u7kAf+rB2SeTNOn3w+mpZTAn3X+d0xswU3Nod29cky0b2uecQixVE7f
+TznGXJJ2FJwB8ztzAsqwnnct8G4BWCTlwHmB/bSb5r8Fq02/bNswlLH8rDL+
+IPGt8DLoYbItnwJHz0S+hKKvoyxjag+8G3TAgsjtod4yTBTbHGdiCuY21iwO
+GMJYWeZjX0twk0pizFbc5yzPPf62YP6J2467MC/3Ffsi7Sh/0XjPo5KMjZt8
+Q8Oa6itbvC+EHx8tnT4upvxqT/ER8CO6KzppPliYUXriEPz1GG2iqUv5/VWN
+2uJMdDHnzgE1sNq25OUceHaf34ORxJFr3aSRL+E16pMU5f8qSTAVZ2zxnC6u
+n+bxO9orDfFBY9bTQzzZbLuhBBN12N+O76L+O+rOf8D+jQu/RxA3GbdsvCPJ
+RHbRadbfyI/K74NJuP/7EjYZ0byYa8+HGGnGIs2KVw4jvcZlBntoHkfmxZA+
+vqvfR74MY5rKUQfmkb4ehd2G8P/MwrH5zsS3ncZ24HvgrLph3w6aj4Xr+H1D
+mehMlfKP/6N6821s2uDHg42NeiKKF+arq8Pvf97zprdRf1GZ37TAXl9X18kZ
+gE9JjpEAnz8cOU0fzG0Jb8tAvYjR1loOYDVeeeYUnK/Lfv69gWDBeINDO2WZ
+iNfXWxEDFpbeMsrAeb0gM5x3DsxMeY8f4P42OGmtyaZ8TtqjEuddR8c5uBDM
+nzs+7wnmEZC3fv1D4pTkJ7XwV9fgqfUj4rD+nZinqL6xNqOU6u14Jj1SgjHt
+K608Wi/Mi3++DvezMPOcaQ7pe1/6t1IM+q2lRl8m/VOjRnqDxz1TP3WW4nJf
+aw3BRf3SZbHUr/cflZngOCPxbAHpMw4rchNj3FOdErdtxIbFZwvEGHu0tK5w
+M7ip6P3pJdjvlLLoshfpURrW/h3nZ7TL5upNpCciyagIep+fac71pf12Tf95
+Dv2ICt7cCqb4s+7io1Lw19T3Y9h/epxzBTjvRfYHzRJJj83uGm/c/xftw32u
+0n5XLm0xx3257fDkUznNwyvqeD++B7EWoaodtD7/1/pE3K+gV4Va8ob0823p
+Cmn43a+9fZoBWFgok4Dfd0WzR+1SXA3GSdF0QVxkJNG0D6xm/kjSFH6+z4+O
+OAfmTzqp3Yl6JR5H/paARZ71RwPAH8te+r0jPlwpWQ49YvT/Q7P+//+HhrD/
+AfsDqP8=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.595195293865398, 1.860131761048288}, \
+{0, 1}], LineBox[CompressedData["
+1:eJw9k38slHEcx5+MdmRhKP44sud5lh/P41ey5uenOVTKr+RX4Xal4SqrrqXp
+/LgsxqwzoUJnYmWGW8NIawonhFPikunc7CRb0dQRo++t9n22Z5+99t3zfD+f
+9+f9dhBkRqcaEAThj159/fdQoLXRVycgpDdMa4dI8CrwOCDxQxx/8nJPHQlm
+y1YfWyWIVVO8rkISGseyHEvGEZuHjxvlkZA/z6W77Z2BOCbcsC4mwVi2LG/K
+RBzZMXS6kYTc2pLAiR7EdfbbLkoSZkpjI2cJFyCKYpIpDgXKoPstal/E647p
+xAkKDLKjy4syEOct+a+WUWC61RtwuATxyvzm6GcKOkTN2n21iG3izkSRNISm
+a18cqUOcFaeIv0BDl8LYJ68Csbxz0KGahoXh1K+yHMQgFeX306AU9LPbSYgJ
+I6HlHA07tZVjZd6IVQOeSVoauqMK9nbuQayc4i7M0iB7ctRoQ436B4Lv9YYG
+/3ETw8VuxHKzNVUVDSMeydZTD/Xz9Sp4fBpU3hxZ+x29HrqsVjsazqVdI+Zu
+IV6JmFBPUUC161p1YsTSnBqDUgpW3ionVVLEqhmfhGAKCIH5rPg54mfCNGND
+CgrCODKORn//ocVP70iYbIj3G+Xq5x+r2qwnITbx5UTGecRdAX4zRSSIq7jy
+722I3aV167kkhNvp98vg88oyTYRFJIO/D9EEuVbUMPj/gQVP+zw1DL7fZlXH
+13FZ3J/l4A9ScorF/Tdfd3M5mMni+VZEnCiOhMXzw2TpjsNdFuvj91PHD7vN
+Yv2UJvXfnC6yWN/phF+bNiEs1n/rwas/u+1ZvJ/E6ezV42sM3l/N43SPK0MM
+3i9P4ft+Vz2D99919dF+fj6D/XFW8HsgN4PB/on5YBs8mMJgf6W0x9guCRjs
+v3sQ+HpYxGB/WrS2XLpZwWD/jqwLo+37Gexvn+qmNnKHwf7nykS9rjwW58Ok
+2CoiVsri/JSHamZC1CzOV2Zi4bTI3RXnzzBg2TlK7IrzqW4Y+yLuQ/w/v6y5
+vrrBX/TafLQ=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {9.0548, 14.}, {1, 0}], 
+        LineBox[CompressedData["
+1:eJwl0wlIk2EYB/CPeZCmNe9pHohFORPMIsycfpKZqHkfiZozTczSrbCmUTHy
+jOZtLUxIY4WkxnQJZeXZMTBrc7NATWdLmZQwdGoeYf+XPhgPv+19n+f/vtvc
+z/HizjMoijqKF6n/Hyea2trG40hTwvyq6CCY+Tp7PBlmfi5WJcDGI5y+pyya
+0kSxVziwWrCUvOZAU7XB2pxNrOsINrglwApVo30drL6z2vHBnqYGjLK1JrDo
+od96EnFq4Z4s9NFZpIyYw/pR8YgM+5jqubA5O8yPX140gm2fDPfOwzSbVZGB
+dZHX1BUWqJQ4bUiJ91v2B+XEwi3aCNds2M/3eX8nzExUvXSBj8zYBbPQZ4BR
+JGfAlaGpd8thH7Eo0pb0VcrXFslcxumNaFgSI88MQS5q4mSuFFZo/swLYalg
+rNAbfV9kFdQ0w3Sxq+YNXHqrXVlPPHVqVzz6WNxs1GXC/PBQrZbcy85tgzks
+XIxrI+cVdnJ1deR+er4ufISZMi//v+gTE3CZswP3U7qQmp9IzpdeMOsKPxgN
+5EmQg2s36WkGy89kTRps0Ze9T0b2y6uafWPhlp6ypLMwy2vdZtgGeZqtZ1WY
+E5LCK4+DqSvT9YdgiVk/1wQWDnbzbpP8QYqJaWus784oGMMcn5q+mBmYS9ve
+94YjBTYBxlivjy5zeoQ5tLgjK4z0M+uv8IGpL28DJTBzI9ZyAVXnIy7ZRfJM
++q9+gnP1Td9uwMyuxuTvZJ91esNPWGpw2HJA5XtcFB3HHKnlryoB3HZQOV5E
+7t2zc3MZVmS6X7gH81tPWJWQ73tQ2C4iddrlmCPy7331410ayT0lSX4Gq69v
+D5nCtVebpGyc94DgUlk1yenGe18DG69EFG4gR201y1kJl65umsaT/A7SGR28
+1dXr8Rjn14QtR6lhXbxz9pIVzp8n0DeQzzmHI6NgPtVd6QX/Dgsv6Wfi9yVr
+GGvFfEmewTkK1pP/EXIMkLqb/gf1UjjI
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.515727445508166, 6.085629021796733}, \
+{1, 0}], LineBox[{{13.5, 6.5}, {10., 12.500000000001819`}}], 
+        PolygonBox[{{11.447677384685548`, 10.01826734053906}, {
+         12.397834175673825`, 9.183281069670574}, {11.706811054955079`, 
+         8.780184249251306}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.484057296392571, 9.676200089562332}, \
+{-1, -1}], LineBox[{{13.500000000001851`, 6.5}, {6.500000000002592, 6.5}}], 
+        PolygonBox[{{10.6, 6.5}, {9.4, 6.9}, {9.4, 6.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 5.5548}, {0, 1}], 
+        LineBox[{{10.000000000007276`, 12.500000000005457`}, {
+         6.500000000003638, 6.500000000001819}}], 
+        PolygonBox[{{7.947677384685548, 8.98173265946094}, {8.206811054955079,
+          10.219815750748694`}, {8.897834175673825, 9.816718930329426}}], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.515942703607428, 9.676200089562332}, \
+{1, -1}], 
+        {PointSize[0.04], PointBox[{10., 15.5}], PointBox[{5.5, 4.}], 
+         PointBox[{13.5, 6.5}], PointBox[{10., 12.5}], PointBox[{6.5, 6.5}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T8", " ", "P2", " ", "N16"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdfeg/figjhihjij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdfeg/figjhihjij.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {0, 0}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwl1gs01GkfB/C/uxrKZdx2ZN1y2wbZVRTNX1FCkq1t3Daly3RlX/ZNN0Qb
+YuWSxjrE6YZyqbPjTSWXUkwSXqphrEpu8+besEPS+33ed85x5nzO8/x/z+/5
+/f7PM0z2hPvvk6coio8/8k0Nf8VnGU3JyLctTd1uOPkuFb5j5HFKCGd5lMWp
+wFzG25J8+Eav2C7KEOP7Cwti4MqM6yNvWBifK289CvubsC2c4OLmTXOHYV5F
+0/Hcb2gqYt0WsxOw+S+/7FGEuda6mZdgn9g0lVMGNGW8Ka67Gq71OTosD4d2
+dYyNwypNuWUF+jRFB/Kdv7PD/Ef9sh/hdM6SmsOwUaSHuwls/EnoWg4HlnJb
+VWCN8Kjd43Cs/vo8ZTiq6uCkjj1NHZq2Oc2CufOzgfbw/foqmw1wNaea7wHz
+xk2Pn4AjHJlZ22FxdV/0fTg6Vj0xGBaoHGj5Ag87M5VD4I65BjGNfAXHf6J+
+IuZrs87AnqyUhk1wcsbCzjL40mbmvAOs+dJi5gWcp1p+VZ/kY8uyEcEaWmbS
+T8g34YuGNRnXF/tJ78B1dxV8imDeD+wzZL8r8s6aH4SLzZUGLOCuAaN4LThJ
+2/H4IOq1yWQz7wby8xt86FUGu7nOSc3hOkYoi/RLcW2Sc7Ye6rVqq2UQnLI0
+RuWzLp7nSLQ2wpM2coIguNDaoJMDtwXVdFbr4P0woW96wrLUW7NmsFW+l0oo
+vLuPceAyE/1wZ9acgy+ru3Tow1XezyUCuKRg33cV2uhnxgWDMfi3V8v3BBN7
+6x5mI//2Y7FeprDGZ52KcFi9bTxODpYds8i4S8bjn4bNaiEP9Xv1pJ9FtB5L
+FeM+Ua8uaqN+8atnKmzgaL4o3AYuUbi3MgTmOv+5cy0ssT49lAv3568/SPrr
+vj4rpRfOywwy9IRdFz383RT55jie9NgARylqBeyG1Wb69VbDW/mc3Gw4WGZp
+Zg7/Frs//gEsjVP1YcBdj/gKL+A2SUa8GPnt3fJSoRGm2dldf8AhEVMJJST+
+tYtPtsONEbNV/4B579Uyl8If+/p1zOBC/2l+C+pzKMF0YzXy4+U9/poBH9uc
+qe8GF4srru2CXWKcgytRj6SYbokTzPX7+c4yeHhB9+a38AfD/V6xmui3wbS8
+DvzmyzbBWw3Mr2VGGsCpYVqJ7nBO8LnbK+AVE66e+5cifnB40RY470bmh9Al
+NDXBHxOchIMrXdaeVcfzYQEX7sLG3IetLWo0JVJkhJHz+dhy9bQXbBznYLoS
+++l+tix/joF8hDMnIuHqPbWuPTBXTkHnT7jN0ahrBG6zj6gbgY01c0wt8fze
+5wvCJajnrei0+gRYVeKbYgLPqT0rm1Uj5+FZORv2e/qpMAb5mI+uyiTn6bnx
+AF8F+Ubb5ozZwUYWo8HJcKFPsng5mT/XzJyFUwuWv2TCnlcsG32w3/SpZIvP
+JN9/fxCfgq2mRBceww5mDomxxIl/nYmHR/Yzvv0Rzhnq0FwHCxhvd0gRL11h
+6qKM3F8hl3aGwXS27tZK+GTnscaryE/W05x8HH53ZPTKPeRvpVTuuP5/9dww
+Xoz9R7d+36sHn485kxS7GPUWlJ2bY9PUntBbFzwWoX6mSxI/wsH8hEElVdy3
+7Ko0YiO31o5mZezDgJ1E5vtWe7hfVaIp+5Ny10m8S08lAVmK6M8H9d1ucK9P
+zlCRAuIPBBb8Stav15Yfksf6a7ofkH4q2y/c3AGH9uSVTpH7YdA4ZkaOpuJs
+++0dyfscyawSwtztdhO/wrTufxgtsOwIXULO54XUyY7PsJXfosABcj//bOe5
+FfE6i2ocVFBvxXXXOmpgwbZVgeT+rWtjx9HIR+QzeMAQpkaEkUK40zpjlgVn
+7pBG+yL/np1MBulXjEZGSgPcpp83owiPqOwLM8F+6fbD73qxXtosdzoIpqST
+s8XwP0vYA0fg4YcHXhyyI/ewWp8v7NQb528JX3fYJ1lAPI2oTOF78j5ve33k
+NMz7/U0S+X3jOvwQQPIJTQ9/EwJXae9ekCB/XprFk+XwVDurqx/7VR1Vn/sb
+9e8dCXd7TGG9yKbi13Cd7kUF/a8cKrRp5a4nsLk47d4f8xyqKfz+fA1cnK0k
+bzzHoXjZvBtC+JxiiFr93xxKv9awrg9eIXe2ImOaQ92pVl9QJed9c+nR6584
+lIYFfXgNsXFRsuoU4h/SSYyCJ8RDG4UTHErEbQgj9y1VJFfVPc6h6qxtm2fg
+QsVcl9ExDuVZSh9wwv6trs28egKr3pZ8JP2MqLTK98V8aiGFLoUNHZUOrkG8
+Cc3RmyJY9fv1ixiTyPfy3b9k5H2wEMuUsH6ONOiKEulvWPyoDvJ7tzC9l/Rb
+Nn/7krkU8VMar8rBhmXmpSzsJ44RwJaQ+M09BoNwjsj7X/XwRAt7OmIG6306
+/yiN/L5pXY4qhWXGXXf8YdHsOkEq3KS3OkIDLk1I9V4M+z24bN2M/YkWBd0y
+Rbw2nWn78+Q8xvs7i5BP9N0zr92JvxGsdUC+hd7vXRbDTkYGUS7Yn/3I0Mou
+1Fu/cZWJ+gie59gyBDBX6te8cQj96BQm5cHpmrvk/fo4lFWBR20WbP/FKfFW
+N4dKEjMW58KUJuO0cjviOw8rV8ChV+zOatXBk9257WScfDIe/f//Kzb9X7fX
+dwk=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.6003322263215085, 16.89021660517737}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwV1QtcTFkcB/BT2kw7qcmrIjVhLXnksZVHuVfWSDamVh4rzCbbQyr0ksVk
+bJtYOxLVpp1BqNg1KjVKGonQO6/S0EgyUUxEg1b7O/fzmc/9fO8595zf/3/P
+5zP2/uE+mwwJITvwo3fSNIDLgiU6erdnSfaDtGYt3OXdOuMiLP9pv+gSrD+f
+u2ETzLnmFf8L3N4yU2YH8+9WJn3hsSTCv6aojc+S2Hx/Xjw8PM7/iwKW82Qx
+z81ZUl/n7nIQrg8NsM8zY4nfiaV7omBhzTHPyCEsCVoc77YF1umiz842Zcm9
+zEdjtsPEPL+Oy2WJKEc8IgGW2h3I+GjCkqx1SyOyYE3a6SRTeEpxdUcVPF0m
+dPXiYFxRXfIR5h02IeWDWZLIUbY6IO/0qJeSMLgi2cXKj9Y3Z9TpH2GrkDeT
+kmDFtNMB4bDGw9MwD9bYeBmUwqHHv2utpx43yMkJ669uvrGtHY7w7kmuhaev
+4hq8gkV+vga7kUffsj36GV2v3HiJy9eYJyyOqoGFY0Lyu+HzLRl+OTBvb9O/
+KahPKLZhYmE2Z+pWPupf7Z7aPA9WbRRIE2B1gVfcB9oPl+LEq3DKubRnuXAE
+l0wph7ts5k30o/1esln3B7VjlmQI7c+rXlt7WLXle9E+O+TL363eRfu5XBD3
+yRbPn1ma5SCPXORWtxfme+Ra5yI/J3ZFtz0dj1mYkIT6dHpD15YxqOddg9gX
+/eBYGdYrYE1A8lJLY5Y0KUXCU7C0/FeZ2gjf+cDQ1xdhXdOlwXmD8H3PBIY9
+goVOK5lThhi/377YGusrApXpxQYsUbYZ1wfDZF3frwSu/yCLuQmLqta8jyM4
+l+JrQychv7hyfOBUmCj/nHgAJvtv+lvBqhfvBR2w5sKhzDmwKJpMHkX7tcrb
+/CB8fKzvOxdY/CBqFgfrTyk66OpJ+/VgYkgWLO0JXLucOvROpC/yGTlqlwlg
+ha33YHPkVxp71kyj5y9laWAFfMW1bLEJLOLG8YJRr6Yo/PY/2F938sLKHli3
+ntM2E1YV1vT7fIV5n20Pn0E94kMul3+DtQaqcDO4Pot7QgLLHasvRKA/vHOX
+IpfAJFddddcG5+qz/vYDrCffETtrPix28rGYBscaP+y7NBrjecHRK5BHfiBg
+FwuLjR0zvZFfJyDObaPwXDMw3xH1CZN2Bv4Ns2UFa3oGGCJd7m4QA4scdDsi
+/2OIttBbEkrnm21bafCZIUE5qr5dMHHQaBV6higWTBvIpvOdK4P/+sAQj5rI
+N510fLfv+MZevH902CBX7C9/3Bce9I4hwh86j6XDmrGWj4Pe4v1au+39NN+p
+TFlzD/YPSx+9HvXwF9bOL4G1/LpxSmpJ9CEO5nu8a4s3Qj/4bGNPIRz7sEDt
+BhN/VXsh1g8q4DRsoA72q+jF/ppQ1iGQ2vBJ9Rrk00yo4fpQS98wNX0MkWew
+JnxYZX4iy+kjQ6zSKic3Yj/R2npe3CeG6G7dbA+BWdOAzRLUr/td8LobeUWG
+Fqlu/QxJFNwYJYLZ+dLoNFhb8GRkJern29mUJsK3jLrtJsHi8GwxB54Yvjr/
+oDXeHx6WYIn10sZkz9VbYVzWuagE+8tNkpVbYXnq+JNfkG92+9ydXyzhLLVf
+z3uG8NelPDwJa45ne55Fvdkin56fYTZxs48L+sXheCW7weSyXVJkN0NWL1k3
+zBlWuQ6Zc0SLvKaaVZ50PGN/QP8zhpAsa3UMLH6b2lfSyhDWpux+MXXqVUVZ
+E1w3EGCGPKS1NmrhXYbwTFPuhlL7HynvqMX39Jc/qaNuO9dcdYchqtkXB89A
+fWSHLNMJnq0v1O6ntnTqf1+N75VbkXCP2oyo1zSg3k0bZVx6XtQWUTH3UZ/7
+kS4H2q+utyWSR+i3L9fPkZ7PtEmeFhr00/aNsyWsmvDWVd+GevboXdqwnrjo
+2PXrz+Gh+kOHYRVzyssd9Yoidjd8S138YargJfohjGzORl6V9ljn2Vc4TyXC
+I9a0//owZ48uhogXRFzdQ/tlPl5qAcuTrp98OhL5qiTLPuJ9ftHRskWwKnG7
+I+nEeTu7LyZvBLxyo9fMDuTlvCydCotTSveeQT5RxdPbV4bDW3fu+6RmiJLf
+2LiROkTQUYp+3prc2vwNTFp6019cx361XIkRNb2kpURP/3+Hsf8DvRPe+Q==
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {1.3599813626326804, 8.076870967038232}, \
+{1, -1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000007276`, 17.000000000005457`}, {
+          14.500000000007276`, 10.500000000007276`}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           
+           9.996694214876033]& ], {18.003845503734127, 15.345156917263754}, \
+{1, -1}], LineBox[CompressedData["
+1:eJwt2Hk8lGsbB/CJsmWZkC1lTXZDNU1JiFASKR1OKltO2ZoTMcm+nMaSo5LG
+UqFIjuRUMpyspxCVeEuWbKUsiSkSKt7f/X7e/uj+fD/3/dzPdV33Nc/zfKh4
+nHA8ykehUCSXUChkpAiR/9aYUf73z8CM8pTO5qTDI+aWB6ThUqOPm9YrmVFo
+MvWzq+A3ax5VvoBtRqYUZeCSLblzG5Rhe/F0PlhoR8+XMJidu/z1oL4ZJTne
+Z0k1mQ/0/XQfjmqO1Z+BGZHvgsLhIR29j2oqZhSmyIU4E1g7J1jVCm5qPpf+
+Tc+MUqCuZOUK29A/+5TAKdclnbzhzg/3hr1gxd6gHi+yfknzzGpYXX3zuDPM
+Kljp9UYX67dckLaEhTy5D/Ng5fRnOzXJ+tjthoGwQHRAuyCsHK4YZg/rf0nT
+eY/4Zrc7PWPAugrDH+tJvL/UPTSAdyXszb8Oy2WJWmyAk00WGxLgwlaJyh2w
+4+aRqBCY9uHokAecWbC9KIDslzPyPQGe76QUM+EXv/k2cOGA7b8wI0h9rOvv
+jMOUZhFnDrHa+2FV5FOdsJRO6ucm0RrrDBf3Ht47CVNLM64lwvdVX/prk3os
+7oh6AG9bptftD/NCb97rgsWVBeLKYZr/D90v8A9dAeoyVZzv8JDrAvxw4fjX
+fTBjSY7FT7jT8UZWLsyargibgBMly1kf4VRWnkU7bDX3Vt9ADfW6/pV5C166
+1bHQB7ZZd5l5Cu44EmqQDRdWSxky4GP9srH1sPOW5WLTyG/Dk66hN7Bb2F93
+/oL7/l2h+hGeNYv46k68lD/9E8yKn2mWh2Miy9a+h0vTLEU6dMwofGERG/8D
+18pTfs2APxys4FTAtAo9cW9YdcuJsEwSj7iI2Da4aMOwHQtmt7zmqsJyr22u
+OsG8dff7pWGGbvbSjXCOt/5d4i8f4hfl4NS91DoVOEZYpZOfxJ/yO58xXLlv
+19lvqAftUnfvYdjN4NLVr7DmtdFtSbDrym8bF0m9Bq7droKNQhb7pHF95w5j
+3yk4lG14lU5cZntBC/lpNDwb8yReTGYcgkuFxMuyYGrHXGoSbHUr6SSpl3Jk
+guhduNrUlKaubkYx85RnPYe/zFnfYsLcDHWZfrgkjeleA5dmKd57C4+t3Fov
+thbz4qfudcK8Ao3NLvCx3dUKdbBzKdfpGhyVeCYpm/we9oh+6CW+9MDUj6y3
+C6FKaSBPvsJ5Q9LPTnrHTWBu2arpSeQTzNfL5wrL9cdUF8K0ovjTATC1+q3m
+EThzteC3ILL+5eJqGZjpQDdkwkzPHTEvtHHOt8+5u8M5D76tOA/rFnXTd5H7
+WW01/xXmC0it04U1lf2V9GGv4fyDy2FWpICpOEy/LH9uBPEq/219/bsW+vGI
+60QDnFN76P4MbDT1Q/gWLKeQt2UR5qnPbDsP826pu0vj+tTS+RvRMKvbs2YD
+3DCxZPoM7MBfd/wwHNpqxCTzDNpnwT/hLRdley6QejK8eP/C40qNPqVk/SoP
+63k48YBvYxcspBiobIB8OzLMJcQR74hFcg6pR47K8IAtqVczUykBTtM57Xue
+5LOq3uoWvDD3NPYN3Enfp1cNe483VmmvQ37cSP8GmJ53h30aFlofvbEOvmu4
+zq4Brq3l31tC1leEJolr4hxuJuikwGZdHbP28IBOTIs7qb+GTCYb5qywa9Am
+9x8a634Au4mW631E/OljTjldcFRbY0g+rFh0wYkHy/3nh7srLG05+GUeVtYy
+b5Mk+Qb1/5yDKRvkS1tQ38KLfrETcKH/uacJcHCY2/JuEg/Xo9we3u+Z/0c1
+3KSmVKAEB2z8g3GVxHNks8t3MgoZZ58h++3OERzCuDA4Yu2C0ex+ggPZp7j8
+t+ebyf5Dehv6MGpUGOQqYWR+eyQ1iXHm59MpUYy8xcfc5dh/uksjjx+mRkt5
+GsHbqI0Ky+DSf070usE/WGv2SMLH+HddTiP9E514XQdOfVRe3wzH9WRNO8DO
+isanKMh3zYtXKdGwjVDnEyNYeUW78UOyvm2U7wjpDy8f+0VSb3W9ohi4hGLx
+jw32adJi386ChbLaNNLhYzzTkEI4J6JJ5D1MXYikEIta5T8n+/K0DvZmkH68
+KDwcpk3ePxXmERh9noRO1WIc8JpdcMK4cEW3+wdGjoJrqCrGedvzA/o410L+
+qmyyb0rnnzVOMFVn48NcWHoi8C4T5k60RrnABzgjkZFwqnfYYwl4Dd+lsBji
+uNvBjeScPm49Gwpz5PWZsfDumAsLx+BSNe5BK/gtn+Hf9vBA7avzpI77u840
+0UifOYYsjKIvmyNc7oiTvp+NEHkOq+Z9/kr6zC3bOqkGLn3DXd8Cj3QPc6vh
+A33rRktgM3aeTgvp+/uRHqQOtHt5A+/g3b687GS4drxlhyDulxh80CARZk9I
+714PK6yu23SRrHdJjzxKzrXNcA+pKytzg3oWPE95E/4EntVPd2qDS+6etZwh
+8y94msuQf4ntHxw9xOvAVm1dDz+MbJv2h5tE2GW/womGT33KSD3dqDdCYNra
+Du4SPBe50vqv2XDlSJGXA8wJCpY+Bze3/9J5lTzXE35yY+EP0cFRY/BsV0Ot
+H8zeuWuMhvckq2OqgfRJh67bwAk4Z+j2ghzs7OkRlw8zp9es7Ue8d1d/9noB
+O79S9L8Ce/dFpUzCqbqnjh6AHSROp/PhO2qkSqCH/A40B6k5wrBcxTLuv6hf
+Suvfvy6DmY9HB8PhsCVTczO4fkQgTXYbXFyctG4Apt1htAmQ89AenKwn899i
+1LrxXMrzlC7Khd3SLW9WwCkPCt5EwIzMp94F8C6lGaVDsMPlmrYcOCZ8dHEb
+yU9osbwQ1lAz6NMg+QX02FbBV6nHO2Rg5dQQnV7YpyQpnwpTd04yyf0zY1Mu
+rYTNDsU30eESftcAcj1336skX7jSp9TPglxf1TKQCzuccDT1gzmy37s7SL/E
+N4jkwJTWxiukXyzb9wb2ku+SsZ5wQzhtW2exKuqhaXVQ2ZE8Ny6/+dMfZvv6
+pv8GH869ffcfmDH/NJBJnj+zGfEi+M5t2hrR7wtnag4yf4HlLG5cIc+pxCr+
+qWsw85yV5BbYq1yiepB8RztWbSXPZarxzuNiNNRzULD4NeKrcQttUYdzci/6
+ceDgetlTdJg3asNzhKtokXLbYebHr5+F4WXvQkusYcrUUada1GvtRFow8YBm
+5rLTMD3MYNocTr1Z0k6HdSdiRzbBsxHzDj/wXnpg27pTG2ZXjFW2wAOHpBgK
+sGbUbEcBvFOENykEC/0+9jYFDvA+xJpE/Jpe++LjYA/pvc9ayXf+t2+Pz5L3
+7DGmYxnMuxkoxoFnZZ5tyyP1KFbRvU/em75TJznE/bO/dcN04+8eGbANf0Wq
+EOIT+CtpWQE8UhsuvxVWX81pqib14ibTT8KhX12S38GMaL6Fm7CBmHu7MOIr
+rBtIIP1Y8qqQpwG7uU/KC6I+Tx0j7WxI/A+G1uvA7aZ17/xgxnXXWks4g8th
+XyTr+2zVSH3VvqvMVcIs27Y9xOxXWqODpB47ElrJ+g4XF0lBQ/Qbp71Ni/jI
+agstuDO1UYkPlvTL8rOGR1r55FoRz+1c6h03uEko+8oF+K9pYa8gMj8ny2cP
+By5dWBsD81rtxgTgx9zJlwlkv7kIgyrURzvs3eUkOKpfpDoIjtaU6TkLUx5Z
+BNLg+vsitpGwpt709y/4zuMrLnx6Ei6kKJZVwyL1jSc9yXycY+olWGow73dH
+cn2LxE8W7B76mGpO1jd/eH0cFr4km02DnccD3Y7BZTvL96vCA7dO0YNg50sO
+HrLEKoaHk+FnV64+psJyHpO2d+DO8Xu7JWCGndhMNxx//EKCFEw1aRkXRbzM
+oaiW1WT9/obg7XC4vN8qfZgz+ryUBSckhRtbkvWyhXeKYWvdT7eOwOzFtXk9
+sOuKTwUk3xezq77woV7TW3xMrsOssxkeynCQ/dY9T2BanLS2EXyq1PwKj8zv
+3yO4CT748Hm/rBH68uGivT45j7DGFhPYOe/arCyxyj0Nd7izajRtGverGZJ7
+GQUPqCrtfQynMSLeZsHcdPuhJNh7fUD63zBn8+6wXbCZsnBgHXxMTf8GP+xG
+5Zq2wKyZTI1K1OPRkzqRVrJeVe0T+U43+Zmn+Yzs77GpTxv25hjSGmCmq8U/
+Y/jOf3aOO1UJy4WcptyDNV+7hhTDhZpNjfFwk8bW9ySezg+2pV6wtvmLyETY
+LcK1xQFuUKZfPE3yWy6Vugtmfljq7QOPmHa/2guL5h/VPgw7nLLpOEosqcBz
+glMn9ehk/6ObVnIcyf7X/VeWwI0T9Ob9MDV2WL0P9lqa98mV5OcVVCeJ+Kfi
+BdR9iY9zJXfCIY6yNpEk3yZP3QjSj2ImkxyY4nuIRvpFoeFkQDlZv2DN7IIZ
+NVJvu8j5nO9Knocf25gyFuEcg8vnqain+EkXE4316Aex0uUKsFaUTJEd7Pxx
+XEEGTl/ibxQEdwZ/OrOU1P9BTRqHzA8bJ73HfvuHzhVWwIyXkubkPEQNF3w7
+YLkmAY042C4qX2ICZlnIme8gvyfyd5AN//97iLrZfwF22yVu
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.246230799468776, 14.874866310565288}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJwdlAs0lGkYx79hxp2WqFhKS0p2SMbmkvXKJU1FozK10s6gclQutUesar46
+JZeSUHKfqNYlVMqti1mxbZKEOqodjZI75RabxT5Pc87Md37n+b/P7f9+s9Qv
+xGuPHEVRIfDFJ82AH4pNqG8fNUI/KJoOcQWW6TaP1gH7+picTQaWJN4x9VAn
+lH562Wg36itODSapE7q2LuyzvTno4zpzEiC+VuVuVQKwYEhLzQni957eu/oW
+mPpRIChRI9RLY2W/JRaEEkfdHO1QJXRgM8+CDywJ9qrpUCH08IEBxglgoiW+
+eV+Z0JqOltczgA3nUqpilQglHJt+cR1YFmD4gq9I6DgLTdM8PL9OKrVRIHT/
+u/VWScC0fEOuA4vQ6d99dQkHFmyPefAbk1B5sRY+XphPnFPfJ0+oirr8IdNv
+cZJ+FThl+GwVhfnN7fvygdlew2feYP8moV8mgAUrLo9VA5MAvT+imYS+n5Rn
+eQ3nLd/YzIN6DqMmsgxgSUPnIy70o+kxIRUDiz1F8/2g31fF7ey7eD6p7Vg0
+zFO1Ra6nHdl+avIazKs9J7ZShfrUSVltCeyje/cdXy7uo5J3NFGVUHG2O/uS
+sb+ut3oOsE/dZdPVXTjPodr6AuBE98Q8/VXAx1qjnqOfUxFdbsAyxnJREfCC
+nXo/hwBT4RtFjsATF7MHkpEfeosuqBIyk1MsKAOmW4Iii1SIZGujg7ARuc6h
+Pl2ZUAZ2idodwALyjhsC/Z+f5Wj1AkuaNBPsFAllbOEZ2I/5JgbEGjB/61Bl
++kfUl35Wn4H9T7vpZLxBvQKvQYdJSOY+bnUDxllxZK88kWT0OqdUfDuvd3JK
+jhDjNM5kLjKv/EaLHKHsjdseJwATns3ZL3KE9lR37jqK/TGVREI4b2qwTRHn
+E0fGZ6uBP5m248V7sV6Mk+kQ8CH2BmoPntc1WjHBgj1RPTVBWD9+t6u2IiEH
+YthrIzDfaMxjGyVCz/x+YvM5jF+2yN0C/hSPF/ILMF4YFM9VIRTrhvXWp5j/
+30esheCPt5GzdATrux3xKIB9ynW93fS9JdQxr146BffdaeZIoyswreG4YRb0
+DTLr8BBgQbhwsBr4iYN62CXU66/MslQlEqs1a9WrkA39lgbBfSizsu14CSz7
+SX46BPy41p7WPAAsWWZdwYN+d5hl231F/eujGoaKRLIrTthNrYZ+5l34MMgi
+xMRYRweZHnFf1cAkEmGbVtSUJfZrNvI33G86gGWN+QwX2hrC/iW9oc/KX2O9
+3XlN/uBHtOfKu/XY/xHH/doQz449rnoL9blSogF+9Go452ShfjGXwwO/+Lff
+rTsHTLqH69tBH1OWn3YC49oz3pnyhDY6Uzobhf2fniw+D/dj4dO+kGOon1d4
+Ow/80e0ePh6N/MTF+7ECoULN1rinYr38orRemK8zwT+sFDnFNncC7mPL53zz
+Jsw/7t0oVSaSEmc1z1FgSjOgKEmFkMrXZR56MD9hXOpRAj/GhZxgF2CJaeig
+DbA7+/Cz4NV4H319l4B/x8dEManAlNh/wwPwu/Gfgrb7yB+leovAj8Pj8/Sl
+qM9a6WKrTIhWEnPBJLAs3reEDf3wtza+UbaCfXELR5nQ743+mBFtYDIVGdQM
+fnAmI/mLgAU6qca5MD+7xZjGuFgn4nk8+NF/WuihgvE4fkEW7L/Tr1JhGvIb
+xgRHf2QQemzze/terF+/5b+DDCLJbE0tb8V5EsxrHBjgV+8Pv9TgvIF/2vEZ
+hDJ5vkOxGP23n3+wEuJmQ1WibJxHbRfLB/zJVDnMvYj3ZbF+PQfqu+V2ZCah
+vjTbwAben1bPT+txH7QslNoO/c+ZXSnKw/Nf3F9Fgj+bRFa3KnD+wLhzKfB/
+p2lwqrEF9b8uv5msRIiSUQRzHOMf2KH74P4W7Rxh6OE+CqTpcrDP2tggY2dg
+mUWhvw/se/PATPpBnH/5xNf9wE5XttGpwBQnrGc18F+cF5MPUe/6TL8M3k+X
+T1bc95ivcGPTGLwPs3PwwTg+Fcn/B32cLQ==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.04629457140433, 1.614040285447666}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwt1n04lOkeB/DntITlYvIWhYQJa0ajRByrx9shsY2SiIPEQaeikzphGlbe
+s5ntsirEbN6mjW1qy0ursxMrytsQ0clqLuqE2po08tbhfO+9zh8812ee+75/
+39/veua5ZmNUwp6YVRRFCfBHrhSD/NOmKVVyNaMpmch1YXANTYnu+QbshqWh
+afs74YLY9mvfw8KFYukzOPMryU8fiJl7wrWw/9eyNmN3c5oyze9yPQhH+53q
+zIMT2S0avXAuX/q+A5Zrn3zL1aGpeWWP0EWY++PcyATs0toWt8GCpgS7CybS
+dGlK/B+GowPMuRZQa6xHU0oGc7WuxO6l1Xdgbo/8kBMsfl58g9anqclVav2W
+sLylYmcTLFpJW1GHTQvGldaupSkjkes3k6gnSUx9FAxzxiq/lpC82pRuKixa
+EJpfhGU34zTPwJG/xHUnwNRnp6ojYOku82Z/kpf+eIoJW1VvGtsKi10v/ziA
+ep18k39ZkPNXe3cfgVle+73NYOkZveBF5BX0qDezYUbHXE4GXJCx6YI3qV+m
+MqoBK/Ki80k9gW1XgxD9C62ci6vgSE3tOU+Yw/aYfUHqq7y9tIJ5bU8+7WtL
+5jU5HTUEh5WMtpyBhcvLlQ9hluWoiZT0L3mgPAb7FbutM2Pi/u6sk9o4T14R
+Fp4ISzhWzBg4/cRYTyOcqEVXDRA/fXdtFhbfKdIKQj6fUlaT5SZ8fvB+4BSc
+ZHfqoB8s5dtlZ6Ffnw8zHVFwYtQHZ3PMxyJK7fFhcn/71tm78Av1W5wYWFg3
+mOdlQFPB7pp+e4lbL5xtgTNzHjg5woL6Xbx1hpjnDF2qA8vO18SGwmEHXFNe
+I4+0Tb2LB8teDJm0wulZ08/PwC4s3fEScv/IP8ojYA365sppWF7NElvA88Z/
+jY8g6wfYu/pRz0dHo5xL+p8enTsMJ1mezPkK5sac8JxH3jCLiogDZL9o/+F0
+uOr6VEUSTF11mP4c5s3zFstgU6GbRQX6NzqSGj4AMxJsZjxgQd7Pq0l+xlis
+zwrmFcfbcSGM9DPaPTEEd+YbMOtg2lNNtYs8zxx54TJZn8/bI4ONInR5XEt8
+Xiir1MN5RdXVl8thTvvixnh4xCyu5yUcafxlwDBcsNASam6F/f0fPEORz8Dm
+uOY+WPgseuLtWjLvoL3JMGWwxfkc+mWw/xtQCEuZx8asMJ/cor/NFRPf2bJX
+Ahu5qMwJiP3Zx33X4fs8on2fD0fezn8ogQuCi45FkfPLp5aN12NO9bFVrrA8
+PkcrHLbfVHtMH5Yp1xTwYZe8bP3fSV4Ju4V4++S4oh2Whty9GgFbOC15VMF0
+Su6sOfzGrn8mH5Y/Up7tQ703zSU8Hum/VXVLPHxaN+lBCtlvPEp/RF5JPks5
+hzjaK5wPK0ov1n0Pm/YkqKvBTYd3xj+CKSfzmivo3y9ej0mRfGXjqzxg6t4a
+fTdipxOaK5iX5Ax3OJ/0o3iV+gT2rF3I+zecaFFxtht2+frTJ5Y11nc0NIzD
+cdKtT/nE4xFTBjjPiC7p64YFql9uOwqPXtDq0PkC+TnXdUbhN+/sVQJg+a+5
+5yORz+qBZngGLM4ezlTAYuNDrjVwuunZFQH6ZT3fPPQzLLNu/NYW8xHqM/Ta
+YPp24S/tsGf3TEMLzNC4FLPbCO/ztes4PxBXpK9vh31O/37lGzixsLFgozHe
+lyGNonhY8t361kiY9Wk83I3Ue9cbnA77XWr83ACOXLSvTIOjQ54qvUc/9L09
+tyJgWkc5uw9mtDO8zWHBUlZKA7k/bl3Xi3rBFd0hItI/fzAlFs79Yp9SLSz3
+OuCvQN5o6va1n2DOza5DPFhht7mpF+YG3duhAkuvdzyZI/O0SHYpQ/9ShdI0
+m/TrsMPaHQ7uczNPgKUSvdfL5Pv+tsawGRae32EzDPutTn2taoP8mff1e2F7
+g08xobBk5MSWlzBLt9SuHhY4rngZ4bxJZQdqCTatnww/Drf8qf+uGwvrdTNe
+y8jzNhhYx4epyZ1vYkj+zM9qb8DyDk2nRThXUWr2GBaXGT4pRr91YecCJmFa
+1BZoj/lY7FdhvSPrHWjnLlhs989Ecp/zZ43YQBOs32d5eQiOLD+a/BCWyYc6
+msh5EjGTuQHPW7K9qIi4MTLtEExf/Oh7hOT5IXtzBhzcenTJHeb+tuq7dJia
+WFpjBMsu0z0RcGD1QPsi+uOWdVeZkfWFfGrchryPrib2oJ5wsnLbICw38B2I
+gcvSDd0eE/Pn42eQl8fb5i8j8/GYTUmBFR43Wsm8hInWOcpwWdqsOxP10rP9
+XpWgf93f/lIfCjN6fGLc4Pk2b9srJI/avrFlzKvF2TXkFSz9+OT9MDzYcnGn
+Ixv7HY/f74M1FFOP8mCh2q32V3BBkFfWM+L4u80bcB7j2yQba1vML2iu/CTc
+eUskSoC555pHXsLidsNddbAslx3+d+SryvKfGoX/+L1j8v/rZvp/iCs6Xg==
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.1974629540243, 12.294740175065709}, \
+{1, -1}], LineBox[CompressedData["
+1:eJwV1AtUU3UcB/AbI0EZMd4okMMItnAwjoWTwCYCEfFSTB4J0RJd1kGcr2FH
+JFDP1JQpoOMhrCAeKTRFEljiOrOBrzYwaB5TlsgOosHFI7RDjfX9cw7ndz7n
+3vv7f/+/+78LEO3cmG9HUVQ2/kmlaBv+2EKKReAnpIS7B0ovwarDrQVGXyHF
+XBcjzYPz9rKL9LDfW9y1LJhd97jBDDs6ziTLluP5Z9eb/fG8Jl5/buF19CkP
+UEhgmdSqlcEsBs/0Fyw9FsoNgWnthuJt/kJKXtfw2wQqv+F04jyqShsco0VV
+xmsTz+K+zJErpb0wdSncfRXWUYznUndhoTaHdxPWrGdd/ofcX9t2nYNc9FDl
+exF4TrzMOiKCOe0D0WWwqvB4pBwu2ddYZITzetwtHbBpByslDH0M/ryJazD1
+4ZStBC4RRPT9DMt/j/bth4XjxcyLsOXbvXf+hS3BuVEnYSOj0scZVXyk9QBZ
+z2LSJ7uQPrMV1aGoEwKziIFq6Eu/9xTP8Q/20YOocrPOW4Iq3bgwRdaTd40U
+W5FLyQlb6gVTjdKPK2Aqo5pXhWqwDe+MRDXxt/gxUPmeneUW7FsR7a7NJ/Mp
+6U0dIvPkK2u1mDMd66S7BRc2HhS9AauYRZ+MwbKv9/ScwHszcPW3fdGHc1dz
+2w6mbcF2Eljq1GA5uQw5yvxyHsNG+zFZOGyYj727neRva9hNL8X1gZTl/8FK
+rdc7d+DM539zkrBPfgG39wZsuh/zVQ05J6fzPzXCYp4oaRxW3Fe62qOfdLrC
+jRuAeV00b11P+g+3fC+CaU7+uBzmjLTtKIfFAmaWGaZmXuxvh2V6nXc08mpS
+G39Uw5z4pu2nYMshb30PbHp37v49WG5XJmmFpfrsJgdyLlOLmcdgSjdGB8IK
+Z+tgDlk/elEAB56Q/1JL8mRu6rK9BltCXvZNI+9A1YtR8h2IS2yPOsn+ZlY2
+HyX+iK8uIu+785l6GXHC0Hws3Gq/c0qBvD5/npv3Id9VgVvkIpi9zTNqBvNi
+n0k4IsY82G+7pd6BBVWTKTof5OubC9fBpsm4TUEwa9d4tAl2jNStKvdGjqB0
+B3LOLC0Jrg6w4NfFNwQkX5LLugovrP+grWgXOc/OtHU1TDsFVV+BlVl9oRZP
+XKfWMch3Xrjgu3YYdtx8a1Uy9ptmeLhIDyta0iS1ZF4r3UfG4LTA5lfNcPea
+ilIW+rFjC7ZzV2D99AFFGmw0T+4RwcaLWYp6OOFAfs0puJWxRfgSLjz6YO4C
+XHjh6Xgi8irffGVfD0yrJYZaWHwhfPQncr+u/6zJm5yLQ8YmmDP9x3537L87
+Sv3wMJzmkfFDGEwPmkOyYNXlhfpwOG066rtAmB83HO4NG61f1kwir/Hzof5R
+9PNxW9PbAQvj4jK+gbs/mNXsgRVMWfZymF7SlC6ES8qvttchb57q4C0PmDX1
+ftZimK+ut5vFvGSqzKQvMA9BZm7EGPmen59YctMD+Z9IHpnI+e4Y3MCFNTz5
++Snyvicdr51xR7VWr2ain3ysTOwECyafVApgjcvW8wo3zCsjc3AXOe9un8nW
+wsKrDZu7yHXye+yK/OT3eIXwf6LyDKI=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {6.411618926975065, 7.21843785395013}, \
+{1, 1}], LineBox[{{14.5, 10.500000000002307`}, {14.5, 3.499999999998608}}], 
+        PolygonBox[{{14.5, 7.6}, {14.1, 6.4}, {14.9, 6.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.4452, 7.}, {-1, 0}], 
+        LineBox[{{14.500000000007276`, 10.500000000003638`}, {
+         8.500000000005457, 7.}}], 
+        PolygonBox[{{10.98173265946094, 8.447677384685548}, {
+         11.816718930329426`, 9.397834175673825}, {12.219815750748694`, 
+         8.706811054955079}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.323799910437668, 9.484057296392571}, \
+{1, -1}], 
+        LineBox[{{14.5, 3.499999999996362}, {8.500000000001819, 
+         6.999999999996362}}], 
+        PolygonBox[{{12.01826734053906, 4.947677384685548}, {
+         11.183281069670574`, 5.897834175673825}, {10.780184249251306`, 
+         5.206811054955079}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.323799910437668, 4.515942703607428}, \
+{1, 1}], 
+        {PointSize[0.04], PointBox[{7.5, 15.5}], PointBox[{4.5, 9.}], 
+         PointBox[{14.5, 10.5}], PointBox[{14.5, 3.5}], PointBox[{8.5, 7.}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T9", " ", "P1", " ", "N17"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdfei/fggjhihjij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdfei/fggjhihjij.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {22, 0}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwl1gs01GkfB/C/uxrKZdx2ZN1y2wbZVRTNX1FCkq1t3Daly3RlX/ZNN0Qb
+YuWSxjrE6YZyqbPjTSWXUkwSXqphrEpu8+besEPS+33ed85x5nzO8/x/z+/5
+/f7PM0z2hPvvk6coio8/8k0Nf8VnGU3JyLctTd1uOPkuFb5j5HFKCGd5lMWp
+wFzG25J8+Eav2C7KEOP7Cwti4MqM6yNvWBifK289CvubsC2c4OLmTXOHYV5F
+0/Hcb2gqYt0WsxOw+S+/7FGEuda6mZdgn9g0lVMGNGW8Ka67Gq71OTosD4d2
+dYyNwypNuWUF+jRFB/Kdv7PD/Ef9sh/hdM6SmsOwUaSHuwls/EnoWg4HlnJb
+VWCN8Kjd43Cs/vo8ZTiq6uCkjj1NHZq2Oc2CufOzgfbw/foqmw1wNaea7wHz
+xk2Pn4AjHJlZ22FxdV/0fTg6Vj0xGBaoHGj5Ag87M5VD4I65BjGNfAXHf6J+
+IuZrs87AnqyUhk1wcsbCzjL40mbmvAOs+dJi5gWcp1p+VZ/kY8uyEcEaWmbS
+T8g34YuGNRnXF/tJ78B1dxV8imDeD+wzZL8r8s6aH4SLzZUGLOCuAaN4LThJ
+2/H4IOq1yWQz7wby8xt86FUGu7nOSc3hOkYoi/RLcW2Sc7Ye6rVqq2UQnLI0
+RuWzLp7nSLQ2wpM2coIguNDaoJMDtwXVdFbr4P0woW96wrLUW7NmsFW+l0oo
+vLuPceAyE/1wZ9acgy+ru3Tow1XezyUCuKRg33cV2uhnxgWDMfi3V8v3BBN7
+6x5mI//2Y7FeprDGZ52KcFi9bTxODpYds8i4S8bjn4bNaiEP9Xv1pJ9FtB5L
+FeM+Ua8uaqN+8atnKmzgaL4o3AYuUbi3MgTmOv+5cy0ssT49lAv3568/SPrr
+vj4rpRfOywwy9IRdFz383RT55jie9NgARylqBeyG1Wb69VbDW/mc3Gw4WGZp
+Zg7/Frs//gEsjVP1YcBdj/gKL+A2SUa8GPnt3fJSoRGm2dldf8AhEVMJJST+
+tYtPtsONEbNV/4B579Uyl8If+/p1zOBC/2l+C+pzKMF0YzXy4+U9/poBH9uc
+qe8GF4srru2CXWKcgytRj6SYbokTzPX7+c4yeHhB9+a38AfD/V6xmui3wbS8
+DvzmyzbBWw3Mr2VGGsCpYVqJ7nBO8LnbK+AVE66e+5cifnB40RY470bmh9Al
+NDXBHxOchIMrXdaeVcfzYQEX7sLG3IetLWo0JVJkhJHz+dhy9bQXbBznYLoS
+++l+tix/joF8hDMnIuHqPbWuPTBXTkHnT7jN0ahrBG6zj6gbgY01c0wt8fze
+5wvCJajnrei0+gRYVeKbYgLPqT0rm1Uj5+FZORv2e/qpMAb5mI+uyiTn6bnx
+AF8F+Ubb5ozZwUYWo8HJcKFPsng5mT/XzJyFUwuWv2TCnlcsG32w3/SpZIvP
+JN9/fxCfgq2mRBceww5mDomxxIl/nYmHR/Yzvv0Rzhnq0FwHCxhvd0gRL11h
+6qKM3F8hl3aGwXS27tZK+GTnscaryE/W05x8HH53ZPTKPeRvpVTuuP5/9dww
+Xoz9R7d+36sHn485kxS7GPUWlJ2bY9PUntBbFzwWoX6mSxI/wsH8hEElVdy3
+7Ko0YiO31o5mZezDgJ1E5vtWe7hfVaIp+5Ny10m8S08lAVmK6M8H9d1ucK9P
+zlCRAuIPBBb8Stav15Yfksf6a7ofkH4q2y/c3AGH9uSVTpH7YdA4ZkaOpuJs
+++0dyfscyawSwtztdhO/wrTufxgtsOwIXULO54XUyY7PsJXfosABcj//bOe5
+FfE6i2ocVFBvxXXXOmpgwbZVgeT+rWtjx9HIR+QzeMAQpkaEkUK40zpjlgVn
+7pBG+yL/np1MBulXjEZGSgPcpp83owiPqOwLM8F+6fbD73qxXtosdzoIpqST
+s8XwP0vYA0fg4YcHXhyyI/ewWp8v7NQb528JX3fYJ1lAPI2oTOF78j5ve33k
+NMz7/U0S+X3jOvwQQPIJTQ9/EwJXae9ekCB/XprFk+XwVDurqx/7VR1Vn/sb
+9e8dCXd7TGG9yKbi13Cd7kUF/a8cKrRp5a4nsLk47d4f8xyqKfz+fA1cnK0k
+bzzHoXjZvBtC+JxiiFr93xxKv9awrg9eIXe2ImOaQ92pVl9QJed9c+nR6584
+lIYFfXgNsXFRsuoU4h/SSYyCJ8RDG4UTHErEbQgj9y1VJFfVPc6h6qxtm2fg
+QsVcl9ExDuVZSh9wwv6trs28egKr3pZ8JP2MqLTK98V8aiGFLoUNHZUOrkG8
+Cc3RmyJY9fv1ixiTyPfy3b9k5H2wEMuUsH6ONOiKEulvWPyoDvJ7tzC9l/Rb
+Nn/7krkU8VMar8rBhmXmpSzsJ44RwJaQ+M09BoNwjsj7X/XwRAt7OmIG6306
+/yiN/L5pXY4qhWXGXXf8YdHsOkEq3KS3OkIDLk1I9V4M+z24bN2M/YkWBd0y
+Rbw2nWn78+Q8xvs7i5BP9N0zr92JvxGsdUC+hd7vXRbDTkYGUS7Yn/3I0Mou
+1Fu/cZWJ+gie59gyBDBX6te8cQj96BQm5cHpmrvk/fo4lFWBR20WbP/FKfFW
+N4dKEjMW58KUJuO0cjviOw8rV8ChV+zOatXBk9257WScfDIe/f//Kzb9X7fX
+dwk=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.6003322263215085, 16.89021660517737}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwV1QtcTFkcB/BT2kw7qcmrIjVhLXnksZVHuVfWSDamVh4rzCbbQyr0ksVk
+bJtYOxLVpp1BqNg1KjVKGonQO6/S0EgyUUxEg1b7O/fzmc/9fO8595zf/3/P
+5zP2/uE+mwwJITvwo3fSNIDLgiU6erdnSfaDtGYt3OXdOuMiLP9pv+gSrD+f
+u2ETzLnmFf8L3N4yU2YH8+9WJn3hsSTCv6aojc+S2Hx/Xjw8PM7/iwKW82Qx
+z81ZUl/n7nIQrg8NsM8zY4nfiaV7omBhzTHPyCEsCVoc77YF1umiz842Zcm9
+zEdjtsPEPL+Oy2WJKEc8IgGW2h3I+GjCkqx1SyOyYE3a6SRTeEpxdUcVPF0m
+dPXiYFxRXfIR5h02IeWDWZLIUbY6IO/0qJeSMLgi2cXKj9Y3Z9TpH2GrkDeT
+kmDFtNMB4bDGw9MwD9bYeBmUwqHHv2utpx43yMkJ669uvrGtHY7w7kmuhaev
+4hq8gkV+vga7kUffsj36GV2v3HiJy9eYJyyOqoGFY0Lyu+HzLRl+OTBvb9O/
+KahPKLZhYmE2Z+pWPupf7Z7aPA9WbRRIE2B1gVfcB9oPl+LEq3DKubRnuXAE
+l0wph7ts5k30o/1esln3B7VjlmQI7c+rXlt7WLXle9E+O+TL363eRfu5XBD3
+yRbPn1ma5SCPXORWtxfme+Ra5yI/J3ZFtz0dj1mYkIT6dHpD15YxqOddg9gX
+/eBYGdYrYE1A8lJLY5Y0KUXCU7C0/FeZ2gjf+cDQ1xdhXdOlwXmD8H3PBIY9
+goVOK5lThhi/377YGusrApXpxQYsUbYZ1wfDZF3frwSu/yCLuQmLqta8jyM4
+l+JrQychv7hyfOBUmCj/nHgAJvtv+lvBqhfvBR2w5sKhzDmwKJpMHkX7tcrb
+/CB8fKzvOxdY/CBqFgfrTyk66OpJ+/VgYkgWLO0JXLucOvROpC/yGTlqlwlg
+ha33YHPkVxp71kyj5y9laWAFfMW1bLEJLOLG8YJRr6Yo/PY/2F938sLKHli3
+ntM2E1YV1vT7fIV5n20Pn0E94kMul3+DtQaqcDO4Pot7QgLLHasvRKA/vHOX
+IpfAJFddddcG5+qz/vYDrCffETtrPix28rGYBscaP+y7NBrjecHRK5BHfiBg
+FwuLjR0zvZFfJyDObaPwXDMw3xH1CZN2Bv4Ns2UFa3oGGCJd7m4QA4scdDsi
+/2OIttBbEkrnm21bafCZIUE5qr5dMHHQaBV6higWTBvIpvOdK4P/+sAQj5rI
+N510fLfv+MZevH902CBX7C9/3Bce9I4hwh86j6XDmrGWj4Pe4v1au+39NN+p
+TFlzD/YPSx+9HvXwF9bOL4G1/LpxSmpJ9CEO5nu8a4s3Qj/4bGNPIRz7sEDt
+BhN/VXsh1g8q4DRsoA72q+jF/ppQ1iGQ2vBJ9Rrk00yo4fpQS98wNX0MkWew
+JnxYZX4iy+kjQ6zSKic3Yj/R2npe3CeG6G7dbA+BWdOAzRLUr/td8LobeUWG
+Fqlu/QxJFNwYJYLZ+dLoNFhb8GRkJern29mUJsK3jLrtJsHi8GwxB54Yvjr/
+oDXeHx6WYIn10sZkz9VbYVzWuagE+8tNkpVbYXnq+JNfkG92+9ydXyzhLLVf
+z3uG8NelPDwJa45ne55Fvdkin56fYTZxs48L+sXheCW7weSyXVJkN0NWL1k3
+zBlWuQ6Zc0SLvKaaVZ50PGN/QP8zhpAsa3UMLH6b2lfSyhDWpux+MXXqVUVZ
+E1w3EGCGPKS1NmrhXYbwTFPuhlL7HynvqMX39Jc/qaNuO9dcdYchqtkXB89A
+fWSHLNMJnq0v1O6ntnTqf1+N75VbkXCP2oyo1zSg3k0bZVx6XtQWUTH3UZ/7
+kS4H2q+utyWSR+i3L9fPkZ7PtEmeFhr00/aNsyWsmvDWVd+GevboXdqwnrjo
+2PXrz+Gh+kOHYRVzyssd9Yoidjd8S138YargJfohjGzORl6V9ljn2Vc4TyXC
+I9a0//owZ48uhogXRFzdQ/tlPl5qAcuTrp98OhL5qiTLPuJ9ftHRskWwKnG7
+I+nEeTu7LyZvBLxyo9fMDuTlvCydCotTSveeQT5RxdPbV4bDW3fu+6RmiJLf
+2LiROkTQUYp+3prc2vwNTFp6019cx361XIkRNb2kpURP/3+Hsf8DvRPe+Q==
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {1.3599813626326804, 8.076870967038232}, \
+{1, -1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000007276`, 17.000000000005457`}, {
+          14.500000000007276`, 10.500000000007276`}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.003845503734127, 15.345156917263754}, \
+{1, -1}], LineBox[CompressedData["
+1:eJwt2Hk8lGsbB/CJsmWZkC1lTXZDNU1JiFASKR1OKltO2ZoTMcm+nMaSo5LG
+UqFIjuRUMpyspxCVeEuWbKUsiSkSKt7f/X7e/uj+fD/3/dzPdV33Nc/zfKh4
+nHA8ykehUCSXUChkpAiR/9aYUf73z8CM8pTO5qTDI+aWB6ThUqOPm9YrmVFo
+MvWzq+A3ax5VvoBtRqYUZeCSLblzG5Rhe/F0PlhoR8+XMJidu/z1oL4ZJTne
+Z0k1mQ/0/XQfjmqO1Z+BGZHvgsLhIR29j2oqZhSmyIU4E1g7J1jVCm5qPpf+
+Tc+MUqCuZOUK29A/+5TAKdclnbzhzg/3hr1gxd6gHi+yfknzzGpYXX3zuDPM
+Kljp9UYX67dckLaEhTy5D/Ng5fRnOzXJ+tjthoGwQHRAuyCsHK4YZg/rf0nT
+eY/4Zrc7PWPAugrDH+tJvL/UPTSAdyXszb8Oy2WJWmyAk00WGxLgwlaJyh2w
+4+aRqBCY9uHokAecWbC9KIDslzPyPQGe76QUM+EXv/k2cOGA7b8wI0h9rOvv
+jMOUZhFnDrHa+2FV5FOdsJRO6ucm0RrrDBf3Ht47CVNLM64lwvdVX/prk3os
+7oh6AG9bptftD/NCb97rgsWVBeLKYZr/D90v8A9dAeoyVZzv8JDrAvxw4fjX
+fTBjSY7FT7jT8UZWLsyargibgBMly1kf4VRWnkU7bDX3Vt9ADfW6/pV5C166
+1bHQB7ZZd5l5Cu44EmqQDRdWSxky4GP9srH1sPOW5WLTyG/Dk66hN7Bb2F93
+/oL7/l2h+hGeNYv46k68lD/9E8yKn2mWh2Miy9a+h0vTLEU6dMwofGERG/8D
+18pTfs2APxys4FTAtAo9cW9YdcuJsEwSj7iI2Da4aMOwHQtmt7zmqsJyr22u
+OsG8dff7pWGGbvbSjXCOt/5d4i8f4hfl4NS91DoVOEZYpZOfxJ/yO58xXLlv
+19lvqAftUnfvYdjN4NLVr7DmtdFtSbDrym8bF0m9Bq7droKNQhb7pHF95w5j
+3yk4lG14lU5cZntBC/lpNDwb8yReTGYcgkuFxMuyYGrHXGoSbHUr6SSpl3Jk
+guhduNrUlKaubkYx85RnPYe/zFnfYsLcDHWZfrgkjeleA5dmKd57C4+t3Fov
+thbz4qfudcK8Ao3NLvCx3dUKdbBzKdfpGhyVeCYpm/we9oh+6CW+9MDUj6y3
+C6FKaSBPvsJ5Q9LPTnrHTWBu2arpSeQTzNfL5wrL9cdUF8K0ovjTATC1+q3m
+EThzteC3ILL+5eJqGZjpQDdkwkzPHTEvtHHOt8+5u8M5D76tOA/rFnXTd5H7
+WW01/xXmC0it04U1lf2V9GGv4fyDy2FWpICpOEy/LH9uBPEq/219/bsW+vGI
+60QDnFN76P4MbDT1Q/gWLKeQt2UR5qnPbDsP826pu0vj+tTS+RvRMKvbs2YD
+3DCxZPoM7MBfd/wwHNpqxCTzDNpnwT/hLRdley6QejK8eP/C40qNPqVk/SoP
+63k48YBvYxcspBiobIB8OzLMJcQR74hFcg6pR47K8IAtqVczUykBTtM57Xue
+5LOq3uoWvDD3NPYN3Enfp1cNe483VmmvQ37cSP8GmJ53h30aFlofvbEOvmu4
+zq4Brq3l31tC1leEJolr4hxuJuikwGZdHbP28IBOTIs7qb+GTCYb5qywa9Am
+9x8a634Au4mW631E/OljTjldcFRbY0g+rFh0wYkHy/3nh7srLG05+GUeVtYy
+b5Mk+Qb1/5yDKRvkS1tQ38KLfrETcKH/uacJcHCY2/JuEg/Xo9we3u+Z/0c1
+3KSmVKAEB2z8g3GVxHNks8t3MgoZZ58h++3OERzCuDA4Yu2C0ex+ggPZp7j8
+t+ebyf5Dehv6MGpUGOQqYWR+eyQ1iXHm59MpUYy8xcfc5dh/uksjjx+mRkt5
+GsHbqI0Ky+DSf070usE/WGv2SMLH+HddTiP9E514XQdOfVRe3wzH9WRNO8DO
+isanKMh3zYtXKdGwjVDnEyNYeUW78UOyvm2U7wjpDy8f+0VSb3W9ohi4hGLx
+jw32adJi386ChbLaNNLhYzzTkEI4J6JJ5D1MXYikEIta5T8n+/K0DvZmkH68
+KDwcpk3ePxXmERh9noRO1WIc8JpdcMK4cEW3+wdGjoJrqCrGedvzA/o410L+
+qmyyb0rnnzVOMFVn48NcWHoi8C4T5k60RrnABzgjkZFwqnfYYwl4Dd+lsBji
+uNvBjeScPm49Gwpz5PWZsfDumAsLx+BSNe5BK/gtn+Hf9vBA7avzpI77u840
+0UifOYYsjKIvmyNc7oiTvp+NEHkOq+Z9/kr6zC3bOqkGLn3DXd8Cj3QPc6vh
+A33rRktgM3aeTgvp+/uRHqQOtHt5A+/g3b687GS4drxlhyDulxh80CARZk9I
+714PK6yu23SRrHdJjzxKzrXNcA+pKytzg3oWPE95E/4EntVPd2qDS+6etZwh
+8y94msuQf4ntHxw9xOvAVm1dDz+MbJv2h5tE2GW/womGT33KSD3dqDdCYNra
+Du4SPBe50vqv2XDlSJGXA8wJCpY+Bze3/9J5lTzXE35yY+EP0cFRY/BsV0Ot
+H8zeuWuMhvckq2OqgfRJh67bwAk4Z+j2ghzs7OkRlw8zp9es7Ue8d1d/9noB
+O79S9L8Ce/dFpUzCqbqnjh6AHSROp/PhO2qkSqCH/A40B6k5wrBcxTLuv6hf
+Suvfvy6DmY9HB8PhsCVTczO4fkQgTXYbXFyctG4Apt1htAmQ89AenKwn899i
+1LrxXMrzlC7Khd3SLW9WwCkPCt5EwIzMp94F8C6lGaVDsMPlmrYcOCZ8dHEb
+yU9osbwQ1lAz6NMg+QX02FbBV6nHO2Rg5dQQnV7YpyQpnwpTd04yyf0zY1Mu
+rYTNDsU30eESftcAcj1336skX7jSp9TPglxf1TKQCzuccDT1gzmy37s7SL/E
+N4jkwJTWxiukXyzb9wb2ku+SsZ5wQzhtW2exKuqhaXVQ2ZE8Ny6/+dMfZvv6
+pv8GH869ffcfmDH/NJBJnj+zGfEi+M5t2hrR7wtnag4yf4HlLG5cIc+pxCr+
+qWsw85yV5BbYq1yiepB8RztWbSXPZarxzuNiNNRzULD4NeKrcQttUYdzci/6
+ceDgetlTdJg3asNzhKtokXLbYebHr5+F4WXvQkusYcrUUada1GvtRFow8YBm
+5rLTMD3MYNocTr1Z0k6HdSdiRzbBsxHzDj/wXnpg27pTG2ZXjFW2wAOHpBgK
+sGbUbEcBvFOENykEC/0+9jYFDvA+xJpE/Jpe++LjYA/pvc9ayXf+t2+Pz5L3
+7DGmYxnMuxkoxoFnZZ5tyyP1KFbRvU/em75TJznE/bO/dcN04+8eGbANf0Wq
+EOIT+CtpWQE8UhsuvxVWX81pqib14ibTT8KhX12S38GMaL6Fm7CBmHu7MOIr
+rBtIIP1Y8qqQpwG7uU/KC6I+Tx0j7WxI/A+G1uvA7aZ17/xgxnXXWks4g8th
+XyTr+2zVSH3VvqvMVcIs27Y9xOxXWqODpB47ElrJ+g4XF0lBQ/Qbp71Ni/jI
+agstuDO1UYkPlvTL8rOGR1r55FoRz+1c6h03uEko+8oF+K9pYa8gMj8ny2cP
+By5dWBsD81rtxgTgx9zJlwlkv7kIgyrURzvs3eUkOKpfpDoIjtaU6TkLUx5Z
+BNLg+vsitpGwpt709y/4zuMrLnx6Ei6kKJZVwyL1jSc9yXycY+olWGow73dH
+cn2LxE8W7B76mGpO1jd/eH0cFr4km02DnccD3Y7BZTvL96vCA7dO0YNg50sO
+HrLEKoaHk+FnV64+psJyHpO2d+DO8Xu7JWCGndhMNxx//EKCFEw1aRkXRbzM
+oaiW1WT9/obg7XC4vN8qfZgz+ryUBSckhRtbkvWyhXeKYWvdT7eOwOzFtXk9
+sOuKTwUk3xezq77woV7TW3xMrsOssxkeynCQ/dY9T2BanLS2EXyq1PwKj8zv
+3yO4CT748Hm/rBH68uGivT45j7DGFhPYOe/arCyxyj0Nd7izajRtGverGZJ7
+GQUPqCrtfQynMSLeZsHcdPuhJNh7fUD63zBn8+6wXbCZsnBgHXxMTf8GP+xG
+5Zq2wKyZTI1K1OPRkzqRVrJeVe0T+U43+Zmn+Yzs77GpTxv25hjSGmCmq8U/
+Y/jOf3aOO1UJy4WcptyDNV+7hhTDhZpNjfFwk8bW9ySezg+2pV6wtvmLyETY
+LcK1xQFuUKZfPE3yWy6Vugtmfljq7QOPmHa/2guL5h/VPgw7nLLpOEosqcBz
+glMn9ehk/6ObVnIcyf7X/VeWwI0T9Ob9MDV2WL0P9lqa98mV5OcVVCeJ+Kfi
+BdR9iY9zJXfCIY6yNpEk3yZP3QjSj2ImkxyY4nuIRvpFoeFkQDlZv2DN7IIZ
+NVJvu8j5nO9Knocf25gyFuEcg8vnqain+EkXE4316Aex0uUKsFaUTJEd7Pxx
+XEEGTl/ibxQEdwZ/OrOU1P9BTRqHzA8bJ73HfvuHzhVWwIyXkubkPEQNF3w7
+YLkmAY042C4qX2ICZlnIme8gvyfyd5AN//97iLrZfwF22yVu
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.246230799468776, 14.874866310565288}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJwdlAs0lGkYx79hxp2WqFhKS0p2SMbmkvXKJU1FozK10s6gclQutUesar46
+JZeSUHKfqNYlVMqti1mxbZKEOqodjZI75RabxT5Pc87Md37n+b/P7f9+s9Qv
+xGuPHEVRIfDFJ82AH4pNqG8fNUI/KJoOcQWW6TaP1gH7+picTQaWJN4x9VAn
+lH562Wg36itODSapE7q2LuyzvTno4zpzEiC+VuVuVQKwYEhLzQni957eu/oW
+mPpRIChRI9RLY2W/JRaEEkfdHO1QJXRgM8+CDywJ9qrpUCH08IEBxglgoiW+
+eV+Z0JqOltczgA3nUqpilQglHJt+cR1YFmD4gq9I6DgLTdM8PL9OKrVRIHT/
+u/VWScC0fEOuA4vQ6d99dQkHFmyPefAbk1B5sRY+XphPnFPfJ0+oirr8IdNv
+cZJ+FThl+GwVhfnN7fvygdlew2feYP8moV8mgAUrLo9VA5MAvT+imYS+n5Rn
+eQ3nLd/YzIN6DqMmsgxgSUPnIy70o+kxIRUDiz1F8/2g31fF7ey7eD6p7Vg0
+zFO1Ra6nHdl+avIazKs9J7ZShfrUSVltCeyje/cdXy7uo5J3NFGVUHG2O/uS
+sb+ut3oOsE/dZdPVXTjPodr6AuBE98Q8/VXAx1qjnqOfUxFdbsAyxnJREfCC
+nXo/hwBT4RtFjsATF7MHkpEfeosuqBIyk1MsKAOmW4Iii1SIZGujg7ARuc6h
+Pl2ZUAZ2idodwALyjhsC/Z+f5Wj1AkuaNBPsFAllbOEZ2I/5JgbEGjB/61Bl
++kfUl35Wn4H9T7vpZLxBvQKvQYdJSOY+bnUDxllxZK88kWT0OqdUfDuvd3JK
+jhDjNM5kLjKv/EaLHKHsjdseJwATns3ZL3KE9lR37jqK/TGVREI4b2qwTRHn
+E0fGZ6uBP5m248V7sV6Mk+kQ8CH2BmoPntc1WjHBgj1RPTVBWD9+t6u2IiEH
+YthrIzDfaMxjGyVCz/x+YvM5jF+2yN0C/hSPF/ILMF4YFM9VIRTrhvXWp5j/
+30esheCPt5GzdATrux3xKIB9ynW93fS9JdQxr146BffdaeZIoyswreG4YRb0
+DTLr8BBgQbhwsBr4iYN62CXU66/MslQlEqs1a9WrkA39lgbBfSizsu14CSz7
+SX46BPy41p7WPAAsWWZdwYN+d5hl231F/eujGoaKRLIrTthNrYZ+5l34MMgi
+xMRYRweZHnFf1cAkEmGbVtSUJfZrNvI33G86gGWN+QwX2hrC/iW9oc/KX2O9
+3XlN/uBHtOfKu/XY/xHH/doQz449rnoL9blSogF+9Go452ShfjGXwwO/+Lff
+rTsHTLqH69tBH1OWn3YC49oz3pnyhDY6Uzobhf2fniw+D/dj4dO+kGOon1d4
+Ow/80e0ePh6N/MTF+7ECoULN1rinYr38orRemK8zwT+sFDnFNncC7mPL53zz
+Jsw/7t0oVSaSEmc1z1FgSjOgKEmFkMrXZR56MD9hXOpRAj/GhZxgF2CJaeig
+DbA7+/Cz4NV4H319l4B/x8dEManAlNh/wwPwu/Gfgrb7yB+leovAj8Pj8/Sl
+qM9a6WKrTIhWEnPBJLAs3reEDf3wtza+UbaCfXELR5nQ743+mBFtYDIVGdQM
+fnAmI/mLgAU6qca5MD+7xZjGuFgn4nk8+NF/WuihgvE4fkEW7L/Tr1JhGvIb
+xgRHf2QQemzze/terF+/5b+DDCLJbE0tb8V5EsxrHBjgV+8Pv9TgvIF/2vEZ
+hDJ5vkOxGP23n3+wEuJmQ1WibJxHbRfLB/zJVDnMvYj3ZbF+PQfqu+V2ZCah
+vjTbwAben1bPT+txH7QslNoO/c+ZXSnKw/Nf3F9Fgj+bRFa3KnD+wLhzKfB/
+p2lwqrEF9b8uv5msRIiSUQRzHOMf2KH74P4W7Rxh6OE+CqTpcrDP2tggY2dg
+mUWhvw/se/PATPpBnH/5xNf9wE5XttGpwBQnrGc18F+cF5MPUe/6TL8M3k+X
+T1bc95ivcGPTGLwPs3PwwTg+Fcn/B32cLQ==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.04629457140433, 1.614040285447666}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwt1n04lOkeB/DntITlYvIWhYQJa0ajRByrx9shsY2SiIPEQaeikzphGlbe
+s5ntsirEbN6mjW1qy0ursxMrytsQ0clqLuqE2po08tbhfO+9zh8812ee+75/
+39/veua5ZmNUwp6YVRRFCfBHrhSD/NOmKVVyNaMpmch1YXANTYnu+QbshqWh
+afs74YLY9mvfw8KFYukzOPMryU8fiJl7wrWw/9eyNmN3c5oyze9yPQhH+53q
+zIMT2S0avXAuX/q+A5Zrn3zL1aGpeWWP0EWY++PcyATs0toWt8GCpgS7CybS
+dGlK/B+GowPMuRZQa6xHU0oGc7WuxO6l1Xdgbo/8kBMsfl58g9anqclVav2W
+sLylYmcTLFpJW1GHTQvGldaupSkjkes3k6gnSUx9FAxzxiq/lpC82pRuKixa
+EJpfhGU34zTPwJG/xHUnwNRnp6ojYOku82Z/kpf+eIoJW1VvGtsKi10v/ziA
+ep18k39ZkPNXe3cfgVle+73NYOkZveBF5BX0qDezYUbHXE4GXJCx6YI3qV+m
+MqoBK/Ki80k9gW1XgxD9C62ci6vgSE3tOU+Yw/aYfUHqq7y9tIJ5bU8+7WtL
+5jU5HTUEh5WMtpyBhcvLlQ9hluWoiZT0L3mgPAb7FbutM2Pi/u6sk9o4T14R
+Fp4ISzhWzBg4/cRYTyOcqEVXDRA/fXdtFhbfKdIKQj6fUlaT5SZ8fvB+4BSc
+ZHfqoB8s5dtlZ6Ffnw8zHVFwYtQHZ3PMxyJK7fFhcn/71tm78Av1W5wYWFg3
+mOdlQFPB7pp+e4lbL5xtgTNzHjg5woL6Xbx1hpjnDF2qA8vO18SGwmEHXFNe
+I4+0Tb2LB8teDJm0wulZ08/PwC4s3fEScv/IP8ojYA365sppWF7NElvA88Z/
+jY8g6wfYu/pRz0dHo5xL+p8enTsMJ1mezPkK5sac8JxH3jCLiogDZL9o/+F0
+uOr6VEUSTF11mP4c5s3zFstgU6GbRQX6NzqSGj4AMxJsZjxgQd7Pq0l+xlis
+zwrmFcfbcSGM9DPaPTEEd+YbMOtg2lNNtYs8zxx54TJZn8/bI4ONInR5XEt8
+Xiir1MN5RdXVl8thTvvixnh4xCyu5yUcafxlwDBcsNASam6F/f0fPEORz8Dm
+uOY+WPgseuLtWjLvoL3JMGWwxfkc+mWw/xtQCEuZx8asMJ/cor/NFRPf2bJX
+Ahu5qMwJiP3Zx33X4fs8on2fD0fezn8ogQuCi45FkfPLp5aN12NO9bFVrrA8
+PkcrHLbfVHtMH5Yp1xTwYZe8bP3fSV4Ju4V4++S4oh2Whty9GgFbOC15VMF0
+Su6sOfzGrn8mH5Y/Up7tQ703zSU8Hum/VXVLPHxaN+lBCtlvPEp/RF5JPks5
+hzjaK5wPK0ov1n0Pm/YkqKvBTYd3xj+CKSfzmivo3y9ej0mRfGXjqzxg6t4a
+fTdipxOaK5iX5Ax3OJ/0o3iV+gT2rF3I+zecaFFxtht2+frTJ5Y11nc0NIzD
+cdKtT/nE4xFTBjjPiC7p64YFql9uOwqPXtDq0PkC+TnXdUbhN+/sVQJg+a+5
+5yORz+qBZngGLM4ezlTAYuNDrjVwuunZFQH6ZT3fPPQzLLNu/NYW8xHqM/Ta
+YPp24S/tsGf3TEMLzNC4FLPbCO/ztes4PxBXpK9vh31O/37lGzixsLFgozHe
+lyGNonhY8t361kiY9Wk83I3Ue9cbnA77XWr83ACOXLSvTIOjQ54qvUc/9L09
+tyJgWkc5uw9mtDO8zWHBUlZKA7k/bl3Xi3rBFd0hItI/fzAlFs79Yp9SLSz3
+OuCvQN5o6va1n2DOza5DPFhht7mpF+YG3duhAkuvdzyZI/O0SHYpQ/9ShdI0
+m/TrsMPaHQ7uczNPgKUSvdfL5Pv+tsawGRae32EzDPutTn2taoP8mff1e2F7
+g08xobBk5MSWlzBLt9SuHhY4rngZ4bxJZQdqCTatnww/Drf8qf+uGwvrdTNe
+y8jzNhhYx4epyZ1vYkj+zM9qb8DyDk2nRThXUWr2GBaXGT4pRr91YecCJmFa
+1BZoj/lY7FdhvSPrHWjnLlhs989Ecp/zZ43YQBOs32d5eQiOLD+a/BCWyYc6
+msh5EjGTuQHPW7K9qIi4MTLtEExf/Oh7hOT5IXtzBhzcenTJHeb+tuq7dJia
+WFpjBMsu0z0RcGD1QPsi+uOWdVeZkfWFfGrchryPrib2oJ5wsnLbICw38B2I
+gcvSDd0eE/Pn42eQl8fb5i8j8/GYTUmBFR43Wsm8hInWOcpwWdqsOxP10rP9
+XpWgf93f/lIfCjN6fGLc4Pk2b9srJI/avrFlzKvF2TXkFSz9+OT9MDzYcnGn
+Ixv7HY/f74M1FFOP8mCh2q32V3BBkFfWM+L4u80bcB7j2yQba1vML2iu/CTc
+eUskSoC555pHXsLidsNddbAslx3+d+SryvKfGoX/+L1j8v/rZvp/iCs6Xg==
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.1974629540243, 12.294740175065709}, \
+{1, -1}], LineBox[CompressedData["
+1:eJwV1AtUU3UcB/AbI0EZMd4okMMItnAwjoWTwCYCEfFSTB4J0RJd1kGcr2FH
+JFDP1JQpoOMhrCAeKTRFEljiOrOBrzYwaB5TlsgOosHFI7RDjfX9cw7ndz7n
+3vv7f/+/+78LEO3cmG9HUVQ2/kmlaBv+2EKKReAnpIS7B0ovwarDrQVGXyHF
+XBcjzYPz9rKL9LDfW9y1LJhd97jBDDs6ziTLluP5Z9eb/fG8Jl5/buF19CkP
+UEhgmdSqlcEsBs/0Fyw9FsoNgWnthuJt/kJKXtfw2wQqv+F04jyqShsco0VV
+xmsTz+K+zJErpb0wdSncfRXWUYznUndhoTaHdxPWrGdd/ofcX9t2nYNc9FDl
+exF4TrzMOiKCOe0D0WWwqvB4pBwu2ddYZITzetwtHbBpByslDH0M/ryJazD1
+4ZStBC4RRPT9DMt/j/bth4XjxcyLsOXbvXf+hS3BuVEnYSOj0scZVXyk9QBZ
+z2LSJ7uQPrMV1aGoEwKziIFq6Eu/9xTP8Q/20YOocrPOW4Iq3bgwRdaTd40U
+W5FLyQlb6gVTjdKPK2Aqo5pXhWqwDe+MRDXxt/gxUPmeneUW7FsR7a7NJ/Mp
+6U0dIvPkK2u1mDMd66S7BRc2HhS9AauYRZ+MwbKv9/ScwHszcPW3fdGHc1dz
+2w6mbcF2Eljq1GA5uQw5yvxyHsNG+zFZOGyYj727neRva9hNL8X1gZTl/8FK
+rdc7d+DM539zkrBPfgG39wZsuh/zVQ05J6fzPzXCYp4oaRxW3Fe62qOfdLrC
+jRuAeV00b11P+g+3fC+CaU7+uBzmjLTtKIfFAmaWGaZmXuxvh2V6nXc08mpS
+G39Uw5z4pu2nYMshb30PbHp37v49WG5XJmmFpfrsJgdyLlOLmcdgSjdGB8IK
+Z+tgDlk/elEAB56Q/1JL8mRu6rK9BltCXvZNI+9A1YtR8h2IS2yPOsn+ZlY2
+HyX+iK8uIu+785l6GXHC0Hws3Gq/c0qBvD5/npv3Id9VgVvkIpi9zTNqBvNi
+n0k4IsY82G+7pd6BBVWTKTof5OubC9fBpsm4TUEwa9d4tAl2jNStKvdGjqB0
+B3LOLC0Jrg6w4NfFNwQkX5LLugovrP+grWgXOc/OtHU1TDsFVV+BlVl9oRZP
+XKfWMch3Xrjgu3YYdtx8a1Uy9ptmeLhIDyta0iS1ZF4r3UfG4LTA5lfNcPea
+ilIW+rFjC7ZzV2D99AFFGmw0T+4RwcaLWYp6OOFAfs0puJWxRfgSLjz6YO4C
+XHjh6Xgi8irffGVfD0yrJYZaWHwhfPQncr+u/6zJm5yLQ8YmmDP9x3537L87
+Sv3wMJzmkfFDGEwPmkOyYNXlhfpwOG066rtAmB83HO4NG61f1kwir/Hzof5R
+9PNxW9PbAQvj4jK+gbs/mNXsgRVMWfZymF7SlC6ES8qvttchb57q4C0PmDX1
+ftZimK+ut5vFvGSqzKQvMA9BZm7EGPmen59YctMD+Z9IHpnI+e4Y3MCFNTz5
++Snyvicdr51xR7VWr2ain3ysTOwECyafVApgjcvW8wo3zCsjc3AXOe9un8nW
+wsKrDZu7yHXye+yK/OT3eIXwf6LyDKI=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {6.411618926975065, 7.21843785395013}, \
+{1, 1}], LineBox[{{14.5, 10.500000000002307`}, {14.5, 3.499999999998608}}], 
+        PolygonBox[{{14.5, 6.4}, {14.1, 7.6}, {14.9, 7.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.4452, 7.}, {-1, 0}], 
+        LineBox[{{14.500000000007276`, 10.500000000003638`}, {
+         8.500000000005457, 7.}}], 
+        PolygonBox[{{12.01826734053906, 9.052322615314452}, {
+         10.780184249251306`, 8.793188945044921}, {11.183281069670574`, 
+         8.102165824326175}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.323799910437668, 9.484057296392571}, \
+{1, -1}], 
+        LineBox[{{14.5, 3.499999999996362}, {8.500000000001819, 
+         6.999999999996362}}], 
+        PolygonBox[{{10.98173265946094, 5.552322615314452}, {
+         12.219815750748694`, 5.293188945044921}, {11.816718930329426`, 
+         4.602165824326175}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.323799910437668, 4.515942703607428}, \
+{1, 1}], 
+        {PointSize[0.04], PointBox[{7.5, 15.5}], PointBox[{4.5, 9.}], 
+         PointBox[{14.5, 10.5}], PointBox[{14.5, 3.5}], PointBox[{8.5, 7.}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T9", " ", "P2", " ", "N18"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdfei/fggjhihjij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdfei/fggjhihjij.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {44, 0}, {0, 0}, {22, 22}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["g",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {21.75, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["g",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {26.25, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["\[RightArrow]",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {30.75, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["H",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {35.25, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["g",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {39.75, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["g",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {44.25, 69.96}, {0, 0}]},
+  AspectRatio->1.0999999999999999`,
+  ImageSize->{288, 288},
+  PlotRange->{{0, 66}, {0, 72.6}}]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489721350429*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ImageCache->GraphicsData["CompressedBitmap", "\<\
+eJyU3QW4ZclVPvxL3+6+Pd3TPS6ZmcxMlAgRokCCQwiQoMEhkOAxLEDQIAES
+XIIT3IK7u7sFdw3urudbv9rrrVP3pgn/bz9P0nPPObtq1ZJ3Sdnjn/TMd3vn
+pz/pme/+jk+683Xe+0nv+W7v/o7vc+dj3uO966PDlzk4eJk7/e/OA/+9OzjI
+/z16V8/B0e4///M/dw94wAN23/zN3+yT3bd927ftXu3VXs3nB08evzm7+6//
++q/dG7/xG+/e4A3eYPcFX/AFu8PDw93Tn/70N+mvv+iLvmh3xx137L7iK75i
+98hHPnJ322237f7u7/7uruPrgxvGP4e7f/3Xf/Xp+Ote/eYXfuEX7h760Ifu
+vvzLv3z31m/91rurr7569+IXv/gdx9dndn/5l3+5+9AP/dDd27zN2+w+/dM/
+XQcH6RTdXnvzN3/z3cd8zMfsnv/85/t9d3p9t/CZn/mZYzRv+IZvuHvP93zP
+3d///d8fXN0E/dM//dPu3//938df1zY3vv7rv373Vm/1VrvnPve5u+c973mD
+As+//Mu/HDyq3/vnf/7n3f/8z/+Mv57Qn/3bv/3b7j/+4z/GXzf3Zz3Y8df9
+j5NVzNt9wzd8g7HunvrUp+7e4z3e4+DC+O7C7pd/+Zd3H/zBHzze++///u/d
+J3/yJ+8e//jH797ojd5o973f+73j88/6rM/afeu3fmt14p0bxuAJ6O3f/u0H
+s37u535u/M4QfvZnf3b898///M/v3vRN33T353/+5+PvH/qhH9p93ud93vjv
+3/u939u9xVu8xWDT53zO5xjewcOaHmxC4z/+4z+O337pl37p6Osd3/Edd7/x
+G78xPvuWb/mW3ad92qfVyLxzze5TPuVTdj/2Yz+W4e++6qu+avd1X/d147/1
+j45f/MVfnO9+/ud//hyvsf/qr/7qwSO6/7/5m7/Zvdd7vRfRjd/gAV488YlP
+3P3gD/7gVNoS9eSHvx/3uMft3uEd3mHo1Td+4zdO2r/2a792/Pdf/MVf7N7s
+zd5s9zM/8zPj79/6rd+afCd243vCE54w/q3fHhfh2SHt933f9x3daOaBD3zg
+7q/+6q/ON9U/8iM/snv913/90dpv//Zv7x7xiEfsfud3fmdw4fVe7/XG5+/9
+3u9t5JNq1D384Q/f/dRP/dTu93//9wfnPW/3dm+3+57v+Z6h8iTESv7gD/5g
+fMeCnva0p43/JqWP//iPH9J8hVd4Bf9OKVJGloablPc5z3nOGDktfNd3fdep
+VTRxk+LF3bu927tNznk+9mM/dmijhwafPXt2aFHe/cAP/MCDU6381c7uMz7j
+M8ZfD28a/uzP/mz36Ec/GpvGO7QW7NBQnAYzn/u5n7t75jOfOXniu/vc5z67
+7/zO7xw8+du//dvx7kd8xEfsPumTPmn897Oe9azdqVOnBo88xhXel1YODTBu
+GlN9npQkm7/nPe+5++mf/unx8/Pnz/vvTZLXDj2mb9GZxz72sQPpPuzDPmz3
+lKc8ZVLw5Cc/efdlX/ZlY0QkR5c1R0GKso0xV42fadJAmauvf/d3f3c08yVf
+8iVD1T1Q61M/9VOHuRBcmVoL89IQ5iu+4iuOQXkMHIlMGIMJGCg/5jGPGRj5
+1V/91do51XIlu8C95xM/8RMHOT/8wz88kAYABml8XhA85fqTP/mTw3q5h02u
+9xgkvsZrvMbur//6r8c7v/RLv7R7y7d8y9HOQx7ykN2f/MmfDM7Qezre5Izf
+Yv7rvu7rDj1uUN199Ed/9EChn/iJnxj6rq1v//ZvH99BsUjjm77pmwa93/3d
+3z3YWGM6Kduv+ZqvGZzMA7gKKM435atsPTSe5dz3vvcdjItsaScukf0znvGM
+MSJu4Bd+4ReGxQZv3+Vd3mVQ/uqv/urD2lHvX88Xf/EXT+FyWuH0J3zCJwxu
+Pqz1LcKl6UBGW3AOotz//vcfn2nrlV/5lQfO0mqc5YLoHDQoTmwCu2IYGW/m
+J4ZLZTHMg1TCPWzhIr8Vo8l5SeG+7du+7TD23/zN3xx6+Wu/9mu7r/zKr9y9
+6qu+6gAH5DA+rs07f/qnf7p7rdd6rWEyHsNFD4H9+I//+KCnXNk03IhDvy//
+8i8/dPjBD36w9k4KFwmwAXKn6TKpCJeqEoAHYx71qEcNgWEaUPcU1Ayr82Dw
+a7/2a4/RgWYOx6hiKu/8zu+8u+td7zpMwkMZQBJFIRjveD7qoz5q93Ef93GD
+LP/+wz/8w4w5KE0/B3drOoEFpeNgmQBuff/3f//u+77v+4aSRFJo9VCMl33Z
+lx1KyAPdfPPNu+/4ju8Y3/3Kr/zK7klPetLuLne5y+6DPuiDxmf+1hYpYVfB
+9PicdND/Az/wA7vXeZ3X2f3RH/1Rue6NzqJ50nln0+n3lDGOmFsSXxEDDfEO
+R/4BH/AB43tOlNvj/Ck8uqEf6eON92+//fbd+7zP+0w6v+u7vmv3oz/6o7tX
+eZVXGTR5KL/2GQbeFBRMOkOLv27atOOG1g7DRy60QQZlKts5Gl/fczgjuscu
+7ne/+w3sFGPCTVpDP2mE5yM/8iOHucFrFHBssFd4wfeDjYRH7/7u7z4o58w8
+2sVlkhc7w3QPV8LeQEu1f6YHJPoTKfsrmItxFKAEPk2VqehKpLQJ6F4jPoBW
+mH2Pe9xjkPbsZz97KDCMBX4Uy/PCF75wmK8h+I7yIhlZ2ohfp+Q33HDD7mEP
+e9j02xCQUAyJsWCbx3/rE6oxHII6N2i7gM7prjwgCIp10DziDDFD+fmDO8Y7
+RwPRPuRDPmT4m3vd616DVe///u8PbYs3NZqD24Y/8ZAyGjMeSsWwGA1+oIvB
+aEP8xC/FBxkPetBCAWPIRCqmepM3eZNh/EV/hiOk++M//uM5HJrChSXmh7Tv
+937vJ9zrfGDqJSmRJsWAWJ/92Z/NdDa9vGJkJJj1ohe9aGArxEqwp/VSjlaM
+00MgQnAOt3Rs042Lq/GOh6rToU52Bh/Cd8Zbfr/16vSAazBO/qUP6UlISTxE
+VhgVzQQ7L3jBC5Yo9nB4etGDod/ZgwJrekLor//6r49//e2p1Aplc1C4jgHy
+gxrcYbMNgmOdh5ChWCHMqRaIMS7gOsdqnHpgUz6rZprSa0YsIY4UZ3j0CrAB
+FCoAmBiTrSS2pOP64kRKPw9u7xEiD6itI0x2hIairUd45uQIR7Z1qodJpNry
+gBW6WTaZV6ls0gIPEsL45KrbX9sQyc0QYbznD//wD4fSCbF0pS1DloTxDx7K
+qS1DlC83rj6wGza6dBM9YApQoEY2yWFRTKC6nLLFCVkEt1Xyz8cUEmNZ0IxT
+T488SGjAqZTs0hlfBi4KTWdnPiOqsrsOSw9HKsTH7EbcvRvBFUUUlGO7f0Ge
+lEyQJpwEv+UHR9zItyQIjNiRUjx/aHfBWXAU/rq6Wc5ESJeToJGianBgNNBX
+s1AL673vEYLgIQexsPxluxvNAOWS4hwx5RXqFSfmZ1Jb0i1pTpZTJt2QcHWf
+j2GrwRh8QU0+Bh0ESRLl71cPJN8prJqdsSgYprN8hnWQtcY6dQOLhWJ048H9
+GXV8pVd6Jd8dXDk+u36IBvrkwXK8UqNArfSMThEN+AUGROz7WLA4nMVUVpHu
+4SjJ+etB/Rkpq3kxynRPNft34yEif4MzlsK4RTIcn7jVQ1x4y2l44PQ7vdM7
+ISndU7RO7w6uW6V6ehBLvwy0BrhiKj0pM5x81fHLvdzLLZnx4TAB9Z1CmvkZ
+E1bmMrB8xtR5sL29Xj/4KfhhhwnsMYACUTRJg4GydeEY05KBG6xB+53QT1ZW
+Mnxwj0hR4YorrhgFhTLYLRA/N/CXId55552jVz1pVaBY7E1mjHMirKA8QxJG
++ClnQYO1LIKSNsKpVpKDUOC7K6+8crj78pahAGwK9O52t7uNYM5DMl04DAUQ
+T5C0lpqoqSJJO8pRTBDhYwErAWelH52UVJi8G0BNdeJjWzWK++Uru3SUByDj
+Q2l1BEYvjo6O9D6FSIvFxBURtBDvMtwZAxBTc9fCKxECLEShPAWFRkF43DrN
+5XYIT+DB1mm4trzPwEACjVb0ilIyTBaA1w9pXiNd8ovnhTIbr28auttV5vE/
+TJOWwEn89j3xeQ15yEAOcdI3XbNx+kcV4KRASPSbrnFXjqxeV9zcur5yaEy6
+FeR5DbKTGbXGCaVBWjPErmZ4xWCUn6JMHIkJiRdoSYVWBzdu4t0CmrPDpIEY
+0VFrYXLxKOyS53O7e5u7YUCr6JMYkizoBbuvvfbaUehW7aJoRAjI/Ys6A6Nw
+sC71pcKJaru+rUiZl0ybQEg4ChMpZlTI921aB6/Sn2kTNu9GDLMb0SOGMWQ0
+YaRUUogAgwAhZ03d0JqS9yk2/uhulB/t8lE3etV4SSgPHTQq4+J/6R6nIe0I
+0QlfNV4D7XTg4Na2ZaGJ8ZIUiWkCf2BfNX9qTG/cMNwvt8V2P/zDP3yEqdys
+V7wOFvlQrhncUT/WgOUKTt4hYSzyWVnWtAYUExOX9tbjs6MBo2oc2vE9FgG9
+8jUHb9S/ITbi1g9VxyV9lTYd3Hcb5fXNMKRDaQ+PQAtI32hpBrJTYHjN13zN
+YbwY9uhHP/pgY8EVA0yhNYsKqCKbZfGmyD/VpPG+GM9b03ukK+OUpz149bY6
+/REaay2Sb+2PNc1kGHQpU5gERLvo0453SyPa+DDgtv7YYJgF2cyk43AWWvx1
+n409VzW8CpZkRrhOYavvGorw5OqRslEIygoPVazkLsnIEZXExaMtDq4N7GIT
+hX4cvHjxouZerS2fyT7oQQ8asRczURcoxL5LvyXuxwjOqmwixocWNPnrgd0S
+8aomYDVHztOU1qQlMQ5Oyz5qGGnJKOi2kmHrzEbxLSNMxDMyp+JUWPETUHvI
+T06R2RYoyjw4WCrugcYE6jd+ry16hxLvFtBfbErYNNwr53rwaq1GqOO/2DKf
+o9SMiVKcG3tg3tO8YKLePfNSWKQ5vkNzgBtGlh+5YflaCGOwXAbbK/g783+z
+CqynFOJhlQJcnXgENnwu0IP1KjjGopyCCA8gxm4mQeSiSg/zUpqptsIq1tVZ
+98EDmg2sDQvgWKnx1T0mFJhMVaHkXVX6SrDX9tdaYkXkpcJFcSrbOLoME2Of
+9Eyc6X/lo9IRqOW6lN1oyU033QSGr++3uC9ILWQqBUkHl+HpVou7aagJhGPg
+oAgC0gG2lrorZ6LGappY5ETVpNaG5G9IgPdScAxio+qnj267N3x9gC8wWLDX
+mHB2VARS16U0t956K7d+TX8NJkyOIMHAVHkK6c5dhnPBJbZOqigrDUhHgi41
+Lg/FuPe9700e1zWNkEwH586dG7OCFW8d/J/suzQsjUxYmqETm1gVyMAiVky1
+ID5HJoEptgXAIaGwCvqZqmALilaquq/avUtBwcnW4TYYv8uEpAdalnVe04Nh
+KNTRgJQr1U+uuAzLbu/PYEbj9uwCxii+5xHoF+Be05Tzljyi2B517K6nKf9v
+vh0OFKMKWzy0G0GHnyfKxkuhsxzI5ASxFKM6Ltqm/DOPTJrCaaoqN33l5oLY
+SViDUey1RtlQcna4D+EMEKLOir9l/lEWI+FxIJ6uoGFp8PnL8PCu3ZtWhAYi
+ZmmoEOLi0pxKNg0wShl4hRBXtcauEUbp/pX/O/vu0g1yWOZXMjGMTWUa4Q7Q
+0KBQiN5zqBqvOGLqAXo7aGuZH641xlnPpcV8EqgGpEwLcBb35/gYP3CQ+Kkk
+kEbp3JU9vrCGgCqXWWsM/UyqDKindtqgj4ZBGwVYRwlVQ4GZw1DA13DqdEaO
+QQrT650ezpKFY0h1e3Gh4LIcPhqxLWPFaY/QgJLsy35biswfGRvC5W8AGRtK
+wc4NbTwzmoLVYE4zBecH5/s7UZt6mykqkZvYP56Q1BC8r7MeDjxM7H9tk0G3
+zSwgIzZhZDCpItKLraBCcFkkoftvI7nQ/MFSHpG5lN+61DIhONYFbjLR5YEv
+dFx4fVM3IZjkFMBVNROChSawwl9XNiXCZL6FaknyV0pAEZEQdn1/1SIp4yGp
+NaCnK4UlB/fcpHdLq4OgB2yQEDs2Y1ViONME0PNrrrlmpp2VahYfhaNnR4oB
+bfIdqZQruWJ8fWaYgCUU+bpMbQpMEnfjjTfyY5NIwQJLVfO9ttkqtCd0AXVC
+fFIRzwJFvufmBaiwHWByNpLv+u+ruylfQxb+UYE9NgWtuTH59yah80PIVJQ0
+e7ZqRJ+aFEbRobKZG9sCAEFmSwCeJKZjtQnj1Je7o8wZMdeH38DmhFi4Oz6Y
+X2ERKCxmRSxwkLPHVzlnYUVPRW06IwbhzsQmhH6+v6OacXcC/0pyp0zwTkRW
+6jopVOi9+93vPorc1zVz1vq8sgI5C9NSbqWT9ZvMYhOXGMyqObAA2mok1y6I
+B45QVCxPx9BLkOmvm7vjZTJ0BFQ6hdXCAcGqv2eEd3ZYrqkyHYNZPy3BXdc9
+aAH+rWUgNtLBQgRya3NOnZlaqBQRjnmqsz0G5sV6VUsqmk7IRcPiNwLwAruk
+4xUMHrUGkRUaaQ87FwyJTE0X3tDgxUJFar7PHIZHDFq5XcYlchb7yZG3TPlw
+zu7sJhYejjjr9OnTw4QyfriIJ+L4W7pbys3UmCz+ZL0HR1Eme11zW2Qr04u1
+W7BUyHV9twykXuZlXmZ4ovTGYdDrUthw+z79FdgBYqwlCywZYBeXphOkc/S4
+zKSa9f+Hu0uXLg1o8otE+/ReXkNVyrGsE4zq6V3rudSKpif2zFkruxg6KzAu
+k8Vyh8oCw3FqQYVX70NIUhvh6S2LqjMORMy68BaFq95haNlNiMB3bODXRJwY
+bKiIsMyBTOqV2BHrVX7zdclhndmw+KI8YXh83/6KM+xK/0HEpOjec2lzKByl
+ZH3rZ/vMe5IruHNqFFEOx1S0FbR+cUMPgqVkdje6SoYqlpRJsFJqsFnHxaF/
+4hWuAITxnAwPDFEHGiN8ALB4sgKs2EFze9JPj+iOOkDQF7/4xbc0VYwya9I8
+MjnNW1qqaxBVKhGqREyI1prCO/uVvWCCZJCxUjAMJV9wfnV3hf+WW4B5pfeA
+JytVgbRGoUZ3j+OiQaAezXNEywBPT+nNmif9QKzluxGNHkF8Ic0UoaTbEh6p
+5s1t17QWD7WbUpFFTeB8rgS4YhAssNEE98ePZa2HEK3IbA9yehTfMAAjloiE
+lfU6hikZVGbdQfHyrk2UniiAVyCqB2sJtr4LUYjwU6pp/JkZl6Krx+/X6m5l
+fOOkbtVszItaadnr2J1JaeNV+6LJ1WwL5n6LLUj3dguQwiB+cLUPMVtHBP3Z
+0UhlshbLgzBgq/x+c/+S/RE84642Iz+hsyxKaLQ5nQvDTLGKVorhKTA+4E1q
+8DS1TPAgYQOQoM0GbSjCyUT4a6YW/cJLQvbXXZtEWY129Vc6FhLFy9STyoZE
+BoIU4K8OzEFngav/FrYTjYW82ztnBxQjD1Ikxa1hX+hujEDP+3UO23QnRPDX
+CXlxwYi1ui5AQfF7Yrrd8tGgag0vdAPCOcKEH9rCvER6/lZTZTBClV60vjHk
+0uC/EF3eLPQgFx4Aj8mTSlO6JFxkWSQcNZu9nky37CqZ7iqleyw8kUtYQpvZ
+GOwTwYYwqXlUHHahjAZQtGCSoEI7Zp38BtoyZ9QJIo9aRByWUZEDhaV9pcxJ
++S+TKt6/vzIp0NXZgzVf6YXAsxyC0o4zDu7dI9KTOAbviMFvMkHtb8on87Ya
+SpjET2SNMjdkdPDNAzuoxPkWv89xQl7ARHHBO2uJZuX8yzZN6CEk+UBKqzSR
+ypl8MS7fKzrJGzIBj3OwW8JFHT3cpDA7oTpcFo5z6L0scYY9l2Hxy/VX2KE6
+uNfuLfAwJEpRyWfiU3qDWqsZbl1G2TPmPfLr5i4NMTYuBWUUtEQk6hi8b0Yv
+xiUB5stz44KEDRJlgkMwliKipE+cdDlO39afMdDuoxOdawct9LDbHhIH21dd
+ddUA1sz80zi6rJTOrEifVoCZ4ngKI+JpEZSleEizNrU+W6P5/4Xn3jT7xw2H
+5zqxctWyhoLRSA7k0VpInsQVf9EmSmFLEt7iccxNpEKxs5wPQlYovcX2R3Nx
+Bp2TiNCpXjFcaFBadE1TZNLWuISDpZyX43ayT5oBPaSY2KDoWpQftfB4LnFx
+kLCo61Tj/O7ChQtzYRjXxAwIKWtKCLFU/+puKqUWMTGdKDR8aUXRB/RXpgZ4
+FN4m9RDGmOyj1DVwJG3KvPBNPT6aaaUGVrKzXvSwtXR+mKngPdPDHf2OcTNd
+0F2vJdFkC+QHBXCfSytJXG7i55aFANmiMFBvqjDVRAiACam6sK6sLMUtnILQ
+xeTMOIlfEnzWxy9lfiiTM5BA40LTGkl4JSdUTqg4qnF3q8hitbzYYnU6MR3y
+uaFqMtdMsCGRV2RcFQVltg/yc2W+KnIvN2+YQAS3ac1uxBAbEdyRXhQQLJc1
+JVGyDxGm5LAwNT1WLm6BDEVYiCA/bgDEF52Xm3IMEbSil0d3obN5d2Y4piwe
+QJPXVkjlgCrimU0xeeHv+jsqA5YU9a/sMWK+co9Y0vyQFR5lYQlRIKnx8Bu+
+xiJG+MIXvnDm6pAED6C12C1VSEhYJKTG62fkY7lKhZFhMlyibWSFHzSwegkB
+WAIUgIw3WTSnZ8tRFi8wgZPRGyKEIDX+sEQioRhmbd0x7m6+ipqZ9C8wCG6a
+OYqipAYvEO/KxkHCJtzBJSIujkXEvJ+CzybBbbisWMaXh5MtFxd34BUVOIEq
+rYWvpa4ptbM5qIxRNDaLaYUMSVOMJY4xnJBqabo3BB3beETEK4UEImnMw7nV
++6FQkqGyptqjHN1RRShkM5CX+wUowjx1EaFz9JAmxK0mNYMk2C3/WtZCawLh
+u91c6ffAfoN60Qq2VcYU/E7BRuSSaI/io3sfv5+b60DyICrr7mdAvW0JAH77
+DGOrOpmciqs3h/2BH/iBl5owHGEnTLZavaPfynJeKxJYmbCvgtqU8/RP1/jh
+uYr33MBpw6E3dNtQoJ7ArngbkiTBikUpe4D5IiskkYaRwM0aeEiiPjTMYJDk
+rYWVwney27YGbPQAOTJCJhbSNkCodDrLoFtF7RSCz3ZbsrHUffLZWvdJDpsN
+V7uJzVvabh5a+FT9ZXIWK3wM+kCCILTt5SAlTk1lQwoPaR5HbMEI1nk8sCiQ
+itgNScyvuhYtInbBBUi90CZzcl2e+sfh0neezI/QQqXuLMD3PvrQFk9VShHy
+2S63CyWUGcx4Cc/3KfTRID2a6GHPSlqrATAhymWIIR27QvZ11103guEYRxb6
+54EJVBoN0zo3LFBEjt2Iw8vxbHW4udCakXIxFZ1P0a+1pkQOVD21pqgDuRq0
+CO1CD5hL6CmruchdBLRfs7vV4DBBUjKzxC1oIgbTL7CQK5se4mjMkfmItMAK
+rMc2M9sxJd+JmdWRSr8TPMF5ayNwk59u3B9KoKLLPpa1jLIVJlxAPncwZP4n
+OSQhh3C9EhjXj3CCWAhn29hAX8z2szYssXYrOmBVER9nUjA6AHFT3hXdSE/X
+8o/8wjq6Uz3KRAncaNy8nAM6LRWKEyvtuXb5TWnQDLPXmlaETZPjjfKZgdpo
+pv6eFamEDlxbgQYlRsxSJL7+hiPwq5h2ZzMJfGKKXUxC+UC73V5hEs+Weu6G
+D1eMSg8DkDHEplPiEa1Zfxx7Fv/BI/2QU2d7IQFlvlK1tqQcCRRNoTwkgAOq
+sSfh9EBO4pfj1DDiNKEGF869L2YJqAAeIxCS4FMN4pbjUsEOgZfdHWvyY1jr
+pjhqaSi7GSNscYNkd18e2PIzY/I+3dlvVzg7dIa/Y0yAQuBQfd29x2Fqg7DY
+30zTDkdk00uCGu3OjZYJQ1yRuVnhGKHVWGNLbEimLkiCF+o89+zemCLWyGHL
+X6Y34NW7I2dvAA73ZMERPTUwhvp83XskkAaRemNGW0A055asUKEMuxk2Hg1r
+ShHcYzwpSgUoJZKmq5TZNk5fGLGTCBAXOarEvP7VB0vsjc6zXKdtfFsn6LMd
+az/ibROJXF2pIFMR3iVVIhJ9+k2SHnRIZMXe7Fn/pdWtZWdHrLBuIVPGq/El
+mmZbihVAKUwH0MyYYciVDdPDN1bwdGpM5x0OTnUZohdKzU0gOjQtaKFHySRz
+1LQvhS/OQSKQEB7PZN/C2nJEgR910iyPSNxheps4wZXhMEpKIq0KBUCY8niK
+XacATdtNP7OCAEsVpEBP+aeYIs0VSM9w/RQGFEc1TRd1r2sWPo5CMKd6uE6U
+dzZ9enjRLMwsszzFNOqnOTxkpcZAVFNE/bP4cjiMW4i+n228MKyVSmXlK2Cj
+jpqlCgwFDywnvPO4gLIJ1DRZ0R8BUUYKxY4QorcIiLFYPSSCmznWtvjZigb2
+Xzp/2C0xUHOsEFKVxDKQ+7T8pP9SSa5FvJGZIhvBEnIyeIE6XSwJJEhP/GDI
+pUHRiOyaktgZMV7L4Mo7dLluS4yyM1Wd0lgFwPtVUqcHahkjhKo2w3yE0l2b
+P9el5T6XsQomeAjN0pET09rggjitawqnKRAL4fzNBqq0Jz0TrvSSzxlPoQwE
+UL6yyVChaR9nuQq0wlIiv093JdSz1idLWyrmmL6OYvYxDzPDwJiYjif5q6yn
+VCyelpZhCgigiTS0fvqA/hpFxEH4eoVP9XVwxxu9G3vCoamYrN2KhwV37J0D
+LJ7FnylzECTP42t5VX19Yq6bYmW5XqqY6qqp4/hfNdyM3zZySuB4+vLKySMw
+Q/kJAxPcG5K6fZw0r9M7yY85eBwC+Td0F+TuXW0VtkWOeC4ksiKATKGhQBh1
+gUJRF3NnlKlB40FOe8qKCXhkdmqvrecGKDFoKodUoX5W7ZRUMgpaRqnNGG+x
+wewJpHdy2xRtbtehItmZVIxqH7mtmMspHWXMwQVyFCibVWClVoE8sImkaAaY
++RohpgH2oqor+2c0a9kVPFgKZlhh4UJ6ohaAiTBboNOpkyA0VY+4f4tA+JES
+NvbgA/ZA9WSqcCbbLtfVBtK7LoNEQymydD6bC/nsUogEcPxq7wDuIzOakDMD
+um36z9lkFsrG6MSH/JVom+5zUiXb0wsH14fYwYGxlJmvyQ8U3V7aDw3NYpbb
+e2imTwC10GouQzsaooWu0grEsAlKB0njxpIviSxnNeVwlEmE/9XiwShPdCYi
+avFXStKYnNPI7tZNsgtMBs4FkaFGdCDxkGnKJoT0tEs1O3JjhX4jzI9J8DBG
+YRMNlWKtoNBgC4lCiV4zkXDnIqht2+NWBcNeC1fKRlb3QNfDfQLTm1Ui6/bD
+Psli1iwMHPYDAtEHvho0iwxJPs/8/G2tGNnA4yQJgZl6fWl8aookaRELBnG1
+VK+oPde9nqyUMCcxQElwqh576m3AcwFqNREWLycZNJ/ODEmrnFAE+VBhwaxy
+UhpeiQIJXDRXYHCupZPUIk8yLbxY/ID8WcvZ50bQBWIhihRC1B2b8F6uaQMN
+mCR2tiZ5XzjaKrAKJrTVuNBWVhmLxxlMxInSvrhoJLLyLj2GhuxAVmlJkVaj
+rCc7vxUwJVpizdPdnN9APyZeuhofRTx8qbpgKcu6qq6jm1nP4BTpHL+KC+o6
+8b/+plvW/Gf7J0vCUEiYYlc5nUAWVdakMCYFehjEsPbHIZwfhgj5dB3FAukC
+ND6sNSWUkJHERtJyx2JgRZDkRFFVkg8l1HdK9daoj+ARRYVAGiXYn0qxrWM0
+Fv42wT+H6b2S4TULEf30rMa2wcOSKmGsUBQl5fGCtXoXFiX08jciybrCsIgR
+ARyezssOomJ+Rf3Fc3AC7cXErC4CA70iqplydiCRVI0Pt7RAzlLxW3DQKDNj
+mBUmhrBfMX962C3wp+BLvYLWwi+ujGJjYjE1xNAfwrfu7vbjEiLr9RAd4Fm0
+hfs43eflDYMHO8inYdNXbqG5OBF4iXowA8hxz5EQNndqNSVE87I3SlxnuV05
+pzOtiJSTjgtd0A8zGammU0wtScWE/LxXNE8TMnRyEIqIyYTpibPM8HVm3WzZ
+cJae5FHPmOcgnR9eX1BkIGyb9IVhNIAWG3ixcp0dojs2dEdWekS4oJQDYVEl
+yizl1HIvaeq1Wy2rq4cmquTlRBTjVUPKRAwbIH2ozSCl/aaArSAo1QxLpBgU
+RNlR50raWa2YyQkWGCHRNWXPPNLs+k1YwmwYg6qbehO1JSzyZKRceTWx+lUs
+caCaPEkGJ+1S2rylqVhmlqZ/BEDWz2ZSH6RXTH+2qdAMO1f3w3UD9FMUyJFO
+1N3ZFdYhjlahoNgZApbqfbNhJlzCBcayTgKy1t6XMM9T0qqyE4ct95Anzn1x
+F4acOAzIiE6OWSYqLzJ8kTqilO1v6m78VtDrr1SbqItK1Vrqhj26ppyErd1q
+f2PVdiYQM5cOipeygI4QAcjefM7OOTV+jmn09posO8Lp1KDDIPqNIrafhVqE
+boRUJyGtMgTV28g6N/IMYb3wL7OvOXShzCtZAQaQmhgWBsg/Qg6P3GuPI7bU
+91FEkZOOUEHJgpX6p0aoeWGMBL9gImbouVc0DCZJEoxYlxF91GG326fBVCEz
+cDE6oM0OsxF6v33h/NBVwwFrwEQ/9Fg+CXz9viKZHOCLmZ1hdbR+wwBXHlRT
+MMjwQB75wmooytooNgEodvB1mXJgtKoY1nQJnJ761Ke2YC5OWNEHzEhkh1Wy
+A2EpNsXsio3t8jbL0LcF55sobhwwxlyzGtU7AgX+xRj8nvWgMyfsyDSzgwFs
+S61EywJA2FSWldSQiyKR7WiT3Qw0sMS+dvqFwzRBUevOfg9JfV5hA1FTfOVI
+VjMd5VEpsSdJWEyxFGhyLGJ1c2qch3I49IeHs9b61Chu3jpyeAIReEQX6YRI
+lfxzoAIVx2BeAo6jLNAnSMBso8AA0W9OQKSPOLBfPPSy4/McRukxHEITucMZ
+TkBECsHBFaujHFl+zeQAhqlivhRNhEIpfI+2bLakWMYMc66//vqsxx798kne
+ye5rErrbYjOxoyubbuPvFdpT8DDT3A9xwDmKIQEUHuJZTrwL3ZRLVCLaxi+0
+52gOSoY2SkYr5KXiM3tF8CJbzdBKWYEgIzKTcPemez3drJfEJOAB5X2Aw4QG
+et6b8OdntMkicwfrrDv/TFOXT5qRMBWhdb0Wa7DDRJXNUqVGp8BfGS0IJwGS
+QjFuVKSZPUVACLiYoEoSIJOmBP5KzLgu54qzyVqmdasZhRMROvYsn0EKs7t7
+T3J+MEqiJ1+mdBBMACPRkFiA/kKDwybTKAxUOpRyHB1LTeFSMwWj1B7ofHIA
+emMvQHmZUOQri+ZK5SdFeMhiTVhEnQTS/qYuxF7Ubow7M6J12k0DaAMnc+9F
+e5Om3nxcCygi/u7nqbfPhEf7XO9w1v5XPnIGlNRasXzGOMlg3ZFFsVHtxMSM
+jqwYYc5Zp+Rm3ZX6rBBjAMWBzD2K3gE/hlggzMdlCIBYl2Lni60kYgsqwjcl
+geI/l7LY+KyPXByfJZfk64i8ZJxwiHaY3szJc7QqhUlJIxGDPEzPnoIc0LM3
+vS2kB6mmVS81qQTGpYPVxDpgg+2A4cz3IJ0UfBbycwDEPDptf/D8mhZBOqRK
+uCGOwvhKKrKyji2k0lIkmeo8oTNiWxpYMpoyziFvq35khfRej64dn+EMd+eh
++RyNVCMn16S2xaNm7sln9BIXpmAO51lzwvOseYCnVA7zgVnlGxM24HUfXd84
+ftvwg3C/N4CM7tg3H4KLYTaVZBY5Ws9DID7rxdfjM7jAVJCemVvcRX5hcxZm
++kqazQos3RBOlaqG/zxBCrgXm1LmT32yVczDAEF5FybGZ2IF0SPG5oArvxOA
+YnJUCsApyPgsViKExo2SezauG7AkXE4ksrExL2QaPCZZvnHTcTXJOVLmitaN
+g4xlv+ZkW3bFR67HH3oPQ7b4d6ccKkm9sE5pDlYISnKaLeGxDtZED3NmC6uy
+ZgOnRWMWRRS2JLICtPCigs3Zv2HpvwzxIFtv5GlyOPoSLPee7nE6ukPOqYCX
+kEMFpls+kRUL1uSXFSSnE10Eo1Pao3kMqwxhUsYRamYPsJeGzEQdK4rlEDR6
+ES0UqbF9+lP2nTNeBH0GhQTCseO+SImIl0O1cqDbuhh0fXRkfMAlBAsHu5Y7
+PwOxCv8gO59RRIsOhQnhGRaKM8T1tFCWWt+vmxeT2GaVx1JqnvE1ktYVbxRC
+lUKQsc4cQA6TxDk2iNWqWwlhVOjWQy1Orad2IQKOK1Mm0M8ipT3bjoYBrucM
++x6ErAKGjgTsHOj1/CJlE/uBWaFCVGl5Ah8Kf3J/LUfchwVPkmLj/uqFnDlb
+NDDhrxzCQn1ylLrHf5eyh/ti2V66MROqtc4Z9eKNcp63zRj2r8xjMY5Gjibx
+yasEaJzrakLf9al7fcT+tpK6DysaQCZqKHMMT1ilgsx6MoKgD2tXnng1q0ya
+J6/RP6Cllowg3GPOpAaT8ac8TIse2q/AMVrkYQwOZSk+hShA7YxxB/SFKD/n
+B1aisstSCpKmuRS7baPgbKWMftUBTdv1mKY5WUtk1qZTsLaYssf7mv0DiwGt
+ThCaa0rSVuzLeHkXUYG/HtKvgF9BfzwKDldcu+7+dODAlk8YzbasR25sOi4L
+IDTbGjibFpRA6lxz0JdSpGk/V0UyhZSmZVS6syXsaBlv7w7NAvOMFyc5esE4
+OKBhBROP7a/JVwmdy5N3UrCKPbOKic3jkA3rQlMAgRUm/0tjXrlbYd6GC2T9
+/JZbbhFORvvV3nyUFvhZi2ZoetdXc0gUeuTJXO0bLoYB3cTDd3SPQAVwSqW4
+y15klB7tjZYRCZ0AKJBDoLpI9sVxf0l3t2a3ldDcX2YbaxAz85Kq864bnpvA
+ORyq35uts1YuRzWJTQxW9u2OAnWOx/d3yAIHnJDvnPry8t0Na+sjsaaOk07f
+zTBPZwKx2lYd15bsu7gXrJPgW65qCVyaoQPWfL0EtWdHvCglFfQzQkpZHvdx
+/bXBgDVZlP9GYCW26YxdZqNlOsvipZVm0Sofzr9LuY29lDLN+EiUKPZKMwoW
+gHWh+fbmYub42aN1v8973vMmh+E24XAkCmoVIzeHN6NbjoUa1jMLqmdGoKGk
+QzjqcW/zNm8zPUjOwlwXIGoqswUnuOrn8hEypYIG9/j2NvW1HpQJ5OK0FVer
+5Tfurw2bX8maVDcRlem+6cqFs4MD2UHGXSip1wgjOUWm5By8ruJKSTF9AGXJ
+lQeCGHC5hBN9kFkrzhi+RupX6UNimis5PJSnSEofvBRLCKgzorKGE30YpTWb
+QgBW7Sa5MsH0gThxLctWvzhz5gyBpw/gCmbMREvbbMUri+k+7mjR0jsVJrZC
+e0yXRmN0gBMa74Pf+ka57cwgkM459mbqg256jOhu/+//veXKp2fk1IdCPGT9
+dlseSfyCG9w1QVe/fvDxX1HkJHBySa6i+H7iV3oQ4Km98KcWGT33uc898SuW
+TW5ZvYMN9caxX22xMNvITWliPQoo7t1Ocj344TYLSCJs4QJzqR9CKTmFF49w
+AmVu/WaWNmPNYp+n/LFuOExd/3S36rN10U7/nbL/+nXPEh1bPZKVsY/o36+r
+JvL7dL/OMp1auscXSiJ86ETk1H6JxeFKw8H4Ig36MOO5ZxOgAMNZ0Wcqb+fS
+lUtn64PLc0rrOH2ZPD/BnoWu8/P3jMK0puqUuFSVw3d4U9+/3Cqg7aAJO2by
+SG4LqDImSU/Pjx6s44Qg+8jtqqGMJj08alQUqUugw6f3MdnDwYIXcCl8o1EP
+a4WERvA/t6vwMAxnTcREJ8eP3L5qRFGwTi2bd+2zL4fjTwFMzNFXFoy/tbOt
+gN7aTRlwL7ttolbbAgs5slCzsCl3//kYROUoD6kFx8lNWb9Cd7xeENbrDa4b
+bMq1XJ5cwuARw2Bb2Ch+Md3M5rNcyRBtzrcg//6rII/Ga2vyowQolhDchHuw
+36hOShOk7I/NuGpIlx9iBhBewJeNfKpKsgYPRwdkmArfKC2MNEmRGmYJRq41
+3C8521Zr9mVp88gOOAOWVC9yxIJHhTO3KvF0ottcX6SdXOpI4gCPJvGf8oYN
+s7aqrEgCHcZkGi3iBJpyj+xckztnZQCxEoG2S4RTnEqs69WJ1lD1nop5LEQO
+HVMfyz1lLIRfwhPuQMx4TJyH651187zTLB3Ow4VReK7OFPBe1NeN8CR373js
+06IiDBrLvZcZQE6908w5WY6dDFUx7GFN03Ih4URMLIk6hP1jT4QVjTdm99QY
+vQhXXJoijByFjeIEQzKbHW75PCcwSzjFTtaiyG/K8GKifJajCVImlV/Pi/8u
+vcStdsL+bGY2OANSjQWTPjMrVxSHh6bYs9fDIxjJehkEE3/OO1lvLOSJct1M
+zyadFK+Zj+PivTjYzk/EYoiXFmVpFK1nDUbDYi1Vi8X6nRGw1iyv170Kiqw6
+VxL6jMVSB0cF7K+A3ZY19ZWE3e5dh6yUIiNH6AG7yUy9EecIgaqhDThRRY8M
+khqhlYD0R75o8l3kq1+s5g9MKCXCAIjSnuTq1LxCxtzYaZiEG3bhuICEgJHs
+AVZY4TtJF2DRnWQcO+cNilcN7qEAtUbU04pjVKA4wqVmqCJ8HJDdtnDv3oSD
+VIMEoebo/Hf1emrEqFeO1E025WcQua/iHQU5iE0PEOdk0OJBCAQUtsVivYcC
+Sz7VGQTx0MGj+awxoQ7c51aTuX2I0zv8jBlDlDFNc0HMEbVZDciHIQs5wF1B
+njYTJfIE3h7itkHH+x6MgTR4bs6pVGBdlOkcyrLolvJ2WC+xxFPzxMjb78+/
+boKS34kq/G2ik4UImnl/7agnm7hDNk33uQoE0fMXSpRhp8WhwmeAGLJzLyEf
+kSVacj3qpNxrutkam9Ru1wOJb151YDtLSZPUyXBoISN0t88pUFcuB+ZyAYyB
+ITF+Uu1FSUPxRXP7su+lEUEAyjxitxy6yU35vYfB+h1DLzXeFOCOEZTQPd5N
+Lu1fgqaHfs4O7VIRi4E5eCDwMIy+wnR4OPCnnaxzFMTgWGZ02L0VSMGIImtG
+HFkv5K/YOs5TMgitHYpeEt+KYttNRkikn2pWIAjZEk3QJ0zss8+GnkpRQRGy
+gbonJ8KN/WabDtAXFpdiMmqzj5CsjdiTsylxR7d2pmcXSlY87Hb7Gg/9s3pC
+PJRRgytCKrPMyobgBTXKwido5qclgCxS1buvfFwqsfHk/Hqiz3gYF3vLUhjB
+TMHyIxdQ0ri4UMja/6YTipGv5z0Up0/mKKf2V1htaaZaDQAQQoiPyxrXwDLG
+kQBMOQoT4BPPKmI5WghcCBv/FkWZE1mX5J8g9iC3Ki73s49nZRE5wd/ILav/
+ZCBZyO43uVNpLoTdDnSkCn38cqQM3uUa9j20RB/dY0EE4DBOpkEXS3+zKJWw
+s23mlZbhwzgxJ70EseUx8wqDzCq1bEGiGMcXxm3lY45kvRMIJXDB8Ne7xiRS
+dgRmnFhFmCiuVD4fC2fkSyib+enpEUYovPSWqxCgfsi6nf3TXElpmXEzcuG5
+fwFDKVjObsV9ORiDLcg73BSuePWIfl/4b4pE4ACinRJSIs/7DBwxEL3IX29E
+CrPXxWmqqnvObYd6oLB3qOVjCTKCT5wDk63HSsHpCd8EOC7ry+vZFomB5Wnz
+MTHRMmpVol1zfpKyHTaKynNku3t+R6J9i14mCcJkKSNF9UgiTAiV4qxMlkqZ
+2SmaVrVR0YFsYTfX0fv+hxe19n+ugt+GgNU9cbtin5E50/zO/in0ohN4+Md/
+/MerBpFEnxafFgQksrPyA5O1vLIW1msIeWQx5Yte9KJjeTwcsgohn1EbTDTL
+EjdqPNwxHyYWzwm9ohDk+BfTgRTHYn5if5pMeE0RU0v1UOjKSbOTg70e39N5
+NCrS8gihpvQDD4SeQpNAtUiq7/Ibj/8uoEmzkE8GuV8yvc0YQy6aStlNAfa1
+QnOSRHe6X69hpQ59tSvZ52Nok/WkC+LpWfy2Vk60wN3uL9u4eSiXBJQ0suyU
+q2bZQCeXoEiamFvfKTXKISotuJ/dNTCcSyd97y1GpEkDkiiU5dxwXDgiIP4Q
+GlqXaw66CMjWZmBneLS+2s96aAUiEbTuCN78xSt0i0JPM5qwk/Pz3/OYpW32
+sq/6OUhzolDN6Yk+2buYjQC4YtTCQ7cZirsWINW7iHD7a/v/BCH7O71uHqNH
+iZBM0ALHqEOuWs1IMBHljBD1uSIPOlH59QRO2Oj3MxneYt0cXLEFLn2/3JnR
+Uu7RIPYS8dxXZb4SJjqLOE1l07pFNfGY7ETF0rSBLEMAOScBzw2olVD0LZqD
+0Bx9WlqUAwVpA7qxVaxBsYr925rDW8d9i4apBYYnL6CPWSyYArxoBtE5Qggb
+6akUiys3YL/zWS7KhXtEoZ11IzQqc9X3the8L+rZjK/3PvhJlo/mZN79XXRH
+8xAxFTeDSykHbLxKN5d9wCeaAwVMfF8dOppwz1kIhGg9XnHamz+5Zc5oeOiT
+UMeADV4qnkt8iMVsBWNlZzYi5EopLgS09PHGoy0MIyPtlHmEJF0xMFGuEcBW
+s2RWVG0zqAeP64FqTTAiEZnodGZgeK80GsmvAeeVnDzTFzrnFSzjb7Mk3LT8
+VW1Xxk/hc0tTrh4zHogtExPs+I2wRZq0rodEIZExHLV3feAPPhepOUknG3jk
+p9XssaGemxpJz1NozpkGxfw37J/BOrT1AsjxMwz1WqnK1S1SfeVgRDCAFHUN
+OK1VHIRCMrfEzbgmjjB8j2GREbELjGkie2FDkK6+i+1Dql4v22HunIDnoyiA
+Ke1H9mcYyeJsTM+2QFYo6cN0DMT48n1Zsoff8B0ephlOCrqY9EszTEZx3MCl
+tcKuijy2Zm4dRoj+5IH8kopjiq25NxrvABVr5Pdpm9RTl+pCeMNtRkFz+LXM
+mmjUNMIBqpf1c8eYc3qWnMRp9bNH9McIz3XAS2JEN0EBTtNHEADcVA2u7ldz
+O7PwYAbU2ylOciABR6l+uKVf7llGqTXWP88luvVYJuZRn2TcZMSCORAawT3n
+llmxIwelIMVQcMbnusEZQSSiobFu2av5pe0SkrkZCm70BHkvAbhuBBgrSSiG
+T3Qgl/WxYWwTmHgIjLfJog18sQ4ghR1CzrRX+lmyrfHoF5zA1kxE+A2jShkb
+zupDSUNlR3FKPW6LoS8NP2shnL7YcM58VIjABkZJrpSNVIQK89brbcYMh82z
+i/40o4si5yTnCKWvOZ/XKDNCXOFsJo5uWwN1iClabJvM19lKF1ETafmCsE6U
+mepOOmKmTM5rM6/e1gGoavpfDhEtpcjXuUiMHmUBagk1vPM13AVW657j4F94
+L4bSjG0oFT/lYAGm4nX0wjM7VGgfKHnd1R63mJCU9YRWcUv4yuWriDLtHBPh
+bxDACObZNNsRN5SSOSES9uXkEE5YPU7oY77YBVOX+jtKnEMG2I7MKt1zKJzw
+ekqF4A4K9RFCKeXo2k97j2pm3KmZeTqlMjOkMqXyE1nmg8u+7kNxhnaXxYSL
+jJH69PaLgQVAlgbGDfTRgeOvnK7BSKHs/qrMeTMb2yFutpVp2SIywpC1WWJr
+AotoxVqD2FP7q+zPzaXVZuR6mdzgC79ZKJ6akwYEgRyAholgnuFwNEKnzooH
+uvXe27G1KPTQacUMcWGXx7vuceV6XPt4sikAh3KLiN/gXHnDUKVuLLFFlVzR
+rFbJITfNAXNgkqVABIrwfX57bp6KQAfEQsol1tFIJctYzo/k8czwHWJmKICh
+LuE4199RU3nF+fPnRxxHVOslWWxu3bWrywS6d6wiPRqwy/77ouApCcsxcseb
+70U7+AX+nvjEJ877QALfzHie8bCVzKAisMqZAWWr5xY29tGJA/AFqfMcinPz
+1JacXulBf98FkVUatIhKootKQqGCmdxi5w0ASQ2KY8n78N3yJgEzDRKMhC5I
+Y4QeApA2lSdODgNyGSJ/IAowt1LwkHNCpHA5q8m9coZQOnU0FpaeGx0agepv
+bqWzvqqPIxwTttWKrEZUst6jXv428uXb+MV1Dx0/lNnfE/LluXP9sAf04psM
+JnwEJEIwcziaVpcqPQgfiRgfRXNlsEnxk+PByzLMbMkGOX1D1+gQQpVfDD1S
+jExue3K4h5Ao9LA9sa7aBbrsOSr1X+XKLIW3RUCyOeztFQ9zf7i4jP0leoQC
+5QGzBhFiymoNGsgqYeUmGgG00MidYGoVNi9dMTi8LbA0CLrJNn0/zg709eaU
+zBCSHmHvb2I7GuFG3/01EcKcpZPOWnS5gQJjs4laoG2bRliEZWZbGI9g3RKv
+amK9Oi57kxKRCIQsB+AqvWYALJ0ipVlBjaiZLzO3D2DKHrKKnyYAW6xm2f6d
+59pux+6AJS6CcEz/V/AQokCLj9fiGEvKdGFvZR6yrZD+2GIs+QoeqD24PeMZ
+z3hG7gimvQk05yHS22F/fBTuFXhdXIjIKWQ5LtCwRFRC2Hoty70VWLvWNy2N
+iTQi5XyRS92WVuBJNhFgjiJ8iXDeEsDfCW7zqBkUcqVuG9dI6iW+IJYwVDUU
+Y0Ci9UCJQKAUgjr7GpMG2TGa6WLeXJ7IiKUavRMtRkIxWEEsluCf+cxnRmx6
+pbGy/VAk7sEa0SSCnaYWilg0jFWwF4OIN3K8IDvMUc439md+y9HtZgxyNPyj
+eUaZntl+M3uM0Wb9O1a2nxtaA0HBpmQpJSg8LEZlkBSLmfJjnl5vsl5Oh1VY
+XQNay2G9qrjXh5ybR7QAuj4xbrQo2q/WcxAEdWAMvdF+0KMCR/tz2yuahQCa
+CvdzXGeFkq/aVMhtey3TvAdvveY51AoL+o7bgxz9wwzskmH5OM9PCpQJvEhp
+Hb6qiZZ2AL5MECKKDPnI6DDtMXvP45vyEb8Un2JgRNkn2UwrBzdkI1ahOgCS
+Vzbheu/+DTPmHNI1NdKWkm26lokIwRWgOAcqUe+la4jG3G0nSNcQLQeTyKm5
+Sn8rp71av5eTjFWlrls+y6xLPIx8xLvaX8+gFxKsm5TlL07WsQuwGZwNTNkn
+QsJKFOYaSoGy3xSvDQ6kd+VnViVydLkTPGKHkBYy0D3u2Qju19/5WzeKYUJW
+M97phwD0I2rue4JniQN5uGik8/zo7QBFXQlyAKV49DWaNJCXW7OyPRbS9/rl
+ySyMyRGeuXROnTPrYzx0xewh3TjGvKN5bgUvL5AiS8hERre1vsvWMoKsTsql
+04UBOWEVQNMm7tfUh4ktGmnHYJqifb4DuVlMQX6ynhrFY3pQjLcL9LNIkTMs
+bc7KDkxdnDxGlIz6nsds0clg2RAFVDzIEad450SCHJMjxcSI/TTbuSEbOCNW
+Ff7kJFZUl1rdv39G6pBNeaqvkRkY2SfDB5yNG9hZjrn1cMX4OalxO8Qhtvev
+eVe9qNa8Vr8vmcyBiWGO33W1Z26tWg7N7kMQJiNgEMvu/WLjZ8iyMjMhoSZT
+LZtzttvxm9JMTi+XVANIAWW9kvOu5ZC+lvUnzNYLyewr/dvu1b4n5iA3GxlI
+8sYSR6SAD+CGxKI7ImErYgpaXrvf5uckElC6eo+pi/xy8ELScj/rFY3h0PVt
+mvHpVIFgxJI3NiGaEhuQdTYdYANlX1aEkJNUWf0kFVwW37NPE06FEcAm1TYO
+gxsSvidyxnWxWhYnOZU0R9qyKawSikiUHRUTUsGrMExAofjoAa84UYYSEFGr
+7HWMU6VyXP9+BfPRPOQgBSij1rQj/O/b/OdFs/GuQCz8R2Eza/I/8zL2pTX/
+r+uewJ8oiaD9hOD7MOAe3HZgIR+kjpVadHnVqJtKXdByG9TF8Tcz7ftThyjZ
+mtdzWRnUpUR99vTcrCFwoXvsCmnSjuJlDuAjNraiSXZDsXRV/JoUG42wm58A
+ILqorkIxpZLGrxTnYHcuh0blND4a0hXOOd/Z0z0dGm7XziTlLVKCmvC9F9Vt
+Wd0pvDgmgO0EkFxKmoXhxK7gCjrEEsWRKHv/Of469b9+dmF+lqOZcjkiVchJ
+e6kWZrGWuEHUylXW59swrhnUaCKH6PRdr4Mb/uUZcc9IsksVvrJB3NsXJLcY
+AucFXtJju0TLb+WUOpqGa8SeIy+oT5jRG2nWrT4nF8np4fhnW4kUM3I82B4Y
+T4+uGAF/NC8a2rwb0LPgKYyAoV5PRo4BopjMSnDIvSV0LhsEFkYAe3UblUES
+LbaHrZK18/1xlgTSpOLztoZ6hlHrgXcbR68cVhLJ4AeUNiENFui5YAJRxlem
+sp2idvX4KLNlhAVdcg8iYeYzpW4FH9EyVIK9lWjkmFTVBHmlhQY1xAvNqazv
+Rgho1qpMQF6JIKMHmXrBqcx2M8A+h2QGBQmqxSXyTzoCHkwIj9LTxodl8dv4
+KcJ1rzxHCNQJpHp9HGm/8YFpk53oNWNGkXjCZ/6Gi2rDmrMUXP0WBJSp5xhu
+hTdf986aLCZHlIKSr7gMhAXbc9oIXuGJcWcfkZAEhDK1eYDn8UMd7tWfIVpp
+aO9vN32PFunaobvrObmEvl70nhMetdGL69ajfTvv7OZvHHq+nu0uPpVZ8uUK
+O3RLCukzYO8z7M9nHCnbwlufMb9SoJx9pbCQAlAo1IzsSVl+U7LbBiOZz3LE
+/LxM3n9rmsWbPhZV0lWmqy37+iUpuRoEqmeDGCERVsxcsviUpzxlI+WGUZE4
+derU7NZoWbjk0KhYum7JFiTy0axG8z7jtzUvPPeZkzZynlYfD7UMfVvOoRJH
+F0oa51sUKF5v5GJe9L/XJp8aR1lfGEkaq6HjBgastZbjyWCaNF6JMJUOKiVY
+2sv89JCtzNmWgHlqxXaSAxOiOSlJURn1J0pduUrAGnG5O/e6l1SyXlw4r/dj
+AoyOhC3byxGPCIFr6p2xi+TkKm/Z1USDFEqyrwF2Kvtoj034bQ5+8p10cm8T
+lwaWSnlEw0yYyC1SUzYxMrE4m8k5jsBizMo55ukwVyRy6UVS/aC8GzLXi5Xk
+3tkmy4eQU30eDshCrXZBsawyM5DAEgcEPOGAiA8HrBsNByiaFCmuSHaqdGIk
+DiO0iC8SIMcG4ebAjYNco1V68g77ExExW8pOQn1s7uAEewRqKfUp6QC1/EaJ
+r4Z3sp6mThAt62s3Rvay3GKBt5kDStbF7Pp06cmF3LYmE+41lVFUsyO9pafr
+2VtZALazQsSthwr0SoGXOPwNZftzgg9zbM3y2bYXXHu8lMGbj7qhlZtOUHWJ
+COTHdFOF7PPEpt9+ZrMnN/ZqNtM34i7yUY+2XLSP10jqAvSJBfXKB/v7z64f
+lEBgIkvVwWco7ePnxmdibGL3WRYkCf/AaOrx9X4GmlslMFKzBoo6LvH/GOjJ
+Q+mBSxanr/XExGprPfH61iTt6prrL9VJYpWrp2yZpFVQlC1ZHHTDcY1RKshh
+LOmJlNRMnGKRnA7AMIlVK/APAqifJ9Ck295FaVGX17EzB7Okoitc6teJal2e
+3eulZv7Ml4I5CuB/ICwmkhMBeYKtu0tD+rCGtBJOJqVhpClBM27mxT6Kf6HW
+ILJCPNQyH9bop3Nj2bYz5fhily1gxyt4eHb5jEXQybWCkQpmuqY4Umz+Mlck
+GmEOxzUaPrUXAc46IzwxkpwrikN9fleOGKfGeP24xz3uYLtw4uxs1oMpdHnZ
+Rk8zxDT782s3fnMN+8+2MyP4UlYiJLNKOneGa1Yohvfl3jJQRhrG3dHqJ8Cg
+KdbDUmkDKrhaM0C58L7csfGVTa+fwYFeYDkp1DTeMAcU2qeZSbN1AYzpBdr0
+Ez/xE6GUS+9T56aIaYPtOxUBTEVca6x5d1n8Nz8TmVlO4ITMxDk5OruXyg9y
+KLoIY573uB3ZKts3i9kh7PXdggCKYogcUCHcEcKr3JY4Mn+QuxMUq0wj5doA
+5b/MDyUaziIS1bTo7Cq227trfNN1Fj6TtkEo7BWl6dr4+ma1gU72mvahhXP9
+CquziCaL1oHgrIpcXhSsqDf+zVJQrxYff616q3vdpT1YI94zD5DTR1mYMgXq
+hUb7I3O382w5Hv/qg5KW9d5yXBTCjN4gM3SrsSD1+vBD5INtgiPI4iEKHWaO
+iiqzW3pEN0wMseH9xq3Li4Qupp4TJ4HXIp0CypAgeKEFvB6++imW26OQtSUw
+QGIh/OZ8FRLT9SqPh/RnlgIpL+2WMEbyQeT7/WLbqY+ptkceeM/4IVvkkROu
+YLrwdX+Q07aqs2dV9HHbKofNZ/Fv62lM9DJBVtaB0SAMW6/TgSukq7dQglqr
+BiwJOX369AjKkrq9pBC2i6HYz3omJk50rDFro+bz9L8uCCLkRHJXtPYxICul
+hMqCdAsbyoleThgv3wwiUGhg/UQJMqto8A11npSya8SZmTd4HfWBAwEuziJz
+ISngwwnTZDCFpIxN9NKbX3p+6LruN1cMmzGWf4HGknlOk6elGXSCuizGynW8
+zgPI3UUr03PUFEbKhdXfjBxHauTpgv+Ia1/vZQabKr9SCUmV2G8t7l+OuSlE
+WUlUXaYuQYk1gw1szmKA9W55CZHDLcrWs7yQRkpsxMjLWmJIKZvjExEnzS1i
+79iYem33J0fzMm5wDtvRMmXSN/QPsCQ3oQAQ9hD2JlKH2ayrCJ8J48reHAIK
+MfnP3NgrKgVODnBMf74DaOJAOzFNRIYBa8BcupLM7HJAwlTkxmVCs+aje5UP
+5petamtGDnplcsXQ8BaEGjnPX5gT3soXDZ7SYr9YowZ8jLdH49PMDsk+QQIY
+F55d37+R7queYBfWwHTmINTL2UNrrFvql5RPIaehf3IYYW1lQ1NFiDhtPjxd
+UiNVFD4OOWBdgG8GOV3SYO6kA9Z0uXL6of0Z1vQStKkY64Xi1i45MCMJrFiD
+wnAVy9WGGJTz7w2YrA3a+qW1PtLn6GfyOOeeGgB4zjZ4YcWy1yPXXMGQeffd
+NrWDBbnA0dMbP6abIGNuQkBTr1/VH4sJ41jn8tfDYXWQb3/K8dFonaonTcwU
+53rzvCGbFdvfkXRx6LDEhdxz2E028yUBBCOwosPO6RZy3PVuCWKEbaqwruxI
+AIQO/dpcliXRXIrSMVdhk8rejZ2eCy70N+9ePTNMh06JVsQ2ZuG28us8oTc7
+eYQDVA7jqufEjVCdwXIdgjhAtDHiwjwULA+QtFSMzpAo0QhZ9xsJTg/Z2Nkj
+WC69Cg8gYl/lMG+4wUNBjJgSUgq3ShtCGX9nDZ+vwYYQK5Qx/vWYXpQSv9iI
+vuWuZCzMxCv7w4BVNJbbqW0R/4O7X9GHNEG/4sb9DZxncnD+iK+I0HBiYLkO
+rG9OWoMXyGJ5SwIPDEwC3/HPpt/n5nHrFJpPa8wdTZQyZxG2ASriABv+oyB7
+LrclJtO58NYeAHpTsWeSYqqUo/HncTCHw0/xwf66oS1IlMuPwVwAAZ4Q4lC3
+RP+0m8bn9gPhZgUdWdot6cJhxFgB2yuCsiDIG9RvPemTneX22wd3M7l+PfbK
+HxeGxzGQCXAD/f5HM5cN/TlSt8PllFzk7Zhn3bJcHBRxCkouCVfkn/DwMqLK
+9uk8mTHuxUxhUE4vMj+DE70OeL2OVmQR3LZcOcGwbS6We67BKJmY1xboJHnB
+ZF4uTwASJ4vKWBQLUSW3oltopiQbMiQ2a9HePsuQ4SASZdbi0bEz4WVhsoOX
+7zYMXDk4p42pO0VCHK4Jr5w2Ym3PvL/99MBcDrOvcQ2+US4DgzIoBO+Bbj44
+xx8eu2PraASGyp+0ZT0OQ0F3XXZGqxRyYjkglDaCE8pgkXhpW2JOUGq1AV0W
+0AAt+rFffLjlL6aJ9ihzehgqvjP7+m0WONAf5rAsns0ld5NKKGE0VpCESsCT
+eQeJgDmApz/96aFSMO4jVOI4F43rirKp7xggPSTpsoB1f7ktqAgu/XpQd6hF
+c6UwiTbL3As5I1reRTSSa3PE0cumdYhGGGxybuXajkZCGpkkqVtv62yRXupO
+OEcQhf8qWZxFwUyAOWfBmNo1ieTKpKOFvnV5sCyjiMmqWIoBhmRKkBaYdUV6
++g4AmD1eGRcDs5LbLFpleYmINGOoPDh3QH1L8FlmkKufOEQJHvyZWdxWNuR8
+cpIdYMNuwlsFjN9EQW+oHD2yTWpzw+dHFclqIcv0sS2TOxDQSm/4WQ7xQUu3
+ln5mWx/rthBif9zodr0kXuGRPFTYjE976N6K2MRPDHEe+Cb0iYWsSwW6HpZN
+73yIZpk1bRLeiOAwaVbmt1tBcZ/h+G84VBSf7a+9DYaymkdp9i3f8i2zEhPg
+Egr8KBCI7slS+iDNY+fDCAP4vtLNa5pMblClKdNI0Emn4HYmMWfnzRts1E/p
+ZckqoqbsKnnQ1ZPz4YF94mfuPY6rRntpMankBNOfnZ5L+pUPi13xnZapSnk9
+yGThyz50svSG2CZH91prI6xNPkbFqBy1qo7X5bxosED22JVn58Y8QyZGRRxB
+AFox5xjODOUgKy7JeRUlq2m3OUoWMWgGasXeMEHCwGV0tTOTI2sCHBSVb2QJ
+d4Ro2H0lwxiH0hYrYv7VXAg0DitMECgaffKTnzwJ1BWiAIqFDtx4KV0gKxeg
+azlKXzabTJ32JlUIoZQ9l2aFyanQ+CtbpugF3LGfR0VJNaPi5Syx4jGAC8Dm
+5zCeX+v58GHuiiomgbLqlXPifZn8MbM8HOyMp10rs7Hi8IqPYw+o7aPgZhGA
+nzSzw4szTKiRLTlrqicO408vV88IqXQoCwlXek6erSzlEZNwoqqb1kCUIBLy
+sCDBIvkgT0E50wuZVgAzckErier36+3kSchv6ub0bhQ5t2WbdbM78tysJvc1
+0PPCP+lPKWYGgclUYC1+9lmKbaxbVwar+87ll2mdC0PGIgsunwUJi8G0IDeH
+/SBT0pYCG3RKgfXm47I30ty6m5qmSDbHhEItNlAB3F2bRhmP2haTEHL6KYr2
+PuzyYvVeRpquoG8OwRUjCmhKTrmnALO4M3EMaa9Lh15SRvcYSCS4IQNGr0nV
+LviHRH/DFZCJdEyU6VIR2ilgweBs3hbyQ4gsLMh13fpgTNQn8+kqwWTOW+xP
+kj4z+hUVmL/oM3KnA9KGigx9qUj74ZtsslWZW8oJyMwcPpX93NEN8/sYY68d
+EYm0Lsf/e3RzlJRos2dGyFeakiItOlItEPdYiFyh6OWKrVvsdm7EQpxi39k+
+WmWMvFG54LVur+XyQD3yW4YBOqlQNJGDCHQh/lO7ls2TFsOl2mJx4QJpUXMK
+mEX6OGsZYAor3IF2K8RP2R/7+nbw3JIVLgu3oL8KiTEbew30jv6aL7YsFafB
+sey0Pssc8uUYTQtpnQBNBUKLJcu0SFlwjnMwjF6dkhZfktE3DT3kbtYrwL1G
+l7OWzZP5XkX2zKByjFn9mGSJrNVKrESMlISboov1dmzIoKyTy+K2iwa3FWO4
+zWbUpDIbw7eRtFFnP3Ri7NyxCjFbBLf0a3QGN5ieoohJn9xZjwThXM4gJvSC
+hcvNfeaMegrOgukJDplzvntbHOZn1cG8SfxyTL99BMuYBp/CTMaN8X3j2vhM
+DN+37E23CVBywXV+x/jjhVN2UwSzkIJgu49T4waHo9E1y9GMXE4MIHbb3+R8
+Zszb2OVHKWWlzqFdb5jnHPy+Vx28ZjNBmJfLW+fZmMd5+fj+KbZDPlpWLa4l
+4+P82gKZ41P82+YPQGtf0vbZbQPUxXwknkU4zFwNlaSz2ojSU1x8jeLiq8yd
+FiTmEulos5OV8RmyhSFlitkGRzQUSDyuygn+CmXCrnWFa6/H2fabHJ2MRMdv
+ekXMwRv1bxIM9uT4+E2vQ5l3wb7kiqNtAv7kpQ6sSMVy3U9JG1hOPpN0SJvs
+E81nxMqDWWCY8jD/regs+jerTIuKgQk+10N7et3aY5qydY2I0cmR8c1cc0a9
+rs5guH5jvsxU+Ct1F8uNNjP8EiXifx4VpaI8VMmOu/IWqrY7obZT7emjBFfN
+SkaVHTqo4W2h28o/vqR3HUzPq8jisw5cXr2bRyzLwDLNS5p7anKIhiP32v56
+7iuGLfhMdBcRE6vPiMR82KN64NlQG5JZYDmdVOIA4PH8YLIRPKsX7tdOnh98
+sqI0Rb2c+kDVKaLmKlQJocDLR6puIVQk4zM/t+M+Z6czJpJU/7vQ3QG+tYaY
+o+KzsFs7hUTpjpB9BONiXdRRqsgQLffJaXlcPteNZ7DBHtUiZ1XTHHl6gi8S
+Clt1bbTO8gg/584pu6RFDTDYRxWVPvCy/jt7O+mDj72imqtIl+t9sJPtCLIE
+rMKbcuD3PU5Iqmgm5RJdiwSEHdTltfszOJ2bOa5c3oXh1stlnwauGpz3yxbv
+0R9nQ5+nhNhEPKobUksKhD+hP5MipWSZo1CZimhGzcJ3YvmC/zdch7TVR0jD
+gMuLPaE/JusuMCHh4d0mgvWtZMMWqE+l0yfaFNTJXZ0CUkqWNtXll20MoVOc
+RCySYZM19KKY9AbHR81kECTDyyyxTOMEr4aQhSR5D7AKQssTzfeEUkvyO4+Z
+3h9ItN3XiWMgkjdSrS0xnaAKP/pwtdm6hTgcdh6/cQaWTW+P7veEuH224NzO
+qca1npJOi+1OcwNwqIIlqMojWKj4o6l6o26dYct215uG2EpfNzIvthOtUOf9
+4aqHYyc6ffBX0obUlHvfxPi+wpITvVJidU/zoWlNACpEXnuFj5bRrAui4bEJ
+wv2JVFsuQ+ICVr3La0pSj197PTdkaR07ThmjsiVuQ+DS53RKjLKeUrDqtOC4
+PtOgperOILpj/O7MiAOwD2YKLhDUPb5xy0lPUhjFxz5Ke8zwWBcep0kukllx
+S86g5MYcF/Bea3OHo6qRqynDDgNI6JURyHaO375xOFCsrzA4eM/jzaKOVQH8
+/FyS1Zo5m+XaSW1/Ouvhet3ayWaz4nRdUSam7I3Ys1nwLPNeJwWpUY5W7GaH
+Ov3/uL3s/+W/X3/8s3kBQY2QrhBpO0ejE4gLg+gcRuWRMCgZ8FJdKEttpkt7
+1w+emqrHH//2hpMR5cbbGyRLTgon6s02DP5dmUJIXxlBtgWTLHW1i4DZWnhz
+/yYziwaSTIgJrfVgptkKTB77mfWLWas7h9bnVIz/1g7yVDg8HHg572NreCU+
+HPfDmwYmJtMLDf4VlwIrwbqHrbjccmPVDWMGvq+OGP9miYiAf6VFzp/9edge
+kfjN+r47oo9dR3NhHtjs4aYk9ro1vN5/O6Rp5dpG1tUD1WGKqqpQKWt++cm+
+oHbMW3NTuTxKWE40O3mb7OtwZJ6AZt18aoS6Fw4KiaBLGdX9mlqGYyYnegFD
+ZU0wmIfmp6TOT3va06Yg6Ul2GHkE/h1WDKXJziwPoT3rWc86VnPUrj1tEaTw
+SoCTlVXa0Iegz29z6m4xfAqS8vDIojkcyxFVaM9VE7iKltwSxk9EMjgNn9lS
+ymbHBHntem3UCEdy6K4YVhjhMaUk2NB0dJdeEjA9nIvnr5q3RolJFX2AZBZ2
+8Z+5VkjTuSIInqvARpi4J2EhRP5L6amgaxPmpXmpFKGyGFVpYQAh5lQtGYxI
+J0eczhNDLg4MVlHIk3VUYn1UoTpXajKIMrZjchUBincDICJv7/M6cFukcf9m
+7snrpJR6lDQ9Rob5onUuiPNDKiFAT3U/k5wz4L809k9TU2qADE3kIB8+c5Uj
+9cLYajaUZk20EFtManHd3VdtuMcxbUCEaV9LYfyb5MdWH4MifXLIcZp+D/2k
+dFFUTs9n1ECIsl4iJpSNOhhJNMviDDWvqAO7FigxHADv+KLnP//592ser+qA
+BLakOfFIDs0TAVANOYkIQlSTogAS5jKeK4aJw1tMYnagIqZFq1Z1wFAB4V4d
+tmonjSQXNoQbZeL3awaf1AhY6ecwEPZxOTwanOTliNnn4BrFoJ6bCknEjFzy
+RK4VSNmpT5siTCGY9+E2kkB6GIyD+hH0UAC5QOnG3VbVOBoKtt4xwNJB8X4B
++S3Dv3boNMRG7GwjuKmX+GP+3kR+7h/CSBhoFDKRTOvqB35FzuWEQ7hEiFgD
+qQqJT3ziE6MZwMFYUy7SI2tTS8zBkuqHvXB/9KAQyJ+ZsxKZlRhjfapP9JDy
+kDyx9PraQVjuEwT0tMY2/T/90z+NYmTOGXbrEcJVE1EMqCVVSiEUASyLf6YQ
+UiZV56i0MVOc1YrEJrkjjXswr2+G3INaTjZW2InBCEEpWhj0nOc8ZyoGkjGF
+69MHrC+RtmJs0HHPQQlqqTCWMTLsNbtikCjIVg/YQQl4EzMvRsM9+Cxpck4u
+A6amtlN7t+2fd5KyUjTTMx4j8p5R1aizRpa206NcbYKkrJTbDuq4fvwG/mOc
+BV18AyViZUgXZkQPYYj3iRlewxeaJTcGtBVcRVNU9OyiD9LhPTdPsfAxF6Hx
+WD6HrqXWWX+BKfSWJfHkmFo9bUTfa7zF5IVFggNEkzZsRDA+Qq8sLpCIhGhO
+ihIK18gFgzorGIxAdYJpVJvozOI48vWALkDgfWmjg3Si5LwTfNavviTuJc87
+V425fug6F8zU/Us7xNN0n4TxLaEat+x3WSSVyTVUYX3ZRaBbnT/Ee4QrCZu9
+tj+A7XCWJzeyt//ngSV/BsqgaUSJbOP71cPRsyCUSFj8m8hac7oPdTIF07bA
+DhzP05+20yozY+HpKyAyIyR3CJ71YvC5ukHA3D1MjnMgObmTflGWwoxoOCWg
+YivR2aYFUrAwPFKHhbR+g+hsBablUsziXwaB6BQkPKgu6vJ1TNhDqF1wD6Ml
+Cb1UdsgRhhcOtZbkTm4ZiSI1+yYaFcPc+E0fg2Aetl8Gnq+xHvilKkpVy667
+gzdvdmJlnwwxWYza5kefFratF6QXjMxI1BsqJM5aBvaY9SV5JWgucuZu+I2K
+R/MKweaVLre+2fhnf36tZcLzsM3t/qmswHlI/xQ8cw9kVcaf1SBmZ8W+3Dgu
+W8qXaThBUoYcU2AGOeQpmyPIl7qotaZd+MIZs3ntFkzNdqlSa+2xWYF2s8cH
+ecU82Bw3xQapBwoBRTRm2h/a3fLQKlC6FPmoJV7uOsVsAUEGHyt+rvws1CzL
+lZqB2zU0vDQEzaLHl9Y0qWqWX55wv1XIOxXPQHPDCqwUCdLhajFbWUCw8Zv3
+puJ+YtzyxYe1ComfAB6eiPas5CpYybFkhpm7m6ylIzHK0IdRP7RbAUpa97XY
+TlxZn6WV3F/H1kQZVEzqbZT726tu6YGuU3iZPgYaFpXwLrwCrz03W26bd49f
+PbXVhjgwc/OFfI9saUAyZsbP80MqGjd1L/gn0UUr/9ZXEj28XxUOmIcAAw5o
+tQk9r1JvcJGESDxQn/UU5M3dglyUcjMcQYpFhBmiijoXRBLmQUUGhSZZR5fr
+NJQaK2HMkj/pkV9qtWKHnAkIdKAZz1oNZ0EaY4ErBJEFyOW0ozDZL5EH5rBz
+a6Ry5jm2Ejc4KEVJy5wG3nCwxN1CytL3XPCaRys0gI7PExe7j7NDZOICfWOT
+3LBGdGdzkTNnq3LoXvTXC5CvHGjFSvyPkvIRWZcgzMO+1C5e8IIX3NhNmhei
++jF/87E51z5rdhJnyTSpgLpxDrMF6PwjPEVe5uX6IqLI309QAQp04+DUdINK
+p6uk2oOT5KPCn25yzo1QWTgT+JDRfMmXfMlNx9noW/AqPRbGqk6Xh43CieJE
+1H4mHFWfLOTevMfVo69lEfD4G1IQDEuALNQrByoaE7OUjZWwsn0IqCiQUmu5
+vSi0tOHmHjVjF8IRgAceqSVZW7cyVw+pXZGf/+b2Su8yXACgKKQnMhJGz+sJ
+zk76PMI9kFwizTJ/HYBYQ+qdxQPx+Kbma6YDWaqfCZqy2p9FUZJcB2+RadEa
+XtMr2UisCgKVFWXfWI6ewNMa2Wbc5+fp0In3VAakjrIxWRL8KmTMkqMsV1TY
+XY+3VwnAdukPuip6DVMANkWkC/61B7vcZTYVc8ZQjfcMIBZ9CTBYtQ4tLE6H
+PlMOkFro0C6zUul0iHdsz0/8a/9jsTsdwnlmm9qIfwsFjq123LCQeUCP0q0s
+9FWJIPRcSEU/ik2RAT8sQkpBmAwqBtpkcMXQst4TMf6NbeGByut+OuTskFUS
+FcSoMFSQvm7yRp+RFIezdIXO5EpojBdEF2Zn+RQvDp4UTzg0ax+uXkxgxU9m
+A8z7IMkL3TEbVUGhheVk0zF/aykEiMFhuVO9mY7FRUIzovRTp3wmQBFD6mi3
+hFx0CgfYaK9BjiM2Bhke08gKeu4AtqaYBOBEdxh6R1NoPCAgumhDXGX4OauB
+EdBBJqQIqynQZaY46/jlG+KO1GGkwB/xER+RhY8MFGyaCM256Py9V5KasPen
+PvWpD2yNyBVoBpRrUTzSLnm6aOPiMnBhw3oBgySTjONSWXch0INapqxb01Ax
+oal/+zjT5ux69VPPBs1UkmlyGQoJojTGXeZ5t9YGjJZlCdjKiLJGArJxB3RH
+7dC0YGoxmCcyEjIyBIpd4UUW6+bQx40/m2yophJR3wU7bIV4+a0H9FCJFyrS
+Lh6pg4fB8MLiaA8L7S01s3nYByjIzkNR6a/mH9i/EbxD/uwCBADwvD7Lhoc1
+vfCVegtL2R/AcnbmC7BSPGW9RMH/A/pr0GWqJpt+eqdN0IdhKW0J8fka017z
+SoZtGbuhazgnQEVRWDxggHhQSXBTY3hgf01gWcGoti+KKFeV/YLUi/JzzL5i
+e2k5JyUKOP3bTi8tk53ICAOZHQ0uRTu2qWvbeuIXLA77DYPqUZz4njVoD8P4
+I5pg3siukT7c/fxlXglWiLFyIZoCFUMnLhM3WS1JhIimn0So1JYt+OuupTWf
+OH62xuYqtctVZpgkBNaEILAIXHMEpbSzb7/ps5YHRlshl75pau6TurXbROt6
+8zcE7tXn2aearTiJoxR7lGDjf/rvhzSfRM0pmXjEyOfOnduW854ZMJCHha1O
+BOAwMfNNmVhW5uyjvHKYFbgnZmdLpDAgjmWs5q2zbBwf6JvXc/QlJAWZNebc
+UUFbmE2ufPJQWbo2j3s7HCAl/VE+S6+CPFrg4uqt19MjNiOVPvErAtVp9mrf
+ujJ2c4oQkr2W3NdbsVOD2SD5qsFMKkAFM/NPfMyHFnNPCR9873cIYXIBMcIB
+Qs5MXW81P34v9ubupbTaFTlakJnR9BVpY5fxukETfrYnyuZvf0p2pN1IgX2M
+076wkMTMlXYcixWSaPfx0zTPjLKm9BBJQHBdMCKihjI1tNkGmQEGhZTQo11g
+lat+WRoanVTRp/xf1yNiQKJKX89djlcMIQjzc2GmEIRf8pk5hP2xldvOCxjX
+axcykECiRew8tYFkhbC02MwIe9msZtsdnyduuahLL0SFEr3MM2S2/Wpdgzx2
+4JnhZ66Wlheg5LQ9dsIIBDJaZJ7Zkqo5sz5Zl8mbLwfG8eRiIKtVQph5PM1g
+TXmEEJazuVfCwEkO00SYvLpkdeKWiSQihsCZYYyhWJa5naB49bF1zrlnQ6iN
+iD5ZfygrRubCJDMBuFcWnYQLJAuQRSleVz8SljhoZcOOi6Mr8E2WCjOCOKm3
+Hd8UFXkkABRluU95ylMOUhnJDVJ9ZXHYqBgItdQ0cvrSgtBz+y7y1vQXVLAr
++43XAptQW+zR/BxDssJ7DOHUKBJcGBlr7/0dOT36RYahn5ugkzWGSb9wA8QS
+RVlHRI4uEqIKJdPDlzKEHNmbh24yYxp0xyr3cwMfyUf+kQIEjaFcNZq4UhGt
+GtY+8r1iuGAg3VtGx6vGpDqqOS42VHItyiPFrDlO3fAP/ETJO24jzgq+9FnC
+o3tBUMnlQisjkCBhao31VHudUcitzrhrVQKOEhf2zTswt/O3RNImrNc71bhJ
+5y/kM85YbGwNeg5H4pGERiibd9UfDnYer76fGxkWCfAHmR/J/UAlqW1Q27kp
+uXWA2lhMkOMkc1UQnljEc2rQd24MCgWkFzH4LcurLsNt4JNTAEo3Qyz5m70r
+65jjYilCNlpfipufMulsMz2GHlvdn5fdrxLb8i5D9tdaQ5SJK8fMPcHnBtAg
+xNCDyMyujxU92z/zZw6s9+T+YflMySXhmMH3yvlJDEKSzeaUZJbDSsTrkizM
+VwiCSX34/nSCfDi12O32Wz9AOmWV9yCNwsouHM2RfoWrXJf1ozFk0QrNpZFT
+E6+cx+2sq/sTEvKpFNerFL5GnvCJJxA+SXnSKw2Li19HC1Vpp++9lyvn+ar1
+yhduL1MrGW12B+GM/5FZn6Q5+xUcc2Q4n9FC8expnVugt3ItG+OZkg/k6iEg
+QqYMRMWrgLCn1lK1RTy3YVYADFkIm82y6k+9+3XeBwk7mVpOpBOAcDluTjlq
+NqXmrASfPLJvniKbnAwXR85J9oHGB0n1JBA0wSuSMnNJOdSP6RosM2WHObwJ
+qpb8cnISCRt3fG2uzWL1tMHqB8HNOuERU6EhRXl2GkuTck1vvAS2k6IaCcSk
+66DvloWxKORThf3ClIwOLFA+vpWUHWuX0QEpzCJSqGt0MFAgX5iX0aEUb+Nf
+xa+aZH66FVbL+SXnUSrkw8L9JurNF+YC5OJYqnPcRhbQsrreudLKk0A1Z4Wl
+rkQzO8aYe51BfZdt5xGuCOfrFDfZr1Qu+6ARBAu0q8LJiJfrF0BLL8maOsmn
+0TEZLyeFbciQfW3vXTswIUfwwXjopy2kc71ZH5BCOfeiPEkxickcdgHB+Wa/
+LrFaVELRdMk2SUnTdNHo9ofLnR8jYU4yG79bD/Vm/xSyAr9B8SmCu7HHJ0bi
+WRgFWPQCmsr2DvrXYqSrh54aeF8qM0wf77OKEhO4WfolHyN4sZG6RVGXwVFB
+fVFBg2ExwA7ISQsQbx2PWdgMTteMUnO+z7I570qo4cEErf0tw/6666pUmwvD
+Tv9mwxl29xmeuVmMOSuzbSC46ZW8kn9SXiIVAWqqi9Am9xtE+TEWvwi8BhoH
+z70lH5zbkS8OrvkYK3J8jH9F07ydnnMWFTjd32B4cWg5N84EsxcHOKEoK3EN
+0KjAK7SIOIB4H0o4HoUE3lCbqTnzO/tNfVcNuoiIUwfTRklX6V7uX1tvrOGH
+QMZ+k9sWPVM1cFIwEzaAbIrjf1EszKWZyOdnyC5Rl5mNsAHZtEN3WTfEDBi8
+VVKsE3uFVoa0r1ldGL/niuPjePKc5+5fQxa+7jfMXDWAFhu46WyqJVU0qnSa
+yQ5rA+iWOXJFx9Ry24tkSPu78g4Hd3ptdP/u9EBN98Ph5rwqZFtnoqwpK5V2
+cXrVVEL1XECXpzcQDlhelutAe9V2TsX0MNUpddqcwnXzUM3c98dYzebo1NZ7
++JybpBgkhxFtJGV/wwzalzkBmi1AyM0XvU0y026UxzpgXF6UhI/OrRyECRv5
+ERDBk2biBaypx67nYRKsOKyT+0BGIjYTFusaXpVsUTC05ojrlSx2MTY9Ktpk
+yZ/E3mI3PDFdCzMEKnASNqYMZ9xUgcXOi/m2C4ehU7Y9ZIOuKCIlfgsOxU57
+Nt647nieOziMRkTiX4sQ+ByCJzZMQg5oFj5E64mBFQGjYvK6IYVbc5Fuz/Rl
+1QMmKIShukx6vTWK8/O/Gl/UFxBRXwKb6nvmJfbXlpHOM+goJcsgZz5ORANR
+7eKKFgnCuFguBAupSw1x49j5YadOcUvzSeySevZZ1RmtdLFT7HnOR8rC67HI
+mG7xqsj6XMOIzzinzHD6b9SL44SDGE4vKpCY+TX3A0EFAzWSkEFJ+xDnqZHZ
+W0+lDJaVlkPY+HjFAJ71incD5IXgOGAqHJi5gxD75ChRzy5MwUXdrJnrhapz
+lEbXt3wMi6dOElHLnYEeEOl1sce8IU70weIhAyYzAkt1jqnWmVF5VM8V4wE3
+SUAm1miC1kwD4BsjKQUPnHJK2eWW0I+SGZxFKeCKDRVROcoPSzkcOFJIl80S
+XJplGdywWZ/CgIPoFZixWMQMOpSK0HOKvmilWJ7Nx0yFDq3GjH7j282Ac9sV
+xw0SPmFzX3yBcIXxkpqVPFaJxVfoCv66Myl5gNGoW0NAixIqYpyk02dWhAlq
+XSAO2QAXYPS9Owlv/JkVp1F/P7OQaiUdbjFEXEM2pwNzYBKFYYkC1zXlR3Y7
+qOMasM3H8zacqPhFmFwUZh0eMM1NBcu12MAP3poWyllKoBxBvpNXwKee35jH
+c+JhirKZbqUsQgaWgQLT5BV5BeZgqsCHLdbH6wJdX6msrTFpP/OgL95CoJMF
+/fvbDw4HMGHVbkagR3OJptGQbl9MPk7kPjXmIrZN4+JIeFkal+7NyJj03E8J
+nh2VJ6mBhxFZgVA8zVFjegDY9JYE1p3MYgGOQlR4uYt+cvCoYB8lRsjhuHkl
+I0Q9fu7Pkd7WblMGuqjSlCoTtGo7LxqUr46G6ONPPZRNzM4xnlAklipUETGa
+8OSiC3ZPtzXwH+RF0olbUcByYCkDLzHf0sLzlaBFiDGXbG9S7zn2Yxehs3E7
+7qJTwqos/QfopvArKgkIS616enGe+pbTjKGQ4NpZyokZNKFGIqDLfjf45yyE
+xFFYZSGPgKjsOGEjs3QAqzECub6mIlnXGlXw8QCXuqJEAKooUQKIOlGv7JIA
+FhYeF7wHL2BvpvMyJZ9ZCH5MdMUTzHR88/0sGaTQabUaWqQCkKFpFoIJ8Eu5
+MzRWmRsMzdgb2rTQM8eG1rX/0ivn+G11YeOwyuaEHnGwZuk9bJ4elSbExbAS
+B3bHB4vWy0emqgr96AxYWy58pTfYulvifJbOq1KEIjsROuO3Sj75L+9Tah8W
+E5D4dn9DynZIliXoaiwIsPqv4DkFIS6ckdGcxEU5da2YFKDDIxpCkUpACdy4
+qfWkEnOa51p7sqI0Jqpzyat3NAdeluQDiFsr2tXfMQtT6pChCZBUA03kZmhC
+DwEVbyNtFYwVCzI0MjY0fNSZn8P+vvAjQxMwcqdi5KI5Q+MNMiyxqa2IGRov
+SWoRg1bl1XiMefLicoXXH1ceA6c8qfGpyBT85vxcDUoJhD0010/7WKZ5nzfm
+GI7P6/fJRFYNuqlpNNpVy9GsR/Cn8mUhYfW+nqKKfJboZwIqJidlj4GLbyCI
+7BLfgW3pT4ALx7KpYBVbY/gMxBiOvMCGJKeTaKp0PEeycy2KCBCWVIXcMVu4
+RjFQKc8tSqc2YC98BBIwha3OSYnNDqCur+UQ2Fs8WYnPAoAQj9O99XsSDzIF
+TgIqxNOaojDE4zog5oVpgkj6hBpw3gLkJOQ88GMf+9jU/5HeOzxGyIpuUR+m
+U3Qr0nPoFHzkYUWEcLKnNjOmVS3u2hok3kYcgCmoiPjFma1Uo5Us71GPCAfJ
+EvhQC/GiYztKJdKb13OBTY5hYSA+x0mECq9wT904K+G5dgYj7C13GYqApFyB
+PxZ58QFA3MLvUIQfMANFcg9+ugYWirAyE2HrsTM5dRJUopBLQVHf250JeXkg
+QdFPQCtWrtezoCo+2V9rYRvCwznsQvCsw2yLvWQyUmC4wm2XgUXfVnnduzUR
+gq5H0vP2hksvS9nCCdlXzibOcs55O8m2ahDAQngFvQ5p12vqcnBswXQCGqzv
+i7R6E8R21At6UjGggl6lQGW5q670WUgDeezhL5LXhJ2N5yQKfKqfhR6NCzi0
+UhFo6PEWvwQRWlZXt90p+xErDyzr3V96fnHUo5As3MU2MJaJCQ+nSjmxGjIo
+Kcaec+rV4s1n7vaS4jocNt9u9CCLe4lL8JmpInIqjQ4vjB3awi8BpwS0SMxF
+ICggF3B4ImjIfQp39mfrDq50LohmIllmAK+e/exnp3Md84eUQolLnaKcTDrP
+HSCkW8FVOs85GULUFsQW41wzL93yv5Th6Ad7y3oT9RbxBnPQjOMvKHDfiDWx
+lm16B4IYqxX1pfPnFxYc5//p4TDImh7MrRIb+JuvMjwckcm/1Vu9VUJow8v5
+D8KB3HZE2lmkRkM6K2YYq+s9Loft2Ecoh4j6PkTgmiA3x8bwQBWZhQhcwS0c
+wRnoBEdwJNJkStSQp1aKhauFcGf+b7losdFqPHQFrGoBaoFXKaeh80hcDg8l
+tPG57DzrDmLzJ/KfdatcbEQzXKu/7tWDyK1Fwgfq0KsdwyZeWDAvaDXfhgfL
+ofUn4xrML0WLzpC0KgQjFMR7u8a0usSI645mPCwgLgoCGNFLGHtb31RRc8o8
+8jlh0AmiltWyA2ZKFTPXwTdDELlWoVGI+V/Fte3zzNlk4a+/DWu/z+GKISK+
+mpiIF51qRYCEbUsCUy6BTUv6cambEI7SBnYOJcJccuCb6d/GqnPDolUSctO3
+5Au8GeDcJXY4ou3MXCQ8AyW8gFwNLySPhYir74tgcpEjoBayGRw/jnh6ygKK
+4+mNI0klM7t9DEKuoicHWyvjl0BeCuezZMF8mCHx+rTUhM/22lXzvm0RUq4f
+yx0xpEAzsFH8JtRZQvX2VFcMvogq7CoHxmE3cFMJ2B+EdjSku87NpZZrajYL
+FjlpoiAa1mR5bsoG6HA0AC7Izk96r+MMPxo+Jku5PATQR6sfrAsk9UcosNBq
+wKQwhIQnKppNZ+z14KWwPhP+fg57lPxYEIUGDkK+7fUrR6jC0nJ/NXvXHOdq
+G5Whyp6EVqVyuawJFZI8X5caxaQQmvs67+jP+tLE8Vc2j3LCHALctQcAjFfP
+iXaEveTsf3THBNoJR3Wc1Vsv2aiRXpiIxEgvwAYC1rvZtCT0ohFcaUFaysqX
+Yej1rWuYpcHUtDDLMAA6Oe1nM7bSQpZqIIQ+la3mFOpsHtnNWHq76urcuXER
++AQpv1OmJfI7mnB+Jve+V4yYhQdEiBp1RK+pNfa+rjk3spba5l04x0uNUWjQ
+l3sgbu/XaZC5LCFgKXN6FgJYYpob5lOaUBxdVz0uMei6f+Gy3N5O/8+CphAq
+FsdZ9b/U3pMj9q2DoydBn6zAenM8KKvPmazSEGXotfzKsKXPFgGkxE3Ymdk2
+CSOeZD1mNDMvgm/I9FnKJJRhPakubkJUsLgJAxccwDr6HhFQbphhFV5uDMwl
+4MoZMsXsR7Hs9sbWN95MoJQHfha/M10E9nL7XHmlLJRHBaGuzIBIKDCt3udY
+ZcU2pMDq3E7GnxXhiZfWNbkJsbCHGwx+86JlP1lBCeLo817Ip8dPrAXv+0Wz
+/QKHFCFyihhB5l6n8lnZVowJMlBfcT469d+r06AqVEMqIkVJrGHXqkqEqaAw
+H7Nz3WIqe5TYHo30mUujZHdrjq6wmpECCwIEEmG1MInj4oCa1VmgTDJsKhfW
+AAdkiKjmsWtnBk77mS3xEjLHLOdOSjGqbMgIykgic+iVu8XXWXzLgeVSpfg5
+Gj17K1YTFN7JfalMdiKLbWRF3IHxNOjFW9ALsYqvCxfSkkUNudrvxoVL7X+O
+nXghgBQ5pUdjcySBJhUTSKQ+i5GLLOQD63Ha9Fwc568TzBZg5eYQT8o3QGxe
+Gr+d6gs62BbwNZta0d9VyzApJWsvhAzErXlVMj7wnfOOw2ymkJuecpEIZF0L
+ws6jDz7Se7PS7tfKGA3ERhbCCUvJ+2S73GXadF64CcS06zt3c7g4O+0qMKuB
+mN87xrvDTMEe0xF2wkx5rdQaeWdBExVTWTbzmwJFfI22KtuIK145d7duhi81
+F547ZtYL5bMT1l/ZYM1jCC94A9kG/13CiaKIjUysrGe/opQ2m25MGEsHQa+c
+uhdNH6xp4vFuj4ZFKA3b12t5GbOlNqx/LctkSqyS2HTPG7BFcm1eZzMnFTFw
+ls4fOXc7AYdg2UhEOwrSrKLElUKd2ieNwX5+mkPQE4IuV+C8s98zWJG/VJ8D
+kTHx8fvzlbd7MBS5dYvXLoLIlhEAxRoZxwkxTxXKyr69Cp0eXl5uQ9YF42mO
+vJBjlSI0laj4e79za7s0W9wbTDS9mfepQ05ERDZ59lV485I6BmNmU0W8L4cd
+v8cK8vRdDanPa8tuyuzTAwzq6swb+vIlSdr6JLjRGg0RQpeYo6t4xEQyR0KB
+SkaXE88d4//PDY2g0knjswJWL8tEF7iEXDINUCrYqc8yk0ZAwmDhcHncq5YO
+j98afHoUA6iZI0pKvbLRg2jRkXWCVEziLy2tz0IHMxKGC4py3keBxc1L47ng
+o6D7UgskJ3N0oHhs143pWS1WJy2Q7K6A1kQb8aVGSfuKvMjER+s1jBY71dfJ
+z8iE4ZOJce9vYL+cQLYbnyVee54d5mKH/mtrlz3KUTlAcn7f933fg0yIi9zZ
+A4WbkyHH8571AKt8Fkzzei95PVbsyNa9kEB3LKLyP9BY/86b3E4UNwZnSsdy
+/dkatocUaBwrPiaKzS3lGqNQBIC4JRMwkYV4AzOUg1QmTKpVUp+jVUxlyfHF
+Q8KwjiUvN20XcchW2t4nUlIZWSek5MKpT7E53M/pEHSnUuLVGYXTd+nPxPRy
+obV11Vf+zXdKcmy82BTGptjH3OS2kruCiPXUsxP5UJgosM18YOrpDEaHbFuE
+aN79Lj2OE+Hf5abHwyXNZK4p44CebfyjKSWfsvJcLZ9zBdiGUJdM4Dh/fLnq
+YFjmN8cnBs/OzZIepHBdZa239SD9XPDBBNUkTMcnS70Mvx7d42e5nCSdzEr9
+zmuzpel+TQB9y/EmHtMLpa+3NwG+TqSk1mQlw+XGeM9uDhCSSB6V0JL1bf21
+V7g1CwAEcLSkuJ/S3WWG9CrNdCASBwpK2ZAsyULSjAXMmVbEUNmeHsqS/7/e
+7h9HriIIA/jiZZERRFzAIkBIRJgcGQkSBBKSnUBk1kdxuBEJXIGLrLTXon6v
+6+upGcxKSIgNDPPmTXdXd/35qrq6+lnPimAfWuy+1Zo9RoZnDAUPmFrjk5XN
+zV0G4idwIQ+WuW1488E/k/FN/5K5wZlxGQSYyoX6oqeb95xSoJjaeb9n/VMQ
+D9LBkWSbtRgR+0nGZ90c8TdJTDnYINknFUMuIMAjgf9UBwTaUsS9eP2jZmQk
+zVQV4SAagB6utf2pf52dkL6O8l27T7nBiiDEd611f2SvaA7NTkwn1ubEKAQm
+MGd/mZonuRgHDkjMhOLt5Nhdup6VrTF+37xneYkSxBV/uU+q9RURKyRuYVE+
+klKzM+jT2lnaFRHBxdxgHEXHVuW4yQq2r9I0FstiJqXFMziDuJ0u6lp3MnjH
+puW3PXq/jVLXBmtEcYq15YKLqGYU4C92lIlWqODz82GLWOeCi5wVNhzseYKi
+6y4hMIhDmegIVtE9MqHvF018rupl9LCQ89KQhMhJthv1gVmQd8qG/PBYCM98
+F3SEZM9oXO7Ni2ZV7wiQSNpN4QPMpp+ysLOUq5+fXOhlgL0GSWR76kiKXHmL
+0//65HzCrLFwPKfm057vucNjMnjgNJbQ1/NefcTA+aI0+xT0x4dzOf3iBHwS
+3TfXoBGUcH9/n2nCu6kfkfHTNoAEvA6LfNUjxlVArmfp1m/TpfL5qNJtarYa
+LQep04czbQ6v+CkGzEoehQ5cg3O9z039bdrePwJtNzc3h/zWdP3cj5MCwM/Y
+kr78MKk8JJ1dJgDfNTlgLd/Cs7wPIYNbwmCCMdz1ls/cp4U5Ut/zl35GmfJ0
+1pysZ7njAEPnxiiDTzL2TNruMGVkKl0xXEHJ6coEg2s+5V4ojhbr5dO6b+nq
+t54XapVR4YPVSF71YwTYKxSWqIH2daU/dHv0YKgP85PveD5fdyueSVECFIq/
+0ri15qia4JKPdzSu6xmI4hM1PGjLvk6hGP0klO4BE326aNY82Yli+NMsEw2d
+iNGkWXId2J9IAKMStOXP0tm0ce4md0AR8pwbz/ZETj76lD4tcWL0XYXmx+6G
+syTYQD7gLSIqCKOexKv+eep5zfAzQNzV2PfNOyCsIomnQ3rr4p++EuWya9Ua
+aVEaGtAnxhx3gYB0LWTrxqaZUy4Q3RfX7q4xtax/+YqzMknXQT7vemVtkcw5
+SYbRibxXL/sZ8OTgyrr3YOkB4olXULm6f3ooMhiM25OZNOkyZcvOXfQOhMs6
+F3OYRKlHbrAvu1V6CuoU6zY6EwSEUxxl+WIQZVZoDsd7xVxaQudkL3om13at
+T6eVVw0lsWkqJ9M+r2HKe4Q51yZm2oWagJX53qiKlipnf/ZXAhemc17NJF9K
+wGU2y0e16qd7EK8PdB9xvGiWZqYaZl0g6idSmWb5FKyUeH/eo4O6gniaPcTt
+P74Z6v/8/yVsy0Pm0mPGsm05u5bK1DBZAd3AUsaRkqSfypjO1E620sonkPtm
+9fP6+M9KosV7Uu0tvhWmUgRfs78EzWBjMsqRh5rKanzZX2MMoTTaiBzx7Iov
+U7yTWDHkWufgsjWlxG/Px5EdxVwKAy3bPirR6nEsf9jYUrQSSexqUb/LUhHm
+lPuLw0/TioSd0nKXbkrQIhUhTWyuZvBHY/et2HsuwIE2Isf0+r6Esqm57bf4
+a+JuMjJoO+K3PZkVMOck0st0rGkpixUaUgzfMbrQANeYZLkdocFRJs46q5qm
+uQfUjpxNXTCb9SyLwfkwGGFk9lDPhfl+ncy3/BA+LdnCgOy9hjjlWQweqzQV
++3H2oiyxwz8mOYTgO79ziC/RBIvIy/UshNCfFlKsPYthckUkcmibcoQJHcfJ
+GGRT8AjpD4vHYCTx/YIkX1P8uaSExEAahXJ3c0CXSckfNCJAPYMh1oG8lIIt
+ufPv9UG6tjhIM8JAZsob3mTySPpGqE0mPqf/szUGKRCicpz2uCBxtjWBX96N
+qbcReUbmSixiPmZ+Ax3fEfHdrdUDZILQaWGkEqWQShTbDa+2/LvKlXuGDCv2
+8PCw3yfYxMEx1yd92JUXwAlyCGpW+OWn3N3d7TESGHoDSsl7xFh6dKm//R6+
+jZ1/fU4680h7Ke6f1xncvvlnk05CMGBD7mOlmHq1EcK4Vt40wmvrd0+PcAMG
+ZNuUvIQNASYMWJoriwVXkaqExC2s4Av3LZRRUtRDmc49VGaUozAou+0mQTOj
+EZQhKia0E2Q3VfQ4MTA6o88eRwHcXUyS9ytspfBaosxmAe/aT3rSuXc2ZwCI
+Pm+QLpgB55JIOaeB9tKFa8NCPf6DcITcxbZBRGvIw2uq3rQq4imkYrNwAOpK
+0tJSMqdZFTBDXMQSzAK5uDfQOwSB7XpUICeCJzjiGfKiKHE804RjwROKv4YU
+RcmfpL0Jj9GxBTV/TcPvYwBmtKzS7kxYw9FtM/p2vf5Hf8Vw5H7OWb+F/uRm
+9OsH3/wLzHD13l+oeFg+\
+\>"],ExpressionUUID->"037fbb3c-8ef3-40a2-bf6f-febd812ea256"],
+
+Cell[BoxData[
+ GraphicsBox[{InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwl2HlcjGsbB/BHG6JMReZENSlpc1qElGqoiLbRLi2jQiRGhYRMTjQSRvKW
+QYaOSuEkqUlxUlosaRzJSDItElFRjorq/d3vO3/U59vMc1/LfT/XM590Qnd6
+bpKhKEptEkWR35Qi+WHMpIYn8DJgUtIPPtxyIybVU3dY7Q0czWoz2wVPeT9R
+/gBWjDwdqAtzdu7wvAP/47Zib5Mhk+IerzhXAl/W052UDNPUR+7UwF7q9Vtt
+4WHHW0YdsEDv1eAIfmeanZUq4u8ax8SC+yRuiY6FHbxs27RfqbDkYsX4PviI
+7ojDZpglt6m6HBZdTWa4wOxdr0sp5BEmZpbZwHFz2vucYIuOxBtLYeG1FXE8
+eMDzHd0O9vd7dbgG3pqbeNEN5vU7HByFg4UyseFwD7ds0Xz04YS3KpdL1nNL
+/ugA1/CGIi6R+H8xo3xgtvbdYpKv2D1dfz1sOTTaRfpkYLlI0wPOMa0+M0Ti
+5+8dXgrnNoefUkDelaONP2bCTMfewRlwfYtj1wfEHzk1dQWxwcbqn0Xw7ewj
+kbJwXrrGqzj4bLfPx16Sz5IWl+XwnoddpfUwcynHhdS/SdE8UADTfGUe1OG6
+7mWPWjfCdEP+zrNwnPmHOww4L6v7eSTp7/3F9ZIF6O+4ZMwVnrg/2SEVFh1T
+SrWG8w+MpdjCzLI9RxbDCcfttPr1kf8alh/Zn4qSlL3ZMD/F+Jk3qUMr+msg
+LIxxpMfBY/0yBZowO1yuMQfeaWC088N85KPsOPkdbB/7/lI57FxyaosW8i8v
+Wap/HpYuj3QIhau2CrYchfO81t/NhRvnbl5xkFx/1/Z1L7xSboviIbh+ekaF
+Mfo571mKIAUWKsoWhcOzLd39s2AGl+eXDhfNcncRwezvNqUi2GaX3qJmmM8f
+DxLDkV3Jl7+T66M9trfAxrcT1Gcif6v07cJm+NPuYE1TWFzstr4Gbvdy3uoI
+5z3xTcuF3e+96l8Hm70cfJVA1ot8RvmS/ihcWewGFzgXrPcg/chZojULrpq2
+xtIW5l7Y4/Ea9cxsavHQhuOMnYsuwOLlbYMkn7iqfivSj6t+0s8P4IhL7ypM
+YLkM6z+SYOak3Lfj6Oe+Iovt9jBNxO1ogb3qDUuG9PD5Qx2XquAb+ysLc2CW
+HjO0lJyHT3L/+MEi9ZG2Mrirrf2cIszjaJs8htuU5ux+oIt+9+39+wNMT1hw
+OQFmc+7HqiC+0zxzVUe4ckm3gNxvu2u2BKrBcV3lkw+TuXH55uUv83C/u8ub
+P4Tveu5LegEz1/9cM5XMmSgOowbm5deFucM7Wi2mVsH1806c4sN/D63weAT7
+MzhUAxz9pC3lNcyoVjOZZIJ8rAM+D8B0b7UeI3iJgsY6JcSXUvP+cIZDtEIC
+TWCu4IbEHy4+dCPNheT/FyN4A/xSJnNPBExba2TIgreuvnKVC7OSqvqWwifU
+Pg2ehiPW/hhVg9Uz/Y4I4EI/qU438llYZNaZCYskEfmFsEBmllIqWV/YtWgP
+3Fh3MSmG9GdVdsYy2IOj4eVB+qnWUTeGfvB+6k9lwHzDCzfIPMo6yhB1o57C
+GzUK6WTOHq5+/ydsVrNvVSTsJTkcHwhz2lLj3GDvgvCCGXCma4MhmQcnYzZJ
+K3WYFPVT3tcKLmhIyYyGmbrpgSvh766fXBfAEf+Z+Ws9PPRhyKudgX4/DvBJ
+gPWPe9degeOsTn2/Ab/UyNgcBTvvnejuhhOSH6SuhMWS1jp91NM6X6SuC5sF
+tb/fRubbAvPgGeR9JUEQ6cejvKuWk+G8I702Q/BWBc77qTDruotwEfqpnDBu
+qw4Lj+q2RcJlh+6eN4IHpC/PC2BNGdkJRxL/p0zfPdguKmheGMymNUQ1keu/
+N6YfJvF5c9a8hWNqFzULYakLw1UCHy5eEltO4r0u7KyB+Ssq9MUwX+JHz4U9
+DX0+tZLP+/kfPgjLlQpmS2HRpYVLXWCmccgeCUzRg2+pwolZTS41sOR02W0y
+D/6YrRCWAzN2swwFcI8tc8YBuHBrhiwbDl/nZrAa5q5n0sl80s3+iyL11+v4
+UOPo52eljOtHtXH+6lVGW+C4ovADA1q43rL1WTWs+PIr3RuOKE2+XwYnscOi
+SzQRX+8l5x68Y4KXPBeuH3j15RkcvaPd+PhcnI/0zItf4ED3s40KMHVg2J2O
++L/HDbqcmYNzFZnsRObRSruakkVwYf41txSYtT/R7pMG6h/Xa34KV34co4lg
+6k6vEqm/3vCh20WY2f9Ezg/u4+TJnYN7niY3ZMLTt99iXoPZTY8vkf0J7n6u
+9QQWZkcPT16Ic3o1sn8UzospLjGDh7TUN1oiPj+ywdINFvqKiqJhNld7QyDM
+rSn8VAhbOb+9HgSzRcdpn2Bpyy23dbCyc8Hm31Afw0iXsoKLHjtetoYHkh/M
+VYPjjy6hr4UliSmHu8h8oMd+dYSdaZaJN+HPWZorDeGe6g33Y+CA2gd6/2J9
+7nuxOrn/vw3VVRfAnHtBB3+iHxcWHPNzgVmepyXVcGi2Cf0V6uFfUG9Pg/3z
+e3U9YQOJtkwkLJrWHVD5G/aP721L5ptGpZGFPsz04KnZwZ5W44d4dMwBf+cY
+G7I/NSUOn2djfaVpN1fBJw3KI31h7smE2BBYouV04Yk69oOr05JE9ks5ccQD
+Zmv+CrkDpz498KN7FvpMG5Pvh6Vv1CzOwJxQs1BTsn+78919Yaq/qoLU+yte
+/aMZzJx3wrQM1gs6kzoPFrWU1P2CtWRVywzhyul9uTboJ08nZ8gBdjbLNoyB
+JV+ceqLgiP5HP4VwQMeJo9mw1fYy22rYzrfWWgpz9w6lS+DAtVO1tJEv3eTt
+cim8WZ5htkGdPC8uzmiBs3yOnD4FS22lybVwvtXn8lLYeaVdeQ5MvS8vaST1
+69x0OwDTZXWcmuBMh/jgNbD6tKxp1bCQfWUnDf59zpYCATwsX+1MzmNKuss/
+AbDB9JfNGbCiR6ydHDxFxUYxGHY2enwnk/TnTU6xIez7YstXDVJfVGjEGPpp
+ESuXcHIm6j4WF/AGztKoSfuhhvxnzl5Dvg/ER3lKA+CBR95bKmD+2m0B91Tx
+vqmTxwPyfAjfNK4LC7f9Gn0Bjya5njujAms2PRyE54Zp8WkqZF737dAm+Qoa
+rmfRcL90XzT3IefTe/U3Jjz8jSZOg5tKZQa/zcD7jauKXsKt3muL0uCBbCPZ
+Oahf1N1pvhGeYrnreQjZv55noYFwZeU988uwlL7PlAuzMxLZrfCBGuOCWpgR
+oNSh/DvW+TPCeCbisWawLy2BlcUjNu6wpH3T+DrYX2XS36k08n3vxFAIfKAz
+W/QYjnBvVWXDvy46LZJFPeLN/6Z4whZ7lPeZw+yQNhMreGbdybXrYOdMXpAq
+bJ0iTwuBaWtuKnQiH/EbZVl/2F//Avc6fMX+lbs1bNAxtmcXXPIzaL48nDep
+45ElbBbZWC9CfOn2oO0jZD9np/B8YYPKdSurYJOD0rAHqG84uXP8NGxguq23
+WBnOnS9Pnj/U1TtHTimRebXJ1QMW/jnXImA67puogDVMWPR7V57WNJy7Yru3
+dnBFz/ZP3VNxXYfAhTwvzFbPfVIxBXlzFi/dRPZjkUPitcnk/nHLOQ6zJ0yt
+7yigf5xeJfI8a/3XqbxbHvu9oyHsB1lfZ6uaAzysT1tC5plrmDu7QQ77dpxf
+R847v8I//yjMKrptWkX6M3ZVEiVHvncvOCCP/iXJNN07BEe4qLxwgHtSe5aX
+wvT6+enxcP2NG0lKWD9vmebeXFiSJw6OhyWtpjn1cMQmk1NDcOYfIS9aYfHj
+L3bRyFe6VLC6E67cU7rjI8yfptD7Bh5uOreNhfoM3s9aVQc/PXvJOgseKA/Y
+nwPzY5oVn8DDH/yt98PCVK2jYpg3f7RgNVmvIFs7H+aOJ6wn5y3d4vpqH5g9
+X3XGP6T+jf7HniPegKxX+Vm49faPUwyYI8tyI8+Hp2XFaquQL2fd/jQD+PPA
+7purUW/c0vnqY+gnbVW3wEQW9fG+y7bCko6z7LFJmE9f7yrXwZbfJjjVFPLJ
+Lg78m+z/SGeMyoQ9xfOxiSffF7jG58Nv/rKnCneFe70m50n1/lPOqD1lFvbR
+chT2l6iobhu2pwZ2Ozfpk3mUm6l57V979LMymDyvmPwjN5d9t6e44v0nz8Nx
+Tl+e6w7ZU/5TvzxsI/tZvfFI5CDWW2dlqIf6DZRu82gw3cPmUQScJ9/LVoZZ
+cyvKr8FTOMGpgbA/Zbayi3hezPs+mHcorWeWKc7F+izTEqwv3PHm8nLYucmy
+Xoj4jIlH73xhbuKUmPPIj9E58GcYTNM/uSzthz2V52rBD4V5ShzPXaiHfUW/
+3QuurFWZrD+CeqTWu62It15OvQRPmZJ3TwWmZnXWNsLid6U328l5qO3qLfjf
++79dy4fNtplNWghLTdcE74RZvc9MWFifs8HnlgXMfrmjWR3xB64FnP1Bnv8p
+RhlHka+VnWtvJexskDuch/oYscfZp+E8jX0Kx79ife1mj0gyv0YvRu3rs6dE
+hwavskg/Z8eHCj9ivyyDnqyEOUlzhm91IV7ahzPE3JH/bL7+DtebLFhMPs+U
+mZYY0WxPGcyUdSTrVWbI3Kl6Yk8Ny/HL0sjzhmUzFlRmT9XL/Bp/SExeqbb/
+///IQuZ/Af+ePk8=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.82330080216169, 15.930190164263845}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwl1AtMW1UYB/BDwY1HxjoQChOEMhM6XE2XgDJfPc4h4yFUxmubKYUI81FG
+EwJ0Gy6dDALZBgVxRfagVg0D0UGN2i28JY4hSosZdAisbCyjMKCAIEJh/o/e
+pLn55dzvfI9ze/kZOQmZHEJIJH7sTuxPcLlRYmN3L0oKE5aKKLPAv7YKbnWq
+flvqSgnhJe99kZlfr0tzocQ405A/9zQlgpyxzRhnSlTXp/a1w52ZCd3Pb6VE
+dtkzph4O/eKdoa1b4Oi6rEb4rCIi1uqE+NnjwluwfNq2ZnakROtlEdjh/hMh
+z97jYL/hmyNvIZ/fAdEGB7YZUs1fwj7vH7sU7YA8x0fm3b0pCfd7mH+TUKJY
+GUoqgvuny1KSYG5k1d112PBut8gP7uz5xD+XR8mr3mE8d7Y+1GZ6ACtjf4sW
+wCLpwOxBH0qes+oTs2Dt4ZJHV2CfQOtL3bB6Z8bkOFzTckYfivzql0seOPti
+X27d+R9gVZd83BdumrcuvIJ6tf2L41xYEPmtqR2mYwMuc4gv7Sp6Iwz9ytaf
+uqKHLcWZ4xeZvz96X8by6VeCR+HA7bnedtTX6x42uMnmU3E+ohTuaXFzXYON
+5/ICXGFjzkRDH4tXnekpQb+2PyaP5sCKuhsXHGFy5+q1KZb/Bd1gMebH3bVn
+IZzVp9t+3QN2ungk6T3Ub5s5++t3mL/5859LFGxed5QhUjh1TuN1e1NMiOAb
++y7YmJ46qraLCU3MPM2BRR8Xj0StiUnnEf69NU/kCTbv3rIqJqJYbeg2rPc+
+/rNjeFlMmndvnAhn7ws3oXFgCfERv9SeZOvleUkbC7DwqzIjrPJ3nsy2If6g
+Jp29b5aVWpoyJyaSiXR1Pau/wNPn1GPsVyhxDkB/xq5SQdwM6vPYX6CBZZ08
+88C0mAQaalRumI/sQE3AKixpu/R3Hiyq49//iT2fN8AbZPNTNlT+g/0s0jHD
+M5g/Xb3hq0M+kX74VDw7Dw3fMQr1qFtn5j9k5+9Isg+hXu3gUpMc1r62sF+6
+iOd7b2UksvjkPmUK+pNIvx4NgpUf7O0W/iUmqsvnVu8iH/1oLs4EK/iPqgph
+4s0rCMV8aKX8mDuscOiJj4VVT3KnPkU/XNE6fwesrqxw94BL9R3tpxGvFcqD
+yjEPUW1zUzXyWWKiirbBxuo3hcmopzn8pPwzzNMgT/PtQ/2qH7NbQ2DJYqNw
+eRb5cq91mHBenUG9h6xWMeFOLjmUw1yNNa7ioRj/347gDFjh8bqfywT6Wzts
+ioct/D2hy2bE/76vLIU5P43DNWJ/r53tSlilzDLp2vE8R3C7Bf7v0rX9/33x
+pP8CT+Wxpw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {1.9692031021678298, 4.320378284825192}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{19.99999999999727, 16.999999999996362`}, {7., 
+          11.499999999996362`}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.754949725219685, 15.745496856246135}, \
+{1, -1}], LineBox[CompressedData["
+1:eJwt1gs0lHkfB/DHTLm/uWwiShhF2Iz0jsva3ifeiuhlXWokl2jQIhLOMCXV
+1nHLLVrRa2ULq2RWuWyFWbVWUTuxnR1yGbdcs6jWaNn2+3/PO+c85zmf81z+
+39/3PPOcxzA42pPHoCgqExvZU8sf8TOjKRnZm9KU848lIe7mNMVmxMbqbaWp
+dU+M35TBjcOqTBPYwCxcZRHmt1XlGsIL/Q3GzhY0NfdaeVEZNm7I6siDnbvV
+FEZxv75c0Vw3rHj7+ld3YM4lR3WlT2nKY3pMIQqu3fCXDxtOjd8jMYKDBJcb
+nWGRcdzDbhOaimk6r+gJSy6xHp2HVw2OLrjBXGa1gg089Ya/aA+HP30XP7+F
+ptTt73vqwzkNyrn18EKTfv8S1g+KbP9XGtyWEzskJnkv+5dFwHc+uzVTDgt/
+5rwNgJMH3l09Q/zD6vgQeI1kzj8ALnWfP86H2fpbvffA/ITNNtfgWKpYwx6u
+DDR17YSdS+eTP4PZqblxq5Gv2arwoSus060kc4KlfAfNCFiWMNZB5plTuTtV
+CHON7LpF8LYNSX2kL3pGSXcRNjUKbF6PeRQdTNRY6KfdUffnMNLf48DGXTDj
+gUb9fbh9k9aAByx2nWeobcP8r2rM3eGJf/trHIFT83WcHGB7h05eNezxRqdV
+B+a6nZXMwdxvfOxeY70dvz94ZGqJvqZ4WhWw822+mRfcrsAVBMCHetJfHodl
+IVW66rDInccTwDE3/RZbMH+KfNbBRFjHwsQyFhaGRH08Bpuu39dkBssOj8S6
+w+wtjvSbzTS173xLhAXxsd7HD+H0vFebVsEiv8yrxXCSxECzF/kq03+0yIDt
+P5gMfg+zbUcWiW3PBStmw6bKX/L/C8eVd4nitpG+vGyaYVXRzmYeuT40a2Aa
+nvXO1DhK5q0182Mhj/3Gi4on4MZBd+Uj8MxKm+4lWOfrE7OlMOPA0HADLJmq
+nRyAn/uZGJO+CiWsD+sw/5onoj5r5OXah8XthjPN5UNSSH8VoXZh8E5WfGYX
+XPlebjQRvqPCOP4JG3ldN84I4NxnX/c6wDJX1aZIOFI9oj0EnmNqNrvBdqNR
+hRfJ8bWJbhvhth7x+LewWFRUIUWehltuN+6T808u/XIVniwX6z2FSxs8/Nzg
+JDOhfBfsLK9PL2P+g4fuZxC3V5UVV8NFwdTOTpg6XxN/FE7dG7FWBHMLbl0w
+hu9Jr/nVkPM/3bE8Z0xTnZrTZcVwSv0J70742nDGzf/lq+iwbIQfn6OtYmHb
+HWt21sF94/MqQSTP4QDrR7Dm96KeL+CJg9mdUlj1NHO1C+zBKBpSwXqKgrzv
+9pA8p0wv7IJbn2d95QqnDoRbJsNXZvMmD5J5f7833wQPbJ9qioCFoXpCMt96
+sVYSydOoftafg/lHwtKsKkhff05ywuCMhG2lZF7pbxc/ZMChnpMO7+GgjCDt
+MlikpuGxyQrzDo53VcCrS3JVXWCJgVMw+b8X2jlXxcA5quPvz8Dlhjop+TBt
+/6LeC67m2224CweVZ9ath5c3Bfh2wOqfL3X8iny1LQnRfXChXu7JVFjma/Rx
+DBbWZ+XZkvxqhtoTVuT90uc4iX5OZiVZj8CKWhpXSuBABR5HAstkr30Pw4wF
+b7922ENQIN0MJyW+Na4jXmUvXmFhnl+Ye0thcaL28hhcwBBcyoCptGGXQZiq
+5bTyYTbr+o1JuEWuO+8YXKndv8LE/Ry36/MDYZGvjr8FrFGSU+oH6xhdXw6E
+77UyBwNIX5kGscWwHvNmCble1pYn7YWL437tE5D11J+zdTHfi6suWwtIX0L/
+/T6wkeep2/fgCa3dAaSPiap31j2wwVFaTgi/HXrmJLcdz+P4PsETOPpupIU5
+LNx+RdoFM0PNWT5waVYluwPmn8o7fBo27ZHn1ZLnV6NkSxmconn5RBpMM7Pl
+WmHx50UcT/jQ3r66V/DEe3+eGqw9yQidhRVVb3MfI//Th5bFS7CU99NIHOwZ
+reS2AgephuiSvp1abfrJ8coJVa0e9FecX6o3B6e6mdflw9wzNewh2ECLjvSD
+bSnv3Odk/ZcXlNjwN9E1Ez/A6vUvc9bCBrNVH2/AOdMWG5Xh1pTeslySryVF
+rA572ZinnoUbM5+9MIGn1vb/MwGm9E/77ocPRHJmYuDw/0R3JMMjWZzLsbAs
+0LS/EY7y9KoWkD5e//HTIpwUxPTIhJ05XyTYYB5u8Tkjsn7hRbr7JJz253Aw
+6YsbEbdQCbfYGcyPwZKwbK9ueFdVfuA/rJG/jfcJeT/Y9g8o2MCV++l1K7BP
+jDzrCCycatiyBM+IkkfS4JjdoQqj8IEb6dk1sJQdntAMGxYkF4lhWUGyUTr8
+h0P0g2nYwyoqzwWWIx8tO/7/vcKi/wZ+uCyP
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.306417572928748, 12.091885689614742}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt0QtUzHkUB/B/Yaep6SWO5PQWopgeK4/kl5BnpJFtt9lGr+khpTgbtVt6
+KCLTS8VKtoNaKyOnmmjHtKtkW0mkKU4Ny+koKW1rnWW138v+z5nzO59z7+/e
++7tjHRy7LUyb47gQ/Oj89C1in85pjHv66IJ4HawpS7hkD+cOLqosgJngfPoy
+WBntHNJPDh39RwiX9J05NE3IuA5m2iCA7a56WrjBcRP+Re0mjIvWOIr94fLm
+xtxEWOoh8tkDy7eLa/XhQsduxyxYM7yRlz+VcT13fttTDEs0b1bpwsVJ4o6z
+MOMPy5OMGfd2vq3XeaofsH9gyIhxh3S/5p2DZVq3jkjgX309T5XBqsAOU6Uh
+4441bFYU0P21rFdtwLhpa3Q2ZlK/zt08M/gLj6iIvRR3aj+Rrc+4FZ7pnsHU
+v8Um0R5WN/ZO30p2mxU4IWDcSI6D3Uq6/2VBkS7iabm2Z4V0X+fJ9PXwhGvt
+GTvyjO0ZdXBgXYOBJZwa9Cx2E/qty/apMqf4H00l2pjv7urkEWvYqu+sz11Y
+9FWKlQPNX6UY8cN79DTjbu7w6I3WbBVc9FDvlS/VExl3zsU+8gYV13bBW407
+pRmw4cLWRzmUX1AkuQffupolroa5zh2ZtE+JXaXdfVi4qvagA9xk0z3xlu4X
+v+N/DhdEpV+0cEJ+TsRfNrBblOPgKvLuqI1vUG/4QPmxUFil2eAlh3UN4jPT
+YKN878V+8GVfh6FTsGyBIuMp5vUzKBXIYblib2wwvHy8LkEJSyS72i/jvQe2
+fBhqofrnllXKsB+zYUXGbTg1su1yPPYnTdkmo7iVieGsndi/OLWq/OP9n7fk
+h+sxLqv/SGoN5VeE1x3VZdyy+RXzK2B2q7bmEZ9xFk82KfMoP6q9PwCW8Rrj
+U6jftlcH9GC9kpmHY6i+/Pi+MR3GhZY4eogpXu8aZIB4Subyxi303pBdUYHw
+0oM1+mspf1P30W74kst6Y0/KF9xQJKJ/iql+HFn1otrRDfO1yx8WedN8afse
+62B+ZWviT35wefjM3qdwTt+T0jBYk3XmcQPeW2m7RutbqnfTuDEN+9CaWOFd
+Svn92mPO2FfcG2VJA9myz7gJVvyZPP6Y+gX4npyK/TZJoxdrOyMecLrKAU6z
+bpk9DzYyq2km+3ebfLeZ4pMEcyg/y+kgbw8smREvvYZ6gxajJ/NgTaEP3xK+
+KDNzrSbv5hXswDxXvJ3fN8OqOa/F0Zh3SVWin5riz/2lIXjPhwcS9TPYyrD+
+xXq8vypiMHoITq3vHrDHfgJcJrm8pHz+y2ra74MFmsIBmPOP3D4J+zdRSBb3
+UX3+VvepPMaFCa+MddC8QbKS1Z9hzg+p91Tkwi7+D1MYNy/I/R3Np7KN9BLC
+cfEdF7+neLVR29hkxtWoZbNzqP/S9o5BOOl9/+kksruP9Qzkq++sWBpL8x4u
+c9kLd5kGjofTfLl5vu/hgZG20yEwM9TquYD+peHNbWG0r5W8ghjMV9EX3xVD
+92M2mHth/nNpgrsf6+dXSszxvuffjGYfp3rz/jZ8DYvYL3mVNK96of1V7MNm
+yf7lLZQv80gIwL5uF8+uoH2Uhw6M9cJvIwXX9VxQ//cIXyH2yx5e93eCJa3h
+QhHs4ha9ZAesMd8g9YIzLggtkyl/Z+Dcf3H/pkrUVQararSnpMPRxXM9lHD5
++UvP1eif8GN9cA/ZZvP9ybDIsyd5BGbT19bT//Pxc/3/1GH/AexNIgg=
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.77471462238284, 4.811607900361398}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJwd1gs01GkfB/A/IS1ZSWNclnGJURRFDaZMXoVdMaZYlcvQxoQyyi0p7BES
+XpFWKLQqly5zrFRsmWpdqgndhIg0Gwpp69XkUu/3Wec4zuc8zzy/y3MxhsGR
+vF3yFEWV4Jf8pWTf8LOCQ1kQaHIo2dM45m24TdhpuR3ublaNyIRTTXxp92D6
+52cLAmDlqoAqtyUcijPzpWUdrFBxVKkbthp40rMMdp9RromkcSjh7uoXS+Ex
+9VvnVbSw/lz57RVwJTO86zzsGsjud4YjzrMZbDqHYuzjS0PgZOuhKy2wzPcY
+lQ8zVu5f6aTNoQofxklb4Cxa8nQ1LBKyh0n+XMvPrl9hcWi5scNKzHv52tNe
+B5+fcSiKgd3r030C4Latt7ZehE0Ez26FwQLui4w+2ObdWyoITm053idnhXVE
+4lP/IfN9LEa/h3P9e8eXwOKOiXIt+E8ez7AP8ShDjaN0eNaTNlwED94ziNKA
+ZdI8t59hPeMFSYqwJMs3kkbmZ45wpYinfCE6oB/1cbTP+dXCnPcut0Vw5WuK
+GQdL7+ZdOQFTzpdNbeHJbesPZ8HqhfF671Fvp5xuYRHcZlI3ewGWJgQHieHk
+c4dag+HJVg+zrzD9TnCIERzflK63BfG5tYszRy0x3zMv+CYsYNdmNsBlU48N
+SL8Yqavdf4NtYhjlzXD3Kh1mCvyJtePIDl3kmfPf/njYPWH+hylYLPdbxmE4
+Puloa54e8n11t+w4XDHEHzb/Aft7NvmbiMSLKwm5Bk/mnB7vhUWKtyRr9GHN
+9LULkV908k6XCjg+0tZlI6wa5/Z8Fr7+9nenZFgoPbF/vQHqEQksG2FZeLOh
+AGY5vlL5SM5f3xq5BDjD2ltpKfrlvK3GLQZOjozK9IApu0m2HywsOL57D9xm
+5qK6Cq6U7fsnCWbIJLXTiCfuNFI8AvtdK2xpgGWzbEYiTC9pcIoj4zkDIbvI
++dI66W4LC3QXlm6AE6Wun7+gvsGXuUwNuFNxZP59mJJ2jHWT8z2Pd7MKZpzb
+6FpI7kPP8jMlsEzn6gSP1N/v7XkOFmR7P1CBy4LuRDfDyp1RL5vRL7aS/pk5
+mNmgppMKW4Sv4GxGfMZqO0c3WOK2prEWds05cVML7gvR3Lsc9fHTLpz8YMGh
+NJPZz/6ArXTsN3XDq2rVeo0Z8HCvSAJf1EwzjoL5etu1O+BY6R/rmohp9T8M
+wPoHrxSoGKKuD6cbZ+C0gp8ubYE5Y1v9jBGPehHNKoBFEWHDW2Bf6w2sdthX
+IexFJhy8OEpjDo7n88NJPb2WHhUMI/TfsaeUQr3THgu4LFhQ+uiAHexzbnqe
+M8wKlaftIe+Tf6QDMfXydTvpn8WJGZkd7OrXs6OBvDfP8xtMYWVH2lgH/DV2
+OlQV5mZ+cyD9byjxZI8jPr9EreIxPGIqqXkAV0qOMJpglnffpmr4Oq/E6wzJ
+x3yi+BgZjzeIjoLz6n2098GFzwd49jCnQDQZCNMZJ61nUI9TqcKcD0w9XVtb
+D5e4jl/0hXN7/nc1EqZtq/+wC1Yf8XIwh/OWcWyS4EFmr/0b9JPeas6tgCd3
+LUutgvu4Bwueks8rdpTEwBoJNzvVUA+fyj3rDjOm9Ld5wSPvU1ZZwZVcOZMi
+0k/DeT6G8K0bSv1vYFl3aiyD7KfuETlbY9TXKvK1hP+6pvM1BWbNMzFwgXN3
+zt/8AM51K90aAfsclOarmWC/EmzmiuCJtf5NbjBTfP5SJxm/W6Z7EBZ0jV74
+DvUY2ewVlJuQ9004sxHm5LcPN8KDdQ8vJMEhgx0h92Fh3ffiOtivrtfxISzu
+ts0eIo5N92mGR2bNLyuhv9tzTBbWkfjtzasN4E0mu22K4cl3p66R/y8N4ZpT
+iTD9flgEk8xXi2ncAXf7l5vRYVGAwiJ7uPIQZ+c01lf13JmhQ/zZhdVJzqO9
+TtE31CuIaPUqht/sT8p4B6ur2/X4w/amuhsH4bJUFX8dWH/s9rYBmH8wrfYJ
+6qdR0V2j8GBaxNMsC/LudTlTWJ8/N9TkCjuF9JcbkXxt13l9B3ftG/Xnwm3P
+3IyeLkefTUJ2ZsDKrCvhlfBhKtv4HsxQFL/NgP9pbapUX4r7GTMriYXra89c
+8oNdX1mf3QcrP7p/rRoWuvR5J8KXZXRbGTzYpWWVDz9+1HfKyRT7Fab18ir8
+6503h9NhoeWfKUPwiN6Tm3/BlcUnW2nIL/qjX6YMHgzfLM+FhT9nphua4XxE
+mv14jNz3ruvP18OiGufSZviXvIemXDhj/0fVWbg9dNFlb5hyTJEsR7+yDLOs
+ybjYYXwXD05kf53iwFZ5M5I9cFjj63pzWFl7y4FEcl/KrTJUyXjF0fhD8MTx
+q63vkE939o8HhPD2JR6z92Ard80Ob7J/zQY3qmCKHrR3Bazs65qUDfP7Q1+R
+92lkc2BZHKz+6IutGN7+i6lxGKlvCe/vQzAnvLomBKYbfapfC4e1j4fuhTs7
+3pdOoj+DPZT8r2T9RNWyGtL/j8sLy+H4oJgz4TDtWEajBGb9lO6yGs6q1Y6R
+R/65KbxxBfjtJabXBlh9kXPE0DLc9zuBwnQ4uZq15CEsFvecfgzHl8ycboZ9
+mEa7GUzUe32ELoGlTh+d9sKT3Ys/DcAR5oHFN+B/v6/BGuT7mjnn/wREgU0=
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.069228614102805, 9.329740963760747}, \
+{-1, 0}], LineBox[CompressedData["
+1:eJwt1Qs0VHkcB/Brle0lgyGdmpjN0ANZUx7V6GZqdlWkySZ7sOMxoZLphV7b
+VSqVMiWsZ8Oi51pjaaWsYeymUqP2OLamh9Eg9FAUStnvf886x5nzOd///c/v
+cS7csFix9AuKoqT4JZ8MRX549H8flCVNFd8YjhDATFjp6rWWNOO/KXJRIuzs
+4nPrFPKbnfpDN2HJRd3pKtgnjmfJtoO/yGz+E+f/Du4sCoHbthqpSa73HOgp
+gZmWePI8wx6YV91DcpEqXIy8R7/fYpY9TdHsF1M+WdBMuKJEFAw350VK0i1o
+qvz65DfJsLPRA8YauXtSjc1FmNL6rFewaeabkEZ/FVw2oXYuh01TE8UPk26T
+59NcN+eY01SH+AS3CWZczPbYmNOMly7NRA33dbzdojSjqdhdz/OUxDk6rdiM
+ZnRtW+KzSD2jxgXj4C5RsXwvLL/r+0eLKU2phE5mpD7WyAL+dfiEm/VSAckr
+uN3Ei7stN1jDkq6FF1pNaeZoimPFWFhlrJkxEd9X0d/s/Bb9y7b3dvjjfreM
+9LxOWHUnqxj1MHHlryP0MEuSP5+D+r3HnT/2ArbJt71xGn7eckUxSnJn6Uxj
+9F+eO6rikP5yDbWH4elqlxQR7Df8y+EPmMetqzrHXWQeljKDcMzz2aIsaQWZ
+l9qp4Bp8jJV/5j3p59GTaIrs57dKjWAWTSkyl3s4YT/xV90GjsDyraHdXvDW
+TKb2PkzlGEQJ4DNWDV3TZmM/quR6Dp7fe81pQSgsfx7I68D93ueXZitI3vju
+Ltmn9e7gFf/AfjbrBl3gcKukO0ZzUP9I+mUV6o9PTWDNhfs4m0qEqH9j+3HZ
+MtimOtCsDv2fik2vF8OSBO33nvDv5275r4Ppge5eFeZX4RHWu3oO2f+uQR/M
+O27Evoom943ftriH7CsixGcOXBaZcT8LPtS4L2UyyQN++vQD9jXh3clTr1Gf
+SiocvwSmLhnmamBWkLezO87njJ34voz0M6/h5Erkq3xl2nRYJjPgJiA3rpsS
+ysCS5KK71+DNo7yQbXBfYXGiOeqbUdkUEEPuZ3/97R7U12SULSM5Vdq//xUc
+OmIQdABufjc0Lgr93dReXJcHt3Ff7muHS4T3ZqrJ/CSBsesxnwJDnUk/Oc/3
+O9uA+cnldkNkfrLKDwu/wvtSM7gsYDPsV3XSJAb+uaHru3LS79SoqgJYXzr8
+5CPJW1Y01GAfNpwDV0RzYWZ+cy3sKXI6LYcVyRkZ53CeK0pwaSVuW/N2J7yy
+OGCPlQPqC1jb4oDzgR2bjothqsWNr0E9hbGFzQdhBe9ZmwT1ehnunHoJZh2O
+2diJfmqXGxbegP3YrroIvJ9GdfHTH5Dz2Z5FOsyrMSyo4ilM1/J5YbCvqHrS
+I3Le5MLlXsz/R9VUDw3MDFnZHISXtv+qrHYg7ymvyQHzd9u/SKggzz+WLnjB
+wvs3RvgxES4rvf1GzaKZJKMU0zBy3nZJSiVybpVa4wXLlcrtdcjPCMMT7BzI
+37eg953IR0TPHE1IfzOCvW1x/6RAX+1nMo+WDblx8LIdfOtBmGk86/4Q3u3y
+1GMYpjyiLqzAfiWv8kfHkvt3eL2sh8XKIg2H1Of412UB+lfM7kul4b6rwp2V
+cKs+ujQGbs5MG7DF/Aa+5NkXkfkdTeQfwXxD+AdT20l999Y0tcKRKSqevSO+
+r378NHPsZzBSoI+Fy/jRUlfs53GrMrMabqt9PLQEeaF7wOAYJ8zzvJ1gHnIv
+1881q2BZ9qPqMcj7kz7VpxKnpVvU4/4187tMm2DVqo7haHiU/Dj9//+DTf8L
+sFdb8w==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.776116632202752, 3.615966322027525}, \
+{0, 1}], LineBox[{{3.499999999996362, 5.499999999998181}, {6.999999999996362, 
+         11.500000000001819`}}], 
+        PolygonBox[{{4.947677384685548, 7.98173265946094}, {5.897834175673825,
+          8.816718930329426}, {5.206811054955079, 9.219815750748694}}], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.515942703607427, 8.676200089562332}, \
+{1, -1}], LineBox[{{3.499999999997692, 5.5}, {10.49999999999251, 5.5}}], 
+        PolygonBox[{{7.6, 5.5}, {6.4, 5.1}, {6.4, 5.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7., 4.5548}, {0, 1}], 
+        LineBox[{{6.999999999996362, 11.500000000005457`}, {10.5, 
+         5.500000000003638}}], 
+        PolygonBox[{{8.447677384685548, 9.01826734053906}, {8.706811054955079,
+          7.780184249251306}, {9.397834175673825, 8.183281069670574}}], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {9.484057296392571, 8.676200089562332}, \
+{-1, -1}], 
+        {PointSize[0.04], PointBox[{13.5, 12.5}], PointBox[{3.5, 5.5}], 
+         PointBox[{7., 11.5}], PointBox[{15.5, 5.}], PointBox[{10.5, 5.5}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T10", " ", "P1", " ", "N19"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdfei/fiijghgjhj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdfei/fiijghgjhj.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {0, 44}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwl2HlcjGsbB/BHG6JMReZENSlpc1qElGqoiLbRLi2jQiRGhYRMTjQSRvKW
+QYaOSuEkqUlxUlosaRzJSDItElFRjorq/d3vO3/U59vMc1/LfT/XM590Qnd6
+bpKhKEptEkWR35Qi+WHMpIYn8DJgUtIPPtxyIybVU3dY7Q0czWoz2wVPeT9R
+/gBWjDwdqAtzdu7wvAP/47Zib5Mhk+IerzhXAl/W052UDNPUR+7UwF7q9Vtt
+4WHHW0YdsEDv1eAIfmeanZUq4u8ax8SC+yRuiY6FHbxs27RfqbDkYsX4PviI
+7ojDZpglt6m6HBZdTWa4wOxdr0sp5BEmZpbZwHFz2vucYIuOxBtLYeG1FXE8
+eMDzHd0O9vd7dbgG3pqbeNEN5vU7HByFg4UyseFwD7ds0Xz04YS3KpdL1nNL
+/ugA1/CGIi6R+H8xo3xgtvbdYpKv2D1dfz1sOTTaRfpkYLlI0wPOMa0+M0Ti
+5+8dXgrnNoefUkDelaONP2bCTMfewRlwfYtj1wfEHzk1dQWxwcbqn0Xw7ewj
+kbJwXrrGqzj4bLfPx16Sz5IWl+XwnoddpfUwcynHhdS/SdE8UADTfGUe1OG6
+7mWPWjfCdEP+zrNwnPmHOww4L6v7eSTp7/3F9ZIF6O+4ZMwVnrg/2SEVFh1T
+SrWG8w+MpdjCzLI9RxbDCcfttPr1kf8alh/Zn4qSlL3ZMD/F+Jk3qUMr+msg
+LIxxpMfBY/0yBZowO1yuMQfeaWC088N85KPsOPkdbB/7/lI57FxyaosW8i8v
+Wap/HpYuj3QIhau2CrYchfO81t/NhRvnbl5xkFx/1/Z1L7xSboviIbh+ekaF
+Mfo571mKIAUWKsoWhcOzLd39s2AGl+eXDhfNcncRwezvNqUi2GaX3qJmmM8f
+DxLDkV3Jl7+T66M9trfAxrcT1Gcif6v07cJm+NPuYE1TWFzstr4Gbvdy3uoI
+5z3xTcuF3e+96l8Hm70cfJVA1ot8RvmS/ihcWewGFzgXrPcg/chZojULrpq2
+xtIW5l7Y4/Ea9cxsavHQhuOMnYsuwOLlbYMkn7iqfivSj6t+0s8P4IhL7ypM
+YLkM6z+SYOak3Lfj6Oe+Iovt9jBNxO1ogb3qDUuG9PD5Qx2XquAb+ysLc2CW
+HjO0lJyHT3L/+MEi9ZG2Mrirrf2cIszjaJs8htuU5ux+oIt+9+39+wNMT1hw
+OQFmc+7HqiC+0zxzVUe4ckm3gNxvu2u2BKrBcV3lkw+TuXH55uUv83C/u8ub
+P4Tveu5LegEz1/9cM5XMmSgOowbm5deFucM7Wi2mVsH1806c4sN/D63weAT7
+MzhUAxz9pC3lNcyoVjOZZIJ8rAM+D8B0b7UeI3iJgsY6JcSXUvP+cIZDtEIC
+TWCu4IbEHy4+dCPNheT/FyN4A/xSJnNPBExba2TIgreuvnKVC7OSqvqWwifU
+Pg2ehiPW/hhVg9Uz/Y4I4EI/qU438llYZNaZCYskEfmFsEBmllIqWV/YtWgP
+3Fh3MSmG9GdVdsYy2IOj4eVB+qnWUTeGfvB+6k9lwHzDCzfIPMo6yhB1o57C
+GzUK6WTOHq5+/ydsVrNvVSTsJTkcHwhz2lLj3GDvgvCCGXCma4MhmQcnYzZJ
+K3WYFPVT3tcKLmhIyYyGmbrpgSvh766fXBfAEf+Z+Ws9PPRhyKudgX4/DvBJ
+gPWPe9degeOsTn2/Ab/UyNgcBTvvnejuhhOSH6SuhMWS1jp91NM6X6SuC5sF
+tb/fRubbAvPgGeR9JUEQ6cejvKuWk+G8I702Q/BWBc77qTDruotwEfqpnDBu
+qw4Lj+q2RcJlh+6eN4IHpC/PC2BNGdkJRxL/p0zfPdguKmheGMymNUQ1keu/
+N6YfJvF5c9a8hWNqFzULYakLw1UCHy5eEltO4r0u7KyB+Ssq9MUwX+JHz4U9
+DX0+tZLP+/kfPgjLlQpmS2HRpYVLXWCmccgeCUzRg2+pwolZTS41sOR02W0y
+D/6YrRCWAzN2swwFcI8tc8YBuHBrhiwbDl/nZrAa5q5n0sl80s3+iyL11+v4
+UOPo52eljOtHtXH+6lVGW+C4ovADA1q43rL1WTWs+PIr3RuOKE2+XwYnscOi
+SzQRX+8l5x68Y4KXPBeuH3j15RkcvaPd+PhcnI/0zItf4ED3s40KMHVg2J2O
++L/HDbqcmYNzFZnsRObRSruakkVwYf41txSYtT/R7pMG6h/Xa34KV34co4lg
+6k6vEqm/3vCh20WY2f9Ezg/u4+TJnYN7niY3ZMLTt99iXoPZTY8vkf0J7n6u
+9QQWZkcPT16Ic3o1sn8UzospLjGDh7TUN1oiPj+ywdINFvqKiqJhNld7QyDM
+rSn8VAhbOb+9HgSzRcdpn2Bpyy23dbCyc8Hm31Afw0iXsoKLHjtetoYHkh/M
+VYPjjy6hr4UliSmHu8h8oMd+dYSdaZaJN+HPWZorDeGe6g33Y+CA2gd6/2J9
+7nuxOrn/vw3VVRfAnHtBB3+iHxcWHPNzgVmepyXVcGi2Cf0V6uFfUG9Pg/3z
+e3U9YQOJtkwkLJrWHVD5G/aP721L5ptGpZGFPsz04KnZwZ5W44d4dMwBf+cY
+G7I/NSUOn2djfaVpN1fBJw3KI31h7smE2BBYouV04Yk69oOr05JE9ks5ccQD
+Zmv+CrkDpz498KN7FvpMG5Pvh6Vv1CzOwJxQs1BTsn+78919Yaq/qoLU+yte
+/aMZzJx3wrQM1gs6kzoPFrWU1P2CtWRVywzhyul9uTboJ08nZ8gBdjbLNoyB
+JV+ceqLgiP5HP4VwQMeJo9mw1fYy22rYzrfWWgpz9w6lS+DAtVO1tJEv3eTt
+cim8WZ5htkGdPC8uzmiBs3yOnD4FS22lybVwvtXn8lLYeaVdeQ5MvS8vaST1
+69x0OwDTZXWcmuBMh/jgNbD6tKxp1bCQfWUnDf59zpYCATwsX+1MzmNKuss/
+AbDB9JfNGbCiR6ydHDxFxUYxGHY2enwnk/TnTU6xIez7YstXDVJfVGjEGPpp
+ESuXcHIm6j4WF/AGztKoSfuhhvxnzl5Dvg/ER3lKA+CBR95bKmD+2m0B91Tx
+vqmTxwPyfAjfNK4LC7f9Gn0Bjya5njujAms2PRyE54Zp8WkqZF737dAm+Qoa
+rmfRcL90XzT3IefTe/U3Jjz8jSZOg5tKZQa/zcD7jauKXsKt3muL0uCBbCPZ
+Oahf1N1pvhGeYrnreQjZv55noYFwZeU988uwlL7PlAuzMxLZrfCBGuOCWpgR
+oNSh/DvW+TPCeCbisWawLy2BlcUjNu6wpH3T+DrYX2XS36k08n3vxFAIfKAz
+W/QYjnBvVWXDvy46LZJFPeLN/6Z4whZ7lPeZw+yQNhMreGbdybXrYOdMXpAq
+bJ0iTwuBaWtuKnQiH/EbZVl/2F//Avc6fMX+lbs1bNAxtmcXXPIzaL48nDep
+45ElbBbZWC9CfOn2oO0jZD9np/B8YYPKdSurYJOD0rAHqG84uXP8NGxguq23
+WBnOnS9Pnj/U1TtHTimRebXJ1QMW/jnXImA67puogDVMWPR7V57WNJy7Yru3
+dnBFz/ZP3VNxXYfAhTwvzFbPfVIxBXlzFi/dRPZjkUPitcnk/nHLOQ6zJ0yt
+7yigf5xeJfI8a/3XqbxbHvu9oyHsB1lfZ6uaAzysT1tC5plrmDu7QQ77dpxf
+R847v8I//yjMKrptWkX6M3ZVEiVHvncvOCCP/iXJNN07BEe4qLxwgHtSe5aX
+wvT6+enxcP2NG0lKWD9vmebeXFiSJw6OhyWtpjn1cMQmk1NDcOYfIS9aYfHj
+L3bRyFe6VLC6E67cU7rjI8yfptD7Bh5uOreNhfoM3s9aVQc/PXvJOgseKA/Y
+nwPzY5oVn8DDH/yt98PCVK2jYpg3f7RgNVmvIFs7H+aOJ6wn5y3d4vpqH5g9
+X3XGP6T+jf7HniPegKxX+Vm49faPUwyYI8tyI8+Hp2XFaquQL2fd/jQD+PPA
+7purUW/c0vnqY+gnbVW3wEQW9fG+y7bCko6z7LFJmE9f7yrXwZbfJjjVFPLJ
+Lg78m+z/SGeMyoQ9xfOxiSffF7jG58Nv/rKnCneFe70m50n1/lPOqD1lFvbR
+chT2l6iobhu2pwZ2Ozfpk3mUm6l57V979LMymDyvmPwjN5d9t6e44v0nz8Nx
+Tl+e6w7ZU/5TvzxsI/tZvfFI5CDWW2dlqIf6DZRu82gw3cPmUQScJ9/LVoZZ
+cyvKr8FTOMGpgbA/Zbayi3hezPs+mHcorWeWKc7F+izTEqwv3PHm8nLYucmy
+Xoj4jIlH73xhbuKUmPPIj9E58GcYTNM/uSzthz2V52rBD4V5ShzPXaiHfUW/
+3QuurFWZrD+CeqTWu62It15OvQRPmZJ3TwWmZnXWNsLid6U328l5qO3qLfjf
++79dy4fNtplNWghLTdcE74RZvc9MWFifs8HnlgXMfrmjWR3xB64FnP1Bnv8p
+RhlHka+VnWtvJexskDuch/oYscfZp+E8jX0Kx79ife1mj0gyv0YvRu3rs6dE
+hwavskg/Z8eHCj9ivyyDnqyEOUlzhm91IV7ahzPE3JH/bL7+DtebLFhMPs+U
+mZYY0WxPGcyUdSTrVWbI3Kl6Yk8Ny/HL0sjzhmUzFlRmT9XL/Bp/SExeqbb/
+///IQuZ/Af+ePk8=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.82330080216169, 15.930190164263845}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwl1AtMW1UYB/BDwY1HxjoQChOEMhM6XE2XgDJfPc4h4yFUxmubKYUI81FG
+EwJ0Gy6dDALZBgVxRfagVg0D0UGN2i28JY4hSosZdAisbCyjMKCAIEJh/o/e
+pLn55dzvfI9ze/kZOQmZHEJIJH7sTuxPcLlRYmN3L0oKE5aKKLPAv7YKbnWq
+flvqSgnhJe99kZlfr0tzocQ405A/9zQlgpyxzRhnSlTXp/a1w52ZCd3Pb6VE
+dtkzph4O/eKdoa1b4Oi6rEb4rCIi1uqE+NnjwluwfNq2ZnakROtlEdjh/hMh
+z97jYL/hmyNvIZ/fAdEGB7YZUs1fwj7vH7sU7YA8x0fm3b0pCfd7mH+TUKJY
+GUoqgvuny1KSYG5k1d112PBut8gP7uz5xD+XR8mr3mE8d7Y+1GZ6ACtjf4sW
+wCLpwOxBH0qes+oTs2Dt4ZJHV2CfQOtL3bB6Z8bkOFzTckYfivzql0seOPti
+X27d+R9gVZd83BdumrcuvIJ6tf2L41xYEPmtqR2mYwMuc4gv7Sp6Iwz9ytaf
+uqKHLcWZ4xeZvz96X8by6VeCR+HA7bnedtTX6x42uMnmU3E+ohTuaXFzXYON
+5/ICXGFjzkRDH4tXnekpQb+2PyaP5sCKuhsXHGFy5+q1KZb/Bd1gMebH3bVn
+IZzVp9t+3QN2ungk6T3Ub5s5++t3mL/5859LFGxed5QhUjh1TuN1e1NMiOAb
++y7YmJ46qraLCU3MPM2BRR8Xj0StiUnnEf69NU/kCTbv3rIqJqJYbeg2rPc+
+/rNjeFlMmndvnAhn7ws3oXFgCfERv9SeZOvleUkbC7DwqzIjrPJ3nsy2If6g
+Jp29b5aVWpoyJyaSiXR1Pau/wNPn1GPsVyhxDkB/xq5SQdwM6vPYX6CBZZ08
+88C0mAQaalRumI/sQE3AKixpu/R3Hiyq49//iT2fN8AbZPNTNlT+g/0s0jHD
+M5g/Xb3hq0M+kX74VDw7Dw3fMQr1qFtn5j9k5+9Isg+hXu3gUpMc1r62sF+6
+iOd7b2UksvjkPmUK+pNIvx4NgpUf7O0W/iUmqsvnVu8iH/1oLs4EK/iPqgph
+4s0rCMV8aKX8mDuscOiJj4VVT3KnPkU/XNE6fwesrqxw94BL9R3tpxGvFcqD
+yjEPUW1zUzXyWWKiirbBxuo3hcmopzn8pPwzzNMgT/PtQ/2qH7NbQ2DJYqNw
+eRb5cq91mHBenUG9h6xWMeFOLjmUw1yNNa7ioRj/347gDFjh8bqfywT6Wzts
+ioct/D2hy2bE/76vLIU5P43DNWJ/r53tSlilzDLp2vE8R3C7Bf7v0rX9/33x
+pP8CT+Wxpw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {1.9692031021678298, 4.320378284825192}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{19.99999999999727, 16.999999999996362`}, {7., 
+          11.499999999996362`}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.754949725219685, 15.745496856246135}, \
+{1, -1}], LineBox[CompressedData["
+1:eJwt1gs0lHkfB/DHTLm/uWwiShhF2Iz0jsva3ifeiuhlXWokl2jQIhLOMCXV
+1nHLLVrRa2ULq2RWuWyFWbVWUTuxnR1yGbdcs6jWaNn2+3/PO+c85zmf81z+
+39/3PPOcxzA42pPHoCgqExvZU8sf8TOjKRnZm9KU848lIe7mNMVmxMbqbaWp
+dU+M35TBjcOqTBPYwCxcZRHmt1XlGsIL/Q3GzhY0NfdaeVEZNm7I6siDnbvV
+FEZxv75c0Vw3rHj7+ld3YM4lR3WlT2nKY3pMIQqu3fCXDxtOjd8jMYKDBJcb
+nWGRcdzDbhOaimk6r+gJSy6xHp2HVw2OLrjBXGa1gg089Ya/aA+HP30XP7+F
+ptTt73vqwzkNyrn18EKTfv8S1g+KbP9XGtyWEzskJnkv+5dFwHc+uzVTDgt/
+5rwNgJMH3l09Q/zD6vgQeI1kzj8ALnWfP86H2fpbvffA/ITNNtfgWKpYwx6u
+DDR17YSdS+eTP4PZqblxq5Gv2arwoSus060kc4KlfAfNCFiWMNZB5plTuTtV
+CHON7LpF8LYNSX2kL3pGSXcRNjUKbF6PeRQdTNRY6KfdUffnMNLf48DGXTDj
+gUb9fbh9k9aAByx2nWeobcP8r2rM3eGJf/trHIFT83WcHGB7h05eNezxRqdV
+B+a6nZXMwdxvfOxeY70dvz94ZGqJvqZ4WhWw822+mRfcrsAVBMCHetJfHodl
+IVW66rDInccTwDE3/RZbMH+KfNbBRFjHwsQyFhaGRH08Bpuu39dkBssOj8S6
+w+wtjvSbzTS173xLhAXxsd7HD+H0vFebVsEiv8yrxXCSxECzF/kq03+0yIDt
+P5gMfg+zbUcWiW3PBStmw6bKX/L/C8eVd4nitpG+vGyaYVXRzmYeuT40a2Aa
+nvXO1DhK5q0182Mhj/3Gi4on4MZBd+Uj8MxKm+4lWOfrE7OlMOPA0HADLJmq
+nRyAn/uZGJO+CiWsD+sw/5onoj5r5OXah8XthjPN5UNSSH8VoXZh8E5WfGYX
+XPlebjQRvqPCOP4JG3ldN84I4NxnX/c6wDJX1aZIOFI9oj0EnmNqNrvBdqNR
+hRfJ8bWJbhvhth7x+LewWFRUIUWehltuN+6T808u/XIVniwX6z2FSxs8/Nzg
+JDOhfBfsLK9PL2P+g4fuZxC3V5UVV8NFwdTOTpg6XxN/FE7dG7FWBHMLbl0w
+hu9Jr/nVkPM/3bE8Z0xTnZrTZcVwSv0J70742nDGzf/lq+iwbIQfn6OtYmHb
+HWt21sF94/MqQSTP4QDrR7Dm96KeL+CJg9mdUlj1NHO1C+zBKBpSwXqKgrzv
+9pA8p0wv7IJbn2d95QqnDoRbJsNXZvMmD5J5f7833wQPbJ9qioCFoXpCMt96
+sVYSydOoftafg/lHwtKsKkhff05ywuCMhG2lZF7pbxc/ZMChnpMO7+GgjCDt
+MlikpuGxyQrzDo53VcCrS3JVXWCJgVMw+b8X2jlXxcA5quPvz8Dlhjop+TBt
+/6LeC67m2224CweVZ9ath5c3Bfh2wOqfL3X8iny1LQnRfXChXu7JVFjma/Rx
+DBbWZ+XZkvxqhtoTVuT90uc4iX5OZiVZj8CKWhpXSuBABR5HAstkr30Pw4wF
+b7922ENQIN0MJyW+Na4jXmUvXmFhnl+Ye0thcaL28hhcwBBcyoCptGGXQZiq
+5bTyYTbr+o1JuEWuO+8YXKndv8LE/Ry36/MDYZGvjr8FrFGSU+oH6xhdXw6E
+77UyBwNIX5kGscWwHvNmCble1pYn7YWL437tE5D11J+zdTHfi6suWwtIX0L/
+/T6wkeep2/fgCa3dAaSPiap31j2wwVFaTgi/HXrmJLcdz+P4PsETOPpupIU5
+LNx+RdoFM0PNWT5waVYluwPmn8o7fBo27ZHn1ZLnV6NkSxmconn5RBpMM7Pl
+WmHx50UcT/jQ3r66V/DEe3+eGqw9yQidhRVVb3MfI//Th5bFS7CU99NIHOwZ
+reS2AgephuiSvp1abfrJ8coJVa0e9FecX6o3B6e6mdflw9wzNewh2ECLjvSD
+bSnv3Odk/ZcXlNjwN9E1Ez/A6vUvc9bCBrNVH2/AOdMWG5Xh1pTeslySryVF
+rA572ZinnoUbM5+9MIGn1vb/MwGm9E/77ocPRHJmYuDw/0R3JMMjWZzLsbAs
+0LS/EY7y9KoWkD5e//HTIpwUxPTIhJ05XyTYYB5u8Tkjsn7hRbr7JJz253Aw
+6YsbEbdQCbfYGcyPwZKwbK9ueFdVfuA/rJG/jfcJeT/Y9g8o2MCV++l1K7BP
+jDzrCCycatiyBM+IkkfS4JjdoQqj8IEb6dk1sJQdntAMGxYkF4lhWUGyUTr8
+h0P0g2nYwyoqzwWWIx8tO/7/vcKi/wZ+uCyP
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.306417572928748, 12.091885689614742}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt0QtUzHkUB/B/Yaep6SWO5PQWopgeK4/kl5BnpJFtt9lGr+khpTgbtVt6
+KCLTS8VKtoNaKyOnmmjHtKtkW0mkKU4Ny+koKW1rnWW138v+z5nzO59z7+/e
++7tjHRy7LUyb47gQ/Oj89C1in85pjHv66IJ4HawpS7hkD+cOLqosgJngfPoy
+WBntHNJPDh39RwiX9J05NE3IuA5m2iCA7a56WrjBcRP+Re0mjIvWOIr94fLm
+xtxEWOoh8tkDy7eLa/XhQsduxyxYM7yRlz+VcT13fttTDEs0b1bpwsVJ4o6z
+MOMPy5OMGfd2vq3XeaofsH9gyIhxh3S/5p2DZVq3jkjgX309T5XBqsAOU6Uh
+4441bFYU0P21rFdtwLhpa3Q2ZlK/zt08M/gLj6iIvRR3aj+Rrc+4FZ7pnsHU
+v8Um0R5WN/ZO30p2mxU4IWDcSI6D3Uq6/2VBkS7iabm2Z4V0X+fJ9PXwhGvt
+GTvyjO0ZdXBgXYOBJZwa9Cx2E/qty/apMqf4H00l2pjv7urkEWvYqu+sz11Y
+9FWKlQPNX6UY8cN79DTjbu7w6I3WbBVc9FDvlS/VExl3zsU+8gYV13bBW407
+pRmw4cLWRzmUX1AkuQffupolroa5zh2ZtE+JXaXdfVi4qvagA9xk0z3xlu4X
+v+N/DhdEpV+0cEJ+TsRfNrBblOPgKvLuqI1vUG/4QPmxUFil2eAlh3UN4jPT
+YKN878V+8GVfh6FTsGyBIuMp5vUzKBXIYblib2wwvHy8LkEJSyS72i/jvQe2
+fBhqofrnllXKsB+zYUXGbTg1su1yPPYnTdkmo7iVieGsndi/OLWq/OP9n7fk
+h+sxLqv/SGoN5VeE1x3VZdyy+RXzK2B2q7bmEZ9xFk82KfMoP6q9PwCW8Rrj
+U6jftlcH9GC9kpmHY6i+/Pi+MR3GhZY4eogpXu8aZIB4Subyxi303pBdUYHw
+0oM1+mspf1P30W74kst6Y0/KF9xQJKJ/iql+HFn1otrRDfO1yx8WedN8afse
+62B+ZWviT35wefjM3qdwTt+T0jBYk3XmcQPeW2m7RutbqnfTuDEN+9CaWOFd
+Svn92mPO2FfcG2VJA9myz7gJVvyZPP6Y+gX4npyK/TZJoxdrOyMecLrKAU6z
+bpk9DzYyq2km+3ebfLeZ4pMEcyg/y+kgbw8smREvvYZ6gxajJ/NgTaEP3xK+
+KDNzrSbv5hXswDxXvJ3fN8OqOa/F0Zh3SVWin5riz/2lIXjPhwcS9TPYyrD+
+xXq8vypiMHoITq3vHrDHfgJcJrm8pHz+y2ra74MFmsIBmPOP3D4J+zdRSBb3
+UX3+VvepPMaFCa+MddC8QbKS1Z9hzg+p91Tkwi7+D1MYNy/I/R3Np7KN9BLC
+cfEdF7+neLVR29hkxtWoZbNzqP/S9o5BOOl9/+kksruP9Qzkq++sWBpL8x4u
+c9kLd5kGjofTfLl5vu/hgZG20yEwM9TquYD+peHNbWG0r5W8ghjMV9EX3xVD
+92M2mHth/nNpgrsf6+dXSszxvuffjGYfp3rz/jZ8DYvYL3mVNK96of1V7MNm
+yf7lLZQv80gIwL5uF8+uoH2Uhw6M9cJvIwXX9VxQ//cIXyH2yx5e93eCJa3h
+QhHs4ha9ZAesMd8g9YIzLggtkyl/Z+Dcf3H/pkrUVQararSnpMPRxXM9lHD5
++UvP1eif8GN9cA/ZZvP9ybDIsyd5BGbT19bT//Pxc/3/1GH/AexNIgg=
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.77471462238284, 4.811607900361398}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJwd1gs01GkfB/A/IS1ZSWNclnGJURRFDaZMXoVdMaZYlcvQxoQyyi0p7BES
+XpFWKLQqly5zrFRsmWpdqgndhIg0Gwpp69XkUu/3Wec4zuc8zzy/y3MxhsGR
+vF3yFEWV4Jf8pWTf8LOCQ1kQaHIo2dM45m24TdhpuR3ublaNyIRTTXxp92D6
+52cLAmDlqoAqtyUcijPzpWUdrFBxVKkbthp40rMMdp9RromkcSjh7uoXS+Ex
+9VvnVbSw/lz57RVwJTO86zzsGsjud4YjzrMZbDqHYuzjS0PgZOuhKy2wzPcY
+lQ8zVu5f6aTNoQofxklb4Cxa8nQ1LBKyh0n+XMvPrl9hcWi5scNKzHv52tNe
+B5+fcSiKgd3r030C4Latt7ZehE0Ez26FwQLui4w+2ObdWyoITm053idnhXVE
+4lP/IfN9LEa/h3P9e8eXwOKOiXIt+E8ez7AP8ShDjaN0eNaTNlwED94ziNKA
+ZdI8t59hPeMFSYqwJMs3kkbmZ45wpYinfCE6oB/1cbTP+dXCnPcut0Vw5WuK
+GQdL7+ZdOQFTzpdNbeHJbesPZ8HqhfF671Fvp5xuYRHcZlI3ewGWJgQHieHk
+c4dag+HJVg+zrzD9TnCIERzflK63BfG5tYszRy0x3zMv+CYsYNdmNsBlU48N
+SL8Yqavdf4NtYhjlzXD3Kh1mCvyJtePIDl3kmfPf/njYPWH+hylYLPdbxmE4
+Puloa54e8n11t+w4XDHEHzb/Aft7NvmbiMSLKwm5Bk/mnB7vhUWKtyRr9GHN
+9LULkV908k6XCjg+0tZlI6wa5/Z8Fr7+9nenZFgoPbF/vQHqEQksG2FZeLOh
+AGY5vlL5SM5f3xq5BDjD2ltpKfrlvK3GLQZOjozK9IApu0m2HywsOL57D9xm
+5qK6Cq6U7fsnCWbIJLXTiCfuNFI8AvtdK2xpgGWzbEYiTC9pcIoj4zkDIbvI
++dI66W4LC3QXlm6AE6Wun7+gvsGXuUwNuFNxZP59mJJ2jHWT8z2Pd7MKZpzb
+6FpI7kPP8jMlsEzn6gSP1N/v7XkOFmR7P1CBy4LuRDfDyp1RL5vRL7aS/pk5
+mNmgppMKW4Sv4GxGfMZqO0c3WOK2prEWds05cVML7gvR3Lsc9fHTLpz8YMGh
+NJPZz/6ArXTsN3XDq2rVeo0Z8HCvSAJf1EwzjoL5etu1O+BY6R/rmohp9T8M
+wPoHrxSoGKKuD6cbZ+C0gp8ubYE5Y1v9jBGPehHNKoBFEWHDW2Bf6w2sdthX
+IexFJhy8OEpjDo7n88NJPb2WHhUMI/TfsaeUQr3THgu4LFhQ+uiAHexzbnqe
+M8wKlaftIe+Tf6QDMfXydTvpn8WJGZkd7OrXs6OBvDfP8xtMYWVH2lgH/DV2
+OlQV5mZ+cyD9byjxZI8jPr9EreIxPGIqqXkAV0qOMJpglnffpmr4Oq/E6wzJ
+x3yi+BgZjzeIjoLz6n2098GFzwd49jCnQDQZCNMZJ61nUI9TqcKcD0w9XVtb
+D5e4jl/0hXN7/nc1EqZtq/+wC1Yf8XIwh/OWcWyS4EFmr/0b9JPeas6tgCd3
+LUutgvu4Bwueks8rdpTEwBoJNzvVUA+fyj3rDjOm9Ld5wSPvU1ZZwZVcOZMi
+0k/DeT6G8K0bSv1vYFl3aiyD7KfuETlbY9TXKvK1hP+6pvM1BWbNMzFwgXN3
+zt/8AM51K90aAfsclOarmWC/EmzmiuCJtf5NbjBTfP5SJxm/W6Z7EBZ0jV74
+DvUY2ewVlJuQ9004sxHm5LcPN8KDdQ8vJMEhgx0h92Fh3ffiOtivrtfxISzu
+ts0eIo5N92mGR2bNLyuhv9tzTBbWkfjtzasN4E0mu22K4cl3p66R/y8N4ZpT
+iTD9flgEk8xXi2ncAXf7l5vRYVGAwiJ7uPIQZ+c01lf13JmhQ/zZhdVJzqO9
+TtE31CuIaPUqht/sT8p4B6ur2/X4w/amuhsH4bJUFX8dWH/s9rYBmH8wrfYJ
+6qdR0V2j8GBaxNMsC/LudTlTWJ8/N9TkCjuF9JcbkXxt13l9B3ftG/Xnwm3P
+3IyeLkefTUJ2ZsDKrCvhlfBhKtv4HsxQFL/NgP9pbapUX4r7GTMriYXra89c
+8oNdX1mf3QcrP7p/rRoWuvR5J8KXZXRbGTzYpWWVDz9+1HfKyRT7Fab18ir8
+6503h9NhoeWfKUPwiN6Tm3/BlcUnW2nIL/qjX6YMHgzfLM+FhT9nphua4XxE
+mv14jNz3ruvP18OiGufSZviXvIemXDhj/0fVWbg9dNFlb5hyTJEsR7+yDLOs
+ybjYYXwXD05kf53iwFZ5M5I9cFjj63pzWFl7y4FEcl/KrTJUyXjF0fhD8MTx
+q63vkE939o8HhPD2JR6z92Ard80Ob7J/zQY3qmCKHrR3Bazs65qUDfP7Q1+R
+92lkc2BZHKz+6IutGN7+i6lxGKlvCe/vQzAnvLomBKYbfapfC4e1j4fuhTs7
+3pdOoj+DPZT8r2T9RNWyGtL/j8sLy+H4oJgz4TDtWEajBGb9lO6yGs6q1Y6R
+R/65KbxxBfjtJabXBlh9kXPE0DLc9zuBwnQ4uZq15CEsFvecfgzHl8ycboZ9
+mEa7GUzUe32ELoGlTh+d9sKT3Ys/DcAR5oHFN+B/v6/BGuT7mjnn/wREgU0=
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.069228614102805, 9.329740963760747}, \
+{-1, 0}], LineBox[CompressedData["
+1:eJwt1Qs0VHkcB/Brle0lgyGdmpjN0ANZUx7V6GZqdlWkySZ7sOMxoZLphV7b
+VSqVMiWsZ8Oi51pjaaWsYeymUqP2OLamh9Eg9FAUStnvf886x5nzOd///c/v
+cS7csFix9AuKoqT4JZ8MRX549H8flCVNFd8YjhDATFjp6rWWNOO/KXJRIuzs
+4nPrFPKbnfpDN2HJRd3pKtgnjmfJtoO/yGz+E+f/Du4sCoHbthqpSa73HOgp
+gZmWePI8wx6YV91DcpEqXIy8R7/fYpY9TdHsF1M+WdBMuKJEFAw350VK0i1o
+qvz65DfJsLPRA8YauXtSjc1FmNL6rFewaeabkEZ/FVw2oXYuh01TE8UPk26T
+59NcN+eY01SH+AS3CWZczPbYmNOMly7NRA33dbzdojSjqdhdz/OUxDk6rdiM
+ZnRtW+KzSD2jxgXj4C5RsXwvLL/r+0eLKU2phE5mpD7WyAL+dfiEm/VSAckr
+uN3Ei7stN1jDkq6FF1pNaeZoimPFWFhlrJkxEd9X0d/s/Bb9y7b3dvjjfreM
+9LxOWHUnqxj1MHHlryP0MEuSP5+D+r3HnT/2ArbJt71xGn7eckUxSnJn6Uxj
+9F+eO6rikP5yDbWH4elqlxQR7Df8y+EPmMetqzrHXWQeljKDcMzz2aIsaQWZ
+l9qp4Bp8jJV/5j3p59GTaIrs57dKjWAWTSkyl3s4YT/xV90GjsDyraHdXvDW
+TKb2PkzlGEQJ4DNWDV3TZmM/quR6Dp7fe81pQSgsfx7I68D93ueXZitI3vju
+Ltmn9e7gFf/AfjbrBl3gcKukO0ZzUP9I+mUV6o9PTWDNhfs4m0qEqH9j+3HZ
+MtimOtCsDv2fik2vF8OSBO33nvDv5275r4Ppge5eFeZX4RHWu3oO2f+uQR/M
+O27Evoom943ftriH7CsixGcOXBaZcT8LPtS4L2UyyQN++vQD9jXh3clTr1Gf
+SiocvwSmLhnmamBWkLezO87njJ34voz0M6/h5Erkq3xl2nRYJjPgJiA3rpsS
+ysCS5KK71+DNo7yQbXBfYXGiOeqbUdkUEEPuZ3/97R7U12SULSM5Vdq//xUc
+OmIQdABufjc0Lgr93dReXJcHt3Ff7muHS4T3ZqrJ/CSBsesxnwJDnUk/Oc/3
+O9uA+cnldkNkfrLKDwu/wvtSM7gsYDPsV3XSJAb+uaHru3LS79SoqgJYXzr8
+5CPJW1Y01GAfNpwDV0RzYWZ+cy3sKXI6LYcVyRkZ53CeK0pwaSVuW/N2J7yy
+OGCPlQPqC1jb4oDzgR2bjothqsWNr0E9hbGFzQdhBe9ZmwT1ehnunHoJZh2O
+2diJfmqXGxbegP3YrroIvJ9GdfHTH5Dz2Z5FOsyrMSyo4ilM1/J5YbCvqHrS
+I3Le5MLlXsz/R9VUDw3MDFnZHISXtv+qrHYg7ymvyQHzd9u/SKggzz+WLnjB
+wvs3RvgxES4rvf1GzaKZJKMU0zBy3nZJSiVybpVa4wXLlcrtdcjPCMMT7BzI
+37eg953IR0TPHE1IfzOCvW1x/6RAX+1nMo+WDblx8LIdfOtBmGk86/4Q3u3y
+1GMYpjyiLqzAfiWv8kfHkvt3eL2sh8XKIg2H1Of412UB+lfM7kul4b6rwp2V
+cKs+ujQGbs5MG7DF/Aa+5NkXkfkdTeQfwXxD+AdT20l999Y0tcKRKSqevSO+
+r378NHPsZzBSoI+Fy/jRUlfs53GrMrMabqt9PLQEeaF7wOAYJ8zzvJ1gHnIv
+1881q2BZ9qPqMcj7kz7VpxKnpVvU4/4187tMm2DVqo7haHiU/Dj9//+DTf8L
+sFdb8w==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.776116632202752, 3.615966322027525}, \
+{0, 1}], LineBox[{{3.499999999996362, 5.499999999998181}, {6.999999999996362, 
+         11.500000000001819`}}], 
+        PolygonBox[{{5.552322615314452, 9.01826734053906}, {5.293188945044921,
+          7.780184249251306}, {4.602165824326175, 8.183281069670574}}], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.515942703607427, 8.676200089562332}, \
+{1, -1}], LineBox[{{3.499999999997692, 5.5}, {10.49999999999251, 5.5}}], 
+        PolygonBox[{{6.4, 5.5}, {7.6, 5.1}, {7.6, 5.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7., 4.5548}, {0, 1}], 
+        LineBox[{{6.999999999996362, 11.500000000005457`}, {10.5, 
+         5.500000000003638}}], 
+        PolygonBox[{{9.052322615314452, 7.98173265946094}, {8.102165824326175,
+          8.816718930329426}, {8.793188945044921, 9.219815750748694}}], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {9.484057296392571, 8.676200089562332}, \
+{-1, -1}], 
+        {PointSize[0.04], PointBox[{13.5, 12.5}], PointBox[{3.5, 5.5}], 
+         PointBox[{7., 11.5}], PointBox[{15.5, 5.}], PointBox[{10.5, 5.5}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T10", " ", "P2", " ", "N20"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdfei/fiijghgjhj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdfei/fiijghgjhj.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {22, 44}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwl1gs4lGkbB/DHKYfEVDZp7WdyihxLRKkZLR2wOWxpiiL0RSSKbSqHWacU
+orZCSbPSSZlmk5o+rGlTCWVWLEUMivbLYUixTn3/5/rmulxz/a73eZ77vv/z
+vjMWBx7w3iNPCLmKP/pOxr/iNZ9N1CkWs4lkt/8fB+DoogyHuTC3dij2/Tw2
+EettrbeARU2rHuyB+7u63bbCacvdTo7OZRMT34rWVNi+5njMOVhRds70ERxQ
+0+ngBlsHvM2V12cTqayuQhv2bGHYbYJDkn1GJxlsEvt+6Zsz8MakqfYxWPQv
+97Vv4eyXjUfUsF4rr3S+sQHOuz7QsQyOfqqqGwbbv8x3CYNFXdPsYljcf820
+FA4IWFPcBYv0PSOU0G+Td4dE0xDnp189sROWnIjMsoFzc13u3afXr6lbusMy
+DcG36pifu787dDss+TqttR1OUxs77AsvzPlmcx7Myf0i/yM83q0xWQNX91kZ
+OsH225bNvIOJryJnCWzypVzlI1wR6BKhTL3fovQ1nP/J4HAPnadPLUMIK/of
+Lamk/W46qRsJG/65xT8XvvFksFsHDvn+TnMMnXemcZ0Q/ZJvQhw5sOyFUrgd
+bH4wON2J7pfKOQgxf4VdS5QNnFsYMEsf9stPdraCGYMjydnIN7mwcsgW5noH
+phG4WuH6wAaY2VN9Y0AD67yXO+2BrY/Oax6ag3N8ZmIy4eyIijJNuEaXebUK
+lj42Wb5FHX24FsZPwJELg4R/zEafd322OWJeqZpz+y7YPDJkVRLMLKzhLYXb
+Qz9P18P8FctijOB+5b+2axthfbOg4AeYYXrlqz/smZo56zI8xZq+WwRLAocV
+tFAvbVJrdw9s/Tzi8FV4xbM4u0XG6GO16gI39Gd/LvjuBpiIE8WTcHhfwP19
+MK89qKcE823sdjiTCItlNW3bNOl9ajA7Cw4oaPCTwda9pruyqSMqQlbSvG7f
+WnMcth6NbdsD+/2kXBsNcxf0xPBg6SJxyg445KTqeDKc/SHPZRUsfJqjdhCW
+Kfl8twC2l3S4b4Cnqv/aJEP/aRWNHCV6XXRGpw7m20Yc8UV99bWbm27Awqif
+m1M06POy6Eo6zD7629pszDOlkHckhs5voxefiPlFs8LlQmDmeTffPTT/haK0
+YFjmf5e1Tg3Py8mg0TDqVw9f6avieWu6dT+eelo1j6HCJs59UbX5tP6JI6la
+yrivYw+UPqH1xktu2s1Cbpt+TBqHxWyvxjglNtFdd6rHhubttMN1SBHzCvYZ
+/ETzkfgWnILFia2bKmHmXiPuTlgYaLNUeQnmOMTK9IVHA5cc84J5jZO/psIr
+3B4P5sESown+GzhS8h/XDpgxueSpF+qZc14n6Jrg/NDDbe/g2ARBlTfMs6pP
+Tkd/yUHZWQmwxOFrjiP65zSYtf4KC/22xw3C1o9mZCLYc3Xm2RzMe/uh8/Vq
+mHirXrBEHgFW6uwnMLvtsMotWH2Xf0w5rde476AS8ssIKoi4QfdPJktWwoqL
+fO9l0vP1/iteA3/wtmPuhxn5vmVacPickOcbqX/R1ajAeTyPqkF9mKmbxLSF
+s0dI5zTms/YdNklCP2kfLknbqJufm9xCvzWJYp0qWPZ79W+lmE9Ud/vITZj9
+ooFfhPkdLQKL8mGy2qOO5hc9taWL5sc3My4MUsA7+TKnkO7ncF46y7OJu/L5
+s2Ww+P6OOhs5NlG5pRTSBEf+2ynJgSDPLD3FGXre+vqu8hkWyeWuPLQM/Ur9
+nuV4TLPwfNpy6HxszQdJ9lMsolg0NHWHOqMjIW6SReqtVgSP0fXPOJcWw625
+93c5mcKxLxQMYU7KvMJ0mK/GmUiA28UfpK+ozdbpWOA8aei3PdpL8Tnophbq
+0Xqlppe2wkTp0PRG9MMNK3NJpz7g55n7lUUYLR4hD+BsPsmLQ/9M95rRVphf
+IbC1wnxNF31dh2DGoy8BLXL092rz2oml9PdHpSsceYTvFX5HbS3gs/tgrqt5
+MV3P/kHZhIX8zD0WzGuHeT9ziiPgqfNTPWJaj7QnRcHSTpeZy7Cs9916F1gc
+f/zYMdr/av+Yv3Fe0/Pd+bR/xthMij/cX153xxoWqrxpKkY/XL1nExpw5FxN
+ngT9v+uO5Y/QPC60BgkwX79KZfpbmJjllWUij/YlDTv+hJki7XJP5HebGbK5
+gea7QyFY7R8WiSzhOrbC7Nml8i+/sMi9fv/j/TDP6zFPMMoi6pIOHXWaz8B0
+TuUIi5isGdtrR+edU6E9e5hFomtKovfRfFO7YjcOsUjT/qj2a7A4OszPeIBF
+JPnlPX/T9VlWipUf8flGbT6xzAzXzRhz58HhDZ4Xj8E8nwI3A7i+M/TlEzP6
+fXWwqheuSPnQPMcctpUzdMN5C33Gj3nBvHcXztijXuvq96JTsDRz9qMaGYuY
+f+LWPKbXb/fN6KBf54LTjkMwUTyVEvcJ/cyyVGdYoL6ch7YU8/HCvAqMYH7K
+DZ4l5o+Md5dYwSTTP9BnjEUcC03HLGFmZNvI+nHcT6ct2g1gnkAiGIb9XE7f
+06Re8c+wK/JU0a/XGqX9Jp6NolaXH+1spPXbrv/yEevze7psBHAAN/SyBez8
+6aN3GsysfV09H/XuGetlBMH856smiz4jn5gR/XV0vvwnDz6i/7M7D600hsUC
+fsJn5J8R33tnLp0327a0CHn0v39mOIv6oZKbCfKTPppuUKT1g7XEF3tZRJQ7
+mKBB999sKTPqRr62ClkGdH2C09OWNhYxHB7o/J4600zNoIlF2MUdHRF0/+Na
+YUst+peeP36F+vfis3lVyKP3u0gpNT/sTGMJ5gkoaqH5ECG7g5GNenoTojBq
+tlVV/v4q4v70VWcZNX3xKv///6Ml+3/dxt1U
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {1.87623281688787, 11.409748320682976}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwl13s8VNv7B/AdDhIZUiRlCFFolCOKZgip3NPlUJpCHZdKyLU0SnKUTDoi
+lEEkurhGUUYSR9F0QblOkooIqVTo+1m/n3/W622tvdbzPGvvtfeo7Tno7CVC
+UZTJDIoiLfX2N/70WdQIaRegbazvbYTZZedcE+F+VY/F8TCnt2iuEVzNUtll
+AzO+j70ZVmZR7WxnzrQeixLmp8VWw2cD/K8VwXT12U3XYAuJIws9YX6Xz183
+4fjvZkuUYP91luVP4PeDcymBLtabLnYRxfy6cfHl8cS+55McYP2icpXN8AhP
+f+QGPO3ukq8Gc7QUFJRVWNQim/PBP5exKBYnbH4CXGu5ZEk37LhQsVxiIdY1
+0Rt4AvMkVx6JhDNnGgY9IuOH3aSH4dDn4aKN8Ei2pavTIhblEGX+dytMzV3d
+kw1vWyuQG4D9+54/eQOnxOaqimJ9x7hyI0lVFrX7wNxgVZgRX7FiLpzQt6fF
+FKZ1Ph+SgF+cCB3bDlMNa8qEuL5NXpZ7COZ6y33hwXJdFsnRsH/ji0Wb4NgN
+J/S5pF/TKasX8T2T6G1KJLbSL/WFXfp6HU6T/Gfl6gwi36aYOdOhpP/fCPO9
+sCBNmOIGF67w8ulFva5LO7uuJPMb/S3hBe/vTvhCwQLrUsMvqL/B5Y0n65Cf
+4PqphHMwPcT1/HGY0xAtagmX3VMZN4GFJjkZMrDyZeuqoaUYdyc7aGQ+iwrL
+ldLmEd+0ixyCqzzOHN8M8x+XpYhh/LFvt6Sl4JH996MMlUndXPvqdBDP84H+
+cPjv0pVDsTDbtSfyJaxDf1/pAhdeDtUzQ7xXHBujlxI3fmIUwrQ3V2bPgmkH
+JbZqI9/6Rbr537SxnpiFAQ82003QH4JZCtau8qiXkGHyi5h3dtPVMFLP4bLp
+78QX672ewa3Nfg9mYj4qbyp+LurvHVQUrgYLpkw/W8Bqx8OUzch6a985b4MH
+nHu8XWFGZ9G/5H7pEIQvCiGeNL9lAIsfPjnOhbkum6smMP+M5rL6HNKfdOND
+Htw3WpNfQvJps9hhBb/+FjNZAdOn4hSfI/7frKGwUtIvcqF+M/xkYd0mcv2I
+eXniU+TvYilKOw3z30z2bIQzw753eZHrB3oWPEb9rO7aWxmR9WgVR7bA9/0G
+108hX9rMqP+GsT+zhlvtq+CRDi/NNHh1SZ3yYZizx7l3J3xmxqtCHVgoF7nD
+BHYr87HsXIJ9u8YR6sPPPg8uSoBHLspcWgvf9bgXYwkzpsd4++Ddu4xzp7Uw
+n27Au6uwwKQ/sBrmmnA8J8l6fmPpsTCj/4fJbsRXN782wA2ma7k3P4MPT0Z1
+GhM/MZm5Afld3WpopwbzIpT/qYGTtzffV4BH3LO6/0R9kq6GFMvD1PuVDWT/
+e+9P/akM+4fk+k7BEdLGwzow/9+40+tR76kzg5osmCZeVhYBz9sbJ3Ql86+R
+906GbZtmjISQ+EQWG1yEUxWvSifBjuJfyzjw7Qyz4VtwIfWh2h4O0xL1ekTy
+WzVv+R9w+4zCQ61kvZT7/blYX7nTw62bjDdLvLEKrtp99kEnsay5WBXyyVsr
+ViiA2Y7S48bk/LuUmnEHZu082laCegj3vjyZTOb3y1BdAS9J3CPwIfXxMle6
+g3oGXz602xAW3H16ww6Oj/5+8qsm8n9tuWpcCefDdr/3t2D62yjrQniMHRfm
+BXPMF0RFw5RMt6cSGV+z/kQAvCZC7nOjBuqRZdAcDpsoTew+BgvGfR+kwxVV
+fmOrYNaK/3Jb4Ydn5uV9W4x6fVtfqYn1o94tWn8P9u+02hYD/1rRZBpP+suv
+y43Dd+K6EvbB7JvsUW/kk9Vi1mILC5gd2b3wzc7rOmbk+m1p5dtRjwf9HIYx
+zKv90PYIbhvPUiT93JeuEuT535KSyNtI5q/IaA2Bowxk9XfBjjuXJRXDpbGC
+llCYVVge1gIH2J45nET6O17zu+Gh7t2NxeT6OTv5TfB0fsE/zWR8wdnhLPho
+l2Z4Pxm/f1nXLnhF3dYzEzBfqKktAc9X1RsVQT2oYJG/0hHfZa1OPTHiWlH+
+Yjh1xwLdXySfeoFlFvJjBCtav4c5/HTGQlhx3jm7BuKDquMXyfNV0x5/GS6s
+aR9cCMe2ZzT4kPXOmGneRL0PZCXr6cPUfZ0lDvBv42N2A+owk8kXg+UDP0pm
+woVpMl3PFNG/LTPCBRbe+b6vAn7QHPVOHGYdWWp4B14lXXPurhqepxPx4y/g
+OM/qe4dgQZ4cUwLzzfE7wNEnbjVOd4R76t1LxuiIt0A36zqcyffvroZZy1Yr
+KyLemEviS5KJb89bfhqeVD20LgwWfBrNFCXvl8+qgXthR66MWAR81G0wwp1Y
+uGdsEE7v+fc6G+adeuTohPo1nt3T50vm65xxPBfuLIjKiCTzVYWlvoc9tuVJ
+kPVGjFedlsN+RFczJUtIf3fYOnXYJs/ESwBz93vUKxELL7z4RPotHq7+iusv
+1p6TF0d+DOXEngqY175dTJmYUpbcC2t6bKzTIvn3R0/9Rnxa74r4S0m/16OO
+OPL9oq7xQAOm20d5zoI/3b4rogALRZ81kvs/4PklgwkSf6RhuAg8LRUZ8ozE
+y5HpOIH6SRe0BfFIPQ3NFWnwx7Xya0h96JIxbwqwH4OX6lka5HpOk7kb3P3N
+K7sC3xX+SZS3Gpz3YeQrHS78Mh5PwepH13w8ifdQobpKy495LCrcbpv8J5xL
+9Jbv62TQb8yR/LENZlh08U1gsR6xfnLfs/WkVI/CRic+lDjBjq9jjF7CpdS7
+K/2oAzesWXwN4psU/FqbAPOda3rJ/vdF2jLsSH/FVLYG8qOZ5ZqqwY49vm/T
+YZtYrT9nwf6BCYY01Kdbk/VzJnmPp83ZHQZvDZ0Tu4DU/Ypo1gvyPbmAK03e
++1x705fKaAvD/cR9SavdmrMJrbVHhm8mme/BhbseaI2OlbV0oGUJX9XtRlt6
+RKV4LuKncZ+mWME2fs5BG2Fh6SkNGiyu8KL+MOw/O/FgLdbrrcyoPg9Ti+uP
+7YF30LbPyIR5o0omo4ifozprIJV8V/l1rwgiz6OsbsExmGW1/+QI8k+18nO3
+h/lSyxJ9YR9Xniw5FxwjIhoGSH3DLaryST77FHwCYX7fBZs1MMfJ2kkKjl74
+0aeSPBdJJZUl2K8dB+vi9WHOzuoFgbB72uH8FKzr+KNkbCM83LJj4TTWcfRn
+lZnCD+/IB3vA7IKIShtY/v4mqybM69+vYnYAVugvG2AST8u7FsC2T0c8q9Hy
+jVSWT6FtnSjUdEBLX37k6y6MU/r9eXB0Lup9MVD3KZz+viHnGsxXLG60wjqR
+oxvdQmCafPbh+3Bi69LFbjBXy6hqJeK072lSc4F51y4582BLbkUim1xvHWj7
+G170cKLjKCw89dDZFnmaXi3Lz4M5SrdfnIDzhgoUu4hlS3Sy4dS3fzyfh/go
+dnhFHhwacsfeCabVPp4+Dw/0eP48BftbjKV5wQ+Wn/K9DQuyP9uowikaw4mv
+YG7O+bparN870/rDAHG4/d2tsPB6L/f/nDiT20nu5+OKx1pIPRjVTFc49/Sj
+2Hwy39e3C1pQjyc5ekHeMCfoR5IzrKDo9VMeLpz9WISsc2BBYDXJh7H+3S4f
++OybjSw9YrNGldmwhc6R8mwF5KNpNvAI/w9yqP4hC7MbKs8lw+rL3m4KnoP8
+HN62RsHTyoMrO+TRn0vzjIEr8tnr18H+AXK1V+BQ6tdEsRzi7/tzTwecfrpu
+nz5MqzudswTrxbZ0G9yhwTtPisbA6ml8260w3/vZsjFY2bSuTwJmON4x2od8
+uLxLcZdlsd6KqfYecl6sXpr0F1y4sfvqVtSjiu5byYQFWu2sR/CRo7u+2ZHx
+gzEpOqhn9KT0qWOw/xEp7SNwusmlpc0wvfEx/S6s//HM8vlYT/DL9IIQvu01
+0O4ECye/XCK/H4qv/kw+A/u7FnmSfiORi4KHpP/FgVXke0eJyZT6BrPt5fGL
+D+NG9BRVkC9j38eyxeR6602WK0k9upItKsnzqFQTZQyzajN3WMIvzdOjdch4
+H93XtchP/uOvHjHYMWT021ryfsypVGgk9bHI16hEffTbBi+E0cj561tnBi91
+72hQgDnDx74+Rr1ZEs/a1siS83GTsw9cGhMpy5iNfOUz6lXgFB2dRBkZ7Per
+a5792OcJqZTizlnIP5e9+j9YwShmd64U8ljeZPkI/lR56HHgTMw7ZcbugnWr
+2r/YSZLfy80bZTBf1WcrZzMJxJ9jWLyZPGfPLQ5vEEe7ztzuBvzwR8Ct0D8w
+/8jY77mIVztb7flTMfJ9kyz5Dyyt7zXhBFNhYoYzkG/FaxkvCqazS+aFwS//
+aQ1qF8V6+UybQdglaX9OF8x/Un/ZGfXrlJUo+gPjHUvS9+XDprU292zFyPn2
+MnUYfqV5Jq2ArHfqHwkV7Efoz1JFZcQjnNMbzIBfZa5xTiDx7dz5cCm5X14m
+qIkgflqo+4AUeX98vhrsDXNueIs8J/fXXwf4VcTu8ibHyfdmcuOGcZh7a+Ht
+RXDsybVnZ0qQ+6MnjLwvqyaCo76Lk99DDgZ65P11496ju+R6u1KRa8jfdGig
+xUmc/B5T3qIB5wmZ0vcQz8gNiSTyPPHVD+ZNI36exuCEPsxOmSpSJvUKeLu+
+AfuR1ynZNA/1EAjW5wTBVfO3T/6YgXFtqzxWwZ6eu1yeUKiflEa3PExvFrfS
++82kBIrCPZJk/wNeKz2cZCI/N7oSbBy/eNvBn0yK3nFZ0xy2sUxwZk0wKbY2
+3S8KFghtqq2/MSnaU5HhFtixkyvOHcf1N23qVyM+yi6qROsLk/JffZpdQOJl
+bv0tN8akGGJ7M9XJOTVT//iWUVwv5a2dRs6Dz1dmjY5gPRfdGFny/ZD144oQ
+phZPhoaT95MBr0oF47kJZ7Xa4L8v7QlLhUe0Njipod7GKkcNbDE/ra8pZgus
+PTuVUsf6hbUCq0MwTYsVLIX4GH0X5geS+yHfZMsXWJA8eo2cp/7rH7g1fkX8
+S8SrtWHh1Q+zIpEfvbXCmJw33LizvtMk303zf3JgwdamErPviGdh8X9y8Pad
+qz8wYLqqovYF8h4oincQYDxHKWzRHJi3+WiDIsyy2ClxltTjltZ3cbKefttm
+aXj7PdqGTMTLs2p0OE/q/SP56RDyc6x58H4JOYe9qvqGPiPeu30BzTiHGefo
+P88PYj76uhNxc8hz+FR5qB/xqOffdyf9q7Y+XdALD52usYWF3gZ9se3Yj2UO
+MluIcdMqPmNS/MYakRCYcj2c6sxnUkL5oQ+FxOTvwr3/bxVY/wOFNAsU
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.181526323287266, 4.607704332175082}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.00000000000182, 17.000000000003638`}, {
+          14.000000000003183`, 16.500000000003638`}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.892040876190137, 17.440709485718344}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwV1Qs4lFkYB/BPJmliWS1qd8o1t4hRK7n1RbVSi25yazGW1LhtbJEupEzr
+UYaIooxmSHSZaptUSHTdSkpKmUqiZhImhHLb/5nnmfme35wz5/zf9zvfMwac
+mDVhkyiKisKbXCkG+bCmKU1yZdFUpKrHcl1Y/3mIZSmcIXd1XQwrsjSCFs+i
+qcZiKm8bLC7MOVgPx3Jv912D6c3i0bmzaUp6njrGsMH3k6sr4uAMF9GjeXCj
+fYooD/4hLVPZH1Z4x1kQD55X/LwP5lck3iHzPf2bGRWwDR01jw3PqJ/oeAjX
+hndObcZ+jPEsaxncljWeFw4/XyK5OQJ7v6ly7EFefsr1fhU28gTSg/FwAyNN
+OBXW3GX4QpnUp3zOjgHzXRVc4S80tfSxRc4QyatetzAAZhX2aneSPKdiHNmw
+iVVQXANZ/3JzrjmsVdZdcpnsf8nAdTlclSK6X0jq0XEcToN9zXaP7Cd5S2m2
+HP5+4sLCODhY+NQrAvsP75niEA6LqTL5GFxaweYEk3qFr6xOop4I27fHOXCy
+OCNkFeoXSz75RZE8fsbcftjDmZ+UTLxoa+ghPZpqsdblFMC+h1uzmPo05brk
+uaKK5Dn9IpSGg8O+CN7DVGq9eji8fJ/kqDrqT8iLHkqEB+5Nb7CHZ/zUJEyC
+P1GrZ4XC7q1tlVzYN1Pp73Q4/+ycryvhUvaPfWfYpB9D0/Vgnz+l4/dIv01r
+3J4gD7M4PvI16S+rm+cH13Xv2i+H25qOdL1F/vgtiTO74eCaK6lRsMjr/h4Z
+LNBZ08eE7UQu2VJijRvSG+jHzhJe0X+wzcbav7JhM/0NPv/C+uvlKjyYauCX
+F5D7G723qQim1Uwke2Hx2PxHUngS43Ael8wfKi9zxPqBgVrevnBjjNX4FZjJ
+OSn0IPnXt2SuRF671pejbqS+JNOzPbBooafPMtiM9cBnFemXxYCFF8kzI8BZ
+ANsmxkeHkPqCsvg9pP+3ew8mwbIckfV8A5pKj5mTWAgnX8jM2QLrp3Iv1cGq
+2SvUsmFpZQT3M8nPfPHuFFyYq52va4v+lPISK+Btm36d6QoLVMr9j8N9J+mX
+m+HhuyzTPXCat7AnA5ZVu6ashdvtna+dhvMPfH83Cw5Od1a6AUe8tA9pR76O
+kWrqIawqvxpfQu6ne2diI0zvl5aR+x0+pfEyGZe90fZdBA93KqXcJOPWqWFa
+cJ1e2WwxrOnXMtaP/ghcEhYcgxWHjZ91wPynXHEKTD2T1X6Dt/BGTkfAjXb3
+kmbi9zaP6+nVsJlB8ILfYHFV6Q5nOPafvC+pcLQGz8gaFvMWVzyELzoXiU1J
+/q6ho6Sez6PO5maw99ytcVvh7I4AHTbMf//63B1YcUxzB+mX6jSnR9qGeP5/
+j30cQMZDdYsD4FUfm7R2kn5KzbNyYHHHlKfFJI/13SfVMCMsyO0B2W90e1Yz
+bNvmwBkk+X8Y026FPbocNAzm4/n27LrbALM+smxXwPaDJpYX4dhZc1oj4TLT
+0gc8uNZBiZMOBxuMM9fC6yR2yQK4UnPJgC6sUE4IO0fWe58x+Ar5RxsLb12C
+za57FQngDxPRLWLY+0T56ij4jQOOBpxwKoFaRvpRW5edCyvcfXot4EgLI/Vk
+2H19zm4Dct5sWiSbyLjhuslk3KkkReRJ9t9oVrUUlhTtGLQj638+dDUWDuT3
+SgxhTbWd1Bn41sS6q9PJegwNQT/c9nXZrmlwcsz2djfk/8As0CGu/KZ3IB8+
+omrPIvNbKmKmdcMuk4QnjGDfYrnMyYim1JJHTJxIf7otP6bCloc4NQEk38QG
+/xrYP3fjGMk/PF7whxwe9nQxLIdlXb4qysY4TwPmVs1kvbntCUx4fAIvWJX8
+fxnT/wPf+3c5
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.393275441506763, 7.232686837739852}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJwd2Hk8VPv/B/BRXGsMWcuuLCUmylWUkSxJGpW0iOmGuiWmhTYydbWTpULS
+NAqlyNKmkhC5FE24KGubEL6TRGnxe71//jmPp/M5720+58zB4K/QFYETGAwG
+W4LBoCNjeBw/k9mMb3TUZzOEmwYEp1XZDFZHZrSGAZvhyxjgTFNjM5iM3E4j
+OOfRkZfFcHxwwJ/TYM11D0pWqrMZPS89WJpwo0it6j2s+fSVmOIVdco1b9NA
+vLR2vTaKv7/a6QPcEpLfngvzLlV9XqaJ/JvXFYXDItstYVfg4w8XXLCFK/K2
+mL+HOXNawj7p4fc9ssuVtLBu9ugPLtwWxf42DeZoXqxq0mUzSs8mTTOG2Rk3
+G71gc+6zq6qw2Kn5Y5MO4lkJtL4gHj96t+9W2Nwm7kEFzNRpHFGC7W/c9oqF
+Gf0ZxTXabIZbh7yUF53XmP9fGtxf0T1LFY73Hdh5DI5+4TCzFf3k98Q+PQm/
+92iwvg7HJ/r/yoQ1xzvNjsDCmMdLmuF4ef+doXT+w+SRqcinOsn/Jc2HOdfh
+EA9+P/+bRwTM79v+RAT/DJfTvAxzJB5q2aKf4OiMI+0wb+xNUjr1K06RsqD6
+6n7byGAe9hKBMxJpXj72qpth8TzzImn0z61zTb0PxzycWXwKZuYF3/0B59/J
+uzFlCvLds5RQw7xjzF1O5MPM5LEv+vDiU9cUl0xFPJ5pB3lO8ZVXnfAardtb
+VOGcWuNUHvoqHTKJHEU8bucZh1E4X9yvlgfHl4YbUV+isPD3XrDbcKdlCyw0
+65Z/h/p354jGzXHkVVdvCcKxpfqvb8E4drme2NKFdab7MtYmw9zn7157w7tD
+w11yqO+ggMfPkMc0fMoTcvzRN0xXeHjg0PVUur7IIuE56jw+rzZ1L60fnZ7M
+hVuiq18tgfMN1d78Acf4n7ZSofgSIdvL0bcwN6P2P+Rh/O29/hxsnrRW6jys
+v2d9Ix8uVpKx5cKlN10YR+C0ZttUS5ijvHNiOhxgvF9Onq73fyHdAPdvKOn5
+SvOYaMnRRL4tnZ+GhmBW8ETv7bBtvbKpJNZzR3b01sKL5Xm3ZlD8veab52Jd
+13KLriCYpebaKaD9N3exehHlS5D1lMKRHV/YpY362b8uvNgEtyXX/kykeSwP
+bLgDdzWN7tDA3BkWDI9RWGz4X34WXNpZ+2oa1t2e5eOrS/dh5+ZBO7i8oES4
+FY7feuDjfJhZv2v4DpyfPaxnAItmmrB+w6zBipFBxNM2llnmiPueL/pZkwnv
+jWPuj4TZ8zcNuNIcxqZYFsCcQf3jLah/UOmHfSvMCOFHrodnpA++GoNFTXoO
+/6F/yaz32UqGqDvb8ZI7/JvjVK4Fc/RNBKWY58hdqWwyd/bxufbwwZT5y5kw
+X8NrWjn2dXewrvQ45TOuKV4N13y1Df8I85zm3vuF++LnTmb0M5i5/ZHcA7pP
+1pq65MLipSvq6L7vuK/TdxrWv3TXcD89l1hVgp3UX9VV4yhYMcwtch1cWp76
+9QK8Sk5ulxv12z61oA62mh8xa6EB7deQs/TccUndJ7OA+vNMV94K8/4nwXCh
+/p07R2rgJst3mWth1kF+qhX6UXV4NHUv1VcpoZAGB/lfUk6n/CPdrhMwjxJt
+z+oGuMs2MJj2c3iqki7Ni6WS018AZ13LifeC2XsKS4fg1fWmPudhES8hTg/z
+zoqICX0Pi6fk1dP+Olj/4zbLCJ+vk5vYGm4T248cgIWXHD204KRzpQoVcHxl
+nGc34on07L78MQ31pQ75pcHX/+x6vQjO15zdtAAOqti4MBwuFfE+1KJ+xYC+
+z5fIm3J2c+DnG7ZZPiZnZn+vRv+sR8WCBnKl7hIH2Hjp/LXtcHz30KY7NN8L
+93raKL5f3qLZ8NuQJkdaz8xbkn4Pz8GxuT/ul8HCqK21HnBh1JLv2TAv127f
+ML6H8mvtemPhrvrkswVwSU2sMJTiX7eyOAp39yxd5kX5v/zasAv+o2JQZy4s
+Tsidtw+2its5Q4fyb29oSIIf9Kzzk4c5+9Kca2D7OycCJGBu0b/lTHouHyg+
+x6B4zxXuBcEZXzf3ydL5kmufquDixUfFFI8ZmX3LEv0MvyqvtIf5JyR1zlO/
+IY7qQbC+wclp43Cd5iT983R+XUyfL+3nB/IPG6k+JZXuXNg3zjBQYzrynj+g
+OghnJSms8IeZFzKM6LmuUGR/8DosGq86awn/9pGqGIE5XveazOGc6SZDjsb4
+HJ54rVaGfaVfvz0Bs5tjo9sRr1y8IfE5rD+t6WUibONpPEfGBP0w+wTW9D2y
+pszZDuYnvDF6gnrr99wWBMDCwnWezrDFaFbEP+TIOSkl6D9Va/2pZDh+yokW
+a1hGbNAjhPW9/2Nexzwb6zL1yZySTbbG8HNfzVlJcOljI5lcvHeUX5cIiqZ4
+XGb1Itg8b2p4MJy/z9LkE95b6sV1bhyK91hCPhvmRsmMzIa7Vn/bfxBWYC7I
+mUz1HmAdDYY7dPjnR6l/71XzdsF9/EuNnbCoXE2QAPtdt3atg/MT3Cor4ZsZ
+J89XkFlWrQrIr36QbUBmPJvnvAleeNeuodaY3jfKqirgsSfCeW8pfuf5QnP0
+M+RgHCJB8/vgqEL76XSQlNZMmGff/e4HXLMscbcfzHgs5b4W85mwZrV3Kq1f
+Gfs4G9ZUXWPTTr630rUXntKotGS6KdYPSiTRe0namY3HeTC/Mm+OGbzlS2Nt
+McxK/Dd1OvzUz7xH2gyfW5vJQln4bu/2wuUwO6UipRHxsm5tm5FoRvstz+gE
+vbe97DhSC4tnp7ia0XvMIxtnxgzU+/ugUxHdP/t9nMxgRnCK3Hz4aKOwzBVm
+z6ybcgv9p24oDV0Pcy+fXmZKn9/knyEBcKlEW4aA5unYwNkE638tUJ8K8z0k
+ldfCzAN9ay7jvXRdtI08xWNNrsyzhVOab/dbUP4bGmVvVDC/uBeXVeD4rPHt
+QrhmqcBlmPqRy7wdDqt+GPmjifqdtuxCIGyazFd+QP2xU6Zvh9vkGg9chlkb
+1q+KgRc6pcxKoH53aLDK4LcTDz8/BjPihO0yyC86LH2DXGqoXewPt3VFPqD1
+3Pypp8pgd0OrQ1mwSGFxshn6Gcz9oPqU4vnlfEqERb49WmK6PmLwyDf4csWr
+p0aonyOqPOmN+YjO9fX7U7/fJu/LhA2zXCWv0HxkrNe+h39HmNt/onkzM7oV
+Me/6suFYm5no/+GmQkN4bHVA/WGYpxNhrwsLYl1aamH9mqcTJeD918MPqJnj
++nPzTj1DvIyT/g99YNaCo6uiYJsqKVEizL3kLNKFBdKP7SvhrqFVi3NRr+Dq
+y84BWJS9M9sCVtyy5rf8LPQTFX3oKvoPsRlYqgeLvBdc04Y7ztYMmMCcCFX9
+M5jnjIFF+4xh/sWsdiVYyBIMTIXZE7PPJCuzGSqHBdmycFddwiEL+DlnyobP
+yMdh/XBpYeLo7zTaSO4+9ygZdpf0TrwLMwPnt4bAd6dGbUih+stXXPSDx/75
+eiQCjt8W9jsIdvmoqh8Il5ZdHDkKb70Uo7yK+lvBOFoMl1bs/OUO5+vI1kgi
+/wTuZOuldP3lq1N9YcMplkJvit9yfW4JzK2eV7WV1genbjSm/bZ6/P5JOs+3
+yY6D1X0/at4h6ybJfYX/iuxU76V4UmU5XpjPSPyTQ9PRr3hGmko6PD/vU90W
+mlezsnsnvJfvO7OAXHJETZaeX8P/O/2T5uX+ZpI2zLTJfelmgfNG9Q/VYfWr
+oeVn4Pgjs69+w/WFxYMLWmE+b2h9Oe1XwRxnHUt8/m/+CgiD/3VIVlkDd536
+aasKu6zwMT8Js31CjS+jXqaTwe5COP70yAwj+JtFrZUIFi8PfH4B/c/xfav3
+DuaZX+lhwtq+cQGf6HrPmMPHME/1xtHzvXCpi2esJHx4Yl95B+VvbuRpKeHz
+/3uh43OYyxuPcFPE+1C4V9UtmF9atuPiJDyPNFguyRTvWMIXHdg90urVXorX
+sau9VgHfv4Gteevo/HS+Zh4cMuf9yEJYP+fFsTLYvCaozITylebITsT1Y5dV
+v6hTvtvDsaHwBJG/uSIstCxnSyB/ypvA+2SGtrAqHx77sTxai9arPjkdhno7
+NO7JW8KigDhlI9pf/js2LKf5NNe7x8DxgeNq+8lBoh2f4b2hlwJuUrx3n/KW
+YT5v/dom03zizbRj0mCGu95SDRbyR/dovYatP3icsoMZtemGEzHvjduznDeS
+h6a7qsFxlxsDj8Hi/hpNun8KXnIacmCm3jZTMa4/7tETIYLj3w/L3YdXMb9s
++kwOWbZyG3wguypLcTZsV3VIFh7f+PuEyWx633jdm4R6eZ6GfDuY7zw7TgN+
+vCbK0h1m9Pwc0UP/Q26isJXkeWk6cpiPm0XW3z6w8Gt6yijm/eeh/WtXw129
+W5cOybMZt96F/cshh+w6PRHe/M+kv11hdpllrbUcnmeNeWqUjzsmmHVSls3Q
+vV9bZU7rm22dFeBEZ0GsDq1nuXc8kmEzlhfJRFH9XTwTkRB++920kEHnRU2f
+bsNnWR8tv6JfttGvX6PwoOqU3n5Y3+b7h0DEC56QldPDovvdruwbnBPA0OuF
+uXYqZtmo58ZJ3q1BmK8dyA9Bva35q65+p+tvzfB0QH/uw2njsjSf/o9CZewf
+p6Kk43o0D1eDPa3wcIVcyzya53CY6RnMR1k6xWsNzeeo6jNLzO/TWp1Z+8my
+/gnZcKXB/w4K6Hq8XY/BVxIPO1bApUst/RSZ9H8JM24f9dcWtFIaVnDYVq5k
+hfhRA4ovsL7B75SPNdz1TyzLH+6/cs9gFcx3SVtUjvytzDD2DpgtzfX+hfr2
+uDR9PwELMxfpaMCPpHXKL1I8SW6OBvoLdAx3zIHxhaIjg/7TV5z1uQOXzkmZ
+O4R5lVRL6NynfD87xzox35Knum/vUfxFL5e1SuPv1ycNMwsp/l0n/sAf2D/n
+tG9eo/OxT7/owr4mmYvTKF7QhbJwKeQ7V9kbS/n7zHhjkmzGAN8+5yCt3zZW
+lAsvDpucEUrnI1M2JsLhkoYfN1J9H0ZNr8EFZtciV1O/c/Vq+uEJ0Xt8PCn+
+zJ+TfRH/iLbOIneqt3Ozmhi2+7iz6/89HrM+HfWYhH2+wqF4ngbszai/elT6
+3/V0fsOCxbboz/zQjeXBVvS+prlbDv07zP1T6jDFX3P2RQMc+UoQQf1wG51v
+ncT+0W5o03hI9RTcX2CM+fHnbJ/UTvWXl+QI4OqeBJ6ENXyx9+YAbOQoa2cC
+M1RGMhUxf8Vukc8ya/p+8Wj+jfOOU6Nv7oT5nLzjj+AJze0WSdb093urtAd8
+N/tD6124S/g6LRf5xX1eTQ2w8MzhzR9RX9aXgsB+yjeabsaA6d9847SejtLs
+/wPOwiIH
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.674112975512006, 3.0634133525730736}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwl1Qs0VHkcB/DLlNcqtSFFDCaPpjx6EuWaipIyGyNKIdbamEVovdolW06t
+avSiDU2xslI5JfTS3ZoSWTsSZpVM7WyNHsxSjYpmv//2njPnns/5v76/3733
+jPWWhHVfa1MUJcSP3P+/2DQ1qsHlSFM092maASxRBm6ogqUvQ3RYsLwka3kQ
+zIwtun7fiqYqZ139oAXLNedrs+BYi9tZ9Q5Y/zC0TRc2o9Rr0uBsXkd7uiVN
+xY/zWeILJ67vM+2ZQVOGkxPd7Mj8Ya9JrvA1k4VzTGHV4wFJngX88ucPxBF6
+lvRzc5rK0vy2zR5mm41QIXAru0+4AhbJZiQ/mY79vd6+EsL8q/y0PXCKH2tV
+CcysqDQIgl0iaoR/kvEqhzEe3BDkM50i9RRUPxbArTm7ZnJJPWv/pfbCTCrF
++MMiT0FZD3xX01sTCU/afmKpN86XnXTf8w3Mb5r2+hIs1VW1hBFb71Q6I391
+vJDyJv3jjZpUwKJUbYkx6W+Af6ER6lUs9qv7i+R5tSYkGnZoc48+SPpT0nWg
+BC7qSrXkkf7N+MCtg4OYVMkre5oSjwzanCHrmxt3H4XpzfvLMuGIZqPyZTD/
+cqCNI1zZdnrmiB3qbnLi1ZM8x+Wl9bDcJO0XLty6wPrNT7DqztVN+5B/XHP9
+7C1wRLDimYL0533mOj4s6hqc5wEvz1waGUDGjX4MPjYN6ywn+m6GpV86/60L
+h6WveZsB83lM7H4zPI/SvJxTcLZQpJ4LSyeqA9vJ/A4l834q+vhrdwQLeZlD
+nAcKeP4OVex8WBUiGxuGE734SyLgxM069zhY/+YeSzsXrrnOrdn2eT9x3DFS
+v8Hlr7rh2QUtw2JY2p7c74c85epMrSKy/4WkmxKYMc7U/gFmT357i9QjScpI
+CSTjmbu0T8OGJ316p8HyA+5rP8GKFTkXOpCXPSHo0mL0R9W2dS7pV7a/0XAw
+bMblujiTceNztwLg2qT2LtlMrLc9ZMaB2TrdMbtg1RYrx07sZ9znN+QGSx1X
+hcfAh/f2mas56O8NG+te5OMPKR/dhGmXugwaVgiUglLYxe3o2SLU55lQXL2X
+ONP+7AD6E1J38X0esUB2YDVsJlnuewRmEuZ8qjfF99PAEdfAlLqq0gNW6do5
+d8PisXl/PDLB92TmHz8eeajvdnacgMcVWwsWEQv6dfJgT/pcdSzssolJOgiP
++Bl5HYHFRjce3YCzV+7gXIZFpuuGDLD/yhMHNVKYbqzPFcKyB0Nze8j8jqMv
+++Dohx8NOmC+xeu8UOR9490vu0Lm2zcua4cb7jaMFcCJWwftl5J6o2wUoeT8
+jatfFMKMJeuFMdmv7vck8rzlWqcW30E9bIcKXzWsLLAvToLlTr0Dw3C+nnCe
+OSwdn2feCotbnno32eL9CTzflA2n7Kx+kg6L7OptTeDicCfJQljsvi1qP/KU
+Z7DVFJwYyokbRn5/YefFHhvkr8mP9IeZ6EaP27BLWc+cU+iH//ooCQOLqcr+
+MWPUp5mY0grTZfcDYmHFkqiEZ2S8gnbtn4I7f/TdF9ifMfUY2Q3HslYdcoel
+F615PrAD/+HqOJh9qfOII+y5ofFZMcl7OsHDlditj9tC8k24uWgjXFQqcBgk
+4zxVXBms1AkT6qF+VZZNNwvn5+sb+k6BJ4XR71JgivX98wmkf4+veQzAxbnx
+uWpSf8GnwhjUo/xoGy4l+WL+0e+E6d2a5mMwRQudXFF/fm2VfjCcfSb9TjJ5
+v8KfLNAj+fnJswphC0Mr3VrUy7jllBMb71h5fBPp3/jrZ8j88nCt+fqkf9/W
+jHLhiLjbQ1escX7x4X23cJ70JFW4HZYXGIV7wfn9PJ4XrOqMnF2BvCF6fj5T
+4c8XPEL+v9j0f1GRbYk=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.232686837739852, 11.393275441506766}, \
+{1, -1}], LineBox[CompressedData["
+1:eJwl03dM00EUB/CDggFRmUorUttaIsqwhqkQPRUVUbQoYg2CFSHgQBC0SlCm
+CARHNdoUQ1JkRMCRigsHAsFiURPRpIZ/BDEgDZUhQqg4vxd/yeXyyV3ee/fu
+fsKEtO1JloSQEAw2//+8KbFi8yJKzNm25m3wi5K0qkERJYI6wxM1XJlTQ1pg
+4xWPvR/g1t0nqophblPnTWsfSrzrBT/WwSk8bYQYDtWWBk8JKal7OzAsgZ/d
+UoprYaX9mkQvtn9lkiEK7uIernCB5Ql3FBZw92OBagTx1TTHuklAyadLOWuf
+MWuWOGbBlJexMx82XzcVbITDhfZ2a2HvHe/SPOCSNXn9lvCeDt2UM+zZfFeu
+96JEJn/px9xVJXyggslEvL8ItpGElh2FXSLTHVazdcH+jlg4LDWLkwwb5wXE
+7ILPTe4rV7F81OiaBPcPeQx0snzdFfozMI39+fwXq+9Fru0DOG/EbYYXziPt
+yT7+HRZnCz9L4bFR0ctQ1Bc2PvT3IKzWKWadhwl/fYcC1gbuHeiFj11wyc1g
+/Xszpmf9m2jPzIiDU86ERGbDMkvX8SC46YYk9SkszqXRHFiv3KIfho0xV3ra
+WP2XnLvtfSk5Ve1WpYCly524Argk6G4E61dd0Rd3PvOx+53VCxG3xKCZCZOE
+TSEWsHG08MAg4oVb2Voc4uPeE4tWP2L3df/8EaM7JemWRfdOs3ynxZW5cJfv
+c9Mq5iyn+QFwysP1+/7iPFJPXr4dbE7yL2+Hg2XV6RxY7TD340W4q8H3qBuz
+H2cqGQ7/VmwvhbtVtya3wtyRA84VsHGR6ecGWLuC/97M1vMm+FHsPZZaq+NR
+n8QzcGcqi1dWINLB2j9fFdfYfl6LSIzzSKzSpOz9pvcGtmXCylFrnTvqpXsG
+eLdheb4fSYWbLqfUv4KlYdGNLT7sHmNq9HCrrC/aEf2pM8T71cKCaW5GHGx8
+rVDKYbOvxqSBaftmzm/kH5t+FGKAPfmLm3NgetXx9jQsbzyrMqH+k4kNRXOW
+IW5PYWMEPFa9VOQAV/bpZtcsoP//T9iGzQvoP3WPQ9g=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.47431403485444, 8.442668420912664}, \
+{-1, -1}], 
+        LineBox[{{14.000000000007276`, 16.500000000003638`}, {
+         8.000000000005457, 13.}}], 
+        PolygonBox[{{11.51826734053906, 15.052322615314452`}, {
+         10.280184249251306`, 14.793188945044921`}, {10.683281069670574`, 
+         14.102165824326175`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10.823799910437668, 15.484057296392571}, \
+{1, -1}], LineBox[{{14., 16.50000000000231}, {14., 9.499999999998607}}], 
+        PolygonBox[{{14., 12.4}, {13.6, 13.6}, {14.4, 13.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.9452, 13.}, {-1, 0}], 
+        LineBox[{{8., 13.000000000003638`}, {14.000000000003638`, 
+         9.500000000003638}}], 
+        PolygonBox[{{10.48173265946094, 11.552322615314452`}, {
+         11.316718930329426`, 10.602165824326175`}, {11.719815750748694`, 
+         11.293188945044921`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10.823799910437668, 10.515942703607429}, \
+{1, 1}], 
+        {PointSize[0.04], PointBox[{5., 8.5}], PointBox[{15.5, 7.}], 
+         PointBox[{14., 16.5}], PointBox[{8., 13.}], PointBox[{14., 9.5}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T11", " ", "P1", " ", "N21"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdgef/figjhihjij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdgef/figjhihjij.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {44, 44}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwl1gs4lGkbB/DHKYfEVDZp7WdyihxLRKkZLR2wOWxpiiL0RSSKbSqHWacU
+orZCSbPSSZlmk5o+rGlTCWVWLEUMivbLYUixTn3/5/rmulxz/a73eZ77vv/z
+vjMWBx7w3iNPCLmKP/pOxr/iNZ9N1CkWs4lkt/8fB+DoogyHuTC3dij2/Tw2
+EettrbeARU2rHuyB+7u63bbCacvdTo7OZRMT34rWVNi+5njMOVhRds70ERxQ
+0+ngBlsHvM2V12cTqayuQhv2bGHYbYJDkn1GJxlsEvt+6Zsz8MakqfYxWPQv
+97Vv4eyXjUfUsF4rr3S+sQHOuz7QsQyOfqqqGwbbv8x3CYNFXdPsYljcf820
+FA4IWFPcBYv0PSOU0G+Td4dE0xDnp189sROWnIjMsoFzc13u3afXr6lbusMy
+DcG36pifu787dDss+TqttR1OUxs77AsvzPlmcx7Myf0i/yM83q0xWQNX91kZ
+OsH225bNvIOJryJnCWzypVzlI1wR6BKhTL3fovQ1nP/J4HAPnadPLUMIK/of
+Lamk/W46qRsJG/65xT8XvvFksFsHDvn+TnMMnXemcZ0Q/ZJvQhw5sOyFUrgd
+bH4wON2J7pfKOQgxf4VdS5QNnFsYMEsf9stPdraCGYMjydnIN7mwcsgW5noH
+phG4WuH6wAaY2VN9Y0AD67yXO+2BrY/Oax6ag3N8ZmIy4eyIijJNuEaXebUK
+lj42Wb5FHX24FsZPwJELg4R/zEafd322OWJeqZpz+y7YPDJkVRLMLKzhLYXb
+Qz9P18P8FctijOB+5b+2axthfbOg4AeYYXrlqz/smZo56zI8xZq+WwRLAocV
+tFAvbVJrdw9s/Tzi8FV4xbM4u0XG6GO16gI39Gd/LvjuBpiIE8WTcHhfwP19
+MK89qKcE823sdjiTCItlNW3bNOl9ajA7Cw4oaPCTwda9pruyqSMqQlbSvG7f
+WnMcth6NbdsD+/2kXBsNcxf0xPBg6SJxyg445KTqeDKc/SHPZRUsfJqjdhCW
+Kfl8twC2l3S4b4Cnqv/aJEP/aRWNHCV6XXRGpw7m20Yc8UV99bWbm27Awqif
+m1M06POy6Eo6zD7629pszDOlkHckhs5voxefiPlFs8LlQmDmeTffPTT/haK0
+YFjmf5e1Tg3Py8mg0TDqVw9f6avieWu6dT+eelo1j6HCJs59UbX5tP6JI6la
+yrivYw+UPqH1xktu2s1Cbpt+TBqHxWyvxjglNtFdd6rHhubttMN1SBHzCvYZ
+/ETzkfgWnILFia2bKmHmXiPuTlgYaLNUeQnmOMTK9IVHA5cc84J5jZO/psIr
+3B4P5sESown+GzhS8h/XDpgxueSpF+qZc14n6Jrg/NDDbe/g2ARBlTfMs6pP
+Tkd/yUHZWQmwxOFrjiP65zSYtf4KC/22xw3C1o9mZCLYc3Xm2RzMe/uh8/Vq
+mHirXrBEHgFW6uwnMLvtsMotWH2Xf0w5rde476AS8ssIKoi4QfdPJktWwoqL
+fO9l0vP1/iteA3/wtmPuhxn5vmVacPickOcbqX/R1ajAeTyPqkF9mKmbxLSF
+s0dI5zTms/YdNklCP2kfLknbqJufm9xCvzWJYp0qWPZ79W+lmE9Ud/vITZj9
+ooFfhPkdLQKL8mGy2qOO5hc9taWL5sc3My4MUsA7+TKnkO7ncF46y7OJu/L5
+s2Ww+P6OOhs5NlG5pRTSBEf+2ynJgSDPLD3FGXre+vqu8hkWyeWuPLQM/Ur9
+nuV4TLPwfNpy6HxszQdJ9lMsolg0NHWHOqMjIW6SReqtVgSP0fXPOJcWw625
+93c5mcKxLxQMYU7KvMJ0mK/GmUiA28UfpK+ozdbpWOA8aei3PdpL8Tnophbq
+0Xqlppe2wkTp0PRG9MMNK3NJpz7g55n7lUUYLR4hD+BsPsmLQ/9M95rRVphf
+IbC1wnxNF31dh2DGoy8BLXL092rz2oml9PdHpSsceYTvFX5HbS3gs/tgrqt5
+MV3P/kHZhIX8zD0WzGuHeT9ziiPgqfNTPWJaj7QnRcHSTpeZy7Cs9916F1gc
+f/zYMdr/av+Yv3Fe0/Pd+bR/xthMij/cX153xxoWqrxpKkY/XL1nExpw5FxN
+ngT9v+uO5Y/QPC60BgkwX79KZfpbmJjllWUij/YlDTv+hJki7XJP5HebGbK5
+gea7QyFY7R8WiSzhOrbC7Nml8i+/sMi9fv/j/TDP6zFPMMoi6pIOHXWaz8B0
+TuUIi5isGdtrR+edU6E9e5hFomtKovfRfFO7YjcOsUjT/qj2a7A4OszPeIBF
+JPnlPX/T9VlWipUf8flGbT6xzAzXzRhz58HhDZ4Xj8E8nwI3A7i+M/TlEzP6
+fXWwqheuSPnQPMcctpUzdMN5C33Gj3nBvHcXztijXuvq96JTsDRz9qMaGYuY
+f+LWPKbXb/fN6KBf54LTjkMwUTyVEvcJ/cyyVGdYoL6ch7YU8/HCvAqMYH7K
+DZ4l5o+Md5dYwSTTP9BnjEUcC03HLGFmZNvI+nHcT6ct2g1gnkAiGIb9XE7f
+06Re8c+wK/JU0a/XGqX9Jp6NolaXH+1spPXbrv/yEevze7psBHAAN/SyBez8
+6aN3GsysfV09H/XuGetlBMH856smiz4jn5gR/XV0vvwnDz6i/7M7D600hsUC
+fsJn5J8R33tnLp0327a0CHn0v39mOIv6oZKbCfKTPppuUKT1g7XEF3tZRJQ7
+mKBB999sKTPqRr62ClkGdH2C09OWNhYxHB7o/J4600zNoIlF2MUdHRF0/+Na
+YUst+peeP36F+vfis3lVyKP3u0gpNT/sTGMJ5gkoaqH5ECG7g5GNenoTojBq
+tlVV/v4q4v70VWcZNX3xKv///6Ml+3/dxt1U
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {1.87623281688787, 11.409748320682976}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwl13s8VNv7B/AdDhIZUiRlCFFolCOKZgip3NPlUJpCHZdKyLU0SnKUTDoi
+lEEkurhGUUYSR9F0QblOkooIqVTo+1m/n3/W622tvdbzPGvvtfeo7Tno7CVC
+UZTJDIoiLfX2N/70WdQIaRegbazvbYTZZedcE+F+VY/F8TCnt2iuEVzNUtll
+AzO+j70ZVmZR7WxnzrQeixLmp8VWw2cD/K8VwXT12U3XYAuJIws9YX6Xz183
+4fjvZkuUYP91luVP4PeDcymBLtabLnYRxfy6cfHl8cS+55McYP2icpXN8AhP
+f+QGPO3ukq8Gc7QUFJRVWNQim/PBP5exKBYnbH4CXGu5ZEk37LhQsVxiIdY1
+0Rt4AvMkVx6JhDNnGgY9IuOH3aSH4dDn4aKN8Ei2pavTIhblEGX+dytMzV3d
+kw1vWyuQG4D9+54/eQOnxOaqimJ9x7hyI0lVFrX7wNxgVZgRX7FiLpzQt6fF
+FKZ1Ph+SgF+cCB3bDlMNa8qEuL5NXpZ7COZ6y33hwXJdFsnRsH/ji0Wb4NgN
+J/S5pF/TKasX8T2T6G1KJLbSL/WFXfp6HU6T/Gfl6gwi36aYOdOhpP/fCPO9
+sCBNmOIGF67w8ulFva5LO7uuJPMb/S3hBe/vTvhCwQLrUsMvqL/B5Y0n65Cf
+4PqphHMwPcT1/HGY0xAtagmX3VMZN4GFJjkZMrDyZeuqoaUYdyc7aGQ+iwrL
+ldLmEd+0ixyCqzzOHN8M8x+XpYhh/LFvt6Sl4JH996MMlUndXPvqdBDP84H+
+cPjv0pVDsTDbtSfyJaxDf1/pAhdeDtUzQ7xXHBujlxI3fmIUwrQ3V2bPgmkH
+JbZqI9/6Rbr537SxnpiFAQ82003QH4JZCtau8qiXkGHyi5h3dtPVMFLP4bLp
+78QX672ewa3Nfg9mYj4qbyp+LurvHVQUrgYLpkw/W8Bqx8OUzch6a985b4MH
+nHu8XWFGZ9G/5H7pEIQvCiGeNL9lAIsfPjnOhbkum6smMP+M5rL6HNKfdOND
+Htw3WpNfQvJps9hhBb/+FjNZAdOn4hSfI/7frKGwUtIvcqF+M/xkYd0mcv2I
+eXniU+TvYilKOw3z30z2bIQzw753eZHrB3oWPEb9rO7aWxmR9WgVR7bA9/0G
+108hX9rMqP+GsT+zhlvtq+CRDi/NNHh1SZ3yYZizx7l3J3xmxqtCHVgoF7nD
+BHYr87HsXIJ9u8YR6sPPPg8uSoBHLspcWgvf9bgXYwkzpsd4++Ddu4xzp7Uw
+n27Au6uwwKQ/sBrmmnA8J8l6fmPpsTCj/4fJbsRXN782wA2ma7k3P4MPT0Z1
+GhM/MZm5Afld3WpopwbzIpT/qYGTtzffV4BH3LO6/0R9kq6GFMvD1PuVDWT/
+e+9P/akM+4fk+k7BEdLGwzow/9+40+tR76kzg5osmCZeVhYBz9sbJ3Ql86+R
+906GbZtmjISQ+EQWG1yEUxWvSifBjuJfyzjw7Qyz4VtwIfWh2h4O0xL1ekTy
+WzVv+R9w+4zCQ61kvZT7/blYX7nTw62bjDdLvLEKrtp99kEnsay5WBXyyVsr
+ViiA2Y7S48bk/LuUmnEHZu082laCegj3vjyZTOb3y1BdAS9J3CPwIfXxMle6
+g3oGXz602xAW3H16ww6Oj/5+8qsm8n9tuWpcCefDdr/3t2D62yjrQniMHRfm
+BXPMF0RFw5RMt6cSGV+z/kQAvCZC7nOjBuqRZdAcDpsoTew+BgvGfR+kwxVV
+fmOrYNaK/3Jb4Ydn5uV9W4x6fVtfqYn1o94tWn8P9u+02hYD/1rRZBpP+suv
+y43Dd+K6EvbB7JvsUW/kk9Vi1mILC5gd2b3wzc7rOmbk+m1p5dtRjwf9HIYx
+zKv90PYIbhvPUiT93JeuEuT535KSyNtI5q/IaA2Bowxk9XfBjjuXJRXDpbGC
+llCYVVge1gIH2J45nET6O17zu+Gh7t2NxeT6OTv5TfB0fsE/zWR8wdnhLPho
+l2Z4Pxm/f1nXLnhF3dYzEzBfqKktAc9X1RsVQT2oYJG/0hHfZa1OPTHiWlH+
+Yjh1xwLdXySfeoFlFvJjBCtav4c5/HTGQlhx3jm7BuKDquMXyfNV0x5/GS6s
+aR9cCMe2ZzT4kPXOmGneRL0PZCXr6cPUfZ0lDvBv42N2A+owk8kXg+UDP0pm
+woVpMl3PFNG/LTPCBRbe+b6vAn7QHPVOHGYdWWp4B14lXXPurhqepxPx4y/g
+OM/qe4dgQZ4cUwLzzfE7wNEnbjVOd4R76t1LxuiIt0A36zqcyffvroZZy1Yr
+KyLemEviS5KJb89bfhqeVD20LgwWfBrNFCXvl8+qgXthR66MWAR81G0wwp1Y
+uGdsEE7v+fc6G+adeuTohPo1nt3T50vm65xxPBfuLIjKiCTzVYWlvoc9tuVJ
+kPVGjFedlsN+RFczJUtIf3fYOnXYJs/ESwBz93vUKxELL7z4RPotHq7+iusv
+1p6TF0d+DOXEngqY175dTJmYUpbcC2t6bKzTIvn3R0/9Rnxa74r4S0m/16OO
+OPL9oq7xQAOm20d5zoI/3b4rogALRZ81kvs/4PklgwkSf6RhuAg8LRUZ8ozE
+y5HpOIH6SRe0BfFIPQ3NFWnwx7Xya0h96JIxbwqwH4OX6lka5HpOk7kb3P3N
+K7sC3xX+SZS3Gpz3YeQrHS78Mh5PwepH13w8ifdQobpKy495LCrcbpv8J5xL
+9Jbv62TQb8yR/LENZlh08U1gsR6xfnLfs/WkVI/CRic+lDjBjq9jjF7CpdS7
+K/2oAzesWXwN4psU/FqbAPOda3rJ/vdF2jLsSH/FVLYG8qOZ5ZqqwY49vm/T
+YZtYrT9nwf6BCYY01Kdbk/VzJnmPp83ZHQZvDZ0Tu4DU/Ypo1gvyPbmAK03e
++1x705fKaAvD/cR9SavdmrMJrbVHhm8mme/BhbseaI2OlbV0oGUJX9XtRlt6
+RKV4LuKncZ+mWME2fs5BG2Fh6SkNGiyu8KL+MOw/O/FgLdbrrcyoPg9Ti+uP
+7YF30LbPyIR5o0omo4ifozprIJV8V/l1rwgiz6OsbsExmGW1/+QI8k+18nO3
+h/lSyxJ9YR9Xniw5FxwjIhoGSH3DLaryST77FHwCYX7fBZs1MMfJ2kkKjl74
+0aeSPBdJJZUl2K8dB+vi9WHOzuoFgbB72uH8FKzr+KNkbCM83LJj4TTWcfRn
+lZnCD+/IB3vA7IKIShtY/v4mqybM69+vYnYAVugvG2AST8u7FsC2T0c8q9Hy
+jVSWT6FtnSjUdEBLX37k6y6MU/r9eXB0Lup9MVD3KZz+viHnGsxXLG60wjqR
+oxvdQmCafPbh+3Bi69LFbjBXy6hqJeK072lSc4F51y4582BLbkUim1xvHWj7
+G170cKLjKCw89dDZFnmaXi3Lz4M5SrdfnIDzhgoUu4hlS3Sy4dS3fzyfh/go
+dnhFHhwacsfeCabVPp4+Dw/0eP48BftbjKV5wQ+Wn/K9DQuyP9uowikaw4mv
+YG7O+bparN870/rDAHG4/d2tsPB6L/f/nDiT20nu5+OKx1pIPRjVTFc49/Sj
+2Hwy39e3C1pQjyc5ekHeMCfoR5IzrKDo9VMeLpz9WISsc2BBYDXJh7H+3S4f
++OybjSw9YrNGldmwhc6R8mwF5KNpNvAI/w9yqP4hC7MbKs8lw+rL3m4KnoP8
+HN62RsHTyoMrO+TRn0vzjIEr8tnr18H+AXK1V+BQ6tdEsRzi7/tzTwecfrpu
+nz5MqzudswTrxbZ0G9yhwTtPisbA6ml8260w3/vZsjFY2bSuTwJmON4x2od8
+uLxLcZdlsd6KqfYecl6sXpr0F1y4sfvqVtSjiu5byYQFWu2sR/CRo7u+2ZHx
+gzEpOqhn9KT0qWOw/xEp7SNwusmlpc0wvfEx/S6s//HM8vlYT/DL9IIQvu01
+0O4ECye/XCK/H4qv/kw+A/u7FnmSfiORi4KHpP/FgVXke0eJyZT6BrPt5fGL
+D+NG9BRVkC9j38eyxeR6602WK0k9upItKsnzqFQTZQyzajN3WMIvzdOjdch4
+H93XtchP/uOvHjHYMWT021ryfsypVGgk9bHI16hEffTbBi+E0cj561tnBi91
+72hQgDnDx74+Rr1ZEs/a1siS83GTsw9cGhMpy5iNfOUz6lXgFB2dRBkZ7Per
+a5792OcJqZTizlnIP5e9+j9YwShmd64U8ljeZPkI/lR56HHgTMw7ZcbugnWr
+2r/YSZLfy80bZTBf1WcrZzMJxJ9jWLyZPGfPLQ5vEEe7ztzuBvzwR8Ct0D8w
+/8jY77mIVztb7flTMfJ9kyz5Dyyt7zXhBFNhYoYzkG/FaxkvCqazS+aFwS//
+aQ1qF8V6+UybQdglaX9OF8x/Un/ZGfXrlJUo+gPjHUvS9+XDprU292zFyPn2
+MnUYfqV5Jq2ArHfqHwkV7Efoz1JFZcQjnNMbzIBfZa5xTiDx7dz5cCm5X14m
+qIkgflqo+4AUeX98vhrsDXNueIs8J/fXXwf4VcTu8ibHyfdmcuOGcZh7a+Ht
+RXDsybVnZ0qQ+6MnjLwvqyaCo76Lk99DDgZ65P11496ju+R6u1KRa8jfdGig
+xUmc/B5T3qIB5wmZ0vcQz8gNiSTyPPHVD+ZNI36exuCEPsxOmSpSJvUKeLu+
+AfuR1ynZNA/1EAjW5wTBVfO3T/6YgXFtqzxWwZ6eu1yeUKiflEa3PExvFrfS
++82kBIrCPZJk/wNeKz2cZCI/N7oSbBy/eNvBn0yK3nFZ0xy2sUxwZk0wKbY2
+3S8KFghtqq2/MSnaU5HhFtixkyvOHcf1N23qVyM+yi6qROsLk/JffZpdQOJl
+bv0tN8akGGJ7M9XJOTVT//iWUVwv5a2dRs6Dz1dmjY5gPRfdGFny/ZD144oQ
+phZPhoaT95MBr0oF47kJZ7Xa4L8v7QlLhUe0Njipod7GKkcNbDE/ra8pZgus
+PTuVUsf6hbUCq0MwTYsVLIX4GH0X5geS+yHfZMsXWJA8eo2cp/7rH7g1fkX8
+S8SrtWHh1Q+zIpEfvbXCmJw33LizvtMk303zf3JgwdamErPviGdh8X9y8Pad
+qz8wYLqqovYF8h4oincQYDxHKWzRHJi3+WiDIsyy2ClxltTjltZ3cbKefttm
+aXj7PdqGTMTLs2p0OE/q/SP56RDyc6x58H4JOYe9qvqGPiPeu30BzTiHGefo
+P88PYj76uhNxc8hz+FR5qB/xqOffdyf9q7Y+XdALD52usYWF3gZ9se3Yj2UO
+MluIcdMqPmNS/MYakRCYcj2c6sxnUkL5oQ+FxOTvwr3/bxVY/wOFNAsU
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.181526323287266, 4.607704332175082}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.00000000000182, 17.000000000003638`}, {
+          14.000000000003183`, 16.500000000003638`}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.892040876190137, 17.440709485718344}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwV1Qs4lFkYB/BPJmliWS1qd8o1t4hRK7n1RbVSi25yazGW1LhtbJEupEzr
+UYaIooxmSHSZaptUSHTdSkpKmUqiZhImhHLb/5nnmfme35wz5/zf9zvfMwac
+mDVhkyiKisKbXCkG+bCmKU1yZdFUpKrHcl1Y/3mIZSmcIXd1XQwrsjSCFs+i
+qcZiKm8bLC7MOVgPx3Jv912D6c3i0bmzaUp6njrGsMH3k6sr4uAMF9GjeXCj
+fYooD/4hLVPZH1Z4x1kQD55X/LwP5lck3iHzPf2bGRWwDR01jw3PqJ/oeAjX
+hndObcZ+jPEsaxncljWeFw4/XyK5OQJ7v6ly7EFefsr1fhU28gTSg/FwAyNN
+OBXW3GX4QpnUp3zOjgHzXRVc4S80tfSxRc4QyatetzAAZhX2aneSPKdiHNmw
+iVVQXANZ/3JzrjmsVdZdcpnsf8nAdTlclSK6X0jq0XEcToN9zXaP7Cd5S2m2
+HP5+4sLCODhY+NQrAvsP75niEA6LqTL5GFxaweYEk3qFr6xOop4I27fHOXCy
+OCNkFeoXSz75RZE8fsbcftjDmZ+UTLxoa+ghPZpqsdblFMC+h1uzmPo05brk
+uaKK5Dn9IpSGg8O+CN7DVGq9eji8fJ/kqDrqT8iLHkqEB+5Nb7CHZ/zUJEyC
+P1GrZ4XC7q1tlVzYN1Pp73Q4/+ycryvhUvaPfWfYpB9D0/Vgnz+l4/dIv01r
+3J4gD7M4PvI16S+rm+cH13Xv2i+H25qOdL1F/vgtiTO74eCaK6lRsMjr/h4Z
+LNBZ08eE7UQu2VJijRvSG+jHzhJe0X+wzcbav7JhM/0NPv/C+uvlKjyYauCX
+F5D7G723qQim1Uwke2Hx2PxHUngS43Ael8wfKi9zxPqBgVrevnBjjNX4FZjJ
+OSn0IPnXt2SuRF671pejbqS+JNOzPbBooafPMtiM9cBnFemXxYCFF8kzI8BZ
+ANsmxkeHkPqCsvg9pP+3ew8mwbIckfV8A5pKj5mTWAgnX8jM2QLrp3Iv1cGq
+2SvUsmFpZQT3M8nPfPHuFFyYq52va4v+lPISK+Btm36d6QoLVMr9j8N9J+mX
+m+HhuyzTPXCat7AnA5ZVu6ashdvtna+dhvMPfH83Cw5Od1a6AUe8tA9pR76O
+kWrqIawqvxpfQu6ne2diI0zvl5aR+x0+pfEyGZe90fZdBA93KqXcJOPWqWFa
+cJ1e2WwxrOnXMtaP/ghcEhYcgxWHjZ91wPynXHEKTD2T1X6Dt/BGTkfAjXb3
+kmbi9zaP6+nVsJlB8ILfYHFV6Q5nOPafvC+pcLQGz8gaFvMWVzyELzoXiU1J
+/q6ho6Sez6PO5maw99ytcVvh7I4AHTbMf//63B1YcUxzB+mX6jSnR9qGeP5/
+j30cQMZDdYsD4FUfm7R2kn5KzbNyYHHHlKfFJI/13SfVMCMsyO0B2W90e1Yz
+bNvmwBkk+X8Y026FPbocNAzm4/n27LrbALM+smxXwPaDJpYX4dhZc1oj4TLT
+0gc8uNZBiZMOBxuMM9fC6yR2yQK4UnPJgC6sUE4IO0fWe58x+Ar5RxsLb12C
+za57FQngDxPRLWLY+0T56ij4jQOOBpxwKoFaRvpRW5edCyvcfXot4EgLI/Vk
+2H19zm4Dct5sWiSbyLjhuslk3KkkReRJ9t9oVrUUlhTtGLQj638+dDUWDuT3
+SgxhTbWd1Bn41sS6q9PJegwNQT/c9nXZrmlwcsz2djfk/8As0CGu/KZ3IB8+
+omrPIvNbKmKmdcMuk4QnjGDfYrnMyYim1JJHTJxIf7otP6bCloc4NQEk38QG
+/xrYP3fjGMk/PF7whxwe9nQxLIdlXb4qysY4TwPmVs1kvbntCUx4fAIvWJX8
+fxnT/wPf+3c5
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.393275441506763, 7.232686837739852}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJwd2Hk8VPv/B/BRXGsMWcuuLCUmylWUkSxJGpW0iOmGuiWmhTYydbWTpULS
+NAqlyNKmkhC5FE24KGubEL6TRGnxe71//jmPp/M5720+58zB4K/QFYETGAwG
+W4LBoCNjeBw/k9mMb3TUZzOEmwYEp1XZDFZHZrSGAZvhyxjgTFNjM5iM3E4j
+OOfRkZfFcHxwwJ/TYM11D0pWqrMZPS89WJpwo0it6j2s+fSVmOIVdco1b9NA
+vLR2vTaKv7/a6QPcEpLfngvzLlV9XqaJ/JvXFYXDItstYVfg4w8XXLCFK/K2
+mL+HOXNawj7p4fc9ssuVtLBu9ugPLtwWxf42DeZoXqxq0mUzSs8mTTOG2Rk3
+G71gc+6zq6qw2Kn5Y5MO4lkJtL4gHj96t+9W2Nwm7kEFzNRpHFGC7W/c9oqF
+Gf0ZxTXabIZbh7yUF53XmP9fGtxf0T1LFY73Hdh5DI5+4TCzFf3k98Q+PQm/
+92iwvg7HJ/r/yoQ1xzvNjsDCmMdLmuF4ef+doXT+w+SRqcinOsn/Jc2HOdfh
+EA9+P/+bRwTM79v+RAT/DJfTvAxzJB5q2aKf4OiMI+0wb+xNUjr1K06RsqD6
+6n7byGAe9hKBMxJpXj72qpth8TzzImn0z61zTb0PxzycWXwKZuYF3/0B59/J
+uzFlCvLds5RQw7xjzF1O5MPM5LEv+vDiU9cUl0xFPJ5pB3lO8ZVXnfAardtb
+VOGcWuNUHvoqHTKJHEU8bucZh1E4X9yvlgfHl4YbUV+isPD3XrDbcKdlCyw0
+65Z/h/p354jGzXHkVVdvCcKxpfqvb8E4drme2NKFdab7MtYmw9zn7157w7tD
+w11yqO+ggMfPkMc0fMoTcvzRN0xXeHjg0PVUur7IIuE56jw+rzZ1L60fnZ7M
+hVuiq18tgfMN1d78Acf4n7ZSofgSIdvL0bcwN6P2P+Rh/O29/hxsnrRW6jys
+v2d9Ix8uVpKx5cKlN10YR+C0ZttUS5ijvHNiOhxgvF9Onq73fyHdAPdvKOn5
+SvOYaMnRRL4tnZ+GhmBW8ETv7bBtvbKpJNZzR3b01sKL5Xm3ZlD8veab52Jd
+13KLriCYpebaKaD9N3exehHlS5D1lMKRHV/YpY362b8uvNgEtyXX/kykeSwP
+bLgDdzWN7tDA3BkWDI9RWGz4X34WXNpZ+2oa1t2e5eOrS/dh5+ZBO7i8oES4
+FY7feuDjfJhZv2v4DpyfPaxnAItmmrB+w6zBipFBxNM2llnmiPueL/pZkwnv
+jWPuj4TZ8zcNuNIcxqZYFsCcQf3jLah/UOmHfSvMCOFHrodnpA++GoNFTXoO
+/6F/yaz32UqGqDvb8ZI7/JvjVK4Fc/RNBKWY58hdqWwyd/bxufbwwZT5y5kw
+X8NrWjn2dXewrvQ45TOuKV4N13y1Df8I85zm3vuF++LnTmb0M5i5/ZHcA7pP
+1pq65MLipSvq6L7vuK/TdxrWv3TXcD89l1hVgp3UX9VV4yhYMcwtch1cWp76
+9QK8Sk5ulxv12z61oA62mh8xa6EB7deQs/TccUndJ7OA+vNMV94K8/4nwXCh
+/p07R2rgJst3mWth1kF+qhX6UXV4NHUv1VcpoZAGB/lfUk6n/CPdrhMwjxJt
+z+oGuMs2MJj2c3iqki7Ni6WS018AZ13LifeC2XsKS4fg1fWmPudhES8hTg/z
+zoqICX0Pi6fk1dP+Olj/4zbLCJ+vk5vYGm4T248cgIWXHD204KRzpQoVcHxl
+nGc34on07L78MQ31pQ75pcHX/+x6vQjO15zdtAAOqti4MBwuFfE+1KJ+xYC+
+z5fIm3J2c+DnG7ZZPiZnZn+vRv+sR8WCBnKl7hIH2Hjp/LXtcHz30KY7NN8L
+93raKL5f3qLZ8NuQJkdaz8xbkn4Pz8GxuT/ul8HCqK21HnBh1JLv2TAv127f
+ML6H8mvtemPhrvrkswVwSU2sMJTiX7eyOAp39yxd5kX5v/zasAv+o2JQZy4s
+Tsidtw+2its5Q4fyb29oSIIf9Kzzk4c5+9Kca2D7OycCJGBu0b/lTHouHyg+
+x6B4zxXuBcEZXzf3ydL5kmufquDixUfFFI8ZmX3LEv0MvyqvtIf5JyR1zlO/
+IY7qQbC+wclp43Cd5iT983R+XUyfL+3nB/IPG6k+JZXuXNg3zjBQYzrynj+g
+OghnJSms8IeZFzKM6LmuUGR/8DosGq86awn/9pGqGIE5XveazOGc6SZDjsb4
+HJ54rVaGfaVfvz0Bs5tjo9sRr1y8IfE5rD+t6WUibONpPEfGBP0w+wTW9D2y
+pszZDuYnvDF6gnrr99wWBMDCwnWezrDFaFbEP+TIOSkl6D9Va/2pZDh+yokW
+a1hGbNAjhPW9/2Nexzwb6zL1yZySTbbG8HNfzVlJcOljI5lcvHeUX5cIiqZ4
+XGb1Itg8b2p4MJy/z9LkE95b6sV1bhyK91hCPhvmRsmMzIa7Vn/bfxBWYC7I
+mUz1HmAdDYY7dPjnR6l/71XzdsF9/EuNnbCoXE2QAPtdt3atg/MT3Cor4ZsZ
+J89XkFlWrQrIr36QbUBmPJvnvAleeNeuodaY3jfKqirgsSfCeW8pfuf5QnP0
+M+RgHCJB8/vgqEL76XSQlNZMmGff/e4HXLMscbcfzHgs5b4W85mwZrV3Kq1f
+Gfs4G9ZUXWPTTr630rUXntKotGS6KdYPSiTRe0namY3HeTC/Mm+OGbzlS2Nt
+McxK/Dd1OvzUz7xH2gyfW5vJQln4bu/2wuUwO6UipRHxsm5tm5FoRvstz+gE
+vbe97DhSC4tnp7ia0XvMIxtnxgzU+/ugUxHdP/t9nMxgRnCK3Hz4aKOwzBVm
+z6ybcgv9p24oDV0Pcy+fXmZKn9/knyEBcKlEW4aA5unYwNkE638tUJ8K8z0k
+ldfCzAN9ay7jvXRdtI08xWNNrsyzhVOab/dbUP4bGmVvVDC/uBeXVeD4rPHt
+QrhmqcBlmPqRy7wdDqt+GPmjifqdtuxCIGyazFd+QP2xU6Zvh9vkGg9chlkb
+1q+KgRc6pcxKoH53aLDK4LcTDz8/BjPihO0yyC86LH2DXGqoXewPt3VFPqD1
+3Pypp8pgd0OrQ1mwSGFxshn6Gcz9oPqU4vnlfEqERb49WmK6PmLwyDf4csWr
+p0aonyOqPOmN+YjO9fX7U7/fJu/LhA2zXCWv0HxkrNe+h39HmNt/onkzM7oV
+Me/6suFYm5no/+GmQkN4bHVA/WGYpxNhrwsLYl1aamH9mqcTJeD918MPqJnj
++nPzTj1DvIyT/g99YNaCo6uiYJsqKVEizL3kLNKFBdKP7SvhrqFVi3NRr+Dq
+y84BWJS9M9sCVtyy5rf8LPQTFX3oKvoPsRlYqgeLvBdc04Y7ztYMmMCcCFX9
+M5jnjIFF+4xh/sWsdiVYyBIMTIXZE7PPJCuzGSqHBdmycFddwiEL+DlnyobP
+yMdh/XBpYeLo7zTaSO4+9ygZdpf0TrwLMwPnt4bAd6dGbUih+stXXPSDx/75
+eiQCjt8W9jsIdvmoqh8Il5ZdHDkKb70Uo7yK+lvBOFoMl1bs/OUO5+vI1kgi
+/wTuZOuldP3lq1N9YcMplkJvit9yfW4JzK2eV7WV1genbjSm/bZ6/P5JOs+3
+yY6D1X0/at4h6ybJfYX/iuxU76V4UmU5XpjPSPyTQ9PRr3hGmko6PD/vU90W
+mlezsnsnvJfvO7OAXHJETZaeX8P/O/2T5uX+ZpI2zLTJfelmgfNG9Q/VYfWr
+oeVn4Pgjs69+w/WFxYMLWmE+b2h9Oe1XwRxnHUt8/m/+CgiD/3VIVlkDd536
+aasKu6zwMT8Js31CjS+jXqaTwe5COP70yAwj+JtFrZUIFi8PfH4B/c/xfav3
+DuaZX+lhwtq+cQGf6HrPmMPHME/1xtHzvXCpi2esJHx4Yl95B+VvbuRpKeHz
+/3uh43OYyxuPcFPE+1C4V9UtmF9atuPiJDyPNFguyRTvWMIXHdg90urVXorX
+sau9VgHfv4Gteevo/HS+Zh4cMuf9yEJYP+fFsTLYvCaozITylebITsT1Y5dV
+v6hTvtvDsaHwBJG/uSIstCxnSyB/ypvA+2SGtrAqHx77sTxai9arPjkdhno7
+NO7JW8KigDhlI9pf/js2LKf5NNe7x8DxgeNq+8lBoh2f4b2hlwJuUrx3n/KW
+YT5v/dom03zizbRj0mCGu95SDRbyR/dovYatP3icsoMZtemGEzHvjduznDeS
+h6a7qsFxlxsDj8Hi/hpNun8KXnIacmCm3jZTMa4/7tETIYLj3w/L3YdXMb9s
++kwOWbZyG3wguypLcTZsV3VIFh7f+PuEyWx633jdm4R6eZ6GfDuY7zw7TgN+
+vCbK0h1m9Pwc0UP/Q26isJXkeWk6cpiPm0XW3z6w8Gt6yijm/eeh/WtXw129
+W5cOybMZt96F/cshh+w6PRHe/M+kv11hdpllrbUcnmeNeWqUjzsmmHVSls3Q
+vV9bZU7rm22dFeBEZ0GsDq1nuXc8kmEzlhfJRFH9XTwTkRB++920kEHnRU2f
+bsNnWR8tv6JfttGvX6PwoOqU3n5Y3+b7h0DEC56QldPDovvdruwbnBPA0OuF
+uXYqZtmo58ZJ3q1BmK8dyA9Bva35q65+p+tvzfB0QH/uw2njsjSf/o9CZewf
+p6Kk43o0D1eDPa3wcIVcyzya53CY6RnMR1k6xWsNzeeo6jNLzO/TWp1Z+8my
+/gnZcKXB/w4K6Hq8XY/BVxIPO1bApUst/RSZ9H8JM24f9dcWtFIaVnDYVq5k
+hfhRA4ovsL7B75SPNdz1TyzLH+6/cs9gFcx3SVtUjvytzDD2DpgtzfX+hfr2
+uDR9PwELMxfpaMCPpHXKL1I8SW6OBvoLdAx3zIHxhaIjg/7TV5z1uQOXzkmZ
+O4R5lVRL6NynfD87xzox35Knum/vUfxFL5e1SuPv1ycNMwsp/l0n/sAf2D/n
+tG9eo/OxT7/owr4mmYvTKF7QhbJwKeQ7V9kbS/n7zHhjkmzGAN8+5yCt3zZW
+lAsvDpucEUrnI1M2JsLhkoYfN1J9H0ZNr8EFZtciV1O/c/Vq+uEJ0Xt8PCn+
+zJ+TfRH/iLbOIneqt3Ozmhi2+7iz6/89HrM+HfWYhH2+wqF4ngbszai/elT6
+3/V0fsOCxbboz/zQjeXBVvS+prlbDv07zP1T6jDFX3P2RQMc+UoQQf1wG51v
+ncT+0W5o03hI9RTcX2CM+fHnbJ/UTvWXl+QI4OqeBJ6ENXyx9+YAbOQoa2cC
+M1RGMhUxf8Vukc8ya/p+8Wj+jfOOU6Nv7oT5nLzjj+AJze0WSdb093urtAd8
+N/tD6124S/g6LRf5xX1eTQ2w8MzhzR9RX9aXgsB+yjeabsaA6d9847SejtLs
+/wPOwiIH
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.674112975512006, 3.0634133525730736}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwl1Qs0VHkcB/DLlNcqtSFFDCaPpjx6EuWaipIyGyNKIdbamEVovdolW06t
+avSiDU2xslI5JfTS3ZoSWTsSZpVM7WyNHsxSjYpmv//2njPnns/5v76/3733
+jPWWhHVfa1MUJcSP3P+/2DQ1qsHlSFM092maASxRBm6ogqUvQ3RYsLwka3kQ
+zIwtun7fiqYqZ139oAXLNedrs+BYi9tZ9Q5Y/zC0TRc2o9Rr0uBsXkd7uiVN
+xY/zWeILJ67vM+2ZQVOGkxPd7Mj8Ya9JrvA1k4VzTGHV4wFJngX88ucPxBF6
+lvRzc5rK0vy2zR5mm41QIXAru0+4AhbJZiQ/mY79vd6+EsL8q/y0PXCKH2tV
+CcysqDQIgl0iaoR/kvEqhzEe3BDkM50i9RRUPxbArTm7ZnJJPWv/pfbCTCrF
++MMiT0FZD3xX01sTCU/afmKpN86XnXTf8w3Mb5r2+hIs1VW1hBFb71Q6I391
+vJDyJv3jjZpUwKJUbYkx6W+Af6ER6lUs9qv7i+R5tSYkGnZoc48+SPpT0nWg
+BC7qSrXkkf7N+MCtg4OYVMkre5oSjwzanCHrmxt3H4XpzfvLMuGIZqPyZTD/
+cqCNI1zZdnrmiB3qbnLi1ZM8x+Wl9bDcJO0XLty6wPrNT7DqztVN+5B/XHP9
+7C1wRLDimYL0533mOj4s6hqc5wEvz1waGUDGjX4MPjYN6ywn+m6GpV86/60L
+h6WveZsB83lM7H4zPI/SvJxTcLZQpJ4LSyeqA9vJ/A4l834q+vhrdwQLeZlD
+nAcKeP4OVex8WBUiGxuGE734SyLgxM069zhY/+YeSzsXrrnOrdn2eT9x3DFS
+v8Hlr7rh2QUtw2JY2p7c74c85epMrSKy/4WkmxKYMc7U/gFmT357i9QjScpI
+CSTjmbu0T8OGJ316p8HyA+5rP8GKFTkXOpCXPSHo0mL0R9W2dS7pV7a/0XAw
+bMblujiTceNztwLg2qT2LtlMrLc9ZMaB2TrdMbtg1RYrx07sZ9znN+QGSx1X
+hcfAh/f2mas56O8NG+te5OMPKR/dhGmXugwaVgiUglLYxe3o2SLU55lQXL2X
+ONP+7AD6E1J38X0esUB2YDVsJlnuewRmEuZ8qjfF99PAEdfAlLqq0gNW6do5
+d8PisXl/PDLB92TmHz8eeajvdnacgMcVWwsWEQv6dfJgT/pcdSzssolJOgiP
++Bl5HYHFRjce3YCzV+7gXIZFpuuGDLD/yhMHNVKYbqzPFcKyB0Nze8j8jqMv
+++Dohx8NOmC+xeu8UOR9490vu0Lm2zcua4cb7jaMFcCJWwftl5J6o2wUoeT8
+jatfFMKMJeuFMdmv7vck8rzlWqcW30E9bIcKXzWsLLAvToLlTr0Dw3C+nnCe
+OSwdn2feCotbnno32eL9CTzflA2n7Kx+kg6L7OptTeDicCfJQljsvi1qP/KU
+Z7DVFJwYyokbRn5/YefFHhvkr8mP9IeZ6EaP27BLWc+cU+iH//ooCQOLqcr+
+MWPUp5mY0grTZfcDYmHFkqiEZ2S8gnbtn4I7f/TdF9ifMfUY2Q3HslYdcoel
+F615PrAD/+HqOJh9qfOII+y5ofFZMcl7OsHDlditj9tC8k24uWgjXFQqcBgk
+4zxVXBms1AkT6qF+VZZNNwvn5+sb+k6BJ4XR71JgivX98wmkf4+veQzAxbnx
+uWpSf8GnwhjUo/xoGy4l+WL+0e+E6d2a5mMwRQudXFF/fm2VfjCcfSb9TjJ5
+v8KfLNAj+fnJswphC0Mr3VrUy7jllBMb71h5fBPp3/jrZ8j88nCt+fqkf9/W
+jHLhiLjbQ1escX7x4X23cJ70JFW4HZYXGIV7wfn9PJ4XrOqMnF2BvCF6fj5T
+4c8XPEL+v9j0f1GRbYk=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.232686837739852, 11.393275441506766}, \
+{1, -1}], LineBox[CompressedData["
+1:eJwl03dM00EUB/CDggFRmUorUttaIsqwhqkQPRUVUbQoYg2CFSHgQBC0SlCm
+CARHNdoUQ1JkRMCRigsHAsFiURPRpIZ/BDEgDZUhQqg4vxd/yeXyyV3ee/fu
+fsKEtO1JloSQEAw2//+8KbFi8yJKzNm25m3wi5K0qkERJYI6wxM1XJlTQ1pg
+4xWPvR/g1t0nqophblPnTWsfSrzrBT/WwSk8bYQYDtWWBk8JKal7OzAsgZ/d
+UoprYaX9mkQvtn9lkiEK7uIernCB5Ql3FBZw92OBagTx1TTHuklAyadLOWuf
+MWuWOGbBlJexMx82XzcVbITDhfZ2a2HvHe/SPOCSNXn9lvCeDt2UM+zZfFeu
+96JEJn/px9xVJXyggslEvL8ItpGElh2FXSLTHVazdcH+jlg4LDWLkwwb5wXE
+7ILPTe4rV7F81OiaBPcPeQx0snzdFfozMI39+fwXq+9Fru0DOG/EbYYXziPt
+yT7+HRZnCz9L4bFR0ctQ1Bc2PvT3IKzWKWadhwl/fYcC1gbuHeiFj11wyc1g
+/Xszpmf9m2jPzIiDU86ERGbDMkvX8SC46YYk9SkszqXRHFiv3KIfho0xV3ra
+WP2XnLvtfSk5Ve1WpYCly524Argk6G4E61dd0Rd3PvOx+53VCxG3xKCZCZOE
+TSEWsHG08MAg4oVb2Voc4uPeE4tWP2L3df/8EaM7JemWRfdOs3ynxZW5cJfv
+c9Mq5iyn+QFwysP1+/7iPFJPXr4dbE7yL2+Hg2XV6RxY7TD340W4q8H3qBuz
+H2cqGQ7/VmwvhbtVtya3wtyRA84VsHGR6ecGWLuC/97M1vMm+FHsPZZaq+NR
+n8QzcGcqi1dWINLB2j9fFdfYfl6LSIzzSKzSpOz9pvcGtmXCylFrnTvqpXsG
+eLdheb4fSYWbLqfUv4KlYdGNLT7sHmNq9HCrrC/aEf2pM8T71cKCaW5GHGx8
+rVDKYbOvxqSBaftmzm/kH5t+FGKAPfmLm3NgetXx9jQsbzyrMqH+k4kNRXOW
+IW5PYWMEPFa9VOQAV/bpZtcsoP//T9iGzQvoP3WPQ9g=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.47431403485444, 8.442668420912664}, \
+{-1, -1}], 
+        LineBox[{{14.000000000007276`, 16.500000000003638`}, {
+         8.000000000005457, 13.}}], 
+        PolygonBox[{{10.48173265946094, 14.447677384685548`}, {
+         11.316718930329426`, 15.397834175673825`}, {11.719815750748694`, 
+         14.706811054955079`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10.823799910437668, 15.484057296392571}, \
+{1, -1}], LineBox[{{14., 16.50000000000231}, {14., 9.499999999998607}}], 
+        PolygonBox[{{14., 13.6}, {13.6, 12.4}, {14.4, 12.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.9452, 13.}, {-1, 0}], 
+        LineBox[{{8., 13.000000000003638`}, {14.000000000003638`, 
+         9.500000000003638}}], 
+        PolygonBox[{{11.51826734053906, 10.947677384685548`}, {
+         10.280184249251306`, 11.206811054955079`}, {10.683281069670574`, 
+         11.897834175673825`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10.823799910437668, 10.515942703607429}, \
+{1, 1}], 
+        {PointSize[0.04], PointBox[{5., 8.5}], PointBox[{15.5, 7.}], 
+         PointBox[{14., 16.5}], PointBox[{8., 13.}], PointBox[{14., 9.5}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T11", " ", "P2", " ", "N22"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdgef/figjhihjij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdgef/figjhihjij.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {0, 22}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwl1AlQE2cUB/APCHcCEQ+CF0FaRQckUEhpPXaFiigKVqmg9SAKFB2O4IgX
+kaYanKBSDqHGTgQUqyjaIIOAghiptkQQqSgGSjEIIjKEQwRBMtL/2p3J7Pzm
+7fe+9963G6ed8RsijQkhkfgxd9I8iWsqTT5d7jRJim5wVsD5mzkmdYtpcsZy
+IsURpoXeI7mwd4wh6awdTdQlmReOwLMTfu+3hLVFMaJo+KJql3viFJpw+Zkm
+4XDr48O1L7g0cYkKfBQBS3k/BQbBY3OT9u5n4vXs5SdsaRJg/9whm4k7Zisz
+bGhycAkVVQV7nb58q4xDE55XWYoeFlxSU8awhfP2lZ+j3tH7WcsPsGkS9ka5
+UARb3Er6aA9XPNiemgt/ppG87rJG3s7AolZY3PhI0ga3cbQJlgKahER8FTsB
+K9Z0h82Dp81OK1+K9dKKQr0QbuWkdZyFIyajff3hMJ0NZY39laenFgTDageB
+vxxuFA4qN8DJdmy9OeoPmZZmwsS1Bj37J7hYfuntNzAr9e6fvTBXNVrvBY8a
+/dC1FP3r7o1/6QgreW88xbBr1bNpprDsRMLfyXA4P0rfgPpDTF4kRMCFJTq3
+dNhnBkc+F9aORKSvg105TyOvIf/YUs1DNny8OtXXFhbE/pz+GPPzyVG5rUG9
+0ukRUQq4LHu7XoT+LEI25eyGa+w7NFsxj2Lb52YrYTbvVoCvFVxZ6uUKb9pn
+0TrTEvvdfWXPh6Mru5MGzDGXnNY5TvAMu7xQjRnep+E6Z3dY0j512w1TPF/g
+c3A1/HDFrzoVC+f929GXcbCCI6PqTTCP7tDic7C/zcp0NqwN3ljbBF+NK9qS
+aIx4vOU9G/TTM2gutoR5KccmAmHWrOgajRH2W2imlsOlTZ47bsL5ia+/r2Ge
+N5w5yMSli92oUTiMtUNmhPU9/25iT8F8dT73YkPhroK7751geoar9g/Y613Q
+bDe4pMhGvBz1GAr1wx4CJv8S/2o4Y75qmQC+7/Te42v0w+o9S1zguMxD3ldg
+btSWkw5w81Cezhj9y450ipnzHO2WX6dgntCP1YJ6InIXbdwM60ytT+TBvOrv
+rALhRr+sJ+Fwcqp7zRR4cF7Tfkf41LKXK64hv0XCQ9d2zEcr4gpnwWqjm1fy
+4PU9iQtFzPwGQmRR8Id8s91HmX5npfC84Vr97acyzKPCemMsh/n+RNy8eIJ4
+XuXcITeaZN9mGXI+UkTqORnYAa+tv3OeMlDEZ1XwyXa4T3H9SP84RQRe2zp7
+4OJjgxdL31NkLJNbNwm7tGtcC0Yows+Ndp+H/NxHnHjNMEUU71b9GASH2P8i
+8npLkTCTK1VH4fwug3n/IEUqPJKzmO+duyPW+sMARUj0urhx5v9AJr1a20+R
+weJYpRD9hy+YCPKHxx4XRybARLS5ZTfMd/jC7TKs9rHlOGM97W+V9gxm74o5
+74b8vEMK8Qe4L6BcMAG7+N+YbsWcX+W4Re8QRdqyyh9wYfacvZk9qM8g9Rxm
+rBAuSulC/VvXxmQwz8tMD1TWvUP95JBqgsmn8Rs4hX6Jp21WM7OfVZ6EN0oR
+i7TjAUw94jN72CJY3b2/Jp55XzOezN8K88q6VnvCiiHfS8Zw4WH+niH0y3fq
+M/0W+aR2LU0q5jy7EuWrsF+P5DQlZr4nY2/vXtTH86gPZs5z7YLJIhr160Ys
+9xkx86QnLxRhHhltjg3NOI/wPj9VXC/mMf3+zHJ4/T+RQb2vUN9fktwCWL4r
+dOeKDoo0Jpfan4MFT5VVghZ4UXoZExfv0ccsaMT+US2f1tO1nZKSavTT4BLG
+5P90Xbzz/30x/R8h+kp5
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.2761166322027524, 16.884033677972475}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwl1Qs01FkcB/DbZJnFMgyKoxojPeWV7anmrweKCoW2nWrSU1o7JVJLHq3X
+JKaIHtLUqdSUkkUhNdFmNctO6JSIOdrooZo0FZrY7z075zj/83Hv/97v73fn
+/x+70F8DN7MIIXvxR6+kYxifUQzR0KslQy4V9r7KhMk/Hg1Z8IH9BgpDWGrm
+sP5H+Bbb5+MeK4a4jEsf9cmCIZdv6q634f/SNyP1m2Ar/p/n5sKykFBFA3z2
+uPD8KVyZHLvlL3EtWPlqlwGuxRYmk3iYF+l5but+LkNEI9h+u2B2QP50A1i1
+7O3Gp3DJTEvZeXPMr77+LRD7nrU6sk4I81obHz6Cp5XrdTvCKp9YCyFy+hZ1
+rR8Fy24cbeiAu59xL9jAaqdqt5DRDGm63BzgDhMnx+HbsNvG2qciev9Q7T2O
+NUN0M07eOwlr/Ba7+cCL6qa0dsLSnfa+oXDB3qrwicjH0+NnroWb+RFnd9C8
+d+rZc2BHkfruJeq1FcEDWF981WdPK+zi1ZZRQPdT+475AnOqM8yc4IKt5v1D
+MIms2FiEvGuycza/g/1vPGjmw4dPXBmuhRkVcTuKejXP3a/G0/ms4Ggj2F7r
+dZFP1z+8bksG+uUqSd90jfbH/495Y+FfmkP2Tqb9kK9cex99Vz0TRhw1w9XD
+XD8drnL6mtjPYYgiSGoXBq9URm9eDUvjpLbbYJMPp7ujTDH/VmpLMqzu5NT5
+miD/UuFxBcw+umLkvB+wv+nchZbYz4+zTxVojP22hf0cDwdHFUpyjJD3Hit4
+ALbqrw4ygF0ay1tjkb/dmdVWZIg+1feYjUS9c4wrJqTB6iyWQTIsEucWZsPF
+0cf7v8LmVt9WKKmrS0s3oH+KA+sfT8R6jPR9TzEcsyBytIzu9z4o9AWsVkam
+TkYesj19mQ4ur4+tvAn7D4kDtPBNvs03T+RXm5w43wDrBk/2VMCiL2EmErhm
+UkafJepNSFx03xFumdsy5AeLEhtXViJPTHypMgQmn7eumAUPHcpd5QqLRzTZ
+FKE+2486s8dYj9NZmDkOJiZeNktov6ofnclFPxhNHk+CPGLPFFNreFIaCTyN
+/OIzXFKE/h7TSsylqNc/NrQihD43bvJTm7/H+X66smYMzJ/RkDmFjfUqXQoJ
+rPvosPq1PsbH7OpiwfkTcq4Wf4e8HV137OHXMa59aXoYD1Zs2QA7pUw6GTcS
+6/d9Tr8J79bzKcljYbzp0ZHxyGN+f4qwYwTOvy6s/TSsfdIWGwy7ZMXr7FFP
+prUshkXHd+ZbyeHAUgvLLoJzaatyn4p+ROxwju2DZQNBZ2SwxPGLyAnzxdb2
+8/XQT8P2UYsyYenn2c3+8L7VrS1s7K9xkgQmwZVJ2WHZsP+tpca5sPC4JJ2P
+vJqe8of0fGy5gkQ5rFav1qPfh/LQsoFxqE8abnvYBp5xl3swBuasCXtMz8tG
+47zwMvXvqXFecFqXp/V12OV+vHst8qeYPPdJhsV6ByJmwheDFFkOMInJNJKj
+/nMHO5YewX6Kt0mED5fGaHc2Il/xMcdv59E/nxfcnZ2oh1jWWXrAL9dldf2N
++kUbhLtf4Tk1zvP7iRkWEIVzv2UJvEP1zPQvnYC46HPyjsH59d6vvAcFRDpU
+ZVYAewyX+D7+IiCabVGmNfS9Y7OgJeMT5r/gZtHzXTUtxS3uo4DwIqvGCuHx
+qje2lR8ERPYknP2APu91heEBGgFJyNNkeiHvxbJw5bF3AsI8sJ2lhGN6/z28
+7q2AqP2O8ALo93OwZEJfL+73frLqISxLDuR5Y1x0m5m6GP1SGUb5e+N+zSHz
+ExeoM7Rdze8FhFN/KlkDu5ctjH6O/Xj2S1jj0H8yJU0+iDy8GwtSnWGLoU1J
+o5GX2C82tYNFeaPzHbRwVr2DFvdrU5ZHGNH6puk65XCGSVJ4GSzzaLzrA+9u
+rzEy/4z+HUqUNiFfr0J8jQszL/stlsOxT/auuI75qoOvVXdRX3uAa1831i+W
+V8ndYYutzR1l2F96dVEOfb7ae60Oje9D/TziOp2eFzs/YD7yM8+nJSjpe3dq
+a64D+sFEeWb9Rt/Lht3Tt/cg32DKLG86fme2MqoL/VX6fXChDpWPfftUQPyv
+WMlnw4rsjXEzHiKPb3SNCE7QGdsuVKCfuyeYnaPvcfpJqP7/95fL/Ac/lbt5
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.128720493773297, 4.310154074720437}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.00000000000273, 17.000000000003638`}, {
+          17.00000000000182, 16.500000000003638`}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.286281316503036, 17.427512100981787}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt2Hk81FsfB/CR1CiVaLHFyF6WocgWo5QlISkiTIVLISqlcpElQnJdSWWL
+7EtTIVLT2CJ1rcl6PVNJlKKypzyf87ye+cfr7Wzf7/d35syZkT560sZtEYVC
+UeChUMhfyvwCXusZlP+91jEoEjyqB+1EGBRasnBoBGwq+0K9HvYdLV2YgytW
+KQftFmVQGGmfwhwxTrDoiFYXbL33u0QWmSeoM+mUGIPClOVd0QInR+rYC4vj
+/4/VR/+FZVsaxx/CjO9tlaR9zSC721KCQYl/HNyfDZfSy5oHYEGZZsFjsLFv
+sojLBgYlZNFpk+Vwooww+yXceuevM1mIx1rzdqW0JOb7EWSjDgso129wgTNY
+E2JVaxkU16uCKmEw7b2krgkseJx6LA5mKukt9K1hUET2m/qEwr59aZbBcN5x
+lvhRuPX2R3stuHvuxRZ1mNXW48AHJ9KpFhMkHkk+zzFhBkVbRT6OBXOsysym
+4LozTgEn4IwcPhcx9J+Yjby5CR5fKZfpANOCTlv8QH4Zd/hYpWQ91XL/JpjW
+2Dski/ioXZompbBvz2xCDpy3fK8AcfzKH4pbkV9A0SqeVzDXeW10A6y/OFfr
+Fxm/ZJW1A+oTqC5x2QTrxfsslhiCWcqaCfmkXpoWH1zxHC2MLbtpyCdegde4
+DR60YrbkwxTFgYfyeI7DWqXCDCnUk7Pw8gjcaqSQOgCHFEp6hsCHD7F+G9Iw
+/tOPhkuwGPPivmsw0yI/zh0O4tl4rRem53TU0eHH/RYaUtKY57Pj4/dYjzNi
+stSROOzqQBhsbaptEguzDhpfWQcnV60quQ8zirkVdxD/2S+q0U3w+H31xs3w
+p7rJujcwM/2TVBXyN47ofk88fsX74wGY0TLK84qML2FX8MC3Ig1qHpH24T2O
+tajnspzreilwxpH/RKXBdTU5AxdJ/6KkZ9fJ/lj0xe4QHFK9TqYA1g+447MN
+pk0G+PTByU/+eCcCU26lTStg/mEPOzMKbK1SUxsLfx3jGx9D/ty1pkV8iHfr
+PfGnIzDlGDXhKjyQ0CFK2jP0k1Mkka/BuiguGc84GRH6AE58LmdD6sV8s7Rr
+B+oXzVgibE78zOPQC/gon6NaCPG8+Q4G3mdxo9/kOWS8nUhMJhw7XL2wdCPW
+15VWHoW16h2cD8CtBj6WYnjfqcbyZ2XDLMs+n83w/CfTZVMwZWWTrxRcLjPa
+vFMGz3d1ePo0xps+dbKIhVur9NLKYfsD5lL/wL7JfiZMmF0gs3OxLNaP3vfn
+LOJT1Fi1mQ77rjjwJRLe5CTQaQVbq61tWg2HOru/OQpniLKCUpHvJ6Vupic8
+vsvfRR1eck+G4QoLcoscO8j58qduqy1p/84ojSLnS57fqD7M9Wh/fACODo7v
+liTtxY4p22GxY52yvxBfyMcfOjvIeGHzuF4S76Ybq11hjsvX/krY2lBIO5P0
+73CoTiXtY4dd52D7lLCHUTAr881yT8RTYqH1OhDm5lLjRmDqqZftF2HB7jbv
+s8hH12Nf92XSP0nnOj/qMW+scT6N1C/obkYKXPR8SUkNTC9+oaKE+gaFjHV8
+h2nUm5vy4Yo/fEtVED/LeidtPd7HQp+9E/1gplfdWR9Y1TnB7Ampb3FRcSHs
+vl74wHI5rP/oeCQ5B44uXFl0GB4//Vu2FU5rcLtSCPseZAs+gsunbdSmYVp8
+/rYwmC084akvj/lbbrZtg53bTX4HwL6/Luj0IJ4kIx2JQpgh4f/IC17szOff
+BlvTMw1nkE/BvSN7PsPconOKoXD465TAGZhi5dcvCCc8Mg2dhWm19dEF5Pxw
+cvAagzlrZ3ttYR8d6us+uHXnr5w1cLInfyMHzqAynn1BfXcPKj3MIPHpRFe9
+g1c6exsEkXiuTfVOwNqX1emHyfq2MRMyGC+p/8FsO5l/keZ5H7ho6qecLMnH
+jD+yjZw/HdXrheGQe4MCZoiv/UXqSoH/9S+cb4EV98oFCcJ0MfYVJvKdcVOy
+kIYFg3N9J2DJqNv1BmT95mDjCNRL5GfHLQ8yf5gdWwDnKtvZ430qma/r5bII
++J3eMaV/SX5lVKER2H6zzUVZBax/8mn5VpyzFg57wv3gjNuzVDdy7hpU51XD
+46OBxwPgwYpn8kKK6F9RkelDzukyXm0mTP875q0p3G9vsjUftpa5zuIn7WFi
+Dz7BrLSujlKsNxF8/+5GJdR/0WZxK9g1TMffCrZ+Uy1PPleHdC+s84XpW9Ol
+PeDd29pXh5P+84f8fyDfW7u+xsbA8R19Fy7DOUmTJpHEV8c2K8BFj4wSA2DO
+YY+eXtRv1Hyt8RFimVMj2XBrg1jiTnhcQ+tODLxMoXoViac1//T8VVjozku/
+BRK/1e/EYtg4NDl0QJE8T5vbI/DX/c8mq+GMxGSuIdaL7ioxLSL5J6R/K4K5
+ch+z0mGaRqCRMuLXNbTgpMLMttojFWQ/T/W25ZJ6uOfv2oP8Y180BLAVSVyc
+2AE4cA2n8i2pb8irthOoXwC3+JcgqU944+woHH6PR3QPzG1lBh/G517NOUWH
+OJi5Tu1RGawqdzGtGw6JPs0/CeuX3vVS2IT9csFwlQDOdRuGtnAAHKX3+tdK
++Hfg/IsGmH60NJIXfhVv/Vp4M/ZP62LlToxn11GyDsHxP/n9YuBNt4d/JMGC
+yg9kVeGSHX1fXsD0gBXBNYjPNfP8tm8wdyzI0xJOpvUvFVBGvm4Fmt3IT7Fs
+B10M5nIcrNxJviK2khIwxUH+y2/Uh9LU+kYI5mjk1ObCnOc/hxcwH7Nhgu0G
+3yqydfwAZxzvq9eHGU5/JdTDNNvUK2qwpbDA1izSfuOhqyFswRXiu0RcsMbc
+i9zb+Isaj8CMts56cm/x6PTfYErakyVXrUM8v7VMnLRg1v34TbHwgLZ0iCrp
+73RRXAj5aHt282oQv70gnQlrHcrqMSL14o1Z0EQ9hlJOOTgTF0iaNcASQ5k7
+Ikl9RGu6FVBfj28GZVWwRwm3yBVmu+bvnoMbdRJib8BxfJtXGiH/+AfhzmxY
+0jD26VU4StQlrQt2X5L09F+Y5hZ68h2Zz0XUUlUF40Xv5w7AOVLfcgNhwQei
+ba/gRPFDUs9h5tUCmRLSf/SbMVUVdf3EczYcXibYw2sEJ+8olbeBi84fqfKB
+AyQXLYiS+L6p7o+HmX+00NjIJ0PziWk28V7mBjPYXT+7rBhurayx7kM9lL09
+LAvgEI0O9gW48WbJoRTYOmukQRlOfBqREUHGd3kOTaK+dK999h6w736fcz2w
+mNOlpSYkvl7tv4iHPzi7y5L+5Z4jU7CX96ntvDCdR/8VHfP9viW1cwj5sdZv
+kYsgz6eTNtcCc3/+kzwOU6khCTVwiC1viQ/i9ZWObX4Gc1oj+ObgiTzRL41w
+vK6w5W5S33TxWwMw7Xz8snhyb4zaP0TBejRx58Wk/uWDwbvVYMWeSiVyz4p6
+KHyLxE/98zPLGqbulNUpJPFyH+sGwXkGb6mTsPZc9VgarPXm5vWdajinbek3
+yD3SfNkK9UTY2nwou4zcmyavCg/CGUoquwrhkUm6oQgd5/6vCuu/4SO3u3z0
+4Pj7AhYnyT3QUfmMA2kvr7UygsMtJJ3PkPaKvLHl8KO/n1yIgkXaesTaET+H
+8colCebuC59Ognc8+ziWSif3o5kqJ1itc9gxHW7kTF1WguUnYmi36eT7AeMU
+qddl/eOUBJjDbs4sh/8sS5wLJ+t1nUkh58PB58YG/qRd46lSIPxzVEfCFaZ3
+uHGuwAL7zk/ZwNaBB0+WkvOrYZvaTpj1bvhfMr83vXq9FokvfZeqCtb/aEzn
+KsO0senQP+BaHk6UIpz89cZ0PjmvZLw6lWBTN5MH3+DZpvPG6nC33cwNPeRv
++KcT1ZC0SzWfCoelt5nz7SfzezaJvoC9ZyLbvUh8fX03luCeufrcpWcxZPzl
+E9a68N0U8/4SmGKXLXUUnvLS4usk46VHzwTCF3m/jM+T+LZquEfB5+z3M+TU
+kd/k7qoI+Nhk8DULmFZ3dfwM3FT/6bIfHHB8nm4HS7vxjibAIX6FJqqw5ism
+6x7MGCm4Mk/2T0nz7+ewPVelso48f7sbu7rhChm/91dgd6GY7e/hjOlFelbk
+e0C0z5ePsKKSwfh6OG4yO38IHp/j8n9Effg8pAW5sPZkjuEzsp8bnlA6iQse
+dmfCgYV+CWS9GT3va3/D5+K5fOUwVXtjYAIsdqur7K46qXfo0gx45M31JYkk
+nuC/PlTBHWk3bSNIflo2oh/gR1bN78+T/uLzFDHEo6A40nKK+KnccXt4w8Xy
+375w1ORIUSpcmk5Z60/mU6t8NQRvmbrpE0zaXYxS6ahPb+6oaDwx++7IOXjO
+yKQrh9T3H7GUSlhNeEy8Fk5uXz34Ha652C4yCHMuzNpL4177+EJUHVUD56MT
+VYR8j+hulx5Wg023xPYdhB01VFTtYe7Bu8sOw/OXt24Jgcc/ZHFs4Eavj0k5
+ME2Z81IPTt0nuaKJ9E8SzxKB9bjvvUfIfC55tp+xfpAvu5Z3C/n9ovZEOVw/
+E2UnsoXc49ltZP9YG5pVysPxdsP5RnD2/qR6VTjgNnsTFR7otsilw6wmvbMd
+5HnvC+xUhhUVpE7nwIW6uStkSX8rofwweJFEqvl6mGrgLu0NX49zqVgKN3JH
+9rrCqx/mZk8hPsqs4LQn2S9N7NMfYMWbJhrkvCq29IvoJPlmjTAz4Ev8YyqN
+cAjf520tcFX8iQw27LG+vYXEl+5v9rYSbv1g8MQcHjkdWfmY1KetXykBdt+8
+vLganqm24OmHlW8aTTTDHJb9CjkZct90Pf+O9I9L3ngcri6P6PlJ2vPSdufB
+spUHPcUQv7Zzw+t++LuP1/btcNT0YBofvneYi6RpHiP1zNtClYbf544ti4Fb
+zU1FVeGfzoddHsJ0Pd5YZXj3WnZzLzxz5kezBPyL/L605f+/L8ky/gt6ApWe
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10.791777955940793, 5.1492961558718795}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwt1ws0lVkbB/B3IpfI3ThyGYQicXRMufcOckvlkss0ZUjquOQ6RKmOiEMS
+M0juoRw5M6iJQo1KxSRDLp1vUDQ1kT5RCpG+//5mrGW967f23s9+nmfv913r
+aO4Ndw9cRlHUffyT5z9/6+h/njp4DolGOcKtmqd4b7Vpaui/ur9kwtwfTfT/
+hDm/fHWyG9591aujAWY+S5+RMKAptomfWRo8kv+txWY4uZKf6w63Z7VMsGEx
+C1MvBbhOoWk+Fc5ZXk53r6Yplx3Ddwth7V5FLy7MeZG9uhJuzx24aQ2rjr7a
+dR5eNDP/9b0WTVV23NbJIevvzAbVwose7ryjsN3u2tmDsGR4WuD3MD8325YF
+M+6eN7KAOec+T1JwnAdXUR6mH4xvEWjSVOe7wW3jqEfBM8+4CWa4e2u0wi5u
+XkZVMFeQ0XUOHtPjbi2FX78bTYiD26aUNcvh1rhfVX1Jf4qyhn+BOYtcHxf4
+mlyIUxscqieZZEfWJ5/qG4HFrHPSHODF6rUXl5F8TfmvPGE7/8raNXCRsHh9
+ODx3J/XWNjiZoRqdA8e1dJ2PgtsfOXjfIe4s1cqBR4bSVRdgV3uuaR1MWTuv
+MUd9nbK7pO+S/jxuzD5G+vWhX7UHdjUw3HwP5rYHMHuJ5VqmpdYj34FNx3+H
+n1cJ+3vBCZFB/AZYWCvdrQAO7azqPEvy+T2mRkDG7Q8EhsHcgpkz0oY05RN+
+5oAFbLlte6gVnKE2okP6nTDxTtwf9msMd7iJ+jXujBbEw2X1nQ2HSH9sB26l
+wDOlYZmGxH+I53FhRqW10AsNmpI59U35cdg1Tm57MdxWYf80FF5c+pzzLexS
+87HaDW5vjuhXgV1Dw64awezm6tIHX2G+X9q8GExfTZuIhIsW3pY8Rf7tsWca
+DODk1yvGr8JjZjzvT+q4NzY96pnw2huz9s/hH5QuRQfDvA/SyqOwT8f4lAvs
+yjdLegu3NEv5b4KZ68vZXyJeXWCC1TqY0fvyjRPcORpZqgd3X9MrS4MzzPpN
+WLBMalRyD8w8t8XMkcRrXHFJCvnzRJqj2XDye+YOEzh54IHpTzDbd+6IN+zX
+xom8T/KXfCIfC4/oRl0UQn38Iyp6mTBb/IaUPez4h6dMCTzVtqk8A467URVZ
+CWtzDQz7yXwhH68ymI65F6JmhHOzqduQTfqd76IUAMeVnpkg8ZNrrEQrYT89
+zmM3uKjbz+YJLNlt26wFL83MiIsxaUqwcy6pH/Vcno6UUoVldhx+5gX/fVSp
+Xh9u/VKc9RD9uihhU8OCx/4MSrWEnwVITG2EmcPlptVqNJW5uYtvAvskFzUp
+wfqm3g7rSbw19WEZqjSlntX/rSbZ77uFWAnYzuMqXxae6tHPyFfB/XGy3bOE
+/Oi20483wn03vhjoh8dEHj0aW4V6gs4u1cD539wzrIN/8PD5Kglmx6jePg3j
+9YvdAzs6D3MS4RYFGy0rWEP+r4R02C7JWVwb5hz1fnMRDk2x6pAn1ux17oMd
+1ZwurITr6P2e0tjfsiImXg5uDUt02gkLHx6t1yL5dIUtlsBxWlH21vC1zl6x
+CTj5Z93mfbDr57QFFuq7Ziemk0vq+Xt5YgwckZjC6oLnvBOya0j96lPqokyy
+r3DBI1hfTeySHux3X/r8Szil0LF6G8xb/2DfGDw0rrQYCdMOulG98P7Jk8dy
+4bIH51k8mK36RqGRmGU/ux+W/OTc2A9TS6kTMnD64OUjU+T8BkzlecjXUPFq
+qYgx6uugjI1glweKWUqwgGVcU41+rLr186QWnO8vG6QCd7HX5a2Fu78XreEq
+I9+2M4XEUwusp+8ZeD/+9t62GqblrH44ANfxv2Mqwz5X5PmjSuhLTeLHFbBY
+VVIEG3aPP3ZqnuTLdlj3+UuaMoga/+sFuU+8TRU8WCCxTKWHjGvMP90Pt5hk
+erTAI7ZOihbwpV22dTyYwWnJ04FVfZmOZ0l9PcF9xOrnS1TS4IjdfD9z+HD+
+oPhxOD+2ZsmPxP/o3h4PZ1Vvup4HO1ruHCRuXTlNCeCCpc4sMn+sJL9bA/ka
+rjf8lE76Hyc/EAqbsgs/FsJ1b46VNMLt0gf1L5P8tHPuLMImee/nOpnk/mUw
+TNGPxSsBFRMkPqOpLxCWyzy5eSX6cU1Gv+kErNWgdpcJM4saN2bAwS+CGZ6w
+Y6rLMQ6sLn9IMR42FTUv9oWH0psKC+E6velEXfiJXdG5ZnJeHxo+CbB/GWOX
+kgCOmHBpOQS3Bo/TU+R8Zp9tWA5zo0LChDbgfJhfpCaj3reNT/RlYV5hUNi8
+Ik1t2N9hqgxnGZuLs+Gye/wcFeKFnsY+BZrK+8/aGAZs6rlm0hZequxylCHx
+fLxFmuRpypnTWE/iz1lYK1jA6RFSx99h/7Ha4ebf5XAPyh9WjpB6Is0kQ+G8
+vcIbOmFOtbafJmzzTsy+8f/5Wtm/lsX7ekJ4eQVZXy8V+RBuM96ekQWXCb2p
+bYN3zki85MAMldmpbjjT6rRQDFmfOr51CtaW6Kw+CI9EVClqIL5ALiY6hNzP
+aPbCbtjXof1uGLn/N8u0K2AfpayHh2A/Jctdk3Bcos/RFHJ/h4qNzVFPstHc
+6QLY9Xqt2Qk4ds3+xCuwRhpr7W04bONvVd0wTzR9+QdYe9pBdxqWyTXyXIV+
+ffxrNaWA/jBL3cwM4Dn1IA1TmP21bJYenBmgF7gbdrzlIC4LtwdSNcfh9h1v
+WM8QT86yXlAGj1ldOFEM8yN3v7oJM8SUHexgny1DCwISvz23UoD8Q7cMu03C
+gudGh/eQ+vd4+S/BcS9jtgygP3xRhX4xFubP/LFkTzyjlr0Szn8+P3VFBt+T
+xL4rkjDn7denNeGb3KYcEdj1xOSRtdI01SAy17qAeGXyF6M1pGhqmcH196/h
+kWCx+g0rcb9jKxiDZJwX/jhQkqZ+HPjZ8D4Zt91n/psEvocR190uk3ED5yob
+uE/H80IxcWCB9dsVeL+r1bemE/exfLvgFaWbvOPhusHS4n44+Ce7uyFwd3TE
+kDDWX54KDNsLtxro7PWG97KyKV8y/tlN6j7snFw+S1znoXbWBfnY7DqYHwjT
+Ifm9T+GUkKX/RsJUyaJUHPIPG9XvSII1hhL8JVHf6+2RtwtgmRFNiRy4z1nZ
+uoHYRu6hCPrRUnsgqh/2C2i02gMvbeOFz5J6jfYpZMMJa5r1VEi/FeKDimGT
+x3dObGaR73nM2DF4lVGmVwCsYTQ/zYJ1+1gpJ+GsLR78Fuw3+emU0AXY79Xn
+L1RgfsHUYCvc6qSc6Y58vYZffSMg8QbSDrFRz5N9+3JfwXRTjGUA6tfeKh48
+C0covw93Rv9Knp07tUTiu7eF6or/+7vC5N+nGP0/GR1iig==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.93763702332162, 4.533080933367719}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwl1wk4VekfB/DDRCjcsoy1e4vsImIU5Wgk0oIaJAol2cYyYynRjUTKuNeS
+FqNbphDDVamEQsUoyy1l61/dQQtJN0ZZ0sz37e95PO/z6X3P7/yWc46nxf7h
+bgHiFEW14Jes//9RoSkWWZWxfn4pOP49TV366HHwF9jlSdykMVz38qLsDCxS
+WL/kHdbcpEOMLPw7e29qZhPsG+C80BxxGOdPvGuAVS64q/XAgj4vi+fw7NjY
+1AFVmuLsvXZHGdelawadU1KjKUri1PoQuPlmQOAFmOMvzuqCJcfP7NNQp6mI
+tKIIV8SJ+4FXdYjY2+tIF6y4IJ/bAvvOSmjtRNzwjE85k7Do5uExIWynqF8/
+X4OmhCVGvR6Ia9DDj58L10fr+NTCm5V0Ut7hPMddb0YK64nRmAe1WF2WRkWs
+xGpfa27BxspLHxnfgHV7UcU+a3K+LGmHDVY1v30x/yBOxJvbhnKwREnJiUpS
+z75eTiPWCe/ywjisdG2unQ/WWNVc4y1Y2fejNw0gv+g+z7aV5Hz48x4vuPMQ
+T8UGFly+9uAB6ssPLQr0hE3busNXwZpz71dlkuvtTFQr0Z8fI1fl/A2zjmVW
+W8C86UmTjciDfTklrR393mWvFNyqTuodK2fDHT/wxHaifkFJp5gLzJCoap0h
+/fnwrH0N7Hnr9uw5TZyvO163CV6RtDXSfhHiigc3xcMHZjKpAZhKeUyTeZfm
+8TqjmTTFL+RJ6uP+109r8z/DnCvdpQVwjFkR04yFfPp9mlnIv1FVRtsbpk9O
+ORbD5mlm7+Nggb18jzHqf9KYuSINjujRs7ysSrN3Zd3Ylw6bjmvwlFGn/KO8
+IjY5T9/RC4M3bNlfEUrO/7NdqkSNZs8c+73ZBeYtbv5fE/bNPvHPm8DCwfau
+e9h/8WupxXyST1jwY/Kc1fZIrOhEvi4vLnn6w4ed06/lwlSz3HFJuPz50fwA
+mMUsn8pGfoOjr96sh339BgIYcGmxWD4NC+8sj05CPWFFV7lu5PrRRZ4fUX/r
+ataWQyR+WHPQHjirZ814E4n3o2VbP/rndEtVTZH0w75UFu8Ze9MeRyuSv+D7
+J01qsEr05qFcUk8dd/sLJZpSkhU29MMuxjaV9Uo02/pL1SfzxXje4+I07sLV
+lEzSUTjCssL6FXzPTXtjN8wrlZNcinj/9vRu01pCnueng4kw96+2Z4GwaDB2
+4D3yaTf0SrkAM1RUxvA+srVnTA48ggVHui3HkH/aRUn2OMzqrQnaj3rfOjNk
+pLTwvHzwsJyGhQXutDzsu0qtIAzze7yzYFYa5jurubfBs0dH707herohXl0R
+8yjO/KlYSOK5zkythu97f7FsgKmAf9iOcKrrrEsBybdGZdAM8/jTqUUiHuZc
+1ZL8ini6vzODvWDh26nQMsyjo+72z7Yk321PmGvJ+9T86aYRbLrBJvIe8ut3
+W3ZIG643K7uxEjYwtAjRI/H+4E4Wo74czfHklTBfSztdFb52uoDpSfKd/y8/
+C/1Jr1/xMpncz+bSGnX0b8I/4moNyV9lgWU1+v103tfhWRL/rWR8JNwuZ+Lk
+iPoZrUc562EH1xmtU7AwrTRoNeZpYngndRjm1CZv2QrbJj/daaON69NXP0+F
+v26cPpMOs9f2LuyB3c447XwMC/4NTLBFPop11xYvWIr7L7wVdRPWWT3UZQ/7
+Knv72GB+o53934XCwonXivfglv7rXSkw/6HYGkcVmu0cyjHNgk0rZf9sgKMn
+nIq4sEDCpUkf/dM8yUkg50XF3C7y3X7gMs0NhynpzF182Gp4bJ0bcazVtmbM
+I+9ch48pibfxrN1t7JufqXo2H6Yrt/jnYl9J1757mOR/Z+/ZzdjvG1+0rQ02
+1RPf/R7z2HUhWfUGce8QNwYe0pPKuAyzSjOWiJD/Cc/orBJyvWaf0BduLA+N
+qoIZjQvlBaif12bc0g7zN8TNWYf51DjsTpyARfzOB03onygyoEkP+TCm5ep3
+wJasAaNA0i+ldloa83Fv9isuJ/W2HPbtVKSpnleZVV9If6VvXamFx5gzcZt1
+8H6dzdVrUqTZB7kBr3gwx5Q55wMcz70xKILrk+36VyBeOLXvsLUu+jPb2pdN
+nof5JnKJsOiz8Jok8uP8Oup0HaaXTRmlwqyw9wn9MH/huKMcnr+8h49zxPQQ
+r6CwKgf1ypbp6yvA1IySvgLmxTpWnv49LDTadA/fH3Z30KJb8rCgIyj8Ofr3
+Wr5hxyzi+e7wNVyEfncZ7D7/Lf75yW12mIfBkrdGjbBpbs5Te+z/LPV1pIDk
+W2tqqwd/LmmdiIeFi3UfjyAe7Vnu4U3OFwaG5sK33dQ/rYUFEZK7dWBX1VFf
+s2/1aTleRP5DlXOvGMGsWiueCkxxWZHm5HxIeTrqpYI96UPr4Yjn2/2nvr0f
+IpkgXfL3scsrGvMZOd+ckUfuLy9iimO/ZCCq8xE5n6t98CLmcTK2V1qZ1N88
+KbMH/W+LTuv1g3kdujM09g8L1FOuwKLqjwOrsR/DpOQk9PH9FN6t8ML+6fRz
+3u6wSNnr91zs33Z4EVRInOzk8Q771jHVgUPkvEY1y4N8f8XevF5qAO//oNgJ
+e+1N+OwO09/5xXiiHvHk92vjYQFbVVqIecr9MKaZBbPf3/3FH/Mr+5DCPQuL
+Rldd6EE/rIr2ep2COdOx2jbon+8pk5fHyL7F2yOpsLP4b5pRsLDqPPc65vtk
+V0bmVri+vzCnCT5p6ieznNzPeHkc9qk5IUGnZMm+1I6nR+GGwJ9dRpA/y272
+HfneuTpbGglg05U5Rzpx/9PlBcIaWGCWVOcJD2u4VleS80khTR2ox39kcv9V
+cj7fLgPfG3bM/jyHRtIP8Z/8KjCP44Urcl6Q/a/OXB3YPK16iRTub9rDki5D
+PzXKHKk1MIO1YWId/Fvwm9xE0o+C4fApBZpy8OmobSY297V5ACvN2/BM2RDz
+XfVXzi0Fmu1TkT03COazmPMfwn73Rctq4PqNJ45O4zwjdmiNjBHyabVzdMC8
+oowPb94KR+joqV2GR+/Q97OJFwQnsTAvxrK5iS0wJTckW4h8rZraBsa+7Tdc
+MkC9cQovJOWNMU8Pt/EK1Ouc41OiCXNcum4aoj9mRalrmTAj6CebPMxTpBcy
+qQjz9gzlj5C/H/5sDkXOW2Ut0cV88n597TGI+IyrBxN+hA2lU+fcJR4JHrOF
+Q7/Ucc6R/KPeRWpgPtEjIQoJMMdQ73Qf4mcnpJ/cCQuZa/MTYINFYaMOsMjM
+W10G99PRE2RbwfX7cwZTkD/VeyXJAuaHG176jHqti28ybcn5xJGcvahX0zl2
+qTu5/8e0eX2Yh3Vl2ZkDxMsndLfDCtTfj0pJPvbjIcPo97OVB6LekniMhwHZ
+6Pe80L/Sl6E+QcbdAE/sR1eqXI6HTRXW2dvA8VsjxdrgiMQ/rWk4r8z2GHMZ
+9i91de/G9SFds/oRMH+L0Zc/YGpN+asamEH+34F5zSWrCf0fLfyUIA==
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.562492355174517, 10.345769235517452}, \
+{1, 0}], LineBox[CompressedData["
+1:eJwV1AlQE2cUB/AtxKMdhOIRznCUw9QjJCgKHrBIRJpBDXI5IzoUMNAWk6Dx
+YBgBL4gilSookgBB1ECNgkgLo4gWVDICagBrEBqUZhALgiBqihT7/zKT3fnN
+2/3ee9++Xdc4yZadZhRFifAnZ2oWObjT5Ehlcmkq+lm5SudGUxbfZkXEw68N
+xSuK4PrSXIUADmwL4G2DqYPrtCvgzunGMCY81epwng0nZggL279B3LX7lAuc
+El/COQJXN80ZdoK/vJ4u9IPXcGQVbrCyaWDZuCtNGbWeaRw4LtxprApmb7+l
+94clF7yTZSQ+5DwZTtbPVdKBsObXf43J8D+aiSobcr35kn1y2DVdkm9ywfU8
+pvgS3NNZE22Ej9aYpzfBLQbRyHO44YF/lAEW8Gr0PbBesbT2I5zKVSwcgGXs
+fskcHk3teTw/m6yn6johd4I3hglCrZEvwc7faxHM8snL5sDuk5rHXrAywc9u
+E7ymYweTeGaVVLsLVkmXTSyEtZMu23Lg2NYZpfbwTb+hqxfh0ANJp2bB9UfZ
+rXUkHpSfNop6Gt5SVDM8EXdncyds5V07cg8+qfZyr4VzOJuLG2ClZDfvDNnv
+Ka/MSpLP1q85BX7WPpBB8smDExeFwb5eyyfj4HyL19e84Xm/2DVy4WTR60M2
+cIm3p/kH9MtI/q+agoNGtsfUwoU6pY/BC+s9C1bvgk261NYHsMCv66MbnMlr
+HrsFM4osGTecaUpaKR69DZ+s3MVwhWNDVh1qg5uSJr8764T5SMzsHYAPdKv6
+mLAs39AzA/mKgjKjLrNoqqtvucYR/sqQXboBDmG2dZB503J0Q1OONPVCHuRM
+5kEfb1HQAqt8WAIpbNb9ybICVrYcNsuFOdFF/cXw8inxlBrOO+d8Qw3rpy9M
+34HHkzWhzfDgEd0o2d9H4VTDG7jtfUp/P7zPyk/shvyDGQ1Ow7CnITg6Fp59
+Ln4ReT6FTftZKvjkSF37ELzEuD7EAFec/byA3L9lOEVK+tM4vorogA1bEiR8
+mFs1l3UbfrtYn5MAs70nVpfDHWajZXvg2BPs68fgawnTfAl8b7q+fCdsYX2l
+OxL2DaiN5MN/BvqqPeGtqReZ5H2SLRb2vUT+rR4yH3PYxB5TyOGkqzXGVuw3
+J7yg0xGuD2jsL4SFufP4ZejXNLE6RgLHuLIi7eDC3k39QrioouCd3IGmaN3S
+U/5wBEuYOGGP5+a/ftIX9s4yucfCwh49j4ZFE/YlT+wQ//TDzXA460motQCO
+HRs8sxu2eJsW88QW81KQylfA3NObO0Ww9l3UIKnPaeM2h69hZdoCty9Q/xrb
+S1aPbFDXwYx3LGJptaYMNv7+ve1quPqhcUYOLN3DDoyG6d/u8o/D3ILnC8n8
+VxS8vF4E5z1oL8mGL+5Ib2mA9X9HFJ+HH5r9HDoM13JeCC7DWRl793uQ/GU2
+s6/C3HQtMwE2HczdS/xBJmosh+Vz/9hP5ul0ktXHPpihDPZVkO9Zr1Q8H/26
+P53lfhymxJc91sJ3zaoHSD2zGauUUSReJ4uPgm+Odb3fDucb5VdWknkPtrAL
+I/v1XjXOhA//OHWfAwv/mskYwv7Yc+6Wf0C+enlcZCU8ruDxK2FV6V7xTzCV
+08oKgfPu37i1DPZd+SbtKfqjPNpFDPjRS7YogvQfIQro4+B95KoztEzEN5xX
+34d7U6f7fGDTWutj9bDpjdsr1QLU7xO3kpghCbO0hNk68/x7sMvtnrpD81Gf
+i8NgLzzyGb95uI+cOfT/y9lRKw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.058738695939086, 17.601506520304568}, \
+{0, -1}], 
+        LineBox[{{17.000000000007276`, 16.500000000005457`}, {
+         13.500000000003638`, 10.500000000001819`}}], 
+        PolygonBox[{{15.552322615314452`, 14.01826734053906}, {
+         14.602165824326175`, 13.183281069670574`}, {15.293188945044921`, 
+         12.780184249251306`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.984057296392571, 13.323799910437668}, \
+{-1, 1}], LineBox[{{17.00000000000185, 16.5}, {10.000000000002592`, 16.5}}], 
+        PolygonBox[{{12.9, 16.5}, {14.1, 16.9}, {14.1, 16.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.5, 17.4452}, {0, -1}], 
+        LineBox[{{13.5, 10.5}, {10., 16.50000000000182}}], 
+        PolygonBox[{{12.052322615314452`, 12.98173265946094}, {
+         11.793188945044921`, 14.219815750748694`}, {11.102165824326175`, 
+         13.816718930329426`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.015942703607429, 13.323799910437668}, \
+{1, 1}], 
+        {PointSize[0.04], PointBox[{5., 15.5}], PointBox[{6., 5.5}], 
+         PointBox[{17., 16.5}], PointBox[{13.5, 10.5}], 
+         PointBox[{10., 16.5}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T12", " ", "P1", " ", "N23"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdgei/fgfjhihjij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdgei/fgfjhihjij.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {22, 22}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwl1AlQE2cUB/APCHcCEQ+CF0FaRQckUEhpPXaFiigKVqmg9SAKFB2O4IgX
+kaYanKBSDqHGTgQUqyjaIIOAghiptkQQqSgGSjEIIjKEQwRBMtL/2p3J7Pzm
+7fe+9963G6ed8RsijQkhkfgxd9I8iWsqTT5d7jRJim5wVsD5mzkmdYtpcsZy
+IsURpoXeI7mwd4wh6awdTdQlmReOwLMTfu+3hLVFMaJo+KJql3viFJpw+Zkm
+4XDr48O1L7g0cYkKfBQBS3k/BQbBY3OT9u5n4vXs5SdsaRJg/9whm4k7Zisz
+bGhycAkVVQV7nb58q4xDE55XWYoeFlxSU8awhfP2lZ+j3tH7WcsPsGkS9ka5
+UARb3Er6aA9XPNiemgt/ppG87rJG3s7AolZY3PhI0ga3cbQJlgKahER8FTsB
+K9Z0h82Dp81OK1+K9dKKQr0QbuWkdZyFIyajff3hMJ0NZY39laenFgTDageB
+vxxuFA4qN8DJdmy9OeoPmZZmwsS1Bj37J7hYfuntNzAr9e6fvTBXNVrvBY8a
+/dC1FP3r7o1/6QgreW88xbBr1bNpprDsRMLfyXA4P0rfgPpDTF4kRMCFJTq3
+dNhnBkc+F9aORKSvg105TyOvIf/YUs1DNny8OtXXFhbE/pz+GPPzyVG5rUG9
+0ukRUQq4LHu7XoT+LEI25eyGa+w7NFsxj2Lb52YrYTbvVoCvFVxZ6uUKb9pn
+0TrTEvvdfWXPh6Mru5MGzDGXnNY5TvAMu7xQjRnep+E6Z3dY0j512w1TPF/g
+c3A1/HDFrzoVC+f929GXcbCCI6PqTTCP7tDic7C/zcp0NqwN3ljbBF+NK9qS
+aIx4vOU9G/TTM2gutoR5KccmAmHWrOgajRH2W2imlsOlTZ47bsL5ia+/r2Ge
+N5w5yMSli92oUTiMtUNmhPU9/25iT8F8dT73YkPhroK7751geoar9g/Y613Q
+bDe4pMhGvBz1GAr1wx4CJv8S/2o4Y75qmQC+7/Te42v0w+o9S1zguMxD3ldg
+btSWkw5w81Cezhj9y450ipnzHO2WX6dgntCP1YJ6InIXbdwM60ytT+TBvOrv
+rALhRr+sJ+Fwcqp7zRR4cF7Tfkf41LKXK64hv0XCQ9d2zEcr4gpnwWqjm1fy
+4PU9iQtFzPwGQmRR8Id8s91HmX5npfC84Vr97acyzKPCemMsh/n+RNy8eIJ4
+XuXcITeaZN9mGXI+UkTqORnYAa+tv3OeMlDEZ1XwyXa4T3H9SP84RQRe2zp7
+4OJjgxdL31NkLJNbNwm7tGtcC0Yows+Ndp+H/NxHnHjNMEUU71b9GASH2P8i
+8npLkTCTK1VH4fwug3n/IEUqPJKzmO+duyPW+sMARUj0urhx5v9AJr1a20+R
+weJYpRD9hy+YCPKHxx4XRybARLS5ZTfMd/jC7TKs9rHlOGM97W+V9gxm74o5
+74b8vEMK8Qe4L6BcMAG7+N+YbsWcX+W4Re8QRdqyyh9wYfacvZk9qM8g9Rxm
+rBAuSulC/VvXxmQwz8tMD1TWvUP95JBqgsmn8Rs4hX6Jp21WM7OfVZ6EN0oR
+i7TjAUw94jN72CJY3b2/Jp55XzOezN8K88q6VnvCiiHfS8Zw4WH+niH0y3fq
+M/0W+aR2LU0q5jy7EuWrsF+P5DQlZr4nY2/vXtTH86gPZs5z7YLJIhr160Ys
+9xkx86QnLxRhHhltjg3NOI/wPj9VXC/mMf3+zHJ4/T+RQb2vUN9fktwCWL4r
+dOeKDoo0Jpfan4MFT5VVghZ4UXoZExfv0ccsaMT+US2f1tO1nZKSavTT4BLG
+5P90Xbzz/30x/R8h+kp5
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.2761166322027524, 16.884033677972475}, 
+         {0, -1}], LineBox[CompressedData["
+1:eJwl1Qs01FkcB/DbZJnFMgyKoxojPeWV7anmrweKCoW2nWrSU1o7JVJLHq3X
+JKaIHtLUqdSUkkUhNdFmNctO6JSIOdrooZo0FZrY7z075zj/83Hv/97v73fn
+/x+70F8DN7MIIXvxR6+kYxifUQzR0KslQy4V9r7KhMk/Hg1Z8IH9BgpDWGrm
+sP5H+Bbb5+MeK4a4jEsf9cmCIZdv6q634f/SNyP1m2Ar/p/n5sKykFBFA3z2
+uPD8KVyZHLvlL3EtWPlqlwGuxRYmk3iYF+l5but+LkNEI9h+u2B2QP50A1i1
+7O3Gp3DJTEvZeXPMr77+LRD7nrU6sk4I81obHz6Cp5XrdTvCKp9YCyFy+hZ1
+rR8Fy24cbeiAu59xL9jAaqdqt5DRDGm63BzgDhMnx+HbsNvG2qciev9Q7T2O
+NUN0M07eOwlr/Ba7+cCL6qa0dsLSnfa+oXDB3qrwicjH0+NnroWb+RFnd9C8
+d+rZc2BHkfruJeq1FcEDWF981WdPK+zi1ZZRQPdT+475AnOqM8yc4IKt5v1D
+MIms2FiEvGuycza/g/1vPGjmw4dPXBmuhRkVcTuKejXP3a/G0/ms4Ggj2F7r
+dZFP1z+8bksG+uUqSd90jfbH/495Y+FfmkP2Tqb9kK9cex99Vz0TRhw1w9XD
+XD8drnL6mtjPYYgiSGoXBq9URm9eDUvjpLbbYJMPp7ujTDH/VmpLMqzu5NT5
+miD/UuFxBcw+umLkvB+wv+nchZbYz4+zTxVojP22hf0cDwdHFUpyjJD3Hit4
+ALbqrw4ygF0ay1tjkb/dmdVWZIg+1feYjUS9c4wrJqTB6iyWQTIsEucWZsPF
+0cf7v8LmVt9WKKmrS0s3oH+KA+sfT8R6jPR9TzEcsyBytIzu9z4o9AWsVkam
+TkYesj19mQ4ur4+tvAn7D4kDtPBNvs03T+RXm5w43wDrBk/2VMCiL2EmErhm
+UkafJepNSFx03xFumdsy5AeLEhtXViJPTHypMgQmn7eumAUPHcpd5QqLRzTZ
+FKE+2486s8dYj9NZmDkOJiZeNktov6ofnclFPxhNHk+CPGLPFFNreFIaCTyN
+/OIzXFKE/h7TSsylqNc/NrQihD43bvJTm7/H+X66smYMzJ/RkDmFjfUqXQoJ
+rPvosPq1PsbH7OpiwfkTcq4Wf4e8HV137OHXMa59aXoYD1Zs2QA7pUw6GTcS
+6/d9Tr8J79bzKcljYbzp0ZHxyGN+f4qwYwTOvy6s/TSsfdIWGwy7ZMXr7FFP
+prUshkXHd+ZbyeHAUgvLLoJzaatyn4p+ROxwju2DZQNBZ2SwxPGLyAnzxdb2
+8/XQT8P2UYsyYenn2c3+8L7VrS1s7K9xkgQmwZVJ2WHZsP+tpca5sPC4JJ2P
+vJqe8of0fGy5gkQ5rFav1qPfh/LQsoFxqE8abnvYBp5xl3swBuasCXtMz8tG
+47zwMvXvqXFecFqXp/V12OV+vHst8qeYPPdJhsV6ByJmwheDFFkOMInJNJKj
+/nMHO5YewX6Kt0mED5fGaHc2Il/xMcdv59E/nxfcnZ2oh1jWWXrAL9dldf2N
++kUbhLtf4Tk1zvP7iRkWEIVzv2UJvEP1zPQvnYC46HPyjsH59d6vvAcFRDpU
+ZVYAewyX+D7+IiCabVGmNfS9Y7OgJeMT5r/gZtHzXTUtxS3uo4DwIqvGCuHx
+qje2lR8ERPYknP2APu91heEBGgFJyNNkeiHvxbJw5bF3AsI8sJ2lhGN6/z28
+7q2AqP2O8ALo93OwZEJfL+73frLqISxLDuR5Y1x0m5m6GP1SGUb5e+N+zSHz
+ExeoM7Rdze8FhFN/KlkDu5ctjH6O/Xj2S1jj0H8yJU0+iDy8GwtSnWGLoU1J
+o5GX2C82tYNFeaPzHbRwVr2DFvdrU5ZHGNH6puk65XCGSVJ4GSzzaLzrA+9u
+rzEy/4z+HUqUNiFfr0J8jQszL/stlsOxT/auuI75qoOvVXdRX3uAa1831i+W
+V8ndYYutzR1l2F96dVEOfb7ae60Oje9D/TziOp2eFzs/YD7yM8+nJSjpe3dq
+a64D+sFEeWb9Rt/Lht3Tt/cg32DKLG86fme2MqoL/VX6fXChDpWPfftUQPyv
+WMlnw4rsjXEzHiKPb3SNCE7QGdsuVKCfuyeYnaPvcfpJqP7/95fL/Ac/lbt5
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.128720493773297, 4.310154074720437}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.00000000000273, 17.000000000003638`}, {
+          17.00000000000182, 16.500000000003638`}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.286281316503036, 17.427512100981787}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt2Hk81FsfB/CR1CiVaLHFyF6WocgWo5QlISkiTIVLISqlcpElQnJdSWWL
+7EtTIVLT2CJ1rcl6PVNJlKKypzyf87ye+cfr7Wzf7/d35syZkT560sZtEYVC
+UeChUMhfyvwCXusZlP+91jEoEjyqB+1EGBRasnBoBGwq+0K9HvYdLV2YgytW
+KQftFmVQGGmfwhwxTrDoiFYXbL33u0QWmSeoM+mUGIPClOVd0QInR+rYC4vj
+/4/VR/+FZVsaxx/CjO9tlaR9zSC721KCQYl/HNyfDZfSy5oHYEGZZsFjsLFv
+sojLBgYlZNFpk+Vwooww+yXceuevM1mIx1rzdqW0JOb7EWSjDgso129wgTNY
+E2JVaxkU16uCKmEw7b2krgkseJx6LA5mKukt9K1hUET2m/qEwr59aZbBcN5x
+lvhRuPX2R3stuHvuxRZ1mNXW48AHJ9KpFhMkHkk+zzFhBkVbRT6OBXOsysym
+4LozTgEn4IwcPhcx9J+Yjby5CR5fKZfpANOCTlv8QH4Zd/hYpWQ91XL/JpjW
+2Dski/ioXZompbBvz2xCDpy3fK8AcfzKH4pbkV9A0SqeVzDXeW10A6y/OFfr
+Fxm/ZJW1A+oTqC5x2QTrxfsslhiCWcqaCfmkXpoWH1zxHC2MLbtpyCdegde4
+DR60YrbkwxTFgYfyeI7DWqXCDCnUk7Pw8gjcaqSQOgCHFEp6hsCHD7F+G9Iw
+/tOPhkuwGPPivmsw0yI/zh0O4tl4rRem53TU0eHH/RYaUtKY57Pj4/dYjzNi
+stSROOzqQBhsbaptEguzDhpfWQcnV60quQ8zirkVdxD/2S+q0U3w+H31xs3w
+p7rJujcwM/2TVBXyN47ofk88fsX74wGY0TLK84qML2FX8MC3Ig1qHpH24T2O
+tajnspzreilwxpH/RKXBdTU5AxdJ/6KkZ9fJ/lj0xe4QHFK9TqYA1g+447MN
+pk0G+PTByU/+eCcCU26lTStg/mEPOzMKbK1SUxsLfx3jGx9D/ty1pkV8iHfr
+PfGnIzDlGDXhKjyQ0CFK2jP0k1Mkka/BuiguGc84GRH6AE58LmdD6sV8s7Rr
+B+oXzVgibE78zOPQC/gon6NaCPG8+Q4G3mdxo9/kOWS8nUhMJhw7XL2wdCPW
+15VWHoW16h2cD8CtBj6WYnjfqcbyZ2XDLMs+n83w/CfTZVMwZWWTrxRcLjPa
+vFMGz3d1ePo0xps+dbKIhVur9NLKYfsD5lL/wL7JfiZMmF0gs3OxLNaP3vfn
+LOJT1Fi1mQ77rjjwJRLe5CTQaQVbq61tWg2HOru/OQpniLKCUpHvJ6Vupic8
+vsvfRR1eck+G4QoLcoscO8j58qduqy1p/84ojSLnS57fqD7M9Wh/fACODo7v
+liTtxY4p22GxY52yvxBfyMcfOjvIeGHzuF4S76Ybq11hjsvX/krY2lBIO5P0
+73CoTiXtY4dd52D7lLCHUTAr881yT8RTYqH1OhDm5lLjRmDqqZftF2HB7jbv
+s8hH12Nf92XSP0nnOj/qMW+scT6N1C/obkYKXPR8SUkNTC9+oaKE+gaFjHV8
+h2nUm5vy4Yo/fEtVED/LeidtPd7HQp+9E/1gplfdWR9Y1TnB7Ampb3FRcSHs
+vl74wHI5rP/oeCQ5B44uXFl0GB4//Vu2FU5rcLtSCPseZAs+gsunbdSmYVp8
+/rYwmC084akvj/lbbrZtg53bTX4HwL6/Luj0IJ4kIx2JQpgh4f/IC17szOff
+BlvTMw1nkE/BvSN7PsPconOKoXD465TAGZhi5dcvCCc8Mg2dhWm19dEF5Pxw
+cvAagzlrZ3ttYR8d6us+uHXnr5w1cLInfyMHzqAynn1BfXcPKj3MIPHpRFe9
+g1c6exsEkXiuTfVOwNqX1emHyfq2MRMyGC+p/8FsO5l/keZ5H7ho6qecLMnH
+jD+yjZw/HdXrheGQe4MCZoiv/UXqSoH/9S+cb4EV98oFCcJ0MfYVJvKdcVOy
+kIYFg3N9J2DJqNv1BmT95mDjCNRL5GfHLQ8yf5gdWwDnKtvZ430qma/r5bII
++J3eMaV/SX5lVKER2H6zzUVZBax/8mn5VpyzFg57wv3gjNuzVDdy7hpU51XD
+46OBxwPgwYpn8kKK6F9RkelDzukyXm0mTP875q0p3G9vsjUftpa5zuIn7WFi
+Dz7BrLSujlKsNxF8/+5GJdR/0WZxK9g1TMffCrZ+Uy1PPleHdC+s84XpW9Ol
+PeDd29pXh5P+84f8fyDfW7u+xsbA8R19Fy7DOUmTJpHEV8c2K8BFj4wSA2DO
+YY+eXtRv1Hyt8RFimVMj2XBrg1jiTnhcQ+tODLxMoXoViac1//T8VVjozku/
+BRK/1e/EYtg4NDl0QJE8T5vbI/DX/c8mq+GMxGSuIdaL7ioxLSL5J6R/K4K5
+ch+z0mGaRqCRMuLXNbTgpMLMttojFWQ/T/W25ZJ6uOfv2oP8Y180BLAVSVyc
+2AE4cA2n8i2pb8irthOoXwC3+JcgqU944+woHH6PR3QPzG1lBh/G517NOUWH
+OJi5Tu1RGawqdzGtGw6JPs0/CeuX3vVS2IT9csFwlQDOdRuGtnAAHKX3+tdK
++Hfg/IsGmH60NJIXfhVv/Vp4M/ZP62LlToxn11GyDsHxP/n9YuBNt4d/JMGC
+yg9kVeGSHX1fXsD0gBXBNYjPNfP8tm8wdyzI0xJOpvUvFVBGvm4Fmt3IT7Fs
+B10M5nIcrNxJviK2khIwxUH+y2/Uh9LU+kYI5mjk1ObCnOc/hxcwH7Nhgu0G
+3yqydfwAZxzvq9eHGU5/JdTDNNvUK2qwpbDA1izSfuOhqyFswRXiu0RcsMbc
+i9zb+Isaj8CMts56cm/x6PTfYErakyVXrUM8v7VMnLRg1v34TbHwgLZ0iCrp
+73RRXAj5aHt282oQv70gnQlrHcrqMSL14o1Z0EQ9hlJOOTgTF0iaNcASQ5k7
+Ikl9RGu6FVBfj28GZVWwRwm3yBVmu+bvnoMbdRJib8BxfJtXGiH/+AfhzmxY
+0jD26VU4StQlrQt2X5L09F+Y5hZ68h2Zz0XUUlUF40Xv5w7AOVLfcgNhwQei
+ba/gRPFDUs9h5tUCmRLSf/SbMVUVdf3EczYcXibYw2sEJ+8olbeBi84fqfKB
+AyQXLYiS+L6p7o+HmX+00NjIJ0PziWk28V7mBjPYXT+7rBhurayx7kM9lL09
+LAvgEI0O9gW48WbJoRTYOmukQRlOfBqREUHGd3kOTaK+dK999h6w736fcz2w
+mNOlpSYkvl7tv4iHPzi7y5L+5Z4jU7CX96ntvDCdR/8VHfP9viW1cwj5sdZv
+kYsgz6eTNtcCc3/+kzwOU6khCTVwiC1viQ/i9ZWObX4Gc1oj+ObgiTzRL41w
+vK6w5W5S33TxWwMw7Xz8snhyb4zaP0TBejRx58Wk/uWDwbvVYMWeSiVyz4p6
+KHyLxE/98zPLGqbulNUpJPFyH+sGwXkGb6mTsPZc9VgarPXm5vWdajinbek3
+yD3SfNkK9UTY2nwou4zcmyavCg/CGUoquwrhkUm6oQgd5/6vCuu/4SO3u3z0
+4Pj7AhYnyT3QUfmMA2kvr7UygsMtJJ3PkPaKvLHl8KO/n1yIgkXaesTaET+H
+8colCebuC59Ognc8+ziWSif3o5kqJ1itc9gxHW7kTF1WguUnYmi36eT7AeMU
+qddl/eOUBJjDbs4sh/8sS5wLJ+t1nUkh58PB58YG/qRd46lSIPxzVEfCFaZ3
+uHGuwAL7zk/ZwNaBB0+WkvOrYZvaTpj1bvhfMr83vXq9FokvfZeqCtb/aEzn
+KsO0senQP+BaHk6UIpz89cZ0PjmvZLw6lWBTN5MH3+DZpvPG6nC33cwNPeRv
++KcT1ZC0SzWfCoelt5nz7SfzezaJvoC9ZyLbvUh8fX03luCeufrcpWcxZPzl
+E9a68N0U8/4SmGKXLXUUnvLS4usk46VHzwTCF3m/jM+T+LZquEfB5+z3M+TU
+kd/k7qoI+Nhk8DULmFZ3dfwM3FT/6bIfHHB8nm4HS7vxjibAIX6FJqqw5ism
+6x7MGCm4Mk/2T0nz7+ewPVelso48f7sbu7rhChm/91dgd6GY7e/hjOlFelbk
+e0C0z5ePsKKSwfh6OG4yO38IHp/j8n9Effg8pAW5sPZkjuEzsp8bnlA6iQse
+dmfCgYV+CWS9GT3va3/D5+K5fOUwVXtjYAIsdqur7K46qXfo0gx45M31JYkk
+nuC/PlTBHWk3bSNIflo2oh/gR1bN78+T/uLzFDHEo6A40nKK+KnccXt4w8Xy
+375w1ORIUSpcmk5Z60/mU6t8NQRvmbrpE0zaXYxS6ahPb+6oaDwx++7IOXjO
+yKQrh9T3H7GUSlhNeEy8Fk5uXz34Ha652C4yCHMuzNpL4177+EJUHVUD56MT
+VYR8j+hulx5Wg023xPYdhB01VFTtYe7Bu8sOw/OXt24Jgcc/ZHFs4Eavj0k5
+ME2Z81IPTt0nuaKJ9E8SzxKB9bjvvUfIfC55tp+xfpAvu5Z3C/n9ovZEOVw/
+E2UnsoXc49ltZP9YG5pVysPxdsP5RnD2/qR6VTjgNnsTFR7otsilw6wmvbMd
+5HnvC+xUhhUVpE7nwIW6uStkSX8rofwweJFEqvl6mGrgLu0NX49zqVgKN3JH
+9rrCqx/mZk8hPsqs4LQn2S9N7NMfYMWbJhrkvCq29IvoJPlmjTAz4Ev8YyqN
+cAjf520tcFX8iQw27LG+vYXEl+5v9rYSbv1g8MQcHjkdWfmY1KetXykBdt+8
+vLganqm24OmHlW8aTTTDHJb9CjkZct90Pf+O9I9L3ngcri6P6PlJ2vPSdufB
+spUHPcUQv7Zzw+t++LuP1/btcNT0YBofvneYi6RpHiP1zNtClYbf544ti4Fb
+zU1FVeGfzoddHsJ0Pd5YZXj3WnZzLzxz5kezBPyL/L605f+/L8ky/gt6ApWe
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10.791777955940793, 5.1492961558718795}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwt1ws0lVkbB/B3IpfI3ThyGYQicXRMufcOckvlkss0ZUjquOQ6RKmOiEMS
+M0juoRw5M6iJQo1KxSRDLp1vUDQ1kT5RCpG+//5mrGW967f23s9+nmfv913r
+aO4Ndw9cRlHUffyT5z9/6+h/njp4DolGOcKtmqd4b7Vpaui/ur9kwtwfTfT/
+hDm/fHWyG9591aujAWY+S5+RMKAptomfWRo8kv+txWY4uZKf6w63Z7VMsGEx
+C1MvBbhOoWk+Fc5ZXk53r6Yplx3Ddwth7V5FLy7MeZG9uhJuzx24aQ2rjr7a
+dR5eNDP/9b0WTVV23NbJIevvzAbVwose7ryjsN3u2tmDsGR4WuD3MD8325YF
+M+6eN7KAOec+T1JwnAdXUR6mH4xvEWjSVOe7wW3jqEfBM8+4CWa4e2u0wi5u
+XkZVMFeQ0XUOHtPjbi2FX78bTYiD26aUNcvh1rhfVX1Jf4qyhn+BOYtcHxf4
+mlyIUxscqieZZEfWJ5/qG4HFrHPSHODF6rUXl5F8TfmvPGE7/8raNXCRsHh9
+ODx3J/XWNjiZoRqdA8e1dJ2PgtsfOXjfIe4s1cqBR4bSVRdgV3uuaR1MWTuv
+MUd9nbK7pO+S/jxuzD5G+vWhX7UHdjUw3HwP5rYHMHuJ5VqmpdYj34FNx3+H
+n1cJ+3vBCZFB/AZYWCvdrQAO7azqPEvy+T2mRkDG7Q8EhsHcgpkz0oY05RN+
+5oAFbLlte6gVnKE2okP6nTDxTtwf9msMd7iJ+jXujBbEw2X1nQ2HSH9sB26l
+wDOlYZmGxH+I53FhRqW10AsNmpI59U35cdg1Tm57MdxWYf80FF5c+pzzLexS
+87HaDW5vjuhXgV1Dw64awezm6tIHX2G+X9q8GExfTZuIhIsW3pY8Rf7tsWca
+DODk1yvGr8JjZjzvT+q4NzY96pnw2huz9s/hH5QuRQfDvA/SyqOwT8f4lAvs
+yjdLegu3NEv5b4KZ68vZXyJeXWCC1TqY0fvyjRPcORpZqgd3X9MrS4MzzPpN
+WLBMalRyD8w8t8XMkcRrXHFJCvnzRJqj2XDye+YOEzh54IHpTzDbd+6IN+zX
+xom8T/KXfCIfC4/oRl0UQn38Iyp6mTBb/IaUPez4h6dMCTzVtqk8A467URVZ
+CWtzDQz7yXwhH68ymI65F6JmhHOzqduQTfqd76IUAMeVnpkg8ZNrrEQrYT89
+zmM3uKjbz+YJLNlt26wFL83MiIsxaUqwcy6pH/Vcno6UUoVldhx+5gX/fVSp
+Xh9u/VKc9RD9uihhU8OCx/4MSrWEnwVITG2EmcPlptVqNJW5uYtvAvskFzUp
+wfqm3g7rSbw19WEZqjSlntX/rSbZ77uFWAnYzuMqXxae6tHPyFfB/XGy3bOE
+/Oi20483wn03vhjoh8dEHj0aW4V6gs4u1cD539wzrIN/8PD5Kglmx6jePg3j
+9YvdAzs6D3MS4RYFGy0rWEP+r4R02C7JWVwb5hz1fnMRDk2x6pAn1ux17oMd
+1ZwurITr6P2e0tjfsiImXg5uDUt02gkLHx6t1yL5dIUtlsBxWlH21vC1zl6x
+CTj5Z93mfbDr57QFFuq7Ziemk0vq+Xt5YgwckZjC6oLnvBOya0j96lPqokyy
+r3DBI1hfTeySHux3X/r8Szil0LF6G8xb/2DfGDw0rrQYCdMOulG98P7Jk8dy
+4bIH51k8mK36RqGRmGU/ux+W/OTc2A9TS6kTMnD64OUjU+T8BkzlecjXUPFq
+qYgx6uugjI1glweKWUqwgGVcU41+rLr186QWnO8vG6QCd7HX5a2Fu78XreEq
+I9+2M4XEUwusp+8ZeD/+9t62GqblrH44ANfxv2Mqwz5X5PmjSuhLTeLHFbBY
+VVIEG3aPP3ZqnuTLdlj3+UuaMoga/+sFuU+8TRU8WCCxTKWHjGvMP90Pt5hk
+erTAI7ZOihbwpV22dTyYwWnJ04FVfZmOZ0l9PcF9xOrnS1TS4IjdfD9z+HD+
+oPhxOD+2ZsmPxP/o3h4PZ1Vvup4HO1ruHCRuXTlNCeCCpc4sMn+sJL9bA/ka
+rjf8lE76Hyc/EAqbsgs/FsJ1b46VNMLt0gf1L5P8tHPuLMImee/nOpnk/mUw
+TNGPxSsBFRMkPqOpLxCWyzy5eSX6cU1Gv+kErNWgdpcJM4saN2bAwS+CGZ6w
+Y6rLMQ6sLn9IMR42FTUv9oWH0psKC+E6velEXfiJXdG5ZnJeHxo+CbB/GWOX
+kgCOmHBpOQS3Bo/TU+R8Zp9tWA5zo0LChDbgfJhfpCaj3reNT/RlYV5hUNi8
+Ik1t2N9hqgxnGZuLs+Gye/wcFeKFnsY+BZrK+8/aGAZs6rlm0hZequxylCHx
+fLxFmuRpypnTWE/iz1lYK1jA6RFSx99h/7Ha4ebf5XAPyh9WjpB6Is0kQ+G8
+vcIbOmFOtbafJmzzTsy+8f/5Wtm/lsX7ekJ4eQVZXy8V+RBuM96ekQWXCb2p
+bYN3zki85MAMldmpbjjT6rRQDFmfOr51CtaW6Kw+CI9EVClqIL5ALiY6hNzP
+aPbCbtjXof1uGLn/N8u0K2AfpayHh2A/Jctdk3Bcos/RFHJ/h4qNzVFPstHc
+6QLY9Xqt2Qk4ds3+xCuwRhpr7W04bONvVd0wTzR9+QdYe9pBdxqWyTXyXIV+
+ffxrNaWA/jBL3cwM4Dn1IA1TmP21bJYenBmgF7gbdrzlIC4LtwdSNcfh9h1v
+WM8QT86yXlAGj1ldOFEM8yN3v7oJM8SUHexgny1DCwISvz23UoD8Q7cMu03C
+gudGh/eQ+vd4+S/BcS9jtgygP3xRhX4xFubP/LFkTzyjlr0Szn8+P3VFBt+T
+xL4rkjDn7denNeGb3KYcEdj1xOSRtdI01SAy17qAeGXyF6M1pGhqmcH196/h
+kWCx+g0rcb9jKxiDZJwX/jhQkqZ+HPjZ8D4Zt91n/psEvocR190uk3ED5yob
+uE/H80IxcWCB9dsVeL+r1bemE/exfLvgFaWbvOPhusHS4n44+Ce7uyFwd3TE
+kDDWX54KDNsLtxro7PWG97KyKV8y/tlN6j7snFw+S1znoXbWBfnY7DqYHwjT
+Ifm9T+GUkKX/RsJUyaJUHPIPG9XvSII1hhL8JVHf6+2RtwtgmRFNiRy4z1nZ
+uoHYRu6hCPrRUnsgqh/2C2i02gMvbeOFz5J6jfYpZMMJa5r1VEi/FeKDimGT
+x3dObGaR73nM2DF4lVGmVwCsYTQ/zYJ1+1gpJ+GsLR78Fuw3+emU0AXY79Xn
+L1RgfsHUYCvc6qSc6Y58vYZffSMg8QbSDrFRz5N9+3JfwXRTjGUA6tfeKh48
+C0covw93Rv9Knp07tUTiu7eF6or/+7vC5N+nGP0/GR1iig==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.93763702332162, 4.533080933367719}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwl1wk4VekfB/DDRCjcsoy1e4vsImIU5Wgk0oIaJAol2cYyYynRjUTKuNeS
+FqNbphDDVamEQsUoyy1l61/dQQtJN0ZZ0sz37e95PO/z6X3P7/yWc46nxf7h
+bgHiFEW14Jes//9RoSkWWZWxfn4pOP49TV366HHwF9jlSdykMVz38qLsDCxS
+WL/kHdbcpEOMLPw7e29qZhPsG+C80BxxGOdPvGuAVS64q/XAgj4vi+fw7NjY
+1AFVmuLsvXZHGdelawadU1KjKUri1PoQuPlmQOAFmOMvzuqCJcfP7NNQp6mI
+tKIIV8SJ+4FXdYjY2+tIF6y4IJ/bAvvOSmjtRNzwjE85k7Do5uExIWynqF8/
+X4OmhCVGvR6Ia9DDj58L10fr+NTCm5V0Ut7hPMddb0YK64nRmAe1WF2WRkWs
+xGpfa27BxspLHxnfgHV7UcU+a3K+LGmHDVY1v30x/yBOxJvbhnKwREnJiUpS
+z75eTiPWCe/ywjisdG2unQ/WWNVc4y1Y2fejNw0gv+g+z7aV5Hz48x4vuPMQ
+T8UGFly+9uAB6ssPLQr0hE3busNXwZpz71dlkuvtTFQr0Z8fI1fl/A2zjmVW
+W8C86UmTjciDfTklrR393mWvFNyqTuodK2fDHT/wxHaifkFJp5gLzJCoap0h
+/fnwrH0N7Hnr9uw5TZyvO163CV6RtDXSfhHiigc3xcMHZjKpAZhKeUyTeZfm
+8TqjmTTFL+RJ6uP+109r8z/DnCvdpQVwjFkR04yFfPp9mlnIv1FVRtsbpk9O
+ORbD5mlm7+Nggb18jzHqf9KYuSINjujRs7ysSrN3Zd3Ylw6bjmvwlFGn/KO8
+IjY5T9/RC4M3bNlfEUrO/7NdqkSNZs8c+73ZBeYtbv5fE/bNPvHPm8DCwfau
+e9h/8WupxXyST1jwY/Kc1fZIrOhEvi4vLnn6w4ed06/lwlSz3HFJuPz50fwA
+mMUsn8pGfoOjr96sh339BgIYcGmxWD4NC+8sj05CPWFFV7lu5PrRRZ4fUX/r
+ataWQyR+WHPQHjirZ814E4n3o2VbP/rndEtVTZH0w75UFu8Ze9MeRyuSv+D7
+J01qsEr05qFcUk8dd/sLJZpSkhU29MMuxjaV9Uo02/pL1SfzxXje4+I07sLV
+lEzSUTjCssL6FXzPTXtjN8wrlZNcinj/9vRu01pCnueng4kw96+2Z4GwaDB2
+4D3yaTf0SrkAM1RUxvA+srVnTA48ggVHui3HkH/aRUn2OMzqrQnaj3rfOjNk
+pLTwvHzwsJyGhQXutDzsu0qtIAzze7yzYFYa5jurubfBs0dH707herohXl0R
+8yjO/KlYSOK5zkythu97f7FsgKmAf9iOcKrrrEsBybdGZdAM8/jTqUUiHuZc
+1ZL8ini6vzODvWDh26nQMsyjo+72z7Yk321PmGvJ+9T86aYRbLrBJvIe8ut3
+W3ZIG643K7uxEjYwtAjRI/H+4E4Wo74czfHklTBfSztdFb52uoDpSfKd/y8/
+C/1Jr1/xMpncz+bSGnX0b8I/4moNyV9lgWU1+v103tfhWRL/rWR8JNwuZ+Lk
+iPoZrUc562EH1xmtU7AwrTRoNeZpYngndRjm1CZv2QrbJj/daaON69NXP0+F
+v26cPpMOs9f2LuyB3c447XwMC/4NTLBFPop11xYvWIr7L7wVdRPWWT3UZQ/7
+Knv72GB+o53934XCwonXivfglv7rXSkw/6HYGkcVmu0cyjHNgk0rZf9sgKMn
+nIq4sEDCpUkf/dM8yUkg50XF3C7y3X7gMs0NhynpzF182Gp4bJ0bcazVtmbM
+I+9ch48pibfxrN1t7JufqXo2H6Yrt/jnYl9J1757mOR/Z+/ZzdjvG1+0rQ02
+1RPf/R7z2HUhWfUGce8QNwYe0pPKuAyzSjOWiJD/Cc/orBJyvWaf0BduLA+N
+qoIZjQvlBaif12bc0g7zN8TNWYf51DjsTpyARfzOB03onygyoEkP+TCm5ep3
+wJasAaNA0i+ldloa83Fv9isuJ/W2HPbtVKSpnleZVV9If6VvXamFx5gzcZt1
+8H6dzdVrUqTZB7kBr3gwx5Q55wMcz70xKILrk+36VyBeOLXvsLUu+jPb2pdN
+nof5JnKJsOiz8Jok8uP8Oup0HaaXTRmlwqyw9wn9MH/huKMcnr+8h49zxPQQ
+r6CwKgf1ypbp6yvA1IySvgLmxTpWnv49LDTadA/fH3Z30KJb8rCgIyj8Ofr3
+Wr5hxyzi+e7wNVyEfncZ7D7/Lf75yW12mIfBkrdGjbBpbs5Te+z/LPV1pIDk
+W2tqqwd/LmmdiIeFi3UfjyAe7Vnu4U3OFwaG5sK33dQ/rYUFEZK7dWBX1VFf
+s2/1aTleRP5DlXOvGMGsWiueCkxxWZHm5HxIeTrqpYI96UPr4Yjn2/2nvr0f
+IpkgXfL3scsrGvMZOd+ckUfuLy9iimO/ZCCq8xE5n6t98CLmcTK2V1qZ1N88
+KbMH/W+LTuv1g3kdujM09g8L1FOuwKLqjwOrsR/DpOQk9PH9FN6t8ML+6fRz
+3u6wSNnr91zs33Z4EVRInOzk8Q771jHVgUPkvEY1y4N8f8XevF5qAO//oNgJ
+e+1N+OwO09/5xXiiHvHk92vjYQFbVVqIecr9MKaZBbPf3/3FH/Mr+5DCPQuL
+Rldd6EE/rIr2ep2COdOx2jbon+8pk5fHyL7F2yOpsLP4b5pRsLDqPPc65vtk
+V0bmVri+vzCnCT5p6ieznNzPeHkc9qk5IUGnZMm+1I6nR+GGwJ9dRpA/y272
+HfneuTpbGglg05U5Rzpx/9PlBcIaWGCWVOcJD2u4VleS80khTR2ox39kcv9V
+cj7fLgPfG3bM/jyHRtIP8Z/8KjCP44Urcl6Q/a/OXB3YPK16iRTub9rDki5D
+PzXKHKk1MIO1YWId/Fvwm9xE0o+C4fApBZpy8OmobSY297V5ACvN2/BM2RDz
+XfVXzi0Fmu1TkT03COazmPMfwn73Rctq4PqNJ45O4zwjdmiNjBHyabVzdMC8
+oowPb94KR+joqV2GR+/Q97OJFwQnsTAvxrK5iS0wJTckW4h8rZraBsa+7Tdc
+MkC9cQovJOWNMU8Pt/EK1Ouc41OiCXNcum4aoj9mRalrmTAj6CebPMxTpBcy
+qQjz9gzlj5C/H/5sDkXOW2Ut0cV88n597TGI+IyrBxN+hA2lU+fcJR4JHrOF
+Q7/Ucc6R/KPeRWpgPtEjIQoJMMdQ73Qf4mcnpJ/cCQuZa/MTYINFYaMOsMjM
+W10G99PRE2RbwfX7cwZTkD/VeyXJAuaHG176jHqti28ybcn5xJGcvahX0zl2
+qTu5/8e0eX2Yh3Vl2ZkDxMsndLfDCtTfj0pJPvbjIcPo97OVB6LekniMhwHZ
+6Pe80L/Sl6E+QcbdAE/sR1eqXI6HTRXW2dvA8VsjxdrgiMQ/rWk4r8z2GHMZ
+9i91de/G9SFds/oRMH+L0Zc/YGpN+asamEH+34F5zSWrCf0fLfyUIA==
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.562492355174517, 10.345769235517452}, \
+{1, 0}], LineBox[CompressedData["
+1:eJwV1AlQE2cUB/AtxKMdhOIRznCUw9QjJCgKHrBIRJpBDXI5IzoUMNAWk6Dx
+YBgBL4gilSookgBB1ECNgkgLo4gWVDICagBrEBqUZhALgiBqihT7/zKT3fnN
+2/3ee9++Xdc4yZadZhRFifAnZ2oWObjT5Ehlcmkq+lm5SudGUxbfZkXEw68N
+xSuK4PrSXIUADmwL4G2DqYPrtCvgzunGMCY81epwng0nZggL279B3LX7lAuc
+El/COQJXN80ZdoK/vJ4u9IPXcGQVbrCyaWDZuCtNGbWeaRw4LtxprApmb7+l
+94clF7yTZSQ+5DwZTtbPVdKBsObXf43J8D+aiSobcr35kn1y2DVdkm9ywfU8
+pvgS3NNZE22Ej9aYpzfBLQbRyHO44YF/lAEW8Gr0PbBesbT2I5zKVSwcgGXs
+fskcHk3teTw/m6yn6johd4I3hglCrZEvwc7faxHM8snL5sDuk5rHXrAywc9u
+E7ymYweTeGaVVLsLVkmXTSyEtZMu23Lg2NYZpfbwTb+hqxfh0ANJp2bB9UfZ
+rXUkHpSfNop6Gt5SVDM8EXdncyds5V07cg8+qfZyr4VzOJuLG2ClZDfvDNnv
+Ka/MSpLP1q85BX7WPpBB8smDExeFwb5eyyfj4HyL19e84Xm/2DVy4WTR60M2
+cIm3p/kH9MtI/q+agoNGtsfUwoU6pY/BC+s9C1bvgk261NYHsMCv66MbnMlr
+HrsFM4osGTecaUpaKR69DZ+s3MVwhWNDVh1qg5uSJr8764T5SMzsHYAPdKv6
+mLAs39AzA/mKgjKjLrNoqqtvucYR/sqQXboBDmG2dZB503J0Q1OONPVCHuRM
+5kEfb1HQAqt8WAIpbNb9ybICVrYcNsuFOdFF/cXw8inxlBrOO+d8Qw3rpy9M
+34HHkzWhzfDgEd0o2d9H4VTDG7jtfUp/P7zPyk/shvyDGQ1Ow7CnITg6Fp59
+Ln4ReT6FTftZKvjkSF37ELzEuD7EAFec/byA3L9lOEVK+tM4vorogA1bEiR8
+mFs1l3UbfrtYn5MAs70nVpfDHWajZXvg2BPs68fgawnTfAl8b7q+fCdsYX2l
+OxL2DaiN5MN/BvqqPeGtqReZ5H2SLRb2vUT+rR4yH3PYxB5TyOGkqzXGVuw3
+J7yg0xGuD2jsL4SFufP4ZejXNLE6RgLHuLIi7eDC3k39QrioouCd3IGmaN3S
+U/5wBEuYOGGP5+a/ftIX9s4yucfCwh49j4ZFE/YlT+wQ//TDzXA460motQCO
+HRs8sxu2eJsW88QW81KQylfA3NObO0Ww9l3UIKnPaeM2h69hZdoCty9Q/xrb
+S1aPbFDXwYx3LGJptaYMNv7+ve1quPqhcUYOLN3DDoyG6d/u8o/D3ILnC8n8
+VxS8vF4E5z1oL8mGL+5Ib2mA9X9HFJ+HH5r9HDoM13JeCC7DWRl793uQ/GU2
+s6/C3HQtMwE2HczdS/xBJmosh+Vz/9hP5ul0ktXHPpihDPZVkO9Zr1Q8H/26
+P53lfhymxJc91sJ3zaoHSD2zGauUUSReJ4uPgm+Odb3fDucb5VdWknkPtrAL
+I/v1XjXOhA//OHWfAwv/mskYwv7Yc+6Wf0C+enlcZCU8ruDxK2FV6V7xTzCV
+08oKgfPu37i1DPZd+SbtKfqjPNpFDPjRS7YogvQfIQro4+B95KoztEzEN5xX
+34d7U6f7fGDTWutj9bDpjdsr1QLU7xO3kpghCbO0hNk68/x7sMvtnrpD81Gf
+i8NgLzzyGb95uI+cOfT/y9lRKw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.058738695939086, 17.601506520304568}, \
+{0, -1}], 
+        LineBox[{{17.000000000007276`, 16.500000000005457`}, {
+         13.500000000003638`, 10.500000000001819`}}], 
+        PolygonBox[{{14.947677384685548`, 12.98173265946094}, {
+         15.206811054955079`, 14.219815750748694`}, {15.897834175673825`, 
+         13.816718930329426`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.984057296392571, 13.323799910437668}, \
+{-1, 1}], LineBox[{{17.00000000000185, 16.5}, {10.000000000002592`, 16.5}}], 
+        PolygonBox[{{14.1, 16.5}, {12.9, 16.9}, {12.9, 16.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.5, 17.4452}, {0, -1}], 
+        LineBox[{{13.5, 10.5}, {10., 16.50000000000182}}], 
+        PolygonBox[{{11.447677384685548`, 14.01826734053906}, {
+         12.397834175673825`, 13.183281069670574`}, {11.706811054955079`, 
+         12.780184249251306`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.015942703607429, 13.323799910437668}, \
+{1, 1}], 
+        {PointSize[0.04], PointBox[{5., 15.5}], PointBox[{6., 5.5}], 
+         PointBox[{17., 16.5}], PointBox[{13.5, 10.5}], 
+         PointBox[{10., 16.5}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T12", " ", "P2", " ", "N24"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdgei/fgfjhihjij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdgei/fgfjhihjij.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {44, 22}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwt1gtQU1caB/AjtjwEIshDtlAQzAKuRUOX54rJpUKxksGAvCqMIiOIGiVF
+aYMiG4Uqsm4LiDa6FHkEDUIhIkKwyvAqRJYuEW1BsBApICLViFgDIuz/dDcz
+mczv5jz+35d77sQxPjksQY8QkoU3/STqRbz+xJA/XhyGjPyrNboQLu755pBq
+PUOazpZyXOBV9iuCLsDpaYrCMhuGmI2djjgMbw8uDbGCxS3EOAa2bKkVSlYy
+xMfqt/AQuIj11e4n1livwFlK/TDQ6/twWNpVVEXHd6RPDnZYMSTa1nKYrld7
+0XliE2x4t0onhVPO/pDTY8mQzdku/A446aqbWghry8xVc3C7p/e79rDqaZH+
+e8ivb+FZNGrBEGXUpnZvOH2fm0sLPH8hPigCtkv4beN1uPvFmN9nMCfV+3wj
+LCs5F58DW68aMuiFp+62FVyCB+Tul2dhxXeVAzUwd65l+AO6n2hBdBMeXWZX
+vgfWPF7b2wRLkoYKyuGCEya3bsE7/vPx2hHYJKvmwzo4x9rzpQ3q8xtbJymn
+eWe/rg+EZaoc9zy4UL5QuRtmX6w2E8MaG4PiFNqP2xrbGJh/rHflAZhzY/bI
+Bjjfz14YBgvu96XQ+rd87DHoCGt81tdMoz9TBi55g9hf/At/vha+qP69XAL7
+REljxLDcqc7cAm6W57ED4bkAh2/OoV7pgu8OW7j+TVW5MazOZVXMr0OOpV4e
+aSsY4toZ6zYJ9/ePnxsxx/2gqPlqFO41Dgjmw4rDw6NPYTud/92bZrh/uKzv
+F+H0rkzRh7Dg628tHbC+X8OV9w8uZ4jOffyLzTTvxiIjKQv7eXEX0mDxC/uX
+j02Rb6Qo6Roc+0vTP3bBYvYynylYZLqzWR9WcLeNWqD+OBlf1meC60LPBg5s
+Kf1C1AvLDpl/EgyrvDvPv4TnD6oS4+HmhMYJT8y/df62Xiqce1Lekw9rqgOZ
+E/CUJrxAD3lUU3rHTsMzaypq0+H2js4oer+0p7l56WAP3Y26LNjPiWsrRD18
+/QNN9Pdjm00oemB26obRRPiZvPSoKepvDk78aStdn7gdXQ1rHG6mecCiyEfv
+uMAmofWPrWCB9SLLGpYEHLk2iXpNGpQPh7CeujPPW077Me7ZkQA3PxOy9sCu
+se1ercgTPZRxfw2sjl6Ieo164pZkvp1G/038P18wok4bbGiHmRWbUgn6IRVq
+7hfDfJfLviPLcF4vOt7IhsXziooGI9wvXSLfY7BrxM6K04aYdzWqMQPWueh9
+tMuAIRMDcYtnYJsyKyZIH+OzYoOv0PkV393b9C7q6ju1vZuObz/lveMd9PMB
+N3UO5gxnxxcuxfWSsuPrkTdr65sOPVixVfTeXjj3QbBTgR7ytryRy+D+a4Kd
+obDP9sjjw/R5pIk54wt337z8d2P0K2Bf5tgnsMbrn6Fsen6Cq6ePwcrhj6x9
+YSHLQdkDF/ZXPtgMk0zha2/s90Gh/lAYnR/oklENy/6qK4uEmc6fM/6CvLGP
+pp9vg5PasrWlMP/Kre4tdH7NuJaF+nQBczn0PBZnVbATYYms7bYzrD4RsaIE
+5txL9DClz4eQhEONsKvwb7/S/HLDQ+KrsKKN7V8MC1qPvBXBZlF7zHbAhg1v
+K41hw09lc/Q8svn5Rkexv/hkjPwh+qfm+ae0IK/GykRWCscNPl0YQX1aq0Ku
+CBZtVEePLUG+Rc7nQXBSKCu9h2D8nRzNGjpfnN8XtsgjysruCzawoGFD/et5
+HlnVcNDHElYI/L+9NMcjuSGDHXaw9ssfD8fqeEQ+8bbVna7Xd9Kf9zuPKKY7
+V4fBqtr6/VEzPCL6OXl3Orzq15mVtdM8YvbkeUE1rIz+TPrpCx6JmzVPHocl
+4ifz4VqM73JKdkR9zVXLz2x9ziMaS//nsbDGoD+j7BmPiOMdAs5TlzxeWgRn
+7yUDXbBkIdyPg/Hq1dcFOtqvn1gHnLBedkLNFhb9/dtaMjVwVkzmPH0+KoI8
+f2jF/u2apBJH+vzPrTZWIp/4wJUhakY1FV/9kkcMD1pcsoWzS8z/fRb1qJbP
+WCyHlVqj+chXPMLZ358wi/3IvXWOE/DmU3O7aB7lubVf+qIfTOf1V/mw2d4h
+ZwYW2CkjIqgvj3BmMF6ZZz1nQfPPKkJCYfGf92Xepf3Krx+MxH7Ni6FFubSf
+jrsmDZBH2ZU4vo2ev21qp/3ILzk9ced9en7MXV9Zon5BTnSy1g3rSUzzxiZ5
+RMq1L/oR1rrXpSSO84i2xaOyHubcOR7R+Aj9Yl3fV+VG+z2gXjqA71d3O9dQ
+L6krUKmxnlZe2AQzxvf0Wc3oZyB38YHb//8nFN/+3+c65r9ilhyv
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.907871335428632, 17.11903631971389}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwl1gk8lPkfB/DHUe4rFIomWrRSE4VVmqeibJGhRLusiagkTSK5JyS5EjZX
+y0QUHTurclQ0VK5Ks6JW5yhHroxat/h/nv3P69Xreb37Hd9reCzzPOrkLU4Q
+RBP+UU+iaw4fPZL477OAJCTiUvbUwKKmYcc8FZKMysw+FAjz2pSqnFVI/kt9
+h3fLYdrnSN0fVUgizNXuUqsuSQjybca0VUgOXdKyiUPZUXF8DSz8FutlAguv
+jZh747zPz27M/mW4/6vQ8A7Wf6tZsvgaTF8rVaWN+EYvV/1zAqa925WcDdM0
+dGUcYDLfyVZXleS3hYTFr4V5vkkfeKok2RdgE2kAc/8Zn7RSI/kOyVPulFlK
+cU51aiTpdql7yAQW7CjQNFcniepFGS62sPBSPPOCOs5LRZDe1P1e1zTfqJMc
+pnVaXxzMjByZFFtIEj+Lqe0upfI94iUls5DkxMZXHXpK3W/RLi5SJ/mXZ9X0
+qXq4met+rYTHOqQeEKiXP+Ss5Q27GP/YrABzY1fen1IjOUuLVrsrwUzpW18j
+ke/AVKaBJLWufmbvBOobNXeKHcB9/HN22v6qJId46h39GOY8DMrtXUCSrkUr
+u9KoeOfD5g6jPwv7DNSdqXyiyj6KLSA55yfHFipS9TXXf7uJ+bjkHvXh09Cv
+dTGlwej/lk7Ga39YENQp5wGT6R3hS2B2Y/wpH8xD6rRdQ9ZS5Ofxuj4Z1m9w
+kJOACaWEwVbcZ/WTl0GEDvIbTgswQfz8D39clYNZYUbBVxD/eV2YbJk2zr/d
+PGGE/DcZG8UHwOwAjeVVqiRx5sXlWXuYkL99exv6IT2k07kF5uQcdxTAd5sD
+SSdY2HJ+ZAfmEaii0x0E0+3DLW9jfqflXUNLYV6mdLsE5vH1N6vGfpgMVrlj
+hnmN1PMn6chHMK/aYTvWW98J+09QJjKqrbB+VO17aDnMTb1UrwIfWPL9fR+V
+v8zkq0bcb79v9osc6uXOW/XJB/GPiwUf1oDp9wNWjCC/VeWrzeQpWy0bPaJG
+EguyNMK7cV5ZnGXThXodFBqeFcLCq3bsX+HV23b9YAvzZi/wX6M/Am2bjjaq
+vv5bqofgdtONEf/1Y0VjhDz8NFiyrHwJ4tvoTDSh/0bZR3vVYbamv04R+l8p
+Hqp6bDHytQqazYf7rG09W7So76PvzF2YVen6yRTmWdx/9i/8/YKpxRVNzKPV
+O2E75pWT8sHWGGYb97+oQLzXS1TEmzUQf+OIkjnyNSDiaRyYZLJv1cIDMW7y
+jrBgk38OE/WmqhnWb4C5j5oOvIVtoiR7N1HrHTO97uiXgj/rljvM6eIda4H1
+ta8xkmC+vRrDEPNIDOy/3EidV7a+54P+a9eGbFZAPtxz9x7EwZHJUTK7qfyY
+6TWUs90MWi7AwhjXV9jPKd3ikfOcsqJPO+4jNuk8/j5Bmd6+SIB4A40ZexRR
+v2iF7f59cKxpvZI8zLw2WPwR85s+pvX3MPbzeEqFvyD/17LpeZVwqvvhLAG+
+n2sCr3f7wIJXXzp3wArfrwbPIF9W26L0F+jfsI75sXCYKSWj6Q+PR1cqDyzC
+/uY9XTT0M8XXNcKe8g1Fmgj9X5o9eKoEeTLXPwt5j3n6rScZ82DRKcH3QVhG
+520HvmcEvaBPejHu27/9okEb8uKryjr64L7N0977nGDRk0mJJ3DwCs133chL
+MJE9tQXzaVrs++I8zLGUnG2GO2T+XOsKpxb2aO3Fuc60rpSfYPZA9WwP6vcN
+sp6/DuYqyf1yBP35ckDAsoUJDY/N3cjjZPva5WyYvkLrnC3yNPU89ugKtf+Q
++Mo09F/zSZuwj7ov38O9BuvrdbWS6IgjKJP92oz16m5hbhDMM29lVcCZVi7T
+ZTBXp/R5LOy1+uEM5kCQG7dK4ueVY1ZUXEQgLnN6aONzPAPI6BEpPIVGYWJ7
+kF84rVJqDPtZyzmP8fuBkGu/t6+Juu9pQNFWPB8kpHw4hSen5eD3GtTPDzje
+RKP6tclTehNcJvuo5irVj792RmF+nJXqTWnasDK7c2M4+t1Z4a8ZiydHa3iC
+gXVLo5ieTswt9dzx0WX4f6eaLnErWJif3KMH24Yl5uYqI59dD/62wX6Tghs3
+JWCB7mWlOKzbp/x5YlQR+2dpnp3U+TbWsCxM29y1dBfi/vvlrJ6DAvqdNxTQ
+TuVxmjVTL49+3n5ZvA95SymybgbCvOe10SLq+6nyKNcFFqpalIaiL1v/fu3m
+B6fe+zQ3AQ/dqR66DgvspyS9MQ+DPKk5ZdzP9HehV8HRGXbeKQrU+6LSYgTu
+CQu7pIl8+DlmO2XxPU0xmBdWDPN0phkS8N7IikJDJeRLWCS9xf6t1VVuGTDb
+N3FvFkzTlFb7ANPLDX+xhJP113ydg7lFtjkNyIe428cUwcSykA1b4ZcGm9Su
+w6wrLgbVqKc2pbFzDcyzm1diCpesbTCJofqjY6z+F/oxPR1LXlag/t6o8dwA
+a5vynuSiPtFsTMsb9PNLyIvaADnkMxF4JgMePZ312FQW+w/TD/nCb1O0uf3S
+iJ9j2egB79b5p6BQCv1SvecUBFfqMsUPz8d9EW5SpfBk928mdvPQv+7GzdNw
+0+Kzdo6SuC9R4dN+xC9mxMRHS2BdVS6qE8bfF8+6xTGPrzJ/+iL/g30HvSNh
+gUSR5yRcJ6Px1A7m+J1lxKH+M2fyb+yE2WVqkrLo14CyiUQUTGwv/hwBn5BV
+dXkJ8/5InHpDvY+SSwx3IB4n4+HhpZhHyKmRw60w76DfC2t4uv4PbRbyozuG
+/7od3mX5Y1cvzNrG6lgNv35z9I476kmdMxOM4b59O1VOlsO0lQluBfD9VPus
+zzD7zu+y5nBdj3/8IEyf2pF9F/mu9VqiXw2LWLY3TOEfMjfOuVD3yVYFl6A+
+zYcdAdVUfLF+Zz24m6Z7XUTl6xTlT/2cZe6WOTmOesh3CY4MeDsnbLxDDPmd
+i+UOob+t89xNCgj0y6auDu8fYixxZlnFLIMQTO8v5VLzsf0hbvkMg+Ctarte
+As+e97QommQQdFEHu5War0PPW+Y4g+A+d/imgfsvGlW82jDKIDhPtQtCYCed
+u8Zh37D/My1pGH7/kkjX/Ao7nygMRL6lx6Vu0UYYBDviL0Vx1Cf6nXM/XcQg
+SNV7salw7LdaMzbMTYu/qYH+lE3M17sJCwOSz6bDgbqPD5A4n9pR/XgKfpR3
+hKOO+5lOZlo/o/9ZMV4HNRCff1czKRRW/Pby9pp/GYRy4nBhEvxeUNdii3xF
+thUpkbDTwbwNNmMMgtY3augIjzVE9yuhPr7Yim/z4aSKLI8MWJBkKSpEvHi9
+PEEtrFxdftQYLq3QE0ui+lGTUV+C/BPky3sHcB/nk93UUtj1g7O8kIqXctMz
+E/W/f7jtoh/yIY/v37YIVj5pZJJL5T/sEFmMfqWMbnYORb10lw4l6v1nLbI5
+8tMgg2DtluiRofrdNOtH70W+u6MSeqh5XfSLkPmIeTWYj3+EpUtHpAY7cL/1
+s7A5+OSl6Vo7Ac4f8K2yxHnhuGDd+hrEC9W/Q723/vtkV///qUb+D6LOr4I=
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.922596693736967, 3.8067338747393404}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000002274`, 17.}, {13.500000000002274`, 16.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.552325660469876, 17.180083206945802}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt1ws0lOkfB/A3USpqcp0Q41YaYhKbrNa4i1wrUZRKKalmc881bOWSJImi
+HZJLWaTkkrYhogs7CSG1UymWpYmKJP7fZ89/znGcz3luv9/3eWfOeVX3HHXd
+J0JR1Hv8kf/U5Cw+6mzqv48Um5KJzjmppMGmhOpWM6dhz5bjVyxg/phKj7g0
+m/KOlU0KhAUfa7eEw+wr25ilsPP8Pff74NTBTdRHMj+1VJ4pw6aKksKsDTXZ
+FE0yQ3s3zO3Wn4mC+XsVymJg6oyJ2GPYe7x842m4fGuntswKzG/ozAqFqxMd
+7XfAfP413c3w7XNWnjmwoKYhRAHuN85K6oY5G1aUPMP5jFxzh0UrUY/KUFEE
+zPvm6G8Al7/e8UiF1PfbVvnNMCXzreY++uvX/mdwPxl/qGm7G059Wjp8FPZu
+OMtaANPtR7OOwOwo09G7S9HP57zuvXDMrFNyJKzl+MuoM/El7QgXWKkkImgd
+TCuZ/tUYZoQ/37QMFtjW2xJ7r9CIm0S97GnVj2S+aN1x8xdwufkzrxNwI/dW
+TRXpR+LFxWY4W+SjWDbsbdh0Ww31mLyqVToJO18/9PksHEHvrAqBGR/ZLxeh
+v8bPbhbHSD79Hm5p5L7URP4KJvOvRL5XRl6ZOTZzyXr+YN6jEpgzFqbAJU6c
+MFwni/GAX183knq6gk/UwM4TtdfHST2blmzTk2NT7iXGAdroh1+77206zAqf
+afODU/V8Jz7APov588rJ+FnaWnV5NpX8+OOKbySPXrqMLcy2M5O21MK64aiF
+W2HhH/ScFJjR5xFpBwdaNmd1EbeWPVwFd+ybmVy2Cn2oR2l+wf4dmqq9bjCr
+Mq6gDA7MLfo9CeZ8rRP1IvVUtM/eIeNS3bFzYI33o0u7YeFpvfu56EfmHG/b
+KOy8VyreHC73udDwDU5l2mQMIg//ZX23puCYLy1xmXDLfsNvn2Da3ruBbrDO
+0MpGAcx3CqdWwO6VT3NayHj8KfGFMK1y3O0GOU+Ld0mU5Juw90siGZ/D6pMj
++Zt9vXKQ9GNh/INNnu9wv7iNxFThulhYtLe1SYfMN8jr6ibPt/DgflkyPrPd
+ltRbUiKvK0b6XXvG6K4s+V60Xf6BvJwD31WYol+uAatzFo6ZbLN/At++ef2S
+BKk3VM/RA3kqxVaaasDlPePD/bDM75xCa5KH772jB+k4X7/NKgBmv4o//BY+
+YLxes5jked5OaL+MTaVLRQs/kPGz3/Ly4Gq3C5Q2E+c96Bp7B3vW/XE4AOZ7
+0pmLFXBf2gNqf8Ic6bQTDLj6IH9cXBvnFd/XUoT7nr+qcIFpu3otZrE+/ss/
+NhmwQEdS0Aa3eHU3dcCMB2avk+FkvfCoRTqYn7m70wSmvo1Ir4d5Rb+MkHr7
+qipOesKc4Ku34mDWiVnTIDJf23pEHS7ntsvHkfm6v/m0oH9BQYrbSZgyGqoK
+gjkTkhXRMFsigMmC3TU3WXPIfuXJId+Rp9KwMMEDZkWeKumFtWb0TTfA3E9L
+F/DhzBulu5eT+XGzA33kPi4PL51G/bx59jfnYD/+rE/0S1g43d+5gXwfBF+f
+3YP54mGdZ2HbhCzpa8RTow5fYEraRfE8ccx8mUOovyWXeTwBZsfJbRmhk3oW
+HSJ2DkuoCUEeEsemm8h8bl3uZTHka6ngP1FEzlO8sDqN5B3y7HsLnFqmXk5X
+xO/Z9tZd4//Nz8tLhwUu7ZYrSV6jJz7NUcJ9qDD89pJ+lvgxvGC61Z31BbBz
+t9mRq3AMr6p7BPZ2yv/UTsb9M4yNVqO+XXklQ7BRpelPcTBtw9yLxN25R7Of
+wsKkrCvP4UBHC0cpXdxLc3FOITkvWXWzKxzDbrI5CPdZyY8kwsKyvyWVyHyv
+zuu1cKoKb+oB6q32zAgWkPXdJgn74NtWrrnfYb7eWJAYTMm1/rNID+MXXVOK
+0H+m+7ropXqk/wXRm+HsF1azEjD1vOLqQpKXVcfRWaynXnX2PEOegpwtBkMw
+o2fKvQTmuYTOtpH6qjjnsmEZZmF9GSwQLJfOhzXaJtNTYG7kzsgHcERcdOFh
+Un9fRugUXLeyUcMJppnX1djgPEbbDhVDmJ1XtqQYFgZGhavCrJOCMEXUny8W
+8VKW7B/raHMZ7sjrSZEm9XkUm2ggD//+pnhFmLN+Hu8mrGPEMdcl+8/sFzdd
+zqY+Hyt8ZU/yOKPl1AzfPjjxPYDU1+cxx1oZfbxx7LpG+uH9GL0DG20QNyN5
+0n5yCpZTwe/NuznVqiSvVtvi3bCz9cYjB2CW7vChDFgYfMe7AhakLEi8BRc9
+rvL7Qcbzax9Uw5uMfi5VZyF/m5G/Csh4VJW4DcxVm7c1Gu5aZffAF2bVtL+w
+hNtlkyfi4RiD2Nwp1FNgfeJdDixk3MzJh3V0/D/dhCmrgTU28NvyF/d4MM2H
+SRtAf9c7shQfw+z48HkJMHXqmmwbOU/UoHUNnC+VNfqUzHez6HqPvA40SCo3
+w4x/LVWK4bSkRvt7MOe4rXg0/PbsG9tyMn/iC8uPPI92EfNzYT4jyMsf3h/4
+MjWVrFdg+ZyE0z3qp6LJfIvVmtWwu/w6Tw7pJ84jicL5JrvtGvbAzpWVF73g
+jqX6mu4knxfjQU/h9JKNO13I+bvKsjaiv2B3exUnOFVZ+h0f/rBYffi/8eRj
+j7yQV+yGa7TtZP9y5cRhOPHyrkKS54G0RyXGDHwfja+lHIer86PtwmGF+38f
+SSN5jMmGVcIxv9DvlcJGywe2DsCXdM7zSF6huqZblqiyKTs/q0ufSN6TOx10
+4DTrTge5Nfjdm78neQM87fz4yc9wkWJypzlsnh077Q2zzlUcMIEvKUU8iYeF
+D4tmmHDDr5H6BbDRqsf1ZH+5FqZlI8xf8NHsX5zfEpdl+Bo+3W3r0wCXdkXv
+H4e7C546pcOJT274ztXH+qCvbj5wgUr0rCTM037ytwHsftdMRxqm6y+1F4cH
+h/U1iJ23RVfVIx+DevfNi2GOhqXpCZi5XmObGCx8bn7bFbZeLz85ifOoZUr9
+RvCRt3+oDsG8H/YPDWH9m6+7e2DvXb2+duT59ju/5hHMvh8jCIYzAk5Z1MDc
+HZUutXBU2IzyDTimoj1kAerZP9hc/zvJo0ewwBQevUlJZpLxTUt0IuBQox93
+02F3pvWrP2GtLTWeGTBt7uxbUeQ1Vqpkl0PW924U2MPJnY5FxfCg1E9HzpF8
+Jcz23oVbFK4aPIczGJF67XB5eqjIEjU2pfaedWYE5uTZ95vDrhNurRLoP9Tu
+lNFhWMa3ma4HcxNseMnwL4YDoZthrftGJVxYpDX7TSjJ0+FrfhHMjFAzuULW
+d55ry4ftflgfa4Anzyg3XyD73y0M6yfj95y4EbDWA87OuWtxP57+HdthXbe1
+DspwqNrCdfpw7anDlw3gFuHqt6Jw5hu/NiuYX5XO6EQ/GurruC4we7eY2zXY
+WZUj4g6zQrkfQmDvph5lDzimSEfZCWbZlW7dCmuZ7qKvhm1ZdesdYEGa7A1p
+kqfI8UQzMl/TezPJl7nEQWctqUddfQUFZ9e6qqjDjHdDjfNhiYRFQVKweK7v
+NkWSt6+rlQicWv48wZh8H5ZLXR1Hv6dzt6T6wPRjq88NwLRIA71M2PK8xORr
+8vyZXmkm96Nb93N2L3n+Vmw/IIt+g+dHyL2Eu1VfvSH5uCdltgpgyqmvL5fc
+zwXTsWHYNiJ8bABOWbgocprkPaTUxMR7nO2ep7qkPmfJdvoB+PPaZed14MEK
+zlAOzJSeEbUn+dJ2xj+GJxmFlf6k3+tGqf/C6SE1t1NhXsB1jbl4j/u6eP5U
+JcnbsKNNEk6uM+K8JPnVCzMk4Bny/rj2/++PGuz/AQ7UGzs=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.684798798577102, 9.013741219420858}, \
+{1, -1}], LineBox[CompressedData["
+1:eJwt1wk4lGsbB/C3UpbEILs0R3Yyk7R8LbxJxalsJUQaQguFEiqmkS2iMyFR
+YqIUCaeELDVKyqGTCi1UI3I6okYnS0W+//Odb67L5fq5n+d+7vue551r/OIT
+5Ow3laKoLvyQ3/++dOl/f2vTFHuZzLAd3GrvWaoPf40bupMBC9qdpRfBwfMd
+Rnvg4CduaUawwOC7KUsPznj1zzS4xX6ldBgscNIfaZiDPJcV/SpgR3ZC9D5Y
+69ZKn08w5+rXmGmw273FPC19mmL02jxJ0KIpKc54sRXxTaexSU2aKpeTd3KF
+6Yti+RC4+Chjyw6Y6fEtSqRBUzYZtQa+cHD5i+pN8JWoBaVbYdHbzbNb1bFu
+tMbWlqz/wdq/FdYNP1tuBnP8V80dVUNd497TGMQTAVmF8AZPEZfUx4tO2hMK
+i//m8ltIP/MlZd1hLSObgmIS1/LscIVtUvJUT8Gi7xYTQXCtu83MSBJ33paZ
+C9ue/eYVBAtzVG/1wFJr21MDSVzwKWkp6lkqs6MqlOz/eYqbBcdG/u5/nMS7
+30ROQT+GiRU3LsPivJdzA+B0ttvCpzBbU/NzK7whT3d8BupvXTDr/HzMh/Gf
+uN9tYLGBnXUkHJryPTUR5t/nplfBrUGVvz2DeSFRKm/h2vQ725gGmN/MNVaD
+cKRtQtpemGreldENt60fvlsFi6XiG2pg4dbM9EmYF6ZyhuRnR77ttjLEfL/t
+H9WDbZazHoXDgpGA9mrUJ9t2v+MSTEvsnGEFtxrGDj6EeUf3a1Si34hdbw+L
+YOE0tpEhnHnx4O4BmDH2JPMM5hXa9ENvEC4rKOqWgb8+Ony2B2YnDzkmqGKe
+txV0n5B87MBHCrBEQWlMJcyPTxWUqNCU6fXgPzJhcWz6Wm9YKv2wNamPn+q+
+zhS+4uzh4gKLPs/XUIBpP+mQRTDn0VZlBqymf2NAndQfw9ljCHddS/kkQawz
+YeYGsz8+2DSGeQiiz+7PhrVaS84Nw8wVFtuH4M0NHzsm4LL7a3ydUZ9NdeY5
+BbKfJ9pdDYfal/5kk/PdSqR10Z9aslaaBxwstaM5kfT7d8w+Pll/ZNS7D9ZN
+ilz4J6m/c8pfFmRe3A6mkhHmWnZKIQQeO7JSbxtxhpH/Gbg4eNtIIUzL1227
+BDsy4o1HYU78RDS5b77rSzZZG+PvfreiDpD7qFOokQgH3z7NJPnHxra6N5H4
+mzGX1zifLmkyn2KC/edPyO+Hk299M2DBIl9r3RH0Q4WWGDrDTLftevvg8nan
+3N0k7uJg8hbzcNvCDT9InJ+TbQ/7vurWDoNbNWKH6pVpynMyiBdI4kWXwyzh
+yB717+6wOPKJQtNsmrJ4x91Iw+xd6jP94fTJVcm/wJT4R5cabLhbRFHENYGz
+epWw/qCs8hvUL2zLUmiCVxgWL74NMyPOrXwIt3AKa/NgcXOjUARLXb/XkgLT
+t1pKGMi3K+f46miyf9BS2QWmn3FzuTA/KkmrCC6z2SuOJ/YfNZ+Jeg0NDzWf
+JfNTbbE6AAvv59pUw+xPbl1d8NfV7YO9sMhvL98a/TPin3aqk3nZpcrnwuXX
+PMtcSb8HPEIHyX07mVaYDTt2LQ03wjx71bJv9sECESfHAc589kfiQlPcf5ka
+321wm+X6Wh5MLVLd4gRbdOu+bSZ+HzrXBBZ5B51TnI/69lxM/Yj8A12xzc6w
+yED9fDo5/5lsWhLMGNxkbgSPLX16oAoWuj43vob6N8gc8eqExWlq6nqwSMf/
+9hcSF9urZGAeEn7GvJ8ws3x74nQ4Nnuf4iTM8fXrj8B86Q8M72GYdyI8blgR
+zz/d9sc7mDLhWPHg3hlSik2kPocOrzmwWNhuW0R8JM+zVQH3uUqh+jjcymqo
+PQfzzFIf+8O09PovPHhgo+noWlLPKm0H4kjVuAQT4i87qSxY1rLvkgo536xF
+tQmmEpebycCOXyUuzMJ5pr+syZGEBSFDd33gZPe/JBjk/I8F/ffgcr7zyDyY
+X3rhpwn6eXEzIW41mVfgyzOn4UDNY6v3kflYLrP8AZcvZtjkk/VFry+5kvvj
+rWfYTeYxfUv/JVh8aMF8fTPcI5/Q+93wB+oZHQwLgufdkST3KVxSrQ4W6ltt
+VobHUjpsZVjIJ1WhKA1LPXTzc4HL6qsK35H739Gvkg0La6wH80j+Ps+lXcRz
+2lrWw9WLx0ek2ahj4f2V5L6XnTB4zYSFZvoavrDZq9B15rBjQs5wJ/plyskN
+rIQpY1b/Bti8tbZ+NdnPVd5ei/nlDDlSNjC/w76FBV8sNdO2ggVR3lHFDHwe
+ujKbF8HMOLUtS2BB+KUPhjCPSltSKE9T/n8r89TJ+Q8ZJ+ThFyzJSimYs0FY
+VCCHzyOPgdjPqJ95MCYiRI58nidefwxTuY1pwbCj7tqN5TDH+LhzHtxgNHwo
+F6YXjD6binxjR0VKabBow0uTZDj9xJRMPszW2+2siXpetLrPziLrvTafiISX
+3tbVukbm6eRd0Atz3vvXt5D9nawV9ujvYbtO+uj/zm9quwGreeVsUkG9ZSUv
+dRmYj/WCgI2kX+rikK0XXDXxvN2VzNPLZjwL1hkN7okk89kV8vAOHJuU6JhP
+nGJn+ghu61T60ETymb+qFMKhr3UPfIYZi+K0zsJd51MaFRfgPv4TzN4KzwgY
+emwOCySN30+Fy7QbL9iTeN3bBWfI8yBbFeUHi5ezvmjAgXMmusJgTsJQdSp5
+fx78J+wYLHIVF0yDNw/cpI/DdClveR/mSdXXhRJzEqPNHs3C83reODEGFl5o
+rm2Upakvx1hmh8n5V4evds3E+1OTv2Yv2c/ti1GFG6R0Xm4jfuzB4srQ1Mk5
+AXIbyfqC6BJlWCcwRWMFiZuMvxFJ4/NWzcfClORPbvcgvsseideGeRcqwhSx
+nqcfoTsbZs6p+PUAzChe/n0WyWc88Nc4PPWLe6Ms2W/Xc/oyzndb4SOvAFOp
+k0Z7UG9SXbi2JonLquxbhn6Op2iPG5P9KVWps9Cv2bnOIJrEdZZceQFv/nh1
+qgepr0lW/RTuT0TlEgnSr6OvGV8F8wrbmZCaTfL3X9F0hi9u7M2vh/n9v1aH
+w9wbYYofyPx3vRqIhfuXzS2UM0e+9zFrImC36h9sC1gY8SrcCc40oI66wmXO
+LE8FOMliZnQ4zPFY3HIA52dM7bVLg0XX183JJvf92FnNIpIv771fPvqxXNgR
+VEP8ZN7TVPSbqVMx0WhOvm/qZYViHv37qLoWcp5JfdImzMuiIKqPmJYIz1iG
+efcaRg49gAWF0k4WUqiPf+bkbbL+Tznur5I0VVHzM/d3Es+9nBc3A8+P6W+s
+PJiK1S8YmI73I91ixylS3/OW2FjYsl4umEf2n6TUHOGup4PJwWR/xu4RBzi9
+rabXh8TjPPYeg+/eCUh0g5n27Wk98OJ/Jnc6k3z51mF7cZ7sz/mWTiT+Q9ld
+DfWk/qaU6kIc4CzfCT+1dS/eTuq5ttL7Kup/JTf9dBCZX2Adl4v+jHlzleLI
++as5EXbon5nPLs0l/Vc+uDUF81HRiagi/YrK1Xjn4bHnBRu6SX20zbrZmKeW
+9z3vGQvJ902O0XbYR6n5iSksaOgxOQQbr0rZuQlmXvQPJ3GdF+yBCJiTEhKu
+AJ/sa7HIJvHF4yI+8seWHmHVwqJSh9xu1ONzz+Xzc1hYOO+KNNz6+M+KT8S8
+d1UM6f//n2aB9ZN4SdL/BXHE1jc=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.51595498616782, 2.888880495006221}, \
+{1, 1}], LineBox[CompressedData["
+1:eJxTTMoPSmViYGCwBWIQDQEqDiEyIFrOgaGg63OSmYrDzO9z9v9uk3VgWLF5
+kku8ioPSsWuhi37JODBoaO52r1BxuLaBb/3LBCD/w0aDX/UqDvqbjmztPSDt
+wLBjCturUhWHfy805q1RAPI3eJmtiVJxUBZ+2RDbIeXAkPCA8Yq+ikNNZHC8
++z9JB4aK1Qtvf1d26H97fYldB5DPcX3a/63KDn84o2++0wLyG8QO8eUpO4jX
+1jVNfSnhwCAgx2KkouywPWWl0aWjQP6LFavW3VFyWLTIuKtvP5DfscJy+Wwl
+h/kz33T/vwLkB3ha3EtRcojcYaJ/gAlo3oH87jprJYcJ68uXMLsA+Qy/p7xR
+VHIQen0p6c4kIF/D6uwiSSWHdau+P5r8Asg30Hwkrazk8EG39iuvHdD9B/7P
+P22r5LDt2qvvhj1AfsAHbvUMJYfOV85Xg8+A/GdvuXu+kkPCzvcHp/0A8ndw
+tAc+VHKoWCL935kHGB4CG/TkNZUdXvAILhJgAfILGpP/Fik7+D+OC/O7B1Sv
+oXp02S5lBwab++4ss4H8iCnTv/1WdpDY/v7gO2uQ/Wck1IxVHCpY/NtTjwDd
+98IwgyVWxaF0ZnuMliWQ73HwsGq5ioOa/NH5SguA/r+QH8/eoOIw1QIUvxJw
++SfM1gl348Xh+qd0Viy+ekwMbv4kuY0Vs6zF4PYL7hKwEzwiCncf13OFHb9T
+ROHu32W/cOVGRVG4/xTF3se+/y0C9/+GM08Y9nwWgYfPykwBu0x2UXj4NVjs
+0VpjLAoP32AfUY5zxaLw8Ldwbub6dFAUHj/RFRyyOeJi8Pj7bq47VzlXDB6/
+lcUd0X92i8Hj/8KO0xfs/4rB00dWp3AJg7Y4PP1kNJwpLXQQh6ev4H1hZ3Wt
+xOHpT+hLY22WmDg8ffJJLlUTvCoGT79VphrRB8vF4Om79+SaBTsYxeDpny1O
+vH5RuSg8f/BYXU8Mvi8Czz+3Cqy9iuxF4Pkr+MDHALH5wvD8x7Fac1UsqzA8
+fxZoJzuwVAo5wPLvVjYQLeQAAACtaGA=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.354800000000001, 6.}, {1, 0}], 
+        LineBox[CompressedData["
+1:eJxTTMoPSmViYGAwBmIQDQEqDis4ITTDhdu3dtmrONz7tfe8025lBwYOlz9u
+2SoOf3P6puVlAvkvylXY6lUcDp5abPiQH8hf8TIwpFLF4c7e6gtztig5MDBU
+rVgVpeJwWHOR3IlYID8hIGGqqorD9Ss5KdqCQP6F+ZNq7yk7HEt+3Lj1sqID
+ww/VNO9uZQc9U+P/QiuBfI6qjBdGyg6rtsx6HT8ZyM9QbVtzR8nB9nYt++9J
+QP6EvTcP9is5bJyc/qF2GZD/wNKnJ0jJgf3JuY+3ToHUb1inqKXkoDhZ4e/c
+30B+xaxpdyWVHBY/iEr0Ngba/0L6u6SykoOR9oXkK9lAvsGGFCFXJYdPWkE8
+EvNB/NupX2qUHG50nC5JPQ7kW+iVSR9TcqiS8z3z5T7I/SEHiqWUHXbuCGPy
+fQrkT7gR87tI2WFrwoYVvVeB/AiFqPATyg4/OgWeT9sA5Guc1SkQVnE4oXFW
+m6cCFD4mnRx+Kg5ut1fEGOqD9O+QcSpWcZgx42PG0ltA9wbskGNtUHHwkgFG
+R4MiXP5tBd/0KFVFuH47s/DF5y4owM3f+8Loyud2Bbj9ve3vJTL9FeDuu7DB
+P7xISwHu/jMRK/9uklKA+4/78yZjbgUFuP/XdJh0z7JQgIfP5GdrPz9PUICH
+X/Az/TnaUxTg4fvIYOm8LWcU4OGfUnefKYkFET+1uoZ8qqaI+LtSO4O/KRIR
+v+5mTT9YchHxfzsmVWRBDiJ9hN85w/A2TBGefvavlanz0lGEp6+1NpNnX3mn
+AE9/B5/HPjRfpABPnyuCW/STvRXg6bejd8cc2wfy8PQt4Pn4kpKuPDz9++q2
+JFR1yjnA8scOfhAt5wAAXRMymg==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.354800000000001, 8.75}, {1, 0}], 
+        LineBox[{{6.4999999999976925`, 16.}, {13.49999999999251, 16.}}], 
+        PolygonBox[{{9.4, 16.}, {10.6, 15.6}, {10.6, 16.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 16.9452}, {0, -1}], 
+        LineBox[{{6.499999999996362, 16.000000000005457`}, {10., 
+         10.000000000003638`}}], 
+        PolygonBox[{{8.552322615314452, 12.48173265946094}, {
+         7.602165824326175, 13.316718930329426`}, {8.293188945044921, 
+         13.719815750748694`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.515942703607428, 12.823799910437668}, \
+{1, 1}], LineBox[{{13.500000000007276`, 16.000000000005457`}, {
+         10.000000000003638`, 10.000000000001819`}}], 
+        PolygonBox[{{12.052322615314452`, 13.51826734053906}, {
+         11.102165824326175`, 12.683281069670574`}, {11.793188945044921`, 
+         12.280184249251306`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.484057296392571, 12.823799910437668}, \
+{-1, 1}], 
+        {PointSize[0.04], PointBox[{6.5, 16.}], PointBox[{10., 4.5}], 
+         PointBox[{13.5, 16.}], PointBox[{10., 7.5}], PointBox[{10., 10.}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T13", " ", "P1", " ", "N25"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdgei/giijfhfjhj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdgei/giijfhfjhj.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {0, 0}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwt1gtQU1caB/AjtjwEIshDtlAQzAKuRUOX54rJpUKxksGAvCqMIiOIGiVF
+aYMiG4Uqsm4LiDa6FHkEDUIhIkKwyvAqRJYuEW1BsBApICLViFgDIuz/dDcz
+mczv5jz+35d77sQxPjksQY8QkoU3/STqRbz+xJA/XhyGjPyrNboQLu755pBq
+PUOazpZyXOBV9iuCLsDpaYrCMhuGmI2djjgMbw8uDbGCxS3EOAa2bKkVSlYy
+xMfqt/AQuIj11e4n1livwFlK/TDQ6/twWNpVVEXHd6RPDnZYMSTa1nKYrld7
+0XliE2x4t0onhVPO/pDTY8mQzdku/A446aqbWghry8xVc3C7p/e79rDqaZH+
+e8ivb+FZNGrBEGXUpnZvOH2fm0sLPH8hPigCtkv4beN1uPvFmN9nMCfV+3wj
+LCs5F58DW68aMuiFp+62FVyCB+Tul2dhxXeVAzUwd65l+AO6n2hBdBMeXWZX
+vgfWPF7b2wRLkoYKyuGCEya3bsE7/vPx2hHYJKvmwzo4x9rzpQ3q8xtbJymn
+eWe/rg+EZaoc9zy4UL5QuRtmX6w2E8MaG4PiFNqP2xrbGJh/rHflAZhzY/bI
+Bjjfz14YBgvu96XQ+rd87DHoCGt81tdMoz9TBi55g9hf/At/vha+qP69XAL7
+REljxLDcqc7cAm6W57ED4bkAh2/OoV7pgu8OW7j+TVW5MazOZVXMr0OOpV4e
+aSsY4toZ6zYJ9/ePnxsxx/2gqPlqFO41Dgjmw4rDw6NPYTud/92bZrh/uKzv
+F+H0rkzRh7Dg628tHbC+X8OV9w8uZ4jOffyLzTTvxiIjKQv7eXEX0mDxC/uX
+j02Rb6Qo6Roc+0vTP3bBYvYynylYZLqzWR9WcLeNWqD+OBlf1meC60LPBg5s
+Kf1C1AvLDpl/EgyrvDvPv4TnD6oS4+HmhMYJT8y/df62Xiqce1Lekw9rqgOZ
+E/CUJrxAD3lUU3rHTsMzaypq0+H2js4oer+0p7l56WAP3Y26LNjPiWsrRD18
+/QNN9Pdjm00oemB26obRRPiZvPSoKepvDk78aStdn7gdXQ1rHG6mecCiyEfv
+uMAmofWPrWCB9SLLGpYEHLk2iXpNGpQPh7CeujPPW077Me7ZkQA3PxOy9sCu
+se1ercgTPZRxfw2sjl6Ieo164pZkvp1G/038P18wok4bbGiHmRWbUgn6IRVq
+7hfDfJfLviPLcF4vOt7IhsXziooGI9wvXSLfY7BrxM6K04aYdzWqMQPWueh9
+tMuAIRMDcYtnYJsyKyZIH+OzYoOv0PkV393b9C7q6ju1vZuObz/lveMd9PMB
+N3UO5gxnxxcuxfWSsuPrkTdr65sOPVixVfTeXjj3QbBTgR7ytryRy+D+a4Kd
+obDP9sjjw/R5pIk54wt337z8d2P0K2Bf5tgnsMbrn6Fsen6Cq6ePwcrhj6x9
+YSHLQdkDF/ZXPtgMk0zha2/s90Gh/lAYnR/oklENy/6qK4uEmc6fM/6CvLGP
+pp9vg5PasrWlMP/Kre4tdH7NuJaF+nQBczn0PBZnVbATYYms7bYzrD4RsaIE
+5txL9DClz4eQhEONsKvwb7/S/HLDQ+KrsKKN7V8MC1qPvBXBZlF7zHbAhg1v
+K41hw09lc/Q8svn5Rkexv/hkjPwh+qfm+ae0IK/GykRWCscNPl0YQX1aq0Ku
+CBZtVEePLUG+Rc7nQXBSKCu9h2D8nRzNGjpfnN8XtsgjysruCzawoGFD/et5
+HlnVcNDHElYI/L+9NMcjuSGDHXaw9ssfD8fqeEQ+8bbVna7Xd9Kf9zuPKKY7
+V4fBqtr6/VEzPCL6OXl3Orzq15mVtdM8YvbkeUE1rIz+TPrpCx6JmzVPHocl
+4ifz4VqM73JKdkR9zVXLz2x9ziMaS//nsbDGoD+j7BmPiOMdAs5TlzxeWgRn
+7yUDXbBkIdyPg/Hq1dcFOtqvn1gHnLBedkLNFhb9/dtaMjVwVkzmPH0+KoI8
+f2jF/u2apBJH+vzPrTZWIp/4wJUhakY1FV/9kkcMD1pcsoWzS8z/fRb1qJbP
+WCyHlVqj+chXPMLZ358wi/3IvXWOE/DmU3O7aB7lubVf+qIfTOf1V/mw2d4h
+ZwYW2CkjIqgvj3BmMF6ZZz1nQfPPKkJCYfGf92Xepf3Krx+MxH7Ni6FFubSf
+jrsmDZBH2ZU4vo2ev21qp/3ILzk9ced9en7MXV9Zon5BTnSy1g3rSUzzxiZ5
+RMq1L/oR1rrXpSSO84i2xaOyHubcOR7R+Aj9Yl3fV+VG+z2gXjqA71d3O9dQ
+L6krUKmxnlZe2AQzxvf0Wc3oZyB38YHb//8nFN/+3+c65r9ilhyv
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.907871335428632, 17.11903631971389}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwl1gk8lPkfB/DHUe4rFIomWrRSE4VVmqeibJGhRLusiagkTSK5JyS5EjZX
+y0QUHTurclQ0VK5Ks6JW5yhHroxat/h/nv3P69Xreb37Hd9reCzzPOrkLU4Q
+RBP+UU+iaw4fPZL477OAJCTiUvbUwKKmYcc8FZKMysw+FAjz2pSqnFVI/kt9
+h3fLYdrnSN0fVUgizNXuUqsuSQjybca0VUgOXdKyiUPZUXF8DSz8FutlAguv
+jZh747zPz27M/mW4/6vQ8A7Wf6tZsvgaTF8rVaWN+EYvV/1zAqa925WcDdM0
+dGUcYDLfyVZXleS3hYTFr4V5vkkfeKok2RdgE2kAc/8Zn7RSI/kOyVPulFlK
+cU51aiTpdql7yAQW7CjQNFcniepFGS62sPBSPPOCOs5LRZDe1P1e1zTfqJMc
+pnVaXxzMjByZFFtIEj+Lqe0upfI94iUls5DkxMZXHXpK3W/RLi5SJ/mXZ9X0
+qXq4met+rYTHOqQeEKiXP+Ss5Q27GP/YrABzY1fen1IjOUuLVrsrwUzpW18j
+ke/AVKaBJLWufmbvBOobNXeKHcB9/HN22v6qJId46h39GOY8DMrtXUCSrkUr
+u9KoeOfD5g6jPwv7DNSdqXyiyj6KLSA55yfHFipS9TXXf7uJ+bjkHvXh09Cv
+dTGlwej/lk7Ga39YENQp5wGT6R3hS2B2Y/wpH8xD6rRdQ9ZS5Ofxuj4Z1m9w
+kJOACaWEwVbcZ/WTl0GEDvIbTgswQfz8D39clYNZYUbBVxD/eV2YbJk2zr/d
+PGGE/DcZG8UHwOwAjeVVqiRx5sXlWXuYkL99exv6IT2k07kF5uQcdxTAd5sD
+SSdY2HJ+ZAfmEaii0x0E0+3DLW9jfqflXUNLYV6mdLsE5vH1N6vGfpgMVrlj
+hnmN1PMn6chHMK/aYTvWW98J+09QJjKqrbB+VO17aDnMTb1UrwIfWPL9fR+V
+v8zkq0bcb79v9osc6uXOW/XJB/GPiwUf1oDp9wNWjCC/VeWrzeQpWy0bPaJG
+EguyNMK7cV5ZnGXThXodFBqeFcLCq3bsX+HV23b9YAvzZi/wX6M/Am2bjjaq
+vv5bqofgdtONEf/1Y0VjhDz8NFiyrHwJ4tvoTDSh/0bZR3vVYbamv04R+l8p
+Hqp6bDHytQqazYf7rG09W7So76PvzF2YVen6yRTmWdx/9i/8/YKpxRVNzKPV
+O2E75pWT8sHWGGYb97+oQLzXS1TEmzUQf+OIkjnyNSDiaRyYZLJv1cIDMW7y
+jrBgk38OE/WmqhnWb4C5j5oOvIVtoiR7N1HrHTO97uiXgj/rljvM6eIda4H1
+ta8xkmC+vRrDEPNIDOy/3EidV7a+54P+a9eGbFZAPtxz9x7EwZHJUTK7qfyY
+6TWUs90MWi7AwhjXV9jPKd3ikfOcsqJPO+4jNuk8/j5Bmd6+SIB4A40ZexRR
+v2iF7f59cKxpvZI8zLw2WPwR85s+pvX3MPbzeEqFvyD/17LpeZVwqvvhLAG+
+n2sCr3f7wIJXXzp3wArfrwbPIF9W26L0F+jfsI75sXCYKSWj6Q+PR1cqDyzC
+/uY9XTT0M8XXNcKe8g1Fmgj9X5o9eKoEeTLXPwt5j3n6rScZ82DRKcH3QVhG
+520HvmcEvaBPejHu27/9okEb8uKryjr64L7N0977nGDRk0mJJ3DwCs133chL
+MJE9tQXzaVrs++I8zLGUnG2GO2T+XOsKpxb2aO3Fuc60rpSfYPZA9WwP6vcN
+sp6/DuYqyf1yBP35ckDAsoUJDY/N3cjjZPva5WyYvkLrnC3yNPU89ugKtf+Q
++Mo09F/zSZuwj7ov38O9BuvrdbWS6IgjKJP92oz16m5hbhDMM29lVcCZVi7T
+ZTBXp/R5LOy1+uEM5kCQG7dK4ueVY1ZUXEQgLnN6aONzPAPI6BEpPIVGYWJ7
+kF84rVJqDPtZyzmP8fuBkGu/t6+Juu9pQNFWPB8kpHw4hSen5eD3GtTPDzje
+RKP6tclTehNcJvuo5irVj792RmF+nJXqTWnasDK7c2M4+t1Z4a8ZiydHa3iC
+gXVLo5ieTswt9dzx0WX4f6eaLnErWJif3KMH24Yl5uYqI59dD/62wX6Tghs3
+JWCB7mWlOKzbp/x5YlQR+2dpnp3U+TbWsCxM29y1dBfi/vvlrJ6DAvqdNxTQ
+TuVxmjVTL49+3n5ZvA95SymybgbCvOe10SLq+6nyKNcFFqpalIaiL1v/fu3m
+B6fe+zQ3AQ/dqR66DgvspyS9MQ+DPKk5ZdzP9HehV8HRGXbeKQrU+6LSYgTu
+CQu7pIl8+DlmO2XxPU0xmBdWDPN0phkS8N7IikJDJeRLWCS9xf6t1VVuGTDb
+N3FvFkzTlFb7ANPLDX+xhJP113ydg7lFtjkNyIe428cUwcSykA1b4ZcGm9Su
+w6wrLgbVqKc2pbFzDcyzm1diCpesbTCJofqjY6z+F/oxPR1LXlag/t6o8dwA
+a5vynuSiPtFsTMsb9PNLyIvaADnkMxF4JgMePZ312FQW+w/TD/nCb1O0uf3S
+iJ9j2egB79b5p6BQCv1SvecUBFfqMsUPz8d9EW5SpfBk928mdvPQv+7GzdNw
+0+Kzdo6SuC9R4dN+xC9mxMRHS2BdVS6qE8bfF8+6xTGPrzJ/+iL/g30HvSNh
+gUSR5yRcJ6Px1A7m+J1lxKH+M2fyb+yE2WVqkrLo14CyiUQUTGwv/hwBn5BV
+dXkJ8/5InHpDvY+SSwx3IB4n4+HhpZhHyKmRw60w76DfC2t4uv4PbRbyozuG
+/7od3mX5Y1cvzNrG6lgNv35z9I476kmdMxOM4b59O1VOlsO0lQluBfD9VPus
+zzD7zu+y5nBdj3/8IEyf2pF9F/mu9VqiXw2LWLY3TOEfMjfOuVD3yVYFl6A+
+zYcdAdVUfLF+Zz24m6Z7XUTl6xTlT/2cZe6WOTmOesh3CY4MeDsnbLxDDPmd
+i+UOob+t89xNCgj0y6auDu8fYixxZlnFLIMQTO8v5VLzsf0hbvkMg+Ctarte
+As+e97QommQQdFEHu5War0PPW+Y4g+A+d/imgfsvGlW82jDKIDhPtQtCYCed
+u8Zh37D/My1pGH7/kkjX/Ao7nygMRL6lx6Vu0UYYBDviL0Vx1Cf6nXM/XcQg
+SNV7salw7LdaMzbMTYu/qYH+lE3M17sJCwOSz6bDgbqPD5A4n9pR/XgKfpR3
+hKOO+5lOZlo/o/9ZMV4HNRCff1czKRRW/Pby9pp/GYRy4nBhEvxeUNdii3xF
+thUpkbDTwbwNNmMMgtY3augIjzVE9yuhPr7Yim/z4aSKLI8MWJBkKSpEvHi9
+PEEtrFxdftQYLq3QE0ui+lGTUV+C/BPky3sHcB/nk93UUtj1g7O8kIqXctMz
+E/W/f7jtoh/yIY/v37YIVj5pZJJL5T/sEFmMfqWMbnYORb10lw4l6v1nLbI5
+8tMgg2DtluiRofrdNOtH70W+u6MSeqh5XfSLkPmIeTWYj3+EpUtHpAY7cL/1
+s7A5+OSl6Vo7Ac4f8K2yxHnhuGDd+hrEC9W/Q723/vtkV///qUb+D6LOr4I=
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.922596693736967, 3.8067338747393404}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000002274`, 17.}, {13.500000000002274`, 16.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.552325660469876, 17.180083206945802}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt1ws0lOkfB/A3USpqcp0Q41YaYhKbrNa4i1wrUZRKKalmc881bOWSJImi
+HZJLWaTkkrYhogs7CSG1UymWpYmKJP7fZ89/znGcz3luv9/3eWfOeVX3HHXd
+J0JR1Hv8kf/U5Cw+6mzqv48Um5KJzjmppMGmhOpWM6dhz5bjVyxg/phKj7g0
+m/KOlU0KhAUfa7eEw+wr25ilsPP8Pff74NTBTdRHMj+1VJ4pw6aKksKsDTXZ
+FE0yQ3s3zO3Wn4mC+XsVymJg6oyJ2GPYe7x842m4fGuntswKzG/ozAqFqxMd
+7XfAfP413c3w7XNWnjmwoKYhRAHuN85K6oY5G1aUPMP5jFxzh0UrUY/KUFEE
+zPvm6G8Al7/e8UiF1PfbVvnNMCXzreY++uvX/mdwPxl/qGm7G059Wjp8FPZu
+OMtaANPtR7OOwOwo09G7S9HP57zuvXDMrFNyJKzl+MuoM/El7QgXWKkkImgd
+TCuZ/tUYZoQ/37QMFtjW2xJ7r9CIm0S97GnVj2S+aN1x8xdwufkzrxNwI/dW
+TRXpR+LFxWY4W+SjWDbsbdh0Ww31mLyqVToJO18/9PksHEHvrAqBGR/ZLxeh
+v8bPbhbHSD79Hm5p5L7URP4KJvOvRL5XRl6ZOTZzyXr+YN6jEpgzFqbAJU6c
+MFwni/GAX183knq6gk/UwM4TtdfHST2blmzTk2NT7iXGAdroh1+77206zAqf
+afODU/V8Jz7APov588rJ+FnaWnV5NpX8+OOKbySPXrqMLcy2M5O21MK64aiF
+W2HhH/ScFJjR5xFpBwdaNmd1EbeWPVwFd+ybmVy2Cn2oR2l+wf4dmqq9bjCr
+Mq6gDA7MLfo9CeZ8rRP1IvVUtM/eIeNS3bFzYI33o0u7YeFpvfu56EfmHG/b
+KOy8VyreHC73udDwDU5l2mQMIg//ZX23puCYLy1xmXDLfsNvn2Da3ruBbrDO
+0MpGAcx3CqdWwO6VT3NayHj8KfGFMK1y3O0GOU+Ld0mU5Juw90siGZ/D6pMj
++Zt9vXKQ9GNh/INNnu9wv7iNxFThulhYtLe1SYfMN8jr6ibPt/DgflkyPrPd
+ltRbUiKvK0b6XXvG6K4s+V60Xf6BvJwD31WYol+uAatzFo6ZbLN/At++ef2S
+BKk3VM/RA3kqxVaaasDlPePD/bDM75xCa5KH772jB+k4X7/NKgBmv4o//BY+
+YLxes5jked5OaL+MTaVLRQs/kPGz3/Ly4Gq3C5Q2E+c96Bp7B3vW/XE4AOZ7
+0pmLFXBf2gNqf8Ic6bQTDLj6IH9cXBvnFd/XUoT7nr+qcIFpu3otZrE+/ss/
+NhmwQEdS0Aa3eHU3dcCMB2avk+FkvfCoRTqYn7m70wSmvo1Ir4d5Rb+MkHr7
+qipOesKc4Ku34mDWiVnTIDJf23pEHS7ntsvHkfm6v/m0oH9BQYrbSZgyGqoK
+gjkTkhXRMFsigMmC3TU3WXPIfuXJId+Rp9KwMMEDZkWeKumFtWb0TTfA3E9L
+F/DhzBulu5eT+XGzA33kPi4PL51G/bx59jfnYD/+rE/0S1g43d+5gXwfBF+f
+3YP54mGdZ2HbhCzpa8RTow5fYEraRfE8ccx8mUOovyWXeTwBZsfJbRmhk3oW
+HSJ2DkuoCUEeEsemm8h8bl3uZTHka6ngP1FEzlO8sDqN5B3y7HsLnFqmXk5X
+xO/Z9tZd4//Nz8tLhwUu7ZYrSV6jJz7NUcJ9qDD89pJ+lvgxvGC61Z31BbBz
+t9mRq3AMr6p7BPZ2yv/UTsb9M4yNVqO+XXklQ7BRpelPcTBtw9yLxN25R7Of
+wsKkrCvP4UBHC0cpXdxLc3FOITkvWXWzKxzDbrI5CPdZyY8kwsKyvyWVyHyv
+zuu1cKoKb+oB6q32zAgWkPXdJgn74NtWrrnfYb7eWJAYTMm1/rNID+MXXVOK
+0H+m+7ropXqk/wXRm+HsF1azEjD1vOLqQpKXVcfRWaynXnX2PEOegpwtBkMw
+o2fKvQTmuYTOtpH6qjjnsmEZZmF9GSwQLJfOhzXaJtNTYG7kzsgHcERcdOFh
+Un9fRugUXLeyUcMJppnX1djgPEbbDhVDmJ1XtqQYFgZGhavCrJOCMEXUny8W
+8VKW7B/raHMZ7sjrSZEm9XkUm2ggD//+pnhFmLN+Hu8mrGPEMdcl+8/sFzdd
+zqY+Hyt8ZU/yOKPl1AzfPjjxPYDU1+cxx1oZfbxx7LpG+uH9GL0DG20QNyN5
+0n5yCpZTwe/NuznVqiSvVtvi3bCz9cYjB2CW7vChDFgYfMe7AhakLEi8BRc9
+rvL7Qcbzax9Uw5uMfi5VZyF/m5G/Csh4VJW4DcxVm7c1Gu5aZffAF2bVtL+w
+hNtlkyfi4RiD2Nwp1FNgfeJdDixk3MzJh3V0/D/dhCmrgTU28NvyF/d4MM2H
+SRtAf9c7shQfw+z48HkJMHXqmmwbOU/UoHUNnC+VNfqUzHez6HqPvA40SCo3
+w4x/LVWK4bSkRvt7MOe4rXg0/PbsG9tyMn/iC8uPPI92EfNzYT4jyMsf3h/4
+MjWVrFdg+ZyE0z3qp6LJfIvVmtWwu/w6Tw7pJ84jicL5JrvtGvbAzpWVF73g
+jqX6mu4knxfjQU/h9JKNO13I+bvKsjaiv2B3exUnOFVZ+h0f/rBYffi/8eRj
+j7yQV+yGa7TtZP9y5cRhOPHyrkKS54G0RyXGDHwfja+lHIer86PtwmGF+38f
+SSN5jMmGVcIxv9DvlcJGywe2DsCXdM7zSF6huqZblqiyKTs/q0ufSN6TOx10
+4DTrTge5Nfjdm78neQM87fz4yc9wkWJypzlsnh077Q2zzlUcMIEvKUU8iYeF
+D4tmmHDDr5H6BbDRqsf1ZH+5FqZlI8xf8NHsX5zfEpdl+Bo+3W3r0wCXdkXv
+H4e7C546pcOJT274ztXH+qCvbj5wgUr0rCTM037ytwHsftdMRxqm6y+1F4cH
+h/U1iJ23RVfVIx+DevfNi2GOhqXpCZi5XmObGCx8bn7bFbZeLz85ifOoZUr9
+RvCRt3+oDsG8H/YPDWH9m6+7e2DvXb2+duT59ju/5hHMvh8jCIYzAk5Z1MDc
+HZUutXBU2IzyDTimoj1kAerZP9hc/zvJo0ewwBQevUlJZpLxTUt0IuBQox93
+02F3pvWrP2GtLTWeGTBt7uxbUeQ1Vqpkl0PW924U2MPJnY5FxfCg1E9HzpF8
+Jcz23oVbFK4aPIczGJF67XB5eqjIEjU2pfaedWYE5uTZ95vDrhNurRLoP9Tu
+lNFhWMa3ma4HcxNseMnwL4YDoZthrftGJVxYpDX7TSjJ0+FrfhHMjFAzuULW
+d55ry4ftflgfa4Anzyg3XyD73y0M6yfj95y4EbDWA87OuWtxP57+HdthXbe1
+DspwqNrCdfpw7anDlw3gFuHqt6Jw5hu/NiuYX5XO6EQ/GurruC4we7eY2zXY
+WZUj4g6zQrkfQmDvph5lDzimSEfZCWbZlW7dCmuZ7qKvhm1ZdesdYEGa7A1p
+kqfI8UQzMl/TezPJl7nEQWctqUddfQUFZ9e6qqjDjHdDjfNhiYRFQVKweK7v
+NkWSt6+rlQicWv48wZh8H5ZLXR1Hv6dzt6T6wPRjq88NwLRIA71M2PK8xORr
+8vyZXmkm96Nb93N2L3n+Vmw/IIt+g+dHyL2Eu1VfvSH5uCdltgpgyqmvL5fc
+zwXTsWHYNiJ8bABOWbgocprkPaTUxMR7nO2ep7qkPmfJdvoB+PPaZed14MEK
+zlAOzJSeEbUn+dJ2xj+GJxmFlf6k3+tGqf/C6SE1t1NhXsB1jbl4j/u6eP5U
+JcnbsKNNEk6uM+K8JPnVCzMk4Bny/rj2/++PGuz/AQ7UGzs=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.684798798577102, 9.013741219420858}, \
+{1, -1}], LineBox[CompressedData["
+1:eJwt1wk4lGsbB/C3UpbEILs0R3Yyk7R8LbxJxalsJUQaQguFEiqmkS2iMyFR
+YqIUCaeELDVKyqGTCi1UI3I6okYnS0W+//Odb67L5fq5n+d+7vue551r/OIT
+5Ow3laKoLvyQ3/++dOl/f2vTFHuZzLAd3GrvWaoPf40bupMBC9qdpRfBwfMd
+Rnvg4CduaUawwOC7KUsPznj1zzS4xX6ldBgscNIfaZiDPJcV/SpgR3ZC9D5Y
+69ZKn08w5+rXmGmw273FPC19mmL02jxJ0KIpKc54sRXxTaexSU2aKpeTd3KF
+6Yti+RC4+Chjyw6Y6fEtSqRBUzYZtQa+cHD5i+pN8JWoBaVbYdHbzbNb1bFu
+tMbWlqz/wdq/FdYNP1tuBnP8V80dVUNd497TGMQTAVmF8AZPEZfUx4tO2hMK
+i//m8ltIP/MlZd1hLSObgmIS1/LscIVtUvJUT8Gi7xYTQXCtu83MSBJ33paZ
+C9ue/eYVBAtzVG/1wFJr21MDSVzwKWkp6lkqs6MqlOz/eYqbBcdG/u5/nMS7
+30ROQT+GiRU3LsPivJdzA+B0ttvCpzBbU/NzK7whT3d8BupvXTDr/HzMh/Gf
+uN9tYLGBnXUkHJryPTUR5t/nplfBrUGVvz2DeSFRKm/h2vQ725gGmN/MNVaD
+cKRtQtpemGreldENt60fvlsFi6XiG2pg4dbM9EmYF6ZyhuRnR77ttjLEfL/t
+H9WDbZazHoXDgpGA9mrUJ9t2v+MSTEvsnGEFtxrGDj6EeUf3a1Si34hdbw+L
+YOE0tpEhnHnx4O4BmDH2JPMM5hXa9ENvEC4rKOqWgb8+Ony2B2YnDzkmqGKe
+txV0n5B87MBHCrBEQWlMJcyPTxWUqNCU6fXgPzJhcWz6Wm9YKv2wNamPn+q+
+zhS+4uzh4gKLPs/XUIBpP+mQRTDn0VZlBqymf2NAndQfw9ljCHddS/kkQawz
+YeYGsz8+2DSGeQiiz+7PhrVaS84Nw8wVFtuH4M0NHzsm4LL7a3ydUZ9NdeY5
+BbKfJ9pdDYfal/5kk/PdSqR10Z9aslaaBxwstaM5kfT7d8w+Pll/ZNS7D9ZN
+ilz4J6m/c8pfFmRe3A6mkhHmWnZKIQQeO7JSbxtxhpH/Gbg4eNtIIUzL1227
+BDsy4o1HYU78RDS5b77rSzZZG+PvfreiDpD7qFOokQgH3z7NJPnHxra6N5H4
+mzGX1zifLmkyn2KC/edPyO+Hk299M2DBIl9r3RH0Q4WWGDrDTLftevvg8nan
+3N0k7uJg8hbzcNvCDT9InJ+TbQ/7vurWDoNbNWKH6pVpynMyiBdI4kWXwyzh
+yB717+6wOPKJQtNsmrJ4x91Iw+xd6jP94fTJVcm/wJT4R5cabLhbRFHENYGz
+epWw/qCs8hvUL2zLUmiCVxgWL74NMyPOrXwIt3AKa/NgcXOjUARLXb/XkgLT
+t1pKGMi3K+f46miyf9BS2QWmn3FzuTA/KkmrCC6z2SuOJ/YfNZ+Jeg0NDzWf
+JfNTbbE6AAvv59pUw+xPbl1d8NfV7YO9sMhvL98a/TPin3aqk3nZpcrnwuXX
+PMtcSb8HPEIHyX07mVaYDTt2LQ03wjx71bJv9sECESfHAc589kfiQlPcf5ka
+321wm+X6Wh5MLVLd4gRbdOu+bSZ+HzrXBBZ5B51TnI/69lxM/Yj8A12xzc6w
+yED9fDo5/5lsWhLMGNxkbgSPLX16oAoWuj43vob6N8gc8eqExWlq6nqwSMf/
+9hcSF9urZGAeEn7GvJ8ws3x74nQ4Nnuf4iTM8fXrj8B86Q8M72GYdyI8blgR
+zz/d9sc7mDLhWPHg3hlSik2kPocOrzmwWNhuW0R8JM+zVQH3uUqh+jjcymqo
+PQfzzFIf+8O09PovPHhgo+noWlLPKm0H4kjVuAQT4i87qSxY1rLvkgo536xF
+tQmmEpebycCOXyUuzMJ5pr+syZGEBSFDd33gZPe/JBjk/I8F/ffgcr7zyDyY
+X3rhpwn6eXEzIW41mVfgyzOn4UDNY6v3kflYLrP8AZcvZtjkk/VFry+5kvvj
+rWfYTeYxfUv/JVh8aMF8fTPcI5/Q+93wB+oZHQwLgufdkST3KVxSrQ4W6ltt
+VobHUjpsZVjIJ1WhKA1LPXTzc4HL6qsK35H739Gvkg0La6wH80j+Ps+lXcRz
+2lrWw9WLx0ek2ahj4f2V5L6XnTB4zYSFZvoavrDZq9B15rBjQs5wJ/plyskN
+rIQpY1b/Bti8tbZ+NdnPVd5ei/nlDDlSNjC/w76FBV8sNdO2ggVR3lHFDHwe
+ujKbF8HMOLUtS2BB+KUPhjCPSltSKE9T/n8r89TJ+Q8ZJ+ThFyzJSimYs0FY
+VCCHzyOPgdjPqJ95MCYiRI58nidefwxTuY1pwbCj7tqN5TDH+LhzHtxgNHwo
+F6YXjD6binxjR0VKabBow0uTZDj9xJRMPszW2+2siXpetLrPziLrvTafiISX
+3tbVukbm6eRd0Atz3vvXt5D9nawV9ujvYbtO+uj/zm9quwGreeVsUkG9ZSUv
+dRmYj/WCgI2kX+rikK0XXDXxvN2VzNPLZjwL1hkN7okk89kV8vAOHJuU6JhP
+nGJn+ghu61T60ETymb+qFMKhr3UPfIYZi+K0zsJd51MaFRfgPv4TzN4KzwgY
+emwOCySN30+Fy7QbL9iTeN3bBWfI8yBbFeUHi5ezvmjAgXMmusJgTsJQdSp5
+fx78J+wYLHIVF0yDNw/cpI/DdClveR/mSdXXhRJzEqPNHs3C83reODEGFl5o
+rm2Upakvx1hmh8n5V4evds3E+1OTv2Yv2c/ti1GFG6R0Xm4jfuzB4srQ1Mk5
+AXIbyfqC6BJlWCcwRWMFiZuMvxFJ4/NWzcfClORPbvcgvsseideGeRcqwhSx
+nqcfoTsbZs6p+PUAzChe/n0WyWc88Nc4PPWLe6Ms2W/Xc/oyzndb4SOvAFOp
+k0Z7UG9SXbi2JonLquxbhn6Op2iPG5P9KVWps9Cv2bnOIJrEdZZceQFv/nh1
+qgepr0lW/RTuT0TlEgnSr6OvGV8F8wrbmZCaTfL3X9F0hi9u7M2vh/n9v1aH
+w9wbYYofyPx3vRqIhfuXzS2UM0e+9zFrImC36h9sC1gY8SrcCc40oI66wmXO
+LE8FOMliZnQ4zPFY3HIA52dM7bVLg0XX183JJvf92FnNIpIv771fPvqxXNgR
+VEP8ZN7TVPSbqVMx0WhOvm/qZYViHv37qLoWcp5JfdImzMuiIKqPmJYIz1iG
+efcaRg49gAWF0k4WUqiPf+bkbbL+Tznur5I0VVHzM/d3Es+9nBc3A8+P6W+s
+PJiK1S8YmI73I91ixylS3/OW2FjYsl4umEf2n6TUHOGup4PJwWR/xu4RBzi9
+rabXh8TjPPYeg+/eCUh0g5n27Wk98OJ/Jnc6k3z51mF7cZ7sz/mWTiT+Q9ld
+DfWk/qaU6kIc4CzfCT+1dS/eTuq5ttL7Kup/JTf9dBCZX2Adl4v+jHlzleLI
++as5EXbon5nPLs0l/Vc+uDUF81HRiagi/YrK1Xjn4bHnBRu6SX20zbrZmKeW
+9z3vGQvJ902O0XbYR6n5iSksaOgxOQQbr0rZuQlmXvQPJ3GdF+yBCJiTEhKu
+AJ/sa7HIJvHF4yI+8seWHmHVwqJSh9xu1ONzz+Xzc1hYOO+KNNz6+M+KT8S8
+d1UM6f//n2aB9ZN4SdL/BXHE1jc=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.51595498616782, 2.888880495006221}, \
+{1, 1}], LineBox[CompressedData["
+1:eJxTTMoPSmViYGCwBWIQDQEqDiEyIFrOgaGg63OSmYrDzO9z9v9uk3VgWLF5
+kku8ioPSsWuhi37JODBoaO52r1BxuLaBb/3LBCD/w0aDX/UqDvqbjmztPSDt
+wLBjCturUhWHfy805q1RAPI3eJmtiVJxUBZ+2RDbIeXAkPCA8Yq+ikNNZHC8
++z9JB4aK1Qtvf1d26H97fYldB5DPcX3a/63KDn84o2++0wLyG8QO8eUpO4jX
+1jVNfSnhwCAgx2KkouywPWWl0aWjQP6LFavW3VFyWLTIuKtvP5DfscJy+Wwl
+h/kz33T/vwLkB3ha3EtRcojcYaJ/gAlo3oH87jprJYcJ68uXMLsA+Qy/p7xR
+VHIQen0p6c4kIF/D6uwiSSWHdau+P5r8Asg30Hwkrazk8EG39iuvHdD9B/7P
+P22r5LDt2qvvhj1AfsAHbvUMJYfOV85Xg8+A/GdvuXu+kkPCzvcHp/0A8ndw
+tAc+VHKoWCL935kHGB4CG/TkNZUdXvAILhJgAfILGpP/Fik7+D+OC/O7B1Sv
+oXp02S5lBwab++4ss4H8iCnTv/1WdpDY/v7gO2uQ/Wck1IxVHCpY/NtTjwDd
+98IwgyVWxaF0ZnuMliWQ73HwsGq5ioOa/NH5SguA/r+QH8/eoOIw1QIUvxJw
++SfM1gl348Xh+qd0Viy+ekwMbv4kuY0Vs6zF4PYL7hKwEzwiCncf13OFHb9T
+ROHu32W/cOVGRVG4/xTF3se+/y0C9/+GM08Y9nwWgYfPykwBu0x2UXj4NVjs
+0VpjLAoP32AfUY5zxaLw8Ldwbub6dFAUHj/RFRyyOeJi8Pj7bq47VzlXDB6/
+lcUd0X92i8Hj/8KO0xfs/4rB00dWp3AJg7Y4PP1kNJwpLXQQh6ev4H1hZ3Wt
+xOHpT+hLY22WmDg8ffJJLlUTvCoGT79VphrRB8vF4Om79+SaBTsYxeDpny1O
+vH5RuSg8f/BYXU8Mvi8Czz+3Cqy9iuxF4Pkr+MDHALH5wvD8x7Fac1UsqzA8
+fxZoJzuwVAo5wPLvVjYQLeQAAACtaGA=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.354800000000001, 6.}, {1, 0}], 
+        LineBox[CompressedData["
+1:eJxTTMoPSmViYGAwBmIQDQEqDis4ITTDhdu3dtmrONz7tfe8025lBwYOlz9u
+2SoOf3P6puVlAvkvylXY6lUcDp5abPiQH8hf8TIwpFLF4c7e6gtztig5MDBU
+rVgVpeJwWHOR3IlYID8hIGGqqorD9Ss5KdqCQP6F+ZNq7yk7HEt+3Lj1sqID
+ww/VNO9uZQc9U+P/QiuBfI6qjBdGyg6rtsx6HT8ZyM9QbVtzR8nB9nYt++9J
+QP6EvTcP9is5bJyc/qF2GZD/wNKnJ0jJgf3JuY+3ToHUb1inqKXkoDhZ4e/c
+30B+xaxpdyWVHBY/iEr0Ngba/0L6u6SykoOR9oXkK9lAvsGGFCFXJYdPWkE8
+EvNB/NupX2qUHG50nC5JPQ7kW+iVSR9TcqiS8z3z5T7I/SEHiqWUHXbuCGPy
+fQrkT7gR87tI2WFrwoYVvVeB/AiFqPATyg4/OgWeT9sA5Guc1SkQVnE4oXFW
+m6cCFD4mnRx+Kg5ut1fEGOqD9O+QcSpWcZgx42PG0ltA9wbskGNtUHHwkgFG
+R4MiXP5tBd/0KFVFuH47s/DF5y4owM3f+8Loyud2Bbj9ve3vJTL9FeDuu7DB
+P7xISwHu/jMRK/9uklKA+4/78yZjbgUFuP/XdJh0z7JQgIfP5GdrPz9PUICH
+X/Az/TnaUxTg4fvIYOm8LWcU4OGfUnefKYkFET+1uoZ8qqaI+LtSO4O/KRIR
+v+5mTT9YchHxfzsmVWRBDiJ9hN85w/A2TBGefvavlanz0lGEp6+1NpNnX3mn
+AE9/B5/HPjRfpABPnyuCW/STvRXg6bejd8cc2wfy8PQt4Pn4kpKuPDz9++q2
+JFR1yjnA8scOfhAt5wAAXRMymg==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.354800000000001, 8.75}, {1, 0}], 
+        LineBox[{{6.4999999999976925`, 16.}, {13.49999999999251, 16.}}], 
+        PolygonBox[{{10.6, 16.}, {9.4, 15.6}, {9.4, 16.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 16.9452}, {0, -1}], 
+        LineBox[{{6.499999999996362, 16.000000000005457`}, {10., 
+         10.000000000003638`}}], 
+        PolygonBox[{{7.947677384685548, 13.51826734053906}, {
+         8.206811054955079, 12.280184249251306`}, {8.897834175673825, 
+         12.683281069670574`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.515942703607428, 12.823799910437668}, \
+{1, 1}], LineBox[{{13.500000000007276`, 16.000000000005457`}, {
+         10.000000000003638`, 10.000000000001819`}}], 
+        PolygonBox[{{11.447677384685548`, 12.48173265946094}, {
+         11.706811054955079`, 13.719815750748694`}, {12.397834175673825`, 
+         13.316718930329426`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.484057296392571, 12.823799910437668}, \
+{-1, 1}], 
+        {PointSize[0.04], PointBox[{6.5, 16.}], PointBox[{10., 4.5}], 
+         PointBox[{13.5, 16.}], PointBox[{10., 7.5}], PointBox[{10., 10.}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T13", " ", "P2", " ", "N26"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdgei/giijfhfjhj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdgei/giijfhfjhj.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {22, 0}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwd1gs0VGsbB/BNqiFFSVFoCA0mDVHqqBlS6WoqNJxC5dZ9KjoKoYhKRe66
+jVBKZahVyGU4XYg0J5RqymCKk2QizhTx/d/PWq1Zv9n7fd7n+e93k+H2/Rv9
+lCmKGsI/8kkpRvGjz6FoBFM5VM2O32p74GLbig4TuOUyv+GjHofiaXRm7YA1
+Fc8stsKRTu22xbCdIPtE90xcF4ZdNtTmUOJ3C2LOwnbPFvZegnUW/Tl2Bay4
+f+2o6TQOxX+u1zqN3H/Y7XsJXKOq30rB1KKnqRunY7+qwtIxcIvlp6BuWJBr
+pGUA07UWJEXooN7Jtuh1pJ7hGEs1XfT5Qav6HBwY6NR9EvaJXfHwA1k/Q67W
+B9ck3Cu2Rb/yVxcTnGdwqPRPRg8SYYZylm8cHMIzOfQVDrR32y2Ei30XVXEw
+v8LELVEES4c3lZyCI8d61pfArAfr+6phKZWoeQUWrG4t7IJ9Ar8s5sM6tj+1
+FbBz3obv82HN/Q02vTBnk+XRHvRD36tu/YLU39gbn0X6l+x0vgALz97Vd4MZ
+rJnP2LD8nZXpRF3Sx+oxLejPLiF/XwPmF2+3WuoFFyuu8i7DLRZDka8xb2T0
+krvh5PqX/v3LSR5uTiEHYcFhpelkrhazDRJy3VmeWTgTFmUoj82CRSYF/LPY
+p4uprC0h9TJGOCRXxt9RJpb4lEfvTE4l33sv5abAwlOJrAUwbWHG40moE9jY
+r/IVz4n7l+RzKpwXsE6tlDy3WdwQM/TR5XifmQXnzdv2tIo8xxc8B2KfnoaP
+npiDm7KNVgLbLct82gvTLtYv/kzqPXMtDCXnsPpRtgmZS2vngl8wpaXldIjM
+IVE/HmCA7wslx57D6ZnlESI4wTxmrSn6TE/hDyvPQv5XHxyMgrmrhirmEm/z
+r3hN5qvLTeHAfMeEJYbkuY5yefaw8wODw1tgmoZuqxGct/tKWjQsZkl6Bsl+
+Qym5ZE6pJE67DOaNv52eANs1x8YfhjVNmcEHSL6DilFzWPhL7raIrN9T6/0R
+/Wv6LN79L3muxh03Usi5iQ/rOUHOQXVznhuZ16dURZ08jx3er4xggVFYbgzm
+446aKiuRc2ja6TuAfAKb63j95Fwc+LDcB053mTN9GE5/5RFVh/eKW7EsRg/3
+c2kH19rD4qsGMldS/+XxKw/xXtboNO/KIefYivbLAaa7e7qoot/AdycXt+K9
+5jE2v4uEWcx7Oy+Q9/6HW8x45CENKLq8FdYJ7zbMgFn0njYHuOnM1GgdOvYp
+CbJgw5xuMxM/uIUK93CFmV/EAwUw7YTMIYKsz2s4MwjLHTm1ZXDQ3I78BYbI
+Y5P3WFXye6Th/PZ9cGDS00BvWN1cpHsJVpg6DJTC6WF+typgfsWmQ9Mwn/Ns
+h53NMDfX/PYeOOcs11IKF7MjsovJ/JFx7q1wnE1fwwD8+FJ9ZSMs/u+QM52c
+x0GXSlJPwY//aQMzT9VOuQbThFnlVnBOEv1FBLmeUnVEG46fG8D2hAW3PzOk
+qDfV36h1PiylsyQXYF+r3+Ya5P7dagXz4D1a2ue/YV5WZ11BCfqPVpm6ugkW
+JtWU28D8lY6u1TDPwc0rF3nkWeauKiX5tKWe1oRdVQ145bCga3VIqBbOhxbX
+uh6Wxvd4d0/Bfvat4zuJ2SJHP1iq53ViIvanL7a51zOZQ9VvVm5YSuYvNLoW
+B+stHUw/YkjqjJ+/CA60lFqUwaJ2wwwlmE8f+UvFCH00jx9t10ReMmoeF46b
+fOfIB1jYnye5BLNiwsbL4T1TacpdMD0q5qIO1v8YsLOaNxu5Wi6zcYVb/uEx
++DAVR/2+AsuS077kwdIzfiE/YKcdzq/fwF2prkUuZJ6Hvx8MwbzKnsP5sL1b
+1ystY3jINV4Z89t9lfXNguP4JV9d4GLHVl86HJmvO3IOZqbzFdowp8njySNY
+2PJxQAnu0gye0gjrnZRqfEZ9QUdr9itYxfZv7mNigyR2CVyW9WTMVdJ/+U3R
+SS3yd0VwMQTm3/ilYw8zhLy0TTA9+dKK9+hPJI71tybrnWqWBMBiscv66TCH
+M6mmA/NR7cZcFZiWv8bTDQ4LPak1hLyKT7E6RMhvy/srjcOwwCss2QLW2Zey
+QQ33i15kbbTVwFyuzPrZMCt7Ac90EurvGvfbGZbPsw6fPxHzOt+feQTWrK+v
+91XH++Dv/7kI5l7OFokmoP+GjoIfsPBZnWINvFbV/KA98pAbHqCpwny7Tlks
+rPnsDw+FGqnflNoEJ2SVmurgep77axrdBPc1jr3gC28ZflAbAEsTK+rfwHFW
+Tok3yXWzcx67sP9jea5HByz86e6thf6SbRuDtUzRT+zRCbWwYiUzxw4WH5CP
+RGIedds9ehthAedgFUuDnB/3dG84UlZm2wA7WTx230ac8k2FQfJqkenw4HQf
+V43NsHFou+5yUv9tv5wPC47YKJmTesbZaw7Ba4OXiWlwnPmhp1tgTSPTetKf
+IixHby4cFLXPtxymNi53eI798qhZOulkvge1fhPh+BP9HodhlszK0wz9tiis
+gj1hzZej0SaYh+/OClpB1r+7f0cN8/uOyVe1J3lEe15sR557UjvDiaXf+m88
+VMX5KggWOJN68vh1yTT8PySEWekDC161Fx4fjzz0aq9Fw5zyItv4cfh+eFPi
+PXK9PlG9ZCzO8Qxr96+waGNTmwacPvGUy1zMx5eFnEtR4VDDuT6RQSRf2fqO
+tXBgdvH1SpjuVXBqAfxDdslVfQ7OxcjsYS7MWGM4gQeL29alpcNOvrruApiu
+z60ej/qRA5s722HOsWFmGvy1dqVQnwFP0zBciv64N6sU62Eq6Ht7H5xHNzoY
+DAsmv9LPxzzy8LrlCbBI2dt9C+Z1/uOQwVWYft7Me5j4baPFNVh6+HptFPKJ
+35xJz4Q1s2XrZbCN33XzOFi+nW+hjzxDVvV/2gv7/Buwaw45r0Wlq9fB4oBI
+PQruOpGWxiD93coIuY71xlMv2imT+0cOy2bCNQ47b0swjzzL/tMO7H87Pyaw
+FBZkblWcQL/R4WMrLsORk/PdT2Ae2UhTZRzM6mDk7ML8ZffuWoSTvM7SE5Yh
+L7HmY/cwOOFG5k6dMcj37TeDWHLdvOt2vxLOa5dGG6lHrbI+30oh79RxwSJY
+WvjHjLpRNsV6uXfeN1h09L2y3gib4iZO+NeE5OOyL6FymE0ZswUT/Mk8/l6f
+KofYFOPP2OzbJE+9av3Z8HCuX/B/JP+F4RO6f7Ep9bP905zM0P9bVSNtXKe5
+iFUTYGlP7YVMeGrR/DctsM/n3HQ+6lMXV1vomaP+3YLeuN9squzWpN7NsMg7
+7dAr9OOqctT7NLESrVcP/X/9R9uwCBZq89c3wzn5ai4NML3X7H0s5r3fOyHm
+IyxfoOVhrow8rYUd7f9f77f0HhwoGqchIZ6aoT8DecnHHJ1TZ05+3/xU5sE2
+devKC2Gf5BdVAbCeiVNlIhyZVDt3BRy02sxvL9m/zHlpH+oFHbWZvpLsn/RU
+dy8slq7fZEj2b5yhWop+mL8DE0cwL+eGyqaP6DcwfTKjDRakWo+pRv7cy8es
+62A6i81IwfzDjowjFTA1FOywCnkpYn5tLYNFvYrGPgWbqmH+rH9C1pv3vL0+
+iHyWKFm/J/d7nX575AebkvfqBg2TfI8wlSL68Dy8Tw0ySH/H12x8JmdTa9Wz
+rnqTeeqsaqu+san4h4OyKySPO90Xbn9FPzlREhnxHIO5W7rZVI7Sxw3zLFCf
+tn9R8xc2JVR6/jEUjjT0uqSF6zbb6sfWEEd03lLDeuc5knWTmVi/cunD3B42
+Fe3xeqsbzGk/PljTy6a25CdMuwD7dJR5mn1nU3GPAm49gaWcvQHn0K/o+LLC
+bzCdE2o22o88fs63U5+LemrmN/wH2NQeuaJOH6ZPql4nxPzcA9Sx2bBP1Uhz
+zX/IKyqng1wXvZw+4yry4v0t1JhEnGjQZPyTTQna/jo5QPafzLd3gWt+DzNf
+k/1XeUVNJ67tnl9E/KRtSijWx511Hj1D7rdXrwxF/celnyb4k/mqqCuzsL9m
+xJNGR3K/r0sDH/lLXmcUGcPUpGsq4ZjHlZ9cNxEW/Ezrd0X+jzk3v48iL5Fl
+g/F05FV8ZU3SMMnPMS15VyebCmLE3lIheY3Uz2lox/u2w6RIh9QrDln0WoL3
+8RNPYAdHuvF3ipuQT5hZ5w5yPbRwmqAOz7/60tEM4kcdnfoivG8F7pI3xGWz
+ftTcwfPsYzFJPhRX4zTvLPZL1VwSQCwYtV8YVEnlWU+5c4+Y/CSUUyrk05Lz
+P4Clt9A=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.703763748652328, 13.714402573074395}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJw11nk81PkfB/BvIkdiqgmFbZyxkpFopjBTUiJHl2NTDZUjRKWaQsYqx65q
+ioqu36DVqN0MHWSpKdqMFULOkmxb5IhEztrX54/fPB58H0+f7/d9fb/f8dHz
+D9+0R46iqJf4IUeKRn79wKWUyNGUS6X7hY5/0uVSoZEV2gUmXKrDtT3xKbwm
+kD0vABa8VqbHEcvSJD/AXbp2qwxhQW/VsfZFXIrX1dqQr8OlrkhVb92Ak8Y5
+F8zh685cpWg4aOk1vSvaXIr1vKXeFxa+7JbIweLkF8XOcIVPyOuABVzKNib1
+uSNZH3rjWz0f8TNWxrrCzVPrSu3h35NMf+fBlOysfqkWl5JnX70RA2tVspTd
+4AbnB+5ZsODOPdqwJuIrThpXwfxA+9q7MM/92/5RmJnYUngapo3SvQ3Rj5K5
+zfefYbrMTcEVZrLp2ULY0JRdFQ4Xfdi2/x58Ylez4y+wcNcWg344QsVz3yWY
+VyA9YYP8th7qpddgfiItJxlOCn9ncwHW2u6m2Qkzn/YfFZD1ipmmK9BPb+/s
+J9thlrMjMwXevc3y/RLYQ29uZR28LNvMbRj1sgq/aSuT+Tye01lA5js1McsM
+FhwKHgqGRZUbo6zhUM1Derqwh6+JtzFczuhn1xhjXsWTsknEGzA8qRkPj3o0
+WD6AvSf+jl0J8y7eX7Qdvrt1gdyEEfoTZwX2oN4Bv7HmMtgj+Z0kEJYonqi5
+CIseeWQ0on+lBeNmfJh7McbTDu69myDaA1Mzk2MzNbhU9OtPq3kww3BzpZIG
+me+5XwPh9ALnZ/x5+HtL0bZjMH/axLUROu7foTEVEl/wz8GGBLgrUynqT2KL
+EHVzeNRLwfJfkt/90kDPXC5Voj3/4GzUL7bmfS6Hk/JmBNvBThm6XkWweFTf
+PoD0d0nX+CnctV3fIRlOirFY3g2rGi5Suw5XKAVu0EN8Vc65i3eJ/WtZwbCg
+xX7TA5j1fv2cElh0StE+H67dahlKR/2+B4qGLsPN4SbpoXCo4E3uUTjiW0/3
+Q7ihddVSF+L4uRMK6J+3hD5A6uWGCXts4YY/9j6rIfO2+Xh5J8zUyJmRCNOC
+Ytv3wlqDH51XwFqxx6/6wjpne3i9hqjjaO2QFUy5HDUQwRGNlcsHkU9LL9TH
+G5Z0m3w9D5eY8NM04fS46HeGsNNU9JwOAxyrhu5nop81+g+z7sDNHcNTNLgk
+YY0wFTaRiT8ewXwiC0POCeAI/97Zr+bgOYjZXH4MDuLnmTrAQTZXsuNg6cM/
+ywtmI+5QtEYaLNyyiMaEGfs/8iXk+pMJ5x/RuNS7FEtJA8wPfiS/B2beXrDm
+G0wTKygZwEGpwdE/ot7aRA2nEXU8jz3ecZ6kvyVlLm1w1c1TMbFwR2G5/RBs
+eL33URbstMvlsw6uX5bysK0Upu1OCt4CmzRkPa2Gk9bGvLkML5452lMPezsl
+hffDkTcurK+CmcfDJGtRb3Pbt/2FMOvp5y/X4A6boAvnYbFe7plBuEF0OD4Q
+NvEp1mCj/6qxvItLSHyVs9cj4IbvBnd6yTzKPOekwUWuynrXDcj3YYqpCJYP
++ynai8y7OrzyHKwjeSBUhkWhXgohsK+ROrtUH/07dhmZwlJ2uN0hYsOUvGrk
+1/F7a7kMHv1hh8sO+ERFqtekHvk+8xO3oR8pqzeuBuYpC9xdSL/sIioPpgKK
+W3djXkznOOFlWLBJzdRcDednSjeeJ35RPTyuivc1Y9szss58rRvSMhNzaDr2
+6g+4o1+rt04F7zv78KAMFma8SB9QxnVvV3zqg2mnfnrLhjd4OfA09cnzMLn4
+rhLiGX095QCLfinM8IfXvJ+TGQ5Lbqk2OcL8M+fL0mGhVb2uL/yl/urqErIu
+OuCYqUTe9+zbTTBPkjSshviGVr+OdsGMJ7mDV2Ctl7a/9MOCwLtRq1AfX/ec
+zweSb69BxSAcUSv9UgdT2Z+PZ6Gfct/cxHxy/jG6gxP6Lcn4uyUejtBZtKIZ
+Di0fW+MCc7Ppp51m4f4lsX5TJr50tlMIi11SVj8m8zo6VXQTFoSU3Isk824a
+Lz0LnwjYKDOGI7QXTjnAWyY43q0MnKfrPvoY8ZNsa8zOwbR2SaYa8YBHqwcs
+iTrGskB9oj62WIucP99BxYz0U6zZ2rgQ54eUac9Ev+mp4vE0WMSZX9qiiPtk
+KbQOgyM2XFDLmoF6FQ427iTrstaocAWSL7cvBK6lIqxc5THn4X3bzsAdWtxM
+x+k45jh2/wUzY4w++8nh/oWbsRSRX2i4Myd3Gt7HqwknmbBIKM/Sh3u5shu+
+sNT/t5ZqCvenbWVFEtxRv9BDAr/yXUUrgCPyIrvL4cnnK/9+Sa6vUTirhOuj
+3VoTBsn54a7UIXhxnRtzOnk+t8qU5ZA/aJm6uTJ5/jZeGf8NVt0xHiZHnr8C
+HzVP1EtfPBXVj+t5685/moF+PFxEMc9Jvio25w94Q6mttYjM19ZTxx79N2/t
+/RoIU1aqOXmwmJF11Zhcb3xm/xhxokdjCfr3mFnQT8f8mq/O7TeApfob709h
+nbHca14S9kmMf/se5sOshSpyZJ8kOKJ4yBIesFJdvwPmzVS9H4v8ouPx2m3Y
+99C2L7ydiXq9NZqU9sLSKPdL19CP2NS6Qg0WNiw4EIv+RQkWqlXYB4n+3Bjt
+hnkNCOL8s7VJfLHY/BuHotIFeueJ3Wsqn01wKIls3m4RzDt3szxujEMppYbT
+y2DGqR2xEV85lCi6V34c5v44GJYzzKGap9E1VpH8U9Pzl37hUBHCpsBUHfL/
+x9afMcShmDerU3tgRmqZ+uHPHKpi/v0+B/RDWSvvs4b5Vy2eXYClivsctsFO
+X9PvtBO/+ev0G7L+c22FBubTMbvv/T3E69rT2bICplZ2qVUjX21Ap3gdWY+v
+LKSPcKigyv/NWknWDZYHRpJ6JXvU6TBv1csjjaMcSlqbNlBH8g8WLzIc51BJ
+OilmR8m8Ny0Tr0P/td/k/ZRhBoutbz7JocSu91iJqF9QGJxdBg+0/W79lcyH
+Htc1BdOGDwt2kPn6VE7UwUrBP+c+wb6IYlqI7OEgbl6AKSx98iZ+FeJLD2u7
+p5N95+Ay1lvMt8hrezod5m02/7QI9XUErW/Owj5IYCSaZoh+tPLMqtfCopZG
+hw/o33vtdJvpMDVxmpkwyKFGs5tutGBfJEi+3WXej/lb3z5RCXPFQTJeN4cS
+ysl/biDr/fXtL96hvvXT3o3A1HNH3VsduN/tvdbmJF5aA9ugFfnvFdccJPkD
+npSua8A8ln9pfErW77udeFuDfFn5Xbqol2K8W3ugEvH5n3wOE4+ZlXhUYD6u
+nCgZcVjM3t0yxL9y69VsMg+9D8n7nqN+reunnYnftPJn1GF+z3p8w4nfGnvu
+bORQ3HoZFUP8nTcV2Yb8fGOn/TBXRbuDj3pF6Y8tXMi+NJEjtPsHz9MG508q
+ZH1ziHzbv8hv/WwkH/m5EYsTjLrQ7/J9r1eTeR8JtBvGPILkilY/Rj/cvWtV
+TXpQnyoj2xKWLq4wzoY9ctL0MzAfaeCHTVvgoh813KewDxIs2fVk6UfU89yv
+fRfM9ZyI4iC+UEEaXId9j3TEyv0k8os0jczcYO4Ky81anRyK1/nkYRv2PVRz
+QJ/pKw4l0B/pOU6sVe9tV8+hGAV6/BXEfZ2zjpYh37VUBbJP+v9n4Ds+c7n/
+AZXP1VY=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.2230354724127457, 6.228068696807429}, \
+{-1, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{19.999999999998018`, 17.}, {16.99999999999754, 17.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.5, 17.6952}, {0, -1}], 
+        LineBox[CompressedData["
+1:eJxTTMoPSmViYGCwBWIQ7fP3PxAYODCAgYrD9j0SAo5yhg4MBV2fk8xUHBLS
+urLCHYH8FZsnucSrOPDG2kw5mg7ka2judq8Aqr/TN+lOP5D/YaPBr3oVB/uj
+pTeubAfyd0xhe1Wq4lB15Oj8F3eB/A1eZmuiVBxW2Ghr5DEYOTAkPGC8oq/i
+cFDoVNgHWSC/YvXC29+VHeQsVnq6mAL5HNen/d+q7HA/L2H+LFcgv0HsEF+e
+soPohtDibj8gX0COxUhF2aFGtThWJgDIf7Fi1bo7Sg4/77LIHvAC8jtWWC6f
+reSge9voi789kB/gaXEvRcnBUemR2H89IP9AfnedtZLDLhfv5x7SQD7D7ylv
+FJUcpss5sd9mBfI1rM4uklRyWHloQVPNB6D7DTQfSSsrOUTGsjZ9vgPkH/g/
+/7StksN+zvVcr88A+QEfuNUzlBzUBVv8bx0E8hPsLXfPV3JgV7VkeL8HFB4c
+7YEPlRzOnq++/nsfkC+wQU9eU9khPyAjK+cEKLwbk/8WKTvM1eZ4Z3cTFL6q
+R5ftUnaYLdbiz/IRyI+YMv3bb2UHVQ+dec/4QO4/I6FmrOLAIncvY6shyP+G
+GSyxKg5bt/NFfA8H8j0OHlYtV3GQ+w2M3nog/0J+PHuDikOb3cflHCsQ8hY3
+FKd7nUPo/7npcqLkR4T5zU+qN/zmM4bb33D+u+BBNWO4+9atmj51srkx3P2B
+2i0aLI7GcP+JXzv2X8DZGO7/7y+rN6jaGcPDJ/5jwFcRY2N4+B2Z+6uWR9kY
+Hr6lFvG1zfzG8PBvu7P3h8ovRPwkb9sisf0JIv7u3pB9yXAREb8f5c9ybziA
+iH8V2d+P7Lci0sfCqz2LHq9HpB8O71U9JRsR6cuuZ35C6i5E+vt/KGzb7lOI
+9BnzwnQl/yNE+i3bd+X6xP+I9L3YzCpBXMkYnv7vmXapa3sYw/NHmlxhrnKB
+MTz/CMw7nG01wxiev/ZOKZ26Yp8xPP+l2z1/v++hMTx/XgLnX2N4/gUAffB9
+2A==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.5, 8.354800000000001}, {0, 1}], 
+        LineBox[CompressedData["
+1:eJwd1wk0lWsXB/A3c0kp0k1XppQxKQ0y9HI1oAFJhohriAwRN6XSQYpQSolS
+HSRz6SrciIMGoiIUF92jgQaVipNIvv/+WqvV+q3nefez9/857yHlP3fbegkx
+DPMLf+lf5tcE/iiwzP//yLKMq4vq9eh5LMNNOHbHEi4fSH81U5FlrDPFlnPg
+hKf3E/Ngfvr11ouw94pjV5WV8Ly5h3AmXK1R9iQAZj/fXZMARwxpTC6D+WWX
+9V1g98FAgzE4acmfB+XgBY9KDq1UZpnFe7433JZhmfxwA5MAOMmztmgjfNLg
+/OpUmL9PENo6k2We+KgVl8NKk7+MWsNbTXiLH8NsYWJo4wyWKbP70NEBM43F
+K9bDFRU1yzrh4nr/yCZplrF68POPZlhaZpmxC3zihbFXNe0vk7o8Pp1lJKtm
+2uRSfdPkJl94w3N7oURaN3ieIQKb1FZk7IbduG11LdNY5kyQe6At9cdRKX0K
+r715IHsF7e+OeyiG/ZzuqbuUqb8BL3U/+MaqyqIZVP9VxIdRuM+9bu4UOGh/
+bOE29POv6zOxqTR/mpssD44bfuj0G+Uj0P+sh3ne/HX+tC6tp+z7LRc2z9cs
+saHzjvQbKSAPu+tyVhE0n8Ea2QRYxjM87CbtN7ly/jOs3pzw8SudX9mw9g/k
+++t6hsRKFdQfdzWMhhUPj3ZFkvW6ggphQV/2usdw0jnXZ5VwhFb89LmqcJy8
+Twn8OCrnmxfM19+yKgn209tbXwgrnYveZwd3+4Sf+AhLyxU5CMHTbD8cWzAf
+9xG2Xfgi+nEaSbGyh5tjfILV4bJ5um0HYI7iCzYP83VMdYpPgbkLP0bNh/8O
+nW59FR5MGD5yGfn0XvsZVkD1AiXOKcLL43sbad3tRtqVLcj3U5TU4TSYbxtc
+F4P7SfjgqBIDs1nvLvVIoc7lRcl+dN5Tlb/d4SwPi/5N9Pz2+lQ52MpE1V6P
+zlf+vefXVJbZU/NWaRbMdPh3y2P9ROTk8J+Yj9VVqfOBMwN2BryDmbg47ms4
+pG/hwx7yvwmnYnG+5FO56V2Uj0gMsxH9vZ4f5PSSrHD7gCz6N02vdhmivMpT
+2Dg43tDJfgb1M5x9fAI2d62bYgAHWeiL7kEeOp/mPNoFS3t3HemC7RtCorIp
+n+hTq1cgz9D3z6/1w0kH05hI2Kt8a4yuGt5nYyX7W3C4RvxYOMzNSi1tgTUl
+7v/3AE5yYNPb4H6T5kGZBchHNOvsHXi0y1OwHV58zccyEV7yh3knF+ZJGYau
+gRtmv/ynB06Sn970Fv3kXSoVmbkQ99N6cSAcniS1LdoIdmvdoMXAMywu+G6H
+k3oW+R7CfAVpZq7BMJOlX/kZ+RSU/xNxgDy0gPeO8svrdCHzm/i235DvGfOi
+cdrPcdrC0n3leUXedYPZRYdMnXFfrSdLAyxof27HxQZJlln1ZkSgA3PXBnd7
+w8Nz849Lkz8Iji2HFfx3+nxD/+wuB4lVsN2jvKYOmt88JjkIVo+I7aiF3Z6N
+LXsOL7G9El5C3vDgqw/Om16+zKmQ9r88/WMe+lm+ReneNVrPjB0chHvcH2dU
+wAzbtakd8+RtDPBqhZUEandrMG+a//A0ASw9pNS2FXmU/b50oSrlZbdrxV36
+PCxquecIWwd0Tl2I/ExtF11IhQe1Lj/dT99/y5N/9dD8mrK3ymF2ry6jro77
+8TUo58NVjvIRoXCzi1zHZzgjI8SwBrYWPjvvDRxhnzciqYH7qP9UxIOfKXbF
+28LsfIPqaPiOje3IadgtS/nsYtiva/qRRpgb7OvxEP1tmHX04Si8+ICmNvWv
+uqykUVET886vUi/AfO7pIwIDmB8j7pGB+TOTDPQsYKVTH66cQz7VphPtG2FW
+rT4+FXmyM1NK1sOcOUdNryFvv8xNQoaa9D56T3s5hWXG7ptuW0D1E1yGDOFI
+7YXJU8lH1zjUTmaZFd0jjz6jH05WXOV+eKMnyz6F+SXmSZ5weaqwVin1n9gj
+Gw1/KtlafZHmLTV1boVLAs6KxdP6WJeDDeo/sXRsOkzrAg+Z73CX0Y/jhyiP
+NwW9leivySfWOYbqP7lWlYb+lRsG3p2j5785FURjPr//zgbcovX8IfkgzC9+
+QzmnB+a9CveyQz457ye/mo7+rXefV5BBfuWRRpOsYOkpZlMC4Y+NGyMTKZ/r
+l5pKYWtZ3ul2Wp9zZvwdnG5VrK6shfdttE9RFPczfmimdCDMrjaqEIMlmxLE
+b8PcF1P8P2F/sODjcyFtfH5MWvsr4cDeZf5rYZ534HAIbDFH620UzETVO8qR
+lWMrS2H+s+shm9HvtLg3ZXxa363T54B52tbmyTA6qG+9rcMW85Yo7T4oCys5
+xFavQx47NE/Omkduq15nRu+Tb3qYAswvfvffBuR52GogTwZ286taH4z8M/YF
+zBaiekqiWuUSLFOzft3h93R++41/1OGIlre9j2E3m06PenGW0Riy87tB1q9P
+Ow9X5aY4n4HZ0xU5XFjt/PZP+2HOwOOcTvjs6rtmntr0+0R5vBnquSY7mW+l
++df2Gz+Do3ZbpWyiepeyOxLRT4toRqQN1WO7Bt3Qr3jzln5Xmv+c3Zc1mIer
+WLs8jNav5kYtwby27QKf8zD3jNPYXOSRWP2Vqafzava2foeDe4alJ+j5qnty
+lchv8ORJcxOaN7WqeQfyHX8r8Tma8vgrO6AL3jKRoPAYbnbffpR+XrB/WRbK
+L8L7lj+yQwWeN57rshOWvmPtTPc182fK1xswL3u+TS+eN9jTbzYCu/Ebfvei
+79czZXYrdennlVo5nV8l+SI4iPxcwP2E/uKUD6y6DLt9530Ugi0C+CV15BYZ
+gRDmk962aEsPeanRxxHkcXy/vvAAzD90NeQz8ur12ao2SOuJWapfkGfvCc/E
+97QeHDxPAg6yLNjXTXb2vmSM+6gWDeM8gJUsX59OE8NclrWxRTB728ZSBU74
+drMgCeacrtDpFmWZWTWdKiEwlxE91QAfWcnobqPn7QrS3sM1s5onTGgeI11j
+YzzPvSeXrk39XNffdgfOP/qkUZnOf+P7zBPnf5RvE1Gi80Y3/dJCfy2G4s7q
+dF7irIrJmGforyuhhnRemqTIEHzBVD/akZ6/772eT98/Y0GmUXT+97beOnwe
+Il8tFdyk9fbvx84gr6G7lgcpD0a2v3q9FMsxaA/KmbMY91M7YdaBfDtVx5uM
+yaHZDkbTWE76NsUcD5hruFAR3xccscWFc4/D/PAbPPr+0MgamFwMM6NSp42x
+ziR32rfR/oOv56Aep+/1nB/DMGukw5ijfm8tKyKrh/5+xvYdRT9x31r+1oHZ
+JTpauZIspy3xcqAZzNcYSy3GPLVrFjy3gblmahL5k1nODPese860v9v/2yUJ
+luOhWL7JDeZ9ixDD+8bZOhJbs4PMX52fLcZy9v/55xUnev72QHIj7qPxpvh1
+qscTdDrLwjsm3tWugd2kzJWOibCcXNcLvStgzpDqSg0R/P7o2KesQf2mWf0Y
+F2Y50rETWfLU31HjM2LY3+luEyNF6wfWiZthf9Uu7zYhmLnqp1GE9Z6ToTFj
+lEdYZpMZzhN/KOozQvl+mCQYE2U510QXzRuFlYR3aTSj3+akolmTqJ/DUfdu
+4fNwKNoymurzfsz3z8TnQT4n2U2R6qc82BOPPErXqvkvp/lOqdl7Iy+uZoC2
+LT0fu1pbA/evOvhkKJieH30xvRH56v02MnCG+m2cFmk+leVkZU/MuU31JoJL
+T8LFP6R9+bRfWaw7F/czkSVZIbYE+/VzjU5g/Ur9tUEtmH8izY6Fv0jcE2yC
+mQeGTTWof/zeo5ZA2O2hkfNseOnc7NzjMEfb/+w69Df7femjDKon5JXlhP59
+ZBzvl9B62Mz3jrjPVXrjm3lUf9mTK5sx/95jkzwe0P7GoL1r8b703xVa2gCz
+0V+H1yNPFYsC7fu03zHT0B15x/fM/lIF814WhqTivhJ/CW++ST6ZHy4Qwu9r
+neKrcuj5uZ6xkfAlkXW8VJib7TtgDNc0TPyKo/7f2P+nI8Ry2n/ulTtIvl21
+ywa20a1TCCJL1vlcxf4FwWNyO8k7XS6oC6POWYvX7lTfZPu/LbCKg70JmX9U
+xf48+rNQDSv0onny7Af2of8A868Ru8nTPhz3wP2/qTvXGEH9MJsvYn5OcV+r
+fzLVX6l+eAnuv+3UGuEiWlf/5/MkvP9yxx78eEjzJUtH3oQdXvLiB2i/04Zf
+pshbk7PvkfRS5Ktw/m4WPGn2jNLlMO+TrmQ7XFFZo+lCnrF4dits/VvLlGgy
+19zxIvxKr8UwB+Y23QhZBitJnbtVT+td6eqXcX8Zc/0T+6i+83o9PvqbRP+P
+18c++leC/R8W37Y1
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.994885276715344, 4.925732979470893}, \
+{0, -1}], LineBox[CompressedData["
+1:eJxFlglUU9cWhgMij4AoS6bk5t4DqSKlokSDrDIIWwFBHoUUQStjRBDahwxP
+K4iCgNWWwcoghVgGtXVoFYkiiAhCUygoolTFIaAGEQGLNCo+UFTeues9T+5a
+WVnfusM+Z5+9/38LIxMCorU5HE4J/rH//7sQpExM4+tj4EjyxfOiEfw5l6s3
+rcCcMWBcW4Pg9YlCiSwNsyqw4d4QAvOjUT/xlmK2bN6nNY0g+C0UGw9YAydx
+KJk7iWB7s+ukbxFmyd6lq28icO2dLyzwxJzxfOL7QgSbOrVqC98uAE7+z116
+jgjKFy1p6GjA3J28l+5kgHNdp9Q/C7O6a4vIj4G0w+Lca4GYD/2aFtNBw6JB
+dV+kGLPcYHIN0PBbzo3+AoQ5w45ztFEAHfUOiSvNMFvqJ91wF4B/5xWLS3zM
+0pP7O3spMLB9sqLBGrNKvflUNgW6p2OEsa4s+1WlfU4B1zO2KTeEfV7doeVA
+QdtNpapkJ2ZOQFThpxTcOcZ1uFbBrk8cMGc9BVub3is2NLPr59moiilomrjM
+HOxl46d8rjdKwSrp/opXasyicwW+6wRQ4vOy3/sdyzTE3hDAhmI9I+V7dn+y
+dP91NPyxbDB/2zjLNW47HtJAyy4zWffZ+PHrnaMYSFmrk/T+Ars+xwr9hwxQ
+3uvFuTmYjTKVqtUIQj3BOlzCxv+lOr0SgZWd6qXYkP2eV2F1L4Im4U9+Tr9b
+4Xz5VKVPIbg02F08vhVzd7ZR6DsE7Veu29NWmA/1rBX1IxCYPIhIvz0fx1t2
+NewEAlCdvH03F7OlamZ1EIL03oIvz3thlmu1i58x0Hso7eWaWZhbmFHDrQy4
+pR4LSe2dh+PdeyhS0+AwZD+dVIdZtKLNLJaGkBWXKp6VY7Yc00l4JADPpmCZ
+diH7fNLyK9ECGAs0GLBm+ZBevdckBcWP+xUu7PPSoATvSgqilh+YUXIGMxxM
+WBhBQe/RygHzLszqzx6ZOVMQqJ/XtOoZZtWe5G57Ck60LeEnzsHr45Sg474U
+vB85U9kuwqy6bJWQSUEYt9Er1w+z6Pbz/G4KeMlJnAWbMEs8Dtg4CEAdcMBa
+8jW7X//jzlUC0DN2FtumsvmI447Z0bDSsmdB+BbMYBHVc56GvbN2nKKlbD5M
+H3m4MlCxWDzlBJjVSuZIIwOSwSWGC03Y9wds6m0RuHsc4072sfs5Vz4zG4HH
+3d+sHcswJ0bd0OpCsG9qc/W7Nez9DUNBr/B5bR+eW6OLuUVHocuxgOl67Rjd
+8x/hfG2Z2DeKoDVC3KCIwSwXx6guIoiRO7+oEmCWhIsjExHYnvz9aXSPEMe/
+V9VhiKAwzzzPrQRzvlHtX6UMZP4ckGKzUcjWa+d35gw0pw03FzlhNqoefLOf
+BheHmdfDEOaMN1lP9Wg4LK7f1jmbfb5e/fo7AVC+Pj9mGrDfX/woyUwAbb6P
+5TnGmKUjm1/UUTCrKKMr0gqzShJom0DB5ZDR8/pumCVP/nFsJQUWF8dnCMPZ
+eDah+8UUOL3CcrVLc3+tncHbB4c175/63tj7VYvm+7Hrdi0tV2riy8sF/l+P
+atYXUlEblT6uWf+tOq9s++ea/TmeeyM60q/Zf12cOcS1afIz7ln17e0yTf4G
+woa3tMQKSX5Xu7mYHvxESPI/26nVMOCxJTkfec5Vz+WlluT8ti15V/ra25Kc
+b2j/YqXshQU5/+778w7rfGFB6kM6f6d8Xzsi9bPRt2Z0zipE6stHv2zwlzsM
+qb/TyTJuzi6G1GffRe7xP9wYUr/RB4LOuvMZUt/K09my4wYMqX99uzvyCFOG
+9EfDE3q6RsyQ/rFTfJs4EsmQ/hrjlLUkVjCk/2Sry7os+hnSnytbhr75txUi
+/bssu+XTbuxDH/pbGHxn8s8yRPq/xcAldW8bIvowe+GIo7wXEf2QBvt0vWH5
+//piH7BbMb8VEf1J1/1Biy5CRJ/iVGe9DbBuftAv+yId/hdDDNG3UabPtiCR
+IfoXa3IiwG+YJvp49pQ7zFhDE/0MdZP+0F4rIPoazw2/ZYbr7oP+xhdciMzd
+ThF9rtzmxisd5BP9FvnsOuMewSf6XufxmWzkKY/o/5T1BDMjj0f84cyRuNYp
+Dx7xj/Avlz2Ya84j/vLxr2MP/6nNI/7T6MZ3iZ/JI/4UZtKvMEE84l+Jg/9q
+7fTmEX/TDtZOdcnkEf8L6Rkt2qjgEX+ULvJx7dblE/+862O3Z9ibT/z1QYqo
+yW43n/jvrZ3inblyPvHnr/K+atl9lU/8e/3GQosdN/nE3zc1B7v0KfjE//P1
+0SonGZ/MB+qC0pHItXwyP+jv+c916RSPzBfy7eW58Tk8Mn8wrm+Llbo8Mp/E
+o7qm+1vNyfwyGZQ1Z9M9MzLfrPskveeuoxmZfxpzHC5c+9GUzEcTWcrwLh1T
+Mj95Vz/7WyvVBD7MV5OD7HxlDP8FAmqi9g==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.4452, 8.75}, {-1, 0}], 
+        LineBox[CompressedData["
+1:eJwt1A1MU1cYBuCb6lxjO6tSsKKgUBjUggWalI6wcVEUbTKsyBiKUiIKjSgW
+A6HiLG0E7cAfhuAqq1BAYZMfgaqFQRCmzFIrOMewDFa0Okb8WyfbQFHZe81u
+cnPyJPd85zvvzTleO/fH7qYRBLERLzUSzlk8viQxTY2rSIJjSC+ywfdl1S03
+4LjAkKE6WKGQ8Yvh7p65rP2wM8x38y5YKW8wCWCOWt+4Br5vKih74kMSzfM3
+7gyAnaFRledhMu/RMm9YUtY+sR0ubkhn+MBBizJPuMHOV76PguGTppnyn7mY
+v6nDLoHFs9aZMnhaL+7ZB3vqNCkymNA0P9HBVzWJHwfDQb/+I7fA82vqzjHh
+O5PXaQSfJLxZNaIX3iSxoTY/IRSunRO72QEnDPdN7YMlzBLLKOxMUmVXwQS/
+gP0AJm9bjg7AywOiw5/D5qVNnH9hR2TrJA31tdzPd7sEkIRuU3+FB6zMT5n3
+IWxoTN4VDstnoucEws3uL8gd1PdrY0b8YNv6Y8tUsPSbnkI3+PyUaEQPm63s
+opeo33Xn2hcmar6Q6P8Jlpoj/Kxw26s+owG2e4ojhmH10eVv0uAML/ec32Dn
+pddtPGp/wtbRe7BNdlYwgTy+Hxx33KTyy++3XICr36amNcILXT59Q/2/Cc4H
+l7Vwd3sazx8mpv44tI3qp/OY9i8ecgqmD3Kp+lXr2ddhuy3Rfxx56Io4Bypg
+20eMwBpYfiXBkQ/HqZ9Zt8OKjlRhDhy2yOLqCgdlbW3PhhVeIdx+L4zP9BI1
+HFNipRfCbRkVkWfgrp7JTglslmQfuQrnVmrmLoaVD9cWjcFJruXJD1aiL8PI
+QRb6vSgQzLbDxGUaLwruXGNv0sN0blnkIfjxD9VDX8LdHue2tMIlL42ZGlis
+3fPnOJw7bGIdgZXxdV1uyO94/YbhE7D2dKo+AmYPVugMlJWiehl8Rvnej9R6
+WlWsPBseGjr79T2q3t+Cjjw4KsnoMg1/y+8lVHCWJNR3KfonopcsVsAHBua1
+iOHkdbfWxcOlefX1cdT+RRf3BsN7mCmr0+GVGeF9NLjpYUthLlz8/l2aFf3G
+C42JGpjuoWKfgkWMrFIVLG0zimPghYbewkxqflj8XQZ1XhYsebsV1gp5cRbk
+N9HLcn+3vlLvdxwuPTmQxYQNv0yd3gIzn/5Ot6F/9YLxWm949dgn/Hd5XpKu
+mPHHebiy9/A2WJeTmmiHb/iMjrJh6VcFktuwvDGisnwF6jWVp5hhcVXIGAN2
+fpZgGIDZqxq+03jinriQc9gBv6buHY//7x9/8j9sjKv1
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.6318774622309, 14.558628882191854}, \
+{0, -1}], LineBox[{{17., 17.00000000000231}, {17., 9.999999999998607}}], 
+        PolygonBox[{{17., 14.1}, {16.6, 12.9}, {17.4, 12.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.9452, 13.5}, {-1, 0}], 
+        LineBox[{{17.000000000007276`, 17.000000000003638`}, {
+         11.000000000005457`, 13.5}}], 
+        PolygonBox[{{13.48173265946094, 14.947677384685548`}, {
+         14.316718930329426`, 15.897834175673825`}, {14.719815750748694`, 
+         15.206811054955079`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.823799910437668, 15.984057296392571}, \
+{1, -1}], 
+        LineBox[{{17., 9.999999999996362}, {11.000000000001819`, 
+         13.499999999996362`}}], 
+        PolygonBox[{{14.51826734053906, 11.447677384685548`}, {
+         13.683281069670574`, 12.397834175673825`}, {13.280184249251306`, 
+         11.706811054955079`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.823799910437668, 11.015942703607429}, \
+{1, 1}], 
+        {PointSize[0.04], PointBox[{7.5, 5.}], PointBox[{7.5, 12.5}], 
+         PointBox[{17., 17.}], PointBox[{17., 10.}], PointBox[{11., 13.5}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T14", " ", "P1", " ", "N27"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdief/fggjhihjij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdief/fggjhihjij.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {44, 0}, {0, 0}, {22, 22}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["g",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {21.75, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["g",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {26.25, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["\[RightArrow]",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {30.75, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["H",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {35.25, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["g",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {39.75, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["g",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {44.25, 69.96}, {0, 0}]},
+  AspectRatio->1.0999999999999999`,
+  ImageSize->{288, 288},
+  PlotRange->{{0, 66}, {0, 72.6}}]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489721633608*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ImageCache->GraphicsData["CompressedBitmap", "\<\
+eJyU3QW4rVtVN/Dt6T733KQv9166kTBRUERRwUBREQMbbLEAAxQVu1Cxu7s7
+EAMLbATBLhS7c33jN9/xn2vuc488fu/z3Hv2Xnu9c4454j9i1mOe9OHv994f
++KQPf/J7PunOb/phT/qQ93vyez71zo/64A+rj46+xsHBa9zZf3c+8PPu4CD/
+e7NdPQcndi972ct2H/ZhH7b713/9193//M//7N74jd949+3f/u1v03/+27/9
+2917v/d77/7xH//RJ7u3eZu32T3vec97xvjzwaPHP8dHI495zGN2b//2b797
+2MMetnvP93zPg7ftv/3Jn/zJ+Pxt3/Ztd2/4hm+4e6d3eqeDfv3G8c/R0Yn+
+/Xa6P9Phf/3Xf43fbtN/+Zd/+Zddnnd913fdvcu7vMvuF3/xF3dv93Zvt3vw
+gx+8+7d/+7eDu/f7//AP/7D7p3/6p0Nter++c6hNv//3f//3aPMDPuADdo99
+7GNHm+/zPu+zu+Md77j753/+54Onb+TecfxzcpD6gR/4gbs3e7M32735m785
+fuw+6ZM+affCF76wOvGds7uP/uiP3v3hH/7haPoTP/ETBwfw7qd/+qdHV3/0
+R3+0e/rTn46kg2PN6x//8R/ffd7nfd4c4m/91m9598j486XdR3zER+y++Iu/
+ePdFX/RFo6l3e7d3Gxx4wQtesHvGM56xe8ITnjA+e9WrXjX+/fzP//zRDAHc
++9733v3BH/zBwV17CMj62I/92N0jH/nIIbjP/MzP3H3913/97iu/8ivnELyv
+bc/Xfu3X7t7qrd5q95Zv+Za7b/zGbxyf/fu///vuQz7kQ3Z//dd/fbDRePvB
+TX0/8YlPHP895SlPGZ+R5od/+Ifj5nj3cz/3c3ef8AmfMPrNWHz/N37jN3bf
++73fu3uLt3iL3Vu/9Vvvfvu3f3v3/u///rtnPetZ4z3tPOABD9i96EUvOrhX
+S/VrvuZrQlPTcXTQ+23f9m3LZyd2X/qlX7r7uZ/7udEOEWJ/iWHj/tW7V7zi
+FeOjPH/zN38zpNhKNNj+tKc9bfd93/d9gw3v/u7vPlj+Qz/0Q7s///M/3z31
+qU/F1nsd1pU//dM/3b3He7zHGNjLX/7y3aMf/ejdDTfc4K3J6Dd5kzfZvfSl
+L9397u/+7mDyK1/5yt3Xfd3Xje8yyd/5nd8ZevYf//EfrSvXjQG+3/u936T2
+Z37mZ4aOeX74h394d+rUqd3HfMzH7L75m79599qv/dq7X/7lXx469xM/8RO7
+j//4j9/9xV/8xVCoZz7zmbuv+Iqv2D3qUY+azHv913/93Q/8wA+M3+6y6HzM
+TTt+vtOd7kQ/5zgIqqBj95//+Z/DNgjvxS9+8e7+97//EBxF0HZxdiqM8RVa
+jLEYv7Z9hvvQwjsveclLdtdff/3und/5nXdf/uVfvnv4wx8+xsO+cP51Xud1
+dr/6q7+6+6Zv+qYBC9/wDd8w+olZU7B6byrMx33cxw173SvH2aFgn/VZnzUg
+hyEwtDd4gzfYve/7vu+AEtBhTL//+79/EI35tV/7tSGjPGgpPo7vGsvtbne7
+ochovec97znsu4xw93d/93dDq3y3xtYac6dW0z/+4z8eknz84x8/3gbWP/Zj
+P7Yx+fz4CEN0wtIpB0FiIsZRstd93dcdA8CI3/zN3+xB3nb8DrjysAaCRJCB
+sGYqr53P+ZzPGcjwUz/1U6OvX/qlXxqMYCJw0gAIglUXauxOnz6NsQd362EQ
+IBN53OMeNyzZMD7t0z5tG8Y9dh/8wR+8+47v+I7RFb6xk+c+97mTf8CFDOEh
+W4jh0iN6pmmciqV6z99w7UM/9EMHfHu+4Au+YFjr85///AGEIB3LgIzheQdL
+yZncr7rqqt0HfdAHRVVg1Kd+6qcuqnJpqA5spJqv93qvt/v0T//04TVIAVeY
+CpP2niaRbpgeMFDf7bYuDDNEBs6SBE9cDnJ8F36RClPP+/qudg+pzO0QPHhM
+0QwErymbx5sMwSAZJAX/+7//+wEMD3zgA4dOeOjNQx7ykN0nf/InD29yv/vd
+j+6MvxlF6c2Rxp6f//mf3z3pSU8aqoIgcoR+BkN2v/IrvzJs8ru+67uG7bNb
+LlqU4PmzP/uzwSxtkM+3fuu3TrV5znOeM5hqKMgwlPps6/qeYyRRnYgeOYIO
+/syD/5oAbVyvyOBbvuVbBlzgBggR5VAxkUf8H3JoObimKoaCDNYE5LVjKAKZ
+n/zJnxx9le8bMMt3GUr5oYNXpzvPfvazh+/zgOKP/MiPHOr6Pd/zPeMz/hFt
+H/VRHzVYi33f+Z3fOf4G4va6c2KwG1u1p39wVL8fGQ755BjCIx7xiLjB8XVq
+WtZWjFz055pDHpYGA/Yf+ZEfma/hyG1uc5uhIzSV2yNEGBEnxKjKeTV1xwdX
+6VgJd3ff+96X1PpvFweXb7nllt0bvdEbjRHz3lwrT04x6CeJciZG9rM/+7ND
+ehzgfUYb9x6SRVcenIoG0HGcve1tbzvctUcQyxmRJECgCTQFhhmTh8LBQBjJ
+ARrT3e9+9wESvmMc97nPfTiBoeRsDfdpAE0yHux+x3d8x2H1HHHZ18EDBs0n
+B82FgZNmgHfjjTdqo3lzfvfZn/3Zu2uuuWb33d/93VMe6CVOD80wTlrPQVYE
+1+9etfurv/qroaXoFFAIIAEi/vkXznOQn/IpnzLkCkChlyiteHuPw6jC6kkB
+QrzXe73XCFv8TiK/93u/N1w1mPWzByZyXLTjF37hF8Zn3B0o8A4KaAWoZ1vs
+8DM+4zOiFL/+678+FK8jj6E4IhUmhmhNU1SvMhlM1myZ6FQKoIcBhEzgd73r
+XYfn9T2O7C//8i+HA2N6Hsoh4kJa7ASs8ybv8A7vMIbCHAkbw9mPITB1CkQx
+KEhCbXABjBkHD8U8EwLrE81v+qZvyrgO7jdoPj1CbLAiSgM1aPEZI4CGJYap
+HCBLGzFOCkw5RDhoZe8iNBFYxQz4NJUDVAqdo4BcERq1gZ/65XoEF5y63/Gc
+CyrMONeohix2WbpWEcWiMGenqsYZnjhxYnCAZDu9G5QViDdVp6fp5fF3MOMd
+FFabHV8eH6PPg6MFCRNutEO6eSo06r8dG3BAa/xXP5/vkfg4Wecdegi6p2wU
+ABqcO3duWDVyKKKHD6rvTRyGYGU9s2uKUaQd8VJRJkhbqS6gmK9qCpjoNvIs
+w8yf11fz5xroxR7Akg53vrGFXRwBV+8/TqM+CytWFtZzxAcbf0P2wZXobton
+3VjXgDzHVTqfXrya4Lv+dATh1YtRdiBT7W9j8DWxWMUKLeejux/8wR8cruXL
+vuzLomI39ktkABREu9Ju/vaB3Sti6pVhNIV0d+xX2Cg3LMX8wi/8Qk5mvmIc
+lBmgFsA+ugmgeLx3DWkqEbyEzSKFQr58LBBA71d/9Vcb21ZVOHj7/iuLgBU/
++qM/CtAzQMjZynrwmEUyyAMhlanmq7pt6D94nfH/k4eUzUMBBRZcTd4D3oDb
+aEMr0xWqi8tqiEn3MEgoV2ngfF36wgx3Iz4YY3rrhWdawP6iJK2AT7HjvsOj
+I6UmDQnfo/t1AuePCLjYk6/ikIBnfV1ewFWVmzq42K9zYcIKuVqh5E39VWrf
+GjdfF1WAoWLfZAHJ5vUyxHyVz6EHFWpNFggxZd3Fnn791FA/WGlQtFZWobly
+YwDx2sOcIn3qIi+t/PxoG4+XgbgGiInUyye++aIIsh4MLf+UtzTiLXGBkYk7
+Cqqvai0nwIc+9KHjTclH/VsufBsJVeORVuZAeWlcNTdHLBzhEWtEk2HeZVSc
+9cSRTWd0U6nZIedEvZIRMguKQtIgyd9Ffhyh37mB6zaOvWXzl/Kn5OQhUnUX
+mlz8WMEeF8U3BlIRyMGbNWWSjI7O52BF/5LI/cBODCxFGYrESnS1VPtS/1kz
+POn3f//3j1elQ2WL13SLxuLPItKwilliv7zjla98ZT6mIwJBCfliL6J6XCpa
+pwDQKbwAl9v3zg2WaBGMyAS952ec9SgW+Q6OFhDcfmPoQxYTarhoO95MSBCA
+sZXhHWlUgQ5PfvKTRxxhaOIlDKq45+DB3RwtCoKnOV6ICsOD+m6a4xLgAW+q
+OYVPYZLC13XNZJTIOeWuQo0zZ87QmjBZNAeZKzmaTKZ42CbCK03Jx2JKII+I
+IjDpFlgQ4NPqpNDCVWhJo32dCX7Jl3zJYG4XhwdAU6wi8GCDmINbmijNpC6d
+0ApA058EOXIBBTkhmM89QR4yll+I+8FLGVhUggSYtgztTFsE8Sb090TJqPj0
+KMfHALSuR3+qVrt0d+0MLvJoEr4n9CJAwa13hQwe2A8QMQfqoJYDrRGGWrwy
+GGXlUKvJlVr2i8dMvsgLtUJ7Ju1j/5X0Dq5vnVBzuPOd7zxeR7mQtsQVbZMo
+UyU2OQV9dLTGSmpcbU2nhz5IGIwXIbIjOs8QoWkpbUmwPimK8MNjUAZA8NtM
+wkGirVsL/qZhXl5Njdj4OTeslDx66BE+IZGXI2X6CG1Jkt4xYGR91Vd91fgu
+cfqdR4QdkkmaIQ3jUaATnDx16lTRYj7nxEiePejUDp9UOn66GYdEVi/Pnuh0
+crTEDwiqWIuEjWWU9zvY3Nld/lcFYr6eADt7peYeUS0PRoGMluf0d0gBBviU
+F73oRaP27Gff9S+5SqfhrlETlNqSNJVyDp3fBgyg8tB9zFwGjCotqvbWKDNg
+SAFUkloy9cx83K51EMxJ6wzCg4jCpwutCfhxuT+VSiveiV82BTw3IFn2yCBB
+grCY0ydZBmdCghtnIQWRaQqKZOZqS2wPtpTl9sP6Vy5CQpyH06TGsOgOXeAk
+6A59xB5xi/foJWqxT5lM5JpMgjbIn0XjIccoFFfkrClb0hJ5c4oryBV9qNYB
+cTR5RKbB1spEjjdMMKPAcRDIcPiJCsVWUFOWQqEWXvziFx9c3ZzwOohl0HiI
+l3IdovQzTgTdNQ036JPPiR/HhA+MXbFCBi4oDCjKbgQ41e/kBHWQ35Z1TU6Q
+q0wZhz3US40ZJySPKY4YMl1HT+FXOJHqbB5Ka0iGUkCQ4I/WgDdyxQnaU6/e
+rnVaC/ws901FdASxxRHn2hzousTc5xUsJmhDl7GLH9kufmhd+gOKVRrwk3ZB
+L1ngQ1elPDlYJdbL3J7fFRoK4CbrQIsCB1jJZ2AE9JQSzc9EYip3UpkE3S98
+4QuHogNQbt+0DMV9zdd8TVCRVwVECnzSmCO4U6/SczqvhsGI2ULi+jmnslVS
+KRqFonQ8x8xNTo5xIxQPPOyfTRvM9f0dWAizDDQYyXFWUwerx1RVKn7Oz6i+
+itFez+443iVtfI9yYAzFgOyZIVItute97jX6CUazaqOkKREI3ORtVMEgIv8J
+GYRduLKvx5yYwWFQAytmonRq1EFwClM99JdZIatIuK6VzUi1LFkpRp7oxrlL
+sEGCqoKv9VqvBXLOtS7yAb0+YcxfUiqeUbTGftkf6bEhvFbjef1VF+9/CFU8
+7IhEsbKd92CR4fss9RDNQR+WE7bpClgaW2CBcxYbIYFLwgefcVEAMDUif+eg
+VXz5Jd8DPYIBcAZoqRUw5+SZVbSRruvb5/oWIZW65c8yYnU6pNIIYVoNY1PE
+e9+KA6Ba76hImEKK8gitAzAPo8cZlKeQhjoCoAhk5wEIed/P6uU4gJvcRCbq
+WKowCAgLRXp2ZIxcv/VvKd2W/XSNYIwgiohLpASUSZBCzoD3xGhKQIpZuOD3
+0t0bWgHJi4mC+UoZNgU8PsCRShgMUQHIs63aLI1I+S8aaMLDwGhhad5dFyQT
+wvltw9+DLWe82/CGMBNQCTY92MQbimuiHJSNDRpWNzXYhS3sNGkEccCBGJvB
+AD2mc+nSpVGV9vA5KIcDmZgSWxHHrDucnYGDFAoJQTpVLZCCRF3s063jQ1/9
+nU3gqXLhHfpvJMJ1GmJHSvVeDezgxqGU/EA0S4GF40JqPqMZ6AlkgjgZI/jB
+gsy98RvXXnvt8AseLMMmbjdZsHBUEbz6bTvapucFy76PVhplfMZjXMQlFKM6
+wQbRoP6Jqpcs3L4Fzzn0pMxMYEUQhkXpDYe5F5vu2n+mbqhWQTb/KuasFm+7
+qs35YU36REssFD/N9IDr0AaaYULB5HQf8IuFSNKPtiLzlzwaft58883DSvGf
+QheRsSDs9SpY0jXDr6a3xQ0XRtmCXYorOA4el+l4mIqxcKO4LqASZFVQfGMz
+3wDoJNuMLfhXNE4IiTgNmBKuAK156DZDwdNDz4wHuuGkuh4VF44Jsfcu7OT4
+HrThTug4RwQmfCeDZ5KZ81VLNqtXphPw8bqFC4oxugKeBVh3aq6zhHaMUxVo
+U7JIj2BhlgSPDdjDIopbXzvfb9FN1QC+hw2aW65wtjXk6u6PtZDobkk4WFcv
+yju4sKijekqAhqso+R1rxZCz0OI4M6P0iJpmPfjs+LMskfgknPEGWuX7QRJb
+Kv4d3NzUsLU9Buxm7alF3xSeHPIThWbVAf9qbRpORn+9A8aiNlSBnvtu6UEK
+YyCJEDAa2xJpgw4ZAcMjepFshSZZXoMBAgrTcATS3v3qJhAAUArzVqyCouiB
+8lzTTdBZ5mD6N+sVSoCRKT6BYsrDQvy5Xu+pgXt0R0b0oAc9aCClh5f3zf00
+y5lhb6TANMELTogMSIQiEeArXvGKfB3DTMczELOOPBcL1zQwocUVW6baKDLI
+/NeDmnbMMvQ8VogUnqQHIgZVIDOmlZAJM/G94CxfFwbSGC1KP6UxaEYYJDO2
+oiIEMYDWzV6eeWroJjmI/wL2wLyDpquam/6k7qxaZH2IlQFCY0syr+2xCZFZ
+CGRjrb5fYXTERikAtSzIHLHVW0VRi+2e/S3iUguGV/ImOV4NISMmJeR5YJYJ
+aNbLE/A7fHDFfVF1HyEdVAmkGKzRMpHqO4xhDVBCxerBTQhjFgggVTNHjhzB
+/hDCwDJLzHAs9KRGDJAIOIkaSwjhhxHBl4tl6QG1p5HFkO1rxwbkAn4yn7Nd
+x4YaAHrmWNq/zukY/B4ATg9PqWE2JLwDvtyHf4WJ5QOmwISP0lUghBA/F2Ce
+6z9ztjJeD/6KFWrILbBtFc7xQYRAka4xgP2c3oURjaC7K0cDhVNGE1ypHuIM
+YuEtmyv7Czf4MH8SJRZn1ulmfpvZFYsf0oTQbr5Etkd7FMJDCMjAU4R4dUGd
+UUCWndMNvRG8785Jwi3dYoKMZAZ8x0YLVKflfpsWC5uH1/uc4+gINblm9dPM
+j+u848UZD7IhakWPEVFeaYrL+0QVlbPCp9Qs4tIFk8xKcsvdCktaXA9qmpPv
+QvNClPQLxugk5vA9SkEnWnf5UH2jCyNJFR3eKa4cWYYDeMxxbzOpZ2fEAQrJ
+JDOruuHmcFDoUIoxu8NsigDMVPQ4ZrZLiwuYw1HUZAb1hkYplKKKCQFkeRUO
+1+edhhwdcqST+5ml44dyOrAr8Q3XhZ8ioDxSwyI/XDci/oyHNBK1qfr5ENe3
+AhIgsWBKAGFMrE9R9Gy3hDD8wxtEAKRy2xkvY+Yays6avRurdK5ZAKQJqGjM
+NaYz3TJXSKFwW+uEV1oeNZYqCRlZcA3nhm7ctxPGZZKFwySbkuvpFrGP9Mcb
+w8nMahgCw4UPiQ7DU5GLNVQQEQN58SLqfIuD3ROjoaFCPfCQm9ji8pSIT/b/
+Oc8LFy7MEgcDAP7WkmSSARsuX8uOJZStmN8rybaJuOxkONHtg/S07T/laBom
+yU37uM9u1/b9Lh+UVwQjGAM4lgtGwjjXjO4xbTkluTCEVpihvUIjJgxNeakX
+vOAFsx35XkeoB5m+1g6IT2WocrtG8A6Yjo8Uxp9UrcTmBTEHyethiqVphn3+
+/PmRDl1qPQFZIIPQgTo2UQZk1t/CBdDqa+WgWorHRyGOKxZQWRGkSJcuocxd
+7nKX0eV1110n65hdsldpFW4IYHTLAHG0lGedMJZ0G3y9kmgfwYerIceH9zEt
+Ii7vBV5zCY0KDqXfR44XRnzDGuEifaLlYh8BGtDL/g8rCOVQfH4x8aqmjHjE
+QfhamHZIEidGhCKGIHQBj1C6TDu5lZf0SfYsDg0FLtf2ULgGOELlehJmU40j
+QwOPDkfXT8/BnRg5srgOMLFoNYGS1NFWRuYmdMFNuC32FyFi0zXdL9UFyvr2
+d/OWgRjsIjDvzFrayeGyBPhWgvGtSPY7ko8192E869x+2/6PMZkmT+WULtAn
+3he35SGsGApUjPwGK34cH5oilpV9Q88Cupm7smnGQEiYaTCl3Dd051y7QMzO
+oig3XSexfZng6PR9frtLdwsedCt9UWkqCDkIj4Uz+JtZQsGRflTar+828dhn
+pk/TN6AV15SD6O9tSxDAhuhwru4+OivJmozm4yWQhWZMd78J5tyhmROIlYyR
+BqpZKPurNyuElSo87LAaK4urj8At9oHPxaiwmT5gtbiNnzHeIu42/WfsYHX0
+AjKKPmdAva25kWBYUZQ9NMjlSrh+dULQIuNYixfUgkuXh0bpFcWwJGGEKFy2
+xXlQSW2SjNh5XSchYPK9YlkMm8/AYUhXnN2ovW2CkME88MK7qUiCcYMjw1QN
+tBwHikdUsYU2/k7WcBp7QZDSHaxOgJM4jDu7/2GJXF6/oEplH+s0DXMRzvO9
+KC3neNvWFEoFGyBuF2wmOxCXFQcltUjExxTEeDyqNMoR+x1KJ0fQQvZMUXYN
+Q3yfW71Nd+07pEUy7Mya5GALXKJi8st6Z6sXXTPYKL7gypgCoa+FMVkkoRpJ
+Mkr2wQMwM9/n8njWlK18V1KaR8xVIgrnmcdNN90kmzjM+W1JoYlfAvXgE41e
+F32ixkA8IiRrvwvjt3LwqSEdUE9zPdwYKCfEEmxqorI2vjCPCsOybCiLxjyQ
+RrbE8dH/VGKxTk/7rU1HBwvpu0j9uqaIVECHqq2/GT9gBefTDV89HB0HkLI7
+G4mQjVdVj9/MFBsh8/ypi1GO8m/hstcJpl7tgODkUEtxahYUsBl6YpnOZtWz
+wGDwCgxMEgwrMNRrEQJ7J3rahlewpFxLlv9iPvcspmPjprArfs7uGjISZnEZ
+OHaoaHByzFiJNnFEUKKIxN8Bljt0E8Fj38Mh5lMYeH3z3KucPo8jJfBwfdCi
+5LAx6fSgjzf0ZE+P7XVaVjMpWDzIivPsWPDbxe5GtAZ9sUEIwnC1ierpC2cN
+QBKswBDC9jWAbQk2v5IFAgZQormxrddwCbpT67t3i6I/lsgrAb/yH9M/c8C+
+rldYZPhlX3fqFmm1oSO19OD6bpHawAOxIvdq8fMRdaxqly/r2ZQZfy7uO75v
+jkk4RAtUwfTe5ZpoKBZ0ka+ZfHbATiwXdSmDYC62MAR2JwRu7j64B8Q8zS2o
+ZpaCXWoCmVMsT4EIlCTjSwaFB0SJ4CLwPv0qSyMvrfYeoYM0a9wUX7M0XHUi
+zfobGUMx3kCz9dm1rXTZ7iLsYkf2F/JU/DDFk4Yn2vE61mGjKAAg+B0OXd0D
+B5r80dmzZ+HR2WaoJRTiagVEMOVh7PQBI3g31o2EYutan+ine+j0/PiADRsT
+k9lJOLNQVT1YFEMHbOcg8xr3mUUKwE2H6MfKsFn0tSaMJmPTrNCXr2C3vJ7J
+tno3zeI04VGlVCSuaVXiVFGTOShjx14uGxncNintA9QTw8OBMjkjVJFSFHnX
+Nm8Y5d3udjf20nHExWH+oRxzdOVV8AHIWK7ICd6BcFKnGEpcvVA7ZwVgEiHz
+pad7hNRSl0kpufST/f2U4JSSTvYIOBdTasIlGG4FTDH0/v0KhhGVVVTpAohQ
+El2IkvbNHZ0VQWlluoAcPAmrknLQ3SL75uY7dcy8CvwhG7iJ2iiX1/YRw5Y4
+Me34dpEFeUmcwnxQ0JMrhbz+f2kMh4rAP9wxBAmDPvUhYMZsQxBb85n6oILU
+bt/+FAIZ2/hW6jQ5BN4zSaM+ZaFoOASZfN9ulVP9fYGF/IXG4mjllwf3XziK
+1IoAZvsQwQSF9sUpL3nJS2b7FOLqq6+G+rN9IY9FK2pfwMmmxpualdDR0O07
+Y9pYCcwrbp6xoOhe9OFvZSbJ4FlH5vdycAB2ZOEaXWRtCmMWB994mHP8kxSn
+UtGmdBOsoCWT6wTIKOHXiX6PHikdcu8pUnFD7D57dVGr/OG9+y3mYrGLyZX0
+R8EAQXwIbgtnCTr9MXxOwiKCtT/JfNYtAAa4jKYb+ztcn2KFoFRGkXiiosq5
+jwz3jRfgCiYUIHwvWc1+w9bRgem9u6ljym0Bue/ThLkDa6vGCrf81ly/R/+J
+nnW4PHVGxCNv8luaoPbCgE2Dts8AuiDPzpZwAmzCqmxtltoLweUi0WGZT+/f
+m30Cnc5fZp8cJLNb+8QJ9ffKyw71yftlhQmu0CRl/Tu1wWc/SmqsNIqZ06b6
+NwsJMU75gNBBsccqCwgUgfF+WJR66+2a+cIBykjfK6hPaYUPTrHyMuZLrWHP
+bkZEm4FTgbmlrWuNPhN8rFvO5DqlTq2+J8aAMF/oYxQXL15ESfguarAvYu0O
+0Qar1nF0+Ux3Pkt3oFKGbh9nuqOdLIG18E1wrAw86wvUlA6fXrIxg0j3cd4G
+gdRhX6U9MRIc4b0oBJ+lIoW4YTXwRTU4KZs4vrR+Gavv3m9gqz0UVhxVhxn+
+qtYR2Kr+x/r/uKmywi0XHMaXCfGQyYchEaoWat6v3+LLZBYAuzQoncqbOgWd
+ncLYnkSfnao92ETgvxppOqXuSnwAR4Qm96xxhO0wCMsoS6wLncGKlPJ4Dc1I
+rkxrGzJJdkX52jauHF0i/JL8q7NCemsd0vyr4Ts1NVaMK2cQSQHmAHk+i4mK
+wsICIC3XBqblP7Iqnh+AdYCtPo6CK0fZ3y19TqtsofPe+Vmmj4Uq6YmsWC6X
+UPaWnqA2rnBehc7JH6kTRmGguSo6XMPcAsvTc3mGKi4vKu7GNMwU7nN/qSST
+A1+VKNAZLznq6dVgB271drapRJnrtFcwshFqBfvzPSAoxsL9h/VnkK/Xtc3v
+iZn69IwJGFgPBSFfvofHyOTu7tHqBUS4waykpJLWLCiWF00bhpwZeO5r8F/s
+khDPa37XbPE+5W8wRMHlU5hV6VfnTVdkVhRDa+2RGr2Ozj0dkt5su4Mnoh8L
+t08v3xP4+W0Y9hFfS0mOgmITxS1RbI2fG9qEozQqa04FOIwNGtBnBAnxS5JX
+NYsTLuXYBj/PKcYrjjDRjMALEkkkE+exDmmtHez8PJE9amEkv3zy5HagA7QI
+Z0zFSGOoVtoHlF3q6Lzu7FChaK12cA54MjeJhAIAv7DPmbcIxRAwp9rLZhTa
+0sl6Rnbf/hP2gbkytRnxsiNRrJ7NBatAZWR6FvH6mwhXqT2ytAJBgQbE3Hvh
+BP0A1DSuoL5HeGoUQdIWuM2iam6tfj8y9mIeH64op8z09vCJK15ZooKLjRA+
+hovyAQ4ohRCmKbKDEL0w9z7dEmJ4fMRU0BqOshjR//HjxyUsj+qPhZk+6rJ7
+vk2zNEABS8Pu2QNVFueDiY9RICsbn+Z+0uuGHWTtvodsZLA6SeFRU2LX7GcB
+UogBHEbJlbJ4nwHlq5ojNJiXOHbs2HAyQQKxsEUYtsc2RyI6GCiYNCC4ryKW
+eptCZY7HepP+DJkKNpv6bm1QSKUPbagUIikYRukFoXlUCw0JtJfGbhXaiyNR
+5tDAbCZv+A0lv57uH74cyjsBjAaatBdfZZcoJ4KEckszMOIpcMJvl+mCAMgm
+DPWlojiD5tggkYj8kf0ZSvo8vrmNhv0ox9l/UWoVn0KEvT1kBoNmM5LVbQM+
+M/hCDdZ5WLwRJyR3L2Zse/qODmyA717OeOWlgFBlIOPlqsTt+HJI0ts2OIoG
+mor4wAZ0SRjxRv1Zcjgzo1nrgC+kwG2nMJC8k15Sdzzb8qirRjfgOcVd1mqw
+cj/hv0fElnKW6R7tkmp5tMyByyAkJvuZwC2+T9p5aJBb4Nnq1lax4W4vWD54
+RH+25kr5Hh3kXv2WeSFME6OjDBlGwA3j7x2bsbhFb7nl0t0EhwYHj1vy86wD
+1ZJ6Jb1KTKJb8YhiHVG2sLQQphcB5zipNb25dNln/MTDF1VMXpLvJVdR4byl
+CSVZhHbAPiQkGAO5pZKJUCTW3JHfbmpChXTYRq9Ky7O4JDXTdUzZ36TeXJT1
+mPJGnwYzfsvSkzVqiDqsicWQ0RHWc9v+65oVrEumk0JlkTLsPUzfVpMAbiWe
+g+w7JHl6aWm7lSIy5pt7PIppveaHiLNWbo0vYv+AK4lJj3v7+ukRu2WvJiuk
+u0Ftf5MixN5XS81nLJLceeONsm2xLaGkTfOO6yr7PiIjDFqj+1T6qHsXcA5y
+soZKXk/kHMqWqT71g159mtotzSPulm6jptQn0w5XiMGyhVCGBQLprq+RNRdk
+p9yo1/T6DQ/U0YOxn18IzykpGcwavm+DuTg8LFjunGR4UtM4WbZE/7Wl7uih
+MX7mHtMXm+ldzrOvhPZkFMZldegm8U2zYIX4waTvHe5wh7GsI5hDpjhmCRT/
+Jx1Bn/rhq0kXY+KAVli63zl5bihrzvNL0K5ZJk5dYBXjEVjU72t1isjtAs6G
+Kr1SaCOtrnIaAqKFk895znNmr1yAgFrIiFl6pZA0BZUEQOH7kKuEe9whGbP9
+kkc6ZowwVMelq/dqFaQtKrAiQOgtOqgOLjSjgZtsRwgkZJLXJROiXBxrNnkR
+7v+BwewJ49btN2TcQ22zvzD0R73HsFEnixXCAlGUGhA5q1GjWo2ibDyBCHPP
++SVJR+Q/qlPWmVEP5bmAmpqQ9MFSzZCFlcynorJJFueLLI6WG/Qe/BZ9A8Gc
+TQGo9WP/e3Et8T98zSTA2YUsp6v5upDKhE6msQ3D9EliW5lSjTg7VTDDcm4U
++JMkq8KtiEgo5EBRvhfP+bKk0a9GRD4G/DWOWRjGS8lpz8IOYrgd2EdD11ko
+Cs48icdgDbo0JdEYZeoFJqUw2xJkXyFdrFXFs2y0rPpU/5lkDCTJXp/lGYzI
+2Q+FO5NgeCOC4h8SE/MN2SOwLwBuErBehZmxnW0B3UYtLAu1J/r/DJ1USEx8
+jP3FnI3ao3O3rAYyaPyMi757QxUrVrDLpneBiyQP/GU7BXxh6cwG6bqr6D9L
+bPsIuVmP7PDo1ZR+I2Qct45+P4l/ei7OY3vxo6oA+Xy/FOjMIFpRGoJ4xHqK
+C5lH7JULJ8dk47YJGSspuOMJfQ0LmXf97cT42vm5bkVV11dYts9IhjYn76N6
+vAK3m/UseEC3zGRlRMAxk3hZMU/a2uMVSlRzRADNMo0UjHhTWoEOXqY3zp9Y
+RqRp9ucrAMhKE5Kvv20DPzFahVUZtLmD4umRsQTg+JwgyjGIigW3tHCZrOkN
+yGvySCGgGBBwlnOzE8sg73GPe4wjLAP3l4WWiaU4bkndog/ZsbUuAvRwPyCF
+bw03sxZNq5kRQzQVA35mvgOeuIxj5RxnSizQYcqONNjqAZdGBs+pikXSLxvM
+hmpxnEiRTmanLmZBRskBhmWh6bqYw8OvqGWosGUM3uHMtRdtYmTGAMSdopsx
+gFf5jxwx9dgc6szhFw/O9TDI0VezNAnZsC/H/8FMSod1UTBN+b4KgNTjTi1Y
+xVuFI0rL3zDRIL7UXQQQvLCCqlh1m+bAZXH1+JrmS2oHd94EHnPBLKiyT4CP
+zTRTGaqEkGVtXeWeRItqEGftYXgFfw1MiJAT0+gUp+GY+XSR481YWn2+dXF+
+OLgYqC7EKiwJwGVJJEhn0PgKI+/dPJEYKfh4AIM4ur6XYz1oFmlTfImvrB/y
+KRZvLJ/BJoXos5v6cMPTQ9EI26DXtWskY08FBcyASbsVeb5PibzLmnNOAkT3
+PgiylCQLyyi4iMFKKgaktFiomWpDNijtBl5tjEMSBIhrbJAY3ehaU+KnnMm1
+neipxnh0zupqqdfKPKHFxHOgsmPax/XHRATxtVpgknVcDF3U7D+e33EdCfRh
+jnUoT37ykxsIzo1sKKULf0uCpWm4KsDLZwUQR8aq56PrWZqh9xVNGGgxbHZW
+RKZzKKKi43CUfIbJmC8CuHFr5W/7T1A2qe1WeJ5rrSke78LnlclE4sSR3Z8P
+7a/SDuCsSlesz1d9rQd18KT+zFecibJ0mJ3QTBm8A1w22XsIk98zAotjrMO4
+brG3wwvmD6+Hum03TQ29azUAI9N0RQ5pmuw54Kc//emHmk4zV2r6kT126qiY
+xSGV6V82Jh0Dd4EZp9iLgdMx06P+1o+kY17Mqql15YFp68zfb2M6Off45aRB
+AKq6aM4ha/opCT/Mp6V9JmyB+36J7tGRX5q3WAemfZPCth4Vdh3SjhMjtFE7
+lsWoO1nEU4NNx2E4s0vHLMuKM4X2dMwx2SHjt5yihVdiDJAla+ntm2k68+Im
+AtI0uzdZbI3WOsnNPKHemyzvWugsbE0t6UqCXvc43HB44NbSCBM89B4TXv7y
+l0eiBMzl+S1ZPgxRibZFKD2IW4U6+8rrthEyR5MzbQMvStO0ggNFWJsGcmYo
+nF+xnoV0eIpmI6Gx+CDgyjtbhrgO3ErA9raXD5wurFu8ia1QZj05hfpBw1K3
+61pLAQwXjngzXMbHH9H4jFs2Y3oxjxJ7+a+0DOFsKKBihZNpWTWdemiZFkIV
+LddXDt6hhyOJo3Lqlxmi5R/C1isMkTkJV4VsTMfpDgUZIQQTuV5AXlFTCCE2
+oqIVUNAKU5064zRDlLIwk5wJJG8tXqdlIAIZTR9VXJaWzZxY6Mc80zK4cO57
+hkhRfLYPOY6OHINy8dQ9xO2frYiR9at4Xp50VlA5YBUmfiKWJZuUsq1KQhi9
+gXoOkHFb7SGdy0q6sqIYrQGa7jNFsAKRjGi//eToEGTvRDh4/Pj/duobkm3g
+k3lTI8KXKpXEeoDZU467AkA9lsBS6+X5cwpjjEemx1CqkUM7nvAGUbdvnvFh
+cbWiQqFYeNYpzKF2eW3tWhSRdqWy1AnqRnQmv9RB3IVzhHDrs9vf/vbzDp1N
+LfuQ242HPUMwm1V1lZgq7r9Vf2aYxLYOizbTvbV7YbMlNKtola4toVi6HyaZ
+fEooQdctqLwShl/pnezrg0d5h6V1FeDQOzf9338Oposy+FHz8L+z/emRLTgh
+OtQwqr7S4uAl61e2Yz1MXGKQGI/TKi+yRcSzWLYcPDiLPpcfRsiP1GcZ4a2P
+/dyOioLCSS9S5OrvrjvsCHs7ztdJ9tsSJBkbeMJsAFO6OpZbHNHw9vKZQ2Tp
+K+VkfebzZQHXrcm8dVZ5a3qOzchLVFYx5wMP0zF+2jLIYR1XIqIJnczJjOH/
+8t1ul11us6n5znI28iqmexyWoApY394wJWhh+Xr0jkhqORjQ0Hh7+UrOuDG1
+C+I4QouGs05fJJCMDBX2IR8ZWcHpgV0cjglnibQaMq0UnMCw8gNz2YzkPfPl
+6RPyy6dyhlEuzEM+BuRyB/a11cGuGRMN4CUMFOHCzCS14ggBo4A49BmThBa8
+q1qxGCWd7B03NSOoWmkT6mQTH3xGH9rwTZ80nDu3lGB759IQsDGo7OnTPADU
+ZoLCg2TFZh+8C8tE5/jHkvfnjB0dvOmr8S6XuK9ng20kLhKR5OVRuC5PldY4
+BJTtQ+8bhkr6TF2858LHq/J1XPIo51j5SRtISnqRFBRCC01zGpFsz+Ia9eO7
+LJqWudLMKCgXJCQPt0ks5/74W24c0g8J4KyQaL9C7dqRedLUaIIyFsePFtK2
+isOKDpUR+/7QTWo0Opdhich7gUiOszOsw5v6jw7HkQ1XIVlQpJwXpdPVSjKF
+pDTuR9sg7LqxNtLQukw0vqe201nLqLzxkxSOyATASkOGL4YhKooh4GIkYuzL
+lAMZfQjtVI7cdJWHyy4b2v58h7G4Vk9GqVyUXWrUVrTDvFqIg7EyASNQI87e
+cg8BQvDslBKPOjuQKepeRFDt3NxUQRNRObmSAZnUgDKrkc36+4HcfWBdVoN7
+OGgZE755iBf4iJypmdpACj0cPANe1UXBQgCrDbyNWijwGJ06k/ezuUMMKWRN
+GynpU8sbe1j8BzkDU7M1uPfKV74yw7r1HVh3H8PIHVheRwqZ5c6g3IGVixbE
+HKwXWdpjxTlgOJdaGRY10nYnBaOsjtM+Y/GsAsaxdvidmpZ21W/2Z6b36C6M
+STJhqibAaHQFl+gLjmYeAdlKMIuqcUpQWVqvXKEqIpXp5Q3DQygReAQtsjjb
+R3w3JzGpzxqdqooAXlDJwRG8LS4CCYelVkIQVTMwWsimTPOznfp9k8l9V1Ub
+D95Q/NwzhhIPN2sZRDboGYmcksJDRj/n6JbLVQ3fMc4IIBH8V6TOSITm2gc/
+kFTKkQuY5L0MlDwhrGW9Ob2NHlgYRv4ggolUwrgN7X6ruo2HC+J+cquq11Lb
+pbHcFStixzmLHZOBPAtKzRizyVeXXB3Qlqeyc79DQrjCQgw9a498x9BzEpc5
+gwAA8JaLFz2b4HqQF0dr0j5/9Z88FXPgIuZBJKLPFIwiprKVQmVUj+wZVa7R
+ZfNG5zO2bRmAnz3UkftAle9qT4LG8OgOgRA4tWRsBIY+iaCfS7CZ+QGUbNd/
+9KX3kGf/U25i4k1KPbaLga4eWmLyNMeJizp0pnRpIouYsBbrcgWFd4iWdjHN
+Imwb+/UjYDG9oH5K4Ugd1hkzRWexEiZRgzGQIrCJUZA8vrPwLB2tNqKDUlAY
+RDe5Mkssy0a2MT5gXiuFOPrYt06NWWLLDQJ9OCtLVTIWRjIbOkZSpGeQQlG8
+EgLSKcEKSSTMkokaJaYIFZkhGKXPpCbMiu5jqOWa0UUTOPwZnc6loQUul+ki
+gxMs2+QOauiiAefERRQbZfZ9ZdeCNTubPG439Bn4ooaOiQmMwPf4CxFefBpZ
+AJ2AkMivTzMZntd3oTEEBuY59rz6WE8YAMygTxxuSV39eZPPPQcA0+IcI04D
+4HyOXs9hCyjhsAF0gjXfwWPve8+I8JklkicrzFWOYBNPM0lOk3hq6gMauamM
+JDfX0sJ9iL1dlCGTBYW4biV31BCttNgwWaw5/UqUM0zoikRWaKjUytBzwW3u
+F+TQCYRXXK/As93JO9rQvSBR0cl5BNQIuR7GBsp6dnYYl+KafhiRdvqW6PF3
+nxuminKGiS6ZAeVg76VsHeHNK8LFnv707Gc/u14r9DnYtuF2vNNLZbZ8Fkns
+/lWvelV2/ug1OZOHWs+7TI7f6oYLWW/qyrQ/x5hmOoALWg/aYG/L4dT45xVj
+ZtZ+rt6ydf/yGevtgD3VutOTEuwlFq5e670Y4tBhfAaVdfUe6U4Oe778GHCa
+y7NZiIVvNJhYZe45PII9EXeevjf58lHl/C7AUZ/9/4xK4iPI4VPZlVrp/2VU
+W5Xj9KFRUTrv5ygSGEpuXVa6sanGRFGkh0tWY62wfEuGt9MYUKV2VAoSAYMj
+xpwdKDool5jDf7ABjpqdFU7xEIVQm8qcnHO5nbaOyKcvwZ7MZk+KP3Hi/Fnp
+/doDzyAxF6zyt0VMtrtw3bmOAPQioEZ12diRtpb6gXA57Kyazur63W6/Xhc6
+8ZNQbB78ua0WPXxm24kBYuI28bvMuNXphv4zvDNnBfPYiiC1GJG3gTnw93CX
+uF3yWY9BzK6ZvEKMAkeoSYy95CgdStpwFLoIutRnysXkbZzEgDy8TAFaOkRD
+Szs33oWN/BzsESD7imJ35UVhozBCn+U4DsIvSAng94tQtj12Qgynh+WYBUbj
+fUxi6sKpWW7fVknlcEdKZfQFtBkSBnEBwgOYe/ToWPa+7jzNsSEhTLiUlfI5
+UkPYJd5DgHxTbS4UiCZksnlUXsofhwLqArXBFYma+ChTWquSvP/+6O1tgWNW
+Zjej79yECMtFVQTbk029wuDoaCZ3JkZZKSko6aNSA1RiPKrPq8K03l5///6z
+QIn6ZCGQeKGS93BD1d/bPA7OlB43/hwbosqBzEuNWDUtRZT7di8YT6dzLLXw
+rSAvvYh/aGRueHIyW3rhDtU9NLtcuGU4hzeDzAX5oiOI0Zca37U/ZkT0opf+
+p5Yj4TPVTRmD2rCA3Zu19pp5EhMU22KQrZYMSkSkOARWaSN0znoVSo9mWXCv
+XB45h3tS7t/fQaEUl8KgWARqAZoJja2dU0Pn+nLPoY/aQZfEs+jtcyMyb8Au
++q6tQ8uBcpthmWAUQ1Apt9BQziyurzy0/8wvii8hgwCfjyzIzvSRwBD00Hdx
+pXM0Htiv0iUssUxHKYXrLA24/aJy9Iknx2XxZnHiusMjoc5Cpf1hQtu+SiGU
+axUiPxZEdoofeMgByPOYCI+Ygz/59hzSAyqSmUzMPLreB3top3nqw3md5flu
+12Hy+nIT6aTYOFO87ymhbE1BcEA9oqI0gEdgUqKMqIyBbRBTlp+VKR1rWVBD
+5SlvClmEhY/tFlkiLOpL/zIsMuiTxeZXic1XRVfLWaBsN1sHelpy3Q/FB5hv
+UmCyKum+3RpuWOzQR0RmPTz1VTBQNl1XIOvB8GJundkeX1QKEsgX/Sf7Kuad
+biORaQMOHMjkBwEzzjLw119sKRfe5cI0+gLFSqhnF/lKx/CsMoJB+hFtpR1d
+0C32mAyHKEHLXDbRXDo7iFMeQj9dl4PS5NyABgz5NtPIYXom1Px2x/7MgPS8
+n1/auEwbFMLKBHNgkzV2DCW2TYO5Gc7sdLOUZkijxFpmR3irAqotd7hm4CJ/
+Qa5CRSkNPsmcNadXQhNoYLuu+gbEwQ9Qr3ZgP9yaWRiZ5IPv3Z8Gs6mZEqBz
+W+7awzBibftccVsfvJGs8Gx/B9rjIB0UZcn+5MhOzjky1pKfGRotq8f9rEFO
+UVy/fczYGnSL7wkImesZGtkp5BDHkMkMcp+MKI6LpfZOSTq01+n6W+VWXmXd
+vIDKE9QSGuGuKSCAQGMBAk+SexTpBgHS3mozEERr+bj1pGKBc6cZc1bAoHl6
+r2eLdSFdTremqbL1PILZ+nqOt7l8EIm5HfKXGSas9hk/ASIQrjQCYKhNDs9m
+QpTXz/inWxMHPeMz2qfkGMBItk1Q28iSRfstzp/a9nGI3OO5JnlZUzceHoIH
+328UuXqI2uwKcsCPmlBO/GIJPidaGoRDfmYRImBFAAY3LvjeqDMiCFKGMyle
+l2qGYqRQ8F6FeugapW2dQR8ceZC7fAhfZIiPfqavZEDn6CZPziSYrEIbRSEz
+Hh9FTLrey3puCnC5IzI+/sEYy0vGEUFu3IUpetf6S1/60ov9Z0TgRpZP+0px
+OeccEgC6lnO3B+0+o+Tr0hKOU8FpvVOYIHyGJ+Nk/+3qyz7bZyIWTJ2HaG57
+9pQfRSh36M+og+msy48AJm495uxqmJnbkqL1AjEAOE9v2C5cleBIZkKsLsV1
+RF4R8raD5OTQ7fV+1SjWughb1chUkzN5Av5k10djT4qXg2gP3751bF5h2xO0
+aRkWUNmfXO5Z1rvgDhhv3zs/LJbz9h8AFi74HgdHuKghXHxRO9svRdvO9V+X
+mZt8YfnbkuXdiAKAthGCvqwQJhNooE3vUyZwuNxDrfAAynK6KvdVyrAtor55
+SAhOoD7X+cAQusWgs+Waa1JMFAL0qT1jhHomD71TJsVGa5vNgrPOTMXCeHa2
+pgv64FKK4WE2ciiQpaFZE5fTcqh8YXu+SmXx2W/bYO8wwgQjaZ2cB7gavNc9
++ZkDixmQD4jCCQjJ+m18MRILNmVN2mJF/D4ZLzdDeE0Z1LGKRxfyktJlJTXF
+IwPfH5v09xrWfO6lZhPK6CT4d3FLWs6J706GXvcW5CqyeVfttr0QrXskHJXs
+ISVSyw1LdFNwBsLoem5Wo6+kyiQyB7kPTk4Oq4QuqKeHOaMLHqQS5n1KyLPJ
+fMx4VL9nWmTUncSR2Qs4hjIBs9w1GWVjNmoo2V3rdzzWJbFqSxTA6VFSIkVS
+jv+eN8BvQaCPofG8uuroUCgGWx8f5J4IIEfNtabSBwRz7kz9LRfKrkWQaLjW
+CTsHEosZAF9u2fYYILylMDn3TMCWmyKD9JghuTMxsqIZ0vYnMm5HBHpfYlzW
+lnN1GV5yYIkEEvBS3Ffe6g6H9c63+9Kw2RnTF/hasZvOhHuIQ2QpQz7Golz8
+umRQPsbB/enWVw+NtfhJWk0P9MzZCcnohFxarUE+qhcQBw3oBzWldkXFCiD9
+HFy7EEkajKSaX88RT3Vre/3iAIWuYI02GH1fSjJTXWAgEDQ54TMuyRRzrppL
+zKR9kEo7ZQNKwopS+72a23xm9oOXQWYUbFK3lqdnFHTDJJqIpVDzuh4idFzX
+6SkHG0GWJ/kbm2DeOYGds9Q82WeRFXOfSw9PzUFge9+XM5ijNlGxVb4mvm7k
+m6+kMlXgmoO2GCmfxsFLOPaTBnOHQi5Y30vj2Dxhgpov1TKWhnQnHG+E3G4g
+FUuiTtn0Sjg0EIDm3JRetjsm1lmUKBJloIR3hfa90WXeYW+Q2FptHxm3A5/O
+CsI5Xl0CW1yXk4hqRqqzLMncLiHMuSYexJI8B8AWJUgJGwXjIIGLYnn0fdFz
+4svRKfksh3Gs8T5YzNabbMUWbeSwg/Vulqw8u9OtCEdkbuP0+DafwaAbbCfh
+OJXjqHIR9EwUjw505UKNtasEhZgH29nza5bU8185gEvdKRcEhmjT+z3vm/1s
+WddlzORm7fPRNhW6jBrhEE1UZMAfegF6QBBo1FWOyQVD+EpvmBoxmeks/YgN
+SB2gFDtgTeBGhaOv7D0ynPfpAQXM325uKVNLYGgaykx0ZfM732ABgjKxZs2U
+lNHmGmQmxML8mTtBePE1bOnzxElhmpJckn73ETyZ7QSLuRqpBBYh8dkmtKxN
+zN0KnK49Lrym1mhf+ZrQZBjcXconZrMLp6NBPuJy+uy7MXLxJVsDpsrA0U92
+6fN9gHN0Xsq4bF3bSglXJ58fTeI/hvFJgm/m4FWUkYfvEh9I46xxDhQs8X5O
+7d9n5lt4pQlGOO/13mYn+qSNucuW3SoLZVciN07U0kAU2Y+a3aWQg9ozpWTJ
+utgfKLEdyux9ippD65kWESm0mjiizPvFydtZGzAeF5ZV0bQqezRXnMeMYCrM
+Y+nspKKSHE8F16iOs4yPdHoOOjst67MVzg4UJ1amhe9MkC0IqlFL1wQx+8Tm
+2ACLXLK1zFZgCgPfvrQxjJWyFSYnZgKmGOJQ7N7km6W0BtpViIkXsIJeljLO
+EDaJD4hjuRIS8YUze1YvTS4UsJxgPpYT0WsIWNiQZc0IMxbQQd2hFl5YUkIj
+zGnikWgMq7mtBI0+d3ZPlqKINfI3j9SsqEmJhnJQqpyijhc5kyd8pAx9FMwc
+EEfEM/bNzFl5n9OU/MdyjEDcTIo1iqAThM+iFA9VLAsJUbiVi7v9hzDQY1wh
+SikL0fsl3BtEGYCZq+XGeMQYJ03lCM10qtwbVwntplXs2w5UTIeBpXRxSnSV
+3hGX/1hd8TbHLhIDNVzLxLns49CdW1cPQ8ETU6aZL5HgcoXCM2E3qRkFyMAB
+8KEkwmn7rEYXNeX6e8HQvD2OnfqaJI9yAKkKhbexnBsoAeMwINMBRECYppcS
+p9LkcmGZZWYQWemcnkR1cF6snrthykDSE5wxFqqSFRU0GXONO5/1dMcth0VB
+m1gSLSoOpY7KrgET8ONRQXLBS1bLsEFIsZtx4LUjMEnFl9GxMPynVSk80Cj8
+p20etBlaDsiLuy0RZ5krshPACpmpfDmQLaG7bkiVaIAQ7wYeoXuibahhGikL
+MBgVqki8LzIdn8M/jJdL5fQhykX/6bwww9/LttO1CA2faEduj0FKxG2w8u6c
+p4A8jiC3ruaoK6T3FVRZD3Xn5rOmBPT7TWQnB8VMywhYSW5q5FsSMTDDHMc9
+k6ntkO+cz8/4xeOMWYmvBptVRSTLMngnRPs6fEtYgFcGW4Y9z8UnQes/eFqi
+wqteVd5FhqvnyXEGjwyZI9kk1PAZDTK6rGckL7hAkzGv+B/x4K1ZQWjCGkUj
+pc7pjTdEcTJf0hbTJgoRfNEEkYbkwkPSmkE5MZWIDi222e4SpeECRMsL+A1h
+LGmwQtLxWTm9eaarHvkTrdb7meCBGrw6YwE6bKxPxOlFAmeG72TIiBKXQhuP
+MYMWeldd39QsARE5TxkeoKoCtG3e7qrReg4poDp9s/Rwr4r8lgcbHPBKwRn6
+ULHlxt+cFmzSLeea9YFMA/x9Xc89k9/Z41Uj7mNT+MFQqB79EjWRrbMhyJ5a
+0hES6hravm6xTfH6ilXFXRFZDwQzflolcrQwJx7PQHOQqf963/KIloJrSl99
+QOech8sEBCDCbnoBwfd3dpybJy8q63gEG76vfWKOr+6fc0p25n9SKfZvMWlL
+ui8N3lCQ3IzNNgT0jbyD5yhR8o0NQVDazj7NOK6b7XJO3Y3NLTLKVBRo2C9c
+uzRAXzu56kNyY9VE0naWIiUg41gU1crUzP5Mmy0CTzn/hlVg2x2sao6ASkxv
+TVCZ/JnmPT/GP1jB6xYr26uhjMw9Z2yyKna9SWIbGZNCCS3KCQK5KjZr33SX
+zScdwg6lp704btY60yro8LmQLefI813kvK8HnByex3wubyHkg1zWUO83TW93
+Y4MrfYT79EPfuLxPno4OC0lhIBMmuE0bnFyUfkXyxskCxQPaFsnupy+ODdqg
+Mqkuqb4AN6n+ZcLRUy7BocmwvUYX4fAgfBzmMFWGAnjMPa3Hs5rxREiEo1lx
+jiym14McZCZNdwywD2UYkEFNc6wR5tyx24FgcBBEMAFLuLbK/NWDnkxjZkJc
+vxgjjdG3d/UHS7yvL9/hcqzsKWMN78Q2eItZ1U0MCAgSJ7P3Z3CTq0b0kgNl
+56TduaF1tA2z+AuSoy3sjDbk+npTMWN2bWsth4LhefG4BZXpSZyxCo2XsFzL
+hoFSm9MtKBWsZYJ2xELoqFj0IFdGWl3vHHQesbQxN0BxoqIDyzrt3bDIK6sJ
+BHRM3Sv4zCizEhvvccRQOVeGsJQaIQW7Fgsi3hRdVsQYorWIQqIlosvyM0BC
+GXFDzRDv8VkdZW2C1jAp35VUzOB2K9JSzL6h/romivzpnfHo1E6xtEhfc1EW
+J2C8lauFqEzQaVUknfC5OD+boCik/JV935gae/mIEAW4QRa6CxUvkzDxCMk8
+yO9jaFJ/YB5KPxanSb9JGMvhE/6aEUCbBR8XukPDtd61NytH4ppZSyP7NPzE
+3NvLujgi0VcxMGvDUSHqh5TCCbtEM8EEQyyBIBqoK+oqagJgiJHDCXZJDRek
+SgLfrMzL4ej00SD3BZhtH30K58IvTppmZBEPqsvmc3SIiKIXdoyaj3WA9Xqo
+yeXvxEjPiIubMKA7LHCazT31eQjJQXn+Fbz1pPQgxL+WN9QgbnNYvDrLPi2P
+LRllaicaNBJeECc6mA71oY0csulKnYL34sx6zXiqsVnigi7D0hyoeI3XeI2h
+2PuzeLZ7+8AX2g3dRGQxMcfbwnyYid+d8/dxV9v18WBNPEuGkGgu3zoxtGM9
+MB6ElO3EpVKS3HeeJTuAS+hEfeldH5iXatF6HlCWK3NIgkQKhUX2DMxLe7ci
+KGzK03cIhojcfrwnYluLhZtZ4AM9KcZ6GMoVbvaLeNm2nQFeAfyst7Ar4oXP
+Cez1hGbWa9k99Uqi6G+lKTlSig9LEojvVExKJY/MWNkF/8tm4IdJvAoykpmY
+IRELcbnVeqSIgcyDfjMPe6sq0AzPRbEd6U5nTJKMEyHyRsfpZHUDnTNGCIlY
+3Cu1TW90SG4j9FeKaBrTG0DKyQDZViFjoEuGJ4TEpeJ/ll0zbx+RMkzFkV5P
+nKvoxc6myQScnL1F6FnPTrGpmd8StTEvXILixsMhGwcfwloV7rKCgPbwXjg7
+L3XdLuro9Q0HK9JY7BERE7vATdqUSZVslVntDLud7JJwXBBc/IvYKRkUxjtQ
+CRhKzXPAmiRVSG3vhJ1jvUHwmqafd0YQ/Pqf3Fi/WaKVz9nXbHiPeMQj0mdm
+mQEjoCKEaiF98pr0Xp8YTq/mWcDbgX76FA/Nyzznqh/+NRFMqUsEpSsRiMTl
+eHOUoHhvLlApmdIRXAVZB9cszVF9IFhgmONoBYOcz/aljWz7j/qzkVXYXVVM
+v7F7y3aN7KoGO72N+NDRM1InNii044/Ke+ZCayHzej9nIUFXoLYqLdNobRwU
+QmOV+fBdwo6huubP5L1FVi6tNv40LcCzFm27JeMgp3LCFaYCL3lCtRcWt9/P
+cWqws4v4oxYTadCyknIEJU4iEa8vZ41fibMQwRQbIWKJELNU6879Z3Rjdmbe
+/HkWAU4MFJZhEWMqHRWdj+BmLGmOt6LE9gtJH3XneIkcgZGJEDNoKaGIcXzP
+SPgb69rKg6X6xv4T2Oo3N8fuD0XeJuayiSWHe0tClFds3rGZZ38b49F5YgY1
+7gLguqwlk0kexizr6D0N6wQRZcdHBiDTp2qqA0VpSiC0laGJsgCXvE/rIt31
+1tOI6nj/X3ydI8iomhW3m5zOj67FJIDUxivpbtLphMWpb/Ti73mmHaCEfsA3
+8uI8IAsBiyLWe9QI3B40awpv7u/nCDB9A2Jn4BxZ/pYCb680m30DeZbqPJ/0
+DaF5IHKnxetVrVDPdnyO7ZCQtgO1c0dkwJ6QctpzZl/hG9uR75n14qzLj+ag
+dVJRJsyp9a66yWzrKpUTbUbrmVTF6ZtbF5bDA2dlhpthqXPJ4aakZq8dMZ0b
+H3LhRO48N7DCzrAA3cSs8HbLlYnI8GVdOXc0tQCEmYInvazVpx3iGI/4pXP9
+HCzCx8sFKcFlTKcffeDynDoMIbsJM9vMlEyCbPvSgaGPdLbwJKKnxuKa3DRX
+se90wCvzX7MJDwYwTDGNMmm1EQhgt9ae0pbMXwHnrIUMn8BHj3+GH0pvFhsr
+IWc2j38BvblaoM9rjzIzupxjGWmhKOHGurksazHSHWFz6xSheZykDe8UdOUa
+UkiDnbcMnprLngmbKw37O2IL9CVONQaRfHn+gyzvuhJrlYbFrEyIyXBo5SQy
+VuUEGeTeFLbFMigA5FEGQXff1TjHyh5E1e6BCWv5H0GQqFt3vGBpQroTkSkV
+r90xp9zEmO7YE9thHPlebmLwW88jbIHNublUAkP4BqOifxiV5U9cHxMsszzR
+oo3bVX7Feq8p/FXANzcWruFn2VQGwsPkCrkHLs3RG97d3yRgKbOd7+aAgpqm
+nUmlvhmbmCr7FBNAAUGauf9sK5151VaLwvZcLmD8mVvTlJ6ltSA3PZOWiqhA
+txxfer71/aNHRxiQJCE9i41FEDxDIcUhAZwfviQ7tz2MGRGK2mIGUwiqBjZT
+CIpszYkUCKzlP/ILmgpj9gX3W8WYF/tjqsM+vD7nz7cxicIVwnJxO0ON3/c4
+yi/N5KgRvqKMer3TJZdP5rOs091OAtxepwvCUc634oS7t3YTRjuy8cDJUsRU
+jDKrqBBYLaaD9cqq1dDQB8PSqchDJc7hIgXsh+RxdDScM2+zqsBw4h2ADH2D
+4zj1hCc8IfmzoAjZmQ31mH2hO/IJkVCC0nmZ5LEBkEIyEV5ZeERB4Gox+HWf
+/oxy5Pawq5chWqS2vyR1i+Ta7CYOs+rsSMz3dK2kJ2rMPWtwqI/rmDdAKUXm
+lqy8u17Je2J593B8vS2XYLf23Davk//gqfUKgtnyyqlQgjDZhtTQYTsWkhW7
+MxfJf5t4wIis9zAlIKR15I2sa6b1G27knoxlHb1MVdnXb/fpjkE1wRkq5MKu
+0pYEDuv9YesqocP3cm9GIaxVhyjcDCPW3a85yZ7OMhSmCKElrKWra4+Hz9nc
+DsTGMC49YVnWcK187wsux2+93OlSk8n4RTygVgAoGOwCz0yLiFfBitnCD3s0
+yiMmTmESzvhOSmeyOCakwONv+ztTtumd3P5+nyaDZBRbOA5QpvaUufq0xTNI
+0U3cxJHjiLDJ4TDSAN/PRniVZ7OnNFFY5nvVT676wRROFnR0sWbGRdAW6Tzn
+3Q8zDLhmPytL5quEUc94xjMmw4ywD8YdD0rKaWfyA88d5uPaTMGdnohyX03Z
+bldSkF5XFnG8qpcwsajNZQ4COFYKEbKwv1xe2Mb3Ag/hY0SGlWLB3MIiC4ko
+xDo0PvdJiAcNeH8N3HYDJ/vyvoqcICcKyEsx8v0tDTPc5v5ymUq0gaHhoWN5
+wj+fmQfIiUgc4OMf//jM8qk8KVyLSulkdtTzdckllJsuv+bQSCCrcKusLYs2
+MuWdVUm9czbr55VYQI+xVmqUOqWOARYhVmIeDylYSn4HIGjQdf0KAWlFklWd
+piWVMB+LmIuxdz3MMw5GNCJmPNMUQxQGmWsDhBTzis1jwyBBPikWgKb2zk0d
+5v4WErA5HC4B58rHJGc6vX4xNVqbKzNEmomZc2SY/DAOilCTbyVDkn4ya78l
+x1SFyyKIOKA+DTGzvpphU6hkFI2omR8CgcoKsImm0sZ4VBMLQg36UjxPMrQG
++cFv1aqEj7EtIKxJqR0Y7HP84rU4UlCGL8udrujtlVyzJZ5egAfZMuM6Wzo6
+LEpcb/S58lU9wK4nMXu511aMbQjbokvaJu4MisvHaH25ohubOVwNFyna6Izw
+iqlODpRQRXdcJBdEkUxolku6upvTK8l2cehQkUnzWaoS4+I/YZZuWBK2FEMz
+bEqWtcCZjM98lTA990/e5fDYudocjebJLU2IrdAqK8DgTa6CMv3G0nrV9xWL
+Szf2Zww353td6LbAaJ8FMbw8HQQoZLyC9uW3wYLQ3p41zSAnVa/tQx9GK9/L
+bmD9OSg97WPm5bfIklMSnFtWLm0XByYUWBe+9EVR/fXtvmnWZ+JNKXetR67s
+ycQKJOBwDN/whB9HBt5v5RHkrGe1r+zMORq+t26GgZNRCt4peeulhY5cA5w7
+jXPkHyugKDRA/kPl+UqqPM/fu9KZIRv4ZJOdR2QaMpIPO3X20kJasvrLuJ2F
+9n67Zzcv3MdZoUlP08wA+dacPTPyEULWDRMQCyqmy6nZeY/2yCgpnpmnFWTq
+M7uIMJfw6X7ZQO5LkJRcfsEtK8rE2ebxrh85liZQY0TiDeUN7kawkQ352qPy
+4b/QM+e1qFXnBlf1y3n39lYm67MgJxkwNplGV3xeZ/xzYlY2GG5uZS+DulId
+/6blM1tHreE/0tZC+orFosBsm4b4Nu7ABtisedt3FebFHyTN3goHowBAqS/7
+m4rCdLFasXy9EahPQGpluzgiLgvm2F/4ahMJ6fbpBcOzyl5Um7I0w5aC9E+/
+k9mm/2Cyzc/NvIe1sWXWTXhfenz0f2XaqQEkpObrmTimGZSrXs8sBwIkS5n/
+YWhHMMye+1ODXYxKnTxLP8Gasb3sZS9bAwbQsV+PcXREe33qdCPlxaE+XDhi
+U7IXz+fGtlSTsVNJ0PoAz7YoCEmnBzs5aqJDNXtH2sreeG58ylaXBNC91Xxh
+1sEbjn9OjrQiJbPAS+8Tb0ncOPiHj6wkfBVKSIaxIEOgfNpDks8YtOlgK1/U
+qLNKVqYsa2B58hSFMtbnfXTkjmTRcLBGu3EcYXfmcTiYG5pWaNCHqM7Sad94
+N/rIWQPMlbiyOkIkzsujFdblXfQp5IpE/cx50i/9QH/99H6MSau+coPQ9f0Z
+UefAwE5gH94iADa0hK3SRV10lWXiASfYu46mU8I+8eR+MdGZ0Q1NwcKs1icG
+0L1M2hwZwHJpXq7oIU1FQeAWqVBGGCnkI31SQSJy2QePuR4MIvjkIbJknsJC
+PhIpzIjghIogtQKdeYgEqDUazAzl0iIKAa5iO0jrI0kmJygc89xvXLswEFJy
+zM68gxRCIUjCJzjDoQQEyQhK8ZM/018kmSRJNJvrMXGjyLlxE+MbtRiNn/FZ
+4wFNlAHBM5zNnhcDY5zrxWP4bo2hlZabBp2eK9TxM7vlc/aJPpyXGJFDQkUl
+1uM9kaWrd4AGFwCji+Gnxi2N24mMDEmRycpfWX6RcLL/nNKe2d1Mq85FDhvq
+Qa/98R9bqUGV2RLVTKNxHgj13UKydaqkr1Sd9LNI+Sz90hRgU82UlhIgB1BU
+hUDQbNkPVZW9imSL/lML/bDKehctKMjOdUjzTDbDoNtc6dw8cNWIXNcrh03l
+Zl24hlObyMGElASYIXEeEnh40dLtF8bls+PdnfhI5QTzsuYERlLZWJlHe0SW
+c7095VJyW7GtS/4Msk+O/29TgGquJviNxKRkafv2522np0xjf1vxiXmMNJGp
+5Ui255ah0wMQKb9QOxuiiS7Vuv3d3seHjZF+VqW59jaXIlsuAcmKhEmtNlKM
+UQdTAS4mnBp/PjuotS8lYlGOiwiwHxwouIisb3tY0IxGeQhYzT07x8dgZLyI
+MY/CiWdREi/IA1KGdSG/wXRhan63L7YdDjlSp6Aogp/760avGXHlcpnlYF5u
+NMtZufoj/WyB91BA9oFWc+tK6AlCEhy5EHKrXl0cwMfb+r5DE9cVnL2WcVZv
+4RPvmHPLNlqvXg95muOX96r7rOcR0ch1TySpKOfouyxvvT8X3sPbGurZppTs
+oKRvq8El/sANuo/SSAB887m0FPT3WqaHNCNMhGUeLg6JxxB5mS650AIT6OZo
+6ZgkonUnft7Pwp8awlq3/muPlwDWc43xllCRN08RmNSFz8TTKaT7ntyF267v
+phfiXXvJ8YZUo9QgvdBIVrnWKVdMSQ4Hpvr+1tkzwnkdrrSYcRnr1MszF/vY
+/szQ+0LZg7frz+hrFr4+/HATudbCDOeDFkL4VVFMmqBSPjOT885rE8dG7U3s
+JTAvS9pqOdv5ulwRpJdQOG3kbftvYhrq428MpGC0r7KdhNFR645snMlMOK/O
+XiGGJhwPXbb+Nv1nJkHRuFVmwZ0XQ99pa/ih3bBGjHC3288rUd/Wq+kb6VtP
+L8/7B+G1+pTKvqkyY8p8MqYLL8w2rLd9AiOzBqm1MOr1UHaqoG/HD6XQxcFZ
+52FBOXS1/z79MDH9mGdbzyEhYNWCfE8f2WWUMeknC4p7yXXu50OmmGOPp1vk
+C4f2ldgTQ+mlqbxcLoMpHcxJoXIokpUBk7pd9wmkaQTnrn4QbijIApDVhnTJ
+72S9rFHkvD6OV2DwuMc9Ll3mmkxdWk5eUevskhqYMdJcGAOlc+PfOsnZ6dvl
+jKEbZLFe3AWbBG7wKbeZ46vv5WZ0gbPyLLme65Ewb86Broj1RUPlCBJcgzIZ
+CygLtRSaysH4dI9huYb4qqV7DI/jVr1RptdWuiczPoP6MwPTkcWhdI9yI1Bc
+T/egEHPhwzplKdFamPWYpoJorE/Js14em8O1zfT1BrUR4QoHCyMjTgtrGLa6
+KW0hulAIhSwFsoA5FHIv7tNaL4zk3KiCAD5alNsnPBw6sgql0y0spf9MTre0
+KN3KHnon3uwWKfzldrjE9hmUxkA8P8SY7QQZMft2tV5pb33mvtc+vm6aF2gj
+RvtFzD1T3uc///mRIHTXjHzUz+aGnvKUp6zXPkvbLUgMoVm8Xq1WzxU61WcQ
+H36th7IzZgV/M6GkK5ouN56eczU3tWaQJoyKyBgaL575nTg0yMYCSqVnz35X
+ZnIe12W6o2WrGQXAohI1IXb5xCc+8SCrdwEYlwVK2LbMIas56VrvAxpCBhfQ
+SSSX+TQoR4EoR2XQQSG3MuC2LhMB03q38QaT4akEiANiPDxhuuam8TS7FiR/
+Ajm2n67pHIP0eWWxEY/apo+q62KSa6GPjpC/ZxiyBzF6xLeJite9rPIoEqZ2
+OaUF7838NkwMOPAeiYei3P1GjSsUDEXSBOLcLfhozVBfhHeQW4+sXekbmAeg
+MaiXvvSlaR2/BMikXciS1rHQeNfWrQbvC+YuH69xML2SyPy6JJeP4QGzak0c
+JuVkNyzAFo0CnRhGqsgAIZTwG3RBVJ6mgY98ZR2niJq/oIuqqAyjQDxNC+9M
+Ha6LaUUi/MN60rNiCsqWQT62hQV4s+PBwwlyD2LQe7X6sXZqSatpvjAjxrdm
+rTE+Zq9YstYr5BxZI3qXbpcty9K4JWoNWke7R/ZLnbZoTLnF7ExaywEiy4AG
+Cf8ft+D+bz//QxNnENyyeVexosX691y/cmJYO33KqV6UpRSkb0xMKVqFhTlo
+pKKax/XHAnoBtI+f97znvXN3SxbmG/gECFsO7/IrGFMh2avx2VG5SzoIAbTq
+lKOe8ppXMxHJNhV19fheLiDyiOJyqZAoE2JwqBCZr5AyZl+slZkcaZnUA5us
+W6+pPTa4kqBknPhTmNCD9Ihv6OZ+b/R1I2lku5JGkwY8fq7jTUUP36AO3Qen
+HALz8X2JJWXyHRMMFDkXsWYqaU/iiRH4ZF2LBxeLU9G0HBS6Xz137Szq5KHH
+fXXE+D3bvlVdWL6pFv+qMJnV4suYo+ULJePLxKvCkCmhiJfrAj1sgV/hLCwJ
+ynU+NNHnYDg32VKTXDjpQQ1GeQSD1h7QXrmTeh3tFQIAEFEeP6/cp2oYBkrH
+O8aatIHxrFTUn6IJVaHzfT3GaHs/M3rdSE4EWd7N6gWfUS+0SIDQIj7jkQjZ
+ChYRJAEKvPAkFziImELjwpcpZEpEZfMwn/IrETL3TSDq5MeaRAFrh+pTL7gi
+vgUsczn+zu/6mciy9d7Q6CMWAD1TBCLbXlIVt65myWnYYJ6VWKnR+OzwPavn
+R7PqKKSdLaqcKynhtL+Z6uNd4PTerK4Zvs9EUR6YZQEMYzZ0FTJehjYopolm
+ujo2dNmcnrW3VlPl9hipiL6NgdTlCaH/1ter3jyydSGMNtWkBAE0uk+GHrYm
+AOVn+qidQSu4YBW0L7NGNAX7vUOLVG3hJTtTGcI/9IMD4ZUHEhUwRlGUcQ9f
+lXpidJH7Aj2MoLAwJUrCF6iyPxRCheg0SRhJHtSDUSMETLnJmp4rBgl2c6sq
+qJZm5oozhQln1F6mMEkVFYT8XOHSq1GYS0NglAJ0YKCHeSMTGWpY8h1rWwky
+hXMPky6FmSe9UhiYyrTdfEdhVHY9zFviwi3L2giCSRsyxI/CUADBFkGwjQLG
+V6Mw27URFIafYO4KANgp3s0htTYc8XagB5wJXkAOhQJVlJPS8ITEweMpIog8
+veO77FryZcERO/ZOeNV3dM6l4CCIGIVq+LWf6D4xtGnVHoo7tef0cF1Yg9Wc
+JwebyrzZvxLLFB3tIWLkIoGt+d3wDcd72OBf/ggEYZHfIaVDcw9pz7YhnNsS
+l4MC6X5x6UwL2NrFnO9NkLyWUFd8jUmsSBiBQXQ3VFe8Pkv4FMtsDVyG2YXN
+U4HUYDltVEIjs11wmVCNpNfWjRgifsrfFaCyE5G1e5fCipIEukXrNoQbRpoQ
+nfT4mZwzrNzWSe/pTU6gJZTUxbgP3BF/cBNIqm5qGGavLgxdNwyzhyJ9NmGC
+Tc6mRidaYiPYlQC33GnWV+tOhpNDqvq45uxpNKchPMiZW6wJ1aWhc/oApSy7
+K4mjuoBqYEIwFQhMNSJIgkAx1eA6RLQJTTyiKFhIQMoyJkoEE5hswvcyNcJM
+e+PEF3yvnKSwb5sCvc0QH9VR0KCwqOOu2SVYI1p5bu627R3b014YBYxAHSeB
+Ypmndgomo038Gz3PnXxQmWYxWe5WdOM1IgBDSCEaWXu0SRtGkgMX7eAod76N
+5J4D4GkB7aCgKMAjr+Ez1CBpblz3zDRXThAz6rlNo/G+8pgapfeMHLpJn0Qf
+KiLa90AfqMzJYK5pTW3TRLUcwyAfha37NDu4/5zgB1qU7Uzn6sM4TJoI6vqa
+qeE+Dbt04WCFJ+GD99HMQkhTJVp4Uqg39YrrltMnpBAt0VMoS8IgjivnFBl4
+rq1JurjfbTH1ilJgdR7KUunIJo3zc3uAZJFPAIyZZeWb1Kp7K9I89S2wlGOR
+smV3f+Pr1QNMM43qMVrbKjKtJLsXYOTaPxqRyTHt8q3F+Sw2Xsrr88wJXWNG
+Hu7jWc96VkamB94WsAJOVOZ2E+CrDpcAm1vYZ/bbHaCSY4mW9ywHyFoG7UKw
+TPgYKa+cjWvAXGBiZOQIyZYTs4FkDhhPLp7Dz/22nb5yZsiNnwBZRGzyuLeP
+TSaVWmTl4TpB2FekFMXmgY/PVDHPXoZnBvRDrWS0ZJDjD3TBKov69Q6lULpO
+7WUNaM/4RvnoL8RKyCnKKqlfXN60QtR6nVQ+1pPzM5kDyJiOQeUIFDAth8kM
+qBS70ChNi8OovSN5X13TAgDxkcO/c/aGWCNlsBx/UCiTjJzRglGTaYfGu50R
+yeETmBhXOsFHiHRCmYgo6782Wz01r6bPk8Ote69kdAe/siY0p8cwHN0wZAGb
+iKW+k96yIHD2dmR/iuyxWfPQTyll+gGzh4+z2xZym53P0h8+6pnPfOZ9egSc
+wnpzbvaJMdJKPKI/2JmjZ/rux2u6AyoEV0V/Iki4XTaVXQjeFOiK5auFbSvI
++dEYJ2OGNjsueOwceRbNwzYrHQgtBXBD8V56hNCFwOtmQBkvV1rMSY96EZH6
+UybEMd/vesx2PgSrrDh2LrfhkrEwBeJxqXqudCtn49JlwU7BzkE4JlQRFDvd
+Y9UDzC1Dzdz7dQubFhlkLAnT+fbnPve5t7S+rvcTozuXguyvNNoqOXxrNmgf
+2u552KiydxPIMwHZYwWL6S347hFBifV4USXy9Mbn8HQ5MUhvRcHt+s/EiXkB
+13b2d10Y08s6ZrGMbMiFrk/A3FLS1FhgLWwtB9VXWebAcZG4WFJhOscPCDiE
+wLnaPaeyg9Fx0P5ul0tg4R0/4quWJNzSzRIHY6IbaVZ5QcLqX6qHseIgvqWC
+/zQLnNGqWcwC5uvBiZFF7psFNQp/+1ngbYuuXBmKlbMP76G1BTQ4KMGHQKUh
+1x9mCWQVrymyb7SfGzEPvOtly4MCsQxRKc0Zv4idMysZhTbDpAAmudMUejl/
+oXO8DcVh5JrLMazqTkX7I7spX80OypgJVOM6Kq45yHFEvidwRbGoQHeplfZF
+XA9vgeQuyzzZfEko84ieM4MgrYmAUivGA62yF2pRnEyrWc20GOkYT1c6t1bP
+DnQgixVRcmNkdud1FHLwyBar0ACbYN9y3Q2NURbY5qM2orPDhxahSHcpUeiu
+r43q+bxxnWBFKxic+5iia7mEV3KSFvyLsX0zXDqlV2iPy2ZIimQ4B2VgcRH0
+sO4th2pxx7lGJuda2B+dYC5Bd1cx0xtuiGgjE0MV42M2reAN6utv3FxixbkZ
+PHZCpUGi8ZbiBDpgEi8vOkQ7cywfl70oRMYL81biUzWDQ+eObnCscawuRm6m
+ddvxa44GJpFIg6JSpSBOVreChtS62IjYXgHJ5Lnk0PcRx3f72VxPNi/7PnRj
+6MXdkEBGRIcMOX26I4j1qjIaDr91n88UBpUOkJANvnQ0cIUM5eqQIL7UPXOv
+fu/XksBx8nX88LqxMOdclr4GsUSnfHGWSGupLDnbvUMwewOriKpWG9C2ebWr
+5iWv9McwxXegkCPMmXzJP3LRkhSJKtfwthBwi0ToW+751KyijdcTgVPf7BPY
+z/eeGIbCRJN5Ue1KtbNMs+e4xjzEtU21dIOgchcF7mAH1Qa1jCvNAQ5dQzOj
+rOZDNSp9FNPVrK64lvWQIwaGameoxBUZLYtKxWS7mnAjmcthuHB1I/nsvO+V
+BeoT5Kmt5gx4tiQz5qriKZnk5fvUCauPxJ24Th9VC3JbNv1V+xTvZWOnIrwq
+kAhM9m8dyiFdODtkuwbirE4Az9JySQYnt11R6w60Y6MIQeWdnVRYmwWB4ldy
+Nf2aw39xMvdvqE30fOPghJrGfh39hQG00DHTBTjBaasrETi/Q1KSILUldcey
+xp7pnTfJnB9aoaiA5cZAtMZAe3JbhzUuiJJxmofOfcrgAMyJlMoGTvU44Jda
+iFe8muOUKKM6y35S6uKQlO+wi6zK060VGkDMOCRvKt3GIZnhsvbn6l+aBwTm
+4RqMXZYGHGEpJMp9O8yXe8ND/+5vUdm2RnB5crLc7chHCOkAbzm5fBU+ijn2
+SxVOzH2yNEIzvUkk6ZigQcYr6syG22qi1SzbiKkYLQZ1hQ0xKOGfJCSXTF26
+dGku1RZP972d27EB1VkmDET10koxUdF6sm/GwV0fnTx5spvZCns4QJMMjXDh
+vH/hdB/Zf2Tc3rVdu83rE57yjfCCZ2qgzQaNdbnCeoALawdG9WqQXLKtjEWc
+1XrwQsUEvdvA/P/YvC+dry3jCicEVvnq8WWoirX7NfRnhoRya6SsEffoPoUR
+Q/AI49iObahZ6cPhepU+4EZPEGeo6zrfiDMXxPXlC7niksiULcBurkVleL6a
+HWc4JHmIG2egubfbHHuKLGviHFZya9rq+wgTnmhaiJsrznVZUHmxkVIrIC09
+Grda9t7eelwX5x1q6/4HWuBnqguSiF6kY+kblNHsdm6xmvDJuZdLRATiREfa
+BcynerWX79Bf1WVwRjlJTSVf+0SATG50uYCPmeQckqTLfFT2Qp9ss2Jt0j3F
+aojhbKyLPURDYIk5lt3DdjEPqdCX3/KuIUK93sTT5J8coRbUoYDKWaZcgK7v
+jPV/7WfJS4jGXM0IUORkeB5xMaU07HWRj3FefjoMVOtMa46TxfG5vcRu1LSi
+ohBaNCLAWc7Gz6W22yq1/WfI20qImw8BGcJzQ2RHgppckoJdkJB/AeRc+P46
+5e1MxmWz9GCt+K6c31RlpANvmjSX858YuN5bUQcYU4DS3yxwVFrlDj0YbrKo
+2H1Iiy8MJJWIi5ByUn6uu2c+cV5YDNskBtVh/Dhp5CagoDytQRc/xZ5o2Dwb
+7/jEA2Tn2MsTy5AUJhk5OzLxVc1caGL1BLP7UP1BGIbmSOe+HHH0iFhmUk0G
+JnyMYGsGcuahmAYGwHIw5Pfid3IRPWlVDF2QHjpJ3FQLhRS4+7lsMOgexZEL
+FQciR/GSN/ro6KhZkqjC06lmvpKFeZn/oNHm0TgJoMNqcKF3tM3LkTlgqgbe
+xRwiUZTszwXalk+LTvuujqH5gGU9s53Vi7F8z7+iwop6W4Fylbi3MwfiwWCu
+mu2WqDMglf0cqpySMyI7kzvI2c1ZpQBeBEJWAiVjoYOEIc+RUQsWyyYuNiX0
+fz1fAJAq4vS9sKGE7LKrO5TkXKs9JSeGA1JsIx5eg6KV1HJuDjWmwub79SIy
+q1QklT9/7irUFCor5PLWC9V8j+1B8Hm543ZCG5kgYqZ0WyFHoG4jbS7nNUz+
+A3gTMzUxgWnYyq5sSJnJOKgzk8RdiKULUqjvZ8mxuIzW8O7Ay0r4Fnm4xQ1n
+W0WOvVrPA8xmblSkmJ8jnWRg5EpJc2EQFtotFDkrN+fsREVg9czCycxKiBQ6
+3p3dr+ccpHvS6fufZ/fMXNfIwlt2I+BSf0z3Jg34fN0jw7KkUpYsgOWIDp9U
+t+1kUG1dr0wESpIsujaP+js2bCVnyU9suHaEmCRCahKYlLUYqKSBxEx2UnBJ
+MlcJ4eXhogr5toFRnOLxkZGEnR49pRhF1bKaRW7FJe3vMZx1UvrRVaU5EZT9
+6yAkhp+LMbMFmrLk0o7qKtxEdE7lY+yynSLydt0yYmgtQtazALtQcGi/BztJ
+rcHfu+wyvQcL6MVVAxwJrqi5/dLE+nC7XQw4yPWz2Cm2NTMEZ1ulh8pmskHu
+SgkwgNqDLC4b6jNGEC+LnncObHN0/Jqg48hIAC8MPLH2XJckyg41I1OWtwCU
+rO4UZFHv6qK35Oe6gp5CaizYPlsP+MhZFgjOgXk52koZQqKZhxcrs89GYP47
+J8imaRIknrVpoJTvpWnKIrvLI4At0Lq5G8O6qCUx4AElYUe9OXI0idXcEBxm
+Gdwb0fAQMzXclgGzq33NY4N0Jrm/DuH4MDBKErYWlZ0QnRxxKQkybZkxBvLh
+FkjeeJjnuTWeHMMEI6LHihRZOpcjVyGyn/fnDZwYfky5hc3yPMLnQot1E7bB
+2uWTLlDG4CByulCRojjMQhe2rqUL5Ql1DyahwKmG8LSnPW1bc77t8uQfqPty
+ta6Ynhru78s9OVAjxyTqhSVIdtfAmLhIfb+7+tgspHeYtC4QYlAq433/87DX
+HBcppfUoewF2lPbGoSE6kyt9M/mN3Tvfn121VzqtaV2PJgMwcBE/9teIc8Sh
+sIpFUF1OXfKbS8AoBypIMV2w6yyATBeiFDXJzJ8RWcFCugCP8g8RlbzeMW4R
+CcbgF2ArhE75DlKIdTIVAC3EUuvRWl71+X75wrF5Vg07L6eZ1ScGmYUTYJSW
+s3WBEeMST+Z4Md0QE5fPnwKsnn/vu/dyV2Vm5f2WE3wJDtv6TNosBOAxuhoz
+z4sDxOKie/Wrxgp82U59P9s8aKJXBG9pLvUuzaEPi1g/D3j/fo9jkp65CS75
+E5UDKtSPVPp42YsLR7FqN/38hlswyUI7Ea3BCXZxmQoKudUEfCafz8IRzEki
+XOh8GesgHELW8+hgjLXGNLGClmt6rGjMYWx0mQJCPzuvwjrjkicwpxJ7WJcJ
+ib2unpxFEg+pKGrTZ8sOcz4hoQoIaVaqKPAXAGTvOxWq8ScrhBE0iIJmz5jI
+ix70jO3olotzc0rusoVwGIHtyPF9bNUVRUCK4hQ0K2b1BFxOnuGHLRDw23rg
+obwFrAgr12M/xT/R2BxSrBcu1cBKe+/WH0P7nOlQMlxPMBI9rgdUibh6bmi2
+mkM0O/lfj6brpwk+Nwiy41FPYt+4KgoNFhghXBTAFbtyRj3QEujvD4rcVp0I
+5EgCV/sUxDGYQuZj3a94TzDqq1I9P9NbnzMZOsLkCPMQx4+N1BehoHISc2xo
+uY97wWgOcBTApF6wTKzjAnui6TATMBYX7tpvMTk4qcHy31m6DevswrcUOlvw
+aDc2g515X+nWAawz3Qjf/Ft4l8vouAn6rCrIjqULYSEUWi9nya1yep+HgB4d
+DqvXAM87o9At/BfI52cwYKlK7g2lF9id62PoTVZE8AMeyERyRdZ1K/e38MJk
+JsJooYA9FiilsuSPq8yR59jDjSBesEWdeGj8Ee0oJFI/7/b2jrlQQuRkiYzP
+clYGS9S3RdXzDNzzg2AZGzXDq4QnVI8KMG6ZobDEklTGs94FhWzkCTWF0aV7
+qSyh2Dp6Fi2v4GYLH9bjH7NROwdcJjiFfgDArp1cBcq2hHrgyGAkfqimP3rn
+CI3AnufLeI9nzFPUqIl93LUVGDiA/eEfF0bOyuVpjqGxAxqTe6kVvhSCGYKY
+TepSRpjDwQOKm1buzUlNGVqUtl/TPTFd8RtmQEQ6JdpJRZt3MNVLE6Qk0o1C
+iiw0oxBUFWtVD+0QKankOOWcTaXGl43H9MairIgB64S2e3d2PN8ZmEQh1H1j
+yiyEfy7Heuj44JxEWyNo7me7Gu6xEXOU0fh1h2K4LqgIh0UwQJQtBXhJJJua
+tIcXpU/hes7/41xXruegvHnA9YUR6GVlKLuE9O2Xx2cs3zoxD/7YZFYZS7jO
+h6rtwxtVXlN9ZYq5aYNPafGPR2hCnqKdGkvKjpjGNMitHFlyMe7CwdtslVx8
+bZYftwOwUj4poDrZkmZreIpvjAOJdAozWhw5K2yt/eRkOUDS6+RnXp/7gARv
+ydkpA1XMA3iKwGQVEFLzzl+L9BHbqypmd6n1AJMUauBcatOpRnBN7DZzcmb5
+anTrDTL8QY2mg9gTA/OFUx6KozRUiLEpxJkhC/EJq2BbtNwgDR58+bnYmoJy
+DN36vOots+9wIU7G+vvS2hmn4oFtBnJohTzsquAzExsMHIv8mbkwu55RzWW0
+yEajomkxP8d55s4SjiOfrZWeFNfIVtK0Pw9iWwSeIjPA2+8CPTlUxhaYLJFA
+tMLJfgJ/O4ibMHC3WJjjiGAp6NmXA/clIgt0Iu+1RBThifXEQYosMQl1PrrB
+lKv7UIhqE9EAwaMqa4QrhRwxpecdKgbKuljMsI0+K9qlA+Ux49KVIYwJX9Wp
++RCZAN1nTqpksIOyLhvOs8TGb7kcCY543aohk3+amXa7HdSNg0APFMONip+C
+h5gPyE2vXEEdlOF4lWowPF1LSRG90sTlt1fQbDSZwbvY6gAhMDCL9excP9Ys
+ge2WiTIinNN19v549AEru1yeQgRx9grDiSBiRPVv7jZkr2WqkLiWqfIZSLbz
+xrLS7JIwFKEhsMvCmdLs5COEKaqmVeYuldnZUXNpdEM9GHU1v5ZQcv5U4DSH
+v8M3AwdCAlHWerzFDtLXQyWNCmW6Fi2tl6obXfYV3NB9AAqBHPulEcBPKACy
+M22BW4ILhW1CYafzruhN6b0uDKqYpddPpwSidtZ7DSf7s59eMSyWuBbDYsX0
+0aBFpDmHRPZKwyki10cTRE4cxNbWVYORWUvIl0s1RSGQQliZVWM0ChSiByP5
+9qIjzoCZXn5t1FpkC+lZr7y//Xm7VofSAqCQrguM4kyhr9/hnDp2SKe9DCJX
+MqvDwEbsyuqADJ9KZTbf7xW3BgeIGUCJ1oSofcPjRt2FQUHWsnngQta9ZVE5
+RtN1JkqjSsNyW6lFH2TlK8ukZF+d1b9thMgG6a+HwbKmMoHkoDiPkP0BNFNx
+cKorzbNiBQlTskuv6w1Sq5eyNc2Kx/PdQpYQx43HBwoTwn3KQVnkrlliiMuM
+GtRm84M816gwAS9ZXQ0jk13Y2JXsSbpoPvethfT1CqqQTpksgHOuTkjPREZW
+bCGtb5CbpPsOJUB+lrWqm2ify1pP9TQJRPeRziGX0gUtaQIXsHecW1gngOIU
+JXVCZMHHvoSx3cJB/oZe78Y0MlW5wgkr7JRrPL0Z96bD4teJyJMIU52mjn1W
+/7yrrYjIsaw0V5pCyiXtVFzWaYxMgGYFZs//DR3kg7IRJEahKUoIAkXTIJU3
+p7clqdt0z3wAhPS1IihX2sOgyAJxXYUMvcQpQWagpVGhV3Qow99NR3Rp/A6m
+KW/ue84+aRpjPDhG6+BxVrtDR38TrmWOPnfG9TEJw1fPue5To1nJX5aKJAkk
+2WJB3CDJQhX6lbWnpQRR4ysJHp4JAjJBBlme+tSnHhL8seF9nIwgpCvSE7Iy
+vUx0UkKrDnIEZHbFma0oR5l6qNAalhLWXKJzaoAFsENxlq/gL29R0J61gwbG
+mLLd0aRQoiGK5/QJLCx+hUbwgXXZmcE+QyOHIEu3F7ua3mi8biierxOiynD8
+OF7x1+jvE4QGgSKO9WB1EKLYTojEIAmIb6eVnUqMsht5iCPKnmfcTWMhahjB
+rLRltUAC4tw/IQEtl7zeQRsR59pXFpor8CSnjgpo+WaumEtKyBjGMTWnzOT8
+W/uwUhoh8JSRNq6dGSYgsPAfPeFlZBTKAjwxk69sIaL0ZxRFTx28m0K6Jnq3
+8SRHU1nAK78n+pDDogyBRYUcVikrNOWoPcm0eEMGkctY5o6jLTtUsUIOefq9
+5Jl8JlNX+5vitxUA5pZ7J0pS09yZRyMM0tbp+mqWTYm7cupwG97BlaQXQMoM
+v/LtvKZlCo5KtgOcnBKaqGclDy2Em5yidlrcHxdzYS5L0wtcpQiKqDn0BjvU
+uPydUoCKavPIcAOHd8ve2N1gdO/hPVjz27UGS+NDlmZ7sqDJujSYgbWsTWHW
+vyTE/mN5vGJXIkakjLn+lVK62SHTsJjXOeKMEPsmnqZuo1QfKs/+RhC8K02w
++ic3aWE3BVLj5oWV5X0fS68kyG3f40FuzMRtAaxKjpwEl5G2j7YujEpPH4c1
+dJtURI4BhCxH9S7pSDaKrPt1F7yFJI0SKETmHP39sX4nR2yQpaA5UgXKC3Fi
+osxHGK95XLb1PffZsGpwKmxRRxObhENI51Y55mwUQZMDIVJ/A8vJcUqtz/3v
+jNs27ZyepxQlFoaKKcv5XIK8TbGfm8vgsvUAesqUmCx5Qc++n00bD+wumK5Y
+JitMOKvcA0id97fabNkwhmWrOjDPwh4MxQCM6C7u1LzhwfANxlMDxtZwNEPQ
+9abDaCatQxY+Zu2QPIVvCVQIMkS/NLhUZD3P8jKeZjo1SYPFwud7YOJ0Lans
+WEIdwGVXwhSQZxQGV3b+et256Ib5CUqr83PNUnIWrbAsviqbKUTr1LxYWOOu
+9rrWmHFv/Do/9BSaJkOQV0FWgCRogCrMgytRFpO3JUamKbRAuGdE9DE3Zxxt
+siFD7n0rHV6X/fl44dkDWh6wKhuJKIegJ5k/amVUJAA7sl3U7/Dq+PHjc68D
+p4QaXbzheH/zHbATSORw5LlW8dToVlOCCD/TPXAoYi5qs81Ajszmpe3ZYgRi
+cqVWDu3ITLbB2j4vZskZgmoc+5rGuaHSNIVFGVEcgaoLM+EgWV2HnFnrYiCi
+L4WeqLfwiuLZNdWXHT54MSpTe6KfTDFm3xcJKj6QqCrkvP7g2AAqeGq6qoAp
+iexqR6/dOoF1arbo7A3LQzedFHRknJt1ekDqekiOsfpdF/RsnfRYdyMnFUc1
+sYgDl3tZs1cEa6E3718Kki224icuVhIZ3cneFwvycb0sKfPTAlMLvdZbQvkD
+00gU/G6rpW/n2VAd2klL4QlzxV2fwXCyFCzEQ1IrvBKipIugMN3KzZj4w08o
+k3cA0Yeynx3hFtTQlhHhN2lmz6G+SdxpT+kXLsjk/19z97JiVxGFAbhN59YK
+QSEIErCJCJqBIJnFUVQcO9JBJm0yyiNk7DsoeYE8pUJcX9X6a9dpoiA4sAfG
+Pr1P7VXr8q9Lraoijf20BsHOcaXjXPFVLQe7bFu5KQlVatIgWvsY/1WYm7SH
++3Job3bfqNUX4zMj0X/iFDe8Fd9X7ZKMfFb/LuqMTkP81ox/1CqdhnuT5SMA
+HzfEBWEMS5BUYF5NMBkffKPleJUjZqSueFPzyi2PIJNj406MJqIotf6que/P
+OCyIEKexKfbDCmg/XUO37svzRgVoK84SWwXn4L03B6+ypkKlRQ4sBroIG8vc
+7/ckJDacHeHlSjLOAECVYaQeRS8UlPPDnAvLs1ZJVZVYOSEqikBzPU7JnqVw
+RBPYs2fPIhc0K1goVrZcPm+5kAN5kEvfL7MWkbGGsehC0bOwtdXxgmZsu31w
+lE+WZPmKJDZ7LeggLtpBGYEhFO5aw1YBt5hY8/2iqeoNY8Mcc6kdZcwewlCF
+D/Vsth+SLa6x5iyKQj9WBjP7GozxuWEMkc6zUCaWYkUsT7Ikea9XpMuGqAUd
+xz0882r2vszQ3yPPVPqybiQkqHnuV9GmLVrgjGU5Q+TDZmnusHYyk/aprNL4
+3Ek1ttW0QC9b1w1J18V1+IF9XA9dN2d2q6x1NCrNJRBR2AGiF2MMz9PpdO1k
+NQ3AyoPDADzFK4pT+B1WCooBkxDKih+cLvY+bEq5bYLkH+LGRVX0hcmwNhm0
+DCmUsn0pACaFUpVXURj255CWXO7ed4YuSqm3dSywU/4plArB1QRQCsJlpeXq
+I3Q+CbYxtSxD80NEgM/2AiqeFMpnYdRkcr/i+vj9QRcoJOjeSDToZYK8XB+h
+2j3sn7Q55FZFRupfs8AJEaB4AK7xtBb/V2/+xXDA0jN11Lwo25XgrXBzb+9X
+u2IONXzsHOjwWSwkZx7Aqf3gD4ubaWmRb+V6P0M6+KTihwc9EQok8cgBByj0
+/6wHlmGDr6tWrLLY7PwkdSgyLlGbxEEEwi8VXfOg8oRLFQuA9mAr18xkHmK8
+YBS9Oe73mev4fYr6+LFIXaifbT2MCgp4pI+DWeucxMvlslfQRp8qgM1ZVqYv
+4kBNEqz6d7/dMFnKPieozoaK4a0c2WkvAYwZgVQREbcp1IWhYIdDknbGjLxc
+QeboH705UgqfA89x0PTBZFZkGTpf97rUNVLRTIxPR0te4YZa/l5Rt2ZWlH7c
+xINO+Ohb9IUcxCqK4oinHJhYSL3ejvn0rBBtEU+O1BoOFDaEeBCCKBqyfz2d
+NSE+6RUcKLMM8eZkl3xqOwykQtZs4kBc35O6tlVhF6d42UNwJ7lJD3eFGaUN
+ic13ce+nQOW0/pb1vabW44miWDA/QO50kf3kHncAX+zMiFSQzu1X92UzeGn1
+4iLuK2T3nal5FNxARqWFtPjwXlQ5rkGAW9SlD0bOIGvmKUzbgn+Z5Uct9gRk
+aMY9dp9VO9MXfSis2i6XSdiqCQSOQ+zn/fU5CyApSFF0Y9zLdXvPpIcghBNF
+aOYAgFO2CgjUKMmbGTJkl+tgrD1KOeBtCuTu2hy6vXzAPrUvQ9p7G8Wk4jIx
+nArKfpnUtbpE7qqGWkaiXOASy2SlgrHt6ALazJr3jXg0g0M05Qp38yiVZc12
+AoSxDD/9Tlni4lG6PtN1hFsj5hMVAT0V3fKvZ9msSB0oYTwShABCYsQVoF2M
+QEHIJ2WJR+Lcer/odo/kXDnRnUC2G+jLujx6UHtz6DH1oUbFl2SaueaPU2UC
+WLe1uYqKr1dDgWe2lOeMU2ohn9MuoUeXLyi574cEvFN+c2EVd/22H2hCjY9K
+18WQCrXvqQ620D4SkKccB7HMTJse+H5u4U6c5zt9S/e6XAoy5ubmjNHtidsx
+mBfr/ByeLxeWZisC7DjQdk65z9pZNFA4UVsKhTsNTDyXdn3ZXBXKeh7rRH2d
+yuzNDNe4uic5oLb9Q/SFeoJNilBSDq38VJ9n0APdHHyigmRRYJzNe7AbHhyH
+Z90cBQO6A8hWE/ackYj6IG+Oytmyg0Ke7/vjPbbfLp9+xwT3i7XB8CwHHgaZ
+DrHHzXKmkFYAagPew3Kgy6OB94wBKaMKGQN7iB45ojN5zXdNub9hERzZzgX9
+B8ohqjfDt1RE2TdxYXh9vt8hTO91puTRLBWDg9Lv0EEmTKFDpsigt+GM3+bu
+jrPcJWcgs0q3bB/5nT/7FnjJQkIvQ+de4Phsao+/FE0RQsGrJ/xTkwbQyNtM
+aqK5mYTMfSz+KI4+7ffSGnE6bxhXUHbQxF/2vLbDb7oieGsMCFMTiajxPPjb
+52c3HZ+VIwS6MT7n9puZbbiObpiR5wfD8FPscYwz+M7CgeFMkXofR3XN9AAL
+hM6T/LUywrYFfkJ5uaHc8rNmcLZf5Yc8yEImkZVduJk1/tXfM52QWNjQfJ6T
+tTIs8BYN54ei0gAV1gyrlEwyXEUxMeeQKR6pHFg6DUMgFglJviF2n6UwhvYv
+8+OVj1z03pCR6lB3ro5nqU/u/omsoKUZIqfGvb/zbuaW8Jn/kMzgYT31sOfJ
+/eeag7BPecf+xczTy2EXPV7nOt4epiynjmmLaUpBMzJvKWMP6Ua2omxnafrh
+RXp0wb7NsE/InivtsoZlqq1+azvQtkVoLIkgow+lG59hOazsrUHNlk9b9sIg
+RU4JvK0CgpPslvI3PQxH3nQ+bNazfnvUY9Bg22N0n2qLUaTNGFyaz6hhxlCh
+7hsO+7DIuT9X6u+3b04lJ5FwMgkdYFCqAoVTeYNsVUIx+6Ep26xW47FlhjhH
+Ebdh2KlUyL6Y8kIZBgo4mly9MsN4YxjwtJUAAhiGVhbGPTmllf75Rmomgq2r
+q6u8hExwo0LeeknFUPWZcpYB4UbuKuPIfRZoYl3yD/OZIdTdAbAyPwV80Zhy
+n1Da0mzJPPSKNXT8i7Aq9j2h984AIb2jaVflEi11wMIoMFhgGjmCkKJiHlUJ
+wblmb69T6M3i+jIO1TEJSZZxJCZ6S6nLt80gsW3a5p7smjoP29BrImuiQepJ
+Zephrc5JZvZ2i8mwB+vebjESZVV/tGbmO7YmlQplGD6xd2GsYeSX2bsVfYUD
+jYsh9LLNgaFJtECKaqhVvAzv7WlxzfD6weTju0mZpJxAYO/VtDJjyCsIfb95
+zDO9J/rs5/4MGGDUcfj6+fAIPAdz7GvEf+g/iSngxm7tnGvalH/sz+idYfbr
+N6l7dxyu11MJplAR03rO+N0SmtenfxSoBBTyuO7jvo05u7n/aGViwSxEWJNz
+wDDl1atXpyPfGe7NYfUsgIOmy6CG+V0jgt0Z5ciZZukAvoi/mog/e2QjsvD8
+UApEKV1de5S6oTM/uCMNsQDWj47P/4Or4v4P/z+PJZq9GAI2vrqil1Ry+SRm
+In4tqHjcH9NsFWYOttidviYgJd0A/sBD4fTFfM9Vs5cTJFfdZIr7+gD6JMBV
+f5S1AV+Lo0zcutDr16+/7j/TKDEav6E5jfKVnmZTB/0EOUaHH8p/pS7PT+kQ
+w7D7HHeU9Qq1k2z7FIGgLd3FuSaCKqRJQLjcgfZZ6lq0S2ykYp68gfPrBY/V
+I4OxfWT9+MlFHww7vIB8uWQPe/29UvmezfN+CnayFJk6ELTYUMzPIKIRAJPj
+g7Cl7C9zIGQ81n6XOUjDMFmImTkIHVzwwbllaCmVyrudVF7Bg9VnEQZrRwyI
+VEry5sKjX3bluzNctdZS4R4F5GwMJM2PMKQOwEGsoyxExMwakzMReud7lmVT
+YSJEB3L4LBMRdRAkpxdhYK44Uqdu7nCSDbgnOzRAU6vEnAXh8XKY5NTNa1Py
+ZwiTEiGLkflYecpwlogwJT/2D1iQ5i9CPjmwl/IZZXf+ez6mbix7SFKIkXyy
+Gfc9Zppib8/ySZkmPRc9ZbcUJ8GIyn8tuvh76zGJjcT6WC/EPpnm+QgPrMnu
+Nxir1OcCvbyW9IQZSSEkQKbKlDJVptjXHdZY/ntruFyfmQaJFcav5xl2OvJv
+jP+ej9TDqYMOy4wq5zr22d4xP2MwcEM5M88xYyGr/U55jt5qKfLb1enUuWHo
+VaHpelyA3ndPramzEAqYww9JSoNGkbAUl+SxkT+a37s7Sr4U0CZpAb/OKVU4
+CljIFWGpz/Qy7RieYEWWUs59Nwd4ePny5SLV2lhfKpOZPe8hxTSokYUxFQxl
+kmKhzAqOMwPUoV6PCGorMji5Vl7M6krnLPHgAt2djlv9Yy4hi4kEISWQvIIb
+ECezcmtKqSGXnixVpX/OF5Z/yRd0mpOhGKBn9aKhKEc58QuCR7MrS8tI2dDK
+q+T4NSIAdilp0t6O9NeEZITe+ObNm7N9SdlnphegpPFcE41VQAb8RVKAUsUA
+ejMe1PEFxb+ew28bAThaXmm9TJHG/RM4+ut8/Pf+E8eR7XSRO0CCn8qq/fjQ
+m38RM5y99xc5/1sJ\
+\>"],ExpressionUUID->"1c7a87a3-12b5-4e99-98f7-bb172de020c1"],
+
+Cell[BoxData[
+ GraphicsBox[{InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwd1gs0VGsbB/BNqiFFSVFoCA0mDVHqqBlS6WoqNJxC5dZ9KjoKoYhKRe66
+jVBKZahVyGU4XYg0J5RqymCKk2QizhTx/d/PWq1Zv9n7fd7n+e93k+H2/Rv9
+lCmKGsI/8kkpRvGjz6FoBFM5VM2O32p74GLbig4TuOUyv+GjHofiaXRm7YA1
+Fc8stsKRTu22xbCdIPtE90xcF4ZdNtTmUOJ3C2LOwnbPFvZegnUW/Tl2Bay4
+f+2o6TQOxX+u1zqN3H/Y7XsJXKOq30rB1KKnqRunY7+qwtIxcIvlp6BuWJBr
+pGUA07UWJEXooN7Jtuh1pJ7hGEs1XfT5Qav6HBwY6NR9EvaJXfHwA1k/Q67W
+B9ck3Cu2Rb/yVxcTnGdwqPRPRg8SYYZylm8cHMIzOfQVDrR32y2Ei30XVXEw
+v8LELVEES4c3lZyCI8d61pfArAfr+6phKZWoeQUWrG4t7IJ9Ar8s5sM6tj+1
+FbBz3obv82HN/Q02vTBnk+XRHvRD36tu/YLU39gbn0X6l+x0vgALz97Vd4MZ
+rJnP2LD8nZXpRF3Sx+oxLejPLiF/XwPmF2+3WuoFFyuu8i7DLRZDka8xb2T0
+krvh5PqX/v3LSR5uTiEHYcFhpelkrhazDRJy3VmeWTgTFmUoj82CRSYF/LPY
+p4uprC0h9TJGOCRXxt9RJpb4lEfvTE4l33sv5abAwlOJrAUwbWHG40moE9jY
+r/IVz4n7l+RzKpwXsE6tlDy3WdwQM/TR5XifmQXnzdv2tIo8xxc8B2KfnoaP
+npiDm7KNVgLbLct82gvTLtYv/kzqPXMtDCXnsPpRtgmZS2vngl8wpaXldIjM
+IVE/HmCA7wslx57D6ZnlESI4wTxmrSn6TE/hDyvPQv5XHxyMgrmrhirmEm/z
+r3hN5qvLTeHAfMeEJYbkuY5yefaw8wODw1tgmoZuqxGct/tKWjQsZkl6Bsl+
+Qym5ZE6pJE67DOaNv52eANs1x8YfhjVNmcEHSL6DilFzWPhL7raIrN9T6/0R
+/Wv6LN79L3muxh03Usi5iQ/rOUHOQXVznhuZ16dURZ08jx3er4xggVFYbgzm
+446aKiuRc2ja6TuAfAKb63j95Fwc+LDcB053mTN9GE5/5RFVh/eKW7EsRg/3
+c2kH19rD4qsGMldS/+XxKw/xXtboNO/KIefYivbLAaa7e7qoot/AdycXt+K9
+5jE2v4uEWcx7Oy+Q9/6HW8x45CENKLq8FdYJ7zbMgFn0njYHuOnM1GgdOvYp
+CbJgw5xuMxM/uIUK93CFmV/EAwUw7YTMIYKsz2s4MwjLHTm1ZXDQ3I78BYbI
+Y5P3WFXye6Th/PZ9cGDS00BvWN1cpHsJVpg6DJTC6WF+typgfsWmQ9Mwn/Ns
+h53NMDfX/PYeOOcs11IKF7MjsovJ/JFx7q1wnE1fwwD8+FJ9ZSMs/u+QM52c
+x0GXSlJPwY//aQMzT9VOuQbThFnlVnBOEv1FBLmeUnVEG46fG8D2hAW3PzOk
+qDfV36h1PiylsyQXYF+r3+Ya5P7dagXz4D1a2ue/YV5WZ11BCfqPVpm6ugkW
+JtWU28D8lY6u1TDPwc0rF3nkWeauKiX5tKWe1oRdVQ145bCga3VIqBbOhxbX
+uh6Wxvd4d0/Bfvat4zuJ2SJHP1iq53ViIvanL7a51zOZQ9VvVm5YSuYvNLoW
+B+stHUw/YkjqjJ+/CA60lFqUwaJ2wwwlmE8f+UvFCH00jx9t10ReMmoeF46b
+fOfIB1jYnye5BLNiwsbL4T1TacpdMD0q5qIO1v8YsLOaNxu5Wi6zcYVb/uEx
++DAVR/2+AsuS077kwdIzfiE/YKcdzq/fwF2prkUuZJ6Hvx8MwbzKnsP5sL1b
+1ystY3jINV4Z89t9lfXNguP4JV9d4GLHVl86HJmvO3IOZqbzFdowp8njySNY
+2PJxQAnu0gye0gjrnZRqfEZ9QUdr9itYxfZv7mNigyR2CVyW9WTMVdJ/+U3R
+SS3yd0VwMQTm3/ilYw8zhLy0TTA9+dKK9+hPJI71tybrnWqWBMBiscv66TCH
+M6mmA/NR7cZcFZiWv8bTDQ4LPak1hLyKT7E6RMhvy/srjcOwwCss2QLW2Zey
+QQ33i15kbbTVwFyuzPrZMCt7Ac90EurvGvfbGZbPsw6fPxHzOt+feQTWrK+v
+91XH++Dv/7kI5l7OFokmoP+GjoIfsPBZnWINvFbV/KA98pAbHqCpwny7Tlks
+rPnsDw+FGqnflNoEJ2SVmurgep77axrdBPc1jr3gC28ZflAbAEsTK+rfwHFW
+Tok3yXWzcx67sP9jea5HByz86e6thf6SbRuDtUzRT+zRCbWwYiUzxw4WH5CP
+RGIedds9ehthAedgFUuDnB/3dG84UlZm2wA7WTx230ac8k2FQfJqkenw4HQf
+V43NsHFou+5yUv9tv5wPC47YKJmTesbZaw7Ba4OXiWlwnPmhp1tgTSPTetKf
+IixHby4cFLXPtxymNi53eI798qhZOulkvge1fhPh+BP9HodhlszK0wz9tiis
+gj1hzZej0SaYh+/OClpB1r+7f0cN8/uOyVe1J3lEe15sR557UjvDiaXf+m88
+VMX5KggWOJN68vh1yTT8PySEWekDC161Fx4fjzz0aq9Fw5zyItv4cfh+eFPi
+PXK9PlG9ZCzO8Qxr96+waGNTmwacPvGUy1zMx5eFnEtR4VDDuT6RQSRf2fqO
+tXBgdvH1SpjuVXBqAfxDdslVfQ7OxcjsYS7MWGM4gQeL29alpcNOvrruApiu
+z60ej/qRA5s722HOsWFmGvy1dqVQnwFP0zBciv64N6sU62Eq6Ht7H5xHNzoY
+DAsmv9LPxzzy8LrlCbBI2dt9C+Z1/uOQwVWYft7Me5j4baPFNVh6+HptFPKJ
+35xJz4Q1s2XrZbCN33XzOFi+nW+hjzxDVvV/2gv7/Buwaw45r0Wlq9fB4oBI
+PQruOpGWxiD93coIuY71xlMv2imT+0cOy2bCNQ47b0swjzzL/tMO7H87Pyaw
+FBZkblWcQL/R4WMrLsORk/PdT2Ae2UhTZRzM6mDk7ML8ZffuWoSTvM7SE5Yh
+L7HmY/cwOOFG5k6dMcj37TeDWHLdvOt2vxLOa5dGG6lHrbI+30oh79RxwSJY
+WvjHjLpRNsV6uXfeN1h09L2y3gib4iZO+NeE5OOyL6FymE0ZswUT/Mk8/l6f
+KofYFOPP2OzbJE+9av3Z8HCuX/B/JP+F4RO6f7Ep9bP905zM0P9bVSNtXKe5
+iFUTYGlP7YVMeGrR/DctsM/n3HQ+6lMXV1vomaP+3YLeuN9squzWpN7NsMg7
+7dAr9OOqctT7NLESrVcP/X/9R9uwCBZq89c3wzn5ai4NML3X7H0s5r3fOyHm
+IyxfoOVhrow8rYUd7f9f77f0HhwoGqchIZ6aoT8DecnHHJ1TZ05+3/xU5sE2
+devKC2Gf5BdVAbCeiVNlIhyZVDt3BRy02sxvL9m/zHlpH+oFHbWZvpLsn/RU
+dy8slq7fZEj2b5yhWop+mL8DE0cwL+eGyqaP6DcwfTKjDRakWo+pRv7cy8es
+62A6i81IwfzDjowjFTA1FOywCnkpYn5tLYNFvYrGPgWbqmH+rH9C1pv3vL0+
+iHyWKFm/J/d7nX575AebkvfqBg2TfI8wlSL68Dy8Tw0ySH/H12x8JmdTa9Wz
+rnqTeeqsaqu+san4h4OyKySPO90Xbn9FPzlREhnxHIO5W7rZVI7Sxw3zLFCf
+tn9R8xc2JVR6/jEUjjT0uqSF6zbb6sfWEEd03lLDeuc5knWTmVi/cunD3B42
+Fe3xeqsbzGk/PljTy6a25CdMuwD7dJR5mn1nU3GPAm49gaWcvQHn0K/o+LLC
+bzCdE2o22o88fs63U5+LemrmN/wH2NQeuaJOH6ZPql4nxPzcA9Sx2bBP1Uhz
+zX/IKyqng1wXvZw+4yry4v0t1JhEnGjQZPyTTQna/jo5QPafzLd3gWt+DzNf
+k/1XeUVNJ67tnl9E/KRtSijWx511Hj1D7rdXrwxF/celnyb4k/mqqCuzsL9m
+xJNGR3K/r0sDH/lLXmcUGcPUpGsq4ZjHlZ9cNxEW/Ezrd0X+jzk3v48iL5Fl
+g/F05FV8ZU3SMMnPMS15VyebCmLE3lIheY3Uz2lox/u2w6RIh9QrDln0WoL3
+8RNPYAdHuvF3ipuQT5hZ5w5yPbRwmqAOz7/60tEM4kcdnfoivG8F7pI3xGWz
+ftTcwfPsYzFJPhRX4zTvLPZL1VwSQCwYtV8YVEnlWU+5c4+Y/CSUUyrk05Lz
+P4Clt9A=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.703763748652328, 13.714402573074395}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJw11nk81PkfB/BvIkdiqgmFbZyxkpFopjBTUiJHl2NTDZUjRKWaQsYqx65q
+ioqu36DVqN0MHWSpKdqMFULOkmxb5IhEztrX54/fPB58H0+f7/d9fb/f8dHz
+D9+0R46iqJf4IUeKRn79wKWUyNGUS6X7hY5/0uVSoZEV2gUmXKrDtT3xKbwm
+kD0vABa8VqbHEcvSJD/AXbp2qwxhQW/VsfZFXIrX1dqQr8OlrkhVb92Ak8Y5
+F8zh685cpWg4aOk1vSvaXIr1vKXeFxa+7JbIweLkF8XOcIVPyOuABVzKNib1
+uSNZH3rjWz0f8TNWxrrCzVPrSu3h35NMf+fBlOysfqkWl5JnX70RA2tVspTd
+4AbnB+5ZsODOPdqwJuIrThpXwfxA+9q7MM/92/5RmJnYUngapo3SvQ3Rj5K5
+zfefYbrMTcEVZrLp2ULY0JRdFQ4Xfdi2/x58Ylez4y+wcNcWg344QsVz3yWY
+VyA9YYP8th7qpddgfiItJxlOCn9ncwHW2u6m2Qkzn/YfFZD1ipmmK9BPb+/s
+J9thlrMjMwXevc3y/RLYQ29uZR28LNvMbRj1sgq/aSuT+Tye01lA5js1McsM
+FhwKHgqGRZUbo6zhUM1Derqwh6+JtzFczuhn1xhjXsWTsknEGzA8qRkPj3o0
+WD6AvSf+jl0J8y7eX7Qdvrt1gdyEEfoTZwX2oN4Bv7HmMtgj+Z0kEJYonqi5
+CIseeWQ0on+lBeNmfJh7McbTDu69myDaA1Mzk2MzNbhU9OtPq3kww3BzpZIG
+me+5XwPh9ALnZ/x5+HtL0bZjMH/axLUROu7foTEVEl/wz8GGBLgrUynqT2KL
+EHVzeNRLwfJfkt/90kDPXC5Voj3/4GzUL7bmfS6Hk/JmBNvBThm6XkWweFTf
+PoD0d0nX+CnctV3fIRlOirFY3g2rGi5Suw5XKAVu0EN8Vc65i3eJ/WtZwbCg
+xX7TA5j1fv2cElh0StE+H67dahlKR/2+B4qGLsPN4SbpoXCo4E3uUTjiW0/3
+Q7ihddVSF+L4uRMK6J+3hD5A6uWGCXts4YY/9j6rIfO2+Xh5J8zUyJmRCNOC
+Ytv3wlqDH51XwFqxx6/6wjpne3i9hqjjaO2QFUy5HDUQwRGNlcsHkU9LL9TH
+G5Z0m3w9D5eY8NM04fS46HeGsNNU9JwOAxyrhu5nop81+g+z7sDNHcNTNLgk
+YY0wFTaRiT8ewXwiC0POCeAI/97Zr+bgOYjZXH4MDuLnmTrAQTZXsuNg6cM/
+ywtmI+5QtEYaLNyyiMaEGfs/8iXk+pMJ5x/RuNS7FEtJA8wPfiS/B2beXrDm
+G0wTKygZwEGpwdE/ot7aRA2nEXU8jz3ecZ6kvyVlLm1w1c1TMbFwR2G5/RBs
+eL33URbstMvlsw6uX5bysK0Upu1OCt4CmzRkPa2Gk9bGvLkML5452lMPezsl
+hffDkTcurK+CmcfDJGtRb3Pbt/2FMOvp5y/X4A6boAvnYbFe7plBuEF0OD4Q
+NvEp1mCj/6qxvItLSHyVs9cj4IbvBnd6yTzKPOekwUWuynrXDcj3YYqpCJYP
++ynai8y7OrzyHKwjeSBUhkWhXgohsK+ROrtUH/07dhmZwlJ2uN0hYsOUvGrk
+1/F7a7kMHv1hh8sO+ERFqtekHvk+8xO3oR8pqzeuBuYpC9xdSL/sIioPpgKK
+W3djXkznOOFlWLBJzdRcDednSjeeJ35RPTyuivc1Y9szss58rRvSMhNzaDr2
+6g+4o1+rt04F7zv78KAMFma8SB9QxnVvV3zqg2mnfnrLhjd4OfA09cnzMLn4
+rhLiGX095QCLfinM8IfXvJ+TGQ5Lbqk2OcL8M+fL0mGhVb2uL/yl/urqErIu
+OuCYqUTe9+zbTTBPkjSshviGVr+OdsGMJ7mDV2Ctl7a/9MOCwLtRq1AfX/ec
+zweSb69BxSAcUSv9UgdT2Z+PZ6Gfct/cxHxy/jG6gxP6Lcn4uyUejtBZtKIZ
+Di0fW+MCc7Ppp51m4f4lsX5TJr50tlMIi11SVj8m8zo6VXQTFoSU3Isk824a
+Lz0LnwjYKDOGI7QXTjnAWyY43q0MnKfrPvoY8ZNsa8zOwbR2SaYa8YBHqwcs
+iTrGskB9oj62WIucP99BxYz0U6zZ2rgQ54eUac9Ev+mp4vE0WMSZX9qiiPtk
+KbQOgyM2XFDLmoF6FQ427iTrstaocAWSL7cvBK6lIqxc5THn4X3bzsAdWtxM
+x+k45jh2/wUzY4w++8nh/oWbsRSRX2i4Myd3Gt7HqwknmbBIKM/Sh3u5shu+
+sNT/t5ZqCvenbWVFEtxRv9BDAr/yXUUrgCPyIrvL4cnnK/9+Sa6vUTirhOuj
+3VoTBsn54a7UIXhxnRtzOnk+t8qU5ZA/aJm6uTJ5/jZeGf8NVt0xHiZHnr8C
+HzVP1EtfPBXVj+t5685/moF+PFxEMc9Jvio25w94Q6mttYjM19ZTxx79N2/t
+/RoIU1aqOXmwmJF11Zhcb3xm/xhxokdjCfr3mFnQT8f8mq/O7TeApfob709h
+nbHca14S9kmMf/se5sOshSpyZJ8kOKJ4yBIesFJdvwPmzVS9H4v8ouPx2m3Y
+99C2L7ydiXq9NZqU9sLSKPdL19CP2NS6Qg0WNiw4EIv+RQkWqlXYB4n+3Bjt
+hnkNCOL8s7VJfLHY/BuHotIFeueJ3Wsqn01wKIls3m4RzDt3szxujEMppYbT
+y2DGqR2xEV85lCi6V34c5v44GJYzzKGap9E1VpH8U9Pzl37hUBHCpsBUHfL/
+x9afMcShmDerU3tgRmqZ+uHPHKpi/v0+B/RDWSvvs4b5Vy2eXYClivsctsFO
+X9PvtBO/+ev0G7L+c22FBubTMbvv/T3E69rT2bICplZ2qVUjX21Ap3gdWY+v
+LKSPcKigyv/NWknWDZYHRpJ6JXvU6TBv1csjjaMcSlqbNlBH8g8WLzIc51BJ
+OilmR8m8Ny0Tr0P/td/k/ZRhBoutbz7JocSu91iJqF9QGJxdBg+0/W79lcyH
+Htc1BdOGDwt2kPn6VE7UwUrBP+c+wb6IYlqI7OEgbl6AKSx98iZ+FeJLD2u7
+p5N95+Ay1lvMt8hrezod5m02/7QI9XUErW/Owj5IYCSaZoh+tPLMqtfCopZG
+hw/o33vtdJvpMDVxmpkwyKFGs5tutGBfJEi+3WXej/lb3z5RCXPFQTJeN4cS
+ysl/biDr/fXtL96hvvXT3o3A1HNH3VsduN/tvdbmJF5aA9ugFfnvFdccJPkD
+npSua8A8ln9pfErW77udeFuDfFn5Xbqol2K8W3ugEvH5n3wOE4+ZlXhUYD6u
+nCgZcVjM3t0yxL9y69VsMg+9D8n7nqN+reunnYnftPJn1GF+z3p8w4nfGnvu
+bORQ3HoZFUP8nTcV2Yb8fGOn/TBXRbuDj3pF6Y8tXMi+NJEjtPsHz9MG508q
+ZH1ziHzbv8hv/WwkH/m5EYsTjLrQ7/J9r1eTeR8JtBvGPILkilY/Rj/cvWtV
+TXpQnyoj2xKWLq4wzoY9ctL0MzAfaeCHTVvgoh813KewDxIs2fVk6UfU89yv
+fRfM9ZyI4iC+UEEaXId9j3TEyv0k8os0jczcYO4Ky81anRyK1/nkYRv2PVRz
+QJ/pKw4l0B/pOU6sVe9tV8+hGAV6/BXEfZ2zjpYh37VUBbJP+v9n4Ds+c7n/
+AZXP1VY=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.2230354724127457, 6.228068696807429}, \
+{-1, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{19.999999999998018`, 17.}, {16.99999999999754, 17.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.5, 17.6952}, {0, -1}], 
+        LineBox[CompressedData["
+1:eJxTTMoPSmViYGCwBWIQ7fP3PxAYODCAgYrD9j0SAo5yhg4MBV2fk8xUHBLS
+urLCHYH8FZsnucSrOPDG2kw5mg7ka2judq8Aqr/TN+lOP5D/YaPBr3oVB/uj
+pTeubAfyd0xhe1Wq4lB15Oj8F3eB/A1eZmuiVBxW2Ghr5DEYOTAkPGC8oq/i
+cFDoVNgHWSC/YvXC29+VHeQsVnq6mAL5HNen/d+q7HA/L2H+LFcgv0HsEF+e
+soPohtDibj8gX0COxUhF2aFGtThWJgDIf7Fi1bo7Sg4/77LIHvAC8jtWWC6f
+reSge9voi789kB/gaXEvRcnBUemR2H89IP9AfnedtZLDLhfv5x7SQD7D7ylv
+FJUcpss5sd9mBfI1rM4uklRyWHloQVPNB6D7DTQfSSsrOUTGsjZ9vgPkH/g/
+/7StksN+zvVcr88A+QEfuNUzlBzUBVv8bx0E8hPsLXfPV3JgV7VkeL8HFB4c
+7YEPlRzOnq++/nsfkC+wQU9eU9khPyAjK+cEKLwbk/8WKTvM1eZ4Z3cTFL6q
+R5ftUnaYLdbiz/IRyI+YMv3bb2UHVQ+dec/4QO4/I6FmrOLAIncvY6shyP+G
+GSyxKg5bt/NFfA8H8j0OHlYtV3GQ+w2M3nog/0J+PHuDikOb3cflHCsQ8hY3
+FKd7nUPo/7npcqLkR4T5zU+qN/zmM4bb33D+u+BBNWO4+9atmj51srkx3P2B
+2i0aLI7GcP+JXzv2X8DZGO7/7y+rN6jaGcPDJ/5jwFcRY2N4+B2Z+6uWR9kY
+Hr6lFvG1zfzG8PBvu7P3h8ovRPwkb9sisf0JIv7u3pB9yXAREb8f5c9ybziA
+iH8V2d+P7Lci0sfCqz2LHq9HpB8O71U9JRsR6cuuZ35C6i5E+vt/KGzb7lOI
+9BnzwnQl/yNE+i3bd+X6xP+I9L3YzCpBXMkYnv7vmXapa3sYw/NHmlxhrnKB
+MTz/CMw7nG01wxiev/ZOKZ26Yp8xPP+l2z1/v++hMTx/XgLnX2N4/gUAffB9
+2A==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.5, 8.354800000000001}, {0, 1}], 
+        LineBox[CompressedData["
+1:eJwd1wk0lWsXB/A3c0kp0k1XppQxKQ0y9HI1oAFJhohriAwRN6XSQYpQSolS
+HSRz6SrciIMGoiIUF92jgQaVipNIvv/+WqvV+q3nefez9/857yHlP3fbegkx
+DPMLf+lf5tcE/iiwzP//yLKMq4vq9eh5LMNNOHbHEi4fSH81U5FlrDPFlnPg
+hKf3E/Ngfvr11ouw94pjV5WV8Ly5h3AmXK1R9iQAZj/fXZMARwxpTC6D+WWX
+9V1g98FAgzE4acmfB+XgBY9KDq1UZpnFe7433JZhmfxwA5MAOMmztmgjfNLg
+/OpUmL9PENo6k2We+KgVl8NKk7+MWsNbTXiLH8NsYWJo4wyWKbP70NEBM43F
+K9bDFRU1yzrh4nr/yCZplrF68POPZlhaZpmxC3zihbFXNe0vk7o8Pp1lJKtm
+2uRSfdPkJl94w3N7oURaN3ieIQKb1FZk7IbduG11LdNY5kyQe6At9cdRKX0K
+r715IHsF7e+OeyiG/ZzuqbuUqb8BL3U/+MaqyqIZVP9VxIdRuM+9bu4UOGh/
+bOE29POv6zOxqTR/mpssD44bfuj0G+Uj0P+sh3ne/HX+tC6tp+z7LRc2z9cs
+saHzjvQbKSAPu+tyVhE0n8Ea2QRYxjM87CbtN7ly/jOs3pzw8SudX9mw9g/k
+++t6hsRKFdQfdzWMhhUPj3ZFkvW6ggphQV/2usdw0jnXZ5VwhFb89LmqcJy8
+Twn8OCrnmxfM19+yKgn209tbXwgrnYveZwd3+4Sf+AhLyxU5CMHTbD8cWzAf
+9xG2Xfgi+nEaSbGyh5tjfILV4bJ5um0HYI7iCzYP83VMdYpPgbkLP0bNh/8O
+nW59FR5MGD5yGfn0XvsZVkD1AiXOKcLL43sbad3tRtqVLcj3U5TU4TSYbxtc
+F4P7SfjgqBIDs1nvLvVIoc7lRcl+dN5Tlb/d4SwPi/5N9Pz2+lQ52MpE1V6P
+zlf+vefXVJbZU/NWaRbMdPh3y2P9ROTk8J+Yj9VVqfOBMwN2BryDmbg47ms4
+pG/hwx7yvwmnYnG+5FO56V2Uj0gMsxH9vZ4f5PSSrHD7gCz6N02vdhmivMpT
+2Dg43tDJfgb1M5x9fAI2d62bYgAHWeiL7kEeOp/mPNoFS3t3HemC7RtCorIp
+n+hTq1cgz9D3z6/1w0kH05hI2Kt8a4yuGt5nYyX7W3C4RvxYOMzNSi1tgTUl
+7v/3AE5yYNPb4H6T5kGZBchHNOvsHXi0y1OwHV58zccyEV7yh3knF+ZJGYau
+gRtmv/ynB06Sn970Fv3kXSoVmbkQ99N6cSAcniS1LdoIdmvdoMXAMywu+G6H
+k3oW+R7CfAVpZq7BMJOlX/kZ+RSU/xNxgDy0gPeO8svrdCHzm/i235DvGfOi
+cdrPcdrC0n3leUXedYPZRYdMnXFfrSdLAyxof27HxQZJlln1ZkSgA3PXBnd7
+w8Nz849Lkz8Iji2HFfx3+nxD/+wuB4lVsN2jvKYOmt88JjkIVo+I7aiF3Z6N
+LXsOL7G9El5C3vDgqw/Om16+zKmQ9r88/WMe+lm+ReneNVrPjB0chHvcH2dU
+wAzbtakd8+RtDPBqhZUEandrMG+a//A0ASw9pNS2FXmU/b50oSrlZbdrxV36
+PCxquecIWwd0Tl2I/ExtF11IhQe1Lj/dT99/y5N/9dD8mrK3ymF2ry6jro77
+8TUo58NVjvIRoXCzi1zHZzgjI8SwBrYWPjvvDRxhnzciqYH7qP9UxIOfKXbF
+28LsfIPqaPiOje3IadgtS/nsYtiva/qRRpgb7OvxEP1tmHX04Si8+ICmNvWv
+uqykUVET886vUi/AfO7pIwIDmB8j7pGB+TOTDPQsYKVTH66cQz7VphPtG2FW
+rT4+FXmyM1NK1sOcOUdNryFvv8xNQoaa9D56T3s5hWXG7ptuW0D1E1yGDOFI
+7YXJU8lH1zjUTmaZFd0jjz6jH05WXOV+eKMnyz6F+SXmSZ5weaqwVin1n9gj
+Gw1/KtlafZHmLTV1boVLAs6KxdP6WJeDDeo/sXRsOkzrAg+Z73CX0Y/jhyiP
+NwW9leivySfWOYbqP7lWlYb+lRsG3p2j5785FURjPr//zgbcovX8IfkgzC9+
+QzmnB+a9CveyQz457ye/mo7+rXefV5BBfuWRRpOsYOkpZlMC4Y+NGyMTKZ/r
+l5pKYWtZ3ul2Wp9zZvwdnG5VrK6shfdttE9RFPczfmimdCDMrjaqEIMlmxLE
+b8PcF1P8P2F/sODjcyFtfH5MWvsr4cDeZf5rYZ534HAIbDFH620UzETVO8qR
+lWMrS2H+s+shm9HvtLg3ZXxa363T54B52tbmyTA6qG+9rcMW85Yo7T4oCys5
+xFavQx47NE/Omkduq15nRu+Tb3qYAswvfvffBuR52GogTwZ286taH4z8M/YF
+zBaiekqiWuUSLFOzft3h93R++41/1OGIlre9j2E3m06PenGW0Riy87tB1q9P
+Ow9X5aY4n4HZ0xU5XFjt/PZP+2HOwOOcTvjs6rtmntr0+0R5vBnquSY7mW+l
++df2Gz+Do3ZbpWyiepeyOxLRT4toRqQN1WO7Bt3Qr3jzln5Xmv+c3Zc1mIer
+WLs8jNav5kYtwby27QKf8zD3jNPYXOSRWP2Vqafzava2foeDe4alJ+j5qnty
+lchv8ORJcxOaN7WqeQfyHX8r8Tma8vgrO6AL3jKRoPAYbnbffpR+XrB/WRbK
+L8L7lj+yQwWeN57rshOWvmPtTPc182fK1xswL3u+TS+eN9jTbzYCu/Ebfvei
+79czZXYrdennlVo5nV8l+SI4iPxcwP2E/uKUD6y6DLt9530Ugi0C+CV15BYZ
+gRDmk962aEsPeanRxxHkcXy/vvAAzD90NeQz8ur12ao2SOuJWapfkGfvCc/E
+97QeHDxPAg6yLNjXTXb2vmSM+6gWDeM8gJUsX59OE8NclrWxRTB728ZSBU74
+drMgCeacrtDpFmWZWTWdKiEwlxE91QAfWcnobqPn7QrS3sM1s5onTGgeI11j
+YzzPvSeXrk39XNffdgfOP/qkUZnOf+P7zBPnf5RvE1Gi80Y3/dJCfy2G4s7q
+dF7irIrJmGforyuhhnRemqTIEHzBVD/akZ6/772eT98/Y0GmUXT+97beOnwe
+Il8tFdyk9fbvx84gr6G7lgcpD0a2v3q9FMsxaA/KmbMY91M7YdaBfDtVx5uM
+yaHZDkbTWE76NsUcD5hruFAR3xccscWFc4/D/PAbPPr+0MgamFwMM6NSp42x
+ziR32rfR/oOv56Aep+/1nB/DMGukw5ijfm8tKyKrh/5+xvYdRT9x31r+1oHZ
+JTpauZIspy3xcqAZzNcYSy3GPLVrFjy3gblmahL5k1nODPese860v9v/2yUJ
+luOhWL7JDeZ9ixDD+8bZOhJbs4PMX52fLcZy9v/55xUnev72QHIj7qPxpvh1
+qscTdDrLwjsm3tWugd2kzJWOibCcXNcLvStgzpDqSg0R/P7o2KesQf2mWf0Y
+F2Y50rETWfLU31HjM2LY3+luEyNF6wfWiZthf9Uu7zYhmLnqp1GE9Z6ToTFj
+lEdYZpMZzhN/KOozQvl+mCQYE2U510QXzRuFlYR3aTSj3+akolmTqJ/DUfdu
+4fNwKNoymurzfsz3z8TnQT4n2U2R6qc82BOPPErXqvkvp/lOqdl7Iy+uZoC2
+LT0fu1pbA/evOvhkKJieH30xvRH56v02MnCG+m2cFmk+leVkZU/MuU31JoJL
+T8LFP6R9+bRfWaw7F/czkSVZIbYE+/VzjU5g/Ur9tUEtmH8izY6Fv0jcE2yC
+mQeGTTWof/zeo5ZA2O2hkfNseOnc7NzjMEfb/+w69Df7femjDKon5JXlhP59
+ZBzvl9B62Mz3jrjPVXrjm3lUf9mTK5sx/95jkzwe0P7GoL1r8b703xVa2gCz
+0V+H1yNPFYsC7fu03zHT0B15x/fM/lIF814WhqTivhJ/CW++ST6ZHy4Qwu9r
+neKrcuj5uZ6xkfAlkXW8VJib7TtgDNc0TPyKo/7f2P+nI8Ry2n/ulTtIvl21
+ywa20a1TCCJL1vlcxf4FwWNyO8k7XS6oC6POWYvX7lTfZPu/LbCKg70JmX9U
+xf48+rNQDSv0onny7Af2of8A868Ru8nTPhz3wP2/qTvXGEH9MJsvYn5OcV+r
+fzLVX6l+eAnuv+3UGuEiWlf/5/MkvP9yxx78eEjzJUtH3oQdXvLiB2i/04Zf
+pshbk7PvkfRS5Ktw/m4WPGn2jNLlMO+TrmQ7XFFZo+lCnrF4dits/VvLlGgy
+19zxIvxKr8UwB+Y23QhZBitJnbtVT+td6eqXcX8Zc/0T+6i+83o9PvqbRP+P
+18c++leC/R8W37Y1
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.994885276715344, 4.925732979470893}, \
+{0, -1}], LineBox[CompressedData["
+1:eJxFlglUU9cWhgMij4AoS6bk5t4DqSKlokSDrDIIWwFBHoUUQStjRBDahwxP
+K4iCgNWWwcoghVgGtXVoFYkiiAhCUygoolTFIaAGEQGLNCo+UFTeues9T+5a
+WVnfusM+Z5+9/38LIxMCorU5HE4J/rH//7sQpExM4+tj4EjyxfOiEfw5l6s3
+rcCcMWBcW4Pg9YlCiSwNsyqw4d4QAvOjUT/xlmK2bN6nNY0g+C0UGw9YAydx
+KJk7iWB7s+ukbxFmyd6lq28icO2dLyzwxJzxfOL7QgSbOrVqC98uAE7+z116
+jgjKFy1p6GjA3J28l+5kgHNdp9Q/C7O6a4vIj4G0w+Lca4GYD/2aFtNBw6JB
+dV+kGLPcYHIN0PBbzo3+AoQ5w45ztFEAHfUOiSvNMFvqJ91wF4B/5xWLS3zM
+0pP7O3spMLB9sqLBGrNKvflUNgW6p2OEsa4s+1WlfU4B1zO2KTeEfV7doeVA
+QdtNpapkJ2ZOQFThpxTcOcZ1uFbBrk8cMGc9BVub3is2NLPr59moiilomrjM
+HOxl46d8rjdKwSrp/opXasyicwW+6wRQ4vOy3/sdyzTE3hDAhmI9I+V7dn+y
+dP91NPyxbDB/2zjLNW47HtJAyy4zWffZ+PHrnaMYSFmrk/T+Ars+xwr9hwxQ
+3uvFuTmYjTKVqtUIQj3BOlzCxv+lOr0SgZWd6qXYkP2eV2F1L4Im4U9+Tr9b
+4Xz5VKVPIbg02F08vhVzd7ZR6DsE7Veu29NWmA/1rBX1IxCYPIhIvz0fx1t2
+NewEAlCdvH03F7OlamZ1EIL03oIvz3thlmu1i58x0Hso7eWaWZhbmFHDrQy4
+pR4LSe2dh+PdeyhS0+AwZD+dVIdZtKLNLJaGkBWXKp6VY7Yc00l4JADPpmCZ
+diH7fNLyK9ECGAs0GLBm+ZBevdckBcWP+xUu7PPSoATvSgqilh+YUXIGMxxM
+WBhBQe/RygHzLszqzx6ZOVMQqJ/XtOoZZtWe5G57Ck60LeEnzsHr45Sg474U
+vB85U9kuwqy6bJWQSUEYt9Er1w+z6Pbz/G4KeMlJnAWbMEs8Dtg4CEAdcMBa
+8jW7X//jzlUC0DN2FtumsvmI447Z0bDSsmdB+BbMYBHVc56GvbN2nKKlbD5M
+H3m4MlCxWDzlBJjVSuZIIwOSwSWGC03Y9wds6m0RuHsc4072sfs5Vz4zG4HH
+3d+sHcswJ0bd0OpCsG9qc/W7Nez9DUNBr/B5bR+eW6OLuUVHocuxgOl67Rjd
+8x/hfG2Z2DeKoDVC3KCIwSwXx6guIoiRO7+oEmCWhIsjExHYnvz9aXSPEMe/
+V9VhiKAwzzzPrQRzvlHtX6UMZP4ckGKzUcjWa+d35gw0pw03FzlhNqoefLOf
+BheHmdfDEOaMN1lP9Wg4LK7f1jmbfb5e/fo7AVC+Pj9mGrDfX/woyUwAbb6P
+5TnGmKUjm1/UUTCrKKMr0gqzShJom0DB5ZDR8/pumCVP/nFsJQUWF8dnCMPZ
+eDah+8UUOL3CcrVLc3+tncHbB4c175/63tj7VYvm+7Hrdi0tV2riy8sF/l+P
+atYXUlEblT6uWf+tOq9s++ea/TmeeyM60q/Zf12cOcS1afIz7ln17e0yTf4G
+woa3tMQKSX5Xu7mYHvxESPI/26nVMOCxJTkfec5Vz+WlluT8ti15V/ra25Kc
+b2j/YqXshQU5/+778w7rfGFB6kM6f6d8Xzsi9bPRt2Z0zipE6stHv2zwlzsM
+qb/TyTJuzi6G1GffRe7xP9wYUr/RB4LOuvMZUt/K09my4wYMqX99uzvyCFOG
+9EfDE3q6RsyQ/rFTfJs4EsmQ/hrjlLUkVjCk/2Sry7os+hnSnytbhr75txUi
+/bssu+XTbuxDH/pbGHxn8s8yRPq/xcAldW8bIvowe+GIo7wXEf2QBvt0vWH5
+//piH7BbMb8VEf1J1/1Biy5CRJ/iVGe9DbBuftAv+yId/hdDDNG3UabPtiCR
+IfoXa3IiwG+YJvp49pQ7zFhDE/0MdZP+0F4rIPoazw2/ZYbr7oP+xhdciMzd
+ThF9rtzmxisd5BP9FvnsOuMewSf6XufxmWzkKY/o/5T1BDMjj0f84cyRuNYp
+Dx7xj/Avlz2Ya84j/vLxr2MP/6nNI/7T6MZ3iZ/JI/4UZtKvMEE84l+Jg/9q
+7fTmEX/TDtZOdcnkEf8L6Rkt2qjgEX+ULvJx7dblE/+862O3Z9ibT/z1QYqo
+yW43n/jvrZ3inblyPvHnr/K+atl9lU/8e/3GQosdN/nE3zc1B7v0KfjE//P1
+0SonGZ/MB+qC0pHItXwyP+jv+c916RSPzBfy7eW58Tk8Mn8wrm+Llbo8Mp/E
+o7qm+1vNyfwyGZQ1Z9M9MzLfrPskveeuoxmZfxpzHC5c+9GUzEcTWcrwLh1T
+Mj95Vz/7WyvVBD7MV5OD7HxlDP8FAmqi9g==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.4452, 8.75}, {-1, 0}], 
+        LineBox[CompressedData["
+1:eJwt1A1MU1cYBuCb6lxjO6tSsKKgUBjUggWalI6wcVEUbTKsyBiKUiIKjSgW
+A6HiLG0E7cAfhuAqq1BAYZMfgaqFQRCmzFIrOMewDFa0Okb8WyfbQFHZe81u
+cnPyJPd85zvvzTleO/fH7qYRBLERLzUSzlk8viQxTY2rSIJjSC+ywfdl1S03
+4LjAkKE6WKGQ8Yvh7p65rP2wM8x38y5YKW8wCWCOWt+4Br5vKih74kMSzfM3
+7gyAnaFRledhMu/RMm9YUtY+sR0ubkhn+MBBizJPuMHOV76PguGTppnyn7mY
+v6nDLoHFs9aZMnhaL+7ZB3vqNCkymNA0P9HBVzWJHwfDQb/+I7fA82vqzjHh
+O5PXaQSfJLxZNaIX3iSxoTY/IRSunRO72QEnDPdN7YMlzBLLKOxMUmVXwQS/
+gP0AJm9bjg7AywOiw5/D5qVNnH9hR2TrJA31tdzPd7sEkIRuU3+FB6zMT5n3
+IWxoTN4VDstnoucEws3uL8gd1PdrY0b8YNv6Y8tUsPSbnkI3+PyUaEQPm63s
+opeo33Xn2hcmar6Q6P8Jlpoj/Kxw26s+owG2e4ojhmH10eVv0uAML/ec32Dn
+pddtPGp/wtbRe7BNdlYwgTy+Hxx33KTyy++3XICr36amNcILXT59Q/2/Cc4H
+l7Vwd3sazx8mpv44tI3qp/OY9i8ecgqmD3Kp+lXr2ddhuy3Rfxx56Io4Bypg
+20eMwBpYfiXBkQ/HqZ9Zt8OKjlRhDhy2yOLqCgdlbW3PhhVeIdx+L4zP9BI1
+HFNipRfCbRkVkWfgrp7JTglslmQfuQrnVmrmLoaVD9cWjcFJruXJD1aiL8PI
+QRb6vSgQzLbDxGUaLwruXGNv0sN0blnkIfjxD9VDX8LdHue2tMIlL42ZGlis
+3fPnOJw7bGIdgZXxdV1uyO94/YbhE7D2dKo+AmYPVugMlJWiehl8Rvnej9R6
+WlWsPBseGjr79T2q3t+Cjjw4KsnoMg1/y+8lVHCWJNR3KfonopcsVsAHBua1
+iOHkdbfWxcOlefX1cdT+RRf3BsN7mCmr0+GVGeF9NLjpYUthLlz8/l2aFf3G
+C42JGpjuoWKfgkWMrFIVLG0zimPghYbewkxqflj8XQZ1XhYsebsV1gp5cRbk
+N9HLcn+3vlLvdxwuPTmQxYQNv0yd3gIzn/5Ot6F/9YLxWm949dgn/Hd5XpKu
+mPHHebiy9/A2WJeTmmiHb/iMjrJh6VcFktuwvDGisnwF6jWVp5hhcVXIGAN2
+fpZgGIDZqxq+03jinriQc9gBv6buHY//7x9/8j9sjKv1
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.6318774622309, 14.558628882191854}, \
+{0, -1}], LineBox[{{17., 17.00000000000231}, {17., 9.999999999998607}}], 
+        PolygonBox[{{17., 12.9}, {16.6, 14.1}, {17.4, 14.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.9452, 13.5}, {-1, 0}], 
+        LineBox[{{17.000000000007276`, 17.000000000003638`}, {
+         11.000000000005457`, 13.5}}], 
+        PolygonBox[{{14.51826734053906, 15.552322615314452`}, {
+         13.280184249251306`, 15.293188945044921`}, {13.683281069670574`, 
+         14.602165824326175`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           
+           9.996694214876033]& ], {13.823799910437668, 15.984057296392571}, \
+{1, -1}], 
+        LineBox[{{17., 9.999999999996362}, {11.000000000001819`, 
+         13.499999999996362`}}], 
+        PolygonBox[{{13.48173265946094, 12.052322615314452`}, {
+         14.719815750748694`, 11.793188945044921`}, {14.316718930329426`, 
+         11.102165824326175`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.823799910437668, 11.015942703607429}, \
+{1, 1}], 
+        {PointSize[0.04], PointBox[{7.5, 5.}], PointBox[{7.5, 12.5}], 
+         PointBox[{17., 17.}], PointBox[{17., 10.}], PointBox[{11., 13.5}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T14", " ", "P2", " ", "N28"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdief/fggjhihjij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdief/fggjhihjij.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {0, 44}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwd13lcjNsfB/BnCG2Y0jLtaXErhSIl1UxapLQKU0IbkihKi60iDNowUYhB
+ERUJGVRGJVM3GW5SQnPj1iAJyZTo9zk//zyvt7N9v99nOs8508Ni/NeNoyjK
+jUZR5EkNjOHfXyxqDgGdRdmqCfjlcM7JDnV5OFqnURgGc/4NcpkNy1QukNeA
+QzKz/WJgc2tTo7YZLIp+Ykm9EG5vC4o6A8vmmvXZKrGoUbVewWaYvTNMpgrO
+yZu335P038cN9VJmUTy/wN3zYX5PxdVe+D33WsssuH2Ttub+aVhPKD86F9YP
+667TU2FR2l6Vn1xgqVnXmxsw9fb54FrivNkT56sizpaj3/fCsUm30y/D7JpF
+4SVwseeB9HFqaNf7vev/8b44ssgFVhwXE0hDPqkX9WZvgnfFWauYkvwWydES
+4dIF9C8eMCNYyo+EufkucRFw0m3f3EXEWvnZcaR/1OuhSbD5/d03EmBqeblN
+NdaPL53VHg2XB81P2ABHa37gLSfjd/+7QhHWjy/wtCT190x7QPJp1+y5QxGr
+J2WvhgdsNgQ9IvnnObBV4fQaxsw0uNyJq/EW9aEa/DJJ/cRjV2WqYMVYvpXE
+GPN8oy+pgFubEkfy4PK1Hz7XwvxzHi2esOSD7d1+2Py2TMp4mL0ieYY15i9d
+43Gh1gjj3/VEc+EMihF3BC5OtcuVQ7x9svmVa2EpTViQA9tH519iwSJl9xIj
+5M/YnNc9C6ab/HIWwGcuWEWawamNAcdWq7OoeZeYx61g4Y9xpUMwV3ze2A2O
+zB3o2M9AfmobV4TD5Sva3kzQgKdl9x6EGesUrLbBxRtcnW6Q/vczWY9Je9LB
+o69hd0lh1jhNFjXoHds/Efnk/KvYaQAz6BXJFnBqqJ2FCcxLTtnnBYsjxlqn
+wZxCx5IIWOjGDZJgvsLwxNFYWP/U47VX4PZdBRO3wgKvv+NWweac3P5wUt/N
+/M7xcMZuveQlcJJetH8xg8xTPNmAtL9prPWGGT/X3uhHfLz4m2OjyFeFKRop
+h2NXGe7mw+nth/5EwSZXhJMPkPrc+sdaD6Y8vIo3wqKy7BCRIeqhoGyzHi78
+WhueBke+Lo3fDQt9AmdYw6L5r9quw6/jRZv7DVgU63Q3h6zX6ptcdR2W5vC3
+hyKevqaPVjthet+y0E54KUMzwR+mnFTp65HPrh0Bp+fDIUF+O0Zh25QpWiZw
+8ZYcuXzUi+KY/j0DFladeG2thfGrfogt4fLa4SlPYBeTFyOLYcaqV1SgNvJ0
+U7bcQNbnBZ1uhQW7p1pkkvW5WVkLdZD/6EPXO3DS9KH9h2GVSaq8btKfM87v
+Acx+XeaniPwERfd+t8O3MiLTLeG8WLv3L2HZnjd5PrDQYO+Fathll7dbBByi
+KJTNhJOKt1RuJvUJtf+5BJYeeXg6Cs4x7Zo1jHgKA+Kcgkj/kiJ1Hqwi/+24
+PWl/eW2PC5wa8Hq6MiztveTTh/wYjXaqrxEfJ+j20gI4eHC58Rl4TkqYMBge
+MH+RFgAL5jdFzIZvfTLkTyL1dLXsZMBz9EK5/Ol4f4LSFi34fZD/2EY4KVym
+dAFs5DT8ShemJ6/M2wazAnd0dejj96PJjnkEUyJqRwHM2WH1bDbi42dbXd8E
+i4QJzGtwe+OZcW7wgEPRYnvkyzrgEmEBl/OW322F9QcXGhvAOQ7r/9uqi/jP
+Pv5uCLOi57ybrIc6Ri3qsoQjCxPbL8ABrTnhHrDgzDKeKp4mhSd3kvXsRb/V
+/fAc/dV69xhZf8rNx2l4xrd/WVeNJ8U0/esSniqdLwokpP291Jn8/4B8a5IS
+8nNZbfCkAS71HDOzhgcUetXq4IxrDn/5wfbCx2o34fQz/o7hMHtJx8o8eI5P
+/F1Sr4HY0d54WLjhrxjSLn3w1tGTrMMIf+YD67/9pqcL1w/6Dc4irjrzVYx8
+mm1WZ9JIfSsVdh6GZRSzPgpJfWy3HXIkjirrPgBLhHIe4+DCmHc1DrB+0h+z
+V6iXvl+zA5mH4bWrqBGWnaJS4QRzxsKm/QOLdLZeL8KTw7947CeefJV3n5Tw
+ZChf+jkf/fiDk+8e0SG/x6Cn2XDSroQ6dVhgLo4dI/Mo5XXcxXt0eT44xYm8
+p6FD1fHwYIlJ3iESV2fkeA/49fxVV9pI/o66fxbA7vcrQ4yRF6Mp5r4zTPda
+KdwG848cmLoOZpsuH7kP580JvX6K/G4yFFz+kLqd6GeL4eiyfjcb/E5zynon
+WiKewbBQ1XVw5LkBi4Mk3hczPQ7AvCMM6g2J9892jVOwb0vaTXPkV1WUGMSD
+ZZ+2CWNh3/mRh/JhiZKVdyGc8e3EQzKe/dhTqw6OZH+/vhF2N1KSaYLLt1zZ
+40L673Qcq4RZbY33NMg+0TaDeQg2kThY95HfQc3OhU6w0ZY0cQ3cbnO2RIx4
+JD21pVziS9Vbo+DIHt2IWJKvTW1iN/IT0q5yAuCQ36UpXrC4p8faGWbdLP9Q
+jr8rboX2JEeY41a3TRku9G8Y70banev7E7Hv2abKHV8FF688TOvFvqhv35Kw
+h8z/weZVBBxfWdFSBouctAZ/YF91v3HHQAILs7TEBXCVs+H2mchn4IunxlqY
+NfggaDupp+R2jx0cUODLqCP7ZuLfnpYwNet5nRL2naSljrJOsEBjaMMasg91
+OlzeAEtCjE0uwWLjsILzsFS4PLwHlri3xX2E6WvlWrXJdzr11h97xGev+L1k
+MfmuaP4+fRyO1Bi4sg7meJomke9e+xFP0wRYMEH9hTXyDe45appMvsP7+30S
+4FSnE94xsMT7ukERPJBd3B5IvrsrF6+pId+Fh6ty7eAk9W2aD2DZDm7jNPLd
+y9HIJ/0j+J9VJWQfNj+yaiss8r+/4h7MObfHxJCsZ2OflgnLehWNq0Y8t2gn
+U8g+zr82j74Ipj6tmbwIZjzkxlciv8Jk7xMm8BxlGV09mHv0CUMTZl/JPZSG
+717p1KuTGbBvQVjqO5xDmt+brTCETZy1n3nAkW5sS7LPF/uw5cg5Le/2L9sw
+mPrz3ZJJzml7d63nwnTpo6MvcA7iHVut94yM1zqcvA+W/FXvrob8Qj6naXnC
+u05rhIaSen28HWsBt17MPnsd9r2kY2FGzq0u05T+kHPQsGMdE+b+Q28g5wb3
+V+qJm2BR1vK+bNh2eFPKFdi9P3DoCSz7o2vuD1iQsuwuDec8d1q56xLEJ7OW
+e9AUDunxpnjknFn004WcizkOr7K+w0l5YfF+cKS3mrMjOZfur3Qglt46+moH
+rK/zaRPpH1l9uaYQFsRFhpvDeYor7fnwnA+qSgqw7W3XGxUwe+jT825yTtrz
+tOQYHHHdeFUlOSeV5Y2uhI2cY7M5MHX4KX88HHz88rpgWKpIs8hDPMHfmh/M
+g/lR+g8Z5Nx7sd9dhYx3UX16CPkZbS8J+E3OedOFmwdwLs2Z+7b2K8wanTPX
+n5xrTZok38g5KTBw4JYy+Y69TaWRc6xPZpQuHCzoOK9D1r+gocrFPSN15Hq1
+G8zJ6W/RJP7gW7yT1FPB93Il7imi2k9F9+A81fWlUbAsSzGV1HeAJttgC5cG
+ZfC8yD1CgXN2OpzaoGxJ7jW+BqdOGcFU5FmHj+SespUvZsLao8nt88g537Ek
+JhbmmXU7JMOyptOdK+AQrdIft2CTvfnpFOKpN1j29T9yr9q0tGE5fGY8VSRv
+gvbRRa6lcHtqoKYBzI7fMfsPzMlfMDoTLi+t+uiKfAPm3T1lQtqvPmXvgZuN
+QnsZMOtbjepFeGn3tY1/ML/t3CVl5bDR/iTzThLffUl9Iey+SLnoBjxQm2hL
+xqtkhOemk3j9VUwcYE7Ryo8ryL2o+dRQN9Zf+tYpbyYsYDfaboNDHvYkTCD3
+xOftuf3Ij/WnS7eX3KtqZU8Hw8X7qKbn5F4yd7vsvqlYt3uBbRO5t5zfKXWd
+gqen16kWUt9jl69Pnoz3/tVzn5j0X7C+4D8Fsv7Jf8dIvf1ebGqXx/oad8fI
++qyjkt1f5HBOPk7LDCf3rufau63gW9+yygpJPsOmo5dkEef9fvpn2FfdeK4v
+3Gy/dIod6qMv9WqfBWcEP6/nkHp1rVN3gqPTKh3bYN/90st7YfpDp1w9U/wd
+mB6kfYZFJ6arhMHl5holiVjvtZ9/0GmYJ91wgYH4ZJqVExtNyTmp6kU9XB6Q
+RvtEHFtxNRb59D2qNR2DB85vP0JXxH684l3tBDOsF9UQlw9HmA27kPYcy8mJ
+NNTjvXDL4z5Y9ER/AQuO7br3/SkcGzEuwAfmiGZ8vQpT+veKzGDeu3yPVBLf
+ggt7RZiv8Pblp/5k/c6qRieYZx20zZj099d5lUbiYa80/IV8YyvfbzyBeH3/
+UbtG8g+ZWs86iPzaD3SeuEc8w7djNfJ3UZ46Wkzq01H02WgS4mqN33UR5j3q
+GOydgP1FvMWwhLS3bDhZIYP9L9o1WACLXV2n54zH39OIwuduWCC/Qnp4HN53
+bNiwEuJhGYl0SmnYr8oHFJeSeldzBSMU6vtO2yKbxD/pzn874TPpRl/bSX3W
+rJppBbfGbzs3A/Urr35ZrANH5Dd7bzcj+1b+54Wwr6BerpbUd65YlwNrW1Z/
+k5uJfIc7rH7Bo5FN6z3gkIw1bhlYX5reqJMGl68xlrNEfM2TjN1KYV8Oe+Fb
+OD1g6FQT8ZeD8znIx+hNQlwnLEpJ3mmIfOvXTfj7LZlvG8OxCGb/WO30Aqab
+vpGMn0Dug7RpAjI+JeaoDcy2Mpc/T+KJGWbbwbxsuY07yHy6J2/KwmLKvsWb
++N+U4+cxn++sYZXpM0n+ndsnwgyum9Ug8hPFXfJdiHgY5SP0v2FW5L4wN8Qb
+vHDBlmJYfLCmZzby027V5GeReiQY3KAhf76j2kAKTHXej878zaQGG44f2036
+ay6brPqLSbF2taZzYN5d2b03pExK8l1O/jycqr5VIXmISbXyDAUNZLy04U3K
+IJMqfJZUKCXr03rNXn5jUoJ9avrWiFfwpM834yuTap6qpUXyY73caFM8wKTq
+b85VewSnlgx1z4L1F09YMs0c6011d9GDRzmT60NhQZOWaxzc5xHCLSPOWqOs
+j/lGHTN7v8PURxpPDevJRg9bWFlgPl27EJfvTErsJ2+3HqbEG425iK/v3OWg
+LNL+csTwyw8mpWj7LOYKHDL77STHn0wqwNNHWgmzju2lRyFfWec29Tuk/e0D
+4zXDTCrk07Lcq2R8XXb7pBEmlc7d8ewYrB8Y6swmNvx9eyssDgh54AKzuhaf
+XUL6m6qsf4zxlFRkpwMLls0O7ML8VcdWx34h8W8zfpKD9fVjGufVwalHJra9
+R3zsst9Rp83Jd0NxWIJ8QryfPNhB+geocq4hf/2l4YfCic/XFRzvZ1Jz5J5e
+XUnqc1LT9sIHJpX6RG43m7SPKIXfec+kImMza9aT9os//GliJhW83OXwXtLu
+3xO38iXeh6fTihJiGwdRwlPUd4LPSBfx0tKSrlq8P+tJNbqknkOGrLwKJiU6
+9GjzOmJ6rOKzkxhvnrj9BjH5l1dN0clzFut/TP1DYw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.684589195445786, 6.720523577306384}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwt1gs4lGkbB/AX5dBxQihTRoRknbXTonm/SqTkkBWdDDmUlUb4UmyNqCQk
+20E5NBY5rCyb1dhNjdN+o5XGodi2wxRFtBrWOh++/3N931wXc/3e557nue/7
+ed+ZR9f/mEegPEVRz/BH3v/3YtLUPPJuTFPczSYuk9o0lf8wvbJiHU1Jip5M
+/wFHVzwMCIDHD+oyb8MZdNPzlTDXuuQfZ1hszszvNKKpcrMGOelKmmqWsVdm
+w30duk1+MMtqg85RMq549ZeOFTTFe8TQ3g6zwpaP2sOiptcfLEh8SvrSPC2a
+0vqprM4QVt7m3KwC2zkleRjDaT3vXp3QpKlYy7rv2TB3OiRnWIOmSsdcrNzh
+xJ5wyWl40UmhynGYl28ZxILLQ+rEGXDXnhMeL5bj+hpBcx3JZygosAxmGsc5
+/0XymZVuyIa73vSFL0d9UvcjOndgUf/2VDbcNTzG+Q+s77Xb0BMWTbhmzMAB
+b4+uDoKdFNuNHbCefo2KOBTmz601uQln9KfOkXG6N8xuBN4aKW9DPq/8nF/o
+hnr0H9ZEWMOsPeNFRTBL1OunDBcxtCtG4UWeVexW5Gdks7XQBv3Y/7j95zT4
+sGmDgR/s1nRdkfTTaHLfvSj46qZ5ZdOGuF4nfceDRcdbg8pgraLlp9zhl8bN
+8n6w9JZ/jCacpmC6XRMWawkNGrCedOvRZ+0G2H+13H4f2KhGczwDzoi1cXyJ
+/MVD6zMPw6xPTvmu8GFn2/VbYaezTcxq9GPn3aDzJvC4fcO/VsN9lNywLsxr
+7O1MUMf9cXq3pj4cvUaQPqyG/QsuUbKE6YPyklCYcf6kozNs1FPpPa5KU+aa
+atIQMl9Rq8FNuFxv1YkrJJ/L32zwgKcflob8Cstc//JbC/dY3Ze9h7llkzvU
+YPVIP/YS1CfJ+3OPNpw1efuSBcyv/73cFu6qvXbMBe669tw3HG6YM6vzhYVs
+u2NCuPRkdnsQLFgnXLEI+QWUh58i/WP5/lshGC6qjdd1JTZbeqoeTrjY3WIG
+e59KFWqjXubUFb158GH5vSYhcFr33O4nyE+oJ7pfDJceL12RAps3qn1+Bkvf
+peY4wH0mMS4DMK+KPjSxFuvsnTzYCydUMXV/IF5R90oMsxzvFx+AzfUDay/D
+fSesG9WId9tz7OFPg4uXSfTR33nTv7YjP+sHz6RXYbfdqj96wT0J36wJgJW1
+HU8+Rr2hXrJtHJhSDDG3hsUNyRaG5PNy1/xvLsP95N5pwoQzLNva5xjYrxc+
+vav0yXXOxqPw/gu+J9bDjNGmj0+W0lRkwavALTCv8E1J9xKa8qweeXQITgu/
+Vq0Hex9hmybBrPQU1tXFeB6aChmVJP61ZjEbZv6klPOarH9/7q4qbJ1sNF+J
+1HfOb6EuzDBOSjWGeU5OJlxY3aD5wTaYVcqzeQzbFQSH+MD8O1Y79mC9hg+u
+3VxY1uH1eQa2G3ec2Aczyg4dv4d8xxdPLXOGheU5GzegHqavmel6ODoq7l4q
+bJJV83GO5Hc74sorUu8Wl8gmWFotLl+F/kS6msRfhLmP3uc4wwGyfrvNZLzE
+v4ULs46V6YzqIR+5mNoDsCDuaHchLK5rNaTheVtP+uyFM77XH1SC8yOfOzOI
+8yw5VVhPuX/cq3kN7ler36NcYKeWsI402HzAW+575M/XH670hVne8hFJqK/5
+umnYVzDPv9XvIPox4urepwuXV3/qNlqE++WYVYQGidcZO/PPAvQlS1CnScwO
+znuqgnoNPwzpwwz+0pV1yuiPMj/VjqzXZZXyXAnXBw8V74clF8wYy2FrH+3B
+szA9uFAUr4i4WxkPS+G0rnOnDODE7pMencTZvT/Ozsc641u75ohnX7kvxDg/
+ackNPdTL26kudYJ3Xp5aQsPmDnLpFXBpjpbmbliiM5xpj/X4QXpjpF+sYGZy
+N5yYoxrrBQuyuL9mIN/owmBFBxIfFtvsjnqkyrevGJD5Sh5aKaDe6PnBlVNk
+/bk+US7Myrx5sxHmLm3V11tIU+yLLsPnSP0eCaGnYW///LebYAHHLLQUzgrf
+1j2si36mNakXwT2PH9zNhyUqF8rDYMm+hap7YLeyjQoULGta/GIRzKrXdTmI
+9Q73GRWKWYhrVTFPRX588eu2ZGJd2YnryL9j+oHHPtjtXHvTGdSXXzEisIFl
+cWF2nuiHW1xlCZO46N6b1ein9QrNRgbx3R/YAwr4vp8xLl4Gl9tJ7zfI47lu
+23xiNSxa9si8Sg6/L/uCasl8otue3k0UTSXbB2d9zSLngUB3RVhr8ZOqGJjV
+cOP6h1kOlZx0PrIAptds5xnBkSrLl0iI/wiyfTbDoZgpNRXjJN7puOIATNtY
+FTBRr0BVe9If8Qz1dUEbSf2OAyUWcxxKuXGbeCfpz5ctEj2sVxS8cunXMP/l
+KxWSD5XSJu8OixLk3n2LfHs+imc5JH77xNwG1CM5YD6hS8wN7ewj9RUkxY+R
+fl1rs0xE/epMaX0tLOV6Vi+Yh+fadUHwWVKvi39IMNxRVplsCwsKNqncgKnv
+FPa/0UH9woiIq3AGQ4naokOeF5PX+2Fu0pM7havxbvvd2GfMz40veq8Kp03k
+9rvCIgMLhaRV6P/0Joc4eXJ+2CxcBkvq22qTkH/f3vSxuzh3sVb2jkaivr4z
+Zx/6wdKXq95+h/5wp0KHTJnk96uet26aQwlnlBw0YHpsR17tBIcSuI7baJLx
+vNu+EWMcSrR0ZIk5GT+TsM/zHw5FxZjMHID5Flyt6L851PjuBZbZsGij5+Tg
+EIcSbyhmfCTjT1MSGmUcitUzFGCH/Lh3eusV4OgWUe4VWGRU8MrnM4cqcrbU
+64ZpyfS3p2HB9enw9aiXSr+kaI147+J7CYHE2eK5OTLfxMBUMizY09CuNgw3
+h3nlwHzZsdb9yEcYtUz7BokXipsbRziUUazdaBRMR+Vps0c5FDu+rukrMn7L
+LT8L9cl6t5d9wPpU56mhl+MciifP/hBDfNdvUw/6Iaqsrpsh/Xg6ECaYRD4C
+41geLLg83Ss/xaEylO/NdeGcKtUYtpeD+QejKu1gfvLaimuIlwWq2ObinEr/
+nHn8EeaTcByNF8HSv3+8exbrMTTPNZ/FOZWb5uDVh/yU1wVKVci5taOtZgb5
+96UbcgtwjqLUHEbaUS8jc62HNywINZk+jX6IhWX5+jCfdeT+uk/IP3FMYyHx
+JcP1Pr0cKjHc1JyYkuOZ/PIO/YllOegRd6slyl5i/9KNk91IfGquQ9QzzHcg
+cdNlMq6n8eXFFnz+i+ONL4gtA1zXNGLcdVD2BfKj9gfNDtYgn3O/2cQTi3py
+HYXYT07NZ3IOpxZc6LSu5lBa/QP5q1AvFd5vYihC/0fXOnoTR3ylEf4b+nvE
+k8cnno2LnMV6jI6J6+kw39d2W3YH9s8nlJ1MnMd22PQC/bdpGf2GxHukdilI
+kc9232IL0l9127QW1Cf+HHDwNdanzRbt8HiPeldf2RVJrCHzCUQ/yiWn60bJ
+uVWV49rdh++P5DMDR2A6tKei7CP251BKRRvOpbTDyQM/wYLDVdEbiA+8Pv0O
+8VrFD6S3NMh+nte1x3zCLQNx82FKvWvb4x70q21zSQw51w8nns98i/gq7dXy
+MHXuQ/T1P3F/lFu9ycK5ifpjb+ZoG+Irnk7vIjY9s2tXPfZvl+mxlcT/fzHI
+P3X6v0/i0Lg=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {1.6402550371571483, 9.170599194669919}, \
+{1, -1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{19.999999999996135`, 16.999999999996362`}, {
+          12.999999999995453`, 16.499999999996362`}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.407378835015717, 17.441896309779956}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwd1XtUjGkcB/B3KwltRmwzk4aJMtlNJuWWUZM6mZkucimDKElX1Ipt7Iop
+o600bWZJlHTRqlOTjhhhVOy0km5skqnTJksXZHTaNdTZ9vv4Y97nfM5zeX+/
+7/ucM9ahsZv2GlAUFYEfGSkGeSzlU2wyzuNTE/al2ZZwXxwzJhXWHdg64QZT
+qvj0qfP5VOmc9wdi4YIc/0kJrG52uX8F9t9qN94F21/fuG+A7I9462TO5lOv
+44dFFlw+VbWFJbOHz/xzNduFmNX/wAU2v1N5LBjOWcbu4sHciYoXJ+CuZTIz
+J9hUNVL8G5wqaHOfBxt5D97+A6Zm6I9M4n0dO9asegnrlNw91+CU4bTN48Ty
+h97bYPGSmoNmjnyq/dmbWj368ZzhxbWCpZL47LMwNyIx2AbmfqV+4Az3rhWa
+cch6oc/SbhafkoiKZGS+gJW2Uw6LxOfcWTBtdUb4BtjqHO3fWWT+7NybNvDw
+kpOJhnB9a4puJlzx8n3HKOqJUww0m8P13FDaC1iaPWTqAPudL97QBreba2N3
+w8ZuAddq4aw9m1TlZF5t4VMF027tvjod9S0SL2aWEH9TvuEn+MnRaWMXSb8j
+Jx5/ggUe+zJyYf5AfU8S+vf3oELy4cjDXtunIr/e9a43vuRZUX3dF47USHOu
+w+yhvJTTsPNf0u4HMMO0Kr4dDs9ypfeR+RjXzSbWOLferWoCLs0xXr8SDjz9
+qYfkmTXwtnUH7MNkV7rB/MAnXYfg/moZI4zkk9L/KAnOvGxJpZH1wheZybDu
+vNJDCYvnL09LgA8GtDa2wfqy4vzdMC8t4ef3cCrrne06OMxAd2bGMj41qCvT
+WsL23glLFsJiW+rRO9Qrux+oXg7HhX1wvwtncwz618FVTM7VU3DRnKkSEZxl
+yZPvgPOMixQ+5DzfX9cvhXlBg8eFcE1MG3sabOKYpXGHpftHl3ciz4JZEosV
+5LykSxol3LTCLoADh7h7JuTCAkGe1AKuD3j+rgBeoFZVGpH9MnlLLUwzaJkc
+RT/+dh9vjcGdzg2KfnL/LnxfwSZ5F6470gH3tfhwN8LJr3ZWPCT3LZgSp8Ps
+6mCD32HBjfaVTbBEOWx7j+R5k37RDHmk3/2QqSH7yw/bBsBWgobEFnIfmZ+3
+5sLSyzH6bnL/hWvqeuFWfUgTyZdtKjRkLeBTu1bdSzEh+QxHGmyBKxIaMmxh
+O0X2QBLMd9hr5gVTWu3aEli7/SkjCubOVk6qYYO6U/lyYmt1YSPcERKUfA02
+2aVkECv61hR3woxfzjy/A5tHfDuohyWj859ehmVbHnoznJBPdPl+GUyFWw84
+watKiiOD4PwrnHERrCv7s9sBvt2Rpw+CKd9Q+n/oJ9lx7GQU2W8cKW+GjdSG
+J+Jg2sd5NXlwx5vA6Qdhdu7dyTjYf5FF3AFYMJtW6A27pGW6hsM1U3rOOsA9
+Zce42+Eshol0Lnw7LGyxN2zyNDRnNjystbJ3gUtltYV02C96tb8dnPr3UB8H
+bpz1o8oCFvtomZ6wSPX6qDGp38ZWEQMbNxlVk/6pC5WMi7BeVeI3Qu6XnGf+
+jJzvqLEehLs8o9Lp6Jd7vPvxa7J+oYeA5KHhzHk8DDdO1r0qgtm+mdvG4NIG
+06FBWHJoPNoQ7xsMqOz9biHy4xU20eGuz8HxUbCXXjPFkdS7LT/jEswrC//B
+j8zXde9qhrnRTFHsl/rjpSNw2GhVuoLUX6fQG9ngex6LtLsJ94UmCmfCKzrp
+U3pgifzO4a/h6eR/xRn5k9GG/z/9qkJF
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.23789659515192, 7.38794612872654}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJwt1gk01vkaB/C/NdlfJZXtlW7WoqERkr+8OuXmpHJTpN4yIRUp68TMv6JF
+hm4RIpRJskXZalJvQpEQb0KblGgaRZahqPt95lzn4HzO81ue5WfR2xG4fqck
+wzAX8UnfGQn6Ysgy/3yoskzzX9419jD/Q0HJWjjNQbUkBj51ydcrFr5eO6Om
+meLGcwWFsLGtQZOmEcsUezrllcObf4uN9YVbBAN/XoJ9mUcVxbDq3OxfDsJr
+fYLMR+FTPOHYUlitRyhpYcwyXH6r+K4Kyww0m0T7wQw7+MeAMsuURZj7JsLd
+ZyoWf1NimZUOr2vLYNG/9w9NKrLM1l3xCxtp/98Pw0YUWGZd3arspxQ/4nzq
+kzzLTKzKze6A+XN2vxqfzjK/W0Rot9B5j/wD5sKOEbG+d2j/9GI7LzmW2dCn
++EMu7e/heh5MY5mPivrBcbTf0srSG366cvfGAIoPRiiaw1qWAZqudF6mhfZi
++Kcbn2UtYbZI9eVOOKpA4KRF+4+uPf0QTqk/2CZPcbVsH7qvKK92lwScVfD6
+0kzk05WU6UfuLnKQfA8nyjyqV6B+HJEebEE9FfpX1fXovLxrStWot6M2yMuB
+PBKaVIJ+bGx0sdlD5znda01Ev2a6v3+cRfexNsnb0c/73jmvXtD6x91XlNFv
+iaM/V+uZoJ7+DpNEuPdeZbw/zIg2ffwAx/gr6JfD/LQ5z+Qwr9zSSntJU8wz
+bVqZBL2XYYvMNTB/0s2I5rc/66PyGVh0td3ZBf78afOxNpiVcnQswP0Ku9VW
+KC5Ev20igt8iP4Gu4yNbmJ/d2jeF/Ocf26O5HRbu9RyTgPmdPfEH4Szdmz1f
+UH+z51HmJFlTb9cw+rMlY8/dBNq/Ws15DP00bfBLjqX97KhYCRY6p5ZGwqzE
+4TBH9H+bl3ueL8WdHm3MlGWZsXCNTS6wSN9jzAD+JX203YzWx30dfC3DMtYv
+G3fwyFd+q2uG88zEDiNUT2W+aAiu2tqQ3wV368d9csJ+SU1RSR3Z4F/2D+AX
+sscNblI//K5n78f9GweqE8ppf9ktTzvk59G0XaEKzqq4LdBFPYWP17k0wUzg
+wHJl1Kv9vOP0nxS/K0r7DrvsG8uifDjrc6f7Mf/slt66FTBjfaL8Nvq10Cun
+l+rtDjLwC0d/PR2XRt6m/FtLliuh/9d05SplFiF+8bV3KMxtbz/uCouMzr0s
+gsUqDhXpFM+zqb8O92dPTPbBQjXHoGg4Y02GtrkZ9gUObZ0Hz+pZ8H0/zFeJ
+EfwX92nu7RIVwVnWL5+0Ix9rq9bm1zA7YRH7BfkmqKtHypjjvqrjzjIKLFft
+xbsxE2bkNqtKyLNcRNT6EB1yaH74uBzLlSj53JsHsw6GrmPTWG5IymBID+Yb
+GmvLwIG7/aO1YOHZloJF6HeR3OolM2h948Tlg5iP1V7BO1myXZnlsDTL+JXY
+LBlCPsLZP+aeg52en2hvJZemrgmBec+qR0upniVTy6Lh8+taW1Mp/1X+m+vg
+m7VlCUeovvs6G5bi/NRpFnOCaf26Ky1iWHmJmLeX1ve55iYiH5d0JVEg3O3l
+vCgQ87/j7spEwYy+zxkPzN++/oJtEsWVF7quwfzd3+p4V1J/h7uSrTFvleT0
+wV6KH1vbpIF+DfqbhSqjnu4rA1+fo58XdMVfF8JZrmE2HPqdkvO00JXcyc76
+oshyH0eN40NofWbSK4ESy1Wc/HA0jeKbxP1bYFa8PPQuzG1NL2Lh+SeLbd5R
+P5vd+gdxnnpX3B25xVjfsYnbB/fzr8oZwkybTnAN8klaJbBzhLvdy88PY34z
+JBRKNsMsf8hPFvlbtxV88IeFGX5hstNZLq7hVWEozN/pYvUN87O7N3skks5P
+jAoal2W5EaWSsShYdOp223cZluudjDL4me4z40fqwKfFI6b7aX3y4VgvaZaL
+91B95kPru0Zu1Uihv1edjOl+LttE0wNe5fDB1Jnyi88r1ZNiuZ5DMVK2FD8b
+EKyNuJJ6RIsp2WlKwQVx3oXcfD7lZ181Vkjr3WLOapAzDyTZ4j67NTOD1Mge
+N4Wf8B5+TBQO8qhe3mrzu8hv2szqs7PI0bKJlzH/98UuRXReVsos2xTUaxGZ
+72RO9ahyPx3H/A+fCzFzovtnpbvtRX9GPy2Q3kb1rHBpWIZ+xuZEL6B+cPVT
+AQPo56sT6xsyqJ9B55eFYf7KOtOnqum8HsGTNswjcMui4n66L1X04Bvi0ard
+Nco/oP5fFWpH4fBS3mxLmG91+Wol1t8e/TveHWZNq3JWw4q8ufrhcNbcyfcF
+uG+pUsxAIiwaXVTQT7+ftuWYF9L6uOPN0vChlTuEInLvsQR5/LxaHVYybKL1
+bvO0pPHeG5ZND2in+HfOeBL9URJ3unVSfDGPm0I/I5sKrJ/Cwvy3kWqwjfPW
+4haKW/nkCdB/QYxRVB3lH2S1IV2S5UxOrI67QedtyDXkS7LM+vDevjxaf/r3
+CbEE/p7ElBekUf6Wlr9USbCcOPjNVByt12207kK8jn92/Fc6L/VaiBH2F3i3
+Xg6h/Z9LN1zG+f6KMyYCaL/1jnF6Dx3yRtf20Pot3xrUMe+j7g/9Aql/7w48
+GEW+169bRIaRLf7ofYOf/wsqyrwY2q8VE/UE7/mFRp9KCsyJD9bcwfwHLEwW
+FNN56fPtUzD/ZEF+fSPV/8bD8j/oZ1wPt3wAZmwOa3yE57znZapa4PyBd72e
+eA9Sz5/1LoGFHa4HUuHhxenjnuSMIxezMS/bFM/SQ3DWrRXHIhB3jOmYuAR3
+l+zcpyVPc6m/cZ/O04jvTMB7u9AdyLyDmb80nToxv+/0YfH//wfl2P8BT1Cq
+YQ==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.72092184717428, 1.8721747773942476}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwd1QtMk1cUB/BPUKljCgNaUEELIpSn1QJWBuwTdGOIkZSHosTwkIfgLCoj
+nytMcBXLYAqCo0V8ApH4BGGKghMVkTAmn8qrDLVugB2gaxC1Asr+1ybNzS8n
+ueecf25T21ipJN6Aoqg4fMlJTU3j405TWnLa0JRi9J/o93Bvckjzdjhpjr/N
+EKmvzvvQbU1TzRtbY1tghaFffzBczJx4WQozJU7u7EKa6sz9OL0NLjiy0TEe
+1urZUAdyn954hQkcYqCb/dyNptjk6/fZBTSVf2d8fwmsLb8adh7m3D4TEwy3
+ct87noTH97ptMIBT2w9JSV0zeH6kwZWmxF3Tqx/AlI/lRRnMV7nUzcT9rQ9c
+7gaQ+tWzE0Ewx/+7j1yYI7E7Wgb3b0xpeO1CU6aRPdnjMP+N6PETWDmnPX09
+9unsKC/shGmJ/6IzsOmqmVd6YNasJvQlrMixjh2CA8sUW52Rj+vnxeum4Sza
+XhAOVxxcVc5Hv1OG2cnJcNrxbN9AWLGioisRZjIkZ/fAvTOMnINhn5IZ/qeI
+K9RfW8Lsw4CYP2BmtsylDf0GnG5sHyPz0xajCbBP081XZsiDKlerdJjf9TTv
+gTMsFFD8FNhiU3SgGC5Y+I73F/IJ9prF9SZ5Wg8eXgtnlIykLoOtFjf1XZ6P
+OXlujlaw6eTRbxfD/K49RePoJ8hoeK20Qr8rfx+/R+Zfr5LZwgLfa9X5sHB3
+tbrREvcZWVetI5Z5LNsJK+UDjTPJ/LMCzqyEq7uXptwg+RlL1i6AOSs7wqVw
+ld+rz3iwcDBH4AA3KcNbnGAfP/u9z50xL/+FOBQO0yw5Vw5r+v50OQwL0hM7
+dsLKd03FauJ45tc1pK7waHbDfLqEKJEDrPUcLs2B5e3dEgs4yyuz+SncKK41
+M4FPrQweF2Jf4eVdFA/Wf+DYMTBjHLdIQKxddZfkM5o1+SoAZk5bTz+GqQH1
+gURYeEjV9xyu23b7eAHcmyDZ3APrB36+0ghTK75R1cIZDYM2/8IKT5PH6bC9
+/KSnOfZVmC+PsYOjzeYni2G9X/35esxXIM2Pi4CTfro21xfOF3VZp8CM59il
+WuxbplFMpMG9hTFhtrD2fcST3Z/ea51THo+mPDKfum+D69965bzlIr878dpA
+WKO7fzkJ7m1xLLIl/Q8UnhiywPuJFPn/h/k2HfNuToP7V9vl1JJ8w63UPDjJ
+wHNLKvGjypoOc8yrO2lG8tGwgkWnYcWuueInTvg9FL3pyoM5u+VpR2Bmw1fS
+w3DnyLQ0CM66+SjuHLzD3bzWCI7eJ7frg0efvcltF+D9XchzXYh+dRn+w6Ww
+MIrx3Q5nuRVFpcGpD6dkt2Bq39RwJKyfvaXGCvtUDblxg4mbp+RSmP/jrbYg
+uECXf/13uODZy5RwOPBFT9IM5NNa08Amw01jLV+KYHm6Y0Qu8S/vjoXAbPdT
+3SVYEF3fHwHbT6rWqGElVxm5Bk4Ktbg1C/MLQ5xyrWBt987flsOsbKlhJ/qx
+9hf2byZ5xFbtZeAo0XBlJqw5+LCSA3twqWdKWCuqEiiwT6NKHHgO1hlXxkyS
+/L433FENt2be8EmE9Rcrwkm96QfeBGuGeYOWlJXA4snFY75wluFEAgNz5m3d
+VPsF8vAK27Ge1EcNKC9Y6DGitYTr5921bzPFXh81hWSfkBCp9x64f6t3djHM
+jsruiWB5W4/NOrjXQew3F/70/+CIOjlN6P8BDe0+ig==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.763809742330267, 6.7361902576697315}, \
+{1, -1}], LineBox[CompressedData["
+1:eJwl0w9MjGEcB/BHXX82yUVDu7t0FNGViqiQt+2cs2ZyazlpIR3RcbJLl24k
+1cr5EyPpMKzlRKflxS01x26c2erK2TXVnFxlw/zLn66bfJ95tnfPPnvfve/v
++33fV5irkim8CCGpOOj+fy1m/u/zGdK65mjeBpij9n3jDfOX7l3RAFsUiojx
+eQz5Y2qUvYe5P2S9b2G2+6A5Ioohcn7mGRMsve41lANrw3eZK+CBIt3Zk/BY
+YrdSAovt4pQWOFhpDSdwovQFMcOetJlOVsgQ5+z+Jguc7S937IZNDd/uP4LT
+dQlZfFjJ25/XBMe2LGx8HcaQ89N7aqrggMvqtjq4o72zij5/7JdYkAsv8/FZ
+EEfnYZ0/k+B8rzTNFFjT//z2XDi2LexOL/LkP+O4Z8Jfiy+5bsIaY/PgLHgs
+pZhbAWvdExcWwo07iGUPbM1YbhTDrnrV7K2wMqqSq4TNkjbdFrhvU7hQD0uV
+jl8K2E5kzi5Y3hxdUgabbJlBHORZ5rxSaoA9xJC3gub/u/nhANxqn7yhgC0n
+9kt4mPfAjJUOHVwdXtOxAy4rf6O+CUtF+yS0T9ur+JIHcGL50y43zC9sqHwI
+m2ctX7BOxJCTvsy3W/R+n7+IzsDBwic9p2CWZSa64U/vuO6dcIBPkZ9fNEPU
+gZ1founzCt5J4uGMbIHjM+2zWCNNh1mJanMTbE2tXbcdtv1cr8mC1dahhFzY
+rBAdnkbz2yUdmfS8dKO8ci7yJc2JXwNfc9Ufc4ciR+tjnQB2joasL4PPL0lJ
+HcM8msltd3lwRqdfzDM4f6RGbxOgt4u2gjq4uvqI4TpsTo5bnA9L2/28a2FD
+S0xlCmz1VGfpYbnxaTYflg/MGX4Crwo5uIQDc08/P0Rw/3pO3/hv9JW4ytUs
+gyOPvOSP035PRAruwX3jqjR/XG8Kfn+Xh/nVN0LKI+Cw0tp+mudOkNY3nVrv
+8P4Ii9cKC6tgVvdy1zya39/4mM6vIb0mCVxxzlcViLyGAC/Odlh0dVKfBXPs
+ozvp9xM5+D3SAFviVl/eC2uHN4z8gMUlZBHt12yY2pEcg/drilq7kvad4+kp
+geWD7Ggg/InXzRrhWOPEvhbMwyl0FzngD12tI4tgbajL8h0uO15wrx75PJNY
+sD/9/0OZf0nWbpA=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.613477323709358, 9.105546654636697}, \
+{-1, -1}], 
+        LineBox[{{6.999999999983629, 12.999999999992724`}, {
+         12.999999999987267`, 16.499999999996362`}}], 
+        PolygonBox[{{9.48173265946094, 14.447677384685548`}, {
+         10.719815750748694`, 14.706811054955079`}, {10.316718930329426`, 
+         15.397834175673825`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {9.823799910437668, 15.484057296392571}, \
+{1, -1}], 
+        LineBox[{{7., 13.000000000003638`}, {13.000000000003638`, 
+         9.500000000003638}}], 
+        PolygonBox[{{10.51826734053906, 10.947677384685548`}, {
+         9.280184249251306, 11.206811054955079`}, {9.683281069670574, 
+         11.897834175673825`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {9.823799910437668, 10.515942703607429}, \
+{1, 1}], LineBox[{{13., 16.50000000000231}, {13., 9.499999999998607}}], 
+        PolygonBox[{{13., 13.6}, {12.6, 12.4}, {13.4, 12.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.9452, 13.}, {-1, 0}], 
+        {PointSize[0.04], PointBox[{12., 4.}], PointBox[{7., 13.}], 
+         PointBox[{13., 16.5}], PointBox[{15.5, 7.5}], PointBox[{13., 9.5}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T15", " ", "P1", " ", "N29"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdief/fiijghgjhj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdief/fiijghgjhj.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {22, 44}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwd13lcjNsfB/BnCG2Y0jLtaXErhSIl1UxapLQKU0IbkihKi60iDNowUYhB
+ERUJGVRGJVM3GW5SQnPj1iAJyZTo9zk//zyvt7N9v99nOs8508Ni/NeNoyjK
+jUZR5EkNjOHfXyxqDgGdRdmqCfjlcM7JDnV5OFqnURgGc/4NcpkNy1QukNeA
+QzKz/WJgc2tTo7YZLIp+Ykm9EG5vC4o6A8vmmvXZKrGoUbVewWaYvTNMpgrO
+yZu335P038cN9VJmUTy/wN3zYX5PxdVe+D33WsssuH2Ttub+aVhPKD86F9YP
+667TU2FR2l6Vn1xgqVnXmxsw9fb54FrivNkT56sizpaj3/fCsUm30y/D7JpF
+4SVwseeB9HFqaNf7vev/8b44ssgFVhwXE0hDPqkX9WZvgnfFWauYkvwWydES
+4dIF9C8eMCNYyo+EufkucRFw0m3f3EXEWvnZcaR/1OuhSbD5/d03EmBqeblN
+NdaPL53VHg2XB81P2ABHa37gLSfjd/+7QhHWjy/wtCT190x7QPJp1+y5QxGr
+J2WvhgdsNgQ9IvnnObBV4fQaxsw0uNyJq/EW9aEa/DJJ/cRjV2WqYMVYvpXE
+GPN8oy+pgFubEkfy4PK1Hz7XwvxzHi2esOSD7d1+2Py2TMp4mL0ieYY15i9d
+43Gh1gjj3/VEc+EMihF3BC5OtcuVQ7x9svmVa2EpTViQA9tH519iwSJl9xIj
+5M/YnNc9C6ab/HIWwGcuWEWawamNAcdWq7OoeZeYx61g4Y9xpUMwV3ze2A2O
+zB3o2M9AfmobV4TD5Sva3kzQgKdl9x6EGesUrLbBxRtcnW6Q/vczWY9Je9LB
+o69hd0lh1jhNFjXoHds/Efnk/KvYaQAz6BXJFnBqqJ2FCcxLTtnnBYsjxlqn
+wZxCx5IIWOjGDZJgvsLwxNFYWP/U47VX4PZdBRO3wgKvv+NWweac3P5wUt/N
+/M7xcMZuveQlcJJetH8xg8xTPNmAtL9prPWGGT/X3uhHfLz4m2OjyFeFKRop
+h2NXGe7mw+nth/5EwSZXhJMPkPrc+sdaD6Y8vIo3wqKy7BCRIeqhoGyzHi78
+WhueBke+Lo3fDQt9AmdYw6L5r9quw6/jRZv7DVgU63Q3h6zX6ptcdR2W5vC3
+hyKevqaPVjthet+y0E54KUMzwR+mnFTp65HPrh0Bp+fDIUF+O0Zh25QpWiZw
+8ZYcuXzUi+KY/j0DFladeG2thfGrfogt4fLa4SlPYBeTFyOLYcaqV1SgNvJ0
+U7bcQNbnBZ1uhQW7p1pkkvW5WVkLdZD/6EPXO3DS9KH9h2GVSaq8btKfM87v
+Acx+XeaniPwERfd+t8O3MiLTLeG8WLv3L2HZnjd5PrDQYO+Fathll7dbBByi
+KJTNhJOKt1RuJvUJtf+5BJYeeXg6Cs4x7Zo1jHgKA+Kcgkj/kiJ1Hqwi/+24
+PWl/eW2PC5wa8Hq6MiztveTTh/wYjXaqrxEfJ+j20gI4eHC58Rl4TkqYMBge
+MH+RFgAL5jdFzIZvfTLkTyL1dLXsZMBz9EK5/Ol4f4LSFi34fZD/2EY4KVym
+dAFs5DT8ShemJ6/M2wazAnd0dejj96PJjnkEUyJqRwHM2WH1bDbi42dbXd8E
+i4QJzGtwe+OZcW7wgEPRYnvkyzrgEmEBl/OW322F9QcXGhvAOQ7r/9uqi/jP
+Pv5uCLOi57ybrIc6Ri3qsoQjCxPbL8ABrTnhHrDgzDKeKp4mhSd3kvXsRb/V
+/fAc/dV69xhZf8rNx2l4xrd/WVeNJ8U0/esSniqdLwokpP291Jn8/4B8a5IS
+8nNZbfCkAS71HDOzhgcUetXq4IxrDn/5wfbCx2o34fQz/o7hMHtJx8o8eI5P
+/F1Sr4HY0d54WLjhrxjSLn3w1tGTrMMIf+YD67/9pqcL1w/6Dc4irjrzVYx8
+mm1WZ9JIfSsVdh6GZRSzPgpJfWy3HXIkjirrPgBLhHIe4+DCmHc1DrB+0h+z
+V6iXvl+zA5mH4bWrqBGWnaJS4QRzxsKm/QOLdLZeL8KTw7947CeefJV3n5Tw
+ZChf+jkf/fiDk+8e0SG/x6Cn2XDSroQ6dVhgLo4dI/Mo5XXcxXt0eT44xYm8
+p6FD1fHwYIlJ3iESV2fkeA/49fxVV9pI/o66fxbA7vcrQ4yRF6Mp5r4zTPda
+KdwG848cmLoOZpsuH7kP580JvX6K/G4yFFz+kLqd6GeL4eiyfjcb/E5zynon
+WiKewbBQ1XVw5LkBi4Mk3hczPQ7AvCMM6g2J9892jVOwb0vaTXPkV1WUGMSD
+ZZ+2CWNh3/mRh/JhiZKVdyGc8e3EQzKe/dhTqw6OZH+/vhF2N1KSaYLLt1zZ
+40L673Qcq4RZbY33NMg+0TaDeQg2kThY95HfQc3OhU6w0ZY0cQ3cbnO2RIx4
+JD21pVziS9Vbo+DIHt2IWJKvTW1iN/IT0q5yAuCQ36UpXrC4p8faGWbdLP9Q
+jr8rboX2JEeY41a3TRku9G8Y70banev7E7Hv2abKHV8FF688TOvFvqhv35Kw
+h8z/weZVBBxfWdFSBouctAZ/YF91v3HHQAILs7TEBXCVs+H2mchn4IunxlqY
+NfggaDupp+R2jx0cUODLqCP7ZuLfnpYwNet5nRL2naSljrJOsEBjaMMasg91
+OlzeAEtCjE0uwWLjsILzsFS4PLwHlri3xX2E6WvlWrXJdzr11h97xGev+L1k
+MfmuaP4+fRyO1Bi4sg7meJomke9e+xFP0wRYMEH9hTXyDe45appMvsP7+30S
+4FSnE94xsMT7ukERPJBd3B5IvrsrF6+pId+Fh6ty7eAk9W2aD2DZDm7jNPLd
+y9HIJ/0j+J9VJWQfNj+yaiss8r+/4h7MObfHxJCsZ2OflgnLehWNq0Y8t2gn
+U8g+zr82j74Ipj6tmbwIZjzkxlciv8Jk7xMm8BxlGV09mHv0CUMTZl/JPZSG
+717p1KuTGbBvQVjqO5xDmt+brTCETZy1n3nAkW5sS7LPF/uw5cg5Le/2L9sw
+mPrz3ZJJzml7d63nwnTpo6MvcA7iHVut94yM1zqcvA+W/FXvrob8Qj6naXnC
+u05rhIaSen28HWsBt17MPnsd9r2kY2FGzq0u05T+kHPQsGMdE+b+Q28g5wb3
+V+qJm2BR1vK+bNh2eFPKFdi9P3DoCSz7o2vuD1iQsuwuDec8d1q56xLEJ7OW
+e9AUDunxpnjknFn004WcizkOr7K+w0l5YfF+cKS3mrMjOZfur3Qglt46+moH
+rK/zaRPpH1l9uaYQFsRFhpvDeYor7fnwnA+qSgqw7W3XGxUwe+jT825yTtrz
+tOQYHHHdeFUlOSeV5Y2uhI2cY7M5MHX4KX88HHz88rpgWKpIs8hDPMHfmh/M
+g/lR+g8Z5Nx7sd9dhYx3UX16CPkZbS8J+E3OedOFmwdwLs2Z+7b2K8wanTPX
+n5xrTZok38g5KTBw4JYy+Y69TaWRc6xPZpQuHCzoOK9D1r+gocrFPSN15Hq1
+G8zJ6W/RJP7gW7yT1FPB93Il7imi2k9F9+A81fWlUbAsSzGV1HeAJttgC5cG
+ZfC8yD1CgXN2OpzaoGxJ7jW+BqdOGcFU5FmHj+SespUvZsLao8nt88g537Ek
+JhbmmXU7JMOyptOdK+AQrdIft2CTvfnpFOKpN1j29T9yr9q0tGE5fGY8VSRv
+gvbRRa6lcHtqoKYBzI7fMfsPzMlfMDoTLi+t+uiKfAPm3T1lQtqvPmXvgZuN
+QnsZMOtbjepFeGn3tY1/ML/t3CVl5bDR/iTzThLffUl9Iey+SLnoBjxQm2hL
+xqtkhOemk3j9VUwcYE7Ryo8ryL2o+dRQN9Zf+tYpbyYsYDfaboNDHvYkTCD3
+xOftuf3Ij/WnS7eX3KtqZU8Hw8X7qKbn5F4yd7vsvqlYt3uBbRO5t5zfKXWd
+gqen16kWUt9jl69Pnoz3/tVzn5j0X7C+4D8Fsv7Jf8dIvf1ebGqXx/oad8fI
++qyjkt1f5HBOPk7LDCf3rufau63gW9+yygpJPsOmo5dkEef9fvpn2FfdeK4v
+3Gy/dIod6qMv9WqfBWcEP6/nkHp1rVN3gqPTKh3bYN/90st7YfpDp1w9U/wd
+mB6kfYZFJ6arhMHl5holiVjvtZ9/0GmYJ91wgYH4ZJqVExtNyTmp6kU9XB6Q
+RvtEHFtxNRb59D2qNR2DB85vP0JXxH684l3tBDOsF9UQlw9HmA27kPYcy8mJ
+NNTjvXDL4z5Y9ER/AQuO7br3/SkcGzEuwAfmiGZ8vQpT+veKzGDeu3yPVBLf
+ggt7RZiv8Pblp/5k/c6qRieYZx20zZj099d5lUbiYa80/IV8YyvfbzyBeH3/
+UbtG8g+ZWs86iPzaD3SeuEc8w7djNfJ3UZ46Wkzq01H02WgS4mqN33UR5j3q
+GOydgP1FvMWwhLS3bDhZIYP9L9o1WACLXV2n54zH39OIwuduWCC/Qnp4HN53
+bNiwEuJhGYl0SmnYr8oHFJeSeldzBSMU6vtO2yKbxD/pzn874TPpRl/bSX3W
+rJppBbfGbzs3A/Urr35ZrANH5Dd7bzcj+1b+54Wwr6BerpbUd65YlwNrW1Z/
+k5uJfIc7rH7Bo5FN6z3gkIw1bhlYX5reqJMGl68xlrNEfM2TjN1KYV8Oe+Fb
+OD1g6FQT8ZeD8znIx+hNQlwnLEpJ3mmIfOvXTfj7LZlvG8OxCGb/WO30Aqab
+vpGMn0Dug7RpAjI+JeaoDcy2Mpc/T+KJGWbbwbxsuY07yHy6J2/KwmLKvsWb
++N+U4+cxn++sYZXpM0n+ndsnwgyum9Ug8hPFXfJdiHgY5SP0v2FW5L4wN8Qb
+vHDBlmJYfLCmZzby027V5GeReiQY3KAhf76j2kAKTHXej878zaQGG44f2036
+ay6brPqLSbF2taZzYN5d2b03pExK8l1O/jycqr5VIXmISbXyDAUNZLy04U3K
+IJMqfJZUKCXr03rNXn5jUoJ9avrWiFfwpM834yuTap6qpUXyY73caFM8wKTq
+b85VewSnlgx1z4L1F09YMs0c6011d9GDRzmT60NhQZOWaxzc5xHCLSPOWqOs
+j/lGHTN7v8PURxpPDevJRg9bWFlgPl27EJfvTErsJ2+3HqbEG425iK/v3OWg
+LNL+csTwyw8mpWj7LOYKHDL77STHn0wqwNNHWgmzju2lRyFfWec29Tuk/e0D
+4zXDTCrk07Lcq2R8XXb7pBEmlc7d8ewYrB8Y6swmNvx9eyssDgh54AKzuhaf
+XUL6m6qsf4zxlFRkpwMLls0O7ML8VcdWx34h8W8zfpKD9fVjGufVwalHJra9
+R3zsst9Rp83Jd0NxWIJ8QryfPNhB+geocq4hf/2l4YfCic/XFRzvZ1Jz5J5e
+XUnqc1LT9sIHJpX6RG43m7SPKIXfec+kImMza9aT9os//GliJhW83OXwXtLu
+3xO38iXeh6fTihJiGwdRwlPUd4LPSBfx0tKSrlq8P+tJNbqknkOGrLwKJiU6
+9GjzOmJ6rOKzkxhvnrj9BjH5l1dN0clzFut/TP1DYw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.684589195445786, 6.720523577306384}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwt1gs4lGkbB/AX5dBxQihTRoRknbXTonm/SqTkkBWdDDmUlUb4UmyNqCQk
+20E5NBY5rCyb1dhNjdN+o5XGodi2wxRFtBrWOh++/3N931wXc/3e557nue/7
+ed+ZR9f/mEegPEVRz/BH3v/3YtLUPPJuTFPczSYuk9o0lf8wvbJiHU1Jip5M
+/wFHVzwMCIDHD+oyb8MZdNPzlTDXuuQfZ1hszszvNKKpcrMGOelKmmqWsVdm
+w30duk1+MMtqg85RMq549ZeOFTTFe8TQ3g6zwpaP2sOiptcfLEh8SvrSPC2a
+0vqprM4QVt7m3KwC2zkleRjDaT3vXp3QpKlYy7rv2TB3OiRnWIOmSsdcrNzh
+xJ5wyWl40UmhynGYl28ZxILLQ+rEGXDXnhMeL5bj+hpBcx3JZygosAxmGsc5
+/0XymZVuyIa73vSFL0d9UvcjOndgUf/2VDbcNTzG+Q+s77Xb0BMWTbhmzMAB
+b4+uDoKdFNuNHbCefo2KOBTmz601uQln9KfOkXG6N8xuBN4aKW9DPq/8nF/o
+hnr0H9ZEWMOsPeNFRTBL1OunDBcxtCtG4UWeVexW5Gdks7XQBv3Y/7j95zT4
+sGmDgR/s1nRdkfTTaHLfvSj46qZ5ZdOGuF4nfceDRcdbg8pgraLlp9zhl8bN
+8n6w9JZ/jCacpmC6XRMWawkNGrCedOvRZ+0G2H+13H4f2KhGczwDzoi1cXyJ
+/MVD6zMPw6xPTvmu8GFn2/VbYaezTcxq9GPn3aDzJvC4fcO/VsN9lNywLsxr
+7O1MUMf9cXq3pj4cvUaQPqyG/QsuUbKE6YPyklCYcf6kozNs1FPpPa5KU+aa
+atIQMl9Rq8FNuFxv1YkrJJ/L32zwgKcflob8Cstc//JbC/dY3Ze9h7llkzvU
+YPVIP/YS1CfJ+3OPNpw1efuSBcyv/73cFu6qvXbMBe669tw3HG6YM6vzhYVs
+u2NCuPRkdnsQLFgnXLEI+QWUh58i/WP5/lshGC6qjdd1JTZbeqoeTrjY3WIG
+e59KFWqjXubUFb158GH5vSYhcFr33O4nyE+oJ7pfDJceL12RAps3qn1+Bkvf
+peY4wH0mMS4DMK+KPjSxFuvsnTzYCydUMXV/IF5R90oMsxzvFx+AzfUDay/D
+fSesG9WId9tz7OFPg4uXSfTR33nTv7YjP+sHz6RXYbfdqj96wT0J36wJgJW1
+HU8+Rr2hXrJtHJhSDDG3hsUNyRaG5PNy1/xvLsP95N5pwoQzLNva5xjYrxc+
+vav0yXXOxqPw/gu+J9bDjNGmj0+W0lRkwavALTCv8E1J9xKa8qweeXQITgu/
+Vq0Hex9hmybBrPQU1tXFeB6aChmVJP61ZjEbZv6klPOarH9/7q4qbJ1sNF+J
+1HfOb6EuzDBOSjWGeU5OJlxY3aD5wTaYVcqzeQzbFQSH+MD8O1Y79mC9hg+u
+3VxY1uH1eQa2G3ec2Aczyg4dv4d8xxdPLXOGheU5GzegHqavmel6ODoq7l4q
+bJJV83GO5Hc74sorUu8Wl8gmWFotLl+F/kS6msRfhLmP3uc4wwGyfrvNZLzE
+v4ULs46V6YzqIR+5mNoDsCDuaHchLK5rNaTheVtP+uyFM77XH1SC8yOfOzOI
+8yw5VVhPuX/cq3kN7ler36NcYKeWsI402HzAW+575M/XH670hVne8hFJqK/5
+umnYVzDPv9XvIPox4urepwuXV3/qNlqE++WYVYQGidcZO/PPAvQlS1CnScwO
+znuqgnoNPwzpwwz+0pV1yuiPMj/VjqzXZZXyXAnXBw8V74clF8wYy2FrH+3B
+szA9uFAUr4i4WxkPS+G0rnOnDODE7pMencTZvT/Ozsc641u75ohnX7kvxDg/
+ackNPdTL26kudYJ3Xp5aQsPmDnLpFXBpjpbmbliiM5xpj/X4QXpjpF+sYGZy
+N5yYoxrrBQuyuL9mIN/owmBFBxIfFtvsjnqkyrevGJD5Sh5aKaDe6PnBlVNk
+/bk+US7Myrx5sxHmLm3V11tIU+yLLsPnSP0eCaGnYW///LebYAHHLLQUzgrf
+1j2si36mNakXwT2PH9zNhyUqF8rDYMm+hap7YLeyjQoULGta/GIRzKrXdTmI
+9Q73GRWKWYhrVTFPRX588eu2ZGJd2YnryL9j+oHHPtjtXHvTGdSXXzEisIFl
+cWF2nuiHW1xlCZO46N6b1ein9QrNRgbx3R/YAwr4vp8xLl4Gl9tJ7zfI47lu
+23xiNSxa9si8Sg6/L/uCasl8otue3k0UTSXbB2d9zSLngUB3RVhr8ZOqGJjV
+cOP6h1kOlZx0PrIAptds5xnBkSrLl0iI/wiyfTbDoZgpNRXjJN7puOIATNtY
+FTBRr0BVe9If8Qz1dUEbSf2OAyUWcxxKuXGbeCfpz5ctEj2sVxS8cunXMP/l
+KxWSD5XSJu8OixLk3n2LfHs+imc5JH77xNwG1CM5YD6hS8wN7ewj9RUkxY+R
+fl1rs0xE/epMaX0tLOV6Vi+Yh+fadUHwWVKvi39IMNxRVplsCwsKNqncgKnv
+FPa/0UH9woiIq3AGQ4naokOeF5PX+2Fu0pM7havxbvvd2GfMz40veq8Kp03k
+9rvCIgMLhaRV6P/0Joc4eXJ+2CxcBkvq22qTkH/f3vSxuzh3sVb2jkaivr4z
+Zx/6wdKXq95+h/5wp0KHTJnk96uet26aQwlnlBw0YHpsR17tBIcSuI7baJLx
+vNu+EWMcSrR0ZIk5GT+TsM/zHw5FxZjMHID5Flyt6L851PjuBZbZsGij5+Tg
+EIcSbyhmfCTjT1MSGmUcitUzFGCH/Lh3eusV4OgWUe4VWGRU8MrnM4cqcrbU
+64ZpyfS3p2HB9enw9aiXSr+kaI147+J7CYHE2eK5OTLfxMBUMizY09CuNgw3
+h3nlwHzZsdb9yEcYtUz7BokXipsbRziUUazdaBRMR+Vps0c5FDu+rukrMn7L
+LT8L9cl6t5d9wPpU56mhl+MciifP/hBDfNdvUw/6Iaqsrpsh/Xg6ECaYRD4C
+41geLLg83Ss/xaEylO/NdeGcKtUYtpeD+QejKu1gfvLaimuIlwWq2ObinEr/
+nHn8EeaTcByNF8HSv3+8exbrMTTPNZ/FOZWb5uDVh/yU1wVKVci5taOtZgb5
+96UbcgtwjqLUHEbaUS8jc62HNywINZk+jX6IhWX5+jCfdeT+uk/IP3FMYyHx
+JcP1Pr0cKjHc1JyYkuOZ/PIO/YllOegRd6slyl5i/9KNk91IfGquQ9QzzHcg
+cdNlMq6n8eXFFnz+i+ONL4gtA1zXNGLcdVD2BfKj9gfNDtYgn3O/2cQTi3py
+HYXYT07NZ3IOpxZc6LSu5lBa/QP5q1AvFd5vYihC/0fXOnoTR3ylEf4b+nvE
+k8cnno2LnMV6jI6J6+kw39d2W3YH9s8nlJ1MnMd22PQC/bdpGf2GxHukdilI
+kc9232IL0l9127QW1Cf+HHDwNdanzRbt8HiPeldf2RVJrCHzCUQ/yiWn60bJ
+uVWV49rdh++P5DMDR2A6tKei7CP251BKRRvOpbTDyQM/wYLDVdEbiA+8Pv0O
+8VrFD6S3NMh+nte1x3zCLQNx82FKvWvb4x70q21zSQw51w8nns98i/gq7dXy
+MHXuQ/T1P3F/lFu9ycK5ifpjb+ZoG+Irnk7vIjY9s2tXPfZvl+mxlcT/fzHI
+P3X6v0/i0Lg=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {1.6402550371571483, 9.170599194669919}, \
+{1, -1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{19.999999999996135`, 16.999999999996362`}, {
+          12.999999999995453`, 16.499999999996362`}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.407378835015717, 17.441896309779956}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwd1XtUjGkcB/B3KwltRmwzk4aJMtlNJuWWUZM6mZkucimDKElX1Ipt7Iop
+o600bWZJlHTRqlOTjhhhVOy0km5skqnTJksXZHTaNdTZ9vv4Y97nfM5zeX+/
+7/ucM9ahsZv2GlAUFYEfGSkGeSzlU2wyzuNTE/al2ZZwXxwzJhXWHdg64QZT
+qvj0qfP5VOmc9wdi4YIc/0kJrG52uX8F9t9qN94F21/fuG+A7I9462TO5lOv
+44dFFlw+VbWFJbOHz/xzNduFmNX/wAU2v1N5LBjOWcbu4sHciYoXJ+CuZTIz
+J9hUNVL8G5wqaHOfBxt5D97+A6Zm6I9M4n0dO9asegnrlNw91+CU4bTN48Ty
+h97bYPGSmoNmjnyq/dmbWj368ZzhxbWCpZL47LMwNyIx2AbmfqV+4Az3rhWa
+cch6oc/SbhafkoiKZGS+gJW2Uw6LxOfcWTBtdUb4BtjqHO3fWWT+7NybNvDw
+kpOJhnB9a4puJlzx8n3HKOqJUww0m8P13FDaC1iaPWTqAPudL97QBreba2N3
+w8ZuAddq4aw9m1TlZF5t4VMF027tvjod9S0SL2aWEH9TvuEn+MnRaWMXSb8j
+Jx5/ggUe+zJyYf5AfU8S+vf3oELy4cjDXtunIr/e9a43vuRZUX3dF47USHOu
+w+yhvJTTsPNf0u4HMMO0Kr4dDs9ypfeR+RjXzSbWOLferWoCLs0xXr8SDjz9
+qYfkmTXwtnUH7MNkV7rB/MAnXYfg/moZI4zkk9L/KAnOvGxJpZH1wheZybDu
+vNJDCYvnL09LgA8GtDa2wfqy4vzdMC8t4ef3cCrrne06OMxAd2bGMj41qCvT
+WsL23glLFsJiW+rRO9Qrux+oXg7HhX1wvwtncwz618FVTM7VU3DRnKkSEZxl
+yZPvgPOMixQ+5DzfX9cvhXlBg8eFcE1MG3sabOKYpXGHpftHl3ciz4JZEosV
+5LykSxol3LTCLoADh7h7JuTCAkGe1AKuD3j+rgBeoFZVGpH9MnlLLUwzaJkc
+RT/+dh9vjcGdzg2KfnL/LnxfwSZ5F6470gH3tfhwN8LJr3ZWPCT3LZgSp8Ps
+6mCD32HBjfaVTbBEOWx7j+R5k37RDHmk3/2QqSH7yw/bBsBWgobEFnIfmZ+3
+5sLSyzH6bnL/hWvqeuFWfUgTyZdtKjRkLeBTu1bdSzEh+QxHGmyBKxIaMmxh
+O0X2QBLMd9hr5gVTWu3aEli7/SkjCubOVk6qYYO6U/lyYmt1YSPcERKUfA02
+2aVkECv61hR3woxfzjy/A5tHfDuohyWj859ehmVbHnoznJBPdPl+GUyFWw84
+watKiiOD4PwrnHERrCv7s9sBvt2Rpw+CKd9Q+n/oJ9lx7GQU2W8cKW+GjdSG
+J+Jg2sd5NXlwx5vA6Qdhdu7dyTjYf5FF3AFYMJtW6A27pGW6hsM1U3rOOsA9
+Zce42+Eshol0Lnw7LGyxN2zyNDRnNjystbJ3gUtltYV02C96tb8dnPr3UB8H
+bpz1o8oCFvtomZ6wSPX6qDGp38ZWEQMbNxlVk/6pC5WMi7BeVeI3Qu6XnGf+
+jJzvqLEehLs8o9Lp6Jd7vPvxa7J+oYeA5KHhzHk8DDdO1r0qgtm+mdvG4NIG
+06FBWHJoPNoQ7xsMqOz9biHy4xU20eGuz8HxUbCXXjPFkdS7LT/jEswrC//B
+j8zXde9qhrnRTFHsl/rjpSNw2GhVuoLUX6fQG9ngex6LtLsJ94UmCmfCKzrp
+U3pgifzO4a/h6eR/xRn5k9GG/z/9qkJF
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.23789659515192, 7.38794612872654}, \
+{-1, 1}], LineBox[CompressedData["
+1:eJwt1gk01vkaB/C/NdlfJZXtlW7WoqERkr+8OuXmpHJTpN4yIRUp68TMv6JF
+hm4RIpRJskXZalJvQpEQb0KblGgaRZahqPt95lzn4HzO81ue5WfR2xG4fqck
+wzAX8UnfGQn6Ysgy/3yoskzzX9419jD/Q0HJWjjNQbUkBj51ydcrFr5eO6Om
+meLGcwWFsLGtQZOmEcsUezrllcObf4uN9YVbBAN/XoJ9mUcVxbDq3OxfDsJr
+fYLMR+FTPOHYUlitRyhpYcwyXH6r+K4Kyww0m0T7wQw7+MeAMsuURZj7JsLd
+ZyoWf1NimZUOr2vLYNG/9w9NKrLM1l3xCxtp/98Pw0YUWGZd3arspxQ/4nzq
+kzzLTKzKze6A+XN2vxqfzjK/W0Rot9B5j/wD5sKOEbG+d2j/9GI7LzmW2dCn
++EMu7e/heh5MY5mPivrBcbTf0srSG366cvfGAIoPRiiaw1qWAZqudF6mhfZi
++Kcbn2UtYbZI9eVOOKpA4KRF+4+uPf0QTqk/2CZPcbVsH7qvKK92lwScVfD6
+0kzk05WU6UfuLnKQfA8nyjyqV6B+HJEebEE9FfpX1fXovLxrStWot6M2yMuB
+PBKaVIJ+bGx0sdlD5znda01Ev2a6v3+cRfexNsnb0c/73jmvXtD6x91XlNFv
+iaM/V+uZoJ7+DpNEuPdeZbw/zIg2ffwAx/gr6JfD/LQ5z+Qwr9zSSntJU8wz
+bVqZBL2XYYvMNTB/0s2I5rc/66PyGVh0td3ZBf78afOxNpiVcnQswP0Ku9VW
+KC5Ev20igt8iP4Gu4yNbmJ/d2jeF/Ocf26O5HRbu9RyTgPmdPfEH4Szdmz1f
+UH+z51HmJFlTb9cw+rMlY8/dBNq/Ws15DP00bfBLjqX97KhYCRY6p5ZGwqzE
+4TBH9H+bl3ueL8WdHm3MlGWZsXCNTS6wSN9jzAD+JX203YzWx30dfC3DMtYv
+G3fwyFd+q2uG88zEDiNUT2W+aAiu2tqQ3wV368d9csJ+SU1RSR3Z4F/2D+AX
+sscNblI//K5n78f9GweqE8ppf9ktTzvk59G0XaEKzqq4LdBFPYWP17k0wUzg
+wHJl1Kv9vOP0nxS/K0r7DrvsG8uifDjrc6f7Mf/slt66FTBjfaL8Nvq10Cun
+l+rtDjLwC0d/PR2XRt6m/FtLliuh/9d05SplFiF+8bV3KMxtbz/uCouMzr0s
+gsUqDhXpFM+zqb8O92dPTPbBQjXHoGg4Y02GtrkZ9gUObZ0Hz+pZ8H0/zFeJ
+EfwX92nu7RIVwVnWL5+0Ix9rq9bm1zA7YRH7BfkmqKtHypjjvqrjzjIKLFft
+xbsxE2bkNqtKyLNcRNT6EB1yaH74uBzLlSj53JsHsw6GrmPTWG5IymBID+Yb
+GmvLwIG7/aO1YOHZloJF6HeR3OolM2h948Tlg5iP1V7BO1myXZnlsDTL+JXY
+LBlCPsLZP+aeg52en2hvJZemrgmBec+qR0upniVTy6Lh8+taW1Mp/1X+m+vg
+m7VlCUeovvs6G5bi/NRpFnOCaf26Ky1iWHmJmLeX1ve55iYiH5d0JVEg3O3l
+vCgQ87/j7spEwYy+zxkPzN++/oJtEsWVF7quwfzd3+p4V1J/h7uSrTFvleT0
+wV6KH1vbpIF+DfqbhSqjnu4rA1+fo58XdMVfF8JZrmE2HPqdkvO00JXcyc76
+oshyH0eN40NofWbSK4ESy1Wc/HA0jeKbxP1bYFa8PPQuzG1NL2Lh+SeLbd5R
+P5vd+gdxnnpX3B25xVjfsYnbB/fzr8oZwkybTnAN8klaJbBzhLvdy88PY34z
+JBRKNsMsf8hPFvlbtxV88IeFGX5hstNZLq7hVWEozN/pYvUN87O7N3skks5P
+jAoal2W5EaWSsShYdOp223cZluudjDL4me4z40fqwKfFI6b7aX3y4VgvaZaL
+91B95kPru0Zu1Uihv1edjOl+LttE0wNe5fDB1Jnyi88r1ZNiuZ5DMVK2FD8b
+EKyNuJJ6RIsp2WlKwQVx3oXcfD7lZ181Vkjr3WLOapAzDyTZ4j67NTOD1Mge
+N4Wf8B5+TBQO8qhe3mrzu8hv2szqs7PI0bKJlzH/98UuRXReVsos2xTUaxGZ
+72RO9ahyPx3H/A+fCzFzovtnpbvtRX9GPy2Q3kb1rHBpWIZ+xuZEL6B+cPVT
+AQPo56sT6xsyqJ9B55eFYf7KOtOnqum8HsGTNswjcMui4n66L1X04Bvi0ard
+Nco/oP5fFWpH4fBS3mxLmG91+Wol1t8e/TveHWZNq3JWw4q8ufrhcNbcyfcF
+uG+pUsxAIiwaXVTQT7+ftuWYF9L6uOPN0vChlTuEInLvsQR5/LxaHVYybKL1
+bvO0pPHeG5ZND2in+HfOeBL9URJ3unVSfDGPm0I/I5sKrJ/Cwvy3kWqwjfPW
+4haKW/nkCdB/QYxRVB3lH2S1IV2S5UxOrI67QedtyDXkS7LM+vDevjxaf/r3
+CbEE/p7ElBekUf6Wlr9USbCcOPjNVByt12207kK8jn92/Fc6L/VaiBH2F3i3
+Xg6h/Z9LN1zG+f6KMyYCaL/1jnF6Dx3yRtf20Pot3xrUMe+j7g/9Aql/7w48
+GEW+169bRIaRLf7ofYOf/wsqyrwY2q8VE/UE7/mFRp9KCsyJD9bcwfwHLEwW
+FNN56fPtUzD/ZEF+fSPV/8bD8j/oZ1wPt3wAZmwOa3yE57znZapa4PyBd72e
+eA9Sz5/1LoGFHa4HUuHhxenjnuSMIxezMS/bFM/SQ3DWrRXHIhB3jOmYuAR3
+l+zcpyVPc6m/cZ/O04jvTMB7u9AdyLyDmb80nToxv+/0YfH//wfl2P8BT1Cq
+YQ==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.72092184717428, 1.8721747773942476}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwd1QtMk1cUB/BPUKljCgNaUEELIpSn1QJWBuwTdGOIkZSHosTwkIfgLCoj
+nytMcBXLYAqCo0V8ApH4BGGKghMVkTAmn8qrDLVugB2gaxC1Asr+1ybNzS8n
+ueecf25T21ipJN6Aoqg4fMlJTU3j405TWnLa0JRi9J/o93Bvckjzdjhpjr/N
+EKmvzvvQbU1TzRtbY1tghaFffzBczJx4WQozJU7u7EKa6sz9OL0NLjiy0TEe
+1urZUAdyn954hQkcYqCb/dyNptjk6/fZBTSVf2d8fwmsLb8adh7m3D4TEwy3
+ct87noTH97ptMIBT2w9JSV0zeH6kwZWmxF3Tqx/AlI/lRRnMV7nUzcT9rQ9c
+7gaQ+tWzE0Ewx/+7j1yYI7E7Wgb3b0xpeO1CU6aRPdnjMP+N6PETWDmnPX09
+9unsKC/shGmJ/6IzsOmqmVd6YNasJvQlrMixjh2CA8sUW52Rj+vnxeum4Sza
+XhAOVxxcVc5Hv1OG2cnJcNrxbN9AWLGioisRZjIkZ/fAvTOMnINhn5IZ/qeI
+K9RfW8Lsw4CYP2BmtsylDf0GnG5sHyPz0xajCbBP081XZsiDKlerdJjf9TTv
+gTMsFFD8FNhiU3SgGC5Y+I73F/IJ9prF9SZ5Wg8eXgtnlIykLoOtFjf1XZ6P
+OXlujlaw6eTRbxfD/K49RePoJ8hoeK20Qr8rfx+/R+Zfr5LZwgLfa9X5sHB3
+tbrREvcZWVetI5Z5LNsJK+UDjTPJ/LMCzqyEq7uXptwg+RlL1i6AOSs7wqVw
+ld+rz3iwcDBH4AA3KcNbnGAfP/u9z50xL/+FOBQO0yw5Vw5r+v50OQwL0hM7
+dsLKd03FauJ45tc1pK7waHbDfLqEKJEDrPUcLs2B5e3dEgs4yyuz+SncKK41
+M4FPrQweF2Jf4eVdFA/Wf+DYMTBjHLdIQKxddZfkM5o1+SoAZk5bTz+GqQH1
+gURYeEjV9xyu23b7eAHcmyDZ3APrB36+0ghTK75R1cIZDYM2/8IKT5PH6bC9
+/KSnOfZVmC+PsYOjzeYni2G9X/35esxXIM2Pi4CTfro21xfOF3VZp8CM59il
+WuxbplFMpMG9hTFhtrD2fcST3Z/ea51THo+mPDKfum+D69965bzlIr878dpA
+WKO7fzkJ7m1xLLIl/Q8UnhiywPuJFPn/h/k2HfNuToP7V9vl1JJ8w63UPDjJ
+wHNLKvGjypoOc8yrO2lG8tGwgkWnYcWuueInTvg9FL3pyoM5u+VpR2Bmw1fS
+w3DnyLQ0CM66+SjuHLzD3bzWCI7eJ7frg0efvcltF+D9XchzXYh+dRn+w6Ww
+MIrx3Q5nuRVFpcGpD6dkt2Bq39RwJKyfvaXGCvtUDblxg4mbp+RSmP/jrbYg
+uECXf/13uODZy5RwOPBFT9IM5NNa08Amw01jLV+KYHm6Y0Qu8S/vjoXAbPdT
+3SVYEF3fHwHbT6rWqGElVxm5Bk4Ktbg1C/MLQ5xyrWBt987flsOsbKlhJ/qx
+9hf2byZ5xFbtZeAo0XBlJqw5+LCSA3twqWdKWCuqEiiwT6NKHHgO1hlXxkyS
+/L433FENt2be8EmE9Rcrwkm96QfeBGuGeYOWlJXA4snFY75wluFEAgNz5m3d
+VPsF8vAK27Ge1EcNKC9Y6DGitYTr5921bzPFXh81hWSfkBCp9x64f6t3djHM
+jsruiWB5W4/NOrjXQew3F/70/+CIOjlN6P8BDe0+ig==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.763809742330267, 6.7361902576697315}, \
+{1, -1}], LineBox[CompressedData["
+1:eJwl0w9MjGEcB/BHXX82yUVDu7t0FNGViqiQt+2cs2ZyazlpIR3RcbJLl24k
+1cr5EyPpMKzlRKflxS01x26c2erK2TXVnFxlw/zLn66bfJ95tnfPPnvfve/v
++33fV5irkim8CCGpOOj+fy1m/u/zGdK65mjeBpij9n3jDfOX7l3RAFsUiojx
+eQz5Y2qUvYe5P2S9b2G2+6A5Ioohcn7mGRMsve41lANrw3eZK+CBIt3Zk/BY
+YrdSAovt4pQWOFhpDSdwovQFMcOetJlOVsgQ5+z+Jguc7S937IZNDd/uP4LT
+dQlZfFjJ25/XBMe2LGx8HcaQ89N7aqrggMvqtjq4o72zij5/7JdYkAsv8/FZ
+EEfnYZ0/k+B8rzTNFFjT//z2XDi2LexOL/LkP+O4Z8Jfiy+5bsIaY/PgLHgs
+pZhbAWvdExcWwo07iGUPbM1YbhTDrnrV7K2wMqqSq4TNkjbdFrhvU7hQD0uV
+jl8K2E5kzi5Y3hxdUgabbJlBHORZ5rxSaoA9xJC3gub/u/nhANxqn7yhgC0n
+9kt4mPfAjJUOHVwdXtOxAy4rf6O+CUtF+yS0T9ur+JIHcGL50y43zC9sqHwI
+m2ctX7BOxJCTvsy3W/R+n7+IzsDBwic9p2CWZSa64U/vuO6dcIBPkZ9fNEPU
+gZ1founzCt5J4uGMbIHjM+2zWCNNh1mJanMTbE2tXbcdtv1cr8mC1dahhFzY
+rBAdnkbz2yUdmfS8dKO8ci7yJc2JXwNfc9Ufc4ciR+tjnQB2joasL4PPL0lJ
+HcM8msltd3lwRqdfzDM4f6RGbxOgt4u2gjq4uvqI4TpsTo5bnA9L2/28a2FD
+S0xlCmz1VGfpYbnxaTYflg/MGX4Crwo5uIQDc08/P0Rw/3pO3/hv9JW4ytUs
+gyOPvOSP035PRAruwX3jqjR/XG8Kfn+Xh/nVN0LKI+Cw0tp+mudOkNY3nVrv
+8P4Ii9cKC6tgVvdy1zya39/4mM6vIb0mCVxxzlcViLyGAC/Odlh0dVKfBXPs
+ozvp9xM5+D3SAFviVl/eC2uHN4z8gMUlZBHt12yY2pEcg/drilq7kvad4+kp
+geWD7Ggg/InXzRrhWOPEvhbMwyl0FzngD12tI4tgbajL8h0uO15wrx75PJNY
+sD/9/0OZf0nWbpA=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.613477323709358, 9.105546654636697}, \
+{-1, -1}], 
+        LineBox[{{6.999999999983629, 12.999999999992724`}, {
+         12.999999999987267`, 16.499999999996362`}}], 
+        PolygonBox[{{10.51826734053906, 15.052322615314452`}, {
+         9.683281069670574, 14.102165824326175`}, {9.280184249251306, 
+         14.793188945044921`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {9.823799910437668, 15.484057296392571}, \
+{1, -1}], 
+        LineBox[{{7., 13.000000000003638`}, {13.000000000003638`, 
+         9.500000000003638}}], 
+        PolygonBox[{{9.48173265946094, 11.552322615314452`}, {
+         10.316718930329426`, 10.602165824326175`}, {10.719815750748694`, 
+         11.293188945044921`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {9.823799910437668, 10.515942703607429}, \
+{1, 1}], LineBox[{{13., 16.50000000000231}, {13., 9.499999999998607}}], 
+        PolygonBox[{{13., 12.4}, {12.6, 13.6}, {13.4, 13.6}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.9452, 13.}, {-1, 0}], 
+        {PointSize[0.04], PointBox[{12., 4.}], PointBox[{7., 13.}], 
+         PointBox[{13., 16.5}], PointBox[{15.5, 7.5}], PointBox[{13., 9.5}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T15", " ", "P2", " ", "N30"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdief/fiijghgjhj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdief/fiijghgjhj.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {44, 44}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwt1QdUU1cYB/CLgwaZImisFIJYRJAYlNooJHlAWsBRYloBlREVaUQs4AAq
+tEXUQh3I0IgDBdEaDit6tKFHxRRXFKGcFmhYEkUF62IvBfu/bTkHcn65L/f7
+vv99j9hviJFumkAIScYvfSUm9A+bIf/+uDBEFv3AZvsMhrDjVaNtznh/uPNo
+y3SGpCzYekELW81ddEYIV+xMCvgNdr/1U3mBNdZ9hg/T9fy5CYIpcHCKv/Qh
+PGnpq6TvrBiiPeheY4D9Q4o9PiSwvPRghhv8VXvIFMU07DdqcGgLvLcjXOIN
+61d/4lVK+3H6vM0Q1qxpvdUHv/S1TXhiyZDE/J2DHvMZclC5u7wZVmY3nEmF
+53s/7+qE61gX827B7BZFlBE+T14KDd/DR3bapHrAfsHWKxe4wu5PVN9Sd6Vv
++BK+ti+to5La2aRmM1xvuEI1Gf0Sm6CrcXDyvNvH/WCL4ASzLbD4caQ0FR52
+WbkuECa77o+VwhzPjR3ucN1IavRdOm9F4j4WnLm7IKAaVvok//wn+hG/iFmv
+hjVqS6vjMCc+evd+uOtrq8frYKsi1yoxzMspEtvBK66lyjvRn0yukz+jeXo3
+t+yg84mjVl6GT5mVpXdjftVVo9MHaH7fhf8SRvO4E579Dc3PZ7/01lSG5Lre
+/iMM1loEXnaE89W6jaGw3P/S2gMWOD/lwPEoOPbkilVvzBnCN/zY+kfYz6nn
+s0dmmL/o6u0yuGLp9YgBU1w3K3rkMcy6GN68EB5e5BLLQb+Zx+IaT5ug/86n
+CRGw7GDeck9Y/uiSaQnMm7q22hhmvXs2oR/WcPu/p+5q95mzBHnppULhp3BK
+aNj6RFjbfq8qHSbxQb1lcL5y4cAQ3a92xq5mWG56U5KE+kQqdxih6xPOB7PQ
+r944VW3ExX2zbIx9BNYq35cYw1r+tdJpmE9Zl8h9T/fvL9Imw4xxPPspPNwm
+4N2BOcGNrytd6X02z60LTm9yup8BOzEOY62wdrBdEATrPNf35lMHneTPoudd
+FqhdCMtemenbMJ+u7KczOajP8/OJOgsn2lX23UG/wT4mg1vgrriP4v6g8zSc
+ihDQfNTysuvGqMtMXTyTXp+V8XvWFJxv/LkoA3p/O862XmOEfMxNooaQf2KY
+TZgtC+ed4Nz7Fk4pGS14aciQ7uyXpub0et/SzbWTcV6hN614tJ9nDStrJqG+
+geZSKBzcqUjpmYh6oa+Hj8IWfxbKvWBJzJydjbSfr2Kkv03A+zx7iQ3m02zy
+8tgOax6kxUbAsRmaikBYFsAqKHalz9XMcTnMrmlXv4ZZu34cPwc73bx33Znm
+n5laPJHW899jGQpbeKqXJ8NMle2hPXD6ushnk9CfTnxCcQqu8+VWZsOq8jjB
+BZj/TtDwIeZR5nl4FcKZ35zZkQ2zN1VZZ9Hz9mGr3sD549va4mC5fLl+HvKQ
+e0eu84VzawSmS2HOp6q2aTDx54hnUQuJPb2f9E+F9ffx+UT3N9w8+jxPnxvr
+B6tcTvBldH3NFjcF+smdFBjjSM/bvP77CvSvuhHe1ou8cu2WNF6heeVtZbQ0
+f5KXrDDA/navO5XUfuHsCIL1u0dyFfR5mfzXDum4iGhm5MRnw5JziysevRUR
+mef+oVM0fw9b1YEREelKe9x6Be6WjmsjhkQkcU/t4lY4P/xv5x8GRCRlY32M
+GfpJOTza9LxPRFhFAbJl9LwyZGPlvSKiSxuVH6L9v7cO1PVgP3N+Tj3Ms7/x
+IgKWBGRdsUEemoHKPik8PF54YgN1ZEnfCbh7VaETzVtWlvSRG/aTK/amtcB6
+x+f6yagXW2sgNlqAeWIdig37RUQfc3OrM2zhmlRti/50XGG5AOYls7fxBzHf
+Erswb5hpSrgmwDysh8l7+LC+/27VzGERCW6JbOHAJIh//FeYU9JS/Q71uptb
++abIg0Oyv6yl5585KGbBOsuonmO0n7eOhWdxPX/k8r4QmPnCs12H/SVPq7l2
+dJ6t2tUlqE8ci2d30Plttzs40P72bU6j969EXdfki3kyH2xbkUTz8gocc8L8
+uU82GK6GZU2S86pXmL9d+PtS+v+m8coH9V0iogzJmc+l+Vf6Szo7UE+ofke/
+bzRZvZ3zHyIPxcxohq7zTtuzG0SEOW3bF0ZdtGjv9XuoP3o+ZD/9PpnoprFU
+Y74Xz+s1rv9/Tx8R/PfKZf4BIR3UrA==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.545705156331749, 15.828020625326996}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwl1Qs01FkcB/DbZJnFMgyKoxojPeWV7anmrweKCoW2nWrSU1o7JVJLHq3X
+JKaIHtLUqdSUkkUhNdFmNctO6JSIOdrooZo0FZrY7z075zj/83Hv/97v73fn
+/x+70F8DN7MIIXvxR6+kYxifUQzR0KslQy4V9r7KhMk/Hg1Z8IH9BgpDWGrm
+sP5H+Bbb5+MeK4a4jEsf9cmCIZdv6q634f/SNyP1m2Ar/p/n5sKykFBFA3z2
+uPD8KVyZHLvlL3EtWPlqlwGuxRYmk3iYF+l5but+LkNEI9h+u2B2QP50A1i1
+7O3Gp3DJTEvZeXPMr77+LRD7nrU6sk4I81obHz6Cp5XrdTvCKp9YCyFy+hZ1
+rR8Fy24cbeiAu59xL9jAaqdqt5DRDGm63BzgDhMnx+HbsNvG2qciev9Q7T2O
+NUN0M07eOwlr/Ba7+cCL6qa0dsLSnfa+oXDB3qrwicjH0+NnroWb+RFnd9C8
+d+rZc2BHkfruJeq1FcEDWF981WdPK+zi1ZZRQPdT+475AnOqM8yc4IKt5v1D
+MIms2FiEvGuycza/g/1vPGjmw4dPXBmuhRkVcTuKejXP3a/G0/ms4Ggj2F7r
+dZFP1z+8bksG+uUqSd90jfbH/495Y+FfmkP2Tqb9kK9cex99Vz0TRhw1w9XD
+XD8drnL6mtjPYYgiSGoXBq9URm9eDUvjpLbbYJMPp7ujTDH/VmpLMqzu5NT5
+miD/UuFxBcw+umLkvB+wv+nchZbYz4+zTxVojP22hf0cDwdHFUpyjJD3Hit4
+ALbqrw4ygF0ay1tjkb/dmdVWZIg+1feYjUS9c4wrJqTB6iyWQTIsEucWZsPF
+0cf7v8LmVt9WKKmrS0s3oH+KA+sfT8R6jPR9TzEcsyBytIzu9z4o9AWsVkam
+TkYesj19mQ4ur4+tvAn7D4kDtPBNvs03T+RXm5w43wDrBk/2VMCiL2EmErhm
+UkafJepNSFx03xFumdsy5AeLEhtXViJPTHypMgQmn7eumAUPHcpd5QqLRzTZ
+FKE+2486s8dYj9NZmDkOJiZeNktov6ofnclFPxhNHk+CPGLPFFNreFIaCTyN
+/OIzXFKE/h7TSsylqNc/NrQihD43bvJTm7/H+X66smYMzJ/RkDmFjfUqXQoJ
+rPvosPq1PsbH7OpiwfkTcq4Wf4e8HV137OHXMa59aXoYD1Zs2QA7pUw6GTcS
+6/d9Tr8J79bzKcljYbzp0ZHxyGN+f4qwYwTOvy6s/TSsfdIWGwy7ZMXr7FFP
+prUshkXHd+ZbyeHAUgvLLoJzaatyn4p+ROxwju2DZQNBZ2SwxPGLyAnzxdb2
+8/XQT8P2UYsyYenn2c3+8L7VrS1s7K9xkgQmwZVJ2WHZsP+tpca5sPC4JJ2P
+vJqe8of0fGy5gkQ5rFav1qPfh/LQsoFxqE8abnvYBp5xl3swBuasCXtMz8tG
+47zwMvXvqXFecFqXp/V12OV+vHst8qeYPPdJhsV6ByJmwheDFFkOMInJNJKj
+/nMHO5YewX6Kt0mED5fGaHc2Il/xMcdv59E/nxfcnZ2oh1jWWXrAL9dldf2N
++kUbhLtf4Tk1zvP7iRkWEIVzv2UJvEP1zPQvnYC46HPyjsH59d6vvAcFRDpU
+ZVYAewyX+D7+IiCabVGmNfS9Y7OgJeMT5r/gZtHzXTUtxS3uo4DwIqvGCuHx
+qje2lR8ERPYknP2APu91heEBGgFJyNNkeiHvxbJw5bF3AsI8sJ2lhGN6/z28
+7q2AqP2O8ALo93OwZEJfL+73frLqISxLDuR5Y1x0m5m6GP1SGUb5e+N+zSHz
+ExeoM7Rdze8FhFN/KlkDu5ctjH6O/Xj2S1jj0H8yJU0+iDy8GwtSnWGLoU1J
+o5GX2C82tYNFeaPzHbRwVr2DFvdrU5ZHGNH6puk65XCGSVJ4GSzzaLzrA+9u
+rzEy/4z+HUqUNiFfr0J8jQszL/stlsOxT/auuI75qoOvVXdRX3uAa1831i+W
+V8ndYYutzR1l2F96dVEOfb7ae60Oje9D/TziOp2eFzs/YD7yM8+nJSjpe3dq
+a64D+sFEeWb9Rt/Lht3Tt/cg32DKLG86fme2MqoL/VX6fXChDpWPfftUQPyv
+WMlnw4rsjXEzHiKPb3SNCE7QGdsuVKCfuyeYnaPvcfpJqP7/95fL/Ac/lbt5
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.128720493773297, 4.310154074720437}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.00000000000106, 17.}, {16.49999999999894, 17.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.25, 17.6952}, {0, -1}], 
+        LineBox[CompressedData["
+1:eJxFlA9QTFscx7fUvDJjee+JGuXPvefNY5Gcq9VkJr/8eXbVa3qkUsafVfqz
+prJpUGJRNLymPLZC78VEWhH5U2vRtsZKjJSKsJJpp2yZUYasJu0752nOuzN3
+7nzmnPs7vz/f75mhSF4V6ygSiVaQl36fjdjt9r0+IPrvQeAfLG5OOkU4VPHj
+pnkI/Jb7fMvTE1b/4zVtDYKYYnFchpmwi0FSkowgNr0yVyKaD6JIg7YuE8Gr
+8Tk1BxDh/JA71j0IGqbM+xArI9xZbBqXiuDcdHPIjUTC/S+tl6IQNA6YJsYd
+Jjwz/0SLFEFcXuHwn2WE6yoCnV0R9HgEKTbUElZvvuLbwoPb8SHD8mbCTW/N
+lYU8TM6eL3ndQXjj0FdbJA/Br3yzhrsJx6d11XrwYDl+NqDaSjhH9lOVmYOy
+yPzciB6anzgs/iwHIRd6psZ2ErZpsuSpHJgnTU7TtNH11ZnKIA7qJZl8Qz1h
+UUK42puDr6JlgQ46wjpT/10vDnSXCtPDztP6Av6yenCQsHjWwq4CwrKgX6by
+HFyVvg5/dIjWeyNl2I8DwWnE1TODsEtFVEEUB9sdZ8gfbqPnG132HOQgNHd2
+YtlWwjs7ktr0HCgjWpaupiwrLVV85uCHQTdYTPdPAK9ygYfxxTO1JTSee2uj
+XcWDUT43JukIzW+JveYKD3LjMZx4mta/r8Snl4ewX3N3eOgJ+73v/OKJoO9j
+3uYnz2m/l7VafkOQxhl+v2YjnKL44L0FQXbpor6GKZjUJ9u1bxf6rhOg7Og6
+Vo0gfd29idKY/9e17XA1+BBm/wsuKcU+5ZjFr2hX5XSbMDu/OmDrY80bzPIL
+qH566ugnzPIXb3gevtFJYPVNcu411IkFVr+mfM7tiz8LrD+XVa2atZRH+6e1
+dVT70v2j/e0ddBjsovFG+6+8x2kX2DCbT0HdsweeVszmt2JVfHZFO2bzRUO3
+akfqMZt/RNN+s1SHmT4CLe8OJ17ATD9Va9zfnizBTF9R55NV5UWY6c9/S7RR
+XoCZPpunPcwYcwIz/VrTG9u4M5jpu1fpDPpKzPTv3n3979NGzPxRo4wfk/oC
+M/+Euvr3FX3GzF/Rb/iqlW4C85/U0jTh5EKB+RP175DtjhaYf3XqP1RtewXm
+75vrB4qySgXm/3r9E8cUk8Duh/vXBryPWgR2f0gcqGAWsPvlXyACxJo=
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.25, 8.354800000000001}, {0, 1}], 
+        LineBox[CompressedData["
+1:eJwd2Hk81OsXB/BvthCSRLYMCUUMWim+3bIUlSyJrCWSuJQQqSlkS0iRrea6
+ol8pa0Ulc1WytLio7Ea3ZEmRNYXf58k/Xu/XOc/znHO+z8wwSgf+tDrEQ1GU
+wjyKIr+p4Tn8SNPU7x8pmmozXbwpcilNMXieq5nBseaml5bI0BSzvGcwBN6Q
+bTKUD3NN9F9egeuEuwdNZGnK0u71jlS4z9tWvBseHmv5eRouW/Rt2E+Opjj9
+jrE7YYkVf3tOwYWRXwr54A6X4Sf+8ji/b1o1bwlNWfwcaW2FG9pY4RvgwH08
+e7UUaIou0ZWqkKSp/JozOT4wK2OgbCMcoZIllwqzWwwzShbTVFVP9MwtuPBc
+iDATDhnNOkHMld67oVSCphLDKuJIfmJJG48xzC13EDsBu06+quxdRFPfG1QD
+TMj+vl2iWXBdcc79hTBjLubOETjAbqPaW9THCnc/uAdOlI6mM0i9HnMff/uC
+RKAHPHyQ/tcbbv6xgs8AFl8WUkr2E/skXyUPczxkl36Cj7p/mBKD/aa3ZRmi
+nvy3gUaSsGWigVIuHCgw7qwFczcLD0ihH4mlJkbOMLPtSmscXPzBpvNvOFHg
+U84cvFRfw3wWZpftEvXBfEojpsq9UT+HpSLzBm4TSonvJ/M0DNiuhPmGVNwP
+DliGeunMOhfYJOgSW1ARLsvJioLFj8RV/wVTXtfLUuBbffyPFBioJ6lA/gKs
+OWWbfhhu6KrnepL8N+b2BcT81UwNOPZz8q9vsHh2Nt2C81/+aq9TV4J16tYc
+g1fPHXfZBw/flaRmUL9B+/7yMJgxuWxjGJzuIWdyFW7QetA3iXm88fj2OQ+m
+lwRbH4ON1whN5pP9hLo5I5in5JumzTfhxPytf4TClQs8h9NJ/gaZU4vhuAuR
+18+T8x7UHH8ijudhWazmQ9bf2eJ+Bva4L5llSfL5pDL2wSx9vrV6MJc33cUc
+vr9LS0uaxO9JfrKDj7+wK5tFf4zuK2ZhsKd3ZccgzBqPTi+HL/7JOMyFqeKs
+USGcb778j/edJL9I5TK5Tw1pvSafYGZivMh7uKrpuecknOi5x2cH+jtkLR0k
+ifOYhttOVcIiX6cNNsGsbNEhcr95VTuFfGHXgx7pafBEfMUL0j9npLBiDO4a
+F/w1ALOzkpUNMe9vmVEdusrYr9/Dhsx/U2CJ22k4seHC04vw1ms3HOvhQguF
+niR4+8ydi9LLEW9+rB0KS01c+ccVtnzTa2YOS5REdefA4i+OveMl9ys4VegD
+TAWns/Jwfijz520pFfS5auu/G+GvrCUJW2BGG0eU9FOyMfOjG5yYWCi4CR7j
+sbAMgrmtHUP3MA+z0PrBs2S9n4uwLqwrctn4HEy37U++h/lqXP7icJI4p8LH
+GJ6yWB9/GKZelnyvX0hTP18IJO+BOd1OT9fC950zDq0j8XzWl1diNLVeKUlD
+htQTE7j0KqwamaP0C/XTN23fXoGL0qPP9cAsCZWIanjofJNvPcxwuOCihv3u
+8fK/ewSzC+rSSmCx6mtupWQ+90zNdFHPtBPz4H2Ye95aOA3OcF1aXUX2V9Jx
+I/dhnHOZv43sd/Os3mnYuzFejZxv+SFg/XeYHWjzWB31ia8e1HDFfHiT9/7n
+DA9b6S96Cq+wTbXJggvbtV3I+8NV00jfDzBLXmjdXvji5FVTzRXIL9wdfQb2
+65+pCoY5dW8NEmGfLI+85yvIffSho2Djt5IPxFURf+WR4Q7baknU2MHDi2w8
+V8J8wsntV2HuqmU173G+X9V5vUbihA9N5PU4M+B9iEcN9ysuzX8W9f9BZXmp
+w5bcQa0zcLG2X+5WmNE/JzZNXl/KxRPWMGdsj00AbMmz7rY9TJtVJfRinvPU
+j0TZwq4nVlNTmH99pVS5Gcw2/ctaFc78fL1+DVkf+M/tk6K4Pzq2qXIwa9+2
+9CkRPJ+5c6vnUJ+r6GxrHvyDX6Gqh9S7uE4uFvZVGU1+TuKPQvqvwzv3+Tfn
+w7SOIPszrH5sOCENpuYZnnXC/opSqanxMMtCveMnbFxa7hNL1gdd2PEI9eiZ
+xK9NgtlVb6lk1K/Y3pGbDSeGx6VsQn9VtSYClWS/9oTCIvjlJVvlXrhQ/8rZ
+5ZgPr/xlW2nUX7hIl3sBblGLit8Diw/pz/bBlwW37E0m/W6/m6mHeZs+kxho
+I/l8KRu9YL7dRdtU1RH3+ro2ClYQoTYehympHyNx5PUmdiW6EmYere0KhAtf
+Tv0UXIn6OywizOB3E+khO2FOTXwoDzy+46RSHMxc/qdTHnl/sgq345B4eEau
+Pnl/jerqGoT99N8ncdCPs57lB5FVqLfKYmAz3KSyaVYZpvTDC/7EPJ6sf79N
+C+bWVO/0xLxupLlu1oYZb0QZPphnRNSRLlWSz4maIc9H+ppfuBRM/y+zvHYB
+TWnHaXbN4Txqa+ozJtz3yvTjR5h9w7z9uTDujzPz4QuYJbqs9gJs3jWWcYvE
+8wSMouCHCsrPE8j61xb/lMJzbrn7TpJ+vj/Jl8B+EqlPtnuReYxoWWfCRfa9
+Jm7ER+dWm6MeWaW7eQfI/hlsFWnU+3eGgbMvzPgf78cJeEW7+FAE2S/YZisX
+/YX0RLvlwlzGw6Ia9J/iaGzdSGxn2GyF+dRIXO6bj/4aol0u3oeD2jO7jcn8
+5KkJYcx3aMd4Ruwqcr6nogWZ9/X5G5pJvmfV10D4X5GkNIYG7pfYo40x8PZh
++2gf2DWmq+sseb3t1a0ugznvmv91hZc4a6tRmnjuE5/k1GAnevn/tsDUTHXD
+O5yfr2AVEwoPa6tPHYPDy4Pt8jXJ++dQ6yzqP+htx98EsweOeM6D3cxkvn8l
+68/bJk+if/kj8iNzJP/tWOcg5vWXcaO5wGr06/+2vQ/zTJLNecIDs3afejqF
++d/xmvGbQD53XGJOBQ593tj3AWacL60+IYTX+zzN6VoSf3LjxYggTS2oOFhy
+B2aFruvIgvNujpgkapLPd7v3p2Bfl4LR48QeSz0SYHog9YsDyW9yFGyGJdnz
+t5iS/YTElEyxf13WqWp9Un/DcoX/4HU9L/jWk/ys1gI26vnndcSKzSRfOVop
+CPW75MZ83knid9/ccUR/VTdbUrxIvXdlh0zQv+QqL6Hf9bzjM9bA829KHWRz
+SLyqz2EO7ntwYs80We/yJLwc83vj9ibfAPMQZ5ulqJP70Pdp5Bxs2X4pwwWe
+C6pUfA0zM/2Xk79PcguUFshpYf7rDoRFwnWseYGesKvBkCB5Xl9bnqgVwYWW
+RzeRz8OCmRX8EzBTeAGbgqM/6qqt0UZ+jn/ITpzvbsL+5gWzesMEAlGfobi7
+bApM+ZtsC0c/kyqO9Q9gdmfDw9Po9+X91NTXZH2LRtExzKNMqDWmDWY0uVd6
+YV5vdRWVO0i+oaSjL+Yps3KzZTPMeW7jHYv5p42WeT0jcd+Bpur5+Puw0FXu
+LtkvTE5RA1b207FLhrnG29UqBGhq/2lro0BST/mDFhZ8c/HChfYkrqA1Pxge
+0inmMST77dN3yIatqryN1Eg/jYOWM/CZAMZjKZhu7HSMwP4T1nqaYmR9mM9i
+HdSTwas2RMzxEDz+E64Z6JyUIfnheRvbUH9F7tJ32qS/zw1mT9GfolNOpiXJ
+39UnkY/+k0WCB0LJ+U06ouT9Sqyy7kshyZd9oGSN+W1vnPD8SvJ30/KzojTL
+zOrQARkm6jN8IRouRrNsItvFDWFGgE52O+ZfKZCk507ixcXuvAtp1i7NeQWx
+ML117Nsk8n1Ofj5YSOJnp+aXw++1XQ2ayfqi7EwzWNX9ru44TLW8KL2F81LW
+qXtI6KA+4dt/fEJ9u+Y3yWrAnIZH/82h/jPlptWGMO298yIvHPkwRnKnDnl/
+4zCn0f+iyqRBW5ibu87kqyDN+izicdSexLVtDw3Mp1k3c0pH7Ejc/sOrKQGa
+df7S7AIrst+oyLQy5r9vLCzUjOTvFdngz0+zyqoE1TeReIKX5QAfzdKRNZPW
+IvWYP9yUDH97eMdNkdSb+nHElw//j0xcU10EU+7a9GnYodKGxUfOywquq0R+
+dvFo0DST/L/zTZKJ/ROiHKdHyXxq792qhY9lrn49QuIar/ZFor76ILe4MTKf
+uI5QB9wH78cfL/8i8+sJczLC80/qOSwpTOrtW5m1Uohmufeyp+RhxrAVW0yY
+Znkzf46vIVYa4/sIt/Q3xOwh9YVVLmIvoFnmf/fN+RNbaSnqi9Cs0nfiIVdI
+v5f4xm/BwoasHw+JlW2WDsGZZSlePcSFpQIzeD4OkbG35+vCVdqOrYhfTQjP
+1oS5oyYfziGu2/aX0W6YmvSP+oXzHEeOxvvCnKN+RuZ4fip3mA9jYJZR9asT
+uK88zPcMNvHaG6ci0I+aL3d3Edlv2v4pC/2ypzTEKn6bjxuA5ynm7ub0FGYE
+DR/2Js/zcOfJZyRepN3my4/6ilRaOKS+TgeVGDwPe7kpxXIS19fe8pQXn88l
+Rivuknqm0xtV4P2LZbp/n19o3lDCg3m98nK6RNZ7bDQNgBvDPSrCSb5M7+rD
+PDQlHBGrEAiz+1fuToA3151NOkL6bfaz+Ix8zrMoqQPEA3seePPSrN32ZdFO
+pN533lukUM9Bv+o0YtdV56hu2M34VC3J56799fQx6u8M2evqQ853WhV8A/3t
+MA04Gkb2m1FKvoj+136Z4ZD6uLJXz/vgvtfKCU7lk3qGv+hswPxUJbmB9STO
+d3X3J1ho9aWAIbLftr2tRzFvtWB3Hgk97Leu27kG92O2v3/JBpjbG2Q+ingw
+c8tlZ5hhflx6EPEfN/idI2D2++iDBYjvN/Dff5Osf9z6awviBbKa0bVkvc3J
+2ly8Hlv0d8z26pHvJ8yv/Yf6Zsn3N2Q/8v2NIP1/jDpz6w==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.272475489649668, 5.171062742038147}, \
+{0, -1}], LineBox[CompressedData["
+1:eJxFlgs0lekaxzeSRqXt1rf3/oQ23/apZJtFUapHJyWqQS41yiW3UeO4zHHN
+uERYFKUJKdtWNGWXsyu3cRuF9tAocteFVHLUaW3KYUqc9ztn1jvfWnt967fe
+/b7f877v8zz//+ojIc7+iiwWqxj9mPf/Hw589b/3SmB1OvLOiglYevPZjaUR
+iMVs1zoXAoR2TjztPxA7iqhWPQIyor8r8UsngDXivHJWiYAzdNF0qy4HWPp3
+Y9MUCRBpzaRWVSOGB3QySUBd//2kvH1ctF5iW99eAmynFZ+MPEcMLm2ueQQk
+b9QL3+/HA5bwtG/3RwL0f7u8hH7CcF+j7REO5KfkqFoBCaxEv9ypIQ68kocc
+pM4i1s9JunKQC4+UqQtHf0fclJM3PMCFXM/gpxGTiFm/Thrt54Esen72OksH
+WKGuIebNPMh4b77V4zMadxzmrTckoV8rtLHpJWJ2jeRVGAmPv0Q8fFLPrO/T
+M3eNBJ3NFu1uGYjFHw5ry0go0IrIOuTIjFdGvmgnIesP18Cjmkx8QvWNFSRY
+X0kN1R1A8SdqVLJTSLCfNslcdAWxfu3NE9YkWNbqrPKLRiyfW14ywoMjbNMW
+9iHE0qVp3/+DB8+fOS0BJ8RNw5npc1zwHBMP+3+LGPpLqXgubA1ROM2NYc4n
+xeKXeQ54VacpLypnxsM5LckcWOX3tmhglpmv8+i8BgeWFZd6HTiA4oPpZnUp
+AW6ruTVe7cx+Jq1jvAkYuL9VOO+Azqfpwl5rIwLE4rcvcgcRe69/3L2YgKfv
+4oOXhKxC8y9yrrIIeB/Kvjakoov20+w/o0XATpVM1dAixPJIxTfbCRi5HtZo
+aaaH9l8vj0Z54ubM1nxdw/DUM8koAbyTG3Ptufpo/pRnwV4OOFXpvE/ai7gz
+cPHVFg64zdj490YhlpdEl23ngs6TfaYheYhDh3ZtuMcFmV03Vy5B3NRlINvC
+Az/36qs/VDLzM5sXS3kgsXo4mFXB/H/fG2UtEpykJrLdZcx491i4PwkBH4aN
+tfIRs66FtolJyDb/Nqkygfme5rGYZhKEvWH+Vr6IE1V2K6G8CpDbTAzsQCxV
+KlhSi85NV7Z8VICYzdZ1zCKhxSNrq2gps55U2GBPwqKhOOPwCbTfzpJ/bZri
+weGer687PkB8Rm3oYjoP3kmGUtc1IJa6t4do8GCRe12c6B5idp9D109cqF9p
+3BDwDLE8zMFEmwuZpc1t61TQ+iMK2ioXOPDIyYUnWYPYMcWzjuLAOB2sUXIA
+sbfllx1NBNQoReRwzzDxu/YoBxPwWC/hbMkjZn6yZ64pqrfwbFGK9moUH0wU
+qhLQuNtv2x0vxML1NpULK8FqOtXtk4RhtQWXFQR8ut2cv2wWsXTYo9OSAEHn
+DqUiGz7Kh9bLh2IJOFEbaHkiFbGQp0R1EdC3EFtW24LY238kyIoDpunD6bmf
+EIt/3llWzoGE+ndxTQIDFI9rTe9aLhzV9AncZ4cYFExTJFxIb0g5/sATsXjD
+SzOaB9PaJ+22HGU4amfcJXReSytiDI4hPkOcPqxEwsCtTsfwI4hDH1r4oTwf
+TWsm0p0QC/9m/CqPhG3hrfOrNjHjVc56v5Lga+SrZqGLmGUz6Yvud+vMAnr4
+eLx46NJk+ws+nt+SvUlhtJWP1+fHWo9HlfPx90usTf95upCP41v4j0Pq05/4
+OP4V72Kr753n4/3F7TieYl7Mx/sveC/Kv1X91/mctNVM3jb41/n1xOhHBSkb
+4PM1UTzparvZAJ9/0q582Y8xBvh+npvVzXk3GuD7U/3GOvCDiiG+3wfLYq4r
+uxji+7etudi0R2yI8yMpO9Tn+IQhzh+z0cS/ewgpnF975jOCx0IonH/kYM6/
+PX6mcH5aSCWvXXopnL/Rh6w3dM9SOL9LI48V71EX4PxPcrt8V6orwPWx/EZO
+fdBqAa6f3rwAiTtPgOtL8bzN2/uqAlx/cDXsrs9HCten0ivLqVWDFK5fkXqj
+tlEdhet7Dzer4P4lCtd/REdpvH0ihfuDSE2/720ghfvHHafHllWuFO4vXRVm
+gjAHCvefojK7g6fsKdyftvyybmyFC4X717jgVueZ7yjc36iZhoI16RTuf3cc
+XqrH36Zwf5yI+y2ocozC/XNgICrytIEA99dTXJnYN1CA+69PfO2nXVIB7s+n
+2mYkGnMC3L9zM6HtuJ0R7u8VZqrZ5ueMcP/PF428YQ0ZYX04GPbBoJNHY/2I
+NzPp7N5PY32Z/kZVei6ZxvrjIrD+8uUajfXJ3z7B6odmGutXT5Ypu+MxjfVN
+S7P/s1c/jfWvO2a8cKaLxvo4XhI22cHM/1M/PVWCan8sp7G+BkjrZfJzNNbf
+Lcquv9tH0lifq6Naa7rcaazfkX6vC3o20VjfSaVWTs5qGut//oxMrKdGY3/Q
+mPHa21mRxv6BcztRSbJghP1FjXObuq0Kjf2HTkLwnXYujf1Jzld2+4M30ti/
+CG9Uxb70orG/+VhY/vlYDo39z/YA+c6+Dhr7I5+0+JxstjH2T6ITOtsqDhhj
+f1URlVJvWGKM/VddsFC5UG6M/Vlj64ObHZvXYP/ma98fHpG8Bvu7+LVnjWNb
+Ef/p/xYUmPda+C9XmtaC
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.0548, 9.5}, {1, 0}], 
+        LineBox[CompressedData["
+1:eJxFlHswXHcUx7e7pUobK9sWu3uzFhV772130hJvjjZBBolkZsdbUUKLeg0p
+lYSIdEIWsSE606gKCYISHcmmEYnnJlGvbT0a0WXKLKslTUhMgv62f/z2N3Pn
+zmd+957zO7/zPV9hdPKRWCaDwQhFj/Zts76NljUw/l8U7Kwz0nPqQVwdo5A/
+JKH4Y8L2xHHElcYrbZdJGOsJXv98D2K2XKpfSELDtYxDv89aASPA15OTS0KO
+71WV5jxis4S+iDMkeG+vWvfvQ1yfqZR9T0JNl5d1+KYlMCIv1RXcI8Gn89sP
+w+4gvrug8nhKgthq/8+vzmo5fYdQTEGwxHu3Ogox4wO3rVQKqkx7soXeiH1Y
+i/43KbCYu5D+3Anxzcy5wC0KXDfc8xjOiA2ONccBDWQqP9DCC7FFUvNWNg37
+XnfaqAhDrHj3GOsaDedexaWYfYM4t3xA8ysNB274/aWpQqxSqGdmaRAIHTPZ
+fYgr49uG5mloa7BZil3S5pMPFUzRIPXVPB83QvWl5FQ0dtLAjHY2yLdBXLrq
+3CGjIWaOK5p3QDzybEIVTkNowB1y3Q0xWxTHEtCQ2csy9dHuf31lT+ofFAgd
+ZSXmVogjefcfyCig60eNIl9D3DqwOHiQgtu3fBIUYyj/ZNAMYUyBJ2dL2VyJ
+OIXB4U+SYJ9bH/iGRFuvS0ZrEwmLEROB/oba88Yb7i4hoUruaBL0ixDFd1ca
+55Fg0evBcUpADB0/ivJJiHl0osWEQFwayAgqJ2ElPFyqVlqgeO3ttR0k3I4X
+d+SWIa5uvOc3jzgiy9IuFLHBkv/kLgrKyxIWlGLEkbSBayQFspbViyUmiFXu
+ccwrFNQa2X4yz9B+zz2VvUzB2kGbHPuXAmCov3xrSUyDUfjI/bv6aF9dMNqV
+SIN9X3d7F1eb347Z+wMNhS9S/k500MaLH/i0n4aPdsiibEMQT743aD9Dg8sa
+kvNJxIrGYckC6vd0YtVEnW5f86R4p0yh+9/zfTc/mNfFT5CK93ps6PK/7F72
+jGUK8fnGZiY6udu688+5GMen/KOrbzbwgjk9oqv/VtGZxw9rdfcjzxs5cDJJ
+d38V7TVpprTufi13MS9P9wnw/Tf55U5JRQLcn9ao4seHzu7C/TM3PRwQqyFw
+f0/91hLwRELg/n/RwgqqHeJjfaR99pUoOYSP9SM7Hab22ORhfTXETKkG5Tys
+v23fF6PJ53lYn3vt8hs5p3lYv9bsB832pTysbzW7aGXjOg/rf8xNxD6i5uH5
+KMy7TtlRfDw/LWUlnD8z+Hi+go8edbDt5uP5Uz4SC4bfJPB8Rg9K3x7zIvD8
+Vv7bf7grncDznT6Xt7lVROD5b2KPm5mcI7A/DD/NMuxMJbB/OJKpbWJXAvuL
+tDjjov4yH/tPSMhqjXc+H/vTVUnajf16fOxfEeNER3omD/vbM7c2d9tpLva/
+746/EyVx5WJ/9PL34zheMsf+OZTU9xNLzxz7q6JQvSbNMsP+W63W+rMp9uf/
+AHbvO2E=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.25, 15.145199999999999}, {0, -1}], 
+        LineBox[{{16.5, 17.00000000000231}, {16.5, 9.999999999998607}}], 
+        PolygonBox[{{16.5, 14.1}, {16.1, 12.9}, {16.9, 12.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.4452, 13.5}, {-1, 0}], 
+        LineBox[{{16.500000000007276`, 17.000000000003638`}, {
+         10.500000000005457`, 13.5}}], 
+        PolygonBox[{{12.98173265946094, 14.947677384685548`}, {
+         13.816718930329426`, 15.897834175673825`}, {14.219815750748694`, 
+         15.206811054955079`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.323799910437668, 15.984057296392571}, \
+{1, -1}], 
+        LineBox[{{16.5, 9.999999999996362}, {10.500000000001819`, 
+         13.499999999996362`}}], 
+        PolygonBox[{{14.01826734053906, 11.447677384685548`}, {
+         13.183281069670574`, 12.397834175673825`}, {12.780184249251306`, 
+         11.706811054955079`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.323799910437668, 11.015942703607429}, \
+{1, 1}], 
+        {PointSize[0.04], PointBox[{6., 13.5}], PointBox[{6., 5.5}], 
+         PointBox[{16.5, 17.}], PointBox[{16.5, 10.}], 
+         PointBox[{10.5, 13.5}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T16", " ", "P1", " ", "N31"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdieg/fgfjhihjij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdieg/fgfjhihjij.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {0, 22}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwt1QdUU1cYB/CLgwaZImisFIJYRJAYlNooJHlAWsBRYloBlREVaUQs4AAq
+tEXUQh3I0IgDBdEaDit6tKFHxRRXFKGcFmhYEkUF62IvBfu/bTkHcn65L/f7
+vv99j9hviJFumkAIScYvfSUm9A+bIf/+uDBEFv3AZvsMhrDjVaNtznh/uPNo
+y3SGpCzYekELW81ddEYIV+xMCvgNdr/1U3mBNdZ9hg/T9fy5CYIpcHCKv/Qh
+PGnpq6TvrBiiPeheY4D9Q4o9PiSwvPRghhv8VXvIFMU07DdqcGgLvLcjXOIN
+61d/4lVK+3H6vM0Q1qxpvdUHv/S1TXhiyZDE/J2DHvMZclC5u7wZVmY3nEmF
+53s/7+qE61gX827B7BZFlBE+T14KDd/DR3bapHrAfsHWKxe4wu5PVN9Sd6Vv
++BK+ti+to5La2aRmM1xvuEI1Gf0Sm6CrcXDyvNvH/WCL4ASzLbD4caQ0FR52
+WbkuECa77o+VwhzPjR3ucN1IavRdOm9F4j4WnLm7IKAaVvok//wn+hG/iFmv
+hjVqS6vjMCc+evd+uOtrq8frYKsi1yoxzMspEtvBK66lyjvRn0yukz+jeXo3
+t+yg84mjVl6GT5mVpXdjftVVo9MHaH7fhf8SRvO4E579Dc3PZ7/01lSG5Lre
+/iMM1loEXnaE89W6jaGw3P/S2gMWOD/lwPEoOPbkilVvzBnCN/zY+kfYz6nn
+s0dmmL/o6u0yuGLp9YgBU1w3K3rkMcy6GN68EB5e5BLLQb+Zx+IaT5ug/86n
+CRGw7GDeck9Y/uiSaQnMm7q22hhmvXs2oR/WcPu/p+5q95mzBHnppULhp3BK
+aNj6RFjbfq8qHSbxQb1lcL5y4cAQ3a92xq5mWG56U5KE+kQqdxih6xPOB7PQ
+r944VW3ExX2zbIx9BNYq35cYw1r+tdJpmE9Zl8h9T/fvL9Imw4xxPPspPNwm
+4N2BOcGNrytd6X02z60LTm9yup8BOzEOY62wdrBdEATrPNf35lMHneTPoudd
+FqhdCMtemenbMJ+u7KczOajP8/OJOgsn2lX23UG/wT4mg1vgrriP4v6g8zSc
+ihDQfNTysuvGqMtMXTyTXp+V8XvWFJxv/LkoA3p/O862XmOEfMxNooaQf2KY
+TZgtC+ed4Nz7Fk4pGS14aciQ7uyXpub0et/SzbWTcV6hN614tJ9nDStrJqG+
+geZSKBzcqUjpmYh6oa+Hj8IWfxbKvWBJzJydjbSfr2Kkv03A+zx7iQ3m02zy
+8tgOax6kxUbAsRmaikBYFsAqKHalz9XMcTnMrmlXv4ZZu34cPwc73bx33Znm
+n5laPJHW899jGQpbeKqXJ8NMle2hPXD6ushnk9CfTnxCcQqu8+VWZsOq8jjB
+BZj/TtDwIeZR5nl4FcKZ35zZkQ2zN1VZZ9Hz9mGr3sD549va4mC5fLl+HvKQ
+e0eu84VzawSmS2HOp6q2aTDx54hnUQuJPb2f9E+F9ffx+UT3N9w8+jxPnxvr
+B6tcTvBldH3NFjcF+smdFBjjSM/bvP77CvSvuhHe1ou8cu2WNF6heeVtZbQ0
+f5KXrDDA/navO5XUfuHsCIL1u0dyFfR5mfzXDum4iGhm5MRnw5JziysevRUR
+mef+oVM0fw9b1YEREelKe9x6Be6WjmsjhkQkcU/t4lY4P/xv5x8GRCRlY32M
+GfpJOTza9LxPRFhFAbJl9LwyZGPlvSKiSxuVH6L9v7cO1PVgP3N+Tj3Ms7/x
+IgKWBGRdsUEemoHKPik8PF54YgN1ZEnfCbh7VaETzVtWlvSRG/aTK/amtcB6
+x+f6yagXW2sgNlqAeWIdig37RUQfc3OrM2zhmlRti/50XGG5AOYls7fxBzHf
+Erswb5hpSrgmwDysh8l7+LC+/27VzGERCW6JbOHAJIh//FeYU9JS/Q71uptb
++abIg0Oyv6yl5585KGbBOsuonmO0n7eOhWdxPX/k8r4QmPnCs12H/SVPq7l2
+dJ6t2tUlqE8ci2d30Plttzs40P72bU6j969EXdfki3kyH2xbkUTz8gocc8L8
+uU82GK6GZU2S86pXmL9d+PtS+v+m8coH9V0iogzJmc+l+Vf6Szo7UE+ofke/
+bzRZvZ3zHyIPxcxohq7zTtuzG0SEOW3bF0ZdtGjv9XuoP3o+ZD/9PpnoprFU
+Y74Xz+s1rv9/Tx8R/PfKZf4BIR3UrA==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.545705156331749, 15.828020625326996}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwl1Qs01FkcB/DbZJnFMgyKoxojPeWV7anmrweKCoW2nWrSU1o7JVJLHq3X
+JKaIHtLUqdSUkkUhNdFmNctO6JSIOdrooZo0FZrY7z075zj/83Hv/97v73fn
+/x+70F8DN7MIIXvxR6+kYxifUQzR0KslQy4V9r7KhMk/Hg1Z8IH9BgpDWGrm
+sP5H+Bbb5+MeK4a4jEsf9cmCIZdv6q634f/SNyP1m2Ar/p/n5sKykFBFA3z2
+uPD8KVyZHLvlL3EtWPlqlwGuxRYmk3iYF+l5but+LkNEI9h+u2B2QP50A1i1
+7O3Gp3DJTEvZeXPMr77+LRD7nrU6sk4I81obHz6Cp5XrdTvCKp9YCyFy+hZ1
+rR8Fy24cbeiAu59xL9jAaqdqt5DRDGm63BzgDhMnx+HbsNvG2qciev9Q7T2O
+NUN0M07eOwlr/Ba7+cCL6qa0dsLSnfa+oXDB3qrwicjH0+NnroWb+RFnd9C8
+d+rZc2BHkfruJeq1FcEDWF981WdPK+zi1ZZRQPdT+475AnOqM8yc4IKt5v1D
+MIms2FiEvGuycza/g/1vPGjmw4dPXBmuhRkVcTuKejXP3a/G0/ms4Ggj2F7r
+dZFP1z+8bksG+uUqSd90jfbH/495Y+FfmkP2Tqb9kK9cex99Vz0TRhw1w9XD
+XD8drnL6mtjPYYgiSGoXBq9URm9eDUvjpLbbYJMPp7ujTDH/VmpLMqzu5NT5
+miD/UuFxBcw+umLkvB+wv+nchZbYz4+zTxVojP22hf0cDwdHFUpyjJD3Hit4
+ALbqrw4ygF0ay1tjkb/dmdVWZIg+1feYjUS9c4wrJqTB6iyWQTIsEucWZsPF
+0cf7v8LmVt9WKKmrS0s3oH+KA+sfT8R6jPR9TzEcsyBytIzu9z4o9AWsVkam
+TkYesj19mQ4ur4+tvAn7D4kDtPBNvs03T+RXm5w43wDrBk/2VMCiL2EmErhm
+UkafJepNSFx03xFumdsy5AeLEhtXViJPTHypMgQmn7eumAUPHcpd5QqLRzTZ
+FKE+2486s8dYj9NZmDkOJiZeNktov6ofnclFPxhNHk+CPGLPFFNreFIaCTyN
+/OIzXFKE/h7TSsylqNc/NrQihD43bvJTm7/H+X66smYMzJ/RkDmFjfUqXQoJ
+rPvosPq1PsbH7OpiwfkTcq4Wf4e8HV137OHXMa59aXoYD1Zs2QA7pUw6GTcS
+6/d9Tr8J79bzKcljYbzp0ZHxyGN+f4qwYwTOvy6s/TSsfdIWGwy7ZMXr7FFP
+prUshkXHd+ZbyeHAUgvLLoJzaatyn4p+ROxwju2DZQNBZ2SwxPGLyAnzxdb2
+8/XQT8P2UYsyYenn2c3+8L7VrS1s7K9xkgQmwZVJ2WHZsP+tpca5sPC4JJ2P
+vJqe8of0fGy5gkQ5rFav1qPfh/LQsoFxqE8abnvYBp5xl3swBuasCXtMz8tG
+47zwMvXvqXFecFqXp/V12OV+vHst8qeYPPdJhsV6ByJmwheDFFkOMInJNJKj
+/nMHO5YewX6Kt0mED5fGaHc2Il/xMcdv59E/nxfcnZ2oh1jWWXrAL9dldf2N
++kUbhLtf4Tk1zvP7iRkWEIVzv2UJvEP1zPQvnYC46HPyjsH59d6vvAcFRDpU
+ZVYAewyX+D7+IiCabVGmNfS9Y7OgJeMT5r/gZtHzXTUtxS3uo4DwIqvGCuHx
+qje2lR8ERPYknP2APu91heEBGgFJyNNkeiHvxbJw5bF3AsI8sJ2lhGN6/z28
+7q2AqP2O8ALo93OwZEJfL+73frLqISxLDuR5Y1x0m5m6GP1SGUb5e+N+zSHz
+ExeoM7Rdze8FhFN/KlkDu5ctjH6O/Xj2S1jj0H8yJU0+iDy8GwtSnWGLoU1J
+o5GX2C82tYNFeaPzHbRwVr2DFvdrU5ZHGNH6puk65XCGSVJ4GSzzaLzrA+9u
+rzEy/4z+HUqUNiFfr0J8jQszL/stlsOxT/auuI75qoOvVXdRX3uAa1831i+W
+V8ndYYutzR1l2F96dVEOfb7ae60Oje9D/TziOp2eFzs/YD7yM8+nJSjpe3dq
+a64D+sFEeWb9Rt/Lht3Tt/cg32DKLG86fme2MqoL/VX6fXChDpWPfftUQPyv
+WMlnw4rsjXEzHiKPb3SNCE7QGdsuVKCfuyeYnaPvcfpJqP7/95fL/Ac/lbt5
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.128720493773297, 4.310154074720437}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.00000000000106, 17.}, {16.49999999999894, 17.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.25, 17.6952}, {0, -1}], 
+        LineBox[CompressedData["
+1:eJxFlA9QTFscx7fUvDJjee+JGuXPvefNY5Gcq9VkJr/8eXbVa3qkUsafVfqz
+prJpUGJRNLymPLZC78VEWhH5U2vRtsZKjJSKsJJpp2yZUYasJu0752nOuzN3
+7nzmnPs7vz/f75mhSF4V6ygSiVaQl36fjdjt9r0+IPrvQeAfLG5OOkU4VPHj
+pnkI/Jb7fMvTE1b/4zVtDYKYYnFchpmwi0FSkowgNr0yVyKaD6JIg7YuE8Gr
+8Tk1BxDh/JA71j0IGqbM+xArI9xZbBqXiuDcdHPIjUTC/S+tl6IQNA6YJsYd
+Jjwz/0SLFEFcXuHwn2WE6yoCnV0R9HgEKTbUElZvvuLbwoPb8SHD8mbCTW/N
+lYU8TM6eL3ndQXjj0FdbJA/Br3yzhrsJx6d11XrwYDl+NqDaSjhH9lOVmYOy
+yPzciB6anzgs/iwHIRd6psZ2ErZpsuSpHJgnTU7TtNH11ZnKIA7qJZl8Qz1h
+UUK42puDr6JlgQ46wjpT/10vDnSXCtPDztP6Av6yenCQsHjWwq4CwrKgX6by
+HFyVvg5/dIjWeyNl2I8DwWnE1TODsEtFVEEUB9sdZ8gfbqPnG132HOQgNHd2
+YtlWwjs7ktr0HCgjWpaupiwrLVV85uCHQTdYTPdPAK9ygYfxxTO1JTSee2uj
+XcWDUT43JukIzW+JveYKD3LjMZx4mta/r8Snl4ewX3N3eOgJ+73v/OKJoO9j
+3uYnz2m/l7VafkOQxhl+v2YjnKL44L0FQXbpor6GKZjUJ9u1bxf6rhOg7Og6
+Vo0gfd29idKY/9e17XA1+BBm/wsuKcU+5ZjFr2hX5XSbMDu/OmDrY80bzPIL
+qH566ugnzPIXb3gevtFJYPVNcu411IkFVr+mfM7tiz8LrD+XVa2atZRH+6e1
+dVT70v2j/e0ddBjsovFG+6+8x2kX2DCbT0HdsweeVszmt2JVfHZFO2bzRUO3
+akfqMZt/RNN+s1SHmT4CLe8OJ17ATD9Va9zfnizBTF9R55NV5UWY6c9/S7RR
+XoCZPpunPcwYcwIz/VrTG9u4M5jpu1fpDPpKzPTv3n3979NGzPxRo4wfk/oC
+M/+Euvr3FX3GzF/Rb/iqlW4C85/U0jTh5EKB+RP175DtjhaYf3XqP1RtewXm
+75vrB4qySgXm/3r9E8cUk8Duh/vXBryPWgR2f0gcqGAWsPvlXyACxJo=
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.25, 8.354800000000001}, {0, 1}], 
+        LineBox[CompressedData["
+1:eJwd2Hk81OsXB/BvthCSRLYMCUUMWim+3bIUlSyJrCWSuJQQqSlkS0iRrea6
+ol8pa0Ulc1WytLio7Ea3ZEmRNYXf58k/Xu/XOc/znHO+z8wwSgf+tDrEQ1GU
+wjyKIr+p4Tn8SNPU7x8pmmozXbwpcilNMXieq5nBseaml5bI0BSzvGcwBN6Q
+bTKUD3NN9F9egeuEuwdNZGnK0u71jlS4z9tWvBseHmv5eRouW/Rt2E+Opjj9
+jrE7YYkVf3tOwYWRXwr54A6X4Sf+8ji/b1o1bwlNWfwcaW2FG9pY4RvgwH08
+e7UUaIou0ZWqkKSp/JozOT4wK2OgbCMcoZIllwqzWwwzShbTVFVP9MwtuPBc
+iDATDhnNOkHMld67oVSCphLDKuJIfmJJG48xzC13EDsBu06+quxdRFPfG1QD
+TMj+vl2iWXBdcc79hTBjLubOETjAbqPaW9THCnc/uAdOlI6mM0i9HnMff/uC
+RKAHPHyQ/tcbbv6xgs8AFl8WUkr2E/skXyUPczxkl36Cj7p/mBKD/aa3ZRmi
+nvy3gUaSsGWigVIuHCgw7qwFczcLD0ihH4mlJkbOMLPtSmscXPzBpvNvOFHg
+U84cvFRfw3wWZpftEvXBfEojpsq9UT+HpSLzBm4TSonvJ/M0DNiuhPmGVNwP
+DliGeunMOhfYJOgSW1ARLsvJioLFj8RV/wVTXtfLUuBbffyPFBioJ6lA/gKs
+OWWbfhhu6KrnepL8N+b2BcT81UwNOPZz8q9vsHh2Nt2C81/+aq9TV4J16tYc
+g1fPHXfZBw/flaRmUL9B+/7yMJgxuWxjGJzuIWdyFW7QetA3iXm88fj2OQ+m
+lwRbH4ON1whN5pP9hLo5I5in5JumzTfhxPytf4TClQs8h9NJ/gaZU4vhuAuR
+18+T8x7UHH8ijudhWazmQ9bf2eJ+Bva4L5llSfL5pDL2wSx9vrV6MJc33cUc
+vr9LS0uaxO9JfrKDj7+wK5tFf4zuK2ZhsKd3ZccgzBqPTi+HL/7JOMyFqeKs
+USGcb778j/edJL9I5TK5Tw1pvSafYGZivMh7uKrpuecknOi5x2cH+jtkLR0k
+ifOYhttOVcIiX6cNNsGsbNEhcr95VTuFfGHXgx7pafBEfMUL0j9npLBiDO4a
+F/w1ALOzkpUNMe9vmVEdusrYr9/Dhsx/U2CJ22k4seHC04vw1ms3HOvhQguF
+niR4+8ydi9LLEW9+rB0KS01c+ccVtnzTa2YOS5REdefA4i+OveMl9ys4VegD
+TAWns/Jwfijz520pFfS5auu/G+GvrCUJW2BGG0eU9FOyMfOjG5yYWCi4CR7j
+sbAMgrmtHUP3MA+z0PrBs2S9n4uwLqwrctn4HEy37U++h/lqXP7icJI4p8LH
+GJ6yWB9/GKZelnyvX0hTP18IJO+BOd1OT9fC950zDq0j8XzWl1diNLVeKUlD
+htQTE7j0KqwamaP0C/XTN23fXoGL0qPP9cAsCZWIanjofJNvPcxwuOCihv3u
+8fK/ewSzC+rSSmCx6mtupWQ+90zNdFHPtBPz4H2Ye95aOA3OcF1aXUX2V9Jx
+I/dhnHOZv43sd/Os3mnYuzFejZxv+SFg/XeYHWjzWB31ia8e1HDFfHiT9/7n
+DA9b6S96Cq+wTbXJggvbtV3I+8NV00jfDzBLXmjdXvji5FVTzRXIL9wdfQb2
+65+pCoY5dW8NEmGfLI+85yvIffSho2Djt5IPxFURf+WR4Q7baknU2MHDi2w8
+V8J8wsntV2HuqmU173G+X9V5vUbihA9N5PU4M+B9iEcN9ysuzX8W9f9BZXmp
+w5bcQa0zcLG2X+5WmNE/JzZNXl/KxRPWMGdsj00AbMmz7rY9TJtVJfRinvPU
+j0TZwq4nVlNTmH99pVS5Gcw2/ctaFc78fL1+DVkf+M/tk6K4Pzq2qXIwa9+2
+9CkRPJ+5c6vnUJ+r6GxrHvyDX6Gqh9S7uE4uFvZVGU1+TuKPQvqvwzv3+Tfn
+w7SOIPszrH5sOCENpuYZnnXC/opSqanxMMtCveMnbFxa7hNL1gdd2PEI9eiZ
+xK9NgtlVb6lk1K/Y3pGbDSeGx6VsQn9VtSYClWS/9oTCIvjlJVvlXrhQ/8rZ
+5ZgPr/xlW2nUX7hIl3sBblGLit8Diw/pz/bBlwW37E0m/W6/m6mHeZs+kxho
+I/l8KRu9YL7dRdtU1RH3+ro2ClYQoTYehympHyNx5PUmdiW6EmYere0KhAtf
+Tv0UXIn6OywizOB3E+khO2FOTXwoDzy+46RSHMxc/qdTHnl/sgq345B4eEau
+Pnl/jerqGoT99N8ncdCPs57lB5FVqLfKYmAz3KSyaVYZpvTDC/7EPJ6sf79N
+C+bWVO/0xLxupLlu1oYZb0QZPphnRNSRLlWSz4maIc9H+ppfuBRM/y+zvHYB
+TWnHaXbN4Txqa+ozJtz3yvTjR5h9w7z9uTDujzPz4QuYJbqs9gJs3jWWcYvE
+8wSMouCHCsrPE8j61xb/lMJzbrn7TpJ+vj/Jl8B+EqlPtnuReYxoWWfCRfa9
+Jm7ER+dWm6MeWaW7eQfI/hlsFWnU+3eGgbMvzPgf78cJeEW7+FAE2S/YZisX
+/YX0RLvlwlzGw6Ia9J/iaGzdSGxn2GyF+dRIXO6bj/4aol0u3oeD2jO7jcn8
+5KkJYcx3aMd4Ruwqcr6nogWZ9/X5G5pJvmfV10D4X5GkNIYG7pfYo40x8PZh
++2gf2DWmq+sseb3t1a0ugznvmv91hZc4a6tRmnjuE5/k1GAnevn/tsDUTHXD
+O5yfr2AVEwoPa6tPHYPDy4Pt8jXJ++dQ6yzqP+htx98EsweOeM6D3cxkvn8l
+68/bJk+if/kj8iNzJP/tWOcg5vWXcaO5wGr06/+2vQ/zTJLNecIDs3afejqF
++d/xmvGbQD53XGJOBQ593tj3AWacL60+IYTX+zzN6VoSf3LjxYggTS2oOFhy
+B2aFruvIgvNujpgkapLPd7v3p2Bfl4LR48QeSz0SYHog9YsDyW9yFGyGJdnz
+t5iS/YTElEyxf13WqWp9Un/DcoX/4HU9L/jWk/ys1gI26vnndcSKzSRfOVop
+CPW75MZ83knid9/ccUR/VTdbUrxIvXdlh0zQv+QqL6Hf9bzjM9bA829KHWRz
+SLyqz2EO7ntwYs80We/yJLwc83vj9ibfAPMQZ5ulqJP70Pdp5Bxs2X4pwwWe
+C6pUfA0zM/2Xk79PcguUFshpYf7rDoRFwnWseYGesKvBkCB5Xl9bnqgVwYWW
+RzeRz8OCmRX8EzBTeAGbgqM/6qqt0UZ+jn/ITpzvbsL+5gWzesMEAlGfobi7
+bApM+ZtsC0c/kyqO9Q9gdmfDw9Po9+X91NTXZH2LRtExzKNMqDWmDWY0uVd6
+YV5vdRWVO0i+oaSjL+Yps3KzZTPMeW7jHYv5p42WeT0jcd+Bpur5+Puw0FXu
+LtkvTE5RA1b207FLhrnG29UqBGhq/2lro0BST/mDFhZ8c/HChfYkrqA1Pxge
+0inmMST77dN3yIatqryN1Eg/jYOWM/CZAMZjKZhu7HSMwP4T1nqaYmR9mM9i
+HdSTwas2RMzxEDz+E64Z6JyUIfnheRvbUH9F7tJ32qS/zw1mT9GfolNOpiXJ
+39UnkY/+k0WCB0LJ+U06ouT9Sqyy7kshyZd9oGSN+W1vnPD8SvJ30/KzojTL
+zOrQARkm6jN8IRouRrNsItvFDWFGgE52O+ZfKZCk507ixcXuvAtp1i7NeQWx
+ML117Nsk8n1Ofj5YSOJnp+aXw++1XQ2ayfqi7EwzWNX9ru44TLW8KL2F81LW
+qXtI6KA+4dt/fEJ9u+Y3yWrAnIZH/82h/jPlptWGMO298yIvHPkwRnKnDnl/
+4zCn0f+iyqRBW5ibu87kqyDN+izicdSexLVtDw3Mp1k3c0pH7Ejc/sOrKQGa
+df7S7AIrst+oyLQy5r9vLCzUjOTvFdngz0+zyqoE1TeReIKX5QAfzdKRNZPW
+IvWYP9yUDH97eMdNkdSb+nHElw//j0xcU10EU+7a9GnYodKGxUfOywquq0R+
+dvFo0DST/L/zTZKJ/ROiHKdHyXxq792qhY9lrn49QuIar/ZFor76ILe4MTKf
+uI5QB9wH78cfL/8i8+sJczLC80/qOSwpTOrtW5m1Uohmufeyp+RhxrAVW0yY
+Znkzf46vIVYa4/sIt/Q3xOwh9YVVLmIvoFnmf/fN+RNbaSnqi9Cs0nfiIVdI
+v5f4xm/BwoasHw+JlW2WDsGZZSlePcSFpQIzeD4OkbG35+vCVdqOrYhfTQjP
+1oS5oyYfziGu2/aX0W6YmvSP+oXzHEeOxvvCnKN+RuZ4fip3mA9jYJZR9asT
+uK88zPcMNvHaG6ci0I+aL3d3Edlv2v4pC/2ypzTEKn6bjxuA5ynm7ub0FGYE
+DR/2Js/zcOfJZyRepN3my4/6ilRaOKS+TgeVGDwPe7kpxXIS19fe8pQXn88l
+Rivuknqm0xtV4P2LZbp/n19o3lDCg3m98nK6RNZ7bDQNgBvDPSrCSb5M7+rD
+PDQlHBGrEAiz+1fuToA3151NOkL6bfaz+Ix8zrMoqQPEA3seePPSrN32ZdFO
+pN533lukUM9Bv+o0YtdV56hu2M34VC3J56799fQx6u8M2evqQ853WhV8A/3t
+MA04Gkb2m1FKvoj+136Z4ZD6uLJXz/vgvtfKCU7lk3qGv+hswPxUJbmB9STO
+d3X3J1ho9aWAIbLftr2tRzFvtWB3Hgk97Leu27kG92O2v3/JBpjbG2Q+ingw
+c8tlZ5hhflx6EPEfN/idI2D2++iDBYjvN/Dff5Osf9z6awviBbKa0bVkvc3J
+2ly8Hlv0d8z26pHvJ8yv/Yf6Zsn3N2Q/8v2NIP1/jDpz6w==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.272475489649668, 5.171062742038147}, \
+{0, -1}], LineBox[CompressedData["
+1:eJxFlgs0lekaxzeSRqXt1rf3/oQ23/apZJtFUapHJyWqQS41yiW3UeO4zHHN
+uERYFKUJKdtWNGWXsyu3cRuF9tAocteFVHLUaW3KYUqc9ztn1jvfWnt967fe
+/b7f877v8zz//+ojIc7+iiwWqxj9mPf/Hw589b/3SmB1OvLOiglYevPZjaUR
+iMVs1zoXAoR2TjztPxA7iqhWPQIyor8r8UsngDXivHJWiYAzdNF0qy4HWPp3
+Y9MUCRBpzaRWVSOGB3QySUBd//2kvH1ctF5iW99eAmynFZ+MPEcMLm2ueQQk
+b9QL3+/HA5bwtG/3RwL0f7u8hH7CcF+j7REO5KfkqFoBCaxEv9ypIQ68kocc
+pM4i1s9JunKQC4+UqQtHf0fclJM3PMCFXM/gpxGTiFm/Thrt54Esen72OksH
+WKGuIebNPMh4b77V4zMadxzmrTckoV8rtLHpJWJ2jeRVGAmPv0Q8fFLPrO/T
+M3eNBJ3NFu1uGYjFHw5ry0go0IrIOuTIjFdGvmgnIesP18Cjmkx8QvWNFSRY
+X0kN1R1A8SdqVLJTSLCfNslcdAWxfu3NE9YkWNbqrPKLRiyfW14ywoMjbNMW
+9iHE0qVp3/+DB8+fOS0BJ8RNw5npc1zwHBMP+3+LGPpLqXgubA1ROM2NYc4n
+xeKXeQ54VacpLypnxsM5LckcWOX3tmhglpmv8+i8BgeWFZd6HTiA4oPpZnUp
+AW6ruTVe7cx+Jq1jvAkYuL9VOO+Azqfpwl5rIwLE4rcvcgcRe69/3L2YgKfv
+4oOXhKxC8y9yrrIIeB/Kvjakoov20+w/o0XATpVM1dAixPJIxTfbCRi5HtZo
+aaaH9l8vj0Z54ubM1nxdw/DUM8koAbyTG3Ptufpo/pRnwV4OOFXpvE/ai7gz
+cPHVFg64zdj490YhlpdEl23ngs6TfaYheYhDh3ZtuMcFmV03Vy5B3NRlINvC
+Az/36qs/VDLzM5sXS3kgsXo4mFXB/H/fG2UtEpykJrLdZcx491i4PwkBH4aN
+tfIRs66FtolJyDb/Nqkygfme5rGYZhKEvWH+Vr6IE1V2K6G8CpDbTAzsQCxV
+KlhSi85NV7Z8VICYzdZ1zCKhxSNrq2gps55U2GBPwqKhOOPwCbTfzpJ/bZri
+weGer687PkB8Rm3oYjoP3kmGUtc1IJa6t4do8GCRe12c6B5idp9D109cqF9p
+3BDwDLE8zMFEmwuZpc1t61TQ+iMK2ioXOPDIyYUnWYPYMcWzjuLAOB2sUXIA
+sbfllx1NBNQoReRwzzDxu/YoBxPwWC/hbMkjZn6yZ64pqrfwbFGK9moUH0wU
+qhLQuNtv2x0vxML1NpULK8FqOtXtk4RhtQWXFQR8ut2cv2wWsXTYo9OSAEHn
+DqUiGz7Kh9bLh2IJOFEbaHkiFbGQp0R1EdC3EFtW24LY238kyIoDpunD6bmf
+EIt/3llWzoGE+ndxTQIDFI9rTe9aLhzV9AncZ4cYFExTJFxIb0g5/sATsXjD
+SzOaB9PaJ+22HGU4amfcJXReSytiDI4hPkOcPqxEwsCtTsfwI4hDH1r4oTwf
+TWsm0p0QC/9m/CqPhG3hrfOrNjHjVc56v5Lga+SrZqGLmGUz6Yvud+vMAnr4
+eLx46NJk+ws+nt+SvUlhtJWP1+fHWo9HlfPx90usTf95upCP41v4j0Pq05/4
+OP4V72Kr753n4/3F7TieYl7Mx/sveC/Kv1X91/mctNVM3jb41/n1xOhHBSkb
+4PM1UTzparvZAJ9/0q582Y8xBvh+npvVzXk3GuD7U/3GOvCDiiG+3wfLYq4r
+uxji+7etudi0R2yI8yMpO9Tn+IQhzh+z0cS/ewgpnF975jOCx0IonH/kYM6/
+PX6mcH5aSCWvXXopnL/Rh6w3dM9SOL9LI48V71EX4PxPcrt8V6orwPWx/EZO
+fdBqAa6f3rwAiTtPgOtL8bzN2/uqAlx/cDXsrs9HCten0ivLqVWDFK5fkXqj
+tlEdhet7Dzer4P4lCtd/REdpvH0ihfuDSE2/720ghfvHHafHllWuFO4vXRVm
+gjAHCvefojK7g6fsKdyftvyybmyFC4X717jgVueZ7yjc36iZhoI16RTuf3cc
+XqrH36Zwf5yI+y2ocozC/XNgICrytIEA99dTXJnYN1CA+69PfO2nXVIB7s+n
+2mYkGnMC3L9zM6HtuJ0R7u8VZqrZ5ueMcP/PF428YQ0ZYX04GPbBoJNHY/2I
+NzPp7N5PY32Z/kZVei6ZxvrjIrD+8uUajfXJ3z7B6odmGutXT5Ypu+MxjfVN
+S7P/s1c/jfWvO2a8cKaLxvo4XhI22cHM/1M/PVWCan8sp7G+BkjrZfJzNNbf
+Lcquv9tH0lifq6Naa7rcaazfkX6vC3o20VjfSaVWTs5qGut//oxMrKdGY3/Q
+mPHa21mRxv6BcztRSbJghP1FjXObuq0Kjf2HTkLwnXYujf1Jzld2+4M30ti/
+CG9Uxb70orG/+VhY/vlYDo39z/YA+c6+Dhr7I5+0+JxstjH2T6ITOtsqDhhj
+f1URlVJvWGKM/VddsFC5UG6M/Vlj64ObHZvXYP/ma98fHpG8Bvu7+LVnjWNb
+Ef/p/xYUmPda+C9XmtaC
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.0548, 9.5}, {1, 0}], 
+        LineBox[CompressedData["
+1:eJxFlHswXHcUx7e7pUobK9sWu3uzFhV772130hJvjjZBBolkZsdbUUKLeg0p
+lYSIdEIWsSE606gKCYISHcmmEYnnJlGvbT0a0WXKLKslTUhMgv62f/z2N3Pn
+zmd+957zO7/zPV9hdPKRWCaDwQhFj/Zts76NljUw/l8U7Kwz0nPqQVwdo5A/
+JKH4Y8L2xHHElcYrbZdJGOsJXv98D2K2XKpfSELDtYxDv89aASPA15OTS0KO
+71WV5jxis4S+iDMkeG+vWvfvQ1yfqZR9T0JNl5d1+KYlMCIv1RXcI8Gn89sP
+w+4gvrug8nhKgthq/8+vzmo5fYdQTEGwxHu3Ogox4wO3rVQKqkx7soXeiH1Y
+i/43KbCYu5D+3Anxzcy5wC0KXDfc8xjOiA2ONccBDWQqP9DCC7FFUvNWNg37
+XnfaqAhDrHj3GOsaDedexaWYfYM4t3xA8ysNB274/aWpQqxSqGdmaRAIHTPZ
+fYgr49uG5mloa7BZil3S5pMPFUzRIPXVPB83QvWl5FQ0dtLAjHY2yLdBXLrq
+3CGjIWaOK5p3QDzybEIVTkNowB1y3Q0xWxTHEtCQ2csy9dHuf31lT+ofFAgd
+ZSXmVogjefcfyCig60eNIl9D3DqwOHiQgtu3fBIUYyj/ZNAMYUyBJ2dL2VyJ
+OIXB4U+SYJ9bH/iGRFuvS0ZrEwmLEROB/oba88Yb7i4hoUruaBL0ixDFd1ca
+55Fg0evBcUpADB0/ivJJiHl0osWEQFwayAgqJ2ElPFyqVlqgeO3ttR0k3I4X
+d+SWIa5uvOc3jzgiy9IuFLHBkv/kLgrKyxIWlGLEkbSBayQFspbViyUmiFXu
+ccwrFNQa2X4yz9B+zz2VvUzB2kGbHPuXAmCov3xrSUyDUfjI/bv6aF9dMNqV
+SIN9X3d7F1eb347Z+wMNhS9S/k500MaLH/i0n4aPdsiibEMQT743aD9Dg8sa
+kvNJxIrGYckC6vd0YtVEnW5f86R4p0yh+9/zfTc/mNfFT5CK93ps6PK/7F72
+jGUK8fnGZiY6udu688+5GMen/KOrbzbwgjk9oqv/VtGZxw9rdfcjzxs5cDJJ
+d38V7TVpprTufi13MS9P9wnw/Tf55U5JRQLcn9ao4seHzu7C/TM3PRwQqyFw
+f0/91hLwRELg/n/RwgqqHeJjfaR99pUoOYSP9SM7Hab22ORhfTXETKkG5Tys
+v23fF6PJ53lYn3vt8hs5p3lYv9bsB832pTysbzW7aGXjOg/rf8xNxD6i5uH5
+KMy7TtlRfDw/LWUlnD8z+Hi+go8edbDt5uP5Uz4SC4bfJPB8Rg9K3x7zIvD8
+Vv7bf7grncDznT6Xt7lVROD5b2KPm5mcI7A/DD/NMuxMJbB/OJKpbWJXAvuL
+tDjjov4yH/tPSMhqjXc+H/vTVUnajf16fOxfEeNER3omD/vbM7c2d9tpLva/
+746/EyVx5WJ/9PL34zheMsf+OZTU9xNLzxz7q6JQvSbNMsP+W63W+rMp9uf/
+AHbvO2E=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.25, 15.145199999999999}, {0, -1}], 
+        LineBox[{{16.5, 17.00000000000231}, {16.5, 9.999999999998607}}], 
+        PolygonBox[{{16.5, 12.9}, {16.1, 14.1}, {16.9, 14.1}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.4452, 13.5}, {-1, 0}], 
+        LineBox[{{16.500000000007276`, 17.000000000003638`}, {
+         10.500000000005457`, 13.5}}], 
+        PolygonBox[{{14.01826734053906, 15.552322615314452`}, {
+         12.780184249251306`, 15.293188945044921`}, {13.183281069670574`, 
+         14.602165824326175`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.323799910437668, 15.984057296392571}, \
+{1, -1}], 
+        LineBox[{{16.5, 9.999999999996362}, {10.500000000001819`, 
+         13.499999999996362`}}], 
+        PolygonBox[{{12.98173265946094, 12.052322615314452`}, {
+         14.219815750748694`, 11.793188945044921`}, {13.816718930329426`, 
+         11.102165824326175`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.323799910437668, 11.015942703607429}, \
+{1, 1}], 
+        {PointSize[0.04], PointBox[{6., 13.5}], PointBox[{6., 5.5}], 
+         PointBox[{16.5, 17.}], PointBox[{16.5, 10.}], 
+         PointBox[{10.5, 13.5}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T16", " ", "P2", " ", "N32"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdieg/fgfjhihjij.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdieg/fgfjhihjij.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {22, 22}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwt1gtQU1caB/AjtjwEIshDtlAQzAKuRUOX54rJpUKxksGAvCqMIiOIGiVF
+aYMiG4Uqsm4LiDa6FHkEDUIhIkKwyvAqRJYuEW1BsBApICLViFgDIuz/dDcz
+mczv5jz+35d77sQxPjksQY8QkoU3/STqRbz+xJA/XhyGjPyrNboQLu755pBq
+PUOazpZyXOBV9iuCLsDpaYrCMhuGmI2djjgMbw8uDbGCxS3EOAa2bKkVSlYy
+xMfqt/AQuIj11e4n1livwFlK/TDQ6/twWNpVVEXHd6RPDnZYMSTa1nKYrld7
+0XliE2x4t0onhVPO/pDTY8mQzdku/A446aqbWghry8xVc3C7p/e79rDqaZH+
+e8ivb+FZNGrBEGXUpnZvOH2fm0sLPH8hPigCtkv4beN1uPvFmN9nMCfV+3wj
+LCs5F58DW68aMuiFp+62FVyCB+Tul2dhxXeVAzUwd65l+AO6n2hBdBMeXWZX
+vgfWPF7b2wRLkoYKyuGCEya3bsE7/vPx2hHYJKvmwzo4x9rzpQ3q8xtbJymn
+eWe/rg+EZaoc9zy4UL5QuRtmX6w2E8MaG4PiFNqP2xrbGJh/rHflAZhzY/bI
+Bjjfz14YBgvu96XQ+rd87DHoCGt81tdMoz9TBi55g9hf/At/vha+qP69XAL7
+REljxLDcqc7cAm6W57ED4bkAh2/OoV7pgu8OW7j+TVW5MazOZVXMr0OOpV4e
+aSsY4toZ6zYJ9/ePnxsxx/2gqPlqFO41Dgjmw4rDw6NPYTud/92bZrh/uKzv
+F+H0rkzRh7Dg628tHbC+X8OV9w8uZ4jOffyLzTTvxiIjKQv7eXEX0mDxC/uX
+j02Rb6Qo6Roc+0vTP3bBYvYynylYZLqzWR9WcLeNWqD+OBlf1meC60LPBg5s
+Kf1C1AvLDpl/EgyrvDvPv4TnD6oS4+HmhMYJT8y/df62Xiqce1Lekw9rqgOZ
+E/CUJrxAD3lUU3rHTsMzaypq0+H2js4oer+0p7l56WAP3Y26LNjPiWsrRD18
+/QNN9Pdjm00oemB26obRRPiZvPSoKepvDk78aStdn7gdXQ1rHG6mecCiyEfv
+uMAmofWPrWCB9SLLGpYEHLk2iXpNGpQPh7CeujPPW077Me7ZkQA3PxOy9sCu
+se1ercgTPZRxfw2sjl6Ieo164pZkvp1G/038P18wok4bbGiHmRWbUgn6IRVq
+7hfDfJfLviPLcF4vOt7IhsXziooGI9wvXSLfY7BrxM6K04aYdzWqMQPWueh9
+tMuAIRMDcYtnYJsyKyZIH+OzYoOv0PkV393b9C7q6ju1vZuObz/lveMd9PMB
+N3UO5gxnxxcuxfWSsuPrkTdr65sOPVixVfTeXjj3QbBTgR7ytryRy+D+a4Kd
+obDP9sjjw/R5pIk54wt337z8d2P0K2Bf5tgnsMbrn6Fsen6Cq6ePwcrhj6x9
+YSHLQdkDF/ZXPtgMk0zha2/s90Gh/lAYnR/oklENy/6qK4uEmc6fM/6CvLGP
+pp9vg5PasrWlMP/Kre4tdH7NuJaF+nQBczn0PBZnVbATYYms7bYzrD4RsaIE
+5txL9DClz4eQhEONsKvwb7/S/HLDQ+KrsKKN7V8MC1qPvBXBZlF7zHbAhg1v
+K41hw09lc/Q8svn5Rkexv/hkjPwh+qfm+ae0IK/GykRWCscNPl0YQX1aq0Ku
+CBZtVEePLUG+Rc7nQXBSKCu9h2D8nRzNGjpfnN8XtsgjysruCzawoGFD/et5
+HlnVcNDHElYI/L+9NMcjuSGDHXaw9ssfD8fqeEQ+8bbVna7Xd9Kf9zuPKKY7
+V4fBqtr6/VEzPCL6OXl3Orzq15mVtdM8YvbkeUE1rIz+TPrpCx6JmzVPHocl
+4ifz4VqM73JKdkR9zVXLz2x9ziMaS//nsbDGoD+j7BmPiOMdAs5TlzxeWgRn
+7yUDXbBkIdyPg/Hq1dcFOtqvn1gHnLBedkLNFhb9/dtaMjVwVkzmPH0+KoI8
+f2jF/u2apBJH+vzPrTZWIp/4wJUhakY1FV/9kkcMD1pcsoWzS8z/fRb1qJbP
+WCyHlVqj+chXPMLZ358wi/3IvXWOE/DmU3O7aB7lubVf+qIfTOf1V/mw2d4h
+ZwYW2CkjIqgvj3BmMF6ZZz1nQfPPKkJCYfGf92Xepf3Krx+MxH7Ni6FFubSf
+jrsmDZBH2ZU4vo2ev21qp/3ILzk9ced9en7MXV9Zon5BTnSy1g3rSUzzxiZ5
+RMq1L/oR1rrXpSSO84i2xaOyHubcOR7R+Aj9Yl3fV+VG+z2gXjqA71d3O9dQ
+L6krUKmxnlZe2AQzxvf0Wc3oZyB38YHb//8nFN/+3+c65r9ilhyv
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.907871335428632, 17.11903631971389}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwl1gk8lPkfB/DHUe4rFIomWrRSE4VVmqeibJGhRLusiagkTSK5JyS5EjZX
+y0QUHTurclQ0VK5Ks6JW5yhHroxat/h/nv3P69Xreb37Hd9reCzzPOrkLU4Q
+RBP+UU+iaw4fPZL477OAJCTiUvbUwKKmYcc8FZKMysw+FAjz2pSqnFVI/kt9
+h3fLYdrnSN0fVUgizNXuUqsuSQjybca0VUgOXdKyiUPZUXF8DSz8FutlAguv
+jZh747zPz27M/mW4/6vQ8A7Wf6tZsvgaTF8rVaWN+EYvV/1zAqa925WcDdM0
+dGUcYDLfyVZXleS3hYTFr4V5vkkfeKok2RdgE2kAc/8Zn7RSI/kOyVPulFlK
+cU51aiTpdql7yAQW7CjQNFcniepFGS62sPBSPPOCOs5LRZDe1P1e1zTfqJMc
+pnVaXxzMjByZFFtIEj+Lqe0upfI94iUls5DkxMZXHXpK3W/RLi5SJ/mXZ9X0
+qXq4met+rYTHOqQeEKiXP+Ss5Q27GP/YrABzY1fen1IjOUuLVrsrwUzpW18j
+ke/AVKaBJLWufmbvBOobNXeKHcB9/HN22v6qJId46h39GOY8DMrtXUCSrkUr
+u9KoeOfD5g6jPwv7DNSdqXyiyj6KLSA55yfHFipS9TXXf7uJ+bjkHvXh09Cv
+dTGlwej/lk7Ga39YENQp5wGT6R3hS2B2Y/wpH8xD6rRdQ9ZS5Ofxuj4Z1m9w
+kJOACaWEwVbcZ/WTl0GEDvIbTgswQfz8D39clYNZYUbBVxD/eV2YbJk2zr/d
+PGGE/DcZG8UHwOwAjeVVqiRx5sXlWXuYkL99exv6IT2k07kF5uQcdxTAd5sD
+SSdY2HJ+ZAfmEaii0x0E0+3DLW9jfqflXUNLYV6mdLsE5vH1N6vGfpgMVrlj
+hnmN1PMn6chHMK/aYTvWW98J+09QJjKqrbB+VO17aDnMTb1UrwIfWPL9fR+V
+v8zkq0bcb79v9osc6uXOW/XJB/GPiwUf1oDp9wNWjCC/VeWrzeQpWy0bPaJG
+EguyNMK7cV5ZnGXThXodFBqeFcLCq3bsX+HV23b9YAvzZi/wX6M/Am2bjjaq
+vv5bqofgdtONEf/1Y0VjhDz8NFiyrHwJ4tvoTDSh/0bZR3vVYbamv04R+l8p
+Hqp6bDHytQqazYf7rG09W7So76PvzF2YVen6yRTmWdx/9i/8/YKpxRVNzKPV
+O2E75pWT8sHWGGYb97+oQLzXS1TEmzUQf+OIkjnyNSDiaRyYZLJv1cIDMW7y
+jrBgk38OE/WmqhnWb4C5j5oOvIVtoiR7N1HrHTO97uiXgj/rljvM6eIda4H1
+ta8xkmC+vRrDEPNIDOy/3EidV7a+54P+a9eGbFZAPtxz9x7EwZHJUTK7qfyY
+6TWUs90MWi7AwhjXV9jPKd3ikfOcsqJPO+4jNuk8/j5Bmd6+SIB4A40ZexRR
+v2iF7f59cKxpvZI8zLw2WPwR85s+pvX3MPbzeEqFvyD/17LpeZVwqvvhLAG+
+n2sCr3f7wIJXXzp3wArfrwbPIF9W26L0F+jfsI75sXCYKSWj6Q+PR1cqDyzC
+/uY9XTT0M8XXNcKe8g1Fmgj9X5o9eKoEeTLXPwt5j3n6rScZ82DRKcH3QVhG
+520HvmcEvaBPejHu27/9okEb8uKryjr64L7N0977nGDRk0mJJ3DwCs133chL
+MJE9tQXzaVrs++I8zLGUnG2GO2T+XOsKpxb2aO3Fuc60rpSfYPZA9WwP6vcN
+sp6/DuYqyf1yBP35ckDAsoUJDY/N3cjjZPva5WyYvkLrnC3yNPU89ugKtf+Q
++Mo09F/zSZuwj7ov38O9BuvrdbWS6IgjKJP92oz16m5hbhDMM29lVcCZVi7T
+ZTBXp/R5LOy1+uEM5kCQG7dK4ueVY1ZUXEQgLnN6aONzPAPI6BEpPIVGYWJ7
+kF84rVJqDPtZyzmP8fuBkGu/t6+Juu9pQNFWPB8kpHw4hSen5eD3GtTPDzje
+RKP6tclTehNcJvuo5irVj792RmF+nJXqTWnasDK7c2M4+t1Z4a8ZiydHa3iC
+gXVLo5ieTswt9dzx0WX4f6eaLnErWJif3KMH24Yl5uYqI59dD/62wX6Tghs3
+JWCB7mWlOKzbp/x5YlQR+2dpnp3U+TbWsCxM29y1dBfi/vvlrJ6DAvqdNxTQ
+TuVxmjVTL49+3n5ZvA95SymybgbCvOe10SLq+6nyKNcFFqpalIaiL1v/fu3m
+B6fe+zQ3AQ/dqR66DgvspyS9MQ+DPKk5ZdzP9HehV8HRGXbeKQrU+6LSYgTu
+CQu7pIl8+DlmO2XxPU0xmBdWDPN0phkS8N7IikJDJeRLWCS9xf6t1VVuGTDb
+N3FvFkzTlFb7ANPLDX+xhJP113ydg7lFtjkNyIe428cUwcSykA1b4ZcGm9Su
+w6wrLgbVqKc2pbFzDcyzm1diCpesbTCJofqjY6z+F/oxPR1LXlag/t6o8dwA
+a5vynuSiPtFsTMsb9PNLyIvaADnkMxF4JgMePZ312FQW+w/TD/nCb1O0uf3S
+iJ9j2egB79b5p6BQCv1SvecUBFfqMsUPz8d9EW5SpfBk928mdvPQv+7GzdNw
+0+Kzdo6SuC9R4dN+xC9mxMRHS2BdVS6qE8bfF8+6xTGPrzJ/+iL/g30HvSNh
+gUSR5yRcJ6Px1A7m+J1lxKH+M2fyb+yE2WVqkrLo14CyiUQUTGwv/hwBn5BV
+dXkJ8/5InHpDvY+SSwx3IB4n4+HhpZhHyKmRw60w76DfC2t4uv4PbRbyozuG
+/7od3mX5Y1cvzNrG6lgNv35z9I476kmdMxOM4b59O1VOlsO0lQluBfD9VPus
+zzD7zu+y5nBdj3/8IEyf2pF9F/mu9VqiXw2LWLY3TOEfMjfOuVD3yVYFl6A+
+zYcdAdVUfLF+Zz24m6Z7XUTl6xTlT/2cZe6WOTmOesh3CY4MeDsnbLxDDPmd
+i+UOob+t89xNCgj0y6auDu8fYixxZlnFLIMQTO8v5VLzsf0hbvkMg+Ctarte
+As+e97QommQQdFEHu5War0PPW+Y4g+A+d/imgfsvGlW82jDKIDhPtQtCYCed
+u8Zh37D/My1pGH7/kkjX/Ao7nygMRL6lx6Vu0UYYBDviL0Vx1Cf6nXM/XcQg
+SNV7salw7LdaMzbMTYu/qYH+lE3M17sJCwOSz6bDgbqPD5A4n9pR/XgKfpR3
+hKOO+5lOZlo/o/9ZMV4HNRCff1czKRRW/Pby9pp/GYRy4nBhEvxeUNdii3xF
+thUpkbDTwbwNNmMMgtY3augIjzVE9yuhPr7Yim/z4aSKLI8MWJBkKSpEvHi9
+PEEtrFxdftQYLq3QE0ui+lGTUV+C/BPky3sHcB/nk93UUtj1g7O8kIqXctMz
+E/W/f7jtoh/yIY/v37YIVj5pZJJL5T/sEFmMfqWMbnYORb10lw4l6v1nLbI5
+8tMgg2DtluiRofrdNOtH70W+u6MSeqh5XfSLkPmIeTWYj3+EpUtHpAY7cL/1
+s7A5+OSl6Vo7Ac4f8K2yxHnhuGDd+hrEC9W/Q723/vtkV///qUb+D6LOr4I=
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.922596693736967, 3.8067338747393404}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000002274`, 17.}, {13.500000000002274`, 16.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.552325660469876, 17.180083206945802}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt1ws4lNkfB/B3RZQwqywh5JbrmCKpqKmtdkhWUs22RhIaUsZ2G4oG67KR
+hkaIXHIJycrdFkYJyS1FF2I2FWqLveVa/b9nn7/nwfN5zu895/f7vec978xy
+zwAXbymKorrwS/5TS8gffSb1348Wk9KaGRZbwMKQWh8BcWVPoB9My41/8QH+
+2Wt2RwnsfI8r2KbNpPicJM1puHTZQGwEXHpxxpFlwKQYwsa4HNhxnrpqKpwV
+b3k2D26jX8sYhXUGvft/gTcY2KtaGWI+UeUFF1h98vMIHxYesB2Vgp2vTz+o
+gCdYmt6ZWD/dwHH8NUwlXwwzhxPd5s+XXwHzC4+WL2NS7YopbnrE3pKmNTDX
+sVhCh3UWdDAaNZmUB09Rlzgru1RrD9zZdH67Llyqstl3ToNJXdJbt0QBlggK
+lGphTd+KwgmsR7vn9PEC3N2bK+qCPfxKKiPgk7blKcUkn+CzQUnwQEhSwjk4
+68G7P5tgt5T3Tv4wM0+wl4b12HkNPFe4u6047Djs3MzctpWMd5QovodpCVdL
+maR+9dnLx5F/1EFHeRaJ7+PIyKDetqu/qruRfCJP306Gf4sTSoWQ+D8GvjZE
+vzyUN24pgnkc//hCWKelr+klzJ/V0FXUYVKuW9b066M+m8PVcbZwVbS091GY
+v/EnaXdYcDXv99swW+GESSBsIvtHgoIRk2JJfXI9AYcW9VzmwBPshmQ/uH4m
+3biIeMvEnZ2wNTsueQJmXplmm5F4FW4s3Rj5vWn+OIV8plotVD1hZ544k9z/
+t2cE3b/ATJWcOhr8TyL/ZS7MKHv+TIT6PufaqJXDvNUPczRhsUnIUAXcPeyV
+XoL+CJIY314nDi++6wy3Ta0bTCbx3yzdIQer2Vq3nIE9jCo4z9DfdUdlT7rB
+OsLaJ82wpKkody1c2qhr3QO37bttpkry0ZsImiX7ZYw3PIl6hLc0TTZhPv3w
+eycGYd5dW58suKC6aFuHEdkX/QtVkN+Zzj7nZpi2tet1KnleMm8rPIAlYSOT
+Rqivk/bKcwD2OH5HfAu2jRJemoHlNgpaDdAvQ7+tjgYkP77POBeWO7z7lx9h
+7vltjrlwuM23jWkwpd5t0wtfOrl3bBiOSSlLnIYXrTqeuNKESdXYpvUpLWdS
+m6cHZcNhSpttqQp73jkd2APHnKKLyHixWcuktinGZX/PJtc3XWwdOQQzCn/4
+rQ9+/qdV7zWYK9o/VAA7FyjXvoBpS1Zf+Qn2qdsnL2eG/f6F89YaLr69q88A
+pvF2SP+F+tr/uXnH2oycB7Gn+KR+l1ca62FqyzqxLNykzG63JNfzPal89Ctq
++uVOXZjp15zOJv18/qaIzO9BL53Sg/nvNO3GsL7Qkb9BHg73+K66meTvHLaG
+Bo8qs8ZzYElX9mpLWDeQVR8B81aqKx2DHTyrB7hkXMXevEOL7N/hht3EeV43
+7JAPu2Qk2BF2tk9LaIA/f+2b60TGz6kKDFFf3/qIzRx49Nvq5gDYaG93HR8W
+Pw7cVgP/MbR+IAuequwvm4PPpA3efQyzlin9vRb9zsgWyyxGPSz3J6wj8Fzl
+9K8/wILXB46J4N/EDj75ML+/7sENuEh1+uxHM7JPG3+ogR8nBxp/Z459keYk
+KYdzMxbEJMESjd2SLHJ/TZcODsI68qcSBXCWbt4NHTr2w2fRE1cyrjD8hA0z
+rBYt14G7m2RrImGuzsOdr8n5sE3RJh8WV75PvQarHeIN1sJMh5VO5HlvPqn/
+WAzrqNDqGTCjSPTyFizQjl88h345RRX5FpP4+df/JedPeIi/kwgu7TjbGACP
+5i4YPgHznpWNOMN9luH3d8GSgoVnv4eV/fb3MMj8fBkTf3ifofYzJVjIeaSY
+D7uHLsn6G/VRdLWXM8RZkTdIvcKUj2GWpP/NDaaP4FGV531kf/Y9q+jogQu8
+bZPJ/TG0Dqkl8R71P6V+hfr1H3UETZL+mWSec4A/0zUmNbGeXFy1mhCmHRLz
+neCpjnDNLjj4iGbJOZK/c1CjtC6eb96qhi6YpiEspMMM+9mDGhbI55Ox/HY4
+5hXzq8Owzs3yFja8wfXS/VvwRFt70F7YL9qbJ8PA+DqH4O/gJrtFYhN4dKCn
+3xjuGM6Mc4QlpTs4FGzeeeSWLyzn1rGrA/mIThj6h8FGYbTzF2GnDxPzLsI2
+jEVme+BokdLqDDhGa1OYGuwRXymVAwuDHkpeoB/R/w6Is2HGKV9+IXmeP2nT
+0sj6vyuuCIWFTfd7L5D5yx6xyfuh1yqCQdZ7Gmk9uh2uUDb145H4sfL5LFhG
+IW7EHWaFlJrvgi0F9d84wTWngtWOwMv9lnA2wtzNJS0i+MurYzJWxHaPzrfC
+OdpfLMzhUnaC/nySL+/pXVOYH3PsPrk/c4lVBxnE5Q88SL03S555ryfrWXxJ
+H4CvaLV0kX7FLN5upEf6bye1xwtO2TfReRDW+3JvP8lfEFV2LQ2u9Bcqkn7I
+JRfYtMKxJTr2rTAvOv7SCGyf4HZ/nMw3Tz5kCt545YiZ2kpcr17lPgNrVdtL
+M2EbxW/838MLt9wf84azGtYm9MCGj73jY+AYWSW/63B7nbg9H5aI5OjBMDtN
+p7oBFr9ZItoE14XSc3pgFt2+lOyvkST3VUPwRPRf7c3kvLa4vOc1LLd0hhkL
+U8cnXIi5nKKtu2GvH7fWkPiUgncdK+DRhcbuvTBt9ayHDMyzWMVuIflKH58Z
+R78l4wdGq2C1ELs/R8n739MuII+sH5r+ZgLmuHrvE5H4Ztt6WVy/wypGORL2
+2JScaQYHGSeO8WFGVA7lDn9yn1sQCD89uKM2FTY7rcg9ClOFNVovyPnV0F75
+33jejL4B6rPLNN13mvTHLjPyKCx2mDocCwuLlccq4fy3VaXZpJ7Tr2ik/4fU
+IjPrSPy6DmqVHpOq3jNwaJDMZ8rTPwAzDIdmpVbhXFszGxABz/qWLDOBY1zk
+gpPhu3u1AlxguWb++XS4Ulk6Iph4F7csEd7fxxzPgtm9zTeCYbFtvnsTLAi8
+MrkbTjN6mD0MGx0NLjDUI59bDOs/Eb/44D5O9s+ulTNfWzKp1sQjWuVwTX/n
+G2149Crd+AS8m57vtQK2uTjdZwOfsanMM4LFMUN+X8GH5z0x0YdpcnNjD9Gv
+Qze969ThlOat/xbDC7gsbwUSb+lSQN4XZSNvfyTrq93+NfQc3HXq7tw7mHds
+xaYLpP+ZJhXPYZuxntmrsLIL530bLOZEfGqCbTrjqHpY+DRM8jccKh5cXgnT
+LqxNN0c+L+OsXG7CzoffZwTAi22CXcpJvYOWH6pg16Rll2+R8Z8zHCn0IzHa
+cCeZv7XqpicL1v9+vdMQycfIcCwWtttcpDZD+rnFvacF3umz/8NS1JM1LRU4
+DX+8EdxhBxsFD6Vq4XtFVoZCmBfpZ9T3Dathrtb+0ji4Ru219AbYR/+f8Qp4
+osrRYQ0clxr5qB+WO//GTBeWJ99rrP7//Uaf+T/tBqKl
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.54570515633175, 7.171979374673003}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwt1wlUjfkbB/C3tN+0oGPmKm5TUkKFQQpvJYQUZUmr20iNVEyRGrwto6SS
+GoU56hYVow1ZC7fFMkq0GEupG2lPm5RC/+8z53/Pwfmc531/v+f5/t73Fm2h
+/6ad0gzDVOAP/ctI0V+6LPPfZxLLfDc2ybOGC2qd9znAJdFjZomwsfBVQyy8
+eI1mzzuq7yzouwi//7m5auFM+EK7JBOO/OdjYyTMnvp+MAIuHaub/xwWRMXp
+WsGGKT7Tp+jh+sRHNW3qLDOo3LtlA8wtvvE6CI5SMlU/BLMX2VsDaizjomf5
+YxrV4z5U/QIHRn9tvgYLnO9NzVJlGUl7XGwR2VBacEyFZXQcTrfeIGeOpXMT
+WSajJ8s9m+6f+yT0jDLLDHFrP8eTffgvGnks05nZqBUAizceiXWC5z22T7Wl
+euCrUlXYPjvBfzbZsyRGBq65G5OoCHuUzBEvhudPye3owXyizGVKWbDp4NdJ
+b2Buzmp5G+yX5JBvTfMzjgWiqehnW6f8zzWweJZfuBz6/TXp2xcJ5RU8kK+A
+eeJ1nsh8gxO+B05VwLzsS52petjPuDbcPQr2aPVd7Uzel792DNbkFSj/RXbu
+inZFfuq8p5vew31f4q9ehFccrjxlMgv9rfE/8Qq+WjQoHQGLC5w3dMKrWz+c
+q4PVumf/3QC3hXXs0tHH/g7+o/mw3inbKF9YXPF5nhcclN7mmwtzZzfekIb3
+VRUPvYclwfn2Mehnv8m0KBUD9Pnxl2ppODviis4cWGSWeuED5p2jmBBsTn7D
+u1OKPHga3s0rYObcBc3LyGtfZ43nYpjVddibgzxLnzSm68KC05+n1CqxzMyc
+pHJFqqe8PmgA9/4R495B/Ti6pN5UZJkv3cp2D2EmqPF8ONxtF5J4HmY32x6P
+hXUaJLqR5CeV/Dp46OizF7/S/QfrehyxnuCap+52qi/9mCeP/W+nHZjuSFae
+EfwO9rglsqY6x1fY/Br9Nt3xCN1D9TF1SSPmCbWPH4qDPbITBlow75fhOLMi
+qtfUub3F+a734eZ8onynbdjsinw0mjVUaF4mUs/jFjx5wsrzYXDC2b6HozAj
+KLSphiWel8sFyLtRZpemzmyWCbDvUtSHd2Q//DEQZn3M61VhfrbxuhK4L6CM
+/xr3r1Dr75I3hG3SzI/SeQhy4qzhANF5vWkwL3vrkmCYXW44aor+JuvPiEw1
+pPeHf08H/Q8ua7x8E5Z87jSUwnw1ActTymBx1plgCfKQ+T5YXwpzMw6JnyG/
+pn7FGzfIecW2DchX78T5YRHZN7lDHX60SLE/gtbP2W0RooDnl2++SUj1udG7
+NOF/akTyK2DRFcP9X+XxvCw/OVmL9rf6y2ka6gd8q7zGMZ+o4nvZfnimxpvb
+7bDA++91ilhfXmOBTz0sfmN99Qk8nLF2y2u63tlwYwH6y534pOo95cX3y8xF
+/718v9AxmNm37VMhztPlutNWAe3f2jt+E/Ouj9pUsJHyaTItvYg85Cd/MIqn
+fosyZoYgr1WPR7pr4QTpqG1qyLMzoidSMAee5XLCBm47ObJ0L9xXMWX3Tjjm
+ua5mGdXFB7WFcLStpt7kuXj/ut6FrYAbKov93GCuek/vN6zvyfdbmwFLQg/3
+roLlXC38G2DR/birQvQzwuNN5s1DPUd2qQv6Tfbukp5LPuFtw2KeGapq1yxg
+0U/B9zQxb9X9Jmsb8qOmN+PIZ9mF+TErYY9H96OHkaf67Py+hTBjf+e8Gqw6
+/jJYk+r6bXZbcB61deXJ32j/eudd1XIs41XcNKmePOGpbDSsbmX34SYsyLZY
+cgiuUvyokgIzGcN1BXBbxPO9oVRXjj40g9azcL+8i+pnjSpKYVff4X5Xmt95
+KOMk9tdrqRt2h8V73HI59FuyqLzOj/ZrPdYVjvMsE5cMx1A+kROFMZiv3sdK
+u5DWc3n6PBrz83OCvTrInKtfAPJZ8nbLMgPKJ9P23ELk9/dIbcJeWGygkvgE
+Dti9quE+za/cLjFA3sUG4evVjbBfV1H3eng0YbxFaETv97/GJvALY53sK2RZ
+NeFL3B+xI/32KMykHNlpRetHjD3UMsb61pZav09kuSPqslKmsODDwMTj6E/+
+wbTlG4zp+T7UHIr+FzrNY1xhj/Y7T50xn+cfv0zfCYtCi1qXKLKcVeyiR14w
+J8ncqY18ZEMUDgth1q2w5yd5lktt8Z7iRPult76ykWO5xQ7r09bRegdST4lk
+WSZEq9bbjOp2h7SM4HPdjk0GVOdiY0dlWG793YTwH8jX1BtlUNePGXmmQP19
+C6tZD9+tWOQ2QvN2d4w/hbW83O61weLpg7wwOXo+tj1thjmnOGUXnGfL4Sxe
+O+W3xFrJAf1yqclOY7CkP+XcNpxnTEXT0ETKI944zU2J5fz1dS/okgel3m3h
+sdyl/Ul6FjDTnNezAHlVFYal0bxcaE5+hzLLVcZ8642ifl1l+X4436yvsQ/z
+KY9Df2bfRt6fXCIKXlF+o133HqE+N0h5rpQJrl9b8zEZ9R0rBsSzYKbUVMoA
+/u3dD0rryJ9uvQ/H+v3CgmofWHLlthd+HnEDh+doRlC98dq/+ej3bIzxomQT
++v2kOPAMzkfL6cHdDKqL3F/g+4kLNPHIvgiL/uHNw/vDbRoMXk7mKpadtcb5
+HFO8qE3XS5ImCDchT6OkI0tTyCWu66Jl8L2x/PiVaFhwdf943wSWy6yb0nSA
+1tdMP54EC8RBpl5k2fMygXDAt7cWm2FWTnUj6kx2e2zAKlpP7KvVi7pqzhFt
+M7reuHI0DOsfG0kMX0h12/lZVrIsZ3RFOnIB3d+wMMgA/XUbT65cQtf7z3+n
+h/5nCo/mraR+Fn8ynofzdJxuq7+V5qu01jHB/L13cpv8ab1W80JtPL8ZMxr1
+48khic8HkFeW2QuVK7C48E/pM8jzrZHE/SW5s16Bh/Nteb/57jjlUzDB3hLu
+STqbqz+fzkvPxgznsdvxaL49LPG9eHoI70vJXKMN+8n7eviBWO+jxaSFp2HG
++sa9YuwffTXN/DrM2vIXv8LzZrXGMqKS1jusdawa/SdN0fJ/S/erPAi5juc1
+LqflThssvqTVdRLP89IB3+AuWi+vbloQzmfXSLFqB3lr2ZAv3pc9IddNm+n+
+WOVNR5G3dnLC5zpYFGCysVKa5RpHb3IPqH7z8ePV0vg+eJhqXkh1dedn36VY
+xn/nb1kZ1E/Ydt9PUiwXNHJmeSJdr28foI/r8/N6gyLnUx7rDqRgPcWlb86G
+wIK9gRpm2M9LQ/NxEPWr8JuhEs7zksDuX8pD9Lub2xfYU1huf5jWY2Vzx9D/
+Pktnv1i637WdPwHn+T4+TyWd9nfQ9pZCHsLbxUVFNN+kksp2uLx+KL/+v/UV
+8nKQn6W5h2Scrq+etdIS+aos2KA0awFcpaifjvP9cXV/mR0s2FBdUob69qN9
+8cGweOzXxGz4OTexO42uP7HD0RZ+tfaFXzksKl49cAvPj5zF9uctsOTSzw79
+2H+cPgv+//8TBfZ/11uc6w==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.666233980906949, 2.1296932060463307}, \
+{0, 1}], LineBox[CompressedData["
+1:eJxTTMoPSmViYGCwBWIQDQEqDiEyIFrOgaGg63OSmYrDzO9z9v9uk3VgWLF5
+kku8ioPSsWuhi37JODBoaO52r1BxuLaBb/3LBCD/w0aDX/UqDvqbjmztPSDt
+wLBjCturUhWHfy805q1RAPI3eJmtiVJxUBZ+2RDbIeXAkPCA8Yq+ikNNZHC8
++z9JB4aK1Qtvf1d26H97fYldB5DPcX3a/63KDn84o2++0wLyG8QO8eUpO4jX
+1jVNfSnhwCAgx2KkouywPWWl0aWjQP6LFavW3VFyWLTIuKtvP5DfscJy+Wwl
+h/kz33T/vwLkB3ha3EtRcojcYaJ/gAlo3oH87jprJYcJ68uXMLsA+Qy/p7xR
+VHIQen0p6c4kIF/D6uwiSSWHdau+P5r8Asg30Hwkrazk8EG39iuvHdD9B/7P
+P22r5LDt2qvvhj1AfsAHbvUMJYfOV85Xg8+A/GdvuXu+kkPCzvcHp/0A8ndw
+tAc+VHKoWCL935kHGB4CG/TkNZUdXvAILhJgAfILGpP/Fik7+D+OC/O7B1Sv
+oXp02S5lBwab++4ss4H8iCnTv/1WdpDY/v7gO2uQ/Wck1IxVHCpY/NtTjwDd
+98IwgyVWxaF0ZnuMliWQ73HwsGq5ioOa/NH5SguA/r+QH8/eoOIw1QIUvxJw
++SfM1gl348Xh+qd0Viy+ekwMbv4kuY0Vs6zF4PYL7hKwEzwiCncf13OFHb9T
+ROHu32W/cOVGRVG4/xTF3se+/y0C9/+GM08Y9nwWgYfPykwBu0x2UXj4NVjs
+0VpjLAoP32AfUY5zxaLw8Ldwbub6dFAUHj/RFRyyOeJi8Pj7bq47VzlXDB6/
+lcUd0X92i8Hj/8KO0xfs/4rB00dWp3AJg7Y4PP1kNJwpLXQQh6ev4H1hZ3Wt
+xOHpT+hLY22WmDg8ffJJLlUTvCoGT79VphrRB8vF4Om79+SaBTsYxeDpny1O
+vH5RuSg8f/BYXU8Mvi8Czz+3Cqy9iuxF4Pkr+MDHALH5wvD8x7Fac1UsqzA8
+fxZoJzuwVAo5wPLvVjYQLeQAAACtaGA=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.354800000000001, 6.}, {1, 0}], 
+        LineBox[CompressedData["
+1:eJxTTMoPSmViYGAwBmIQDQEqDis4ITTDhdu3dtmrONz7tfe8025lBwYOlz9u
+2SoOf3P6puVlAvkvylXY6lUcDp5abPiQH8hf8TIwpFLF4c7e6gtztig5MDBU
+rVgVpeJwWHOR3IlYID8hIGGqqorD9Ss5KdqCQP6F+ZNq7yk7HEt+3Lj1sqID
+ww/VNO9uZQc9U+P/QiuBfI6qjBdGyg6rtsx6HT8ZyM9QbVtzR8nB9nYt++9J
+QP6EvTcP9is5bJyc/qF2GZD/wNKnJ0jJgf3JuY+3ToHUb1inqKXkoDhZ4e/c
+30B+xaxpdyWVHBY/iEr0Ngba/0L6u6SykoOR9oXkK9lAvsGGFCFXJYdPWkE8
+EvNB/NupX2qUHG50nC5JPQ7kW+iVSR9TcqiS8z3z5T7I/SEHiqWUHXbuCGPy
+fQrkT7gR87tI2WFrwoYVvVeB/AiFqPATyg4/OgWeT9sA5Guc1SkQVnE4oXFW
+m6cCFD4mnRx+Kg5ut1fEGOqD9O+QcSpWcZgx42PG0ltA9wbskGNtUHHwkgFG
+R4MiXP5tBd/0KFVFuH47s/DF5y4owM3f+8Loyud2Bbj9ve3vJTL9FeDuu7DB
+P7xISwHu/jMRK/9uklKA+4/78yZjbgUFuP/XdJh0z7JQgIfP5GdrPz9PUICH
+X/Az/TnaUxTg4fvIYOm8LWcU4OGfUnefKYkFET+1uoZ8qqaI+LtSO4O/KRIR
+v+5mTT9YchHxfzsmVWRBDiJ9hN85w/A2TBGefvavlanz0lGEp6+1NpNnX3mn
+AE9/B5/HPjRfpABPnyuCW/STvRXg6bejd8cc2wfy8PQt4Pn4kpKuPDz9++q2
+JFR1yjnA8scOfhAt5wAAXRMymg==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.354800000000001, 8.75}, {1, 0}], 
+        LineBox[{{6.4999999999976925`, 16.}, {13.49999999999251, 16.}}], 
+        PolygonBox[{{9.4, 16.}, {10.6, 15.6}, {10.6, 16.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 16.9452}, {0, -1}], 
+        LineBox[{{6.499999999996362, 16.000000000005457`}, {10., 
+         10.000000000003638`}}], 
+        PolygonBox[{{8.552322615314452, 12.48173265946094}, {
+         7.602165824326175, 13.316718930329426`}, {8.293188945044921, 
+         13.719815750748694`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.515942703607428, 12.823799910437668}, \
+{1, 1}], LineBox[{{13.500000000007276`, 16.000000000005457`}, {
+         10.000000000003638`, 10.000000000001819`}}], 
+        PolygonBox[{{12.052322615314452`, 13.51826734053906}, {
+         11.102165824326175`, 12.683281069670574`}, {11.793188945044921`, 
+         12.280184249251306`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.484057296392571, 12.823799910437668}, \
+{-1, 1}], 
+        {PointSize[0.04], PointBox[{6.5, 16.}], PointBox[{10., 4.5}], 
+         PointBox[{13.5, 16.}], PointBox[{10., 7.5}], PointBox[{10., 10.}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T17", " ", "P1", " ", "N33"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdieg/giijfhfjhj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdieg/giijfhfjhj.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {44, 22}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwt1gtQU1caB/AjtjwEIshDtlAQzAKuRUOX54rJpUKxksGAvCqMIiOIGiVF
+aYMiG4Uqsm4LiDa6FHkEDUIhIkKwyvAqRJYuEW1BsBApICLViFgDIuz/dDcz
+mczv5jz+35d77sQxPjksQY8QkoU3/STqRbz+xJA/XhyGjPyrNboQLu755pBq
+PUOazpZyXOBV9iuCLsDpaYrCMhuGmI2djjgMbw8uDbGCxS3EOAa2bKkVSlYy
+xMfqt/AQuIj11e4n1livwFlK/TDQ6/twWNpVVEXHd6RPDnZYMSTa1nKYrld7
+0XliE2x4t0onhVPO/pDTY8mQzdku/A446aqbWghry8xVc3C7p/e79rDqaZH+
+e8ivb+FZNGrBEGXUpnZvOH2fm0sLPH8hPigCtkv4beN1uPvFmN9nMCfV+3wj
+LCs5F58DW68aMuiFp+62FVyCB+Tul2dhxXeVAzUwd65l+AO6n2hBdBMeXWZX
+vgfWPF7b2wRLkoYKyuGCEya3bsE7/vPx2hHYJKvmwzo4x9rzpQ3q8xtbJymn
+eWe/rg+EZaoc9zy4UL5QuRtmX6w2E8MaG4PiFNqP2xrbGJh/rHflAZhzY/bI
+Bjjfz14YBgvu96XQ+rd87DHoCGt81tdMoz9TBi55g9hf/At/vha+qP69XAL7
+REljxLDcqc7cAm6W57ED4bkAh2/OoV7pgu8OW7j+TVW5MazOZVXMr0OOpV4e
+aSsY4toZ6zYJ9/ePnxsxx/2gqPlqFO41Dgjmw4rDw6NPYTud/92bZrh/uKzv
+F+H0rkzRh7Dg628tHbC+X8OV9w8uZ4jOffyLzTTvxiIjKQv7eXEX0mDxC/uX
+j02Rb6Qo6Roc+0vTP3bBYvYynylYZLqzWR9WcLeNWqD+OBlf1meC60LPBg5s
+Kf1C1AvLDpl/EgyrvDvPv4TnD6oS4+HmhMYJT8y/df62Xiqce1Lekw9rqgOZ
+E/CUJrxAD3lUU3rHTsMzaypq0+H2js4oer+0p7l56WAP3Y26LNjPiWsrRD18
+/QNN9Pdjm00oemB26obRRPiZvPSoKepvDk78aStdn7gdXQ1rHG6mecCiyEfv
+uMAmofWPrWCB9SLLGpYEHLk2iXpNGpQPh7CeujPPW077Me7ZkQA3PxOy9sCu
+se1ercgTPZRxfw2sjl6Ieo164pZkvp1G/038P18wok4bbGiHmRWbUgn6IRVq
+7hfDfJfLviPLcF4vOt7IhsXziooGI9wvXSLfY7BrxM6K04aYdzWqMQPWueh9
+tMuAIRMDcYtnYJsyKyZIH+OzYoOv0PkV393b9C7q6ju1vZuObz/lveMd9PMB
+N3UO5gxnxxcuxfWSsuPrkTdr65sOPVixVfTeXjj3QbBTgR7ytryRy+D+a4Kd
+obDP9sjjw/R5pIk54wt337z8d2P0K2Bf5tgnsMbrn6Fsen6Cq6ePwcrhj6x9
+YSHLQdkDF/ZXPtgMk0zha2/s90Gh/lAYnR/oklENy/6qK4uEmc6fM/6CvLGP
+pp9vg5PasrWlMP/Kre4tdH7NuJaF+nQBczn0PBZnVbATYYms7bYzrD4RsaIE
+5txL9DClz4eQhEONsKvwb7/S/HLDQ+KrsKKN7V8MC1qPvBXBZlF7zHbAhg1v
+K41hw09lc/Q8svn5Rkexv/hkjPwh+qfm+ae0IK/GykRWCscNPl0YQX1aq0Ku
+CBZtVEePLUG+Rc7nQXBSKCu9h2D8nRzNGjpfnN8XtsgjysruCzawoGFD/et5
+HlnVcNDHElYI/L+9NMcjuSGDHXaw9ssfD8fqeEQ+8bbVna7Xd9Kf9zuPKKY7
+V4fBqtr6/VEzPCL6OXl3Orzq15mVtdM8YvbkeUE1rIz+TPrpCx6JmzVPHocl
+4ifz4VqM73JKdkR9zVXLz2x9ziMaS//nsbDGoD+j7BmPiOMdAs5TlzxeWgRn
+7yUDXbBkIdyPg/Hq1dcFOtqvn1gHnLBedkLNFhb9/dtaMjVwVkzmPH0+KoI8
+f2jF/u2apBJH+vzPrTZWIp/4wJUhakY1FV/9kkcMD1pcsoWzS8z/fRb1qJbP
+WCyHlVqj+chXPMLZ358wi/3IvXWOE/DmU3O7aB7lubVf+qIfTOf1V/mw2d4h
+ZwYW2CkjIqgvj3BmMF6ZZz1nQfPPKkJCYfGf92Xepf3Krx+MxH7Ni6FFubSf
+jrsmDZBH2ZU4vo2ev21qp/3ILzk9ced9en7MXV9Zon5BTnSy1g3rSUzzxiZ5
+RMq1L/oR1rrXpSSO84i2xaOyHubcOR7R+Aj9Yl3fV+VG+z2gXjqA71d3O9dQ
+L6krUKmxnlZe2AQzxvf0Wc3oZyB38YHb//8nFN/+3+c65r9ilhyv
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {2.907871335428632, 17.11903631971389}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwl1gk8lPkfB/DHUe4rFIomWrRSE4VVmqeibJGhRLusiagkTSK5JyS5EjZX
+y0QUHTurclQ0VK5Ks6JW5yhHroxat/h/nv3P69Xreb37Hd9reCzzPOrkLU4Q
+RBP+UU+iaw4fPZL477OAJCTiUvbUwKKmYcc8FZKMysw+FAjz2pSqnFVI/kt9
+h3fLYdrnSN0fVUgizNXuUqsuSQjybca0VUgOXdKyiUPZUXF8DSz8FutlAguv
+jZh747zPz27M/mW4/6vQ8A7Wf6tZsvgaTF8rVaWN+EYvV/1zAqa925WcDdM0
+dGUcYDLfyVZXleS3hYTFr4V5vkkfeKok2RdgE2kAc/8Zn7RSI/kOyVPulFlK
+cU51aiTpdql7yAQW7CjQNFcniepFGS62sPBSPPOCOs5LRZDe1P1e1zTfqJMc
+pnVaXxzMjByZFFtIEj+Lqe0upfI94iUls5DkxMZXHXpK3W/RLi5SJ/mXZ9X0
+qXq4met+rYTHOqQeEKiXP+Ss5Q27GP/YrABzY1fen1IjOUuLVrsrwUzpW18j
+ke/AVKaBJLWufmbvBOobNXeKHcB9/HN22v6qJId46h39GOY8DMrtXUCSrkUr
+u9KoeOfD5g6jPwv7DNSdqXyiyj6KLSA55yfHFipS9TXXf7uJ+bjkHvXh09Cv
+dTGlwej/lk7Ga39YENQp5wGT6R3hS2B2Y/wpH8xD6rRdQ9ZS5Ofxuj4Z1m9w
+kJOACaWEwVbcZ/WTl0GEDvIbTgswQfz8D39clYNZYUbBVxD/eV2YbJk2zr/d
+PGGE/DcZG8UHwOwAjeVVqiRx5sXlWXuYkL99exv6IT2k07kF5uQcdxTAd5sD
+SSdY2HJ+ZAfmEaii0x0E0+3DLW9jfqflXUNLYV6mdLsE5vH1N6vGfpgMVrlj
+hnmN1PMn6chHMK/aYTvWW98J+09QJjKqrbB+VO17aDnMTb1UrwIfWPL9fR+V
+v8zkq0bcb79v9osc6uXOW/XJB/GPiwUf1oDp9wNWjCC/VeWrzeQpWy0bPaJG
+EguyNMK7cV5ZnGXThXodFBqeFcLCq3bsX+HV23b9YAvzZi/wX6M/Am2bjjaq
+vv5bqofgdtONEf/1Y0VjhDz8NFiyrHwJ4tvoTDSh/0bZR3vVYbamv04R+l8p
+Hqp6bDHytQqazYf7rG09W7So76PvzF2YVen6yRTmWdx/9i/8/YKpxRVNzKPV
+O2E75pWT8sHWGGYb97+oQLzXS1TEmzUQf+OIkjnyNSDiaRyYZLJv1cIDMW7y
+jrBgk38OE/WmqhnWb4C5j5oOvIVtoiR7N1HrHTO97uiXgj/rljvM6eIda4H1
+ta8xkmC+vRrDEPNIDOy/3EidV7a+54P+a9eGbFZAPtxz9x7EwZHJUTK7qfyY
+6TWUs90MWi7AwhjXV9jPKd3ikfOcsqJPO+4jNuk8/j5Bmd6+SIB4A40ZexRR
+v2iF7f59cKxpvZI8zLw2WPwR85s+pvX3MPbzeEqFvyD/17LpeZVwqvvhLAG+
+n2sCr3f7wIJXXzp3wArfrwbPIF9W26L0F+jfsI75sXCYKSWj6Q+PR1cqDyzC
+/uY9XTT0M8XXNcKe8g1Fmgj9X5o9eKoEeTLXPwt5j3n6rScZ82DRKcH3QVhG
+520HvmcEvaBPejHu27/9okEb8uKryjr64L7N0977nGDRk0mJJ3DwCs133chL
+MJE9tQXzaVrs++I8zLGUnG2GO2T+XOsKpxb2aO3Fuc60rpSfYPZA9WwP6vcN
+sp6/DuYqyf1yBP35ckDAsoUJDY/N3cjjZPva5WyYvkLrnC3yNPU89ugKtf+Q
++Mo09F/zSZuwj7ov38O9BuvrdbWS6IgjKJP92oz16m5hbhDMM29lVcCZVi7T
+ZTBXp/R5LOy1+uEM5kCQG7dK4ueVY1ZUXEQgLnN6aONzPAPI6BEpPIVGYWJ7
+kF84rVJqDPtZyzmP8fuBkGu/t6+Juu9pQNFWPB8kpHw4hSen5eD3GtTPDzje
+RKP6tclTehNcJvuo5irVj792RmF+nJXqTWnasDK7c2M4+t1Z4a8ZiydHa3iC
+gXVLo5ieTswt9dzx0WX4f6eaLnErWJif3KMH24Yl5uYqI59dD/62wX6Tghs3
+JWCB7mWlOKzbp/x5YlQR+2dpnp3U+TbWsCxM29y1dBfi/vvlrJ6DAvqdNxTQ
+TuVxmjVTL49+3n5ZvA95SymybgbCvOe10SLq+6nyKNcFFqpalIaiL1v/fu3m
+B6fe+zQ3AQ/dqR66DgvspyS9MQ+DPKk5ZdzP9HehV8HRGXbeKQrU+6LSYgTu
+CQu7pIl8+DlmO2XxPU0xmBdWDPN0phkS8N7IikJDJeRLWCS9xf6t1VVuGTDb
+N3FvFkzTlFb7ANPLDX+xhJP113ydg7lFtjkNyIe428cUwcSykA1b4ZcGm9Su
+w6wrLgbVqKc2pbFzDcyzm1diCpesbTCJofqjY6z+F/oxPR1LXlag/t6o8dwA
+a5vynuSiPtFsTMsb9PNLyIvaADnkMxF4JgMePZ312FQW+w/TD/nCb1O0uf3S
+iJ9j2egB79b5p6BQCv1SvecUBFfqMsUPz8d9EW5SpfBk928mdvPQv+7GzdNw
+0+Kzdo6SuC9R4dN+xC9mxMRHS2BdVS6qE8bfF8+6xTGPrzJ/+iL/g30HvSNh
+gUSR5yRcJ6Px1A7m+J1lxKH+M2fyb+yE2WVqkrLo14CyiUQUTGwv/hwBn5BV
+dXkJ8/5InHpDvY+SSwx3IB4n4+HhpZhHyKmRw60w76DfC2t4uv4PbRbyozuG
+/7od3mX5Y1cvzNrG6lgNv35z9I476kmdMxOM4b59O1VOlsO0lQluBfD9VPus
+zzD7zu+y5nBdj3/8IEyf2pF9F/mu9VqiXw2LWLY3TOEfMjfOuVD3yVYFl6A+
+zYcdAdVUfLF+Zz24m6Z7XUTl6xTlT/2cZe6WOTmOesh3CY4MeDsnbLxDDPmd
+i+UOob+t89xNCgj0y6auDu8fYixxZlnFLIMQTO8v5VLzsf0hbvkMg+Ctarte
+As+e97QommQQdFEHu5War0PPW+Y4g+A+d/imgfsvGlW82jDKIDhPtQtCYCed
+u8Zh37D/My1pGH7/kkjX/Ao7nygMRL6lx6Vu0UYYBDviL0Vx1Cf6nXM/XcQg
+SNV7salw7LdaMzbMTYu/qYH+lE3M17sJCwOSz6bDgbqPD5A4n9pR/XgKfpR3
+hKOO+5lOZlo/o/9ZMV4HNRCff1czKRRW/Pby9pp/GYRy4nBhEvxeUNdii3xF
+thUpkbDTwbwNNmMMgtY3augIjzVE9yuhPr7Yim/z4aSKLI8MWJBkKSpEvHi9
+PEEtrFxdftQYLq3QE0ui+lGTUV+C/BPky3sHcB/nk93UUtj1g7O8kIqXctMz
+E/W/f7jtoh/yIY/v37YIVj5pZJJL5T/sEFmMfqWMbnYORb10lw4l6v1nLbI5
+8tMgg2DtluiRofrdNOtH70W+u6MSeqh5XfSLkPmIeTWYj3+EpUtHpAY7cL/1
+s7A5+OSl6Vo7Ac4f8K2yxHnhuGDd+hrEC9W/Q723/vtkV///qUb+D6LOr4I=
+
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {4.922596693736967, 3.8067338747393404}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000002274`, 17.}, {13.500000000002274`, 16.}}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.552325660469876, 17.180083206945802}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwt1ws4lNkfB/B3RZQwqywh5JbrmCKpqKmtdkhWUs22RhIaUsZ2G4oG67KR
+hkaIXHIJycrdFkYJyS1FF2I2FWqLveVa/b9nn7/nwfN5zu895/f7vec978xy
+zwAXbymKorrwS/5TS8gffSb1348Wk9KaGRZbwMKQWh8BcWVPoB9My41/8QH+
+2Wt2RwnsfI8r2KbNpPicJM1puHTZQGwEXHpxxpFlwKQYwsa4HNhxnrpqKpwV
+b3k2D26jX8sYhXUGvft/gTcY2KtaGWI+UeUFF1h98vMIHxYesB2Vgp2vTz+o
+gCdYmt6ZWD/dwHH8NUwlXwwzhxPd5s+XXwHzC4+WL2NS7YopbnrE3pKmNTDX
+sVhCh3UWdDAaNZmUB09Rlzgru1RrD9zZdH67Llyqstl3ToNJXdJbt0QBlggK
+lGphTd+KwgmsR7vn9PEC3N2bK+qCPfxKKiPgk7blKcUkn+CzQUnwQEhSwjk4
+68G7P5tgt5T3Tv4wM0+wl4b12HkNPFe4u6047Djs3MzctpWMd5QovodpCVdL
+maR+9dnLx5F/1EFHeRaJ7+PIyKDetqu/qruRfCJP306Gf4sTSoWQ+D8GvjZE
+vzyUN24pgnkc//hCWKelr+klzJ/V0FXUYVKuW9b066M+m8PVcbZwVbS091GY
+v/EnaXdYcDXv99swW+GESSBsIvtHgoIRk2JJfXI9AYcW9VzmwBPshmQ/uH4m
+3biIeMvEnZ2wNTsueQJmXplmm5F4FW4s3Rj5vWn+OIV8plotVD1hZ544k9z/
+t2cE3b/ATJWcOhr8TyL/ZS7MKHv+TIT6PufaqJXDvNUPczRhsUnIUAXcPeyV
+XoL+CJIY314nDi++6wy3Ta0bTCbx3yzdIQer2Vq3nIE9jCo4z9DfdUdlT7rB
+OsLaJ82wpKkody1c2qhr3QO37bttpkry0ZsImiX7ZYw3PIl6hLc0TTZhPv3w
+eycGYd5dW58suKC6aFuHEdkX/QtVkN+Zzj7nZpi2tet1KnleMm8rPIAlYSOT
+Rqivk/bKcwD2OH5HfAu2jRJemoHlNgpaDdAvQ7+tjgYkP77POBeWO7z7lx9h
+7vltjrlwuM23jWkwpd5t0wtfOrl3bBiOSSlLnIYXrTqeuNKESdXYpvUpLWdS
+m6cHZcNhSpttqQp73jkd2APHnKKLyHixWcuktinGZX/PJtc3XWwdOQQzCn/4
+rQ9+/qdV7zWYK9o/VAA7FyjXvoBpS1Zf+Qn2qdsnL2eG/f6F89YaLr69q88A
+pvF2SP+F+tr/uXnH2oycB7Gn+KR+l1ca62FqyzqxLNykzG63JNfzPal89Ctq
++uVOXZjp15zOJv18/qaIzO9BL53Sg/nvNO3GsL7Qkb9BHg73+K66meTvHLaG
+Bo8qs8ZzYElX9mpLWDeQVR8B81aqKx2DHTyrB7hkXMXevEOL7N/hht3EeV43
+7JAPu2Qk2BF2tk9LaIA/f+2b60TGz6kKDFFf3/qIzRx49Nvq5gDYaG93HR8W
+Pw7cVgP/MbR+IAuequwvm4PPpA3efQyzlin9vRb9zsgWyyxGPSz3J6wj8Fzl
+9K8/wILXB46J4N/EDj75ML+/7sENuEh1+uxHM7JPG3+ogR8nBxp/Z459keYk
+KYdzMxbEJMESjd2SLHJ/TZcODsI68qcSBXCWbt4NHTr2w2fRE1cyrjD8hA0z
+rBYt14G7m2RrImGuzsOdr8n5sE3RJh8WV75PvQarHeIN1sJMh5VO5HlvPqn/
+WAzrqNDqGTCjSPTyFizQjl88h345RRX5FpP4+df/JedPeIi/kwgu7TjbGACP
+5i4YPgHznpWNOMN9luH3d8GSgoVnv4eV/fb3MMj8fBkTf3ifofYzJVjIeaSY
+D7uHLsn6G/VRdLWXM8RZkTdIvcKUj2GWpP/NDaaP4FGV531kf/Y9q+jogQu8
+bZPJ/TG0Dqkl8R71P6V+hfr1H3UETZL+mWSec4A/0zUmNbGeXFy1mhCmHRLz
+neCpjnDNLjj4iGbJOZK/c1CjtC6eb96qhi6YpiEspMMM+9mDGhbI55Ox/HY4
+5hXzq8Owzs3yFja8wfXS/VvwRFt70F7YL9qbJ8PA+DqH4O/gJrtFYhN4dKCn
+3xjuGM6Mc4QlpTs4FGzeeeSWLyzn1rGrA/mIThj6h8FGYbTzF2GnDxPzLsI2
+jEVme+BokdLqDDhGa1OYGuwRXymVAwuDHkpeoB/R/w6Is2HGKV9+IXmeP2nT
+0sj6vyuuCIWFTfd7L5D5yx6xyfuh1yqCQdZ7Gmk9uh2uUDb145H4sfL5LFhG
+IW7EHWaFlJrvgi0F9d84wTWngtWOwMv9lnA2wtzNJS0i+MurYzJWxHaPzrfC
+OdpfLMzhUnaC/nySL+/pXVOYH3PsPrk/c4lVBxnE5Q88SL03S555ryfrWXxJ
+H4CvaLV0kX7FLN5upEf6bye1xwtO2TfReRDW+3JvP8lfEFV2LQ2u9Bcqkn7I
+JRfYtMKxJTr2rTAvOv7SCGyf4HZ/nMw3Tz5kCt545YiZ2kpcr17lPgNrVdtL
+M2EbxW/838MLt9wf84azGtYm9MCGj73jY+AYWSW/63B7nbg9H5aI5OjBMDtN
+p7oBFr9ZItoE14XSc3pgFt2+lOyvkST3VUPwRPRf7c3kvLa4vOc1LLd0hhkL
+U8cnXIi5nKKtu2GvH7fWkPiUgncdK+DRhcbuvTBt9ayHDMyzWMVuIflKH58Z
+R78l4wdGq2C1ELs/R8n739MuII+sH5r+ZgLmuHrvE5H4Ztt6WVy/wypGORL2
+2JScaQYHGSeO8WFGVA7lDn9yn1sQCD89uKM2FTY7rcg9ClOFNVovyPnV0F75
+33jejL4B6rPLNN13mvTHLjPyKCx2mDocCwuLlccq4fy3VaXZpJ7Tr2ik/4fU
+IjPrSPy6DmqVHpOq3jNwaJDMZ8rTPwAzDIdmpVbhXFszGxABz/qWLDOBY1zk
+gpPhu3u1AlxguWb++XS4Ulk6Iph4F7csEd7fxxzPgtm9zTeCYbFtvnsTLAi8
+MrkbTjN6mD0MGx0NLjDUI59bDOs/Eb/44D5O9s+ulTNfWzKp1sQjWuVwTX/n
+G2149Crd+AS8m57vtQK2uTjdZwOfsanMM4LFMUN+X8GH5z0x0YdpcnNjD9Gv
+Qze969ThlOat/xbDC7gsbwUSb+lSQN4XZSNvfyTrq93+NfQc3HXq7tw7mHds
+xaYLpP+ZJhXPYZuxntmrsLIL530bLOZEfGqCbTrjqHpY+DRM8jccKh5cXgnT
+LqxNN0c+L+OsXG7CzoffZwTAi22CXcpJvYOWH6pg16Rll2+R8Z8zHCn0IzHa
+cCeZv7XqpicL1v9+vdMQycfIcCwWtttcpDZD+rnFvacF3umz/8NS1JM1LRU4
+DX+8EdxhBxsFD6Vq4XtFVoZCmBfpZ9T3Dathrtb+0ji4Ru219AbYR/+f8Qp4
+osrRYQ0clxr5qB+WO//GTBeWJ99rrP7//Uaf+T/tBqKl
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {15.54570515633175, 7.171979374673003}, \
+{0, 1}], LineBox[CompressedData["
+1:eJwt1wlUjfkbB/C3tN+0oGPmKm5TUkKFQQpvJYQUZUmr20iNVEyRGrwto6SS
+GoU56hYVow1ZC7fFMkq0GEupG2lPm5RC/+8z53/Pwfmc531/v+f5/t73Fm2h
+/6ad0gzDVOAP/ctI0V+6LPPfZxLLfDc2ybOGC2qd9znAJdFjZomwsfBVQyy8
+eI1mzzuq7yzouwi//7m5auFM+EK7JBOO/OdjYyTMnvp+MAIuHaub/xwWRMXp
+WsGGKT7Tp+jh+sRHNW3qLDOo3LtlA8wtvvE6CI5SMlU/BLMX2VsDaizjomf5
+YxrV4z5U/QIHRn9tvgYLnO9NzVJlGUl7XGwR2VBacEyFZXQcTrfeIGeOpXMT
+WSajJ8s9m+6f+yT0jDLLDHFrP8eTffgvGnks05nZqBUAizceiXWC5z22T7Wl
+euCrUlXYPjvBfzbZsyRGBq65G5OoCHuUzBEvhudPye3owXyizGVKWbDp4NdJ
+b2Buzmp5G+yX5JBvTfMzjgWiqehnW6f8zzWweJZfuBz6/TXp2xcJ5RU8kK+A
+eeJ1nsh8gxO+B05VwLzsS52petjPuDbcPQr2aPVd7Uzel792DNbkFSj/RXbu
+inZFfuq8p5vew31f4q9ehFccrjxlMgv9rfE/8Qq+WjQoHQGLC5w3dMKrWz+c
+q4PVumf/3QC3hXXs0tHH/g7+o/mw3inbKF9YXPF5nhcclN7mmwtzZzfekIb3
+VRUPvYclwfn2Mehnv8m0KBUD9Pnxl2ppODviis4cWGSWeuED5p2jmBBsTn7D
+u1OKPHga3s0rYObcBc3LyGtfZ43nYpjVddibgzxLnzSm68KC05+n1CqxzMyc
+pHJFqqe8PmgA9/4R495B/Ti6pN5UZJkv3cp2D2EmqPF8ONxtF5J4HmY32x6P
+hXUaJLqR5CeV/Dp46OizF7/S/QfrehyxnuCap+52qi/9mCeP/W+nHZjuSFae
+EfwO9rglsqY6x1fY/Br9Nt3xCN1D9TF1SSPmCbWPH4qDPbITBlow75fhOLMi
+qtfUub3F+a734eZ8onynbdjsinw0mjVUaF4mUs/jFjx5wsrzYXDC2b6HozAj
+KLSphiWel8sFyLtRZpemzmyWCbDvUtSHd2Q//DEQZn3M61VhfrbxuhK4L6CM
+/xr3r1Dr75I3hG3SzI/SeQhy4qzhANF5vWkwL3vrkmCYXW44aor+JuvPiEw1
+pPeHf08H/Q8ua7x8E5Z87jSUwnw1ActTymBx1plgCfKQ+T5YXwpzMw6JnyG/
+pn7FGzfIecW2DchX78T5YRHZN7lDHX60SLE/gtbP2W0RooDnl2++SUj1udG7
+NOF/akTyK2DRFcP9X+XxvCw/OVmL9rf6y2ka6gd8q7zGMZ+o4nvZfnimxpvb
+7bDA++91ilhfXmOBTz0sfmN99Qk8nLF2y2u63tlwYwH6y534pOo95cX3y8xF
+/718v9AxmNm37VMhztPlutNWAe3f2jt+E/Ouj9pUsJHyaTItvYg85Cd/MIqn
+fosyZoYgr1WPR7pr4QTpqG1qyLMzoidSMAee5XLCBm47ObJ0L9xXMWX3Tjjm
+ua5mGdXFB7WFcLStpt7kuXj/ut6FrYAbKov93GCuek/vN6zvyfdbmwFLQg/3
+roLlXC38G2DR/birQvQzwuNN5s1DPUd2qQv6Tfbukp5LPuFtw2KeGapq1yxg
+0U/B9zQxb9X9Jmsb8qOmN+PIZ9mF+TErYY9H96OHkaf67Py+hTBjf+e8Gqw6
+/jJYk+r6bXZbcB61deXJ32j/eudd1XIs41XcNKmePOGpbDSsbmX34SYsyLZY
+cgiuUvyokgIzGcN1BXBbxPO9oVRXjj40g9azcL+8i+pnjSpKYVff4X5Xmt95
+KOMk9tdrqRt2h8V73HI59FuyqLzOj/ZrPdYVjvMsE5cMx1A+kROFMZiv3sdK
+u5DWc3n6PBrz83OCvTrInKtfAPJZ8nbLMgPKJ9P23ELk9/dIbcJeWGygkvgE
+Dti9quE+za/cLjFA3sUG4evVjbBfV1H3eng0YbxFaETv97/GJvALY53sK2RZ
+NeFL3B+xI/32KMykHNlpRetHjD3UMsb61pZav09kuSPqslKmsODDwMTj6E/+
+wbTlG4zp+T7UHIr+FzrNY1xhj/Y7T50xn+cfv0zfCYtCi1qXKLKcVeyiR14w
+J8ncqY18ZEMUDgth1q2w5yd5lktt8Z7iRPult76ykWO5xQ7r09bRegdST4lk
+WSZEq9bbjOp2h7SM4HPdjk0GVOdiY0dlWG793YTwH8jX1BtlUNePGXmmQP19
+C6tZD9+tWOQ2QvN2d4w/hbW83O61weLpg7wwOXo+tj1thjmnOGUXnGfL4Sxe
+O+W3xFrJAf1yqclOY7CkP+XcNpxnTEXT0ETKI944zU2J5fz1dS/okgel3m3h
+sdyl/Ul6FjDTnNezAHlVFYal0bxcaE5+hzLLVcZ8642ifl1l+X4436yvsQ/z
+KY9Df2bfRt6fXCIKXlF+o133HqE+N0h5rpQJrl9b8zEZ9R0rBsSzYKbUVMoA
+/u3dD0rryJ9uvQ/H+v3CgmofWHLlthd+HnEDh+doRlC98dq/+ej3bIzxomQT
++v2kOPAMzkfL6cHdDKqL3F/g+4kLNPHIvgiL/uHNw/vDbRoMXk7mKpadtcb5
+HFO8qE3XS5ImCDchT6OkI0tTyCWu66Jl8L2x/PiVaFhwdf943wSWy6yb0nSA
+1tdMP54EC8RBpl5k2fMygXDAt7cWm2FWTnUj6kx2e2zAKlpP7KvVi7pqzhFt
+M7reuHI0DOsfG0kMX0h12/lZVrIsZ3RFOnIB3d+wMMgA/XUbT65cQtf7z3+n
+h/5nCo/mraR+Fn8ynofzdJxuq7+V5qu01jHB/L13cpv8ab1W80JtPL8ZMxr1
+48khic8HkFeW2QuVK7C48E/pM8jzrZHE/SW5s16Bh/Nteb/57jjlUzDB3hLu
+STqbqz+fzkvPxgznsdvxaL49LPG9eHoI70vJXKMN+8n7eviBWO+jxaSFp2HG
++sa9YuwffTXN/DrM2vIXv8LzZrXGMqKS1jusdawa/SdN0fJ/S/erPAi5juc1
+LqflThssvqTVdRLP89IB3+AuWi+vbloQzmfXSLFqB3lr2ZAv3pc9IddNm+n+
+WOVNR5G3dnLC5zpYFGCysVKa5RpHb3IPqH7z8ePV0vg+eJhqXkh1dedn36VY
+xn/nb1kZ1E/Ydt9PUiwXNHJmeSJdr28foI/r8/N6gyLnUx7rDqRgPcWlb86G
+wIK9gRpm2M9LQ/NxEPWr8JuhEs7zksDuX8pD9Lub2xfYU1huf5jWY2Vzx9D/
+Pktnv1i637WdPwHn+T4+TyWd9nfQ9pZCHsLbxUVFNN+kksp2uLx+KL/+v/UV
+8nKQn6W5h2Scrq+etdIS+aos2KA0awFcpaifjvP9cXV/mR0s2FBdUob69qN9
+8cGweOzXxGz4OTexO42uP7HD0RZ+tfaFXzksKl49cAvPj5zF9uctsOTSzw79
+2H+cPgv+//8TBfZ/11uc6w==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.666233980906949, 2.1296932060463307}, \
+{0, 1}], LineBox[CompressedData["
+1:eJxTTMoPSmViYGCwBWIQDQEqDiEyIFrOgaGg63OSmYrDzO9z9v9uk3VgWLF5
+kku8ioPSsWuhi37JODBoaO52r1BxuLaBb/3LBCD/w0aDX/UqDvqbjmztPSDt
+wLBjCturUhWHfy805q1RAPI3eJmtiVJxUBZ+2RDbIeXAkPCA8Yq+ikNNZHC8
++z9JB4aK1Qtvf1d26H97fYldB5DPcX3a/63KDn84o2++0wLyG8QO8eUpO4jX
+1jVNfSnhwCAgx2KkouywPWWl0aWjQP6LFavW3VFyWLTIuKtvP5DfscJy+Wwl
+h/kz33T/vwLkB3ha3EtRcojcYaJ/gAlo3oH87jprJYcJ68uXMLsA+Qy/p7xR
+VHIQen0p6c4kIF/D6uwiSSWHdau+P5r8Asg30Hwkrazk8EG39iuvHdD9B/7P
+P22r5LDt2qvvhj1AfsAHbvUMJYfOV85Xg8+A/GdvuXu+kkPCzvcHp/0A8ndw
+tAc+VHKoWCL935kHGB4CG/TkNZUdXvAILhJgAfILGpP/Fik7+D+OC/O7B1Sv
+oXp02S5lBwab++4ss4H8iCnTv/1WdpDY/v7gO2uQ/Wck1IxVHCpY/NtTjwDd
+98IwgyVWxaF0ZnuMliWQ73HwsGq5ioOa/NH5SguA/r+QH8/eoOIw1QIUvxJw
++SfM1gl348Xh+qd0Viy+ekwMbv4kuY0Vs6zF4PYL7hKwEzwiCncf13OFHb9T
+ROHu32W/cOVGRVG4/xTF3se+/y0C9/+GM08Y9nwWgYfPykwBu0x2UXj4NVjs
+0VpjLAoP32AfUY5zxaLw8Ldwbub6dFAUHj/RFRyyOeJi8Pj7bq47VzlXDB6/
+lcUd0X92i8Hj/8KO0xfs/4rB00dWp3AJg7Y4PP1kNJwpLXQQh6ev4H1hZ3Wt
+xOHpT+hLY22WmDg8ffJJLlUTvCoGT79VphrRB8vF4Om79+SaBTsYxeDpny1O
+vH5RuSg8f/BYXU8Mvi8Czz+3Cqy9iuxF4Pkr+MDHALH5wvD8x7Fac1UsqzA8
+fxZoJzuwVAo5wPLvVjYQLeQAAACtaGA=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.354800000000001, 6.}, {1, 0}], 
+        LineBox[CompressedData["
+1:eJxTTMoPSmViYGAwBmIQDQEqDis4ITTDhdu3dtmrONz7tfe8025lBwYOlz9u
+2SoOf3P6puVlAvkvylXY6lUcDp5abPiQH8hf8TIwpFLF4c7e6gtztig5MDBU
+rVgVpeJwWHOR3IlYID8hIGGqqorD9Ss5KdqCQP6F+ZNq7yk7HEt+3Lj1sqID
+ww/VNO9uZQc9U+P/QiuBfI6qjBdGyg6rtsx6HT8ZyM9QbVtzR8nB9nYt++9J
+QP6EvTcP9is5bJyc/qF2GZD/wNKnJ0jJgf3JuY+3ToHUb1inqKXkoDhZ4e/c
+30B+xaxpdyWVHBY/iEr0Ngba/0L6u6SykoOR9oXkK9lAvsGGFCFXJYdPWkE8
+EvNB/NupX2qUHG50nC5JPQ7kW+iVSR9TcqiS8z3z5T7I/SEHiqWUHXbuCGPy
+fQrkT7gR87tI2WFrwoYVvVeB/AiFqPATyg4/OgWeT9sA5Guc1SkQVnE4oXFW
+m6cCFD4mnRx+Kg5ut1fEGOqD9O+QcSpWcZgx42PG0ltA9wbskGNtUHHwkgFG
+R4MiXP5tBd/0KFVFuH47s/DF5y4owM3f+8Loyud2Bbj9ve3vJTL9FeDuu7DB
+P7xISwHu/jMRK/9uklKA+4/78yZjbgUFuP/XdJh0z7JQgIfP5GdrPz9PUICH
+X/Az/TnaUxTg4fvIYOm8LWcU4OGfUnefKYkFET+1uoZ8qqaI+LtSO4O/KRIR
+v+5mTT9YchHxfzsmVWRBDiJ9hN85w/A2TBGefvavlanz0lGEp6+1NpNnX3mn
+AE9/B5/HPjRfpABPnyuCW/STvRXg6bejd8cc2wfy8PQt4Pn4kpKuPDz9++q2
+JFR1yjnA8scOfhAt5wAAXRMymg==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.354800000000001, 8.75}, {1, 0}], 
+        LineBox[{{6.4999999999976925`, 16.}, {13.49999999999251, 16.}}], 
+        PolygonBox[{{10.6, 16.}, {9.4, 15.6}, {9.4, 16.4}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 16.9452}, {0, -1}], 
+        LineBox[{{6.499999999996362, 16.000000000005457`}, {10., 
+         10.000000000003638`}}], 
+        PolygonBox[{{7.947677384685548, 13.51826734053906}, {
+         8.206811054955079, 12.280184249251306`}, {8.897834175673825, 
+         12.683281069670574`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.515942703607428, 12.823799910437668}, \
+{1, 1}], LineBox[{{13.500000000007276`, 16.000000000005457`}, {
+         10.000000000003638`, 10.000000000001819`}}], 
+        PolygonBox[{{11.447677384685548`, 12.48173265946094}, {
+         11.706811054955079`, 13.719815750748694`}, {12.397834175673825`, 
+         13.316718930329426`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.484057296392571, 12.823799910437668}, \
+{-1, 1}], 
+        {PointSize[0.04], PointBox[{6.5, 16.}], PointBox[{10., 4.5}], 
+         PointBox[{13.5, 16.}], PointBox[{10., 7.5}], PointBox[{10., 10.}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T17", " ", "P2", " ", "N34"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdieg/giijfhfjhj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdieg/giijfhfjhj.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {0, 0}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwl2HlcjNsfB/AnWqZ90UpqSiktTEmSMoMi1aVIiiKMpUUGUVfLzW29SUpR
+LmlaqKgrSpsuSVJEU4pUl6G0SAnTXvw+5/Xzz/N6e87y/X7PmXMetPYd3Xpg
+DkVRukIURZ7UzC/8WcyiJshThUWFVNm+uAfHhuUYE/eLxGX7wv0HrmkrqbIo
+etHa0kUw1fF16Tp4RE1cm6/Lotxq4kuj4MhPUm+yYGr/pZXvYP4/FlFHYC/l
+J+6b1NDu7FjcWrj88D7RWrh8cFmfJszXfBdjPx/j62ouE4dpY5W322F+i3vs
+rA7imdws5LMAfy/mnDsD91tkvZ+EpeJdW0TQnpt/qSpCnUVZmNIGVGB9k8CN
+cxeyKEf1tqMmcLiwwuUAuIuml+FE5m+6sqsV1mennDwB222q/aKpwaICfng1
+ppL3TG7QdljHJ/jIffLez1UqgLxfoGLQBVsE8zKC4cj2qZFx0t5bWvkI3Kqe
+2S1F6jcrb2YP85udvdXgNN6rBCWYdvM4Ux2u/vMNpwXz58UfilaEwz3Ol0fC
+Ltl/PBOC6+83FzHgku5kWg/GZ0lM93QgvxG+3j8kHrpL8PcYmBEqefEvkp/y
+TXcrmDWeP7UZrubUbJlBfXSGdp+QJvGufpf8HGZf2tpRh/oVCeXZFcKq386s
+CYXrmx1as2GjKyUvTGH+5PDTIrhny8oHA4swX2d+UytsU7zGIgeu/pR7Sxbz
+2RS+ZbLheoMSUy944qsL1xCmTqjuroXLL3x8O62N+V22716FfHRi1iq8hlWX
+vi+7D9tNC4nfh8MHKw5uRH08at7J3oLLNWLE2mGe+GmxG6T/qX3C3prYP7ev
+eZH39cWPHo/CkbaTWpUwl1M1aEVnUQIVme882GOB0MUgOEBDVHcYnolaqFgA
+f0l+8kIW8bEfjX5vgyPt05uXwxYTzQtHYTmnF7M74KALe4ZpWljH7zMLT8O1
+IS6m8rDwnzUKacRvOcYycGOuS99tmJ/77BIFf3ka8+kh7DERljSA8Zy2O+TW
+kfdO8zKfwS7JAp3HcNrL2cvX4fJ3tQ9LSD3HvyWEEMuy7K7Aefp37jvDBeYK
+VCAcQK3014N11h5LtVtE9rPru1/IX1hPabE8sbNcWyVctEGG3oJ8g5a33I2A
+u54PbjgHe8mVd3rCtH8aUm1ghoPaXEdYP3LWfApxuykMyjqR9o0mO4vgoAZH
+cV/Y42iTiTecaCIilQ4LDl9tWQxzJ3Zt+gSrJwbQB0mc1YViWnjy9ccqy/Ck
+G8874oYnTa7/yzk62advzFPxTDsyN8Of1IV5ILgTT7cleZt34mk3oau2CON6
+re2kkbxtphwafWEzsxrvraT/+UnbYtiomMv1JOt6r339OFmf/GVBx+DEdaa5
+K5DXVY2JffEkjlNpcX5w4+HlZ8m65xRt3P43HGKa8KkJVnQPfP4vXLRTZoOA
+vA8WzCf7Mm/a9pQKxg1gR3V/hCdujzisJOt+s9qyh+zDuYoPneH+3xm3OmBh
++Uc/2XDe+LOlT2Gd/dkRR+E0zQkdsk+7LmdocuAS4bM2sWTfcj6KHyT9L1rH
+ecGRop96nWDB47065rBUnGIjg9TfN9VDkuzj4fE1ojDnnk/4R7JOzK5lLST/
+joaGf2GrDuuRi3D953V2GbCds5PuNrh22/fnsTDfZ2mZJBybM9kSDKuW3z9N
+9gXH2ur07zAjrrNlmJxL2j+P/QlXtyl+8CT2fzt2iczHez1AzknHmK1NpSRu
+J1H+Driqa9HmD2S9StOtPuN3Lnd3ibsS4mUNGXQmwGx6boAz3C+U2rWReITT
+kgy77dmXpAzPyOxnk/pZBJr5TeNcEdzf/00b+9jNyW52FPYKXmjkS343N3vG
+hNE+3jPmWRF8+Mkdy8Xq5B5wSP9G3kuxv7rCBa5qNwxxblXX/JeeDPdHiBt5
+wiM70l3aYf4N0xeRcPiQNI+O+PvHn8dnwu3chTcOw0ap6/+7C5eLeZy4BTf2
+9VwvJ+dkwyuxTzCts3V9MUyZtCXJoz4MrZ3R2eQeKpupNYaFzVNvxME8/b5p
+c9isQmK1DzlHbVdvM4Tb87br2cD0X4IqcdhGayh2Ppl/hbEkuQc49SGZX5HP
+yJev38g9oHjr9cMnMGdMmtIh70089DNgVbPl5+8gn7wNzbOhsF129y0GHHsj
+2pCcw26LXMZyUL+07ErnbbDcD49QBdhv8WSJI9y/jroYSu5ZCV0TZ3JOpxnd
+/Ix7OP7sbcZeMr7JH0q7YYuKHXkhcLlk23An7nGbE+kq2eSckT3WfQh2YXef
+e0XGS98vJwLX+kiWSJF7ekvJx3v4bpiQMexwhFnVyT+DYU71c9oFHXK+Ji91
+g1mbRZU64LSLCbvsiT/cKtUm95r+5XPOcBDvcoY3LKfQN+oLlzzdlFwA82zs
+hVJhde/C0AFyr2XEHG+CHV/7xmrg3kxsOxkhj3i8luUZ25Pvmo3Jku5wo0PS
+RvIdEysaezOTfMe0LlA/A1vs+iDohWekj7LPLib7zTpTB/nbpJZviYOd9BeU
+uMJsa/szYeReHv0r73dYykhJwpuMx9BOiYMdZ2s9HWDuy5c2MXDPu4H1emQ8
+M+sd/jDNuuHJT8Q7cVrKlglXcRPUWsl3wxlDnynMT9tw52w+HNu7VIjE5+Z6
+8tAZOE2yVnkFHM4Peu9JvqsUHwVUIN+8jVbjLFIPz9woE1LvwbP+RqS/xX2T
+TGXEez39thb5DrJQKpOC1VUuVxPTFWzDgpRwrnzVWGVM2i9eO9SvyKJSHCyt
+bGDVwKOW++CRDVOnDpLxh5LX9s/D70u2ZlEyHHTNwyMMjr9srNAAO9VqsvRg
+fS3LYlHky9I2+NijgHpLmi8h9R9hVuwvh11obTuTYLsj/qJZcLXFdVoH7FVU
+tCQTNuoR79HSw+/KStW5hPS/y7txEOZEZS5/C+d4cgxuwHb6Uq+kMN+E7dyw
+dzBtzam/HWCG38IpaX2cDy1TfybBtabFzsvh8qddVh1w4x52xm+w3aLLu7SQ
+H6so298DDl+jEUHypV3wrN4DV79yT7lM6pE8LOEGy7W6vqkh7Ye8V2yAnb5a
+aXXCOV5eCYaw6mCh4D3MTox6IA7zDppfaYJDtKrKPiK+cq+X5vlwecWKzHLY
+4nHpMz/Sv/nYo3Mknz3uqxfA+vSZg2yY5W1kWzqP3IPtvDVw4toxHxZMSz+r
+oknqs2txVxWp3/YiFTE4b8LOZRncc+jL7gnUkzf7QXBFHudWpay6AOb4mC0Q
+g63uTCtMk/X4cH35STmMK8NLkSb1PS+l1iaL9XUsDDEk8z2e5/JaBr/rNGMT
+F7j6AcdyVBr78EDUzWiYOzXwYCU80y4V+gimKxsczpLCPWZd1zcH+bPWBWlb
+wH51jr12ML2kTWtKEvPoB9gmwYmDd9r64ALRuoq3+uT+LR7+Cbswxsc0l6B9
+m9up1ehv9ob9dC/sFXhmPBVWL8jXTofD61eXSmN+fV32Oh7MyeIKUuDEh+4l
+kzDPcnKtLuLniq/xVjXA+hWLNt+Du65GPzSEGSKTzdbIlxb731/L4ZHu0MYS
+OHL/iBwDtqvTCxZHffSv/SWnDXMaDj3Sh+lZ8kUSMD2QFbAC5m2rPTWI+bi0
+l/HGcKPNPKs6mPX439eycIFYqyKJl2VoOVlG6vtiyvo4LJcSo6wLl5yrFLGD
+EyP82r0RX7mPoJhO2lcc+ycO+egs7Tv+E/XhLtwSeA75s0ylV3WT/Rj2zeZ3
+1MttvuQ9HtmP1GpFVwmMlx1iVU/28xyvYCNxrFfKlgfPSPt92ltFaPi9nrKo
+aIcpS78dA6L4fmjJMv9Oxt/V+4Yvgt91ndMzZczPV1no/kMY37GthZdsSTxX
+Uh31YO7NvO2hcJFA8OLMXMxjU3GgiuSz5o6/KFygldBBoT5eJ/Lly+aQfx/e
+S7SDEw+8epMMu/UFr08i/jSscQWunaOW005sYH2hAeaObTqmbohxBRcc52O8
+qzW7EnbC1MrDEjFw4/lHqkkwn9vjTUM8qoIdwQ9gLtvd/BKc1pQY9gHmKepU
+6SEfncKPLpMw/QFXqwR2q5rJEjFCe+Vrj0yRf+Md3whRuDqlLOIKHL83LmqG
+zP9LZlkfrPOlPrcfZnSplsiK4fvkY+RvjWS83+J85IhlOxj5ZD77EVYv2gfl
+zzidIfHuk+g6D09oNf/nStrX5eVIw1dnkrSMYFbfH4/3Ih7H6UPec2FOzQLJ
+RMQf1No99A71oMJf8dKRb8DgpqpqUs8sh9Ik1KdqeVrmTdip8u6BE0I4X16r
+q14j7Tl+6x0o7N9Zd4urcPXXiwybn0xKx6+58Drp3x19VGiGSU1cNSiqhFns
+gw7vJ5lUT/wk1Un6X8oMGxpnUq1TVsMiiMerN7pt1RiTqvr7tLslceCyzCYB
+k6IfYzw+Rept+nR92Q+MZ754ZwWxSGvH6HcmJfVTSIZCPamcAYlzMFuwN8eO
+1LueP3wajvXJbkqE+YusDSthlqH/htdweNKUzjqMV3J0XqeyMfo3nHcXw3z6
+qc1JTsSz3NZpuHyJ2r0zxmS9Cx/IIr5EHeG+PJhfOveXCeKvWvXbsifG5P6J
++uw0gfgCLUReEytZTexEvilWtO2dcPWxpADmFJPi1taFt5H3iZOGX+F4Nw8P
+0t+LYS/qOc2khEXn6xaQ9mEx8WFwo5XsybNkPt+WbY7w1Uu3TA+QeGrNNtWg
+v8enbaGrSX+WbSepb0BTUaocTB+d/JWLeJwSUni9pD4LjihrId72zv2+1TDr
+5dPrLqNob/gjNoPUx/7z9GbUQ7iqVj6avM+/e1vjG5MqkIzOOkn2a/Uzlbwh
+JqW4KSX4KHm/1KWZGsD744yAAFLP3giBTw+s3fstkrRfpWIhzke+CqE9XDI/
+Z03IxBsmVdt9re4p8YE78TU87JcEg+wJ4qKDUjZPkN/3nxqmpP5jdr2CUszn
+2h59nLgx+71/Jtan/S6/jJj8Cbf+//8fGbP+ByrUpRc=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.851144620506076, 7.907943040036291}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwl2Hk8VPsbB/ATCUWNpFzLNeRSlqiQ1pmUcJOlxdI6SHS52VpUqhHViKJQ
+IjWyhmqKauxTKlOoKbLLXOVS2bIlit/ne3/+8Xr3Pef7PM/nnBnnpOnut9lT
+gqIo2SkURX5TXZP40WD+//ciJqVWVsyWoDMpk7YAGg+mr6ik9WJde/YiKxbx
+xwlxIZxVEZCoCHPs1M76wv46yY1VhkyKpXDPSwrmTCievwjz5PlaEb8zKZe7
+hRXb4a7pYTt/qjOp4mPX9JbC3qHxnL2w9cr+B8qw8Y+otAo1JvXpRl7xDNh6
+3toefTgqnDZOHOzwNuaqKpMSswxDyPEJAb5uNNj61Fi+EUy7cyUqSYVJCWee
+iLOHzQOPbV8NG/imJh8i51/wGR39DXP67Zl2ExZqmDuK4KGy0CYhPBpmNlwO
+7z1+i95Pjm9ZoVgD06X/nFTAvCypqtPjcNqU82J9mB+j3LYc+zf02FxeCWf9
+teN+BOx7LN+NAXP1b2Z1wBw9P2Mzsq6yoMUK/dYmxJ7WIHm+sFLKJvN0FoWP
+o17/ckp9GuZ1KKuTrST9D+TKOsHeha3saDKfVCcnDv7p09v+JyxTKKNVokb2
+T0+cNEB+xbQDVXALvceTBwuKFloIYOMjpUtZ8Kjt01dXYVbQ4UkFWPzpn/gt
+cPH12ByhPuaIXR41TPorz2w9C7OZVo1sWNBk0WoHc8celv/APFXHDx7RgmVW
+fT3iCZtnW3dJwP4luypekjyPulb262G+nA9tBrDvXbM53cRe7hNxykzqmYnE
+rCFYKDlTUwa+nrp8vzQ538O5OHIeco1eY6ENM03aDmvDaZmvLazJerpz3/u5
+TEquzrLQHx6lNkXfgll/rRIkwqLdU/+OhAVjLS7lcNemrtUxML1PP7ETtn5q
+sP0enDbHTzQV88e8CnnbAcfd672pDLvI8aKNSD3BX1qacP/3kuhz8Pr22gk1
+mNMUqNIFN+TqHJsBC+Ua5Deif2P2aXY39u+/UbMwG1bLNcgQEHtZ7J6ETW45
+0CNgzqXiuZbIg2nY/dAKpnEc2Yfh4qzrtyeQh4xdzfNo+OdvHsk82GWylHER
+zj9fFsCC2Uo+8f4wzatUUwFmarZUm8HhY/zk5wvxebP5274d9ValJ2aw4ZgX
+Dq8PwTsVD+eshxPsy/WGyXyTyjmKMN3vGtMTFs1XVe1bgH0/h2dXIo+hQO77
+elimXjZkESzz7sHM17DYJ3o4VgnznOQ7voV5iWvNJOCDd3XOieH+tti+k3OY
+lPK3BRJjxOn032fBDUaX41VRj39sV+UjRVyvJQr3LGBRoWFzMNy9YusRX9h/
+TNjpBDPrIobjyXr0Y0NHeK9WmEkxHPzhA2cfHJWR6dUCe//x9HQcnLaxR34I
+5gxbBtTDJsMaClOQDxV0OE0P9W13DLQRCxcppXDgrM7LocPk/EJFz69wvqko
+pRl2kEp7YIt5dt4wjc+HaVNNd2fAwq3dW0Nhrv2FpAG41iYucB1Zn8ncYIB8
++lfnTv2FeY3XDGjawwbbT0Tx4IYo21kuMLfgTR0LZttKLrWE+Vd7G2hwgqac
+/FzYVvt+ZLkuPkd1H05WYn+1oW0vjsM82SCBF/zs4BTVVTAnKHx9L8nzWNKj
+aTC/MviCB7xqMNmyVQd9ZkoMV2F+mfEFbQKY42Ox3xjmzHf/fh/OyritFTcb
+95vzS1ce7BLCcJpQYFILDF/pF8EyyQpdB+Faq/3fRWT9daLmLxrO+3mupA+O
+WfbILwnuD2mcqYT6QmkX/S2wi4mj3hq4waPETwcOKbqg4Q3H2KtTc+F89cuD
+0bB1idYaTfh6vMSLB7BDWMbiDbDgvuJwNUwXWqeEwvx1PmvayP59j1a8gYdK
+XZo/EZ/JFC5Ef4J/pl5thdnuX4Ii4Z2isFYh7F/DkuuFlcPkyzNg71g7p42Y
+l24nIRkMi0tWuyTD2tEVI6thkUdW+ge4wbY3fAzzBXs+vTUdeWnXHZIl+VjX
+KpaqwxRns7kbTFkqJivBtTeyxmkwbejS8m84P6uWZf/0D9y3wRG9PLiqpVU1
+GBbxs4OcYJcvaQqmMD+no+IT+rMtKjs3ro16F0dmsODwxyG7q7XJ90K1XTXm
+9VUd78yBR8u32C2BxWlZ9VfJeozLHr1ZmH/jqeWXYG7Lq72j8vj3UP8Ass7l
+vX7WJIf7SF5q3W2YRr1JaJmBvD++FT+D2bN1A6ThT9spyS6yn/PtVvfpyDX/
+jSQN/dEL9GYNySK/PTnUCpireOdKCUw3M59whx1SHC3L4CzmFXkOmU89ddEI
+vJUtFZABs/pUqndiv/V22qVFsH/mb1Zf4bQ61Z/P4Zi1I6KrqF+ra1FcTo7f
+sVPXGf1qB07o55N1KQk1dcyTtoSmcZWcv7rBsBUWfOUr/A0bm9r8ETkTOTLv
+aC0j/S3+lKuKPIzfKkt9xzziRxJt4bA33ePrXZJH+/EnpXDa5lIfN9iYt/12
+OcxeVrdHgeQT9zg0Bo7TWfrkyXzM83jNgDbcf0U+/BBMXWN7hKHeekWPQCOY
+11Un5qEfcz0V2QEtrHs6Neaj/+uen13KYHpJ+9MEkvees90JME+zL9UL8wvG
+9zw8BYvLHkQYIq+QL7WTQTDXPerbiDSTym0+6ncIFun2G4im4XuhPlkyDGaW
+nqh4JoXP/2TN/CTYePDJyIepyOt6R14R2a89V0UXXlC4ZFE76ad3aGuqJOZy
+WFY+A/0KpNirnOHgvOwQU5hZf5G3DpbZc9p9J9w/tbF6H2ySIss9AYsXaU0r
+hoUUI/MKOf6opusq7G/dWuKQDtMjh3NIfa5kxkgmzC78Z0UC+vNnL45IJnm9
+EWrsQv97q74nnYH9g+r+pWM+erm5D4vUez5Xrx7OX9zTsIjkvXKvwUEZzOP1
+xI3k2R+n6tsDr58VNv0OTBP56KxAXiY9nze4wazK+mdbyP03Y6RJgeSREW1k
+Bs8RufGfaCLvzUmUGOcvOFvfGKRJ7sdt8ZvhnwseqevDDiO7f11C/a1iM60v
+eM7tv19XkYZ+07h52nkwb6Hb/VjMY2Kf1XEOptjfzPZjXpOiqsv7YWZ/3uzF
+yMfY15XvAtMnTtz+PgXf11FGK7YRu/T4vaRwfQ8s37Yb5l4+n7x3kkEZbBjI
+CoTF0RvUjv1i4HOfbB1DrJ6Y3DHOoJhRTjX55Ph3W4wfjjGo8CevLrXCgpZu
+auAHg5IL0U+QRv9M66F/b8LdGne/GMHcQ4qmJbDvnJpbW2DxdInXFjh/a2GK
+oj9Mf+dxQhv7s+WUvp4mvrUyxvEng+IUzrM/T6x0Jv0h+qmSzxgKJ855mbsc
+/Xb3DRkFwsYP54e5U+R5tvanI8nTb9MODcyba9cxoU3q5Ry0r4AdPicf7SZ5
+Oetus5dArlZhzGzYweZr/x14NMaVyyLz6pXnNsPK6/dbzIZjZgQcqoG9lU7N
+Dcd7A/1eZ+NlCfL3QKGnA+8NomuihSowJR370R5mZmQF+KKe6GyUXwXeG3jl
+qVuj0Z8wtGqnIyzw3x+lhP77mwIvfSPPuUe3bXqLeWmBJq3ZMLuSHe2NfBzo
+y+pOwvRuq9LB7wyK1bX6+d8wd92z5shhBsVfq37rMCzYtcnaZpBBCU6m0slz
+M7ft30sW3xiUjOuW6kqYOtKXP7ePQSkXcMxpqM9MmP18XzeDasj8ariH9OMh
+HRH5Bdc7/fjwA+KmXzUxnxkUNW9akhTmYd94H3YEZqWcN3ck86VsOmyK4wU6
+3YwYsv76mvSjrwxKvNRJUELWDy+d09zDoPyzh1Lfw9yU2+aMflxf3/H2Wpjl
+2fqpAP0xrUNvFxCvrPCwRP/GhdsOhBH/9TtfOIT9vfJ/LIEp1sk/9Ucwr+vp
+Ha/QH0siX80JeYg3X3xrS+bZpfzZZJRBCVWUbpaSPN71aTyGva+frtcm+T72
+fSSCRWtlNM6Q9xjvZSXHYPom+l7y3kMf1nich/0c7hyI3wizjIpzTqEe/WGy
+cwl5r2qSGe5EP1lp70sZMMsm/NXYAPqzWTurHs+tLJ2j0a8wX0JXwbmzMFNm
+c1Mj8pURmC53IH41nzPYSTzUbQJTJgqScz6in6C7Kv857Au3sQX7563sI8/p
+FHOJj2stro+jt8dRYtnAkuGXuH4vX7vxibVdNsgXI9/Wjz8k0Q9lUM41SUe/
+vnnJTsSUlnPGYgZlbvGnVzYxNy2CHllG8W32u//4b724ulkL+Zt/riPvnRRr
+X15WKvovMIwJJG63dNMtwP7KBr/HEv+WM/3gCwbFa2qUuw6zF84z+CZiUF2J
+9rMiiRMvaivUo/77M2p7yPGV3llmrZh3cH2IMiyYxlc69Q/2b8oo56M+e7Bk
+x9RPmGfJticWsED3qhX1L+5/r2PbC0leJs/v2iEv60sq27VhdoFUWw1sbLjU
+9Ow8cv7Z0RMkT9ULL8h7EXuGa7Ulzufui5OygalQo5VG2N97irDoIZ5L2W9m
+jlujvjjWc9ViYs6Zd87NuJ9/NGoK8FxKfTBPHnyH/Wcvm7OPeHVK14Fy3G8d
+J5P+ICY/7JL///+DIvN/nXAewg==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {1.5990515496243272, 9.421161979599258}, \
+{1, -1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{19.999999999996362`, 17.}, {14.999999999995453`, 
+          15.499999999996362`}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.126447748763752, 16.890374170787496}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwd0ws0VHkcB/Arw45HmTreJkYor1CeZeJKalpOa6VMtWo0U1mPNGvEiqNa
+OkOW8ehk5RRLDtYeWkTrsUJlS0vIVrRUOsnabSqPoanZ73/nnJl7PnPv//97
+/H/X8nBcyJFlFEXF4kuuFIP8bKApW3I1pCnRdE73kgtNlTrxA3+C9bOGUj7B
+dI9mYpgRTWVTvwTr4PmWmkxtJWxMDQ9yYOmdBM08Y5pyy/xa1weWq1aK9Exo
+6ivn8+cjyP4L8RlimGPPS86EJ55a5DbAjury1gayfrjg6hDM4/Ws+AsutZ3S
+HoRnUhXOmhuxXq3W9BpMLd1U2cH1HX7WCfBEplf5Dph3xmCtNez24O+ycDg4
+ejH2FvIp/HfPxyi41/eKdQQsethEx8En9sbfUyH/otFQKbkvU842VsPBtd1p
+ZH2vvirtKDxRbx+2E5ZS2y5z4ZQ1/Hpnsn9b9j8usEvOjfRVcJLcImo7XJ84
+rjGL/AfW2qhSYcGb08kjMM/gQ+IIzJ1xNG2Dk7KiC4KQz0z6zOtK0k9htuco
+XMXXLimCFSH63adQT0WSWkI+fCJNP3GtKfZV2+Z5AWbFnH03CEsi2UZlsCB2
+ojnJjKbaVkY3N5H7wvpGPTbObZfEeRCe6vXpksHSpQiTOfJ8YbvRPLxtRV4V
+G/nLY2WV3qvx//T229tJf3SZBw7BodoMVzHM1/puSwTsxhXU/ACf7noh9oeD
+vd0+64Ajlx8x0IaT3vQfGYMF3XLlr9i/atJs63u46PlKfjise+9WrporTTGv
+B/ssIl/d0fm7mrBMw8LpItz3OpNSh73OHMrwhWMife7Pk/iRig+LqLeINbf7
+BTmP57/Z3odPtOc53IWrnkYZd8BSnfKAn+EWFvNjPxxaIOzPgUtHtD6oY7+e
+1mV6pJ5Oto7RPti47KDvXpjT8U1AH8mnRBxDk3iSj8V85NumrAnZQObrsP2l
+BXjMketvT+ajuvpKGepVJuvrOZJ5ZIeH7DLHfHqOLnqQeO+/3DgHB69rafqc
+7L81yizHAvk3rY88CmcncCaZHMQPbm6WwrXLjay2wIr4kGd1MLfGqCYClouL
+hx+TeDLh7gTYzfJ6KAP9qdoZpJkEd05rsdeTfnJbW6JgdoWECoFFO0YPfQHT
+Wx8aiGFdxeMBW7iCauiTwrz+Y+vmkI9UZKFTRPrd27YnD+6sCfC5DJ9OK690
+Ip7KFV6C+VHPzjxEPbbcAaYMFsRpNH8PC5Kj/VPJ+d18Qh2EJaxVV0Su5P0y
+LQ6E9QNNNXiwy07m9D54soVx2Q5WnFq/Kwv2Osmq04F7j+cwxmCRDeOknPRz
+U6tnEOJz7WI1npDz6lp0GIEF+blW5LzpT+G3NqEe6qShUxfp1/FHwhw4qJHH
+6IbTF/L7JmGpj/liHxzqvrrDyxL9dtD/Y5zMY+pu83Mw32NV8xKZ19IH3r/D
+FWKrY2zkk5IxzlTBVa89bPzhnnz7IJs1eF+HSl7FwPQlv57NMDcsU3KR5F9V
+4u0LT6guZHSSeqm3511hrzCdmZewY1eJzATmj9Q1aLghXp261iz2D9381s8c
+rlBej7lN8itIjHOClXXWjYVwY35WsTvcc9XPRAjbGlpfc4Un73CG3eH6FL2N
+dnBRRM2fLDjyjbqNEey1WJ6/gPr7BJ7aKsRPn3/fMgMrp+K6nsNKpdT4HSzp
+ZYl7yLykFKQwsV52gNpfSeaJMVbqDAsqz7VnwfJvKY+jliQvUWM8LAncM18N
+cy5ErBDC1qXmdxfgAQeh+36yfnZCEYh6h6+NGxIrzjaLfoRrO1gG5Hl+6ad7
+83DbyyEqAW4s3Lw8wArv16Nidi7p70FVZCacbca1rSf5G7a3d8LpWa8kI+T5
+haYbU/D/H9SrS67W9H9qGVzk
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.81512204377634, 8.004985304149105}, \
+{1, -1}], LineBox[CompressedData["
+1:eJwl1A8wm3cYB/D3MoxgUyKzlkp6tOlm/qylqsOLzkYnTTNd0bVllrLrjGPF
++fuytpTNhVbdzEhbNRyb2zCr1uVsKFp/ZkoxM9aiapcVKTq172O5S9773O/N
+7/k+z+9NxB9EyxU8hmEO4k3X/z+cWEafrkKWiXc43GIHc5uHnHVhj7YELghm
+FCGGk+YsYzrT3cLBshPHtxfBZzQrjlfhoErd5R3wyQCDJzdhV+kvacUCljE6
+ZtPcC9flRo1ozVgm7/PyziHYRHP/J1843r3B6i6sGW6vuWjKMmkdVWHdcGKX
+q2JuE8uE9jJTTWQ3xZNAWBs+n6SivE58mxET7G9rHHVmY11zPQMuz7nqEQEr
+rQNFMni10/X8ATjy3Yk1X3gy+k73LurnUKuNAm6afOS+jfr1WrpSQV5s/8aC
+8sx683VRL4nZ6k12DX82lQD/LfZXiWH2wRG/JbhkYuzabvjtgEuFscgvbC7L
+ltG6sM72PnxDr2s8jvqt7X7JB/3m8KKbSqj+gv3aZ/C27Udbb1H9FovYy3BX
+x3z0Es331oCyiOZj+0wieh3z+2hmj4K+X5af6AsPOydvNYJTel7eexJ2bI9s
+UKJe9T6r5lR4IunA0Ary+c/mT+XCjJFxgAz+9nS7p5L8sN6hFP2KtLHGG+tf
+2inGXmSZRnmoC33fpEfeVvgC5tqz6BkJq37c259szDLS8h4HKaxeX2goNUKu
+jpAIJ1jD7Qjmw0Y6y4kCcsdCZpsh8mZXr6xQf49mw/vh7ODL8r/oecirSN+J
++y/+0184SPMe+WLtZ9ovrTGInhf13FpwAeq5lN4u+hXue3j2VCbycCaD5X/A
+ofadVenIK//KTKyleZ3LPeiGflIatc+Zo75F23FnOk9B/Xe1bvByarzlKlx9
+KkpHQf02/u5vj3l4GNoV58MSTYOXO1zDix2+CWdPOYps4MDHD+ynaR7lEUOT
+NK+WVC/DXThf28hXU2A9m8emEliV1c2bQx6VeYnkDbjuvNVaDfJG6pld86X7
+n974V4Z+JMvqI2/BHLfvtznMo7L4HbUHzHCjqwV8PEcOX+vaw8q+LfyjBixz
+KWPzn0LYRDDt/54++gksS3+KPNxAwscXnsfzKpKGjNN579+UYgm7LhrwW8kZ
+lo5aPfzefBosquA++bEL1liv9+AGCul8Zp2EBXBLZYo4h873XoWON/bXWIaG
+ZdF6tCDYGvXvnhiT5VH/80ljQuSL4fmtl9L9Xu9zZshv6ZV3uwkO3dl+bx2O
+H/3w0xE45vr0lQ6cp5QR2/KQX1MqkASj/9Y7n6heg9WZWecqYJ3RH8JDqN/e
+uAqyKsxz8CwsU3eNH4YtqrfE1dK8kl/Z04j9EgudmV6al/KQTy/qib6vqZmB
+Y/yqimuRT/rmaZcVmv9y5lIY8m/8v+1mmY2XPvsfs/y8/w==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.88748581947994, 4.835942983375933}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJwd1Qk41GkcB/B/ji2PclTuaFzlyBBJizzvJmUljX1sKGVcTVJLRUutTIex
+SjkqUWmHlKOSatcVGylylKGY3bGtWbIlcobayuz3zfN45vk8v/f4/b6veRgG
+R34XJscwTCR+6Scjoz82hPnyo0kYQws59xew2sR5QY4GYbw7hr4ug4XlpoN+
+GqT2b9trghSYn1+TvFKD8K/oN84OhtMcVUtXwYMHTa+sgjnJU3GBWL9EN89q
+Pj3/TVtbIeqs7qkcqTVhbB4UCNQ0Cb/YukRUCAsfbxam4X71MwtnDsPSqVsF
+hlqE/7L2qX8oHMW3N76nRZijcxXY/nDak0gtH23CZIiGuwLo/u3q6X2wMqui
+dQ9MZi6wg3QIP3ZE8V4ydadT7iM44IAo/yY8am2jr6xL+O5OvvO7YE5nzx0r
+XcIEq+9fJ6Pn7ww+aYn6y6451V/6f9uooKhLSN+gncAIlj7Zd6NahzClK9k8
+K7jWRKLlq0PIX4IhVVual67qZQn6GfdTTLeGbfzIlJc2IQZFC8JN6f4yjbpq
+zHdZfDhlARzVK69gBYuZwNZ3uJ+5n3q5EPksy92Q9xvNw1hc5wDHNFzT3E37
+m5ex7x+8z6hEwU2PztNgoH8d+Q780FPRwMZ532iuyUL9tIqKwz5YLWE3KUa9
+Y2PLMUOYcdtCpDDz/IHZH1ao5/oQnM98vJ/vkg3XZnq4FsMJvOOreXCpflCO
+LfJvO9nT5QqLAtO2PEa/M3KZ3dawUHu6Ilib8Mtzg6wtYb7iiVvvMb+byenm
+FTC3cHbcEeQv29vZ5EHX/yTWnYTv2kSc3AVzPlf1eCLvYXasOI3uTxz//Rje
+4+aTTPUqanF+USZcUO4b1UvPE/dVHod9++McvsI8tZ8PkU3Yn/XId4zOR1yr
+Sj/gfe6maOXbwkKnwIhk3Kd7dY/MHubuH45QRD1PtpxvAXOqOC9i0O/Skfwk
+VXqewOlSH+b9qPQ5tJ/Oa/e6xBfz5msWc27SfIo9qiR4j8mCs/7hMEveID4a
+ea2sjHNbRPMKeOhnifqYg/uOpmV4n9dGI/Kohyuq8aLh2lhuN/2+JbicXWAI
+i9a2JRvBJ4736z+zxPqxXct52J+bntR/inrEa6QZzso65eoDp4UelnNHP01e
+rdvNYNaeMBMx7FVUf0IZjjpT9z4S8zgPOtvNWCCPWIfTSpi3pryzU0ad1P3q
+AvLY5CtRUsV6YcCuJD3kqe8wec6c7o/uG0H+fAeDsAxPeh+nRPsp3MO9fi4a
+Jmu5zZNY3zIkN5BD+2On97yH1Xvj6h7S9aOSMDHscpEc7IelKXNyzmD/rOyS
+1k8wP+bI8+Wot44J5eZgftZqBfMK9NMevoylCHPfFy9ho98qOyO5CaznXnzh
+cwl/XxpF6ZHt9D5Li7vKmG9x7yr9XGr7PnYi5ncxKMkLofMkPtdRx/vdj30V
+pEfvm95YXIZ8Uz2zglswf5RsRcoh5KnpfN74R5g12JgcAode1Qkzgrnx3t5R
+WC+vw4yIzPF9sfHamos6b92NzQKYPy99fAJ1VS1poxvMvf1mWwjuH+6eeqYO
+qzm2mw3g/q3+PI8hM7y3pFgQj/4vWQwv6oKl8vXNWphXqD7Xuw3mxPz6tgTz
+Vm4tk9G6zaSrtiPyUnnnHDIIixx9LG/Dix1Tx5VoP9WPnefpEf7HEKefrWFO
+jnjWt/CffqIMP1hYsZMVpEeYCXbVhiOwdMMvwT6oVwd5jV2FSfCBJmP4nGkK
+U0/P+887vgPvIXqjE9EJl47uzQmDuffWNEjo+YU2Y33o14trGNUO16Y2JnwP
+LyysKayg+xO7F9ZjPt6s7Jw0OK3FsdIe7ng0vWMLvY8ztLQMeXyoVJ3Wovmo
+DKz3RF5FnvqfWjAf1zL9zgzy5A1ZlMfBrNcWXh3IO8xcodmE5rM7UY7+/cfX
+bJaJluK+HetT/sX6+MxtakdhtW3Ze5fgvAOGWRFOsNRCoi2Av/yTo3X6qU3+
+B+U8lqE=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.109669593634097, 4.811165529975059}, \
+{0, 1}], LineBox[CompressedData["
+1:eJw9lAtMU2cUx6+PkoIb4mOmcO+1Frz3U0CFoRVnlAMR6cLYEJS3KFWMjLBW
+wQRDytpp9vKxymAOAQkiWkAIlTfy0kxQExQVlBHETthiEbExLoBT2ddozk1u
+Tn757v2+75zz/x+FWhORPJthmBD62uP7h8CSefboAUy4ekHSGgJdCSM73W+6
+A6M/y8t3EPjzVLHE8jNlaYdnsYbA9J0nvo4hlGM6yjt1BDRM6WjFjAIY45dt
+1mwCMQ4241QDZUvh9Y/TCaR2lyjWaijbBq1VcQTq2kLUeZ6UVxjz7yvp+e/S
+H/g+WwZMZ2WgxJGAj6XX4Z/LlPV7atbdF6FxOGVj4BHKvX8NVZ8W4XeLkz5j
+J+Xdr6enYkSIkRZVBgdR3n9opN1VhJLNuZMOn1L+UbXQPCRA+9OG7371pmx0
+3r7/vADvvn48Gu5LeSrv6OfpAoh1PtfWBdjXI3WpoQJsvXv3k/7tlJmUKP1q
+AS4VS5rTtJSbrtuu8QJEu2Xq3v5C2bI5x+oqQERVr1O0mbIqVFjqIYCXvurU
+hnuUbfXaN/4ClDcFR6TYKEsr436LE2Bk0dzxbkea/9RVafb3AgzOaU9L5Shn
+Dn/T30K/n1XuVStSVpWWqv8VoGZPbGYsoewCvMlPhDqu71sDT1nWd3vmoAiP
+u6qrOqWUm4JmGmtEyEotW+9htedvKPYZE+HiwYEzXh2U/cctkxyBnsK/XXqO
+2eu9pW90K4EMpcU/KZyyVv1i9T4CRT2GvfnO9vxUhw2HCTxULYgcMMopz3Z0
+0hPI87frRY7rfoMTl4hmKf7f+8MbZc8THvdXNASc3LSLx/O11rXDyU85vF/r
+pq9umQwc3n/xF/XG5lUc5head+589gSL+Z+zRjNv/2CxPqb4sPlhZhbr9yCt
+2pR/mcX6RrFHl6/sZrH+Qf9NEu04i/1pNGfEr5Jz2L9a97Kh4/Ec9nffjcSx
+bUUc9j9hYr5EYuFQH+aRVyeWy3nUT7Y+oW9HFI/6am85m5Vr4FF/3gWBysQi
+HvV5fFvO64ELPOq3u+yhy8sCHvUdu7DLlJHFo/4Hk8ZmlgTz6I+CZO+fdNMc
++qdcnfjS7wyH/nokyiILV3Lov5KL2o39FSz60y+3tfW0gkX/Zu1dNuyc44b+
+9nRvUVYwbuh/2ZHPCp8fcMX5kBl29VXAmAznhy5lw5YraZQ/zJdHH9mjDP4H
+xxO6LA==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.4452, 7.75}, {-1, 0}], 
+        LineBox[{{7.9999999999976925`, 15.5}, {14.99999999999251, 15.5}}], 
+        PolygonBox[{{10.9, 15.5}, {12.1, 15.1}, {12.1, 15.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.5, 16.4452}, {0, -1}], 
+        LineBox[{{7.999999999996362, 15.500000000005457`}, {11.5, 
+         9.500000000003638}}], 
+        PolygonBox[{{10.052322615314452`, 11.98173265946094}, {
+         9.102165824326175, 12.816718930329426`}, {9.793188945044921, 
+         13.219815750748694`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {9.015942703607429, 12.323799910437668}, \
+{1, 1}], LineBox[{{15.000000000007276`, 15.500000000005457`}, {
+         11.500000000003638`, 9.500000000001819}}], 
+        PolygonBox[{{13.552322615314452`, 13.01826734053906}, {
+         12.602165824326175`, 12.183281069670574`}, {13.293188945044921`, 
+         11.780184249251306`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.984057296392571, 12.323799910437668}, \
+{-1, 1}], 
+        {PointSize[0.04], PointBox[{11.5, 6.}], PointBox[{8., 15.5}], 
+         PointBox[{15., 15.5}], PointBox[{17., 5.5}], PointBox[{11.5, 9.5}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T18", " ", "P1", " ", "N35"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdiei/fifjghgjhj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdiei/fifjghgjhj.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {22, 0}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwl2HlcjNsfB/AnWqZ90UpqSiktTEmSMoMi1aVIiiKMpUUGUVfLzW29SUpR
+LmlaqKgrSpsuSVJEU4pUl6G0SAnTXvw+5/Xzz/N6e87y/X7PmXMetPYd3Xpg
+DkVRukIURZ7UzC/8WcyiJshThUWFVNm+uAfHhuUYE/eLxGX7wv0HrmkrqbIo
+etHa0kUw1fF16Tp4RE1cm6/Lotxq4kuj4MhPUm+yYGr/pZXvYP4/FlFHYC/l
+J+6b1NDu7FjcWrj88D7RWrh8cFmfJszXfBdjPx/j62ouE4dpY5W322F+i3vs
+rA7imdws5LMAfy/mnDsD91tkvZ+EpeJdW0TQnpt/qSpCnUVZmNIGVGB9k8CN
+cxeyKEf1tqMmcLiwwuUAuIuml+FE5m+6sqsV1mennDwB222q/aKpwaICfng1
+ppL3TG7QdljHJ/jIffLez1UqgLxfoGLQBVsE8zKC4cj2qZFx0t5bWvkI3Kqe
+2S1F6jcrb2YP85udvdXgNN6rBCWYdvM4Ux2u/vMNpwXz58UfilaEwz3Ol0fC
+Ltl/PBOC6+83FzHgku5kWg/GZ0lM93QgvxG+3j8kHrpL8PcYmBEqefEvkp/y
+TXcrmDWeP7UZrubUbJlBfXSGdp+QJvGufpf8HGZf2tpRh/oVCeXZFcKq386s
+CYXrmx1as2GjKyUvTGH+5PDTIrhny8oHA4swX2d+UytsU7zGIgeu/pR7Sxbz
+2RS+ZbLheoMSUy944qsL1xCmTqjuroXLL3x8O62N+V22716FfHRi1iq8hlWX
+vi+7D9tNC4nfh8MHKw5uRH08at7J3oLLNWLE2mGe+GmxG6T/qX3C3prYP7ev
+eZH39cWPHo/CkbaTWpUwl1M1aEVnUQIVme882GOB0MUgOEBDVHcYnolaqFgA
+f0l+8kIW8bEfjX5vgyPt05uXwxYTzQtHYTmnF7M74KALe4ZpWljH7zMLT8O1
+IS6m8rDwnzUKacRvOcYycGOuS99tmJ/77BIFf3ka8+kh7DERljSA8Zy2O+TW
+kfdO8zKfwS7JAp3HcNrL2cvX4fJ3tQ9LSD3HvyWEEMuy7K7Aefp37jvDBeYK
+VCAcQK3014N11h5LtVtE9rPru1/IX1hPabE8sbNcWyVctEGG3oJ8g5a33I2A
+u54PbjgHe8mVd3rCtH8aUm1ghoPaXEdYP3LWfApxuykMyjqR9o0mO4vgoAZH
+cV/Y42iTiTecaCIilQ4LDl9tWQxzJ3Zt+gSrJwbQB0mc1YViWnjy9ccqy/Ck
+G8874oYnTa7/yzk62advzFPxTDsyN8Of1IV5ILgTT7cleZt34mk3oau2CON6
+re2kkbxtphwafWEzsxrvraT/+UnbYtiomMv1JOt6r339OFmf/GVBx+DEdaa5
+K5DXVY2JffEkjlNpcX5w4+HlZ8m65xRt3P43HGKa8KkJVnQPfP4vXLRTZoOA
+vA8WzCf7Mm/a9pQKxg1gR3V/hCdujzisJOt+s9qyh+zDuYoPneH+3xm3OmBh
++Uc/2XDe+LOlT2Gd/dkRR+E0zQkdsk+7LmdocuAS4bM2sWTfcj6KHyT9L1rH
+ecGRop96nWDB47065rBUnGIjg9TfN9VDkuzj4fE1ojDnnk/4R7JOzK5lLST/
+joaGf2GrDuuRi3D953V2GbCds5PuNrh22/fnsTDfZ2mZJBybM9kSDKuW3z9N
+9gXH2ur07zAjrrNlmJxL2j+P/QlXtyl+8CT2fzt2iczHez1AzknHmK1NpSRu
+J1H+Driqa9HmD2S9StOtPuN3Lnd3ibsS4mUNGXQmwGx6boAz3C+U2rWReITT
+kgy77dmXpAzPyOxnk/pZBJr5TeNcEdzf/00b+9jNyW52FPYKXmjkS343N3vG
+hNE+3jPmWRF8+Mkdy8Xq5B5wSP9G3kuxv7rCBa5qNwxxblXX/JeeDPdHiBt5
+wiM70l3aYf4N0xeRcPiQNI+O+PvHn8dnwu3chTcOw0ap6/+7C5eLeZy4BTf2
+9VwvJ+dkwyuxTzCts3V9MUyZtCXJoz4MrZ3R2eQeKpupNYaFzVNvxME8/b5p
+c9isQmK1DzlHbVdvM4Tb87br2cD0X4IqcdhGayh2Ppl/hbEkuQc49SGZX5HP
+yJev38g9oHjr9cMnMGdMmtIh70089DNgVbPl5+8gn7wNzbOhsF129y0GHHsj
+2pCcw26LXMZyUL+07ErnbbDcD49QBdhv8WSJI9y/jroYSu5ZCV0TZ3JOpxnd
+/Ix7OP7sbcZeMr7JH0q7YYuKHXkhcLlk23An7nGbE+kq2eSckT3WfQh2YXef
+e0XGS98vJwLX+kiWSJF7ekvJx3v4bpiQMexwhFnVyT+DYU71c9oFHXK+Ji91
+g1mbRZU64LSLCbvsiT/cKtUm95r+5XPOcBDvcoY3LKfQN+oLlzzdlFwA82zs
+hVJhde/C0AFyr2XEHG+CHV/7xmrg3kxsOxkhj3i8luUZ25Pvmo3Jku5wo0PS
+RvIdEysaezOTfMe0LlA/A1vs+iDohWekj7LPLib7zTpTB/nbpJZviYOd9BeU
+uMJsa/szYeReHv0r73dYykhJwpuMx9BOiYMdZ2s9HWDuy5c2MXDPu4H1emQ8
+M+sd/jDNuuHJT8Q7cVrKlglXcRPUWsl3wxlDnynMT9tw52w+HNu7VIjE5+Z6
+8tAZOE2yVnkFHM4Peu9JvqsUHwVUIN+8jVbjLFIPz9woE1LvwbP+RqS/xX2T
+TGXEez39thb5DrJQKpOC1VUuVxPTFWzDgpRwrnzVWGVM2i9eO9SvyKJSHCyt
+bGDVwKOW++CRDVOnDpLxh5LX9s/D70u2ZlEyHHTNwyMMjr9srNAAO9VqsvRg
+fS3LYlHky9I2+NijgHpLmi8h9R9hVuwvh11obTuTYLsj/qJZcLXFdVoH7FVU
+tCQTNuoR79HSw+/KStW5hPS/y7txEOZEZS5/C+d4cgxuwHb6Uq+kMN+E7dyw
+dzBtzam/HWCG38IpaX2cDy1TfybBtabFzsvh8qddVh1w4x52xm+w3aLLu7SQ
+H6so298DDl+jEUHypV3wrN4DV79yT7lM6pE8LOEGy7W6vqkh7Ye8V2yAnb5a
+aXXCOV5eCYaw6mCh4D3MTox6IA7zDppfaYJDtKrKPiK+cq+X5vlwecWKzHLY
+4nHpMz/Sv/nYo3Mknz3uqxfA+vSZg2yY5W1kWzqP3IPtvDVw4toxHxZMSz+r
+oknqs2txVxWp3/YiFTE4b8LOZRncc+jL7gnUkzf7QXBFHudWpay6AOb4mC0Q
+g63uTCtMk/X4cH35STmMK8NLkSb1PS+l1iaL9XUsDDEk8z2e5/JaBr/rNGMT
+F7j6AcdyVBr78EDUzWiYOzXwYCU80y4V+gimKxsczpLCPWZd1zcH+bPWBWlb
+wH51jr12ML2kTWtKEvPoB9gmwYmDd9r64ALRuoq3+uT+LR7+Cbswxsc0l6B9
+m9up1ehv9ob9dC/sFXhmPBVWL8jXTofD61eXSmN+fV32Oh7MyeIKUuDEh+4l
+kzDPcnKtLuLniq/xVjXA+hWLNt+Du65GPzSEGSKTzdbIlxb731/L4ZHu0MYS
+OHL/iBwDtqvTCxZHffSv/SWnDXMaDj3Sh+lZ8kUSMD2QFbAC5m2rPTWI+bi0
+l/HGcKPNPKs6mPX439eycIFYqyKJl2VoOVlG6vtiyvo4LJcSo6wLl5yrFLGD
+EyP82r0RX7mPoJhO2lcc+ycO+egs7Tv+E/XhLtwSeA75s0ylV3WT/Rj2zeZ3
+1MttvuQ9HtmP1GpFVwmMlx1iVU/28xyvYCNxrFfKlgfPSPt92ltFaPi9nrKo
+aIcpS78dA6L4fmjJMv9Oxt/V+4Yvgt91ndMzZczPV1no/kMY37GthZdsSTxX
+Uh31YO7NvO2hcJFA8OLMXMxjU3GgiuSz5o6/KFygldBBoT5eJ/Lly+aQfx/e
+S7SDEw+8epMMu/UFr08i/jSscQWunaOW005sYH2hAeaObTqmbohxBRcc52O8
+qzW7EnbC1MrDEjFw4/lHqkkwn9vjTUM8qoIdwQ9gLtvd/BKc1pQY9gHmKepU
+6SEfncKPLpMw/QFXqwR2q5rJEjFCe+Vrj0yRf+Md3whRuDqlLOIKHL83LmqG
+zP9LZlkfrPOlPrcfZnSplsiK4fvkY+RvjWS83+J85IhlOxj5ZD77EVYv2gfl
+zzidIfHuk+g6D09oNf/nStrX5eVIw1dnkrSMYFbfH4/3Ih7H6UPec2FOzQLJ
+RMQf1No99A71oMJf8dKRb8DgpqpqUs8sh9Ik1KdqeVrmTdip8u6BE0I4X16r
+q14j7Tl+6x0o7N9Zd4urcPXXiwybn0xKx6+58Drp3x19VGiGSU1cNSiqhFns
+gw7vJ5lUT/wk1Un6X8oMGxpnUq1TVsMiiMerN7pt1RiTqvr7tLslceCyzCYB
+k6IfYzw+Rept+nR92Q+MZ754ZwWxSGvH6HcmJfVTSIZCPamcAYlzMFuwN8eO
+1LueP3wajvXJbkqE+YusDSthlqH/htdweNKUzjqMV3J0XqeyMfo3nHcXw3z6
+qc1JTsSz3NZpuHyJ2r0zxmS9Cx/IIr5EHeG+PJhfOveXCeKvWvXbsifG5P6J
++uw0gfgCLUReEytZTexEvilWtO2dcPWxpADmFJPi1taFt5H3iZOGX+F4Nw8P
+0t+LYS/qOc2khEXn6xaQ9mEx8WFwo5XsybNkPt+WbY7w1Uu3TA+QeGrNNtWg
+v8enbaGrSX+WbSepb0BTUaocTB+d/JWLeJwSUni9pD4LjihrId72zv2+1TDr
+5dPrLqNob/gjNoPUx/7z9GbUQ7iqVj6avM+/e1vjG5MqkIzOOkn2a/Uzlbwh
+JqW4KSX4KHm/1KWZGsD744yAAFLP3giBTw+s3fstkrRfpWIhzke+CqE9XDI/
+Z03IxBsmVdt9re4p8YE78TU87JcEg+wJ4qKDUjZPkN/3nxqmpP5jdr2CUszn
+2h59nLgx+71/Jtan/S6/jJj8Cbf+//8fGbP+ByrUpRc=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.851144620506076, 7.907943040036291}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwl2Hk8VPsbB/ATCUWNpFzLNeRSlqiQ1pmUcJOlxdI6SHS52VpUqhHViKJQ
+IjWyhmqKauxTKlOoKbLLXOVS2bIlit/ne3/+8Xr3Pef7PM/nnBnnpOnut9lT
+gqIo2SkURX5TXZP40WD+//ciJqVWVsyWoDMpk7YAGg+mr6ik9WJde/YiKxbx
+xwlxIZxVEZCoCHPs1M76wv46yY1VhkyKpXDPSwrmTCievwjz5PlaEb8zKZe7
+hRXb4a7pYTt/qjOp4mPX9JbC3qHxnL2w9cr+B8qw8Y+otAo1JvXpRl7xDNh6
+3toefTgqnDZOHOzwNuaqKpMSswxDyPEJAb5uNNj61Fi+EUy7cyUqSYVJCWee
+iLOHzQOPbV8NG/imJh8i51/wGR39DXP67Zl2ExZqmDuK4KGy0CYhPBpmNlwO
+7z1+i95Pjm9ZoVgD06X/nFTAvCypqtPjcNqU82J9mB+j3LYc+zf02FxeCWf9
+teN+BOx7LN+NAXP1b2Z1wBw9P2Mzsq6yoMUK/dYmxJ7WIHm+sFLKJvN0FoWP
+o17/ckp9GuZ1KKuTrST9D+TKOsHeha3saDKfVCcnDv7p09v+JyxTKKNVokb2
+T0+cNEB+xbQDVXALvceTBwuKFloIYOMjpUtZ8Kjt01dXYVbQ4UkFWPzpn/gt
+cPH12ByhPuaIXR41TPorz2w9C7OZVo1sWNBk0WoHc8celv/APFXHDx7RgmVW
+fT3iCZtnW3dJwP4luypekjyPulb262G+nA9tBrDvXbM53cRe7hNxykzqmYnE
+rCFYKDlTUwa+nrp8vzQ538O5OHIeco1eY6ENM03aDmvDaZmvLazJerpz3/u5
+TEquzrLQHx6lNkXfgll/rRIkwqLdU/+OhAVjLS7lcNemrtUxML1PP7ETtn5q
+sP0enDbHTzQV88e8CnnbAcfd672pDLvI8aKNSD3BX1qacP/3kuhz8Pr22gk1
+mNMUqNIFN+TqHJsBC+Ua5Deif2P2aXY39u+/UbMwG1bLNcgQEHtZ7J6ETW45
+0CNgzqXiuZbIg2nY/dAKpnEc2Yfh4qzrtyeQh4xdzfNo+OdvHsk82GWylHER
+zj9fFsCC2Uo+8f4wzatUUwFmarZUm8HhY/zk5wvxebP5274d9ValJ2aw4ZgX
+Dq8PwTsVD+eshxPsy/WGyXyTyjmKMN3vGtMTFs1XVe1bgH0/h2dXIo+hQO77
+elimXjZkESzz7sHM17DYJ3o4VgnznOQ7voV5iWvNJOCDd3XOieH+tti+k3OY
+lPK3BRJjxOn032fBDUaX41VRj39sV+UjRVyvJQr3LGBRoWFzMNy9YusRX9h/
+TNjpBDPrIobjyXr0Y0NHeK9WmEkxHPzhA2cfHJWR6dUCe//x9HQcnLaxR34I
+5gxbBtTDJsMaClOQDxV0OE0P9W13DLQRCxcppXDgrM7LocPk/EJFz69wvqko
+pRl2kEp7YIt5dt4wjc+HaVNNd2fAwq3dW0Nhrv2FpAG41iYucB1Zn8ncYIB8
++lfnTv2FeY3XDGjawwbbT0Tx4IYo21kuMLfgTR0LZttKLrWE+Vd7G2hwgqac
+/FzYVvt+ZLkuPkd1H05WYn+1oW0vjsM82SCBF/zs4BTVVTAnKHx9L8nzWNKj
+aTC/MviCB7xqMNmyVQd9ZkoMV2F+mfEFbQKY42Ox3xjmzHf/fh/OyritFTcb
+95vzS1ce7BLCcJpQYFILDF/pF8EyyQpdB+Faq/3fRWT9daLmLxrO+3mupA+O
+WfbILwnuD2mcqYT6QmkX/S2wi4mj3hq4waPETwcOKbqg4Q3H2KtTc+F89cuD
+0bB1idYaTfh6vMSLB7BDWMbiDbDgvuJwNUwXWqeEwvx1PmvayP59j1a8gYdK
+XZo/EZ/JFC5Ef4J/pl5thdnuX4Ii4Z2isFYh7F/DkuuFlcPkyzNg71g7p42Y
+l24nIRkMi0tWuyTD2tEVI6thkUdW+ge4wbY3fAzzBXs+vTUdeWnXHZIl+VjX
+KpaqwxRns7kbTFkqJivBtTeyxmkwbejS8m84P6uWZf/0D9y3wRG9PLiqpVU1
+GBbxs4OcYJcvaQqmMD+no+IT+rMtKjs3ro16F0dmsODwxyG7q7XJ90K1XTXm
+9VUd78yBR8u32C2BxWlZ9VfJeozLHr1ZmH/jqeWXYG7Lq72j8vj3UP8Ass7l
+vX7WJIf7SF5q3W2YRr1JaJmBvD++FT+D2bN1A6ThT9spyS6yn/PtVvfpyDX/
+jSQN/dEL9GYNySK/PTnUCpireOdKCUw3M59whx1SHC3L4CzmFXkOmU89ddEI
+vJUtFZABs/pUqndiv/V22qVFsH/mb1Zf4bQ61Z/P4Zi1I6KrqF+ra1FcTo7f
+sVPXGf1qB07o55N1KQk1dcyTtoSmcZWcv7rBsBUWfOUr/A0bm9r8ETkTOTLv
+aC0j/S3+lKuKPIzfKkt9xzziRxJt4bA33ePrXZJH+/EnpXDa5lIfN9iYt/12
+OcxeVrdHgeQT9zg0Bo7TWfrkyXzM83jNgDbcf0U+/BBMXWN7hKHeekWPQCOY
+11Un5qEfcz0V2QEtrHs6Neaj/+uen13KYHpJ+9MEkvees90JME+zL9UL8wvG
+9zw8BYvLHkQYIq+QL7WTQTDXPerbiDSTym0+6ncIFun2G4im4XuhPlkyDGaW
+nqh4JoXP/2TN/CTYePDJyIepyOt6R14R2a89V0UXXlC4ZFE76ad3aGuqJOZy
+WFY+A/0KpNirnOHgvOwQU5hZf5G3DpbZc9p9J9w/tbF6H2ySIss9AYsXaU0r
+hoUUI/MKOf6opusq7G/dWuKQDtMjh3NIfa5kxkgmzC78Z0UC+vNnL45IJnm9
+EWrsQv97q74nnYH9g+r+pWM+erm5D4vUez5Xrx7OX9zTsIjkvXKvwUEZzOP1
+xI3k2R+n6tsDr58VNv0OTBP56KxAXiY9nze4wazK+mdbyP03Y6RJgeSREW1k
+Bs8RufGfaCLvzUmUGOcvOFvfGKRJ7sdt8ZvhnwseqevDDiO7f11C/a1iM60v
+eM7tv19XkYZ+07h52nkwb6Hb/VjMY2Kf1XEOptjfzPZjXpOiqsv7YWZ/3uzF
+yMfY15XvAtMnTtz+PgXf11FGK7YRu/T4vaRwfQ8s37Yb5l4+n7x3kkEZbBjI
+CoTF0RvUjv1i4HOfbB1DrJ6Y3DHOoJhRTjX55Ph3W4wfjjGo8CevLrXCgpZu
+auAHg5IL0U+QRv9M66F/b8LdGne/GMHcQ4qmJbDvnJpbW2DxdInXFjh/a2GK
+oj9Mf+dxQhv7s+WUvp4mvrUyxvEng+IUzrM/T6x0Jv0h+qmSzxgKJ855mbsc
+/Xb3DRkFwsYP54e5U+R5tvanI8nTb9MODcyba9cxoU3q5Ry0r4AdPicf7SZ5
+Oetus5dArlZhzGzYweZr/x14NMaVyyLz6pXnNsPK6/dbzIZjZgQcqoG9lU7N
+Dcd7A/1eZ+NlCfL3QKGnA+8NomuihSowJR370R5mZmQF+KKe6GyUXwXeG3jl
+qVuj0Z8wtGqnIyzw3x+lhP77mwIvfSPPuUe3bXqLeWmBJq3ZMLuSHe2NfBzo
+y+pOwvRuq9LB7wyK1bX6+d8wd92z5shhBsVfq37rMCzYtcnaZpBBCU6m0slz
+M7ft30sW3xiUjOuW6kqYOtKXP7ePQSkXcMxpqM9MmP18XzeDasj8ariH9OMh
+HRH5Bdc7/fjwA+KmXzUxnxkUNW9akhTmYd94H3YEZqWcN3ck86VsOmyK4wU6
+3YwYsv76mvSjrwxKvNRJUELWDy+d09zDoPyzh1Lfw9yU2+aMflxf3/H2Wpjl
+2fqpAP0xrUNvFxCvrPCwRP/GhdsOhBH/9TtfOIT9vfJ/LIEp1sk/9Ucwr+vp
+Ha/QH0siX80JeYg3X3xrS+bZpfzZZJRBCVWUbpaSPN71aTyGva+frtcm+T72
+fSSCRWtlNM6Q9xjvZSXHYPom+l7y3kMf1nich/0c7hyI3wizjIpzTqEe/WGy
+cwl5r2qSGe5EP1lp70sZMMsm/NXYAPqzWTurHs+tLJ2j0a8wX0JXwbmzMFNm
+c1Mj8pURmC53IH41nzPYSTzUbQJTJgqScz6in6C7Kv857Au3sQX7563sI8/p
+FHOJj2stro+jt8dRYtnAkuGXuH4vX7vxibVdNsgXI9/Wjz8k0Q9lUM41SUe/
+vnnJTsSUlnPGYgZlbvGnVzYxNy2CHllG8W32u//4b724ulkL+Zt/riPvnRRr
+X15WKvovMIwJJG63dNMtwP7KBr/HEv+WM/3gCwbFa2qUuw6zF84z+CZiUF2J
+9rMiiRMvaivUo/77M2p7yPGV3llmrZh3cH2IMiyYxlc69Q/2b8oo56M+e7Bk
+x9RPmGfJticWsED3qhX1L+5/r2PbC0leJs/v2iEv60sq27VhdoFUWw1sbLjU
+9Ow8cv7Z0RMkT9ULL8h7EXuGa7Ulzufui5OygalQo5VG2N97irDoIZ5L2W9m
+jlujvjjWc9ViYs6Zd87NuJ9/NGoK8FxKfTBPHnyH/Wcvm7OPeHVK14Fy3G8d
+J5P+ICY/7JL///+DIvN/nXAewg==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {1.5990515496243272, 9.421161979599258}, \
+{1, -1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{19.999999999996362`, 17.}, {14.999999999995453`, 
+          15.499999999996362`}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.126447748763752, 16.890374170787496}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwd0ws0VHkcB/Arw45HmTreJkYor1CeZeJKalpOa6VMtWo0U1mPNGvEiqNa
+OkOW8ehk5RRLDtYeWkTrsUJlS0vIVrRUOsnabSqPoanZ73/nnJl7PnPv//97
+/H/X8nBcyJFlFEXF4kuuFIP8bKApW3I1pCnRdE73kgtNlTrxA3+C9bOGUj7B
+dI9mYpgRTWVTvwTr4PmWmkxtJWxMDQ9yYOmdBM08Y5pyy/xa1weWq1aK9Exo
+6ivn8+cjyP4L8RlimGPPS86EJ55a5DbAjury1gayfrjg6hDM4/Ws+AsutZ3S
+HoRnUhXOmhuxXq3W9BpMLd1U2cH1HX7WCfBEplf5Dph3xmCtNez24O+ycDg4
+ejH2FvIp/HfPxyi41/eKdQQsethEx8En9sbfUyH/otFQKbkvU842VsPBtd1p
+ZH2vvirtKDxRbx+2E5ZS2y5z4ZQ1/Hpnsn9b9j8usEvOjfRVcJLcImo7XJ84
+rjGL/AfW2qhSYcGb08kjMM/gQ+IIzJ1xNG2Dk7KiC4KQz0z6zOtK0k9htuco
+XMXXLimCFSH63adQT0WSWkI+fCJNP3GtKfZV2+Z5AWbFnH03CEsi2UZlsCB2
+ojnJjKbaVkY3N5H7wvpGPTbObZfEeRCe6vXpksHSpQiTOfJ8YbvRPLxtRV4V
+G/nLY2WV3qvx//T229tJf3SZBw7BodoMVzHM1/puSwTsxhXU/ACf7noh9oeD
+vd0+64Ajlx8x0IaT3vQfGYMF3XLlr9i/atJs63u46PlKfjise+9WrporTTGv
+B/ssIl/d0fm7mrBMw8LpItz3OpNSh73OHMrwhWMife7Pk/iRig+LqLeINbf7
+BTmP57/Z3odPtOc53IWrnkYZd8BSnfKAn+EWFvNjPxxaIOzPgUtHtD6oY7+e
+1mV6pJ5Oto7RPti47KDvXpjT8U1AH8mnRBxDk3iSj8V85NumrAnZQObrsP2l
+BXjMketvT+ajuvpKGepVJuvrOZJ5ZIeH7DLHfHqOLnqQeO+/3DgHB69rafqc
+7L81yizHAvk3rY88CmcncCaZHMQPbm6WwrXLjay2wIr4kGd1MLfGqCYClouL
+hx+TeDLh7gTYzfJ6KAP9qdoZpJkEd05rsdeTfnJbW6JgdoWECoFFO0YPfQHT
+Wx8aiGFdxeMBW7iCauiTwrz+Y+vmkI9UZKFTRPrd27YnD+6sCfC5DJ9OK690
+Ip7KFV6C+VHPzjxEPbbcAaYMFsRpNH8PC5Kj/VPJ+d18Qh2EJaxVV0Su5P0y
+LQ6E9QNNNXiwy07m9D54soVx2Q5WnFq/Kwv2Osmq04F7j+cwxmCRDeOknPRz
+U6tnEOJz7WI1npDz6lp0GIEF+blW5LzpT+G3NqEe6qShUxfp1/FHwhw4qJHH
+6IbTF/L7JmGpj/liHxzqvrrDyxL9dtD/Y5zMY+pu83Mw32NV8xKZ19IH3r/D
+FWKrY2zkk5IxzlTBVa89bPzhnnz7IJs1eF+HSl7FwPQlv57NMDcsU3KR5F9V
+4u0LT6guZHSSeqm3511hrzCdmZewY1eJzATmj9Q1aLghXp261iz2D9381s8c
+rlBej7lN8itIjHOClXXWjYVwY35WsTvcc9XPRAjbGlpfc4Un73CG3eH6FL2N
+dnBRRM2fLDjyjbqNEey1WJ6/gPr7BJ7aKsRPn3/fMgMrp+K6nsNKpdT4HSzp
+ZYl7yLykFKQwsV52gNpfSeaJMVbqDAsqz7VnwfJvKY+jliQvUWM8LAncM18N
+cy5ErBDC1qXmdxfgAQeh+36yfnZCEYh6h6+NGxIrzjaLfoRrO1gG5Hl+6ad7
+83DbyyEqAW4s3Lw8wArv16Nidi7p70FVZCacbca1rSf5G7a3d8LpWa8kI+T5
+haYbU/D/H9SrS67W9H9qGVzk
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.81512204377634, 8.004985304149105}, \
+{1, -1}], LineBox[CompressedData["
+1:eJwl1A8wm3cYB/D3MoxgUyKzlkp6tOlm/qylqsOLzkYnTTNd0bVllrLrjGPF
++fuytpTNhVbdzEhbNRyb2zCr1uVsKFp/ZkoxM9aiapcVKTq172O5S9773O/N
+7/k+z+9NxB9EyxU8hmEO4k3X/z+cWEafrkKWiXc43GIHc5uHnHVhj7YELghm
+FCGGk+YsYzrT3cLBshPHtxfBZzQrjlfhoErd5R3wyQCDJzdhV+kvacUCljE6
+ZtPcC9flRo1ozVgm7/PyziHYRHP/J1843r3B6i6sGW6vuWjKMmkdVWHdcGKX
+q2JuE8uE9jJTTWQ3xZNAWBs+n6SivE58mxET7G9rHHVmY11zPQMuz7nqEQEr
+rQNFMni10/X8ATjy3Yk1X3gy+k73LurnUKuNAm6afOS+jfr1WrpSQV5s/8aC
+8sx683VRL4nZ6k12DX82lQD/LfZXiWH2wRG/JbhkYuzabvjtgEuFscgvbC7L
+ltG6sM72PnxDr2s8jvqt7X7JB/3m8KKbSqj+gv3aZ/C27Udbb1H9FovYy3BX
+x3z0Es331oCyiOZj+0wieh3z+2hmj4K+X5af6AsPOydvNYJTel7eexJ2bI9s
+UKJe9T6r5lR4IunA0Ary+c/mT+XCjJFxgAz+9nS7p5L8sN6hFP2KtLHGG+tf
+2inGXmSZRnmoC33fpEfeVvgC5tqz6BkJq37c259szDLS8h4HKaxeX2goNUKu
+jpAIJ1jD7Qjmw0Y6y4kCcsdCZpsh8mZXr6xQf49mw/vh7ODL8r/oecirSN+J
++y/+0184SPMe+WLtZ9ovrTGInhf13FpwAeq5lN4u+hXue3j2VCbycCaD5X/A
+ofadVenIK//KTKyleZ3LPeiGflIatc+Zo75F23FnOk9B/Xe1bvByarzlKlx9
+KkpHQf02/u5vj3l4GNoV58MSTYOXO1zDix2+CWdPOYps4MDHD+ynaR7lEUOT
+NK+WVC/DXThf28hXU2A9m8emEliV1c2bQx6VeYnkDbjuvNVaDfJG6pld86X7
+n974V4Z+JMvqI2/BHLfvtznMo7L4HbUHzHCjqwV8PEcOX+vaw8q+LfyjBixz
+KWPzn0LYRDDt/54++gksS3+KPNxAwscXnsfzKpKGjNN579+UYgm7LhrwW8kZ
+lo5aPfzefBosquA++bEL1liv9+AGCul8Zp2EBXBLZYo4h873XoWON/bXWIaG
+ZdF6tCDYGvXvnhiT5VH/80ljQuSL4fmtl9L9Xu9zZshv6ZV3uwkO3dl+bx2O
+H/3w0xE45vr0lQ6cp5QR2/KQX1MqkASj/9Y7n6heg9WZWecqYJ3RH8JDqN/e
+uAqyKsxz8CwsU3eNH4YtqrfE1dK8kl/Z04j9EgudmV6al/KQTy/qib6vqZmB
+Y/yqimuRT/rmaZcVmv9y5lIY8m/8v+1mmY2XPvsfs/y8/w==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {18.88748581947994, 4.835942983375933}, \
+{-1, -1}], LineBox[CompressedData["
+1:eJwd1Qk41GkcB/B/ji2PclTuaFzlyBBJizzvJmUljX1sKGVcTVJLRUutTIex
+SjkqUWmHlKOSatcVGylylKGY3bGtWbIlcobayuz3zfN45vk8v/f4/b6veRgG
+R34XJscwTCR+6Scjoz82hPnyo0kYQws59xew2sR5QY4GYbw7hr4ug4XlpoN+
+GqT2b9trghSYn1+TvFKD8K/oN84OhtMcVUtXwYMHTa+sgjnJU3GBWL9EN89q
+Pj3/TVtbIeqs7qkcqTVhbB4UCNQ0Cb/YukRUCAsfbxam4X71MwtnDsPSqVsF
+hlqE/7L2qX8oHMW3N76nRZijcxXY/nDak0gtH23CZIiGuwLo/u3q6X2wMqui
+dQ9MZi6wg3QIP3ZE8V4ydadT7iM44IAo/yY8am2jr6xL+O5OvvO7YE5nzx0r
+XcIEq+9fJ6Pn7ww+aYn6y6451V/6f9uooKhLSN+gncAIlj7Zd6NahzClK9k8
+K7jWRKLlq0PIX4IhVVual67qZQn6GfdTTLeGbfzIlJc2IQZFC8JN6f4yjbpq
+zHdZfDhlARzVK69gBYuZwNZ3uJ+5n3q5EPksy92Q9xvNw1hc5wDHNFzT3E37
+m5ex7x+8z6hEwU2PztNgoH8d+Q780FPRwMZ532iuyUL9tIqKwz5YLWE3KUa9
+Y2PLMUOYcdtCpDDz/IHZH1ao5/oQnM98vJ/vkg3XZnq4FsMJvOOreXCpflCO
+LfJvO9nT5QqLAtO2PEa/M3KZ3dawUHu6Ilib8Mtzg6wtYb7iiVvvMb+byenm
+FTC3cHbcEeQv29vZ5EHX/yTWnYTv2kSc3AVzPlf1eCLvYXasOI3uTxz//Rje
+4+aTTPUqanF+USZcUO4b1UvPE/dVHod9++McvsI8tZ8PkU3Yn/XId4zOR1yr
+Sj/gfe6maOXbwkKnwIhk3Kd7dY/MHubuH45QRD1PtpxvAXOqOC9i0O/Skfwk
+VXqewOlSH+b9qPQ5tJ/Oa/e6xBfz5msWc27SfIo9qiR4j8mCs/7hMEveID4a
+ea2sjHNbRPMKeOhnifqYg/uOpmV4n9dGI/Kohyuq8aLh2lhuN/2+JbicXWAI
+i9a2JRvBJ4736z+zxPqxXct52J+bntR/inrEa6QZzso65eoDp4UelnNHP01e
+rdvNYNaeMBMx7FVUf0IZjjpT9z4S8zgPOtvNWCCPWIfTSpi3pryzU0ad1P3q
+AvLY5CtRUsV6YcCuJD3kqe8wec6c7o/uG0H+fAeDsAxPeh+nRPsp3MO9fi4a
+Jmu5zZNY3zIkN5BD+2On97yH1Xvj6h7S9aOSMDHscpEc7IelKXNyzmD/rOyS
+1k8wP+bI8+Wot44J5eZgftZqBfMK9NMevoylCHPfFy9ho98qOyO5CaznXnzh
+cwl/XxpF6ZHt9D5Li7vKmG9x7yr9XGr7PnYi5ncxKMkLofMkPtdRx/vdj30V
+pEfvm95YXIZ8Uz2zglswf5RsRcoh5KnpfN74R5g12JgcAode1Qkzgrnx3t5R
+WC+vw4yIzPF9sfHamos6b92NzQKYPy99fAJ1VS1poxvMvf1mWwjuH+6eeqYO
+qzm2mw3g/q3+PI8hM7y3pFgQj/4vWQwv6oKl8vXNWphXqD7Xuw3mxPz6tgTz
+Vm4tk9G6zaSrtiPyUnnnHDIIixx9LG/Dix1Tx5VoP9WPnefpEf7HEKefrWFO
+jnjWt/CffqIMP1hYsZMVpEeYCXbVhiOwdMMvwT6oVwd5jV2FSfCBJmP4nGkK
+U0/P+887vgPvIXqjE9EJl47uzQmDuffWNEjo+YU2Y33o14trGNUO16Y2JnwP
+LyysKayg+xO7F9ZjPt6s7Jw0OK3FsdIe7ng0vWMLvY8ztLQMeXyoVJ3Wovmo
+DKz3RF5FnvqfWjAf1zL9zgzy5A1ZlMfBrNcWXh3IO8xcodmE5rM7UY7+/cfX
+bJaJluK+HetT/sX6+MxtakdhtW3Ze5fgvAOGWRFOsNRCoi2Av/yTo3X6qU3+
+B+U8lqE=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {14.109669593634097, 4.811165529975059}, \
+{0, 1}], LineBox[CompressedData["
+1:eJw9lAtMU2cUx6+PkoIb4mOmcO+1Frz3U0CFoRVnlAMR6cLYEJS3KFWMjLBW
+wQRDytpp9vKxymAOAQkiWkAIlTfy0kxQExQVlBHETthiEbExLoBT2ddozk1u
+Tn757v2+75zz/x+FWhORPJthmBD62uP7h8CSefboAUy4ekHSGgJdCSM73W+6
+A6M/y8t3EPjzVLHE8jNlaYdnsYbA9J0nvo4hlGM6yjt1BDRM6WjFjAIY45dt
+1mwCMQ4241QDZUvh9Y/TCaR2lyjWaijbBq1VcQTq2kLUeZ6UVxjz7yvp+e/S
+H/g+WwZMZ2WgxJGAj6XX4Z/LlPV7atbdF6FxOGVj4BHKvX8NVZ8W4XeLkz5j
+J+Xdr6enYkSIkRZVBgdR3n9opN1VhJLNuZMOn1L+UbXQPCRA+9OG7371pmx0
+3r7/vADvvn48Gu5LeSrv6OfpAoh1PtfWBdjXI3WpoQJsvXv3k/7tlJmUKP1q
+AS4VS5rTtJSbrtuu8QJEu2Xq3v5C2bI5x+oqQERVr1O0mbIqVFjqIYCXvurU
+hnuUbfXaN/4ClDcFR6TYKEsr436LE2Bk0dzxbkea/9RVafb3AgzOaU9L5Shn
+Dn/T30K/n1XuVStSVpWWqv8VoGZPbGYsoewCvMlPhDqu71sDT1nWd3vmoAiP
+u6qrOqWUm4JmGmtEyEotW+9htedvKPYZE+HiwYEzXh2U/cctkxyBnsK/XXqO
+2eu9pW90K4EMpcU/KZyyVv1i9T4CRT2GvfnO9vxUhw2HCTxULYgcMMopz3Z0
+0hPI87frRY7rfoMTl4hmKf7f+8MbZc8THvdXNASc3LSLx/O11rXDyU85vF/r
+pq9umQwc3n/xF/XG5lUc5head+589gSL+Z+zRjNv/2CxPqb4sPlhZhbr9yCt
+2pR/mcX6RrFHl6/sZrH+Qf9NEu04i/1pNGfEr5Jz2L9a97Kh4/Ec9nffjcSx
+bUUc9j9hYr5EYuFQH+aRVyeWy3nUT7Y+oW9HFI/6am85m5Vr4FF/3gWBysQi
+HvV5fFvO64ELPOq3u+yhy8sCHvUdu7DLlJHFo/4Hk8ZmlgTz6I+CZO+fdNMc
++qdcnfjS7wyH/nokyiILV3Lov5KL2o39FSz60y+3tfW0gkX/Zu1dNuyc44b+
+9nRvUVYwbuh/2ZHPCp8fcMX5kBl29VXAmAznhy5lw5YraZQ/zJdHH9mjDP4H
+xxO6LA==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.4452, 7.75}, {-1, 0}], 
+        LineBox[{{7.9999999999976925`, 15.5}, {14.99999999999251, 15.5}}], 
+        PolygonBox[{{12.1, 15.5}, {10.9, 15.1}, {10.9, 15.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {11.5, 16.4452}, {0, -1}], 
+        LineBox[{{7.999999999996362, 15.500000000005457`}, {11.5, 
+         9.500000000003638}}], 
+        PolygonBox[{{9.447677384685548, 13.01826734053906}, {
+         9.706811054955079, 11.780184249251306`}, {10.397834175673825`, 
+         12.183281069670574`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {9.015942703607429, 12.323799910437668}, \
+{1, 1}], LineBox[{{15.000000000007276`, 15.500000000005457`}, {
+         11.500000000003638`, 9.500000000001819}}], 
+        PolygonBox[{{12.947677384685548`, 11.98173265946094}, {
+         13.206811054955079`, 13.219815750748694`}, {13.897834175673825`, 
+         12.816718930329426`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.984057296392571, 12.323799910437668}, \
+{-1, 1}], 
+        {PointSize[0.04], PointBox[{11.5, 6.}], PointBox[{8., 15.5}], 
+         PointBox[{15., 15.5}], PointBox[{17., 5.5}], PointBox[{11.5, 9.5}]}, 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T18", " ", "P2", " ", "N36"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdiei/fifjghgjhj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdiei/fifjghgjhj.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {44, 0}, {0, 0}, {22, 22}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["g",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {21.75, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["g",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {26.25, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["\[RightArrow]",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {30.75, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["H",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {35.25, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["g",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {39.75, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["g",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {44.25, 69.96}, {0, 0}]},
+  AspectRatio->1.0999999999999999`,
+  ImageSize->{288, 288},
+  PlotRange->{{0, 66}, {0, 72.6}}]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489721941058*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ImageCache->GraphicsData["CompressedBitmap", "\<\
+eJyE3QeYZVlVNuCyq7u6Ok1PjswwDDPDDBkEBBEwAWIWMaAioCKKARUVVII5
+R0wYMQcwBwwoiphQUTGiYs4Bc073X+8+6zt335rG/zzPTHXdOnfvtVf4Vtjp
+7Z78kR/wlA958kd+4Ps++cZHf8STP+wDPvB9n3Hjo57+EfXR/hvs7b3Bjf67
+cc+/N3t7+d9bburZO7n53//9383d7373zS/+4i/6ZPODP/iDmzd90zfd/Pu/
+//ver4939h45fhxsHv/4x2+e+9znjtf+7M/+bHOf+9xn8yd/8if91p3Hj/3N
+3/3d323+7d/+bfy2fHZ689///d+bf/zHf9zkedWrXrW55z3vufmKr/iKzSd8
+wiegaPOyl73sjbqJ6nvzL//yL+O3y/ozTfzTP/3T+O1Yf9bdjN8ecoHvXt6E
+/8M//MNmfrT1H//xH3dfCL++OaG1D/mQD9m81Vu91eat3/qtNy94wQs2n/Ip
+n7L52Z/92WrXOyc2z3rWszZ/8Ad/MFr5uZ/7OcT33/Y3f/RHf7T52I/92M2/
+/uu/NoWHmz/+4z/ePPaxj92893u/9+Y93/M9N5/8yZ88vvvrv/7rm0/6pE9a
+Xju3+aiP+qjNl33Zl21+7dd+bfNO7/ROm3d5l3fZPOc5zxmEeoqEzZ3udKfN
+05/+9M0XfdEXbV75ylfu3bu7/ZZv+ZbNV3/1V0+MObP5wi/8ws0rXvGK8d3v
++q7v2jzmMY/ZvN3bvd3m677u68ZnNfjNh33Yh21e97rX7R3v7/zWb/3W5nnP
+e95QCA95feRHfmSYufmCL/iCzcd//Mdvfv7nf776edzjHleMRaO/f8ZnfMbm
+Pd7jPcZQf/VXf/W+TZruvvmbv3mHtK//+q/ffNu3fdto8ju+4zs2b/M2b7N5
++7d/+80LX/jC8Rkp4GJxs79zBY5unvKUp4wu3uu93mtIiS5QNRL553/+5/Hd
+L/3SL9189Ed/9OYv/uIvxnvv/u7vvnn/93//MZRf+IVfGKx927d9W/3u3b4r
+/D/90z/dvM/7vA/qN6997WsHx6666irm0AI+2DzykY8cgvMQ9lu8xVts/vZv
+/zba+JrXvGbozX/+53+uo0X5Qx/60M1nfuZnDr1hNp6f+qmfGkL2/NAP/dDm
+8PCwvlNjKZ352q/92s3f/M3fbB7xiEdsvvzLv3wYyed+7udu7ne/+22+//u/
+P8z91E/91MGombkf9EEftPn2b//2zf/8z/9sHvCAB2x+4id+YvObv/mb46uY
+wDje5E3eBNUt98uHGr/jO77jKvfSidG1d333yiuvHIyke4SEtDd7szcbwn3m
+M5+5+fM///PNl3zJlwyGVxv3afIABeuZyWPqn/d5n7f5r//6r83DH/7wzUtf
++tKh8g984AM3f//3fz9UifX9/u//fn/nykGWpsnxt3/7t4dFGR4ZP+pRjxoc
+/p3f+Z3NtddeO/QIKR/3cR832kM2c6E33/qt38psBumlN7ct4r+hRatV8njX
+d33XoZEA6Ud+5EcieR/9xm/8xgogH/ABH7B50YtetNB47VCYN37jNx4m/E3f
+9E1jTB4mpUVsCgb99E//9OYJT3jCoI+SMUN//8u//Muhz9/93d89aPz0T//0
+zYMe9KAhfaIsLYnkKVPj8F4QhHS+8zu/c7Dr3d7t3Ya1ftVXfdWwepJk8ST/
+/Oc/f/MN3/ANyOjvXj7Q2OCjAaUdg7VMDPkf8REfMdgfEvVDQ5iU7/oMAr3D
+O7wD0UQDPvETP3EAw5bMuw6NQAIJkupnf/Zn75BJmszM977xG79xcCskfeAH
+fuDmyU9+8jA9Dw3wPYqNo8gk6b/+678e3Kb8tInSkg6ymS97LCXe21GBM5sP
+/dAPHXZgVE996lOHCvzoj/7o6ApnkNx60MO5YfMrv/Irg3NI91AEysw2KSEP
+iUPUq2BhgBMg8/zMz/zMGA4AwxZgaAjA7Pd+7/eGy9CftrX1lV/5lWN4ZSSL
+ItxtVoTxIDGK4PniL/7izb3uda/N/e9//wHVwVccAOXlgTZv+IZvuOIxKDiq
+CDj8OZ/zOYPUgv7xE3eh2ZOe9KShw8h9ozd6oxEgwNdyPXtR1jtqwU3DC1JQ
+j5+h8dnPfvb4DA4AV3aBNfe9730HrJG8MdIYWkKpKWU5o9EOjXr1q1+9eed3
+fufRBqgCkeyIWGkDF0Wpv+Zrvub2WQEuG+AJoTyEcMMNN2x++Id/eNU17uHq
+q68eaMMxE2qFP8OCCTwWX2awohdEIjieh3948YtfvHnLtxyx11CMu971rps3
+f/M3H9TylEZsdGwE9biqDyaGeiMpfb9vN/9Zn/VZw2d7kES/rrnmms33fd/3
+jc8wBCAZxqMf/ejBPAogwEs8RrfEH4QLlEugC/XnB0aRjVCtMHlQzDToA6wT
+Ylx00UWj6Tvf+c5DhX/3d393xI4LibcNHaOneeCxdyN/smDpP/7jPz7ICvfp
+kZF7cIX+AqHv/d7vHVZMJ3CFu4KP6MR9f9Mm32JYsPi6664b4EeivOsv//Iv
+j/5Lz3dA4B6Dkoc97GGDae/3fu83QgC/YyQtp4Go+MM//MOhee/7vu874JZ8
+GScj97eHPOQh4zsoYUHeBbu0T4wQAQk3UPWSl7xk/E4/WKZ+WCKLolva9eC4
+NotDe6cGzSfXIDEPXSIhcesyrtvH97TF8umUWBTH/+qv/mpYSAXf47vl8wbn
+AU9HbgOAuAPjNEaWyZPq1/sf/uEfviIGl3G3u91tBKAeVgdYeW7fpcOkyZ4+
+5mM+Znht46m4pgPahVb0PfjBDx647e8+gzq8Ihl5KDXezrRSbvRHHjzpL/3S
+L21+8id/coA7e6SBQTdaFO0kC+jGMIA0OUE4WsgrkxM+lObv7UDHlavCap7S
+HRwcDFDiH5KkCHrYH1b5jKvDWp/n7/yH7yCl2lzs8GBQlDA8EiktW/58YvyZ
+IIMCJYSO7vbX0Hj5bTNiBco1N+e7zIH5RpCUA+R+/ud/PhjoOPnUYBqIFQ35
+z7+ZoMfoahR7IVsfc9an7UF2DbHIhm/zAzWCPJqCOGEOhtGZaYgjMuIF6Eqw
+uv7WenRwB1JZ/RqunxjOYzaZUq+9/K0pHbLwn3Bh+dvpwXzAmAc53o2J+nuF
++WECSvlXqA8t7nKXu4hIOve8c3eIhYDcG/LO0ue9m8ffLt38wA/8wOBFHijH
+5thY+APt2AiPnxyDzouBiLV81SOaIGzkI77ne75nJPtcWkn/fKsISroWsJev
+wNl73OMeg+NaZOFlxfmKIXINZH/1Mq6Hjx8XxiZqtQ0/Lxu9wSs+L+oCjyS9
+onZ+1gPZjcX3pWse6i1C4B22qrc/5C4O9NsbTwO/6aabVuFxnk984hMvGn8+
+HHJDArZy2ZGn18tiHtqtaJUXTiKIwkKZtEJzOHBpCBfZJYtBaAlxqUh0seKq
+kV9hbh7M54+5gYhWCCzHR25ESwggWKDH4XqoCCsGhWXRzYqzI6gCaxEFUxKA
+gXM6gNXGK3kuTHpoSy4JA6/lER4IbVnpuR4sCKNxHt0iy8NHl/alKcYMHQO0
+Qsd73/veWLl3Ub8DZzw/9mM/NoScUVZTXcbZe3DrC2PjI30l4Er3BeuS0ugL
+vZJbG6SYzQNz5By+CyaDN34XcBMAcvl6NiYelNqIB4wUSRQDluizmN+6fjBG
+LQrxvliREyhAPzP+fHrwWddcplc1CZakJ2RJ92o4b9KtSQ/EXXoV1klHiqdp
+zZ+F1Vp6+ctfPrTDIIEHh6enArsd1l00IIE+0S8w4vGTkLm46BLhCzt0XAIP
+l0QK4n3WhUMQFxHQBzYYguGQkAcCczYqYku98cR4F6ehnbEV0XvLoE5tPu3T
+Pm3Yl7bom+jBZ96nFCT28G5HroLLaCK9cplrO5hByQyJQom8VVAkqNiu7HXF
+wpkHtv6pYsTiWRkSqHQ5/1aSi8dnwt8Z6YGPQE2VjWSVtwQolE9XIaFIf48W
+HXdLbDhYWchwtXDPVxkpYyxgeLt+XdjjdbpSYdLAAipK0jG80oarlvHcdfzY
+HzjUFt/03zICGRKO0UAeGoHuSF7kAdJe9KIXjTKbUF0gFB8PHWUJ+IUK36Nr
+WA73jFmAxWlBMN5THwJAGsVhS8+ITaHsPVtkRmOUEMx3jErxSyAGN8q4996+
+OQL1uFR9Uie8JxsBLjH7vcbfHDn/ejlylzEKVpMoiRiU5nCE0nhgNG4Ymd7I
+Q/hulBSe2CgqtCdO76Lc77QDBLE5I5JScHW4AT6Wsp96/NnBRX3jME6AEe3j
+ampP7YtI8ETbgVIUVKK07OS5z31uM/Vw2CIt43U14yEYTC7hv0O/FgyJfD2c
+r9S95H7NwscF9K8b2g9qeThv64SxMkKdwBbjB8UM3PiNi1aBVN/DWzBN9aUk
+kjLOxIM3ErqS4o47V0spwFmLiQycQSeVIkOOGVCePXt2aAfMFddd1KDqHTLg
+jfwnFSrm3K+7kaV1WLh3awMDluOXYfA6uiMWWHS3/h6LzpRHvqcd4qessA5b
+YGX1sXftzNGTAy6JJTG53yUmpWErB0CphEjp+thE7gd/8Acjaf0MmkPt0tZ1
+EoIsSYkGi/jYL653ySVfZTZcRylefbXMpT4jJKOvJvcuaSYyVeQRCtM8d+4c
+P3dlN8M+ugi6d2UrKQaxeqmaFFB4e0uPHoqwQ/LHBfIht2Joc2iZ1GFX5j2u
+bDJEVhRee/6jc0X0zd2sryRj4F51TxZK39fN/L/7mvPk4dxTeE/URFOpgM+S
+OUBjboilRnbcFO2GBAlmUS6z4xdoJQvw2TOe8YyhscFWf4cKSiZUzHvUBgIV
+yoT/PlZHyCOzqNeual7BB98uitvJHQxEfdrTnjZAgmeiSeUzFj08v8MAAxHb
+ItjDzETczFevMi1NYVA1UW5x6ZYIuSYTJumWw5FBU2hMEU++5CUvWbo9vtNt
+ocox75Qr8LH4HixRW1UhbggcgX09LOloq+StwygVeuhdh/1D2HBJbBMOkxiw
+RHwK8iyCtOB5PCNpM3as9sA21qKsc8kll4xsx4NMEjXRwMt78BdWldeLxLiH
+22+/fdVHFZCCwqubdSAGVJS+NOtOjK/wlYoY0LB0pVHsypVBfvLhGQmLgOP0
+FOzzzXSTweIC8Yjy6ShximXoIO9SQcf+cET7Q8X7Wec2gX5TXw54+YzhYgxE
+C9lUlZGr2QDXct8r2dpI3sY0QJoH04WzjN/39cMhINtP8btZIyaDdNxDOoGX
+ThxrsoXbPb+5Vj+CLQsBk8qcGyYBvbjpuH8plNZFYDH8CKc0bwVZACDQoP8L
+hxaQRTkAlmWKjVX1pNc1kswkkauvsmtds/lqeqFqAUNhlyibyG655ZZRb6vP
+96IuU6Des+PLLD6+Eyf48u987+x45+YRjpknuf7660fNmSowBAEJD8WpG4Xk
+UN2MIyYzn1FoKBo1E76ZuEiudMUVVwzHi17GhhOG2KHYkK06KoetMFZtR43Y
+IxT1WybsqQ8/wMUgWfGhuspI9IBDsAiuYyStFY4Io5g5jWK+RsIkyQymmbjK
+XDOOyC+MBu4J0yokGyPxnr8zMJoHA2ktSPG3VBPr904lLu0B6Tm2Eo2BgFm9
+kGAEysqoA06d6RxvU4LVIud4EdHApf1VgxFb4Q0xwq/6bHa3eJAqUUloR1NI
+IVVU+oq9/OKZppbvRA3DWszr+FBc3xVvVjSwDOy60bOKBUo9hI7dREJ5sCvJ
+uX97KBSxkS72UkDG7CdlMiIeLKkgBycaONnDY5LMS2WDspqRi+ZoNwXerFFZ
+k/Bbh0SR28tgNhdffPE6n6iGJN1IIMrXMFV+yMMpgFckgVyc43hwhhPxCFw4
+A7LVl9jJcAGT73JK3DuZ0yo2UcPsNP22lhHxmpejc2lVwLatkB4MK+d6yBFS
+Avqi+F7dBKAFbzrlOFkYVZBHXdZN+By/8vBwpbyLYV49+ICVeoAZ+GUmRdPG
+zs0QK2fIeiRClDXWRUFpEjQlyvBJMlDOMjPXtEU3Si1Mhx9lxBEDFwOuTKcw
+eKB70KPUne/SMOIzSt2LiDNKIJApN4+2SgwZJV77Cl6ayzLK2267bVir+IUW
+QD6j9VBOkk3di4zESBSS1CEz50qh628ZJcdGp40MgBMf/ickoCBgRbhklOX0
+Uve6vQeiJ2Uz+qfmLcmpnqMQlABrPQgGxQVoi0Icrl6UR0WMJ0t3yoMHWdiM
+SReTM17f39+nxOEW+cXUeVD20bO7o3TAHqBokjLCk1PQAQ/h4hxT1zv9kDSy
+idKRxUueHRGJqR3uicsnZ2hCvhwqtUOKtSkl34Meo2FjKhCibR6YRUUKBDJG
++ME5crS0Q+RQX8sYMTHzcf4NyvjHzEnQCByc9TxK7PFvPDFXRe9pC+GAq4K3
+jBGnTVNhoSa9qguaocCuXoDV5FhfbWVY5g2WMtoTn/jEobb0qlpboYGBBkMx
+F9dKvxLL0cyuh64ZLG0nG9W4vOdrrVDteE6MfNAEF9bRQ7H4Yf+NteC6wBmf
+iuNFkhmZ00PrSEK/N99884BliBZT4G0qJsgI2PM85SEYKzYuNY8zo+ckXFRF
+YQnYWSIX2BCzVQjRULHEbNSmJLeOEDX85DxCvhOUiDBhqgL0MsJLRijJaWmb
+BognsvSDhEna7+ICayqhu9gCLlinUdxZIwKoqa3NFCVMk3JN45kRtCdq9pNm
+EboYM0U74PHoRz86gPGG48fxoU0ePrWw/1h/DK3oJo5Ny9d03sxrtTg+TJwW
+YXCBxPXNB+ZI6zl/Hg1gSMUpG5Nlg7yehxZZ1sJj+LdkhsM+32Yg/DNGlXlK
+KxYnfp45/s/vEuXi7+mmLDm2ILSCq1BmALQD3kBsRR7lWdLxGZyJr9aTBY6Q
+G2f57eLsShnNAoE0AmV+0lWTZ0F/WkCXK4y5bGb+MoNJ9t4W5SnWeOgbRORV
+k6rKhEgEKqqVpzQC8lANaRR1RAzEwYlf12Kjc1BWuh/zoR/ep3MATiJZDMvs
+JkOHf3JLalrGtw6akQK/LFtLFY9LMww8V2c9c2ZU4A6bUgYKqGkAnEMxyivu
+XynFEdpRGrNSinKTU8pY3kdWSTt/htT8vnSGP6A81dX5tg0RmVU79IsOsUvE
+e43EtXrs2LGxZLXFc/sEBz2b1nHl5QNxEgL4L4sKxFAJhFKzoDTQGbB1hjlM
+X8Bn8NX+jaPZw6H5ghv6GL3JGo3q8tqmiLq1wjd7LlqXm2ARW6QwJIIKggcw
+Bg1IJDr8Sf1tqcmcHoTQmXkGFa7hD8RlKasQDwc/xNOZT/JkPrMUP4QiqrOH
+lVBhPG7L7Vi+8ZFAsmhhj+pPr3se62oKvUKoejvxB/OZI8uWmKAI24qNLcPb
+Wo+JWkVGKiaOVT5a4P7UcGi4Q45UgCGLLskHKGxn+08NX6otuh2COT6BP+df
+1KwQ7b0GkFbs42Owqa3W9/NqYoXNWnw4GBadOXk+lISKxVmZAViTDiqLcEDk
+jCqm0c5qrTFZBnRxS49+sFJPon0oSdDVRYCTkooFRWjVRYgFbkzIb1c1f/GL
+RsIBhmq+JpSyn6w58bCPuEK6Q2M9jF5cW45+pRRjEhAqMmibkXAbxcsrZikf
+DAmQPwdBpSw2q7cWQi4egmaozIKQYR48kGwSLLMyXi5MZ5ohLCt5ypyiA9hh
+vAAqIUQCV4BWNr7qQNaIzzpAcrS4SwnLGM6PPJHH5iV9BVygELWZRtSdOMg7
+BMs/l32tGGl9oWKIhyKYFS5hL9xcoJes6QoOCsNoriYuburokrCcUygGXNFi
+Tp4vcxML0UqBP61MTQyVFBt1GETocCPBBWu/9dZb12qeDNquiAgbgIjHIYbI
+UD8cEIWpNlrYt7fKwQlAJprgOSF3SmeUm/kxEIrd0xzZv+AjgkW812iV8pNB
+IoISCAVMFEfq/s5uIFxWagiq4oy3KLGEyImPUuBmZ0IDZIN4zrb4fHlLv6dm
+VyMRAxg3JeO7PAxMpY+e+jpsXiLnpQuVI5/JQEA9QFsnA7bstZqDcmUejz4W
+xee6FSpLSViIqhC1ftnLXhZC8UGJLg+1JeTMZnvwFOEIRbA5hLKQlVB6aIk2
+dKWLFjo95jGPubTV1Ne5ceLJqlrsVPTeKX8cjB6Et+yJCVOE4nL0wHCzLoiV
+iwAKuk/1n40DXsANzFawqsA7YsQgH20nzU4Nc6EGrDLwCyfgCDVQfLq8GY6x
+AEEkSJ+zrYJs6rNLuhv4yFEWJV2NPj1Ezph15aGx/BEOE4hMsEK77DUCk+q5
+8i3CqHCjs5TDQWU283gIUFNi+ur2TL/G7rlb8QEATCJBCMWIEMvG2XXp30qs
+LBEWRE9hpx6YGBjG4sKLpFJYgNuF+8XWaj+UYkTA3qM97XDrhXY7Lv2ONVHY
++YQnPCGiVy1R85T58jDsrxo/3TTDpOAWPEIjo8AdTomRVMsJWsAQ0jjpxHWg
+jsn6WvwbLpJNg/YSfR4fI2P8rLZkFQVDIztZ+ljohh1U1qtEBIeql8P+M5pT
+COLuiafGEvTmEPDWEIplJ5qzRqtBmkjAwpdUO8qEzvS3NZjEodg7wxkyrZrL
+IixC5AO0Cj7lsQxwmQteeHx0shRzBI7xB75bTArt4QZELQVO4Y7KC2YMDS7R
+wJ7+3NtRiSUJAoDM3qMYKuGci6HwCFp4RONi5pLW+aaZIcrUwFoCDuPiEumI
+RKikGTgAT+IBKDbP/4Iwhrid8FqmPbnQ+vq6LA5LyEramtW+rI/+1KBPNWtw
+jL63tM/3WHysQC/LIkplkgKoE80OukJpyUaDXBfCyCj2TLbMvqLylShshGXc
+YAbFG9Dg8lMhilITCrasYjwxjM2MC1BVQK1e90IRFDcGFOEs0yEQ4eJO1nUw
+DFEJk5JIt5UwV9M5GBrB5QBIMC7wrJaXRs6s65WIjji9QkZCCpkRIlR6t6t1
+j4/ASohCB0tjUhTWlJHDF6iAoHISZ5uBQvTWp7UlNkTSJFvMzmSE0RuKUqQU
+la8435whfFEfRWBXjKDnlZp7yyS40AGUlTJlylhOQdf0piYMMksHQyCb300W
+jw/WQGbIWhIOgSwQV9RNZfUKchd3L4hLlE/XeiNeamagqqsjWS+X+iPstFg5
+KjTXH2kwnlM1Jib4KH26usVI59l6AjVNgGDo46siTYSqEl3W2ktj6Z74GJDx
++zwvjr7yla+M9oocaIdNUKVXmQY2xJ7lWSeRGHQSff9ZkRy2QFPhCxix+E1R
+oJoLWyh4+/C9TNwajJyRSWo6RqFUE+pAD77JEUrZQp2aaVfkV+p0Ecouu+yy
+sSMy1DFPMxScoIRfKaZ4EOoyxbJZ49S9BzQB4hZqYG6p1OK67hLTyYoRsBOa
+IJkvZq/Rb3YubFavtgCY8dLNsrO8CmXbC3Q6fmbIlqlygtn4Ruuphif1owpK
+ml0nRuSbeWUhIC082X2IzrC3WNp9HAxzgUEe8YO1uNXmQVPLSakpYPfqXA/H
+gJk1DYwPy8xdGWEGgEChj/GaZpC8g6eUOX0V5xW8MgA9WRyViXHZegYAorVV
+hrwOQHka0R44zBpL6TMAkMBWgFP9eafYu0SLaqbRmooG1k0biE9tGWd4XBrG
+7BEhBj9swqSPHUM1Ri1773uRyVo79/2O0tblFt4jFYM61srFXSf/lv/4Dtgv
+X7QyCoCzZN+lFfZ+h1FyqEsvvXTYZxiFA7Y0p+AgQq6sOl8R+sF968szLNLP
+EGIp096UVc+xo5cv72W6gdznNA7QcrtiQsZIluRbidU6pGxwMiTstuUl9MHE
+EydG/WodElBUi03Myf9W0j+rC/uwHLkFn6kb0QWzEjqldwKUlFMEGmjiIU3h
+BFOsUa5LSqRSshE7fQJBBCUOAYAKyLY9pX0CYG4WYDN1OXWUgDB3N/0vRyvg
+GCEbIcHR7nJ6e3MJGbSnUA6wQb4lLJEYKYgFt9Byct1izzRYjVKJGpGAKDGV
+d0yZKvr4m3y9+svMFa9CUF7RDLKOT+yi6/NwkC/aptOUhfGrWsgpk4ZiMcD3
+iDbgSX0vI8FtKixWOZg4oJapsGEkqjnwgMe+flfocJNfKPRahcIlUTWUcTEz
+XooLvE8Nb2oKs49IUsj/YGIFPctXzg3XTAsFAJgDGAAl34I6aCfMU/CRpqqV
+JE8j76RwHuWc4nmMkQH0qorV8BhZLxBZcQffGIXC7slu2iiFM6gVS1HN6i6S
+FgdK79ml/4ilIrcMKgusuWjKxUwNTrCX/YwgAArJ/kFIBkXKmbHxiA6e97zn
+ZVBEsqso+6Pkn2pxBgWI5S8FjOugUKpuYlD+M6hSvCNCZzm9nmW1GpKgWim/
+metjmbQ/ugYLVY/p0V0nlbewUsGeRRXPmpqL1hXsguOsLczcBsakCCesFVJg
+aNGW7nzNpM1mglr4JTfgAuNBNO0zM16zp8kC4VgnhgnstNH7c/aSl7AwBs1s
+el/rOgyZBIUVDye7FsJQavbh7z4nOJUc4FOsDckMuMOJdRiSqF6ZtLM0Eme2
+lry/bkjfTCEdSRkGpTavBcNawLf11yhrp7mr5c4qFLVidorTs1rx/1KrgvIW
+8sHgioITsJGjULvqNlSSKRCgF1FyyJhTDzwsuRh2jESSshiJVIdnKWGnOcld
+HzqzoqemMsN+vP+vsmQ9rwi7wuE7dc/qOsJCxCrpqQBOgMn6pCvyq6y5xOK5
+CuYd+G0io6w79ArneIXTp0+LANMiW9+lbcmr6MVML+BTcxc5V25y+67MzCBD
+illNaCnaFAWiJgy0fcAqsxzTAgoiM5lPl4+GCzQFVnnh6RY270ozhfBe25aK
+tyu/JQshBVyabFNIT7cAn83CiHyWkLcMYh04OTNQhlVaG0EBc47cQ5ktGysb
+CoViCf5fmUARwoKLUAg+ZRfbmbrFE0pn7PeYgT/MynuKHr1nrZm6SFYQe+ON
+N6K8RZPVC8QA46zYLgeYhmbridxnK8vwhfnyDqHdq171qrhNCgai8ohjSs0z
+iQqlJO1K4WZ6rHYBml3czRJLTifzz1GRzLVKamL+4sJ4lRALtLo2tRehUFqe
+I+U5FNZAQ1XW8knZzSRgmKiZClXKEqo44SwNSm9k2YupVlnQIDCKgrwH08gI
+nB8RBD1nbThZmhIpA+/4qnxG5/rwi1UQqWKbQC4HEkEQLyWTquK4kLoisoVz
+yz5tLh60G6YqhYhcZU/gphhWXiv7FxiKyGnh19IxdnB2kvYi8i7dMYfEM6jL
+oBWuVC6YjiklkZkRYCeYgu9aSmW1zDb70rKzpCTYodz+CPWTwy/H6ax4g0GU
+xHrdME2rfVbGKqI7Itn+mNoyJgxPIMAksQiGsYwiZS8jUZNCmj4hO7FTSE6C
++JFYCXBGIp/CYdsr47x9VUBw6tSpMWOk9HVT/y0HOhAgsoTP6Zpu5CQr2YYw
+G/xz6MpSlk+V4l7UTVF7QZPV29b3lojW1E8y1GdOhJk5O00QitcysfCeuDK7
+e/9unkjlHt4XMpuKyTptlEpwiZVemSnOviU4xlPavXFqakv1IMuPVZPv2WIy
+Kn0wzXJi6YJv56kYS59A110spyhwlZqjkMwvQ0m90ciXIe/dq78GpoAAH85K
+yCUMI2YM09SyNe7kGAmxK85x4AyOTeLcnBaxNGrk+wIC9vHSl750L7MROMto
+kVt/z6oEYmYvx48f9/pSZbx4wBa8VS7UK0XHGzKbizWKN3oFuDSJgZR2nO3W
+2YKWKee0hky6gQ4IXuZ/r10O+RJ1snqEXIWdYSxGC6iEsznuCj1QeVs1Ozfi
+PbQD/xwKJtWS2cGhOHoIZ5w8d/REKOzoFBSiQ1Ek5V/Yhft+W7D2khH05Mw/
+Dz+MD1kK5xEhYLMaqf48TIdimcuNH2BhObztTNOTcyPQY8KEb77nzLL9MVSG
+Xs5tFbj4zFfM/RZJeZXUUGMiIeEcDpIkKErqTAOMrEKkuEkolig5pVXMtTtN
+Lb+YGfsTQ/Rxjb0xc0kxZFLFl7bhw8EPWXeOG6PJDE7uO3ambVbHS722PS/1
+Aazc7rQ5ProQylqUVCLZUaz9Edz2Qp2VS1TRUmucqmjhHuPj5eBKHKEnatry
+irKg4HlWkCwCWloSZyKbly9ADg4jSRFAdaVXRKwoBVtTabm5e4bbWf/EPQhL
+X/3qV6fn6fCUtees3GQshUphEJtIeftcv0rfIYqQpJpqNbpnf0Nw1ourV5Zy
+9tIZbC0FuHsLDowxpq6JDujKQowi93SPJsu42QwQEAsUhs8FuazUSjwg7Ek9
+4qbuDb81QTUoppBHdomx5cbTm2iJ5rFSWsUC18LKsv46IV16m+PPRfj9Yzci
+SuXdZ1lFVZK8vekDKTnJyRPTxsxyT6f6NZznJHkbzDKUnPhQOJioYs7ZM7M4
+5+w39WeYuzMXNeb/6w9ebJRuv344YieqCV25p1T7INXLX/7y9J1E20Em8yqF
+JNpHeDSzLyzlD/SyWW3/+KiOEDah1VCCKBhA/iB2nghldjSpcCsQwNwzux9j
+mBPfbAIjht4E0Yf8HB92JqRiTxUlpPdMv1Rys/ZurDCOgVRAnt5FWL2s8oIp
+dnqfg78+aeju/ac5N73kyGcgPfunKQlc65hwZH0UWlXx8v4eF0PIc56b5BKY
+zGf3JrnMgavQIscHZDKRQjhRJe2zL8GjsnTaR1ef/LK2T887PcxwE5Pm1C2/
+pdqd8zlmjs0aFMUmBF0pB2eSVYqgntbTQ5muRRUKhEgm7kXH9bXIrbO68VsG
+N2d2R5dIbxcnHR9aJN4R21Swnh7xj2/VI2BkLWVA6XHO2tJjsjbY3xnaAsin
+hl3n4AaIYWo9AZa/WUkQbksQk7bls9k2wz6zqEHVDIb5eK+Pp8n6X1ISUUJ+
+SuerkEIcghQjKX2+ahIC8GLO9dVrukOePilcOqRCjAj31un1U+vMNgEAhKxS
+ygmGNb69bKhnm9RDcHbbzLaTI/jm2/gzPdEgcZOv748ZkxPrJg3EGhcWxfOS
+RhK3SGm23bv0Z6A4B0zMBaXsbQ4fGZoh0dqs5/M9641kqYrpZYQJIwVg7S/W
+hI2SKMeYeRXmQfoYDpzMLtaQAZJCRrjL1bJlnGObQF4hRmxoUbbFAgkPeG6s
+8VtCTRqmOmhNhfoauFsgfIWsVNG351wsO6py8iobZzngm72KeaiMJFxhp36f
+K6fkqwAVDRO0CN779JSHNGEGM52o10eDL/vPqY9S8jLT5/8HY7EhZghNlQ8V
+gyqoWP68TBmwuO0+2/31aAEd3q+pmQ/rqwHnVeyE/Gbf0iPtMa9EfDJPGlbw
+eth/1iP3O+9/LRQ/wlxJHqbNe97JXjDjjOpF9heNxnOaJdNFDExniIYOhDhH
+EzJkKeEs2SbPBBoYTx3ONodF5upY6HdOCZeRI7GE345RQLgNqVxTdXmy92jp
+XWAnVJ33q7LponAc0LV3al1kZLOYV5R25fZm8kEdWHvD7lFRyLSZ95Q5wdna
+1BJv0XHb9bJKwYoMPKi/newe6RwMyvS8WUgsovpc77Ycs0qA/iHqRS960bpK
+lZfk7HnMRP4p26oKbM+dX5bQKpfhPh1WfTt58mQ0BxrSFDnfwfj/MlGP6waB
+hfQZhSbzD/tNGQGti/rgY1H/JpMl+YgfTuAOIn0N4pZHOdVIpZLrVTER5MRK
+TiWzhgC5zD4n8wBO4lZcycEBxi3uFCOe7WZZT3ZW0VgYL2DKHm/8Kt7duMtt
+3FFW2C5iOjXkSlXoeDyhUnU+V6TNkZCyOYWp7KtFvGpULIxWlqIfjGrJ4UBm
+OW32GlEfeQ13Xh5krJUuF+E18lPq9xoL8pnXZKHZ1WNMQEkJ591b/qFYrqF3
+EigUeacjf+4VykOvi/PLcaZ7WbKdt/IIcqQ/yw0AC5soGtHS78xBchEUWKxb
+SrtCCNtGeAlpDXSzBbkPQVvkuOy0JMfeITm65khzWCJDFVQhPoiZ/aVgwuTa
+OF2/2E29tJPlHuxhMvacgoWF7D0ayGnRfwpcr/UpWInUeFowSdWPTWOhlMZT
+xGYBq4/jNNAI8sjEUqGwRoAjDrG+43H9PexMkShnpbZZ7L1jv6NdOq696DjS
+jL8PPEkMQV36HLF2LKcGu6ATknLepMiYdvZRh3tHdUYbUanq/uifhTOkIpos
+VvZilfdoFpGFwLdd8OOaNh/jvTUE+WySR5a8fEH/iYI1Aq6v40zu/VgO9dv7
+/P5TjiyFxo+bmjBH8tSnPnXvQcvrVzaNUjkAyaJLvNn2pvHEYI/vz/CAt1WM
+zwbio1YjEXrYNE5HZ9ndP8Dn2Lr7a/yrDTDbSwQ0FoAwMIrFMZYHTzhGkbVW
+wfS6Hnlepzev3etnpUTTeMK/BgYpnCno7Qn3y343Lg24BOZzqPlms822cwKy
+VUj5Lk2yVINUr98dGWmxZ75ZlCC7rCghI6NjqDN3mJGBQn5pPuZVcNiniq4j
+o/6CTcgz78Yw0WqOJd8F1mIyE+YZmejR4VbzyHBTxbr62TnOxdHtkPD6WXuW
+YxjMc4mVqIawobq/aqKEzJxklpExBiX8eY8ZSsQJ25EdH6BoFMLy1772tVl6
+mrsP8jBkXfAiD+2v+sxSDYvCXvrSl4YvImU8nbVFVJ0s6k67YzOJ3mXnIVzj
+LEIiNULsQxDWbIadCeW3B/4uM16WKkjrMzZph9VmorLyGyFQ+K6XZz7zmfV1
+p9DtjzPDe3tqn+17fJ35P3/+PNaFNRy12W/hEYFY9oHTT3/604/KTUaqvJoH
+8wt9kxBwHrIoQdV65M/J9UA7RUVTHhbEmVKhuA+fzMB6GLgdwvgsqyApsBIc
+rurx8Y9//KqMxkS23GW+Z/pEHNC77EbtU827yDo6IOYl34NRfJo49znPeU4G
+RDCmF8QnhdUZEOCzOANB6QDHKvhaB8QiINm85QB2UK55zTCvggKlmgxKtzli
+MRYmUGMqs0OE/CyMTbQWZluqJJsYbP1lmCbXooI5aNACnZgXT2QJw6zkdkGb
+offbO038BhyFtOt7vJmAuHzW6nMlc2Sdh282dEu9m9SrJ62h2cyvRp5Chcgj
+R5HGUMSWshb1r/TOzRolzXls926qIse8ePhB7lrt8h37e6Kb3mO3tjUd+Zvz
+D9+2/4Q6QSVfMK8lEdYq7S1VpL3R3V3+73//Y8vI6MQujK73pKXk9I+tn/AX
+MqhXQDuep7D4tt235O1YI/gXEDKSMv5+65+6O+sPISP7Jooyy72dVw6GZHuD
+83BqEskSz91235KpygQ8uSij4KjfSmXL6Had7MH82XhEoaUZ4ed8+uzx/gqF
+mw9I73eyuCV/YryVWXWUUF+63/qv/dfTuTC5PHxqNAnttvSeXOMljtvPfH27
+GGxLAeNet+kc3/lqMSkTplSmKznjEfhsiV7+mZMLdpaMh5XzOpjdk3ovvsNB
+8hkSOiBdJqTkHPCKiWQDQXmzIwK0KC6Fr4xKBpZjwisTPSZ0qVEJOzxGxv9Z
+WbAQf+mokeT6FQ9UN03XfByuVTIgAIVU/AsPka3GpoUr+kmSq1Lkoy1Vy5VZ
+8+FimrHgMeelsw8z0dsT368cn3FK4rR0SZnBDkeUZITzMRmpfemqdzkWMAGP
++Ttgh4aS4N1bc4zMKCGTLqyD5TaWoueikMKAvpRuhC1dSZzPmlHwdzDdwsxL
+hpVnm7tHCj8zS6xi3p2MjE6ZXcRA7eBH2X9xoIKFat9qVwVxLXdtKwFYskSZ
+VgpRmtpdj3xmdIEkTFOIomQyAx4fBzBJgW2rzJcOgMLQPJSQd/b4m+gERNGZ
+7IG2PgOme0RopQRZ70vlMnudyUNl1b4maSXVapKcmW8qgN/llCAi06UPhiBL
+WQR0+SADt3mnbKPwLv1iS5JR0TF94exSTaYnicQBO/bU9+/RRGa5j3yWL4al
+4pxS11U3hBZZfMB7Ibk4Fd2gnZis3L4w9oqRvvssD3C1HRHlLF6Zj9sXfOcY
+LpqMcuqJShFFOKJU1pAwHycs0ZGwMDCeq4wmy6nwIfN5Wd2BIrM6ZKSy6+8i
+Z0aRs9H1aL4PUyytOtaqIukhtzz4LX4mDzz2HcwzQrLEMOunMptAhcrgbmnq
+aSTjIGZpmEEf2ci3e2PcTQMDA27SBQkmhVVuwi+izElwtI7zDOqaP9VNDlnD
+U0xjswrC5kCQgHp/M3EoZEM92xd+GW35+3v2CASUmmQPfqp41aCjNCw8V0Z5
+gEslPSlD5cYwi7NCbFyCmneJZHUllIeIEEv3NA0BEAsmc7gBlaefvk9UYLbE
+etuu3tByGs1YIV3fQbhw/sqhNzm1Bfc4c5wCHzhDYDQV0mWPEXjK1RuKPyJ3
+IR3i/F5he7aw+4ocQRN9ttLIBVGC2aACSvVJC0OlKnWP2mCRw84AnXoXH1i/
+L8Tfdof75YQVIqSojZaBiK/l8kFEIl6BQFDp3xxbqnRwz1lemTIja2YqhDOH
+gBGJJJDWh/Wsp8+SLtWpvrJKhsXjoxGoL1otVX503unOeWzj+nOjdxCWRVn0
+R2iZA/3lC32o6vDeW/05P/SHq8RbSxcVK/xOn1CeKxKIETRYRaIvp6J0DJxU
+RgzMxnRN5RzitmDe1UP1iM1Xlbmz0d7gL7/88oE8GE78BMIDdPQw5AmdDB00
+wEp/t7NDfDxpEBOWIuNzNjnmDGROQlMWyCkfshTvvvCFL7y1eQ+vGJ7/iLp3
+5s8RpEGwkGr12MgFbx7CNq+SYyKhHYyA5b1Ib4wXG43ZOH0HKEtalX5VEVgG
+0RlnjhUkBiyHP5J6SMnaFGL8BPBwjqhFN2XSiyJdO5rlAzzYLyVBmhHkmB1O
+McEXl0IvsZ0tJJYGgfiGbJGSJJqldsYaRUKpEaDaKAGNmMskTy6cw1fhARMT
+p1FOFwzuKNLBejcm3UQxZpTb2G9dosoEzPB4F7CXiyEQl9IxfcQ3VCTJlALj
+WS7PZaCQK6XsUpToEkugK9kUK6ZSqfG6uCiTHH1R2CCrBnVRGyps7GuV1kIh
+xYGXbBuMWMtfFC0Du33MiUHcXGkgIMSunM2RQWA1XGRMOdbNOwbq+75ngDCT
+5Oyt9m5u0iRZqp0DtgQkrAO/KaSR5YxLfsNOQj5FOSST/drIspM7tX0wYrPt
+pr6qz2My4orO2K6hUTqBYybS6bKuxM5ITG1BeE3pDINsc7cPbpbRRuHgtwCv
+l50McaMeJzQtgiAvTdrkClqog2JlRoEMUKLacc2uEsonUhhhvVShvhoXbvy8
+JW0g6j4bNbsf5/yVgnAOXrFeIvvk8GOef2ek1dNcqjWtKUdLWqcpRoOw+lv0
+yjAJKQ8ErnQutIoFdI5O9Pr3Gg2euEM2ulwlpeh0Yk62M5a1SIDA5DOe3pid
+IhoA6Em0nb1eoM8i6qydgsPCNAx3WDBG97bavSxu1g2qd7j8eimYyxT9dHZ0
+el0eODOdQ6KYYcSoDhQ87u2vurfZrGfuR0EEQgq/EaEcq4w6q/GhUPZehyAG
+TNvLmHdECkZ65dt8GBdbynGMNPdZz3pWWoewKYClJb+rDXN2xaR06lcY5gi1
+G/pVWMY1qR2Vu83lfCAv074eiJrTw3LRHFChgtxLAAn65ki1CjCu3mVUdqzB
+W9k31KsQL3tAGJdYSQF2nnwUdnu9dCEf85KQRLw8rWTmIAXh2/PV9kdtuecZ
+17MmWI0amJbVQfui8GSo6ETI9srzpTqkbM/xlUTzcU6Hhj0Vz811Xs5re8/6
+QkgO0H/jSTH7SL/14sCcHc9HxIP5LngypR9e8x30RfqeK+ooLgeRjdLzEu/k
+3H14zSKbE+vJTCJirthlRLluixqEd2lKDsJCbRYJF5geNaBNxZG8SlOEk46f
+zWp4nwkrsxRJOMnsxDRlQFkHyBiEdXSTffE+NbhUuuher7FdCeNN2FS1thKW
+Azr6gO98nMsCsbhEcKxp8zH9hKIA18IPHXMiBTjLtpmrhp3PYIPWXLUSROHC
+dCy5S46gOcbBBlMbkb30OorhjzIYKJSKf2qbPhMNGAwF8x124ciDnkqOXtGh
+XcxZ9qgYsP8mVMhpflAhqmo0AiKbeHKwt1yD70c9VfITJOTcbYst6Aa8quYf
+0E2B2awRDSXAGxXMby2fHR8KjpJefjPP1ZLr9hDvs0NhfcadG6dwXy1BvYHN
+yBywq2f779+KD010LJbMnneSkmOKgZKNZUcE08wmk2y8w5uKk9alIqBIjCWT
+oAkG7D0VMu+++MUvrnedW3JivYWUnSCVR985zGapHItvZuzRrCCdsEvzZ+yh
+TwY61eR9W8HAbHwO3fOZgDA3a9qpemyUNheiqJRmaLvI5IFTW1kaOa/6FXRu
+59OXOVxTMeRSDM2reMKCC6ZW0RGPsIR105tc1Gh1hSiB+/M7VK1mc8ejpvRA
+oqnaZXkyVuacNIiaoyJWXp0f6/ZMveM+CNIzkM1WIl9hh0ndgAvK1FN7Xik7
+omhzloZmoIhmINuFbcdXYFXfXpcwL5Ak0gEq67G6ZwdwKEIoTjBuWk31/M7H
+03Cmim0llQgIN3Nrzux8EFP522rRNJx2U4pZrUAdj7ma4XJRlShcCA26UILr
+KMG2RfnL1Pf2467HNx/cKJoLirOYL2d+0bFqZ4Zr6SD0ipR81sfqjqaxlS0B
+YzYTSSU0MQJKwFh68VtOwtZrl0HWAdN0sK9qWcA7U0KFnBMZflEnuZ0Z0mgu
+ZwuTAzJ0CVMEItJJ+AW7+qCsWDQ+8HRHwxrugtebwhqYSgP1NM0rQDkutzz/
+SgyJCFs4EhIyVs6GhYMvg0IMHSoLXpT3jjcXQysc3B47eOfhpwg+99SrU+GH
+GEdJ1clccqoIWO1LrE45goDARErHB1LZF/bJ6aIJ0uTTBS7ZMMNc6eatu1Lk
+UFR03Y4yYw2A4HDKRMMkH9NkR5POWKMARWeYLUvxNUxCSa425S4KYOI9/Soc
+2u4CPb5eAYPwEvy8dQXtFiulV/gidVW2l3XnzlZE47Vx+zc4K4ru8npEkyqz
+2tLS3XWjKWqXE8XpEXzBYmrnO3TNoFCrGzF5LigRwYI5o8B24oGm3uWN6SP1
+LoDqpdvnhrihj759P5NggcyUTTEUk0FmrvHko+WjjFcpqSyvrwFY92iADyRm
+wV5CXtrFR1tOk/0YhgPJHbs9oxjNUlWtdyMELp7mRJGNCuTyaGwFllJSLr6a
+uLnBSzSACgzKtCnBGNx6G8Kil74pfwtk4AO/aLltqOBimArozcG+KEMV9yLo
+MCjU1YCzS0nPPiaWXnk84PP5z39+jRtOXbluA8hJmcQB2IiRuOk6/BTHWfxF
+ZVhyDuXBr1iwwFcMUwzK7Js/AbvUXpFgPsoEhhUstAAgbFeKLlFnVsHkwCiM
+Q4a6JGcDQEqsN89KcNngjQHQbQEk0KeLfjIjA2W4BsV4AaTfGT0FQp3vClgH
+Ncd695Zh9K3pK5mYb2ahIHQVFBJFbOCUBjKiXN4rFvDTcBlLcfH2ptuI0S1s
+BWVeMUruNrN2BIjpVArdbLVzsaH4yLFa71jbjLgBF6UZnKBj7EI6++pzBVbS
+DU8FNIvicycnBUJ6FlcbQvma2/trubMeS+kFIxEicvvZmZFNNuV8lt7uNKaM
+hC8zSqlf86tZkaloo5gMcTSlZ2ULaicyzUn0OEatUZcTmfgyDgUX1/MMl1O9
+LODSFb9iMqTkt6NGJ+9QpGLsyqzbG2ruPDrjE0TP1AcYsBktM8fYFW+e0wng
+C2cLCp1ck+lKobFYNpcS5MrbnM0E6akEkTOUG1qMvIbB23920euhnRaaZi0f
+tdJOO32mBIB2fSp0o52a6Tv7vWCCfxuLGq+NUurJWWtOxcybgSMRI/nDVkkG
+9QT51EgeZLNEaCdk1iFuW2i/xx1OT87twkw469MFsZn6y7lVcI7agtPcrk4u
+EHi+uB0tMI2y4AEZoFOyrvKWKcbET6BB/3jv3/oGJVxpNMpYcyylx2RAKW1r
+1PLWuXUPJoBO1TxV+L6+Y3wGZ4QMVu2lLEqiaoG4wAwY7/nz5xe/empYUS6J
+Qrg/U8BcqgfAbmpMIHBzKionAmR5xkLi4kAxlo/J4hQuy2cGvd3nuT9y5A7d
+Vgcq6/AZZa5Ic7/Jo0+xDbrEM+IluCOD7V7p5egYI81BhCq79feFwltHuE6k
+RtVTBUPlMJRY+9ii8R7VpRI5QhW6oZq/zukJfmI2dOU5uDbRDGCAhFxbzJNL
+NMWdC1F9F6llFqk1AUzr5qKBPGplJjuacO26YV2HfVrC0F/ghshUdIjBv+lh
+CDZwvMvVy9pCRHZXIZK+F1znyHjQwXT5T8rHb67H61w7dEtrUCC37wgWDZO2
+Z00ghyDOFByGzTnSjySxBCJkN45VyX0GPgQKNdC5jzAdXULy8m8Lb64fboYa
+A/3YrM/UWeft8Km7eTfV8pwrRMAJgak0HubINsVsgoV1JnoLx/ZStNMOPWVl
+FIe1CvR6Q3nuE9EkLRcOCStBpsGyhLvOkr5qvOrb4vqooUEbHbeUiw4E3qlW
+ZIWgUUBShpgaIX3yuQJWpsj1Qf2FqNRVMSWn/+E/ZOKNzYPYcHt+oo0mQe4U
+fXGAiWRrW2Sc21dCbxCVbgSB6QBaFYuzvDezgFLO0uIApmYy02rWGXnrrUzL
+dhQwtk1zl6vcsxF4G5ad6QZN7eUOBSpOHOtticvSJR8nVmINU4VYMk+gMk+Y
+I06pURzZcUij+nqIdaWMdJpnT7iipV7pt3NhAoDu69fHZ6LxQrWrmwCwQUzw
+mrpwsuWQczmCIMfOUMCHB2D7iU98Ytil890K7cUjEmR4MYPsFad0KSxzhUqY
+1D0r3ChXDSKEoZejEKopA/TJ9jlLVG3H3ARkAe6i+nXJ8MHQLMGaB5H8Yml6
+itC+BQYxy3+AhTPkrS5rBfIOh+i/GkuLJOdyT8e7jCc3YEr04jqBp5aJBnj2
+ZvZch+srmJeb+SQqlXrNoZQV+gE8ab5FD4oc1yxquK4yPj0AOwDloR5MhVnx
+uxS7dDHzcdm/Bg1gmXisZB2x42yvZBxwZ3FEmUW4KyI1m9c778e6i/USw+WW
+l6z0Q5N1EvXnZb/LeooN1VI6MxcFJsFnaWEohH4WX6DOT3vTSwyhkHDlEB54
+DlDLqcWXUz54a5ac3xcDlhKmcSZuQb+wUZFDWFnglcZxhqs6Mheau82YHUPA
+FasBHJcdzZI15KBfQs2lxNtYZQmcYzUP3GVKrqLNZUnYWMYSusUAcZQkrhhc
+jjJ0w2/ghqVGfvLkSWoTpuSKSsxAn5bKKNI4CFDeiDobXsVPaTzznkasMGvB
+bKVZt7e5pAbnKSXPVTUUTb+CbcqWpCwFZEFWYVBYw1azke++M2tODAeVskpf
+T7su9KMsBpyHspTGn++viiUMXFzBjGQxCUpzaFpUXUSYZoV5TDBpHXUpf5Jm
+cQRVVJQblYov68XPD0oF9TSr112NJpIseD8TNYl9jcI+j52BL/vNczx60JGe
+oIymci22ZhXAPqi/kuNzt19Z8IS34xBZJX6hzBqI1AyJnYfcHvJ+/g7XHSTA
+ZPiBrsym+wyOMzl13ohVHMhJmiq6x65YKWOiLc0oFCS+gC9muGmiYK2Afi9D
+BG45ROUY/mR+Xmhrig+kKQeB1fWYiMXjUg9qDJjAXOnrUus7NZjJhTuSDlMh
+k89E+ExrO7257K+mPgSUhQ10nb3jzHZyeVl50SuFUh6OzWsenHFAbN7PYlg2
+g2UxZhvWg/pbgEb4x6iCFNVBwp8+jHl43Oozo6cU3CVyCZJXXe9pOz8YKnvT
+qACLZqOadqpnEIiU1FeBowANI7fp/amhP95VlklASX3BGkieJ4gBRi7/6F1K
+d+o/oZT9Wb5zoqnHBqCvmVwjV6r+mP6KMYs+FCRyAQ67M3mnVNY37+XYgN6E
+fmL4Si4GzMtPyyutC+LlthiW2QnYXiqTi+2IlbgZQQ7RJ42YO9nqelvrPTUi
+01RnE5kTsnwCqRbXz3jYbWX/2nVNNRcB/xX8GIlLZrN7iVb2YqvRnX+XSzx6
+dpNNfffr5oiMT7eyjnNzE+xo7tjYrbsce4UD4pE1ilkOqlYg9v4juntehIsA
+/mTFOa8LXE6OWAQUo06UhWlU2fam2OE8j0BujMKIMRpyOZY5SxsFprCTCSQu
+Y5vAkf1m6UKWOEjAynx2+LnwrI+sGD9hYw0ghXFG3ma47ldRCAeJTqe5XzeT
+U0A0I/ijWAVJaYYlBZnTDPfETzhYPSyEYKJjDzbCnuJ+WGgovLwaIBQjvWbp
+Xo7x4JHZee5yz6WB3mUGDHdd57KcNyAEQHzKXT6DB1R1rsD4XbbAWV412+2y
+3U9iBXrxhlrO95JkwUsGj08SEFo/nyaHUg41XSIlZ+te031RHN+lb8DaRtj0
+Bb56gmntCydkWttdu8viJb5k7iuVNhtcs5gax3A7KYw1LMWaCARy5opCPoDs
+pMR0+qIWCHLkCH5CRmaT29SFJVhWn89AijKal6tHOLfcl00gV+3qsMCcsYEV
+ZRsFoWJSwExn8m64ypi46iI2m3E5g96rtF4RSllYBttiqxSPLfqs6E88Asil
+YAJrNOLU0572tP2JLtwxJIJhBRX1pWN5nsR42/GpYVsdta9XI+b0M7LB2GyV
+gJ4m6DBQeMOY1lmgk6OwqhmqhyviTqmyJpaTIc4Mje+Tngdm8PcYbTByeCgq
+ktiqyfHBRu8qTRXQH5EFCTOEHAWD+Mc+9rHztlAxDbzVELkUDy7vtv3ZhBcj
+L+Ndzl45O2waZ7Lux7eoD6aCQZaDO+SxXuu1HHPCV6TQC1GVObcbSk+MCioo
+yQZlN4+HGkaCsWZCi9kLNedGLxQ6eRIlTkk0VUNMZBSGbz/erd0dO8pEkyRp
+Ozm+lLnoKrBXE2IFOdnyqhaYCDiel4XAAjMU8bxiSswz/X31LJmT66kRvQtx
+wLQ9lctK4UU8YgLD4DvADlWsv4chVAkC9BHNZ5ohOqfMEi/RP6THENaTLSse
+GsMexE3zztp+9nIVnv0k2fJsmqS3DoRIZqVZ5o4HCK1wKkRSFjGNaaZiYypW
+zJh9ItKfSW8sBjUle2It+EECMLNdgbV7WklumzNG3DOtpNm1PnHEi/PGlAEn
+CU0Nc3YO8/gXq1wP0Jcoycexgs04nKnYEbjGgriVHDag1tKut4+uu2SoqhOj
+k81QP0ZjQomERKlwQMRrv0yHnwN8WYzaTpJl6s2VKH3mBL/qMyRxmjk5bz4S
+Ri3NtRAhSVfzTXdCI0PJ/IOIAwksBAdYhd9ZHiM1TX/PFsScqFmUrFKbW8YA
+AEFRCWh5NBaYVl9e381xuCJfECPY3u5ivlBKur+eSsyKEoLIOSEpI5bEvcEb
+vMGouwg+tSGeLAQ9RjHKMBkcLqEsk+bgSLB+ZZNFYDDDaDVtm/K83jSL2kIW
+lRWuOKooZFE17Yq4uUhKQVkkBjgjXB4LbReygCsUBy8hS/4OPXOCE0G1k16P
+a6QjDkTRPE9g4i57hZFAINLd5GyJD/rozJZH0kT2CPqJjzdi/NXKjd1lbpGm
+UUQBdji5XtGZ4+qPTnIaw43dA3aCcF/XOjbUv9OD4XD9dJs+eUW+Ijydeji6
+Amh7s9ESgEkuZFg5Sz37nHhfzLcyL1wyCKcEOLN4pyqy5PFyQRQI1wml9CZb
+AoRwcAEklkHNaXh2k9+9W8rkv3VXCU4KCtOS4QmUdFBmMseIOSn8XtPwQKBs
+L0tHQH32XOXqlGLqfBWEiM3SjiMjlDuqOOlYtIb3FWZmexJTNhQNlvBzaAM3
+kSAuI4T4dJ1+ZEVO5SnX9p+74DaCB+kLay1NS4ssri8aXy9nkHT2PvFVWBJ5
+Udx2U82FL9kiOXs47W84UuPTTWoG+O50quS7ublUIIDKbbZ4oUGfGIbQZ0wP
+65Q4ZMRIlTQIJrNgdi0CXXjEeGfSYR5xX/IzfsuIcxkXvImQld3w3W99y0Us
+gj1CQjhwbTfO/gR4YhCQJOrqrGzt+o4j3l/XyvgtXDNyswacghzS2qK0MQ/z
+Xq1VrFdJDEoX3mUEwqCcrh+9UAjIqHIdDNmKi3RZ8r3Prni9nfJhH1Cy1voE
+0rbOKrwdHByM801zDu2FBstXdPWkeD/NaFF2stWQiUfeucj6vwZNCHyOfLVc
+U9SAXfT9basoIVRu4clGWp5QdCwsKQ3dGfRSqqU8oAUiMefye1f0uLlIZmzv
+Lkdhlfnp1zvukyMXspwNrvCBHFLuAb+832Eqkp4cbiCQEdh45/ACfMiicHjK
+Ac1SZiI5r+joFUPaOz59pjAjRj/CAaI2jQdkUx4pTlzeHIjn0ovRmk45839w
+gIpaoqi3pGx9DMo6eXfEV539PwZNADnRJrFoDl03a5MLh3KAP8bmYMCuVWTx
++L13x+0bAjewL8cwD1evX9oNHnFR2WmbGYLtkJc7EjKbBxV46oqz0hJyJxd1
+0QVGm6X2OcF7s9lepYSJzuWxNK1w5wHzKPbXBRZ+C3uP+J7z08cGLG0oowkk
+UiGqKDK8pT8DJp3Erq1ipfij/c/F0zCCPWkSA8AUtxlBClbNxm+HdmK9wRv8
+uYPKUXdHxpcFkVb8HtuuqF+SZqJL0qMtTmm7g/XUsKqkDRSDFcDK2Uld3MND
+s0kzh/SO/fZL/4oW9gYznFuabEBJ7XGou9hxMAS+PWtxScTnzVzkBfmz7sb7
+YikZr2CYXqcABpB70/zah7wThHNiAUltSsCwskAlFkoF3I7ittPm7E3NQDVY
+WmKtBTQWC/eNX9WTounFQ2W50Rf2heNgJetOAQJL8G/GLE8jRIfsoXiyADLI
+TUvF94yDilgK6rfF414zHDZbko8gXF1EJU6v1Ey4AlT9TpHpRgoNPpcPGZXf
+UWEaDlXa8Xc7j7LC2ohQPZ+LqRLVZymtvNVOUrf1bqRlrytR+G059rqzs8N1
+9qWXBQ/Ks0fw3Llzy/K8iweR9FeUzCkm1KMUJg2y5pCuS8hV64Gh6snZs2dz
+JnW7+dF3bmWwRkA6O6/sxRvSBsU3tBboUqoQSulfb4HZW5bpnR8IxLw4Ngl+
+JpJhoTo8PnoghIxb0cy/FY1yxjvgOUqjzS9kXP52Z9eyuUEyCf+Zrbl1C8hK
+P7Kfvq9eGr8tu++6snHTAAL5G2s0Mm5WfijqJLIcPYb5WqYh8FU0IEbLFd+Z
+AILTkD2c5rKFOEjgKMSETsRgRxTd6pkCmiga9LeOaGvEy4VlprP6MJJr2grw
+VpIMrKUY0JabRDm9zDw6PDFRqkelB9ktretrCVd+ozLzu0Yrts4KcbamP0mR
+diTZknfqR0cuaVJhFV2i/5WoZASgyWQsGdTruYkNMioJ9QkqkVZu8bSIp6W1
+hBind+4GoI9Z1Z4L5q3nXpH/+uGRs4XNE7+W2FWMZMgEn7PCQIjhZ3kG4CJs
+f08awsoEAjyaIYtcCFj1JXBsrDnAN3yQVSkwKVrW95bQ8dQYkZH5jz4JorLn
+IBtfMyQKYj4iUiMV0UwmFgyN7rHQXNuKDDzujVyD55yY4eQqI0z3bx4mt53D
+aksscvNFLgJWJTSjnBqE4XOIrK4sMBcGzXlkYgCw1ntYe6ZtrZHSJZRCPz9F
+mutOxcOhhsSbSUDolqs9yukssf65dc6GHWc5CG+pxb7vavTk7zTHOo2DFo/x
++Yxelhblehu1hl5tvbOdEhxQumLDMoYzQ5EyBr3l1LhwSoAv+XSwR5oSl6G6
+l4ge74FkuTDiAYonuULfhTbMPkcrqJ9lIDifakO5sdxohYrEkuuW5iVVlJoK
+69eDenaT4ogPSiJIPNHiu6iHThGjNBTNTzRQLBBP4XBsu5zkcCgzD9VDH2Ok
+vMZYbeXUEvGHilm4GPOboylmnDQyt0GnPMgrp84XkJkTkqQAzLyhYh0WW/Ae
+EkmUmaty9QH44zuC1e01HqfWvUHEkhnYXNuReyCzrkGVpDOR8R7/gFWij4zN
+2HNT6WFbC9slCblJ5sqL1YnmKFRi7QyPE44XTPadjbybydlS4oaO1HWypUUR
+0jJqRghhxANi3u2pe+eGeQNW+pMFV/w+vwTWE7r4yf+IO65rVYRORmRkNcLE
+T7OwLmtSAJUJQMxDiqKraS9XDoYUwqcohJc1xhiZunRm39gSUpTGM+2XJMZ3
+Aa4oq4SSlH7OyS5ruWsGLvuK/4wkG2k0J2+Ko09NwhqXLMGYb1++z8z406O7
+LE3yYDyGYnJ2xtYIjo2DE7b3IeUiWyd/JJrXjBTLsgGaTDPJlXVcqCp1WSsH
+D5N2PaIf2EVVMh/pe/rLuhUPDlDFPrxuKbQvhwDwhUKFpE2pE92RueeHapAn
+MqRDZlgSrOFCNoD29QtD9QRcJnti9IbaW/NXpnsn1yw303PFEn+AcjKNv4WA
+4ImGmiHLWtJkVGZGqIrM7ELcvKrbNgzyT27lAYEglP9CdpYs+L6iNv+KZabI
+S28uVAFaimcXj6CeZ+g7S4bQWYuV9JkGZQEswd8Jk9GC0OlEzqyv3l51sews
+bYeUQknCv8RNIKICkRxabFwWxuEP76dg/Pp5s/gpVTbFocLX4Nc0IbGXFczE
+kUA1V5wUFaF/Zk1aN0RITorrYqbLxkfSkcw7GwvCfJZdRrmCuHecDVb4DIrS
+R0bvVPrglrYgrtsdU6TJRdtgsnS67y29dBpjTqfKXRk+g8nkMy07p+DCq5x2
+gfEFghcqpedM9Nxw4rcrJplxYnCx6EynzE12Tfo13AtV1KPKuBDAD/dS6+HN
+56N/RNE46nbluEu65/BEIaVx6vbSSy8dqZaExbunRisHo12unLn5m/1K5QHG
+VunSNM5AdUKuaP5+uj/3Hq2MFFBlW3pk1ny7D+b4GougvNxSFG9mZZbZWRaH
+APG5CotD6NJMttxQqXULyYV4t2QJlodso6JTI2zNKQXBfCEPuxXmbJfMnRh8
+R0oS6+XIjyWRxj9QwiWcHGuqDtcl4xLqXLoloesLoA/Ga2fHa0LC+QozgC1U
+ABk58qIPI711ZvGyAJ2VCUKyMr/eXMZ8uBOWdW1tNNZLa+/freRwIq3Qc5lH
+QVWWwtCUBEBZjtFzea3v59bLkvKIqQVhEvYEXOIIzQNe97dFCrTZMHOSIXu3
+09OchgVEaua5WZhdURARdLV32N0LSaS9vmKHRCp+ufQuMAP/keXunN6YtBwj
+Pd893DdPxJS1DezEidlLQ1msd+B/qLhVJuVnrmmOJbjidowMB5U3rD24czeL
+g8JPK+bSLK6xT0UEi43YZtlkmp1nG6kz9aWSPNhdmkGYbZSCrOkwJXwHW9sD
+x5ZdWsSuOpsMbF5ScnKitA/sXeczkCIP2QbPp4bFCNpZVPSEx6DO4j/ZaZ+x
+mEPI2C658Vn4aRo4uyfEaCpZYBzkW6BR+XSWJBGBr1smYBaICKSbwryMkEJD
+mu1NaIsG+YyWlT1c0pTgmfMN1HPUH82fh5LciyTDIEpVqRpkKMn+SxOAKOl7
+jaazB06NmFivwr/wOLeAyS1VYHI1k4CFmxEKLG7/7GBCvuf9nLqVsl98pASm
+5Hn5zOaDgeP8AX7Qy57WPNd/1hlNzmM/baluYjkcEyBAvLP9FQjC2AJb0u8K
+QzNcLhy0U/CQnSWUnA5VyoY+NRKkI45rVPEqmw1xRI/eWKi46hnPeEaIy0WO
+FWOsxAk85yVCYvDqJcTpBCHzXsBALmyhQe/c2pJTTplTcewIXw3NWnXFUbVi
+pZkaekjnhiyWycl9SK/EPKTnrGI2mQsjDUfREm+t01WQuqH/piLtM+mE75X2
+r+ki5MC4HMqiuAJBYGdiJHZs9Z3laemPXeKu/rxPD5+5O8hsXeszXkZsXNlM
+jCOnA1kMyYCY8br8cikxItoSrgyciyV1SeAN3UyWw8plKJzth8Xa9IL/xofb
+LF5PNeb0gm0WSMxHu+oZbMkFn7U7JBbEoHOcTh9DnF1KBCPBQWOHgmurOcLM
+b/dq5uudnFOZZmroZ8AXdZu5Z44uAErxUtq0NIRX8ts9WvGou9zfCOrdYAMc
+yc7ah86DWtZoqo/klA5Gr5itdnPnblUCImEhrOLLvZsf4LcvChv+SmG5NC/f
+YiRm61XpCwMzxSqaENvxVv4kxis8yzIyUTPDqLhtvbzIqI4eCTsdq9h0tpc4
+GA7OkkGRpEpuB0ehC1CKCF3JUEFERsPnoEnyhiaLDIrl+RYolQZT+QqMMhqs
+EZkQIpRWiah+M5osVLIBJKNhGdasbk9x2R+GZ/HKNJprWwWy0YkL56lEHjf2
+12AMvRZcz754d9pyWTLIVNh1nChzEWlyU9oxLZt29cnBqllmSzw3Nh87nFla
+6pqUB1YwKFznDvm2Emi4IbHIDGjSe02Y2ZtDDLk8x7zVwd6usagCbJ+jD4oG
+P+abepUJMVmc9LDpPYmxwCejymHSeciTsbokL6NiZIJb4SHzkMCUJDIqf86U
+UG4Q00TfyTceDDVvKbPuEeUuKzZgqi0PlTHxZMlu7rLiX8AhSMkIUd0bc9cS
+Pf+E0jwC+4rhkvcYnFla24grTgqxUgCXUBGPpCxn1zg2aIfY/RHQE+5mskQu
+TJndb+/Qnwks4PJ8kZeA3ZrE7fKRxdeRdHZooq7ymrnQIBfgtwoGQzAXbLUi
+ABbOQFYBcH37KHfpimlsYzI2i5QEYsWZlbtMG+Qs50TUG/WZaEyv24s3D0a+
+x9oEe5YSMuwaTPRAPNE1tVW7eT+GNG81Y3S5iu2GXfaySRlzOcp6XeS0P/w3
+X0vjc/saScEoIVgOgaEzZTh7We/EDWC5n5kGHKSOSzYDRpwQ12xX2XziFaLF
+v03gO3fHALLvRRwPOTNyQBF28iTYPesIv5ZljI/ptgSd2WfsIQZ+Tr35SLf2
+F0jk81DkjlvWbiVbpKKWk26t7I5pfujc5P5w5j1Vtb4OBrNfPJqMKni0PfJw
+fz3OcWr2hc11SMvY5+rmY/tvuQWelCE0bLpl/voSclungjpBGT9VzeR+Wa2K
+80TjPK6YrnTg5t1GcAf+mY1j23zhC17wgjSCDM7A/LAAHWMf+chHHmmEmxYX
+cNUkzkrLMh/bf6ZZghdxHG2EiTW2u86NLAssqQzZeATxqIFjIQeFuS8qV8PW
++93S1/RbkMz6Ig+EhO1lVGmEE6PGCcwJvbDqSCPAn68xyakgowBTJKUR4YQZ
+CgG3wIuGVeDdjXxtSxH4gPdcAyH5jISJTdRhzF3hzXExN7XuMNXdk0aXKw53
+z4hdajSZM869D6WDmZnzuvqxOhshZjZcbFoyybl8Ul1MB6JeE48xCsMTVHA+
+isGCivs2NfKgvq1nL+34fq6hZrdwWlCd85m4Zb6Bx14mSC8bVqIkNs8KIjPz
+S2QGUjmt0NYV5VHf0r5SiMJ/V112r9DTTY7+JNLMHIRoFdxonoAcisxE005s
+3U7fX7HuDw4xJmASaqo8hnhtq44YlNX/NIFBMRsyyJYyKw7mFYz9HNUKbomc
+ZvKpIjnpgubKjvkNJVt6rurJ2W9P/Lxi2LWsyyYtWEJWHt8HHB41IFuSOBZD
+YJCGI8CUzAql1GkN4dnPfvaqF/JhKrel8eTICBQV0KOCZgwgoXBrb7nnZn+4
+yezY2G/dIA5xw1zk0y935F2xA1ghCq4YfcRrilTew4Kw107e0GcNmhL1zEPh
+nQUjuRpMIIU+vCVKorWOSpE5PPQuvkpv+jTmITpJFD/mOxJgIRMnHDuiVqIQ
+uitEEOnib/EoN9VE3He8SO2SgeWGR/0lYOYg/DQkiG6qX+iVI9ByVIG0EVBb
+5rW0dX74e3kMsqmWeX2olgXCSse8FOtAssxFSbDYtbLzjtelnRsszyV7CqTx
+aOquOc5T3A9cOdftZaqXjfQYLRG5wL9rBwP/idUkGhpZH4vKOiDwI9Y1joqV
+VxpZp1mlLY13HWqaS9JYItXkiUVuVIvYjVnQiMYc5sPUuF7fj6USOZwX+UMD
+/eMr09Omv/tMyCN949mNS/2Z8t/2/xP7TcMK+rzn4eBYN03NjK1SH2fHGmkZ
+KzEsbBM9c4w5wY7VEq2MhJgNEdmGTKvFylyTqJTWE5uV+5WRvn6p3zQcRk4z
+JCEjpXE0JucmWORJ6RkNQMnJYuKQo1LHUaQIEr1H0gyflgMgRUUazPAZPW2o
+d1+/0I+P3yP0au6YPvauHxDn0bpQCgONgC50OWXktd7DSEyiDzIFsIZSpZTc
+iU035V0EwgaNwPfJHWTQ9x2Znx/hQA77o34GI1TPtl0hHbKgNrXy+FlN9+iu
+HHUHzodsdQepU3llVpIXeoH0XINBj7LvFmmcE6FBWkKq/O++3bzAPDeae/wb
+OTndHgIBM7JMgBWOpiIAfA0tXCm1DhgBKj5AYMcfeYXfoKVG5QF+KARwOZN/
+a+i3DT+Qs4U94hrhWUZIZf1bGSYkIo11ZVM73wUEhcVoYLzaSDguN8VJigGE
+ARL8p1dUk//kh5wYATj4IN8pS2yZL+WTUyN6wgz2RXVEWEJDys6DbL3NDYNi
+70Uf2Dv1lE2i1FwGt0AI4AnTewv/yDatN8ixeDyPvkAz+xa744C+YQqowuH6
+XoqI1C/Lspak6/YxOHGlrtigJjlsTGPLmcsUuGmOis9X8SJZgGgIvk+PcnNJ
+TzWOd30mx/aeRxEAhiiQQWjvIl+sq0JCrwzLqRKhH7TBDMW0mX40gzpjAIE+
+40FZb5SOiRAH+qNc9NqYoAS64BrzZVbMCPbBw1TZ1DxzhSlxCFrQi34sJ7Js
+a2Z+EMUUbuiHOLJ4C6ev2dUi5qZbX5ULAqQ4fTq7HFm9GekABz6v20Ky9znr
+9aSLSwew9JLBFXwS3nj4tEwd8+ckPp/ubIQ1mixsYWmsxSlW89Ej/JhDMxaB
+XD7cuEGKDi3HyGEKUYLsqNCFd9lAloPpQ1VACOB7lYUsXV0yXokuMdBecrhS
+n4TFv1EerMqKCpWC7KoCnb0UcE3L+DyudZsfHF9XkQCv4tr1TUom14zOKBVl
+ErwYVSbcmId3j47Qdpljo4B5yUq2x7twZl59iONpD8lJZ/xbJDEXCQk0OxUj
+IbHr0RtJ4DKTsTgmQ6V/0nzSLLr7bIe36W9gqJGu2Vl/A8OEQ9M9WzmyXj3r
+Lfuz2O0822lQYC45l8fAATvMWe7G2cqB5lK30tC36GapAU3ZLl9Zbs8AT8x5
+uvhG6tkp6PqqQeUUw3q1h/zI/gb6FOq3xbzj6zkgfGYxcW5I4z3Zmj45a2Rs
+z5JftsBlIuPB/XWjZjAirOmeMCigs+Vg/+VVWB+NWy19KTIKE9YlC3vLcYhw
+eb65xJii9w/pz2QUqNzOfy+znzCSbOJgKTAZitEqSlr7QQ7ML/BZPyNviZiE
+Mn2Tce4L62vGsrqJnYhmNV2Yd0t/rOfccrDehrO/7iSq4HXlC2ClHH2S9DwT
+Iggozq7giQfwWrECOxUuaIEkuv72kG6Ra+jN79sWTw2U4LmapsEZKkdrjXhe
+KKxlPfFgqeTgAu/Wt6QNfDYgvZeZ5sRAGoyp651BxwBBpeAGnnUT1J/J6rsC
+irVfqMjzbCVyON5VjhEMQk79yi1JuDT88lkgJ0aIypfzi3yqM94zu0i2rRNr
+jzgiDOUaIhKxv2HIMQqo5pXhRmZiOqoh3JBEbSOl5XD13FhJtUVF1FJsCAOF
+DayA8fq7BasP6sHyj9QSHs6MEqlN2gEWeXfLAqId5Co8zak/tAXEALpCg2PD
+nZ9cF+1gdc4qwlZl+xylmLMJ58UmdNTo678dcSmLbi+nuWSIxuSzUbMO71AT
+ZBAjMo0eHbg33/XCivR5xSzTZQEXZ8MZSaCkGSXHrIDGo/YzqwhBBcXsGlQI
+zq04VrLlVVrBojCiGDMbIE/jbpfcSSE4E1iKa5kAywe0vso8gL1/s+WCy1u7
+B38yRApUvWVVMH+nymsNR+J7j6GaRNv6houGSgoJhbvAmRFktRcVVoUVXefs
+Ys/wbCa29teQS2M3N1UYj2ACWw+gXhYNmndDFQjIQkyQQL2WCGB5V7MSKv/h
+Bar6pKhBlYm55T62Ze8z2Ml2EzpW7uS6XVFTbDmY0FamKOsvm4ioyY7eb6fr
+jo9QgkKRYZlN5JcThJcbvZbPcqnd9uSas8PSQAk91gxB4SbO0iIUYRFLLR5k
+aWIqSOJsmCP+L8tbpmsvHYY3r9HRajZ4cZY0iMbDAOALE4Tf7NznVKW6mL1S
+kCsz+mxcqiczkHDLOApLQwG4Te+qqNnyn2ARBayD5+cw+6zqobv40DvKQwE1
+6C0IuZMsMjMGE38IpLumMWu82YkLDvlCAimVjdjgAh4TWwVXs9lJXBfVWURk
+9MyMmnFsSCZa+EyNdOynCkj5xftNIvIqJOIuTXSUAzvfMJ17zqiaJRbSfsaN
+GdknxUa0DHmEq9m+NK8gv2mSB+iWpTIE3rsytnQnb/aRnNkyJcqjzqaMl1v+
+NOGruoTH86nq6e7qXebz/wwm20PkeNVkdvzDRUi+jZeXKMTATcIGtaXIlCkL
+XVHCWiz7FaLRFthCYjTDIxg0KhmSRRxv1CTlkGToganmu0p9lkzycN2VKUzx
+H5Xxkx2Xq8shEF6DdhJVrt9VAnftHogDYlJ5zt5Eeel2eoC3IgsAS6VJJHsX
+SrrpwWssn9Bhq9VVR7grBdFRKkzK9GXxS0fnh2IKV9gYrU9GZDhK4rJaveT+
+MrLG/WVrkfD2YNhaMJa0BKvV7sOaglT8cmqVE1EqYUtazgdkdjgpIgXO7p9L
+uxmorCwA3clTyaHYEd0lZlULvfAJpjWKHekFtmemLb0wwOzeSC/Gr6iSvcoU
+szSvz0FMa5hKJ/m33BXOcOiKSpCSnnLGekzHqeF8GE0ATXSmXCabAZdLULI4
+GhCbIxbZKaApgWSjGgzsxaKrmCGwKloeAUbluGdaUYA3mIJLNGC7untRRUU+
+5TNujxMuIJ8v/FWcyPn5rL/IzP4kEAUXLR8MMeg3XZNHMazsIsSIJFli1rlt
+T08+GAqPGLiimOS9ss6ZGAZrdkSRkYOtPHZHPEtKQ4BMvYApeyBzoSkZy5+t
+MzjTBpfL6tgjKOW1aSHPUKMP8ACVnF2cFVwzkp5tCnxGqWllgVRO2KO7lnuk
+8ENihRCn2xj7vMy1VqSKZwxSXGCiNW7AZ4xSM8J0U8q5DASFptxkDyDRYoKn
+POUpp5owrgwV4tjSoRBG2xCWsxPM3RZkhbCciyK+A0WUN7f4cjAIQhjixQDw
+lIeWkmT9NvWChNJYePqoRz0qR72enzipiVmXdMEFQr9wtISVU0WkChwGBOzL
+9PbiObCIQisqZaAopcEACUSQQPHksKUnrKNyeTRh4DnGQ4iBQp9NRyOq6eRA
+oWUwyxkRkD2OWOAnxuBnsnOS1iWBDIWMB4VyLyIx+zBRCHroRR580QQ4orAU
+WyBIRAVJoZDuUy+/RVUgaCabFI1MtZQqLZxfPTclEwv6baZxXqDYW9tzSGeO
+xKBNRV9WW4O5zMH5Rm/9j7hIt+ey1pVVEgVajIguzq27HqAnTLPhNifQshwm
+nutvWdGa/y4nh/FovLERy1uztYMm8KUeCIsb5aayi1hQg8czdUyBGRhQ97hS
+x1MbsD04oQ5yEAK+ZIVkaVSoY0m0SDAuVpdHhjplC1jpYeJkV8HilbMBnRhA
+oaxnmg9risB1/Z+xM2sGhHBEF/HzelIOX4WeqfZS4qzYT23YpIHo36ulO+e6
+Y5jMk/kzOVLyHJaiY+KmNL03YFi0cuZhv8MH0V6yM0fGX/mpLpYV5roXlAEj
+XLSxrbzm6SZBDRiCSyS8Ct3n81pysRb+cB/+beV5SOB5ckcAb0p18ErUFhLw
+DAmELsuQlVRi0FLILTfyRjiTlAFrAYadx5f0O76N1SZwMURkg+2wKiJhRlBD
+9I/BfHqZekTC84rsxFcG57Twaups95CbAdQQUi/nLJTil/MWD9czDHIfT26S
+FTeXuA77NcQjIj895jf67IWsoDcmEy+icFhsJfappkaL8jmt44sInMC5roWa
+Zc+4SlEQk7chCfGmd7fmdbgeY+P9HEUJEIy2GBOSGLl0GVlMSE62I63DEdGK
+3ehFZkeAKkpf97rXne/XCFJgAolMgQrz4CzBlbEGEsiLy4VzViFXqL0XidBC
+2yIyH2MMObH6dHfDWAQ2tlOo7Se46AuRc5MEA86Zn4H4FFNU1DJtpJTTC5TW
+EgJW9hRo1xWXMgjwg79YnmqLUKlv3+rTAJblnNlgkVTYsLVLD0uMJyeS5GmW
+vKZ7MJATHG6bRbGctgCemWVe56ByvNe8PcVIt+vuT4zvppBF0bZnBx6M4ICY
+KZh3mHCB65mWC0ch08vCPgM0O23C5HQPkByQwpLKgkIdEOkZvXW1P7MF38IS
+TTK4vI/vef9w4n0eIMYgmRB50Ljt7QDHV5/GsEs50ywR5Ty7kMGHsTLTCwZv
+eWzeN8JMRYSMZHAeQ2CllNzMODJM+y5bzddkKXLgTqEQvpfxzicT5rCY5FwG
+QASzeCxJ4hg8QA3vK4wJzjGF3rYwzN0Ovgq44vMQkZsGxJaW+l7VkhWuSXcg
+hDFwUSJCYznf4xavoogLwnoYwNmDC7rKBeUiCDyC7pC7M5O1L+GJmBd6UeLM
+zpluzmGCmZoHoi94wQuODWL311tiOfxepXxJyyanVogwsbrPVx6sfsUrXnG6
+O0c8u5VpCdagM6uxaO/YmEHYz37r8Y0EBeJarjwrswSepdNx65qSyDEgemAy
+LV4OOvMnbNwAQC1/aTPFFU29agDdyxyqJIZJUOHi9cKW0yNs4bpTUPdwmpIw
+uXJfTR2g0xPCLVHNPoUE6socWUSB0xVP7eVsKZqCSZktVuMgRZXKvtV4vdcC
+A83GarNXiw5/k43iHEoZbkiCPpil5HXnWYLLXJaW6F95yDmTROD2OM4zw9Eh
+UOfU1mCUdXKfLURQK120ZrOmEJFqgkWfJTsWVCjsVJqZQ69zeTBkDrunXCkb
+KhhVyiPzXh/eT0n6RA+QcImDi1/PyzhYj98T3aTeVuNfjrY7WDtWNgY1lLvM
+KZrD2Ok9gM1sQOC7WBEaGfauH1xOfEIjhhfM5BhfDGe74qBSrpAJ2Jk6AOI7
+AFQZ13JwwMkh7+yckCSLCoCQ+4Na0DmvIld8z7TIRxgADCvlXzq9dLRowPOV
+Sn4ndFUPDIEhBN9Jx4hJSMxcnTJOmXdUjALzwLxL6U4KE4hhVov5L58pizQ/
+18zc7+xAVExapkwvdNBI0phsZJExQULIWyp5onUQgDIbnDQA5kYZJMNi9t54
+OdoE2PIFkeR8hBW+ZbYgiWiOcXMFWciDe1nMneEQsmELQXmm5UDFTe/GOdFv
+8VeiZ4NmJ4LzXNSEcqw2eErIuuGRlNAJEfYtRcI8PSvR4zR3gwkZwBJkrRUN
+dkUnrA8wfipdn+VYEZq/vQTO/y8arWETzkdnEqMilv6oXMFVyqCCWf9+SI+V
+u2HcsjMKIOA8v3DENOLhaJ+HYTJEJj7jFwFzjSJ3lekaytEzbSrSrXfSXDLY
+JXHrg2fWGeLMOoMwwSiWybTkC6CO/6d3TskP/8CDd0vL14lxVoPCrnSPDC8u
+JNepWOIhRCeOnHzKU8Hu4thigFcPEjShe54Xw+Z1MP7mq5jsJ/3MeeGYzbFL
+1XUpxNEOzJFgr3Wh44OSHFJfzbYiBOPkAVxAzsny5CysElOO4s5iCEBQGHKy
+lTQHDOW0RAoKO4CZiv6TnvSkXuSy7OIzTByV3+JWcsHF158ZZhoqPMkNCdxw
+WbnCIq4vbLxq4Losx6yqlZUMKdM4FEQfyM4+NiOFcdgE47JeVJST22nEaDbA
+J7A3fNEOXjakr4eC+w40xkUSp2lEZSthYhjS9/04yiVpsBTp+JCL2MZej4KX
+DEuAxZwsOfXTKR/xVyKlSD9nDzIdLl5TyMmCcmLxN+w2678cEryQ5W/IBtIE
+LvjY0Y/jg4NcviZXaDk9sDHXyXtUkwwEs2FeMyIVdWqNAFDDCvqYu/yZyijE
+EbNktC/1SNmLTef2zNtabxEgxoJUhnUkR034n01JQrBcyIQYCogrkovi4Hop
+p8KNINPD+VmvmjN/cL034A9XlYUGAk4z6QdNGuUjnZyMyWewUUY43a4jVidA
+wVfyAPpOiFJg4E/vPHMKHK7kInfhdYbGcmWHMNNQbCzN0ESsMn9uz3fVdbOS
+GPYiL9/PynS2Z2XnydZ1w6Dffc7QUBrcn5eDAWaBgH2dXea4snWaB55ixdEE
+8xFKJHrjlbIRLm4AZGT5ZGJ03SiXqH1sV2weDGAWv3qAm6yt9Dtcw0l7icvh
+tS4teTVhKygcyat7pdVaoBNn9hlOA0TgLYoAUtJLss8u1ER4ypUpnXpo+Tgf
+cPkz2cC9pNuMsjxTDpfM3n2ulphAYI0/CA/BDNmfa3xJ9JKn9/GzGVZOn52H
+Rc8wO/mpsoF/z0tm6V/2+WZYAmfbQrMMFxVPfepTj01/VpHRNJnxXGXjGRZ1
+oMHoplkgYC1FH1+vIPen4lXrUo45MoRMp0tzxRT0aHsqwJnxjj65nfn+Mt+D
+CtS0F2St+kPlFWLyiBQruo/+wEOrihyfkDqqiiz1jdeZL7tPTQ6HqTd4ToUg
+dUSkYVFOaBTj97Th9hLZ/RHW8AZbAZwbQGoXdFZ58xS52U/ow9CFI3SvD7Zd
+T8mCgwSHE4VVYTs/DRoxac3Elp3O/A/NxvPttPOpdeIyR9goIFIjv4uW132c
+DXtiWJ9lFBhglWG29HDLgnugLx9idVlmgFHbm76W9Vfk3Mt9MgoWJcAy6DKV
+WXmODde+TCB1kDtGpOXyF5nkisLAy8Q4Hm7AHBo2k7TsrBK3KAheoN2ykFz2
+6CvsIOcWAiFc57trjIkkCIoFZXkW9nGoqhk5UuuORdfjQ/foS0fiidk0ZbZf
+Fr7ejHR6tIh+mqi4IZdjwyoKBKP3gozzE1EwRwTKLZCrvMUJeSE88IEw61op
+P2J43RAutMu9TiHc+6hkcwXCIZwwHOJCacuLHLQ1kxXCTeCaslBRcNwXwnkB
+MQgQZXYpEGUTskGJiGgp/46yq2ZAORxWTCA0h7OBTOJNr9fn83RpLjpOHKVl
+eYgylfGXMNbzlMyBY/miVMtIMi/HhwmH6AQ1o/dCVUVLgpYPXt7kJZFhIzk+
+YyqYJALgOuGG7ZN9995qekAiFdrwGuaQPgdVIjjZH+M1l0hqRVXuAtBZSsep
+feaIFq9zfUr/yS7E5lhO2bM6KwwspoVoKMRY2bf/hM4hGhjmMKAQLQwHwgZZ
+MUSIzsmbIKbMLecuypZxbXsOzIn1Jh9E0z6LiHZuszxcl8kSEr0AUGY81Rmr
+h1wJDXt6LeyI+MizVCd3rwj+rFEzH1OZxZnWA9G9fI/uWgJAA/hpUpemZjE8
+064WAy7zwXsxLFIVnTvxcr8VDBE5Sd6DMHFl1rimqiiiziIaptNbvdZL1rgR
+sQhzc0SMKYHCxZQJ5h3u0XckUgP4kM/m+mC+y7sjZbs34sxcSRkPQcIaMaLq
+FT8PLww1ZAtTchhoyOYvSBXTkS25X8su++vy+c1wPstnNFIXfmtnsWRCp8co
+wSuvhiLKoGKjriMyxfxRVFw6p+t4mQAVhpQWRCG4Fa2ZKS2cPNO2xCUoTGVp
+FjaAWpDCpqmZ9SKmxDUBclkXpU40hvV616MiPMurz063fHAXEqnA6I4EeKUE
+b6wsS46LyznYm6oCK3qgidwsvg15l4kvAKjQK/e3Mji5L7YJsnCYAzSjldVQ
+MJZOqeL1vsue7To3QND7Ag4OBXmEmuO1SRH58hFhou9e2jTP55YLQo1BqD7T
+LDlQG0YzT+NMm9DMbYjS0CxvZyeXz1pxZpCRc/SQwT8SGECV1wgGwcd2P8jB
+ep4twSgzwPT63nx9vJzWFMzpVj4hF3WxQJoqW9XHvLiK3KYzZnEshjw+Wm/P
+C86jGXjFRSKYrAS49YVMjHs7pRk0gQF5lALzPGvY6d86rSBxooQ+n1Yi4bbm
+tteYHQxWMMN5b+s6R77UWvsa7FWd2R2VZ+GE6CvF6RBNJ4w+wTwfxNlWgrE6
+ily8AECKmtBNw9EMdUtOoZu0491izcZhFRSUJQeJ27ReyFBBvGpmK0gSFArA
+mXNoynXZr0IhwlTy6FPp1xw+6ISSzFIua0gORzukLqmhLWIW70CH9bSYRdzz
+VCp9rOYCj5gteQVgUiZjKgoSzRuTmFG6Aut4ZkjNUAWNlkpmAEl5NmtAsOwk
+wCqDm9JpvbJnIo5WcAxeU4axShlgV+6RExiNgeIoZTBRG2JqHCHUMHkySS6b
+oIrkRXWtfdgej3V8rSziXIUXyanQmRw/wMBxIggPFBaVf3tGNKco0ivGYjxU
+1E8BwDYoXLJbqksnja0nptNzJpKIN1ePYlHu7ChDiV7SnMT8mfb2iklT3APo
+spBC3ZMNGylpKOYAX2AGFGVUABVXi13zRXdEzI4K2OIoLyQyuYwjwJidITnN
+tH5GZOIvlSV0iZwdq1jh2slGzdQkcnA12nhrgQb7BtiGiiuJ1Xh9Y2FMerVJ
+LMHPLL+YLMMwq0I1CMUJa6XuLcIl6r9yaDntzkSsZAvxsLwXaa9zL6AGZahM
+3QGVTHeO+2pUOZRy3qichWTVTKRPpLmMMCKlwn0T6tB8VdCSUaxWTpKSK4Nm
+lhWXHQOnWRsGMxAJ76yT5hfLIWUpzIXkyY852iYrQMRbT3nKUyJPIs6abmOy
+ErSGeWrCiqxV1bnCgRqEmUxyI8fgAhYIbcijiM/yoAuJ0FjFnPNl9xUJ7Yhw
+OTeyZ3XXbY6yN14hV4lgZCZi14Lbcki2Yhb9A+1WUYEMwUmGrnPGywVzDUKy
+MuoYx4VEKAggtoBvbyM5bKsE34jLCQk4Ig5Q/yYXSVihbhadKN6I/xShc1dD
+ERDG3VGay/Iu1YdosDzChIgi81XdrEqZmlEOF4BzFXaEyFxVIx3JkVlMD5Ew
+gk5VwJDVbdkgJThRXhb3v37RLm5RoS+lZ9zHMoHszbvyne5xW5e0CqF65fp6
+KhVWyspEoMwXe5my9DnX4ObEKaSK+KyoSZsXkiQJUggxCyYqI5cDTMVKc3QC
+o+CMsI2u5B6PLAfkBLp6vZetBwJP+BRSBKXJZmaZZsYTpyxH4o/J6vDwkAPK
+mh8M5a6MXremuI2U6eUWLtCvGeoO+qUvuXok987FwoHba17zmr2sTMtib8Oj
+E8AOx5F4IUEHWOiMJF0wSSqym4KHlnFWcSe74MNQJSOoSP904wvzFi7apoEv
+kgQBf0BhW2Jdsj7Yk21EYpXi7YWknKVHnJkpcEVePhpvip/Hu3coofdIU4EB
+GwE6LzovUhBW50S6w2lwPHBYDEhLc1JKmoV90MoBp8Rj+JETGq6eBkgBmI+/
+geqJ2lRhU2gJNueYqDmaZ0ZhRm5CSdJEmBUnJDOeZZuFC0ArR57I95xz24JN
+vQqxskm8UsNhBfjYS1yz4o/7xZ4U7zzYDmW86oiyrK8CxOw8t9r34fw7S95n
+KV8/fbZ7Ydz+0E7SttkpkTfDlBZgFnFub0JfUh3+xt8L4tLMHP/GhpXYcl9X
+brCf7xrJd+l2H8q3kgB8GSmox5LtRPc2ayHf6jcpyCyfe+/KgO5lztiTG3TF
+MkVllnxRBrzuxe7jVcoQY1JkxT+ZS1KoZCICubLXVHpm9ueqdOUL4jJW+rhd
+BHpmsDxXsnmybZjmMA3dqvhsD79Zqn+5FrBGEUdEFLniEDzTitxZz9Ky5IXU
+1SdCAtF4f2ZSpgN0g3Q83i4IXkZPW3v0WR3k9QuKYn/e0LNzQEfqsYnyfDan
+bnT84osvPtYr1lQ8NZUjxjrxy2QIly6BQFs51qjILJVr25gMkyHRD46WAvBk
+ouu4Da0zOIqfYxU9NFloQ3Hm1MGS1ot7OD5X4XRSbK6V9XAn2fZyS9MiYzTh
+kWMv0YWXdgiGFt9XX+EFBXRZKcN58A450SelKnNEKQfRpqnoN9QBDYrji4qs
+d2UjhTeVDtSflxbOrnej2zdqU2Vmo8ExAMykLU6ua8+XE7hzF0uBX/REJ7vH
+fy47ieDj9nz1ZSF+X8g8eoOpeKM6X5+faA3WC2MQjORV7DCbw36VGvsyp71k
+fJwFBPf36dJsLlj6Znbv5pYkKIAYWQdBEuqI8MjAttcnnl7P6Al/5mMQBAMC
+gRplDiIADarj2zMalq0BUgTCb+FkotXgmCUV567/X3V30yJnEcQBfHRZlxUx
+gjnGJHrzIIjk4iEaRciCiB5ylbgJ5BPkFMjFc676aXLPx9L69VP/np5xDHj0
+gbzM7LPd1dX13tVVqbkiuXAb8uawJ4ME2ZBoGs7sIMjRF2ufPmbOMNlTgpYP
+5//Y3f7UytM+Fj10bv6EVFyIl0Kghc+F0jryPt8DBlCFunNTCNutlQ0EGTIG
+uerQYt+E6my4Bt18YXZYB25C3zlSI83M1Z19Lns6gmqdTsJGpoMBbfL2tQLO
+BjdL4PKpNyGHmcme77axgyghDPWVkt+U9UezeW6OJ9a+NDwU3j9gaUH+J6jE
+Eojo4oVQCElGfKz4xO7w8de0188H3nPzCp4sMMbOemoSOYuoxb7ETaRTHBGm
+LWNzE/qZlk/l/B29f9bTIgvbxdlmsgk55eQUC3qfzGCcQ5rVMiuSrysAbeX7
+8o/btmJdcx/gfsv56Ty2+TpWo+hlJGzI38QV1mQq20oPrUJEASHqg2FWSM9J
+WZ/PLojdShVjR2dymZIGSvuK8CZCFJTGe2Lg1DBj3klrMEJQCQDjQ7LNz4Ek
+9B5GS7r+vtDYJiYEvsGQfpWoFhyOBVgR5RnU+2qGHW54Lj7xxJIlYfNZFnak
+dOPUWWC3LhLLcV/MArCS+q4yHu0I/zTH2pvBc2OoMRyRNCbT8keJ9xjn6c0g
+F4kzKJtAElnkM9aQ8oc4CtRggu+uHAC7MAxJc6y5eDRdTuNr2FyIRdIp+1FI
+zn1nujA5GhEicMPoE/Et8rrT6PFqX2saE/kXzxEuFAIj7eMFfpRHBBQehiUy
+cp8L4FisGQe+4KFLr3Tx5MS0YArrsduS3FgK8HZPBCiuLNtg1k7b7lPBu21n
+FSZqvr+mvqVNizgLZxbJZfWoyvV74fGiiBhRsXjXe2R4iqJg+KSWGbXITbXT
+Rehr5c04e5mJcUf48Atrptv9KnjBqsTzKsNIXP2/k8QtmJuWe0s1yA+aLhbH
+YDzIUbCa+1iU3WhOtQ8igxBkP+GPXHo0SkmkU0e+6UDq9S4buVsTCGABzPU7
+a8vrWKNLy2s7JbWDUVkgh2fxn0HoZvubawlsx7VFMWcOnGXgxBFZ0R0ceg09
++nSrp/DrmAcLWD5jjkhaWw+jQBKTuIAScaHahxzKrw5Y+BSrd43R3RGiGd6L
+oB2LxEUMmplxfT5eMRGSFxnGXJF9yA5LwE0XS6mZawcD0mrwZ/W4NLfvU3HC
+bpI8CakgETLCWVph5JNGEsvP4h2s4A5SiHZbm+quCN/g/GdEApFgX1ZiSv3n
+WlsSJQg8qdA2IIGSEy5u2GqNEWali0M5U3TY9EiH+vH/ly9fzjo4NCjQYUiY
+gn0xz80PkRktRUcfZzN5h+ZCPvXraciWsDcTS6aNOgv/jrStk2SL8zk0cuLE
+EOtFjbcacL/OCFVgWqMqwfnalwQi3oI2wqzjvzNa5VVClq1ip1lp9U4KnbEo
+ddCwljKo34YdGqkD8HNT1hnv9JB42nB0e/ljb8OKw+EuRzOH9DkFJdMhzt6T
+PWkT3gZXhj6BkkTXqEvlfcUrOZiXl5eY61hysVvfvHmTODF3lJsriccWoJ+C
+O4HRFTtf96+QtOzFlLmlVAo7pw7dfuzJMU4MlnIeT51+Ha2Glqda8ogpFv1/
+uIDNLeS/svMJn4Ir1jSGpx0TFWKZnIqw3W/4yG9kT3nUJp868v2pXz0yDE4d
+xB4tBXtjnCR+EFilm7MUhEXAEIT4BNnW8nLwi50W5X/q9Obb8ffFCLhxt/lv
+CezBvPtJv/RwdG73hl3vXiK3jo4cgr9ZIjySlL9P3XHCL7Er0VynuYQ947Po
+b3YvPtKkZycW8KCnAqzvAChXk5x2zYXISS+pKDNDUkUcUdFGJkz3W88ZpuGw
+qMwRhEICzfpgF2O9YgXJ+mXOepWRF+CZJTQVM6U2KOjiZCfX7PuejdCgMoXu
+CYVuSZVuPdQk5kqPeql4BUwj+4t+y+FHsnJgwOeSRMnJIOkRHgKkwIAupCaA
+cG9hdGJQbHuG1j4eOmv1oFMggkIhrjFcIiSMCiehaVPpMayYFT2eAqGwwgnl
+1yQzkHzJHMQtgvNQzcAWs0jxhlHasFRRc2we+8ZBuHuIG8jty1PDxBSZq1/e
+rJz3R1DKK/Bucp5xdy4ai7A/Beh6qzQ9MYq/P++vqXynKSi6/r+t6uZYuURj
+R5n0Sy62MEBsBOckEb2UoCEbc4sphZ4JwHmMezmCeGya3PYLomw97cBVT8Uy
+Yo5m16gjWXcWgB/xXIvAMYZ/jQOsHJOSToiAoysBMbRML2I4RXYCF8YDF0mS
+pRoH3ZNXdufm4e5YNT60QxBIOteQUdiwD4FFAu3S3hijRSP7w8f0gCip5sEK
+cvSdd5jPwQqT2l5txLd9B9lWTkJlfuTr+325i63yKuG8NoqwYbSAefhamUcY
+rtt+zXlgBjZ8ets8WJ+4I+Hj51AG5iDW3aVobG7i4HxW4CPSEYLz17WjrsR3
+eUzpcIsOgYcQyDBHHff6fd4HS9ynR/2djeWH+/TNNvWD/hELhCx3hrr6jinZ
+FjlDg+A14BS46SVMroiHtRLaNOzuux4IHCSATz/0b4i0yPOnPIpIMxA5J4ue
+5i9///4K5SaY0yOicJma59JL4yJlreJaaTx7NIqdETDhLhd1ZRSb0wdJcxSf
+05P2aFESLZj+ki9+7e+IF6pLQ61wmg11HIEu06+P0BC0Xu/tkmQ4HZ3fPZwK
+YxMOGDCbg1Y4nrURc4hcCXaJ7eFCri6Y7uvSb/XCKCzeys/LeDwYtwDyHi2B
+5gS1G6Q0OxT16D5W44GoroK5u+p3REA74jkesggoSuqkIaJsq1w7y7R8aorJ
+pzvrtGcjAVDG1fo6Udh5Gb3qixHYYa6gCn84UfI8FKWPTYER0SzdRcigUBHM
+EizHqxUtQfUxAfndGEnXrKyWVpbkIPwkYMHFcXjw9OnTOaUNEi7GrHmHHV6i
+83DKLZYrmnV1dVUrrRfrOwkS4iDETPaXx8KTEuULRugclT94utnfFGZbW9gy
+PGGFJj9CNGnm9bU0P/0g8kQsPVzeg4myow9ODkTGHGZl5TKCumXTeGh+YDtd
+6Kkf9auYm1WWR3yTXpEJEGTbiBTg8xBTjD6JB5mSylvbgKJwxuDS3jZszqrr
+0oAHJzodYdhtpTx2Y5hP/7//39hsu0NHkCPjsqTjLNLWogk0YWnEr/proh7/
+CCKVcky2OVnMuscPLBpE+WSb53HvALWIxKVTIgD+kIScvTHz3jBY5KtiLxaE
+HK/yS77sH2NSteIEtoknJ1dF6kk2E/gixo1OtKCdEsLXh3DkHNQKPKL1iPvV
+q1czYYhtCbacAVoSvUq+JupM36b+VyIJBB8+WkN2TIvUM0mdIYhNCzRP+g7h
+0eDCiV8Hu2YRzBcvXvRqrvsthCquT7zSrARIIT+DMMnoFlxJF0FL+UFZg02G
+Yw0BsgbyApIxbNbAbOtGVxM+AkDBAhLXFBR1fZfNIEABkzbGZi6Z/9tKfBeD
+p8QchAcRoDCKgfbJZhcjIEVO9unc2GIyE5KzkFgKItuJHaVU8BrtdvHZRlKK
+2QzIdX7hLJlsJ4vZouzUwEAfi6ZIAEnlVUhS1fBoSX5MmMXMwzEyCym6DOeI
+Lx3aPCLVTqgcwwZ8+4BfyqIuvvP32Vi6scjtxGcoUjwjzSjLFMD3ruyuLBOd
+OyZYC+FgomfPnk24WGyEdYp/0/lQzzE4WObZMPIcC679shn+6WeZae2e5Mj4
+JWS9pWKlLBUr0v3Pnz+vsfx9PnwZ31mGHVN+Ju9jbOzgqPLdrl7OZeZYu7sX
+UqYIJNzvu6yczbtg+2qBm/VGvaoTkPfQrYuQPj0+XDorqi8cztdZrt2udC4d
+hyDAFF6yUzxW6jGEa+eh0Z2UFC+kbJL0IJynqDnbBAGW5MpmsaZwVdpd2Vjn
+bfJCszJCinhgmwRU1xDYqsvKrntIxzCg4U5hFQjFki7RZ1XkODYAHejZnaC9
+vr6e9ih/hc2hpmwC+rCAdl+/fl2gsDa3q4U8RkZebUimoAYYbLhcWIr0MoVs
+2Kwe/XHFxT4EgnKVlsfWq3rSokgA1XbSC+IVVleclpEwgiMBWkVcXfwsdTLX
+pmfpSpUFiSiYUWwtjMcU8Z3lRVCmGRyKFTTtmG4EpegV6Y15QEcXFP56DX8s
+AMBoaaXdmq8pyQJGf99e/7N/RHHEyVpbR5CfIkX9+qCb/2Az7N75G3i8ZjA=
+\
+\>"],ExpressionUUID->"44b86e37-6b82-4b3e-90a7-933c9b9fbe25"],
+
+Cell[BoxData[
+ GraphicsBox[{InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwl1glUE9caB/DLUgiLmLJo3KOCRSwJCEoKlEQPskQDKUoJFB4opIBSRJSK
+0hZKQBBBcpRNSjBuNRZEpEjBAmU7GArYFJGCPGPA1oeCAVHQUinvP+2ck5Pz
+y8y991vuTGbtvoMBYl1CiAQf6pv8toBjGY/8c7B5hKXS7TgLJ8yeMe5h8cig
+S+SapTCvzop3Ae4cbkjPY/BIcuZ/xF/DQbHfPZ9byiMlvd91fgZzvLraIuGW
+dr+N0fD8sg+Le5Zg/IxzO3U+zmkzcYVp+ac41HjhnCCi2opHxgwbzsvh5izh
+D05wTGbcqZ/he4K5pDuWPOLzLGT5PFwgXimKh0vUcyZbEa/Hr0ledrDI4JOh
+RDjk0rVtby1wPpz8Wg2T5C1Bv8NvQs85P4f/ZI/IR2DmkvMV5g48Uii+7jcN
+T+xMDtsED8X33bbAfGPWJkVcWDE3fWI77On7KM4P9nHgtR6HFcv7nYNg1uTM
+4np4UFAoCYb/XiccmaHGW7K3BsJnDZ7K2MhHEZufyIcXqgKHI2D3Px5f+QDO
+yrmXmwmbWj9JXQ+HXNCyS+GOdP44Da446/zyG5hu62s4gPg/kvnez4aTQ/ea
+F8EHC2g/hsMcf/Nv98BeoQ0pTMonm9MsYXbUwGg34omQ3AoYRP0an+66Ggkn
+Z+XJL1L96CwWPUP+8uDwq0lwyPWM7ZFw8qyV5244SvvAp88c9escVbvDN+qO
+NLrBDnoNnzjBB3Zc3nT5XeyXEyl0F2p/VE6z6bA8xbfVG041jHTLoKOfP5pf
+ioJrQvdH68PyT4OicuGeocR828WYj13j1gRrrhdlfmaGeg7l/vUK7tcffDy8
+iEdsT9jYOSIfV4G95eewvG545UF4pTpQ5g47TBRbVcIbWFarWHCMxGjvH/Cn
+Vl8GecP9FVtdTVHPWTNZiAR+dejnjLWw2SLTW9T8JUfffuNI9XthutEH67fU
+j3S4wcunsn9vhSMOvsqk9kP1aBjDA/H6NPlXusOlC+L1tXBcrUbgBKuq3XIW
+Ib/s0iNKqp+HP48XboE9VVVNZvCfH2h+EsCKehvGM8SXnezxcDdML1bn3IB7
+Lzoe3QErZ2y8EmD6RJ7HWliTIptiwZzM09d6sZ5ic7W3FvU53UyX28NjolCd
+m/AA86tYMeKV3vCrOgZ7BCu7jiE/+niJjA+7GsabHDLF/Shwa7eBbcUrbgeY
+oH8BpRdNqfvr7iH/94xRjzV3PyTwkpzc+69pPDI1IjHWgWmDfEmvIe6f4fEJ
+MzjHs/Ljmwb43XyCs5Ean3nhZsU7PJJ2KKfBDz4yUDLfro96prk3fwknLm0L
+JjDj7kn7WjiALQ0S66HfsU5lk3BpRrhyRhf7bVYTbY98+7oOlNfAaYb2/fvh
+mrnY0VK4PkxlewU2rXZproBF4ed/GWJT+9q2TANXnszi6KHezruLg50w/9tL
+elmW8BfTuTllsM/VaWMmbKs+022BeOIi1G428H71ptVSOHSV6W9U/+xi3+yk
+IR+ed+joCrhyYvuuwzCjwKhyEVzXV3hVCY85FZ5+ifX5ceb3CepR0jFj0kb1
+KzYjzwoeu7buUTb1fF1XTteFHVblH+DDjeq9we0Y77BH7WcEt+1K4org7C2m
+nkrUI52vlbQinnpGwDs5cH2EcZcOnJBuwfoIZnXZJa1CPlOS1auZsOLO7vTl
+yD9i4ItHb+yRR9EOd6KDeE7NLn4I5/5trLm+wCWKYx6/9MIt7HKm/zyXqFbk
+1XTDe6QtV2bnuIRZt7l5ALaeai+se8MlwtposRYu8S43ks9yiSYgTPou1mO8
+/FjY9opLRJd3KjzgPUxnL7uXXJIw9lpxmNoP/drOkRdckqx6sbUKXimhbZuc
+4uJ5eaZhHHb+SRsfCPuskR3diPzjGl9zLOAEge+tKPhtQWrreup8uLivFK5u
+lJV+BcdM8qO7YKEecz0D86cd3xeupfp/XGkwCqsKjGj66A/nL+//dk9zSeW4
+9IoxbBlj+6Ad8Q0mPrj1jx89LP0B8ata61jU9UxV/v8KZrgkwtFHRs1X9kST
+xke+jGFXZ2o9abn5QyXMGeyuOAerRgPv6b7G9Rlr5vfCualj72txXrjRJcUa
+1n/SbJUBt7wQNjxGvkqBOroV8yt2SeKp56+0w+but1g/5nZPUCRVv2t6TRzE
+R7MYXUbdT6LBqG2pyCfBjWY9i/qL4qb8TSa5RK50LeyBp56ydGqfcUl16x3r
+Krg+VGyw7AmuL9q3uIy6/sRwQ9gI6rMh1ajYnvofKKkVDHGJNP6Uy3lYem7D
+uKMK8VaFvV9L7YfvlRV1zVxCDx173m//73tB2qWmf98PWLz/A7rNAR0=
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {3.077432877509341, 16.88857259237856}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwl1wk4lWkbB/A3awgn+1YOxlKok0GROoeIQrRMtlH2ofgcNYpK3yFkpOzN
+TGbMQSOVsZQGUY5lKFRnxpqlTtpE5WTJNsP3f+ZzXa7H7zzvcz/3fb/v+5yL
+TkDkvmARiqIe4peMnDfL+NFjUf/+qLEommS3bStMn33Ov6DKooxpprEJsHt3
+zJypKovTsJ03awkLFR11x1VY1JeuAyfe6LIoTsj59FYVFmesrHsyG6YVpI03
+Yj4mWeKcHcwf8LYYhh2inBkzOiwqI6SqQQXxi/VcO8tgSvwHx6Pw+eRbHVEw
+N0CE3ov9FF9t1GfBfinX2HvVWByv2U2bNWH2196JvciXWZt4R5TM/yOud0id
+RfVGj/8yT0d+NfGTAngm29Dub1hw3eSphwbqmAnfJo3redEGvvUaLM7PKS1X
+dGDOQaPFlZosTrdOyGsm7K5/jG0FW5qUOAeQfFPfT+3WZFEHn3S0JBGXJvjY
+YN7P+KbVNbL/2/vGcnD6n0ZlzaSe0KcZTdhP6bhFWD/Mqs+19cV+JVn71V+S
+/f6Idn2J/GR55VMvyPWRw/3e6pjfZdLZBfNvVLW3o77QM2v0a2DGo75Ia9R/
+um3EIp3sb7tRvRL9yk4QHfWC6d+l11qgX1zfmXZ1Ev9GUspj9Fv+1cZlPp3U
+O1nGwf2Jj/tVPQHmX+9a4Y756kL6Cgbpz8Tg4+2wIK70Up02rr934Z4rfEWM
+vawFc0WOtJ6GNUMPm6SuRb5Jf7Fwv6nVIYNuK2FuEVdiHfIxzKvk5a1Bfrf6
+bubDmZ3j1Y4wZ8S3jY56yiau6MvBrMvzTiVw1inB5Qkt5GMv32+KfkgOZmwY
+h9n9RpY34BJffsUSzJjS4qqgn2b+sgUGWM9nNRhFwLPjLexDMHvaa+V1uE8x
+v54LV+i0DbXCHirXc97CglePe1tgacOFDhPky4k48lch7FAV7XwEZj0r9gyA
+mbqxgVdIfW1yFyTgEZqGWg1M1y6bz0Y+mh5LgQ2wu//LYBr82NPlP7/BwoZN
+0QmoR6fpeQWHrP+41vMT6pc1bFxlReJHtIUFwfEXOjv6kA99h+WjEfTPeHNk
++mHSD/ubssfheuVA027SD9XuVg147DXzjDXMvZfp9UwZ+0rmKPyA59Dd1KaS
+B+9fGl+cRJ6CmBitZjjVu/qbvTDbsnzra/ijq8vBWuTJvSknoY94Rf8JcmKo
+k+e559VZ8n6WOM/cRd7CVydffoA7pLgyvuQcUFObJO/j71WTy2owP7HPchJe
+E/p8fAIj/WldWCw+l2ja998XcMWEh+UCqd+uWew97GetkR+BfdQmdWNW4XOe
+s8bBR/CY4ED5dpjVeFpTCXlu3SmZFQfT9y7Ob4PFfMUPNcNU8DTHCb4bHjEt
+RfKvU3tlBsf8wTN2Jvnf1pNYwvhzYoJuPEbB6Hx4KUZHtsKlYoz8A93adhiH
+vIpWVGNk7LaJakFc5+u568phnllptRX8vkV9Lo3Eu5o5V4K8kzqbeG5whd4X
+qerwrbOXbedIvquWK7LQHxFr7R9TYIFN8XZNePqt6Hqxf/u12rIW/V43UhAR
+iXW8UYnTUfB5X6maJ7iO1pmc4QiHXo8XrifvWcrNsG0we/6A3XmMGfXn3PZj
+VAuRaR9TwvrUbcPk88X28B0+MNvuqUI/3Jp0uX5YEfUtfxPHRJzCJNN9J2C6
+wt1jNWQfT+s5Q9hP5WtfG+TxpXXWvmkF7DfzRqkFjjN8nj8IV3Ss2O6EvN2V
+wyuHYEal7G+N8O2uZ2IzMF/cvXUd+uB1SGaIjnjCkszeU3Ccsca3PjAllX64
+Ar7P87P/hfjklgNtcFlHjtMbmOGSZ3sfHq08uXc98nevdAvIhcdVmzyCYX5D
+SN4eWKpurjMTZhiJBH7A/pplE69vED99l3kCXtyjPFgK029e1BUi/9BCA81c
+sn7NgMAP7gq6GhEA05oU5Pmo3+iYlagyzN0dI+YAy2pZHC8j+Vd0tbeif/EN
+VsWbYNqCHM8Hto2yKS9EvX7Kj1lScJC5IEcCFj6M9+tCHCmelFzgauwvdfdW
+PfxoyNziPg33Iy/XqBX+PJRhuRbOYGiLTcDhS4cXVsvj/p2zHTEn71/njjZJ
+OfTnn86BbPgH0539BrKIPyuokkB+ns67V55Yhedrw7zJefjsn1Wl8zK4PwpT
+TnKo76qbl89tmJdfdCeHeNChpwCmFpXXKaI/GzyTVRthgYlrCzl/LvEWM6QR
+j/8kLHIYTjxw/FQ07OfjZ7yWvAcnD7vMwhUFcwdsyfflsKRLIvJh5Ob02JPn
+3uOREQ35CusYTCN4IH9nwSVYoGP413vEY9zJMpyGGUXfhOfCZnmOZyxRr4At
+EWhA9tvyYrOrPKlPz+lX5JtWF7fVDKbXb+GqwWb5SyIjWM8/WpZK6uXd3d7t
+A7OHvQLm0Z+YmBcPCpBPxh+93tGweZT5rRrkK5AXaovACTpX+q+hXnbuF2d+
+Rb89jZ79GCON+bY56SA47V7GuIUU7v8Tw0UWLJKw3DYuiXxqP73cBp/oib9Y
+LIHnUdBc7k2es9fJnsfEMa/i/TN5rj4aaPh7i8HndnmMw8mLgUGhorheq5bu
+gf17g6V1r4rAsRNKXXDy1K5pBZgl6n/CE/V81NucUr0C9XHUpQTkfLUdrc2E
+OR+ajwegfqfA4Mv5sPCjdWE/LJdve64fzlg4+YUN+uf3ue27zYgntBhNPA+n
+cNobK2HBnYLM30m/t53u3Yp8eCNFOa1w537v/Icw33RTDJk/5r/z/h7kz1vp
+05NM7leXgVsDzLD9Z5ycdyYOSXE01Muwyknswv5vLtRpWImT8zDhnie8b4+W
+mhlMTzjaSs6tW+qFrz+T9T/ZXiTnTVmUaXkS7C7ylX856i95rh79HPuzlpwz
+DWANt+ElSZjeT5ci7y33q4ASceRPo++ecYCbUptWvaDQj/yxyHm8hyXXyvV3
+LTMpzpd+Nu2wSWJAc/XfTIpt/SDnLmzfE5tisMCkKujaqzpgc8eqlWWzTIrn
+kpa8AKdkf74QPMOkWJ22TjsRv3R5vsd/CusNjDTIOWKe3ipf9QlefSSBjvyE
+jzJfhAqZFCX3TrYIpj9cmyU/QeYbi8m5HFNrcET/I+J57Jsqh53Skvpk4Az3
+3hpj8r3Gdo2tgGlhX9l8T9w3P/sZ67lB734i33s5Pp2sYcTP2JKla4h+p1W3
+Db7F/vTbZ+J2wFqatFOiyI/2/sgkE/42jxukOs2k3I+NR2nBVYqlzjKoJ8PY
+6McBEl/u+7QHsEDb7qc4OPH+Wf+tn5mU0OxrTWnYZUvY2H6YF5vzKgn5KjVY
+i0gSRxoXz6K+B8UO3XuwXnj2fU4I3B99Zb0x9qN9SpEZQH/UlmfZBZPwphlD
+L9iGsSG8Hvm7208dHSPnJjN2v+oH9J/WEZwNO7379pDDKJPiX2wO9oRjWsdG
+N75kUgxFB3sbWHBUul9uCP08+9tWFsze5MBb+BPzxb19gTAngZ0j0Yh4biZ/
+X1X8//8dHO49ikb+UGL9D/eEi/g=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.1542307644825485, 4.562492355174517}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000006366`, 16.999999999996362`}, {
+          13.500000000003638`, 15.5}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.457682641291616, 16.911908554403006}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwd1Qk41GkcB/B/OtZapMORnJNKyA5JKukvcuTI5ljs7CRyjiuxqwhZocmu
+u0PZDjxNjqKLzfF4HCVUZlLKljMhV5GMY9nv6/8888zzmXnn/f1+33nnP6ru
+QYc8RSiKOo4HeV68Ypg0JVzAJU1T8jcldaPgYBFZpzwZmrrtn+oXB19b4hdn
+KUtTB1Q7itPglJCDVn1w4L6hizz4DSe095gcTZUtY1nWw4m+s+xBWNiVn9AP
+h/OD583W0VSuat1TCR2sfyIITYD9ptZY68PFCe9kbsEf3jZpHIY/L4yOF8CS
+M18j4+EWVbolFR7obArKJ+9v/VWaDVuz3rs9hX3sAy9Iw9/GAye7YZ7xlEMV
+6teV926dIOtXfVM+DLPNREPn4IuCHw0X0P+3FSdy/iP17zCm8uDHugU/TJH9
+5oP2usI90yc5g3CM4wVjBtxxL+rjK9h5V/LKpXDG7dKvlbBQXMuZgj8NnbXJ
+gd1yPXQV4KiKzS8S4OolbgtO8DDF9wggDpPwvAOfl/f86EhcFHKEgf5o/5bv
+TOBwXlVYASyiIdAn+cR45H00xXzD1WHnmKT+SIjkAByzxatUl9RPMqr4Ux55
+zs7OGsINjKEs7fU0FTqesekgHMzRyaqFc719033I/B8E9mYKNGW6vlQ/kdSL
+PuBdArP5lQWFJG+jN48pRZqybXpo0Uryyz//RQc+1MjTJ3mpL3eRNYXjqNpz
+G3Xx+bmDagbwsGG9lxXMc3t+T4qsvzf8fQBcbTH8iY/9r7T0TiTCFmaqe07D
+ws12k9lwMaWhtBHOkGg0LiDrHS/l1aFfcU2riGLiDuMt3rBtenBpEdlffXPr
+GrhZc39UDkz1vd7Lx/z5FXk1abC6Sb90Hrw2qqA1Ela51FOVDosEddp6kHpb
+1DdcgwXeJgvmcOKIxekmeDThxDMtMo+yHksa+xtNR1xdA7dM6sZGwO5lHKN5
+zK9ia6c1A/82Nms4SvJp5Oglof+46IGuD3AXZ4KtifnZrx5J9cJy8hvvt8AV
+MT1m5DzR5e29oUr4ngrbueS8CR9Z3ZZSpin/l1XBEqhHb++3yoYPPXBQ1oBF
+5XZ7i6nQlK5Qj2UNt6aI7d4Jty49mh0CJy27ftIFZlWylS+TeU7I2vnBotPs
++VqSF8OlhgOLhQX8NARf6a+6z4bfnarcv3IbvMeh3RQuPNpooA07mEdmq8Cf
+e6tfmMHUg1szg+hn3KNPzBku+5xcz4VjM7vtj8B20V6dGrCrQCveHVb/qyaT
+j/m8xGW//AK7zUS0nYFZii72trAPy5NvAxuN+Lbsgi9KdmVqEy/V6WIQq+xp
+1VQidRd2isIpM9M55jCv+b/yYfQvF9HkFQv7HfG1E8DOrmq17fCnbnXBI5hZ
+cqbUBv3sYhqM34R9ZOLrX8Mz6QGL+Qj3rl1ngPnc2r4cy4TjQicLzpK8JlMv
+XyB5Os3GvoNdTZveXyd5jidPaKnifjCmsuI+qWcUHvY7LHAcC34GN7wNfFUG
+Sz3PWD0Ch3Ln3UfhruP+8avQv1q3mKwMA6/L1jF2wkzHjmJtOEv+jhTJy19B
+sWEHPFDo5sWFDXwuC3SIq9L3FcPFybWKSjAlFd7Phxs0hsrnsX9u7Y2XI3Dr
+jhyv1zA3OrtNRA+/C5uin3mwwvnOTVJwypN6+XC4+biRhzSx8VtXSzj+H50b
+q2GL5aeKlGGVqqscUXgtN+vwPOZvv2Vydwr7J5VomQ3AzL51j7tJv2N3Mzth
+J/FM4wY42O/vmj6Yu483XkjO08NI/1m4ImSsOnUbuZ+IOapgfyHHOy0cNrUo
+9LAn/cUZMj3gCg3VB2mwvt32rfawXnH8w39hSTn1F5Ywz1bvgCbJj1k1Zw5b
+K7h+PQXHP+UyyXmy7u0Tb4GTfLRDWLB4e++E4gaamvtj0DGEnOdM//1H4Ujf
+XJFkOLdrh9g1ePWItFEJ3LxEoec5/CbTNaoNluuX3TQGL/5JIo/FS43+H88X
+pNI=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.631304063066693, 8.096807950948126}, \
+{1, -1}], LineBox[CompressedData["
+1:eJwd1AlQU1cUBuBbFwiEfROF1kCC2FEEZUeWJ0SlaAXLIiBbUaDDCMYFiIA0
+rImIEqhSZNMqiwvSFIGiUxVbEZFKAdEShyrYmKJQRQsMQ0vof81M5s037957
+/nPeSyxi938Rt4gQsgtfeiWqhYWFr+0Y8uFjwhCjgf3+l2A9j7ibunBhb825
+AdhU+Y+jypghHSuttObgkaM6rB54gNd+7+P1DLl/gHSmwa83dm50h1ltt+Tq
+8NrsUV4QPMKsiBAZMSSqqrlqL3VVyO2/DBmipXRemwRfnMw9vBnmtzT1Uwuf
+W2d+Z8CQHTVXSAI9n1vxdjG892BCZRhMnKckh/UZ0nL8wsstcPlvYrs5PYYM
+7hg7YAeHxh8tq4CHfR00TWHZZvGzMDjvdcrpBdpv8rFYNzjTJezfMVia/HOx
+O1wTyWY9gceGhCNRdH9S2c778OrHhe+r4TJFNOcOLJKXXJ+CX7ywiqAW8lu6
+I5BHdfZUVjfsq9ff1gsXtboVyem8uHk53sivbOUbvYNdvqwzkMES+yXOusgn
+2BZ/SRf9V/SPNm+g/RxYHhoOr1POzdB+WZ7zcYWwhLvLLRcO0DCuq4RTC6LK
+GmEXSyvZcVgYp84dpP2WuerQ/aldKwxn6TwdLrqy4ION470mG7C+warwDK3/
+cIptC4uW2S82hKV81XMv2NfzrkYG8rsPN/X6wuekSUvl6Nfg0u2+z+DymjPv
+Hag5CUE+sN4j/pCNLkNm6qednOA+/eB4bR2GbGla1M6FZcIQoYk28ijG4rXh
+joibxUFaDOHtq2VPI99kx5xZH5shTiGJRcPUBenzJ+DQxdn9nXDfN9EexXD5
+T3MXm2HRoTUqul4ZNn2llvYrcqjfjvNaLMdXVdP7MymbZmHLkkNqH/y3vnEX
+6ue8knbT9ZNe87svI195anB6CyzljVuUIr9T4udXe+DVtcplzuhP4N0mfkXn
+e8ss61t4idL6Vy3kb8/5w/dPeMx1asIeJvmTTUaYV6OHDTeSzqMyNtkaHv7+
+P0kBPCtvYi+HOfJ7jk1wzLOTM2PYv84/LXyAnicLKS2H458FRryj8zWNtlgD
+t4m7JjTsGWI3Ff3pNuSr33PX3AxmagX55shfcLUqkQdLbRoM5Og3Iim/24qa
+/8kdKeYjiQo8vxIW2LO6AzXxHvonPDSAOxQbb6zXYMiNfbwCAstqxKddWPh9
+dVwOfY36Uhl3/pA6Q1b5vNSk+QTirZIJNYZkvfHKuU6fb/BTnwbYr/14w3na
+/0dVCXXwE7Mf/IphztIVfAWsEA2qZ8MBXhmJkTjvyaZ02yMwk/GYrY56D0rZ
+14T0ftqxwkFq2bCJCLaz9XD8Efma/XIT6Xl9uy9wziL/SdmbrfV0vzLFMBP9
+zcT6y3+h9W3mUj3Rf8VA6kslfb/CLTyH4BcBs6Pa6E80MdLqgedvOqrScIYD
+fGQb4un72J4vjIFjEs1LtsMPhpP5Erreez77LfYrv/q9qhHm5I5U74TzXJcq
+euj6lYWeR1D/6Z6oLgVdX9nJESBf3zW1wBk631OqR97IT/9fF+BJelVn/gcL
+PvkH
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.547014064132036, 3.0238996897848462}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwt1gk0lGsYB/CPI0m2iLGUOxhTjGXaFBVfK1Ky3lRTJhlUipSkVF/lilvu
+SEmWsaVFRzVdUcnIpUVaTFe3yJK4ipLRIpUb9/92mnOcOb/zfO/y/J8xZ8yC
+InxEyhRFHcQfeWdG8NrHp6kfLwO6at5MP/d1MPuavLlIn6bFIt9ZLnCe4EZA
+mD5NdUts7xmTeqtBhDOc4BrEeWOP9cuGde30aYZ9PiMiB263uW06C/Wl497d
+9IOFB8XuApj7lfLQhumj0dYZcHtwA0tuh/cdOm69WF/1e2D3SViHe2uajwHN
+rHSdzd0Ey7dnXLpjQFNTHVQaXGFhhmrrQhbNWFu47bGHmc78qLssmvqmCHIy
+h/N8tnx2M6SpowvSTv8CV6m5fKsxpBmj4jX/cuFIafqKaUY0Y9jZeckB5pdF
+h6XCr0dprV9GzgtKcWo1oqkxCws1NsD06OZyHWOa6f5QHn+InH9/wzNrY5qK
+p2Liz8DSiwtOEGf3c2/WkOd9uWw8T+0fyRpqgamBW5Ut2N/frdimn+zflvaI
+nOehKT80BKdU1hXOgNeovTz5neSRmbrxHu4/arK5zwDpx9lJ4QMnKtpYHeS8
+LM62Z+h3paX5XXJef17nZgH8crfj1UyyXq7wfo28kswGSkPJ827pXnvgLw4P
+hnkkj9PlbAvk+2q/q22PLfYPq69rQf7t71x5+TAdLoq7gPl8dOw1+ZXUZxqL
+0lE3yhteoA4LP8blZKHul9nXf9MG+bHe/VIOK2ltCoyFq4q/Vr7H87nLSgtm
+we2j586hcb4sVJY8woNVJgkKcP6SzSq59XDklEL18ZhnebF5fxGss8kwMQX9
+zEk8ayUm9XMVEl3MLzCmcfc+YifTZ8eRh6QrJ3sX2c93UeU45NcYfKOO1Omk
+t6x4eO5h46fJsDzUeuJruGqhwuYULPTiSh0wn/wupXcymJq4NSkC9laL/tJM
+9o/mC8TwOjcTzSG4an+s4ji8tEbQaoh+2JI6HgOb8jKtpsFUitYEH1izbaDR
+FZZyTTs0yOdFL0rHn7jSObcEnyeX/SLXlXDkjTzvJbjPDk1RgC9Zr73q3D/o
+75Zpd/J84r6/6lfBBp9MznPJ+oaQWS+Qj9YucQ/Jj5+ttzoM9qzLoEh+jFJs
+3BDyTMhJ10sj/XSO3yaBa/v8zvuSPDmNW8n/U4+7ba4GyafsWdNEWNSarV5t
+jfxqRusrw4uPWNjsgPku2bvxfUDlc2O9eaReOH2REeoT9nJknVY4L3NHggec
+1ZOcnA+zn06ZnQaXxuSdDiEOlAg+wq7yofTpsPzyNeUgzFOyNjtNA/YSCcUt
+cOeY60LFZOQ76PRyDfqNtwtd2AqnvPU40o75nq0RjnsKs+1k+oHIq69Dm90E
+e2314D+BL9+qXdEF68y78dkJeR+c1OH0lTy/8W8zzI9RYbiDujhP+vjAzIeY
+j8uh7lg+ud+A8+UPcFdNa8Jy0o/sMWsYVqJr5JutSH4JegqsP/tfhW4SLGx7
+H3EHtq0IsMqF2+9a6SXAR8vZ1hdJP5eed/PhoCvlO6+QflX1qutwv+DE841S
+sr7RnheA+UuKP+0qgOnNVx3b0F/Z8JjRP/bX8PALgrf5ZeYEk/uWGA32IJ+d
+7hYtM0h9bXDMLjj18ZIH39Ef/fBirSHmz4vz7JBNJt+flovvIe/EItXuGFIf
+TD0ghme02r6xJXWNQfYW+FjhbbOOSdhPNepqCOZ7PTG1+QRM/XFbFgs7F8nW
+esL9vbzEM3DphCsN6jBdUun5Fus1D6+0ecRFXctk3iKc3/DwuFYmXKW66bQU
+rvW2qI6AI3X3KFlhniWlu829iHM4S4vg+VNWp80m669Vc2yQj36ZSHUqzPZK
+1SpGPs6X1LqJdcZaX7Ag+TudcJwL0yknR5Lh8Mn+qcvJ+uPi9FeYV0Hc2Clh
+cN6ZuXVWJjQV3rdC+zdi34pGPxOa8VMb9eUULJzprxWC+t3XgbnVpL7Rq0EA
+px9IqGgj51nuKXHE83trT5h/JvVjNgH4PDDsZUWNquhfav8y+gLOU4SK7bVh
+JiDu4hLU3y4QPdEkeV2fuuE5ub8d74USzL9JFaxDf0tZt1veYD+pRtmfXZiv
+2cP3DbWkH9kAKxx5KDUpL8qGU56UTv+G+WpUrOCEwHL1JoM0uEa5qX4SsXaU
+yzx4xqtXIx2WuK8pa6sy8u6NWnclA2bebEhoxnzqBVmmnnDKIYnPI9jlvnWS
+MszP8k9GnVLTPeV8nYP7qsvqsJ4aWe8ZuR1mwnnMfPhJ+vBEB7i911L/JOvn
+7wLOz3dD+n9/iwB3
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.131120426728657, 4.809365547472548}, \
+{0, 1}], LineBox[CompressedData["
+1:eJw9lAtME1kUhmd1SwrrIj7WFGbG2pkRFFBBtKJGORCRGkQRkLfsUsWIBNsV
+TDCk2KrxibsVQUVAwkvLM1QREBHQrLBrguIKigSxChrLIjbGDeALb6M5k0xO
+vtyZe+855/+PTKkKSZhCUVQAea3x2yPAnJ+skQcqWDkjfokA7bGD27h/OKC0
+F1npVgGenC4UmU4QFre6FqoEmLj/wtM2gHBka3mbRgAVVTJUMSkDSr/ppjlD
+gEgbi368nrAp/87PKQIkdRTJlqkIW/rM1dEC1N0MUOa4El6gz30oJ+d/SXnk
++d88oNoqfUW2AniYumxeXSGs3V67/CEPDQOJq30PEe563l9zjofzJjtt6jbC
+v32YGI/kIVJcUOnvR3jXvsEWRx6K1maP2SwlfEwx09jPQcvr+oNn3Anr7cN2
+lXLwZfezoWBPwuM5hzekcOBc53F7uY91PVSTFMjB+gcPfukJI0wlhmsXc1BV
+KLqerCbceMdym+UgwilN8/lPwqa1WWZHDkKqu+wijIQVgfPn8hy4aatPr/yX
+sOWa+pM3B+WN/iGJFsLiyuiz0RwMzvpxpMOW5D9+S5xxhIO+qS3JSQzhtIE9
+PU3k+x/K3a46E1aUlCj/56B2e1RalAthB2ANXjzUMd0HdCxhSfe9yb08PGuv
+qW4TE270m2yo5SE9qWwFb7bmryv0GObh8t7eC26thL1HTGOMAJ35Lx06T1rr
+va57aL0AqXKTd3wwYbXy7eKdAhR06nbk2lvzU+zX7RfgsWJGaK9eSniKrZ1W
+gBxvq16kuO7VN1rlopqL/3cd/STvfMHi/rJ6nz/W/Mri+WrzsoGE1wzer3nN
+5rsGHYP3n73xmv76IgbzC8wpLs0YpTH/YnME9fkvGutjiAmaHmSksX6PkmsM
+uVdorG84fVhY2EFj/f0+jrmoR2jsT4MxNWaRlMH+XeXK+jNjGOzvzr/jhrcU
+MNj/2NHpIpGJQX0YB9+fEqQs6idDG9u9NZxFfbU0XUzP1rGoP/c8X3lcAYv6
+zNyS9aH3Eov67Sh77PAuj0V9R81sN6Sms6j/vvjhyTn+LPojL8H9uGaCQf+U
+K+PeeV1g0F9PnSWh+QsZ9F/RZfXqngoa/emV3dx8Tkajf9N3zBuwz3JCf7ty
+TfIKygn9Lzm0Kv/N7444H9KCbr33GZbg/NAkrlx3I5nw9/nydJo1SuAr7LO5
+Vw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.354800000000001, 7.75}, {1, 0}], 
+        LineBox[{{6.4999999999976925`, 15.5}, {13.49999999999251, 15.5}}], 
+        PolygonBox[{{9.4, 15.5}, {10.6, 15.1}, {10.6, 15.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 16.4452}, {0, -1}], 
+        LineBox[{{6.499999999996362, 15.500000000005457`}, {10., 
+         9.500000000003638}}], 
+        PolygonBox[{{8.552322615314452, 11.98173265946094}, {
+         7.602165824326175, 12.816718930329426`}, {8.293188945044921, 
+         13.219815750748694`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.515942703607428, 12.323799910437668}, \
+{1, 1}], LineBox[{{13.500000000007276`, 15.500000000005457`}, {
+         10.000000000003638`, 9.500000000001819}}], 
+        PolygonBox[{{12.052322615314452`, 13.01826734053906}, {
+         11.102165824326175`, 12.183281069670574`}, {11.793188945044921`, 
+         11.780184249251306`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.484057296392571, 12.323799910437668}, \
+{-1, 1}], 
+        {PointSize[0.04], PointBox[{6.5, 15.5}], PointBox[{10., 6.}], 
+         PointBox[{13.5, 15.5}], PointBox[{16.5, 5.5}], PointBox[{10., 9.5}]},
+         InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T19", " ", "P1", " ", "N37"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdiei/gigjfhfjhj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdiei/gigjfhfjhj.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {0, 44}, {0, 0}, {22, 22}], InsetBox[
+    GraphicsBox[
+     TagBox[
+      TooltipBox[
+       {Thickness[0.005], LineBox[CompressedData["
+1:eJwl1glUE9caB/DLUgiLmLJo3KOCRSwJCEoKlEQPskQDKUoJFB4opIBSRJSK
+0hZKQBBBcpRNSjBuNRZEpEjBAmU7GArYFJGCPGPA1oeCAVHQUinvP+2ck5Pz
+y8y991vuTGbtvoMBYl1CiAQf6pv8toBjGY/8c7B5hKXS7TgLJ8yeMe5h8cig
+S+SapTCvzop3Ae4cbkjPY/BIcuZ/xF/DQbHfPZ9byiMlvd91fgZzvLraIuGW
+dr+N0fD8sg+Le5Zg/IxzO3U+zmkzcYVp+ac41HjhnCCi2opHxgwbzsvh5izh
+D05wTGbcqZ/he4K5pDuWPOLzLGT5PFwgXimKh0vUcyZbEa/Hr0ledrDI4JOh
+RDjk0rVtby1wPpz8Wg2T5C1Bv8NvQs85P4f/ZI/IR2DmkvMV5g48Uii+7jcN
+T+xMDtsED8X33bbAfGPWJkVcWDE3fWI77On7KM4P9nHgtR6HFcv7nYNg1uTM
+4np4UFAoCYb/XiccmaHGW7K3BsJnDZ7K2MhHEZufyIcXqgKHI2D3Px5f+QDO
+yrmXmwmbWj9JXQ+HXNCyS+GOdP44Da446/zyG5hu62s4gPg/kvnez4aTQ/ea
+F8EHC2g/hsMcf/Nv98BeoQ0pTMonm9MsYXbUwGg34omQ3AoYRP0an+66Ggkn
+Z+XJL1L96CwWPUP+8uDwq0lwyPWM7ZFw8qyV5244SvvAp88c9escVbvDN+qO
+NLrBDnoNnzjBB3Zc3nT5XeyXEyl0F2p/VE6z6bA8xbfVG041jHTLoKOfP5pf
+ioJrQvdH68PyT4OicuGeocR828WYj13j1gRrrhdlfmaGeg7l/vUK7tcffDy8
+iEdsT9jYOSIfV4G95eewvG545UF4pTpQ5g47TBRbVcIbWFarWHCMxGjvH/Cn
+Vl8GecP9FVtdTVHPWTNZiAR+dejnjLWw2SLTW9T8JUfffuNI9XthutEH67fU
+j3S4wcunsn9vhSMOvsqk9kP1aBjDA/H6NPlXusOlC+L1tXBcrUbgBKuq3XIW
+Ib/s0iNKqp+HP48XboE9VVVNZvCfH2h+EsCKehvGM8SXnezxcDdML1bn3IB7
+Lzoe3QErZ2y8EmD6RJ7HWliTIptiwZzM09d6sZ5ic7W3FvU53UyX28NjolCd
+m/AA86tYMeKV3vCrOgZ7BCu7jiE/+niJjA+7GsabHDLF/Shwa7eBbcUrbgeY
+oH8BpRdNqfvr7iH/94xRjzV3PyTwkpzc+69pPDI1IjHWgWmDfEmvIe6f4fEJ
+MzjHs/Ljmwb43XyCs5Ean3nhZsU7PJJ2KKfBDz4yUDLfro96prk3fwknLm0L
+JjDj7kn7WjiALQ0S66HfsU5lk3BpRrhyRhf7bVYTbY98+7oOlNfAaYb2/fvh
+mrnY0VK4PkxlewU2rXZproBF4ed/GWJT+9q2TANXnszi6KHezruLg50w/9tL
+elmW8BfTuTllsM/VaWMmbKs+022BeOIi1G428H71ptVSOHSV6W9U/+xi3+yk
+IR+ed+joCrhyYvuuwzCjwKhyEVzXV3hVCY85FZ5+ifX5ceb3CepR0jFj0kb1
+KzYjzwoeu7buUTb1fF1XTteFHVblH+DDjeq9we0Y77BH7WcEt+1K4org7C2m
+nkrUI52vlbQinnpGwDs5cH2EcZcOnJBuwfoIZnXZJa1CPlOS1auZsOLO7vTl
+yD9i4ItHb+yRR9EOd6KDeE7NLn4I5/5trLm+wCWKYx6/9MIt7HKm/zyXqFbk
+1XTDe6QtV2bnuIRZt7l5ALaeai+se8MlwtposRYu8S43ks9yiSYgTPou1mO8
+/FjY9opLRJd3KjzgPUxnL7uXXJIw9lpxmNoP/drOkRdckqx6sbUKXimhbZuc
+4uJ5eaZhHHb+SRsfCPuskR3diPzjGl9zLOAEge+tKPhtQWrreup8uLivFK5u
+lJV+BcdM8qO7YKEecz0D86cd3xeupfp/XGkwCqsKjGj66A/nL+//dk9zSeW4
+9IoxbBlj+6Ad8Q0mPrj1jx89LP0B8ata61jU9UxV/v8KZrgkwtFHRs1X9kST
+xke+jGFXZ2o9abn5QyXMGeyuOAerRgPv6b7G9Rlr5vfCualj72txXrjRJcUa
+1n/SbJUBt7wQNjxGvkqBOroV8yt2SeKp56+0w+but1g/5nZPUCRVv2t6TRzE
+R7MYXUbdT6LBqG2pyCfBjWY9i/qL4qb8TSa5RK50LeyBp56ydGqfcUl16x3r
+Krg+VGyw7AmuL9q3uIy6/sRwQ9gI6rMh1ajYnvofKKkVDHGJNP6Uy3lYem7D
+uKMK8VaFvV9L7YfvlRV1zVxCDx173m//73tB2qWmf98PWLz/A7rNAR0=
+         "]], 
+        InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           
+           9.996694214876033]& ], {3.077432877509341, 16.88857259237856}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwl1wk4lWkbB/A3awgn+1YOxlKok0GROoeIQrRMtlH2ofgcNYpK3yFkpOzN
+TGbMQSOVsZQGUY5lKFRnxpqlTtpE5WTJNsP3f+ZzXa7H7zzvcz/3fb/v+5yL
+TkDkvmARiqIe4peMnDfL+NFjUf/+qLEommS3bStMn33Ov6DKooxpprEJsHt3
+zJypKovTsJ03awkLFR11x1VY1JeuAyfe6LIoTsj59FYVFmesrHsyG6YVpI03
+Yj4mWeKcHcwf8LYYhh2inBkzOiwqI6SqQQXxi/VcO8tgSvwHx6Pw+eRbHVEw
+N0CE3ov9FF9t1GfBfinX2HvVWByv2U2bNWH2196JvciXWZt4R5TM/yOud0id
+RfVGj/8yT0d+NfGTAngm29Dub1hw3eSphwbqmAnfJo3redEGvvUaLM7PKS1X
+dGDOQaPFlZosTrdOyGsm7K5/jG0FW5qUOAeQfFPfT+3WZFEHn3S0JBGXJvjY
+YN7P+KbVNbL/2/vGcnD6n0ZlzaSe0KcZTdhP6bhFWD/Mqs+19cV+JVn71V+S
+/f6Idn2J/GR55VMvyPWRw/3e6pjfZdLZBfNvVLW3o77QM2v0a2DGo75Ia9R/
+um3EIp3sb7tRvRL9yk4QHfWC6d+l11qgX1zfmXZ1Ev9GUspj9Fv+1cZlPp3U
+O1nGwf2Jj/tVPQHmX+9a4Y756kL6Cgbpz8Tg4+2wIK70Up02rr934Z4rfEWM
+vawFc0WOtJ6GNUMPm6SuRb5Jf7Fwv6nVIYNuK2FuEVdiHfIxzKvk5a1Bfrf6
+bubDmZ3j1Y4wZ8S3jY56yiau6MvBrMvzTiVw1inB5Qkt5GMv32+KfkgOZmwY
+h9n9RpY34BJffsUSzJjS4qqgn2b+sgUGWM9nNRhFwLPjLexDMHvaa+V1uE8x
+v54LV+i0DbXCHirXc97CglePe1tgacOFDhPky4k48lch7FAV7XwEZj0r9gyA
+mbqxgVdIfW1yFyTgEZqGWg1M1y6bz0Y+mh5LgQ2wu//LYBr82NPlP7/BwoZN
+0QmoR6fpeQWHrP+41vMT6pc1bFxlReJHtIUFwfEXOjv6kA99h+WjEfTPeHNk
++mHSD/ubssfheuVA027SD9XuVg147DXzjDXMvZfp9UwZ+0rmKPyA59Dd1KaS
+B+9fGl+cRJ6CmBitZjjVu/qbvTDbsnzra/ijq8vBWuTJvSknoY94Rf8JcmKo
+k+e559VZ8n6WOM/cRd7CVydffoA7pLgyvuQcUFObJO/j71WTy2owP7HPchJe
+E/p8fAIj/WldWCw+l2ja998XcMWEh+UCqd+uWew97GetkR+BfdQmdWNW4XOe
+s8bBR/CY4ED5dpjVeFpTCXlu3SmZFQfT9y7Ob4PFfMUPNcNU8DTHCb4bHjEt
+RfKvU3tlBsf8wTN2Jvnf1pNYwvhzYoJuPEbB6Hx4KUZHtsKlYoz8A93adhiH
+vIpWVGNk7LaJakFc5+u568phnllptRX8vkV9Lo3Eu5o5V4K8kzqbeG5whd4X
+qerwrbOXbedIvquWK7LQHxFr7R9TYIFN8XZNePqt6Hqxf/u12rIW/V43UhAR
+iXW8UYnTUfB5X6maJ7iO1pmc4QiHXo8XrifvWcrNsG0we/6A3XmMGfXn3PZj
+VAuRaR9TwvrUbcPk88X28B0+MNvuqUI/3Jp0uX5YEfUtfxPHRJzCJNN9J2C6
+wt1jNWQfT+s5Q9hP5WtfG+TxpXXWvmkF7DfzRqkFjjN8nj8IV3Ss2O6EvN2V
+wyuHYEal7G+N8O2uZ2IzMF/cvXUd+uB1SGaIjnjCkszeU3Ccsca3PjAllX64
+Ar7P87P/hfjklgNtcFlHjtMbmOGSZ3sfHq08uXc98nevdAvIhcdVmzyCYX5D
+SN4eWKpurjMTZhiJBH7A/pplE69vED99l3kCXtyjPFgK029e1BUi/9BCA81c
+sn7NgMAP7gq6GhEA05oU5Pmo3+iYlagyzN0dI+YAy2pZHC8j+Vd0tbeif/EN
+VsWbYNqCHM8Hto2yKS9EvX7Kj1lScJC5IEcCFj6M9+tCHCmelFzgauwvdfdW
+PfxoyNziPg33Iy/XqBX+PJRhuRbOYGiLTcDhS4cXVsvj/p2zHTEn71/njjZJ
+OfTnn86BbPgH0539BrKIPyuokkB+ns67V55Yhedrw7zJefjsn1Wl8zK4PwpT
+TnKo76qbl89tmJdfdCeHeNChpwCmFpXXKaI/GzyTVRthgYlrCzl/LvEWM6QR
+j/8kLHIYTjxw/FQ07OfjZ7yWvAcnD7vMwhUFcwdsyfflsKRLIvJh5Ob02JPn
+3uOREQ35CusYTCN4IH9nwSVYoGP413vEY9zJMpyGGUXfhOfCZnmOZyxRr4At
+EWhA9tvyYrOrPKlPz+lX5JtWF7fVDKbXb+GqwWb5SyIjWM8/WpZK6uXd3d7t
+A7OHvQLm0Z+YmBcPCpBPxh+93tGweZT5rRrkK5AXaovACTpX+q+hXnbuF2d+
+Rb89jZ79GCON+bY56SA47V7GuIUU7v8Tw0UWLJKw3DYuiXxqP73cBp/oib9Y
+LIHnUdBc7k2es9fJnsfEMa/i/TN5rj4aaPh7i8HndnmMw8mLgUGhorheq5bu
+gf17g6V1r4rAsRNKXXDy1K5pBZgl6n/CE/V81NucUr0C9XHUpQTkfLUdrc2E
+OR+ajwegfqfA4Mv5sPCjdWE/LJdve64fzlg4+YUN+uf3ue27zYgntBhNPA+n
+cNobK2HBnYLM30m/t53u3Yp8eCNFOa1w537v/Icw33RTDJk/5r/z/h7kz1vp
+05NM7leXgVsDzLD9Z5ycdyYOSXE01Muwyknswv5vLtRpWImT8zDhnie8b4+W
+mhlMTzjaSs6tW+qFrz+T9T/ZXiTnTVmUaXkS7C7ylX856i95rh79HPuzlpwz
+DWANt+ElSZjeT5ci7y33q4ASceRPo++ecYCbUptWvaDQj/yxyHm8hyXXyvV3
+LTMpzpd+Nu2wSWJAc/XfTIpt/SDnLmzfE5tisMCkKujaqzpgc8eqlWWzTIrn
+kpa8AKdkf74QPMOkWJ22TjsRv3R5vsd/CusNjDTIOWKe3ipf9QlefSSBjvyE
+jzJfhAqZFCX3TrYIpj9cmyU/QeYbi8m5HFNrcET/I+J57Jsqh53Skvpk4Az3
+3hpj8r3Gdo2tgGlhX9l8T9w3P/sZ67lB734i33s5Pp2sYcTP2JKla4h+p1W3
+Db7F/vTbZ+J2wFqatFOiyI/2/sgkE/42jxukOs2k3I+NR2nBVYqlzjKoJ8PY
+6McBEl/u+7QHsEDb7qc4OPH+Wf+tn5mU0OxrTWnYZUvY2H6YF5vzKgn5KjVY
+i0gSRxoXz6K+B8UO3XuwXnj2fU4I3B99Zb0x9qN9SpEZQH/UlmfZBZPwphlD
+L9iGsSG8Hvm7208dHSPnJjN2v+oH9J/WEZwNO7379pDDKJPiX2wO9oRjWsdG
+N75kUgxFB3sbWHBUul9uCP08+9tWFsze5MBb+BPzxb19gTAngZ0j0Yh4biZ/
+X1X8//8dHO49ikb+UGL9D/eEi/g=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {5.1542307644825485, 4.562492355174517}, \
+{0, 1}], 
+        {Dashing[{0.030000000000000002`, 0.030000000000000002`}], 
+         LineBox[{{20.000000000006366`, 16.999999999996362`}, {
+          13.500000000003638`, 15.5}}]}, InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["H",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {16.457682641291616, 16.911908554403006}, \
+{0, -1}], LineBox[CompressedData["
+1:eJwd1Qk41GkcB/B/OtZapMORnJNKyA5JKukvcuTI5ljs7CRyjiuxqwhZocmu
+u0PZDjxNjqKLzfF4HCVUZlLKljMhV5GMY9nv6/8888zzmXnn/f1+33nnP6ru
+QYc8RSiKOo4HeV68Ypg0JVzAJU1T8jcldaPgYBFZpzwZmrrtn+oXB19b4hdn
+KUtTB1Q7itPglJCDVn1w4L6hizz4DSe095gcTZUtY1nWw4m+s+xBWNiVn9AP
+h/OD583W0VSuat1TCR2sfyIITYD9ptZY68PFCe9kbsEf3jZpHIY/L4yOF8CS
+M18j4+EWVbolFR7obArKJ+9v/VWaDVuz3rs9hX3sAy9Iw9/GAye7YZ7xlEMV
+6teV926dIOtXfVM+DLPNREPn4IuCHw0X0P+3FSdy/iP17zCm8uDHugU/TJH9
+5oP2usI90yc5g3CM4wVjBtxxL+rjK9h5V/LKpXDG7dKvlbBQXMuZgj8NnbXJ
+gd1yPXQV4KiKzS8S4OolbgtO8DDF9wggDpPwvAOfl/f86EhcFHKEgf5o/5bv
+TOBwXlVYASyiIdAn+cR45H00xXzD1WHnmKT+SIjkAByzxatUl9RPMqr4Ux55
+zs7OGsINjKEs7fU0FTqesekgHMzRyaqFc719033I/B8E9mYKNGW6vlQ/kdSL
+PuBdArP5lQWFJG+jN48pRZqybXpo0Uryyz//RQc+1MjTJ3mpL3eRNYXjqNpz
+G3Xx+bmDagbwsGG9lxXMc3t+T4qsvzf8fQBcbTH8iY/9r7T0TiTCFmaqe07D
+ws12k9lwMaWhtBHOkGg0LiDrHS/l1aFfcU2riGLiDuMt3rBtenBpEdlffXPr
+GrhZc39UDkz1vd7Lx/z5FXk1abC6Sb90Hrw2qqA1Ela51FOVDosEddp6kHpb
+1DdcgwXeJgvmcOKIxekmeDThxDMtMo+yHksa+xtNR1xdA7dM6sZGwO5lHKN5
+zK9ia6c1A/82Nms4SvJp5Oglof+46IGuD3AXZ4KtifnZrx5J9cJy8hvvt8AV
+MT1m5DzR5e29oUr4ngrbueS8CR9Z3ZZSpin/l1XBEqhHb++3yoYPPXBQ1oBF
+5XZ7i6nQlK5Qj2UNt6aI7d4Jty49mh0CJy27ftIFZlWylS+TeU7I2vnBotPs
++VqSF8OlhgOLhQX8NARf6a+6z4bfnarcv3IbvMeh3RQuPNpooA07mEdmq8Cf
+e6tfmMHUg1szg+hn3KNPzBku+5xcz4VjM7vtj8B20V6dGrCrQCveHVb/qyaT
+j/m8xGW//AK7zUS0nYFZii72trAPy5NvAxuN+Lbsgi9KdmVqEy/V6WIQq+xp
+1VQidRd2isIpM9M55jCv+b/yYfQvF9HkFQv7HfG1E8DOrmq17fCnbnXBI5hZ
+cqbUBv3sYhqM34R9ZOLrX8Mz6QGL+Qj3rl1ngPnc2r4cy4TjQicLzpK8JlMv
+XyB5Os3GvoNdTZveXyd5jidPaKnifjCmsuI+qWcUHvY7LHAcC34GN7wNfFUG
+Sz3PWD0Ch3Ln3UfhruP+8avQv1q3mKwMA6/L1jF2wkzHjmJtOEv+jhTJy19B
+sWEHPFDo5sWFDXwuC3SIq9L3FcPFybWKSjAlFd7Phxs0hsrnsX9u7Y2XI3Dr
+jhyv1zA3OrtNRA+/C5uin3mwwvnOTVJwypN6+XC4+biRhzSx8VtXSzj+H50b
+q2GL5aeKlGGVqqscUXgtN+vwPOZvv2Vydwr7J5VomQ3AzL51j7tJv2N3Mzth
+J/FM4wY42O/vmj6Yu483XkjO08NI/1m4ImSsOnUbuZ+IOapgfyHHOy0cNrUo
+9LAn/cUZMj3gCg3VB2mwvt32rfawXnH8w39hSTn1F5Ywz1bvgCbJj1k1Zw5b
+K7h+PQXHP+UyyXmy7u0Tb4GTfLRDWLB4e++E4gaamvtj0DGEnOdM//1H4Ujf
+XJFkOLdrh9g1ePWItFEJ3LxEoec5/CbTNaoNluuX3TQGL/5JIo/FS43+H88X
+pNI=
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.631304063066693, 8.096807950948126}, \
+{1, -1}], LineBox[CompressedData["
+1:eJwd1AlQU1cUBuBbFwiEfROF1kCC2FEEZUeWJ0SlaAXLIiBbUaDDCMYFiIA0
+rImIEqhSZNMqiwvSFIGiUxVbEZFKAdEShyrYmKJQRQsMQ0vof81M5s037957
+/nPeSyxi938Rt4gQsgtfeiWqhYWFr+0Y8uFjwhCjgf3+l2A9j7ibunBhb825
+AdhU+Y+jypghHSuttObgkaM6rB54gNd+7+P1DLl/gHSmwa83dm50h1ltt+Tq
+8NrsUV4QPMKsiBAZMSSqqrlqL3VVyO2/DBmipXRemwRfnMw9vBnmtzT1Uwuf
+W2d+Z8CQHTVXSAI9n1vxdjG892BCZRhMnKckh/UZ0nL8wsstcPlvYrs5PYYM
+7hg7YAeHxh8tq4CHfR00TWHZZvGzMDjvdcrpBdpv8rFYNzjTJezfMVia/HOx
+O1wTyWY9gceGhCNRdH9S2c778OrHhe+r4TJFNOcOLJKXXJ+CX7ywiqAW8lu6
+I5BHdfZUVjfsq9ff1gsXtboVyem8uHk53sivbOUbvYNdvqwzkMES+yXOusgn
+2BZ/SRf9V/SPNm+g/RxYHhoOr1POzdB+WZ7zcYWwhLvLLRcO0DCuq4RTC6LK
+GmEXSyvZcVgYp84dpP2WuerQ/aldKwxn6TwdLrqy4ION470mG7C+warwDK3/
+cIptC4uW2S82hKV81XMv2NfzrkYG8rsPN/X6wuekSUvl6Nfg0u2+z+DymjPv
+Hag5CUE+sN4j/pCNLkNm6qednOA+/eB4bR2GbGla1M6FZcIQoYk28ijG4rXh
+joibxUFaDOHtq2VPI99kx5xZH5shTiGJRcPUBenzJ+DQxdn9nXDfN9EexXD5
+T3MXm2HRoTUqul4ZNn2llvYrcqjfjvNaLMdXVdP7MymbZmHLkkNqH/y3vnEX
+6ue8knbT9ZNe87svI195anB6CyzljVuUIr9T4udXe+DVtcplzuhP4N0mfkXn
+e8ss61t4idL6Vy3kb8/5w/dPeMx1asIeJvmTTUaYV6OHDTeSzqMyNtkaHv7+
+P0kBPCtvYi+HOfJ7jk1wzLOTM2PYv84/LXyAnicLKS2H458FRryj8zWNtlgD
+t4m7JjTsGWI3Ff3pNuSr33PX3AxmagX55shfcLUqkQdLbRoM5Og3Iim/24qa
+/8kdKeYjiQo8vxIW2LO6AzXxHvonPDSAOxQbb6zXYMiNfbwCAstqxKddWPh9
+dVwOfY36Uhl3/pA6Q1b5vNSk+QTirZIJNYZkvfHKuU6fb/BTnwbYr/14w3na
+/0dVCXXwE7Mf/IphztIVfAWsEA2qZ8MBXhmJkTjvyaZ02yMwk/GYrY56D0rZ
+14T0ftqxwkFq2bCJCLaz9XD8Efma/XIT6Xl9uy9wziL/SdmbrfV0vzLFMBP9
+zcT6y3+h9W3mUj3Rf8VA6kslfb/CLTyH4BcBs6Pa6E80MdLqgedvOqrScIYD
+fGQb4un72J4vjIFjEs1LtsMPhpP5Erreez77LfYrv/q9qhHm5I5U74TzXJcq
+euj6lYWeR1D/6Z6oLgVdX9nJESBf3zW1wBk631OqR97IT/9fF+BJelVn/gcL
+PvkH
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {17.547014064132036, 3.0238996897848462}, \
+{1, 1}], LineBox[CompressedData["
+1:eJwt1gk0lGsYB/CPI0m2iLGUOxhTjGXaFBVfK1Ky3lRTJhlUipSkVF/lilvu
+SEmWsaVFRzVdUcnIpUVaTFe3yJK4ipLRIpUb9/92mnOcOb/zfO/y/J8xZ8yC
+InxEyhRFHcQfeWdG8NrHp6kfLwO6at5MP/d1MPuavLlIn6bFIt9ZLnCe4EZA
+mD5NdUts7xmTeqtBhDOc4BrEeWOP9cuGde30aYZ9PiMiB263uW06C/Wl497d
+9IOFB8XuApj7lfLQhumj0dYZcHtwA0tuh/cdOm69WF/1e2D3SViHe2uajwHN
+rHSdzd0Ey7dnXLpjQFNTHVQaXGFhhmrrQhbNWFu47bGHmc78qLssmvqmCHIy
+h/N8tnx2M6SpowvSTv8CV6m5fKsxpBmj4jX/cuFIafqKaUY0Y9jZeckB5pdF
+h6XCr0dprV9GzgtKcWo1oqkxCws1NsD06OZyHWOa6f5QHn+InH9/wzNrY5qK
+p2Liz8DSiwtOEGf3c2/WkOd9uWw8T+0fyRpqgamBW5Ut2N/frdimn+zflvaI
+nOehKT80BKdU1hXOgNeovTz5neSRmbrxHu4/arK5zwDpx9lJ4QMnKtpYHeS8
+LM62Z+h3paX5XXJef17nZgH8crfj1UyyXq7wfo28kswGSkPJ827pXnvgLw4P
+hnkkj9PlbAvk+2q/q22PLfYPq69rQf7t71x5+TAdLoq7gPl8dOw1+ZXUZxqL
+0lE3yhteoA4LP8blZKHul9nXf9MG+bHe/VIOK2ltCoyFq4q/Vr7H87nLSgtm
+we2j586hcb4sVJY8woNVJgkKcP6SzSq59XDklEL18ZhnebF5fxGss8kwMQX9
+zEk8ayUm9XMVEl3MLzCmcfc+YifTZ8eRh6QrJ3sX2c93UeU45NcYfKOO1Omk
+t6x4eO5h46fJsDzUeuJruGqhwuYULPTiSh0wn/wupXcymJq4NSkC9laL/tJM
+9o/mC8TwOjcTzSG4an+s4ji8tEbQaoh+2JI6HgOb8jKtpsFUitYEH1izbaDR
+FZZyTTs0yOdFL0rHn7jSObcEnyeX/SLXlXDkjTzvJbjPDk1RgC9Zr73q3D/o
+75Zpd/J84r6/6lfBBp9MznPJ+oaQWS+Qj9YucQ/Jj5+ttzoM9qzLoEh+jFJs
+3BDyTMhJ10sj/XSO3yaBa/v8zvuSPDmNW8n/U4+7ba4GyafsWdNEWNSarV5t
+jfxqRusrw4uPWNjsgPku2bvxfUDlc2O9eaReOH2REeoT9nJknVY4L3NHggec
+1ZOcnA+zn06ZnQaXxuSdDiEOlAg+wq7yofTpsPzyNeUgzFOyNjtNA/YSCcUt
+cOeY60LFZOQ76PRyDfqNtwtd2AqnvPU40o75nq0RjnsKs+1k+oHIq69Dm90E
+e2314D+BL9+qXdEF68y78dkJeR+c1OH0lTy/8W8zzI9RYbiDujhP+vjAzIeY
+j8uh7lg+ud+A8+UPcFdNa8Jy0o/sMWsYVqJr5JutSH4JegqsP/tfhW4SLGx7
+H3EHtq0IsMqF2+9a6SXAR8vZ1hdJP5eed/PhoCvlO6+QflX1qutwv+DE841S
+sr7RnheA+UuKP+0qgOnNVx3b0F/Z8JjRP/bX8PALgrf5ZeYEk/uWGA32IJ+d
+7hYtM0h9bXDMLjj18ZIH39Ef/fBirSHmz4vz7JBNJt+flovvIe/EItXuGFIf
+TD0ghme02r6xJXWNQfYW+FjhbbOOSdhPNepqCOZ7PTG1+QRM/XFbFgs7F8nW
+esL9vbzEM3DphCsN6jBdUun5Fus1D6+0ecRFXctk3iKc3/DwuFYmXKW66bQU
+rvW2qI6AI3X3KFlhniWlu829iHM4S4vg+VNWp80m669Vc2yQj36ZSHUqzPZK
+1SpGPs6X1LqJdcZaX7Ag+TudcJwL0yknR5Lh8Mn+qcvJ+uPi9FeYV0Hc2Clh
+cN6ZuXVWJjQV3rdC+zdi34pGPxOa8VMb9eUULJzprxWC+t3XgbnVpL7Rq0EA
+px9IqGgj51nuKXHE83trT5h/JvVjNgH4PDDsZUWNquhfav8y+gLOU4SK7bVh
+JiDu4hLU3y4QPdEkeV2fuuE5ub8d74USzL9JFaxDf0tZt1veYD+pRtmfXZiv
+2cP3DbWkH9kAKxx5KDUpL8qGU56UTv+G+WpUrOCEwHL1JoM0uEa5qX4SsXaU
+yzx4xqtXIx2WuK8pa6sy8u6NWnclA2bebEhoxnzqBVmmnnDKIYnPI9jlvnWS
+MszP8k9GnVLTPeV8nYP7qsvqsJ4aWe8ZuR1mwnnMfPhJ+vBEB7i911L/JOvn
+7wLOz3dD+n9/iwB3
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {13.131120426728657, 4.809365547472548}, \
+{0, 1}], LineBox[CompressedData["
+1:eJw9lAtME1kUhmd1SwrrIj7WFGbG2pkRFFBBtKJGORCRGkQRkLfsUsWIBNsV
+TDCk2KrxibsVQUVAwkvLM1QREBHQrLBrguIKigSxChrLIjbGDeALb6M5k0xO
+vtyZe+855/+PTKkKSZhCUVQAea3x2yPAnJ+skQcqWDkjfokA7bGD27h/OKC0
+F1npVgGenC4UmU4QFre6FqoEmLj/wtM2gHBka3mbRgAVVTJUMSkDSr/ppjlD
+gEgbi368nrAp/87PKQIkdRTJlqkIW/rM1dEC1N0MUOa4El6gz30oJ+d/SXnk
++d88oNoqfUW2AniYumxeXSGs3V67/CEPDQOJq30PEe563l9zjofzJjtt6jbC
+v32YGI/kIVJcUOnvR3jXvsEWRx6K1maP2SwlfEwx09jPQcvr+oNn3Anr7cN2
+lXLwZfezoWBPwuM5hzekcOBc53F7uY91PVSTFMjB+gcPfukJI0wlhmsXc1BV
+KLqerCbceMdym+UgwilN8/lPwqa1WWZHDkKqu+wijIQVgfPn8hy4aatPr/yX
+sOWa+pM3B+WN/iGJFsLiyuiz0RwMzvpxpMOW5D9+S5xxhIO+qS3JSQzhtIE9
+PU3k+x/K3a46E1aUlCj/56B2e1RalAthB2ANXjzUMd0HdCxhSfe9yb08PGuv
+qW4TE270m2yo5SE9qWwFb7bmryv0GObh8t7eC26thL1HTGOMAJ35Lx06T1rr
+va57aL0AqXKTd3wwYbXy7eKdAhR06nbk2lvzU+zX7RfgsWJGaK9eSniKrZ1W
+gBxvq16kuO7VN1rlopqL/3cd/STvfMHi/rJ6nz/W/Mri+WrzsoGE1wzer3nN
+5rsGHYP3n73xmv76IgbzC8wpLs0YpTH/YnME9fkvGutjiAmaHmSksX6PkmsM
+uVdorG84fVhY2EFj/f0+jrmoR2jsT4MxNWaRlMH+XeXK+jNjGOzvzr/jhrcU
+MNj/2NHpIpGJQX0YB9+fEqQs6idDG9u9NZxFfbU0XUzP1rGoP/c8X3lcAYv6
+zNyS9aH3Eov67Sh77PAuj0V9R81sN6Sms6j/vvjhyTn+LPojL8H9uGaCQf+U
+K+PeeV1g0F9PnSWh+QsZ9F/RZfXqngoa/emV3dx8Tkajf9N3zBuwz3JCf7ty
+TfIKygn9Lzm0Kv/N7444H9KCbr33GZbg/NAkrlx3I5nw9/nydJo1SuAr7LO5
+Vw==
+         "]], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["g",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {8.354800000000001, 7.75}, {1, 0}], 
+        LineBox[{{6.4999999999976925`, 15.5}, {13.49999999999251, 15.5}}], 
+        PolygonBox[{{10.6, 15.5}, {9.4, 15.1}, {9.4, 15.9}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {10., 16.4452}, {0, -1}], 
+        LineBox[{{6.499999999996362, 15.500000000005457`}, {10., 
+         9.500000000003638}}], 
+        PolygonBox[{{7.947677384685548, 13.01826734053906}, {
+         8.206811054955079, 11.780184249251306`}, {8.897834175673825, 
+         12.183281069670574`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {7.515942703607428, 12.323799910437668}, \
+{1, 1}], LineBox[{{13.500000000007276`, 15.500000000005457`}, {
+         10.000000000003638`, 9.500000000001819}}], 
+        PolygonBox[{{11.447677384685548`, 11.98173265946094}, {
+         11.706811054955079`, 13.219815750748694`}, {12.397834175673825`, 
+         12.816718930329426`}}], InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox["t",
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->9.996694214876033],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           9.996694214876033]& ], {12.484057296392571, 12.323799910437668}, \
+{-1, 1}], 
+        {PointSize[0.04], PointBox[{6.5, 15.5}], PointBox[{10., 6.}], 
+         PointBox[{13.5, 15.5}], PointBox[{16.5, 5.5}], PointBox[{10., 9.5}]},
+         InsetBox[
+         TagBox[
+          StyleBox[
+           TagBox[
+            RowBox[{"T19", " ", "P2", " ", "N38"}],
+            DisplayForm],
+           FontFamily->"Helvetica",
+           FontSize->7.997355371900827],
+          
+          StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+           7.997355371900827]& ], {10., -0.5}, {0, -1}]},
+       "\"afbg/chdiei/gigjfhfjhj.m\"",
+       TooltipStyle->"TextStyling"],
+      Annotation[#, "afbg/chdiei/gigjfhfjhj.m", "Tooltip"]& ],
+     AspectRatio->1,
+     PlotRange->{{-1, 21}, {-1, 21}}], {22, 44}, {0, 0}, {22, 22}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["g",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {21.75, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["g",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {26.25, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["\[RightArrow]",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {30.75, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["H",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {35.25, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["g",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {39.75, 69.96}, {0, 0}], InsetBox[
+    TagBox[
+     StyleBox[
+      TagBox["g",
+       DisplayForm],
+      FontFamily->"Helvetica",
+      FontSize->11.996033057851239`],
+     StyleForm[#, FontFamily -> "Helvetica", FontSize -> 
+      11.996033057851239`]& ], {44.25, 69.96}, {0, 0}]},
+  AspectRatio->1.0999999999999999`,
+  ImageSize->{288, 288},
+  PlotRange->{{0, 66}, {0, 72.6}}]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489722191975*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"0eb43952-0016-4696-bef9-7b319c25a78f"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdgeg/igfhfihi.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 1, " ", "afbg/chdgeg/igfhfihi.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489722205552*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"766fb175-9f43-40a7-a5e5-7ae88f42ca9e"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "2", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdfef/ifghgihi.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 2, " ", "afbg/chdfef/ifghgihi.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489722213566*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"ec0fb198-e97b-4d93-badd-f6f811bfb205"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "3", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbf/cgdhef/ifghgihi.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 3, " ", "afbf/cgdhef/ifghgihi.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489722221236*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"673a7784-fcd3-4fb3-92f8-09c499f0c71a"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "4", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbf/cgdfeh/ifghgihi.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 4, " ", "afbf/cgdfeh/ifghgihi.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489722229526*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"68382b7f-5248-4c77-9adb-5891b620572f"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "5", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbf/cgdheh/fihjgigjij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 5, " ", "afbf/cgdheh/fihjgigjij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897222359533`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"c39cb91c-e010-4491-8ab6-96f908294232"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "6", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbf/cgdhei/fhhjgigjij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 6, " ", "afbf/cgdhei/fhhjgigjij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489722244279*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"70c97ea7-6872-494c-9439-0c17e4ba8bee"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "7", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbf/cgdhei/fiijghgjhj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 7, " ", "afbf/cgdhei/fiijghgjhj.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489722252239*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"d706ff73-2406-4c4a-9b0a-56c0010a9d52"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "8", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdfeg/figjhihjij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 8, " ", "afbg/chdfeg/figjhihjij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489722259893*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"ba57c76e-baf2-493d-9c2f-c4f85d55f7bc"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "9", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdfei/fggjhihjij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 9, " ", "afbg/chdfei/fggjhihjij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.77548972226777*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"01fed162-eccc-4fa8-a388-c381955985df"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "10", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdfei/fiijghgjhj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 10, " ", "afbg/chdfei/fiijghgjhj.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489722275985*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"cdf96293-a47a-4694-9cf7-7c3eee562208"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "11", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdgef/figjhihjij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 11, " ", "afbg/chdgef/figjhihjij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489722283701*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"6e7bbe49-623f-4b6c-a034-a39d6aa7ba23"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "12", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdgei/fgfjhihjij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 12, " ", "afbg/chdgei/fgfjhihjij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897222908707`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"13429c38-2497-43f2-b673-70aa019a9f5d"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "13", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdgei/giijfhfjhj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 13, " ", "afbg/chdgei/giijfhfjhj.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489722295754*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"6c327368-c9b9-4ae3-949a-593fb2b77007"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "14", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdief/fggjhihjij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 14, " ", "afbg/chdief/fggjhihjij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489722301079*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"47e85b11-c505-4659-89e4-33b60d35abca"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "15", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdief/fiijghgjhj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 15, " ", "afbg/chdief/fiijghgjhj.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.77548972230553*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"f3fde698-e9e2-4581-812a-b0bde8dcf250"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "16", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdieg/fgfjhihjij.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 16, " ", "afbg/chdieg/fgfjhihjij.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489722311154*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"415d3b58-6c3b-419e-a420-fd69f60e69a2"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "17", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdieg/giijfhfjhj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 17, " ", "afbg/chdieg/giijfhfjhj.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897223163233`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"f9ef4194-ebb3-4cb6-a5f8-07187185012c"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "18", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdiei/fifjghgjhj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 18, " ", "afbg/chdiei/fifjghgjhj.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.7754897223209248`*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"4c972635-8329-42e5-9eee-204cdd18f466"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "19", 
+   "\[InvisibleSpace]", "\<\" \"\>", 
+   "\[InvisibleSpace]", "\<\"afbg/chdiei/gigjfhfjhj.m\"\>", 
+   "\[InvisibleSpace]", "\<\", \"\>", 
+   "\[InvisibleSpace]", "\<\"2 diagrams\"\>"}],
+  SequenceForm[
+  "> Top. ", 19, " ", "afbg/chdiei/gigjfhfjhj.m", ", ", "2 diagrams"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489722325973*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"1aebfe8a-7e86-4a40-8242-1b5cd17fc43d"],
+
+Cell[BoxData["\<\"\"\>"], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489725482459*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"ce56c22a-c969-4120-8ab3-76908cd7cb8f"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"creating amplitudes at level(s) \"\>", "\[InvisibleSpace]", 
+   RowBox[{"{", "Particles", "}"}]}],
+  SequenceForm["creating amplitudes at level(s) ", {FeynArts`Particles}],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489725499104*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"b2ad0c55-c228-4dd8-afe1-596ac3e8de27"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"> Top. \"\>", "\[InvisibleSpace]", "1", 
+   "\[InvisibleSpace]", "\<\": \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles amplitudes\"\>"}],
+  SequenceForm["> Top. ", 1, ": ", "2 Particles amplitudes"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489725506414*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"3f8774c5-285b-44f4-88e8-0185fa11c1a4"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"in total: \"\>", 
+   "\[InvisibleSpace]", "\<\"2 Particles amplitudes\"\>"}],
+  SequenceForm["in total: ", "2 Particles amplitudes"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489725514233*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"e93aab79-e7b3-4dbd-8e2b-1c90b2aa247c"],
+
+Cell[BoxData["\<\"\\npreparing FORM code in \
+/Users/josegabrielreyes/Documents/Higgs/Mathematica \
+Scripts/ggHgg/FinalSetUp/fc-amp-2.frm\"\>"], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489725541204*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"5a36d2f5-f14d-44c6-9613-e31cb7d50f4f"],
+
+Cell[BoxData["\<\"running FORM... \"\>"], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489725568915*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"b6a2c1c9-b900-4fe8-a272-adf23b8f05ac"],
+
+Cell[BoxData["\<\"ok\\n\"\>"], "Print",
+ CellChangeTimes->{{3.775488987597416*^9, 3.775489006582917*^9}, 
+   3.7754890495560427`*^9, 3.7754892112029047`*^9, 3.775489725730196*^9},
+ CellLabel->
+  "During evaluation of \
+In[11]:=",ExpressionUUID->"9c92fc32-0f89-45c0-afd7-d26c1b8ab947"]
+}, Open  ]]
+}, Open  ]],
+
+Cell[BoxData[""], "Input",
+ CellChangeTimes->{{3.7754901336565437`*^9, 
+  3.7754901394427156`*^9}},ExpressionUUID->"e983dc9e-7c02-4e79-995f-\
+db0add5406de"]
+},
+WindowSize->{908, 679},
+WindowMargins->{{Automatic, 153}, {Automatic, 0}},
+FrontEndVersion->"11.3 for Mac OS X x86 (32-bit, 64-bit Kernel) (March 5, \
+2018)",
+StyleDefinitions->"Default.nb"
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{}
+*)
+(*CellTagsIndex
+CellTagsIndex->{}
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[558, 20, 549, 11, 84, "Input",ExpressionUUID->"5ed94a23-f6b7-4858-b120-72e0fcc40a50"],
+Cell[1110, 33, 804, 14, 94, "Input",ExpressionUUID->"62f164f9-a9f7-4648-a8a9-d72d44fdf7a9"],
+Cell[1917, 49, 2074, 52, 178, "Input",ExpressionUUID->"6c1a13cd-8d6a-4aec-be74-43041223224c"],
+Cell[CellGroupData[{
+Cell[4016, 105, 2477, 61, 304, "Input",ExpressionUUID->"a2cef43b-ff41-41b9-b41f-7c91f647357c"],
+Cell[CellGroupData[{
+Cell[6518, 170, 349, 6, 24, "Print",ExpressionUUID->"95be2bdc-98fb-4c01-924c-ea01198ee41b"],
+Cell[6870, 178, 342, 6, 24, "Print",ExpressionUUID->"17cab7fc-b6ba-408e-aecb-ebaf93897053"],
+Cell[7215, 186, 784, 17, 24, "Print",ExpressionUUID->"eb19a6d8-7700-4e54-96ee-7332537315f8"],
+Cell[8002, 205, 365, 6, 24, "Print",ExpressionUUID->"08716a53-d1a2-4287-a12b-7c2cc8366651"],
+Cell[8370, 213, 583, 12, 24, "Print",ExpressionUUID->"79041dd7-30e3-460c-b096-101d2fe6c2a1"],
+Cell[8956, 227, 342, 6, 24, "Print",ExpressionUUID->"a5fc149b-1939-45dd-9a92-6e6df4b4c4e0"],
+Cell[9301, 235, 780, 17, 24, "Print",ExpressionUUID->"d360cb81-67dd-4acd-b071-c1f757c38c1f"],
+Cell[10084, 254, 776, 17, 24, "Print",ExpressionUUID->"9e58d0f9-7d30-4c82-903d-a612d33fd86f"],
+Cell[10863, 273, 340, 6, 24, "Print",ExpressionUUID->"72db1fe2-2d37-4a0c-872b-3cc441237082"],
+Cell[11206, 281, 979, 25, 24, "Print",ExpressionUUID->"5a609188-42ff-4b27-be41-fd6ff76b1515"],
+Cell[12188, 308, 342, 6, 24, "Print",ExpressionUUID->"a0ef6b9a-d2b7-479e-8137-1c407834661a"],
+Cell[12533, 316, 652, 13, 24, "Print",ExpressionUUID->"395f68bb-da38-45e3-8e4c-7524d4a51f64"],
+Cell[13188, 331, 362, 6, 24, "Print",ExpressionUUID->"104e0f63-359b-4f00-9f36-f293c8583cf6"],
+Cell[13553, 339, 509, 11, 24, "Print",ExpressionUUID->"d13e738b-3631-426d-8bd1-24a66c457cbb"],
+Cell[14065, 352, 539, 11, 24, "Print",ExpressionUUID->"439c6887-602a-4183-b232-e3a67fb8e791"],
+Cell[14607, 365, 537, 11, 24, "Print",ExpressionUUID->"48ada3e2-6b47-48a0-892b-cc88328d16cf"],
+Cell[15147, 378, 579, 12, 24, "Print",ExpressionUUID->"927779f6-d08f-4d39-a6d0-830a34216070"],
+Cell[15729, 392, 340, 6, 24, "Print",ExpressionUUID->"6583a4e9-8f50-4e53-8dc5-040d440c732a"],
+Cell[16072, 400, 602, 13, 24, "Print",ExpressionUUID->"c4684f77-a5af-498d-831a-f0ff3c4e1201"],
+Cell[16677, 415, 340, 6, 24, "Print",ExpressionUUID->"6a429f81-07ca-4ccf-80bb-9a75f25f1846"],
+Cell[17020, 423, 537, 11, 24, "Print",ExpressionUUID->"389ba7bd-4cc4-43db-b5f2-79bd9caadb5d"],
+Cell[17560, 436, 586, 12, 24, "Print",ExpressionUUID->"61464dd7-6a02-413d-a317-aad1778ec51f"],
+Cell[18149, 450, 585, 12, 24, "Print",ExpressionUUID->"fb0f2e26-5c6b-4dd8-b109-5041729eaa3a"],
+Cell[18737, 464, 586, 12, 24, "Print",ExpressionUUID->"196a4738-ac75-4913-809d-c38dc4f95dc2"],
+Cell[19326, 478, 588, 12, 24, "Print",ExpressionUUID->"cdd6ea88-0d66-457d-9308-f6a096862ed3"],
+Cell[19917, 492, 586, 12, 24, "Print",ExpressionUUID->"80fff600-a977-44ed-859e-766002e860a1"],
+Cell[20506, 506, 588, 12, 24, "Print",ExpressionUUID->"a3fef4f5-5b1d-46f5-a0c2-b5ab178429e9"],
+Cell[21097, 520, 586, 12, 24, "Print",ExpressionUUID->"e0abfbbf-d83e-443b-b002-febe2931f7f6"],
+Cell[21686, 534, 585, 12, 24, "Print",ExpressionUUID->"9409c4df-2bdc-4cd1-aea0-e86608e6c22c"],
+Cell[22274, 548, 586, 12, 24, "Print",ExpressionUUID->"37f8b566-f4a5-427d-a780-b172e0e9ed0d"],
+Cell[22863, 562, 588, 12, 24, "Print",ExpressionUUID->"95cef3b7-252b-473d-8be6-83ab00891d73"],
+Cell[23454, 576, 588, 12, 24, "Print",ExpressionUUID->"2c83028a-01a8-491c-913d-ebe3b9b372b9"],
+Cell[24045, 590, 588, 12, 24, "Print",ExpressionUUID->"017df86f-f278-4438-abc4-8b8c6678129c"],
+Cell[24636, 604, 588, 12, 24, "Print",ExpressionUUID->"41c0f1a2-034d-447f-ad92-6d0cae8393d0"],
+Cell[25227, 618, 588, 12, 24, "Print",ExpressionUUID->"8f567853-5358-4ce8-b9d9-add48f5cfe7c"],
+Cell[25818, 632, 590, 12, 24, "Print",ExpressionUUID->"d94aefd7-5ad6-41e8-94bf-82f1a5da8e87"],
+Cell[26411, 646, 588, 12, 24, "Print",ExpressionUUID->"a1667e62-53f2-4568-b952-d91a76d0b6fb"],
+Cell[27002, 660, 588, 12, 24, "Print",ExpressionUUID->"fd2d9ffa-0c9f-4edc-9ad4-3963eea69b87"],
+Cell[27593, 674, 588, 12, 24, "Print",ExpressionUUID->"0cda6289-833d-401f-9877-358fff7212cd"],
+Cell[28184, 688, 588, 12, 24, "Print",ExpressionUUID->"1957d743-de80-48f5-a636-21f1f1aa7501"],
+Cell[28775, 702, 590, 12, 24, "Print",ExpressionUUID->"44b3f181-2e51-482e-affe-db86b44602ac"],
+Cell[29368, 716, 588, 12, 24, "Print",ExpressionUUID->"ff3d11c0-d301-4777-a1f2-a610d7d9a675"],
+Cell[29959, 730, 590, 12, 24, "Print",ExpressionUUID->"ba2acc4a-b13c-40bf-b0b9-bd894d26274e"],
+Cell[30552, 744, 588, 12, 24, "Print",ExpressionUUID->"3b804754-f313-430b-8cb0-31b5aaa5f215"],
+Cell[31143, 758, 588, 12, 24, "Print",ExpressionUUID->"f1228fa4-8234-472f-bad1-73814621aeaf"],
+Cell[31734, 772, 588, 12, 24, "Print",ExpressionUUID->"74498276-21e0-4a9b-a0aa-ad268e15c133"],
+Cell[32325, 786, 588, 12, 24, "Print",ExpressionUUID->"a439ca59-412f-45c9-ae09-c5ef0adc59fa"],
+Cell[32916, 800, 590, 12, 24, "Print",ExpressionUUID->"2b52cb8a-5a2f-4c20-8a6b-559e2885c512"],
+Cell[33509, 814, 588, 12, 24, "Print",ExpressionUUID->"0caad15d-e43a-49c7-acf4-a07620c1df9d"],
+Cell[34100, 828, 588, 12, 24, "Print",ExpressionUUID->"0dde48d4-1c15-4904-b19e-6d02a168b3c3"],
+Cell[34691, 842, 588, 12, 24, "Print",ExpressionUUID->"f7321913-10b3-4f6f-869a-662bf0274289"],
+Cell[35282, 856, 588, 12, 24, "Print",ExpressionUUID->"88821906-7f24-4e37-aed6-ef83b5c08ec5"],
+Cell[35873, 870, 588, 12, 24, "Print",ExpressionUUID->"db365a78-952e-424d-a8c5-1c60cbbac3b6"],
+Cell[36464, 884, 590, 12, 24, "Print",ExpressionUUID->"95aa9915-8995-46bd-b083-d8e235103da7"],
+Cell[37057, 898, 590, 12, 24, "Print",ExpressionUUID->"8ce667a7-d620-46c8-9048-19164c2fe9fb"],
+Cell[37650, 912, 586, 12, 24, "Print",ExpressionUUID->"047f977e-13ab-4375-b19b-fc301e804f04"],
+Cell[38239, 926, 588, 12, 24, "Print",ExpressionUUID->"1be3ed47-0bb8-43d6-94fe-f97fe2bb5ba7"],
+Cell[38830, 940, 588, 12, 24, "Print",ExpressionUUID->"94eb4d28-ed47-4ba2-a1cf-599a36a6cafc"],
+Cell[39421, 954, 588, 12, 24, "Print",ExpressionUUID->"a3db7988-d6b5-4f5d-972d-952a01edbb0f"],
+Cell[40012, 968, 588, 12, 24, "Print",ExpressionUUID->"e7aca9d7-b34e-470f-a88f-b624d7e0e958"],
+Cell[40603, 982, 588, 12, 24, "Print",ExpressionUUID->"291a47af-4dc7-4de6-b36f-8d881b917536"],
+Cell[41194, 996, 588, 12, 24, "Print",ExpressionUUID->"9872fa25-a27c-41a0-b138-6214eff0560b"],
+Cell[41785, 1010, 588, 12, 24, "Print",ExpressionUUID->"0ed85b66-aeb2-4a23-860e-f055e412c19f"],
+Cell[42376, 1024, 588, 12, 24, "Print",ExpressionUUID->"4c61a78a-0e05-41f7-a835-002d535416d4"],
+Cell[42967, 1038, 587, 12, 24, "Print",ExpressionUUID->"3c180812-a089-4b46-be4b-38556662b73b"],
+Cell[43557, 1052, 588, 12, 24, "Print",ExpressionUUID->"22ea50da-a3f1-4d7b-aa85-0b749fbc73bd"],
+Cell[44148, 1066, 590, 12, 24, "Print",ExpressionUUID->"3fd81227-d5ba-480a-886c-3882ce6b38a6"],
+Cell[44741, 1080, 588, 12, 24, "Print",ExpressionUUID->"956e5828-589f-40db-83b8-f309955de8d0"],
+Cell[45332, 1094, 590, 12, 24, "Print",ExpressionUUID->"33dfe8b5-d0e8-4b38-b3b1-27debdbc6e62"],
+Cell[45925, 1108, 588, 12, 24, "Print",ExpressionUUID->"c8d217fa-58f9-4618-8910-f102c2b8e99d"],
+Cell[46516, 1122, 588, 12, 24, "Print",ExpressionUUID->"08b7c85f-5b2b-4689-bedf-181e4692099f"],
+Cell[47107, 1136, 587, 12, 24, "Print",ExpressionUUID->"ef12fc61-9bce-41da-a8e3-c99e218aaeff"],
+Cell[47697, 1150, 588, 12, 24, "Print",ExpressionUUID->"ee7502bf-f9d9-4ead-8a35-caf262094785"],
+Cell[48288, 1164, 590, 12, 24, "Print",ExpressionUUID->"2ff486b6-da1d-46c6-bace-b35ed8fb0a0a"],
+Cell[48881, 1178, 590, 12, 24, "Print",ExpressionUUID->"20b0e1f7-d69f-4196-a238-5db1d7b3d5ef"],
+Cell[49474, 1192, 588, 12, 24, "Print",ExpressionUUID->"807a10f5-c9a7-43ce-9e16-d429e391910d"],
+Cell[50065, 1206, 588, 12, 24, "Print",ExpressionUUID->"69cb4ac9-1b1a-4d6a-bf1f-f9b7fa878a12"],
+Cell[50656, 1220, 590, 12, 24, "Print",ExpressionUUID->"f8f509e1-588b-4ed1-a98a-8ee71cd1cf2c"],
+Cell[51249, 1234, 590, 12, 24, "Print",ExpressionUUID->"69a96cae-392e-492c-bd26-075f6c5a193a"],
+Cell[51842, 1248, 590, 12, 24, "Print",ExpressionUUID->"77fee6db-15a5-4a26-9672-1e7d9aadbcd0"],
+Cell[52435, 1262, 588, 12, 24, "Print",ExpressionUUID->"64834d2c-1e4d-4442-8bec-675be74e7dda"],
+Cell[53026, 1276, 590, 12, 24, "Print",ExpressionUUID->"59971e47-1616-4a22-a721-c533bdd96860"],
+Cell[53619, 1290, 590, 12, 24, "Print",ExpressionUUID->"daa6c0b9-88af-4140-84da-b05c30c5c32b"],
+Cell[54212, 1304, 590, 12, 24, "Print",ExpressionUUID->"66621e56-80bf-4370-a9f5-b1e47c485242"],
+Cell[54805, 1318, 587, 12, 24, "Print",ExpressionUUID->"5a491c83-6c7a-4929-82a4-1a5a5645762e"],
+Cell[55395, 1332, 588, 12, 24, "Print",ExpressionUUID->"2b0c227a-7d7c-42ee-a180-4c2a2a146ac2"],
+Cell[55986, 1346, 588, 12, 24, "Print",ExpressionUUID->"ccd6cff8-1b8a-4d01-b010-ead3e010e3fc"],
+Cell[56577, 1360, 590, 12, 24, "Print",ExpressionUUID->"a7a10e1f-072f-4c41-8ee4-241f3ad842b5"],
+Cell[57170, 1374, 588, 12, 24, "Print",ExpressionUUID->"7fafeb15-f4e7-4947-b398-febc44282cd1"],
+Cell[57761, 1388, 588, 12, 24, "Print",ExpressionUUID->"1332cbbf-fb62-4dd6-a3cb-cef8d1e70dc5"],
+Cell[58352, 1402, 588, 12, 24, "Print",ExpressionUUID->"310bd995-8600-4e80-97b1-81840494d0f7"],
+Cell[58943, 1416, 590, 12, 24, "Print",ExpressionUUID->"f6b1e272-4cf4-4247-a1de-432525a6e121"],
+Cell[59536, 1430, 588, 12, 24, "Print",ExpressionUUID->"79c37aac-8c86-4c0e-abdb-183d9fb1748b"],
+Cell[60127, 1444, 588, 12, 24, "Print",ExpressionUUID->"7507a970-75c5-44e9-ab07-38d61c1ccb9e"],
+Cell[60718, 1458, 588, 12, 24, "Print",ExpressionUUID->"e09d7b62-45f9-497b-a6e1-806796c1ffa8"],
+Cell[61309, 1472, 588, 12, 24, "Print",ExpressionUUID->"29257eb8-2ebe-42f4-bd66-df00a57bb73d"],
+Cell[61900, 1486, 590, 12, 24, "Print",ExpressionUUID->"b6a82730-c91c-4d73-b34c-8c6ce612fdde"],
+Cell[62493, 1500, 587, 12, 24, "Print",ExpressionUUID->"c524cf2f-3e9a-46b4-be86-f9444ba98e88"],
+Cell[63083, 1514, 588, 12, 24, "Print",ExpressionUUID->"c10b4522-2c7b-4642-82d5-c6e8a6d01dba"],
+Cell[63674, 1528, 590, 12, 24, "Print",ExpressionUUID->"68081a7b-576f-4936-a3c8-1c9c4d7d25c3"],
+Cell[64267, 1542, 590, 12, 24, "Print",ExpressionUUID->"b6894ac0-5f23-4353-abbf-a94d55e615f7"],
+Cell[64860, 1556, 588, 12, 24, "Print",ExpressionUUID->"9488c342-c8ed-449f-950b-ed0982efef33"],
+Cell[65451, 1570, 588, 12, 24, "Print",ExpressionUUID->"32ea0167-2716-4f66-a451-150d2ceda811"],
+Cell[66042, 1584, 588, 12, 24, "Print",ExpressionUUID->"08d33716-31b1-4e5f-85b6-bc539ceaa0cf"],
+Cell[66633, 1598, 590, 12, 24, "Print",ExpressionUUID->"ddcc7769-8e24-4e3f-b2af-2af53a5bdc11"],
+Cell[67226, 1612, 588, 12, 24, "Print",ExpressionUUID->"f994c345-6b06-4ec0-9d0b-63703d71adb1"],
+Cell[67817, 1626, 590, 12, 24, "Print",ExpressionUUID->"64721b11-69e7-42a8-9ed4-2fb8488cdff6"],
+Cell[68410, 1640, 590, 12, 24, "Print",ExpressionUUID->"03689c0b-6996-4dbd-81a8-1cad70f362c1"],
+Cell[69003, 1654, 588, 12, 24, "Print",ExpressionUUID->"808878f6-7af9-4107-8aa9-978f16ef4b35"],
+Cell[69594, 1668, 588, 12, 24, "Print",ExpressionUUID->"aefbf6f4-2a0f-4015-8c5e-607e24212b32"],
+Cell[70185, 1682, 588, 12, 24, "Print",ExpressionUUID->"c486abb2-c049-400e-bdbb-9ecfaede817d"],
+Cell[70776, 1696, 588, 12, 24, "Print",ExpressionUUID->"da0741dd-0830-4119-9805-31582a2367b0"],
+Cell[71367, 1710, 588, 12, 24, "Print",ExpressionUUID->"1cb27c93-7715-4dc7-a6d6-cfae5c74839c"],
+Cell[71958, 1724, 587, 12, 24, "Print",ExpressionUUID->"ddc5cee1-b4e7-458f-b4ba-89d60a849bc4"],
+Cell[72548, 1738, 588, 12, 24, "Print",ExpressionUUID->"be030525-a4fc-4e6b-be42-d477d055de13"],
+Cell[73139, 1752, 588, 12, 24, "Print",ExpressionUUID->"339456c2-a58e-4741-b4dc-96df6abdc7c1"],
+Cell[73730, 1766, 590, 12, 24, "Print",ExpressionUUID->"89cc81e1-b55e-449a-a3d5-f07c46b2c5cc"],
+Cell[74323, 1780, 590, 12, 24, "Print",ExpressionUUID->"6de19c82-34c9-4ba7-9b48-226b86e19b1e"],
+Cell[74916, 1794, 588, 12, 24, "Print",ExpressionUUID->"899465f8-5f47-405a-9c5c-e10dc8e90f10"],
+Cell[75507, 1808, 588, 12, 24, "Print",ExpressionUUID->"9e4f3248-4f2e-4577-8a3f-d5b2860efa80"],
+Cell[76098, 1822, 590, 12, 24, "Print",ExpressionUUID->"2a9ba662-3fea-4229-abd4-39f05b296228"],
+Cell[76691, 1836, 590, 12, 24, "Print",ExpressionUUID->"0531799e-f502-45d8-9e0b-c29dc4b1ce02"],
+Cell[77284, 1850, 590, 12, 24, "Print",ExpressionUUID->"91b0a278-0a06-4500-808d-22396119acfa"],
+Cell[77877, 1864, 592, 12, 24, "Print",ExpressionUUID->"605fefa7-a214-4a78-b7d0-790e17d495d9"],
+Cell[78472, 1878, 590, 12, 24, "Print",ExpressionUUID->"2443812c-7ab0-41ea-b494-512b76e3e44b"],
+Cell[79065, 1892, 590, 12, 24, "Print",ExpressionUUID->"aee94a92-c972-4419-9c21-64f87a8cff0e"],
+Cell[79658, 1906, 590, 12, 24, "Print",ExpressionUUID->"4c579a5b-81b4-4170-b71b-5c94acdfbcf7"],
+Cell[80251, 1920, 592, 12, 24, "Print",ExpressionUUID->"1e982064-f679-41a3-866e-cef41c13f58a"],
+Cell[80846, 1934, 592, 12, 24, "Print",ExpressionUUID->"89af9e07-74d9-4f4d-afec-8066c5f45c01"],
+Cell[81441, 1948, 590, 12, 24, "Print",ExpressionUUID->"36993d8d-616d-4d86-9f6c-858eb5133544"],
+Cell[82034, 1962, 590, 12, 24, "Print",ExpressionUUID->"0ed4f5d7-298f-4112-a687-d7ae34364518"],
+Cell[82627, 1976, 592, 12, 24, "Print",ExpressionUUID->"3c56fdcb-54a0-42f0-8fdd-22993d28b1c4"],
+Cell[83222, 1990, 590, 12, 24, "Print",ExpressionUUID->"af574732-863b-4bf1-ba16-cc81168c3f4b"],
+Cell[83815, 2004, 592, 12, 24, "Print",ExpressionUUID->"e2000529-e736-4802-98c9-b5248025406b"],
+Cell[84410, 2018, 592, 12, 24, "Print",ExpressionUUID->"9bf2fd19-4359-42ab-a02f-08ef0f78ed75"],
+Cell[85005, 2032, 590, 12, 24, "Print",ExpressionUUID->"a76e94e5-2295-4f2a-9002-293e7cbd3393"],
+Cell[85598, 2046, 590, 12, 24, "Print",ExpressionUUID->"95d2486d-e076-4d22-bfb7-9b81ed7bcd17"],
+Cell[86191, 2060, 592, 12, 24, "Print",ExpressionUUID->"32a278bb-960a-461d-848d-3ff674c51c0d"],
+Cell[86786, 2074, 590, 12, 24, "Print",ExpressionUUID->"2cce181e-b2fd-442b-b6fb-6788c5d3f819"],
+Cell[87379, 2088, 592, 12, 24, "Print",ExpressionUUID->"9f19765b-5e37-4a08-a19d-0f77a87ea7ad"],
+Cell[87974, 2102, 592, 12, 24, "Print",ExpressionUUID->"021a5bc9-a07f-41b0-978c-00b32d99d8d2"],
+Cell[88569, 2116, 590, 12, 24, "Print",ExpressionUUID->"1b5b7e7d-0ca2-4f6f-9b7e-4e0ff4c00ffc"],
+Cell[89162, 2130, 590, 12, 24, "Print",ExpressionUUID->"9fbc67c5-9eab-4cc8-a3db-d13e16b9f9ae"],
+Cell[89755, 2144, 592, 12, 24, "Print",ExpressionUUID->"b8d15074-3bd2-4255-a41e-00fb85ec4123"],
+Cell[90350, 2158, 590, 12, 24, "Print",ExpressionUUID->"a47967bf-9a66-429b-b544-46557b2de0a2"],
+Cell[90943, 2172, 590, 12, 24, "Print",ExpressionUUID->"090ebba9-cc4a-4511-9768-a733b7a777c5"],
+Cell[91536, 2186, 590, 12, 24, "Print",ExpressionUUID->"84ae8ec3-7115-488d-b483-04729cee5d6d"],
+Cell[92129, 2200, 592, 12, 24, "Print",ExpressionUUID->"24ab1ede-3197-4bc8-862a-0b94e96991e7"],
+Cell[92724, 2214, 590, 12, 24, "Print",ExpressionUUID->"ced0c2c9-1571-4682-9592-559792ab4bf4"],
+Cell[93317, 2228, 590, 12, 24, "Print",ExpressionUUID->"be07c732-6e96-4da3-a616-3ad93d10fd62"],
+Cell[93910, 2242, 590, 12, 24, "Print",ExpressionUUID->"6831d176-931b-46c0-b567-e713e97875b0"],
+Cell[94503, 2256, 592, 12, 24, "Print",ExpressionUUID->"7fb81ab2-416d-4c75-a415-964b1d7d0163"],
+Cell[95098, 2270, 590, 12, 24, "Print",ExpressionUUID->"8a93f0dd-659f-4fd3-87dc-dd119ea79669"],
+Cell[95691, 2284, 590, 12, 24, "Print",ExpressionUUID->"abde7d00-2771-4d96-a125-f3d7c67acbed"],
+Cell[96284, 2298, 592, 12, 24, "Print",ExpressionUUID->"6984bedf-553b-49cf-9011-d5ef08ecf363"],
+Cell[96879, 2312, 592, 12, 24, "Print",ExpressionUUID->"3f432ed5-3b6a-481a-996c-82534394b528"],
+Cell[97474, 2326, 590, 12, 24, "Print",ExpressionUUID->"ffafb3bd-9f6e-4112-99a5-c126e2f337d6"],
+Cell[98067, 2340, 590, 12, 24, "Print",ExpressionUUID->"954f9671-78c7-424d-9918-3ebdd3c28d18"],
+Cell[98660, 2354, 592, 12, 24, "Print",ExpressionUUID->"e3822845-ba7d-4cf9-980c-f50dbe4cb81a"],
+Cell[99255, 2368, 589, 12, 24, "Print",ExpressionUUID->"6bb844ed-20f0-4ebc-bc72-72b5bea41a46"],
+Cell[99847, 2382, 590, 12, 24, "Print",ExpressionUUID->"bb38afd2-c413-458f-9160-aefbd0d27927"],
+Cell[100440, 2396, 589, 12, 24, "Print",ExpressionUUID->"6cb9f6d4-6d01-4a77-accb-65e87470338d"],
+Cell[101032, 2410, 592, 12, 24, "Print",ExpressionUUID->"f3fa80e3-6cc5-45fe-a17d-46970ef94b0c"],
+Cell[101627, 2424, 590, 12, 24, "Print",ExpressionUUID->"09d65ed1-715d-41df-8c94-a39bbb3280a3"],
+Cell[102220, 2438, 590, 12, 24, "Print",ExpressionUUID->"a0d3ab8e-de70-494e-9f5a-07eda236d43d"],
+Cell[102813, 2452, 590, 12, 24, "Print",ExpressionUUID->"155ec573-fa0f-4f08-aef8-e6cc269556b1"],
+Cell[103406, 2466, 592, 12, 24, "Print",ExpressionUUID->"95024ab4-7fb7-4ea3-a213-40a63fd51d4c"],
+Cell[104001, 2480, 590, 12, 24, "Print",ExpressionUUID->"90a53c5b-8c35-4055-998c-5ba3df1e4595"],
+Cell[104594, 2494, 592, 12, 24, "Print",ExpressionUUID->"f8e33bf4-1816-41d8-99d7-edbf10cd5b8c"],
+Cell[105189, 2508, 592, 12, 24, "Print",ExpressionUUID->"62d77045-93f2-456c-afbb-f57e51e00cda"],
+Cell[105784, 2522, 592, 12, 24, "Print",ExpressionUUID->"33fb272c-39d5-4195-a5f0-03ee79c2d273"],
+Cell[106379, 2536, 590, 12, 24, "Print",ExpressionUUID->"cea3e22b-616d-4e17-94cb-73db0a940ddb"],
+Cell[106972, 2550, 590, 12, 24, "Print",ExpressionUUID->"d1d62de9-2394-48d9-9cd1-1c560ab9737d"],
+Cell[107565, 2564, 590, 12, 24, "Print",ExpressionUUID->"30a06b84-dbda-4151-9e85-77ae4f184488"],
+Cell[108158, 2578, 592, 12, 24, "Print",ExpressionUUID->"2c6607bb-6df2-4411-ac6b-aba394a7fac2"],
+Cell[108753, 2592, 592, 12, 24, "Print",ExpressionUUID->"e9935d4c-9424-473a-bdf3-c0d3396da9c8"],
+Cell[109348, 2606, 590, 12, 24, "Print",ExpressionUUID->"d7e337b8-b3da-4537-8114-35051760aa0e"],
+Cell[109941, 2620, 590, 12, 24, "Print",ExpressionUUID->"44245045-7776-4e4c-bc3c-9fbe9a8c8638"],
+Cell[110534, 2634, 590, 12, 24, "Print",ExpressionUUID->"8329a41f-5e59-42d6-b164-4077b17d3c7d"],
+Cell[111127, 2648, 592, 12, 24, "Print",ExpressionUUID->"c835d743-48ec-4a7e-a931-ed53a089baf1"],
+Cell[111722, 2662, 590, 12, 24, "Print",ExpressionUUID->"e0c5b3db-7b63-4519-9049-33e98a77bf63"],
+Cell[112315, 2676, 590, 12, 24, "Print",ExpressionUUID->"f4064934-b056-4b88-8ce6-ea4a63fd1832"],
+Cell[112908, 2690, 590, 12, 24, "Print",ExpressionUUID->"c60ae536-341c-4231-9d7f-28ed6fc010d0"],
+Cell[113501, 2704, 590, 12, 24, "Print",ExpressionUUID->"e1e5312b-95d7-4fea-9a9b-f750ec126cb3"],
+Cell[114094, 2718, 590, 12, 24, "Print",ExpressionUUID->"4d16f65d-d7c1-4206-bb12-ff0837d15035"],
+Cell[114687, 2732, 592, 12, 24, "Print",ExpressionUUID->"b1399836-b8d5-4db2-b11b-46c5231dfb9b"],
+Cell[115282, 2746, 592, 12, 24, "Print",ExpressionUUID->"4cbd66d0-9cb8-49ef-a05e-7b1fba13693d"],
+Cell[115877, 2760, 590, 12, 24, "Print",ExpressionUUID->"4664d10a-2aaf-41a3-b1d7-406a84cb92da"],
+Cell[116470, 2774, 590, 12, 24, "Print",ExpressionUUID->"dd2827c1-ec77-4ed3-ab85-e1f6d405724a"],
+Cell[117063, 2788, 590, 12, 24, "Print",ExpressionUUID->"493bad0e-e393-43d4-89d2-aa227afa1bc9"],
+Cell[117656, 2802, 590, 12, 24, "Print",ExpressionUUID->"975eef16-8958-44ef-8f6d-309b76e6fcb6"],
+Cell[118249, 2816, 592, 12, 24, "Print",ExpressionUUID->"c71191a4-2459-420c-a874-0dac3fe7d4de"],
+Cell[118844, 2830, 592, 12, 24, "Print",ExpressionUUID->"a6f5e445-32f2-4aea-83e9-93ca8df8d6db"],
+Cell[119439, 2844, 590, 12, 24, "Print",ExpressionUUID->"b4a75642-2447-4ced-82d1-86db37d81517"],
+Cell[120032, 2858, 592, 12, 24, "Print",ExpressionUUID->"4c0ca0ea-884a-4e8d-bef1-f9a7e1e00b01"],
+Cell[120627, 2872, 592, 12, 24, "Print",ExpressionUUID->"c6ac1b97-da77-41a9-9a18-d87e11a03c9c"],
+Cell[121222, 2886, 592, 12, 24, "Print",ExpressionUUID->"cf11aea8-37d2-4e13-ab17-38ac36631409"],
+Cell[121817, 2900, 590, 12, 24, "Print",ExpressionUUID->"1d1f0596-37d2-4424-bae3-f9d8723fbb21"],
+Cell[122410, 2914, 590, 12, 24, "Print",ExpressionUUID->"d41e0ca3-ae48-4ca1-b913-aadf4832f1a1"],
+Cell[123003, 2928, 589, 12, 24, "Print",ExpressionUUID->"ebb75367-3c3b-4676-ab05-d1d33225bee4"],
+Cell[123595, 2942, 590, 12, 24, "Print",ExpressionUUID->"d3a6e521-3690-45a5-be34-d4231aa5eb9a"],
+Cell[124188, 2956, 589, 12, 24, "Print",ExpressionUUID->"8aef0c43-d5e4-4cc9-9ff3-cd86cafbf836"],
+Cell[124780, 2970, 592, 12, 24, "Print",ExpressionUUID->"a9649bc8-ba1f-436c-96d7-4716a68f04ed"],
+Cell[125375, 2984, 592, 12, 24, "Print",ExpressionUUID->"647d230d-aa92-4fc6-819c-15a1a8f7ff74"],
+Cell[125970, 2998, 589, 12, 24, "Print",ExpressionUUID->"f0751fee-ff53-4e18-b36d-7f75c709e7a8"],
+Cell[126562, 3012, 590, 12, 24, "Print",ExpressionUUID->"ddcc4f61-0f11-4432-8853-080322aa71cd"],
+Cell[127155, 3026, 589, 12, 24, "Print",ExpressionUUID->"1bd8f96f-76e9-4bd0-8d64-71e88ca761cf"],
+Cell[127747, 3040, 592, 12, 24, "Print",ExpressionUUID->"a5769f72-16ca-4d1b-9e68-10da2ee9401a"],
+Cell[128342, 3054, 592, 12, 24, "Print",ExpressionUUID->"23e19ad8-482f-4e50-ac7d-39b8232d54d1"],
+Cell[128937, 3068, 590, 12, 24, "Print",ExpressionUUID->"b396acfc-b6dd-4e10-84d3-91e0b4c17af2"],
+Cell[129530, 3082, 590, 12, 24, "Print",ExpressionUUID->"d1c39757-fcd3-4738-9147-a54c82f2dc93"],
+Cell[130123, 3096, 590, 12, 24, "Print",ExpressionUUID->"2cc5187b-ef54-4224-8ec7-2cc447464207"],
+Cell[130716, 3110, 588, 12, 24, "Print",ExpressionUUID->"aeb24872-3606-402d-bbda-f6c728b9bb4e"],
+Cell[131307, 3124, 590, 12, 24, "Print",ExpressionUUID->"4bd78b51-7c87-404a-b69b-7459e440f961"],
+Cell[131900, 3138, 590, 12, 24, "Print",ExpressionUUID->"8ccee7c5-67af-4cda-8aa6-c2d372a73e4b"],
+Cell[132493, 3152, 592, 12, 24, "Print",ExpressionUUID->"769dea9d-4765-4d2c-a9d6-c4a7cece7d7e"],
+Cell[133088, 3166, 590, 12, 24, "Print",ExpressionUUID->"58dfd25c-872b-4c1b-bf35-7f0696ec3833"],
+Cell[133681, 3180, 590, 12, 24, "Print",ExpressionUUID->"7364e8b2-3b44-4871-bf2e-1dfb4fac6b94"],
+Cell[134274, 3194, 590, 12, 24, "Print",ExpressionUUID->"0fa19433-e542-4831-b249-2050001498d7"],
+Cell[134867, 3208, 590, 12, 24, "Print",ExpressionUUID->"401c4d7f-9f77-4706-b2fc-cf7dc6e60182"],
+Cell[135460, 3222, 590, 12, 24, "Print",ExpressionUUID->"2dd4dd1d-2832-49ce-b177-772408048ce2"],
+Cell[136053, 3236, 590, 12, 24, "Print",ExpressionUUID->"9c299cbb-1953-4763-a4d8-1a1ddf1b74c7"],
+Cell[136646, 3250, 590, 12, 24, "Print",ExpressionUUID->"92ebb414-1db2-41fe-9fb3-b8051b930d5a"],
+Cell[137239, 3264, 589, 12, 24, "Print",ExpressionUUID->"3968ce77-2300-4fc9-96da-7bef7eb6671f"],
+Cell[137831, 3278, 590, 12, 24, "Print",ExpressionUUID->"7a4465fd-45c5-4d98-a323-6049149a8e54"],
+Cell[138424, 3292, 590, 12, 24, "Print",ExpressionUUID->"69b9eb90-1ea7-4481-a9ef-9e8c36143262"],
+Cell[139017, 3306, 590, 12, 24, "Print",ExpressionUUID->"b0ce2cdf-180d-4fdf-9972-9ce1b75a530c"],
+Cell[139610, 3320, 592, 12, 24, "Print",ExpressionUUID->"07166acb-20fe-4ede-8c32-81341c882703"],
+Cell[140205, 3334, 590, 12, 24, "Print",ExpressionUUID->"05a04342-318c-4657-98d8-6aca8a9570f7"],
+Cell[140798, 3348, 590, 12, 24, "Print",ExpressionUUID->"39f94024-72cc-4937-a438-898c257f9156"],
+Cell[141391, 3362, 590, 12, 24, "Print",ExpressionUUID->"bb0adb22-a3cf-4d8a-910a-8f56400743ff"],
+Cell[141984, 3376, 592, 12, 24, "Print",ExpressionUUID->"7173c062-f1e7-436d-8179-73401ea1ad4f"],
+Cell[142579, 3390, 590, 12, 24, "Print",ExpressionUUID->"44f71b4e-a2e0-4cc3-8299-a02bbfa171c5"],
+Cell[143172, 3404, 590, 12, 24, "Print",ExpressionUUID->"1d350dc6-1c0c-4c30-8619-e7d194714733"],
+Cell[143765, 3418, 592, 12, 24, "Print",ExpressionUUID->"176b288c-d940-4433-a10e-451843ae7b98"],
+Cell[144360, 3432, 590, 12, 24, "Print",ExpressionUUID->"675db820-1b9d-46ed-b802-1795d97d1f0b"],
+Cell[144953, 3446, 590, 12, 24, "Print",ExpressionUUID->"e3a16c03-09c4-42fa-acf2-fea690c9104f"],
+Cell[145546, 3460, 590, 12, 24, "Print",ExpressionUUID->"f61ba134-5255-4ab9-978d-dc2089383c82"],
+Cell[146139, 3474, 590, 12, 24, "Print",ExpressionUUID->"ee96329c-ac9c-47bd-af53-6fc826925d8f"],
+Cell[146732, 3488, 590, 12, 24, "Print",ExpressionUUID->"95c79809-e754-4130-ab17-dceb7573247b"],
+Cell[147325, 3502, 592, 12, 24, "Print",ExpressionUUID->"1d355b9d-2eae-4454-8082-4376c420bb52"],
+Cell[147920, 3516, 340, 6, 24, "Print",ExpressionUUID->"b39ca931-375d-4b2d-aa49-91576fa9bb33"],
+Cell[148263, 3524, 535, 11, 24, "Print",ExpressionUUID->"6eb627fc-fa88-452c-9d88-c3f31c1c84f5"],
+Cell[148801, 3537, 522, 11, 24, "Print",ExpressionUUID->"718a1971-cda3-4d74-ba2a-27db0d2f64c6"],
+Cell[149326, 3550, 693, 15, 24, "Print",ExpressionUUID->"bcc765e6-b684-41d4-b9f8-923331f59a3d"],
+Cell[150022, 3567, 693, 15, 24, "Print",ExpressionUUID->"f0cbd9cd-a4a0-4e56-a52b-2eb7516c790f"],
+Cell[150718, 3584, 693, 15, 24, "Print",ExpressionUUID->"e4d778a7-9906-40b2-b654-bce0089e11ec"],
+Cell[151414, 3601, 693, 15, 24, "Print",ExpressionUUID->"39b2a992-ddd6-4ea7-9374-1b16f1397123"],
+Cell[152110, 3618, 697, 15, 24, "Print",ExpressionUUID->"52384a5c-f1c8-42d0-bcd6-8e8cd626659f"],
+Cell[152810, 3635, 697, 15, 24, "Print",ExpressionUUID->"178cfaf5-bf53-4494-92a1-a5bdab70dbf0"],
+Cell[153510, 3652, 697, 15, 24, "Print",ExpressionUUID->"97b5cfe9-e4b2-4e92-b61c-106983bfe7bc"],
+Cell[154210, 3669, 697, 15, 24, "Print",ExpressionUUID->"d3789ac3-2228-457f-8442-9773a5a43aa9"],
+Cell[154910, 3686, 697, 15, 24, "Print",ExpressionUUID->"ed577c22-5047-4a2d-8548-4bf0212ca75c"],
+Cell[155610, 3703, 701, 15, 24, "Print",ExpressionUUID->"fda0b7e8-d98a-4d92-8a41-bbc92a48a775"],
+Cell[156314, 3720, 701, 15, 24, "Print",ExpressionUUID->"07023e78-bec9-412e-adff-24ae67e50a70"],
+Cell[157018, 3737, 699, 15, 24, "Print",ExpressionUUID->"eae624ab-9dd9-46a4-bcdc-976378a6e5e9"],
+Cell[157720, 3754, 699, 15, 24, "Print",ExpressionUUID->"a85ef80c-90c0-4f4e-aadd-1aa9f433e969"],
+Cell[158422, 3771, 698, 15, 24, "Print",ExpressionUUID->"cbf1a0e4-3403-49af-825e-450c3f6f8381"],
+Cell[159123, 3788, 699, 15, 24, "Print",ExpressionUUID->"138bdf87-1a59-4b02-9eaf-70b0ff56842d"],
+Cell[159825, 3805, 701, 15, 24, "Print",ExpressionUUID->"3261f4eb-fa53-4023-9f9d-bbca25c6af57"],
+Cell[160529, 3822, 699, 15, 24, "Print",ExpressionUUID->"da794422-3495-4a87-a565-cae13288169e"],
+Cell[161231, 3839, 699, 15, 24, "Print",ExpressionUUID->"25b9f2f3-ee95-4804-99b9-9bab630b9780"],
+Cell[161933, 3856, 698, 15, 24, "Print",ExpressionUUID->"97cb7568-d31f-47ea-a799-30bf15fa2357"],
+Cell[162634, 3873, 187323, 3574, 296, "Print",ExpressionUUID->"6751841f-76ff-4ad2-97b9-dda1369270a5"],
+Cell[349960, 7449, 183386, 3561, 296, "Print",ExpressionUUID->"306cbd09-abac-41ee-9f6d-4b5ec83cf29c"],
+Cell[533349, 11012, 199686, 3827, 296, "Print",ExpressionUUID->"64b95aea-e735-45fc-9e2a-fb6bedc22350"],
+Cell[733038, 14841, 192070, 3702, 296, "Print",ExpressionUUID->"0aac61b9-b707-4352-b484-ba5a8ea791ae"],
+Cell[925111, 18545, 38705, 779, 296, "Print",ExpressionUUID->"c482892d-792f-4e01-b976-eeed43c2c366"],
+Cell[963819, 19326, 693, 15, 24, "Print",ExpressionUUID->"cbf5c2a7-3746-451c-8624-4dcc1ba0f98a"],
+Cell[964515, 19343, 695, 15, 24, "Print",ExpressionUUID->"02a3bd31-6e06-4496-88e2-ef8766bb9783"],
+Cell[965213, 19360, 695, 15, 24, "Print",ExpressionUUID->"292815c1-45f3-475a-af82-00590959c16e"],
+Cell[965911, 19377, 693, 15, 24, "Print",ExpressionUUID->"b7fee54b-6209-40f6-9f9f-10e497c197b6"],
+Cell[966607, 19394, 697, 15, 24, "Print",ExpressionUUID->"3209f1ad-6ea9-4357-8176-10429fe11391"],
+Cell[967307, 19411, 697, 15, 24, "Print",ExpressionUUID->"ca352abb-fe11-410e-8322-2ce39234b094"],
+Cell[968007, 19428, 699, 15, 24, "Print",ExpressionUUID->"82a695c0-088f-4d5c-a5cb-a74ed23247f0"],
+Cell[968709, 19445, 699, 15, 24, "Print",ExpressionUUID->"236565b3-b8de-4303-a786-5a1eba9e724c"],
+Cell[969411, 19462, 696, 15, 24, "Print",ExpressionUUID->"bd1bea21-d72e-4cdb-9908-2050fcfe40c6"],
+Cell[970110, 19479, 699, 15, 24, "Print",ExpressionUUID->"68f1074d-bfb0-4efb-999b-0e7171b699b7"],
+Cell[970812, 19496, 699, 15, 24, "Print",ExpressionUUID->"8a199273-bda5-4d42-8036-88f37eb9501a"],
+Cell[971514, 19513, 699, 15, 24, "Print",ExpressionUUID->"358e2294-9ad6-4cba-a0e6-1abe99c3a81d"],
+Cell[972216, 19530, 699, 15, 24, "Print",ExpressionUUID->"b9e4bcd6-09db-4bc8-b80b-aa538dcb9b0a"],
+Cell[972918, 19547, 699, 15, 24, "Print",ExpressionUUID->"eb0c65aa-ec7b-4af6-9ab9-7fa32a82700f"],
+Cell[973620, 19564, 699, 15, 24, "Print",ExpressionUUID->"cc147248-5fca-42ca-9d42-9a980b81cec1"],
+Cell[974322, 19581, 699, 15, 24, "Print",ExpressionUUID->"ef08089c-f83c-4e58-8d38-e68e658256b1"],
+Cell[975024, 19598, 701, 15, 24, "Print",ExpressionUUID->"cf5dd067-e0f0-407d-b633-37054a8867c6"],
+Cell[975728, 19615, 699, 15, 24, "Print",ExpressionUUID->"cd06af1e-5509-4375-a93a-10e11a0dc383"],
+Cell[976430, 19632, 699, 15, 24, "Print",ExpressionUUID->"f70a5eee-b194-4c18-9fcc-167674d51a44"]
+}, Open  ]],
+Cell[977144, 19650, 315, 4, 34, "Output",ExpressionUUID->"d79637b0-08aa-4536-8506-f77a2a16d880"],
+Cell[CellGroupData[{
+Cell[977484, 19658, 340, 6, 24, "Print",ExpressionUUID->"ffc82ff7-24b1-486f-8187-c620cc49f0a2"],
+Cell[977827, 19666, 559, 11, 24, "Print",ExpressionUUID->"3879e29b-3cbf-499a-acff-3e595c73e21f"],
+Cell[978389, 19679, 588, 12, 24, "Print",ExpressionUUID->"d14582c8-ff1f-4330-b15b-1b0b4c6b2338"],
+Cell[978980, 19693, 586, 12, 24, "Print",ExpressionUUID->"7a2e3214-e4b7-4bdb-aaac-88fe2f119c09"],
+Cell[979569, 19707, 586, 12, 24, "Print",ExpressionUUID->"14cee031-2ab7-4213-b8fe-7cd4db9f8e50"],
+Cell[980158, 19721, 586, 12, 24, "Print",ExpressionUUID->"a6c38bb8-17f6-49ee-995f-2490e32591c4"],
+Cell[980747, 19735, 586, 12, 24, "Print",ExpressionUUID->"c9a29be3-1aa2-4ec5-a895-fc4d0bb48a02"],
+Cell[981336, 19749, 586, 12, 24, "Print",ExpressionUUID->"b45fecbe-c3a4-47cd-9b84-68df6f7a7d43"],
+Cell[981925, 19763, 588, 12, 24, "Print",ExpressionUUID->"9fb38ea0-c59c-4024-9276-0feec3269214"],
+Cell[982516, 19777, 586, 12, 24, "Print",ExpressionUUID->"c133bf4e-7342-4327-af7c-6ebd1c82cbb7"],
+Cell[983105, 19791, 586, 12, 24, "Print",ExpressionUUID->"42e40ad8-c10a-499a-8e9b-084087384d9e"],
+Cell[983694, 19805, 587, 12, 24, "Print",ExpressionUUID->"aa04af00-2f0d-4e9b-9a69-98d7d903733e"],
+Cell[984284, 19819, 590, 12, 24, "Print",ExpressionUUID->"53a06575-6e80-458a-8d62-e74f9e799a3f"],
+Cell[984877, 19833, 590, 12, 24, "Print",ExpressionUUID->"5e24b5ad-ca75-4b07-81a9-d95671dfdf70"],
+Cell[985470, 19847, 588, 12, 24, "Print",ExpressionUUID->"9fc90ed5-3cbe-4e65-ad36-e39efb75c512"],
+Cell[986061, 19861, 588, 12, 24, "Print",ExpressionUUID->"7f04687e-cb41-45fd-b3cf-75433702c44d"],
+Cell[986652, 19875, 588, 12, 24, "Print",ExpressionUUID->"43fee89e-d6b1-431c-9b0e-3d45e037713a"],
+Cell[987243, 19889, 590, 12, 24, "Print",ExpressionUUID->"6af18cf1-9e62-45cd-924d-71e32334ce4b"],
+Cell[987836, 19903, 588, 12, 24, "Print",ExpressionUUID->"6bcbb518-d9d0-48cd-b271-3652bf782e86"],
+Cell[988427, 19917, 590, 12, 24, "Print",ExpressionUUID->"06df76bd-e0a2-4f71-8bc0-605fffff985c"],
+Cell[989020, 19931, 588, 12, 24, "Print",ExpressionUUID->"1efec01c-2547-4c04-ae9e-3ed797ff56c7"],
+Cell[989611, 19945, 520, 11, 24, "Print",ExpressionUUID->"d7db2bea-f18c-4745-a892-ad163359c203"],
+Cell[990134, 19958, 461, 8, 63, "Print",ExpressionUUID->"f7d40fa0-2e81-44cb-b977-19fca6fe9eb3"],
+Cell[990598, 19968, 358, 6, 24, "Print",ExpressionUUID->"32e1d87b-fe20-40c4-895a-065869fb386b"],
+Cell[990959, 19976, 344, 6, 44, "Print",ExpressionUUID->"86e8c25e-d826-44d9-84d0-dec075063487"]
+}, Open  ]]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[991352, 19988, 4861, 125, 451, "Input",ExpressionUUID->"6db5e1ce-d298-4829-9b87-57793191d1ff"],
+Cell[CellGroupData[{
+Cell[996238, 20117, 186, 4, 24, "Print",ExpressionUUID->"d7665995-5b38-4120-864a-216b5be8a360"],
+Cell[996427, 20123, 183, 4, 24, "Print",ExpressionUUID->"67c9fb12-783d-4c5a-86dc-486c8bf67ee8"],
+Cell[996613, 20129, 443, 11, 24, "Print",ExpressionUUID->"7119e816-c5e9-4981-9e2d-f65be7c0e570"],
+Cell[997059, 20142, 181, 4, 24, "Print",ExpressionUUID->"1c682e20-40d1-4dec-9202-a3530a13ffaa"],
+Cell[997243, 20148, 380, 9, 24, "Print",ExpressionUUID->"357774aa-48ca-497b-a2b0-d9e0e0411f61"],
+Cell[997626, 20159, 429, 10, 24, "Print",ExpressionUUID->"b3ed0818-0a18-48a5-bd83-961ac488432d"],
+Cell[998058, 20171, 427, 10, 24, "Print",ExpressionUUID->"a8cd2652-f78d-4dda-98a0-1a4f36fb6be7"],
+Cell[998488, 20183, 429, 10, 24, "Print",ExpressionUUID->"0d57b7aa-3abc-4b65-9bbc-f278967af523"],
+Cell[998920, 20195, 429, 10, 24, "Print",ExpressionUUID->"67624f7f-4342-4ae2-a7ca-011b41653683"],
+Cell[999352, 20207, 427, 10, 24, "Print",ExpressionUUID->"06403b8a-f28c-4d35-8662-5be9cd241ac1"],
+Cell[999782, 20219, 427, 10, 24, "Print",ExpressionUUID->"8d069dbc-972a-4606-b916-420e9649f4a1"],
+Cell[1000212, 20231, 427, 10, 24, "Print",ExpressionUUID->"b7bdb7e3-2cab-4534-bcb4-2f6b75ffcc9e"],
+Cell[1000642, 20243, 429, 10, 24, "Print",ExpressionUUID->"9c046f14-91b4-4a0d-a90e-e2cbd55888a4"],
+Cell[1001074, 20255, 427, 10, 24, "Print",ExpressionUUID->"dbc52e95-3dbd-48f5-8519-d6d2e9bb9c0e"],
+Cell[1001504, 20267, 429, 10, 24, "Print",ExpressionUUID->"bb636163-f263-4c9c-87f0-711e80330b4b"],
+Cell[1001936, 20279, 431, 10, 24, "Print",ExpressionUUID->"a0686b78-ee49-4f11-baca-9b5848c0ad03"],
+Cell[1002370, 20291, 431, 10, 24, "Print",ExpressionUUID->"ba894d17-c186-4106-8d12-7666f4860452"],
+Cell[1002804, 20303, 429, 10, 24, "Print",ExpressionUUID->"d83ab526-a801-47a1-9900-89a8118f30ff"],
+Cell[1003236, 20315, 429, 10, 24, "Print",ExpressionUUID->"38549d4b-1beb-4050-aa0f-07f0fd654af3"],
+Cell[1003668, 20327, 429, 10, 24, "Print",ExpressionUUID->"6ece42c0-706e-442e-92c2-737b95ae7a52"],
+Cell[1004100, 20339, 429, 10, 24, "Print",ExpressionUUID->"2559847a-4207-4de3-942a-c10316ee3c14"],
+Cell[1004532, 20351, 429, 10, 24, "Print",ExpressionUUID->"2ff8cda3-b3d4-4a45-a687-5020b59824e5"],
+Cell[1004964, 20363, 429, 10, 24, "Print",ExpressionUUID->"28d8203b-6a33-49e5-8a4c-10be6dd4b472"],
+Cell[1005396, 20375, 429, 10, 24, "Print",ExpressionUUID->"bc05dcd6-f8fa-4722-bd47-3a3c0d8d5b1b"],
+Cell[1005828, 20387, 429, 10, 24, "Print",ExpressionUUID->"bf2e2165-1a49-445d-af8a-841f01b52c3f"],
+Cell[1006260, 20399, 428, 10, 24, "Print",ExpressionUUID->"3ed27a96-2350-4395-98b5-4918682bc638"],
+Cell[1006691, 20411, 431, 10, 24, "Print",ExpressionUUID->"1a598280-c3c8-495d-be24-9d11966bc96f"],
+Cell[1007125, 20423, 429, 10, 24, "Print",ExpressionUUID->"8a78dd65-5af2-4e1b-973a-6576f9de479c"],
+Cell[1007557, 20435, 429, 10, 24, "Print",ExpressionUUID->"b4e28a3e-fb4f-40ed-bc81-1a254c57368a"],
+Cell[1007989, 20447, 429, 10, 24, "Print",ExpressionUUID->"97aeba55-6dd0-46ea-886b-51055bf92eab"],
+Cell[1008421, 20459, 429, 10, 24, "Print",ExpressionUUID->"eecaa652-f260-49fe-bf45-4ba9ba10398d"],
+Cell[1008853, 20471, 429, 10, 24, "Print",ExpressionUUID->"ad542275-ffa7-47cf-8fc2-adc45c19d68c"],
+Cell[1009285, 20483, 429, 10, 24, "Print",ExpressionUUID->"a5137e25-aa17-4ab8-a7cd-42f746873514"],
+Cell[1009717, 20495, 429, 10, 24, "Print",ExpressionUUID->"160f3722-c0d4-40c5-88d0-0116fec82483"],
+Cell[1010149, 20507, 431, 10, 24, "Print",ExpressionUUID->"69acbb0d-07e1-4e21-9f3a-8a861cc7cb0a"],
+Cell[1010583, 20519, 429, 10, 24, "Print",ExpressionUUID->"32062fb6-7d5a-4431-86ed-d4145f64b283"],
+Cell[1011015, 20531, 429, 10, 24, "Print",ExpressionUUID->"4a5dd41b-30a2-4d33-b8ae-b714067bfad5"],
+Cell[1011447, 20543, 429, 10, 24, "Print",ExpressionUUID->"7dcb4b17-950e-45da-93c6-f6461f82a320"],
+Cell[1011879, 20555, 429, 10, 24, "Print",ExpressionUUID->"a44c2779-0733-40b0-9bf1-e4c603a6ea81"],
+Cell[1012311, 20567, 429, 10, 24, "Print",ExpressionUUID->"6791ef6b-c94d-424f-824d-9cf43afcd817"],
+Cell[1012743, 20579, 431, 10, 24, "Print",ExpressionUUID->"bae5aeba-ba1c-4fae-8077-33f4aef558b2"],
+Cell[1013177, 20591, 429, 10, 24, "Print",ExpressionUUID->"cd833297-8239-403c-8ad9-a1c5860aca35"],
+Cell[1013609, 20603, 431, 10, 24, "Print",ExpressionUUID->"98db6214-067b-4c9e-8017-6ac3ad09a81d"],
+Cell[1014043, 20615, 428, 10, 24, "Print",ExpressionUUID->"3bdf4e83-bd51-4fed-ab7b-075118a2aa06"],
+Cell[1014474, 20627, 429, 10, 24, "Print",ExpressionUUID->"fcf1a58b-4031-420a-8f1b-df4b6112e548"],
+Cell[1014906, 20639, 431, 10, 24, "Print",ExpressionUUID->"b34baa65-3299-4305-b15b-ebc9cc8f9554"],
+Cell[1015340, 20651, 429, 10, 24, "Print",ExpressionUUID->"1f3e0b9e-8944-4952-9a41-b5d487a7b7b8"],
+Cell[1015772, 20663, 431, 10, 24, "Print",ExpressionUUID->"5df6cea2-df7e-4395-90dd-95dc73a4845e"],
+Cell[1016206, 20675, 429, 10, 24, "Print",ExpressionUUID->"63756f13-8f17-4af9-adbd-295261c9312f"],
+Cell[1016638, 20687, 429, 10, 24, "Print",ExpressionUUID->"635e32cf-a783-4e2e-a5d6-75d616e9d537"],
+Cell[1017070, 20699, 429, 10, 24, "Print",ExpressionUUID->"5a19dbbf-8457-4a41-b7a2-4e44c1bdd2b8"],
+Cell[1017502, 20711, 429, 10, 24, "Print",ExpressionUUID->"cd07cf2e-46ec-42f4-8eb9-47b3a1fe4603"],
+Cell[1017934, 20723, 429, 10, 24, "Print",ExpressionUUID->"d2df5218-4f23-4c0e-8100-9147a518998c"],
+Cell[1018366, 20735, 429, 10, 24, "Print",ExpressionUUID->"d5ce00ca-5692-41db-ba2e-60c0f5b93227"],
+Cell[1018798, 20747, 429, 10, 24, "Print",ExpressionUUID->"478fa217-805d-41a6-8dcb-30e4e26bdfcb"],
+Cell[1019230, 20759, 431, 10, 24, "Print",ExpressionUUID->"4ecce0b5-2ed6-48e1-b377-c1fd9d735c92"],
+Cell[1019664, 20771, 429, 10, 24, "Print",ExpressionUUID->"c16fa650-2b43-4dca-99e1-5337341c0d9f"],
+Cell[1020096, 20783, 429, 10, 24, "Print",ExpressionUUID->"12de3db1-44f2-4303-b41c-26c8d0d1cbc2"],
+Cell[1020528, 20795, 429, 10, 24, "Print",ExpressionUUID->"6a84b3ff-5868-4a11-879b-834cc9e7a917"],
+Cell[1020960, 20807, 429, 10, 24, "Print",ExpressionUUID->"3fc90174-0d41-48bf-9c50-9e1da7082a38"],
+Cell[1021392, 20819, 429, 10, 24, "Print",ExpressionUUID->"fc1d47fc-1dcd-4fe5-9ec2-c4508e93a889"],
+Cell[1021824, 20831, 431, 10, 24, "Print",ExpressionUUID->"48347fc7-5023-4097-90f4-faaec3020269"],
+Cell[1022258, 20843, 429, 10, 24, "Print",ExpressionUUID->"e07e5d66-ab18-4047-97bf-4c6644046707"],
+Cell[1022690, 20855, 429, 10, 24, "Print",ExpressionUUID->"619dc925-96f5-414f-9f86-527e4f08adca"],
+Cell[1023122, 20867, 431, 10, 24, "Print",ExpressionUUID->"de4bd8c1-3a36-47cb-901c-e9c922c31b87"],
+Cell[1023556, 20879, 429, 10, 24, "Print",ExpressionUUID->"19beddf1-613e-4efe-b086-d97b97eda1be"],
+Cell[1023988, 20891, 429, 10, 24, "Print",ExpressionUUID->"a3629449-4ecd-4110-ae35-3950d64c1003"],
+Cell[1024420, 20903, 429, 10, 24, "Print",ExpressionUUID->"7ca4ccc9-a800-4a94-a2b6-5b119e12c156"],
+Cell[1024852, 20915, 429, 10, 24, "Print",ExpressionUUID->"d444d9de-70e7-4691-b1db-d71bdfcef946"],
+Cell[1025284, 20927, 429, 10, 24, "Print",ExpressionUUID->"94c93543-0587-4e98-9afa-ce44e151b889"],
+Cell[1025716, 20939, 431, 10, 24, "Print",ExpressionUUID->"e4532781-8059-42b6-bc04-ffa41119502a"],
+Cell[1026150, 20951, 429, 10, 24, "Print",ExpressionUUID->"7beaf51f-4c24-4952-8c78-4b480c656c58"],
+Cell[1026582, 20963, 429, 10, 24, "Print",ExpressionUUID->"4951bb34-c816-40f5-aeef-010adab576e3"],
+Cell[1027014, 20975, 429, 10, 24, "Print",ExpressionUUID->"d8facc23-89df-4b2a-a74e-7dfa3d234eca"],
+Cell[1027446, 20987, 429, 10, 24, "Print",ExpressionUUID->"6fb26224-367e-4f3e-a991-6d85a6124d0f"],
+Cell[1027878, 20999, 429, 10, 24, "Print",ExpressionUUID->"a5135887-51ee-4b81-9af6-6a9acc78eea0"],
+Cell[1028310, 21011, 429, 10, 24, "Print",ExpressionUUID->"704cca61-2b8a-4142-a74b-9f65295cdcc9"],
+Cell[1028742, 21023, 431, 10, 24, "Print",ExpressionUUID->"d890d246-9fee-449f-bddf-019c3c250f78"],
+Cell[1029176, 21035, 429, 10, 24, "Print",ExpressionUUID->"332180fd-80ec-4766-ae62-e8bfa48b554d"],
+Cell[1029608, 21047, 431, 10, 24, "Print",ExpressionUUID->"983d895e-8b21-442f-940a-7a0add8cf449"],
+Cell[1030042, 21059, 429, 10, 24, "Print",ExpressionUUID->"8d879242-0fab-439a-b678-a1092c3b0400"],
+Cell[1030474, 21071, 429, 10, 24, "Print",ExpressionUUID->"9949c074-3b76-4c60-8188-ad3f724c1594"],
+Cell[1030906, 21083, 431, 10, 24, "Print",ExpressionUUID->"5056b01c-7bea-4d14-b393-9756e5b57c78"],
+Cell[1031340, 21095, 429, 10, 24, "Print",ExpressionUUID->"45872de8-cad7-423b-93b4-18588bc83a2b"],
+Cell[1031772, 21107, 431, 10, 24, "Print",ExpressionUUID->"2c82be28-dfd2-42e1-a633-b4f3e502ec05"],
+Cell[1032206, 21119, 431, 10, 24, "Print",ExpressionUUID->"02b1d7a6-3f16-44ad-ac81-351b908c41f9"],
+Cell[1032640, 21131, 431, 10, 24, "Print",ExpressionUUID->"9e0068b8-515c-4c16-ac68-0808e51885d9"],
+Cell[1033074, 21143, 429, 10, 24, "Print",ExpressionUUID->"d5d53c86-b600-417f-ad78-14d06668024b"],
+Cell[1033506, 21155, 431, 10, 24, "Print",ExpressionUUID->"895877a0-6836-438c-a01d-0423117f6574"],
+Cell[1033940, 21167, 429, 10, 24, "Print",ExpressionUUID->"0ebc1075-914a-477c-9d7f-fcbec7b2d39a"],
+Cell[1034372, 21179, 431, 10, 24, "Print",ExpressionUUID->"e042d911-9291-47cc-975a-238003128fb7"],
+Cell[1034806, 21191, 429, 10, 24, "Print",ExpressionUUID->"50944f14-3ee9-42da-979a-5172021b8cb7"],
+Cell[1035238, 21203, 431, 10, 24, "Print",ExpressionUUID->"1b507f01-fd8a-46bb-9780-f763478ec943"],
+Cell[1035672, 21215, 429, 10, 24, "Print",ExpressionUUID->"a5a35299-81d0-4fbb-b0a1-d8f542dc6070"],
+Cell[1036104, 21227, 429, 10, 24, "Print",ExpressionUUID->"28983f92-0aee-4863-a944-050b4adde8f6"],
+Cell[1036536, 21239, 431, 10, 24, "Print",ExpressionUUID->"0893dc70-aa9f-4a03-b651-7f21ded2c37a"],
+Cell[1036970, 21251, 431, 10, 24, "Print",ExpressionUUID->"074366cb-c61a-4889-a983-a179b0621ba9"],
+Cell[1037404, 21263, 428, 10, 24, "Print",ExpressionUUID->"5a848af4-e0fb-42f5-8423-3472b969ed21"],
+Cell[1037835, 21275, 429, 10, 24, "Print",ExpressionUUID->"986ddbcb-d7c6-4df6-b4db-9b43f6cc21dd"],
+Cell[1038267, 21287, 429, 10, 24, "Print",ExpressionUUID->"3fa42382-223a-4bfb-8bc6-e279ad07fc8a"],
+Cell[1038699, 21299, 429, 10, 24, "Print",ExpressionUUID->"5f4b52f1-e247-476e-a54c-781493e8cb6f"],
+Cell[1039131, 21311, 429, 10, 24, "Print",ExpressionUUID->"9a91a84a-19eb-42a5-a7b0-9f37e72209c3"],
+Cell[1039563, 21323, 429, 10, 24, "Print",ExpressionUUID->"0c831a3a-d006-4b30-9ec8-281f948859fb"],
+Cell[1039995, 21335, 429, 10, 24, "Print",ExpressionUUID->"29f514fc-72cb-4d6d-a8fc-a490a60ee46e"],
+Cell[1040427, 21347, 430, 10, 24, "Print",ExpressionUUID->"9dc03715-efa6-454f-ba2a-24cdeb417e0b"],
+Cell[1040860, 21359, 431, 10, 24, "Print",ExpressionUUID->"5b3d912c-484e-41ce-8511-796aeb1f52c4"],
+Cell[1041294, 21371, 433, 10, 24, "Print",ExpressionUUID->"68d56b4e-f5a2-412f-98e7-46068d844ac2"],
+Cell[1041730, 21383, 431, 10, 24, "Print",ExpressionUUID->"7641702a-ceea-47fa-b168-d111beb3cd8b"],
+Cell[1042164, 21395, 431, 10, 24, "Print",ExpressionUUID->"796af381-fa0e-480b-b3dc-da3e547ac0e7"],
+Cell[1042598, 21407, 430, 10, 24, "Print",ExpressionUUID->"bfa7760a-852d-4046-b5da-a2ea841c2f56"],
+Cell[1043031, 21419, 433, 10, 24, "Print",ExpressionUUID->"8b33e52d-1f2f-4c3a-b046-b1b09abf4127"],
+Cell[1043467, 21431, 433, 10, 24, "Print",ExpressionUUID->"8ad33386-ec91-4e7b-bc54-9fb871896c31"],
+Cell[1043903, 21443, 433, 10, 24, "Print",ExpressionUUID->"5d266ec0-5529-4ea4-b8fe-49b14db1bd90"],
+Cell[1044339, 21455, 431, 10, 24, "Print",ExpressionUUID->"8775bc1b-23b9-4068-89f9-4c039a369567"],
+Cell[1044773, 21467, 433, 10, 24, "Print",ExpressionUUID->"7c69cb31-6e0c-4048-891e-f229a2b37c3e"],
+Cell[1045209, 21479, 430, 10, 24, "Print",ExpressionUUID->"38d4bc27-71d6-477b-b8b1-85c15ee8e247"],
+Cell[1045642, 21491, 433, 10, 24, "Print",ExpressionUUID->"929dfbd2-c745-43c7-a269-531beb85c2f7"],
+Cell[1046078, 21503, 431, 10, 24, "Print",ExpressionUUID->"2a4b661c-93e4-41c5-b6ed-30fc494f59f3"],
+Cell[1046512, 21515, 431, 10, 24, "Print",ExpressionUUID->"a2d64867-0f1b-4d5f-969c-28aefa5581d0"],
+Cell[1046946, 21527, 431, 10, 24, "Print",ExpressionUUID->"07253675-1d8c-4c3c-aa33-e88ff8eaef19"],
+Cell[1047380, 21539, 430, 10, 24, "Print",ExpressionUUID->"72db5043-c184-4464-88a0-11e92b63e50a"],
+Cell[1047813, 21551, 433, 10, 24, "Print",ExpressionUUID->"3a017fc0-8a53-4a29-9251-12ae21ebafbf"],
+Cell[1048249, 21563, 431, 10, 24, "Print",ExpressionUUID->"4845b75d-47ca-4bfa-8faa-c7fa8666bbbf"],
+Cell[1048683, 21575, 433, 10, 24, "Print",ExpressionUUID->"3fff6dc3-1cb7-423d-9c53-e5c4ef91f300"],
+Cell[1049119, 21587, 433, 10, 24, "Print",ExpressionUUID->"49fd2ce2-5024-40a2-9ec5-2363bbca7a13"],
+Cell[1049555, 21599, 181, 4, 24, "Print",ExpressionUUID->"6404ceef-d342-45ea-9662-82ae93a425c2"],
+Cell[1049739, 21605, 376, 9, 24, "Print",ExpressionUUID->"1bf236cc-5ac1-45ea-a75d-d7eccb1d0763"],
+Cell[1050118, 21616, 363, 9, 24, "Print",ExpressionUUID->"51fb3dec-4b3e-4c81-9c24-85b57bd4ff1b"],
+Cell[1050484, 21627, 537, 13, 24, "Print",ExpressionUUID->"d10fd181-1351-4d5d-a097-d55dcd4f9cd7"],
+Cell[1051024, 21642, 538, 13, 24, "Print",ExpressionUUID->"b8317f05-e1a0-4750-9f00-06c0b79e2292"],
+Cell[1051565, 21657, 538, 13, 24, "Print",ExpressionUUID->"a78601d9-d1c0-442a-b234-c8c46bec6200"],
+Cell[1052106, 21672, 538, 13, 24, "Print",ExpressionUUID->"c8e35b33-ebd2-47e6-8c1c-d7758727728e"],
+Cell[1052647, 21687, 540, 13, 24, "Print",ExpressionUUID->"3d2be911-6f81-4f0c-896d-56183aed70d9"],
+Cell[1053190, 21702, 538, 13, 24, "Print",ExpressionUUID->"39342352-8933-449d-ba88-dec7dd6882d5"],
+Cell[1053731, 21717, 538, 13, 24, "Print",ExpressionUUID->"3c27eb42-ad52-4225-be2d-66f31fa0e9ef"],
+Cell[1054272, 21732, 536, 13, 24, "Print",ExpressionUUID->"36a27991-21e8-4661-b5ff-e47e384bc63c"],
+Cell[1054811, 21747, 538, 13, 24, "Print",ExpressionUUID->"f40b6e5f-7daf-42c5-91df-70dfe1e4585c"],
+Cell[1055352, 21762, 540, 13, 24, "Print",ExpressionUUID->"dcb7564d-06ed-44d0-9e10-47793b600ad2"],
+Cell[1055895, 21777, 540, 13, 24, "Print",ExpressionUUID->"f7a25ea9-8723-4dce-ba66-04f741f73756"],
+Cell[1056438, 21792, 542, 13, 24, "Print",ExpressionUUID->"0e01dd7d-dfd6-44a9-88fc-124eed1955cf"],
+Cell[1056983, 21807, 539, 13, 24, "Print",ExpressionUUID->"d73394dc-51bb-407f-b290-6762e02597a3"],
+Cell[1057525, 21822, 540, 13, 24, "Print",ExpressionUUID->"2aa34850-4118-451e-9bbe-beffa4ca11d1"],
+Cell[1058068, 21837, 542, 13, 24, "Print",ExpressionUUID->"dba7da10-584e-4a36-9120-5fe8fd695e9d"],
+Cell[1058613, 21852, 542, 13, 24, "Print",ExpressionUUID->"87ac91e2-e101-43e7-a9a1-76c38598030e"],
+Cell[1059158, 21867, 542, 13, 24, "Print",ExpressionUUID->"61aec5f2-7a78-4dc4-a944-4cb69ee78fde"],
+Cell[1059703, 21882, 540, 13, 24, "Print",ExpressionUUID->"2b5675aa-44f7-492b-a6f2-e4e03aa81c82"],
+Cell[1060246, 21897, 168992, 3283, 296, "Print",ExpressionUUID->"70a06fb7-ad3a-4c53-a702-68cc4b24ca3c"],
+Cell[1229241, 25182, 186346, 3572, 296, "Print",ExpressionUUID->"80f68548-0b73-4548-b02e-48df91477fdf"],
+Cell[1415590, 28756, 193892, 3691, 296, "Print",ExpressionUUID->"4909787c-6f76-40ff-ab6e-5078194faf99"],
+Cell[1609485, 32449, 152209, 3004, 296, "Print",ExpressionUUID->"a1d695a8-6b7f-4c0c-b5a0-efde83f82c9d"],
+Cell[1761697, 35455, 538, 13, 24, "Print",ExpressionUUID->"8289f544-f4e9-49a0-afb4-d0518ee201dc"],
+Cell[1762238, 35470, 538, 13, 24, "Print",ExpressionUUID->"5dfb408f-578a-4763-bae2-57be854ace19"],
+Cell[1762779, 35485, 540, 13, 24, "Print",ExpressionUUID->"7997a7d7-02c3-4b7a-bb30-60f55297c0c4"],
+Cell[1763322, 35500, 540, 13, 24, "Print",ExpressionUUID->"815a1deb-5e75-4989-a9ce-dedb92a3c6fa"],
+Cell[1763865, 35515, 540, 13, 24, "Print",ExpressionUUID->"9a588a87-148a-45d7-b829-ee521fc8b534"],
+Cell[1764408, 35530, 538, 13, 24, "Print",ExpressionUUID->"a619c015-fc96-4bed-9e7c-47615ff8c958"],
+Cell[1764949, 35545, 538, 13, 24, "Print",ExpressionUUID->"943d135c-d0e8-458a-b10f-5896bb7dfc5a"],
+Cell[1765490, 35560, 540, 13, 24, "Print",ExpressionUUID->"906b9afa-4404-4b7a-9fbf-54b554fa3b3c"],
+Cell[1766033, 35575, 538, 13, 24, "Print",ExpressionUUID->"f96d0ac0-d312-45fb-b70e-6f30a2c318a1"],
+Cell[1766574, 35590, 540, 13, 24, "Print",ExpressionUUID->"bd269577-c1b8-4067-9282-d248754ce10f"],
+Cell[1767117, 35605, 542, 13, 24, "Print",ExpressionUUID->"7e2210b4-20c6-47cb-b765-6186e5f55ff0"],
+Cell[1767662, 35620, 539, 13, 24, "Print",ExpressionUUID->"3160068d-dbe9-48d1-96e7-eb84163e5c78"],
+Cell[1768204, 35635, 540, 13, 24, "Print",ExpressionUUID->"df6e3fcb-7ddc-42ca-be0b-6d95b9fd38f5"],
+Cell[1768747, 35650, 542, 13, 24, "Print",ExpressionUUID->"f8825dd2-2c0d-456a-b45b-af739b0ca4ab"],
+Cell[1769292, 35665, 540, 13, 24, "Print",ExpressionUUID->"f5437035-851f-445e-915f-3f5dea41ad12"],
+Cell[1769835, 35680, 542, 13, 24, "Print",ExpressionUUID->"fcc3444c-88de-4ae3-90fb-897d0944fba2"],
+Cell[1770380, 35695, 540, 13, 24, "Print",ExpressionUUID->"015c0356-7120-4005-9972-9c500e5040d7"],
+Cell[1770923, 35710, 539, 13, 24, "Print",ExpressionUUID->"986c3431-dc35-445a-b2ab-4041a3dd5e52"]
+}, Open  ]],
+Cell[1771477, 35726, 152, 2, 34, "Output",ExpressionUUID->"ff3afdd3-458e-4a26-a454-93ab7fe359f9"],
+Cell[CellGroupData[{
+Cell[1771654, 35732, 181, 4, 24, "Print",ExpressionUUID->"6cf863c8-4577-4392-9dde-2ad752a77806"],
+Cell[1771838, 35738, 398, 9, 24, "Print",ExpressionUUID->"1513ec06-85f4-4e9e-9a33-ca2cf384a552"],
+Cell[1772239, 35749, 429, 10, 24, "Print",ExpressionUUID->"81dcff6a-5b08-4a52-a0fb-8e2d5e543a72"],
+Cell[1772671, 35761, 427, 10, 24, "Print",ExpressionUUID->"1a9ed642-45c0-4e59-a831-a38cfb39daf9"],
+Cell[1773101, 35773, 427, 10, 24, "Print",ExpressionUUID->"0c955cdc-047d-4aa7-9736-b65399fcec78"],
+Cell[1773531, 35785, 427, 10, 24, "Print",ExpressionUUID->"900260b3-c99c-4adf-965e-4f55b8e6dc4c"],
+Cell[1773961, 35797, 425, 10, 24, "Print",ExpressionUUID->"27078933-f3a9-41d6-803f-89ee056ea1d4"],
+Cell[1774389, 35809, 359, 9, 24, "Print",ExpressionUUID->"0e2b189f-4e20-458b-a8fd-02cf4f4d9b77"],
+Cell[1774751, 35820, 300, 6, 63, "Print",ExpressionUUID->"469abe51-6516-4a0b-9037-7f4be311eee7"],
+Cell[1775054, 35828, 197, 4, 24, "Print",ExpressionUUID->"714c3095-a8df-44e8-ad5f-c168cb4bee85"],
+Cell[1775254, 35834, 188, 4, 44, "Print",ExpressionUUID->"82db79c3-91d2-4d15-8361-00b63715f011"],
+Cell[1775445, 35840, 363, 9, 24, "Print",ExpressionUUID->"18364dc7-e343-4295-9070-6190387cbb70"]
+}, Open  ]],
+Cell[1775823, 35852, 408, 10, 24, "Message",ExpressionUUID->"e0744e9d-e2ef-4a76-bd2f-fa7b3575d7ef"],
+Cell[1776234, 35864, 408, 10, 24, "Message",ExpressionUUID->"23b07601-e675-4ee5-8f25-8b0bdf7a5ad5"],
+Cell[1776645, 35876, 408, 10, 24, "Message",ExpressionUUID->"ac70579a-eda8-480d-92eb-abd167b49968"],
+Cell[1777056, 35888, 472, 10, 24, "Message",ExpressionUUID->"2479bce6-8bad-4ae2-89c6-44e875b32ef3"],
+Cell[CellGroupData[{
+Cell[1777553, 35902, 183, 4, 24, "Print",ExpressionUUID->"bf220334-165a-42a0-a103-0f1f677641c5"],
+Cell[1777739, 35908, 398, 9, 24, "Print",ExpressionUUID->"1a507720-2dd7-4c46-b79b-33d9b6e1b3a7"],
+Cell[1778140, 35919, 425, 10, 24, "Print",ExpressionUUID->"216509b2-4e52-4995-986f-23fb433e820c"],
+Cell[1778568, 35931, 429, 10, 24, "Print",ExpressionUUID->"2de11935-a6c3-4459-8353-525a400a8178"],
+Cell[1779000, 35943, 427, 10, 24, "Print",ExpressionUUID->"24add32f-f221-4043-9ba1-b50bc64ab4e9"],
+Cell[1779430, 35955, 429, 10, 24, "Print",ExpressionUUID->"a29ca9a1-308e-4cdd-b809-7c30d8140fd8"],
+Cell[1779862, 35967, 427, 10, 24, "Print",ExpressionUUID->"c3e78189-1864-4e59-aeac-543d34077095"],
+Cell[1780292, 35979, 361, 9, 24, "Print",ExpressionUUID->"fc8813f9-37c9-4faa-b480-3462c870c98e"],
+Cell[1780656, 35990, 300, 6, 63, "Print",ExpressionUUID->"9217e22f-3c3c-4953-b200-3c4a85426d3a"],
+Cell[1780959, 35998, 197, 4, 24, "Print",ExpressionUUID->"351c5b47-65a4-4e20-b498-26d08f7d90d7"],
+Cell[1781159, 36004, 186, 4, 44, "Print",ExpressionUUID->"aeeb27bc-4328-4853-8228-60cacec4bb3f"],
+Cell[1781348, 36010, 363, 9, 24, "Print",ExpressionUUID->"5269c6ed-3df5-4066-9bd6-3c08e140fa43"],
+Cell[1781714, 36021, 181, 4, 24, "Print",ExpressionUUID->"012e7324-2342-4b04-9c6e-e4803478b0fd"],
+Cell[1781898, 36027, 398, 9, 24, "Print",ExpressionUUID->"37772824-a3ef-4df4-a3fe-095b9db5eb3a"],
+Cell[1782299, 36038, 429, 10, 24, "Print",ExpressionUUID->"e41fe5f0-abca-4c39-97c7-b65021b6cbc0"],
+Cell[1782731, 36050, 429, 10, 24, "Print",ExpressionUUID->"481aa61d-33cf-4ab0-830e-394581885c18"],
+Cell[1783163, 36062, 427, 10, 24, "Print",ExpressionUUID->"2b52494c-de6d-4411-aa24-ae7abf19eb80"],
+Cell[1783593, 36074, 429, 10, 24, "Print",ExpressionUUID->"3e2644c3-b340-4924-9e27-7aa4c88e1d0e"],
+Cell[1784025, 36086, 425, 10, 24, "Print",ExpressionUUID->"7ea3683b-d2ef-41c2-81db-a798cbd96880"],
+Cell[1784453, 36098, 359, 9, 24, "Print",ExpressionUUID->"6268c551-ec3d-4a51-918d-d957323dae49"],
+Cell[1784815, 36109, 300, 6, 63, "Print",ExpressionUUID->"287c4d08-7c5a-4014-8c80-8a3b9f294681"],
+Cell[1785118, 36117, 199, 4, 24, "Print",ExpressionUUID->"6054ade0-a12f-4486-a7a3-3112838ef665"],
+Cell[1785320, 36123, 188, 4, 44, "Print",ExpressionUUID->"59bd80a3-15bc-4109-b529-32a6c770941d"],
+Cell[1785511, 36129, 363, 9, 24, "Print",ExpressionUUID->"c46d6c33-f2c4-4939-a37a-221437c48baf"],
+Cell[1785877, 36140, 183, 4, 24, "Print",ExpressionUUID->"64769fd3-9b86-4f6a-a5c8-cfb3b4d05e36"],
+Cell[1786063, 36146, 398, 9, 24, "Print",ExpressionUUID->"51968f08-7c0e-44c0-89d7-63e7acced7f7"],
+Cell[1786464, 36157, 427, 10, 24, "Print",ExpressionUUID->"bcf17787-5bbe-475f-8b8e-43b0e63f8fb7"],
+Cell[1786894, 36169, 427, 10, 24, "Print",ExpressionUUID->"51aa54ee-8217-42b7-abc5-3a62d1cc56cf"],
+Cell[1787324, 36181, 429, 10, 24, "Print",ExpressionUUID->"83fbe4e6-8bde-467d-bfc3-4eb8cccdea4c"],
+Cell[1787756, 36193, 427, 10, 24, "Print",ExpressionUUID->"c0845eda-e096-4b18-9a25-47c98d66758f"],
+Cell[1788186, 36205, 427, 10, 24, "Print",ExpressionUUID->"6f0ccfaa-b550-4a1d-9f04-376ab888f4a0"],
+Cell[1788616, 36217, 359, 9, 24, "Print",ExpressionUUID->"633e97f8-2861-4517-98a3-ca3924e2bfa5"],
+Cell[1788978, 36228, 302, 6, 63, "Print",ExpressionUUID->"a9a7575c-dcca-4d0f-adbc-fc54ab994943"],
+Cell[1789283, 36236, 196, 4, 24, "Print",ExpressionUUID->"aa22d876-477a-4f12-9023-89205c2d7246"],
+Cell[1789482, 36242, 188, 4, 44, "Print",ExpressionUUID->"0ef1e206-18e1-40aa-9988-1ecb055deeb3"],
+Cell[1789673, 36248, 363, 9, 24, "Print",ExpressionUUID->"b0637faf-f999-4bac-aca0-345cf1afd638"]
+}, Open  ]]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[1790085, 36263, 995, 24, 94, "Input",ExpressionUUID->"02aec05b-cb5c-48e4-bef3-28ea0e943234"],
+Cell[CellGroupData[{
+Cell[1791105, 36291, 553, 12, 24, "Print",ExpressionUUID->"ab1aed8a-ccf7-4a1c-91c7-8a08c7ebf458"],
+Cell[1791661, 36305, 560, 13, 24, "Print",ExpressionUUID->"f526f36d-a5f7-41a6-b836-cc63614c6630"]
+}, Open  ]]
+}, Open  ]],
+Cell[1792248, 36322, 304, 6, 157, "Input",ExpressionUUID->"3d70a43d-88f7-4edd-9914-fdec294abd06"],
+Cell[1792555, 36330, 1508, 43, 178, "Input",ExpressionUUID->"8a1b2c8b-00d6-46e3-89a1-77170c10da2a"],
+Cell[CellGroupData[{
+Cell[1794088, 36377, 1521, 41, 178, "Input",ExpressionUUID->"f40f6a8e-04da-4014-9f19-bcf1eb59b485"],
+Cell[CellGroupData[{
+Cell[1795634, 36422, 232, 5, 24, "Print",ExpressionUUID->"e86efd00-6823-4cd9-9daf-a89335a65f3e"],
+Cell[1795869, 36429, 492, 12, 24, "Print",ExpressionUUID->"c8555bd9-4bcb-4cff-9067-1d158370696e"],
+Cell[1796364, 36443, 232, 5, 24, "Print",ExpressionUUID->"2ff04487-325a-4813-864b-0a881fc6d69e"],
+Cell[1796599, 36450, 429, 10, 24, "Print",ExpressionUUID->"062f6f1e-ea19-451e-90bd-4a60a3d17abf"],
+Cell[1797031, 36462, 478, 11, 24, "Print",ExpressionUUID->"b370f17d-a61b-41c1-baf2-aae267a96506"],
+Cell[1797512, 36475, 478, 11, 24, "Print",ExpressionUUID->"44455adc-9860-4adc-bf43-c0802a41d8c0"],
+Cell[1797993, 36488, 480, 11, 24, "Print",ExpressionUUID->"4e379aec-32bc-49d2-8e78-b8b97b40991c"],
+Cell[1798476, 36501, 478, 11, 24, "Print",ExpressionUUID->"e4de9e92-d325-4aa2-9ee1-30abab4b31b7"],
+Cell[1798957, 36514, 232, 5, 24, "Print",ExpressionUUID->"baa47514-8f48-4385-ba7e-f0d1f32d15ce"],
+Cell[1799192, 36521, 427, 10, 24, "Print",ExpressionUUID->"97a4f371-d445-44d5-8099-3bc8f8da4051"],
+Cell[1799622, 36533, 410, 10, 24, "Print",ExpressionUUID->"6605c97c-6971-414b-9a6e-3e00d855a020"],
+Cell[1800035, 36545, 569, 13, 24, "Print",ExpressionUUID->"57924dd8-adab-41e2-b09b-0f4893d6c7a8"],
+Cell[1800607, 36560, 18683, 395, 296, "Print",ExpressionUUID->"abfd3b28-08fb-4ab2-b36b-1643831733fb"]
+}, Open  ]],
+Cell[1819305, 36958, 203, 3, 34, "Output",ExpressionUUID->"450770ee-1fbc-44c1-9c95-2cefa29d85a9"],
+Cell[CellGroupData[{
+Cell[1819533, 36965, 231, 5, 24, "Print",ExpressionUUID->"c2d54618-f2ab-488c-a248-dedc0fcfba78"],
+Cell[1819767, 36972, 449, 10, 24, "Print",ExpressionUUID->"0a69aef8-78a8-4cf8-b66d-a37014e7be9d"],
+Cell[1820219, 36984, 478, 11, 24, "Print",ExpressionUUID->"9a16ae74-376e-4d33-9575-b8580e1dda90"],
+Cell[1820700, 36997, 412, 10, 24, "Print",ExpressionUUID->"8e0c3466-f808-4bca-b876-18a2b1476dd5"],
+Cell[1821115, 37009, 350, 7, 63, "Print",ExpressionUUID->"35ee2603-e9bb-4b7e-a519-e78710c52746"],
+Cell[1821468, 37018, 250, 5, 24, "Print",ExpressionUUID->"2ee79172-4eea-4f37-b17b-c22e5621d3bb"],
+Cell[1821721, 37025, 236, 5, 44, "Print",ExpressionUUID->"611d5430-681d-49d4-b788-84164592a054"]
+}, Open  ]]
+}, Open  ]],
+Cell[1821984, 37034, 1591, 45, 178, "Input",ExpressionUUID->"e57cdab3-afd9-427f-89f7-863e6dfd567d"],
+Cell[CellGroupData[{
+Cell[1823600, 37083, 1447, 39, 157, "Input",ExpressionUUID->"25cf9944-5be2-40ab-999c-e1a6d72c9b57"],
+Cell[CellGroupData[{
+Cell[1825072, 37126, 181, 4, 24, "Print",ExpressionUUID->"f2cd56db-9151-48dc-a86e-a305e8a23ac8"],
+Cell[1825256, 37132, 623, 15, 24, "Print",ExpressionUUID->"97366807-d64a-4614-a114-c78895336738"],
+Cell[1825882, 37149, 204, 4, 24, "Print",ExpressionUUID->"591c4cb2-c53e-4379-b00f-15b18c85f807"],
+Cell[1826089, 37155, 423, 10, 24, "Print",ExpressionUUID->"5ac74ad6-1dcc-4352-9c5b-20885c358649"],
+Cell[1826515, 37167, 180, 4, 24, "Print",ExpressionUUID->"058cb2f3-6cb5-4bc1-b0ac-3ecaa2465aef"],
+Cell[1826698, 37173, 619, 15, 24, "Print",ExpressionUUID->"18d6278c-bfd9-4a02-853c-aea62833816a"],
+Cell[1827320, 37190, 616, 15, 24, "Print",ExpressionUUID->"322604d9-27bf-4686-837f-2e0ee3a20bc7"],
+Cell[1827939, 37207, 181, 4, 24, "Print",ExpressionUUID->"444bbc44-83b9-4831-a0f3-7a477ec669d5"],
+Cell[1828123, 37213, 820, 23, 24, "Print",ExpressionUUID->"0c1ace26-0d15-4f70-8b7e-791b9f20a92d"],
+Cell[1828946, 37238, 181, 4, 24, "Print",ExpressionUUID->"b6554e42-f28d-4abd-9e59-35185c0b9ab4"],
+Cell[1829130, 37244, 493, 11, 24, "Print",ExpressionUUID->"52b22c0d-1be7-45e1-b26f-62f56c686ad5"],
+Cell[1829626, 37257, 203, 4, 24, "Print",ExpressionUUID->"ae0fac83-3d76-4603-870c-b303847faecf"],
+Cell[1829832, 37263, 348, 9, 24, "Print",ExpressionUUID->"515c0d38-9447-4913-81fa-858854a1a8ad"],
+Cell[1830183, 37274, 380, 9, 24, "Print",ExpressionUUID->"ade41026-c5c4-4a87-a9d5-f1626f0db59b"],
+Cell[1830566, 37285, 376, 9, 24, "Print",ExpressionUUID->"1919b7af-dc1f-4958-b112-78516e8bb11d"],
+Cell[1830945, 37296, 420, 10, 24, "Print",ExpressionUUID->"56d8aaeb-9e82-4924-9b7f-f1007e7a6c7f"],
+Cell[1831368, 37308, 181, 4, 24, "Print",ExpressionUUID->"218173f8-e193-4643-bda7-22c3083dfd5d"],
+Cell[1831552, 37314, 441, 11, 24, "Print",ExpressionUUID->"ebc16c22-4a15-418d-9994-36b4211d3203"],
+Cell[1831996, 37327, 181, 4, 24, "Print",ExpressionUUID->"a99734f3-02af-46cd-8ecc-2d966df3a023"],
+Cell[1832180, 37333, 380, 9, 24, "Print",ExpressionUUID->"b0191d8f-94e2-456f-a6e0-8db9f1df6e93"],
+Cell[1832563, 37344, 427, 10, 24, "Print",ExpressionUUID->"b684a907-4f41-4c15-a472-b20c034f079d"],
+Cell[1832993, 37356, 427, 10, 24, "Print",ExpressionUUID->"406616fe-23e8-4694-bf2e-20f1f1b67dbc"],
+Cell[1833423, 37368, 429, 10, 24, "Print",ExpressionUUID->"d8cef9f3-3f74-42d8-811a-bce0f43cc9e3"],
+Cell[1833855, 37380, 429, 10, 24, "Print",ExpressionUUID->"521d1396-1d63-4409-9f36-5ac0d3e55cb8"],
+Cell[1834287, 37392, 427, 10, 24, "Print",ExpressionUUID->"3e5ad14a-0e0d-484f-a305-2fd4096b9b65"],
+Cell[1834717, 37404, 429, 10, 24, "Print",ExpressionUUID->"25104315-57c2-41f9-a314-a74813661958"],
+Cell[1835149, 37416, 427, 10, 24, "Print",ExpressionUUID->"368fc5f5-f94b-4e7d-9101-a74064024813"],
+Cell[1835579, 37428, 427, 10, 24, "Print",ExpressionUUID->"0e31a2e1-23f1-49b2-a288-8b5329eec172"],
+Cell[1836009, 37440, 427, 10, 24, "Print",ExpressionUUID->"21aa083d-9546-402b-af2c-d4b21724e2e0"],
+Cell[1836439, 37452, 429, 10, 24, "Print",ExpressionUUID->"2c68120c-9a00-402f-a9fc-f12eb5ecfcd5"],
+Cell[1836871, 37464, 431, 10, 24, "Print",ExpressionUUID->"c973d02d-6dae-41b9-b0b9-074885ba0203"],
+Cell[1837305, 37476, 429, 10, 24, "Print",ExpressionUUID->"b9cc82c2-c3a0-431c-9b12-55a74a2fd48d"],
+Cell[1837737, 37488, 429, 10, 24, "Print",ExpressionUUID->"ad1a85cd-ece0-4b7e-b4e4-4008725176c1"],
+Cell[1838169, 37500, 428, 10, 24, "Print",ExpressionUUID->"f0b9c82a-174d-4ab4-9c52-2b68fa304f92"],
+Cell[1838600, 37512, 429, 10, 24, "Print",ExpressionUUID->"e18e5077-47a7-4f5c-8a26-d7dc4748f769"],
+Cell[1839032, 37524, 429, 10, 24, "Print",ExpressionUUID->"b67cdebb-2aa1-4b69-b4e6-edfcc425accb"],
+Cell[1839464, 37536, 431, 10, 24, "Print",ExpressionUUID->"85a8efca-f6b4-43ea-9018-d1eda30136cd"],
+Cell[1839898, 37548, 429, 10, 24, "Print",ExpressionUUID->"51e6d271-ea79-4e14-9388-5d433aa4ea91"],
+Cell[1840330, 37560, 429, 10, 24, "Print",ExpressionUUID->"599d632e-30f4-4141-b230-cbbc57d098f6"],
+Cell[1840762, 37572, 429, 10, 24, "Print",ExpressionUUID->"efd668bc-7019-44b6-929d-cb0275ea466b"],
+Cell[1841194, 37584, 429, 10, 24, "Print",ExpressionUUID->"57935798-9fc4-4d1b-8f4b-51e3b78d497b"],
+Cell[1841626, 37596, 429, 10, 24, "Print",ExpressionUUID->"dca33d91-02ee-4ea3-8cfe-dd8d7ee51ac7"],
+Cell[1842058, 37608, 428, 10, 24, "Print",ExpressionUUID->"fb00eab7-4540-432c-bf2b-aabd8d52e80c"],
+Cell[1842489, 37620, 429, 10, 24, "Print",ExpressionUUID->"cb8cb0d0-43ad-4a8b-9a92-3917da9ea54f"],
+Cell[1842921, 37632, 181, 4, 24, "Print",ExpressionUUID->"2a91fd5c-e55f-4c43-a3b8-465708e93b22"],
+Cell[1843105, 37638, 378, 9, 24, "Print",ExpressionUUID->"560f3c5e-5408-4bbe-9b17-97e16eaa19ca"],
+Cell[1843486, 37649, 359, 9, 24, "Print",ExpressionUUID->"f4458dab-a0e9-44a7-a3c1-2ed4232044e1"],
+Cell[1843848, 37660, 530, 13, 24, "Print",ExpressionUUID->"b3135132-833f-4e4c-9589-e9c3503078f0"],
+Cell[1844381, 37675, 530, 13, 24, "Print",ExpressionUUID->"4f78b7ae-5549-42fc-9314-36c2c698fa96"],
+Cell[1844914, 37690, 530, 13, 24, "Print",ExpressionUUID->"71f57b0a-511e-41a4-ae1e-8b4f43f11a60"],
+Cell[1845447, 37705, 89100, 1767, 296, "Print",ExpressionUUID->"fb392009-4d65-47bd-85eb-5629d05d45e3"]
+}, Open  ]],
+Cell[1934562, 39475, 154, 2, 34, "Output",ExpressionUUID->"9cc9531b-8eb7-4ab5-818b-9de5d93d28ed"],
+Cell[CellGroupData[{
+Cell[1934741, 39481, 181, 4, 24, "Print",ExpressionUUID->"16617bf1-e485-4970-88b3-06adc5190045"],
+Cell[1934925, 39487, 398, 9, 24, "Print",ExpressionUUID->"394af361-158b-41d5-8cd7-253e4ec5f5e3"],
+Cell[1935326, 39498, 427, 10, 24, "Print",ExpressionUUID->"d486de6c-574d-4a9c-a677-357f07b8f393"],
+Cell[1935756, 39510, 427, 10, 24, "Print",ExpressionUUID->"bc32190a-6d1c-4aa4-b572-8d25596cf0e8"],
+Cell[1936186, 39522, 426, 10, 24, "Print",ExpressionUUID->"11dd4fac-4a90-4b87-acef-17bdc660ca09"],
+Cell[1936615, 39534, 361, 9, 24, "Print",ExpressionUUID->"6bcd2aae-e83c-4de2-b882-bcc1277d3ab4"],
+Cell[1936979, 39545, 302, 6, 63, "Print",ExpressionUUID->"519e3348-ebb1-4930-b680-2df877dc8d2b"],
+Cell[1937284, 39553, 197, 4, 24, "Print",ExpressionUUID->"c08d212b-cfe1-49af-ad05-d1c765cfd252"],
+Cell[1937484, 39559, 188, 4, 44, "Print",ExpressionUUID->"8bbcd19c-afb7-45e9-8ae8-52caa8b873eb"]
+}, Open  ]]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[1937721, 39569, 2114, 54, 283, "Input",ExpressionUUID->"00b2ebfa-faf2-401d-8f84-2e8996fb70f1"],
+Cell[CellGroupData[{
+Cell[1939860, 39627, 290, 5, 24, "Print",ExpressionUUID->"482b7b69-f6b4-45f1-9a2c-0ab150cda602"],
+Cell[1940153, 39634, 279, 5, 24, "Print",ExpressionUUID->"0c57c097-c2e6-40bd-9ede-f2c4dc3c9965"],
+Cell[1940435, 39641, 721, 16, 24, "Print",ExpressionUUID->"7b632676-1202-4f79-a69d-8d737bde6c17"],
+Cell[1941159, 39659, 302, 5, 24, "Print",ExpressionUUID->"efc9d648-68f3-4c34-96f0-b963370877bd"],
+Cell[1941464, 39666, 524, 11, 24, "Print",ExpressionUUID->"465fc068-514c-4e6f-8a5c-4d5fed7eff58"],
+Cell[1941991, 39679, 279, 5, 24, "Print",ExpressionUUID->"15604b7f-08c1-4262-927e-197c4eb46a1c"],
+Cell[1942273, 39686, 719, 16, 24, "Print",ExpressionUUID->"92ab9642-e7a8-40b2-a260-4fb5048c8e9f"],
+Cell[1942995, 39704, 715, 16, 24, "Print",ExpressionUUID->"6c7d441d-fe7c-4fc0-9501-ad4b5c30c80d"],
+Cell[1943713, 39722, 279, 5, 24, "Print",ExpressionUUID->"37f80417-15b7-48cf-8bf2-cf4f12f655ee"],
+Cell[1943995, 39729, 918, 24, 24, "Print",ExpressionUUID->"86eb6596-d624-463b-8591-7765cce1e4c8"],
+Cell[1944916, 39755, 279, 5, 24, "Print",ExpressionUUID->"20329460-4c5a-4694-95bf-5fce24890b13"],
+Cell[1945198, 39762, 593, 12, 24, "Print",ExpressionUUID->"45504770-301f-4888-a0e5-648d6f27e060"],
+Cell[1945794, 39776, 303, 5, 24, "Print",ExpressionUUID->"6f91bd5e-4a6b-4381-a2ae-1f4dc802e7c5"],
+Cell[1946100, 39783, 448, 10, 24, "Print",ExpressionUUID->"74c3926f-183a-4796-9f57-f03092638243"],
+Cell[1946551, 39795, 480, 10, 24, "Print",ExpressionUUID->"fc1dd8ec-c4f8-4f22-98fc-f8943764731a"],
+Cell[1947034, 39807, 474, 10, 24, "Print",ExpressionUUID->"e8020980-812a-45ef-99b7-7d58bed40356"],
+Cell[1947511, 39819, 518, 11, 24, "Print",ExpressionUUID->"4233b12a-ff83-4b7d-993d-36f01140b6c8"],
+Cell[1948032, 39832, 279, 5, 24, "Print",ExpressionUUID->"47869948-ecd1-4af9-b875-01df3bf192d7"],
+Cell[1948314, 39839, 539, 12, 24, "Print",ExpressionUUID->"1ac59348-d86e-46cf-81f6-7f07deec8e69"],
+Cell[1948856, 39853, 281, 5, 24, "Print",ExpressionUUID->"be4046f4-afc7-46ab-9b4c-a12a208d214d"],
+Cell[1949140, 39860, 476, 10, 24, "Print",ExpressionUUID->"590ed1f5-2d5e-4d52-aa2a-521524e47125"],
+Cell[1949619, 39872, 525, 11, 24, "Print",ExpressionUUID->"b00f9b05-f586-43f6-a3ac-47ee5596a4a4"],
+Cell[1950147, 39885, 525, 11, 24, "Print",ExpressionUUID->"4c16b8a2-7923-47bc-bf55-a401337b086e"],
+Cell[1950675, 39898, 527, 11, 24, "Print",ExpressionUUID->"9a4d1373-6745-46e2-bedf-084ceeeb3992"],
+Cell[1951205, 39911, 527, 11, 24, "Print",ExpressionUUID->"86eed2fa-2419-4af5-950e-468c5fc8760b"],
+Cell[1951735, 39924, 525, 11, 24, "Print",ExpressionUUID->"a2282fbf-8887-4e98-9477-9d5f6d1b2b9b"],
+Cell[1952263, 39937, 527, 11, 24, "Print",ExpressionUUID->"f91c9250-7da2-47b4-b52f-a65e91fecc0d"],
+Cell[1952793, 39950, 525, 11, 24, "Print",ExpressionUUID->"3fd83e52-022c-4dbd-84be-a23f1b8c12e9"],
+Cell[1953321, 39963, 525, 11, 24, "Print",ExpressionUUID->"ed764292-1653-4656-a2ea-b82e47346fda"],
+Cell[1953849, 39976, 527, 11, 24, "Print",ExpressionUUID->"d5b36eaf-2487-4de7-82f2-b741d9ff15c6"],
+Cell[1954379, 39989, 527, 11, 24, "Print",ExpressionUUID->"fa11260b-327f-4c3a-9b78-8fac30899110"],
+Cell[1954909, 40002, 527, 11, 24, "Print",ExpressionUUID->"cf4549a7-9aec-4ae6-b884-a3b47e57e099"],
+Cell[1955439, 40015, 527, 11, 24, "Print",ExpressionUUID->"a0755672-a28d-4254-9cac-c3e536d5488a"],
+Cell[1955969, 40028, 529, 11, 24, "Print",ExpressionUUID->"3d0c39fc-4140-4797-b15f-2a88b053444b"],
+Cell[1956501, 40041, 526, 11, 24, "Print",ExpressionUUID->"52f23fe7-2ec8-44d5-b8e2-6d9fefdbcf5f"],
+Cell[1957030, 40054, 525, 11, 24, "Print",ExpressionUUID->"f84fac8b-9b5b-42cd-991e-5c15019c3cd9"],
+Cell[1957558, 40067, 527, 11, 24, "Print",ExpressionUUID->"44871153-0c3e-4261-b73e-52b51d05fc29"],
+Cell[1958088, 40080, 527, 11, 24, "Print",ExpressionUUID->"fe1e6cc7-5408-44e7-8eeb-74c2eb17bd31"],
+Cell[1958618, 40093, 527, 11, 24, "Print",ExpressionUUID->"cd8ba6ab-b5cd-4451-aa7a-29b82c645660"],
+Cell[1959148, 40106, 526, 11, 24, "Print",ExpressionUUID->"86b6b92f-22a6-41ea-a987-474e9174f33c"],
+Cell[1959677, 40119, 527, 11, 24, "Print",ExpressionUUID->"442012e3-dd0e-4dd2-b282-d35c7ffd1a11"],
+Cell[1960207, 40132, 529, 11, 24, "Print",ExpressionUUID->"072923e0-44bc-4646-8b2b-8029d067181f"],
+Cell[1960739, 40145, 529, 11, 24, "Print",ExpressionUUID->"40d18e24-52a9-42ea-b976-6b2bac192ef3"],
+Cell[1961271, 40158, 527, 11, 24, "Print",ExpressionUUID->"f741ced5-cc41-4bba-87d3-6967a7ce4de3"],
+Cell[1961801, 40171, 527, 11, 24, "Print",ExpressionUUID->"4a12258b-acbc-40e4-85d5-b71956bf9f9f"],
+Cell[1962331, 40184, 529, 11, 24, "Print",ExpressionUUID->"26ee02c5-01be-4a5b-8e23-7b5740ecf00b"],
+Cell[1962863, 40197, 527, 11, 24, "Print",ExpressionUUID->"909aa5cc-4cf1-4134-a6db-623eceea8f95"],
+Cell[1963393, 40210, 527, 11, 24, "Print",ExpressionUUID->"ab74d7c3-3bca-48f9-bf90-91962ad793e3"],
+Cell[1963923, 40223, 527, 11, 24, "Print",ExpressionUUID->"2c6d20cb-61d0-477f-9eff-cd5b3c58115b"],
+Cell[1964453, 40236, 527, 11, 24, "Print",ExpressionUUID->"9e1d5d63-95ee-468c-a45a-47a173b62ea5"],
+Cell[1964983, 40249, 527, 11, 24, "Print",ExpressionUUID->"ea1b6e3c-1593-4687-9e7e-bca79b39d679"],
+Cell[1965513, 40262, 529, 11, 24, "Print",ExpressionUUID->"2a96830a-2747-4078-94d6-30d3e432c5ec"],
+Cell[1966045, 40275, 527, 11, 24, "Print",ExpressionUUID->"d8801fc7-5e71-4a0b-b0da-acd196653a94"],
+Cell[1966575, 40288, 527, 11, 24, "Print",ExpressionUUID->"49d5de5e-b904-4599-a241-7c89f29d1c18"],
+Cell[1967105, 40301, 527, 11, 24, "Print",ExpressionUUID->"c409cffb-eb72-4313-9ded-9e7646df22b8"],
+Cell[1967635, 40314, 527, 11, 24, "Print",ExpressionUUID->"a9c42256-77b6-4966-953f-996e7f4424fd"],
+Cell[1968165, 40327, 527, 11, 24, "Print",ExpressionUUID->"c971b94c-7055-46e8-8f42-92bf62b417a1"],
+Cell[1968695, 40340, 527, 11, 24, "Print",ExpressionUUID->"fde8093f-3013-4f73-a87e-3fee062234c5"],
+Cell[1969225, 40353, 527, 11, 24, "Print",ExpressionUUID->"0d001629-ce93-4b92-a44e-6adbc7bbc315"],
+Cell[1969755, 40366, 527, 11, 24, "Print",ExpressionUUID->"9de29004-3c47-42de-97d9-7e5021721326"],
+Cell[1970285, 40379, 526, 11, 24, "Print",ExpressionUUID->"9e2c960c-02fe-4d54-9bf0-10ade211cdc6"],
+Cell[1970814, 40392, 527, 11, 24, "Print",ExpressionUUID->"f4d5c5bd-c09b-404f-83f1-6121f361aa55"],
+Cell[1971344, 40405, 527, 11, 24, "Print",ExpressionUUID->"c2b1216d-3ba1-4577-b3dd-8eb87edd64b9"],
+Cell[1971874, 40418, 527, 11, 24, "Print",ExpressionUUID->"ddae031d-a3a3-4573-a96f-d2a32183f65b"],
+Cell[1972404, 40431, 529, 11, 24, "Print",ExpressionUUID->"83080bc6-77f6-41f9-a6f7-5d45b0a3f5ee"],
+Cell[1972936, 40444, 527, 11, 24, "Print",ExpressionUUID->"5940abce-ac3d-439e-a874-8677dc5b62f9"],
+Cell[1973466, 40457, 529, 11, 24, "Print",ExpressionUUID->"a2a7e806-c823-4891-89c9-0514dcb2ba9f"],
+Cell[1973998, 40470, 527, 11, 24, "Print",ExpressionUUID->"eeda71c5-85db-4b6f-b072-1530f5f1b204"],
+Cell[1974528, 40483, 527, 11, 24, "Print",ExpressionUUID->"e6bbf982-d710-4652-a41f-fe78241c97ff"],
+Cell[1975058, 40496, 529, 11, 24, "Print",ExpressionUUID->"c2a7cf39-1dde-4342-bfba-3560297d5bf6"],
+Cell[1975590, 40509, 527, 11, 24, "Print",ExpressionUUID->"4a20e63b-cbef-4cce-83e8-c2c3f33bc1fd"],
+Cell[1976120, 40522, 529, 11, 24, "Print",ExpressionUUID->"c28ef418-a99d-4b61-8bda-90e9cd0dbc5d"],
+Cell[1976652, 40535, 529, 11, 24, "Print",ExpressionUUID->"bfd191bf-55aa-4710-bfe9-d73cb6383e16"],
+Cell[1977184, 40548, 527, 11, 24, "Print",ExpressionUUID->"808f6012-a961-4e65-bd29-7a53e0ee4e62"],
+Cell[1977714, 40561, 527, 11, 24, "Print",ExpressionUUID->"e1e4a029-d8bb-42f1-8e4d-877284e9ddf5"],
+Cell[1978244, 40574, 527, 11, 24, "Print",ExpressionUUID->"2f798775-721b-43c9-835a-b5ca45d457ac"],
+Cell[1978774, 40587, 529, 11, 24, "Print",ExpressionUUID->"80804efd-1ff8-442a-9e90-4a1205f6bd84"],
+Cell[1979306, 40600, 527, 11, 24, "Print",ExpressionUUID->"fc10ef62-f7de-4da3-b483-c1d974b88f2b"],
+Cell[1979836, 40613, 527, 11, 24, "Print",ExpressionUUID->"b5069cbe-8912-484a-beff-19781e878655"],
+Cell[1980366, 40626, 529, 11, 24, "Print",ExpressionUUID->"0966a11d-4882-4b30-8b31-023a0b8dddaf"],
+Cell[1980898, 40639, 529, 11, 24, "Print",ExpressionUUID->"8cd6cb1b-0482-4344-8799-19acc4683bb7"],
+Cell[1981430, 40652, 526, 11, 24, "Print",ExpressionUUID->"2549f2b3-f306-4cd4-a6f8-81daf0343e2a"],
+Cell[1981959, 40665, 527, 11, 24, "Print",ExpressionUUID->"e992dbcc-c3eb-496c-9aac-5a1569a2a1ea"],
+Cell[1982489, 40678, 529, 11, 24, "Print",ExpressionUUID->"096a688f-5ef8-479f-82e9-f640aa79a4aa"],
+Cell[1983021, 40691, 527, 11, 24, "Print",ExpressionUUID->"22ac10c8-525d-4e43-8c86-670c84529870"],
+Cell[1983551, 40704, 529, 11, 24, "Print",ExpressionUUID->"a0290ced-13d0-4a1e-a400-7e3373d885a6"],
+Cell[1984083, 40717, 527, 11, 24, "Print",ExpressionUUID->"bcfae30e-7bcd-4dd3-8dc6-32b6a9fbba88"],
+Cell[1984613, 40730, 527, 11, 24, "Print",ExpressionUUID->"e0c9f492-f3f4-473f-b226-e2f4e1da03be"],
+Cell[1985143, 40743, 527, 11, 24, "Print",ExpressionUUID->"4a28e937-cbb7-4ff2-8b85-030bc207001b"],
+Cell[1985673, 40756, 527, 11, 24, "Print",ExpressionUUID->"d43e20fa-75e4-44dc-bf1a-9a3930b2102f"],
+Cell[1986203, 40769, 529, 11, 24, "Print",ExpressionUUID->"f3470329-cbfe-4aab-9a92-7fe3182802d3"],
+Cell[1986735, 40782, 527, 11, 24, "Print",ExpressionUUID->"33e6d154-8864-4961-84af-7b088d0c1d6d"],
+Cell[1987265, 40795, 529, 11, 24, "Print",ExpressionUUID->"0a1cc530-3504-4e6c-8ca2-108d9e0929dc"],
+Cell[1987797, 40808, 529, 11, 24, "Print",ExpressionUUID->"8859e214-8f28-458a-86f7-9845a83b59c6"],
+Cell[1988329, 40821, 527, 11, 24, "Print",ExpressionUUID->"3494269d-7ca8-4840-94b7-7df30938c5c5"],
+Cell[1988859, 40834, 527, 11, 24, "Print",ExpressionUUID->"64304681-dd46-4470-b392-15116814eed3"],
+Cell[1989389, 40847, 527, 11, 24, "Print",ExpressionUUID->"b8bb4c71-bd91-47e1-85e7-7cc74ae339ea"],
+Cell[1989919, 40860, 527, 11, 24, "Print",ExpressionUUID->"a9fc632b-ac2e-4d12-845f-6ba9bb0fb88a"],
+Cell[1990449, 40873, 527, 11, 24, "Print",ExpressionUUID->"14e5e342-04db-42f9-9dcd-e54b27381556"],
+Cell[1990979, 40886, 527, 11, 24, "Print",ExpressionUUID->"68cbb07b-ff1b-41d2-9408-97a139ca04b4"],
+Cell[1991509, 40899, 527, 11, 24, "Print",ExpressionUUID->"ade50005-dc22-4549-8c48-ca1c2f4f6179"],
+Cell[1992039, 40912, 527, 11, 24, "Print",ExpressionUUID->"f19201e5-fa6c-4df3-8177-4f4d85a0deb0"],
+Cell[1992569, 40925, 526, 11, 24, "Print",ExpressionUUID->"376cdf29-de05-4896-8cd1-d653f4329951"],
+Cell[1993098, 40938, 527, 11, 24, "Print",ExpressionUUID->"5d1726ba-e7c8-4ea5-8383-70a46e2dca56"],
+Cell[1993628, 40951, 527, 11, 24, "Print",ExpressionUUID->"6289e36d-04de-4e90-8bc7-fea404ee7ae6"],
+Cell[1994158, 40964, 527, 11, 24, "Print",ExpressionUUID->"1596e7c3-f4a0-4f54-b46b-5c85de8d227b"],
+Cell[1994688, 40977, 527, 11, 24, "Print",ExpressionUUID->"aa60764a-022f-4534-b590-7985930ab71d"],
+Cell[1995218, 40990, 527, 11, 24, "Print",ExpressionUUID->"a63d9a20-9fcd-42aa-8251-229ed14fcf0b"],
+Cell[1995748, 41003, 527, 11, 24, "Print",ExpressionUUID->"d5e47eff-33fd-4ab0-a3ec-3f56a6fef96b"],
+Cell[1996278, 41016, 529, 11, 24, "Print",ExpressionUUID->"237304f0-3673-4c2d-afe8-3d7a7ebe249b"],
+Cell[1996810, 41029, 527, 11, 24, "Print",ExpressionUUID->"c829a173-07f8-4df8-8e1f-eb918a3bc6b1"],
+Cell[1997340, 41042, 527, 11, 24, "Print",ExpressionUUID->"e4453bd4-d618-4b7a-b024-d657ef4957f5"],
+Cell[1997870, 41055, 527, 11, 24, "Print",ExpressionUUID->"933e4c6a-54c2-4415-a419-34b52bcef5e4"],
+Cell[1998400, 41068, 527, 11, 24, "Print",ExpressionUUID->"3754f430-9482-4b0e-8e5a-78228e95e7b7"],
+Cell[1998930, 41081, 527, 11, 24, "Print",ExpressionUUID->"e5e28447-4da0-428d-adeb-3d0f178dc854"],
+Cell[1999460, 41094, 526, 11, 24, "Print",ExpressionUUID->"9e930076-0112-457d-9050-59d77b2c3f51"],
+Cell[1999989, 41107, 527, 11, 24, "Print",ExpressionUUID->"83743332-28b4-4f4e-9a55-e7411e838cac"],
+Cell[2000519, 41120, 529, 11, 24, "Print",ExpressionUUID->"5a867892-be28-4a5c-913a-cd64118dc1aa"],
+Cell[2001051, 41133, 527, 11, 24, "Print",ExpressionUUID->"29b71846-a025-4f89-ac63-d818a7f3b614"],
+Cell[2001581, 41146, 529, 11, 24, "Print",ExpressionUUID->"2bd90177-8624-44ca-892b-190c3a5e0d65"],
+Cell[2002113, 41159, 529, 11, 24, "Print",ExpressionUUID->"989dc8a4-be6f-4994-baba-bfd5217241d3"],
+Cell[2002645, 41172, 531, 11, 24, "Print",ExpressionUUID->"1c9dc131-7797-4b61-86ac-5a0c1a0a4d7e"],
+Cell[2003179, 41185, 529, 11, 24, "Print",ExpressionUUID->"1d94d72f-145b-438f-8c3f-eff4ed502617"],
+Cell[2003711, 41198, 529, 11, 24, "Print",ExpressionUUID->"5d87cb98-4c45-4ac9-8d66-d3bacef1ff18"],
+Cell[2004243, 41211, 529, 11, 24, "Print",ExpressionUUID->"9a5bfff7-85c1-4ea1-ac44-b7fe9bc3fabd"],
+Cell[2004775, 41224, 529, 11, 24, "Print",ExpressionUUID->"5465c028-f2a0-4734-a77c-141afa5f82a0"],
+Cell[2005307, 41237, 529, 11, 24, "Print",ExpressionUUID->"c3ca4913-3ce5-4844-9e77-ce5def9e7fbc"],
+Cell[2005839, 41250, 529, 11, 24, "Print",ExpressionUUID->"ae7ec018-75eb-4d88-8e45-5e2518b17411"],
+Cell[2006371, 41263, 529, 11, 24, "Print",ExpressionUUID->"cd4cfb19-6da6-4b99-a609-cb200d0a907d"],
+Cell[2006903, 41276, 529, 11, 24, "Print",ExpressionUUID->"8751b8fd-1b76-40cd-a0f1-a95a97697501"],
+Cell[2007435, 41289, 529, 11, 24, "Print",ExpressionUUID->"1e8c121e-fe1b-4f53-a047-bd73813541da"],
+Cell[2007967, 41302, 528, 11, 24, "Print",ExpressionUUID->"e66c3f4d-4baf-43ee-ad7d-f1cdb877d6d2"],
+Cell[2008498, 41315, 529, 11, 24, "Print",ExpressionUUID->"307c1338-c863-48ee-ba46-8040507dbaf1"],
+Cell[2009030, 41328, 529, 11, 24, "Print",ExpressionUUID->"8428cf6f-dc5d-4ec1-bda1-2e9ec4425dc7"],
+Cell[2009562, 41341, 529, 11, 24, "Print",ExpressionUUID->"586bdfd8-dbe8-4cd4-ad63-16d68f420351"],
+Cell[2010094, 41354, 529, 11, 24, "Print",ExpressionUUID->"1ce4b55a-4462-4f08-beec-bfc80aeafc16"],
+Cell[2010626, 41367, 529, 11, 24, "Print",ExpressionUUID->"fbf84094-2be0-4b4e-b2a7-1f47a58f31a4"],
+Cell[2011158, 41380, 529, 11, 24, "Print",ExpressionUUID->"c7c1d120-76e4-4976-bf75-6d286d33f0af"],
+Cell[2011690, 41393, 529, 11, 24, "Print",ExpressionUUID->"40f00b9a-f076-4a98-b7fb-d2699bfe1e97"],
+Cell[2012222, 41406, 529, 11, 24, "Print",ExpressionUUID->"9aea03ae-78fb-46a4-959c-a632ddd3daaa"],
+Cell[2012754, 41419, 529, 11, 24, "Print",ExpressionUUID->"76d91400-d6dc-462b-b084-79572499fab2"],
+Cell[2013286, 41432, 529, 11, 24, "Print",ExpressionUUID->"97422370-545d-42ab-bc13-4ee2d682e759"],
+Cell[2013818, 41445, 529, 11, 24, "Print",ExpressionUUID->"b21763c2-bbe3-46ab-8865-385f591d934d"],
+Cell[2014350, 41458, 529, 11, 24, "Print",ExpressionUUID->"23d43de6-7477-4fc9-a2c8-82a3b7649e4c"],
+Cell[2014882, 41471, 529, 11, 24, "Print",ExpressionUUID->"996eb42f-d851-402a-836d-d4d08d0227e0"],
+Cell[2015414, 41484, 531, 11, 24, "Print",ExpressionUUID->"994f9d96-4be2-4fd5-956b-db163a49ff23"],
+Cell[2015948, 41497, 531, 11, 24, "Print",ExpressionUUID->"5f2069c4-cd84-4600-b781-1e0cf77be806"],
+Cell[2016482, 41510, 531, 11, 24, "Print",ExpressionUUID->"525bc282-fd37-467e-8572-423278fbcdd4"],
+Cell[2017016, 41523, 529, 11, 24, "Print",ExpressionUUID->"8dbd8c81-2f54-4c1e-86e3-4068bebc0392"],
+Cell[2017548, 41536, 529, 11, 24, "Print",ExpressionUUID->"de29cfe5-bd1d-4218-8f3c-2ad061965406"],
+Cell[2018080, 41549, 529, 11, 24, "Print",ExpressionUUID->"d7bd272b-523a-4d0d-bdb9-13a8ab9c0035"],
+Cell[2018612, 41562, 529, 11, 24, "Print",ExpressionUUID->"8b339b22-b856-40eb-bfaf-5abe17906184"],
+Cell[2019144, 41575, 528, 11, 24, "Print",ExpressionUUID->"c1418234-3828-4e6b-a7e3-10dc4d4fd069"],
+Cell[2019675, 41588, 531, 11, 24, "Print",ExpressionUUID->"19079ee2-5f3c-44db-ab1c-2276bd747d64"],
+Cell[2020209, 41601, 529, 11, 24, "Print",ExpressionUUID->"184b99b6-3396-4806-8cc1-a8c97c30271e"],
+Cell[2020741, 41614, 529, 11, 24, "Print",ExpressionUUID->"9abf7886-0435-4716-adae-2b40526a092b"],
+Cell[2021273, 41627, 531, 11, 24, "Print",ExpressionUUID->"4cdb8b07-6ea3-4251-aea9-de18730afe7d"],
+Cell[2021807, 41640, 529, 11, 24, "Print",ExpressionUUID->"362ddbbc-9592-4a4a-9415-8ae9c7f530ad"],
+Cell[2022339, 41653, 531, 11, 24, "Print",ExpressionUUID->"4b1a34ec-d25c-4125-9e16-fa0442261592"],
+Cell[2022873, 41666, 528, 11, 24, "Print",ExpressionUUID->"ae0838c5-1d04-4af1-8968-3e10ca495bbf"],
+Cell[2023404, 41679, 529, 11, 24, "Print",ExpressionUUID->"1d9d9f94-eb7d-40a4-8e3f-2f0185517645"],
+Cell[2023936, 41692, 531, 11, 24, "Print",ExpressionUUID->"98b19f6e-57f2-4b12-8e98-66a70b62cffe"],
+Cell[2024470, 41705, 531, 11, 24, "Print",ExpressionUUID->"f51fe13e-3dc0-4302-91af-6b45682d4dc1"],
+Cell[2025004, 41718, 529, 11, 24, "Print",ExpressionUUID->"b8da9f1f-ca1b-4c13-9da7-68d2d30d181c"],
+Cell[2025536, 41731, 531, 11, 24, "Print",ExpressionUUID->"d03f960d-a985-4724-b525-dd7047d7d869"],
+Cell[2026070, 41744, 529, 11, 24, "Print",ExpressionUUID->"5fae7711-eb05-48a7-8e45-39de243c9901"],
+Cell[2026602, 41757, 531, 11, 24, "Print",ExpressionUUID->"9058a6ec-2677-4390-b62a-f7f1aa0bb92a"],
+Cell[2027136, 41770, 529, 11, 24, "Print",ExpressionUUID->"b0d7f8aa-1f5d-4d67-9741-4fc437add9f7"],
+Cell[2027668, 41783, 531, 11, 24, "Print",ExpressionUUID->"e15ab415-af93-4c41-bc39-e22f0c3c38be"],
+Cell[2028202, 41796, 529, 11, 24, "Print",ExpressionUUID->"e7d661ab-9386-45ff-8a04-87e1c95ff8b4"],
+Cell[2028734, 41809, 529, 11, 24, "Print",ExpressionUUID->"9f9aa58f-3b1f-4808-b047-c967807c4e93"],
+Cell[2029266, 41822, 531, 11, 24, "Print",ExpressionUUID->"d959dcef-4e60-48c1-a7a6-aafa63b4148a"],
+Cell[2029800, 41835, 531, 11, 24, "Print",ExpressionUUID->"ac11dbe3-d591-4f32-ad94-f779d0c8400b"],
+Cell[2030334, 41848, 529, 11, 24, "Print",ExpressionUUID->"ce4a7715-19ce-46fb-b822-28d77a0fabf1"],
+Cell[2030866, 41861, 529, 11, 24, "Print",ExpressionUUID->"6bb08b23-3c72-4e5b-abc7-73003c3fc261"],
+Cell[2031398, 41874, 529, 11, 24, "Print",ExpressionUUID->"b20c75c7-1181-4a1b-b8ac-e72e92b50561"],
+Cell[2031930, 41887, 528, 11, 24, "Print",ExpressionUUID->"ebd998cf-24bb-4eb2-83c3-8ad397fb14cc"],
+Cell[2032461, 41900, 529, 11, 24, "Print",ExpressionUUID->"bc838b1a-6863-4410-bda0-39dc771ed636"],
+Cell[2032993, 41913, 528, 11, 24, "Print",ExpressionUUID->"d9e7c7db-572d-4067-861e-cbf3afe77521"],
+Cell[2033524, 41926, 529, 11, 24, "Print",ExpressionUUID->"ae8782cc-581e-4f76-a939-956fffe0ace6"],
+Cell[2034056, 41939, 529, 11, 24, "Print",ExpressionUUID->"4a0d7cc3-4eba-4f89-a344-fd6a32562e1b"],
+Cell[2034588, 41952, 531, 11, 24, "Print",ExpressionUUID->"35db92c4-0d44-4217-afab-d426be163229"],
+Cell[2035122, 41965, 531, 11, 24, "Print",ExpressionUUID->"2fdcf078-527a-4c0d-8e30-58706d244691"],
+Cell[2035656, 41978, 529, 11, 24, "Print",ExpressionUUID->"fc6a23a1-f2b2-47b5-987d-323a5a88fd8b"],
+Cell[2036188, 41991, 529, 11, 24, "Print",ExpressionUUID->"5776850a-a04a-49e6-ac40-400c4f896b2d"],
+Cell[2036720, 42004, 529, 11, 24, "Print",ExpressionUUID->"e96f9759-0bef-4290-bd3b-3503f0b0a411"],
+Cell[2037252, 42017, 529, 11, 24, "Print",ExpressionUUID->"5b70a5af-6e87-4b06-a20e-1410998f03dd"],
+Cell[2037784, 42030, 529, 11, 24, "Print",ExpressionUUID->"7d094c60-e2f8-44a0-af91-9cf9d4e2fe15"],
+Cell[2038316, 42043, 528, 11, 24, "Print",ExpressionUUID->"3bf08d18-0602-4a03-909c-894e3bf74dcf"],
+Cell[2038847, 42056, 529, 11, 24, "Print",ExpressionUUID->"ec417ae3-5f5e-4017-bd56-96061adde86f"],
+Cell[2039379, 42069, 529, 11, 24, "Print",ExpressionUUID->"02e9025d-b120-4019-95e1-46e1763691fa"],
+Cell[2039911, 42082, 531, 11, 24, "Print",ExpressionUUID->"b07ab67e-435a-4b6e-a82b-5f77a8e91d93"],
+Cell[2040445, 42095, 529, 11, 24, "Print",ExpressionUUID->"938cd681-f9d7-4a43-81f2-07913fa20f2a"],
+Cell[2040977, 42108, 529, 11, 24, "Print",ExpressionUUID->"39c6fb30-8d6a-4d8d-9994-6f42bae345f9"],
+Cell[2041509, 42121, 529, 11, 24, "Print",ExpressionUUID->"93ebc516-cebb-441b-98b8-8f4f1603bce9"],
+Cell[2042041, 42134, 529, 11, 24, "Print",ExpressionUUID->"0cdd4c37-697f-4767-ad55-4f92221a433a"],
+Cell[2042573, 42147, 529, 11, 24, "Print",ExpressionUUID->"c99942db-c4ba-48f0-95e7-30dd8f17f0cd"],
+Cell[2043105, 42160, 529, 11, 24, "Print",ExpressionUUID->"2335ac84-67b9-49a9-a017-09a8e0c4a6ae"],
+Cell[2043637, 42173, 529, 11, 24, "Print",ExpressionUUID->"0eeed8f2-195e-40f1-802b-caf21bd038e7"],
+Cell[2044169, 42186, 528, 11, 24, "Print",ExpressionUUID->"4d4b5c1c-d382-41d3-a5ac-52ae3f900f67"],
+Cell[2044700, 42199, 529, 11, 24, "Print",ExpressionUUID->"9a772258-6339-4d3a-8514-d40583d2778f"],
+Cell[2045232, 42212, 529, 11, 24, "Print",ExpressionUUID->"9eb11ee9-9ac4-4873-b466-da4df949403c"],
+Cell[2045764, 42225, 531, 11, 24, "Print",ExpressionUUID->"8f962adb-c1f8-419e-9021-a9d089c460ce"],
+Cell[2046298, 42238, 529, 11, 24, "Print",ExpressionUUID->"de26d80c-4225-45fb-8024-3ad5d34d3057"],
+Cell[2046830, 42251, 528, 11, 24, "Print",ExpressionUUID->"1bbac5d9-41b5-41e7-9808-b25a5a990907"],
+Cell[2047361, 42264, 531, 11, 24, "Print",ExpressionUUID->"0efcbad6-30b2-45be-bf8e-31907797baec"],
+Cell[2047895, 42277, 529, 11, 24, "Print",ExpressionUUID->"876194c4-d5d3-4a7e-8bd1-daf467109e1c"],
+Cell[2048427, 42290, 529, 11, 24, "Print",ExpressionUUID->"44f91fba-ff48-4310-a043-4f7922319abe"],
+Cell[2048959, 42303, 529, 11, 24, "Print",ExpressionUUID->"1aaf8a65-c5ef-4f96-ab50-7955b095de96"],
+Cell[2049491, 42316, 527, 11, 24, "Print",ExpressionUUID->"44adcac6-6fa2-4597-87be-3ffb65a19018"],
+Cell[2050021, 42329, 529, 11, 24, "Print",ExpressionUUID->"8fb3435b-6e9e-4561-b825-6e9f204aa4f7"],
+Cell[2050553, 42342, 529, 11, 24, "Print",ExpressionUUID->"78a848a3-9036-4d5e-a10c-a330d2a260c8"],
+Cell[2051085, 42355, 529, 11, 24, "Print",ExpressionUUID->"c8f2fbca-0008-4335-b6e6-c8697073261c"],
+Cell[2051617, 42368, 531, 11, 24, "Print",ExpressionUUID->"1dd6fc8d-3779-4636-802a-4189f9f826a1"],
+Cell[2052151, 42381, 529, 11, 24, "Print",ExpressionUUID->"388b48db-dd6b-4f2b-b280-7b5ee2a4632a"],
+Cell[2052683, 42394, 529, 11, 24, "Print",ExpressionUUID->"eab3aa0a-50a8-41ee-8336-7f644178464a"],
+Cell[2053215, 42407, 529, 11, 24, "Print",ExpressionUUID->"94f1163a-105e-471d-8089-7dc3b1dd1730"],
+Cell[2053747, 42420, 531, 11, 24, "Print",ExpressionUUID->"a47290ef-0229-4a79-9948-295c1804c33a"],
+Cell[2054281, 42433, 529, 11, 24, "Print",ExpressionUUID->"03f29486-c7a6-4203-9a7c-53159274b2b7"],
+Cell[2054813, 42446, 531, 11, 24, "Print",ExpressionUUID->"cbc2fb23-86f0-4eae-967b-646d27f0752f"],
+Cell[2055347, 42459, 529, 11, 24, "Print",ExpressionUUID->"02254409-5700-444c-96ee-cb7782f47981"],
+Cell[2055879, 42472, 531, 11, 24, "Print",ExpressionUUID->"9065b45d-d3e6-4550-9f25-f52c7ab5d2a1"],
+Cell[2056413, 42485, 528, 11, 24, "Print",ExpressionUUID->"cdc4b55a-8a55-4374-922f-4330437d08ae"],
+Cell[2056944, 42498, 531, 11, 24, "Print",ExpressionUUID->"d487652f-a859-4abc-afba-90fda9a6d284"],
+Cell[2057478, 42511, 529, 11, 24, "Print",ExpressionUUID->"e9a8016f-8abd-49e5-bd30-03487dac0600"],
+Cell[2058010, 42524, 531, 11, 24, "Print",ExpressionUUID->"f6627aa5-a63b-4689-a531-f9fd9f6ff3c1"],
+Cell[2058544, 42537, 528, 11, 24, "Print",ExpressionUUID->"82f0b7e8-37ef-41e4-96d9-dbaad94cf023"],
+Cell[2059075, 42550, 529, 11, 24, "Print",ExpressionUUID->"470836fa-a4ca-4f9b-bd23-4012d16256e0"],
+Cell[2059607, 42563, 531, 11, 24, "Print",ExpressionUUID->"7a3100cf-d9f4-4a9d-9228-68fb38a558fb"],
+Cell[2060141, 42576, 529, 11, 24, "Print",ExpressionUUID->"659b8e73-896e-4f34-bc5c-02830044a3d5"],
+Cell[2060673, 42589, 529, 11, 24, "Print",ExpressionUUID->"5e8da35f-7756-4964-a518-c013f255e3c4"],
+Cell[2061205, 42602, 529, 11, 24, "Print",ExpressionUUID->"46a50121-a9bf-4d85-bf5d-dc7b652d1144"],
+Cell[2061737, 42615, 529, 11, 24, "Print",ExpressionUUID->"0168d062-0bce-4e4b-9be3-0bceaac87900"],
+Cell[2062269, 42628, 529, 11, 24, "Print",ExpressionUUID->"67e103d4-033a-44ed-88f2-b30d4465084d"],
+Cell[2062801, 42641, 531, 11, 24, "Print",ExpressionUUID->"d896f028-eccb-4ef2-988b-6a7e9b0e3e27"],
+Cell[2063335, 42654, 529, 11, 24, "Print",ExpressionUUID->"dbee16e9-9956-4c34-b23a-8fa37f409128"],
+Cell[2063867, 42667, 531, 11, 24, "Print",ExpressionUUID->"e676c012-a4c6-4953-90bd-224568353817"],
+Cell[2064401, 42680, 529, 11, 24, "Print",ExpressionUUID->"dc5e52e2-92a9-45ec-8395-a9cf7f422b37"],
+Cell[2064933, 42693, 531, 11, 24, "Print",ExpressionUUID->"3ab2b64f-f0b7-4977-bf1d-7a0531297e92"],
+Cell[2065467, 42706, 529, 11, 24, "Print",ExpressionUUID->"7d1e18f1-81b5-4def-902f-f07f5c784261"],
+Cell[2065999, 42719, 529, 11, 24, "Print",ExpressionUUID->"4b5c0666-679b-45ab-8f9c-57ef999a253e"],
+Cell[2066531, 42732, 279, 5, 24, "Print",ExpressionUUID->"d4b21011-912e-41ab-8f93-a111da7aa8f6"],
+Cell[2066813, 42739, 474, 10, 24, "Print",ExpressionUUID->"16a9d063-9e47-4005-8b9a-4a83ec00a456"],
+Cell[2067290, 42751, 459, 10, 24, "Print",ExpressionUUID->"60607d17-8a34-4d71-8d39-5f6d6f4dc615"],
+Cell[2067752, 42763, 632, 14, 24, "Print",ExpressionUUID->"afa00712-e173-4895-a5f8-fa233ad4295b"],
+Cell[2068387, 42779, 632, 14, 24, "Print",ExpressionUUID->"37ce906d-2da6-487f-842b-f75452bcd614"],
+Cell[2069022, 42795, 632, 14, 24, "Print",ExpressionUUID->"af97715b-8780-4377-88e2-aec6617418f0"],
+Cell[2069657, 42811, 632, 14, 24, "Print",ExpressionUUID->"8957ac75-5a1e-4107-aa6f-de7b162718e5"],
+Cell[2070292, 42827, 636, 14, 24, "Print",ExpressionUUID->"74454467-d658-4fc9-aa06-a309b7b0df38"],
+Cell[2070931, 42843, 636, 14, 24, "Print",ExpressionUUID->"daf03625-85f6-44c4-a69b-3ca42a374fb1"],
+Cell[2071570, 42859, 636, 14, 24, "Print",ExpressionUUID->"504ce6be-8fdf-43e3-aede-6d18388e9714"],
+Cell[2072209, 42875, 636, 14, 24, "Print",ExpressionUUID->"a4d9beca-397c-4845-9373-6d4f19730fcc"],
+Cell[2072848, 42891, 636, 14, 24, "Print",ExpressionUUID->"bc085677-7c1a-48f4-9cd5-dac4e0259c00"],
+Cell[2073487, 42907, 638, 14, 24, "Print",ExpressionUUID->"4610ee3c-edec-4f45-a932-7994ef64cd37"],
+Cell[2074128, 42923, 638, 14, 24, "Print",ExpressionUUID->"54d75cf0-4e08-413c-be98-fdfd4703d4d9"],
+Cell[2074769, 42939, 638, 14, 24, "Print",ExpressionUUID->"3a41706a-380e-454e-a7f2-692e44ff77cc"],
+Cell[2075410, 42955, 637, 14, 24, "Print",ExpressionUUID->"1d2a71d1-aaa2-4ad1-9129-b78664e7eab1"],
+Cell[2076050, 42971, 637, 14, 24, "Print",ExpressionUUID->"074c3978-eaf7-434c-ba91-2c3141f81334"],
+Cell[2076690, 42987, 638, 14, 24, "Print",ExpressionUUID->"930c5b8f-719c-4dbf-958a-62d68fc46958"],
+Cell[2077331, 43003, 638, 14, 24, "Print",ExpressionUUID->"e4634487-cc5a-4ab4-a1c6-1721aee36cc1"],
+Cell[2077972, 43019, 638, 14, 24, "Print",ExpressionUUID->"530f44b3-f7af-4032-a329-45c7bc81f7e4"],
+Cell[2078613, 43035, 640, 14, 24, "Print",ExpressionUUID->"12f670a2-9c97-4115-b9b4-bd4acc18878c"],
+Cell[2079256, 43051, 637, 14, 24, "Print",ExpressionUUID->"7b783d4c-0b65-4266-a396-41f3281ec481"],
+Cell[2079896, 43067, 229727, 4270, 296, 187015, 3568, "CachedBoxData", "BoxData", "Print",ExpressionUUID->"4c5ec22e-95a1-49ef-b741-eeca0945f7d7"],
+Cell[2309626, 47339, 226896, 4275, 296, 183081, 3555, "CachedBoxData", "BoxData", "Print",ExpressionUUID->"037fbb3c-8ef3-40a2-bf6f-febd812ea256"],
+Cell[2536525, 51616, 245021, 4571, 296, 199380, 3821, "CachedBoxData", "BoxData", "Print",ExpressionUUID->"1c7a87a3-12b5-4e99-98f7-bb172de020c1"],
+Cell[2781549, 56189, 236899, 4438, 296, 191762, 3696, "CachedBoxData", "BoxData", "Print",ExpressionUUID->"44b86e37-6b82-4b3e-90a7-933c9b9fbe25"],
+Cell[3018451, 60629, 38642, 778, 296, "Print",ExpressionUUID->"0eb43952-0016-4696-bef9-7b319c25a78f"],
+Cell[3057096, 61409, 632, 14, 24, "Print",ExpressionUUID->"766fb175-9f43-40a7-a5e5-7ae88f42ca9e"],
+Cell[3057731, 61425, 632, 14, 24, "Print",ExpressionUUID->"ec0fb198-e97b-4d93-badd-f6f811bfb205"],
+Cell[3058366, 61441, 632, 14, 24, "Print",ExpressionUUID->"673a7784-fcd3-4fb3-92f8-09c499f0c71a"],
+Cell[3059001, 61457, 632, 14, 24, "Print",ExpressionUUID->"68382b7f-5248-4c77-9adb-5891b620572f"],
+Cell[3059636, 61473, 638, 14, 24, "Print",ExpressionUUID->"c39cb91c-e010-4491-8ab6-96f908294232"],
+Cell[3060277, 61489, 636, 14, 24, "Print",ExpressionUUID->"70c97ea7-6872-494c-9439-0c17e4ba8bee"],
+Cell[3060916, 61505, 636, 14, 24, "Print",ExpressionUUID->"d706ff73-2406-4c4a-9b0a-56c0010a9d52"],
+Cell[3061555, 61521, 636, 14, 24, "Print",ExpressionUUID->"ba57c76e-baf2-493d-9c2f-c4f85d55f7bc"],
+Cell[3062194, 61537, 635, 14, 24, "Print",ExpressionUUID->"01fed162-eccc-4fa8-a388-c381955985df"],
+Cell[3062832, 61553, 638, 14, 24, "Print",ExpressionUUID->"cdf96293-a47a-4694-9cf7-7c3eee562208"],
+Cell[3063473, 61569, 638, 14, 24, "Print",ExpressionUUID->"6e7bbe49-623f-4b6c-a034-a39d6aa7ba23"],
+Cell[3064114, 61585, 640, 14, 24, "Print",ExpressionUUID->"13429c38-2497-43f2-b673-70aa019a9f5d"],
+Cell[3064757, 61601, 638, 14, 24, "Print",ExpressionUUID->"6c327368-c9b9-4ae3-949a-593fb2b77007"],
+Cell[3065398, 61617, 638, 14, 24, "Print",ExpressionUUID->"47e85b11-c505-4659-89e4-33b60d35abca"],
+Cell[3066039, 61633, 637, 14, 24, "Print",ExpressionUUID->"f3fde698-e9e2-4581-812a-b0bde8dcf250"],
+Cell[3066679, 61649, 638, 14, 24, "Print",ExpressionUUID->"415d3b58-6c3b-419e-a420-fd69f60e69a2"],
+Cell[3067320, 61665, 640, 14, 24, "Print",ExpressionUUID->"f9ef4194-ebb3-4cb6-a5f8-07187185012c"],
+Cell[3067963, 61681, 640, 14, 24, "Print",ExpressionUUID->"4c972635-8329-42e5-9eee-204cdd18f466"],
+Cell[3068606, 61697, 638, 14, 24, "Print",ExpressionUUID->"1aebfe8a-7e86-4a40-8242-1b5cd17fc43d"],
+Cell[3069247, 61713, 279, 5, 24, "Print",ExpressionUUID->"ce56c22a-c969-4120-8ab3-76908cd7cb8f"],
+Cell[3069529, 61720, 496, 10, 24, "Print",ExpressionUUID->"b2ad0c55-c228-4dd8-afe1-596ac3e8de27"],
+Cell[3070028, 61732, 525, 11, 24, "Print",ExpressionUUID->"3f8774c5-285b-44f4-88e8-0185fa11c1a4"],
+Cell[3070556, 61745, 457, 10, 24, "Print",ExpressionUUID->"e93aab79-e7b3-4dbd-8e2b-1c90b2aa247c"],
+Cell[3071016, 61757, 398, 7, 63, "Print",ExpressionUUID->"5a36d2f5-f14d-44c6-9613-e31cb7d50f4f"],
+Cell[3071417, 61766, 295, 5, 24, "Print",ExpressionUUID->"b6a2c1c9-b900-4fe8-a272-adf23b8f05ac"],
+Cell[3071715, 61773, 284, 5, 44, "Print",ExpressionUUID->"9c92fc32-0f89-45c0-afd7-d26c1b8ab947"]
+}, Open  ]]
+}, Open  ]],
+Cell[3072026, 61782, 156, 3, 30, "Input",ExpressionUUID->"e983dc9e-7c02-4e79-995f-db0add5406de"]
+}
+]
+*)
+
diff --git a/scripts/HelicityAmps.nb b/scripts/HelicityAmps.nb
new file mode 100644
index 00000000..91014c96
--- /dev/null
+++ b/scripts/HelicityAmps.nb
@@ -0,0 +1,13635 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 11.3' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[       158,          7]
+NotebookDataLength[    507940,      13627]
+NotebookOptionsPosition[    470780,      13062]
+NotebookOutlinePosition[    471133,      13078]
+CellTagsIndexPosition[    471090,      13075]
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[
+ RowBox[{"(*", " ", 
+  RowBox[{
+   RowBox[{
+    RowBox[{
+     RowBox[{"HelicityAmps", ".", "m"}], "\[IndentingNewLine]", " ", 
+     RowBox[{"Process", ":", " ", 
+      RowBox[{"g", " ", "+", " ", "g"}]}]}], " ", "\[Rule]", " ", 
+    RowBox[{"H", " ", "+", " ", "g", " ", "+", " ", 
+     RowBox[{"g", "\[IndentingNewLine]", 
+      RowBox[{"Model", ":", " ", "SMQCD"}]}]}]}], ",", " ", 
+   RowBox[{"Definition", " ", "of", " ", "kinematic", " ", "variables"}], ",",
+    "\[IndentingNewLine]", "   ", 
+   RowBox[{"and", " ", "helicity", " ", 
+    RowBox[{"projections", ".", " ", "Last"}], " ", "Modified", " ", "August",
+     " ", "2019.", "\[IndentingNewLine]", "Created", " ", 
+    RowBox[{"by", ":", " ", 
+     RowBox[{
+      RowBox[{"J", ".", "G", ".", "Reyes"}], " ", "Rivera"}]}]}]}], " ", 
+  "*)"}]], "Input",
+ CellChangeTimes->{{3.7483460640690107`*^9, 3.748346128736135*^9}, {
+  3.7505322064466867`*^9, 3.7505322096193037`*^9}, {3.750685818525031*^9, 
+  3.7506858187985888`*^9}, {3.750685862467576*^9, 3.750685862527199*^9}, {
+  3.7513081531132383`*^9, 3.751308157253491*^9}, {3.761295781705222*^9, 
+  3.761295787067747*^9}, {3.7640060179701233`*^9, 3.7640060182815123`*^9}, {
+  3.769416168255188*^9, 3.769416171052967*^9}, {3.774008385144402*^9, 
+  3.774008446027734*^9}, {3.774361814019129*^9, 
+  3.7743618176296263`*^9}},ExpressionUUID->"a9eb43f9-c437-4ff0-ae8b-\
+eb31f4d06b38"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{
+ RowBox[{"Needs", "[", "\"\<X`\>\"", "]"}], "\n", 
+ RowBox[{"<<", "helicityvec`"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"SetDirectory", "[", 
+   RowBox[{"NotebookDirectory", "[", "]"}], "]"}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{"NotebookSave", "[", "]"}]}], "Input",
+ CellChangeTimes->{{3.7694157567375174`*^9, 3.7694157651420507`*^9}, {
+  3.7694161379556293`*^9, 3.769416138416831*^9}, {3.7694161826886263`*^9, 
+  3.769416192145475*^9}, {3.769416241287668*^9, 3.769416242139756*^9}, {
+  3.769421884524377*^9, 3.769421889789727*^9}, {3.7740084724707212`*^9, 
+  3.7740084728784323`*^9}, {3.774014142722267*^9, 3.774014161359538*^9}, {
+  3.7743464356886587`*^9, 3.77434644432825*^9}, {3.7743465118165216`*^9, 
+  3.774346538188527*^9}, {3.7743467576241837`*^9, 3.774346762569035*^9}},
+ CellLabel->"In[1]:=",ExpressionUUID->"aa6e76d2-ec10-49c0-b6e0-1dd4d91b1a18"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["\<\"\\!\\(\\*TemplateBox[List[\\\"\\\\\\\"Package-X v2.1.1, by \
+Hiren H. Patel\\\\\\\\nFor more information, see the \\\\\\\"\\\", \
+TemplateBox[List[\\\"\\\\\\\"guide\\\\\\\"\\\", \\\"paclet:X/guide/PackageX\\\
+\"], \\\"HyperlinkPaclet\\\"]], \\\"RowDefault\\\"]\\)\"\>"], "Print",
+ CellChangeTimes->{
+  3.774346538743554*^9, {3.77434675511267*^9, 3.774346775904129*^9}, 
+   3.774346890682291*^9, 3.7743475854203463`*^9, 3.7743476889237003`*^9, 
+   3.7743495115108013`*^9, 3.774371782249662*^9, 3.774376134357814*^9, 
+   3.7752210665837917`*^9, {3.77523223041602*^9, 3.775232240208652*^9}, 
+   3.77523345055406*^9, 3.7752338986011133`*^9, 3.775484241099798*^9, 
+   3.7754868687355537`*^9, 3.7754893499682302`*^9, 3.775489810607164*^9, 
+   3.775490894912174*^9, 3.775495005616561*^9, 3.7764382105007544`*^9},
+ CellLabel->
+  "During evaluation of \
+In[1]:=",ExpressionUUID->"25a5da31-44dc-4fb5-8479-d3b3e9d9997d"],
+
+Cell[BoxData["\<\"helicityvec by J.G. Reyes v1. August 2019\"\>"], "Print",
+ CellChangeTimes->{
+  3.774346538743554*^9, {3.77434675511267*^9, 3.774346775904129*^9}, 
+   3.774346890682291*^9, 3.7743475854203463`*^9, 3.7743476889237003`*^9, 
+   3.7743495115108013`*^9, 3.774371782249662*^9, 3.774376134357814*^9, 
+   3.7752210665837917`*^9, {3.77523223041602*^9, 3.775232240208652*^9}, 
+   3.77523345055406*^9, 3.7752338986011133`*^9, 3.775484241099798*^9, 
+   3.7754868687355537`*^9, 3.7754893499682302`*^9, 3.775489810607164*^9, 
+   3.775490894912174*^9, 3.775495005616561*^9, 3.776438210515339*^9},
+ CellLabel->
+  "During evaluation of \
+In[1]:=",ExpressionUUID->"f4dab8ad-d8ed-4620-a2d6-6211b6054aed"]
+}, Open  ]]
+}, Open  ]],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"$Assumptions", "=", 
+   RowBox[{"{", 
+    RowBox[{
+     RowBox[{"Element", "[", 
+      RowBox[{
+       RowBox[{"{", 
+        RowBox[{
+        "ki", ",", "k1", ",", "k2", ",", "k3", ",", "k4", ",", " ", 
+         "\[Theta]1", ",", "\[Theta]2", ",", "\[Theta]3", ",", "\[Theta]4", 
+         ",", " ", "\[Phi]1", ",", "\[Phi]2", ",", "\[Phi]3", ",", "\[Phi]4", 
+         ",", "p", ",", "MT2", ",", "GS", ",", "EL", ",", "Alfas", ",", "a1", 
+         ",", "S", ",", "T", ",", "U", ",", "MT", ",", "MH", ",", "MH2", ",", 
+         "\[Eta]4", ",", "\[Eta]3", ",", "\[Beta]"}], "}"}], ",", "Reals"}], 
+      "]"}], ",", 
+     RowBox[{"ki", ">", "0"}], " ", ",", 
+     RowBox[{"MT2", ">", "0"}], ",", 
+     RowBox[{"MT", ">", "0"}], ",", 
+     RowBox[{"MH2", ">", "0"}], ",", " ", 
+     RowBox[{"MH", ">", "0"}], ",", 
+     RowBox[{"k4", ">", "0"}], ",", 
+     RowBox[{"p", ">", "0"}], ",", 
+     RowBox[{"k3", ">", "0"}], ",", 
+     RowBox[{"k1", ">", "0"}], ",", 
+     RowBox[{"k2", ">", "0"}], ",", 
+     RowBox[{"rS", ">", "0"}], ",", 
+     RowBox[{"kT4", ">", "0"}], ",", 
+     RowBox[{"kT3", ">", "0"}], ",", 
+     RowBox[{"\[Beta]", ">", "0"}]}], "}"}]}], ";"}]], "Input",
+ CellChangeTimes->{{3.774349510085885*^9, 3.774349514308477*^9}, {
+  3.776441432289131*^9, 3.776441435349208*^9}, {3.7764414951384068`*^9, 
+  3.7764414973318167`*^9}},
+ CellLabel->"In[96]:=",ExpressionUUID->"907a0a71-f5d0-4c01-bacf-80d42748259d"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(*", " ", 
+   RowBox[{
+   "Defines", " ", "the", " ", "center", " ", "of", " ", "mass", " ", 
+    RowBox[{"frame", "."}]}], " ", "*)"}], "\[IndentingNewLine]", 
+  RowBox[{
+   RowBox[{
+    RowBox[{"CMSFrame", "=", 
+     RowBox[{"{", 
+      RowBox[{
+       RowBox[{"k1x", "\[Rule]", " ", "0"}], ",", 
+       RowBox[{"k1y", "\[Rule]", " ", "0"}], ",", 
+       RowBox[{"k1z", "\[Rule]", " ", 
+        RowBox[{"rS", "/", "2"}]}], ",", 
+       RowBox[{"k2x", "\[Rule]", " ", "0"}], ",", 
+       RowBox[{"k2y", "\[Rule]", " ", "0"}], ",", 
+       RowBox[{"k2z", "\[Rule]", " ", 
+        RowBox[{
+         RowBox[{"-", "rS"}], "/", "2"}]}], ",", 
+       RowBox[{"k5x", "\[Rule]", " ", 
+        RowBox[{"-", 
+         RowBox[{"(", 
+          RowBox[{"k4x", "+", "k3x"}], ")"}]}]}], ",", 
+       RowBox[{"k5y", "\[Rule]", " ", 
+        RowBox[{"-", 
+         RowBox[{"(", 
+          RowBox[{"k4y", "+", "k3y"}], ")"}]}]}], ",", 
+       RowBox[{"k5z", "\[Rule]", " ", 
+        RowBox[{"-", 
+         RowBox[{"(", 
+          RowBox[{"k4z", " ", "+", "k3z"}], ")"}]}]}]}], "}"}]}], ";"}], 
+   "\[IndentingNewLine]", "\[IndentingNewLine]", 
+   RowBox[{"(*", " ", 
+    RowBox[{"Returns", " ", "vector", " ", 
+     RowBox[{"(", 
+      RowBox[{"E", ",", "px", ",", "py", ",", "pz"}], ")"}], " ", "in", " ", 
+     "Euclidean", " ", "coordinates"}], " ", "*)"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{
+     RowBox[{"vec4xyz", "[", 
+      RowBox[{"m_", ",", "kx_", ",", "ky_", ",", "kz_"}], "]"}], ":=", 
+     RowBox[{"Module", "[", 
+      RowBox[{
+       RowBox[{"{", 
+        RowBox[{"k", "=", 
+         RowBox[{"Sqrt", "[", 
+          RowBox[{
+           RowBox[{"kx", "^", "2"}], " ", "+", 
+           RowBox[{"ky", "^", "2"}], " ", "+", 
+           RowBox[{"kz", "^", "2"}]}], "]"}]}], "}"}], ",", 
+       RowBox[{"{", 
+        RowBox[{
+         RowBox[{"Sqrt", "[", 
+          RowBox[{
+           RowBox[{"k", "^", "2"}], " ", "+", " ", 
+           RowBox[{"m", "^", "2"}]}], "]"}], ",", "kx", ",", "ky", ",", 
+         "kz"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", 
+   "\[IndentingNewLine]", 
+   RowBox[{"(*", " ", 
+    RowBox[{"Returns", " ", "vector", " ", 
+     RowBox[{"(", 
+      RowBox[{"E", ",", "px", ",", "py", ",", "pz"}], ")"}], " ", "in", " ", 
+     "Collider", " ", "coordinates"}], " ", "*)"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{
+     RowBox[{"vec4Tep", "[", 
+      RowBox[{"m_", ",", "kT_", ",", "\[Eta]_", ",", "\[Phi]_"}], "]"}], ":=", 
+     RowBox[{"Block", "[", 
+      RowBox[{
+       RowBox[{"{", 
+        RowBox[{
+         RowBox[{"k", "=", 
+          RowBox[{"kT", " ", 
+           RowBox[{"Cosh", "[", "\[Eta]", "]"}]}]}], ",", 
+         RowBox[{"kx", "=", " ", 
+          RowBox[{"kT", "  ", 
+           RowBox[{"Cos", "[", "\[Phi]", "]"}]}]}], ",", 
+         RowBox[{"ky", "=", " ", 
+          RowBox[{"kT", "  ", 
+           RowBox[{"Sin", "[", "\[Phi]", "]"}]}]}], ",", 
+         RowBox[{"kz", " ", "=", " ", 
+          RowBox[{"kT", " ", 
+           RowBox[{"Sinh", "[", "\[Eta]", "]"}]}]}]}], "}"}], ",", 
+       RowBox[{"{", 
+        RowBox[{
+         RowBox[{"Sqrt", "[", 
+          RowBox[{
+           RowBox[{"k", "^", "2"}], " ", "+", " ", 
+           RowBox[{"m", "^", "2"}]}], "]"}], ",", "kx", ",", "ky", ",", 
+         "kz"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", 
+   "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"rkT4", "=", 
+     RowBox[{
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"-", "2"}], "*", 
+         RowBox[{"kT3", "^", "2"}], "*", "S"}], "+", 
+        RowBox[{
+         RowBox[{"(", 
+          RowBox[{
+           RowBox[{"Sqrt", "[", 
+            RowBox[{
+             RowBox[{"kT3", "^", "2"}], "+", 
+             RowBox[{"MH", "^", "2"}]}], "]"}], "-", "S"}], ")"}], "*", 
+         RowBox[{"(", 
+          RowBox[{
+           RowBox[{"MH", "^", "2"}], "-", 
+           RowBox[{"S", "^", "2"}]}], ")"}]}], "+", 
+        RowBox[{"kT3", "*", 
+         RowBox[{"(", 
+          RowBox[{
+           RowBox[{"MH", "^", "2"}], "+", 
+           RowBox[{"S", "*", 
+            RowBox[{"(", 
+             RowBox[{
+              RowBox[{
+               RowBox[{"-", "2"}], "*", 
+               RowBox[{"Sqrt", "[", 
+                RowBox[{
+                 RowBox[{"kT3", "^", "2"}], "+", 
+                 RowBox[{"MH", "^", "2"}]}], "]"}]}], "+", "S"}], ")"}]}]}], 
+          ")"}], "*", 
+         RowBox[{"Cos", "[", 
+          RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}], ")"}], "/", 
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"-", 
+         RowBox[{"kT3", "^", "2"}]}], "-", 
+        RowBox[{"2", "*", 
+         RowBox[{"MH", "^", "2"}]}], "+", 
+        RowBox[{"2", "*", 
+         RowBox[{"S", "^", "2"}]}], "+", 
+        RowBox[{
+         RowBox[{"kT3", "^", "2"}], "*", 
+         RowBox[{"Cos", "[", 
+          RowBox[{
+           RowBox[{"2", "*", "\[Phi]3"}], "-", 
+           RowBox[{"2", "*", "\[Phi]4"}]}], "]"}]}], "+", 
+        RowBox[{"4", "*", "kT3", "*", "S", "*", 
+         RowBox[{"Cos", "[", 
+          RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}], ")"}]}]}], ";"}], 
+   "\[IndentingNewLine]", "\[IndentingNewLine]", 
+   RowBox[{"(*", " ", 
+    RowBox[{
+    "Definition", " ", "of", " ", "the", " ", "four", " ", "vector", " ", 
+     "of", " ", "particle", " ", "3", " ", 
+     RowBox[{"(", "Higgs", ")"}]}], " ", "*)"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"vecetaphi3", "=", 
+     RowBox[{
+      RowBox[{"vec4Tep", "[", 
+       RowBox[{"MH", ",", "kT3", ",", "\[Eta]3", ",", "\[Phi]3"}], "]"}], "//",
+       "Simplify"}]}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", 
+   RowBox[{"(*", " ", 
+    RowBox[{
+    "Definition", " ", "of", " ", "the", " ", "four", " ", "vector", " ", 
+     "of", " ", "particle", " ", "4", " ", 
+     RowBox[{"(", 
+      RowBox[{"outgoing", " ", "gluon"}], ")"}]}], " ", "*)"}], 
+   "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"vecetaphi4", "=", 
+     RowBox[{"(", 
+      RowBox[{
+       RowBox[{"vec4Tep", "[", 
+        RowBox[{"0", ",", "kT4", ",", "\[Eta]4", ",", "\[Phi]4"}], "]"}], "//",
+        "Simplify"}], ")"}]}], ";"}], "\[IndentingNewLine]", 
+   "\[IndentingNewLine]", 
+   RowBox[{"(*", " ", 
+    RowBox[{
+     RowBox[{
+     "Transformation", " ", "of", " ", "momentum", " ", "variables", " ", 
+      "from", " ", "Euclidean", " ", "to", " ", "Collider", " ", 
+      "coordinates", " ", "for", " ", "particles", " ", "3"}], ",", "4."}], 
+    " ", "*)"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"vecsubetaphi", "=", 
+     RowBox[{"{", 
+      RowBox[{
+       RowBox[{"k4x", "\[Rule]", " ", 
+        RowBox[{"vecetaphi4", "[", 
+         RowBox[{"[", "2", "]"}], "]"}]}], ",", 
+       RowBox[{"k4y", "\[Rule]", " ", 
+        RowBox[{"vecetaphi4", "[", 
+         RowBox[{"[", "3", "]"}], "]"}]}], ",", 
+       RowBox[{"k4z", "\[Rule]", " ", 
+        RowBox[{"vecetaphi4", "[", 
+         RowBox[{"[", "4", "]"}], "]"}]}], ",", 
+       RowBox[{"k3x", "\[Rule]", " ", 
+        RowBox[{"vecetaphi3", "[", 
+         RowBox[{"[", "2", "]"}], "]"}]}], ",", 
+       RowBox[{"k3y", "\[Rule]", " ", 
+        RowBox[{"vecetaphi3", "[", 
+         RowBox[{"[", "3", "]"}], "]"}]}], ",", 
+       RowBox[{"k3z", "\[Rule]", " ", 
+        RowBox[{"vecetaphi3", "[", 
+         RowBox[{"[", "4", "]"}], "]"}]}]}], "}"}]}], ";"}], 
+   "\[IndentingNewLine]", "\[IndentingNewLine]", 
+   RowBox[{"SetAttributes", "[", 
+    RowBox[{"f", ",", "Listable"}], "]"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"f", "[", 
+     RowBox[{"a_", ",", "b_"}], "]"}], ":=", 
+    RowBox[{"a", "\[Rule]", "b"}]}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"variables", "=", 
+     RowBox[{"{", 
+      RowBox[{
+      "kT3", ",", "kT4", ",", "S", ",", "T", ",", "U", ",", "T24", ",", "T14",
+        ",", "S34", ",", 
+       RowBox[{"Sqrt", "[", "S", "]"}], ",", 
+       RowBox[{"Sqrt", "[", "S34", "]"}], ",", 
+       RowBox[{"Tan", "[", "\[Phi]5", "]"}], ",", "kT5", ",", 
+       RowBox[{"Sqrt", "[", "S35", "]"}]}], "}"}]}], ";"}], 
+   "\[IndentingNewLine]", "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"MATColor", ":=", 
+     RowBox[{"{", "\[IndentingNewLine]", 
+      RowBox[{
+       RowBox[{"A", "\[Rule]", "c3"}], " ", 
+       RowBox[{"(*", 
+        RowBox[{"Mat", "[", 
+         RowBox[{"SUNT", "[", 
+          RowBox[{
+          "Glu1", ",", "Glu5", ",", "Glu2", ",", "Glu4", ",", "0", ",", "0"}],
+           "]"}], "]"}], "*)"}], ",", "\[IndentingNewLine]", 
+       RowBox[{"B", "\[Rule]", "c2"}], " ", 
+       RowBox[{"(*", 
+        RowBox[{"Mat", "[", 
+         RowBox[{"SUNT", "[", 
+          RowBox[{
+          "Glu1", ",", "Glu4", ",", "Glu5", ",", "Glu2", ",", "0", ",", "0"}],
+           "]"}], "]"}], "*)"}], ",", "\[IndentingNewLine]", 
+       RowBox[{"C", "\[Rule]", "c2"}], " ", 
+       RowBox[{"(*", 
+        RowBox[{"Mat", "[", 
+         RowBox[{"SUNT", "[", 
+          RowBox[{
+          "Glu1", ",", "Glu2", ",", "Glu5", ",", "Glu4", ",", "0", ",", "0"}],
+           "]"}], "]"}], "*)"}], ",", "\[IndentingNewLine]", 
+       RowBox[{"D", "\[Rule]", "c3"}], " ", 
+       RowBox[{"(*", 
+        RowBox[{"Mat", "[", 
+         RowBox[{"SUNT", "[", 
+          RowBox[{
+          "Glu1", ",", "Glu4", ",", "Glu2", ",", "Glu5", ",", "0", ",", "0"}],
+           "]"}], "]"}], "*)"}], ",", "\[IndentingNewLine]", 
+       RowBox[{"F", "\[Rule]", "c1"}], " ", 
+       RowBox[{"(*", 
+        RowBox[{"Mat", "[", 
+         RowBox[{"SUNT", "[", 
+          RowBox[{
+          "Glu1", ",", "Glu5", ",", "Glu4", ",", "Glu2", ",", "0", ",", "0"}],
+           "]"}], "]"}], "*)"}], ",", "\[IndentingNewLine]", 
+       RowBox[{"G", "\[Rule]", "c1"}]}], 
+      RowBox[{"(*", " ", 
+       RowBox[{"Mat", "[", 
+        RowBox[{"SUNT", "[", 
+         RowBox[{
+         "Glu1", ",", "Glu2", ",", "Glu4", ",", "Glu5", ",", "0", ",", "0"}], 
+         "]"}], "]"}], "*)"}], "\[IndentingNewLine]", "}"}]}], 
+    ";"}]}]}]], "Input",
+ CellChangeTimes->{{3.774008509020266*^9, 3.7740085381409407`*^9}, {
+  3.774010228954178*^9, 3.7740102997172318`*^9}, {3.774010472134542*^9, 
+  3.774010557287574*^9}, {3.7740105997645206`*^9, 3.774010663124332*^9}, {
+  3.774350209862176*^9, 3.7743502113767548`*^9}, {3.774351250016728*^9, 
+  3.774351417512418*^9}, {3.774376113932404*^9, 3.774376122200436*^9}, {
+  3.775489537189768*^9, 3.775489538288254*^9}},
+ CellLabel->"In[6]:=",ExpressionUUID->"26f4a4e8-5f12-4a95-a30f-5e40153ac3f8"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(*", " ", 
+   RowBox[{
+   "Four", " ", "momentum", " ", "vectors", " ", "for", " ", "all", " ", 
+    RowBox[{"particles", "."}]}], " ", "*)"}], "\[IndentingNewLine]", 
+  RowBox[{"(*", " ", 
+   RowBox[{
+    RowBox[{
+     RowBox[{"g", 
+      RowBox[{"(", "k1", ")"}], " ", "g", 
+      RowBox[{"(", "k2", ")"}]}], " ", "\[Rule]", " ", 
+     RowBox[{"h", 
+      RowBox[{"(", "k3", ")"}]}]}], ",", 
+    RowBox[{"g", 
+     RowBox[{"(", "k4", ")"}]}], ",", 
+    RowBox[{"g", 
+     RowBox[{"(", "k5", ")"}]}]}], " ", "*)"}], "\[IndentingNewLine]", 
+  RowBox[{
+   RowBox[{
+    RowBox[{"k1vec", "=", 
+     RowBox[{
+      RowBox[{
+       RowBox[{"vec4xyz", "[", 
+        RowBox[{"0", ",", "k1x", ",", "k1y", ",", "k1z"}], "]"}], "/.", 
+       "CMSFrame"}], "//", "Simplify"}]}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"k2vec", "=", 
+     RowBox[{
+      RowBox[{
+       RowBox[{"vec4xyz", "[", 
+        RowBox[{"0", ",", "k2x", ",", "k2y", ",", "k2z"}], "]"}], "/.", 
+       "CMSFrame"}], "//", "Simplify"}]}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"k3vec", "=", 
+     RowBox[{
+      RowBox[{
+       RowBox[{"vec4xyz", "[", 
+        RowBox[{"MH", ",", "k3x", ",", "k3y", ",", "k3z"}], "]"}], "/.", 
+       "CMSFrame"}], "//", "Simplify"}]}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"k4vec", "=", 
+     RowBox[{
+      RowBox[{
+       RowBox[{"vec4xyz", "[", 
+        RowBox[{"0", ",", "k4x", ",", "k4y", ",", "k4z"}], "]"}], "/.", 
+       "CMSFrame"}], "//", "Simplify"}]}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"k5vec", "=", 
+     RowBox[{
+      RowBox[{
+       RowBox[{"vec4xyz", "[", 
+        RowBox[{"0", ",", "k5x", ",", "k5y", ",", "k5z"}], "]"}], "/.", 
+       "CMSFrame"}], "//", "Simplify"}]}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"kvec1", "=", 
+     RowBox[{
+      RowBox[{
+       RowBox[{"k1vec", "/.", " ", "vecsubetaphi"}], "/.", 
+       RowBox[{"rS", "\[Rule]", 
+        RowBox[{"Sqrt", "[", "S", "]"}]}]}], "//", "Simplify"}]}], ";"}], 
+   "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"kvec2", "=", 
+     RowBox[{
+      RowBox[{
+       RowBox[{"k2vec", "/.", " ", "vecsubetaphi"}], "/.", 
+       RowBox[{"rS", "\[Rule]", 
+        RowBox[{"Sqrt", "[", "S", "]"}]}]}], "//", "Simplify"}]}], ";"}], 
+   "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"kvec3", "=", 
+     RowBox[{
+      RowBox[{
+       RowBox[{"k3vec", "/.", " ", "vecsubetaphi"}], "/.", 
+       RowBox[{"rS", "\[Rule]", 
+        RowBox[{"Sqrt", "[", "S", "]"}]}]}], "//", "Simplify"}]}], ";"}], 
+   "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"kvec4", "=", 
+     RowBox[{
+      RowBox[{
+       RowBox[{"k4vec", "/.", " ", "vecsubetaphi"}], "/.", 
+       RowBox[{"rS", "\[Rule]", 
+        RowBox[{"Sqrt", "[", "S", "]"}]}]}], "//", "Simplify"}]}], ";"}], 
+   "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"kvec5", "=", 
+     RowBox[{
+      RowBox[{
+       RowBox[{"k5vec", "/.", " ", "vecsubetaphi"}], "/.", 
+       RowBox[{"rS", "\[Rule]", 
+        RowBox[{"Sqrt", "[", "S", "]"}]}]}], "//", "Simplify"}]}], 
+    ";"}]}]}]], "Input",
+ CellChangeTimes->{{3.774010789274702*^9, 3.774010812450952*^9}, {
+  3.774010874362638*^9, 3.774010888392482*^9}, {3.774014361258362*^9, 
+  3.774014361502096*^9}, {3.7740145370041933`*^9, 3.7740145375876703`*^9}, {
+  3.7740167862280827`*^9, 3.7740168375673*^9}, {3.774348193461874*^9, 
+  3.774348221322661*^9}, {3.774348765307613*^9, 3.774348785123725*^9}, {
+  3.774349827303525*^9, 3.7743498295202417`*^9}},
+ CellLabel->"In[17]:=",ExpressionUUID->"295b0a52-febf-49d7-b5c5-afa40a220c70"],
+
+Cell[BoxData[""], "Input",
+ CellChangeTimes->{{3.7743499044425*^9, 
+  3.774349905506363*^9}},ExpressionUUID->"facae057-50b1-4b42-bf4f-\
+443f5b3c37d1"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(*", " ", 
+   RowBox[{
+   "Polarization", " ", "Vectors", " ", "in", " ", "Helicity", " ", 
+    "Eigenbasis", " ", "and", " ", "four", " ", "vectors"}], " ", "*)"}], 
+  "\[IndentingNewLine]", 
+  RowBox[{"(*", " ", 
+   RowBox[{"1", ",", "2", ",", "4", ",", 
+    RowBox[{"5", " ", "-", " ", "gluons"}], ",", " ", 
+    RowBox[{"3", " ", "-", " ", "Higgs"}]}], " ", "*)"}]}]], "Input",
+ CellChangeTimes->{{3.774016844431131*^9, 3.774016870646851*^9}, {
+  3.774348591141938*^9, 3.774348602112896*^9}, {3.774349878328457*^9, 
+  3.774349899911847*^9}, {3.774349933691104*^9, 
+  3.774349940627697*^9}},ExpressionUUID->"08460ef5-a698-495d-8762-\
+405256a0b03d"],
+
+Cell[BoxData[{
+ RowBox[{
+  RowBox[{
+   RowBox[{"pairdef", "[", 
+    RowBox[{"l1_", ",", "l2_", ",", "l4_", ",", "l5_"}], "]"}], " ", ":=", 
+   "\[IndentingNewLine]", 
+   RowBox[{"{", "\[IndentingNewLine]", 
+    RowBox[{
+     RowBox[{
+      RowBox[{"ek1vecInc", "=", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"EpolEuc", "[", 
+          RowBox[{"0", ",", "k1x", ",", "k1y", ",", "k1z", ",", "l1"}], "]"}],
+          "/.", 
+         RowBox[{"{", 
+          RowBox[{"k1y", "\[Rule]", "0"}], "}"}]}], "//", "Simplify"}]}], ";",
+       "\[IndentingNewLine]", 
+      RowBox[{"ek1vec", "=", 
+       RowBox[{
+        RowBox[{
+         RowBox[{
+          RowBox[{"Limit", "[", 
+           RowBox[{"ek1vecInc", ",", 
+            RowBox[{"k1x", "\[Rule]", "0"}], ",", 
+            RowBox[{"Direction", "\[Rule]", "\"\<FromAbove\>\""}]}], "]"}], "/.",
+           "CMSFrame"}], "/.", 
+         RowBox[{"rS", "\[Rule]", 
+          RowBox[{"Sqrt", "[", "S", "]"}]}]}], "//", "Simplify"}]}]}], " ", 
+     ",", 
+     RowBox[{"(*", " ", 
+      RowBox[{
+       RowBox[{"because", " ", "kz"}], " ", ">", " ", "0"}], " ", "*)"}], 
+     "\[IndentingNewLine]", "\[IndentingNewLine]", 
+     RowBox[{
+      RowBox[{"ek2vecInc", "=", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"EpolEuc", "[", 
+          RowBox[{"0", ",", "k2x", ",", "k2y", ",", "k2z", ",", "l2"}], "]"}],
+          "/.", 
+         RowBox[{"{", 
+          RowBox[{"k2y", "\[Rule]", "0"}], "}"}]}], "//", "Simplify"}]}], ";",
+       "\[IndentingNewLine]", 
+      RowBox[{"ek2vec", "=", 
+       RowBox[{
+        RowBox[{
+         RowBox[{
+          RowBox[{"Limit", "[", 
+           RowBox[{"ek2vecInc", ",", 
+            RowBox[{"k2x", "\[Rule]", "0"}], ",", 
+            RowBox[{"Direction", "\[Rule]", "\"\<FromBelow\>\""}]}], "]"}], "/.",
+           "CMSFrame"}], "/.", 
+         RowBox[{"rS", "\[Rule]", 
+          RowBox[{"Sqrt", "[", "S", "]"}]}]}], "//", "Simplify"}]}]}], " ", 
+     ",", 
+     RowBox[{"(*", " ", 
+      RowBox[{
+       RowBox[{"because", " ", "kz"}], " ", "<", " ", "0"}], " ", "*)"}], 
+     "\[IndentingNewLine]", "\[IndentingNewLine]", 
+     RowBox[{"ek4vec", "=", 
+      RowBox[{
+       RowBox[{
+        RowBox[{
+         RowBox[{"EpolEuc", "[", 
+          RowBox[{"0", ",", "k4x", ",", "k4y", ",", "k4z", ",", "l4"}], "]"}],
+          "/.", "CMSFrame"}], "/.", "vecsubetaphi"}], "//", "Simplify"}]}], 
+     ",", "\[IndentingNewLine]", "\[IndentingNewLine]", 
+     RowBox[{"ek5vec", "=", 
+      RowBox[{
+       RowBox[{
+        RowBox[{
+         RowBox[{"EpolEuc", "[", 
+          RowBox[{"0", ",", "k5x", ",", "k5y", ",", "k5z", ",", "l5"}], "]"}],
+          "/.", "CMSFrame"}], "/.", "vecsubetaphi"}], "//", "Simplify"}]}], 
+     ",", "\[IndentingNewLine]", "\[IndentingNewLine]", 
+     RowBox[{"ek1vecCC", "=", 
+      RowBox[{
+       RowBox[{"Conjugate", "[", "ek1vec", "]"}], "//", "Simplify"}]}], ",", 
+     "\[IndentingNewLine]", 
+     RowBox[{"ek2vecCC", "=", 
+      RowBox[{
+       RowBox[{"Conjugate", "[", "ek2vec", "]"}], "//", "Simplify"}]}], ",", 
+     "\[IndentingNewLine]", 
+     RowBox[{"ek4vecCC", "=", 
+      RowBox[{
+       RowBox[{"Conjugate", "[", "ek4vec", "]"}], "//", "Simplify"}]}], ",", 
+     "\[IndentingNewLine]", 
+     RowBox[{"ek5vecCC", "=", 
+      RowBox[{
+       RowBox[{"Conjugate", "[", "ek5vec", "]"}], "//", "Simplify"}]}]}], 
+    "\[IndentingNewLine]", "}"}]}], 
+  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"SubFourVecs", ":=", 
+   RowBox[{"{", "\[IndentingNewLine]", 
+    RowBox[{
+     RowBox[{
+      RowBox[{"Pair", "[", 
+       RowBox[{
+        RowBox[{"e", "[", "1", "]"}], ",", 
+        RowBox[{"k", "[", "2", "]"}]}], "]"}], "\[Rule]", 
+      RowBox[{"MyPair", "[", 
+       RowBox[{"ek1vec", ",", "kvec2"}], "]"}]}], ",", "\[IndentingNewLine]", 
+     
+     RowBox[{
+      RowBox[{"Pair", "[", 
+       RowBox[{
+        RowBox[{"e", "[", "2", "]"}], ",", 
+        RowBox[{"k", "[", "1", "]"}]}], "]"}], "\[Rule]", 
+      RowBox[{"MyPair", "[", 
+       RowBox[{"ek2vec", ",", "kvec1"}], "]"}]}], ",", "\[IndentingNewLine]", 
+     
+     RowBox[{
+      RowBox[{"Pair", "[", 
+       RowBox[{
+        RowBox[{"ec", "[", "1", "]"}], ",", 
+        RowBox[{"k", "[", "2", "]"}]}], "]"}], "\[Rule]", 
+      RowBox[{"MyPair", "[", 
+       RowBox[{"ek1vecCC", ",", "kvec2"}], "]"}]}], ",", 
+     "\[IndentingNewLine]", 
+     RowBox[{
+      RowBox[{"Pair", "[", 
+       RowBox[{
+        RowBox[{"ec", "[", "2", "]"}], ",", 
+        RowBox[{"k", "[", "1", "]"}]}], "]"}], "\[Rule]", 
+      RowBox[{"MyPair", "[", 
+       RowBox[{"ek2vecCC", ",", "kvec1"}], "]"}]}], ",", 
+     "\[IndentingNewLine]", 
+     RowBox[{
+      RowBox[{"Pair", "[", 
+       RowBox[{
+        RowBox[{"e", "[", "1", "]"}], ",", 
+        RowBox[{"e", "[", "2", "]"}]}], "]"}], "\[Rule]", " ", 
+      RowBox[{"MyPair", "[", 
+       RowBox[{"ek1vec", ",", "ek2vec"}], "]"}]}], ",", "\[IndentingNewLine]", 
+     RowBox[{
+      RowBox[{"Pair", "[", 
+       RowBox[{
+        RowBox[{"ec", "[", "1", "]"}], ",", 
+        RowBox[{"ec", "[", "2", "]"}]}], "]"}], "\[Rule]", " ", 
+      RowBox[{"MyPair", "[", 
+       RowBox[{"ek1vecCC", ",", "ek2vecCC"}], "]"}]}], ",", 
+     "\[IndentingNewLine]", 
+     RowBox[{
+      RowBox[{"Pair", "[", 
+       RowBox[{
+        RowBox[{"e", "[", "1", "]"}], ",", 
+        RowBox[{"k", "[", "3", "]"}]}], "]"}], "\[Rule]", 
+      RowBox[{"MyPair", "[", 
+       RowBox[{"ek1vec", ",", "kvec3"}], "]"}]}], ",", "\[IndentingNewLine]", 
+     
+     RowBox[{
+      RowBox[{"Pair", "[", 
+       RowBox[{
+        RowBox[{"ec", "[", "1", "]"}], ",", 
+        RowBox[{"k", "[", "3", "]"}]}], "]"}], "\[Rule]", 
+      RowBox[{"MyPair", "[", 
+       RowBox[{"ek1vecCC", ",", "kvec3"}], "]"}]}], ",", 
+     "\[IndentingNewLine]", 
+     RowBox[{
+      RowBox[{"Pair", "[", 
+       RowBox[{
+        RowBox[{"e", "[", "1", "]"}], ",", 
+        RowBox[{"ec", "[", "4", "]"}]}], "]"}], "\[Rule]", 
+      RowBox[{"MyPair", "[", 
+       RowBox[{"ek1vec", ",", "ek4vecCC"}], "]"}]}], ",", 
+     "\[IndentingNewLine]", 
+     RowBox[{
+      RowBox[{"Pair", "[", 
+       RowBox[{
+        RowBox[{"ec", "[", "1", "]"}], ",", 
+        RowBox[{"e", "[", "4", "]"}]}], "]"}], "\[Rule]", 
+      RowBox[{"MyPair", "[", 
+       RowBox[{"ek1vecCC", ",", "ek4vec"}], "]"}]}], ",", 
+     "\[IndentingNewLine]", 
+     RowBox[{
+      RowBox[{"Pair", "[", 
+       RowBox[{
+        RowBox[{"e", "[", "1", "]"}], ",", 
+        RowBox[{"k", "[", "4", "]"}]}], "]"}], "\[Rule]", 
+      RowBox[{"MyPair", "[", 
+       RowBox[{"ek1vec", ",", "kvec4"}], "]"}]}], " ", ",", 
+     "\[IndentingNewLine]", 
+     RowBox[{
+      RowBox[{"Pair", "[", 
+       RowBox[{
+        RowBox[{"ec", "[", "1", "]"}], ",", 
+        RowBox[{"k", "[", "4", "]"}]}], "]"}], "\[Rule]", 
+      RowBox[{"MyPair", "[", 
+       RowBox[{"ek1vecCC", ",", "kvec4"}], "]"}]}], ",", 
+     "\[IndentingNewLine]", 
+     RowBox[{
+      RowBox[{"Pair", "[", 
+       RowBox[{
+        RowBox[{"e", "[", "1", "]"}], ",", " ", 
+        RowBox[{"ec", "[", "5", "]"}]}], "]"}], "\[Rule]", " ", 
+      RowBox[{"MyPair", "[", 
+       RowBox[{"ek1vec", ",", "ek5vecCC"}], "]"}]}], ",", 
+     "\[IndentingNewLine]", 
+     RowBox[{
+      RowBox[{"Pair", "[", 
+       RowBox[{
+        RowBox[{"e", "[", "1", "]"}], ",", " ", 
+        RowBox[{"k", "[", "5", "]"}]}], "]"}], "->", 
+      RowBox[{"MyPair", "[", 
+       RowBox[{"ek1vec", ",", "kvec5"}], "]"}]}], ",", "\[IndentingNewLine]", 
+     
+     RowBox[{
+      RowBox[{"Pair", "[", 
+       RowBox[{
+        RowBox[{"e", "[", "2", "]"}], ",", " ", 
+        RowBox[{"k", "[", "1", "]"}]}], "]"}], "->", 
+      RowBox[{"MyPair", "[", 
+       RowBox[{"ek2vec", ",", "kvec1"}], "]"}]}], ",", "\[IndentingNewLine]", 
+     
+     RowBox[{
+      RowBox[{"Pair", "[", 
+       RowBox[{
+        RowBox[{"e", "[", "2", "]"}], ",", 
+        RowBox[{"k", "[", "3", "]"}]}], "]"}], "\[Rule]", 
+      RowBox[{"MyPair", "[", 
+       RowBox[{"ek2vec", ",", "kvec3"}], "]"}]}], ",", "\[IndentingNewLine]", 
+     
+     RowBox[{
+      RowBox[{"Pair", "[", 
+       RowBox[{
+        RowBox[{"ec", "[", "2", "]"}], ",", 
+        RowBox[{"k", "[", "3", "]"}]}], "]"}], "\[Rule]", 
+      RowBox[{"MyPair", "[", 
+       RowBox[{"ek2vecCC", ",", "kvec3"}], "]"}]}], ",", 
+     "\[IndentingNewLine]", 
+     RowBox[{
+      RowBox[{"Pair", "[", 
+       RowBox[{
+        RowBox[{"e", "[", "2", "]"}], ",", 
+        RowBox[{"ec", "[", "4", "]"}]}], "]"}], "\[Rule]", 
+      RowBox[{"MyPair", "[", 
+       RowBox[{"ek2vec", ",", "ek4vecCC"}], "]"}]}], ",", 
+     "\[IndentingNewLine]", 
+     RowBox[{
+      RowBox[{"Pair", "[", 
+       RowBox[{
+        RowBox[{"ec", "[", "2", "]"}], ",", 
+        RowBox[{"e", "[", "4", "]"}]}], "]"}], "\[Rule]", 
+      RowBox[{"MyPair", "[", 
+       RowBox[{"ek2vecCC", ",", "ek4vec"}], "]"}]}], ",", 
+     "\[IndentingNewLine]", 
+     RowBox[{
+      RowBox[{"Pair", "[", 
+       RowBox[{
+        RowBox[{"e", "[", "2", "]"}], ",", 
+        RowBox[{"k", "[", "4", "]"}]}], "]"}], "\[Rule]", 
+      RowBox[{"MyPair", "[", 
+       RowBox[{"ek2vec", ",", "kvec4"}], "]"}]}], ",", "\[IndentingNewLine]", 
+     
+     RowBox[{
+      RowBox[{"Pair", "[", 
+       RowBox[{
+        RowBox[{"ec", "[", "2", "]"}], ",", 
+        RowBox[{"k", "[", "4", "]"}]}], "]"}], "\[Rule]", 
+      RowBox[{"MyPair", "[", 
+       RowBox[{"ek2vecCC", ",", "kvec4"}], "]"}]}], ",", 
+     "\[IndentingNewLine]", 
+     RowBox[{
+      RowBox[{"Pair", "[", 
+       RowBox[{
+        RowBox[{"e", "[", "2", "]"}], ",", " ", 
+        RowBox[{"ec", "[", "5", "]"}]}], "]"}], "\[Rule]", 
+      RowBox[{"MyPair", "[", 
+       RowBox[{"ek2vec", ",", "ek5vecCC"}], "]"}]}], ",", 
+     "\[IndentingNewLine]", 
+     RowBox[{
+      RowBox[{"Pair", "[", 
+       RowBox[{
+        RowBox[{"e", "[", "2", "]"}], ",", " ", 
+        RowBox[{"k", "[", "5", "]"}]}], "]"}], "->", 
+      RowBox[{"MyPair", "[", 
+       RowBox[{"ek2vec", ",", "kvec5"}], "]"}]}], ",", "\[IndentingNewLine]", 
+     
+     RowBox[{
+      RowBox[{"Pair", "[", 
+       RowBox[{
+        RowBox[{"e", "[", "4", "]"}], ",", 
+        RowBox[{"k", "[", "1", "]"}]}], "]"}], "\[Rule]", 
+      RowBox[{"MyPair", "[", 
+       RowBox[{"ek4vec", ",", "kvec1"}], "]"}]}], ",", "\[IndentingNewLine]", 
+     
+     RowBox[{
+      RowBox[{"Pair", "[", 
+       RowBox[{
+        RowBox[{"ec", "[", "4", "]"}], ",", 
+        RowBox[{"k", "[", "1", "]"}]}], "]"}], "\[Rule]", 
+      RowBox[{"MyPair", "[", 
+       RowBox[{"ek4vecCC", ",", "kvec1"}], "]"}]}], ",", 
+     "\[IndentingNewLine]", 
+     RowBox[{
+      RowBox[{"Pair", "[", 
+       RowBox[{
+        RowBox[{"e", "[", "4", "]"}], ",", 
+        RowBox[{"k", "[", "2", "]"}]}], "]"}], "\[Rule]", 
+      RowBox[{"MyPair", "[", 
+       RowBox[{"ek4vec", ",", "kvec2"}], "]"}]}], ",", "\[IndentingNewLine]", 
+     
+     RowBox[{
+      RowBox[{"Pair", "[", 
+       RowBox[{
+        RowBox[{"ec", "[", "4", "]"}], ",", 
+        RowBox[{"k", "[", "2", "]"}]}], "]"}], "\[Rule]", 
+      RowBox[{"MyPair", "[", 
+       RowBox[{"ek4vecCC", ",", "kvec2"}], "]"}]}], ",", 
+     "\[IndentingNewLine]", 
+     RowBox[{
+      RowBox[{"Pair", "[", 
+       RowBox[{
+        RowBox[{"e", "[", "4", "]"}], ",", 
+        RowBox[{"k", "[", "3", "]"}]}], "]"}], "\[Rule]", 
+      RowBox[{"MyPair", "[", 
+       RowBox[{"ek4vec", ",", "kvec3"}], "]"}]}], ",", "\[IndentingNewLine]", 
+     
+     RowBox[{
+      RowBox[{"Pair", "[", 
+       RowBox[{
+        RowBox[{"ec", "[", "4", "]"}], ",", 
+        RowBox[{"k", "[", "3", "]"}]}], "]"}], "\[Rule]", 
+      RowBox[{"MyPair", "[", 
+       RowBox[{"ek4vecCC", ",", "kvec3"}], "]"}]}], ",", 
+     "\[IndentingNewLine]", 
+     RowBox[{
+      RowBox[{"Pair", "[", 
+       RowBox[{
+        RowBox[{"ec", "[", "4", "]"}], ",", " ", 
+        RowBox[{"ec", "[", "5", "]"}]}], "]"}], "\[Rule]", 
+      RowBox[{"MyPair", "[", 
+       RowBox[{"ek4vecCC", ",", "ek5vecCC"}], "]"}]}], ",", 
+     "\[IndentingNewLine]", 
+     RowBox[{
+      RowBox[{"Pair", "[", 
+       RowBox[{
+        RowBox[{"ec", "[", "4", "]"}], ",", " ", 
+        RowBox[{"k", "[", "5", "]"}]}], "]"}], "\[Rule]", 
+      RowBox[{"MyPair", "[", 
+       RowBox[{"ek4vecCC", ",", "kvec5"}], "]"}]}], ",", 
+     "\[IndentingNewLine]", 
+     RowBox[{
+      RowBox[{"Pair", "[", 
+       RowBox[{
+        RowBox[{"ec", "[", "5", "]"}], ",", " ", 
+        RowBox[{"k", "[", "1", "]"}]}], "]"}], "\[Rule]", 
+      RowBox[{"MyPair", "[", 
+       RowBox[{"ek5vecCC", ",", "kvec1"}], "]"}]}], ",", 
+     "\[IndentingNewLine]", 
+     RowBox[{
+      RowBox[{"Pair", "[", 
+       RowBox[{
+        RowBox[{"ec", "[", "5", "]"}], ",", " ", 
+        RowBox[{"k", "[", "2", "]"}]}], "]"}], "\[Rule]", 
+      RowBox[{"MyPair", "[", 
+       RowBox[{"ek5vecCC", ",", "kvec2"}], "]"}]}], ",", 
+     "\[IndentingNewLine]", 
+     RowBox[{
+      RowBox[{"Pair", "[", 
+       RowBox[{
+        RowBox[{"ec", "[", "5", "]"}], ",", " ", 
+        RowBox[{"k", "[", "3", "]"}]}], "]"}], "\[Rule]", 
+      RowBox[{"MyPair", "[", 
+       RowBox[{"ek5vecCC", ",", "kvec3"}], "]"}]}], ",", 
+     "\[IndentingNewLine]", 
+     RowBox[{
+      RowBox[{"Pair", "[", 
+       RowBox[{
+        RowBox[{"ec", "[", "5", "]"}], ",", " ", 
+        RowBox[{"k", "[", "4", "]"}]}], "]"}], "\[Rule]", 
+      RowBox[{"MyPair", "[", 
+       RowBox[{"ek5vecCC", ",", "kvec4"}], "]"}]}]}], "\[IndentingNewLine]", 
+    "}"}]}], "\[IndentingNewLine]"}], "\[IndentingNewLine]"}], "Input",
+ CellChangeTimes->{{3.774349706695448*^9, 3.7743497828732653`*^9}, {
+   3.774349850953391*^9, 3.774349862059946*^9}, {3.774349926376834*^9, 
+   3.774349927398417*^9}, {3.7743502672838717`*^9, 3.77435028684074*^9}, {
+   3.7743505888923492`*^9, 3.7743506931950197`*^9}, 3.774698454292612*^9, {
+   3.775221130841752*^9, 3.775221291609036*^9}, {3.7752213259119787`*^9, 
+   3.775221638747273*^9}, {3.775221692692317*^9, 3.775221742566423*^9}, {
+   3.775221778064539*^9, 3.77522181254742*^9}, 3.775489820991585*^9, {
+   3.776437785777536*^9, 3.77643778747199*^9}},
+ CellLabel->"In[27]:=",ExpressionUUID->"0977815c-55b7-47b0-a967-05c8f45dc601"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Bseries", " ", "=", " ", 
+  RowBox[{"Normal", "[", 
+   RowBox[{"Series", "[", 
+    RowBox[{
+     RowBox[{"1", "/", 
+      RowBox[{"(", 
+       RowBox[{"1", "-", 
+        RowBox[{"\[Beta]", "^", "2"}]}], ")"}]}], ",", 
+     RowBox[{"{", 
+      RowBox[{"\[Beta]", ",", "0", ",", "4"}], "}"}]}], "]"}], 
+   "]"}]}]], "Input",
+ CellChangeTimes->{3.774698457392561*^9},
+ CellLabel->"In[59]:=",ExpressionUUID->"fb2e028f-6f3b-492a-bb4e-bea3e5c1534a"],
+
+Cell[BoxData[
+ RowBox[{"1", "+", 
+  SuperscriptBox["\[Beta]", "2"], "+", 
+  SuperscriptBox["\[Beta]", "4"]}]], "Output",
+ CellChangeTimes->{3.7746984576731167`*^9, 3.775221096010333*^9, 
+  3.775232186661045*^9, 3.7752322536715937`*^9, 3.775233918380353*^9, 
+  3.775486901052134*^9},
+ CellLabel->"Out[59]=",ExpressionUUID->"ab71d7ff-d1f5-4255-835e-f05816070c0f"]
+}, Open  ]],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(*", " ", 
+   RowBox[{
+   "Solve", " ", "for", " ", "kT4", " ", "using", " ", "energy", " ", 
+    "conservation"}], " ", "*)"}], "\[IndentingNewLine]", 
+  RowBox[{"(*", 
+   RowBox[{
+    RowBox[{"tl2", "=", 
+     RowBox[{
+      RowBox[{
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"(", 
+          RowBox[{"k3vec", "+", "k4vec", " ", "+", " ", "k5vec"}], ")"}], "//.",
+          "vecsubetaphi"}], ")"}], "/.", 
+       RowBox[{"{", 
+        RowBox[{
+         RowBox[{"\[Eta]3", "\[Rule]", " ", "0"}], ",", " ", 
+         RowBox[{"\[Eta]4", "\[Rule]", " ", "0"}]}], "}"}]}], "//", 
+      "Simplify"}]}], ";", "\[IndentingNewLine]", 
+    RowBox[{"kt4Sol", "=", 
+     RowBox[{
+      RowBox[{"Solve", "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"tl2", "[", 
+          RowBox[{"[", "1", "]"}], "]"}], " ", "==", " ", "rS"}], ",", 
+        "kT4"}], "]"}], "//", "Simplify"}]}], ";"}], "*)"}]}]], "Input",
+ CellChangeTimes->{{3.774011243517682*^9, 3.774011286981452*^9}, {
+   3.774011317682962*^9, 3.774011324591983*^9}, {3.774011409090329*^9, 
+   3.7740114556132603`*^9}, 3.7740125998758698`*^9, {3.774348796466803*^9, 
+   3.774348797308817*^9}, 
+   3.7754950318891277`*^9},ExpressionUUID->"fce22054-d858-451a-8e65-\
+81090d25d088"],
+
+Cell[BoxData[
+ RowBox[{"(*", 
+  RowBox[{"kT3Condition", "=", 
+   RowBox[{"Solve", "[", 
+    RowBox[{
+     RowBox[{
+      RowBox[{"kt4Sol", "[", 
+       RowBox[{"[", 
+        RowBox[{"1", ",", "1", ",", "2"}], "]"}], "]"}], ">", "0"}], ",", 
+     "kT3"}], "]"}]}], 
+  RowBox[{"(*", " ", 
+   RowBox[{"NEVER", " ", "ENDS"}], " ", "*)"}], "*)"}]], "Input",
+ CellChangeTimes->{{3.774012704301947*^9, 3.774012723451788*^9}, {
+   3.774012753630478*^9, 3.774012776494421*^9}, {3.774348715880101*^9, 
+   3.774348719902397*^9}, 
+   3.77435004614639*^9},ExpressionUUID->"1652bbc6-4ff3-4d2b-a987-\
+9b54bd7481f8"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(*", " ", 
+   RowBox[{
+    RowBox[{"Check", " ", "kinematics"}], ",", " ", 
+    RowBox[{
+     RowBox[{"input", " ", 
+      RowBox[{"is", ":", " ", 
+       RowBox[{"root", "-", "S"}]}]}], " ", "=", " ", "rrS"}], ",", " ", 
+    "kT3m", ",", " ", "\[Eta]3", ",", " ", "\[Phi]3", ",", " ", "\[Eta]4", 
+    ",", " ", "\[Phi]4", ",", " ", "mh"}], " ", "*)"}], "\[IndentingNewLine]", 
+  RowBox[{"(*", 
+   RowBox[{
+    RowBox[{
+     RowBox[{"checkKinematics", "[", 
+      RowBox[{
+      "rrS_", ",", "rkT3_", ",", "r\[Eta]3_", ",", "r\[Phi]3_", ",", 
+       "r\[Eta]4_", ",", "r\[Phi]4_", ",", "mh_"}], "]"}], ":=", 
+     RowBox[{"Block", "[", 
+      RowBox[{
+       RowBox[{"{", 
+        RowBox[{
+         RowBox[{"rkT4", "=", 
+          RowBox[{
+           RowBox[{"(", 
+            RowBox[{
+             RowBox[{
+              RowBox[{"-", "2"}], "*", 
+              RowBox[{"rkT3", "^", "2"}], "*", "rrS"}], "+", 
+             RowBox[{
+              RowBox[{"(", 
+               RowBox[{
+                RowBox[{"Sqrt", "[", 
+                 RowBox[{
+                  RowBox[{"rkT3", "^", "2"}], "+", 
+                  RowBox[{"mh", "^", "2"}]}], "]"}], "-", "rrS"}], ")"}], "*", 
+              RowBox[{"(", 
+               RowBox[{
+                RowBox[{"mh", "^", "2"}], "-", 
+                RowBox[{"rrS", "^", "2"}]}], ")"}]}], "+", 
+             RowBox[{"rkT3", "*", 
+              RowBox[{"(", 
+               RowBox[{
+                RowBox[{"mh", "^", "2"}], "+", 
+                RowBox[{"rrS", "*", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{
+                    RowBox[{"-", "2"}], "*", 
+                    RowBox[{"Sqrt", "[", 
+                    RowBox[{
+                    RowBox[{"rkT3", "^", "2"}], "+", 
+                    RowBox[{"mh", "^", "2"}]}], "]"}]}], "+", "rrS"}], 
+                  ")"}]}]}], ")"}], "*", 
+              RowBox[{"Cos", "[", 
+               RowBox[{"r\[Phi]3", "-", "r\[Phi]4"}], "]"}]}]}], ")"}], "/", 
+           RowBox[{"(", 
+            RowBox[{
+             RowBox[{"-", 
+              RowBox[{"rkT3", "^", "2"}]}], "-", 
+             RowBox[{"2", "*", 
+              RowBox[{"mh", "^", "2"}]}], "+", 
+             RowBox[{"2", "*", 
+              RowBox[{"rrS", "^", "2"}]}], "+", 
+             RowBox[{
+              RowBox[{"rkT3", "^", "2"}], "*", 
+              RowBox[{"Cos", "[", 
+               RowBox[{
+                RowBox[{"2", "*", "r\[Phi]3"}], "-", 
+                RowBox[{"2", "*", "r\[Phi]4"}]}], "]"}]}], "+", 
+             RowBox[{"4", "*", "rkT3", "*", "rrS", "*", 
+              RowBox[{"Cos", "[", 
+               RowBox[{"r\[Phi]3", "-", "r\[Phi]4"}], "]"}]}]}], ")"}]}]}], 
+         ",", 
+         RowBox[{"mh2", "=", 
+          RowBox[{"mh", "^", "2"}]}], ",", 
+         RowBox[{"(*", 
+          RowBox[{
+           RowBox[{"p4x", "=", 
+            RowBox[{"p4vec3", "[", 
+             RowBox[{"[", "1", "]"}], "]"}]}], ",", 
+           RowBox[{"p4y", "=", 
+            RowBox[{"p4vec3", "[", 
+             RowBox[{"[", "2", "]"}], "]"}]}], ",", 
+           RowBox[{"p4z", "=", 
+            RowBox[{"p4vec3", "[", 
+             RowBox[{"[", "3", "]"}], "]"}]}], ",", "\[IndentingNewLine]", 
+           RowBox[{"p5x", "=", 
+            RowBox[{"p5vec3", "[", 
+             RowBox[{"[", "1", "]"}], "]"}]}], ",", 
+           RowBox[{"p5y", "=", 
+            RowBox[{"p5vec3", "[", 
+             RowBox[{"[", "2", "]"}], "]"}]}], ",", 
+           RowBox[{"p5z", "=", 
+            RowBox[{"p5vec3", "[", 
+             RowBox[{"[", "3", "]"}], "]"}]}], ",", "\[IndentingNewLine]", 
+           RowBox[{"E4", "=", 
+            RowBox[{"mf3", "[", "p4vec3", "]"}]}], ",", 
+           RowBox[{"E5", "=", 
+            RowBox[{"mf3", "[", "p5vec3", "]"}]}], ",", 
+           RowBox[{"E3", "=", 
+            RowBox[{"Sqrt", "[", 
+             RowBox[{
+              RowBox[{"MH", "^", "2"}], "+", 
+              RowBox[{
+               RowBox[{"mf3", "[", 
+                RowBox[{"p4vec3", "+", "p5vec3"}], "]"}], "^", "2"}]}], 
+             "]"}]}], ","}], "*)"}], "\[IndentingNewLine]", 
+         RowBox[{"SS", "=", 
+          RowBox[{
+           RowBox[{"MyPair", "[", 
+            RowBox[{
+             RowBox[{"k1vec", "+", "k2vec"}], ",", 
+             RowBox[{"k1vec", "+", "k2vec"}]}], "]"}], "/.", 
+           "vecsubetaphi"}]}], ",", "\[IndentingNewLine]", 
+         RowBox[{"TT", "=", 
+          RowBox[{
+           RowBox[{"MyPair", "[", 
+            RowBox[{
+             RowBox[{"k1vec", "-", "k3vec"}], ",", 
+             RowBox[{"k1vec", "-", "k3vec"}]}], "]"}], "/.", 
+           "vecsubetaphi"}]}], ",", "\[IndentingNewLine]", 
+         RowBox[{"UU", "=", 
+          RowBox[{
+           RowBox[{"MyPair", "[", 
+            RowBox[{
+             RowBox[{"k2vec", "-", "k3vec"}], ",", 
+             RowBox[{"k2vec", "-", "k3vec"}]}], "]"}], "/.", 
+           "vecsubetaphi"}]}], ",", "\[IndentingNewLine]", 
+         RowBox[{"TT14", "=", 
+          RowBox[{
+           RowBox[{"MyPair", "[", 
+            RowBox[{
+             RowBox[{"k1vec", "-", "k4vec"}], ",", 
+             RowBox[{"k1vec", "-", "k4vec"}]}], "]"}], "/.", 
+           "vecsubetaphi"}]}], ",", "\[IndentingNewLine]", 
+         RowBox[{"TT24", "=", 
+          RowBox[{
+           RowBox[{"MyPair", "[", 
+            RowBox[{
+             RowBox[{"k2vec", "-", "k4vec"}], ",", 
+             RowBox[{"k2vec", "-", "k4vec"}]}], "]"}], "/.", 
+           "vecsubetaphi"}]}], ",", "\[IndentingNewLine]", 
+         RowBox[{"(*", 
+          RowBox[{
+           RowBox[{"TT15", "=", 
+            RowBox[{"MyPair", "[", 
+             RowBox[{
+              RowBox[{"k1vec", "-", "k5vec"}], ",", 
+              RowBox[{"k1vec", "-", "k5vec"}]}], "]"}]}], ",", 
+           "\[IndentingNewLine]", 
+           RowBox[{"TT25", "=", 
+            RowBox[{"MyPair", "[", 
+             RowBox[{
+              RowBox[{"k2vec", "-", "k5vec"}], ",", 
+              RowBox[{"k2vec", "-", "k5vec"}]}], "]"}]}], ","}], "*)"}], 
+         "\[IndentingNewLine]", 
+         RowBox[{"SS34", "=", 
+          RowBox[{
+           RowBox[{"MyPair", "[", 
+            RowBox[{
+             RowBox[{"k3vec", "+", "k4vec"}], ",", 
+             RowBox[{"k3vec", "+", "k4vec"}]}], "]"}], "/.", 
+           "vecsubetaphi"}]}], ",", "\[IndentingNewLine]", "rl1", ",", "rl1a",
+          ",", "rl2", ",", 
+         RowBox[{"sqmetemp", "=", "0"}], ",", 
+         RowBox[{"p1v", "=", "k1vec"}], ",", 
+         RowBox[{"p2v", "=", "k2vec"}], ",", 
+         RowBox[{"p3v", "=", "k3vec"}], ",", 
+         RowBox[{"p4v", "=", "k4vec"}], ",", 
+         RowBox[{"p5v", "=", "k5vec"}], ",", "sexpr", ",", "abbr"}], "}"}], 
+       ",", "\[IndentingNewLine]", 
+       RowBox[{"(*", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"**", "**"}], "**"}], "**"}], "******)"}], 
+       "\[IndentingNewLine]", 
+       RowBox[{
+        RowBox[{"Print", "[", 
+         RowBox[{"\"\<kT3_max = \>\"", ",", " ", 
+          RowBox[{"(", 
+           RowBox[{"kT3condition", "/.", 
+            RowBox[{"{", 
+             RowBox[{
+              RowBox[{"rS", "\[Rule]", " ", "rrS"}], ",", 
+              RowBox[{"MH", "\[Rule]", " ", "mh"}]}], "}"}]}], ")"}], ",", 
+          "\"\<\\n\>\""}], "]"}], ";", "\[IndentingNewLine]", 
+        RowBox[{"If", " ", "[", 
+         RowBox[{
+          RowBox[{"rkT3", ">", " ", 
+           RowBox[{"(", 
+            RowBox[{"kT3", "/.", 
+             RowBox[{"(", 
+              RowBox[{"kT3condition", "/.", 
+               RowBox[{"{", 
+                RowBox[{
+                 RowBox[{"rS", "\[Rule]", " ", "rrS"}], ",", 
+                 RowBox[{"MH", "\[Rule]", " ", "mh"}]}], "}"}]}], ")"}]}], 
+            ")"}]}], ",", 
+          RowBox[{
+          "Print", "[", " ", 
+           "\"\<UNPHYSICAL kT3. kT3 should be less than kT3_max!!!\>\"", 
+           "]"}]}], "]"}], ";", "\[IndentingNewLine]", 
+        RowBox[{"If", "[", 
+         RowBox[{
+          RowBox[{"rkT4", "<", "0"}], ",", 
+          RowBox[{
+          "Print", "[", "\"\<UNPHYSICAL kT4, kT4 should be positive!!!\>\"", 
+           "]"}]}], "]"}], ";", "\[IndentingNewLine]", 
+        RowBox[{"rl1", "=", 
+         RowBox[{"{", 
+          RowBox[{
+           RowBox[{"rS", "\[Rule]", " ", "rrS"}], ",", 
+           RowBox[{"kT3", "\[Rule]", " ", "rkT3"}], ",", 
+           RowBox[{"kT4", "\[Rule]", "rkT4"}], ",", 
+           RowBox[{"\[Eta]4", "\[Rule]", " ", "r\[Eta]4"}], ",", 
+           RowBox[{"\[Eta]3", "\[Rule]", "r\[Eta]3"}], ",", 
+           RowBox[{"\[Phi]3", "\[Rule]", " ", "r\[Phi]3"}], ",", 
+           RowBox[{"\[Phi]4", "\[Rule]", " ", "r\[Phi]4"}], ",", 
+           RowBox[{"MH2", "\[Rule]", " ", 
+            RowBox[{"mh", "^", "2"}]}], ",", 
+           RowBox[{"MH", "\[Rule]", " ", "mh"}]}], "}"}]}], ";", 
+        "\[IndentingNewLine]", 
+        RowBox[{"p1v", "=", 
+         RowBox[{
+          RowBox[{"p1v", "/.", "vecsubetaphi"}], "//.", "rl1"}]}], ";", 
+        "\[IndentingNewLine]", 
+        RowBox[{"p2v", "=", 
+         RowBox[{
+          RowBox[{"p2v", "/.", "vecsubetaphi"}], "//.", "rl1"}]}], ";", 
+        "\[IndentingNewLine]", 
+        RowBox[{"p3v", "=", 
+         RowBox[{
+          RowBox[{"p3v", "/.", "vecsubetaphi"}], "//.", "rl1"}]}], ";", 
+        "\[IndentingNewLine]", 
+        RowBox[{"p4v", "=", 
+         RowBox[{
+          RowBox[{"p4v", "/.", "vecsubetaphi"}], "//.", "rl1"}]}], ";", 
+        "\[IndentingNewLine]", 
+        RowBox[{"p5v", "=", 
+         RowBox[{
+          RowBox[{"p5v", "/.", "vecsubetaphi"}], "//.", "rl1"}]}], ";", 
+        "\[IndentingNewLine]", 
+        RowBox[{"Print", "[", 
+         RowBox[{"\"\<Four Momenta : \\n\>\"", ",", 
+          RowBox[{"MatrixForm", "[", 
+           RowBox[{
+            RowBox[{"{", 
+             RowBox[{
+              RowBox[{"p1", "\[Rule]", " ", "p1v"}], ",", 
+              RowBox[{"p2", "\[Rule]", " ", "p2v"}], ",", 
+              RowBox[{"p3", "\[Rule]", " ", "p3v"}], ",", 
+              RowBox[{"p4", "\[Rule]", " ", "p4v"}], ",", 
+              RowBox[{"p5", "\[Rule]", " ", "p5v"}]}], "}"}], "//", "N"}], 
+           "]"}], ",", "\"\<\\n\>\""}], "]"}], ";", "\[IndentingNewLine]", 
+        RowBox[{"Print", "[", 
+         RowBox[{
+         "\"\<Check 4 momentum conservation: p3+p4+p5 -p1 -p2 =0 :  \>\"", 
+          ",", " ", 
+          RowBox[{
+          "p3v", " ", "+", " ", "p4v", " ", "+", "p5v", "  ", "-", "p1v", " ",
+            "-", "p2v"}]}], "]"}], ";", "\[IndentingNewLine]", 
+        RowBox[{"If", "[", 
+         RowBox[{
+          RowBox[{
+           RowBox[{"Abs", "[", 
+            RowBox[{"Total", "[", 
+             RowBox[{
+             "p3v", " ", "+", " ", "p4v", " ", "+", "p5v", "  ", "-", "p1v", 
+              " ", "-", "p2v"}], " ", "]"}], "]"}], ">", 
+           RowBox[{"10", "^", 
+            RowBox[{"-", "10"}]}]}], ",", 
+          RowBox[{
+          "Print", "[", 
+           "\"\<Energy-Momentum NOT CONSERVED !!!, TRY AGAIN.\>\"", "]"}], 
+          ",", " ", 
+          RowBox[{
+          "Print", "[", "\"\<MOMENTUM IS CONSERVED, ALL IS WELL!\>\"", 
+           "]"}]}], "]"}], ";", "\[IndentingNewLine]", 
+        RowBox[{"rl2", " ", "=", " ", 
+         RowBox[{"{", 
+          RowBox[{
+           RowBox[{"S", "\[Rule]", " ", "SS"}], ",", 
+           RowBox[{"T", "\[Rule]", " ", "TT"}], ",", 
+           RowBox[{"U", "\[Rule]", " ", "UU"}], ",", 
+           RowBox[{"T24", "\[Rule]", " ", "TT24"}], ",", 
+           RowBox[{"T14", "\[Rule]", " ", "TT14"}], ",", 
+           RowBox[{"S34", "\[Rule]", " ", "SS34"}], ",", " ", 
+           RowBox[{
+            RowBox[{"Sqrt", "[", "S", "]"}], "\[Rule]", " ", 
+            RowBox[{"Sqrt", "[", "SS", "]"}]}], ",", 
+           RowBox[{
+            RowBox[{"Sqrt", "[", "S34", "]"}], "\[Rule]", " ", 
+            RowBox[{"Sqrt", "[", "SS34", "]"}]}], ",", 
+           RowBox[{
+            RowBox[{"Tan", "[", "\[Phi]5", "]"}], "\[Rule]", " ", 
+            RowBox[{
+             RowBox[{"p5v", "[", 
+              RowBox[{"[", "2", "]"}], "]"}], "/", 
+             RowBox[{"p5v", "[", 
+              RowBox[{"[", "3", "]"}], "]"}]}]}], ",", 
+           RowBox[{"kT5", "\[Rule]", " ", 
+            RowBox[{"Sqrt", "[", 
+             RowBox[{
+              RowBox[{
+               RowBox[{"p5v", "[", 
+                RowBox[{"[", "2", "]"}], "]"}], "^", "2"}], " ", "+", 
+              RowBox[{
+               RowBox[{"p5v", "[", 
+                RowBox[{"[", "3", "]"}], "]"}], "^", "2"}]}], "]"}]}]}], 
+          "}"}]}], ";", " ", 
+        RowBox[{"rl2", "/.", "rl1"}]}]}], "]"}]}], ";"}], "*)"}]}]], "Input",
+ CellChangeTimes->{{3.774012943123294*^9, 3.774013017190256*^9}, 
+   3.7754950381133223`*^9},ExpressionUUID->"ab581e1f-c5c9-4f7d-9a00-\
+c83f2a5d582b"],
+
+Cell[BoxData[{
+ RowBox[{
+  RowBox[{"kT3condition", " ", "=", " ", 
+   RowBox[{"{", 
+    RowBox[{"kT3", "\[Rule]", 
+     RowBox[{
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"-", 
+         RowBox[{"MH", "^", "2"}]}], "+", 
+        RowBox[{"rS", "^", "2"}]}], ")"}], "/", 
+      RowBox[{"(", 
+       RowBox[{"2", "*", "rS"}], ")"}]}]}], "}"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"sprec", "=", "60"}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{
+   RowBox[{
+    RowBox[{"testOutputPS", "[", 
+     RowBox[{
+     "rrS_", ",", "rkT3_", ",", "r\[Eta]3_", ",", "r\[Phi]3_", ",", 
+      "r\[Eta]4_", ",", "r\[Phi]4_", ",", "mh_"}], "]"}], ":=", 
+    RowBox[{"Block", "[", 
+     RowBox[{
+      RowBox[{"{", 
+       RowBox[{"rkT4", "=", 
+        RowBox[{"SetPrecision", "[", 
+         RowBox[{
+          RowBox[{
+           RowBox[{"(", 
+            RowBox[{
+             RowBox[{"-", 
+              RowBox[{"mh", "^", "2"}]}], "-", 
+             RowBox[{"rrS", "^", "2"}], "+", 
+             RowBox[{
+              RowBox[{"Sqrt", "[", "2", "]"}], "*", "rrS", "*", 
+              RowBox[{"Sqrt", "[", 
+               RowBox[{
+                RowBox[{"2", "*", 
+                 RowBox[{"mh", "^", "2"}]}], "+", 
+                RowBox[{"rkT3", "^", "2"}], "+", 
+                RowBox[{
+                 RowBox[{"rkT3", "^", "2"}], "*", 
+                 RowBox[{"Cosh", "[", 
+                  RowBox[{"2", "*", "r\[Eta]3"}], "]"}]}]}], "]"}]}]}], ")"}],
+            "/", 
+           RowBox[{"(", 
+            RowBox[{
+             RowBox[{
+              RowBox[{"-", "2"}], "*", "rkT3", "*", 
+              RowBox[{"Cos", "[", 
+               RowBox[{"r\[Phi]3", "-", "r\[Phi]4"}], "]"}]}], "-", 
+             RowBox[{"2", "*", "rrS", "*", 
+              RowBox[{"Cosh", "[", "r\[Eta]4", "]"}]}], "+", 
+             RowBox[{
+              RowBox[{"Sqrt", "[", "2", "]"}], "*", 
+              RowBox[{"Sqrt", "[", 
+               RowBox[{
+                RowBox[{"2", "*", 
+                 RowBox[{"mh", "^", "2"}]}], "+", 
+                RowBox[{"rkT3", "^", "2"}], "+", 
+                RowBox[{
+                 RowBox[{"rkT3", "^", "2"}], "*", 
+                 RowBox[{"Cosh", "[", 
+                  RowBox[{"2", "*", "r\[Eta]3"}], "]"}]}]}], "]"}], "*", 
+              RowBox[{"Cosh", "[", "r\[Eta]4", "]"}]}], "-", 
+             RowBox[{"2", "*", "rkT3", "*", 
+              RowBox[{"Sinh", "[", "r\[Eta]3", "]"}], "*", 
+              RowBox[{"Sinh", "[", "r\[Eta]4", "]"}]}]}], ")"}]}], ",", 
+          "sprec"}], "]"}]}], "}"}], ",", "rkT4"}], "]"}]}], ";"}], 
+  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"OutputPS", "[", 
+   RowBox[{
+   "rrS_", ",", "rkT3_", ",", "r\[Eta]3_", ",", "r\[Phi]3_", ",", "r\[Eta]4_",
+     ",", "r\[Phi]4_", ",", "mh_"}], "]"}], ":=", 
+  RowBox[{"Block", "[", 
+   RowBox[{
+    RowBox[{"{", 
+     RowBox[{
+      RowBox[{"rkT4", "=", 
+       RowBox[{"SetPrecision", "[", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"mh", "^", "2"}], "+", 
+            RowBox[{"rrS", "*", 
+             RowBox[{"(", 
+              RowBox[{"rrS", "-", 
+               RowBox[{
+                RowBox[{"Sqrt", "[", "2", "]"}], "*", 
+                RowBox[{"Sqrt", "[", 
+                 RowBox[{
+                  RowBox[{"2", "*", 
+                   RowBox[{"mh", "^", "2"}]}], "+", 
+                  RowBox[{"rkT3", "^", "2"}], "+", 
+                  RowBox[{
+                   RowBox[{"rkT3", "^", "2"}], "*", 
+                   RowBox[{"Cosh", "[", 
+                    RowBox[{"2", "*", "r\[Eta]3"}], "]"}]}]}], "]"}]}]}], 
+              ")"}]}]}], ")"}], "/", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"2", "*", "rrS"}], "-", 
+               RowBox[{
+                RowBox[{"Sqrt", "[", "2", "]"}], "*", 
+                RowBox[{"Sqrt", "[", 
+                 RowBox[{
+                  RowBox[{"2", "*", 
+                   RowBox[{"mh", "^", "2"}]}], "+", 
+                  RowBox[{"rkT3", "^", "2"}], "+", 
+                  RowBox[{
+                   RowBox[{"rkT3", "^", "2"}], "*", 
+                   RowBox[{"Cosh", "[", 
+                    RowBox[{"2", "*", "r\[Eta]3"}], "]"}]}]}], "]"}]}]}], 
+              ")"}], "*", 
+             RowBox[{"Cosh", "[", "r\[Eta]4", "]"}]}], "+", 
+            RowBox[{"2", "*", "rkT3", "*", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"Cos", "[", 
+                RowBox[{"r\[Phi]3", "-", "r\[Phi]4"}], "]"}], "+", 
+               RowBox[{
+                RowBox[{"Sinh", "[", "r\[Eta]3", "]"}], "*", 
+                RowBox[{"Sinh", "[", "r\[Eta]4", "]"}]}]}], ")"}]}]}], 
+           ")"}]}], ",", "sprec"}], "]"}]}], 
+      RowBox[{"(*", 
+       RowBox[{"SetPrecision", "[", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"-", "2"}], "*", 
+             RowBox[{"rkT3", "^", "2"}], "*", "rrS"}], "+", 
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"Sqrt", "[", 
+                RowBox[{
+                 RowBox[{"rkT3", "^", "2"}], "+", 
+                 RowBox[{"mh", "^", "2"}]}], "]"}], "-", "rrS"}], ")"}], "*", 
+             
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"mh", "^", "2"}], "-", 
+               RowBox[{"rrS", "^", "2"}]}], ")"}]}], "+", 
+            RowBox[{"rkT3", "*", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"mh", "^", "2"}], "+", 
+               RowBox[{"rrS", "*", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"-", "2"}], "*", 
+                   RowBox[{"Sqrt", "[", 
+                    RowBox[{
+                    RowBox[{"rkT3", "^", "2"}], "+", 
+                    RowBox[{"mh", "^", "2"}]}], "]"}]}], "+", "rrS"}], 
+                 ")"}]}]}], ")"}], "*", 
+             RowBox[{"Cos", "[", 
+              RowBox[{"r\[Phi]3", "-", "r\[Phi]4"}], "]"}]}]}], ")"}], "/", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"-", 
+             RowBox[{"rkT3", "^", "2"}]}], "-", 
+            RowBox[{"2", "*", 
+             RowBox[{"mh", "^", "2"}]}], "+", 
+            RowBox[{"2", "*", 
+             RowBox[{"rrS", "^", "2"}]}], "+", 
+            RowBox[{
+             RowBox[{"rkT3", "^", "2"}], "*", 
+             RowBox[{"Cos", "[", 
+              RowBox[{
+               RowBox[{"2", "*", "r\[Phi]3"}], "-", 
+               RowBox[{"2", "*", "r\[Phi]4"}]}], "]"}]}], "+", 
+            RowBox[{"4", "*", "rkT3", "*", "rrS", "*", 
+             RowBox[{"Cos", "[", 
+              RowBox[{"r\[Phi]3", "-", "r\[Phi]4"}], "]"}]}]}], ")"}]}], ",", 
+         "sprec"}], "]"}], "*)"}], ",", 
+      RowBox[{"mh2", "=", 
+       RowBox[{"SetPrecision", "[", 
+        RowBox[{
+         RowBox[{"mh", "^", "2"}], ",", "sprec"}], "]"}]}], ",", 
+      RowBox[{"(*", 
+       RowBox[{
+        RowBox[{"p4x", "=", 
+         RowBox[{"p4vec3", "[", 
+          RowBox[{"[", "1", "]"}], "]"}]}], ",", 
+        RowBox[{"p4y", "=", 
+         RowBox[{"p4vec3", "[", 
+          RowBox[{"[", "2", "]"}], "]"}]}], ",", 
+        RowBox[{"p4z", "=", 
+         RowBox[{"p4vec3", "[", 
+          RowBox[{"[", "3", "]"}], "]"}]}], ",", "\[IndentingNewLine]", 
+        RowBox[{"p5x", "=", 
+         RowBox[{"p5vec3", "[", 
+          RowBox[{"[", "1", "]"}], "]"}]}], ",", 
+        RowBox[{"p5y", "=", 
+         RowBox[{"p5vec3", "[", 
+          RowBox[{"[", "2", "]"}], "]"}]}], ",", 
+        RowBox[{"p5z", "=", 
+         RowBox[{"p5vec3", "[", 
+          RowBox[{"[", "3", "]"}], "]"}]}], ",", "\[IndentingNewLine]", 
+        RowBox[{"E4", "=", 
+         RowBox[{"mf3", "[", "p4vec3", "]"}]}], ",", 
+        RowBox[{"E5", "=", 
+         RowBox[{"mf3", "[", "p5vec3", "]"}]}], ",", 
+        RowBox[{"E3", "=", 
+         RowBox[{"Sqrt", "[", 
+          RowBox[{
+           RowBox[{"MH", "^", "2"}], "+", 
+           RowBox[{
+            RowBox[{"mf3", "[", 
+             RowBox[{"p4vec3", "+", "p5vec3"}], "]"}], "^", "2"}]}], "]"}]}], 
+        ","}], "*)"}], "\[IndentingNewLine]", 
+      RowBox[{"SS", "=", 
+       RowBox[{"SetPrecision", "[", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"MyPair", "[", 
+           RowBox[{
+            RowBox[{"k1vec", "+", "k2vec"}], ",", 
+            RowBox[{"k1vec", "+", "k2vec"}]}], "]"}], "/.", "vecsubetaphi"}], 
+         ",", "sprec"}], "]"}]}], ",", 
+      RowBox[{"TT", "=", 
+       RowBox[{"SetPrecision", "[", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"MyPair", "[", 
+           RowBox[{
+            RowBox[{"k1vec", "-", "k3vec"}], ",", 
+            RowBox[{"k1vec", "-", "k3vec"}]}], "]"}], "/.", "vecsubetaphi"}], 
+         ",", "sprec"}], "]"}]}], ",", 
+      RowBox[{"UU", "=", 
+       RowBox[{"SetPrecision", "[", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"MyPair", "[", 
+           RowBox[{
+            RowBox[{"k2vec", "-", "k3vec"}], ",", 
+            RowBox[{"k2vec", "-", "k3vec"}]}], "]"}], "/.", "vecsubetaphi"}], 
+         ",", "sprec"}], "]"}]}], ",", "\[IndentingNewLine]", 
+      RowBox[{"TT14", "=", 
+       RowBox[{"SetPrecision", "[", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"MyPair", "[", 
+           RowBox[{
+            RowBox[{"k1vec", "-", "k4vec"}], ",", 
+            RowBox[{"k1vec", "-", "k4vec"}]}], "]"}], "/.", "vecsubetaphi"}], 
+         ",", "sprec"}], "]"}]}], ",", "\[IndentingNewLine]", 
+      RowBox[{"TT24", "=", 
+       RowBox[{"SetPrecision", "[", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"MyPair", "[", 
+           RowBox[{
+            RowBox[{"k2vec", "-", "k4vec"}], ",", 
+            RowBox[{"k2vec", "-", "k4vec"}]}], "]"}], "/.", "vecsubetaphi"}], 
+         ",", "sprec"}], "]"}]}], ",", "\[IndentingNewLine]", 
+      RowBox[{"(*", 
+       RowBox[{
+        RowBox[{"TT15", "=", 
+         RowBox[{"MyPair", "[", 
+          RowBox[{
+           RowBox[{"k1vec", "-", "k5vec"}], ",", 
+           RowBox[{"k1vec", "-", "k5vec"}]}], "]"}]}], ",", 
+        "\[IndentingNewLine]", 
+        RowBox[{"TT25", "=", 
+         RowBox[{"MyPair", "[", 
+          RowBox[{
+           RowBox[{"k2vec", "-", "k5vec"}], ",", 
+           RowBox[{"k2vec", "-", "k5vec"}]}], "]"}]}], ","}], "*)"}], 
+      "\[IndentingNewLine]", 
+      RowBox[{"SS34", "=", 
+       RowBox[{"SetPrecision", "[", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"MyPair", "[", 
+           RowBox[{
+            RowBox[{"k3vec", "+", "k4vec"}], ",", 
+            RowBox[{"k3vec", "+", "k4vec"}]}], "]"}], "/.", "vecsubetaphi"}], 
+         ",", "sprec"}], "]"}]}], ",", "\[IndentingNewLine]", 
+      RowBox[{"SS35", "=", 
+       RowBox[{"SetPrecision", "[", 
+        RowBox[{
+         RowBox[{
+          RowBox[{"MyPair", "[", 
+           RowBox[{
+            RowBox[{"k3vec", "+", "k5vec"}], ",", 
+            RowBox[{"k3vec", "+", "k5vec"}]}], "]"}], "/.", "vecsubetaphi"}], 
+         ",", "sprec"}], "]"}]}], ",", "\[IndentingNewLine]", "rl1", ",", 
+      "rl1a", ",", "rl2", ",", "rl3", ",", 
+      RowBox[{"sqmetemp", "=", 
+       RowBox[{"SetPrecision", "[", 
+        RowBox[{"0", ",", "sprec"}], "]"}]}], ",", 
+      RowBox[{"p1v", "=", 
+       RowBox[{"SetPrecision", "[", 
+        RowBox[{"k1vec", ",", "sprec"}], "]"}]}], ",", 
+      RowBox[{"p2v", "=", 
+       RowBox[{"SetPrecision", "[", 
+        RowBox[{"k2vec", ",", "sprec"}], "]"}]}], ",", 
+      RowBox[{"p3v", "=", 
+       RowBox[{"SetPrecision", "[", 
+        RowBox[{"k3vec", ",", "sprec"}], "]"}]}], ",", 
+      RowBox[{"p4v", "=", 
+       RowBox[{"SetPrecision", "[", 
+        RowBox[{"k4vec", ",", "sprec"}], "]"}]}], ",", 
+      RowBox[{"p5v", "=", 
+       RowBox[{"SetPrecision", "[", 
+        RowBox[{"k5vec", ",", "sprec"}], "]"}]}], ",", "sexpr", ",", "abbr", 
+      ",", "ll1", ",", "ll2"}], "}"}], ",", "\[IndentingNewLine]", 
+    RowBox[{"(*", 
+     RowBox[{
+      RowBox[{
+       RowBox[{"**", "**"}], "**"}], "**"}], "******)"}], 
+    "\[IndentingNewLine]", 
+    RowBox[{
+     RowBox[{"Print", "[", 
+      RowBox[{"\"\<kT3_max = \>\"", ",", " ", 
+       RowBox[{"(", 
+        RowBox[{"kT3condition", "/.", 
+         RowBox[{"{", 
+          RowBox[{
+           RowBox[{"rS", "\[Rule]", " ", "rrS"}], ",", 
+           RowBox[{"MH", "\[Rule]", " ", "mh"}]}], "}"}]}], ")"}], ",", 
+       "\"\<\\n\>\""}], "]"}], ";", "\[IndentingNewLine]", 
+     RowBox[{"If", " ", "[", 
+      RowBox[{
+       RowBox[{"rkT3", ">", " ", 
+        RowBox[{"(", 
+         RowBox[{"kT3", "/.", 
+          RowBox[{"(", 
+           RowBox[{"kT3condition", "/.", 
+            RowBox[{"{", 
+             RowBox[{
+              RowBox[{"rS", "\[Rule]", " ", "rrS"}], ",", 
+              RowBox[{"MH", "\[Rule]", " ", "mh"}]}], "}"}]}], ")"}]}], 
+         ")"}]}], ",", 
+       RowBox[{
+       "Print", "[", " ", 
+        "\"\<UNPHYSICAL kT3. kT3 should be less than kT3_max!!!\>\"", "]"}]}],
+       "]"}], ";", "\[IndentingNewLine]", 
+     RowBox[{"If", "[", 
+      RowBox[{
+       RowBox[{"rkT4", "<", "0"}], ",", 
+       RowBox[{
+       "Print", "[", "\"\<UNPHYSICAL kT4, kT4 should be positive!!!\>\"", 
+        "]"}]}], "]"}], ";", "\[IndentingNewLine]", 
+     RowBox[{"rl1", "=", 
+      RowBox[{"SetPrecision", "[", 
+       RowBox[{
+        RowBox[{"{", 
+         RowBox[{
+          RowBox[{"rS", "\[Rule]", " ", "rrS"}], ",", 
+          RowBox[{"kT3", "\[Rule]", " ", "rkT3"}], ",", 
+          RowBox[{"kT4", "\[Rule]", "rkT4"}], ",", 
+          RowBox[{"\[Eta]4", "\[Rule]", " ", "r\[Eta]4"}], ",", 
+          RowBox[{"\[Eta]3", "\[Rule]", "r\[Eta]3"}], ",", 
+          RowBox[{"\[Phi]3", "\[Rule]", " ", "r\[Phi]3"}], ",", 
+          RowBox[{"\[Phi]4", "\[Rule]", " ", "r\[Phi]4"}], ",", 
+          RowBox[{"MH2", "\[Rule]", " ", 
+           RowBox[{"mh", "^", "2"}]}], ",", 
+          RowBox[{"MH", "\[Rule]", " ", "mh"}]}], "}"}], ",", "sprec"}], 
+       "]"}]}], ";", "\[IndentingNewLine]", 
+     RowBox[{"p1v", "=", 
+      RowBox[{"SetPrecision", "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"p1v", "/.", "vecsubetaphi"}], "//.", "rl1"}], ",", 
+        "sprec"}], "]"}]}], ";", "\[IndentingNewLine]", 
+     RowBox[{"p2v", "=", 
+      RowBox[{"SetPrecision", "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"p2v", "/.", "vecsubetaphi"}], "//.", "rl1"}], ",", 
+        "sprec"}], "]"}]}], ";", "\[IndentingNewLine]", 
+     RowBox[{"p3v", "=", 
+      RowBox[{"SetPrecision", "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"p3v", "/.", "vecsubetaphi"}], "//.", "rl1"}], ",", 
+        "sprec"}], "]"}]}], ";", "\[IndentingNewLine]", 
+     RowBox[{"p4v", "=", 
+      RowBox[{"SetPrecision", "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"p4v", "/.", "vecsubetaphi"}], "//.", "rl1"}], ",", 
+        "sprec"}], "]"}]}], ";", "\[IndentingNewLine]", 
+     RowBox[{"p5v", "=", 
+      RowBox[{"SetPrecision", "[", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"p5v", "/.", "vecsubetaphi"}], "//.", "rl1"}], ",", 
+        "sprec"}], "]"}]}], ";", "\[IndentingNewLine]", 
+     RowBox[{"Print", "[", 
+      RowBox[{"\"\<Four Momenta : \\n\>\"", ",", 
+       RowBox[{"MatrixForm", "[", 
+        RowBox[{
+         RowBox[{"{", 
+          RowBox[{
+           RowBox[{"p1", "\[Rule]", " ", "p1v"}], ",", 
+           RowBox[{"p2", "\[Rule]", " ", "p2v"}], ",", 
+           RowBox[{"p3", "\[Rule]", " ", "p3v"}], ",", 
+           RowBox[{"p4", "\[Rule]", " ", "p4v"}], ",", 
+           RowBox[{"p5", "\[Rule]", " ", "p5v"}]}], "}"}], "//", "N"}], "]"}],
+        ",", "\"\<\\n\>\""}], "]"}], ";", "\[IndentingNewLine]", 
+     "\[IndentingNewLine]", 
+     RowBox[{"Print", "[", 
+      RowBox[{
+      "\"\<Check 4 momentum conservation: p3+p4+p5 -p1 -p2 =0 :  \>\"", ",", 
+       " ", 
+       RowBox[{
+       "p3v", " ", "+", " ", "p4v", " ", "+", "p5v", "  ", "-", "p1v", " ", 
+        "-", "p2v"}]}], "]"}], ";", "\[IndentingNewLine]", 
+     RowBox[{"If", "[", 
+      RowBox[{
+       RowBox[{
+        RowBox[{"Abs", "[", 
+         RowBox[{"Total", "[", 
+          RowBox[{
+          "p3v", " ", "+", " ", "p4v", " ", "+", "p5v", "  ", "-", "p1v", " ",
+            "-", "p2v"}], " ", "]"}], "]"}], ">", 
+        RowBox[{"10", "^", 
+         RowBox[{"-", "10"}]}]}], ",", 
+       RowBox[{
+       "Print", "[", "\"\<Energy-Momentum NOT CONSERVED !!!, TRY AGAIN.\>\"", 
+        "]"}], ",", " ", 
+       RowBox[{
+       "Print", "[", "\"\<MOMENTUM IS CONSERVED, ALL IS WELL!\>\"", "]"}]}], 
+      "]"}], ";", "\[IndentingNewLine]", 
+     RowBox[{"rl2", " ", "=", " ", 
+      RowBox[{"{", 
+       RowBox[{
+        RowBox[{"kkT3", "\[Rule]", " ", "rkT3"}], ",", 
+        RowBox[{"kkT4", "\[Rule]", " ", "rkT4"}], ",", 
+        RowBox[{"S", "\[Rule]", " ", "SS"}], ",", 
+        RowBox[{"T", "\[Rule]", " ", "TT"}], ",", 
+        RowBox[{"U", "\[Rule]", " ", "UU"}], ",", 
+        RowBox[{"T24", "\[Rule]", " ", "TT24"}], ",", 
+        RowBox[{"T14", "\[Rule]", " ", "TT14"}], ",", 
+        RowBox[{"S34", "\[Rule]", " ", "SS34"}], ",", " ", 
+        RowBox[{
+         RowBox[{"Sqrt", "[", "S", "]"}], "\[Rule]", " ", 
+         RowBox[{"Sqrt", "[", "SS", "]"}]}], ",", 
+        RowBox[{
+         RowBox[{"Sqrt", "[", "S34", "]"}], "\[Rule]", " ", 
+         RowBox[{"Sqrt", "[", "SS34", "]"}]}], ",", 
+        RowBox[{
+         RowBox[{"Tan", "[", "\[Phi]5", "]"}], "\[Rule]", " ", 
+         RowBox[{
+          RowBox[{"p5v", "[", 
+           RowBox[{"[", "2", "]"}], "]"}], "/", 
+          RowBox[{"p5v", "[", 
+           RowBox[{"[", "3", "]"}], "]"}]}]}], ",", 
+        RowBox[{"kT5", "\[Rule]", " ", 
+         RowBox[{"Sqrt", "[", 
+          RowBox[{
+           RowBox[{
+            RowBox[{"p5v", "[", 
+             RowBox[{"[", "2", "]"}], "]"}], "^", "2"}], " ", "+", 
+           RowBox[{
+            RowBox[{"p5v", "[", 
+             RowBox[{"[", "3", "]"}], "]"}], "^", "2"}]}], "]"}]}], ",", 
+        RowBox[{
+         RowBox[{"Sqrt", "[", "S35", "]"}], "\[Rule]", " ", 
+         RowBox[{"Sqrt", "[", "SS35", "]"}]}]}], "}"}]}], ";", " ", 
+     "\[IndentingNewLine]", "\[IndentingNewLine]", 
+     RowBox[{"rl3", "=", " ", 
+      RowBox[{"{", 
+       RowBox[{
+       "kkT3", ",", "kkT4", ",", "S", ",", "T", ",", "U", ",", "T24", ",", 
+        "T14", ",", "S34", ",", " ", 
+        RowBox[{"Sqrt", "[", "S", "]"}], ",", 
+        RowBox[{"Sqrt", "[", "S34", "]"}], ",", 
+        RowBox[{"Tan", "[", "\[Phi]5", "]"}], ",", "kT5", ",", 
+        RowBox[{"Sqrt", "[", "S35", "]"}]}], "}"}]}], ";", 
+     RowBox[{"(*", 
+      RowBox[{
+       RowBox[{"Export", "[", 
+        RowBox[{"\"\<PS.dat\>\"", ",", 
+         RowBox[{"N", "[", 
+          RowBox[{"{", 
+           RowBox[{
+            RowBox[{"AppendTo", "[", 
+             RowBox[{"p1v", ",", 
+              RowBox[{"Sqrt", "[", 
+               RowBox[{"MyPair", "[", 
+                RowBox[{"p1v", ",", "p1v"}], "]"}], "]"}]}], "]"}], ",", 
+            RowBox[{"AppendTo", "[", 
+             RowBox[{"p2v", ",", 
+              RowBox[{"Sqrt", "[", 
+               RowBox[{"MyPair", "[", 
+                RowBox[{"p2v", ",", "p2v"}], "]"}], "]"}]}], "]"}], ",", 
+            RowBox[{"AppendTo", "[", 
+             RowBox[{"p3v", ",", 
+              RowBox[{"Sqrt", "[", 
+               RowBox[{"MyPair", "[", 
+                RowBox[{"p3v", ",", "p3v"}], "]"}], "]"}]}], "]"}], ",", 
+            RowBox[{"AppendTo", "[", 
+             RowBox[{"p4v", ",", 
+              RowBox[{"Sqrt", "[", 
+               RowBox[{"MyPair", "[", 
+                RowBox[{"p4v", ",", "p4v"}], "]"}], "]"}]}], "]"}], ",", 
+            RowBox[{"AppendTo", "[", 
+             RowBox[{"p5v", ",", 
+              RowBox[{"Sqrt", "[", 
+               RowBox[{"MyPair", "[", 
+                RowBox[{"p5v", ",", "p5v"}], "]"}], "]"}]}], "]"}]}], "}"}], 
+          "]"}]}], "]"}], ";"}], "*)"}], 
+     RowBox[{"(*", 
+      RowBox[{
+       RowBox[{"ll1", "=", 
+        RowBox[{"SetPrecision", "[", 
+         RowBox[{
+          RowBox[{"N", "[", 
+           RowBox[{"{", 
+            RowBox[{
+             RowBox[{"AppendTo", "[", 
+              RowBox[{"p1v", ",", 
+               RowBox[{"Re", "[", 
+                RowBox[{"Sqrt", "[", 
+                 RowBox[{"MyPair", "[", 
+                  RowBox[{"p1v", ",", "p1v"}], "]"}], "]"}], "]"}]}], "]"}], 
+             ",", 
+             RowBox[{"AppendTo", "[", 
+              RowBox[{"p2v", ",", 
+               RowBox[{"Re", "[", 
+                RowBox[{"Sqrt", "[", 
+                 RowBox[{"MyPair", "[", 
+                  RowBox[{"p2v", ",", "p2v"}], "]"}], "]"}], "]"}]}], "]"}], 
+             ",", 
+             RowBox[{"AppendTo", "[", 
+              RowBox[{"p3v", ",", 
+               RowBox[{"Re", "[", 
+                RowBox[{"Sqrt", "[", 
+                 RowBox[{"MyPair", "[", 
+                  RowBox[{"p3v", ",", "p3v"}], "]"}], "]"}], "]"}]}], "]"}], 
+             ",", 
+             RowBox[{"AppendTo", "[", 
+              RowBox[{"p4v", ",", 
+               RowBox[{"Re", "[", 
+                RowBox[{"Sqrt", "[", 
+                 RowBox[{"MyPair", "[", 
+                  RowBox[{"p4v", ",", "p4v"}], "]"}], "]"}], "]"}]}], "]"}], 
+             ",", 
+             RowBox[{"AppendTo", "[", 
+              RowBox[{"p5v", ",", 
+               RowBox[{"Re", "[", 
+                RowBox[{"Sqrt", "[", 
+                 RowBox[{"MyPair", "[", 
+                  RowBox[{"p5v", ",", "p5v"}], "]"}], "]"}], "]"}]}], "]"}]}],
+             "}"}], "]"}], ",", "sprec"}], "]"}]}], ";"}], "*)"}], 
+     RowBox[{"ll1", "=", 
+      RowBox[{"SetPrecision", "[", 
+       RowBox[{
+        RowBox[{"N", "[", 
+         RowBox[{"{", 
+          RowBox[{
+           RowBox[{"AppendTo", "[", 
+            RowBox[{"p1v", ",", 
+             RowBox[{"Re", "[", 
+              RowBox[{"Sqrt", "[", 
+               RowBox[{"MyPair", "[", 
+                RowBox[{"p1v", ",", "p1v"}], "]"}], "]"}], "]"}]}], "]"}], 
+           ",", 
+           RowBox[{"AppendTo", "[", 
+            RowBox[{"p2v", ",", 
+             RowBox[{"Re", "[", 
+              RowBox[{"Sqrt", "[", 
+               RowBox[{"MyPair", "[", 
+                RowBox[{"p2v", ",", "p2v"}], "]"}], "]"}], "]"}]}], "]"}], 
+           ",", 
+           RowBox[{"AppendTo", "[", 
+            RowBox[{"p3v", ",", 
+             RowBox[{"Sqrt", "[", 
+              RowBox[{"MyPair", "[", 
+               RowBox[{"p3v", ",", "p3v"}], "]"}], "]"}]}], "]"}], ",", 
+           RowBox[{"AppendTo", "[", 
+            RowBox[{"p4v", ",", 
+             RowBox[{"Sqrt", "[", 
+              RowBox[{"MyPair", "[", 
+               RowBox[{"p4v", ",", "p4v"}], "]"}], "]"}]}], "]"}], ",", 
+           RowBox[{"AppendTo", "[", 
+            RowBox[{"p5v", ",", 
+             RowBox[{"Sqrt", "[", 
+              RowBox[{"MyPair", "[", 
+               RowBox[{"p5v", ",", "p5v"}], "]"}], "]"}]}], "]"}]}], "}"}], 
+         "]"}], ",", "sprec"}], "]"}]}], ";", 
+     RowBox[{"ll2", "=", 
+      RowBox[{"(", 
+       RowBox[{"rl2", "/.", "rl1"}], ")"}]}], ";", "\[IndentingNewLine]", 
+     RowBox[{"Print", "[", 
+      RowBox[{"N", "[", 
+       RowBox[{"ll2", ",", "10"}], "]"}], "]"}], ";", "\[IndentingNewLine]", 
+     RowBox[{"{", 
+      RowBox[{"ll1", ",", 
+       RowBox[{"(", 
+        RowBox[{"rl3", "/.", "ll2"}], ")"}]}], "}"}]}]}], "]"}]}]}], "Input",
+ CellChangeTimes->{{3.774372136548223*^9, 3.7743721388290977`*^9}, {
+  3.775495053660193*^9, 3.775495054534686*^9}},
+ CellLabel->"In[29]:=",ExpressionUUID->"cccbcfb5-f779-4768-8bad-bc93be841f88"],
+
+Cell[BoxData[
+ RowBox[{"\[IndentingNewLine]", "\[IndentingNewLine]"}]], "Input",
+ CellChangeTimes->{{3.769416382706212*^9, 3.769416403306004*^9}, {
+   3.7694168727346354`*^9, 3.769416881103343*^9}, {3.769420802600919*^9, 
+   3.769420810995673*^9}, {3.770096644875188*^9, 3.770096645965609*^9}, 
+   3.773746114995344*^9, 3.774010932827186*^9, 
+   3.774350202417961*^9},ExpressionUUID->"a5c5e12e-157e-4719-b09d-\
+930d037e0d1b"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(*", " ", 
+   RowBox[{
+   "Importing", " ", "triangle", " ", "scattering", " ", "amplitude", " ", 
+    RowBox[{"w", "/", " ", "PV"}], " ", "coefficients", " ", "analytically", 
+    " ", 
+    RowBox[{"expanded", "."}]}], " ", "*)"}], "\[IndentingNewLine]", 
+  RowBox[{
+   RowBox[{"triangle", " ", "=", " ", 
+    RowBox[{"Import", "[", "\"\<ggHgg_LR_triangle_38diags.m\>\"", "]"}]}], 
+   ";"}]}]], "Input",
+ CellChangeTimes->{{3.76941678968123*^9, 3.769416834146682*^9}, {
+   3.769418270698312*^9, 3.7694182769864492`*^9}, {3.769420598958762*^9, 
+   3.769420642106495*^9}, {3.769421602470723*^9, 3.769421736756125*^9}, {
+   3.77374127963312*^9, 3.77374128280485*^9}, 3.7737414197690268`*^9, {
+   3.774010941769153*^9, 3.774010945328281*^9}, {3.774010984977004*^9, 
+   3.7740110365685997`*^9}, {3.7743503313914537`*^9, 3.774350332864695*^9}},
+ CellLabel->"In[36]:=",ExpressionUUID->"6f54e202-a28b-4a1d-9e81-76bb7154ddaa"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(*", " ", 
+   RowBox[{"Importing", " ", "box", " ", "scattering", " ", "amplitudes", " ", 
+    RowBox[{"w", "/", " ", "PV"}], " ", "coefficients", " ", "analytically", 
+    " ", 
+    RowBox[{"expanded", "."}]}], " ", "*)"}], "\[IndentingNewLine]", 
+  RowBox[{
+   RowBox[{
+    RowBox[{"box1", " ", "=", " ", 
+     RowBox[{"Import", "[", "\"\<ggHgg_LR_box_1_9diags.m\>\"", "]"}]}], ";"}],
+    "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"box2", " ", "=", " ", 
+     RowBox[{"Import", "[", "\"\<ggHgg_LR_box_2_9diags.m\>\"", "]"}]}], ";"}],
+    "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"box3", " ", "=", " ", 
+     RowBox[{"Import", "[", "\"\<ggHgg_LR_box_3_9diags.m\>\"", "]"}]}], ";"}],
+    "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"box4", " ", "=", " ", 
+     RowBox[{"Import", "[", "\"\<ggHgg_LR_box_4_9diags.m\>\"", "]"}]}], 
+    ";"}]}]}]], "Input",
+ CellChangeTimes->{{3.774011056707362*^9, 3.7740111034424753`*^9}},
+ CellLabel->"In[37]:=",ExpressionUUID->"60913534-eef8-4103-af9a-ab50a0b353b9"],
+
+Cell[BoxData["\[IndentingNewLine]"], "Input",
+ CellChangeTimes->{
+  3.773141712723225*^9},ExpressionUUID->"2239b8d8-532e-4c08-ac3b-\
+e377a166b460"],
+
+Cell[BoxData[
+ RowBox[{"(*", " ", 
+  RowBox[{
+  "Sub", " ", "for", " ", "all", " ", "helicities", " ", "and", " ", "save", 
+   " ", 
+   RowBox[{"them", "."}]}], " ", "*)"}]], "Input",
+ CellChangeTimes->{{3.774351499832851*^9, 
+  3.774351510535021*^9}},ExpressionUUID->"a8edcb3d-289d-4ff2-aab2-\
+1178c47d2c24"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"SetDirectory", "[", "\"\<helicities\>\"", "]"}], ";"}]], "Input",
+ CellLabel->"In[41]:=",ExpressionUUID->"2fbc45e0-5167-407c-a174-583971bd7d06"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Directory", "[", "]"}]], "Input",
+ CellChangeTimes->{{3.774351673653612*^9, 3.774351676437744*^9}},
+ CellLabel->"In[42]:=",ExpressionUUID->"7685320a-c96c-4f66-a42b-1f0a30a78e68"],
+
+Cell[BoxData["\<\"/Users/josegabrielreyes/Documents/Higgs/Mathematica \
+Scripts/ggHgg/FinalSetUp/helicities\"\>"], "Output",
+ CellChangeTimes->{3.7743516767244864`*^9, 3.7743718504005413`*^9, 
+  3.7743761919598207`*^9, 3.7752219466374807`*^9, 3.775227350978853*^9, 
+  3.7754951217016773`*^9},
+ CellLabel->"Out[42]=",ExpressionUUID->"bfbcf21c-cca2-47a8-81bb-f83b15bbc8df"]
+}, Open  ]],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(*", " ", 
+   RowBox[{"++", "++"}], " ", "*)"}], "\[IndentingNewLine]", 
+  RowBox[{
+   RowBox[{
+    RowBox[{"config", "=", "\"\<++++\>\""}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"pairdef", "[", 
+     RowBox[{"1", ",", "1", ",", "1", ",", "1"}], "]"}], ";"}], 
+   "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"tsub", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"triangle", "//.", "SubFourVecs"}], "/.", "MATColor"}]}], ";"}],
+    "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<triangle_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "tsub"}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub1", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box1", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub2", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box2", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub3", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box3", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub4", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box4", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"sumbox", "=", 
+     RowBox[{
+      RowBox[{"bsub1", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub2", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub3", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub4", "[", 
+       RowBox[{"[", "1", "]"}], "]"}]}]}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<box_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "sumbox"}], "]"}], ";"}]}]}]], "Input",
+ CellChangeTimes->{{3.774350335914909*^9, 3.774350382613131*^9}, {
+  3.774350732452187*^9, 3.7743507645220213`*^9}, {3.774351033389183*^9, 
+  3.774351145928581*^9}, {3.774351431336866*^9, 3.774351446708275*^9}, {
+  3.774351483249557*^9, 3.7743514934640923`*^9}, {3.774351550426754*^9, 
+  3.77435169416295*^9}, {3.774351916303782*^9, 3.774352021105199*^9}, {
+  3.774352095583454*^9, 3.7743521131451178`*^9}, {3.774364790080785*^9, 
+  3.774364842486887*^9}, {3.775222153633851*^9, 3.775222168779771*^9}, {
+  3.775495131959234*^9, 3.775495165246623*^9}},
+ CellLabel->"In[43]:=",ExpressionUUID->"7e7f013d-f22f-4c3a-81bd-d58630ecb407"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{"ek1vec", "\[IndentingNewLine]", "ek2vec", \
+"\[IndentingNewLine]", "ek4vec", "\[IndentingNewLine]", "ek5vec"}], "Input",
+ CellChangeTimes->{{3.775495322893921*^9, 3.775495334535952*^9}},
+ CellLabel->"In[53]:=",ExpressionUUID->"6e143612-3c0d-4282-a651-8cad89a3b66b"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{"-", 
+    FractionBox["1", 
+     SqrtBox["2"]]}], ",", 
+   RowBox[{"-", 
+    FractionBox["\[ImaginaryI]", 
+     SqrtBox["2"]]}], ",", "0"}], "}"}]], "Output",
+ CellChangeTimes->{3.775495486085648*^9},
+ CellLabel->"Out[53]=",ExpressionUUID->"98797b05-90d0-4926-b83f-0fdac2f8507c"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{"-", 
+    FractionBox["1", 
+     SqrtBox["2"]]}], ",", 
+   FractionBox["\[ImaginaryI]", 
+    SqrtBox["2"]], ",", "0"}], "}"}]], "Output",
+ CellChangeTimes->{3.7754954860962257`*^9},
+ CellLabel->"Out[54]=",ExpressionUUID->"3c0d0c1a-efc7-4be2-989a-76364c5184c4"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{"-", 
+    FractionBox[
+     RowBox[{
+      RowBox[{"Sech", "[", "\[Eta]4", "]"}], " ", 
+      RowBox[{"Sinh", "[", 
+       RowBox[{"\[Eta]4", "-", 
+        RowBox[{"\[ImaginaryI]", " ", "\[Phi]4"}]}], "]"}]}], 
+     SqrtBox["2"]]}], ",", 
+   RowBox[{"-", 
+    FractionBox[
+     RowBox[{
+      RowBox[{"\[ImaginaryI]", " ", 
+       RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+      RowBox[{
+       RowBox[{"Sin", "[", "\[Phi]4", "]"}], " ", 
+       RowBox[{"Tanh", "[", "\[Eta]4", "]"}]}]}], 
+     SqrtBox["2"]]}], ",", 
+   FractionBox[
+    RowBox[{"Sech", "[", "\[Eta]4", "]"}], 
+    SqrtBox["2"]]}], "}"}]], "Output",
+ CellChangeTimes->{3.775495486104487*^9},
+ CellLabel->"Out[55]=",ExpressionUUID->"295e5521-bc86-438c-a78c-4ff98b1a4eaf"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{
+    RowBox[{"(", 
+     RowBox[{
+      RowBox[{
+       RowBox[{"-", "kT3"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]3", "]"}]}], "-", 
+      RowBox[{"kT4", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}], "-", 
+      RowBox[{
+       FractionBox["1", 
+        SqrtBox["2"]], 
+       RowBox[{"\[ImaginaryI]", " ", 
+        RowBox[{"(", 
+         RowBox[{
+          RowBox[{"kT3", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+          RowBox[{"kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+        RowBox[{"\[Sqrt]", 
+         RowBox[{"(", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], "+", 
+           SuperscriptBox["kT4", "2"], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT3", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT4", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+            RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}]}]}]}], ")"}], 
+    "/", 
+    RowBox[{"(", 
+     RowBox[{"\[Sqrt]", 
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", 
+            RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}], ")"}], " ", 
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT4", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+           RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}], ")"}]}], 
+     ")"}]}], ",", 
+   RowBox[{
+    RowBox[{"(", 
+     RowBox[{
+      RowBox[{
+       RowBox[{"-", "kT3"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]3", "]"}]}], "-", 
+      RowBox[{"kT4", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}], "+", 
+      RowBox[{
+       FractionBox["1", 
+        SqrtBox["2"]], 
+       RowBox[{"\[ImaginaryI]", " ", 
+        RowBox[{"(", 
+         RowBox[{
+          RowBox[{"kT3", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+          RowBox[{"kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+        RowBox[{"\[Sqrt]", 
+         RowBox[{"(", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], "+", 
+           SuperscriptBox["kT4", "2"], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT3", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT4", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+            RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}]}]}]}], ")"}], 
+    "/", 
+    RowBox[{"(", 
+     RowBox[{"\[Sqrt]", 
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", 
+            RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}], ")"}], " ", 
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT4", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+           RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}], ")"}]}], 
+     ")"}]}], ",", 
+   FractionBox["1", 
+    SqrtBox[
+     FractionBox[
+      RowBox[{
+       SuperscriptBox["kT3", "2"], "+", 
+       SuperscriptBox["kT4", "2"], "+", 
+       RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+        RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+        RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+       RowBox[{
+        SuperscriptBox["kT3", "2"], " ", 
+        RowBox[{"Cosh", "[", 
+         RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+       RowBox[{
+        SuperscriptBox["kT4", "2"], " ", 
+        RowBox[{"Cosh", "[", 
+         RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+       RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+        RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+        RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+       RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+        RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+        RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], 
+      RowBox[{
+       SuperscriptBox["kT3", "2"], "+", 
+       SuperscriptBox["kT4", "2"], "+", 
+       RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+        RowBox[{"Cos", "[", 
+         RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}]]]]}], "}"}]], "Output",\
+
+ CellChangeTimes->{3.775495486120371*^9},
+ CellLabel->"Out[56]=",ExpressionUUID->"e4e3dc2e-2896-4dfa-890b-ce015e0dd3cb"]
+}, Closed]],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(*", " ", 
+   RowBox[{"++", 
+    RowBox[{"+", "-"}]}], " ", "*)"}], "\[IndentingNewLine]", 
+  RowBox[{
+   RowBox[{
+    RowBox[{"config", "=", "\"\<+++-\>\""}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"pairdef", "[", 
+     RowBox[{"1", ",", "1", ",", "1", ",", 
+      RowBox[{"-", "1"}]}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"tsub", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"triangle", "//.", "SubFourVecs"}], "/.", "MATColor"}]}], ";"}],
+    "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<triangle_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "tsub"}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub1", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box1", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub2", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box2", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub3", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box3", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub4", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box4", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"sumbox", "=", 
+     RowBox[{
+      RowBox[{"bsub1", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub2", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub3", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub4", "[", 
+       RowBox[{"[", "1", "]"}], "]"}]}]}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<box_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "sumbox"}], "]"}], ";"}]}]}]], "Input",
+ CellChangeTimes->{{3.77435187261103*^9, 3.7743518983220797`*^9}, {
+   3.774352030399287*^9, 3.774352049137046*^9}, {3.774352117249259*^9, 
+   3.774352135475457*^9}, 3.7743522476903477`*^9, {3.774364854944893*^9, 
+   3.7743648551892653`*^9}, {3.77549530700056*^9, 3.775495314102174*^9}},
+ CellLabel->"In[57]:=",ExpressionUUID->"de07b359-92c5-4c50-9757-257a3b86203c"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{"ek1vec", "\[IndentingNewLine]", "ek2vec", \
+"\[IndentingNewLine]", "ek4vec", "\[IndentingNewLine]", "ek5vec"}], "Input",
+ CellLabel->"In[67]:=",ExpressionUUID->"4bd24bf0-4f95-4aeb-a92a-36addec143e9"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{"-", 
+    FractionBox["1", 
+     SqrtBox["2"]]}], ",", 
+   RowBox[{"-", 
+    FractionBox["\[ImaginaryI]", 
+     SqrtBox["2"]]}], ",", "0"}], "}"}]], "Output",
+ CellChangeTimes->{3.775495725939406*^9},
+ CellLabel->"Out[67]=",ExpressionUUID->"0caa581a-26a8-4421-91ce-03a7011cd4c6"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{"-", 
+    FractionBox["1", 
+     SqrtBox["2"]]}], ",", 
+   FractionBox["\[ImaginaryI]", 
+    SqrtBox["2"]], ",", "0"}], "}"}]], "Output",
+ CellChangeTimes->{3.775495726000888*^9},
+ CellLabel->"Out[68]=",ExpressionUUID->"27e4ad47-e57e-49f6-84f4-963c4f4e2144"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{"-", 
+    FractionBox[
+     RowBox[{
+      RowBox[{"Sech", "[", "\[Eta]4", "]"}], " ", 
+      RowBox[{"Sinh", "[", 
+       RowBox[{"\[Eta]4", "-", 
+        RowBox[{"\[ImaginaryI]", " ", "\[Phi]4"}]}], "]"}]}], 
+     SqrtBox["2"]]}], ",", 
+   RowBox[{"-", 
+    FractionBox[
+     RowBox[{
+      RowBox[{"\[ImaginaryI]", " ", 
+       RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+      RowBox[{
+       RowBox[{"Sin", "[", "\[Phi]4", "]"}], " ", 
+       RowBox[{"Tanh", "[", "\[Eta]4", "]"}]}]}], 
+     SqrtBox["2"]]}], ",", 
+   FractionBox[
+    RowBox[{"Sech", "[", "\[Eta]4", "]"}], 
+    SqrtBox["2"]]}], "}"}]], "Output",
+ CellChangeTimes->{3.775495726008683*^9},
+ CellLabel->"Out[69]=",ExpressionUUID->"c13ffd92-283d-4eff-935e-259792c34b35"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{
+    RowBox[{"(", 
+     RowBox[{
+      RowBox[{"kT3", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]3", "]"}]}], "+", 
+      RowBox[{"kT4", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}], "-", 
+      RowBox[{
+       FractionBox["1", 
+        SqrtBox["2"]], 
+       RowBox[{"\[ImaginaryI]", " ", 
+        RowBox[{"(", 
+         RowBox[{
+          RowBox[{"kT3", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+          RowBox[{"kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+        RowBox[{"\[Sqrt]", 
+         RowBox[{"(", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], "+", 
+           SuperscriptBox["kT4", "2"], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT3", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT4", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+            RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}]}]}]}], ")"}], 
+    "/", 
+    RowBox[{"(", 
+     RowBox[{"\[Sqrt]", 
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", 
+            RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}], ")"}], " ", 
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT4", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+           RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}], ")"}]}], 
+     ")"}]}], ",", 
+   RowBox[{
+    RowBox[{"(", 
+     RowBox[{
+      RowBox[{"kT3", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]3", "]"}]}], "+", 
+      RowBox[{"kT4", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}], "+", 
+      RowBox[{
+       FractionBox["1", 
+        SqrtBox["2"]], 
+       RowBox[{"\[ImaginaryI]", " ", 
+        RowBox[{"(", 
+         RowBox[{
+          RowBox[{"kT3", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+          RowBox[{"kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+        RowBox[{"\[Sqrt]", 
+         RowBox[{"(", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], "+", 
+           SuperscriptBox["kT4", "2"], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT3", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT4", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+            RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}]}]}]}], ")"}], 
+    "/", 
+    RowBox[{"(", 
+     RowBox[{"\[Sqrt]", 
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", 
+            RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}], ")"}], " ", 
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT4", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+           RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}], ")"}]}], 
+     ")"}]}], ",", 
+   RowBox[{"-", 
+    FractionBox["1", 
+     SqrtBox[
+      FractionBox[
+       RowBox[{
+        SuperscriptBox["kT3", "2"], "+", 
+        SuperscriptBox["kT4", "2"], "+", 
+        RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+         RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+         RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+        RowBox[{
+         SuperscriptBox["kT3", "2"], " ", 
+         RowBox[{"Cosh", "[", 
+          RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+        RowBox[{
+         SuperscriptBox["kT4", "2"], " ", 
+         RowBox[{"Cosh", "[", 
+          RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+        RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+         RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+         RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+        RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+         RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+         RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], 
+       RowBox[{
+        SuperscriptBox["kT3", "2"], "+", 
+        SuperscriptBox["kT4", "2"], "+", 
+        RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+         RowBox[{"Cos", "[", 
+          RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}]]]]}]}], 
+  "}"}]], "Output",
+ CellChangeTimes->{3.775495726030079*^9},
+ CellLabel->"Out[70]=",ExpressionUUID->"bd7742ef-097f-4ece-b454-127c41a84927"]
+}, Closed]],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(*", " ", 
+   RowBox[{"++", 
+    RowBox[{"-", "+"}]}], " ", "*)"}], "\[IndentingNewLine]", 
+  RowBox[{
+   RowBox[{
+    RowBox[{"config", "=", "\"\<++-+\>\""}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"pairdef", "[", 
+     RowBox[{"1", ",", "1", ",", 
+      RowBox[{"-", "1"}], ",", "1"}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"tsub", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"triangle", "//.", "SubFourVecs"}], "/.", "MATColor"}]}], ";"}],
+    "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<triangle_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "tsub"}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub1", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box1", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub2", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box2", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub3", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box3", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub4", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box4", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"sumbox", "=", 
+     RowBox[{
+      RowBox[{"bsub1", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub2", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub3", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub4", "[", 
+       RowBox[{"[", "1", "]"}], "]"}]}]}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<box_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "sumbox"}], "]"}], ";"}]}]}]], "Input",
+ CellChangeTimes->{{3.774352147770486*^9, 3.7743521728122683`*^9}, 
+   3.774352260382543*^9, {3.7743648592657423`*^9, 3.77436485952067*^9}, {
+   3.775495582942519*^9, 3.7754955900584507`*^9}},
+ CellLabel->"In[71]:=",ExpressionUUID->"0dc936c5-a3bf-49d3-8822-b8bf3e097443"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{"ek1vec", "\[IndentingNewLine]", "ek2vec", \
+"\[IndentingNewLine]", "ek4vec", "\[IndentingNewLine]", "ek5vec"}], "Input",
+ CellLabel->"In[81]:=",ExpressionUUID->"de1972ab-9631-4c95-a3ac-cc2439eaff59"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{"-", 
+    FractionBox["1", 
+     SqrtBox["2"]]}], ",", 
+   RowBox[{"-", 
+    FractionBox["\[ImaginaryI]", 
+     SqrtBox["2"]]}], ",", "0"}], "}"}]], "Output",
+ CellChangeTimes->{3.775496041262051*^9},
+ CellLabel->"Out[81]=",ExpressionUUID->"83c34964-b013-4847-9113-6809ef586914"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{"-", 
+    FractionBox["1", 
+     SqrtBox["2"]]}], ",", 
+   FractionBox["\[ImaginaryI]", 
+    SqrtBox["2"]], ",", "0"}], "}"}]], "Output",
+ CellChangeTimes->{3.775496041274247*^9},
+ CellLabel->"Out[82]=",ExpressionUUID->"76cacd3c-7b01-4bf0-bf2d-05ee732b6108"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   FractionBox[
+    RowBox[{
+     RowBox[{"Sech", "[", "\[Eta]4", "]"}], " ", 
+     RowBox[{"Sinh", "[", 
+      RowBox[{"\[Eta]4", "+", 
+       RowBox[{"\[ImaginaryI]", " ", "\[Phi]4"}]}], "]"}]}], 
+    SqrtBox["2"]], ",", 
+   FractionBox[
+    RowBox[{
+     RowBox[{
+      RowBox[{"-", "\[ImaginaryI]"}], " ", 
+      RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+     RowBox[{
+      RowBox[{"Sin", "[", "\[Phi]4", "]"}], " ", 
+      RowBox[{"Tanh", "[", "\[Eta]4", "]"}]}]}], 
+    SqrtBox["2"]], ",", 
+   RowBox[{"-", 
+    FractionBox[
+     RowBox[{"Sech", "[", "\[Eta]4", "]"}], 
+     SqrtBox["2"]]}]}], "}"}]], "Output",
+ CellChangeTimes->{3.775496041281838*^9},
+ CellLabel->"Out[83]=",ExpressionUUID->"2af82568-b2f2-4e08-823a-56af3a079456"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{
+    RowBox[{"(", 
+     RowBox[{
+      RowBox[{
+       RowBox[{"-", "kT3"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]3", "]"}]}], "-", 
+      RowBox[{"kT4", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}], "-", 
+      RowBox[{
+       FractionBox["1", 
+        SqrtBox["2"]], 
+       RowBox[{"\[ImaginaryI]", " ", 
+        RowBox[{"(", 
+         RowBox[{
+          RowBox[{"kT3", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+          RowBox[{"kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+        RowBox[{"\[Sqrt]", 
+         RowBox[{"(", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], "+", 
+           SuperscriptBox["kT4", "2"], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT3", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT4", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+            RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}]}]}]}], ")"}], 
+    "/", 
+    RowBox[{"(", 
+     RowBox[{"\[Sqrt]", 
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", 
+            RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}], ")"}], " ", 
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT4", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+           RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}], ")"}]}], 
+     ")"}]}], ",", 
+   RowBox[{
+    RowBox[{"(", 
+     RowBox[{
+      RowBox[{
+       RowBox[{"-", "kT3"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]3", "]"}]}], "-", 
+      RowBox[{"kT4", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}], "+", 
+      RowBox[{
+       FractionBox["1", 
+        SqrtBox["2"]], 
+       RowBox[{"\[ImaginaryI]", " ", 
+        RowBox[{"(", 
+         RowBox[{
+          RowBox[{"kT3", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+          RowBox[{"kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+        RowBox[{"\[Sqrt]", 
+         RowBox[{"(", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], "+", 
+           SuperscriptBox["kT4", "2"], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT3", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT4", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+            RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}]}]}]}], ")"}], 
+    "/", 
+    RowBox[{"(", 
+     RowBox[{"\[Sqrt]", 
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", 
+            RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}], ")"}], " ", 
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT4", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+           RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}], ")"}]}], 
+     ")"}]}], ",", 
+   FractionBox["1", 
+    SqrtBox[
+     FractionBox[
+      RowBox[{
+       SuperscriptBox["kT3", "2"], "+", 
+       SuperscriptBox["kT4", "2"], "+", 
+       RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+        RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+        RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+       RowBox[{
+        SuperscriptBox["kT3", "2"], " ", 
+        RowBox[{"Cosh", "[", 
+         RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+       RowBox[{
+        SuperscriptBox["kT4", "2"], " ", 
+        RowBox[{"Cosh", "[", 
+         RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+       RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+        RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+        RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+       RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+        RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+        RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], 
+      RowBox[{
+       SuperscriptBox["kT3", "2"], "+", 
+       SuperscriptBox["kT4", "2"], "+", 
+       RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+        RowBox[{"Cos", "[", 
+         RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}]]]]}], "}"}]], "Output",\
+
+ CellChangeTimes->{3.775496041305704*^9},
+ CellLabel->"Out[84]=",ExpressionUUID->"888f7613-7ca5-4c0c-9910-37224a4d42c2"]
+}, Closed]],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(*", " ", 
+   RowBox[{"++", "--"}], " ", "*)"}], "\[IndentingNewLine]", 
+  RowBox[{
+   RowBox[{
+    RowBox[{"config", "=", "\"\<++--\>\""}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"pairdef", "[", 
+     RowBox[{"1", ",", "1", ",", 
+      RowBox[{"-", "1"}], ",", 
+      RowBox[{"-", "1"}]}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"tsub", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"triangle", "//.", "SubFourVecs"}], "/.", "MATColor"}]}], ";"}],
+    "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<triangle_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "tsub"}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub1", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box1", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub2", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box2", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub3", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box3", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub4", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box4", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"sumbox", "=", 
+     RowBox[{
+      RowBox[{"bsub1", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub2", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub3", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub4", "[", 
+       RowBox[{"[", "1", "]"}], "]"}]}]}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<box_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "sumbox"}], "]"}], ";"}]}]}]], "Input",
+ CellChangeTimes->{{3.7743522016662197`*^9, 3.774352224887178*^9}, 
+   3.774352262175974*^9, {3.774364861979569*^9, 3.774364862258802*^9}, {
+   3.775495831158877*^9, 3.775495839831895*^9}},
+ CellLabel->"In[85]:=",ExpressionUUID->"2f945793-af8e-4f9f-8ee4-f6a5ddef3041"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{"ek1vec", "\[IndentingNewLine]", "ek2vec", \
+"\[IndentingNewLine]", "ek4vec", "\[IndentingNewLine]", "ek5vec"}], "Input",
+ CellLabel->"In[95]:=",ExpressionUUID->"1b3a5a8e-9a75-4ea8-81fc-12e00b1e7a8b"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{"-", 
+    FractionBox["1", 
+     SqrtBox["2"]]}], ",", 
+   RowBox[{"-", 
+    FractionBox["\[ImaginaryI]", 
+     SqrtBox["2"]]}], ",", "0"}], "}"}]], "Output",
+ CellChangeTimes->{3.775496278877109*^9},
+ CellLabel->"Out[95]=",ExpressionUUID->"4800b669-1ac2-461c-8d0e-6c8e0db4feb2"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{"-", 
+    FractionBox["1", 
+     SqrtBox["2"]]}], ",", 
+   FractionBox["\[ImaginaryI]", 
+    SqrtBox["2"]], ",", "0"}], "}"}]], "Output",
+ CellChangeTimes->{3.775496278884636*^9},
+ CellLabel->"Out[96]=",ExpressionUUID->"127daa54-286d-4dfe-a228-45ea02f3a29b"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   FractionBox[
+    RowBox[{
+     RowBox[{"Sech", "[", "\[Eta]4", "]"}], " ", 
+     RowBox[{"Sinh", "[", 
+      RowBox[{"\[Eta]4", "+", 
+       RowBox[{"\[ImaginaryI]", " ", "\[Phi]4"}]}], "]"}]}], 
+    SqrtBox["2"]], ",", 
+   FractionBox[
+    RowBox[{
+     RowBox[{
+      RowBox[{"-", "\[ImaginaryI]"}], " ", 
+      RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+     RowBox[{
+      RowBox[{"Sin", "[", "\[Phi]4", "]"}], " ", 
+      RowBox[{"Tanh", "[", "\[Eta]4", "]"}]}]}], 
+    SqrtBox["2"]], ",", 
+   RowBox[{"-", 
+    FractionBox[
+     RowBox[{"Sech", "[", "\[Eta]4", "]"}], 
+     SqrtBox["2"]]}]}], "}"}]], "Output",
+ CellChangeTimes->{3.7754962788921328`*^9},
+ CellLabel->"Out[97]=",ExpressionUUID->"ff5a2c2d-bcb9-4a08-a0db-e3ec3e0b8eab"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{
+    RowBox[{"(", 
+     RowBox[{
+      RowBox[{"kT3", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]3", "]"}]}], "+", 
+      RowBox[{"kT4", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}], "-", 
+      RowBox[{
+       FractionBox["1", 
+        SqrtBox["2"]], 
+       RowBox[{"\[ImaginaryI]", " ", 
+        RowBox[{"(", 
+         RowBox[{
+          RowBox[{"kT3", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+          RowBox[{"kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+        RowBox[{"\[Sqrt]", 
+         RowBox[{"(", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], "+", 
+           SuperscriptBox["kT4", "2"], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT3", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT4", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+            RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}]}]}]}], ")"}], 
+    "/", 
+    RowBox[{"(", 
+     RowBox[{"\[Sqrt]", 
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", 
+            RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}], ")"}], " ", 
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT4", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+           RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}], ")"}]}], 
+     ")"}]}], ",", 
+   RowBox[{
+    RowBox[{"(", 
+     RowBox[{
+      RowBox[{"kT3", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]3", "]"}]}], "+", 
+      RowBox[{"kT4", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}], "+", 
+      RowBox[{
+       FractionBox["1", 
+        SqrtBox["2"]], 
+       RowBox[{"\[ImaginaryI]", " ", 
+        RowBox[{"(", 
+         RowBox[{
+          RowBox[{"kT3", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+          RowBox[{"kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+        RowBox[{"\[Sqrt]", 
+         RowBox[{"(", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], "+", 
+           SuperscriptBox["kT4", "2"], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT3", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT4", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+            RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}]}]}]}], ")"}], 
+    "/", 
+    RowBox[{"(", 
+     RowBox[{"\[Sqrt]", 
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", 
+            RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}], ")"}], " ", 
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT4", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+           RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}], ")"}]}], 
+     ")"}]}], ",", 
+   RowBox[{"-", 
+    FractionBox["1", 
+     SqrtBox[
+      FractionBox[
+       RowBox[{
+        SuperscriptBox["kT3", "2"], "+", 
+        SuperscriptBox["kT4", "2"], "+", 
+        RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+         RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+         RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+        RowBox[{
+         SuperscriptBox["kT3", "2"], " ", 
+         RowBox[{"Cosh", "[", 
+          RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+        RowBox[{
+         SuperscriptBox["kT4", "2"], " ", 
+         RowBox[{"Cosh", "[", 
+          RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+        RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+         RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+         RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+        RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+         RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+         RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], 
+       RowBox[{
+        SuperscriptBox["kT3", "2"], "+", 
+        SuperscriptBox["kT4", "2"], "+", 
+        RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+         RowBox[{"Cos", "[", 
+          RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}]]]]}]}], 
+  "}"}]], "Output",
+ CellChangeTimes->{3.7754962789055977`*^9},
+ CellLabel->"Out[98]=",ExpressionUUID->"3613bcfe-306c-417b-be00-8b237e1f74fc"]
+}, Closed]],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(*", " ", 
+   RowBox[{"+", 
+    RowBox[{"-", "++"}]}], " ", "*)"}], "\[IndentingNewLine]", 
+  RowBox[{
+   RowBox[{
+    RowBox[{"config", "=", "\"\<+-++\>\""}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"pairdef", "[", 
+     RowBox[{"1", ",", 
+      RowBox[{"-", "1"}], ",", "1", ",", "1"}], "]"}], ";"}], 
+   "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"tsub", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"triangle", "//.", "SubFourVecs"}], "/.", "MATColor"}]}], ";"}],
+    "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<triangle_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "tsub"}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub1", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box1", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub2", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box2", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub3", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box3", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub4", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box4", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"sumbox", "=", 
+     RowBox[{
+      RowBox[{"bsub1", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub2", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub3", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub4", "[", 
+       RowBox[{"[", "1", "]"}], "]"}]}]}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<box_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "sumbox"}], "]"}], ";"}]}]}]], "Input",
+ CellChangeTimes->{{3.774352213966481*^9, 3.774352230053808*^9}, {
+  3.774352264211151*^9, 3.774352265069294*^9}, {3.774364864710299*^9, 
+  3.77436486506133*^9}, {3.775496132812826*^9, 3.775496140075749*^9}},
+ CellLabel->"In[99]:=",ExpressionUUID->"736a8768-21b4-4a78-91c9-5a2f8b836a59"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{"ek1vec", "\[IndentingNewLine]", "ek2vec", \
+"\[IndentingNewLine]", "ek4vec", "\[IndentingNewLine]", "ek5vec"}], "Input",
+ CellLabel->
+  "In[109]:=",ExpressionUUID->"ddb548c2-b966-4ebb-8b4d-20e4c052552c"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{"-", 
+    FractionBox["1", 
+     SqrtBox["2"]]}], ",", 
+   RowBox[{"-", 
+    FractionBox["\[ImaginaryI]", 
+     SqrtBox["2"]]}], ",", "0"}], "}"}]], "Output",
+ CellChangeTimes->{3.7754964343568783`*^9},
+ CellLabel->
+  "Out[109]=",ExpressionUUID->"8e7c14f1-46c4-45be-9499-0e7ff9cfe533"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   FractionBox["1", 
+    SqrtBox["2"]], ",", 
+   FractionBox["\[ImaginaryI]", 
+    SqrtBox["2"]], ",", "0"}], "}"}]], "Output",
+ CellChangeTimes->{3.775496434368865*^9},
+ CellLabel->
+  "Out[110]=",ExpressionUUID->"665ee0e0-b7dc-4373-bc72-91094ed4ebfa"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{"-", 
+    FractionBox[
+     RowBox[{
+      RowBox[{"Sech", "[", "\[Eta]4", "]"}], " ", 
+      RowBox[{"Sinh", "[", 
+       RowBox[{"\[Eta]4", "-", 
+        RowBox[{"\[ImaginaryI]", " ", "\[Phi]4"}]}], "]"}]}], 
+     SqrtBox["2"]]}], ",", 
+   RowBox[{"-", 
+    FractionBox[
+     RowBox[{
+      RowBox[{"\[ImaginaryI]", " ", 
+       RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+      RowBox[{
+       RowBox[{"Sin", "[", "\[Phi]4", "]"}], " ", 
+       RowBox[{"Tanh", "[", "\[Eta]4", "]"}]}]}], 
+     SqrtBox["2"]]}], ",", 
+   FractionBox[
+    RowBox[{"Sech", "[", "\[Eta]4", "]"}], 
+    SqrtBox["2"]]}], "}"}]], "Output",
+ CellChangeTimes->{3.775496434374834*^9},
+ CellLabel->
+  "Out[111]=",ExpressionUUID->"76a06765-1e32-464b-b653-74c9c41bfad0"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{
+    RowBox[{"(", 
+     RowBox[{
+      RowBox[{
+       RowBox[{"-", "kT3"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]3", "]"}]}], "-", 
+      RowBox[{"kT4", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}], "-", 
+      RowBox[{
+       FractionBox["1", 
+        SqrtBox["2"]], 
+       RowBox[{"\[ImaginaryI]", " ", 
+        RowBox[{"(", 
+         RowBox[{
+          RowBox[{"kT3", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+          RowBox[{"kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+        RowBox[{"\[Sqrt]", 
+         RowBox[{"(", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], "+", 
+           SuperscriptBox["kT4", "2"], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT3", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT4", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+            RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}]}]}]}], ")"}], 
+    "/", 
+    RowBox[{"(", 
+     RowBox[{"\[Sqrt]", 
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", 
+            RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}], ")"}], " ", 
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT4", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+           RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}], ")"}]}], 
+     ")"}]}], ",", 
+   RowBox[{
+    RowBox[{"(", 
+     RowBox[{
+      RowBox[{
+       RowBox[{"-", "kT3"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]3", "]"}]}], "-", 
+      RowBox[{"kT4", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}], "+", 
+      RowBox[{
+       FractionBox["1", 
+        SqrtBox["2"]], 
+       RowBox[{"\[ImaginaryI]", " ", 
+        RowBox[{"(", 
+         RowBox[{
+          RowBox[{"kT3", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+          RowBox[{"kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+        RowBox[{"\[Sqrt]", 
+         RowBox[{"(", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], "+", 
+           SuperscriptBox["kT4", "2"], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT3", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT4", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+            RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}]}]}]}], ")"}], 
+    "/", 
+    RowBox[{"(", 
+     RowBox[{"\[Sqrt]", 
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", 
+            RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}], ")"}], " ", 
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT4", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+           RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}], ")"}]}], 
+     ")"}]}], ",", 
+   FractionBox["1", 
+    SqrtBox[
+     FractionBox[
+      RowBox[{
+       SuperscriptBox["kT3", "2"], "+", 
+       SuperscriptBox["kT4", "2"], "+", 
+       RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+        RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+        RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+       RowBox[{
+        SuperscriptBox["kT3", "2"], " ", 
+        RowBox[{"Cosh", "[", 
+         RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+       RowBox[{
+        SuperscriptBox["kT4", "2"], " ", 
+        RowBox[{"Cosh", "[", 
+         RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+       RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+        RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+        RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+       RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+        RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+        RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], 
+      RowBox[{
+       SuperscriptBox["kT3", "2"], "+", 
+       SuperscriptBox["kT4", "2"], "+", 
+       RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+        RowBox[{"Cos", "[", 
+         RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}]]]]}], "}"}]], "Output",\
+
+ CellChangeTimes->{3.775496434384726*^9},
+ CellLabel->
+  "Out[112]=",ExpressionUUID->"6c5ab671-9271-4d6d-941f-1661679185be"]
+}, Closed]],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(*", " ", 
+   RowBox[{"+", 
+    RowBox[{"-", 
+     RowBox[{"+", "-"}]}]}], " ", "*)"}], "\[IndentingNewLine]", 
+  RowBox[{
+   RowBox[{
+    RowBox[{"config", "=", "\"\<+-+-\>\""}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"pairdef", "[", 
+     RowBox[{"1", ",", 
+      RowBox[{"-", "1"}], ",", "1", ",", 
+      RowBox[{"-", "1"}]}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"tsub", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"triangle", "//.", "SubFourVecs"}], "/.", "MATColor"}]}], ";"}],
+    "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<triangle_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "tsub"}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub1", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box1", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub2", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box2", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub3", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box3", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub4", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box4", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"sumbox", "=", 
+     RowBox[{
+      RowBox[{"bsub1", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub2", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub3", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub4", "[", 
+       RowBox[{"[", "1", "]"}], "]"}]}]}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<box_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "sumbox"}], "]"}], ";"}]}]}]], "Input",
+ CellChangeTimes->{{3.774352273302424*^9, 3.774352278179654*^9}, 
+   3.7743528399898767`*^9, {3.774364868115095*^9, 3.774364868379517*^9}, {
+   3.775496254973625*^9, 3.775496262224195*^9}},
+ CellLabel->
+  "In[113]:=",ExpressionUUID->"f1b82eb6-3e5a-4cf7-9deb-3109924714c4"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{"ek1vec", "\[IndentingNewLine]", "ek2vec", \
+"\[IndentingNewLine]", "ek4vec", "\[IndentingNewLine]", "ek5vec"}], "Input",
+ CellLabel->
+  "In[123]:=",ExpressionUUID->"5d0e564a-ae95-4bd5-a6cc-af961332242f"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{"-", 
+    FractionBox["1", 
+     SqrtBox["2"]]}], ",", 
+   RowBox[{"-", 
+    FractionBox["\[ImaginaryI]", 
+     SqrtBox["2"]]}], ",", "0"}], "}"}]], "Output",
+ CellChangeTimes->{3.775496660867567*^9},
+ CellLabel->
+  "Out[123]=",ExpressionUUID->"9fb01334-2129-4aec-994f-886876491615"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   FractionBox["1", 
+    SqrtBox["2"]], ",", 
+   FractionBox["\[ImaginaryI]", 
+    SqrtBox["2"]], ",", "0"}], "}"}]], "Output",
+ CellChangeTimes->{3.7754966608774843`*^9},
+ CellLabel->
+  "Out[124]=",ExpressionUUID->"7df88261-7455-4dcf-a0de-7b4494d6ea05"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{"-", 
+    FractionBox[
+     RowBox[{
+      RowBox[{"Sech", "[", "\[Eta]4", "]"}], " ", 
+      RowBox[{"Sinh", "[", 
+       RowBox[{"\[Eta]4", "-", 
+        RowBox[{"\[ImaginaryI]", " ", "\[Phi]4"}]}], "]"}]}], 
+     SqrtBox["2"]]}], ",", 
+   RowBox[{"-", 
+    FractionBox[
+     RowBox[{
+      RowBox[{"\[ImaginaryI]", " ", 
+       RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+      RowBox[{
+       RowBox[{"Sin", "[", "\[Phi]4", "]"}], " ", 
+       RowBox[{"Tanh", "[", "\[Eta]4", "]"}]}]}], 
+     SqrtBox["2"]]}], ",", 
+   FractionBox[
+    RowBox[{"Sech", "[", "\[Eta]4", "]"}], 
+    SqrtBox["2"]]}], "}"}]], "Output",
+ CellChangeTimes->{3.775496660893093*^9},
+ CellLabel->
+  "Out[125]=",ExpressionUUID->"73f9133d-e1ae-4484-9c71-cead4cfc2778"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{
+    RowBox[{"(", 
+     RowBox[{
+      RowBox[{"kT3", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]3", "]"}]}], "+", 
+      RowBox[{"kT4", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}], "-", 
+      RowBox[{
+       FractionBox["1", 
+        SqrtBox["2"]], 
+       RowBox[{"\[ImaginaryI]", " ", 
+        RowBox[{"(", 
+         RowBox[{
+          RowBox[{"kT3", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+          RowBox[{"kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+        RowBox[{"\[Sqrt]", 
+         RowBox[{"(", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], "+", 
+           SuperscriptBox["kT4", "2"], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT3", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT4", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+            RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}]}]}]}], ")"}], 
+    "/", 
+    RowBox[{"(", 
+     RowBox[{"\[Sqrt]", 
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", 
+            RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}], ")"}], " ", 
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT4", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+           RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}], ")"}]}], 
+     ")"}]}], ",", 
+   RowBox[{
+    RowBox[{"(", 
+     RowBox[{
+      RowBox[{"kT3", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]3", "]"}]}], "+", 
+      RowBox[{"kT4", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}], "+", 
+      RowBox[{
+       FractionBox["1", 
+        SqrtBox["2"]], 
+       RowBox[{"\[ImaginaryI]", " ", 
+        RowBox[{"(", 
+         RowBox[{
+          RowBox[{"kT3", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+          RowBox[{"kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+        RowBox[{"\[Sqrt]", 
+         RowBox[{"(", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], "+", 
+           SuperscriptBox["kT4", "2"], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT3", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT4", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+            RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}]}]}]}], ")"}], 
+    "/", 
+    RowBox[{"(", 
+     RowBox[{"\[Sqrt]", 
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", 
+            RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}], ")"}], " ", 
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT4", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+           RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}], ")"}]}], 
+     ")"}]}], ",", 
+   RowBox[{"-", 
+    FractionBox["1", 
+     SqrtBox[
+      FractionBox[
+       RowBox[{
+        SuperscriptBox["kT3", "2"], "+", 
+        SuperscriptBox["kT4", "2"], "+", 
+        RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+         RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+         RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+        RowBox[{
+         SuperscriptBox["kT3", "2"], " ", 
+         RowBox[{"Cosh", "[", 
+          RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+        RowBox[{
+         SuperscriptBox["kT4", "2"], " ", 
+         RowBox[{"Cosh", "[", 
+          RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+        RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+         RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+         RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+        RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+         RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+         RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], 
+       RowBox[{
+        SuperscriptBox["kT3", "2"], "+", 
+        SuperscriptBox["kT4", "2"], "+", 
+        RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+         RowBox[{"Cos", "[", 
+          RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}]]]]}]}], 
+  "}"}]], "Output",
+ CellChangeTimes->{3.77549666091581*^9},
+ CellLabel->
+  "Out[126]=",ExpressionUUID->"d00bf2c3-bcc7-4d1d-9603-58fce399f9be"]
+}, Closed]],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(*", " ", 
+   RowBox[{"+", 
+    RowBox[{"--", "+"}]}], " ", "*)"}], "\[IndentingNewLine]", 
+  RowBox[{
+   RowBox[{
+    RowBox[{"config", "=", "\"\<+--+\>\""}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"pairdef", "[", 
+     RowBox[{"1", ",", 
+      RowBox[{"-", "1"}], ",", 
+      RowBox[{"-", "1"}], ",", "1"}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"tsub", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"triangle", "//.", "SubFourVecs"}], "/.", "MATColor"}]}], ";"}],
+    "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<triangle_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "tsub"}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub1", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box1", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub2", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box2", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub3", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box3", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub4", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box4", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"sumbox", "=", 
+     RowBox[{
+      RowBox[{"bsub1", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub2", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub3", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub4", "[", 
+       RowBox[{"[", "1", "]"}], "]"}]}]}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<box_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "sumbox"}], "]"}], ";"}]}]}]], "Input",
+ CellChangeTimes->{{3.774352293453846*^9, 3.7743522993176413`*^9}, 
+   3.774352845194046*^9, {3.7743648708807707`*^9, 3.7743648711612997`*^9}, {
+   3.7754964165912733`*^9, 3.775496422911582*^9}},
+ CellLabel->
+  "In[127]:=",ExpressionUUID->"ea09958c-619e-47a8-ba2e-3c72622f3837"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{"ek1vec", "\[IndentingNewLine]", "ek2vec", \
+"\[IndentingNewLine]", "ek4vec", "\[IndentingNewLine]", "ek5vec"}], "Input",
+ CellLabel->
+  "In[137]:=",ExpressionUUID->"49c8fe2c-a955-4a56-b5d2-645fdd8ee1b8"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{"-", 
+    FractionBox["1", 
+     SqrtBox["2"]]}], ",", 
+   RowBox[{"-", 
+    FractionBox["\[ImaginaryI]", 
+     SqrtBox["2"]]}], ",", "0"}], "}"}]], "Output",
+ CellChangeTimes->{3.775496828904537*^9},
+ CellLabel->
+  "Out[137]=",ExpressionUUID->"ac928864-fb46-4277-a04b-a9984873ba5e"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   FractionBox["1", 
+    SqrtBox["2"]], ",", 
+   FractionBox["\[ImaginaryI]", 
+    SqrtBox["2"]], ",", "0"}], "}"}]], "Output",
+ CellChangeTimes->{3.7754968289145823`*^9},
+ CellLabel->
+  "Out[138]=",ExpressionUUID->"9bf967d4-1cd5-43e7-b270-9802dbd89330"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   FractionBox[
+    RowBox[{
+     RowBox[{"Sech", "[", "\[Eta]4", "]"}], " ", 
+     RowBox[{"Sinh", "[", 
+      RowBox[{"\[Eta]4", "+", 
+       RowBox[{"\[ImaginaryI]", " ", "\[Phi]4"}]}], "]"}]}], 
+    SqrtBox["2"]], ",", 
+   FractionBox[
+    RowBox[{
+     RowBox[{
+      RowBox[{"-", "\[ImaginaryI]"}], " ", 
+      RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+     RowBox[{
+      RowBox[{"Sin", "[", "\[Phi]4", "]"}], " ", 
+      RowBox[{"Tanh", "[", "\[Eta]4", "]"}]}]}], 
+    SqrtBox["2"]], ",", 
+   RowBox[{"-", 
+    FractionBox[
+     RowBox[{"Sech", "[", "\[Eta]4", "]"}], 
+     SqrtBox["2"]]}]}], "}"}]], "Output",
+ CellChangeTimes->{3.775496828923019*^9},
+ CellLabel->
+  "Out[139]=",ExpressionUUID->"e531c14c-844f-4ad1-9bfb-471d4db9b31e"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{
+    RowBox[{"(", 
+     RowBox[{
+      RowBox[{
+       RowBox[{"-", "kT3"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]3", "]"}]}], "-", 
+      RowBox[{"kT4", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}], "-", 
+      RowBox[{
+       FractionBox["1", 
+        SqrtBox["2"]], 
+       RowBox[{"\[ImaginaryI]", " ", 
+        RowBox[{"(", 
+         RowBox[{
+          RowBox[{"kT3", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+          RowBox[{"kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+        RowBox[{"\[Sqrt]", 
+         RowBox[{"(", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], "+", 
+           SuperscriptBox["kT4", "2"], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT3", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT4", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+            RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}]}]}]}], ")"}], 
+    "/", 
+    RowBox[{"(", 
+     RowBox[{"\[Sqrt]", 
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", 
+            RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}], ")"}], " ", 
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT4", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+           RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}], ")"}]}], 
+     ")"}]}], ",", 
+   RowBox[{
+    RowBox[{"(", 
+     RowBox[{
+      RowBox[{
+       RowBox[{"-", "kT3"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]3", "]"}]}], "-", 
+      RowBox[{"kT4", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}], "+", 
+      RowBox[{
+       FractionBox["1", 
+        SqrtBox["2"]], 
+       RowBox[{"\[ImaginaryI]", " ", 
+        RowBox[{"(", 
+         RowBox[{
+          RowBox[{"kT3", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+          RowBox[{"kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+        RowBox[{"\[Sqrt]", 
+         RowBox[{"(", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], "+", 
+           SuperscriptBox["kT4", "2"], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT3", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT4", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+            RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}]}]}]}], ")"}], 
+    "/", 
+    RowBox[{"(", 
+     RowBox[{"\[Sqrt]", 
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", 
+            RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}], ")"}], " ", 
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT4", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+           RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}], ")"}]}], 
+     ")"}]}], ",", 
+   FractionBox["1", 
+    SqrtBox[
+     FractionBox[
+      RowBox[{
+       SuperscriptBox["kT3", "2"], "+", 
+       SuperscriptBox["kT4", "2"], "+", 
+       RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+        RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+        RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+       RowBox[{
+        SuperscriptBox["kT3", "2"], " ", 
+        RowBox[{"Cosh", "[", 
+         RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+       RowBox[{
+        SuperscriptBox["kT4", "2"], " ", 
+        RowBox[{"Cosh", "[", 
+         RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+       RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+        RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+        RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+       RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+        RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+        RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], 
+      RowBox[{
+       SuperscriptBox["kT3", "2"], "+", 
+       SuperscriptBox["kT4", "2"], "+", 
+       RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+        RowBox[{"Cos", "[", 
+         RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}]]]]}], "}"}]], "Output",\
+
+ CellChangeTimes->{3.7754968289393587`*^9},
+ CellLabel->
+  "Out[140]=",ExpressionUUID->"9030a139-1619-4bd0-baa7-f65aaed95fc1"]
+}, Closed]],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(*", " ", 
+   RowBox[{"+", 
+    RowBox[{"--", "-"}]}], " ", "*)"}], "\[IndentingNewLine]", 
+  RowBox[{
+   RowBox[{
+    RowBox[{"config", "=", "\"\<+---\>\""}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"pairdef", "[", 
+     RowBox[{"1", ",", 
+      RowBox[{"-", "1"}], ",", 
+      RowBox[{"-", "1"}], ",", 
+      RowBox[{"-", "1"}]}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"tsub", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"triangle", "//.", "SubFourVecs"}], "/.", "MATColor"}]}], ";"}],
+    "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<triangle_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "tsub"}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub1", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box1", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub2", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box2", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub3", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box3", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub4", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box4", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"sumbox", "=", 
+     RowBox[{
+      RowBox[{"bsub1", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub2", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub3", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub4", "[", 
+       RowBox[{"[", "1", "]"}], "]"}]}]}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<box_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "sumbox"}], "]"}], ";"}]}]}]], "Input",
+ CellChangeTimes->{{3.7743523076196537`*^9, 3.774352310862866*^9}, 
+   3.774352847449963*^9, {3.774364873150992*^9, 3.774364873470278*^9}, {
+   3.775496427523074*^9, 3.775496434270932*^9}},
+ CellLabel->
+  "In[141]:=",ExpressionUUID->"109d8c91-098d-43cf-8963-751531807ae7"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{"ek1vec", "\[IndentingNewLine]", "ek2vec", \
+"\[IndentingNewLine]", "ek4vec", "\[IndentingNewLine]", "ek5vec"}], "Input",
+ CellLabel->
+  "In[151]:=",ExpressionUUID->"133b9470-d798-489d-8481-9a8a3698a3a8"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{"-", 
+    FractionBox["1", 
+     SqrtBox["2"]]}], ",", 
+   RowBox[{"-", 
+    FractionBox["\[ImaginaryI]", 
+     SqrtBox["2"]]}], ",", "0"}], "}"}]], "Output",
+ CellChangeTimes->{3.775496985041739*^9},
+ CellLabel->
+  "Out[151]=",ExpressionUUID->"52c45524-838a-46a1-9ad1-7648b6637a0a"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   FractionBox["1", 
+    SqrtBox["2"]], ",", 
+   FractionBox["\[ImaginaryI]", 
+    SqrtBox["2"]], ",", "0"}], "}"}]], "Output",
+ CellChangeTimes->{3.7754969850580997`*^9},
+ CellLabel->
+  "Out[152]=",ExpressionUUID->"921a68f6-d009-4488-b8f7-58a4a926ca24"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   FractionBox[
+    RowBox[{
+     RowBox[{"Sech", "[", "\[Eta]4", "]"}], " ", 
+     RowBox[{"Sinh", "[", 
+      RowBox[{"\[Eta]4", "+", 
+       RowBox[{"\[ImaginaryI]", " ", "\[Phi]4"}]}], "]"}]}], 
+    SqrtBox["2"]], ",", 
+   FractionBox[
+    RowBox[{
+     RowBox[{
+      RowBox[{"-", "\[ImaginaryI]"}], " ", 
+      RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+     RowBox[{
+      RowBox[{"Sin", "[", "\[Phi]4", "]"}], " ", 
+      RowBox[{"Tanh", "[", "\[Eta]4", "]"}]}]}], 
+    SqrtBox["2"]], ",", 
+   RowBox[{"-", 
+    FractionBox[
+     RowBox[{"Sech", "[", "\[Eta]4", "]"}], 
+     SqrtBox["2"]]}]}], "}"}]], "Output",
+ CellChangeTimes->{3.775496985068839*^9},
+ CellLabel->
+  "Out[153]=",ExpressionUUID->"dd1b4ff6-53c6-45ef-9a44-0b1769b80634"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{
+    RowBox[{"(", 
+     RowBox[{
+      RowBox[{"kT3", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]3", "]"}]}], "+", 
+      RowBox[{"kT4", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}], "-", 
+      RowBox[{
+       FractionBox["1", 
+        SqrtBox["2"]], 
+       RowBox[{"\[ImaginaryI]", " ", 
+        RowBox[{"(", 
+         RowBox[{
+          RowBox[{"kT3", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+          RowBox[{"kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+        RowBox[{"\[Sqrt]", 
+         RowBox[{"(", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], "+", 
+           SuperscriptBox["kT4", "2"], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT3", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT4", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+            RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}]}]}]}], ")"}], 
+    "/", 
+    RowBox[{"(", 
+     RowBox[{"\[Sqrt]", 
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", 
+            RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}], ")"}], " ", 
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT4", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+           RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}], ")"}]}], 
+     ")"}]}], ",", 
+   RowBox[{
+    RowBox[{"(", 
+     RowBox[{
+      RowBox[{"kT3", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]3", "]"}]}], "+", 
+      RowBox[{"kT4", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}], "+", 
+      RowBox[{
+       FractionBox["1", 
+        SqrtBox["2"]], 
+       RowBox[{"\[ImaginaryI]", " ", 
+        RowBox[{"(", 
+         RowBox[{
+          RowBox[{"kT3", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+          RowBox[{"kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+        RowBox[{"\[Sqrt]", 
+         RowBox[{"(", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], "+", 
+           SuperscriptBox["kT4", "2"], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT3", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT4", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+            RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}]}]}]}], ")"}], 
+    "/", 
+    RowBox[{"(", 
+     RowBox[{"\[Sqrt]", 
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", 
+            RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}], ")"}], " ", 
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT4", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+           RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}], ")"}]}], 
+     ")"}]}], ",", 
+   RowBox[{"-", 
+    FractionBox["1", 
+     SqrtBox[
+      FractionBox[
+       RowBox[{
+        SuperscriptBox["kT3", "2"], "+", 
+        SuperscriptBox["kT4", "2"], "+", 
+        RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+         RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+         RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+        RowBox[{
+         SuperscriptBox["kT3", "2"], " ", 
+         RowBox[{"Cosh", "[", 
+          RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+        RowBox[{
+         SuperscriptBox["kT4", "2"], " ", 
+         RowBox[{"Cosh", "[", 
+          RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+        RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+         RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+         RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+        RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+         RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+         RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], 
+       RowBox[{
+        SuperscriptBox["kT3", "2"], "+", 
+        SuperscriptBox["kT4", "2"], "+", 
+        RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+         RowBox[{"Cos", "[", 
+          RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}]]]]}]}], 
+  "}"}]], "Output",
+ CellChangeTimes->{3.775496985083159*^9},
+ CellLabel->
+  "Out[154]=",ExpressionUUID->"1328d2bc-b60d-4dff-a61f-fafce78b861e"]
+}, Closed]],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(*", " ", 
+   RowBox[{"-", 
+    RowBox[{"++", "+"}]}], " ", "*)"}], "\[IndentingNewLine]", 
+  RowBox[{
+   RowBox[{
+    RowBox[{"config", "=", "\"\<-+++\>\""}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"pairdef", "[", 
+     RowBox[{
+      RowBox[{"-", "1"}], ",", "1", ",", "1", ",", "1"}], "]"}], ";"}], 
+   "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"tsub", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"triangle", "//.", "SubFourVecs"}], "/.", "MATColor"}]}], ";"}],
+    "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<triangle_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "tsub"}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub1", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box1", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub2", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box2", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub3", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box3", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub4", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box4", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"sumbox", "=", 
+     RowBox[{
+      RowBox[{"bsub1", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub2", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub3", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub4", "[", 
+       RowBox[{"[", "1", "]"}], "]"}]}]}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<box_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "sumbox"}], "]"}], ";"}]}]}]], "Input",
+ CellChangeTimes->{{3.7743523173610086`*^9, 3.7743523280971813`*^9}, 
+   3.774352858488297*^9, {3.7743648755870953`*^9, 3.774364876566372*^9}, {
+   3.775496439874864*^9, 3.775496447799618*^9}},
+ CellLabel->
+  "In[155]:=",ExpressionUUID->"90ea42ce-b398-4fbc-bd9f-f41999d112ee"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{"ek1vec", "\[IndentingNewLine]", "ek2vec", \
+"\[IndentingNewLine]", "ek4vec", "\[IndentingNewLine]", "ek5vec"}], "Input",
+ CellLabel->
+  "In[165]:=",ExpressionUUID->"aeeee502-d9db-4ade-88d9-b512c4326bb6"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   FractionBox["1", 
+    SqrtBox["2"]], ",", 
+   RowBox[{"-", 
+    FractionBox["\[ImaginaryI]", 
+     SqrtBox["2"]]}], ",", "0"}], "}"}]], "Output",
+ CellChangeTimes->{3.775497102445105*^9},
+ CellLabel->
+  "Out[165]=",ExpressionUUID->"9031a0a9-cf9d-437b-8216-b065685cc651"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{"-", 
+    FractionBox["1", 
+     SqrtBox["2"]]}], ",", 
+   FractionBox["\[ImaginaryI]", 
+    SqrtBox["2"]], ",", "0"}], "}"}]], "Output",
+ CellChangeTimes->{3.775497102457593*^9},
+ CellLabel->
+  "Out[166]=",ExpressionUUID->"2c6398cd-b359-4fe5-a36e-0b40aa0a73ac"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{"-", 
+    FractionBox[
+     RowBox[{
+      RowBox[{"Sech", "[", "\[Eta]4", "]"}], " ", 
+      RowBox[{"Sinh", "[", 
+       RowBox[{"\[Eta]4", "-", 
+        RowBox[{"\[ImaginaryI]", " ", "\[Phi]4"}]}], "]"}]}], 
+     SqrtBox["2"]]}], ",", 
+   RowBox[{"-", 
+    FractionBox[
+     RowBox[{
+      RowBox[{"\[ImaginaryI]", " ", 
+       RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+      RowBox[{
+       RowBox[{"Sin", "[", "\[Phi]4", "]"}], " ", 
+       RowBox[{"Tanh", "[", "\[Eta]4", "]"}]}]}], 
+     SqrtBox["2"]]}], ",", 
+   FractionBox[
+    RowBox[{"Sech", "[", "\[Eta]4", "]"}], 
+    SqrtBox["2"]]}], "}"}]], "Output",
+ CellChangeTimes->{3.77549710246371*^9},
+ CellLabel->
+  "Out[167]=",ExpressionUUID->"d0c4ab05-2228-4b3d-b9f0-380f03f445fc"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{
+    RowBox[{"(", 
+     RowBox[{
+      RowBox[{
+       RowBox[{"-", "kT3"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]3", "]"}]}], "-", 
+      RowBox[{"kT4", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}], "-", 
+      RowBox[{
+       FractionBox["1", 
+        SqrtBox["2"]], 
+       RowBox[{"\[ImaginaryI]", " ", 
+        RowBox[{"(", 
+         RowBox[{
+          RowBox[{"kT3", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+          RowBox[{"kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+        RowBox[{"\[Sqrt]", 
+         RowBox[{"(", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], "+", 
+           SuperscriptBox["kT4", "2"], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT3", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT4", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+            RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}]}]}]}], ")"}], 
+    "/", 
+    RowBox[{"(", 
+     RowBox[{"\[Sqrt]", 
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", 
+            RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}], ")"}], " ", 
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT4", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+           RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}], ")"}]}], 
+     ")"}]}], ",", 
+   RowBox[{
+    RowBox[{"(", 
+     RowBox[{
+      RowBox[{
+       RowBox[{"-", "kT3"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]3", "]"}]}], "-", 
+      RowBox[{"kT4", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}], "+", 
+      RowBox[{
+       FractionBox["1", 
+        SqrtBox["2"]], 
+       RowBox[{"\[ImaginaryI]", " ", 
+        RowBox[{"(", 
+         RowBox[{
+          RowBox[{"kT3", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+          RowBox[{"kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+        RowBox[{"\[Sqrt]", 
+         RowBox[{"(", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], "+", 
+           SuperscriptBox["kT4", "2"], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT3", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT4", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+            RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}]}]}]}], ")"}], 
+    "/", 
+    RowBox[{"(", 
+     RowBox[{"\[Sqrt]", 
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", 
+            RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}], ")"}], " ", 
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT4", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+           RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}], ")"}]}], 
+     ")"}]}], ",", 
+   FractionBox["1", 
+    SqrtBox[
+     FractionBox[
+      RowBox[{
+       SuperscriptBox["kT3", "2"], "+", 
+       SuperscriptBox["kT4", "2"], "+", 
+       RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+        RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+        RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+       RowBox[{
+        SuperscriptBox["kT3", "2"], " ", 
+        RowBox[{"Cosh", "[", 
+         RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+       RowBox[{
+        SuperscriptBox["kT4", "2"], " ", 
+        RowBox[{"Cosh", "[", 
+         RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+       RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+        RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+        RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+       RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+        RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+        RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], 
+      RowBox[{
+       SuperscriptBox["kT3", "2"], "+", 
+       SuperscriptBox["kT4", "2"], "+", 
+       RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+        RowBox[{"Cos", "[", 
+         RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}]]]]}], "}"}]], "Output",\
+
+ CellChangeTimes->{3.775497102471272*^9},
+ CellLabel->
+  "Out[168]=",ExpressionUUID->"25c04453-c4d9-49a8-b58e-b82acd1058e8"]
+}, Closed]],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(*", " ", 
+   RowBox[{"-", 
+    RowBox[{"++", "-"}]}], " ", "*)"}], "\[IndentingNewLine]", 
+  RowBox[{
+   RowBox[{
+    RowBox[{"config", "=", "\"\<-++-\>\""}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"pairdef", "[", 
+     RowBox[{
+      RowBox[{"-", "1"}], ",", "1", ",", "1", ",", 
+      RowBox[{"-", "1"}]}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"tsub", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"triangle", "//.", "SubFourVecs"}], "/.", "MATColor"}]}], ";"}],
+    "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<triangle_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "tsub"}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub1", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box1", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub2", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box2", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub3", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box3", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub4", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box4", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"sumbox", "=", 
+     RowBox[{
+      RowBox[{"bsub1", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub2", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub3", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub4", "[", 
+       RowBox[{"[", "1", "]"}], "]"}]}]}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<box_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "sumbox"}], "]"}], ";"}]}]}]], "Input",
+ CellChangeTimes->{{3.77435233561648*^9, 3.7743523421620617`*^9}, 
+   3.774352860614139*^9, {3.774364879285968*^9, 3.774364879609729*^9}, {
+   3.775496454326095*^9, 3.775496461326519*^9}},
+ CellLabel->
+  "In[169]:=",ExpressionUUID->"eda41e35-0731-4f86-8fd3-b64e5553fef0"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{"ek1vec", "\[IndentingNewLine]", "ek2vec", \
+"\[IndentingNewLine]", "ek4vec", "\[IndentingNewLine]", "ek5vec"}], "Input",
+ CellLabel->
+  "In[179]:=",ExpressionUUID->"0e9ee2b7-6c7f-44b1-9f11-5d09fdee3c8a"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   FractionBox["1", 
+    SqrtBox["2"]], ",", 
+   RowBox[{"-", 
+    FractionBox["\[ImaginaryI]", 
+     SqrtBox["2"]]}], ",", "0"}], "}"}]], "Output",
+ CellChangeTimes->{3.775497207798451*^9},
+ CellLabel->
+  "Out[179]=",ExpressionUUID->"564638da-a074-4583-95bd-4f2f8cba6de0"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{"-", 
+    FractionBox["1", 
+     SqrtBox["2"]]}], ",", 
+   FractionBox["\[ImaginaryI]", 
+    SqrtBox["2"]], ",", "0"}], "}"}]], "Output",
+ CellChangeTimes->{3.775497207806608*^9},
+ CellLabel->
+  "Out[180]=",ExpressionUUID->"ead6394e-5d7d-4027-bf26-da5af46080e0"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{"-", 
+    FractionBox[
+     RowBox[{
+      RowBox[{"Sech", "[", "\[Eta]4", "]"}], " ", 
+      RowBox[{"Sinh", "[", 
+       RowBox[{"\[Eta]4", "-", 
+        RowBox[{"\[ImaginaryI]", " ", "\[Phi]4"}]}], "]"}]}], 
+     SqrtBox["2"]]}], ",", 
+   RowBox[{"-", 
+    FractionBox[
+     RowBox[{
+      RowBox[{"\[ImaginaryI]", " ", 
+       RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+      RowBox[{
+       RowBox[{"Sin", "[", "\[Phi]4", "]"}], " ", 
+       RowBox[{"Tanh", "[", "\[Eta]4", "]"}]}]}], 
+     SqrtBox["2"]]}], ",", 
+   FractionBox[
+    RowBox[{"Sech", "[", "\[Eta]4", "]"}], 
+    SqrtBox["2"]]}], "}"}]], "Output",
+ CellChangeTimes->{3.7754972078141117`*^9},
+ CellLabel->
+  "Out[181]=",ExpressionUUID->"05920693-2791-461f-bb39-d05893eff923"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{
+    RowBox[{"(", 
+     RowBox[{
+      RowBox[{"kT3", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]3", "]"}]}], "+", 
+      RowBox[{"kT4", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}], "-", 
+      RowBox[{
+       FractionBox["1", 
+        SqrtBox["2"]], 
+       RowBox[{"\[ImaginaryI]", " ", 
+        RowBox[{"(", 
+         RowBox[{
+          RowBox[{"kT3", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+          RowBox[{"kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+        RowBox[{"\[Sqrt]", 
+         RowBox[{"(", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], "+", 
+           SuperscriptBox["kT4", "2"], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT3", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT4", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+            RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}]}]}]}], ")"}], 
+    "/", 
+    RowBox[{"(", 
+     RowBox[{"\[Sqrt]", 
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", 
+            RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}], ")"}], " ", 
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT4", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+           RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}], ")"}]}], 
+     ")"}]}], ",", 
+   RowBox[{
+    RowBox[{"(", 
+     RowBox[{
+      RowBox[{"kT3", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]3", "]"}]}], "+", 
+      RowBox[{"kT4", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}], "+", 
+      RowBox[{
+       FractionBox["1", 
+        SqrtBox["2"]], 
+       RowBox[{"\[ImaginaryI]", " ", 
+        RowBox[{"(", 
+         RowBox[{
+          RowBox[{"kT3", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+          RowBox[{"kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+        RowBox[{"\[Sqrt]", 
+         RowBox[{"(", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], "+", 
+           SuperscriptBox["kT4", "2"], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT3", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT4", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+            RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}]}]}]}], ")"}], 
+    "/", 
+    RowBox[{"(", 
+     RowBox[{"\[Sqrt]", 
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", 
+            RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}], ")"}], " ", 
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT4", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+           RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}], ")"}]}], 
+     ")"}]}], ",", 
+   RowBox[{"-", 
+    FractionBox["1", 
+     SqrtBox[
+      FractionBox[
+       RowBox[{
+        SuperscriptBox["kT3", "2"], "+", 
+        SuperscriptBox["kT4", "2"], "+", 
+        RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+         RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+         RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+        RowBox[{
+         SuperscriptBox["kT3", "2"], " ", 
+         RowBox[{"Cosh", "[", 
+          RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+        RowBox[{
+         SuperscriptBox["kT4", "2"], " ", 
+         RowBox[{"Cosh", "[", 
+          RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+        RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+         RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+         RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+        RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+         RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+         RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], 
+       RowBox[{
+        SuperscriptBox["kT3", "2"], "+", 
+        SuperscriptBox["kT4", "2"], "+", 
+        RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+         RowBox[{"Cos", "[", 
+          RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}]]]]}]}], 
+  "}"}]], "Output",
+ CellChangeTimes->{3.77549720782825*^9},
+ CellLabel->
+  "Out[182]=",ExpressionUUID->"4d737b53-7257-44f3-b230-4b20b7cf4403"]
+}, Closed]],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(*", " ", 
+   RowBox[{"-", 
+    RowBox[{"+", 
+     RowBox[{"-", "+"}]}]}], " ", "*)"}], "\[IndentingNewLine]", 
+  RowBox[{
+   RowBox[{
+    RowBox[{"config", "=", "\"\<-+-+\>\""}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"pairdef", "[", 
+     RowBox[{
+      RowBox[{"-", "1"}], ",", "1", ",", 
+      RowBox[{"-", "1"}], ",", "1"}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"tsub", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"triangle", "//.", "SubFourVecs"}], "/.", "MATColor"}]}], ";"}],
+    "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<triangle_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "tsub"}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub1", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box1", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub2", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box2", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub3", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box3", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub4", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box4", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"sumbox", "=", 
+     RowBox[{
+      RowBox[{"bsub1", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub2", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub3", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub4", "[", 
+       RowBox[{"[", "1", "]"}], "]"}]}]}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<box_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "sumbox"}], "]"}], ";"}]}]}]], "Input",
+ CellChangeTimes->{{3.774352349907421*^9, 3.774352359869708*^9}, 
+   3.774352862947967*^9, {3.774365871990572*^9, 3.774365872779541*^9}, {
+   3.775496464963257*^9, 3.775496471995942*^9}},
+ CellLabel->
+  "In[183]:=",ExpressionUUID->"b4e55406-dd72-45f8-a3b3-34f05228afd8"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{"ek1vec", "\[IndentingNewLine]", "ek2vec", \
+"\[IndentingNewLine]", "ek4vec", "\[IndentingNewLine]", "ek5vec"}], "Input",
+ CellLabel->
+  "In[193]:=",ExpressionUUID->"31473832-1b3e-4feb-9476-fa165b39ef5b"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   FractionBox["1", 
+    SqrtBox["2"]], ",", 
+   RowBox[{"-", 
+    FractionBox["\[ImaginaryI]", 
+     SqrtBox["2"]]}], ",", "0"}], "}"}]], "Output",
+ CellChangeTimes->{3.775497344555745*^9},
+ CellLabel->
+  "Out[193]=",ExpressionUUID->"49c964a7-ca37-4ece-b767-4725d6cd726d"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{"-", 
+    FractionBox["1", 
+     SqrtBox["2"]]}], ",", 
+   FractionBox["\[ImaginaryI]", 
+    SqrtBox["2"]], ",", "0"}], "}"}]], "Output",
+ CellChangeTimes->{3.7754973445676527`*^9},
+ CellLabel->
+  "Out[194]=",ExpressionUUID->"aff9ab87-5ee7-4424-a8c5-9003da78ed6a"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   FractionBox[
+    RowBox[{
+     RowBox[{"Sech", "[", "\[Eta]4", "]"}], " ", 
+     RowBox[{"Sinh", "[", 
+      RowBox[{"\[Eta]4", "+", 
+       RowBox[{"\[ImaginaryI]", " ", "\[Phi]4"}]}], "]"}]}], 
+    SqrtBox["2"]], ",", 
+   FractionBox[
+    RowBox[{
+     RowBox[{
+      RowBox[{"-", "\[ImaginaryI]"}], " ", 
+      RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+     RowBox[{
+      RowBox[{"Sin", "[", "\[Phi]4", "]"}], " ", 
+      RowBox[{"Tanh", "[", "\[Eta]4", "]"}]}]}], 
+    SqrtBox["2"]], ",", 
+   RowBox[{"-", 
+    FractionBox[
+     RowBox[{"Sech", "[", "\[Eta]4", "]"}], 
+     SqrtBox["2"]]}]}], "}"}]], "Output",
+ CellChangeTimes->{3.775497344576572*^9},
+ CellLabel->
+  "Out[195]=",ExpressionUUID->"7255aa0b-c54c-4726-b608-3a1e1ec73f55"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{
+    RowBox[{"(", 
+     RowBox[{
+      RowBox[{
+       RowBox[{"-", "kT3"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]3", "]"}]}], "-", 
+      RowBox[{"kT4", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}], "-", 
+      RowBox[{
+       FractionBox["1", 
+        SqrtBox["2"]], 
+       RowBox[{"\[ImaginaryI]", " ", 
+        RowBox[{"(", 
+         RowBox[{
+          RowBox[{"kT3", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+          RowBox[{"kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+        RowBox[{"\[Sqrt]", 
+         RowBox[{"(", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], "+", 
+           SuperscriptBox["kT4", "2"], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT3", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT4", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+            RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}]}]}]}], ")"}], 
+    "/", 
+    RowBox[{"(", 
+     RowBox[{"\[Sqrt]", 
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", 
+            RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}], ")"}], " ", 
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT4", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+           RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}], ")"}]}], 
+     ")"}]}], ",", 
+   RowBox[{
+    RowBox[{"(", 
+     RowBox[{
+      RowBox[{
+       RowBox[{"-", "kT3"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]3", "]"}]}], "-", 
+      RowBox[{"kT4", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}], "+", 
+      RowBox[{
+       FractionBox["1", 
+        SqrtBox["2"]], 
+       RowBox[{"\[ImaginaryI]", " ", 
+        RowBox[{"(", 
+         RowBox[{
+          RowBox[{"kT3", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+          RowBox[{"kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+        RowBox[{"\[Sqrt]", 
+         RowBox[{"(", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], "+", 
+           SuperscriptBox["kT4", "2"], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT3", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT4", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+            RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}]}]}]}], ")"}], 
+    "/", 
+    RowBox[{"(", 
+     RowBox[{"\[Sqrt]", 
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", 
+            RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}], ")"}], " ", 
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT4", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+           RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}], ")"}]}], 
+     ")"}]}], ",", 
+   FractionBox["1", 
+    SqrtBox[
+     FractionBox[
+      RowBox[{
+       SuperscriptBox["kT3", "2"], "+", 
+       SuperscriptBox["kT4", "2"], "+", 
+       RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+        RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+        RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+       RowBox[{
+        SuperscriptBox["kT3", "2"], " ", 
+        RowBox[{"Cosh", "[", 
+         RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+       RowBox[{
+        SuperscriptBox["kT4", "2"], " ", 
+        RowBox[{"Cosh", "[", 
+         RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+       RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+        RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+        RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+       RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+        RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+        RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], 
+      RowBox[{
+       SuperscriptBox["kT3", "2"], "+", 
+       SuperscriptBox["kT4", "2"], "+", 
+       RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+        RowBox[{"Cos", "[", 
+         RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}]]]]}], "}"}]], "Output",\
+
+ CellChangeTimes->{3.7754973446010847`*^9},
+ CellLabel->
+  "Out[196]=",ExpressionUUID->"7676935b-3e9e-423c-9495-99c76e7836d8"]
+}, Closed]],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(*", " ", 
+   RowBox[{"-", 
+    RowBox[{"+", "--"}]}], " ", "*)"}], "\[IndentingNewLine]", 
+  RowBox[{
+   RowBox[{
+    RowBox[{"config", "=", "\"\<-+--\>\""}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"pairdef", "[", 
+     RowBox[{
+      RowBox[{"-", "1"}], ",", "1", ",", 
+      RowBox[{"-", "1"}], ",", 
+      RowBox[{"-", "1"}]}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"tsub", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"triangle", "//.", "SubFourVecs"}], "/.", "MATColor"}]}], ";"}],
+    "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<triangle_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "tsub"}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub1", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box1", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub2", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box2", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub3", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box3", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub4", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box4", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"sumbox", "=", 
+     RowBox[{
+      RowBox[{"bsub1", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub2", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub3", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub4", "[", 
+       RowBox[{"[", "1", "]"}], "]"}]}]}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<box_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "sumbox"}], "]"}], ";"}]}]}]], "Input",
+ CellChangeTimes->{{3.77435236671383*^9, 3.774352386298221*^9}, {
+   3.774352466818277*^9, 3.774352467649146*^9}, 3.774352865354597*^9, {
+   3.7743648829489393`*^9, 3.774364883197905*^9}, {3.775496532325181*^9, 
+   3.7754965403423853`*^9}},
+ CellLabel->
+  "In[197]:=",ExpressionUUID->"17600b0b-71c8-4b17-9c49-9fa20ea3d684"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{"ek1vec", "\[IndentingNewLine]", "ek2vec", \
+"\[IndentingNewLine]", "ek4vec", "\[IndentingNewLine]", "ek5vec"}], "Input",
+ CellLabel->
+  "In[207]:=",ExpressionUUID->"acc3ef55-c9ff-41e2-a5ce-951fcf403a30"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   FractionBox["1", 
+    SqrtBox["2"]], ",", 
+   RowBox[{"-", 
+    FractionBox["\[ImaginaryI]", 
+     SqrtBox["2"]]}], ",", "0"}], "}"}]], "Output",
+ CellChangeTimes->{3.775497518082234*^9},
+ CellLabel->
+  "Out[207]=",ExpressionUUID->"b58e0eea-b86b-4b4d-9af9-0514d9cec5b3"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{"-", 
+    FractionBox["1", 
+     SqrtBox["2"]]}], ",", 
+   FractionBox["\[ImaginaryI]", 
+    SqrtBox["2"]], ",", "0"}], "}"}]], "Output",
+ CellChangeTimes->{3.775497518093644*^9},
+ CellLabel->
+  "Out[208]=",ExpressionUUID->"5cae39f8-cd31-4f16-9795-7943f4a5fa19"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   FractionBox[
+    RowBox[{
+     RowBox[{"Sech", "[", "\[Eta]4", "]"}], " ", 
+     RowBox[{"Sinh", "[", 
+      RowBox[{"\[Eta]4", "+", 
+       RowBox[{"\[ImaginaryI]", " ", "\[Phi]4"}]}], "]"}]}], 
+    SqrtBox["2"]], ",", 
+   FractionBox[
+    RowBox[{
+     RowBox[{
+      RowBox[{"-", "\[ImaginaryI]"}], " ", 
+      RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+     RowBox[{
+      RowBox[{"Sin", "[", "\[Phi]4", "]"}], " ", 
+      RowBox[{"Tanh", "[", "\[Eta]4", "]"}]}]}], 
+    SqrtBox["2"]], ",", 
+   RowBox[{"-", 
+    FractionBox[
+     RowBox[{"Sech", "[", "\[Eta]4", "]"}], 
+     SqrtBox["2"]]}]}], "}"}]], "Output",
+ CellChangeTimes->{3.775497518102331*^9},
+ CellLabel->
+  "Out[209]=",ExpressionUUID->"89c26d17-1c70-4219-a637-da8fbe3ce30e"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{
+    RowBox[{"(", 
+     RowBox[{
+      RowBox[{"kT3", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]3", "]"}]}], "+", 
+      RowBox[{"kT4", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}], "-", 
+      RowBox[{
+       FractionBox["1", 
+        SqrtBox["2"]], 
+       RowBox[{"\[ImaginaryI]", " ", 
+        RowBox[{"(", 
+         RowBox[{
+          RowBox[{"kT3", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+          RowBox[{"kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+        RowBox[{"\[Sqrt]", 
+         RowBox[{"(", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], "+", 
+           SuperscriptBox["kT4", "2"], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT3", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT4", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+            RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}]}]}]}], ")"}], 
+    "/", 
+    RowBox[{"(", 
+     RowBox[{"\[Sqrt]", 
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", 
+            RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}], ")"}], " ", 
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT4", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+           RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}], ")"}]}], 
+     ")"}]}], ",", 
+   RowBox[{
+    RowBox[{"(", 
+     RowBox[{
+      RowBox[{"kT3", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]3", "]"}]}], "+", 
+      RowBox[{"kT4", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}], "+", 
+      RowBox[{
+       FractionBox["1", 
+        SqrtBox["2"]], 
+       RowBox[{"\[ImaginaryI]", " ", 
+        RowBox[{"(", 
+         RowBox[{
+          RowBox[{"kT3", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+          RowBox[{"kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+        RowBox[{"\[Sqrt]", 
+         RowBox[{"(", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], "+", 
+           SuperscriptBox["kT4", "2"], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT3", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT4", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+            RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}]}]}]}], ")"}], 
+    "/", 
+    RowBox[{"(", 
+     RowBox[{"\[Sqrt]", 
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", 
+            RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}], ")"}], " ", 
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT4", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+           RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}], ")"}]}], 
+     ")"}]}], ",", 
+   RowBox[{"-", 
+    FractionBox["1", 
+     SqrtBox[
+      FractionBox[
+       RowBox[{
+        SuperscriptBox["kT3", "2"], "+", 
+        SuperscriptBox["kT4", "2"], "+", 
+        RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+         RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+         RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+        RowBox[{
+         SuperscriptBox["kT3", "2"], " ", 
+         RowBox[{"Cosh", "[", 
+          RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+        RowBox[{
+         SuperscriptBox["kT4", "2"], " ", 
+         RowBox[{"Cosh", "[", 
+          RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+        RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+         RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+         RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+        RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+         RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+         RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], 
+       RowBox[{
+        SuperscriptBox["kT3", "2"], "+", 
+        SuperscriptBox["kT4", "2"], "+", 
+        RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+         RowBox[{"Cos", "[", 
+          RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}]]]]}]}], 
+  "}"}]], "Output",
+ CellChangeTimes->{3.7754975181166553`*^9},
+ CellLabel->
+  "Out[210]=",ExpressionUUID->"6e5ebac0-5967-47da-8716-e7ea61df247a"]
+}, Closed]],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(*", " ", 
+   RowBox[{"--", "++"}], " ", "*)"}], "\[IndentingNewLine]", 
+  RowBox[{
+   RowBox[{
+    RowBox[{"config", "=", "\"\<--++\>\""}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"pairdef", "[", 
+     RowBox[{
+      RowBox[{"-", "1"}], ",", 
+      RowBox[{"-", "1"}], ",", "1", ",", "1"}], "]"}], ";"}], 
+   "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"tsub", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"triangle", "//.", "SubFourVecs"}], "/.", "MATColor"}]}], ";"}],
+    "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<triangle_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "tsub"}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub1", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box1", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub2", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box2", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub3", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box3", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub4", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box4", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"sumbox", "=", 
+     RowBox[{
+      RowBox[{"bsub1", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub2", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub3", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub4", "[", 
+       RowBox[{"[", "1", "]"}], "]"}]}]}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<box_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "sumbox"}], "]"}], ";"}]}]}]], "Input",
+ CellChangeTimes->{{3.774352487534183*^9, 3.7743525101778307`*^9}, 
+   3.774352867436016*^9, {3.774364885310581*^9, 3.774364885553205*^9}, {
+   3.775496587979397*^9, 3.775496598024398*^9}},
+ CellLabel->
+  "In[211]:=",ExpressionUUID->"b64b8f87-82c8-4857-a557-001146451746"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{"ek1vec", "\[IndentingNewLine]", "ek2vec", \
+"\[IndentingNewLine]", "ek4vec", "\[IndentingNewLine]", "ek5vec"}], "Input",
+ CellLabel->
+  "In[221]:=",ExpressionUUID->"04bbc492-9b94-415e-a91d-f36d5b545005"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   FractionBox["1", 
+    SqrtBox["2"]], ",", 
+   RowBox[{"-", 
+    FractionBox["\[ImaginaryI]", 
+     SqrtBox["2"]]}], ",", "0"}], "}"}]], "Output",
+ CellChangeTimes->{3.7754977054722652`*^9},
+ CellLabel->
+  "Out[221]=",ExpressionUUID->"14f63c8c-5f9d-4ceb-940c-502703daeac5"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   FractionBox["1", 
+    SqrtBox["2"]], ",", 
+   FractionBox["\[ImaginaryI]", 
+    SqrtBox["2"]], ",", "0"}], "}"}]], "Output",
+ CellChangeTimes->{3.775497705485059*^9},
+ CellLabel->
+  "Out[222]=",ExpressionUUID->"b269e7ef-8a34-43b6-a7be-907a76c65945"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{"-", 
+    FractionBox[
+     RowBox[{
+      RowBox[{"Sech", "[", "\[Eta]4", "]"}], " ", 
+      RowBox[{"Sinh", "[", 
+       RowBox[{"\[Eta]4", "-", 
+        RowBox[{"\[ImaginaryI]", " ", "\[Phi]4"}]}], "]"}]}], 
+     SqrtBox["2"]]}], ",", 
+   RowBox[{"-", 
+    FractionBox[
+     RowBox[{
+      RowBox[{"\[ImaginaryI]", " ", 
+       RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+      RowBox[{
+       RowBox[{"Sin", "[", "\[Phi]4", "]"}], " ", 
+       RowBox[{"Tanh", "[", "\[Eta]4", "]"}]}]}], 
+     SqrtBox["2"]]}], ",", 
+   FractionBox[
+    RowBox[{"Sech", "[", "\[Eta]4", "]"}], 
+    SqrtBox["2"]]}], "}"}]], "Output",
+ CellChangeTimes->{3.7754977054948587`*^9},
+ CellLabel->
+  "Out[223]=",ExpressionUUID->"fae7b65b-0f03-4de9-bfa9-ffbfc4ebcf53"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{
+    RowBox[{"(", 
+     RowBox[{
+      RowBox[{
+       RowBox[{"-", "kT3"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]3", "]"}]}], "-", 
+      RowBox[{"kT4", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}], "-", 
+      RowBox[{
+       FractionBox["1", 
+        SqrtBox["2"]], 
+       RowBox[{"\[ImaginaryI]", " ", 
+        RowBox[{"(", 
+         RowBox[{
+          RowBox[{"kT3", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+          RowBox[{"kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+        RowBox[{"\[Sqrt]", 
+         RowBox[{"(", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], "+", 
+           SuperscriptBox["kT4", "2"], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT3", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT4", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+            RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}]}]}]}], ")"}], 
+    "/", 
+    RowBox[{"(", 
+     RowBox[{"\[Sqrt]", 
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", 
+            RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}], ")"}], " ", 
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT4", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+           RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}], ")"}]}], 
+     ")"}]}], ",", 
+   RowBox[{
+    RowBox[{"(", 
+     RowBox[{
+      RowBox[{
+       RowBox[{"-", "kT3"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]3", "]"}]}], "-", 
+      RowBox[{"kT4", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}], "+", 
+      RowBox[{
+       FractionBox["1", 
+        SqrtBox["2"]], 
+       RowBox[{"\[ImaginaryI]", " ", 
+        RowBox[{"(", 
+         RowBox[{
+          RowBox[{"kT3", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+          RowBox[{"kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+        RowBox[{"\[Sqrt]", 
+         RowBox[{"(", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], "+", 
+           SuperscriptBox["kT4", "2"], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT3", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT4", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+            RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}]}]}]}], ")"}], 
+    "/", 
+    RowBox[{"(", 
+     RowBox[{"\[Sqrt]", 
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", 
+            RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}], ")"}], " ", 
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT4", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+           RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}], ")"}]}], 
+     ")"}]}], ",", 
+   FractionBox["1", 
+    SqrtBox[
+     FractionBox[
+      RowBox[{
+       SuperscriptBox["kT3", "2"], "+", 
+       SuperscriptBox["kT4", "2"], "+", 
+       RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+        RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+        RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+       RowBox[{
+        SuperscriptBox["kT3", "2"], " ", 
+        RowBox[{"Cosh", "[", 
+         RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+       RowBox[{
+        SuperscriptBox["kT4", "2"], " ", 
+        RowBox[{"Cosh", "[", 
+         RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+       RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+        RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+        RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+       RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+        RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+        RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], 
+      RowBox[{
+       SuperscriptBox["kT3", "2"], "+", 
+       SuperscriptBox["kT4", "2"], "+", 
+       RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+        RowBox[{"Cos", "[", 
+         RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}]]]]}], "}"}]], "Output",\
+
+ CellChangeTimes->{3.775497705512158*^9},
+ CellLabel->
+  "Out[224]=",ExpressionUUID->"b70b5df9-83b0-4ee9-aa8c-5d2d741914f3"]
+}, Closed]],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(*", " ", 
+   RowBox[{"--", 
+    RowBox[{"+", "-"}]}], " ", "*)"}], "\[IndentingNewLine]", 
+  RowBox[{
+   RowBox[{
+    RowBox[{"config", "=", "\"\<--+-\>\""}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"pairdef", "[", 
+     RowBox[{
+      RowBox[{"-", "1"}], ",", 
+      RowBox[{"-", "1"}], ",", "1", ",", 
+      RowBox[{"-", "1"}]}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"tsub", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"triangle", "//.", "SubFourVecs"}], "/.", "MATColor"}]}], ";"}],
+    "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<triangle_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "tsub"}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub1", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box1", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub2", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box2", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub3", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box3", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub4", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box4", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"sumbox", "=", 
+     RowBox[{
+      RowBox[{"bsub1", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub2", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub3", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub4", "[", 
+       RowBox[{"[", "1", "]"}], "]"}]}]}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<box_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "sumbox"}], "]"}], ";"}]}]}]], "Input",
+ CellChangeTimes->{{3.774352529005231*^9, 3.774352532203652*^9}, 
+   3.774352869480513*^9, {3.77436488780518*^9, 3.774364888111985*^9}, {
+   3.775496611025816*^9, 3.775496618028469*^9}},
+ CellLabel->
+  "In[225]:=",ExpressionUUID->"ccddb553-b79e-4e2f-b2e8-37d92e711b60"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{"ek1vec", "\[IndentingNewLine]", "ek2vec", \
+"\[IndentingNewLine]", "ek4vec", "\[IndentingNewLine]", "ek5vec"}], "Input",
+ CellLabel->
+  "In[235]:=",ExpressionUUID->"5e22bb0e-cc8d-4d2c-8d89-8696ac48023c"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   FractionBox["1", 
+    SqrtBox["2"]], ",", 
+   RowBox[{"-", 
+    FractionBox["\[ImaginaryI]", 
+     SqrtBox["2"]]}], ",", "0"}], "}"}]], "Output",
+ CellChangeTimes->{3.7754979053258247`*^9},
+ CellLabel->
+  "Out[235]=",ExpressionUUID->"1d1aff26-c11b-498f-a281-4edca3f48b8e"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   FractionBox["1", 
+    SqrtBox["2"]], ",", 
+   FractionBox["\[ImaginaryI]", 
+    SqrtBox["2"]], ",", "0"}], "}"}]], "Output",
+ CellChangeTimes->{3.775497905333959*^9},
+ CellLabel->
+  "Out[236]=",ExpressionUUID->"fe1b4903-a745-4370-a850-2eb30e49b07e"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{"-", 
+    FractionBox[
+     RowBox[{
+      RowBox[{"Sech", "[", "\[Eta]4", "]"}], " ", 
+      RowBox[{"Sinh", "[", 
+       RowBox[{"\[Eta]4", "-", 
+        RowBox[{"\[ImaginaryI]", " ", "\[Phi]4"}]}], "]"}]}], 
+     SqrtBox["2"]]}], ",", 
+   RowBox[{"-", 
+    FractionBox[
+     RowBox[{
+      RowBox[{"\[ImaginaryI]", " ", 
+       RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+      RowBox[{
+       RowBox[{"Sin", "[", "\[Phi]4", "]"}], " ", 
+       RowBox[{"Tanh", "[", "\[Eta]4", "]"}]}]}], 
+     SqrtBox["2"]]}], ",", 
+   FractionBox[
+    RowBox[{"Sech", "[", "\[Eta]4", "]"}], 
+    SqrtBox["2"]]}], "}"}]], "Output",
+ CellChangeTimes->{3.7754979053420057`*^9},
+ CellLabel->
+  "Out[237]=",ExpressionUUID->"c0401559-5133-43a1-95d9-2c147aeac684"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{
+    RowBox[{"(", 
+     RowBox[{
+      RowBox[{"kT3", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]3", "]"}]}], "+", 
+      RowBox[{"kT4", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}], "-", 
+      RowBox[{
+       FractionBox["1", 
+        SqrtBox["2"]], 
+       RowBox[{"\[ImaginaryI]", " ", 
+        RowBox[{"(", 
+         RowBox[{
+          RowBox[{"kT3", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+          RowBox[{"kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+        RowBox[{"\[Sqrt]", 
+         RowBox[{"(", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], "+", 
+           SuperscriptBox["kT4", "2"], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT3", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT4", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+            RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}]}]}]}], ")"}], 
+    "/", 
+    RowBox[{"(", 
+     RowBox[{"\[Sqrt]", 
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", 
+            RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}], ")"}], " ", 
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT4", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+           RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}], ")"}]}], 
+     ")"}]}], ",", 
+   RowBox[{
+    RowBox[{"(", 
+     RowBox[{
+      RowBox[{"kT3", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]3", "]"}]}], "+", 
+      RowBox[{"kT4", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}], "+", 
+      RowBox[{
+       FractionBox["1", 
+        SqrtBox["2"]], 
+       RowBox[{"\[ImaginaryI]", " ", 
+        RowBox[{"(", 
+         RowBox[{
+          RowBox[{"kT3", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+          RowBox[{"kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+        RowBox[{"\[Sqrt]", 
+         RowBox[{"(", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], "+", 
+           SuperscriptBox["kT4", "2"], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT3", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT4", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+            RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}]}]}]}], ")"}], 
+    "/", 
+    RowBox[{"(", 
+     RowBox[{"\[Sqrt]", 
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", 
+            RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}], ")"}], " ", 
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT4", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+           RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}], ")"}]}], 
+     ")"}]}], ",", 
+   RowBox[{"-", 
+    FractionBox["1", 
+     SqrtBox[
+      FractionBox[
+       RowBox[{
+        SuperscriptBox["kT3", "2"], "+", 
+        SuperscriptBox["kT4", "2"], "+", 
+        RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+         RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+         RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+        RowBox[{
+         SuperscriptBox["kT3", "2"], " ", 
+         RowBox[{"Cosh", "[", 
+          RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+        RowBox[{
+         SuperscriptBox["kT4", "2"], " ", 
+         RowBox[{"Cosh", "[", 
+          RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+        RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+         RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+         RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+        RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+         RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+         RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], 
+       RowBox[{
+        SuperscriptBox["kT3", "2"], "+", 
+        SuperscriptBox["kT4", "2"], "+", 
+        RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+         RowBox[{"Cos", "[", 
+          RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}]]]]}]}], 
+  "}"}]], "Output",
+ CellChangeTimes->{3.775497905356739*^9},
+ CellLabel->
+  "Out[238]=",ExpressionUUID->"69980d33-68ef-4bc7-8483-e5f3624dc2f2"]
+}, Closed]],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(*", " ", 
+   RowBox[{"--", 
+    RowBox[{"-", "+"}]}], " ", "*)"}], "\[IndentingNewLine]", 
+  RowBox[{
+   RowBox[{
+    RowBox[{"config", "=", "\"\<---+\>\""}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"pairdef", "[", 
+     RowBox[{
+      RowBox[{"-", "1"}], ",", 
+      RowBox[{"-", "1"}], ",", 
+      RowBox[{"-", "1"}], ",", "1"}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"tsub", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"triangle", "//.", "SubFourVecs"}], "/.", "MATColor"}]}], ";"}],
+    "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<triangle_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "tsub"}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub1", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box1", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub2", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box2", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub3", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box3", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub4", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box4", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"sumbox", "=", 
+     RowBox[{
+      RowBox[{"bsub1", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub2", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub3", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub4", "[", 
+       RowBox[{"[", "1", "]"}], "]"}]}]}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<box_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "sumbox"}], "]"}], ";"}]}]}]], "Input",
+ CellChangeTimes->{{3.7743525555879*^9, 3.7743525676513443`*^9}, 
+   3.774352872458866*^9, {3.774364890455717*^9, 3.77436489078689*^9}, {
+   3.775496623359764*^9, 3.7754966299863863`*^9}},
+ CellLabel->
+  "In[239]:=",ExpressionUUID->"b793fa34-3995-4321-8821-1b621911c453"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{"ek1vec", "\[IndentingNewLine]", "ek2vec", \
+"\[IndentingNewLine]", "ek4vec", "\[IndentingNewLine]", "ek5vec"}], "Input",
+ CellChangeTimes->{{3.775496709815193*^9, 3.775496712543408*^9}},
+ CellLabel->
+  "In[249]:=",ExpressionUUID->"f84ff2cc-9ea3-4b80-b650-9f55fc0f9050"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   FractionBox["1", 
+    SqrtBox["2"]], ",", 
+   RowBox[{"-", 
+    FractionBox["\[ImaginaryI]", 
+     SqrtBox["2"]]}], ",", "0"}], "}"}]], "Output",
+ CellChangeTimes->{3.775498108673365*^9},
+ CellLabel->
+  "Out[249]=",ExpressionUUID->"c06349b5-a8e5-4a9d-9151-70897cbad86c"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   FractionBox["1", 
+    SqrtBox["2"]], ",", 
+   FractionBox["\[ImaginaryI]", 
+    SqrtBox["2"]], ",", "0"}], "}"}]], "Output",
+ CellChangeTimes->{3.7754981086826982`*^9},
+ CellLabel->
+  "Out[250]=",ExpressionUUID->"f6e999f4-5535-4229-b523-b56222e09ce5"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   FractionBox[
+    RowBox[{
+     RowBox[{"Sech", "[", "\[Eta]4", "]"}], " ", 
+     RowBox[{"Sinh", "[", 
+      RowBox[{"\[Eta]4", "+", 
+       RowBox[{"\[ImaginaryI]", " ", "\[Phi]4"}]}], "]"}]}], 
+    SqrtBox["2"]], ",", 
+   FractionBox[
+    RowBox[{
+     RowBox[{
+      RowBox[{"-", "\[ImaginaryI]"}], " ", 
+      RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+     RowBox[{
+      RowBox[{"Sin", "[", "\[Phi]4", "]"}], " ", 
+      RowBox[{"Tanh", "[", "\[Eta]4", "]"}]}]}], 
+    SqrtBox["2"]], ",", 
+   RowBox[{"-", 
+    FractionBox[
+     RowBox[{"Sech", "[", "\[Eta]4", "]"}], 
+     SqrtBox["2"]]}]}], "}"}]], "Output",
+ CellChangeTimes->{3.775498108693202*^9},
+ CellLabel->
+  "Out[251]=",ExpressionUUID->"e26cd2b4-0fcd-4c1a-bc01-8ecb0c2ab4db"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{
+    RowBox[{"(", 
+     RowBox[{
+      RowBox[{
+       RowBox[{"-", "kT3"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]3", "]"}]}], "-", 
+      RowBox[{"kT4", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}], "-", 
+      RowBox[{
+       FractionBox["1", 
+        SqrtBox["2"]], 
+       RowBox[{"\[ImaginaryI]", " ", 
+        RowBox[{"(", 
+         RowBox[{
+          RowBox[{"kT3", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+          RowBox[{"kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+        RowBox[{"\[Sqrt]", 
+         RowBox[{"(", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], "+", 
+           SuperscriptBox["kT4", "2"], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT3", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT4", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+            RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}]}]}]}], ")"}], 
+    "/", 
+    RowBox[{"(", 
+     RowBox[{"\[Sqrt]", 
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", 
+            RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}], ")"}], " ", 
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT4", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+           RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}], ")"}]}], 
+     ")"}]}], ",", 
+   RowBox[{
+    RowBox[{"(", 
+     RowBox[{
+      RowBox[{
+       RowBox[{"-", "kT3"}], " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]3", "]"}]}], "-", 
+      RowBox[{"kT4", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}], "+", 
+      RowBox[{
+       FractionBox["1", 
+        SqrtBox["2"]], 
+       RowBox[{"\[ImaginaryI]", " ", 
+        RowBox[{"(", 
+         RowBox[{
+          RowBox[{"kT3", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+          RowBox[{"kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+        RowBox[{"\[Sqrt]", 
+         RowBox[{"(", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], "+", 
+           SuperscriptBox["kT4", "2"], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT3", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT4", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+            RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}]}]}]}], ")"}], 
+    "/", 
+    RowBox[{"(", 
+     RowBox[{"\[Sqrt]", 
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", 
+            RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}], ")"}], " ", 
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT4", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+           RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}], ")"}]}], 
+     ")"}]}], ",", 
+   FractionBox["1", 
+    SqrtBox[
+     FractionBox[
+      RowBox[{
+       SuperscriptBox["kT3", "2"], "+", 
+       SuperscriptBox["kT4", "2"], "+", 
+       RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+        RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+        RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+       RowBox[{
+        SuperscriptBox["kT3", "2"], " ", 
+        RowBox[{"Cosh", "[", 
+         RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+       RowBox[{
+        SuperscriptBox["kT4", "2"], " ", 
+        RowBox[{"Cosh", "[", 
+         RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+       RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+        RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+        RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+       RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+        RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+        RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], 
+      RowBox[{
+       SuperscriptBox["kT3", "2"], "+", 
+       SuperscriptBox["kT4", "2"], "+", 
+       RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+        RowBox[{"Cos", "[", 
+         RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}]]]]}], "}"}]], "Output",\
+
+ CellChangeTimes->{3.775498108709044*^9},
+ CellLabel->
+  "Out[252]=",ExpressionUUID->"9657c170-36b8-411d-8b6b-3d6276292375"]
+}, Closed]],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(*", " ", 
+   RowBox[{"--", "--"}], " ", "*)"}], "\[IndentingNewLine]", 
+  RowBox[{
+   RowBox[{
+    RowBox[{"config", "=", "\"\<----\>\""}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"pairdef", "[", 
+     RowBox[{
+      RowBox[{"-", "1"}], ",", 
+      RowBox[{"-", "1"}], ",", 
+      RowBox[{"-", "1"}], ",", 
+      RowBox[{"-", "1"}]}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"tsub", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"triangle", "//.", "SubFourVecs"}], "/.", "MATColor"}]}], ";"}],
+    "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<triangle_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "tsub"}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub1", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box1", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub2", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box2", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub3", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box3", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"bsub4", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"box4", " ", "//.", " ", "SubFourVecs"}], "/.", "MATColor"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"sumbox", "=", 
+     RowBox[{
+      RowBox[{"bsub1", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub2", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub3", "[", 
+       RowBox[{"[", "1", "]"}], "]"}], "+", 
+      RowBox[{"bsub4", "[", 
+       RowBox[{"[", "1", "]"}], "]"}]}]}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<box_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "sumbox"}], "]"}], ";"}]}]}]], "Input",
+ CellChangeTimes->{{3.774352583126089*^9, 3.7743525908491087`*^9}, 
+   3.774352874811473*^9, {3.774364893076682*^9, 3.774364893332685*^9}, {
+   3.775496635538294*^9, 3.775496642575879*^9}},
+ CellLabel->
+  "In[253]:=",ExpressionUUID->"904d1e14-4906-4fe4-96f1-2666b54aee06"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{"ek1vec", "\[IndentingNewLine]", "ek2vec", \
+"\[IndentingNewLine]", "ek4vec", "\[IndentingNewLine]", "ek5vec"}], "Input",
+ CellLabel->
+  "In[263]:=",ExpressionUUID->"ccf4c247-cfe0-485b-8f60-c5cb1c2404f2"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   FractionBox["1", 
+    SqrtBox["2"]], ",", 
+   RowBox[{"-", 
+    FractionBox["\[ImaginaryI]", 
+     SqrtBox["2"]]}], ",", "0"}], "}"}]], "Output",
+ CellChangeTimes->{3.775498312810131*^9},
+ CellLabel->
+  "Out[263]=",ExpressionUUID->"eb569226-c832-4d1b-bd18-8c78de3ac024"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   FractionBox["1", 
+    SqrtBox["2"]], ",", 
+   FractionBox["\[ImaginaryI]", 
+    SqrtBox["2"]], ",", "0"}], "}"}]], "Output",
+ CellChangeTimes->{3.775498312819539*^9},
+ CellLabel->
+  "Out[264]=",ExpressionUUID->"4c4d179c-6005-4a69-869b-32e6c3d44696"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   FractionBox[
+    RowBox[{
+     RowBox[{"Sech", "[", "\[Eta]4", "]"}], " ", 
+     RowBox[{"Sinh", "[", 
+      RowBox[{"\[Eta]4", "+", 
+       RowBox[{"\[ImaginaryI]", " ", "\[Phi]4"}]}], "]"}]}], 
+    SqrtBox["2"]], ",", 
+   FractionBox[
+    RowBox[{
+     RowBox[{
+      RowBox[{"-", "\[ImaginaryI]"}], " ", 
+      RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+     RowBox[{
+      RowBox[{"Sin", "[", "\[Phi]4", "]"}], " ", 
+      RowBox[{"Tanh", "[", "\[Eta]4", "]"}]}]}], 
+    SqrtBox["2"]], ",", 
+   RowBox[{"-", 
+    FractionBox[
+     RowBox[{"Sech", "[", "\[Eta]4", "]"}], 
+     SqrtBox["2"]]}]}], "}"}]], "Output",
+ CellChangeTimes->{3.775498312827202*^9},
+ CellLabel->
+  "Out[265]=",ExpressionUUID->"122f04a8-3049-4ef7-812a-dedea2b60c56"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{
+    RowBox[{"(", 
+     RowBox[{
+      RowBox[{"kT3", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]3", "]"}]}], "+", 
+      RowBox[{"kT4", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}], "-", 
+      RowBox[{
+       FractionBox["1", 
+        SqrtBox["2"]], 
+       RowBox[{"\[ImaginaryI]", " ", 
+        RowBox[{"(", 
+         RowBox[{
+          RowBox[{"kT3", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+          RowBox[{"kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+        RowBox[{"\[Sqrt]", 
+         RowBox[{"(", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], "+", 
+           SuperscriptBox["kT4", "2"], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT3", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT4", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+            RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}]}]}]}], ")"}], 
+    "/", 
+    RowBox[{"(", 
+     RowBox[{"\[Sqrt]", 
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", 
+            RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}], ")"}], " ", 
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT4", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+           RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}], ")"}]}], 
+     ")"}]}], ",", 
+   RowBox[{
+    RowBox[{"(", 
+     RowBox[{
+      RowBox[{"kT3", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]3", "]"}]}], "+", 
+      RowBox[{"kT4", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"kT3", " ", 
+          RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], "+", 
+         RowBox[{"kT4", " ", 
+          RowBox[{"Sin", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+       RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}], "+", 
+      RowBox[{
+       FractionBox["1", 
+        SqrtBox["2"]], 
+       RowBox[{"\[ImaginaryI]", " ", 
+        RowBox[{"(", 
+         RowBox[{
+          RowBox[{"kT3", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}]}], "+", 
+          RowBox[{"kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}]}], ")"}], " ", 
+        RowBox[{"\[Sqrt]", 
+         RowBox[{"(", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], "+", 
+           SuperscriptBox["kT4", "2"], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT3", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+           RowBox[{
+            SuperscriptBox["kT4", "2"], " ", 
+            RowBox[{"Cosh", "[", 
+             RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+            RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+           RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+            RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+            RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}]}]}]}], ")"}], 
+    "/", 
+    RowBox[{"(", 
+     RowBox[{"\[Sqrt]", 
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", 
+            RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}], ")"}], " ", 
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["kT3", "2"], "+", 
+          SuperscriptBox["kT4", "2"], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT3", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+          RowBox[{
+           SuperscriptBox["kT4", "2"], " ", 
+           RowBox[{"Cosh", "[", 
+            RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+           RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+          RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+           RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+           RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], ")"}]}], ")"}]}], 
+     ")"}]}], ",", 
+   RowBox[{"-", 
+    FractionBox["1", 
+     SqrtBox[
+      FractionBox[
+       RowBox[{
+        SuperscriptBox["kT3", "2"], "+", 
+        SuperscriptBox["kT4", "2"], "+", 
+        RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+         RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+         RowBox[{"Cos", "[", "\[Phi]4", "]"}]}], "+", 
+        RowBox[{
+         SuperscriptBox["kT3", "2"], " ", 
+         RowBox[{"Cosh", "[", 
+          RowBox[{"2", " ", "\[Eta]3"}], "]"}]}], "+", 
+        RowBox[{
+         SuperscriptBox["kT4", "2"], " ", 
+         RowBox[{"Cosh", "[", 
+          RowBox[{"2", " ", "\[Eta]4"}], "]"}]}], "+", 
+        RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+         RowBox[{"Sin", "[", "\[Phi]3", "]"}], " ", 
+         RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], "+", 
+        RowBox[{"4", " ", "kT3", " ", "kT4", " ", 
+         RowBox[{"Sinh", "[", "\[Eta]3", "]"}], " ", 
+         RowBox[{"Sinh", "[", "\[Eta]4", "]"}]}]}], 
+       RowBox[{
+        SuperscriptBox["kT3", "2"], "+", 
+        SuperscriptBox["kT4", "2"], "+", 
+        RowBox[{"2", " ", "kT3", " ", "kT4", " ", 
+         RowBox[{"Cos", "[", 
+          RowBox[{"\[Phi]3", "-", "\[Phi]4"}], "]"}]}]}]]]]}]}], 
+  "}"}]], "Output",
+ CellChangeTimes->{3.77549831284846*^9},
+ CellLabel->
+  "Out[266]=",ExpressionUUID->"b4ca1d9c-4431-4e3d-bafa-ac054aac2ca1"]
+}, Closed]],
+
+Cell[BoxData[
+ RowBox[{"\[IndentingNewLine]", "\[IndentingNewLine]"}]], "Input",
+ CellChangeTimes->{{3.775496646442024*^9, 
+  3.775496646585607*^9}},ExpressionUUID->"748f33a8-75a3-45ad-8268-\
+03283d31b0cc"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(*", 
+   RowBox[{"Triangles", " ", "Only"}], "*)"}], "\[IndentingNewLine]", 
+  RowBox[{
+   RowBox[{
+    RowBox[{"config", "=", "\"\<++++\>\""}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"pairdef", "[", 
+     RowBox[{"1", ",", "1", ",", "1", ",", "1"}], "]"}], ";"}], 
+   "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"tsub", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"triangle", "//.", "SubFourVecs"}], "/.", "MATColor"}]}], ";"}],
+    "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<triangle_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "tsub"}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"config", "=", "\"\<+++-\>\""}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"pairdef", "[", 
+     RowBox[{"1", ",", "1", ",", "1", ",", 
+      RowBox[{"-", "1"}]}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"tsub", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"triangle", "//.", "SubFourVecs"}], "/.", "MATColor"}]}], ";"}],
+    "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<triangle_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "tsub"}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"config", "=", "\"\<++-+\>\""}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"pairdef", "[", 
+     RowBox[{"1", ",", "1", ",", 
+      RowBox[{"-", "1"}], ",", "1"}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"tsub", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"triangle", "//.", "SubFourVecs"}], "/.", "MATColor"}]}], ";"}],
+    "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<triangle_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "tsub"}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"config", "=", "\"\<++--\>\""}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"pairdef", "[", 
+     RowBox[{"1", ",", "1", ",", 
+      RowBox[{"-", "1"}], ",", 
+      RowBox[{"-", "1"}]}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"tsub", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"triangle", "//.", "SubFourVecs"}], "/.", "MATColor"}]}], ";"}],
+    "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<triangle_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "tsub"}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"config", "=", "\"\<+-++\>\""}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"pairdef", "[", 
+     RowBox[{"1", ",", 
+      RowBox[{"-", "1"}], ",", "1", ",", "1"}], "]"}], ";"}], 
+   "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"tsub", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"triangle", "//.", "SubFourVecs"}], "/.", "MATColor"}]}], ";"}],
+    "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<triangle_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "tsub"}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"config", "=", "\"\<+-+-\>\""}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"pairdef", "[", 
+     RowBox[{"1", ",", 
+      RowBox[{"-", "1"}], ",", "1", ",", 
+      RowBox[{"-", "1"}]}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"tsub", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"triangle", "//.", "SubFourVecs"}], "/.", "MATColor"}]}], ";"}],
+    "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<triangle_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "tsub"}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"config", "=", "\"\<+--+\>\""}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"pairdef", "[", 
+     RowBox[{"1", ",", 
+      RowBox[{"-", "1"}], ",", 
+      RowBox[{"-", "1"}], ",", "1"}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"tsub", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"triangle", "//.", "SubFourVecs"}], "/.", "MATColor"}]}], ";"}],
+    "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<triangle_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "tsub"}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"config", "=", "\"\<+---\>\""}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"pairdef", "[", 
+     RowBox[{"1", ",", 
+      RowBox[{"-", "1"}], ",", 
+      RowBox[{"-", "1"}], ",", 
+      RowBox[{"-", "1"}]}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"tsub", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"triangle", "//.", "SubFourVecs"}], "/.", "MATColor"}]}], ";"}],
+    "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<triangle_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "tsub"}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"config", "=", "\"\<-+++\>\""}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"pairdef", "[", 
+     RowBox[{
+      RowBox[{"-", "1"}], ",", "1", ",", "1", ",", "1"}], "]"}], ";"}], 
+   "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"tsub", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"triangle", "//.", "SubFourVecs"}], "/.", "MATColor"}]}], ";"}],
+    "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<triangle_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "tsub"}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"config", "=", "\"\<-++-\>\""}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"pairdef", "[", 
+     RowBox[{
+      RowBox[{"-", "1"}], ",", "1", ",", "1", ",", 
+      RowBox[{"-", "1"}]}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"tsub", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"triangle", "//.", "SubFourVecs"}], "/.", "MATColor"}]}], ";"}],
+    "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<triangle_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "tsub"}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"config", "=", "\"\<-+-+\>\""}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"pairdef", "[", 
+     RowBox[{
+      RowBox[{"-", "1"}], ",", "1", ",", 
+      RowBox[{"-", "1"}], ",", "1"}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"tsub", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"triangle", "//.", "SubFourVecs"}], "/.", "MATColor"}]}], ";"}],
+    "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<triangle_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "tsub"}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"config", "=", "\"\<-+-+\>\""}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"pairdef", "[", 
+     RowBox[{
+      RowBox[{"-", "1"}], ",", "1", ",", 
+      RowBox[{"-", "1"}], ",", "1"}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"tsub", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"triangle", "//.", "SubFourVecs"}], "/.", "MATColor"}]}], ";"}],
+    "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<triangle_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "tsub"}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"config", "=", "\"\<-+--\>\""}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"pairdef", "[", 
+     RowBox[{
+      RowBox[{"-", "1"}], ",", "1", ",", 
+      RowBox[{"-", "1"}], ",", 
+      RowBox[{"-", "1"}]}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"tsub", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"triangle", "//.", "SubFourVecs"}], "/.", "MATColor"}]}], ";"}],
+    "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<triangle_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "tsub"}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"config", "=", "\"\<--++\>\""}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"pairdef", "[", 
+     RowBox[{
+      RowBox[{"-", "1"}], ",", 
+      RowBox[{"-", "1"}], ",", "1", ",", "1"}], "]"}], ";"}], 
+   "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"tsub", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"triangle", "//.", "SubFourVecs"}], "/.", "MATColor"}]}], ";"}],
+    "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<triangle_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "tsub"}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"config", "=", "\"\<--+-\>\""}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"pairdef", "[", 
+     RowBox[{
+      RowBox[{"-", "1"}], ",", 
+      RowBox[{"-", "1"}], ",", "1", ",", 
+      RowBox[{"-", "1"}]}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"tsub", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"triangle", "//.", "SubFourVecs"}], "/.", "MATColor"}]}], ";"}],
+    "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<triangle_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "tsub"}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"config", "=", "\"\<---+\>\""}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"pairdef", "[", 
+     RowBox[{
+      RowBox[{"-", "1"}], ",", 
+      RowBox[{"-", "1"}], ",", 
+      RowBox[{"-", "1"}], ",", "1"}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"tsub", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"triangle", "//.", "SubFourVecs"}], "/.", "MATColor"}]}], ";"}],
+    "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<triangle_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "tsub"}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"config", "=", "\"\<----\>\""}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"pairdef", "[", 
+     RowBox[{
+      RowBox[{"-", "1"}], ",", 
+      RowBox[{"-", "1"}], ",", 
+      RowBox[{"-", "1"}], ",", 
+      RowBox[{"-", "1"}]}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"tsub", " ", "=", " ", 
+     RowBox[{
+      RowBox[{"triangle", "//.", "SubFourVecs"}], "/.", "MATColor"}]}], ";"}],
+    "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+      RowBox[{"\"\<triangle_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+      "tsub"}], "]"}], ";"}], "\[IndentingNewLine]"}]}]], "Input",
+ CellChangeTimes->{
+  3.7743577285420027`*^9, {3.77437176080653*^9, 3.774371770188993*^9}},
+ CellLabel->"In[35]:=",ExpressionUUID->"decca2b0-8e15-4e87-a985-d5712b125d5f"],
+
+Cell[BoxData[
+ RowBox[{"\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", 
+  
+  RowBox[{"(*", " ", 
+   RowBox[{
+    RowBox[{
+    "Differences", " ", "in", " ", "helicity", " ", "vectors", " ", "due", 
+     " ", "to", " ", "taking", " ", "the", " ", "limit", " ", "when", " ", 
+     "kT"}], "\[Rule]", "0."}], " ", "*)"}]}]], "Input",
+ CellChangeTimes->{{3.774375381176281*^9, 
+  3.774375409332838*^9}},ExpressionUUID->"4563076e-3246-46f7-97bc-\
+73b664b8307f"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"pairdef", "[", 
+   RowBox[{"1", ",", "1", ",", "1", ",", "1"}], "]"}], ";"}]], "Input",
+ CellChangeTimes->{{3.774375673171742*^9, 3.7743756809353333`*^9}, {
+  3.775487160130682*^9, 
+  3.775487161357504*^9}},ExpressionUUID->"0bc98909-fe56-4051-8545-\
+05a60ebbbb32"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{
+ RowBox[{
+  RowBox[{"ek1vecInc", "=", 
+   RowBox[{
+    RowBox[{
+     RowBox[{"EpolEuc", "[", 
+      RowBox[{"0", ",", "k1x", ",", "k1y", ",", "k1z", ",", "1"}], "]"}], "/.", 
+     RowBox[{"{", 
+      RowBox[{"k1y", "\[Rule]", "0"}], "}"}]}], "//", "Simplify"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"ek1vec", "=", 
+   RowBox[{
+    RowBox[{
+     RowBox[{
+      RowBox[{"Limit", "[", 
+       RowBox[{"ek1vecInc", ",", 
+        RowBox[{"k1x", "\[Rule]", "0"}], ",", 
+        RowBox[{"Direction", "\[Rule]", "\"\<FromAbove\>\""}]}], "]"}], "/.", 
+      "CMSFrame"}], "/.", 
+     RowBox[{"rS", "\[Rule]", 
+      RowBox[{"Sqrt", "[", "S", "]"}]}]}], "//", "Simplify"}]}], " ", 
+  RowBox[{"(*", " ", 
+   RowBox[{
+    RowBox[{"because", " ", "kz"}], " ", ">", " ", "0"}], " ", "*)"}], 
+  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"ek1vecW", "=", 
+   RowBox[{
+    RowBox[{
+     RowBox[{
+      RowBox[{"Limit", "[", 
+       RowBox[{"ek1vecInc", ",", 
+        RowBox[{"k1x", "\[Rule]", "0"}], ",", 
+        RowBox[{"Direction", "\[Rule]", "\"\<FromBelow\>\""}]}], "]"}], "/.", 
+      "CMSFrame"}], "/.", 
+     RowBox[{"rS", "\[Rule]", 
+      RowBox[{"Sqrt", "[", "S", "]"}]}]}], "//", "Simplify"}]}], 
+  " "}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"(*", " ", 
+   RowBox[{
+    RowBox[{"if", " ", "kz"}], " ", "<", " ", "0"}], " ", "*)"}]}]}], "Input",\
+
+ CellChangeTimes->{{3.774374300765133*^9, 3.7743743287287283`*^9}, 
+   3.774374519002439*^9, {3.774374889448814*^9, 3.774374899167944*^9}, {
+   3.774375118790688*^9, 3.774375121358261*^9}, {3.774375414725223*^9, 
+   3.774375424138667*^9}},
+ CellLabel->
+  "In[289]:=",ExpressionUUID->"c2b37f9c-dad4-4307-af24-d9a0d850bff4"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{"-", 
+    FractionBox["1", 
+     SqrtBox["2"]]}], ",", 
+   RowBox[{"-", 
+    FractionBox["\[ImaginaryI]", 
+     SqrtBox["2"]]}], ",", "0"}], "}"}]], "Output",
+ CellChangeTimes->{{3.774374316813087*^9, 3.774374329259758*^9}, 
+   3.774374520182932*^9, {3.7743748931774483`*^9, 3.7743748995100613`*^9}, 
+   3.774375683458005*^9, 3.774614591885223*^9},
+ CellLabel->
+  "Out[290]=",ExpressionUUID->"0053d0e2-0989-4bdf-b06a-f9d1922adf20"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   FractionBox["1", 
+    SqrtBox["2"]], ",", 
+   FractionBox["\[ImaginaryI]", 
+    SqrtBox["2"]], ",", "0"}], "}"}]], "Output",
+ CellChangeTimes->{{3.774374316813087*^9, 3.774374329259758*^9}, 
+   3.774374520182932*^9, {3.7743748931774483`*^9, 3.7743748995100613`*^9}, 
+   3.774375683458005*^9, 3.774614591934792*^9},
+ CellLabel->
+  "Out[291]=",ExpressionUUID->"43fbcf8e-8599-42a1-bfcc-4516bc717d3d"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{
+ RowBox[{
+  RowBox[{"ek2vecInc", "=", 
+   RowBox[{
+    RowBox[{
+     RowBox[{"EpolEuc", "[", 
+      RowBox[{"0", ",", "k2x", ",", "k2y", ",", "k2z", ",", "1"}], "]"}], "/.", 
+     RowBox[{"{", 
+      RowBox[{"k2y", "\[Rule]", "0"}], "}"}]}], "//", "Simplify"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"ek2vec", "=", 
+   RowBox[{
+    RowBox[{
+     RowBox[{
+      RowBox[{"Limit", "[", 
+       RowBox[{"ek2vecInc", ",", 
+        RowBox[{"k2x", "\[Rule]", "0"}], ",", 
+        RowBox[{"Direction", "\[Rule]", "\"\<FromBelow\>\""}]}], "]"}], "/.", 
+      "CMSFrame"}], "/.", 
+     RowBox[{"rS", "\[Rule]", 
+      RowBox[{"Sqrt", "[", "S", "]"}]}]}], "//", "Simplify"}]}], " ", 
+  "\[IndentingNewLine]", 
+  RowBox[{"(*", " ", 
+   RowBox[{
+    RowBox[{"because", " ", "kz"}], " ", "<", " ", "0"}], " ", "*)"}], 
+  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
+ RowBox[{"ek2vecW", "=", 
+  RowBox[{
+   RowBox[{
+    RowBox[{
+     RowBox[{"Limit", "[", 
+      RowBox[{"ek2vecInc", ",", 
+       RowBox[{"k2x", "\[Rule]", "0"}], ",", 
+       RowBox[{"Direction", "\[Rule]", "\"\<FromAbove\>\""}]}], "]"}], "/.", 
+     "CMSFrame"}], "/.", 
+    RowBox[{"rS", "\[Rule]", 
+     RowBox[{"Sqrt", "[", "S", "]"}]}]}], "//", 
+   "Simplify"}]}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"(*", " ", 
+   RowBox[{
+    RowBox[{"if", " ", "kz"}], " ", ">", " ", "0"}], " ", "*)"}], 
+  " "}]}], "Input",
+ CellChangeTimes->{{3.774374732551367*^9, 3.774374736580291*^9}, {
+  3.77437486733582*^9, 3.774374886301341*^9}, {3.774375109145692*^9, 
+  3.774375111125836*^9}, {3.7743754271117153`*^9, 3.7743754355611143`*^9}},
+ CellLabel->
+  "In[535]:=",ExpressionUUID->"93d4e542-71cc-4953-af8e-c169abe35c37"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{"-", 
+    FractionBox["1", 
+     SqrtBox["2"]]}], ",", 
+   FractionBox["\[ImaginaryI]", 
+    SqrtBox["2"]], ",", "0"}], "}"}]], "Output",
+ CellChangeTimes->{{3.774374733308296*^9, 3.7743747371111307`*^9}, 
+   3.7743748960302362`*^9, 3.7743749700018387`*^9, 3.7743756863446007`*^9, 
+   3.774614594309457*^9, 3.775230073268903*^9},
+ CellLabel->
+  "Out[536]=",ExpressionUUID->"3293794e-373e-45b0-88e3-12a28b10e6d4"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   FractionBox["1", 
+    SqrtBox["2"]], ",", 
+   RowBox[{"-", 
+    FractionBox["\[ImaginaryI]", 
+     SqrtBox["2"]]}], ",", "0"}], "}"}]], "Output",
+ CellChangeTimes->{{3.774374733308296*^9, 3.7743747371111307`*^9}, 
+   3.7743748960302362`*^9, 3.7743749700018387`*^9, 3.7743756863446007`*^9, 
+   3.774614594309457*^9, 3.775230073358686*^9},
+ CellLabel->
+  "Out[537]=",ExpressionUUID->"105e4034-56e9-4119-976c-1771ee3f4d7e"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"ek4vec", "/.", "KinRules"}], "/.", "KinSub"}]], "Input",
+ CellChangeTimes->{{3.77437560512392*^9, 3.774375614570808*^9}},
+ CellLabel->
+  "In[297]:=",ExpressionUUID->"8f69032e-381e-4355-9ee9-143e3faa4659"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{"-", 
+    FractionBox["\[ImaginaryI]", 
+     SqrtBox["2"]]}], ",", "0", ",", 
+   FractionBox["1", 
+    SqrtBox["2"]]}], "}"}]], "Output",
+ CellChangeTimes->{3.774375614964827*^9, 3.774375692319228*^9, 
+  3.774614602339438*^9},
+ CellLabel->
+  "Out[297]=",ExpressionUUID->"395e9ca9-8a54-41e6-b00a-82e661c745b9"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"ek5vec", "/.", "KinRules"}], "/.", "KinSub"}]], "Input",
+ CellChangeTimes->{{3.774375617284769*^9, 3.774375624171795*^9}},
+ CellLabel->
+  "In[298]:=",ExpressionUUID->"82dd246c-415e-4947-89d4-a9492a7c08d0"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{"0.`", "\[VeryThinSpace]", "+", 
+    RowBox[{"0.7013259782290641`", " ", "\[ImaginaryI]"}]}], ",", 
+   RowBox[{"0.`", "\[VeryThinSpace]", "+", 
+    RowBox[{"0.09023232381495236`", " ", "\[ImaginaryI]"}]}], ",", 
+   "0.7071067811865476`"}], "}"}]], "Output",
+ CellChangeTimes->{3.7743756244196453`*^9, 3.774375694529842*^9, 
+  3.7746146086277113`*^9},
+ CellLabel->
+  "Out[298]=",ExpressionUUID->"439827f5-7f37-45eb-a6db-4f44bbe16d70"]
+}, Open  ]],
+
+Cell[BoxData[
+ RowBox[{"\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", 
+  "\[IndentingNewLine]", "\[IndentingNewLine]"}]], "Input",
+ CellChangeTimes->{{3.7754954543658113`*^9, 
+  3.775495454866901*^9}},ExpressionUUID->"46f1ab6d-937e-4ec4-ac8d-\
+bff28579c110"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(*", 
+   RowBox[{"TEST", " ", "ggHgg", " ", "Triangle"}], "*)"}], 
+  "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", 
+  RowBox[{"(*", 
+   RowBox[{"test", " ", "1"}], "*)"}], "\[IndentingNewLine]", 
+  "tsub"}]], "Input",
+ CellChangeTimes->{{3.7752248394984837`*^9, 3.775224900537775*^9}, {
+  3.775227377920702*^9, 3.775227385044223*^9}, {3.775487200391507*^9, 
+  3.7754872030342817`*^9}},
+ CellLabel->"In[96]:=",ExpressionUUID->"39596f69-54b3-4502-bc9a-e27bb48d3f41"],
+
+Cell[BoxData["tsub"], "Output",
+ CellChangeTimes->{
+  3.775224847700425*^9, {3.775224892303636*^9, 3.775224901027123*^9}, 
+   3.775487206480253*^9},
+ CellLabel->"Out[96]=",ExpressionUUID->"391ef8fa-412a-4103-98ac-6efb4aca67ca"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{
+ RowBox[{
+  RowBox[{"output", "=", 
+   RowBox[{
+    RowBox[{"N", "[", 
+     RowBox[{
+      RowBox[{"OutputPS", "[", 
+       RowBox[{"300.", ",", "20.", ",", "0", ",", 
+        RowBox[{"Pi", "/", "3"}], ",", "0", ",", 
+        RowBox[{"3", "*", 
+         RowBox[{"Pi", "/", "2"}]}], ",", "125."}], "]"}], ",", "10"}], "]"}],
+     "[", 
+    RowBox[{"[", "2", "]"}], "]"}]}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"KinRules", "=", 
+   RowBox[{"f", "[", 
+    RowBox[{"variables", ",", "output"}], "]"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"KinSub", "=", 
+   RowBox[{"{", 
+    RowBox[{
+     RowBox[{"S", "\[Rule]", 
+      RowBox[{"300.", "^", "2"}]}], ",", 
+     RowBox[{"kT3", "\[Rule]", "20."}], ",", 
+     RowBox[{"\[Eta]3", "\[Rule]", "0"}], ",", 
+     RowBox[{"\[Phi]3", "\[Rule]", 
+      RowBox[{"Pi", "/", "3"}]}], ",", 
+     RowBox[{"\[Eta]4", "\[Rule]", "0"}], ",", 
+     RowBox[{"\[Phi]4", "\[Rule]", 
+      RowBox[{"3", "*", 
+       RowBox[{"Pi", "/", "2"}]}]}], ",", 
+     RowBox[{"MH", "\[Rule]", "125."}], ",", 
+     RowBox[{"MT", "\[Rule]", "173."}]}], "}"}]}], ";"}]}], "Input",
+ CellChangeTimes->{{3.7752282010678043`*^9, 3.775228231892907*^9}},
+ CellLabel->"In[33]:=",ExpressionUUID->"b34e4af8-5a92-4433-91fe-7fe2aaea58e5"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"kT3_max = \"\>", "\[InvisibleSpace]", 
+   RowBox[{"{", 
+    RowBox[{"kT3", "\[Rule]", "123.95833333333334`"}], "}"}], 
+   "\[InvisibleSpace]", "\<\"\\n\"\>"}],
+  SequenceForm["kT3_max = ", {$CellContext`kT3 -> 123.95833333333334`}, "\n"],
+  
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775230932041807*^9, 3.7752309727942142`*^9, 
+  3.775231284982201*^9, 3.776438248575953*^9},
+ CellLabel->
+  "During evaluation of \
+In[33]:=",ExpressionUUID->"036d06c3-d736-46a4-85af-321881037012"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"Four Momenta : \\n\"\>", "\[InvisibleSpace]", 
+   TagBox[
+    RowBox[{"(", "\[NoBreak]", 
+     TagBox[GridBox[{
+        {
+         RowBox[{"p1", "\[Rule]", 
+          RowBox[{"{", 
+           RowBox[{"150.`", ",", "0.`", ",", "0.`", ",", "150.`"}], "}"}]}]},
+        {
+         RowBox[{"p2", "\[Rule]", 
+          RowBox[{"{", 
+           RowBox[{"150.`", ",", "0.`", ",", "0.`", ",", 
+            RowBox[{"-", "150.`"}]}], "}"}]}]},
+        {
+         RowBox[{"p3", "\[Rule]", 
+          RowBox[{"{", 
+           RowBox[{
+           "126.58988901172162`", ",", "10.`", ",", "17.320508075688775`", 
+            ",", "0.`"}], "}"}]}]},
+        {
+         RowBox[{"p4", "\[Rule]", 
+          RowBox[{"{", 
+           RowBox[{"95.04498070119013`", ",", "0.`", ",", 
+            RowBox[{"-", "95.04498070119013`"}], ",", "0.`"}], "}"}]}]},
+        {
+         RowBox[{"p5", "\[Rule]", 
+          RowBox[{"{", 
+           RowBox[{"78.3651302870882`", ",", 
+            RowBox[{"-", "10.`"}], ",", "77.72447262550135`", ",", "0.`"}], 
+           "}"}]}]}
+       },
+       GridBoxAlignment->{
+        "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, 
+         "Rows" -> {{Baseline}}, "RowsIndexed" -> {}},
+       GridBoxSpacings->{"Columns" -> {
+           Offset[0.27999999999999997`], {
+            Offset[0.5599999999999999]}, 
+           Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
+           Offset[0.2], {
+            Offset[0.4]}, 
+           Offset[0.2]}, "RowsIndexed" -> {}}],
+      Column], "\[NoBreak]", ")"}],
+    Function[BoxForm`e$, 
+     MatrixForm[BoxForm`e$]]], "\[InvisibleSpace]", "\<\"\\n\"\>"}],
+  SequenceForm["Four Momenta : \n", 
+   MatrixForm[{$CellContext`p1 -> {150., 0., 0., 150.}, $CellContext`p2 -> {
+      150., 0., 0., -150.}, $CellContext`p3 -> {126.58988901172162`, 10., 
+      17.320508075688775`, 0.}, $CellContext`p4 -> {95.04498070119013, 
+      0., -95.04498070119013, 0.}, $CellContext`p5 -> {78.3651302870882, -10.,
+       77.72447262550135, 0.}}], "\n"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775230932041807*^9, 3.7752309727942142`*^9, 
+  3.775231284982201*^9, 3.776438248589973*^9},
+ CellLabel->
+  "During evaluation of \
+In[33]:=",ExpressionUUID->"7f092130-65a6-48f6-a225-c9cb2c9bf4af"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"Check 4 momentum conservation: p3+p4+p5 -p1 -p2 =0 :  \"\>", 
+   "\[InvisibleSpace]", 
+   RowBox[{"{", 
+    RowBox[{
+     RowBox[{
+     "-", "3.887221955939928966560590155849714544348308363744058289341178206`\
+43.811488088675176*^-14"}], ",", "0``58.69897000433602", ",", 
+     "0``57.72104081749894", ",", "0``57.522878745280345"}], "}"}]}],
+  SequenceForm[
+  "Check 4 momentum conservation: p3+p4+p5 -p1 -p2 =0 :  ", \
+{-3.887221955939928966560590155849714544348308363744058289341178206`43.\
+811488088675176*^-14, 0``58.69897000433602, 0``57.72104081749894, 
+    0``57.522878745280345}],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775230932041807*^9, 3.7752309727942142`*^9, 
+  3.775231284982201*^9, 3.7764382486049023`*^9},
+ CellLabel->
+  "During evaluation of \
+In[33]:=",ExpressionUUID->"74d09005-80d4-4eb5-b2ad-db0c1a75acc8"],
+
+Cell[BoxData["\<\"MOMENTUM IS CONSERVED, ALL IS WELL!\"\>"], "Print",
+ CellChangeTimes->{3.775230932041807*^9, 3.7752309727942142`*^9, 
+  3.775231284982201*^9, 3.77643824861449*^9},
+ CellLabel->
+  "During evaluation of \
+In[33]:=",ExpressionUUID->"b274558c-4e4b-4c44-9c4c-5fbe2460bcbc"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{
+   RowBox[{"kkT3", "\[Rule]", "20.`"}], ",", 
+   RowBox[{"kkT4", "\[Rule]", "95.0449807011901270926`10."}], ",", 
+   RowBox[{"S", "\[Rule]", "90000.`10."}], ",", 
+   RowBox[{"T", "\[Rule]", 
+    RowBox[{"-", "22351.9667035164881926659`10."}]}], ",", 
+   RowBox[{"U", "\[Rule]", 
+    RowBox[{"-", "22351.9667035164881926659`10."}]}], ",", 
+   RowBox[{"T24", "\[Rule]", 
+    RowBox[{"-", "28513.4942103570381277677`10."}]}], ",", 
+   RowBox[{"T14", "\[Rule]", 
+    RowBox[{"-", "28513.4942103570381277677`10."}]}], ",", 
+   RowBox[{"S34", "\[Rule]", "42980.9218277470587333204`10."}], ",", 
+   RowBox[{
+    SqrtBox["S"], "\[Rule]", "300.`10."}], ",", 
+   RowBox[{
+    SqrtBox["S34"], "\[Rule]", "207.3184068715246970733`10."}], ",", 
+   RowBox[{
+    RowBox[{"Tan", "[", "\[Phi]5", "]"}], "\[Rule]", 
+    RowBox[{"-", "0.12865960568407904294629727505559632487`10."}]}], ",", 
+   RowBox[{"kT5", "\[Rule]", "78.3651302870882067263`10."}], ",", 
+   RowBox[{
+    SqrtBox["S35"], "\[Rule]", "181.5847228686540904465`10."}]}], 
+  "}"}]], "Print",
+ CellChangeTimes->{3.775230932041807*^9, 3.7752309727942142`*^9, 
+  3.775231284982201*^9, 3.776438248624385*^9},
+ CellLabel->
+  "During evaluation of \
+In[33]:=",ExpressionUUID->"3221b609-dcc3-4da4-a3e3-9f5bc8e7bbf2"]
+}, Open  ]]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{
+ RowBox[{"t", "=", 
+  RowBox[{
+   RowBox[{
+    RowBox[{"tsub", "//.", "KinRules"}], "//.", "KinSub"}], "//", 
+   "FullSimplify"}]}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"tfinal", "=", 
+   RowBox[{
+    RowBox[{"t", "/.", 
+     RowBox[{"{", 
+      RowBox[{
+       RowBox[{"Alfas", "\[Rule]", 
+        RowBox[{"1", "/", "128"}]}], ",", 
+       RowBox[{"MW", "\[Rule]", "80.376"}], ",", 
+       RowBox[{"SW", "\[Rule]", "0.480832611207"}], ",", 
+       RowBox[{"EL", "\[Rule]", 
+        RowBox[{"Sqrt", "[", 
+         RowBox[{"4", "*", "Pi", "*", 
+          RowBox[{"(", 
+           RowBox[{"1", "/", "128"}], ")"}]}], "]"}]}]}], "}"}]}], "//", 
+    "Simplify"}]}], ";"}]}], "Input",
+ CellChangeTimes->{{3.775225058535507*^9, 3.7752250620472116`*^9}, {
+   3.775225117463687*^9, 3.7752251255225*^9}, {3.7752256278150873`*^9, 
+   3.7752256713762207`*^9}, {3.775228280738386*^9, 3.775228280888126*^9}, {
+   3.775228383635068*^9, 3.7752283879715357`*^9}, {3.775230702176445*^9, 
+   3.7752307026709137`*^9}, {3.775230819239026*^9, 3.7752308282809753`*^9}, {
+   3.77523090526558*^9, 3.7752309059485817`*^9}, 3.775230965516696*^9, {
+   3.775231230843745*^9, 3.775231239908455*^9}, {3.775231275597724*^9, 
+   3.7752312824194508`*^9}},
+ CellLabel->
+  "In[713]:=",ExpressionUUID->"9fd3d5e6-8ffa-493a-8595-d6d0d780805f"],
+
+Cell[BoxData[
+ FractionBox[
+  RowBox[{
+   SuperscriptBox["Alfas", "2"], " ", 
+   RowBox[{"(", 
+    RowBox[{
+     RowBox[{
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"-", "4.42282197922486`"}], "-", 
+        RowBox[{"0.2629022710276373`", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+      "c1"}], "-", 
+     RowBox[{
+      RowBox[{"(", 
+       RowBox[{"4.422821979224851`", "\[VeryThinSpace]", "-", 
+        RowBox[{"0.2629022710276477`", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+      "c2"}], "+", 
+     RowBox[{
+      RowBox[{"(", 
+       RowBox[{"8.845643958449717`", "\[VeryThinSpace]", "-", 
+        RowBox[{"1.0325074129013956`*^-14", " ", "\[ImaginaryI]"}]}], ")"}], 
+      " ", "c3"}]}], ")"}], " ", "EL"}], 
+  RowBox[{"MW", " ", "SW"}]]], "Output",
+ CellChangeTimes->{{3.775225664088006*^9, 3.77522567177706*^9}, 
+   3.775227855365807*^9, {3.775228209005939*^9, 3.775228237774908*^9}, 
+   3.7752282816268797`*^9, 3.775228322851685*^9, {3.775230703071548*^9, 
+   3.775230720365859*^9}, 3.775230828894676*^9, {3.7752309372342987`*^9, 
+   3.775230975260806*^9}, 3.775231288410503*^9},
+ CellLabel->
+  "Out[713]=",ExpressionUUID->"fa64eb15-5601-48dd-a605-5df7944ad9aa"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{
+ RowBox[{
+  RowBox[{"t", "=", 
+   RowBox[{"List", "[", 
+    RowBox[{
+     RowBox[{"tfinal", "[", 
+      RowBox[{"[", 
+       RowBox[{"1", ",", "1"}], "]"}], "]"}], ",", 
+     RowBox[{"tfinal", "[", 
+      RowBox[{"[", 
+       RowBox[{"1", ",", "1"}], "]"}], "]"}], ",", 
+     RowBox[{"tfinal", "[", 
+      RowBox[{"[", 
+       RowBox[{"2", ",", "1"}], "]"}], "]"}], ",", 
+     RowBox[{"tfinal", "[", 
+      RowBox[{"[", 
+       RowBox[{"2", ",", "1"}], "]"}], "]"}], ",", 
+     RowBox[{"tfinal", "[", 
+      RowBox[{"[", 
+       RowBox[{"3", ",", "1"}], "]"}], "]"}], ",", 
+     RowBox[{"tfinal", "[", 
+      RowBox[{"[", 
+       RowBox[{"3", ",", "1"}], "]"}], "]"}]}], "]"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"t", "//", "MatrixForm"}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"mat", "=", 
+   RowBox[{"{", 
+    RowBox[{
+     RowBox[{"{", 
+      RowBox[{
+       RowBox[{"19", "/", "6"}], ",", 
+       RowBox[{"2", "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}]}], "}"}], ",", 
+     RowBox[{"{", 
+      RowBox[{
+       RowBox[{"2", "/", "3"}], ",", 
+       RowBox[{"19", "/", "6"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}]}], "}"}], ",", 
+     RowBox[{"{", 
+      RowBox[{
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{"2", "/", "3"}], ",", 
+       RowBox[{"19", "/", "6"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}]}], "}"}], ",", 
+     RowBox[{"{", 
+      RowBox[{
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{"19", "/", "6"}], ",", 
+       RowBox[{"2", "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}]}], "}"}], ",", 
+     RowBox[{"{", 
+      RowBox[{
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{"19", "/", "6"}], ",", 
+       RowBox[{"2", "/", "3"}]}], "}"}], ",", 
+     RowBox[{"{", 
+      RowBox[{
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{"2", "/", "3"}], ",", 
+       RowBox[{"19", "/", "6"}]}], "}"}]}], "}"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"mat", "//", "MatrixForm"}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"tdagger", "=", 
+   RowBox[{"Conjugate", "[", "t", "]"}]}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"tdagger", "//", "MatrixForm"}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{"MdagM0", "=", " ", 
+  RowBox[{"Dot", "[", 
+   RowBox[{"tdagger", ",", "mat", ",", "t"}], "]"}]}]}], "Input",
+ CellChangeTimes->{{3.7752263172970657`*^9, 3.775226370760921*^9}, {
+   3.775226419611183*^9, 3.7752265454864264`*^9}, {3.775226879450161*^9, 
+   3.775227076406006*^9}, 3.775227861069626*^9, {3.775228176084751*^9, 
+   3.775228176316021*^9}, {3.775230890963722*^9, 3.775230891140901*^9}, {
+   3.775230946959694*^9, 3.7752309506553507`*^9}},
+ CellLabel->
+  "In[715]:=",ExpressionUUID->"5ded4345-d664-4ac5-9642-1b00a0681b1c"],
+
+Cell[BoxData[
+ RowBox[{"2.589543990648512`*^-10", "-", 
+  RowBox[{"4.1584903321868325`*^-28", " ", "\[ImaginaryI]"}]}]], "Output",
+ CellChangeTimes->{
+  3.775226331131727*^9, 3.775226372663734*^9, {3.7752264954014072`*^9, 
+   3.775226506968534*^9}, {3.775226537183036*^9, 3.775226545869584*^9}, 
+   3.775227022067236*^9, 3.775227078289074*^9, {3.775227857897359*^9, 
+   3.775227861355043*^9}, {3.7752282113000717`*^9, 3.775228239141239*^9}, 
+   3.775228284641056*^9, 3.775228327350637*^9, {3.775230705260297*^9, 
+   3.775230722370657*^9}, 3.775230831560916*^9, {3.7752309397957487`*^9, 
+   3.7752309771630077`*^9}, 3.775231290721431*^9},
+ CellLabel->
+  "Out[721]=",ExpressionUUID->"1a1d7ca1-25cc-4fb7-8df5-582cc32ec06c"]
+}, Open  ]],
+
+Cell[BoxData[
+ RowBox[{"(*", " ", 
+  RowBox[{"test", " ", "2"}], " ", "*)"}]], "Input",
+ CellChangeTimes->{{3.775227392185399*^9, 
+  3.775227397719922*^9}},ExpressionUUID->"5b66fb87-293a-4ef7-bff7-\
+0d09631bb6d8"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{
+ RowBox[{
+  RowBox[{"output", "=", 
+   RowBox[{
+    RowBox[{"N", "[", 
+     RowBox[{
+      RowBox[{"OutputPS", "[", 
+       RowBox[{"300.", ",", "40.", ",", "0", ",", 
+        RowBox[{"Pi", "/", "3"}], ",", "0", ",", 
+        RowBox[{"3", "*", 
+         RowBox[{"Pi", "/", "2"}]}], ",", "125."}], "]"}], ",", "10"}], "]"}],
+     "[", 
+    RowBox[{"[", "2", "]"}], "]"}]}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"KinRules", "=", 
+   RowBox[{"f", "[", 
+    RowBox[{"variables", ",", "output"}], "]"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"KinSub", "=", 
+   RowBox[{"{", 
+    RowBox[{
+     RowBox[{"S", "\[Rule]", 
+      RowBox[{"300.", "^", "2"}]}], ",", 
+     RowBox[{"kT3", "\[Rule]", "40."}], ",", 
+     RowBox[{"\[Eta]3", "\[Rule]", "0"}], ",", 
+     RowBox[{"\[Phi]3", "\[Rule]", 
+      RowBox[{"Pi", "/", "3"}]}], ",", 
+     RowBox[{"\[Eta]4", "\[Rule]", "0"}], ",", 
+     RowBox[{"\[Phi]4", "\[Rule]", 
+      RowBox[{"3", "*", 
+       RowBox[{"Pi", "/", "2"}]}]}], ",", 
+     RowBox[{"MH", "\[Rule]", "125."}], ",", 
+     RowBox[{"MT", "\[Rule]", "173"}]}], "}"}]}], ";"}]}], "Input",
+ CellChangeTimes->{{3.775227712322483*^9, 3.775227726510152*^9}, {
+  3.77522812757227*^9, 3.775228136486952*^9}, {3.7752282452191553`*^9, 
+  3.775228245389009*^9}},
+ CellLabel->
+  "In[722]:=",ExpressionUUID->"a821d5f4-c947-47d0-a68d-88efb3b8dd3d"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"kT3_max = \"\>", "\[InvisibleSpace]", 
+   RowBox[{"{", 
+    RowBox[{"kT3", "\[Rule]", "123.95833333333334`"}], "}"}], 
+   "\[InvisibleSpace]", "\<\"\\n\"\>"}],
+  SequenceForm["kT3_max = ", {$CellContext`kT3 -> 123.95833333333334`}, "\n"],
+  
+  Editable->False]], "Print",
+ CellChangeTimes->{
+  3.7752274257605*^9, {3.775227713754155*^9, 3.7752277270115967`*^9}, {
+   3.775228130545632*^9, 3.7752281370688543`*^9}, 3.775228245742526*^9, 
+   3.7752283334404593`*^9, 3.7752306807614107`*^9, 3.775230795706949*^9, {
+   3.775230957605077*^9, 3.7752309799804153`*^9}, 3.7752312967710857`*^9},
+ CellLabel->
+  "During evaluation of \
+In[722]:=",ExpressionUUID->"bdd84ee5-e5de-4399-85d7-f620c7667877"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"Four Momenta : \\n\"\>", "\[InvisibleSpace]", 
+   TagBox[
+    RowBox[{"(", "\[NoBreak]", 
+     TagBox[GridBox[{
+        {
+         RowBox[{"p1", "\[Rule]", 
+          RowBox[{"{", 
+           RowBox[{"150.`", ",", "0.`", ",", "0.`", ",", "150.`"}], "}"}]}]},
+        {
+         RowBox[{"p2", "\[Rule]", 
+          RowBox[{"{", 
+           RowBox[{"150.`", ",", "0.`", ",", "0.`", ",", 
+            RowBox[{"-", "150.`"}]}], "}"}]}]},
+        {
+         RowBox[{"p3", "\[Rule]", 
+          RowBox[{"{", 
+           RowBox[{
+           "131.24404748406687`", ",", "20.`", ",", "34.64101615137755`", ",",
+             "0.`"}], "}"}]}]},
+        {
+         RowBox[{"p4", "\[Rule]", 
+          RowBox[{"{", 
+           RowBox[{"100.20722612318758`", ",", "0.`", ",", 
+            RowBox[{"-", "100.20722612318758`"}], ",", "0.`"}], "}"}]}]},
+        {
+         RowBox[{"p5", "\[Rule]", 
+          RowBox[{"{", 
+           RowBox[{"68.5487263927455`", ",", 
+            RowBox[{"-", "20.`"}], ",", "65.56620997181004`", ",", "0.`"}], 
+           "}"}]}]}
+       },
+       GridBoxAlignment->{
+        "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, 
+         "Rows" -> {{Baseline}}, "RowsIndexed" -> {}},
+       GridBoxSpacings->{"Columns" -> {
+           Offset[0.27999999999999997`], {
+            Offset[0.5599999999999999]}, 
+           Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
+           Offset[0.2], {
+            Offset[0.4]}, 
+           Offset[0.2]}, "RowsIndexed" -> {}}],
+      Column], "\[NoBreak]", ")"}],
+    Function[BoxForm`e$, 
+     MatrixForm[BoxForm`e$]]], "\[InvisibleSpace]", "\<\"\\n\"\>"}],
+  SequenceForm["Four Momenta : \n", 
+   MatrixForm[{$CellContext`p1 -> {150., 0., 0., 150.}, $CellContext`p2 -> {
+      150., 0., 0., -150.}, $CellContext`p3 -> {131.24404748406687`, 20., 
+      34.64101615137755, 0.}, $CellContext`p4 -> {100.20722612318758`, 
+      0., -100.20722612318758`, 0.}, $CellContext`p5 -> {
+      68.5487263927455, -20., 65.56620997181004, 0.}}], "\n"],
+  Editable->False]], "Print",
+ CellChangeTimes->{
+  3.7752274257605*^9, {3.775227713754155*^9, 3.7752277270115967`*^9}, {
+   3.775228130545632*^9, 3.7752281370688543`*^9}, 3.775228245742526*^9, 
+   3.7752283334404593`*^9, 3.7752306807614107`*^9, 3.775230795706949*^9, {
+   3.775230957605077*^9, 3.7752309799804153`*^9}, 3.775231296785734*^9},
+ CellLabel->
+  "During evaluation of \
+In[722]:=",ExpressionUUID->"3939f696-ad00-464e-8f62-39d979d7c35d"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"Check 4 momentum conservation: p3+p4+p5 -p1 -p2 =0 :  \"\>", 
+   "\[InvisibleSpace]", 
+   RowBox[{"{", 
+    RowBox[{
+     RowBox[{
+     "-", "5.876373720011891608134562217738742061745029729160199708223878675`\
+43.99095815745918*^-14"}], ",", "0``58.39794000867204", ",", 
+     "0``57.69807096391986", ",", "0``57.522878745280345"}], "}"}]}],
+  SequenceForm[
+  "Check 4 momentum conservation: p3+p4+p5 -p1 -p2 =0 :  ", \
+{-5.876373720011891608134562217738742061745029729160199708223878675`43.\
+99095815745918*^-14, 0``58.39794000867204, 0``57.69807096391986, 
+    0``57.522878745280345}],
+  Editable->False]], "Print",
+ CellChangeTimes->{
+  3.7752274257605*^9, {3.775227713754155*^9, 3.7752277270115967`*^9}, {
+   3.775228130545632*^9, 3.7752281370688543`*^9}, 3.775228245742526*^9, 
+   3.7752283334404593`*^9, 3.7752306807614107`*^9, 3.775230795706949*^9, {
+   3.775230957605077*^9, 3.7752309799804153`*^9}, 3.775231296799769*^9},
+ CellLabel->
+  "During evaluation of \
+In[722]:=",ExpressionUUID->"44d8caf9-61b8-46aa-972d-67abe87916ae"],
+
+Cell[BoxData["\<\"MOMENTUM IS CONSERVED, ALL IS WELL!\"\>"], "Print",
+ CellChangeTimes->{
+  3.7752274257605*^9, {3.775227713754155*^9, 3.7752277270115967`*^9}, {
+   3.775228130545632*^9, 3.7752281370688543`*^9}, 3.775228245742526*^9, 
+   3.7752283334404593`*^9, 3.7752306807614107`*^9, 3.775230795706949*^9, {
+   3.775230957605077*^9, 3.7752309799804153`*^9}, 3.775231296810185*^9},
+ CellLabel->
+  "During evaluation of \
+In[722]:=",ExpressionUUID->"2f29d13e-6df9-4305-9cb5-665b6f5790de"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{
+   RowBox[{"kkT3", "\[Rule]", "40.`"}], ",", 
+   RowBox[{"kkT4", "\[Rule]", "100.2072261231875813792`10."}], ",", 
+   RowBox[{"S", "\[Rule]", "90000.`10."}], ",", 
+   RowBox[{"T", "\[Rule]", 
+    RowBox[{"-", "23748.2142452200617895598`10."}]}], ",", 
+   RowBox[{"U", "\[Rule]", 
+    RowBox[{"-", "23748.2142452200617895598`10."}]}], ",", 
+   RowBox[{"T24", "\[Rule]", 
+    RowBox[{"-", "30062.1678369562744137511`10."}]}], ",", 
+   RowBox[{"T14", "\[Rule]", 
+    RowBox[{"-", "30062.1678369562744137511`10."}]}], ",", 
+   RowBox[{"S34", "\[Rule]", "48870.7641643526804629805`10."}], ",", 
+   RowBox[{
+    SqrtBox["S"], "\[Rule]", "300.`10."}], ",", 
+   RowBox[{
+    SqrtBox["S34"], "\[Rule]", "221.0673294821120339102`10."}], ",", 
+   RowBox[{
+    RowBox[{"Tan", "[", "\[Phi]5", "]"}], "\[Rule]", 
+    RowBox[{"-", "0.30503516992363796243170073189201937468`10."}]}], ",", 
+   RowBox[{"kT5", "\[Rule]", "68.5487263927454872252`10."}], ",", 
+   RowBox[{
+    SqrtBox["S35"], "\[Rule]", "172.8457819158090640716`10."}]}], 
+  "}"}]], "Print",
+ CellChangeTimes->{
+  3.7752274257605*^9, {3.775227713754155*^9, 3.7752277270115967`*^9}, {
+   3.775228130545632*^9, 3.7752281370688543`*^9}, 3.775228245742526*^9, 
+   3.7752283334404593`*^9, 3.7752306807614107`*^9, 3.775230795706949*^9, {
+   3.775230957605077*^9, 3.7752309799804153`*^9}, 3.775231296820582*^9},
+ CellLabel->
+  "During evaluation of \
+In[722]:=",ExpressionUUID->"dbcfd14d-2210-4c86-b316-c61c776b7076"]
+}, Open  ]]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{
+ RowBox[{
+  RowBox[{"t", "=", 
+   RowBox[{
+    RowBox[{
+     RowBox[{"tsub", "//.", "KinRules"}], "//.", "KinSub"}], "//", 
+    "FullSimplify"}]}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{"tfinal", "=", 
+  RowBox[{
+   RowBox[{"t", "/.", 
+    RowBox[{"{", 
+     RowBox[{
+      RowBox[{"Alfas", "\[Rule]", "1"}], ",", 
+      RowBox[{"MW", "\[Rule]", "80.376"}], ",", 
+      RowBox[{"SW", "\[Rule]", "0.480832611207"}], ",", 
+      RowBox[{"EL", "\[Rule]", 
+       RowBox[{"Sqrt", "[", 
+        RowBox[{"4", "*", "Pi", "*", 
+         RowBox[{"(", 
+          RowBox[{"1", "/", "128"}], ")"}]}], "]"}]}]}], "}"}]}], "//", 
+   "Simplify"}]}]}], "Input",
+ CellChangeTimes->{{3.775227488213812*^9, 3.7752275145464983`*^9}, {
+  3.7752283401742573`*^9, 3.7752283715282087`*^9}, {3.7752306778102283`*^9, 
+  3.775230678351553*^9}, {3.7752307792459707`*^9, 3.775230793078136*^9}, {
+  3.775231300565361*^9, 3.7752313127611427`*^9}},
+ CellLabel->
+  "In[725]:=",ExpressionUUID->"edd720c6-62d1-4267-aae0-a0e8be2f9c5d"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{
+   RowBox[{"(", 
+    RowBox[{
+     RowBox[{"-", "0.04110032633364382`"}], "-", 
+     RowBox[{"0.004910048365539927`", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+   "c1"}], "-", 
+  RowBox[{
+   RowBox[{"(", 
+    RowBox[{"0.041366954994243976`", "\[VeryThinSpace]", "-", 
+     RowBox[{"0.004464006731377908`", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+   "c2"}], "+", 
+  RowBox[{
+   RowBox[{"(", 
+    RowBox[{"0.0824672813278878`", "\[VeryThinSpace]", "+", 
+     RowBox[{"0.0004460416341620203`", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+   "c3"}]}]], "Output",
+ CellChangeTimes->{{3.775227506826735*^9, 3.775227515452433*^9}, 
+   3.775227742717857*^9, 3.7752281411315813`*^9, 3.775228248401593*^9, 
+   3.775228341260454*^9, 3.7752306830171432`*^9, 3.775230797913719*^9, {
+   3.775230960812364*^9, 3.775230982674633*^9}, 3.775231313439258*^9},
+ CellLabel->
+  "Out[726]=",ExpressionUUID->"3fcfdace-e39d-40f0-931d-65df47dc584f"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{
+ RowBox[{
+  RowBox[{"t", "=", 
+   RowBox[{"List", "[", 
+    RowBox[{
+     RowBox[{"tfinal", "[", 
+      RowBox[{"[", 
+       RowBox[{"1", ",", "1"}], "]"}], "]"}], ",", 
+     RowBox[{"tfinal", "[", 
+      RowBox[{"[", 
+       RowBox[{"1", ",", "1"}], "]"}], "]"}], ",", 
+     RowBox[{"tfinal", "[", 
+      RowBox[{"[", 
+       RowBox[{"2", ",", "1"}], "]"}], "]"}], ",", 
+     RowBox[{"tfinal", "[", 
+      RowBox[{"[", 
+       RowBox[{"2", ",", "1"}], "]"}], "]"}], ",", 
+     RowBox[{"tfinal", "[", 
+      RowBox[{"[", 
+       RowBox[{"3", ",", "1"}], "]"}], "]"}], ",", 
+     RowBox[{"tfinal", "[", 
+      RowBox[{"[", 
+       RowBox[{"3", ",", "1"}], "]"}], "]"}]}], "]"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"t", "//", "MatrixForm"}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"mat", "=", 
+   RowBox[{"{", 
+    RowBox[{
+     RowBox[{"{", 
+      RowBox[{
+       RowBox[{"19", "/", "6"}], ",", 
+       RowBox[{"2", "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}]}], "}"}], ",", 
+     RowBox[{"{", 
+      RowBox[{
+       RowBox[{"2", "/", "3"}], ",", 
+       RowBox[{"19", "/", "6"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}]}], "}"}], ",", 
+     RowBox[{"{", 
+      RowBox[{
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{"2", "/", "3"}], ",", 
+       RowBox[{"19", "/", "6"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}]}], "}"}], ",", 
+     RowBox[{"{", 
+      RowBox[{
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{"19", "/", "6"}], ",", 
+       RowBox[{"2", "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}]}], "}"}], ",", 
+     RowBox[{"{", 
+      RowBox[{
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{"19", "/", "6"}], ",", 
+       RowBox[{"2", "/", "3"}]}], "}"}], ",", 
+     RowBox[{"{", 
+      RowBox[{
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{"2", "/", "3"}], ",", 
+       RowBox[{"19", "/", "6"}]}], "}"}]}], "}"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"mat", "//", "MatrixForm"}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"tdagger", "=", 
+   RowBox[{"Conjugate", "[", "t", "]"}]}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"tdagger", "//", "MatrixForm"}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{"MdagM1", "=", " ", 
+  RowBox[{"Dot", "[", 
+   RowBox[{"tdagger", ",", "mat", ",", "t"}], "]"}]}]}], "Input",
+ CellChangeTimes->{{3.7752275570312223`*^9, 3.775227690221272*^9}, {
+  3.775230883254527*^9, 3.7752308835510406`*^9}, {3.775230987433601*^9, 
+  3.775230991216572*^9}},
+ CellLabel->
+  "In[727]:=",ExpressionUUID->"f9a36ccc-6bbb-4713-9d83-1c7447160476"],
+
+Cell[BoxData[
+ RowBox[{"0.09220994247626954`", "\[VeryThinSpace]", "+", 
+  RowBox[{"1.3552527156068805`*^-19", " ", "\[ImaginaryI]"}]}]], "Output",
+ CellChangeTimes->{{3.775227564571664*^9, 3.775227575245241*^9}, 
+   3.775227629240129*^9, {3.7752276620064917`*^9, 3.775227690571496*^9}, 
+   3.7752277473169727`*^9, 3.775228144086871*^9, 3.775228249674532*^9, 
+   3.775228345985065*^9, 3.775230684528902*^9, 3.775230800155424*^9, {
+   3.775230985314646*^9, 3.775230991567499*^9}, 3.7752313155678*^9},
+ CellLabel->
+  "Out[733]=",ExpressionUUID->"aa7d22b9-3036-4d75-b2d0-18fc747a8a8d"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["MdagM0"], "Input",
+ CellChangeTimes->{{3.775227793917057*^9, 3.775227811343598*^9}, 
+   3.775227871143363*^9},
+ CellLabel->
+  "In[734]:=",ExpressionUUID->"36eb691a-1df8-413f-a81b-b5d04d022935"],
+
+Cell[BoxData[
+ RowBox[{"2.589543990648512`*^-10", "-", 
+  RowBox[{"4.1584903321868325`*^-28", " ", "\[ImaginaryI]"}]}]], "Output",
+ CellChangeTimes->{3.775227811862928*^9, 3.7752278716194763`*^9, 
+  3.775228221435535*^9, 3.775228350744491*^9, 3.775230733194573*^9, 
+  3.775230842865101*^9, 3.77523099720271*^9, 3.775231317986163*^9},
+ CellLabel->
+  "Out[734]=",ExpressionUUID->"fdfb1397-fb23-4c7c-8c83-b32a045efe7a"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["MdagM1"], "Input",
+ CellChangeTimes->{{3.775230998632595*^9, 3.775231000530785*^9}},
+ CellLabel->
+  "In[735]:=",ExpressionUUID->"7f66cd20-d1e8-4ca7-a221-9ff39aca36aa"],
+
+Cell[BoxData[
+ RowBox[{"0.09220994247626954`", "\[VeryThinSpace]", "+", 
+  RowBox[{"1.3552527156068805`*^-19", " ", "\[ImaginaryI]"}]}]], "Output",
+ CellChangeTimes->{3.775231001061522*^9, 3.775231319936281*^9},
+ CellLabel->
+  "Out[735]=",ExpressionUUID->"335e2f70-756c-4dba-8305-8a636f2cf6ae"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"MdagM0", "/", "MdagM1"}]], "Input",
+ CellChangeTimes->{{3.775227814838396*^9, 3.775227823287915*^9}},
+ CellLabel->
+  "In[736]:=",ExpressionUUID->"809aadb6-16f8-4cc9-bd6f-1d91f28835f9"],
+
+Cell[BoxData[
+ RowBox[{"2.8083132047446377`*^-9", "-", 
+  RowBox[{"8.637316340633591`*^-27", " ", "\[ImaginaryI]"}]}]], "Output",
+ CellChangeTimes->{3.7752278236474257`*^9, 3.775227875891039*^9, 
+  3.775228223085803*^9, 3.775228253833722*^9, 3.7752283528475513`*^9, 
+  3.775230735896517*^9, 3.775230845901018*^9, 3.775231005961709*^9, 
+  3.7752313221382027`*^9},
+ CellLabel->
+  "Out[736]=",ExpressionUUID->"25057792-749b-4102-83c6-f9f495295eec"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"MdagM1", "/", "MdagM0"}]], "Input",
+ CellChangeTimes->{{3.775227878977666*^9, 3.7752278909876623`*^9}},
+ CellLabel->
+  "In[737]:=",ExpressionUUID->"f8772f15-8b4e-49fe-a3b6-236dbafe3613"],
+
+Cell[BoxData[
+ RowBox[{"3.560856382794137`*^8", "+", 
+  RowBox[{"1.0951856427479182`*^-9", " ", "\[ImaginaryI]"}]}]], "Output",
+ CellChangeTimes->{{3.775227886110634*^9, 3.7752278913736897`*^9}, {
+   3.775228225719728*^9, 3.775228255335204*^9}, 3.775228354880397*^9, 
+   3.775230737795094*^9, 3.775230848068742*^9, 3.775231007766411*^9, 
+   3.775231323820561*^9},
+ CellLabel->
+  "Out[737]=",ExpressionUUID->"57e8dfd9-908a-48b6-8d80-cf22e344347f"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Directory", "[", "]"}]], "Input",
+ CellChangeTimes->{{3.775229023457518*^9, 3.7752290251402903`*^9}},
+ CellLabel->
+  "In[421]:=",ExpressionUUID->"aa43aae6-fbd8-489b-b700-ebe9d437a84b"],
+
+Cell[BoxData["\<\"/Users/josegabrielreyes/Documents/Higgs/Mathematica \
+Scripts/ggHgg/FinalSetUp/helicitiesTest\"\>"], "Output",
+ CellChangeTimes->{3.7752290901589317`*^9},
+ CellLabel->
+  "Out[421]=",ExpressionUUID->"d2d8c151-4c04-472d-91db-93581375244f"]
+}, Open  ]],
+
+Cell[BoxData[
+ RowBox[{"(*", " ", 
+  RowBox[{"BOXES", " ", "TEST"}], " ", "*)"}]], "Input",
+ CellChangeTimes->{{3.775229138398674*^9, 
+  3.775229144749391*^9}},ExpressionUUID->"b20f7e47-3fac-4864-a7ff-\
+e1acd3f6092a"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"subbox", "=", 
+  RowBox[{"Import", "[", "\"\<box_++++.m\>\"", "]"}]}]], "Input",
+ CellChangeTimes->{{3.775229092912006*^9, 3.775229117822713*^9}},
+ CellLabel->
+  "In[422]:=",ExpressionUUID->"c82ec215-95ed-4d74-990c-6d27d1f70484"],
+
+Cell[BoxData[
+ InterpretationBox[
+  TagBox[
+   FrameBox[GridBox[{
+      {
+       ItemBox[
+        TagBox[
+         RowBox[{
+          FractionBox[
+           RowBox[{"c3", " ", 
+            RowBox[{"(", 
+             RowBox[{
+              TemplateBox[{"33"},
+               "OutputSizeLimit`Skeleton"], "+", 
+              FractionBox[
+               RowBox[{"8", " ", 
+                TemplateBox[{"4"},
+                 "OutputSizeLimit`Skeleton"], " ", 
+                RowBox[{"(", 
+                 TemplateBox[{"1"},
+                  "OutputSizeLimit`Skeleton"], ")"}]}], 
+               RowBox[{"MW", " ", "SW"}]]}], ")"}]}], 
+           RowBox[{
+            SuperscriptBox["MH", "2"], "-", "S", "-", "T24", "-", "U"}]], "+", 
+          FractionBox[
+           RowBox[{"c3", " ", 
+            RowBox[{"(", 
+             RowBox[{
+              FractionBox[
+               TemplateBox[{"1"},
+                "OutputSizeLimit`Skeleton"], 
+               RowBox[{"MW", " ", "SW"}]], "+", 
+              TemplateBox[{"60"},
+               "OutputSizeLimit`Skeleton"], "+", 
+              FractionBox[
+               RowBox[{"4", " ", 
+                TemplateBox[{"4"},
+                 "OutputSizeLimit`Skeleton"], " ", 
+                RowBox[{"(", 
+                 TemplateBox[{"1"},
+                  "OutputSizeLimit`Skeleton"], ")"}]}], 
+               RowBox[{"MW", " ", "SW"}]]}], ")"}]}], 
+           RowBox[{
+            SuperscriptBox["MH", "2"], "-", "S", "-", "T24", "-", "U"}]], "+", 
+          FractionBox[
+           RowBox[{"2", " ", "c1", " ", 
+            RowBox[{"(", 
+             TemplateBox[{"1"},
+              "OutputSizeLimit`Skeleton"], ")"}]}], 
+           RowBox[{
+            SuperscriptBox["MH", "2"], "-", "S", "-", "T", "-", "T14"}]], "+", 
+          FractionBox[
+           RowBox[{"c3", 
+            TemplateBox[{"1"},
+             "OutputSizeLimit`Skeleton"], 
+            RowBox[{"(", 
+             RowBox[{
+              TemplateBox[{"1"},
+               "OutputSizeLimit`Skeleton"], 
+              TemplateBox[{"1"},
+               "OutputSizeLimit`Skeleton"]}]}]}], "T14"], "+", 
+          TemplateBox[{"14"},
+           "OutputSizeLimit`Skeleton"], "+", 
+          TemplateBox[{"1"},
+           "OutputSizeLimit`Skeleton"], "+", 
+          FractionBox[
+           RowBox[{
+            SuperscriptBox["Alfas", "2"], " ", 
+            TemplateBox[{"3"},
+             "OutputSizeLimit`Skeleton"], " ", 
+            RowBox[{"(", 
+             RowBox[{
+              FractionBox[
+               TemplateBox[{"1"},
+                "OutputSizeLimit`Skeleton"], 
+               TemplateBox[{"1"},
+                "OutputSizeLimit`Skeleton"]], "+", 
+              TemplateBox[{"1"},
+               "OutputSizeLimit`Skeleton"]}], ")"}]}], 
+           RowBox[{"MW", " ", "SW"}]], "-", 
+          FractionBox[
+           RowBox[{
+            SuperscriptBox["Alfas", "2"], " ", "c3", " ", "EL", " ", 
+            SuperscriptBox["MT", "2"], " ", 
+            RowBox[{"(", 
+             RowBox[{
+              FractionBox[
+               TemplateBox[{"1"},
+                "OutputSizeLimit`Skeleton"], "T14"], "-", 
+              FractionBox[
+               TemplateBox[{"1"},
+                "OutputSizeLimit`Skeleton"], "T24"]}], ")"}]}], 
+           RowBox[{"MW", " ", "SW"}]], "-", 
+          FractionBox[
+           RowBox[{
+            SuperscriptBox["Alfas", "2"], " ", "c3", " ", "EL", " ", 
+            SuperscriptBox["MT", "2"], " ", 
+            RowBox[{"(", 
+             RowBox[{
+              FractionBox[
+               TemplateBox[{"1"},
+                "OutputSizeLimit`Skeleton"], "T14"], "-", 
+              FractionBox[
+               RowBox[{
+                TemplateBox[{"1"},
+                 "OutputSizeLimit`Skeleton"], "+", 
+                TemplateBox[{"59"},
+                 "OutputSizeLimit`Skeleton"]}], "T24"]}], ")"}]}], 
+           RowBox[{"MW", " ", "SW"}]]}],
+         Short[#, 5]& ],
+        BaseStyle->{Deployed -> False},
+        StripOnInput->False]},
+      {GridBox[{
+         {
+          TagBox[
+           TooltipBox[
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource[
+                "FEStrings", "sizeBriefExplanation"], StandardForm],
+               ImageSizeCache->{58., {2., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLText",
+             StripOnInput->False],
+            StyleBox[
+             DynamicBox[
+              ToBoxes[
+               FEPrivate`FrontEndResource["FEStrings", "sizeExplanation"], 
+               StandardForm]], DynamicUpdating -> True, StripOnInput -> 
+             False]],
+           Annotation[#, 
+            Style[
+             Dynamic[
+              FEPrivate`FrontEndResource["FEStrings", "sizeExplanation"]], 
+             DynamicUpdating -> True], "Tooltip"]& ], 
+          ButtonBox[
+           PaneSelectorBox[{False->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowLess"], 
+                StandardForm],
+               ImageSizeCache->{50., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControl",
+             StripOnInput->False], True->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowLess"], 
+                StandardForm],
+               ImageSizeCache->{50., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControlActive",
+             StripOnInput->False]}, Dynamic[
+             CurrentValue["MouseOver"]],
+            Alignment->Center,
+            FrameMargins->0,
+            ImageSize->{Automatic, 25}],
+           Appearance->None,
+           BaselinePosition->Baseline,
+           
+           ButtonFunction:>OutputSizeLimit`ButtonFunction[
+            OutputSizeLimit`Defer, 422, 17477231814507770626, 5/2],
+           Enabled->True,
+           Evaluator->Automatic,
+           Method->"Queued"], 
+          ButtonBox[
+           PaneSelectorBox[{False->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowMore"], 
+                StandardForm],
+               ImageSizeCache->{56., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControl",
+             StripOnInput->False], True->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowMore"], 
+                StandardForm],
+               ImageSizeCache->{56., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControlActive",
+             StripOnInput->False]}, Dynamic[
+             CurrentValue["MouseOver"]],
+            Alignment->Center,
+            FrameMargins->0,
+            ImageSize->{Automatic, 25}],
+           Appearance->None,
+           BaselinePosition->Baseline,
+           
+           ButtonFunction:>OutputSizeLimit`ButtonFunction[
+            OutputSizeLimit`Defer, 422, 17477231814507770626, 5 2],
+           Enabled->True,
+           Evaluator->Automatic,
+           Method->"Queued"], 
+          ButtonBox[
+           PaneSelectorBox[{False->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowAll"], 
+                StandardForm],
+               ImageSizeCache->{42., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControl",
+             StripOnInput->False], True->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowAll"], 
+                StandardForm]],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControlActive",
+             StripOnInput->False]}, Dynamic[
+             CurrentValue["MouseOver"]],
+            Alignment->Center,
+            FrameMargins->0,
+            ImageSize->{Automatic, 25}],
+           Appearance->None,
+           BaselinePosition->Baseline,
+           
+           ButtonFunction:>OutputSizeLimit`ButtonFunction[
+            OutputSizeLimit`Defer, 422, 17477231814507770626, Infinity],
+           Enabled->True,
+           Evaluator->Automatic,
+           Method->"Queued"], 
+          ButtonBox[
+           PaneSelectorBox[{False->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeChangeLimit"], 
+                StandardForm],
+               ImageSizeCache->{74., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControl",
+             StripOnInput->False], True->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeChangeLimit"], 
+                StandardForm]],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControlActive",
+             StripOnInput->False]}, Dynamic[
+             CurrentValue["MouseOver"]],
+            Alignment->Center,
+            FrameMargins->0,
+            ImageSize->{Automatic, 25}],
+           Appearance->None,
+           BaselinePosition->Baseline,
+           ButtonFunction:>FrontEndExecute[{
+              FrontEnd`SetOptions[
+              FrontEnd`$FrontEnd, 
+               FrontEnd`PreferencesSettings -> {"Page" -> "Advanced"}], 
+              FrontEnd`FrontEndToken["PreferencesDialog"]}],
+           Evaluator->None,
+           Method->"Preemptive"]}
+        },
+        AutoDelete->False,
+        FrameStyle->GrayLevel[0.85],
+        GridBoxDividers->{"Columns" -> {False, {True}}},
+        GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
+        GridBoxSpacings->{"Columns" -> {{2}}}]}
+     },
+     DefaultBaseStyle->"Column",
+     GridBoxAlignment->{
+      "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, 
+       "RowsIndexed" -> {}},
+     GridBoxDividers->{
+      "Columns" -> {{False}}, "ColumnsIndexed" -> {}, "Rows" -> {{False}}, 
+       "RowsIndexed" -> {}},
+     GridBoxItemSize->{
+      "Columns" -> {{Automatic}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}}, 
+       "RowsIndexed" -> {}},
+     GridBoxSpacings->{"Columns" -> {
+         Offset[0.27999999999999997`], {
+          Offset[0.5599999999999999]}, 
+         Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
+         Offset[0.2], 
+         Offset[1.2], {
+          Offset[0.4]}, 
+         Offset[0.2]}, "RowsIndexed" -> {}}],
+    BaseStyle->"OutputSizeLimit",
+    FrameMargins->{{12, 12}, {0, 15}},
+    FrameStyle->GrayLevel[0.85],
+    RoundingRadius->5,
+    StripOnInput->False],
+   Deploy,
+   DefaultBaseStyle->"Deploy"],
+  If[17477231814507770626 === $SessionID, 
+   Out[422], Message[
+     MessageName[Syntax, "noinfoker"]]; Missing["NotAvailable"]; 
+   Null]]], "Output",
+ CellChangeTimes->{3.775229157866227*^9},
+ CellLabel->
+  "Out[422]=",ExpressionUUID->"d2eb5bb5-ca40-4bc9-8035-0ad20d7444eb"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{
+ RowBox[{
+  RowBox[{"output", "=", 
+   RowBox[{
+    RowBox[{"N", "[", 
+     RowBox[{
+      RowBox[{"OutputPS", "[", 
+       RowBox[{"300.", ",", "20.", ",", "0", ",", 
+        RowBox[{"Pi", "/", "3"}], ",", "0", ",", 
+        RowBox[{"3", "*", 
+         RowBox[{"Pi", "/", "2"}]}], ",", "125."}], "]"}], ",", "10"}], "]"}],
+     "[", 
+    RowBox[{"[", "2", "]"}], "]"}]}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"KinRules", "=", 
+   RowBox[{"f", "[", 
+    RowBox[{"variables", ",", "output"}], "]"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"KinSub", "=", 
+   RowBox[{"{", 
+    RowBox[{
+     RowBox[{"S", "\[Rule]", 
+      RowBox[{"300.", "^", "2"}]}], ",", 
+     RowBox[{"kT3", "\[Rule]", "20."}], ",", 
+     RowBox[{"\[Eta]3", "\[Rule]", "0"}], ",", 
+     RowBox[{"\[Phi]3", "\[Rule]", 
+      RowBox[{"Pi", "/", "3"}]}], ",", 
+     RowBox[{"\[Eta]4", "\[Rule]", "0"}], ",", 
+     RowBox[{"\[Phi]4", "\[Rule]", 
+      RowBox[{"3", "*", 
+       RowBox[{"Pi", "/", "2"}]}]}], ",", 
+     RowBox[{"MH", "\[Rule]", "125."}], ",", 
+     RowBox[{"MT", "\[Rule]", "173."}]}], "}"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"bsub", "=", 
+   RowBox[{
+    RowBox[{
+     RowBox[{"subbox", "//.", "KinRules"}], "//.", "KinSub"}], "//", 
+    "FullSimplify"}]}], ";"}], "\[IndentingNewLine]"}], "Input",
+ CellChangeTimes->{{3.775229164689459*^9, 3.7752292459898567`*^9}, {
+   3.7752293068416357`*^9, 3.7752293082899437`*^9}, {3.775229436018053*^9, 
+   3.775229448330065*^9}, {3.775229483919393*^9, 3.7752294847148743`*^9}, {
+   3.775229538653103*^9, 3.7752295449435863`*^9}, 3.7752296549936523`*^9},
+ CellLabel->
+  "In[546]:=",ExpressionUUID->"cd9723fe-5ae1-425a-ab81-ebf4322d7796"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"kT3_max = \"\>", "\[InvisibleSpace]", 
+   RowBox[{"{", 
+    RowBox[{"kT3", "\[Rule]", "123.95833333333334`"}], "}"}], 
+   "\[InvisibleSpace]", "\<\"\\n\"\>"}],
+  SequenceForm["kT3_max = ", {$CellContext`kT3 -> 123.95833333333334`}, "\n"],
+  
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775229542211306*^9, 3.77523054453467*^9},
+ CellLabel->
+  "During evaluation of \
+In[546]:=",ExpressionUUID->"2d451221-0c8c-4a6d-900e-eef366e55a07"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"Four Momenta : \\n\"\>", "\[InvisibleSpace]", 
+   TagBox[
+    RowBox[{"(", "\[NoBreak]", 
+     TagBox[GridBox[{
+        {
+         RowBox[{"p1", "\[Rule]", 
+          RowBox[{"{", 
+           RowBox[{"150.`", ",", "0.`", ",", "0.`", ",", "150.`"}], "}"}]}]},
+        {
+         RowBox[{"p2", "\[Rule]", 
+          RowBox[{"{", 
+           RowBox[{"150.`", ",", "0.`", ",", "0.`", ",", 
+            RowBox[{"-", "150.`"}]}], "}"}]}]},
+        {
+         RowBox[{"p3", "\[Rule]", 
+          RowBox[{"{", 
+           RowBox[{
+           "126.58988901172162`", ",", "10.`", ",", "17.320508075688775`", 
+            ",", "0.`"}], "}"}]}]},
+        {
+         RowBox[{"p4", "\[Rule]", 
+          RowBox[{"{", 
+           RowBox[{"95.04498070119013`", ",", "0.`", ",", 
+            RowBox[{"-", "95.04498070119013`"}], ",", "0.`"}], "}"}]}]},
+        {
+         RowBox[{"p5", "\[Rule]", 
+          RowBox[{"{", 
+           RowBox[{"78.3651302870882`", ",", 
+            RowBox[{"-", "10.`"}], ",", "77.72447262550135`", ",", "0.`"}], 
+           "}"}]}]}
+       },
+       GridBoxAlignment->{
+        "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, 
+         "Rows" -> {{Baseline}}, "RowsIndexed" -> {}},
+       GridBoxSpacings->{"Columns" -> {
+           Offset[0.27999999999999997`], {
+            Offset[0.5599999999999999]}, 
+           Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
+           Offset[0.2], {
+            Offset[0.4]}, 
+           Offset[0.2]}, "RowsIndexed" -> {}}],
+      Column], "\[NoBreak]", ")"}],
+    Function[BoxForm`e$, 
+     MatrixForm[BoxForm`e$]]], "\[InvisibleSpace]", "\<\"\\n\"\>"}],
+  SequenceForm["Four Momenta : \n", 
+   MatrixForm[{$CellContext`p1 -> {150., 0., 0., 150.}, $CellContext`p2 -> {
+      150., 0., 0., -150.}, $CellContext`p3 -> {126.58988901172162`, 10., 
+      17.320508075688775`, 0.}, $CellContext`p4 -> {95.04498070119013, 
+      0., -95.04498070119013, 0.}, $CellContext`p5 -> {78.3651302870882, -10.,
+       77.72447262550135, 0.}}], "\n"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775229542211306*^9, 3.775230544550933*^9},
+ CellLabel->
+  "During evaluation of \
+In[546]:=",ExpressionUUID->"446afc90-b7d9-40f2-a649-5b1fb0898ef2"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"Check 4 momentum conservation: p3+p4+p5 -p1 -p2 =0 :  \"\>", 
+   "\[InvisibleSpace]", 
+   RowBox[{"{", 
+    RowBox[{
+     RowBox[{
+     "-", "3.887221955939928966560590155849714544348308363744058289341178206`\
+43.811488088675176*^-14"}], ",", "0``58.69897000433602", ",", 
+     "0``57.72104081749894", ",", "0``57.522878745280345"}], "}"}]}],
+  SequenceForm[
+  "Check 4 momentum conservation: p3+p4+p5 -p1 -p2 =0 :  ", \
+{-3.887221955939928966560590155849714544348308363744058289341178206`43.\
+811488088675176*^-14, 0``58.69897000433602, 0``57.72104081749894, 
+    0``57.522878745280345}],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775229542211306*^9, 3.775230544565895*^9},
+ CellLabel->
+  "During evaluation of \
+In[546]:=",ExpressionUUID->"445e2145-d7ab-4474-817e-fca7d8921e18"],
+
+Cell[BoxData["\<\"MOMENTUM IS CONSERVED, ALL IS WELL!\"\>"], "Print",
+ CellChangeTimes->{3.775229542211306*^9, 3.775230544575285*^9},
+ CellLabel->
+  "During evaluation of \
+In[546]:=",ExpressionUUID->"576e6130-cb63-4d40-9fa7-06ce080bbda8"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{
+   RowBox[{"kkT3", "\[Rule]", "20.`"}], ",", 
+   RowBox[{"kkT4", "\[Rule]", "95.0449807011901270926`10."}], ",", 
+   RowBox[{"S", "\[Rule]", "90000.`10."}], ",", 
+   RowBox[{"T", "\[Rule]", 
+    RowBox[{"-", "22351.9667035164881926659`10."}]}], ",", 
+   RowBox[{"U", "\[Rule]", 
+    RowBox[{"-", "22351.9667035164881926659`10."}]}], ",", 
+   RowBox[{"T24", "\[Rule]", 
+    RowBox[{"-", "28513.4942103570381277677`10."}]}], ",", 
+   RowBox[{"T14", "\[Rule]", 
+    RowBox[{"-", "28513.4942103570381277677`10."}]}], ",", 
+   RowBox[{"S34", "\[Rule]", "42980.9218277470587333204`10."}], ",", 
+   RowBox[{
+    SqrtBox["S"], "\[Rule]", "300.`10."}], ",", 
+   RowBox[{
+    SqrtBox["S34"], "\[Rule]", "207.3184068715246970733`10."}], ",", 
+   RowBox[{
+    RowBox[{"Tan", "[", "\[Phi]5", "]"}], "\[Rule]", 
+    RowBox[{"-", "0.12865960568407904294629727505559632487`10."}]}], ",", 
+   RowBox[{"kT5", "\[Rule]", "78.3651302870882067263`10."}], ",", 
+   RowBox[{
+    SqrtBox["S35"], "\[Rule]", "181.5847228686540904465`10."}]}], 
+  "}"}]], "Print",
+ CellChangeTimes->{3.775229542211306*^9, 3.775230544585321*^9},
+ CellLabel->
+  "During evaluation of \
+In[546]:=",ExpressionUUID->"5eb1a54c-f688-440b-9825-8273a1dadee7"]
+}, Open  ]]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{
+ RowBox[{"bfinal", "=", 
+  RowBox[{
+   RowBox[{"bsub", "/.", 
+    RowBox[{"{", 
+     RowBox[{
+      RowBox[{"Alfas", "\[Rule]", "1"}], ",", 
+      RowBox[{"MW", "\[Rule]", "80.376"}], ",", 
+      RowBox[{"SW", "\[Rule]", "0.480832611207"}], ",", 
+      RowBox[{"EL", "\[Rule]", 
+       RowBox[{"Sqrt", "[", 
+        RowBox[{"4", "*", "Pi"}], "]"}]}]}], "}"}]}], "//", 
+   "Simplify"}]}], "\[IndentingNewLine]", 
+ RowBox[{"bfinal", "=", " ", 
+  RowBox[{
+   RowBox[{
+    RowBox[{"(", 
+     RowBox[{"0.5081635528028182`", "\[VeryThinSpace]", "+", 
+      RowBox[{"0.014585184336615332`", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+    "c1"}], "+", 
+   RowBox[{
+    RowBox[{"(", 
+     RowBox[{"0.5081953030728049`", "\[VeryThinSpace]", "-", 
+      RowBox[{"0.01458926931457687`", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+    "c2"}], "-", 
+   RowBox[{
+    RowBox[{"(", 
+     RowBox[{"1.016358855875623`", "\[VeryThinSpace]", "-", 
+      RowBox[{"4.084977961588639`*^-6", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+    "c3"}]}]}]}], "Input",
+ CellChangeTimes->{{3.775229661002421*^9, 3.775229661621059*^9}, {
+  3.775229745934651*^9, 3.7752297944663467`*^9}},
+ CellLabel->
+  "In[550]:=",ExpressionUUID->"36a40cc7-40c3-4807-8617-acf13576bbcd"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(", 
+   RowBox[{"0.`", "\[VeryThinSpace]", "+", 
+    RowBox[{"0.`", " ", "\[ImaginaryI]"}]}], ")"}], "+", 
+  RowBox[{
+   RowBox[{"(", 
+    RowBox[{"0.5081635528028182`", "\[VeryThinSpace]", "+", 
+     RowBox[{"0.014585184336615332`", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+   "c1"}], "+", 
+  RowBox[{
+   RowBox[{"(", 
+    RowBox[{"0.5081953030728049`", "\[VeryThinSpace]", "-", 
+     RowBox[{"0.01458926931457687`", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+   "c2"}], "-", 
+  RowBox[{
+   RowBox[{"(", 
+    RowBox[{"1.016358855875623`", "\[VeryThinSpace]", "-", 
+     RowBox[{"4.084977961588639`*^-6", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+   "c3"}]}]], "Output",
+ CellChangeTimes->{{3.775229658233827*^9, 3.775229662203299*^9}, {
+   3.775229746808633*^9, 3.775229795056713*^9}, 3.775230570731395*^9},
+ CellLabel->
+  "Out[550]=",ExpressionUUID->"92cd9b5e-a716-4e44-bd0a-1880c41e59e9"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{
+   RowBox[{"(", 
+    RowBox[{"0.5081635528028182`", "\[VeryThinSpace]", "+", 
+     RowBox[{"0.014585184336615332`", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+   "c1"}], "+", 
+  RowBox[{
+   RowBox[{"(", 
+    RowBox[{"0.5081953030728049`", "\[VeryThinSpace]", "-", 
+     RowBox[{"0.01458926931457687`", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+   "c2"}], "-", 
+  RowBox[{
+   RowBox[{"(", 
+    RowBox[{"1.016358855875623`", "\[VeryThinSpace]", "-", 
+     RowBox[{"4.084977961588639`*^-6", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+   "c3"}]}]], "Output",
+ CellChangeTimes->{{3.775229658233827*^9, 3.775229662203299*^9}, {
+   3.775229746808633*^9, 3.775229795056713*^9}, 3.775230570747328*^9},
+ CellLabel->
+  "Out[551]=",ExpressionUUID->"7bbae190-812f-49ad-a656-5a73f8176dd3"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{
+ RowBox[{
+  RowBox[{"b", "=", 
+   RowBox[{"List", "[", 
+    RowBox[{
+     RowBox[{"bfinal", "[", 
+      RowBox[{"[", 
+       RowBox[{"1", ",", "1"}], "]"}], "]"}], ",", 
+     RowBox[{"bfinal", "[", 
+      RowBox[{"[", 
+       RowBox[{"1", ",", "1"}], "]"}], "]"}], ",", 
+     RowBox[{"bfinal", "[", 
+      RowBox[{"[", 
+       RowBox[{"2", ",", "1"}], "]"}], "]"}], ",", 
+     RowBox[{"bfinal", "[", 
+      RowBox[{"[", 
+       RowBox[{"2", ",", "1"}], "]"}], "]"}], ",", 
+     RowBox[{"bfinal", "[", 
+      RowBox[{"[", 
+       RowBox[{"3", ",", "1"}], "]"}], "]"}], ",", 
+     RowBox[{"bfinal", "[", 
+      RowBox[{"[", 
+       RowBox[{"3", ",", "1"}], "]"}], "]"}]}], "]"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{"b", "//", "MatrixForm"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"mat", "=", 
+   RowBox[{"{", 
+    RowBox[{
+     RowBox[{"{", 
+      RowBox[{
+       RowBox[{"19", "/", "6"}], ",", 
+       RowBox[{"2", "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}]}], "}"}], ",", 
+     RowBox[{"{", 
+      RowBox[{
+       RowBox[{"2", "/", "3"}], ",", 
+       RowBox[{"19", "/", "6"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}]}], "}"}], ",", 
+     RowBox[{"{", 
+      RowBox[{
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{"2", "/", "3"}], ",", 
+       RowBox[{"19", "/", "6"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}]}], "}"}], ",", 
+     RowBox[{"{", 
+      RowBox[{
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{"19", "/", "6"}], ",", 
+       RowBox[{"2", "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}]}], "}"}], ",", 
+     RowBox[{"{", 
+      RowBox[{
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{"19", "/", "6"}], ",", 
+       RowBox[{"2", "/", "3"}]}], "}"}], ",", 
+     RowBox[{"{", 
+      RowBox[{
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{"2", "/", "3"}], ",", 
+       RowBox[{"19", "/", "6"}]}], "}"}]}], "}"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{"mat", "//", "MatrixForm"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"bdagger", "=", 
+   RowBox[{"Conjugate", "[", "b", "]"}]}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{"bdagger", "//", "MatrixForm"}], "\[IndentingNewLine]", 
+ RowBox[{"MdagM0", "=", " ", 
+  RowBox[{"Dot", "[", 
+   RowBox[{"bdagger", ",", "mat", ",", "b"}], "]"}]}]}], "Input",
+ CellLabel->
+  "In[552]:=",ExpressionUUID->"12f49268-37df-4130-a29f-0ba951bf6635"],
+
+Cell[BoxData[
+ TagBox[
+  RowBox[{"(", "\[NoBreak]", 
+   TagBox[GridBox[{
+      {
+       RowBox[{"0.5081635528028182`", "\[VeryThinSpace]", "+", 
+        RowBox[{"0.014585184336615332`", " ", "\[ImaginaryI]"}]}]},
+      {
+       RowBox[{"0.5081635528028182`", "\[VeryThinSpace]", "+", 
+        RowBox[{"0.014585184336615332`", " ", "\[ImaginaryI]"}]}]},
+      {
+       RowBox[{"0.5081953030728049`", "\[VeryThinSpace]", "-", 
+        RowBox[{"0.01458926931457687`", " ", "\[ImaginaryI]"}]}]},
+      {
+       RowBox[{"0.5081953030728049`", "\[VeryThinSpace]", "-", 
+        RowBox[{"0.01458926931457687`", " ", "\[ImaginaryI]"}]}]},
+      {
+       RowBox[{
+        RowBox[{"-", "1.016358855875623`"}], "+", 
+        RowBox[{"4.084977961588639`*^-6", " ", "\[ImaginaryI]"}]}]},
+      {
+       RowBox[{
+        RowBox[{"-", "1.016358855875623`"}], "+", 
+        RowBox[{"4.084977961588639`*^-6", " ", "\[ImaginaryI]"}]}]}
+     },
+     GridBoxAlignment->{
+      "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
+        "RowsIndexed" -> {}},
+     GridBoxSpacings->{"Columns" -> {
+         Offset[0.27999999999999997`], {
+          Offset[0.5599999999999999]}, 
+         Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
+         Offset[0.2], {
+          Offset[0.4]}, 
+         Offset[0.2]}, "RowsIndexed" -> {}}],
+    Column], "\[NoBreak]", ")"}],
+  Function[BoxForm`e$, 
+   MatrixForm[BoxForm`e$]]]], "Output",
+ CellChangeTimes->{3.7752292775431757`*^9, 3.775229335743758*^9, 
+  3.775229436892448*^9, 3.775229476345936*^9, 3.775229510860489*^9, 
+  3.77522964641859*^9, 3.775229809066353*^9, 3.77523051577046*^9, 
+  3.775230570885751*^9},
+ CellLabel->
+  "Out[553]//MatrixForm=",ExpressionUUID->"1a999a2c-24e4-458b-9240-\
+da9ed516f81d"],
+
+Cell[BoxData[
+ TagBox[
+  RowBox[{"(", "\[NoBreak]", GridBox[{
+     {
+      FractionBox["19", "6"], 
+      FractionBox["2", "3"], 
+      RowBox[{"-", 
+       FractionBox["1", "3"]}], 
+      RowBox[{"-", 
+       FractionBox["1", "3"]}], 
+      RowBox[{"-", 
+       FractionBox["1", "3"]}], 
+      RowBox[{"-", 
+       FractionBox["1", "3"]}]},
+     {
+      FractionBox["2", "3"], 
+      FractionBox["19", "6"], 
+      RowBox[{"-", 
+       FractionBox["1", "3"]}], 
+      RowBox[{"-", 
+       FractionBox["1", "3"]}], 
+      RowBox[{"-", 
+       FractionBox["1", "3"]}], 
+      RowBox[{"-", 
+       FractionBox["1", "3"]}]},
+     {
+      RowBox[{"-", 
+       FractionBox["1", "3"]}], 
+      RowBox[{"-", 
+       FractionBox["1", "3"]}], 
+      FractionBox["2", "3"], 
+      FractionBox["19", "6"], 
+      RowBox[{"-", 
+       FractionBox["1", "3"]}], 
+      RowBox[{"-", 
+       FractionBox["1", "3"]}]},
+     {
+      RowBox[{"-", 
+       FractionBox["1", "3"]}], 
+      RowBox[{"-", 
+       FractionBox["1", "3"]}], 
+      FractionBox["19", "6"], 
+      FractionBox["2", "3"], 
+      RowBox[{"-", 
+       FractionBox["1", "3"]}], 
+      RowBox[{"-", 
+       FractionBox["1", "3"]}]},
+     {
+      RowBox[{"-", 
+       FractionBox["1", "3"]}], 
+      RowBox[{"-", 
+       FractionBox["1", "3"]}], 
+      RowBox[{"-", 
+       FractionBox["1", "3"]}], 
+      RowBox[{"-", 
+       FractionBox["1", "3"]}], 
+      FractionBox["19", "6"], 
+      FractionBox["2", "3"]},
+     {
+      RowBox[{"-", 
+       FractionBox["1", "3"]}], 
+      RowBox[{"-", 
+       FractionBox["1", "3"]}], 
+      RowBox[{"-", 
+       FractionBox["1", "3"]}], 
+      RowBox[{"-", 
+       FractionBox["1", "3"]}], 
+      FractionBox["2", "3"], 
+      FractionBox["19", "6"]}
+    },
+    GridBoxAlignment->{
+     "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, 
+      "RowsIndexed" -> {}},
+    GridBoxSpacings->{"Columns" -> {
+        Offset[0.27999999999999997`], {
+         Offset[0.7]}, 
+        Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
+        Offset[0.2], {
+         Offset[0.4]}, 
+        Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}],
+  Function[BoxForm`e$, 
+   MatrixForm[BoxForm`e$]]]], "Output",
+ CellChangeTimes->{3.7752292775431757`*^9, 3.775229335743758*^9, 
+  3.775229436892448*^9, 3.775229476345936*^9, 3.775229510860489*^9, 
+  3.77522964641859*^9, 3.775229809066353*^9, 3.77523051577046*^9, 
+  3.775230570902236*^9},
+ CellLabel->
+  "Out[555]//MatrixForm=",ExpressionUUID->"2fb42af8-da7f-4552-9e3b-\
+9bbf57fab2ce"],
+
+Cell[BoxData[
+ TagBox[
+  RowBox[{"(", "\[NoBreak]", 
+   TagBox[GridBox[{
+      {
+       RowBox[{"0.5081635528028182`", "\[VeryThinSpace]", "-", 
+        RowBox[{"0.014585184336615332`", " ", "\[ImaginaryI]"}]}]},
+      {
+       RowBox[{"0.5081635528028182`", "\[VeryThinSpace]", "-", 
+        RowBox[{"0.014585184336615332`", " ", "\[ImaginaryI]"}]}]},
+      {
+       RowBox[{"0.5081953030728049`", "\[VeryThinSpace]", "+", 
+        RowBox[{"0.01458926931457687`", " ", "\[ImaginaryI]"}]}]},
+      {
+       RowBox[{"0.5081953030728049`", "\[VeryThinSpace]", "+", 
+        RowBox[{"0.01458926931457687`", " ", "\[ImaginaryI]"}]}]},
+      {
+       RowBox[{
+        RowBox[{"-", "1.016358855875623`"}], "-", 
+        RowBox[{"4.084977961588639`*^-6", " ", "\[ImaginaryI]"}]}]},
+      {
+       RowBox[{
+        RowBox[{"-", "1.016358855875623`"}], "-", 
+        RowBox[{"4.084977961588639`*^-6", " ", "\[ImaginaryI]"}]}]}
+     },
+     GridBoxAlignment->{
+      "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
+        "RowsIndexed" -> {}},
+     GridBoxSpacings->{"Columns" -> {
+         Offset[0.27999999999999997`], {
+          Offset[0.5599999999999999]}, 
+         Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
+         Offset[0.2], {
+          Offset[0.4]}, 
+         Offset[0.2]}, "RowsIndexed" -> {}}],
+    Column], "\[NoBreak]", ")"}],
+  Function[BoxForm`e$, 
+   MatrixForm[BoxForm`e$]]]], "Output",
+ CellChangeTimes->{3.7752292775431757`*^9, 3.775229335743758*^9, 
+  3.775229436892448*^9, 3.775229476345936*^9, 3.775229510860489*^9, 
+  3.77522964641859*^9, 3.775229809066353*^9, 3.77523051577046*^9, 
+  3.77523057091267*^9},
+ CellLabel->
+  "Out[557]//MatrixForm=",ExpressionUUID->"a3d1a0f7-2104-419a-a290-\
+17d0866e267d"],
+
+Cell[BoxData[
+ RowBox[{"13.949132046994812`", "\[VeryThinSpace]", "+", 
+  RowBox[{"6.288372600415926`*^-18", " ", "\[ImaginaryI]"}]}]], "Output",
+ CellChangeTimes->{3.7752292775431757`*^9, 3.775229335743758*^9, 
+  3.775229436892448*^9, 3.775229476345936*^9, 3.775229510860489*^9, 
+  3.77522964641859*^9, 3.775229809066353*^9, 3.77523051577046*^9, 
+  3.775230570922517*^9},
+ CellLabel->
+  "Out[558]=",ExpressionUUID->"49cf19f7-b5ca-4da2-a2fc-4505f8717f09"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{
+ RowBox[{
+  RowBox[{"output", "=", 
+   RowBox[{
+    RowBox[{"N", "[", 
+     RowBox[{
+      RowBox[{"OutputPS", "[", 
+       RowBox[{"300.", ",", "40.", ",", "0", ",", 
+        RowBox[{"Pi", "/", "3"}], ",", "0", ",", 
+        RowBox[{"3", "*", 
+         RowBox[{"Pi", "/", "2"}]}], ",", "125."}], "]"}], ",", "10"}], "]"}],
+     "[", 
+    RowBox[{"[", "2", "]"}], "]"}]}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"KinRules", "=", 
+   RowBox[{"f", "[", 
+    RowBox[{"variables", ",", "output"}], "]"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"KinSub", "=", 
+   RowBox[{"{", 
+    RowBox[{
+     RowBox[{"S", "\[Rule]", 
+      RowBox[{"300.", "^", "2"}]}], ",", 
+     RowBox[{"kT3", "\[Rule]", "40."}], ",", 
+     RowBox[{"\[Eta]3", "\[Rule]", "0"}], ",", 
+     RowBox[{"\[Phi]3", "\[Rule]", 
+      RowBox[{"Pi", "/", "3"}]}], ",", 
+     RowBox[{"\[Eta]4", "\[Rule]", "0"}], ",", 
+     RowBox[{"\[Phi]4", "\[Rule]", 
+      RowBox[{"3", "*", 
+       RowBox[{"Pi", "/", "2"}]}]}], ",", 
+     RowBox[{"MH", "\[Rule]", "125."}], ",", 
+     RowBox[{"MT", "\[Rule]", "173."}]}], "}"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"bsub", "=", 
+   RowBox[{
+    RowBox[{
+     RowBox[{"subbox", "//.", "KinRules"}], "//.", "KinSub"}], "//", 
+    "FullSimplify"}]}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{"bfinal", "=", 
+  RowBox[{
+   RowBox[{"bsub", "/.", 
+    RowBox[{"{", 
+     RowBox[{
+      RowBox[{"Alfas", "\[Rule]", "1"}], ",", 
+      RowBox[{"MW", "\[Rule]", "80.376"}], ",", 
+      RowBox[{"SW", "\[Rule]", "0.480832611207"}], ",", 
+      RowBox[{"EL", "\[Rule]", 
+       RowBox[{"Sqrt", "[", 
+        RowBox[{"4", "*", "Pi"}], "]"}]}]}], "}"}]}], "//", 
+   "Simplify"}]}], "\[IndentingNewLine]"}], "Input",
+ CellChangeTimes->{{3.77522931828927*^9, 3.775229335995839*^9}, {
+   3.775229456299572*^9, 3.775229493104308*^9}, 3.7752298183255167`*^9},
+ CellLabel->
+  "In[559]:=",ExpressionUUID->"ac44598b-9a1a-4e52-85ef-2d23a5904111"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"kT3_max = \"\>", "\[InvisibleSpace]", 
+   RowBox[{"{", 
+    RowBox[{"kT3", "\[Rule]", "123.95833333333334`"}], "}"}], 
+   "\[InvisibleSpace]", "\<\"\\n\"\>"}],
+  SequenceForm["kT3_max = ", {$CellContext`kT3 -> 123.95833333333334`}, "\n"],
+  
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775229338725016*^9, 3.775229819928619*^9, 
+  3.775230571186458*^9},
+ CellLabel->
+  "During evaluation of \
+In[559]:=",ExpressionUUID->"672b46d5-b182-43d6-9ad5-74e89857e3af"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"Four Momenta : \\n\"\>", "\[InvisibleSpace]", 
+   TagBox[
+    RowBox[{"(", "\[NoBreak]", 
+     TagBox[GridBox[{
+        {
+         RowBox[{"p1", "\[Rule]", 
+          RowBox[{"{", 
+           RowBox[{"150.`", ",", "0.`", ",", "0.`", ",", "150.`"}], "}"}]}]},
+        {
+         RowBox[{"p2", "\[Rule]", 
+          RowBox[{"{", 
+           RowBox[{"150.`", ",", "0.`", ",", "0.`", ",", 
+            RowBox[{"-", "150.`"}]}], "}"}]}]},
+        {
+         RowBox[{"p3", "\[Rule]", 
+          RowBox[{"{", 
+           RowBox[{
+           "131.24404748406687`", ",", "20.`", ",", "34.64101615137755`", ",",
+             "0.`"}], "}"}]}]},
+        {
+         RowBox[{"p4", "\[Rule]", 
+          RowBox[{"{", 
+           RowBox[{"100.20722612318758`", ",", "0.`", ",", 
+            RowBox[{"-", "100.20722612318758`"}], ",", "0.`"}], "}"}]}]},
+        {
+         RowBox[{"p5", "\[Rule]", 
+          RowBox[{"{", 
+           RowBox[{"68.5487263927455`", ",", 
+            RowBox[{"-", "20.`"}], ",", "65.56620997181004`", ",", "0.`"}], 
+           "}"}]}]}
+       },
+       GridBoxAlignment->{
+        "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, 
+         "Rows" -> {{Baseline}}, "RowsIndexed" -> {}},
+       GridBoxSpacings->{"Columns" -> {
+           Offset[0.27999999999999997`], {
+            Offset[0.5599999999999999]}, 
+           Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
+           Offset[0.2], {
+            Offset[0.4]}, 
+           Offset[0.2]}, "RowsIndexed" -> {}}],
+      Column], "\[NoBreak]", ")"}],
+    Function[BoxForm`e$, 
+     MatrixForm[BoxForm`e$]]], "\[InvisibleSpace]", "\<\"\\n\"\>"}],
+  SequenceForm["Four Momenta : \n", 
+   MatrixForm[{$CellContext`p1 -> {150., 0., 0., 150.}, $CellContext`p2 -> {
+      150., 0., 0., -150.}, $CellContext`p3 -> {131.24404748406687`, 20., 
+      34.64101615137755, 0.}, $CellContext`p4 -> {100.20722612318758`, 
+      0., -100.20722612318758`, 0.}, $CellContext`p5 -> {
+      68.5487263927455, -20., 65.56620997181004, 0.}}], "\n"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775229338725016*^9, 3.775229819928619*^9, 
+  3.775230571199201*^9},
+ CellLabel->
+  "During evaluation of \
+In[559]:=",ExpressionUUID->"05058169-5587-47d7-967f-cefedf01eb4f"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"Check 4 momentum conservation: p3+p4+p5 -p1 -p2 =0 :  \"\>", 
+   "\[InvisibleSpace]", 
+   RowBox[{"{", 
+    RowBox[{
+     RowBox[{
+     "-", "5.876373720011891608134562217738742061745029729160199708223878675`\
+43.99095815745918*^-14"}], ",", "0``58.39794000867204", ",", 
+     "0``57.69807096391986", ",", "0``57.522878745280345"}], "}"}]}],
+  SequenceForm[
+  "Check 4 momentum conservation: p3+p4+p5 -p1 -p2 =0 :  ", \
+{-5.876373720011891608134562217738742061745029729160199708223878675`43.\
+99095815745918*^-14, 0``58.39794000867204, 0``57.69807096391986, 
+    0``57.522878745280345}],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775229338725016*^9, 3.775229819928619*^9, 
+  3.775230571213154*^9},
+ CellLabel->
+  "During evaluation of \
+In[559]:=",ExpressionUUID->"4097f6e5-fc74-4212-ac6e-bd19306fd20d"],
+
+Cell[BoxData["\<\"MOMENTUM IS CONSERVED, ALL IS WELL!\"\>"], "Print",
+ CellChangeTimes->{3.775229338725016*^9, 3.775229819928619*^9, 
+  3.7752305712220907`*^9},
+ CellLabel->
+  "During evaluation of \
+In[559]:=",ExpressionUUID->"bbc2f3b7-c6b3-4828-b1af-c4fcbecd6b32"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{
+   RowBox[{"kkT3", "\[Rule]", "40.`"}], ",", 
+   RowBox[{"kkT4", "\[Rule]", "100.2072261231875813792`10."}], ",", 
+   RowBox[{"S", "\[Rule]", "90000.`10."}], ",", 
+   RowBox[{"T", "\[Rule]", 
+    RowBox[{"-", "23748.2142452200617895598`10."}]}], ",", 
+   RowBox[{"U", "\[Rule]", 
+    RowBox[{"-", "23748.2142452200617895598`10."}]}], ",", 
+   RowBox[{"T24", "\[Rule]", 
+    RowBox[{"-", "30062.1678369562744137511`10."}]}], ",", 
+   RowBox[{"T14", "\[Rule]", 
+    RowBox[{"-", "30062.1678369562744137511`10."}]}], ",", 
+   RowBox[{"S34", "\[Rule]", "48870.7641643526804629805`10."}], ",", 
+   RowBox[{
+    SqrtBox["S"], "\[Rule]", "300.`10."}], ",", 
+   RowBox[{
+    SqrtBox["S34"], "\[Rule]", "221.0673294821120339102`10."}], ",", 
+   RowBox[{
+    RowBox[{"Tan", "[", "\[Phi]5", "]"}], "\[Rule]", 
+    RowBox[{"-", "0.30503516992363796243170073189201937468`10."}]}], ",", 
+   RowBox[{"kT5", "\[Rule]", "68.5487263927454872252`10."}], ",", 
+   RowBox[{
+    SqrtBox["S35"], "\[Rule]", "172.8457819158090640716`10."}]}], 
+  "}"}]], "Print",
+ CellChangeTimes->{3.775229338725016*^9, 3.775229819928619*^9, 
+  3.775230571231678*^9},
+ CellLabel->
+  "During evaluation of \
+In[559]:=",ExpressionUUID->"28ddf3b3-c3f9-4cf3-ba05-02312cd12f5c"]
+}, Open  ]],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(", 
+   RowBox[{"0.`", "\[VeryThinSpace]", "+", 
+    RowBox[{"0.`", " ", "\[ImaginaryI]"}]}], ")"}], "+", 
+  RowBox[{
+   RowBox[{"(", 
+    RowBox[{"0.5566332737265782`", "\[VeryThinSpace]", "+", 
+     RowBox[{"0.04417169412437272`", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+   "c1"}], "+", 
+  RowBox[{
+   RowBox[{"(", 
+    RowBox[{"0.555115709076102`", "\[VeryThinSpace]", "-", 
+     RowBox[{"0.03177639407330288`", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+   "c2"}], "-", 
+  RowBox[{
+   RowBox[{"(", 
+    RowBox[{"1.111748982802681`", "\[VeryThinSpace]", "+", 
+     RowBox[{"0.012395300051069856`", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+   "c3"}]}]], "Output",
+ CellChangeTimes->{3.775230596453958*^9},
+ CellLabel->
+  "Out[563]=",ExpressionUUID->"61209ac1-6811-4927-8d5d-7e002a9c297f"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{
+ RowBox[{"bfinal", "=", 
+  RowBox[{
+   RowBox[{
+    RowBox[{"(", 
+     RowBox[{"0.5566332737265782`", "\[VeryThinSpace]", "+", 
+      RowBox[{"0.04417169412437272`", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+    "c1"}], "+", 
+   RowBox[{
+    RowBox[{"(", 
+     RowBox[{"0.555115709076102`", "\[VeryThinSpace]", "-", 
+      RowBox[{"0.03177639407330288`", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+    "c2"}], "-", 
+   RowBox[{
+    RowBox[{"(", 
+     RowBox[{"1.111748982802681`", "\[VeryThinSpace]", "+", 
+      RowBox[{"0.012395300051069856`", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+    "c3"}]}]}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"b", "=", 
+   RowBox[{"List", "[", 
+    RowBox[{
+     RowBox[{"bfinal", "[", 
+      RowBox[{"[", 
+       RowBox[{"1", ",", "1"}], "]"}], "]"}], ",", 
+     RowBox[{"bfinal", "[", 
+      RowBox[{"[", 
+       RowBox[{"1", ",", "1"}], "]"}], "]"}], ",", 
+     RowBox[{"bfinal", "[", 
+      RowBox[{"[", 
+       RowBox[{"2", ",", "1"}], "]"}], "]"}], ",", 
+     RowBox[{"bfinal", "[", 
+      RowBox[{"[", 
+       RowBox[{"2", ",", "1"}], "]"}], "]"}], ",", 
+     RowBox[{"bfinal", "[", 
+      RowBox[{"[", 
+       RowBox[{"3", ",", "1"}], "]"}], "]"}], ",", 
+     RowBox[{"bfinal", "[", 
+      RowBox[{"[", 
+       RowBox[{"3", ",", "1"}], "]"}], "]"}]}], "]"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{"b", "//", "MatrixForm"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"mat", "=", 
+   RowBox[{"{", 
+    RowBox[{
+     RowBox[{"{", 
+      RowBox[{
+       RowBox[{"19", "/", "6"}], ",", 
+       RowBox[{"2", "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}]}], "}"}], ",", 
+     RowBox[{"{", 
+      RowBox[{
+       RowBox[{"2", "/", "3"}], ",", 
+       RowBox[{"19", "/", "6"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}]}], "}"}], ",", 
+     RowBox[{"{", 
+      RowBox[{
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{"2", "/", "3"}], ",", 
+       RowBox[{"19", "/", "6"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}]}], "}"}], ",", 
+     RowBox[{"{", 
+      RowBox[{
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{"19", "/", "6"}], ",", 
+       RowBox[{"2", "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}]}], "}"}], ",", 
+     RowBox[{"{", 
+      RowBox[{
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{"19", "/", "6"}], ",", 
+       RowBox[{"2", "/", "3"}]}], "}"}], ",", 
+     RowBox[{"{", 
+      RowBox[{
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{
+        RowBox[{"-", "1"}], "/", "3"}], ",", 
+       RowBox[{"2", "/", "3"}], ",", 
+       RowBox[{"19", "/", "6"}]}], "}"}]}], "}"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{"mat", "//", "MatrixForm"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"bdagger", "=", 
+   RowBox[{"Conjugate", "[", "b", "]"}]}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{"bdagger", "//", "MatrixForm"}], "\[IndentingNewLine]", 
+ RowBox[{"MdagM1", "=", " ", 
+  RowBox[{"Dot", "[", 
+   RowBox[{"bdagger", ",", "mat", ",", "b"}], "]"}]}]}], "Input",
+ CellChangeTimes->{
+  3.775229827028739*^9, {3.775230568237907*^9, 3.775230604882635*^9}},
+ CellLabel->
+  "In[564]:=",ExpressionUUID->"0e414578-8bf7-48dd-aa07-72f420f87330"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{
+   RowBox[{"(", 
+    RowBox[{"0.5566332737265782`", "\[VeryThinSpace]", "+", 
+     RowBox[{"0.04417169412437272`", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+   "c1"}], "+", 
+  RowBox[{
+   RowBox[{"(", 
+    RowBox[{"0.555115709076102`", "\[VeryThinSpace]", "-", 
+     RowBox[{"0.03177639407330288`", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+   "c2"}], "-", 
+  RowBox[{
+   RowBox[{"(", 
+    RowBox[{"1.111748982802681`", "\[VeryThinSpace]", "+", 
+     RowBox[{"0.012395300051069856`", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+   "c3"}]}]], "Output",
+ CellChangeTimes->{3.775230608627625*^9},
+ CellLabel->
+  "Out[564]=",ExpressionUUID->"82608b25-bb9e-46a9-bc23-8896e03febd6"],
+
+Cell[BoxData[
+ TagBox[
+  RowBox[{"(", "\[NoBreak]", 
+   TagBox[GridBox[{
+      {
+       RowBox[{"0.5566332737265782`", "\[VeryThinSpace]", "+", 
+        RowBox[{"0.04417169412437272`", " ", "\[ImaginaryI]"}]}]},
+      {
+       RowBox[{"0.5566332737265782`", "\[VeryThinSpace]", "+", 
+        RowBox[{"0.04417169412437272`", " ", "\[ImaginaryI]"}]}]},
+      {
+       RowBox[{"0.555115709076102`", "\[VeryThinSpace]", "-", 
+        RowBox[{"0.03177639407330288`", " ", "\[ImaginaryI]"}]}]},
+      {
+       RowBox[{"0.555115709076102`", "\[VeryThinSpace]", "-", 
+        RowBox[{"0.03177639407330288`", " ", "\[ImaginaryI]"}]}]},
+      {
+       RowBox[{
+        RowBox[{"-", "1.111748982802681`"}], "-", 
+        RowBox[{"0.012395300051069856`", " ", "\[ImaginaryI]"}]}]},
+      {
+       RowBox[{
+        RowBox[{"-", "1.111748982802681`"}], "-", 
+        RowBox[{"0.012395300051069856`", " ", "\[ImaginaryI]"}]}]}
+     },
+     GridBoxAlignment->{
+      "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
+        "RowsIndexed" -> {}},
+     GridBoxSpacings->{"Columns" -> {
+         Offset[0.27999999999999997`], {
+          Offset[0.5599999999999999]}, 
+         Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
+         Offset[0.2], {
+          Offset[0.4]}, 
+         Offset[0.2]}, "RowsIndexed" -> {}}],
+    Column], "\[NoBreak]", ")"}],
+  Function[BoxForm`e$, 
+   MatrixForm[BoxForm`e$]]]], "Output",
+ CellChangeTimes->{3.775230608640141*^9},
+ CellLabel->
+  "Out[566]//MatrixForm=",ExpressionUUID->"85a4546b-1e22-4f24-a959-\
+89ef205f1685"],
+
+Cell[BoxData[
+ TagBox[
+  RowBox[{"(", "\[NoBreak]", GridBox[{
+     {
+      FractionBox["19", "6"], 
+      FractionBox["2", "3"], 
+      RowBox[{"-", 
+       FractionBox["1", "3"]}], 
+      RowBox[{"-", 
+       FractionBox["1", "3"]}], 
+      RowBox[{"-", 
+       FractionBox["1", "3"]}], 
+      RowBox[{"-", 
+       FractionBox["1", "3"]}]},
+     {
+      FractionBox["2", "3"], 
+      FractionBox["19", "6"], 
+      RowBox[{"-", 
+       FractionBox["1", "3"]}], 
+      RowBox[{"-", 
+       FractionBox["1", "3"]}], 
+      RowBox[{"-", 
+       FractionBox["1", "3"]}], 
+      RowBox[{"-", 
+       FractionBox["1", "3"]}]},
+     {
+      RowBox[{"-", 
+       FractionBox["1", "3"]}], 
+      RowBox[{"-", 
+       FractionBox["1", "3"]}], 
+      FractionBox["2", "3"], 
+      FractionBox["19", "6"], 
+      RowBox[{"-", 
+       FractionBox["1", "3"]}], 
+      RowBox[{"-", 
+       FractionBox["1", "3"]}]},
+     {
+      RowBox[{"-", 
+       FractionBox["1", "3"]}], 
+      RowBox[{"-", 
+       FractionBox["1", "3"]}], 
+      FractionBox["19", "6"], 
+      FractionBox["2", "3"], 
+      RowBox[{"-", 
+       FractionBox["1", "3"]}], 
+      RowBox[{"-", 
+       FractionBox["1", "3"]}]},
+     {
+      RowBox[{"-", 
+       FractionBox["1", "3"]}], 
+      RowBox[{"-", 
+       FractionBox["1", "3"]}], 
+      RowBox[{"-", 
+       FractionBox["1", "3"]}], 
+      RowBox[{"-", 
+       FractionBox["1", "3"]}], 
+      FractionBox["19", "6"], 
+      FractionBox["2", "3"]},
+     {
+      RowBox[{"-", 
+       FractionBox["1", "3"]}], 
+      RowBox[{"-", 
+       FractionBox["1", "3"]}], 
+      RowBox[{"-", 
+       FractionBox["1", "3"]}], 
+      RowBox[{"-", 
+       FractionBox["1", "3"]}], 
+      FractionBox["2", "3"], 
+      FractionBox["19", "6"]}
+    },
+    GridBoxAlignment->{
+     "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, 
+      "RowsIndexed" -> {}},
+    GridBoxSpacings->{"Columns" -> {
+        Offset[0.27999999999999997`], {
+         Offset[0.7]}, 
+        Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
+        Offset[0.2], {
+         Offset[0.4]}, 
+        Offset[0.2]}, "RowsIndexed" -> {}}], "\[NoBreak]", ")"}],
+  Function[BoxForm`e$, 
+   MatrixForm[BoxForm`e$]]]], "Output",
+ CellChangeTimes->{3.7752306086548643`*^9},
+ CellLabel->
+  "Out[568]//MatrixForm=",ExpressionUUID->"501d3523-5b39-4f6b-bfc6-\
+43c241646426"],
+
+Cell[BoxData[
+ TagBox[
+  RowBox[{"(", "\[NoBreak]", 
+   TagBox[GridBox[{
+      {
+       RowBox[{"0.5566332737265782`", "\[VeryThinSpace]", "-", 
+        RowBox[{"0.04417169412437272`", " ", "\[ImaginaryI]"}]}]},
+      {
+       RowBox[{"0.5566332737265782`", "\[VeryThinSpace]", "-", 
+        RowBox[{"0.04417169412437272`", " ", "\[ImaginaryI]"}]}]},
+      {
+       RowBox[{"0.555115709076102`", "\[VeryThinSpace]", "+", 
+        RowBox[{"0.03177639407330288`", " ", "\[ImaginaryI]"}]}]},
+      {
+       RowBox[{"0.555115709076102`", "\[VeryThinSpace]", "+", 
+        RowBox[{"0.03177639407330288`", " ", "\[ImaginaryI]"}]}]},
+      {
+       RowBox[{
+        RowBox[{"-", "1.111748982802681`"}], "+", 
+        RowBox[{"0.012395300051069856`", " ", "\[ImaginaryI]"}]}]},
+      {
+       RowBox[{
+        RowBox[{"-", "1.111748982802681`"}], "+", 
+        RowBox[{"0.012395300051069856`", " ", "\[ImaginaryI]"}]}]}
+     },
+     GridBoxAlignment->{
+      "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}},
+        "RowsIndexed" -> {}},
+     GridBoxSpacings->{"Columns" -> {
+         Offset[0.27999999999999997`], {
+          Offset[0.5599999999999999]}, 
+         Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
+         Offset[0.2], {
+          Offset[0.4]}, 
+         Offset[0.2]}, "RowsIndexed" -> {}}],
+    Column], "\[NoBreak]", ")"}],
+  Function[BoxForm`e$, 
+   MatrixForm[BoxForm`e$]]]], "Output",
+ CellChangeTimes->{3.775230608667103*^9},
+ CellLabel->
+  "Out[570]//MatrixForm=",ExpressionUUID->"22c8d040-d710-4aca-89d1-\
+17964cf0761b"],
+
+Cell[BoxData[
+ RowBox[{"16.71384936501812`", "\[VeryThinSpace]", "+", 
+  RowBox[{"4.163336342344337`*^-17", " ", "\[ImaginaryI]"}]}]], "Output",
+ CellChangeTimes->{3.775230608679388*^9},
+ CellLabel->
+  "Out[571]=",ExpressionUUID->"200f382c-f9d9-46dd-9e7e-396321b66395"]
+}, Open  ]],
+
+Cell[BoxData[
+ RowBox[{"(*", " ", 
+  RowBox[{
+   RowBox[{
+    RowBox[{"0", " ", "\[Rule]", " ", "kT3"}], "=", "20"}], ",", " ", 
+   RowBox[{
+    RowBox[{"1", " ", "\[Rule]", " ", "kT3"}], "=", "40"}]}], " ", 
+  "*)"}]], "Input",ExpressionUUID->"6bd9d4e3-c0eb-46c8-9ee1-2cc1a6f9f551"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"MdagM0", "/", "MdagM1", "  "}]], "Input",
+ CellChangeTimes->{{3.775229350472871*^9, 3.775229388611747*^9}},
+ CellLabel->
+  "In[572]:=",ExpressionUUID->"7dc2aeaf-1eea-4790-86f2-2e38260ef446"],
+
+Cell[BoxData[
+ RowBox[{"0.8345852437913059`", "\[VeryThinSpace]", "-", 
+  RowBox[{"1.7026728876564662`*^-18", " ", "\[ImaginaryI]"}]}]], "Output",
+ CellChangeTimes->{3.7752293927054787`*^9, 3.775230612497229*^9},
+ CellLabel->
+  "Out[572]=",ExpressionUUID->"d9baed4e-4c27-4541-baf9-0d1e1b49c1fc"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"MdagM1", "/", "MdagM0"}], "\[IndentingNewLine]", 
+  "\[IndentingNewLine]"}]], "Input",
+ CellChangeTimes->{
+  3.7752275896248493`*^9, {3.77522767187156*^9, 3.775227683066543*^9}, {
+   3.775229358285284*^9, 3.77522936368441*^9}},
+ CellLabel->
+  "In[573]:=",ExpressionUUID->"65d1e451-71c5-4a37-bb29-1ec9c57d89ad"],
+
+Cell[BoxData[
+ RowBox[{"1.1981999531375098`", "\[VeryThinSpace]", "+", 
+  RowBox[{"2.4444987367984653`*^-18", " ", "\[ImaginaryI]"}]}]], "Output",
+ CellChangeTimes->{3.7752293941729507`*^9, 3.7752306140600367`*^9},
+ CellLabel->
+  "Out[573]=",ExpressionUUID->"719d6feb-e988-4831-acc0-7728ca02e7e1"]
+}, Open  ]],
+
+Cell[BoxData[
+ RowBox[{"\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", 
+  "\[IndentingNewLine]", "\[IndentingNewLine]", 
+  "\[IndentingNewLine]"}]], "Input",
+ CellChangeTimes->{{3.775487617925837*^9, 
+  3.775487618576902*^9}},ExpressionUUID->"d8336dbe-baca-4c43-98ec-\
+e9fa0e90ceb9"],
+
+Cell[BoxData[
+ RowBox[{"(*", " ", 
+  RowBox[{
+   RowBox[{"TEST", " ", "triangles", " ", "gg"}], " ", "\[Rule]", " ", 
+   "Hgg"}], " ", "*)"}]], "Input",
+ CellChangeTimes->{{3.775487341723607*^9, 
+  3.775487351568636*^9}},ExpressionUUID->"dbe86d55-f903-4c16-aba8-\
+5c64dcd510d8"],
+
+Cell[BoxData[{
+ RowBox[{
+  RowBox[{"SetDirectory", "[", 
+   RowBox[{"NotebookDirectory", "[", "]"}], "]"}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"config", "=", "\"\<++++\>\""}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"triangle", " ", "=", " ", 
+   RowBox[{"Import", "[", "\"\<ggHgg_LR_triangle_38diags.m\>\"", "]"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"pairdef", "[", 
+   RowBox[{"1", ",", "1", ",", "1", ",", "1"}], "]"}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"tsub", " ", "=", " ", 
+   RowBox[{
+    RowBox[{"triangle", "//.", "SubFourVecs"}], "/.", "MATColor"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"Export", "[", 
+   RowBox[{
+    RowBox[{"\"\<triangle_\>\"", "<>", "config", "<>", "\"\<.m\>\""}], ",", 
+    "tsub"}], "]"}], ";"}]}], "Input",
+ CellChangeTimes->{{3.775487398836247*^9, 3.775487400633142*^9}, {
+  3.775487437936494*^9, 3.775487473836816*^9}},
+ CellLabel->
+  "In[140]:=",ExpressionUUID->"ff902789-8764-47df-ae19-f8e2732cb693"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["tsub"], "Input",
+ CellChangeTimes->{{3.775487406670053*^9, 3.775487408597879*^9}},
+ CellLabel->
+  "In[146]:=",ExpressionUUID->"d259943e-df1a-4b8b-8ce1-f2d8a1c6ce82"],
+
+Cell[BoxData[
+ InterpretationBox[
+  TagBox[
+   FrameBox[GridBox[{
+      {
+       ItemBox[
+        TagBox[
+         RowBox[{
+          RowBox[{"-", 
+           FractionBox[
+            RowBox[{"2", " ", 
+             TemplateBox[{"4"},
+              "OutputSizeLimit`Skeleton"], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               FractionBox[
+                TemplateBox[{"1"},
+                 "OutputSizeLimit`Skeleton"], "T"], "+", 
+               FractionBox[
+                RowBox[{
+                 RowBox[{
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    TemplateBox[{"1"},
+                    "OutputSizeLimit`Skeleton"], ")"}]}], "-", 
+                    RowBox[{"16", " ", 
+                    TemplateBox[{"1"},
+                    "OutputSizeLimit`Skeleton"]}]}], ")"}], " ", 
+                  RowBox[{"(", 
+                   TemplateBox[{"1"},
+                    "OutputSizeLimit`Skeleton"], ")"}]}], "+", 
+                 TemplateBox[{"7"},
+                  "OutputSizeLimit`Skeleton"]}], "S34"], "+", 
+               FractionBox[
+                TemplateBox[{"1"},
+                 "OutputSizeLimit`Skeleton"], 
+                TemplateBox[{"1"},
+                 "OutputSizeLimit`Skeleton"]], "+", 
+               FractionBox[
+                TemplateBox[{"1"},
+                 "OutputSizeLimit`Skeleton"], 
+                TemplateBox[{"1"},
+                 "OutputSizeLimit`Skeleton"]], "-", 
+               FractionBox[
+                RowBox[{
+                 FractionBox[
+                  TemplateBox[{"1"},
+                   "OutputSizeLimit`Skeleton"], "S"], "+", 
+                 FractionBox[
+                  TemplateBox[{"1"},
+                   "OutputSizeLimit`Skeleton"], "T"]}], 
+                RowBox[{
+                 SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                 "T24"}]], "+", 
+               FractionBox[
+                TemplateBox[{"1"},
+                 "OutputSizeLimit`Skeleton"], "U"]}], ")"}]}], 
+            RowBox[{"MW", " ", "SW"}]]}], "-", 
+          FractionBox[
+           RowBox[{"2", " ", 
+            TemplateBox[{"4"},
+             "OutputSizeLimit`Skeleton"], " ", 
+            RowBox[{"(", 
+             RowBox[{
+              FractionBox[
+               TemplateBox[{"1"},
+                "OutputSizeLimit`Skeleton"], "T"], "+", 
+              TemplateBox[{"4"},
+               "OutputSizeLimit`Skeleton"], "+", 
+              FractionBox[
+               TemplateBox[{"1"},
+                "OutputSizeLimit`Skeleton"], "T24"]}], ")"}]}], 
+           RowBox[{"MW", " ", "SW"}]], "+", 
+          FractionBox[
+           RowBox[{"2", " ", 
+            TemplateBox[{"4"},
+             "OutputSizeLimit`Skeleton"], " ", 
+            RowBox[{"(", 
+             RowBox[{
+              FractionBox[
+               TemplateBox[{"1"},
+                "OutputSizeLimit`Skeleton"], "T"], "+", 
+              FractionBox[
+               TemplateBox[{"1"},
+                "OutputSizeLimit`Skeleton"], "S34"], "+", 
+              TemplateBox[{"2"},
+               "OutputSizeLimit`Skeleton"], "+", 
+              FractionBox[
+               TemplateBox[{"1"},
+                "OutputSizeLimit`Skeleton"], "U"], "+", 
+              FractionBox[
+               RowBox[{
+                TemplateBox[{"1"},
+                 "OutputSizeLimit`Skeleton"], "+", 
+                TemplateBox[{"1"},
+                 "OutputSizeLimit`Skeleton"]}], "T24"]}], ")"}]}], 
+           RowBox[{"MW", " ", "SW"}]]}],
+         Short[#, 5]& ],
+        BaseStyle->{Deployed -> False},
+        StripOnInput->False]},
+      {GridBox[{
+         {
+          TagBox[
+           TooltipBox[
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource[
+                "FEStrings", "sizeBriefExplanation"], StandardForm],
+               ImageSizeCache->{58., {2., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLText",
+             StripOnInput->False],
+            StyleBox[
+             DynamicBox[
+              ToBoxes[
+               FEPrivate`FrontEndResource["FEStrings", "sizeExplanation"], 
+               StandardForm]], DynamicUpdating -> True, StripOnInput -> 
+             False]],
+           Annotation[#, 
+            Style[
+             Dynamic[
+              FEPrivate`FrontEndResource["FEStrings", "sizeExplanation"]], 
+             DynamicUpdating -> True], "Tooltip"]& ], 
+          ButtonBox[
+           PaneSelectorBox[{False->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowLess"], 
+                StandardForm],
+               ImageSizeCache->{50., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControl",
+             StripOnInput->False], True->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowLess"], 
+                StandardForm]],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControlActive",
+             StripOnInput->False]}, Dynamic[
+             CurrentValue["MouseOver"]],
+            Alignment->Center,
+            FrameMargins->0,
+            ImageSize->{Automatic, 25}],
+           Appearance->None,
+           BaselinePosition->Baseline,
+           
+           ButtonFunction:>OutputSizeLimit`ButtonFunction[
+            OutputSizeLimit`Defer, 146, 17479000166414073932, 5/2],
+           Enabled->True,
+           Evaluator->Automatic,
+           Method->"Queued"], 
+          ButtonBox[
+           PaneSelectorBox[{False->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowMore"], 
+                StandardForm],
+               ImageSizeCache->{56., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControl",
+             StripOnInput->False], True->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowMore"], 
+                StandardForm]],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControlActive",
+             StripOnInput->False]}, Dynamic[
+             CurrentValue["MouseOver"]],
+            Alignment->Center,
+            FrameMargins->0,
+            ImageSize->{Automatic, 25}],
+           Appearance->None,
+           BaselinePosition->Baseline,
+           
+           ButtonFunction:>OutputSizeLimit`ButtonFunction[
+            OutputSizeLimit`Defer, 146, 17479000166414073932, 5 2],
+           Enabled->True,
+           Evaluator->Automatic,
+           Method->"Queued"], 
+          ButtonBox[
+           PaneSelectorBox[{False->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowAll"], 
+                StandardForm],
+               ImageSizeCache->{42., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControl",
+             StripOnInput->False], True->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowAll"], 
+                StandardForm]],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControlActive",
+             StripOnInput->False]}, Dynamic[
+             CurrentValue["MouseOver"]],
+            Alignment->Center,
+            FrameMargins->0,
+            ImageSize->{Automatic, 25}],
+           Appearance->None,
+           BaselinePosition->Baseline,
+           
+           ButtonFunction:>OutputSizeLimit`ButtonFunction[
+            OutputSizeLimit`Defer, 146, 17479000166414073932, Infinity],
+           Enabled->True,
+           Evaluator->Automatic,
+           Method->"Queued"], 
+          ButtonBox[
+           PaneSelectorBox[{False->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeChangeLimit"], 
+                StandardForm],
+               ImageSizeCache->{74., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControl",
+             StripOnInput->False], True->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeChangeLimit"], 
+                StandardForm]],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControlActive",
+             StripOnInput->False]}, Dynamic[
+             CurrentValue["MouseOver"]],
+            Alignment->Center,
+            FrameMargins->0,
+            ImageSize->{Automatic, 25}],
+           Appearance->None,
+           BaselinePosition->Baseline,
+           ButtonFunction:>FrontEndExecute[{
+              FrontEnd`SetOptions[
+              FrontEnd`$FrontEnd, 
+               FrontEnd`PreferencesSettings -> {"Page" -> "Advanced"}], 
+              FrontEnd`FrontEndToken["PreferencesDialog"]}],
+           Evaluator->None,
+           Method->"Preemptive"]}
+        },
+        AutoDelete->False,
+        FrameStyle->GrayLevel[0.85],
+        GridBoxDividers->{"Columns" -> {False, {True}}},
+        GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
+        GridBoxSpacings->{"Columns" -> {{2}}}]}
+     },
+     DefaultBaseStyle->"Column",
+     GridBoxAlignment->{
+      "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, 
+       "RowsIndexed" -> {}},
+     GridBoxDividers->{
+      "Columns" -> {{False}}, "ColumnsIndexed" -> {}, "Rows" -> {{False}}, 
+       "RowsIndexed" -> {}},
+     GridBoxItemSize->{
+      "Columns" -> {{Automatic}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}}, 
+       "RowsIndexed" -> {}},
+     GridBoxSpacings->{"Columns" -> {
+         Offset[0.27999999999999997`], {
+          Offset[0.5599999999999999]}, 
+         Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
+         Offset[0.2], 
+         Offset[1.2], {
+          Offset[0.4]}, 
+         Offset[0.2]}, "RowsIndexed" -> {}}],
+    BaseStyle->"OutputSizeLimit",
+    FrameMargins->{{12, 12}, {0, 15}},
+    FrameStyle->GrayLevel[0.85],
+    RoundingRadius->5,
+    StripOnInput->False],
+   Deploy,
+   DefaultBaseStyle->"Deploy"],
+  If[17479000166414073932 === $SessionID, 
+   Out[146], Message[
+     MessageName[Syntax, "noinfoker"]]; Missing["NotAvailable"]; 
+   Null]]], "Output",
+ CellChangeTimes->{
+  3.775487408894373*^9, {3.7754874813905573`*^9, 3.775487510187152*^9}, 
+   3.775491049018458*^9, 3.775492172589079*^9},
+ CellLabel->
+  "Out[146]=",ExpressionUUID->"bb81f3e0-43b8-4bed-817f-ab833c1db0b0"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{
+ RowBox[{
+  RowBox[{"output", "=", 
+   RowBox[{
+    RowBox[{"N", "[", 
+     RowBox[{
+      RowBox[{"OutputPS", "[", 
+       RowBox[{"300.", ",", "20.", ",", "0", ",", 
+        RowBox[{"Pi", "/", "3"}], ",", "0", ",", 
+        RowBox[{"3", "*", 
+         RowBox[{"Pi", "/", "2"}]}], ",", "125."}], "]"}], ",", "10"}], "]"}],
+     "[", 
+    RowBox[{"[", "2", "]"}], "]"}]}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"KinRules", "=", 
+   RowBox[{"f", "[", 
+    RowBox[{"variables", ",", "output"}], "]"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"KinSub", "=", 
+   RowBox[{"{", 
+    RowBox[{
+     RowBox[{"S", "\[Rule]", 
+      RowBox[{"300.", "^", "2"}]}], ",", 
+     RowBox[{"kT3", "\[Rule]", "20."}], ",", 
+     RowBox[{"\[Eta]3", "\[Rule]", "0"}], ",", 
+     RowBox[{"\[Phi]3", "\[Rule]", 
+      RowBox[{"Pi", "/", "3"}]}], ",", 
+     RowBox[{"\[Eta]4", "\[Rule]", "0"}], ",", 
+     RowBox[{"\[Phi]4", "\[Rule]", 
+      RowBox[{"3", "*", 
+       RowBox[{"Pi", "/", "2"}]}]}], ",", 
+     RowBox[{"MH", "\[Rule]", "125."}], ",", 
+     RowBox[{"MT", "\[Rule]", "173."}]}], "}"}]}], ";"}]}], "Input",
+ CellLabel->
+  "In[164]:=",ExpressionUUID->"9a3f574a-cd45-430d-9f41-9143c899f3d3"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"kT3_max = \"\>", "\[InvisibleSpace]", 
+   RowBox[{"{", 
+    RowBox[{"kT3", "\[Rule]", "123.95833333333334`"}], "}"}], 
+   "\[InvisibleSpace]", "\<\"\\n\"\>"}],
+  SequenceForm["kT3_max = ", {$CellContext`kT3 -> 123.95833333333334`}, "\n"],
+  
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775487552860243*^9, 3.7754879395402737`*^9, 
+  3.775488357599923*^9, 3.7754910494775543`*^9, 3.775492172749148*^9, 
+  3.77549222098951*^9},
+ CellLabel->
+  "During evaluation of \
+In[164]:=",ExpressionUUID->"e1dd3184-93ea-45aa-aa66-1a51baff8344"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"Four Momenta : \\n\"\>", "\[InvisibleSpace]", 
+   TagBox[
+    RowBox[{"(", "\[NoBreak]", 
+     TagBox[GridBox[{
+        {
+         RowBox[{"p1", "\[Rule]", 
+          RowBox[{"{", 
+           RowBox[{"150.`", ",", "0.`", ",", "0.`", ",", "150.`"}], "}"}]}]},
+        {
+         RowBox[{"p2", "\[Rule]", 
+          RowBox[{"{", 
+           RowBox[{"150.`", ",", "0.`", ",", "0.`", ",", 
+            RowBox[{"-", "150.`"}]}], "}"}]}]},
+        {
+         RowBox[{"p3", "\[Rule]", 
+          RowBox[{"{", 
+           RowBox[{
+           "126.58988901172162`", ",", "10.`", ",", "17.320508075688775`", 
+            ",", "0.`"}], "}"}]}]},
+        {
+         RowBox[{"p4", "\[Rule]", 
+          RowBox[{"{", 
+           RowBox[{"95.04498070119013`", ",", "0.`", ",", 
+            RowBox[{"-", "95.04498070119013`"}], ",", "0.`"}], "}"}]}]},
+        {
+         RowBox[{"p5", "\[Rule]", 
+          RowBox[{"{", 
+           RowBox[{"78.3651302870882`", ",", 
+            RowBox[{"-", "10.`"}], ",", "77.72447262550135`", ",", "0.`"}], 
+           "}"}]}]}
+       },
+       GridBoxAlignment->{
+        "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, 
+         "Rows" -> {{Baseline}}, "RowsIndexed" -> {}},
+       GridBoxSpacings->{"Columns" -> {
+           Offset[0.27999999999999997`], {
+            Offset[0.5599999999999999]}, 
+           Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
+           Offset[0.2], {
+            Offset[0.4]}, 
+           Offset[0.2]}, "RowsIndexed" -> {}}],
+      Column], "\[NoBreak]", ")"}],
+    Function[BoxForm`e$, 
+     MatrixForm[BoxForm`e$]]], "\[InvisibleSpace]", "\<\"\\n\"\>"}],
+  SequenceForm["Four Momenta : \n", 
+   MatrixForm[{$CellContext`p1 -> {150., 0., 0., 150.}, $CellContext`p2 -> {
+      150., 0., 0., -150.}, $CellContext`p3 -> {126.58988901172162`, 10., 
+      17.320508075688775`, 0.}, $CellContext`p4 -> {95.04498070119013, 
+      0., -95.04498070119013, 0.}, $CellContext`p5 -> {78.3651302870882, -10.,
+       77.72447262550135, 0.}}], "\n"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775487552860243*^9, 3.7754879395402737`*^9, 
+  3.775488357599923*^9, 3.7754910494775543`*^9, 3.775492172749148*^9, 
+  3.775492221000539*^9},
+ CellLabel->
+  "During evaluation of \
+In[164]:=",ExpressionUUID->"b6238ca4-e65e-4f5a-bd6a-19cc70b7cf87"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"Check 4 momentum conservation: p3+p4+p5 -p1 -p2 =0 :  \"\>", 
+   "\[InvisibleSpace]", 
+   RowBox[{"{", 
+    RowBox[{
+     RowBox[{
+     "-", "3.887221955939928966560590155849714544348308363744058289341178206`\
+43.811488088675176*^-14"}], ",", "0``58.69897000433602", ",", 
+     "0``57.72104081749894", ",", "0``57.522878745280345"}], "}"}]}],
+  SequenceForm[
+  "Check 4 momentum conservation: p3+p4+p5 -p1 -p2 =0 :  ", \
+{-3.887221955939928966560590155849714544348308363744058289341178206`43.\
+811488088675176*^-14, 0``58.69897000433602, 0``57.72104081749894, 
+    0``57.522878745280345}],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775487552860243*^9, 3.7754879395402737`*^9, 
+  3.775488357599923*^9, 3.7754910494775543`*^9, 3.775492172749148*^9, 
+  3.775492221014029*^9},
+ CellLabel->
+  "During evaluation of \
+In[164]:=",ExpressionUUID->"7ea31f10-d118-4022-958f-dcfbd6a2e3e6"],
+
+Cell[BoxData["\<\"MOMENTUM IS CONSERVED, ALL IS WELL!\"\>"], "Print",
+ CellChangeTimes->{3.775487552860243*^9, 3.7754879395402737`*^9, 
+  3.775488357599923*^9, 3.7754910494775543`*^9, 3.775492172749148*^9, 
+  3.7754922210210247`*^9},
+ CellLabel->
+  "During evaluation of \
+In[164]:=",ExpressionUUID->"7d84e7e6-71cc-43f9-9858-0a9b757f59cd"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{
+   RowBox[{"kkT3", "\[Rule]", "20.`"}], ",", 
+   RowBox[{"kkT4", "\[Rule]", "95.0449807011901270926`10."}], ",", 
+   RowBox[{"S", "\[Rule]", "90000.`10."}], ",", 
+   RowBox[{"T", "\[Rule]", 
+    RowBox[{"-", "22351.9667035164881926659`10."}]}], ",", 
+   RowBox[{"U", "\[Rule]", 
+    RowBox[{"-", "22351.9667035164881926659`10."}]}], ",", 
+   RowBox[{"T24", "\[Rule]", 
+    RowBox[{"-", "28513.4942103570381277677`10."}]}], ",", 
+   RowBox[{"T14", "\[Rule]", 
+    RowBox[{"-", "28513.4942103570381277677`10."}]}], ",", 
+   RowBox[{"S34", "\[Rule]", "42980.9218277470587333204`10."}], ",", 
+   RowBox[{
+    SqrtBox["S"], "\[Rule]", "300.`10."}], ",", 
+   RowBox[{
+    SqrtBox["S34"], "\[Rule]", "207.3184068715246970733`10."}], ",", 
+   RowBox[{
+    RowBox[{"Tan", "[", "\[Phi]5", "]"}], "\[Rule]", 
+    RowBox[{"-", "0.12865960568407904294629727505559632487`10."}]}], ",", 
+   RowBox[{"kT5", "\[Rule]", "78.3651302870882067263`10."}], ",", 
+   RowBox[{
+    SqrtBox["S35"], "\[Rule]", "181.5847228686540904465`10."}]}], 
+  "}"}]], "Print",
+ CellChangeTimes->{3.775487552860243*^9, 3.7754879395402737`*^9, 
+  3.775488357599923*^9, 3.7754910494775543`*^9, 3.775492172749148*^9, 
+  3.775492221028528*^9},
+ CellLabel->
+  "During evaluation of \
+In[164]:=",ExpressionUUID->"b73767c3-0d6c-4d3c-9cfa-7190669995d9"]
+}, Open  ]]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"ek1vec", "//.", "KinRules"}], "//.", "KinSub"}]], "Input",
+ CellChangeTimes->{{3.775487557663827*^9, 3.775487582522539*^9}, {
+  3.775487623605857*^9, 3.7754876514663677`*^9}},
+ CellLabel->
+  "In[168]:=",ExpressionUUID->"ec103b6d-ad9b-47f5-99fb-35d0c73242fa"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{"-", 
+    FractionBox["1", 
+     SqrtBox["2"]]}], ",", 
+   RowBox[{"-", 
+    FractionBox["\[ImaginaryI]", 
+     SqrtBox["2"]]}], ",", "0"}], "}"}]], "Output",
+ CellChangeTimes->{
+  3.775487559655751*^9, {3.775487625994041*^9, 3.7754876518002863`*^9}, 
+   3.7754922263438387`*^9},
+ CellLabel->
+  "Out[168]=",ExpressionUUID->"599c636a-94ac-45e2-a43b-d95245d19773"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"ek2vec", "//.", "KinRules"}], "//.", "KinSub"}]], "Input",
+ CellChangeTimes->{{3.7754875615081987`*^9, 3.775487563472124*^9}, {
+  3.7754876329091177`*^9, 3.775487647849922*^9}},
+ CellLabel->
+  "In[169]:=",ExpressionUUID->"45cc03ff-8a7f-40ac-841b-fac68c59dfd0"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{"-", 
+    FractionBox["1", 
+     SqrtBox["2"]]}], ",", 
+   FractionBox["\[ImaginaryI]", 
+    SqrtBox["2"]], ",", "0"}], "}"}]], "Output",
+ CellChangeTimes->{
+  3.775487563826468*^9, {3.775487634890091*^9, 3.775487648256915*^9}, 
+   3.775492227643849*^9},
+ CellLabel->
+  "Out[169]=",ExpressionUUID->"fa0863bb-51d4-49fd-8e52-b516b20cfd16"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"ek4vec", "//.", "KinRules"}], "//.", "KinSub"}]], "Input",
+ CellChangeTimes->{{3.7754875651763983`*^9, 3.775487568091836*^9}, {
+  3.775487636983919*^9, 3.7754876424875383`*^9}},
+ CellLabel->
+  "In[170]:=",ExpressionUUID->"cb245ba0-2d36-4576-abbc-86da611f6661"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{"-", 
+    FractionBox["\[ImaginaryI]", 
+     SqrtBox["2"]]}], ",", "0", ",", 
+   FractionBox["1", 
+    SqrtBox["2"]]}], "}"}]], "Output",
+ CellChangeTimes->{
+  3.775487568485145*^9, {3.7754876390311937`*^9, 3.775487642731925*^9}, 
+   3.775492229121855*^9},
+ CellLabel->
+  "Out[170]=",ExpressionUUID->"cc3b366f-3f8c-4cef-8228-4595152eed95"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"ek5vec", "//.", "KinRules"}], "//.", "KinSub"}]], "Input",
+ CellChangeTimes->{{3.775487569824945*^9, 3.7754875714400387`*^9}, {
+  3.775487653927663*^9, 3.7754876592312*^9}},
+ CellLabel->
+  "In[167]:=",ExpressionUUID->"2adefc70-ad32-4777-bd90-01f6585fa801"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{"0.`", "\[VeryThinSpace]", "+", 
+    RowBox[{"0.7013259782290641`", " ", "\[ImaginaryI]"}]}], ",", 
+   RowBox[{"0.`", "\[VeryThinSpace]", "+", 
+    RowBox[{"0.09023232381495236`", " ", "\[ImaginaryI]"}]}], ",", 
+   "0.7071067811865476`"}], "}"}]], "Output",
+ CellChangeTimes->{
+  3.77548757190513*^9, {3.7754876560668087`*^9, 3.775487659613431*^9}, 
+   3.775492224922065*^9},
+ CellLabel->
+  "Out[167]=",ExpressionUUID->"2f8c6836-a4f2-4ad0-847a-191b528ee79f"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{
+ RowBox[{
+  RowBox[{"t", "=", 
+   RowBox[{
+    RowBox[{
+     RowBox[{"tsub", "//.", "KinRules"}], "//.", "KinSub"}], "//", 
+    "FullSimplify"}]}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{"tfinalkt20", "=", 
+  RowBox[{
+   RowBox[{"t", "/.", 
+    RowBox[{"{", 
+     RowBox[{
+      RowBox[{"Alfas", "\[Rule]", "1"}], ",", 
+      RowBox[{"MW", "\[Rule]", "80.376"}], ",", 
+      RowBox[{"SW", "\[Rule]", "0.480832611207"}], ",", 
+      RowBox[{"EL", "\[Rule]", 
+       RowBox[{"Sqrt", "[", 
+        RowBox[{"4", "*", "Pi"}], "]"}]}]}], "}"}]}], "//", 
+   "Simplify"}]}]}], "Input",
+ CellChangeTimes->{
+  3.775487814954833*^9, {3.775487909267064*^9, 3.7754879134590263`*^9}, {
+   3.775488344566409*^9, 3.77548835124419*^9}, {3.775491125858963*^9, 
+   3.7754911277699213`*^9}, 3.775492216611558*^9},
+ CellLabel->
+  "In[171]:=",ExpressionUUID->"38863738-22eb-4821-ade8-5e59b57cc6c8"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{
+   RowBox[{"(", 
+    RowBox[{"3.8563551197203405`", "\[VeryThinSpace]", "-", 
+     RowBox[{"0.10789304042050796`", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+   "c1"}], "+", 
+  RowBox[{
+   RowBox[{"(", 
+    RowBox[{"3.856355119720342`", "\[VeryThinSpace]", "+", 
+     RowBox[{"0.10789304042050414`", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+   "c2"}], "-", 
+  RowBox[{
+   RowBox[{"(", 
+    RowBox[{"7.712710239440681`", "\[VeryThinSpace]", "-", 
+     RowBox[{"3.788242722357783`*^-15", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+   "c3"}]}]], "Output",
+ CellChangeTimes->{
+  3.775487817638229*^9, {3.77548791635111*^9, 3.775487946605961*^9}, {
+   3.7754883532181377`*^9, 3.7754883653373213`*^9}, 3.775491056872643*^9, 
+   3.775491129906959*^9, 3.77549217973273*^9, 3.775492232818741*^9},
+ CellLabel->
+  "Out[172]=",ExpressionUUID->"daf16945-ab0d-4374-a527-378da92f56c0"]
+}, Open  ]],
+
+Cell[BoxData[
+ RowBox[{"\[IndentingNewLine]", "\[IndentingNewLine]"}]], "Input",
+ CellChangeTimes->{{3.775487900550686*^9, 
+  3.775487900690033*^9}},ExpressionUUID->"dd96acf9-8569-436c-b71f-\
+3858bc812dc3"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{
+ RowBox[{
+  RowBox[{"output", "=", 
+   RowBox[{
+    RowBox[{"N", "[", 
+     RowBox[{
+      RowBox[{"OutputPS", "[", 
+       RowBox[{"300.", ",", "40.", ",", "0", ",", 
+        RowBox[{"Pi", "/", "3"}], ",", "0", ",", 
+        RowBox[{"3", "*", 
+         RowBox[{"Pi", "/", "2"}]}], ",", "125."}], "]"}], ",", "10"}], "]"}],
+     "[", 
+    RowBox[{"[", "2", "]"}], "]"}]}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"KinRules", "=", 
+   RowBox[{"f", "[", 
+    RowBox[{"variables", ",", "output"}], "]"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"KinSub", "=", 
+   RowBox[{"{", 
+    RowBox[{
+     RowBox[{"S", "\[Rule]", 
+      RowBox[{"300.", "^", "2"}]}], ",", 
+     RowBox[{"kT3", "\[Rule]", "40."}], ",", 
+     RowBox[{"\[Eta]3", "\[Rule]", "0"}], ",", 
+     RowBox[{"\[Phi]3", "\[Rule]", 
+      RowBox[{"Pi", "/", "3"}]}], ",", 
+     RowBox[{"\[Eta]4", "\[Rule]", "0"}], ",", 
+     RowBox[{"\[Phi]4", "\[Rule]", 
+      RowBox[{"3", "*", 
+       RowBox[{"Pi", "/", "2"}]}]}], ",", 
+     RowBox[{"MH", "\[Rule]", "125."}], ",", 
+     RowBox[{"MT", "\[Rule]", "173."}]}], "}"}]}], ";"}]}], "Input",
+ CellChangeTimes->{{3.775487894137486*^9, 3.775487895793477*^9}},
+ CellLabel->
+  "In[152]:=",ExpressionUUID->"587fed01-95ad-4497-9991-22e72c5df35e"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"kT3_max = \"\>", "\[InvisibleSpace]", 
+   RowBox[{"{", 
+    RowBox[{"kT3", "\[Rule]", "123.95833333333334`"}], "}"}], 
+   "\[InvisibleSpace]", "\<\"\\n\"\>"}],
+  SequenceForm["kT3_max = ", {$CellContext`kT3 -> 123.95833333333334`}, "\n"],
+  
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775487902025655*^9, 3.775487921336112*^9}, 
+   3.775487952888777*^9, 3.775488370010009*^9, 3.775491061733279*^9, 
+   3.775491130954506*^9, 3.7754921882876177`*^9},
+ CellLabel->
+  "During evaluation of \
+In[152]:=",ExpressionUUID->"efbe9be0-242a-48f2-9e42-649dcc6e39f0"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"Four Momenta : \\n\"\>", "\[InvisibleSpace]", 
+   TagBox[
+    RowBox[{"(", "\[NoBreak]", 
+     TagBox[GridBox[{
+        {
+         RowBox[{"p1", "\[Rule]", 
+          RowBox[{"{", 
+           RowBox[{"150.`", ",", "0.`", ",", "0.`", ",", "150.`"}], "}"}]}]},
+        {
+         RowBox[{"p2", "\[Rule]", 
+          RowBox[{"{", 
+           RowBox[{"150.`", ",", "0.`", ",", "0.`", ",", 
+            RowBox[{"-", "150.`"}]}], "}"}]}]},
+        {
+         RowBox[{"p3", "\[Rule]", 
+          RowBox[{"{", 
+           RowBox[{
+           "131.24404748406687`", ",", "20.`", ",", "34.64101615137755`", ",",
+             "0.`"}], "}"}]}]},
+        {
+         RowBox[{"p4", "\[Rule]", 
+          RowBox[{"{", 
+           RowBox[{"100.20722612318758`", ",", "0.`", ",", 
+            RowBox[{"-", "100.20722612318758`"}], ",", "0.`"}], "}"}]}]},
+        {
+         RowBox[{"p5", "\[Rule]", 
+          RowBox[{"{", 
+           RowBox[{"68.5487263927455`", ",", 
+            RowBox[{"-", "20.`"}], ",", "65.56620997181004`", ",", "0.`"}], 
+           "}"}]}]}
+       },
+       GridBoxAlignment->{
+        "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, 
+         "Rows" -> {{Baseline}}, "RowsIndexed" -> {}},
+       GridBoxSpacings->{"Columns" -> {
+           Offset[0.27999999999999997`], {
+            Offset[0.5599999999999999]}, 
+           Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
+           Offset[0.2], {
+            Offset[0.4]}, 
+           Offset[0.2]}, "RowsIndexed" -> {}}],
+      Column], "\[NoBreak]", ")"}],
+    Function[BoxForm`e$, 
+     MatrixForm[BoxForm`e$]]], "\[InvisibleSpace]", "\<\"\\n\"\>"}],
+  SequenceForm["Four Momenta : \n", 
+   MatrixForm[{$CellContext`p1 -> {150., 0., 0., 150.}, $CellContext`p2 -> {
+      150., 0., 0., -150.}, $CellContext`p3 -> {131.24404748406687`, 20., 
+      34.64101615137755, 0.}, $CellContext`p4 -> {100.20722612318758`, 
+      0., -100.20722612318758`, 0.}, $CellContext`p5 -> {
+      68.5487263927455, -20., 65.56620997181004, 0.}}], "\n"],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775487902025655*^9, 3.775487921336112*^9}, 
+   3.775487952888777*^9, 3.775488370010009*^9, 3.775491061733279*^9, 
+   3.775491130954506*^9, 3.775492188298505*^9},
+ CellLabel->
+  "During evaluation of \
+In[152]:=",ExpressionUUID->"b773131b-d503-4156-81c4-b9207d5e08b7"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"Check 4 momentum conservation: p3+p4+p5 -p1 -p2 =0 :  \"\>", 
+   "\[InvisibleSpace]", 
+   RowBox[{"{", 
+    RowBox[{
+     RowBox[{
+     "-", "5.876373720011891608134562217738742061745029729160199708223878675`\
+43.99095815745918*^-14"}], ",", "0``58.39794000867204", ",", 
+     "0``57.69807096391986", ",", "0``57.522878745280345"}], "}"}]}],
+  SequenceForm[
+  "Check 4 momentum conservation: p3+p4+p5 -p1 -p2 =0 :  ", \
+{-5.876373720011891608134562217738742061745029729160199708223878675`43.\
+99095815745918*^-14, 0``58.39794000867204, 0``57.69807096391986, 
+    0``57.522878745280345}],
+  Editable->False]], "Print",
+ CellChangeTimes->{{3.775487902025655*^9, 3.775487921336112*^9}, 
+   3.775487952888777*^9, 3.775488370010009*^9, 3.775491061733279*^9, 
+   3.775491130954506*^9, 3.775492188311578*^9},
+ CellLabel->
+  "During evaluation of \
+In[152]:=",ExpressionUUID->"87a2822b-b3de-47cc-ad5e-c06152d2025e"],
+
+Cell[BoxData["\<\"MOMENTUM IS CONSERVED, ALL IS WELL!\"\>"], "Print",
+ CellChangeTimes->{{3.775487902025655*^9, 3.775487921336112*^9}, 
+   3.775487952888777*^9, 3.775488370010009*^9, 3.775491061733279*^9, 
+   3.775491130954506*^9, 3.775492188318636*^9},
+ CellLabel->
+  "During evaluation of \
+In[152]:=",ExpressionUUID->"37c34993-2e48-4495-a764-802de147d2dd"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{
+   RowBox[{"kkT3", "\[Rule]", "40.`"}], ",", 
+   RowBox[{"kkT4", "\[Rule]", "100.2072261231875813792`10."}], ",", 
+   RowBox[{"S", "\[Rule]", "90000.`10."}], ",", 
+   RowBox[{"T", "\[Rule]", 
+    RowBox[{"-", "23748.2142452200617895598`10."}]}], ",", 
+   RowBox[{"U", "\[Rule]", 
+    RowBox[{"-", "23748.2142452200617895598`10."}]}], ",", 
+   RowBox[{"T24", "\[Rule]", 
+    RowBox[{"-", "30062.1678369562744137511`10."}]}], ",", 
+   RowBox[{"T14", "\[Rule]", 
+    RowBox[{"-", "30062.1678369562744137511`10."}]}], ",", 
+   RowBox[{"S34", "\[Rule]", "48870.7641643526804629805`10."}], ",", 
+   RowBox[{
+    SqrtBox["S"], "\[Rule]", "300.`10."}], ",", 
+   RowBox[{
+    SqrtBox["S34"], "\[Rule]", "221.0673294821120339102`10."}], ",", 
+   RowBox[{
+    RowBox[{"Tan", "[", "\[Phi]5", "]"}], "\[Rule]", 
+    RowBox[{"-", "0.30503516992363796243170073189201937468`10."}]}], ",", 
+   RowBox[{"kT5", "\[Rule]", "68.5487263927454872252`10."}], ",", 
+   RowBox[{
+    SqrtBox["S35"], "\[Rule]", "172.8457819158090640716`10."}]}], 
+  "}"}]], "Print",
+ CellChangeTimes->{{3.775487902025655*^9, 3.775487921336112*^9}, 
+   3.775487952888777*^9, 3.775488370010009*^9, 3.775491061733279*^9, 
+   3.775491130954506*^9, 3.775492188325994*^9},
+ CellLabel->
+  "During evaluation of \
+In[152]:=",ExpressionUUID->"aaee04cf-3b7e-430f-bbef-6bfe3a0c933c"]
+}, Open  ]]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"ek4vec", "//.", "KinRules"}], "//.", "KinSub"}]], "Input",
+ CellLabel->
+  "In[155]:=",ExpressionUUID->"9e8c3495-09ad-4ff0-bd7d-92eff7ebc1d8"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{"-", 
+    FractionBox["\[ImaginaryI]", 
+     SqrtBox["2"]]}], ",", "0", ",", 
+   FractionBox["1", 
+    SqrtBox["2"]]}], "}"}]], "Output",
+ CellChangeTimes->{3.7754880076182203`*^9, 3.775492192737771*^9},
+ CellLabel->
+  "Out[155]=",ExpressionUUID->"d28a7c93-4ace-4140-baec-5db8c913a946"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"ek5vec", "//.", "KinRules"}], "//.", "KinSub"}]], "Input",
+ CellChangeTimes->{{3.7754879871840773`*^9, 3.775487995354398*^9}},
+ CellLabel->
+  "In[156]:=",ExpressionUUID->"bea8deb0-f558-4fba-b807-f39d09047f9c"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{"0.`", "\[VeryThinSpace]", "+", 
+    RowBox[{"0.6763409639755821`", " ", "\[ImaginaryI]"}]}], ",", 
+   RowBox[{"0.`", "\[VeryThinSpace]", "+", 
+    RowBox[{"0.20630778087260876`", " ", "\[ImaginaryI]"}]}], ",", 
+   "0.7071067811865475`"}], "}"}]], "Output",
+ CellChangeTimes->{{3.775487988453107*^9, 3.7754879960422697`*^9}, 
+   3.775492194787578*^9},
+ CellLabel->
+  "Out[156]=",ExpressionUUID->"0f2458d3-6748-4204-8103-24c778a58b4c"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{
+ RowBox[{
+  RowBox[{"t", "=", 
+   RowBox[{
+    RowBox[{
+     RowBox[{"tsub", "//.", "KinRules"}], "//.", "KinSub"}], "//", 
+    "FullSimplify"}]}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{"tfinalkt40", "=", 
+  RowBox[{
+   RowBox[{"t", "/.", 
+    RowBox[{"{", 
+     RowBox[{
+      RowBox[{"Alfas", "\[Rule]", "1"}], ",", 
+      RowBox[{"MW", "\[Rule]", "80.376"}], ",", 
+      RowBox[{"SW", "\[Rule]", "0.480832611207"}], ",", 
+      RowBox[{"EL", "\[Rule]", 
+       RowBox[{"Sqrt", "[", 
+        RowBox[{"4", "*", "Pi"}], "]"}]}]}], "}"}]}], "//", 
+   "Simplify"}]}]}], "Input",
+ CellChangeTimes->{{3.7754879642539673`*^9, 3.775487969176927*^9}, {
+  3.775488329227951*^9, 3.775488333388538*^9}, {3.775491111548188*^9, 
+  3.775491114015253*^9}},
+ CellLabel->
+  "In[157]:=",ExpressionUUID->"4a273c30-f8fc-46d1-9ea4-2dc3bb5d38c9"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{
+   RowBox[{"(", 
+    RowBox[{"4.006591462806078`", "\[VeryThinSpace]", "-", 
+     RowBox[{"0.2762833510999711`", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+   "c1"}], "+", 
+  RowBox[{
+   RowBox[{"(", 
+    RowBox[{"4.006591462806078`", "\[VeryThinSpace]", "+", 
+     RowBox[{"0.2762833510999748`", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+   "c2"}], "-", 
+  RowBox[{
+   RowBox[{"(", 
+    RowBox[{"8.013182925612155`", "\[VeryThinSpace]", "+", 
+     RowBox[{"3.666041344217209`*^-15", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+   "c3"}]}]], "Output",
+ CellChangeTimes->{
+  3.775487971440014*^9, 3.775488335545794*^9, 3.775488376384015*^9, 
+   3.775491068819869*^9, {3.775491117992406*^9, 3.775491138403043*^9}, 
+   3.7754921984201593`*^9},
+ CellLabel->
+  "Out[158]=",ExpressionUUID->"f9a5dd89-b566-4f2b-bac6-dc1b86c8af04"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["tfinalkt20"], "Input",
+ CellChangeTimes->{{3.775488255187787*^9, 3.775488257107789*^9}},
+ CellLabel->
+  "In[173]:=",ExpressionUUID->"64119c6d-52f2-400d-81ef-73a3ba94f23d"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{
+   RowBox[{"(", 
+    RowBox[{"3.8563551197203405`", "\[VeryThinSpace]", "-", 
+     RowBox[{"0.10789304042050796`", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+   "c1"}], "+", 
+  RowBox[{
+   RowBox[{"(", 
+    RowBox[{"3.856355119720342`", "\[VeryThinSpace]", "+", 
+     RowBox[{"0.10789304042050414`", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+   "c2"}], "-", 
+  RowBox[{
+   RowBox[{"(", 
+    RowBox[{"7.712710239440681`", "\[VeryThinSpace]", "-", 
+     RowBox[{"3.788242722357783`*^-15", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+   "c3"}]}]], "Output",
+ CellChangeTimes->{3.7754882575757093`*^9, 3.775488383167577*^9, 
+  3.775491071580632*^9, 3.7754911411741056`*^9, 3.775492201913412*^9, 
+  3.775492237519631*^9},
+ CellLabel->
+  "Out[173]=",ExpressionUUID->"756fccae-313a-4aa3-b142-b34d21036023"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["tfinalkt40"], "Input",
+ CellChangeTimes->{{3.7754882587069683`*^9, 3.775488260429796*^9}},
+ CellLabel->
+  "In[160]:=",ExpressionUUID->"a16290ff-6778-41a3-b359-246f67aeefaa"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{
+   RowBox[{"(", 
+    RowBox[{"4.006591462806078`", "\[VeryThinSpace]", "-", 
+     RowBox[{"0.2762833510999711`", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+   "c1"}], "+", 
+  RowBox[{
+   RowBox[{"(", 
+    RowBox[{"4.006591462806078`", "\[VeryThinSpace]", "+", 
+     RowBox[{"0.2762833510999748`", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+   "c2"}], "-", 
+  RowBox[{
+   RowBox[{"(", 
+    RowBox[{"8.013182925612155`", "\[VeryThinSpace]", "+", 
+     RowBox[{"3.666041344217209`*^-15", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+   "c3"}]}]], "Output",
+ CellChangeTimes->{3.775488260734057*^9, 3.7754883851512213`*^9, 
+  3.775491073264893*^9, 3.775491143024358*^9, 3.775492204064665*^9},
+ CellLabel->
+  "Out[160]=",ExpressionUUID->"29952b1b-a847-4460-9afd-dae006ceafb7"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"c1ration", "=", 
+  RowBox[{
+   RowBox[{"tfinalkt20", "[", 
+    RowBox[{"[", "1", "]"}], "]"}], "/", 
+   RowBox[{"tfinalkt40", "[", 
+    RowBox[{"[", "1", "]"}], "]"}]}]}]], "Input",
+ CellChangeTimes->{{3.775227370037896*^9, 3.7752273724170027`*^9}, {
+  3.775488078262741*^9, 3.775488122354746*^9}},
+ CellLabel->
+  "In[174]:=",ExpressionUUID->"9729c16f-542c-4583-8d8f-dcb1f9899ee7"],
+
+Cell[BoxData[
+ RowBox[{"0.9597957243875892`", "\[VeryThinSpace]", "+", 
+  RowBox[{"0.03925594614394856`", " ", "\[ImaginaryI]"}]}]], "Output",
+ CellChangeTimes->{{3.775488082922187*^9, 3.775488122649926*^9}, 
+   3.7754883879684258`*^9, 3.775491075532887*^9, 3.775491145212131*^9, 
+   3.775492206188027*^9, 3.775492241855863*^9},
+ CellLabel->
+  "Out[174]=",ExpressionUUID->"ef1bda56-f590-49ec-bc2a-44f732a3ba4b"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"c2ration", "=", 
+  RowBox[{
+   RowBox[{"tfinalkt20", "[", 
+    RowBox[{"[", "2", "]"}], "]"}], "/", 
+   RowBox[{"tfinalkt40", "[", 
+    RowBox[{"[", "2", "]"}], "]"}]}]}]], "Input",
+ CellChangeTimes->{{3.775488129638857*^9, 3.775488146231625*^9}},
+ CellLabel->
+  "In[175]:=",ExpressionUUID->"24ccfcaf-f4d5-4902-81e0-8d38403763c1"],
+
+Cell[BoxData[
+ RowBox[{"0.9597957243875894`", "\[VeryThinSpace]", "-", 
+  RowBox[{"0.03925594614395041`", " ", "\[ImaginaryI]"}]}]], "Output",
+ CellChangeTimes->{{3.775488140779368*^9, 3.775488146646366*^9}, 
+   3.775488389752941*^9, 3.775491077016924*^9, 3.7754921351473722`*^9, 
+   3.775492208269136*^9, 3.775492243355577*^9},
+ CellLabel->
+  "Out[175]=",ExpressionUUID->"1395b6cf-0254-469b-8225-3f3eaecd64b3"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"c3ration", "=", 
+  RowBox[{
+   RowBox[{"tfinalkt20", "[", 
+    RowBox[{"[", "3", "]"}], "]"}], "/", 
+   RowBox[{"tfinalkt40", "[", 
+    RowBox[{"[", "3", "]"}], "]"}]}]}]], "Input",
+ CellChangeTimes->{{3.775227303392332*^9, 3.775227304142188*^9}, {
+  3.77548812788452*^9, 3.7754881587453537`*^9}},
+ CellLabel->
+  "In[176]:=",ExpressionUUID->"1c4d588d-8302-4258-81e3-4cedb485f7da"],
+
+Cell[BoxData[
+ RowBox[{"0.9625027047353323`", "\[VeryThinSpace]", "-", 
+  RowBox[{"9.130975168995588`*^-16", " ", "\[ImaginaryI]"}]}]], "Output",
+ CellChangeTimes->{{3.7754881388945208`*^9, 3.7754881607714853`*^9}, 
+   3.7754883915538692`*^9, 3.7754910784168177`*^9, 3.775491146929659*^9, 
+   3.775492137484355*^9, 3.775492209984849*^9, 3.7754922449861603`*^9},
+ CellLabel->
+  "Out[176]=",ExpressionUUID->"287f41c7-e872-480d-b818-0bc23a2fa987"]
+}, Open  ]],
+
+Cell[BoxData[
+ RowBox[{"\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", 
+  "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", 
+  "\[IndentingNewLine]", "\[IndentingNewLine]"}]], "Input",
+ CellChangeTimes->{{3.775487113187286*^9, 3.775487113690071*^9}, {
+  3.775489312687867*^9, 
+  3.775489313079639*^9}},ExpressionUUID->"c51d1221-86c4-4ebd-b3ad-\
+4106585b9017"],
+
+Cell[BoxData[
+ RowBox[{"(*", " ", 
+  RowBox[{
+   RowBox[{"TEST", " ", "gg"}], "\[Rule]", 
+   RowBox[{"Hgg", " ", 
+    RowBox[{"w", "/", " ", "2"}], " ", "diagrams", " ", 
+    RowBox[{"(", "triangles", ")"}]}]}], " ", "*)"}]], "Input",
+ CellChangeTimes->{{3.7754893173365507`*^9, 
+  3.775489333166304*^9}},ExpressionUUID->"9cd25044-4f41-49e4-80f5-\
+08d29278cb00"],
+
+Cell[BoxData[{
+ RowBox[{
+  RowBox[{"SetDirectory", "[", 
+   RowBox[{"NotebookDirectory", "[", "]"}], "]"}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"config", "=", "\"\<++++\>\""}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"triangle", " ", "=", " ", 
+   RowBox[{"Import", "[", "\"\<ggHgg_LR_triangle_2diags.m\>\"", "]"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"pairdef", "[", 
+   RowBox[{"1", ",", "1", ",", "1", ",", "1"}], "]"}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"tsub", " ", "=", " ", 
+   RowBox[{
+    RowBox[{"triangle", "//.", "SubFourVecs"}], "/.", "MATColor"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"Export", "[", 
+   RowBox[{
+    RowBox[{"\"\<triangle_2diags\>\"", "<>", "config", "<>", "\"\<.m\>\""}], 
+    ",", "tsub"}], "]"}], ";"}]}], "Input",
+ CellChangeTimes->{{3.77548933699573*^9, 3.7754893372214212`*^9}, {
+  3.7754894233857393`*^9, 3.77548942830713*^9}},
+ CellLabel->"In[29]:=",ExpressionUUID->"d5a9b7bd-37b9-4af8-bb12-857996b7a8bc"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{
+ RowBox[{
+  RowBox[{"output", "=", 
+   RowBox[{
+    RowBox[{"N", "[", 
+     RowBox[{
+      RowBox[{"OutputPS", "[", 
+       RowBox[{"300.", ",", "20.", ",", "0", ",", 
+        RowBox[{"Pi", "/", "3"}], ",", "0", ",", 
+        RowBox[{"3", "*", 
+         RowBox[{"Pi", "/", "2"}]}], ",", "125."}], "]"}], ",", "10"}], "]"}],
+     "[", 
+    RowBox[{"[", "2", "]"}], "]"}]}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"KinRules", "=", 
+   RowBox[{"f", "[", 
+    RowBox[{"variables", ",", "output"}], "]"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"KinSub", "=", 
+   RowBox[{"{", 
+    RowBox[{
+     RowBox[{"S", "\[Rule]", 
+      RowBox[{"300.", "^", "2"}]}], ",", 
+     RowBox[{"kT3", "\[Rule]", "20."}], ",", 
+     RowBox[{"\[Eta]3", "\[Rule]", "0"}], ",", 
+     RowBox[{"\[Phi]3", "\[Rule]", 
+      RowBox[{"Pi", "/", "3"}]}], ",", 
+     RowBox[{"\[Eta]4", "\[Rule]", "0"}], ",", 
+     RowBox[{"\[Phi]4", "\[Rule]", 
+      RowBox[{"3", "*", 
+       RowBox[{"Pi", "/", "2"}]}]}], ",", 
+     RowBox[{"MH", "\[Rule]", "125."}], ",", 
+     RowBox[{"MT", "\[Rule]", "173."}]}], "}"}]}], ";"}]}], "Input",
+ CellLabel->"In[48]:=",ExpressionUUID->"9331fb0d-1fec-43e2-9850-030fbd7bdf66"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"kT3_max = \"\>", "\[InvisibleSpace]", 
+   RowBox[{"{", 
+    RowBox[{"kT3", "\[Rule]", "123.95833333333334`"}], "}"}], 
+   "\[InvisibleSpace]", "\<\"\\n\"\>"}],
+  SequenceForm["kT3_max = ", {$CellContext`kT3 -> 123.95833333333334`}, "\n"],
+  
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775489883437943*^9, 3.77548992568414*^9},
+ CellLabel->
+  "During evaluation of \
+In[48]:=",ExpressionUUID->"37427144-5f1a-4b3d-944b-84388f7e1424"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"Four Momenta : \\n\"\>", "\[InvisibleSpace]", 
+   TagBox[
+    RowBox[{"(", "\[NoBreak]", 
+     TagBox[GridBox[{
+        {
+         RowBox[{"p1", "\[Rule]", 
+          RowBox[{"{", 
+           RowBox[{"150.`", ",", "0.`", ",", "0.`", ",", "150.`"}], "}"}]}]},
+        {
+         RowBox[{"p2", "\[Rule]", 
+          RowBox[{"{", 
+           RowBox[{"150.`", ",", "0.`", ",", "0.`", ",", 
+            RowBox[{"-", "150.`"}]}], "}"}]}]},
+        {
+         RowBox[{"p3", "\[Rule]", 
+          RowBox[{"{", 
+           RowBox[{
+           "126.58988901172162`", ",", "10.`", ",", "17.320508075688775`", 
+            ",", "0.`"}], "}"}]}]},
+        {
+         RowBox[{"p4", "\[Rule]", 
+          RowBox[{"{", 
+           RowBox[{"95.04498070119013`", ",", "0.`", ",", 
+            RowBox[{"-", "95.04498070119013`"}], ",", "0.`"}], "}"}]}]},
+        {
+         RowBox[{"p5", "\[Rule]", 
+          RowBox[{"{", 
+           RowBox[{"78.3651302870882`", ",", 
+            RowBox[{"-", "10.`"}], ",", "77.72447262550135`", ",", "0.`"}], 
+           "}"}]}]}
+       },
+       GridBoxAlignment->{
+        "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, 
+         "Rows" -> {{Baseline}}, "RowsIndexed" -> {}},
+       GridBoxSpacings->{"Columns" -> {
+           Offset[0.27999999999999997`], {
+            Offset[0.5599999999999999]}, 
+           Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
+           Offset[0.2], {
+            Offset[0.4]}, 
+           Offset[0.2]}, "RowsIndexed" -> {}}],
+      Column], "\[NoBreak]", ")"}],
+    Function[BoxForm`e$, 
+     MatrixForm[BoxForm`e$]]], "\[InvisibleSpace]", "\<\"\\n\"\>"}],
+  SequenceForm["Four Momenta : \n", 
+   MatrixForm[{$CellContext`p1 -> {150., 0., 0., 150.}, $CellContext`p2 -> {
+      150., 0., 0., -150.}, $CellContext`p3 -> {126.58988901172162`, 10., 
+      17.320508075688775`, 0.}, $CellContext`p4 -> {95.04498070119013, 
+      0., -95.04498070119013, 0.}, $CellContext`p5 -> {78.3651302870882, -10.,
+       77.72447262550135, 0.}}], "\n"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775489883437943*^9, 3.7754899256971903`*^9},
+ CellLabel->
+  "During evaluation of \
+In[48]:=",ExpressionUUID->"4113965a-4b28-4369-abec-86637ae21960"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"Check 4 momentum conservation: p3+p4+p5 -p1 -p2 =0 :  \"\>", 
+   "\[InvisibleSpace]", 
+   RowBox[{"{", 
+    RowBox[{
+     RowBox[{
+     "-", "3.887221955939928966560590155849714544348308363744058289341178206`\
+43.811488088675176*^-14"}], ",", "0``58.69897000433602", ",", 
+     "0``57.72104081749894", ",", "0``57.522878745280345"}], "}"}]}],
+  SequenceForm[
+  "Check 4 momentum conservation: p3+p4+p5 -p1 -p2 =0 :  ", \
+{-3.887221955939928966560590155849714544348308363744058289341178206`43.\
+811488088675176*^-14, 0``58.69897000433602, 0``57.72104081749894, 
+    0``57.522878745280345}],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775489883437943*^9, 3.775489925710073*^9},
+ CellLabel->
+  "During evaluation of \
+In[48]:=",ExpressionUUID->"6948dff3-27cb-48e8-897b-75fa8905a448"],
+
+Cell[BoxData["\<\"MOMENTUM IS CONSERVED, ALL IS WELL!\"\>"], "Print",
+ CellChangeTimes->{3.775489883437943*^9, 3.77548992571929*^9},
+ CellLabel->
+  "During evaluation of \
+In[48]:=",ExpressionUUID->"bc9fdf3f-b30b-492d-8e1d-5cf2f61575b8"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{
+   RowBox[{"kkT3", "\[Rule]", "20.`"}], ",", 
+   RowBox[{"kkT4", "\[Rule]", "95.0449807011901270926`10."}], ",", 
+   RowBox[{"S", "\[Rule]", "90000.`10."}], ",", 
+   RowBox[{"T", "\[Rule]", 
+    RowBox[{"-", "22351.9667035164881926659`10."}]}], ",", 
+   RowBox[{"U", "\[Rule]", 
+    RowBox[{"-", "22351.9667035164881926659`10."}]}], ",", 
+   RowBox[{"T24", "\[Rule]", 
+    RowBox[{"-", "28513.4942103570381277677`10."}]}], ",", 
+   RowBox[{"T14", "\[Rule]", 
+    RowBox[{"-", "28513.4942103570381277677`10."}]}], ",", 
+   RowBox[{"S34", "\[Rule]", "42980.9218277470587333204`10."}], ",", 
+   RowBox[{
+    SqrtBox["S"], "\[Rule]", "300.`10."}], ",", 
+   RowBox[{
+    SqrtBox["S34"], "\[Rule]", "207.3184068715246970733`10."}], ",", 
+   RowBox[{
+    RowBox[{"Tan", "[", "\[Phi]5", "]"}], "\[Rule]", 
+    RowBox[{"-", "0.12865960568407904294629727505559632487`10."}]}], ",", 
+   RowBox[{"kT5", "\[Rule]", "78.3651302870882067263`10."}], ",", 
+   RowBox[{
+    SqrtBox["S35"], "\[Rule]", "181.5847228686540904465`10."}]}], 
+  "}"}]], "Print",
+ CellChangeTimes->{3.775489883437943*^9, 3.7754899257285137`*^9},
+ CellLabel->
+  "During evaluation of \
+In[48]:=",ExpressionUUID->"ab68cde6-c968-40c5-b689-0e2e516ef784"]
+}, Open  ]]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{
+ RowBox[{
+  RowBox[{"t", "=", 
+   RowBox[{
+    RowBox[{
+     RowBox[{"tsub", "//.", "KinRules"}], "//.", "KinSub"}], "//", 
+    "FullSimplify"}]}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{"tfinalkt20", "=", 
+  RowBox[{
+   RowBox[{
+    RowBox[{"t", "[", 
+     RowBox[{"[", "1", "]"}], "]"}], "/.", 
+    RowBox[{"{", 
+     RowBox[{
+      RowBox[{"Alfas", "\[Rule]", "1"}], ",", 
+      RowBox[{"MW", "\[Rule]", "80.376"}], ",", 
+      RowBox[{"SW", "\[Rule]", "0.480832611207"}], ",", 
+      RowBox[{"EL", "\[Rule]", 
+       RowBox[{"Sqrt", "[", 
+        RowBox[{"4", "*", "Pi"}], "]"}]}]}], "}"}]}], "//", 
+   "Simplify"}]}]}], "Input",
+ CellChangeTimes->{{3.775489623778441*^9, 3.775489636602193*^9}},
+ CellLabel->"In[51]:=",ExpressionUUID->"bdc583a4-5ce8-4ab5-954b-e4753cc14645"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{
+   RowBox[{"(", 
+    RowBox[{
+     RowBox[{"-", "0.13075798053837576`"}], "-", 
+     RowBox[{"0.03281500225499752`", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+   "c1"}], "-", 
+  RowBox[{
+   RowBox[{"(", 
+    RowBox[{"0.1702977566394835`", "\[VeryThinSpace]", "-", 
+     RowBox[{"0.03197062023844408`", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+   "c2"}], "+", 
+  RowBox[{
+   RowBox[{"(", 
+    RowBox[{"0.3010557371778594`", "\[VeryThinSpace]", "+", 
+     RowBox[{"0.0008443820165534565`", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+   "c3"}]}]], "Output",
+ CellChangeTimes->{{3.775489632151163*^9, 3.775489638083955*^9}, 
+   3.775489929455364*^9},
+ CellLabel->"Out[52]=",ExpressionUUID->"ba033732-01ca-402b-a434-8b7ef10663bc"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{
+ RowBox[{
+  RowBox[{"output", "=", 
+   RowBox[{
+    RowBox[{"N", "[", 
+     RowBox[{
+      RowBox[{"OutputPS", "[", 
+       RowBox[{"300.", ",", "40.", ",", "0", ",", 
+        RowBox[{"Pi", "/", "3"}], ",", "0", ",", 
+        RowBox[{"3", "*", 
+         RowBox[{"Pi", "/", "2"}]}], ",", "125."}], "]"}], ",", "10"}], "]"}],
+     "[", 
+    RowBox[{"[", "2", "]"}], "]"}]}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"KinRules", "=", 
+   RowBox[{"f", "[", 
+    RowBox[{"variables", ",", "output"}], "]"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"KinSub", "=", 
+   RowBox[{"{", 
+    RowBox[{
+     RowBox[{"S", "\[Rule]", 
+      RowBox[{"300.", "^", "2"}]}], ",", 
+     RowBox[{"kT3", "\[Rule]", "40."}], ",", 
+     RowBox[{"\[Eta]3", "\[Rule]", "0"}], ",", 
+     RowBox[{"\[Phi]3", "\[Rule]", 
+      RowBox[{"Pi", "/", "3"}]}], ",", 
+     RowBox[{"\[Eta]4", "\[Rule]", "0"}], ",", 
+     RowBox[{"\[Phi]4", "\[Rule]", 
+      RowBox[{"3", "*", 
+       RowBox[{"Pi", "/", "2"}]}]}], ",", 
+     RowBox[{"MH", "\[Rule]", "125."}], ",", 
+     RowBox[{"MT", "\[Rule]", "173."}]}], "}"}]}], ";"}]}], "Input",
+ CellChangeTimes->{{3.77548994483876*^9, 3.775489946153615*^9}},
+ CellLabel->"In[53]:=",ExpressionUUID->"57bf9ad6-d97b-4e31-af95-23eb640aeccb"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"kT3_max = \"\>", "\[InvisibleSpace]", 
+   RowBox[{"{", 
+    RowBox[{"kT3", "\[Rule]", "123.95833333333334`"}], "}"}], 
+   "\[InvisibleSpace]", "\<\"\\n\"\>"}],
+  SequenceForm["kT3_max = ", {$CellContext`kT3 -> 123.95833333333334`}, "\n"],
+  
+  Editable->False]], "Print",
+ CellChangeTimes->{3.7754899466897182`*^9},
+ CellLabel->
+  "During evaluation of \
+In[53]:=",ExpressionUUID->"10539cf1-126a-4c72-b496-8ac1181292c2"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"Four Momenta : \\n\"\>", "\[InvisibleSpace]", 
+   TagBox[
+    RowBox[{"(", "\[NoBreak]", 
+     TagBox[GridBox[{
+        {
+         RowBox[{"p1", "\[Rule]", 
+          RowBox[{"{", 
+           RowBox[{"150.`", ",", "0.`", ",", "0.`", ",", "150.`"}], "}"}]}]},
+        {
+         RowBox[{"p2", "\[Rule]", 
+          RowBox[{"{", 
+           RowBox[{"150.`", ",", "0.`", ",", "0.`", ",", 
+            RowBox[{"-", "150.`"}]}], "}"}]}]},
+        {
+         RowBox[{"p3", "\[Rule]", 
+          RowBox[{"{", 
+           RowBox[{
+           "131.24404748406687`", ",", "20.`", ",", "34.64101615137755`", ",",
+             "0.`"}], "}"}]}]},
+        {
+         RowBox[{"p4", "\[Rule]", 
+          RowBox[{"{", 
+           RowBox[{"100.20722612318758`", ",", "0.`", ",", 
+            RowBox[{"-", "100.20722612318758`"}], ",", "0.`"}], "}"}]}]},
+        {
+         RowBox[{"p5", "\[Rule]", 
+          RowBox[{"{", 
+           RowBox[{"68.5487263927455`", ",", 
+            RowBox[{"-", "20.`"}], ",", "65.56620997181004`", ",", "0.`"}], 
+           "}"}]}]}
+       },
+       GridBoxAlignment->{
+        "Columns" -> {{Center}}, "ColumnsIndexed" -> {}, 
+         "Rows" -> {{Baseline}}, "RowsIndexed" -> {}},
+       GridBoxSpacings->{"Columns" -> {
+           Offset[0.27999999999999997`], {
+            Offset[0.5599999999999999]}, 
+           Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
+           Offset[0.2], {
+            Offset[0.4]}, 
+           Offset[0.2]}, "RowsIndexed" -> {}}],
+      Column], "\[NoBreak]", ")"}],
+    Function[BoxForm`e$, 
+     MatrixForm[BoxForm`e$]]], "\[InvisibleSpace]", "\<\"\\n\"\>"}],
+  SequenceForm["Four Momenta : \n", 
+   MatrixForm[{$CellContext`p1 -> {150., 0., 0., 150.}, $CellContext`p2 -> {
+      150., 0., 0., -150.}, $CellContext`p3 -> {131.24404748406687`, 20., 
+      34.64101615137755, 0.}, $CellContext`p4 -> {100.20722612318758`, 
+      0., -100.20722612318758`, 0.}, $CellContext`p5 -> {
+      68.5487263927455, -20., 65.56620997181004, 0.}}], "\n"],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775489946702546*^9},
+ CellLabel->
+  "During evaluation of \
+In[53]:=",ExpressionUUID->"822935a9-5e2c-4540-b675-dca51a34b286"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{"\<\"Check 4 momentum conservation: p3+p4+p5 -p1 -p2 =0 :  \"\>", 
+   "\[InvisibleSpace]", 
+   RowBox[{"{", 
+    RowBox[{
+     RowBox[{
+     "-", "5.876373720011891608134562217738742061745029729160199708223878675`\
+43.99095815745918*^-14"}], ",", "0``58.39794000867204", ",", 
+     "0``57.69807096391986", ",", "0``57.522878745280345"}], "}"}]}],
+  SequenceForm[
+  "Check 4 momentum conservation: p3+p4+p5 -p1 -p2 =0 :  ", \
+{-5.876373720011891608134562217738742061745029729160199708223878675`43.\
+99095815745918*^-14, 0``58.39794000867204, 0``57.69807096391986, 
+    0``57.522878745280345}],
+  Editable->False]], "Print",
+ CellChangeTimes->{3.775489946714909*^9},
+ CellLabel->
+  "During evaluation of \
+In[53]:=",ExpressionUUID->"82640b1c-5511-4c11-aba6-7d7985183a89"],
+
+Cell[BoxData["\<\"MOMENTUM IS CONSERVED, ALL IS WELL!\"\>"], "Print",
+ CellChangeTimes->{3.7754899467239037`*^9},
+ CellLabel->
+  "During evaluation of \
+In[53]:=",ExpressionUUID->"faa1baf7-d09d-4147-bb38-4bd4cd6ef2d8"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{
+   RowBox[{"kkT3", "\[Rule]", "40.`"}], ",", 
+   RowBox[{"kkT4", "\[Rule]", "100.2072261231875813792`10."}], ",", 
+   RowBox[{"S", "\[Rule]", "90000.`10."}], ",", 
+   RowBox[{"T", "\[Rule]", 
+    RowBox[{"-", "23748.2142452200617895598`10."}]}], ",", 
+   RowBox[{"U", "\[Rule]", 
+    RowBox[{"-", "23748.2142452200617895598`10."}]}], ",", 
+   RowBox[{"T24", "\[Rule]", 
+    RowBox[{"-", "30062.1678369562744137511`10."}]}], ",", 
+   RowBox[{"T14", "\[Rule]", 
+    RowBox[{"-", "30062.1678369562744137511`10."}]}], ",", 
+   RowBox[{"S34", "\[Rule]", "48870.7641643526804629805`10."}], ",", 
+   RowBox[{
+    SqrtBox["S"], "\[Rule]", "300.`10."}], ",", 
+   RowBox[{
+    SqrtBox["S34"], "\[Rule]", "221.0673294821120339102`10."}], ",", 
+   RowBox[{
+    RowBox[{"Tan", "[", "\[Phi]5", "]"}], "\[Rule]", 
+    RowBox[{"-", "0.30503516992363796243170073189201937468`10."}]}], ",", 
+   RowBox[{"kT5", "\[Rule]", "68.5487263927454872252`10."}], ",", 
+   RowBox[{
+    SqrtBox["S35"], "\[Rule]", "172.8457819158090640716`10."}]}], 
+  "}"}]], "Print",
+ CellChangeTimes->{3.775489946733102*^9},
+ CellLabel->
+  "During evaluation of \
+In[53]:=",ExpressionUUID->"56ae6788-1369-4e9a-b9a1-a2adf28ceea9"]
+}, Open  ]]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{
+ RowBox[{
+  RowBox[{"t", "=", 
+   RowBox[{
+    RowBox[{
+     RowBox[{"tsub", "//.", "KinRules"}], "//.", "KinSub"}], "//", 
+    "FullSimplify"}]}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{"tfinalkt40", "=", 
+  RowBox[{
+   RowBox[{
+    RowBox[{"t", "[", 
+     RowBox[{"[", "1", "]"}], "]"}], "/.", 
+    RowBox[{"{", 
+     RowBox[{
+      RowBox[{"Alfas", "\[Rule]", "1"}], ",", 
+      RowBox[{"MW", "\[Rule]", "80.376"}], ",", 
+      RowBox[{"SW", "\[Rule]", "0.480832611207"}], ",", 
+      RowBox[{"EL", "\[Rule]", 
+       RowBox[{"Sqrt", "[", 
+        RowBox[{"4", "*", "Pi"}], "]"}]}]}], "}"}]}], "//", 
+   "Simplify"}]}]}], "Input",
+ CellChangeTimes->{{3.77548995836652*^9, 3.775489958482275*^9}},
+ CellLabel->"In[56]:=",ExpressionUUID->"fbd4fe0e-70d6-47b4-91d4-1664cc7ae429"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{
+   RowBox[{"(", 
+    RowBox[{
+     RowBox[{"-", "0.11113591935481938`"}], "-", 
+     RowBox[{"0.07191873943346128`", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+   "c1"}], "-", 
+  RowBox[{
+   RowBox[{"(", 
+    RowBox[{"0.18025324082557106`", "\[VeryThinSpace]", "-", 
+     RowBox[{"0.06848301366250138`", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+   "c2"}], "+", 
+  RowBox[{
+   RowBox[{"(", 
+    RowBox[{"0.29138916018039046`", "\[VeryThinSpace]", "+", 
+     RowBox[{"0.0034357257709598664`", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+   "c3"}]}]], "Output",
+ CellChangeTimes->{3.7754899593610287`*^9},
+ CellLabel->"Out[57]=",ExpressionUUID->"c2ef6ce0-85e1-4e60-a32a-1bb1af029bea"]
+}, Open  ]],
+
+Cell[BoxData[
+ RowBox[{"\[IndentingNewLine]", "\[IndentingNewLine]", 
+  "\[IndentingNewLine]"}]], "Input",
+ CellChangeTimes->{{3.7754900281856422`*^9, 
+  3.775490028478941*^9}},ExpressionUUID->"fdb1e515-144b-467e-85db-\
+8127246e82de"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["tfinalkt20"], "Input",
+ CellChangeTimes->{{3.77548997415387*^9, 3.775490023304942*^9}},
+ CellLabel->"In[58]:=",ExpressionUUID->"4bc31ae3-5bab-415c-b562-5422473e4a79"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{
+   RowBox[{"(", 
+    RowBox[{
+     RowBox[{"-", "0.13075798053837576`"}], "-", 
+     RowBox[{"0.03281500225499752`", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+   "c1"}], "-", 
+  RowBox[{
+   RowBox[{"(", 
+    RowBox[{"0.1702977566394835`", "\[VeryThinSpace]", "-", 
+     RowBox[{"0.03197062023844408`", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+   "c2"}], "+", 
+  RowBox[{
+   RowBox[{"(", 
+    RowBox[{"0.3010557371778594`", "\[VeryThinSpace]", "+", 
+     RowBox[{"0.0008443820165534565`", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+   "c3"}]}]], "Output",
+ CellChangeTimes->{3.7754900296992064`*^9},
+ CellLabel->"Out[58]=",ExpressionUUID->"20d0a29e-c20e-455b-82f9-a6a0181524eb"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["tfinalkt40"], "Input",
+ CellChangeTimes->{{3.775490014921214*^9, 3.775490025227936*^9}},
+ CellLabel->"In[59]:=",ExpressionUUID->"0fee63fd-0f7d-4f37-be22-0ee9f0b2dd29"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{
+   RowBox[{"(", 
+    RowBox[{
+     RowBox[{"-", "0.11113591935481938`"}], "-", 
+     RowBox[{"0.07191873943346128`", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+   "c1"}], "-", 
+  RowBox[{
+   RowBox[{"(", 
+    RowBox[{"0.18025324082557106`", "\[VeryThinSpace]", "-", 
+     RowBox[{"0.06848301366250138`", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+   "c2"}], "+", 
+  RowBox[{
+   RowBox[{"(", 
+    RowBox[{"0.29138916018039046`", "\[VeryThinSpace]", "+", 
+     RowBox[{"0.0034357257709598664`", " ", "\[ImaginaryI]"}]}], ")"}], " ", 
+   "c3"}]}]], "Output",
+ CellChangeTimes->{3.775490031801964*^9},
+ CellLabel->"Out[59]=",ExpressionUUID->"4de8bf7b-7b18-4fbe-a1b4-434a2cfdc5ca"]
+}, Open  ]],
+
+Cell[BoxData[
+ RowBox[{"tfinalkt20", "[", 
+  RowBox[{"[", "1", "]"}], "]"}]], "Input",
+ CellChangeTimes->{{3.77549030676084*^9, 3.775490309504115*^9}},
+ CellLabel->"In[63]:=",ExpressionUUID->"d100b567-08ac-45a3-ab1c-7102d980edd8"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"tfinalkt40", "[", 
+   RowBox[{"[", "1", "]"}], "]"}], "/", 
+  RowBox[{"tfinalkt20", "[", 
+   RowBox[{"[", "1", "]"}], "]"}]}]], "Input",
+ CellChangeTimes->{{3.7754903218560047`*^9, 3.775490337525001*^9}},
+ CellLabel->"In[65]:=",ExpressionUUID->"2004d05a-8fd9-4279-8da7-5e8db6d0b1cb"],
+
+Cell[BoxData[
+ RowBox[{"0.9294311416420606`", "\[VeryThinSpace]", "+", 
+  RowBox[{"0.3167642560253221`", " ", "\[ImaginaryI]"}]}]], "Output",
+ CellChangeTimes->{{3.775490309840643*^9, 3.775490337840879*^9}},
+ CellLabel->"Out[65]=",ExpressionUUID->"038a004b-d5d8-41b1-aa13-9f3bccce7a2d"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"c1ration", "=", 
+  RowBox[{
+   RowBox[{"tfinalkt20", "[", 
+    RowBox[{"[", "1", "]"}], "]"}], "/", 
+   RowBox[{"tfinalkt40", "[", 
+    RowBox[{"[", "1", "]"}], "]"}]}]}]], "Input",
+ CellChangeTimes->{3.775490006767206*^9},
+ CellLabel->"In[60]:=",ExpressionUUID->"3305c7cc-fb1d-4b01-8589-30f8bfb10617"],
+
+Cell[BoxData[
+ RowBox[{"0.9639583553315383`", "\[VeryThinSpace]", "-", 
+  RowBox[{"0.32853165510090265`", " ", "\[ImaginaryI]"}]}]], "Output",
+ CellChangeTimes->{3.775490033995981*^9},
+ CellLabel->"Out[60]=",ExpressionUUID->"c7d59eaa-a5dc-4b43-8b0d-0328f5c09e45"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"c2ration", "=", 
+  RowBox[{
+   RowBox[{"tfinalkt20", "[", 
+    RowBox[{"[", "2", "]"}], "]"}], "/", 
+   RowBox[{"tfinalkt40", "[", 
+    RowBox[{"[", "2", "]"}], "]"}]}]}]], "Input",
+ CellLabel->"In[61]:=",ExpressionUUID->"61457d60-4f76-43a6-bd82-ebd9fb01124b"],
+
+Cell[BoxData[
+ RowBox[{"0.884484838002122`", "\[VeryThinSpace]", "+", 
+  RowBox[{"0.15867435656487283`", " ", "\[ImaginaryI]"}]}]], "Output",
+ CellChangeTimes->{3.775490035697501*^9},
+ CellLabel->"Out[61]=",ExpressionUUID->"685f977c-0479-4d99-befc-e84b48b144ff"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"c3ration", "=", 
+  RowBox[{
+   RowBox[{"tfinalkt20", "[", 
+    RowBox[{"[", "3", "]"}], "]"}], "/", 
+   RowBox[{"tfinalkt40", "[", 
+    RowBox[{"[", "3", "]"}], "]"}]}]}]], "Input",
+ CellChangeTimes->{3.775490000045472*^9},
+ CellLabel->"In[62]:=",ExpressionUUID->"918adda1-1e50-4075-960c-15c32f887de8"],
+
+Cell[BoxData[
+ RowBox[{"1.033064659623701`", "\[VeryThinSpace]", "-", 
+  RowBox[{"0.009282928904798739`", " ", "\[ImaginaryI]"}]}]], "Output",
+ CellChangeTimes->{3.775490037477436*^9},
+ CellLabel->"Out[62]=",ExpressionUUID->"5652226d-c974-4d4d-b620-6fcddd790365"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", 
+  
+  RowBox[{"(*", " ", 
+   RowBox[{"TEST", " ", "ggH"}], " ", "*)"}], "\[IndentingNewLine]", 
+  RowBox[{"ggHamp", "=", 
+   RowBox[{"Import", "[", "\"\<ggH_LR.m\>\"", "]"}]}]}]], "Input",
+ CellChangeTimes->{{3.775232114838345*^9, 3.775232130945882*^9}, {
+  3.775233525581341*^9, 3.775233532775445*^9}, {3.7764378474564667`*^9, 
+  3.776437847534371*^9}},ExpressionUUID->"ced44b95-e225-49ad-9c83-\
+b351a616e504"],
+
+Cell[BoxData[
+ RowBox[{
+  FractionBox["1", 
+   RowBox[{"4", " ", 
+    SuperscriptBox["MH", "4"], " ", "MW", " ", "\[Pi]", " ", "SW"}]], 
+  RowBox[{"Alfas", " ", "EL", " ", 
+   SuperscriptBox["MT", "2"], " ", 
+   RowBox[{"(", 
+    RowBox[{
+     RowBox[{
+      RowBox[{"-", "4"}], " ", 
+      SuperscriptBox["MH", "2"]}], "+", 
+     RowBox[{
+      RowBox[{"(", 
+       RowBox[{
+        SuperscriptBox["MH", "2"], "-", 
+        RowBox[{"4", " ", 
+         SuperscriptBox["MT", "2"]}]}], ")"}], " ", 
+      SuperscriptBox[
+       RowBox[{"Log", "[", 
+        FractionBox[
+         RowBox[{
+          RowBox[{"-", 
+           SuperscriptBox["MH", "2"]}], "+", 
+          RowBox[{"2", " ", 
+           SuperscriptBox["MT", "2"]}], "+", 
+          SqrtBox[
+           RowBox[{
+            SuperscriptBox["MH", "4"], "-", 
+            RowBox[{"4", " ", 
+             SuperscriptBox["MH", "2"], " ", 
+             SuperscriptBox["MT", "2"]}]}]]}], 
+         RowBox[{"2", " ", 
+          SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+   RowBox[{"Mat", "[", 
+    RowBox[{"SUNT", "[", 
+     RowBox[{"Glu1", ",", "Glu2", ",", "0", ",", "0"}], "]"}], "]"}], " ", 
+   RowBox[{"(", 
+    RowBox[{
+     RowBox[{
+      SuperscriptBox["MH", "2"], " ", 
+      RowBox[{"Pair", "[", 
+       RowBox[{
+        RowBox[{"e", "[", "1", "]"}], ",", 
+        RowBox[{"e", "[", "2", "]"}]}], "]"}]}], "-", 
+     RowBox[{"2", " ", 
+      RowBox[{"Pair", "[", 
+       RowBox[{
+        RowBox[{"e", "[", "1", "]"}], ",", 
+        RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+      RowBox[{"Pair", "[", 
+       RowBox[{
+        RowBox[{"e", "[", "2", "]"}], ",", 
+        RowBox[{"k", "[", "1", "]"}]}], "]"}]}]}], ")"}]}]}]], "Output",
+ CellChangeTimes->{3.77523213154983*^9, 3.7752323259958563`*^9, 
+  3.775233437871008*^9, 3.7752334748587103`*^9},
+ CellLabel->"Out[31]=",ExpressionUUID->"52898082-c750-4891-86b9-e3e06ee9c662"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"ggHamp", "//.", "SubFourVecs"}], "//.", 
+  RowBox[{"{", 
+   RowBox[{
+    RowBox[{"MH", "\[Rule]", "125."}], ",", 
+    RowBox[{"MT", "\[Rule]", "173."}]}], "}"}]}]], "Input",
+ CellChangeTimes->{{3.7752323062483807`*^9, 3.7752324031759167`*^9}, {
+  3.775233409773683*^9, 3.7752334292652493`*^9}},
+ CellLabel->"In[32]:=",ExpressionUUID->"71e5daec-bf03-47b2-b536-dbd0414e542c"],
+
+Cell[BoxData[
+ RowBox[{"-", 
+  FractionBox[
+   RowBox[{
+    RowBox[{"(", 
+     RowBox[{"855.6201758289534`", "\[VeryThinSpace]", "+", 
+      RowBox[{"0.`", " ", "\[ImaginaryI]"}]}], ")"}], " ", "Alfas", " ", "EL",
+     " ", 
+    RowBox[{"Mat", "[", 
+     RowBox[{"SUNT", "[", 
+      RowBox[{"Glu1", ",", "Glu2", ",", "0", ",", "0"}], "]"}], "]"}]}], 
+   RowBox[{"MW", " ", "SW"}]]}]], "Output",
+ CellChangeTimes->{{3.775232317831189*^9, 3.7752324038467503`*^9}, 
+   3.7752326486237288`*^9, 3.775233432350246*^9, 3.7752334775044003`*^9},
+ CellLabel->"Out[32]=",ExpressionUUID->"5b505cff-d5bb-42a3-853e-4163fc1a29d9"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["ek1vec"], "Input",
+ CellChangeTimes->{{3.775232610001954*^9, 3.775232656220274*^9}},
+ CellLabel->"In[65]:=",ExpressionUUID->"c25bd516-0c47-432b-90fe-27e455bbc0dd"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{
+   RowBox[{"0.`", "\[VeryThinSpace]", "+", 
+    RowBox[{"0.`", " ", "\[ImaginaryI]"}]}], ",", 
+   RowBox[{
+    RowBox[{"-", "0.7071067811865475`"}], "+", 
+    RowBox[{"0.`", " ", "\[ImaginaryI]"}]}], ",", 
+   RowBox[{"0.`", "\[VeryThinSpace]", "-", 
+    RowBox[{"0.7071067811865475`", " ", "\[ImaginaryI]"}]}], ",", 
+   RowBox[{"0.`", "\[VeryThinSpace]", "+", 
+    RowBox[{"0.`", " ", "\[ImaginaryI]"}]}]}], "}"}]], "Output",
+ CellChangeTimes->{{3.7752326138836*^9, 3.775232656625577*^9}},
+ CellLabel->"Out[65]=",ExpressionUUID->"1942b838-851d-4a1f-8d51-8982c4e0bb98"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["ek2vec"], "Input",
+ CellChangeTimes->{{3.775232658263091*^9, 3.775232660772018*^9}},
+ CellLabel->"In[66]:=",ExpressionUUID->"700f0e27-c33f-4e8e-ba2e-3543e6248bf5"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{
+   RowBox[{"0.`", "\[VeryThinSpace]", "+", 
+    RowBox[{"0.`", " ", "\[ImaginaryI]"}]}], ",", 
+   RowBox[{"0.7071067811865475`", "\[VeryThinSpace]", "+", 
+    RowBox[{"0.`", " ", "\[ImaginaryI]"}]}], ",", 
+   RowBox[{"0.`", "\[VeryThinSpace]", "-", 
+    RowBox[{"0.7071067811865475`", " ", "\[ImaginaryI]"}]}], ",", 
+   RowBox[{"0.`", "\[VeryThinSpace]", "+", 
+    RowBox[{"0.`", " ", "\[ImaginaryI]"}]}]}], "}"}]], "Output",
+ CellChangeTimes->{3.7752326612216167`*^9},
+ CellLabel->"Out[66]=",ExpressionUUID->"dbebf7d3-afff-4491-89d6-99e2e2c958cf"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"MyPair", "[", 
+  RowBox[{"ek1vec", ",", "ek2vec"}], "]"}]], "Input",
+ CellChangeTimes->{{3.775232680692808*^9, 3.7752326921531153`*^9}, {
+  3.775232731241949*^9, 3.77523273309902*^9}},
+ CellLabel->"In[69]:=",ExpressionUUID->"63ad1626-8781-4e3f-9591-d8528ececcd8"],
+
+Cell[BoxData[
+ RowBox[{"0.9999999999999998`", "\[VeryThinSpace]", "+", 
+  RowBox[{"0.`", " ", "\[ImaginaryI]"}]}]], "Output",
+ CellChangeTimes->{3.775232692860549*^9, 3.7752327334569902`*^9},
+ CellLabel->"Out[69]=",ExpressionUUID->"022e836e-e6b2-4d1c-bfdd-4b758f49462e"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"MyPair", "[", 
+  RowBox[{"ek2vec", ",", "kvec1"}], "]"}]], "Input",
+ CellChangeTimes->{{3.775232802487273*^9, 3.775232811142901*^9}},
+ CellLabel->"In[70]:=",ExpressionUUID->"a371a893-d044-4e82-bd67-be5b40741382"],
+
+Cell[BoxData[
+ RowBox[{"0.`", "\[VeryThinSpace]", "+", 
+  RowBox[{"0.`", " ", "\[ImaginaryI]"}]}]], "Output",
+ CellChangeTimes->{3.775232811655692*^9},
+ CellLabel->"Out[70]=",ExpressionUUID->"6c231317-1e6f-4e59-b41f-bb17b4d83b99"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"MyPair", "[", 
+  RowBox[{"ek1vec", ",", "kvec2"}], "]"}]], "Input",
+ CellChangeTimes->{{3.775232814903119*^9, 3.7752328256517067`*^9}},
+ CellLabel->"In[71]:=",ExpressionUUID->"ef7d683b-4e10-4d26-9dd6-72279ff9244a"],
+
+Cell[BoxData[
+ RowBox[{"0.`", "\[VeryThinSpace]", "+", 
+  RowBox[{"0.`", " ", "\[ImaginaryI]"}]}]], "Output",
+ CellChangeTimes->{3.775232826151574*^9},
+ CellLabel->"Out[71]=",ExpressionUUID->"3b3eb906-3b2f-4ff9-819a-39a88193f844"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["kvec1"], "Input",
+ CellChangeTimes->{{3.7752328282964773`*^9, 3.775232831655014*^9}},
+ CellLabel->"In[72]:=",ExpressionUUID->"de45a5ed-a569-453b-824b-26f93985d288"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{
+   FractionBox[
+    SqrtBox["S"], "2"], ",", "0", ",", "0", ",", 
+   FractionBox[
+    SqrtBox["S"], "2"]}], "}"}]], "Output",
+ CellChangeTimes->{3.7752328321260977`*^9},
+ CellLabel->"Out[72]=",ExpressionUUID->"9c205819-8029-4260-ae8b-88d0e2b6ba6b"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["kvec2"], "Input",
+ CellChangeTimes->{{3.775232838801908*^9, 3.7752328401065617`*^9}},
+ CellLabel->"In[73]:=",ExpressionUUID->"3cac72c0-8845-4679-9a9d-8d4f40d62660"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{
+   FractionBox[
+    SqrtBox["S"], "2"], ",", "0", ",", "0", ",", 
+   RowBox[{"-", 
+    FractionBox[
+     SqrtBox["S"], "2"]}]}], "}"}]], "Output",
+ CellChangeTimes->{3.7752328406512136`*^9},
+ CellLabel->"Out[73]=",ExpressionUUID->"1df39c7d-0608-43f2-926b-eae7e2d5bb10"]
+}, Open  ]],
+
+Cell[BoxData[
+ RowBox[{"\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", 
+  "\[IndentingNewLine]", "\[IndentingNewLine]"}]], "Input",
+ CellChangeTimes->{{3.775233870178287*^9, 
+  3.7752338707140627`*^9}},ExpressionUUID->"51cb99be-3353-4392-9fd3-\
+c37ee91d1816"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{
+   RowBox[{"KinRules", "[", 
+    RowBox[{"m1_", ",", "m2_", ",", "m3_", ",", "m4_"}], "]"}], ":=", " ", 
+   RowBox[{"{", 
+    RowBox[{
+     RowBox[{"k1", "\[Rule]", 
+      RowBox[{
+       RowBox[{"(", 
+        RowBox[{"1", "/", 
+         RowBox[{"(", 
+          RowBox[{"2", 
+           RowBox[{"Sqrt", "[", "S", "]"}]}], ")"}]}], ")"}], "*", 
+       RowBox[{"Sqrt", "[", 
+        RowBox[{"Kallen\[Lambda]", "[", 
+         RowBox[{"S", ",", 
+          RowBox[{"m1", "^", "2"}], ",", 
+          RowBox[{"m2", "^", "2"}]}], "]"}], "]"}]}]}], ",", 
+     RowBox[{"k2", "->", 
+      RowBox[{
+       RowBox[{"(", 
+        RowBox[{"1", "/", 
+         RowBox[{"(", 
+          RowBox[{"2", 
+           RowBox[{"Sqrt", "[", "S", "]"}]}], ")"}]}], ")"}], "*", 
+       RowBox[{"Sqrt", "[", 
+        RowBox[{"Kallen\[Lambda]", "[", 
+         RowBox[{"S", ",", 
+          RowBox[{"m1", "^", "2"}], ",", 
+          RowBox[{"m2", "^", "2"}]}], "]"}], "]"}]}]}], ",", " ", 
+     RowBox[{"k3", "->", 
+      RowBox[{
+       RowBox[{"(", 
+        RowBox[{"1", "/", 
+         RowBox[{"(", 
+          RowBox[{"2", 
+           RowBox[{"Sqrt", "[", "S", "]"}]}], ")"}]}], ")"}], "*", 
+       RowBox[{"Sqrt", "[", 
+        RowBox[{"Kallen\[Lambda]", "[", 
+         RowBox[{"S", ",", 
+          RowBox[{"m3", "^", "2"}], ",", 
+          RowBox[{"m4", "^", "2"}]}], "]"}], "]"}]}]}], ",", 
+     "\[IndentingNewLine]", 
+     RowBox[{"k4", "->", 
+      RowBox[{
+       RowBox[{"(", 
+        RowBox[{"1", "/", 
+         RowBox[{"(", 
+          RowBox[{"2", 
+           RowBox[{"Sqrt", "[", "S", "]"}]}], ")"}]}], ")"}], "*", 
+       RowBox[{"Sqrt", "[", 
+        RowBox[{"Kallen\[Lambda]", "[", 
+         RowBox[{"S", ",", 
+          RowBox[{"m3", "^", "2"}], ",", 
+          RowBox[{"m4", "^", "2"}]}], "]"}], "]"}]}]}]}], "}"}]}], 
+  "\[IndentingNewLine]"}]], "Input",
+ CellLabel->"In[96]:=",ExpressionUUID->"3a2dff3b-cd15-4082-a16f-231d41830801"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"kinrules", " ", "=", 
+  RowBox[{
+   RowBox[{"KinRules", "[", 
+    RowBox[{"0", ",", "0", ",", "MH", ",", "0"}], "]"}], "//", 
+   "Simplify"}]}]], "Input",
+ CellChangeTimes->{{3.7752348658426027`*^9, 3.7752348715523443`*^9}, {
+   3.775234908441683*^9, 3.7752349098835077`*^9}, 3.775235029240054*^9, {
+   3.775235470670197*^9, 3.775235495869698*^9}},
+ CellLabel->
+  "In[132]:=",ExpressionUUID->"4717edd2-5164-4d8f-a082-259fc17a14ef"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{
+   RowBox[{"k1", "\[Rule]", 
+    FractionBox[
+     RowBox[{"Abs", "[", "S", "]"}], 
+     RowBox[{"2", " ", 
+      SqrtBox["S"]}]]}], ",", 
+   RowBox[{"k2", "\[Rule]", 
+    FractionBox[
+     RowBox[{"Abs", "[", "S", "]"}], 
+     RowBox[{"2", " ", 
+      SqrtBox["S"]}]]}], ",", 
+   RowBox[{"k3", "\[Rule]", 
+    FractionBox[
+     RowBox[{"Abs", "[", 
+      RowBox[{
+       SuperscriptBox["MH", "2"], "-", "S"}], "]"}], 
+     RowBox[{"2", " ", 
+      SqrtBox["S"]}]]}], ",", 
+   RowBox[{"k4", "\[Rule]", 
+    FractionBox[
+     RowBox[{"Abs", "[", 
+      RowBox[{
+       SuperscriptBox["MH", "2"], "-", "S"}], "]"}], 
+     RowBox[{"2", " ", 
+      SqrtBox["S"]}]]}]}], "}"}]], "Output",
+ CellChangeTimes->{
+  3.775234871971971*^9, 3.7752349102591248`*^9, {3.7752350263788548`*^9, 
+   3.77523502988068*^9}, 3.775235261911248*^9, {3.775235474715847*^9, 
+   3.7752354961811533`*^9}},
+ CellLabel->
+  "Out[132]=",ExpressionUUID->"c471d1a0-08f6-4e63-8c58-4c380016123b"]
+}, Open  ]],
+
+Cell[BoxData[
+ RowBox[{"(*", " ", 
+  RowBox[{"TEST", " ", "ggHg", " ", "only", " ", "triangles"}], " ", 
+  "*)"}]], "Input",
+ CellChangeTimes->{{3.7752336704725237`*^9, 
+  3.7752336844214363`*^9}},ExpressionUUID->"c016de82-2b4d-46da-8883-\
+dca8d81b33b0"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"ggHgamp", "=", 
+   RowBox[{"Import", "[", "\"\<ggHg_LR.m\>\"", "]"}]}], ";"}]], "Input",
+ CellChangeTimes->{{3.7752338840421143`*^9, 3.775233891491877*^9}, {
+   3.775233937160605*^9, 3.77523394325849*^9}, 3.7752340168034763`*^9, {
+   3.7752340953440027`*^9, 3.775234098436646*^9}},
+ CellLabel->"In[67]:=",ExpressionUUID->"2fb8be8e-1cd2-4ebe-ace8-84dfab624c1d"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["kvec1"], "Input",
+ CellChangeTimes->{{3.7752341675950108`*^9, 3.775234168743631*^9}},
+ CellLabel->"In[69]:=",ExpressionUUID->"ea64cda5-c0db-4d48-bd78-995d33d2e89b"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{
+   FractionBox[
+    SqrtBox["S"], "2"], ",", "0", ",", "0", ",", 
+   FractionBox[
+    SqrtBox["S"], "2"]}], "}"}]], "Output",
+ CellChangeTimes->{3.77523416905258*^9},
+ CellLabel->"Out[69]=",ExpressionUUID->"a788202c-d2a1-489b-9a50-5e867195c907"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["kvec2"], "Input",
+ CellChangeTimes->{{3.7752341705498743`*^9, 3.775234171963842*^9}},
+ CellLabel->"In[70]:=",ExpressionUUID->"63d668d8-464b-44a0-acf7-ed8fa5574d82"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{
+   FractionBox[
+    SqrtBox["S"], "2"], ",", "0", ",", "0", ",", 
+   RowBox[{"-", 
+    FractionBox[
+     SqrtBox["S"], "2"]}]}], "}"}]], "Output",
+ CellChangeTimes->{3.775234172334874*^9},
+ CellLabel->"Out[70]=",ExpressionUUID->"0a77be4d-16d7-4417-9174-3eaeec3d0943"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"kvec3", "=", 
+  RowBox[{
+   RowBox[{
+    RowBox[{"vec4M", "[", 
+     RowBox[{"MH", ",", "k3", ",", "\[Theta]3", ",", "\[Phi]3"}], "]"}], "//.",
+     "kinrules"}], "//", "Simplify"}]}]], "Input",
+ CellChangeTimes->{{3.77523517587326*^9, 3.775235245278871*^9}, {
+  3.775235481684458*^9, 3.775235490207073*^9}},
+ CellLabel->
+  "In[140]:=",ExpressionUUID->"7f476354-b099-4fce-95e1-c8e3da1d445d"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{
+   FractionBox[
+    RowBox[{
+     SuperscriptBox["MH", "2"], "+", "S"}], 
+    RowBox[{"2", " ", 
+     SqrtBox["S"]}]], ",", 
+   FractionBox[
+    RowBox[{
+     RowBox[{"(", 
+      RowBox[{
+       RowBox[{"-", 
+        SuperscriptBox["MH", "2"]}], "+", "S"}], ")"}], " ", 
+     RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+     RowBox[{"Sin", "[", "\[Theta]3", "]"}]}], 
+    RowBox[{"2", " ", 
+     SqrtBox["S"]}]], ",", 
+   FractionBox[
+    RowBox[{
+     RowBox[{"(", 
+      RowBox[{
+       RowBox[{"-", 
+        SuperscriptBox["MH", "2"]}], "+", "S"}], ")"}], " ", 
+     RowBox[{"Sin", "[", "\[Theta]3", "]"}], " ", 
+     RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], 
+    RowBox[{"2", " ", 
+     SqrtBox["S"]}]], ",", 
+   FractionBox[
+    RowBox[{
+     RowBox[{"(", 
+      RowBox[{
+       RowBox[{"-", 
+        SuperscriptBox["MH", "2"]}], "+", "S"}], ")"}], " ", 
+     RowBox[{"Cos", "[", "\[Theta]3", "]"}]}], 
+    RowBox[{"2", " ", 
+     SqrtBox["S"]}]]}], "}"}]], "Output",
+ CellChangeTimes->{{3.775235201478866*^9, 3.775235245578174*^9}, {
+   3.775235485707567*^9, 3.775235490580348*^9}, 3.775235576008646*^9},
+ CellLabel->
+  "Out[140]=",ExpressionUUID->"232606ee-180f-4a6b-aae6-1505ac26d9aa"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"kvec4", "=", 
+  RowBox[{
+   RowBox[{
+    RowBox[{"vec4M", "[", 
+     RowBox[{"0", ",", "k4", ",", "\[Theta]4", ",", "\[Phi]4"}], "]"}], "//.",
+     "kinrules"}], "//", "Simplify"}]}]], "Input",
+ CellChangeTimes->{{3.775234176979865*^9, 3.775234179201274*^9}, {
+  3.775235223822955*^9, 3.775235242958313*^9}, {3.775235530351878*^9, 
+  3.775235531848612*^9}},
+ CellLabel->
+  "In[141]:=",ExpressionUUID->"3bf9eee7-e9ce-4b9d-b371-a004db7dba36"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{
+   FractionBox[
+    RowBox[{
+     RowBox[{"-", 
+      SuperscriptBox["MH", "2"]}], "+", "S"}], 
+    RowBox[{"2", " ", 
+     SqrtBox["S"]}]], ",", 
+   FractionBox[
+    RowBox[{
+     RowBox[{"(", 
+      RowBox[{
+       RowBox[{"-", 
+        SuperscriptBox["MH", "2"]}], "+", "S"}], ")"}], " ", 
+     RowBox[{"Cos", "[", "\[Phi]4", "]"}], " ", 
+     RowBox[{"Sin", "[", "\[Theta]4", "]"}]}], 
+    RowBox[{"2", " ", 
+     SqrtBox["S"]}]], ",", 
+   FractionBox[
+    RowBox[{
+     RowBox[{"(", 
+      RowBox[{
+       RowBox[{"-", 
+        SuperscriptBox["MH", "2"]}], "+", "S"}], ")"}], " ", 
+     RowBox[{"Sin", "[", "\[Theta]4", "]"}], " ", 
+     RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], 
+    RowBox[{"2", " ", 
+     SqrtBox["S"]}]], ",", 
+   FractionBox[
+    RowBox[{
+     RowBox[{"(", 
+      RowBox[{
+       RowBox[{"-", 
+        SuperscriptBox["MH", "2"]}], "+", "S"}], ")"}], " ", 
+     RowBox[{"Cos", "[", "\[Theta]4", "]"}]}], 
+    RowBox[{"2", " ", 
+     SqrtBox["S"]}]]}], "}"}]], "Output",
+ CellChangeTimes->{
+  3.775234179651164*^9, 3.7752342413011293`*^9, {3.775235239407649*^9, 
+   3.775235243200902*^9}, 3.775235532236511*^9, 3.775235577664158*^9},
+ CellLabel->
+  "Out[141]=",ExpressionUUID->"9f6de44a-3816-436f-9eed-c65579e853f2"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"SS", "=", 
+  RowBox[{"MyPair", "[", 
+   RowBox[{
+    RowBox[{"kvec1", "+", "kvec2"}], ",", 
+    RowBox[{"kvec1", "+", "kvec2"}]}], "]"}]}]], "Input",
+ CellChangeTimes->{{3.775234244274425*^9, 3.775234254281748*^9}, {
+  3.775234348280637*^9, 3.775234352779166*^9}},
+ CellLabel->
+  "In[134]:=",ExpressionUUID->"018d3a63-8c00-4393-8f48-5ea31ee4fb47"],
+
+Cell[BoxData["S"], "Output",
+ CellChangeTimes->{3.775234254770834*^9, 3.7752343544261303`*^9, 
+  3.7752352517199287`*^9, 3.77523553490416*^9},
+ CellLabel->
+  "Out[134]=",ExpressionUUID->"8ec26b8c-6895-465b-9a6d-f28a9c1bb157"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"TT", "=", 
+  RowBox[{"MyPair", "[", 
+   RowBox[{
+    RowBox[{"kvec4", "-", "kvec2"}], ",", 
+    RowBox[{"kvec4", "-", "kvec2"}]}], "]"}]}]], "Input",
+ CellChangeTimes->{{3.775234277699788*^9, 3.77523427881457*^9}, {
+  3.775234313126729*^9, 3.775234346018008*^9}, {3.775235458048749*^9, 
+  3.775235466914755*^9}},
+ CellLabel->
+  "In[143]:=",ExpressionUUID->"4a04a25c-7a5b-4d1e-9e39-cea69507a2ea"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(", 
+   RowBox[{
+    SuperscriptBox["MH", "2"], "-", "S"}], ")"}], " ", 
+  SuperscriptBox[
+   RowBox[{"Cos", "[", 
+    FractionBox["\[Theta]4", "2"], "]"}], "2"]}]], "Output",
+ CellChangeTimes->{3.775235581434252*^9},
+ CellLabel->
+  "Out[143]=",ExpressionUUID->"a324f332-3291-4f3e-984c-5d19e66452d6"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"UU", "=", 
+  RowBox[{"MyPair", "[", 
+   RowBox[{
+    RowBox[{"kvec1", "-", "kvec4"}], ",", 
+    RowBox[{"kvec1", "-", "kvec4"}]}], "]"}]}]], "Input",
+ CellChangeTimes->{{3.775234358563444*^9, 3.775234377882045*^9}},
+ CellLabel->
+  "In[144]:=",ExpressionUUID->"bb85de51-cb56-4b22-9b3f-72f33e2fe91d"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(", 
+   RowBox[{
+    SuperscriptBox["MH", "2"], "-", "S"}], ")"}], " ", 
+  SuperscriptBox[
+   RowBox[{"Sin", "[", 
+    FractionBox["\[Theta]4", "2"], "]"}], "2"]}]], "Output",
+ CellChangeTimes->{3.775234380057612*^9, 3.775235255405649*^9, 
+  3.775235538141506*^9, 3.7752355860019827`*^9},
+ CellLabel->
+  "Out[144]=",ExpressionUUID->"e34418a3-f287-4a25-be8b-b35bb3ba3b75"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{
+   RowBox[{"SS", "+", "TT", "+", "UU"}], "/.", 
+   RowBox[{"KinRules", "[", 
+    RowBox[{"0", ",", "0", ",", "MH", ",", "0"}], "]"}]}], "//", 
+  "Simplify"}]], "Input",
+ CellChangeTimes->{{3.7752353045094757`*^9, 3.7752353638645287`*^9}},
+ CellLabel->
+  "In[145]:=",ExpressionUUID->"a15db554-c750-416a-bf8e-43f7fa7fe829"],
+
+Cell[BoxData[
+ SuperscriptBox["MH", "2"]], "Output",
+ CellChangeTimes->{{3.7752353078850718`*^9, 3.77523536415522*^9}, 
+   3.7752355404450827`*^9, {3.775235572708755*^9, 3.7752355883878727`*^9}},
+ CellLabel->
+  "Out[145]=",ExpressionUUID->"82c233c3-0b0a-4a45-b5b8-037c03555249"]
+}, Open  ]],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"$Assumptions", "=", 
+   RowBox[{"{", 
+    RowBox[{
+     RowBox[{"Element", "[", 
+      RowBox[{
+       RowBox[{"{", 
+        RowBox[{
+        "ki", ",", "k1", ",", "k2", ",", "k3", ",", "k4", ",", " ", 
+         "\[Theta]1", ",", "\[Theta]2", ",", "\[Theta]3", ",", "\[Theta]4", 
+         ",", " ", "\[Phi]1", ",", "\[Phi]2", ",", "\[Phi]3", ",", "\[Phi]4", 
+         ",", "p", ",", "MT2", ",", "GS", ",", "EL", ",", "Alfas", ",", "a1", 
+         ",", "S", ",", "T", ",", "U", ",", "MT", ",", "MH", ",", "MH2", ",", 
+         "\[Eta]4", ",", "\[Eta]3"}], "}"}], ",", "Reals"}], "]"}], ",", 
+     RowBox[{"ki", ">", "0"}], " ", ",", 
+     RowBox[{"MT2", ">", "0"}], ",", 
+     RowBox[{"MT", ">", "0"}], ",", 
+     RowBox[{"MH2", ">", "0"}], ",", " ", 
+     RowBox[{"MH", ">", "0"}], ",", 
+     RowBox[{"k4", ">", "0"}], ",", 
+     RowBox[{"p", ">", "0"}], ",", 
+     RowBox[{"k3", ">", "0"}], ",", 
+     RowBox[{"k1", ">", "0"}], ",", 
+     RowBox[{"k2", ">", "0"}], ",", 
+     RowBox[{"rS", ">", "0"}], ",", 
+     RowBox[{"kT4", ">", "0"}], ",", 
+     RowBox[{"kT3", ">", "0"}], ",", 
+     RowBox[{"S", ">", 
+      RowBox[{"MH", "^", "2"}]}]}], "}"}]}], ";"}]], "Input",
+ CellChangeTimes->{{3.775235566234293*^9, 3.7752355691149817`*^9}},
+ CellLabel->
+  "In[138]:=",ExpressionUUID->"13982953-6398-495a-82b4-9ddfe24a4bd0"],
+
+Cell[BoxData[""], "Input",
+ CellChangeTimes->{{3.775234139392658*^9, 
+  3.775234148228291*^9}},ExpressionUUID->"3b604925-2d87-477a-bbab-\
+bc72b933b86f"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"amp1", "=", 
+  RowBox[{
+   RowBox[{"ggHgamp", "//.", " ", "SubFourVecs"}], "//.", 
+   RowBox[{"{", 
+    RowBox[{
+     RowBox[{"S", "\[Rule]", 
+      RowBox[{"300", "^", "2"}]}], ",", 
+     RowBox[{"T", "\[Rule]", "TT"}], ",", 
+     RowBox[{"U", "\[Rule]", "UU"}], ",", 
+     RowBox[{"MT", "\[Rule]", "173."}], ",", 
+     RowBox[{"MH", "\[Rule]", "125."}], ",", 
+     RowBox[{"\[Theta]3", "\[Rule]", 
+      RowBox[{"Pi", "/", "2"}]}], ",", 
+     RowBox[{"\[Theta]4", "\[Rule]", 
+      RowBox[{"Pi", "/", "2"}]}], ",", 
+     RowBox[{"\[Phi]4", "\[Rule]", "Pi"}], ",", 
+     RowBox[{"\[Phi]3", "\[Rule]", "0"}]}], "}"}]}]}]], "Input",
+ CellChangeTimes->{{3.7752341002835217`*^9, 3.775234117913557*^9}, {
+  3.775234391925642*^9, 3.775234475599949*^9}, {3.775234531877942*^9, 
+  3.775234563575654*^9}, {3.7752345970058527`*^9, 3.775234671773217*^9}, {
+  3.775234733353578*^9, 3.775234737504047*^9}, {3.775235269644129*^9, 
+  3.77523530294098*^9}, {3.77523559515126*^9, 3.7752356852162857`*^9}, {
+  3.775235751690361*^9, 3.7752357857311287`*^9}, {3.775235839868848*^9, 
+  3.7752359294193163`*^9}, {3.7752361019039307`*^9, 3.7752361257766857`*^9}, {
+  3.775236336202168*^9, 3.775236339085723*^9}},
+ CellLabel->
+  "In[280]:=",ExpressionUUID->"be40774a-645c-401d-8678-e778f53524dc"],
+
+Cell[BoxData[
+ FractionBox[
+  RowBox[{
+   RowBox[{"(", 
+    RowBox[{"86.53579217291438`", "\[VeryThinSpace]", "+", 
+     RowBox[{"1.7334278172536492`*^-15", " ", "\[ImaginaryI]"}]}], ")"}], " ",
+    "Alfas", " ", "EL", " ", "GS", " ", 
+   RowBox[{"(", 
+    RowBox[{
+     RowBox[{"Mat", "[", 
+      RowBox[{"SUNT", "[", 
+       RowBox[{"Glu1", ",", "Glu2", ",", "Glu4", ",", "0", ",", "0"}], "]"}], 
+      "]"}], "-", 
+     RowBox[{"Mat", "[", 
+      RowBox[{"SUNT", "[", 
+       RowBox[{"Glu1", ",", "Glu4", ",", "Glu2", ",", "0", ",", "0"}], "]"}], 
+      "]"}]}], ")"}]}], 
+  RowBox[{"MW", " ", "SW"}]]], "Output",
+ CellChangeTimes->{{3.775235595574247*^9, 3.775235623074259*^9}, 
+   3.7752356626146173`*^9, 3.775235809633503*^9, 3.77523584309721*^9, 
+   3.775235912539084*^9, 3.775235956017193*^9, {3.775236103168292*^9, 
+   3.775236128221525*^9}, {3.775236337021147*^9, 3.775236339442601*^9}, 
+   3.775236552575139*^9, 3.775237099207222*^9},
+ CellLabel->
+  "Out[280]=",ExpressionUUID->"d057959b-fd6e-407e-a0d3-91ee53705fdb"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["kvec1"], "Input",
+ CellChangeTimes->{{3.775234666900373*^9, 3.775234667629822*^9}, {
+  3.775236142255439*^9, 3.775236144294471*^9}},
+ CellLabel->
+  "In[158]:=",ExpressionUUID->"b635f1ba-43a8-4c64-8caf-41485e8e6349"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{
+   FractionBox[
+    SqrtBox["S"], "2"], ",", "0", ",", "0", ",", 
+   FractionBox[
+    SqrtBox["S"], "2"]}], "}"}]], "Output",
+ CellChangeTimes->{3.7752361447702923`*^9},
+ CellLabel->
+  "Out[158]=",ExpressionUUID->"ab0d6b89-a1b1-46d4-a6ce-1e0b2b245a9b"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["kvec2"], "Input",
+ CellChangeTimes->{{3.77523614595605*^9, 3.775236147204626*^9}},
+ CellLabel->
+  "In[159]:=",ExpressionUUID->"5b4e5bfd-5043-4c2d-9f8e-3843d808a535"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{
+   FractionBox[
+    SqrtBox["S"], "2"], ",", "0", ",", "0", ",", 
+   RowBox[{"-", 
+    FractionBox[
+     SqrtBox["S"], "2"]}]}], "}"}]], "Output",
+ CellChangeTimes->{3.7752361475624323`*^9},
+ CellLabel->
+  "Out[159]=",ExpressionUUID->"7c43f9c1-01c0-4b8a-9438-16c48fc51e47"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["kvec3"], "Input",
+ CellChangeTimes->{{3.775236148396234*^9, 3.775236149625515*^9}},
+ CellLabel->
+  "In[160]:=",ExpressionUUID->"309b1dba-9aff-4ed0-af22-d4ab58554b8a"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{
+   FractionBox[
+    RowBox[{
+     SuperscriptBox["MH", "2"], "+", "S"}], 
+    RowBox[{"2", " ", 
+     SqrtBox["S"]}]], ",", 
+   FractionBox[
+    RowBox[{
+     RowBox[{"(", 
+      RowBox[{
+       RowBox[{"-", 
+        SuperscriptBox["MH", "2"]}], "+", "S"}], ")"}], " ", 
+     RowBox[{"Cos", "[", "\[Phi]3", "]"}], " ", 
+     RowBox[{"Sin", "[", "\[Theta]3", "]"}]}], 
+    RowBox[{"2", " ", 
+     SqrtBox["S"]}]], ",", 
+   FractionBox[
+    RowBox[{
+     RowBox[{"(", 
+      RowBox[{
+       RowBox[{"-", 
+        SuperscriptBox["MH", "2"]}], "+", "S"}], ")"}], " ", 
+     RowBox[{"Sin", "[", "\[Theta]3", "]"}], " ", 
+     RowBox[{"Sin", "[", "\[Phi]3", "]"}]}], 
+    RowBox[{"2", " ", 
+     SqrtBox["S"]}]], ",", 
+   FractionBox[
+    RowBox[{
+     RowBox[{"(", 
+      RowBox[{
+       RowBox[{"-", 
+        SuperscriptBox["MH", "2"]}], "+", "S"}], ")"}], " ", 
+     RowBox[{"Cos", "[", "\[Theta]3", "]"}]}], 
+    RowBox[{"2", " ", 
+     SqrtBox["S"]}]]}], "}"}]], "Output",
+ CellChangeTimes->{3.7752361500531473`*^9},
+ CellLabel->
+  "Out[160]=",ExpressionUUID->"f750153f-f59e-4943-8b0c-9ba1d1f0930f"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["kvec4"], "Input",
+ CellChangeTimes->{{3.775236151421253*^9, 3.775236152088798*^9}},
+ CellLabel->
+  "In[161]:=",ExpressionUUID->"a01ded67-4f83-4bf3-a6a9-6a26bb859e2b"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{
+   FractionBox[
+    RowBox[{
+     RowBox[{"-", 
+      SuperscriptBox["MH", "2"]}], "+", "S"}], 
+    RowBox[{"2", " ", 
+     SqrtBox["S"]}]], ",", 
+   FractionBox[
+    RowBox[{
+     RowBox[{"(", 
+      RowBox[{
+       RowBox[{"-", 
+        SuperscriptBox["MH", "2"]}], "+", "S"}], ")"}], " ", 
+     RowBox[{"Cos", "[", "\[Phi]4", "]"}], " ", 
+     RowBox[{"Sin", "[", "\[Theta]4", "]"}]}], 
+    RowBox[{"2", " ", 
+     SqrtBox["S"]}]], ",", 
+   FractionBox[
+    RowBox[{
+     RowBox[{"(", 
+      RowBox[{
+       RowBox[{"-", 
+        SuperscriptBox["MH", "2"]}], "+", "S"}], ")"}], " ", 
+     RowBox[{"Sin", "[", "\[Theta]4", "]"}], " ", 
+     RowBox[{"Sin", "[", "\[Phi]4", "]"}]}], 
+    RowBox[{"2", " ", 
+     SqrtBox["S"]}]], ",", 
+   FractionBox[
+    RowBox[{
+     RowBox[{"(", 
+      RowBox[{
+       RowBox[{"-", 
+        SuperscriptBox["MH", "2"]}], "+", "S"}], ")"}], " ", 
+     RowBox[{"Cos", "[", "\[Theta]4", "]"}]}], 
+    RowBox[{"2", " ", 
+     SqrtBox["S"]}]]}], "}"}]], "Output",
+ CellChangeTimes->{3.775236153013968*^9},
+ CellLabel->
+  "Out[161]=",ExpressionUUID->"92916bb6-be68-46d5-9db8-ffc0d29947f0"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"SS", "+", "TT", "+", "UU"}], "//", "Simplify"}]], "Input",
+ CellChangeTimes->{{3.7752361957662287`*^9, 3.775236207102852*^9}},
+ CellLabel->
+  "In[164]:=",ExpressionUUID->"e28d7b30-a554-477f-831b-c87e01beca4d"],
+
+Cell[BoxData[
+ SuperscriptBox["MH", "2"]], "Output",
+ CellChangeTimes->{{3.775236200173397*^9, 3.7752362073885593`*^9}},
+ CellLabel->
+  "Out[164]=",ExpressionUUID->"0ca7de0d-d882-4ed8-8d04-fc4574b40098"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"kvec3", "//.", 
+  RowBox[{"{", 
+   RowBox[{
+    RowBox[{"S", "\[Rule]", 
+     RowBox[{"300", "^", "2"}]}], ",", 
+    RowBox[{"T", "\[Rule]", "TT"}], ",", 
+    RowBox[{"U", "\[Rule]", "UU"}], ",", 
+    RowBox[{"MT", "\[Rule]", "173."}], ",", 
+    RowBox[{"MH", "\[Rule]", "125."}], ",", 
+    RowBox[{"\[Theta]3", "\[Rule]", 
+     RowBox[{"Pi", "/", "2"}]}], ",", 
+    RowBox[{"\[Theta]4", "\[Rule]", 
+     RowBox[{"Pi", "/", "2"}]}], ",", 
+    RowBox[{"\[Phi]4", "\[Rule]", "Pi"}], ",", 
+    RowBox[{"\[Phi]3", "\[Rule]", "0"}]}], "}"}]}]], "Input",
+ CellChangeTimes->{{3.775236225224224*^9, 3.7752362390677547`*^9}, {
+  3.775236345250381*^9, 3.7752363472610483`*^9}, {3.7752364524773073`*^9, 
+  3.775236461304338*^9}},
+ CellLabel->
+  "In[278]:=",ExpressionUUID->"04d4dbd7-9c46-485e-9f84-becb80b9d603"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{
+  "176.04166666666669`", ",", "123.95833333333334`", ",", "0.`", ",", "0.`"}],
+   "}"}]], "Output",
+ CellChangeTimes->{
+  3.775236240781623*^9, {3.775236345584844*^9, 3.775236347597986*^9}, 
+   3.7752370933315783`*^9},
+ CellLabel->
+  "Out[278]=",ExpressionUUID->"79e04ef4-1b59-4535-992c-e4424203720a"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"kvec4", "//.", 
+  RowBox[{"{", 
+   RowBox[{
+    RowBox[{"S", "\[Rule]", 
+     RowBox[{"300", "^", "2"}]}], ",", 
+    RowBox[{"T", "\[Rule]", "TT"}], ",", 
+    RowBox[{"U", "\[Rule]", "UU"}], ",", 
+    RowBox[{"MT", "\[Rule]", "173."}], ",", 
+    RowBox[{"MH", "\[Rule]", "125."}], ",", 
+    RowBox[{"\[Theta]3", "\[Rule]", 
+     RowBox[{"Pi", "/", "2"}]}], ",", 
+    RowBox[{"\[Theta]4", "\[Rule]", 
+     RowBox[{"Pi", "/", "2"}]}], ",", 
+    RowBox[{"\[Phi]4", "\[Rule]", "Pi"}], ",", 
+    RowBox[{"\[Phi]3", "\[Rule]", "0"}]}], "}"}]}]], "Input",
+ CellChangeTimes->{{3.7752362436914473`*^9, 3.775236246328574*^9}},
+ CellLabel->
+  "In[279]:=",ExpressionUUID->"6ecab3de-355f-4fd7-a4bd-167b5ec80b28"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"123.95833333333334`", ",", 
+   RowBox[{"-", "123.95833333333334`"}], ",", "0.`", ",", "0.`"}], 
+  "}"}]], "Output",
+ CellChangeTimes->{3.77523624723542*^9, 3.775237095048168*^9},
+ CellLabel->
+  "Out[279]=",ExpressionUUID->"858cefaf-42e8-42f3-9ed9-cb66408eea6e"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{
+ RowBox[{
+  RowBox[{"ek1vecInc", "=", 
+   RowBox[{
+    RowBox[{
+     RowBox[{"EpolEuc", "[", 
+      RowBox[{"0", ",", "k1x", ",", "k1y", ",", "k1z", ",", "1"}], "]"}], "/.", 
+     RowBox[{"{", 
+      RowBox[{"k1y", "\[Rule]", "0"}], "}"}]}], "//", "Simplify"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"ek1vec", "=", 
+   RowBox[{
+    RowBox[{
+     RowBox[{
+      RowBox[{"Limit", "[", 
+       RowBox[{"ek1vecInc", ",", 
+        RowBox[{"k1x", "\[Rule]", "0"}], ",", 
+        RowBox[{"Direction", "\[Rule]", "\"\<FromAbove\>\""}]}], "]"}], "/.", 
+      
+      RowBox[{"rS", "\[Rule]", 
+       RowBox[{"Sqrt", "[", "S", "]"}]}]}], "//.", 
+     RowBox[{"{", 
+      RowBox[{"k1z", "\[Rule]", 
+       RowBox[{"kvec1", "[", 
+        RowBox[{"[", "4", "]"}], "]"}]}], "}"}]}], "//", "Simplify"}]}], " ", 
+  
+  RowBox[{"(*", " ", 
+   RowBox[{
+    RowBox[{"because", " ", "kz"}], " ", ">", " ", "0"}], " ", "*)"}], 
+  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"ek2vecInc", "=", 
+   RowBox[{
+    RowBox[{
+     RowBox[{"EpolEuc", "[", 
+      RowBox[{"0", ",", "k2x", ",", "k2y", ",", "k2z", ",", "1"}], "]"}], "/.", 
+     RowBox[{"{", 
+      RowBox[{"k2y", "\[Rule]", "0"}], "}"}]}], "//", "Simplify"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"ek2vec", "=", 
+   RowBox[{
+    RowBox[{
+     RowBox[{
+      RowBox[{"Limit", "[", 
+       RowBox[{"ek2vecInc", ",", 
+        RowBox[{"k2x", "\[Rule]", "0"}], ",", 
+        RowBox[{"Direction", "\[Rule]", "\"\<FromBelow\>\""}]}], "]"}], "/.", 
+      
+      RowBox[{"rS", "\[Rule]", 
+       RowBox[{"Sqrt", "[", "S", "]"}]}]}], "//.", 
+     RowBox[{"{", 
+      RowBox[{"k2z", "\[Rule]", 
+       RowBox[{"kvec2", "[", 
+        RowBox[{"[", "4", "]"}], "]"}]}], "}"}]}], "//", "Simplify"}]}], " ", 
+  
+  RowBox[{"(*", " ", 
+   RowBox[{
+    RowBox[{"because", " ", "kz"}], " ", "<", " ", "0"}], " ", "*)"}], 
+  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"ek4vec", "=", 
+   RowBox[{
+    RowBox[{
+     RowBox[{"EpolEuc", "[", 
+      RowBox[{"0", ",", "k4x", ",", "k4y", ",", "k4z", ",", "1"}], "]"}], "//.", 
+     RowBox[{"{", 
+      RowBox[{
+       RowBox[{"k4x", "\[Rule]", 
+        RowBox[{"kvec4", "[", 
+         RowBox[{"[", "2", "]"}], "]"}]}], ",", 
+       RowBox[{"k4y", "\[Rule]", 
+        RowBox[{"kvec4", "[", 
+         RowBox[{"[", "3", "]"}], "]"}]}], ",", 
+       RowBox[{"k4z", "\[Rule]", 
+        RowBox[{"kvec4", "[", 
+         RowBox[{"[", "4", "]"}], "]"}]}], ",", 
+       RowBox[{"\[Theta]4", "\[Rule]", 
+        RowBox[{"Pi", "/", "2"}]}], ",", 
+       RowBox[{"\[Phi]4", "\[Rule]", "Pi"}]}], "}"}]}], "//", "Simplify"}]}], 
+  "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"ek1vecCC", "=", 
+   RowBox[{
+    RowBox[{"Conjugate", "[", "ek1vec", "]"}], "//", "Simplify"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"ek2vecCC", "=", 
+   RowBox[{
+    RowBox[{"Conjugate", "[", "ek2vec", "]"}], "//", "Simplify"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"ek4vecCC", "=", 
+   RowBox[{
+    RowBox[{"Conjugate", "[", "ek4vec", "]"}], "//", "Simplify"}]}], 
+  ";"}]}], "Input",
+ CellChangeTimes->{{3.775236799477029*^9, 3.775237061156251*^9}},
+ CellLabel->
+  "In[270]:=",ExpressionUUID->"e7aff029-b2d6-497e-8d41-fe171c216a43"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{"-", 
+    FractionBox["1", 
+     SqrtBox["2"]]}], ",", 
+   RowBox[{"-", 
+    FractionBox["\[ImaginaryI]", 
+     SqrtBox["2"]]}], ",", "0"}], "}"}]], "Output",
+ CellChangeTimes->{{3.7752368113015337`*^9, 3.775236822023851*^9}, {
+   3.7752368730447483`*^9, 3.775236979723176*^9}, 3.7752370149324293`*^9, {
+   3.77523706222206*^9, 3.775237086742407*^9}},
+ CellLabel->
+  "Out[271]=",ExpressionUUID->"8a0962be-605f-4f68-8afd-f3832246e4b6"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", 
+   RowBox[{"-", 
+    FractionBox["1", 
+     SqrtBox["2"]]}], ",", 
+   FractionBox["\[ImaginaryI]", 
+    SqrtBox["2"]], ",", "0"}], "}"}]], "Output",
+ CellChangeTimes->{{3.7752368113015337`*^9, 3.775236822023851*^9}, {
+   3.7752368730447483`*^9, 3.775236979723176*^9}, 3.7752370149324293`*^9, {
+   3.77523706222206*^9, 3.7752370867565613`*^9}},
+ CellLabel->
+  "Out[273]=",ExpressionUUID->"45641c61-b419-4a5d-844e-cda62d80939b"],
+
+Cell[BoxData[
+ RowBox[{"{", 
+  RowBox[{"0", ",", "0", ",", 
+   FractionBox["\[ImaginaryI]", 
+    SqrtBox["2"]], ",", 
+   FractionBox["1", 
+    SqrtBox["2"]]}], "}"}]], "Output",
+ CellChangeTimes->{{3.7752368113015337`*^9, 3.775236822023851*^9}, {
+   3.7752368730447483`*^9, 3.775236979723176*^9}, 3.7752370149324293`*^9, {
+   3.77523706222206*^9, 3.775237086766879*^9}},
+ CellLabel->
+  "Out[274]=",ExpressionUUID->"28740e7a-3602-491c-a46f-a2287e2eb0d6"]
+}, Open  ]]
+},
+WindowSize->{991, 755},
+WindowMargins->{{Automatic, 0}, {22, Automatic}},
+FrontEndVersion->"11.3 for Mac OS X x86 (32-bit, 64-bit Kernel) (March 5, \
+2018)",
+StyleDefinitions->"Default.nb"
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{}
+*)
+(*CellTagsIndex
+CellTagsIndex->{}
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[558, 20, 1402, 28, 115, "Input",ExpressionUUID->"a9eb43f9-c437-4ff0-ae8b-eb31f4d06b38"],
+Cell[CellGroupData[{
+Cell[1985, 52, 890, 15, 94, "Input",ExpressionUUID->"aa6e76d2-ec10-49c0-b6e0-1dd4d91b1a18"],
+Cell[CellGroupData[{
+Cell[2900, 71, 927, 14, 46, "Print",ExpressionUUID->"25a5da31-44dc-4fb5-8479-d3b3e9d9997d"],
+Cell[3830, 87, 703, 11, 24, "Print",ExpressionUUID->"f4dab8ad-d8ed-4620-a2d6-6211b6054aed"]
+}, Open  ]]
+}, Open  ]],
+Cell[4560, 102, 1453, 33, 94, "Input",ExpressionUUID->"907a0a71-f5d0-4c01-bacf-80d42748259d"],
+Cell[6016, 137, 10436, 271, 787, "Input",ExpressionUUID->"26f4a4e8-5f12-4a95-a30f-5e40153ac3f8"],
+Cell[16455, 410, 3616, 100, 262, "Input",ExpressionUUID->"295b0a52-febf-49d7-b5c5-afa40a220c70"],
+Cell[20074, 512, 150, 3, 30, "Input",ExpressionUUID->"facae057-50b1-4b42-bf4f-443f5b3c37d1"],
+Cell[20227, 517, 686, 15, 73, "Input",ExpressionUUID->"08460ef5-a698-495d-8762-405256a0b03d"],
+Cell[20916, 534, 14026, 384, 1249, "Input",ExpressionUUID->"0977815c-55b7-47b0-a967-05c8f45dc601"],
+Cell[CellGroupData[{
+Cell[34967, 922, 467, 13, 30, "Input",ExpressionUUID->"fb2e028f-6f3b-492a-bb4e-bea3e5c1534a"],
+Cell[35437, 937, 361, 7, 34, "Output",ExpressionUUID->"ab71d7ff-d1f5-4255-835e-f05816070c0f"]
+}, Open  ]],
+Cell[35813, 947, 1280, 34, 73, "Input",ExpressionUUID->"fce22054-d858-451a-8e65-81090d25d088"],
+Cell[37096, 983, 600, 16, 30, "Input",ExpressionUUID->"1652bbc6-4ff3-4d2b-a987-9b54bd7481f8"],
+Cell[37699, 1001, 12743, 314, 766, "Input",ExpressionUUID->"ab581e1f-c5c9-4f7d-9a00-c83f2a5d582b"],
+Cell[50445, 1317, 23555, 608, 1438, "Input",ExpressionUUID->"cccbcfb5-f779-4768-8bad-bc93be841f88"],
+Cell[74003, 1927, 425, 7, 73, "Input",ExpressionUUID->"a5c5e12e-157e-4719-b09d-930d037e0d1b"],
+Cell[74431, 1936, 953, 18, 52, "Input",ExpressionUUID->"6f54e202-a28b-4a1d-9e81-76bb7154ddaa"],
+Cell[75387, 1956, 1052, 25, 115, "Input",ExpressionUUID->"60913534-eef8-4103-af9a-ab50a0b353b9"],
+Cell[76442, 1983, 147, 3, 52, "Input",ExpressionUUID->"2239b8d8-532e-4c08-ac3b-e377a166b460"],
+Cell[76592, 1988, 309, 8, 30, "Input",ExpressionUUID->"a8edcb3d-289d-4ff2-aab2-1178c47d2c24"],
+Cell[76904, 1998, 179, 3, 30, "Input",ExpressionUUID->"2fbc45e0-5167-407c-a174-583971bd7d06"],
+Cell[CellGroupData[{
+Cell[77108, 2005, 202, 3, 30, "Input",ExpressionUUID->"7685320a-c96c-4f66-a42b-1f0a30a78e68"],
+Cell[77313, 2010, 371, 5, 34, "Output",ExpressionUUID->"bfbcf21c-cca2-47a8-81bb-f83b15bbc8df"]
+}, Open  ]],
+Cell[77699, 2018, 2587, 65, 241, "Input",ExpressionUUID->"7e7f013d-f22f-4c3a-81bd-d58630ecb407"],
+Cell[CellGroupData[{
+Cell[80311, 2087, 280, 3, 94, "Input",ExpressionUUID->"6e143612-3c0d-4282-a651-8cad89a3b66b"],
+Cell[80594, 2092, 340, 10, 54, "Output",ExpressionUUID->"98797b05-90d0-4926-b83f-0fdac2f8507c"],
+Cell[80937, 2104, 321, 9, 54, "Output",ExpressionUUID->"3c0d0c1a-efc7-4be2-989a-76364c5184c4"],
+Cell[81261, 2115, 802, 24, 55, "Output",ExpressionUUID->"295e5521-bc86-438c-a78c-4ff98b1a4eaf"],
+Cell[82066, 2141, 8014, 206, 415, "Output",ExpressionUUID->"e4e3dc2e-2896-4dfa-890b-ce015e0dd3cb"]
+}, Closed]],
+Cell[90095, 2350, 2360, 62, 237, "Input",ExpressionUUID->"de07b359-92c5-4c50-9757-257a3b86203c"],
+Cell[CellGroupData[{
+Cell[92480, 2416, 214, 2, 94, "Input",ExpressionUUID->"4bd24bf0-4f95-4aeb-a92a-36addec143e9"],
+Cell[92697, 2420, 340, 10, 54, "Output",ExpressionUUID->"0caa581a-26a8-4421-91ce-03a7011cd4c6"],
+Cell[93040, 2432, 319, 9, 54, "Output",ExpressionUUID->"27e4ad47-e57e-49f6-84f4-963c4f4e2144"],
+Cell[93362, 2443, 802, 24, 55, "Output",ExpressionUUID->"c13ffd92-283d-4eff-935e-259792c34b35"],
+Cell[94167, 2469, 8017, 205, 415, "Output",ExpressionUUID->"bd7742ef-097f-4ece-b454-127c41a84927"]
+}, Closed]],
+Cell[102199, 2677, 2265, 61, 237, "Input",ExpressionUUID->"0dc936c5-a3bf-49d3-8822-b8bf3e097443"],
+Cell[CellGroupData[{
+Cell[104489, 2742, 214, 2, 94, "Input",ExpressionUUID->"de1972ab-9631-4c95-a3ac-cc2439eaff59"],
+Cell[104706, 2746, 340, 10, 54, "Output",ExpressionUUID->"83c34964-b013-4847-9113-6809ef586914"],
+Cell[105049, 2758, 319, 9, 54, "Output",ExpressionUUID->"76cacd3c-7b01-4bf0-bf2d-05ee732b6108"],
+Cell[105371, 2769, 793, 24, 55, "Output",ExpressionUUID->"2af82568-b2f2-4e08-823a-56af3a079456"],
+Cell[106167, 2795, 8014, 206, 415, "Output",ExpressionUUID->"888f7613-7ca5-4c0c-9910-37224a4d42c2"]
+}, Closed]],
+Cell[114196, 3004, 2265, 61, 237, "Input",ExpressionUUID->"2f945793-af8e-4f9f-8ee4-f6a5ddef3041"],
+Cell[CellGroupData[{
+Cell[116486, 3069, 214, 2, 94, "Input",ExpressionUUID->"1b3a5a8e-9a75-4ea8-81fc-12e00b1e7a8b"],
+Cell[116703, 3073, 340, 10, 54, "Output",ExpressionUUID->"4800b669-1ac2-461c-8d0e-6c8e0db4feb2"],
+Cell[117046, 3085, 319, 9, 54, "Output",ExpressionUUID->"127daa54-286d-4dfe-a228-45ea02f3a29b"],
+Cell[117368, 3096, 795, 24, 55, "Output",ExpressionUUID->"ff5a2c2d-bcb9-4a08-a0db-e3ec3e0b8eab"],
+Cell[118166, 3122, 8019, 205, 415, "Output",ExpressionUUID->"3613bcfe-306c-417b-be00-8b237e1f74fc"]
+}, Closed]],
+Cell[126200, 3330, 2285, 62, 237, "Input",ExpressionUUID->"736a8768-21b4-4a78-91c9-5a2f8b836a59"],
+Cell[CellGroupData[{
+Cell[128510, 3396, 218, 3, 94, "Input",ExpressionUUID->"ddb548c2-b966-4ebb-8b4d-20e4c052552c"],
+Cell[128731, 3401, 346, 11, 54, "Output",ExpressionUUID->"8e7c14f1-46c4-45be-9499-0e7ff9cfe533"],
+Cell[129080, 3414, 302, 9, 54, "Output",ExpressionUUID->"665ee0e0-b7dc-4373-bc72-91094ed4ebfa"],
+Cell[129385, 3425, 806, 25, 55, "Output",ExpressionUUID->"76a06765-1e32-464b-b653-74c9c41bfad0"],
+Cell[130194, 3452, 8018, 207, 415, "Output",ExpressionUUID->"6c5ab671-9271-4d6d-941f-1661679185be"]
+}, Closed]],
+Cell[138227, 3662, 2308, 64, 237, "Input",ExpressionUUID->"f1b82eb6-3e5a-4cf7-9deb-3109924714c4"],
+Cell[CellGroupData[{
+Cell[140560, 3730, 218, 3, 94, "Input",ExpressionUUID->"5d0e564a-ae95-4bd5-a6cc-af961332242f"],
+Cell[140781, 3735, 344, 11, 54, "Output",ExpressionUUID->"9fb01334-2129-4aec-994f-886876491615"],
+Cell[141128, 3748, 304, 9, 54, "Output",ExpressionUUID->"7df88261-7455-4dcf-a0de-7b4494d6ea05"],
+Cell[141435, 3759, 806, 25, 55, "Output",ExpressionUUID->"73f9133d-e1ae-4484-9c71-cead4cfc2778"],
+Cell[142244, 3786, 8020, 206, 415, "Output",ExpressionUUID->"d00bf2c3-bcc7-4d1d-9603-58fce399f9be"]
+}, Closed]],
+Cell[150279, 3995, 2294, 63, 237, "Input",ExpressionUUID->"ea09958c-619e-47a8-ba2e-3c72622f3837"],
+Cell[CellGroupData[{
+Cell[152598, 4062, 218, 3, 94, "Input",ExpressionUUID->"49c8fe2c-a955-4a56-b5d2-645fdd8ee1b8"],
+Cell[152819, 4067, 344, 11, 54, "Output",ExpressionUUID->"ac928864-fb46-4277-a04b-a9984873ba5e"],
+Cell[153166, 4080, 304, 9, 54, "Output",ExpressionUUID->"9bf967d4-1cd5-43e7-b270-9802dbd89330"],
+Cell[153473, 4091, 797, 25, 55, "Output",ExpressionUUID->"e531c14c-844f-4ad1-9bfb-471d4db9b31e"],
+Cell[154273, 4118, 8020, 207, 415, "Output",ExpressionUUID->"9030a139-1619-4bd0-baa7-f65aaed95fc1"]
+}, Closed]],
+Cell[162308, 4328, 2310, 64, 237, "Input",ExpressionUUID->"109d8c91-098d-43cf-8963-751531807ae7"],
+Cell[CellGroupData[{
+Cell[164643, 4396, 218, 3, 94, "Input",ExpressionUUID->"133b9470-d798-489d-8481-9a8a3698a3a8"],
+Cell[164864, 4401, 344, 11, 54, "Output",ExpressionUUID->"52c45524-838a-46a1-9ad1-7648b6637a0a"],
+Cell[165211, 4414, 304, 9, 54, "Output",ExpressionUUID->"921a68f6-d009-4488-b8f7-58a4a926ca24"],
+Cell[165518, 4425, 797, 25, 55, "Output",ExpressionUUID->"dd1b4ff6-53c6-45ef-9a44-0b1769b80634"],
+Cell[166318, 4452, 8021, 206, 415, "Output",ExpressionUUID->"1328d2bc-b60d-4dff-a61f-fafce78b861e"]
+}, Closed]],
+Cell[174354, 4661, 2274, 63, 237, "Input",ExpressionUUID->"90ea42ce-b398-4fbc-bd9f-f41999d112ee"],
+Cell[CellGroupData[{
+Cell[176653, 4728, 218, 3, 94, "Input",ExpressionUUID->"aeeee502-d9db-4ade-88d9-b512c4326bb6"],
+Cell[176874, 4733, 323, 10, 54, "Output",ExpressionUUID->"9031a0a9-cf9d-437b-8216-b065685cc651"],
+Cell[177200, 4745, 323, 10, 54, "Output",ExpressionUUID->"2c6398cd-b359-4fe5-a36e-0b40aa0a73ac"],
+Cell[177526, 4757, 805, 25, 55, "Output",ExpressionUUID->"d0c4ab05-2228-4b3d-b9f0-380f03f445fc"],
+Cell[178334, 4784, 8018, 207, 415, "Output",ExpressionUUID->"25c04453-c4d9-49a8-b58e-b82acd1058e8"]
+}, Closed]],
+Cell[186367, 4994, 2287, 63, 237, "Input",ExpressionUUID->"eda41e35-0731-4f86-8fd3-b64e5553fef0"],
+Cell[CellGroupData[{
+Cell[188679, 5061, 218, 3, 94, "Input",ExpressionUUID->"0e9ee2b7-6c7f-44b1-9f11-5d09fdee3c8a"],
+Cell[188900, 5066, 323, 10, 54, "Output",ExpressionUUID->"564638da-a074-4583-95bd-4f2f8cba6de0"],
+Cell[189226, 5078, 323, 10, 54, "Output",ExpressionUUID->"ead6394e-5d7d-4027-bf26-da5af46080e0"],
+Cell[189552, 5090, 808, 25, 55, "Output",ExpressionUUID->"05920693-2791-461f-bb39-d05893eff923"],
+Cell[190363, 5117, 8020, 206, 415, "Output",ExpressionUUID->"4d737b53-7257-44f3-b230-4b20b7cf4403"]
+}, Closed]],
+Cell[198398, 5326, 2306, 64, 237, "Input",ExpressionUUID->"b4e55406-dd72-45f8-a3b3-34f05228afd8"],
+Cell[CellGroupData[{
+Cell[200729, 5394, 218, 3, 94, "Input",ExpressionUUID->"31473832-1b3e-4feb-9476-fa165b39ef5b"],
+Cell[200950, 5399, 323, 10, 54, "Output",ExpressionUUID->"49c964a7-ca37-4ece-b767-4725d6cd726d"],
+Cell[201276, 5411, 325, 10, 54, "Output",ExpressionUUID->"aff9ab87-5ee7-4424-a8c5-9003da78ed6a"],
+Cell[201604, 5423, 797, 25, 55, "Output",ExpressionUUID->"7255aa0b-c54c-4726-b608-3a1e1ec73f55"],
+Cell[202404, 5450, 8020, 207, 415, "Output",ExpressionUUID->"7676935b-3e9e-423c-9495-99c76e7836d8"]
+}, Closed]],
+Cell[210439, 5660, 2361, 65, 237, "Input",ExpressionUUID->"17600b0b-71c8-4b17-9c49-9fa20ea3d684"],
+Cell[CellGroupData[{
+Cell[212825, 5729, 218, 3, 94, "Input",ExpressionUUID->"acc3ef55-c9ff-41e2-a5ce-951fcf403a30"],
+Cell[213046, 5734, 323, 10, 54, "Output",ExpressionUUID->"b58e0eea-b86b-4b4d-9af9-0514d9cec5b3"],
+Cell[213372, 5746, 323, 10, 54, "Output",ExpressionUUID->"5cae39f8-cd31-4f16-9795-7943f4a5fa19"],
+Cell[213698, 5758, 797, 25, 55, "Output",ExpressionUUID->"89c26d17-1c70-4219-a637-da8fbe3ce30e"],
+Cell[214498, 5785, 8023, 206, 415, "Output",ExpressionUUID->"6e5ebac0-5967-47da-8716-e7ea61df247a"]
+}, Closed]],
+Cell[222536, 5994, 2273, 63, 237, "Input",ExpressionUUID->"b64b8f87-82c8-4857-a557-001146451746"],
+Cell[CellGroupData[{
+Cell[224834, 6061, 218, 3, 94, "Input",ExpressionUUID->"04bbc492-9b94-415e-a91d-f36d5b545005"],
+Cell[225055, 6066, 325, 10, 54, "Output",ExpressionUUID->"14f63c8c-5f9d-4ceb-940c-502703daeac5"],
+Cell[225383, 6078, 302, 9, 54, "Output",ExpressionUUID->"b269e7ef-8a34-43b6-a7be-907a76c65945"],
+Cell[225688, 6089, 808, 25, 55, "Output",ExpressionUUID->"fae7b65b-0f03-4de9-bfa9-ffbfc4ebcf53"],
+Cell[226499, 6116, 8018, 207, 415, "Output",ExpressionUUID->"b70b5df9-83b0-4ee9-aa8c-5d2d741914f3"]
+}, Closed]],
+Cell[234532, 6326, 2307, 64, 237, "Input",ExpressionUUID->"ccddb553-b79e-4e2f-b2e8-37d92e711b60"],
+Cell[CellGroupData[{
+Cell[236864, 6394, 218, 3, 94, "Input",ExpressionUUID->"5e22bb0e-cc8d-4d2c-8d89-8696ac48023c"],
+Cell[237085, 6399, 325, 10, 54, "Output",ExpressionUUID->"1d1aff26-c11b-498f-a281-4edca3f48b8e"],
+Cell[237413, 6411, 302, 9, 54, "Output",ExpressionUUID->"fe1b4903-a745-4370-a850-2eb30e49b07e"],
+Cell[237718, 6422, 808, 25, 55, "Output",ExpressionUUID->"c0401559-5133-43a1-95d9-2c147aeac684"],
+Cell[238529, 6449, 8021, 206, 415, "Output",ExpressionUUID->"69980d33-68ef-4bc7-8483-e5f3624dc2f2"]
+}, Closed]],
+Cell[246565, 6658, 2309, 64, 237, "Input",ExpressionUUID->"b793fa34-3995-4321-8821-1b621911c453"],
+Cell[CellGroupData[{
+Cell[248899, 6726, 284, 4, 94, "Input",ExpressionUUID->"f84ff2cc-9ea3-4b80-b650-9f55fc0f9050"],
+Cell[249186, 6732, 323, 10, 54, "Output",ExpressionUUID->"c06349b5-a8e5-4a9d-9151-70897cbad86c"],
+Cell[249512, 6744, 304, 9, 54, "Output",ExpressionUUID->"f6e999f4-5535-4229-b523-b56222e09ce5"],
+Cell[249819, 6755, 797, 25, 55, "Output",ExpressionUUID->"e26cd2b4-0fcd-4c1a-bc01-8ecb0c2ab4db"],
+Cell[250619, 6782, 8018, 207, 415, "Output",ExpressionUUID->"9657c170-36b8-411d-8b6b-3d6276292375"]
+}, Closed]],
+Cell[258652, 6992, 2313, 64, 237, "Input",ExpressionUUID->"904d1e14-4906-4fe4-96f1-2666b54aee06"],
+Cell[CellGroupData[{
+Cell[260990, 7060, 218, 3, 94, "Input",ExpressionUUID->"ccf4c247-cfe0-485b-8f60-c5cb1c2404f2"],
+Cell[261211, 7065, 323, 10, 54, "Output",ExpressionUUID->"eb569226-c832-4d1b-bd18-8c78de3ac024"],
+Cell[261537, 7077, 302, 9, 54, "Output",ExpressionUUID->"4c4d179c-6005-4a69-869b-32e6c3d44696"],
+Cell[261842, 7088, 797, 25, 55, "Output",ExpressionUUID->"122f04a8-3049-4ef7-812a-dedea2b60c56"],
+Cell[262642, 7115, 8020, 206, 415, "Output",ExpressionUUID->"b4ca1d9c-4431-4e3d-bafa-ac054aac2ca1"]
+}, Closed]],
+Cell[270677, 7324, 206, 4, 69, "Input",ExpressionUUID->"748f33a8-75a3-45ad-8268-03283d31b0cc"],
+Cell[270886, 7330, 10811, 300, 1480, "Input",ExpressionUUID->"decca2b0-8e15-4e87-a985-d5712b125d5f"],
+Cell[281700, 7632, 477, 11, 94, "Input",ExpressionUUID->"4563076e-3246-46f7-97bc-73b664b8307f"],
+Cell[282180, 7645, 299, 7, 30, "Input",ExpressionUUID->"0bc98909-fe56-4051-8545-05a60ebbbb32"],
+Cell[CellGroupData[{
+Cell[282504, 7656, 1732, 49, 136, "Input",ExpressionUUID->"c2b37f9c-dad4-4307-af24-d9a0d850bff4"],
+Cell[284239, 7707, 492, 13, 54, "Output",ExpressionUUID->"0053d0e2-0989-4bdf-b06a-f9d1922adf20"],
+Cell[284734, 7722, 450, 11, 54, "Output",ExpressionUUID->"43fbcf8e-8599-42a1-bfcc-4516bc717d3d"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[285221, 7738, 1710, 48, 136, "Input",ExpressionUUID->"93d4e542-71cc-4953-af8e-c169abe35c37"],
+Cell[286934, 7788, 473, 12, 54, "Output",ExpressionUUID->"3293794e-373e-45b0-88e3-12a28b10e6d4"],
+Cell[287410, 7802, 473, 12, 54, "Output",ExpressionUUID->"105e4034-56e9-4119-976c-1771ee3f4d7e"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[287920, 7819, 239, 5, 30, "Input",ExpressionUUID->"8f69032e-381e-4355-9ee9-143e3faa4659"],
+Cell[288162, 7826, 370, 11, 54, "Output",ExpressionUUID->"395e9ca9-8a54-41e6-b00a-82e661c745b9"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[288569, 7842, 240, 5, 30, "Input",ExpressionUUID->"82dd246c-415e-4947-89d4-a9492a7c08d0"],
+Cell[288812, 7849, 494, 11, 34, "Output",ExpressionUUID->"439827f5-7f37-45eb-a6db-4f44bbe16d70"]
+}, Open  ]],
+Cell[289321, 7863, 280, 5, 136, "Input",ExpressionUUID->"46f1ab6d-937e-4ec4-ac8d-bff28579c110"],
+Cell[CellGroupData[{
+Cell[289626, 7872, 522, 11, 115, "Input",ExpressionUUID->"39596f69-54b3-4502-bc9a-e27bb48d3f41"],
+Cell[290151, 7885, 227, 4, 34, "Output",ExpressionUUID->"391ef8fa-412a-4103-98ac-6efb4aca67ca"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[290415, 7894, 1285, 35, 73, "Input",ExpressionUUID->"b34e4af8-5a92-4433-91fe-7fe2aaea58e5"],
+Cell[CellGroupData[{
+Cell[291725, 7933, 538, 13, 44, "Print",ExpressionUUID->"036d06c3-d736-46a4-85af-321881037012"],
+Cell[292266, 7948, 2309, 57, 145, "Print",ExpressionUUID->"7f092130-65a6-48f6-a225-c9cb2c9bf4af"],
+Cell[294578, 8007, 888, 20, 47, "Print",ExpressionUUID->"74d09005-80d4-4eb5-b2ad-db0c1a75acc8"],
+Cell[295469, 8029, 286, 5, 24, "Print",ExpressionUUID->"b274558c-4e4b-4c44-9c4c-5fbe2460bcbc"],
+Cell[295758, 8036, 1295, 30, 49, "Print",ExpressionUUID->"3221b609-dcc3-4da4-a3e3-9f5bc8e7bbf2"]
+}, Open  ]]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[297102, 8072, 1328, 31, 52, "Input",ExpressionUUID->"9fd3d5e6-8ffa-493a-8595-d6d0d780805f"],
+Cell[298433, 8105, 1174, 29, 56, "Output",ExpressionUUID->"fa64eb15-5601-48dd-a605-5df7944ad9aa"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[299644, 8139, 3933, 119, 199, "Input",ExpressionUUID->"5ded4345-d664-4ac5-9642-1b00a0681b1c"],
+Cell[303580, 8260, 720, 12, 34, "Output",ExpressionUUID->"1a1d7ca1-25cc-4fb7-8df5-582cc32ec06c"]
+}, Open  ]],
+Cell[304315, 8275, 213, 5, 30, "Input",ExpressionUUID->"5b66fb87-293a-4ef7-bff7-0d09631bb6d8"],
+Cell[CellGroupData[{
+Cell[304553, 8284, 1385, 38, 73, "Input",ExpressionUUID->"a821d5f4-c947-47d0-a68d-88efb3b8dd3d"],
+Cell[CellGroupData[{
+Cell[305963, 8326, 741, 16, 44, "Print",ExpressionUUID->"bdd84ee5-e5de-4399-85d7-f620c7667877"],
+Cell[306707, 8344, 2513, 60, 145, "Print",ExpressionUUID->"3939f696-ad00-464e-8f62-39d979d7c35d"],
+Cell[309223, 8406, 1085, 23, 47, "Print",ExpressionUUID->"44d8caf9-61b8-46aa-972d-67abe87916ae"],
+Cell[310311, 8431, 488, 8, 24, "Print",ExpressionUUID->"2f29d13e-6df9-4305-9cb5-665b6f5790de"],
+Cell[310802, 8441, 1497, 33, 49, "Print",ExpressionUUID->"dbcfd14d-2210-4c86-b316-c61c776b7076"]
+}, Open  ]]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[312348, 8480, 1016, 26, 52, "Input",ExpressionUUID->"edd720c6-62d1-4267-aae0-a0e8be2f9c5d"],
+Cell[313367, 8508, 949, 23, 34, "Output",ExpressionUUID->"3fcfdace-e39d-40f0-931d-65df47dc584f"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[314353, 8536, 3761, 117, 199, "Input",ExpressionUUID->"f9a36ccc-6bbb-4713-9d83-1c7447160476"],
+Cell[318117, 8655, 582, 9, 34, "Output",ExpressionUUID->"aa7d22b9-3036-4d75-b2d0-18fc747a8a8d"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[318736, 8669, 207, 4, 30, "Input",ExpressionUUID->"36eb691a-1df8-413f-a81b-b5d04d022935"],
+Cell[318946, 8675, 416, 7, 34, "Output",ExpressionUUID->"fdfb1397-fb23-4c7c-8c83-b32a045efe7a"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[319399, 8687, 181, 3, 30, "Input",ExpressionUUID->"7f66cd20-d1e8-4ca7-a221-9ff39aca36aa"],
+Cell[319583, 8692, 294, 5, 34, "Output",ExpressionUUID->"335e2f70-756c-4dba-8305-8a636f2cf6ae"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[319914, 8702, 208, 4, 30, "Input",ExpressionUUID->"809aadb6-16f8-4cc9-bd6f-1d91f28835f9"],
+Cell[320125, 8708, 445, 8, 34, "Output",ExpressionUUID->"25057792-749b-4102-83c6-f9f495295eec"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[320607, 8721, 210, 4, 30, "Input",ExpressionUUID->"f8772f15-8b4e-49fe-a3b6-236dbafe3613"],
+Cell[320820, 8727, 446, 8, 34, "Output",ExpressionUUID->"57e8dfd9-908a-48b6-8d80-cf22e344347f"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[321303, 8740, 208, 4, 30, "Input",ExpressionUUID->"aa43aae6-fbd8-489b-b700-ebe9d437a84b"],
+Cell[321514, 8746, 255, 4, 34, "Output",ExpressionUUID->"d2d8c151-4c04-472d-91db-93581375244f"]
+}, Open  ]],
+Cell[321784, 8753, 217, 5, 30, "Input",ExpressionUUID->"b20f7e47-3fac-4864-a7ff-e1acd3f6092a"],
+Cell[CellGroupData[{
+Cell[322026, 8762, 253, 5, 30, "Input",ExpressionUUID->"c82ec215-95ed-4d74-990c-6d27d1f70484"],
+Cell[322282, 8769, 11282, 301, 166, "Output",ExpressionUUID->"d2eb5bb5-ca40-4bc9-8035-0ad20d7444eb"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[333601, 9075, 1727, 46, 115, "Input",ExpressionUUID->"cd9723fe-5ae1-425a-ab81-ebf4322d7796"],
+Cell[CellGroupData[{
+Cell[335353, 9125, 489, 12, 44, "Print",ExpressionUUID->"2d451221-0c8c-4a6d-900e-eef366e55a07"],
+Cell[335845, 9139, 2261, 56, 145, "Print",ExpressionUUID->"446afc90-b7d9-40f2-a649-5b1fb0898ef2"],
+Cell[338109, 9197, 838, 19, 47, "Print",ExpressionUUID->"445e2145-d7ab-4474-817e-fca7d8921e18"],
+Cell[338950, 9218, 239, 4, 24, "Print",ExpressionUUID->"576e6130-cb63-4d40-9fa7-06ce080bbda8"],
+Cell[339192, 9224, 1247, 29, 49, "Print",ExpressionUUID->"5eb1a54c-f688-440b-9825-8273a1dadee7"]
+}, Open  ]]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[340488, 9259, 1239, 33, 73, "Input",ExpressionUUID->"36a40cc7-40c3-4807-8617-acf13576bbcd"],
+Cell[341730, 9294, 917, 23, 37, "Output",ExpressionUUID->"92cd9b5e-a716-4e44-bd0a-1880c41e59e9"],
+Cell[342650, 9319, 799, 20, 37, "Output",ExpressionUUID->"7bbae190-812f-49ad-a656-5a73f8176dd3"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[343486, 9344, 3539, 111, 199, "Input",ExpressionUUID->"12f49268-37df-4130-a29f-0ba951bf6635"],
+Cell[347028, 9457, 1771, 44, 134, "Output",ExpressionUUID->"1a999a2c-24e4-458b-9240-da9ed516f81d"],
+Cell[348802, 9503, 2555, 88, 176, "Output",ExpressionUUID->"2fb42af8-da7f-4552-9e3b-9bbf57fab2ce"],
+Cell[351360, 9593, 1770, 44, 134, "Output",ExpressionUUID->"a3d1a0f7-2104-419a-a290-17d0866e267d"],
+Cell[353133, 9639, 455, 8, 34, "Output",ExpressionUUID->"49cf19f7-b5ca-4da2-a2fc-4505f8717f09"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[353625, 9652, 1982, 56, 136, "Input",ExpressionUUID->"ac44598b-9a1a-4e52-85ef-2d23a5904111"],
+Cell[CellGroupData[{
+Cell[355632, 9712, 515, 13, 44, "Print",ExpressionUUID->"672b46d5-b182-43d6-9ad5-74e89857e3af"],
+Cell[356150, 9727, 2289, 57, 145, "Print",ExpressionUUID->"05058169-5587-47d7-967f-cefedf01eb4f"],
+Cell[358442, 9786, 861, 20, 47, "Print",ExpressionUUID->"4097f6e5-fc74-4212-ac6e-bd19306fd20d"],
+Cell[359306, 9808, 266, 5, 24, "Print",ExpressionUUID->"bbc2f3b7-c6b3-4828-b1af-c4fcbecd6b32"],
+Cell[359575, 9815, 1273, 30, 49, "Print",ExpressionUUID->"28ddf3b3-c3f9-4cf3-ba05-02312cd12f5c"]
+}, Open  ]],
+Cell[360863, 9848, 818, 22, 34, "Output",ExpressionUUID->"61209ac1-6811-4927-8d5d-7e002a9c297f"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[361718, 9875, 4248, 130, 241, "Input",ExpressionUUID->"0e414578-8bf7-48dd-aa07-72f420f87330"],
+Cell[365969, 10007, 700, 19, 34, "Output",ExpressionUUID->"82608b25-bb9e-46a9-bc23-8896e03febd6"],
+Cell[366672, 10028, 1580, 41, 128, "Output",ExpressionUUID->"85a4546b-1e22-4f24-a959-89ef205f1685"],
+Cell[368255, 10071, 2372, 85, 176, "Output",ExpressionUUID->"501d3523-5b39-4f6b-bfc6-43c241646426"],
+Cell[370630, 10158, 1580, 41, 128, "Output",ExpressionUUID->"22c8d040-d710-4aca-89d1-17964cf0761b"],
+Cell[372213, 10201, 269, 5, 34, "Output",ExpressionUUID->"200f382c-f9d9-46dd-9e7e-396321b66395"]
+}, Open  ]],
+Cell[372497, 10209, 283, 7, 30, "Input",ExpressionUUID->"6bd9d4e3-c0eb-46c8-9ee1-2cc1a6f9f551"],
+Cell[CellGroupData[{
+Cell[372805, 10220, 214, 4, 30, "Input",ExpressionUUID->"7dc2aeaf-1eea-4790-86f2-2e38260ef446"],
+Cell[373022, 10226, 295, 5, 34, "Output",ExpressionUUID->"d9baed4e-4c27-4541-baf9-0d1e1b49c1fc"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[373354, 10236, 345, 8, 73, "Input",ExpressionUUID->"65d1e451-71c5-4a37-bb29-1ec9c57d89ad"],
+Cell[373702, 10246, 297, 5, 34, "Output",ExpressionUUID->"719d6feb-e988-4831-acc0-7728ca02e7e1"]
+}, Open  ]],
+Cell[374014, 10254, 304, 6, 157, "Input",ExpressionUUID->"d8336dbe-baca-4c43-98ec-e9fa0e90ceb9"],
+Cell[374321, 10262, 278, 7, 30, "Input",ExpressionUUID->"dbe86d55-f903-4c16-aba8-5c64dcd510d8"],
+Cell[374602, 10271, 1029, 28, 136, "Input",ExpressionUUID->"ff902789-8764-47df-ae19-f8e2732cb693"],
+Cell[CellGroupData[{
+Cell[375656, 10303, 179, 3, 30, "Input",ExpressionUUID->"d259943e-df1a-4b8b-8ce1-f2d8a1c6ce82"],
+Cell[375838, 10308, 10966, 291, 176, "Output",ExpressionUUID->"bb81f3e0-43b8-4bed-817f-ab833c1db0b0"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[386841, 10604, 1221, 35, 73, "Input",ExpressionUUID->"9a3f574a-cd45-430d-9f41-9143c899f3d3"],
+Cell[CellGroupData[{
+Cell[388087, 10643, 587, 14, 44, "Print",ExpressionUUID->"e1dd3184-93ea-45aa-aa66-1a51baff8344"],
+Cell[388677, 10659, 2359, 58, 145, "Print",ExpressionUUID->"b6238ca4-e65e-4f5a-bd6a-19cc70b7cf87"],
+Cell[391039, 10719, 936, 21, 47, "Print",ExpressionUUID->"7ea31f10-d118-4022-958f-dcfbd6a2e3e6"],
+Cell[391978, 10742, 339, 6, 24, "Print",ExpressionUUID->"7d84e7e6-71cc-43f9-9858-0a9b757f59cd"],
+Cell[392320, 10750, 1345, 31, 49, "Print",ExpressionUUID->"b73767c3-0d6c-4d3c-9cfa-7190669995d9"]
+}, Open  ]]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[393714, 10787, 293, 6, 30, "Input",ExpressionUUID->"ec103b6d-ad9b-47f5-99fb-35d0c73242fa"],
+Cell[394010, 10795, 423, 13, 54, "Output",ExpressionUUID->"599c636a-94ac-45e2-a43b-d95245d19773"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[394470, 10813, 295, 6, 30, "Input",ExpressionUUID->"45cc03ff-8a7f-40ac-841b-fac68c59dfd0"],
+Cell[394768, 10821, 398, 12, 54, "Output",ExpressionUUID->"fa0863bb-51d4-49fd-8e52-b516b20cfd16"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[395203, 10838, 295, 6, 30, "Input",ExpressionUUID->"cb245ba0-2d36-4576-abbc-86da611f6661"],
+Cell[395501, 10846, 400, 12, 54, "Output",ExpressionUUID->"cc3b366f-3f8c-4cef-8228-4595152eed95"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[395938, 10863, 291, 6, 30, "Input",ExpressionUUID->"2adefc70-ad32-4777-bd90-01f6585fa801"],
+Cell[396232, 10871, 519, 12, 34, "Output",ExpressionUUID->"2f8c6836-a4f2-4ad0-847a-191b528ee79f"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[396788, 10888, 892, 24, 52, "Input",ExpressionUUID->"38863738-22eb-4821-ade8-5e59b57cc6c8"],
+Cell[397683, 10914, 895, 22, 37, "Output",ExpressionUUID->"daf16945-ab0d-4374-a527-378da92f56c0"]
+}, Open  ]],
+Cell[398593, 10939, 206, 4, 73, "Input",ExpressionUUID->"dd96acf9-8569-436c-b71f-3858bc812dc3"],
+Cell[CellGroupData[{
+Cell[398824, 10947, 1287, 36, 73, "Input",ExpressionUUID->"587fed01-95ad-4497-9991-22e72c5df35e"],
+Cell[CellGroupData[{
+Cell[400136, 10987, 612, 14, 44, "Print",ExpressionUUID->"efbe9be0-242a-48f2-9e42-649dcc6e39f0"],
+Cell[400751, 11003, 2384, 58, 145, "Print",ExpressionUUID->"b773131b-d503-4156-81c4-b9207d5e08b7"],
+Cell[403138, 11063, 956, 21, 47, "Print",ExpressionUUID->"87a2822b-b3de-47cc-ad5e-c06152d2025e"],
+Cell[404097, 11086, 359, 6, 24, "Print",ExpressionUUID->"37c34993-2e48-4495-a764-802de147d2dd"],
+Cell[404459, 11094, 1368, 31, 49, "Print",ExpressionUUID->"aaee04cf-3b7e-430f-bbef-6bfe3a0c933c"]
+}, Open  ]]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[405876, 11131, 176, 4, 30, "Input",ExpressionUUID->"9e8c3495-09ad-4ff0-bd7d-92eff7ebc1d8"],
+Cell[406055, 11137, 347, 10, 54, "Output",ExpressionUUID->"d28a7c93-4ace-4140-baec-5db8c913a946"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[406439, 11152, 244, 5, 30, "Input",ExpressionUUID->"bea8deb0-f558-4fba-b807-f39d09047f9c"],
+Cell[406686, 11159, 495, 11, 34, "Output",ExpressionUUID->"0f2458d3-6748-4204-8103-24c778a58b4c"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[407218, 11175, 842, 23, 52, "Input",ExpressionUUID->"4a273c30-f8fc-46d1-9ea4-2dc3bb5d38c9"],
+Cell[408063, 11200, 846, 22, 37, "Output",ExpressionUUID->"f9a5dd89-b566-4f2b-bac6-dc1b86c8af04"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[408946, 11227, 185, 3, 30, "Input",ExpressionUUID->"64119c6d-52f2-400d-81ef-73a3ba94f23d"],
+Cell[409134, 11232, 822, 21, 37, "Output",ExpressionUUID->"756fccae-313a-4aa3-b142-b34d21036023"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[409993, 11258, 187, 3, 30, "Input",ExpressionUUID->"a16290ff-6778-41a3-b359-246f67aeefaa"],
+Cell[410183, 11263, 792, 20, 37, "Output",ExpressionUUID->"29952b1b-a847-4460-9afd-dae006ceafb7"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[411012, 11288, 405, 10, 30, "Input",ExpressionUUID->"9729c16f-542c-4583-8d8f-dcb1f9899ee7"],
+Cell[411420, 11300, 411, 7, 34, "Output",ExpressionUUID->"ef1bda56-f590-49ec-bc2a-44f732a3ba4b"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[411868, 11312, 354, 9, 30, "Input",ExpressionUUID->"24ccfcaf-f4d5-4902-81e0-8d38403763c1"],
+Cell[412225, 11323, 411, 7, 34, "Output",ExpressionUUID->"1395b6cf-0254-469b-8225-3f3eaecd64b3"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[412673, 11335, 404, 10, 30, "Input",ExpressionUUID->"1c4d588d-8302-4258-81e3-4cedb485f7da"],
+Cell[413080, 11347, 444, 7, 34, "Output",ExpressionUUID->"287f41c7-e872-480d-b818-0bc23a2fa987"]
+}, Open  ]],
+Cell[413539, 11357, 399, 7, 199, "Input",ExpressionUUID->"c51d1221-86c4-4ebd-b3ad-4106585b9017"],
+Cell[413941, 11366, 362, 9, 30, "Input",ExpressionUUID->"9cd25044-4f41-49e4-80f5-08d29278cb00"],
+Cell[414306, 11377, 1032, 27, 136, "Input",ExpressionUUID->"d5a9b7bd-37b9-4af8-bb12-857996b7a8bc"],
+Cell[CellGroupData[{
+Cell[415363, 11408, 1217, 34, 73, "Input",ExpressionUUID->"9331fb0d-1fec-43e2-9850-030fbd7bdf66"],
+Cell[CellGroupData[{
+Cell[416605, 11446, 488, 12, 44, "Print",ExpressionUUID->"37427144-5f1a-4b3d-944b-84388f7e1424"],
+Cell[417096, 11460, 2262, 56, 145, "Print",ExpressionUUID->"4113965a-4b28-4369-abec-86637ae21960"],
+Cell[419361, 11518, 837, 19, 47, "Print",ExpressionUUID->"6948dff3-27cb-48e8-897b-75fa8905a448"],
+Cell[420201, 11539, 237, 4, 24, "Print",ExpressionUUID->"bc9fdf3f-b30b-492d-8e1d-5cf2f61575b8"],
+Cell[420441, 11545, 1248, 29, 49, "Print",ExpressionUUID->"ab68cde6-c968-40c5-b689-0e2e516ef784"]
+}, Open  ]]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[421738, 11580, 794, 22, 52, "Input",ExpressionUUID->"bdc583a4-5ce8-4ab5-954b-e4753cc14645"],
+Cell[422535, 11604, 751, 20, 34, "Output",ExpressionUUID->"ba033732-01ca-402b-a434-8b7ef10663bc"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[423323, 11629, 1282, 35, 73, "Input",ExpressionUUID->"57bf9ad6-d97b-4e31-af95-23eb640aeccb"],
+Cell[CellGroupData[{
+Cell[424630, 11668, 469, 12, 44, "Print",ExpressionUUID->"10539cf1-126a-4c72-b496-8ac1181292c2"],
+Cell[425102, 11682, 2241, 56, 145, "Print",ExpressionUUID->"822935a9-5e2c-4540-b675-dca51a34b286"],
+Cell[427346, 11740, 813, 19, 47, "Print",ExpressionUUID->"82640b1c-5511-4c11-aba6-7d7985183a89"],
+Cell[428162, 11761, 218, 4, 24, "Print",ExpressionUUID->"faa1baf7-d09d-4147-bb38-4bd4cd6ef2d8"],
+Cell[428383, 11767, 1225, 29, 49, "Print",ExpressionUUID->"56ae6788-1369-4e9a-b9a1-a2adf28ceea9"]
+}, Open  ]]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[429657, 11802, 793, 22, 52, "Input",ExpressionUUID->"fbd4fe0e-70d6-47b4-91d4-1664cc7ae429"],
+Cell[430453, 11826, 705, 19, 34, "Output",ExpressionUUID->"c2ef6ce0-85e1-4e60-a32a-1bb1af029bea"]
+}, Open  ]],
+Cell[431173, 11848, 234, 5, 94, "Input",ExpressionUUID->"fdb1e515-144b-467e-85db-8127246e82de"],
+Cell[CellGroupData[{
+Cell[431432, 11857, 180, 2, 30, "Input",ExpressionUUID->"4bc31ae3-5bab-415c-b562-5422473e4a79"],
+Cell[431615, 11861, 703, 19, 34, "Output",ExpressionUUID->"20d0a29e-c20e-455b-82f9-a6a0181524eb"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[432355, 11885, 181, 2, 30, "Input",ExpressionUUID->"0fee63fd-0f7d-4f37-be22-0ee9f0b2dd29"],
+Cell[432539, 11889, 703, 19, 34, "Output",ExpressionUUID->"4de8bf7b-7b18-4fbe-a1b4-434a2cfdc5ca"]
+}, Open  ]],
+Cell[433257, 11911, 230, 4, 30, "Input",ExpressionUUID->"d100b567-08ac-45a3-ab1c-7102d980edd8"],
+Cell[CellGroupData[{
+Cell[433512, 11919, 318, 7, 30, "Input",ExpressionUUID->"2004d05a-8fd9-4279-8da7-5e8db6d0b1cb"],
+Cell[433833, 11928, 286, 4, 34, "Output",ExpressionUUID->"038a004b-d5d8-41b1-aa13-9f3bccce7a2d"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[434156, 11937, 326, 8, 30, "Input",ExpressionUUID->"3305c7cc-fb1d-4b01-8589-30f8bfb10617"],
+Cell[434485, 11947, 263, 4, 34, "Output",ExpressionUUID->"c7d59eaa-a5dc-4b43-8b0d-0328f5c09e45"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[434785, 11956, 284, 7, 30, "Input",ExpressionUUID->"61457d60-4f76-43a6-bd82-ebd9fb01124b"],
+Cell[435072, 11965, 262, 4, 34, "Output",ExpressionUUID->"685f977c-0479-4d99-befc-e84b48b144ff"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[435371, 11974, 326, 8, 30, "Input",ExpressionUUID->"918adda1-1e50-4075-960c-15c32f887de8"],
+Cell[435700, 11984, 263, 4, 34, "Output",ExpressionUUID->"5652226d-c974-4d4d-b620-6fcddd790365"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[436000, 11993, 503, 10, 115, "Input",ExpressionUUID->"ced44b95-e225-49ad-9c83-b351a616e504"],
+Cell[436506, 12005, 1908, 56, 97, "Output",ExpressionUUID->"52898082-c750-4891-86b9-e3e06ee9c662"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[438451, 12066, 408, 9, 30, "Input",ExpressionUUID->"71e5daec-bf03-47b2-b536-dbd0414e542c"],
+Cell[438862, 12077, 615, 14, 52, "Output",ExpressionUUID->"5b505cff-d5bb-42a3-853e-4163fc1a29d9"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[439514, 12096, 177, 2, 30, "Input",ExpressionUUID->"c25bd516-0c47-432b-90fe-27e455bbc0dd"],
+Cell[439694, 12100, 608, 13, 34, "Output",ExpressionUUID->"1942b838-851d-4a1f-8d51-8982c4e0bb98"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[440339, 12118, 177, 2, 30, "Input",ExpressionUUID->"700f0e27-c33f-4e8e-ba2e-3543e6248bf5"],
+Cell[440519, 12122, 588, 12, 34, "Output",ExpressionUUID->"dbebf7d3-afff-4491-89d6-99e2e2c958cf"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[441144, 12139, 287, 5, 30, "Input",ExpressionUUID->"63ad1626-8781-4e3f-9591-d8528ececcd8"],
+Cell[441434, 12146, 270, 4, 34, "Output",ExpressionUUID->"022e836e-e6b2-4d1c-bfdd-4b758f49462e"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[441741, 12155, 236, 4, 30, "Input",ExpressionUUID->"a371a893-d044-4e82-bd67-be5b40741382"],
+Cell[441980, 12161, 230, 4, 34, "Output",ExpressionUUID->"6c231317-1e6f-4e59-b41f-bb17b4d83b99"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[442247, 12170, 238, 4, 30, "Input",ExpressionUUID->"ef7d683b-4e10-4d26-9dd6-72279ff9244a"],
+Cell[442488, 12176, 230, 4, 34, "Output",ExpressionUUID->"3b3eb906-3b2f-4ff9-819a-39a88193f844"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[442755, 12185, 178, 2, 30, "Input",ExpressionUUID->"de45a5ed-a569-453b-824b-26f93985d288"],
+Cell[442936, 12189, 288, 8, 54, "Output",ExpressionUUID->"9c205819-8029-4260-ae8b-88d0e2b6ba6b"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[443261, 12202, 178, 2, 30, "Input",ExpressionUUID->"3cac72c0-8845-4679-9a9d-8d4f40d62660"],
+Cell[443442, 12206, 309, 9, 54, "Output",ExpressionUUID->"1df39c7d-0608-43f2-926b-eae7e2d5bb10"]
+}, Open  ]],
+Cell[443766, 12218, 280, 5, 136, "Input",ExpressionUUID->"51cb99be-3353-4392-9fd3-c37ee91d1816"],
+Cell[444049, 12225, 1954, 57, 94, "Input",ExpressionUUID->"3a2dff3b-cd15-4082-a16f-231d41830801"],
+Cell[CellGroupData[{
+Cell[446028, 12286, 455, 10, 30, "Input",ExpressionUUID->"4717edd2-5164-4d8f-a082-259fc17a14ef"],
+Cell[446486, 12298, 1000, 32, 59, "Output",ExpressionUUID->"c471d1a0-08f6-4e63-8c58-4c380016123b"]
+}, Open  ]],
+Cell[447501, 12333, 254, 6, 30, "Input",ExpressionUUID->"c016de82-2b4d-46da-8883-dca8d81b33b0"],
+Cell[447758, 12341, 395, 7, 30, "Input",ExpressionUUID->"2fb8be8e-1cd2-4ebe-ace8-84dfab624c1d"],
+Cell[CellGroupData[{
+Cell[448178, 12352, 178, 2, 30, "Input",ExpressionUUID->"ea64cda5-c0db-4d48-bd78-995d33d2e89b"],
+Cell[448359, 12356, 285, 8, 54, "Output",ExpressionUUID->"a788202c-d2a1-489b-9a50-5e867195c907"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[448681, 12369, 178, 2, 30, "Input",ExpressionUUID->"63d668d8-464b-44a0-acf7-ed8fa5574d82"],
+Cell[448862, 12373, 307, 9, 54, "Output",ExpressionUUID->"0a77be4d-16d7-4417-9174-3eaeec3d0943"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[449206, 12387, 415, 10, 30, "Input",ExpressionUUID->"7f476354-b099-4fce-95e1-c8e3da1d445d"],
+Cell[449624, 12399, 1232, 40, 59, "Output",ExpressionUUID->"232606ee-180f-4a6b-aae6-1505ac26d9aa"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[450893, 12444, 464, 11, 30, "Input",ExpressionUUID->"3bf9eee7-e9ce-4b9d-b371-a004db7dba36"],
+Cell[451360, 12457, 1279, 42, 59, "Output",ExpressionUUID->"9f6de44a-3816-436f-9eed-c65579e853f2"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[452676, 12504, 371, 9, 30, "Input",ExpressionUUID->"018d3a63-8c00-4393-8f48-5ea31ee4fb47"],
+Cell[453050, 12515, 225, 4, 34, "Output",ExpressionUUID->"8ec26b8c-6895-465b-9a6d-f28a9c1bb157"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[453312, 12524, 419, 10, 30, "Input",ExpressionUUID->"4a04a25c-7a5b-4d1e-9e39-cea69507a2ea"],
+Cell[453734, 12536, 335, 10, 49, "Output",ExpressionUUID->"a324f332-3291-4f3e-984c-5d19e66452d6"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[454106, 12551, 322, 8, 30, "Input",ExpressionUUID->"bb85de51-cb56-4b22-9b3f-72f33e2fe91d"],
+Cell[454431, 12561, 406, 11, 49, "Output",ExpressionUUID->"e34418a3-f287-4a25-be8b-b35bb3ba3b75"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[454874, 12577, 356, 9, 30, "Input",ExpressionUUID->"a15db554-c750-416a-bf8e-43f7fa7fe829"],
+Cell[455233, 12588, 278, 5, 34, "Output",ExpressionUUID->"82c233c3-0b0a-4a45-b5b8-037c03555249"]
+}, Open  ]],
+Cell[455526, 12596, 1356, 32, 94, "Input",ExpressionUUID->"13982953-6398-495a-82b4-9ddfe24a4bd0"],
+Cell[456885, 12630, 152, 3, 30, "Input",ExpressionUUID->"3b604925-2d87-477a-bbab-bc72b933b86f"],
+Cell[CellGroupData[{
+Cell[457062, 12637, 1297, 27, 52, "Input",ExpressionUUID->"be40774a-645c-401d-8678-e778f53524dc"],
+Cell[458362, 12666, 1028, 24, 56, "Output",ExpressionUUID->"d057959b-fd6e-407e-a0d3-91ee53705fdb"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[459427, 12695, 229, 4, 30, "Input",ExpressionUUID->"b635f1ba-43a8-4c64-8caf-41485e8e6349"],
+Cell[459659, 12701, 292, 9, 54, "Output",ExpressionUUID->"ab0d6b89-a1b1-46d4-a6ce-1e0b2b245a9b"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[459988, 12715, 179, 3, 30, "Input",ExpressionUUID->"5b4e5bfd-5043-4c2d-9f8e-3843d808a535"],
+Cell[460170, 12720, 313, 10, 54, "Output",ExpressionUUID->"7c43f9c1-01c0-4b8a-9438-16c48fc51e47"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[460520, 12735, 180, 3, 30, "Input",ExpressionUUID->"309b1dba-9aff-4ed0-af22-d4ab58554b8a"],
+Cell[460703, 12740, 1138, 39, 59, "Output",ExpressionUUID->"f750153f-f59e-4943-8b0c-9ba1d1f0930f"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[461878, 12784, 180, 3, 30, "Input",ExpressionUUID->"a01ded67-4f83-4bf3-a6a9-6a26bb859e2b"],
+Cell[462061, 12789, 1158, 40, 59, "Output",ExpressionUUID->"92916bb6-be68-46d5-9db8-ffc0d29947f0"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[463256, 12834, 244, 5, 30, "Input",ExpressionUUID->"e28d7b30-a554-477f-831b-c87e01beca4d"],
+Cell[463503, 12841, 203, 4, 34, "Output",ExpressionUUID->"0ca7de0d-d882-4ed8-8d04-fc4574b40098"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[463743, 12850, 825, 20, 30, "Input",ExpressionUUID->"04d4dbd7-9c46-485e-9f84-becb80b9d603"],
+Cell[464571, 12872, 341, 9, 34, "Output",ExpressionUUID->"79e04ef4-1b59-4535-992c-e4424203720a"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[464949, 12886, 723, 18, 30, "Input",ExpressionUUID->"6ecab3de-355f-4fd7-a4bd-167b5ec80b28"],
+Cell[465675, 12906, 301, 7, 34, "Output",ExpressionUUID->"858cefaf-42e8-42f3-9ed9-cb66408eea6e"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[466013, 12918, 3318, 99, 304, "Input",ExpressionUUID->"e7aff029-b2d6-497e-8d41-fe171c216a43"],
+Cell[469334, 13019, 495, 13, 54, "Output",ExpressionUUID->"8a0962be-605f-4f68-8afd-f3832246e4b6"],
+Cell[469832, 13034, 476, 12, 54, "Output",ExpressionUUID->"45641c61-b419-4a5d-844e-cda62d80939b"],
+Cell[470311, 13048, 453, 11, 54, "Output",ExpressionUUID->"28740e7a-3602-491c-a46f-a2287e2eb0d6"]
+}, Open  ]]
+}
+]
+*)
+
diff --git a/scripts/X_LoopRefining.nb b/scripts/X_LoopRefining.nb
new file mode 100644
index 00000000..66b13870
--- /dev/null
+++ b/scripts/X_LoopRefining.nb
@@ -0,0 +1,102934 @@
+(* Content-type: application/vnd.wolfram.mathematica *)
+
+(*** Wolfram Notebook File ***)
+(* http://www.wolfram.com/nb *)
+
+(* CreatedBy='Mathematica 11.3' *)
+
+(*CacheID: 234*)
+(* Internal cache information:
+NotebookFileLineBreakTest
+NotebookFileLineBreakTest
+NotebookDataPosition[       158,          7]
+NotebookDataLength[   4726639,     102926]
+NotebookOptionsPosition[   4684580,     102379]
+NotebookOutlinePosition[   4684933,     102395]
+CellTagsIndexPosition[   4684890,     102392]
+WindowFrame->Normal*)
+
+(* Beginning of Notebook Content *)
+Notebook[{
+Cell[BoxData[
+ RowBox[{"(*", " ", 
+  RowBox[{
+   RowBox[{
+    RowBox[{
+     RowBox[{"ggHgg_X", ".", "m"}], "\[IndentingNewLine]", " ", 
+     RowBox[{"Process", ":", " ", 
+      RowBox[{"g", " ", "+", " ", "g"}]}]}], " ", "\[Rule]", " ", 
+    RowBox[{"H", " ", "+", " ", "g", " ", "+", " ", 
+     RowBox[{"g", "\[IndentingNewLine]", 
+      RowBox[{"Model", ":", " ", "SMQCD"}]}]}]}], ",", " ", 
+   RowBox[{
+   "Last", " ", "Modified", " ", "June", " ", "2019", "\[IndentingNewLine]", 
+    "Created", " ", 
+    RowBox[{"by", ":", " ", 
+     RowBox[{
+      RowBox[{"J", ".", "G", ".", "Reyes"}], " ", "Rivera"}]}]}]}], " ", 
+  "*)"}]], "Input",
+ CellChangeTimes->{{3.7483460640690107`*^9, 3.748346128736135*^9}, {
+  3.7505322064466867`*^9, 3.7505322096193037`*^9}, {3.750685818525031*^9, 
+  3.7506858187985888`*^9}, {3.750685862467576*^9, 3.750685862527199*^9}, {
+  3.7513081531132383`*^9, 3.751308157253491*^9}, {3.761295781705222*^9, 
+  3.761295787067747*^9}, {3.7640060179701233`*^9, 3.7640060182815123`*^9}, {
+  3.769416168255188*^9, 
+  3.769416171052967*^9}},ExpressionUUID->"a9eb43f9-c437-4ff0-ae8b-\
+eb31f4d06b38"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{
+ RowBox[{"Needs", "[", "\"\<X`\>\"", "]"}], "\n", 
+ RowBox[{"<<", "FA2X.m"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"SetDirectory", "[", 
+   RowBox[{"NotebookDirectory", "[", "]"}], "]"}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{"NotebookSave", "[", "]"}]}], "Input",
+ CellChangeTimes->{{3.7694157567375174`*^9, 3.7694157651420507`*^9}, {
+  3.7694161379556293`*^9, 3.769416138416831*^9}, {3.7694161826886263`*^9, 
+  3.769416192145475*^9}, {3.769416241287668*^9, 3.769416242139756*^9}, {
+  3.769421884524377*^9, 3.769421889789727*^9}},
+ CellLabel->"In[5]:=",ExpressionUUID->"aa6e76d2-ec10-49c0-b6e0-1dd4d91b1a18"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["\<\"\\!\\(\\*TemplateBox[List[\\\"\\\\\\\"Package-X v2.1.1, by \
+Hiren H. Patel\\\\\\\\nFor more information, see the \\\\\\\"\\\", \
+TemplateBox[List[\\\"\\\\\\\"guide\\\\\\\"\\\", \\\"paclet:X/guide/PackageX\\\
+\"], \\\"HyperlinkPaclet\\\"]], \\\"RowDefault\\\"]\\)\"\>"], "Print",
+ CellChangeTimes->{
+  3.769416150674975*^9, 3.769416194267857*^9, {3.769416231919112*^9, 
+   3.7694162425484037`*^9}, {3.769420646545596*^9, 3.7694206583152533`*^9}, 
+   3.769425025413766*^9, 3.769945290179131*^9, 3.7699517202962923`*^9, 
+   3.7699519650062838`*^9, 3.770010676869535*^9, {3.770096629754195*^9, 
+   3.7700966433220797`*^9}, 3.772884479178385*^9, 3.7728856240450077`*^9, 
+   3.77288581666254*^9, 3.7728886845903807`*^9, 3.772964841769395*^9, 
+   3.773141652951313*^9, 3.773740327500822*^9, 3.774370903034319*^9, 
+   3.774370966666355*^9, 3.7752319005419207`*^9, 3.7752337152035227`*^9, 
+   3.775489088564049*^9, 3.775489245308648*^9, 3.7754897453429413`*^9, 
+   3.7754904657230673`*^9, 3.775821105497553*^9, {3.775823186450994*^9, 
+   3.775823195188353*^9}, 3.775826214916897*^9, 3.775827858966928*^9, 
+   3.7758411073958178`*^9, 3.775926802671126*^9, 3.775927750035071*^9, 
+   3.775932731190497*^9, 3.7759341459918737`*^9, 3.77593515116796*^9, 
+   3.775936044112349*^9, 3.7760066135848923`*^9, 3.7760084074827023`*^9, 
+   3.776163794536191*^9, 3.776164765694577*^9, 3.776165477011409*^9, 
+   3.7761725151431007`*^9, 3.776439045651415*^9, 3.776442806151732*^9, 
+   3.776704970731813*^9, 3.7767651458445473`*^9, 3.776769048440855*^9, 
+   3.7767696718636227`*^9, 3.776769782959084*^9, 3.77677107630024*^9, 
+   3.7767848686859093`*^9, 3.7770392950048313`*^9, 3.778239119647573*^9, 
+   3.77851079981749*^9},
+ CellLabel->
+  "During evaluation of \
+In[5]:=",ExpressionUUID->"9d8d0d32-258e-459a-8da1-f1a084891668"],
+
+Cell[BoxData["\<\"FA2X by Kirtimaan Mohan \\n email: kamohan@msu.edu \\n \
+version 1.1 \\n 10/03/2019 \\n Not optimized! Possibly lots of bugs!!!\"\>"], \
+"Print",
+ CellChangeTimes->{
+  3.769416150674975*^9, 3.769416194267857*^9, {3.769416231919112*^9, 
+   3.7694162425484037`*^9}, {3.769420646545596*^9, 3.7694206583152533`*^9}, 
+   3.769425025413766*^9, 3.769945290179131*^9, 3.7699517202962923`*^9, 
+   3.7699519650062838`*^9, 3.770010676869535*^9, {3.770096629754195*^9, 
+   3.7700966433220797`*^9}, 3.772884479178385*^9, 3.7728856240450077`*^9, 
+   3.77288581666254*^9, 3.7728886845903807`*^9, 3.772964841769395*^9, 
+   3.773141652951313*^9, 3.773740327500822*^9, 3.774370903034319*^9, 
+   3.774370966666355*^9, 3.7752319005419207`*^9, 3.7752337152035227`*^9, 
+   3.775489088564049*^9, 3.775489245308648*^9, 3.7754897453429413`*^9, 
+   3.7754904657230673`*^9, 3.775821105497553*^9, {3.775823186450994*^9, 
+   3.775823195188353*^9}, 3.775826214916897*^9, 3.775827858966928*^9, 
+   3.7758411073958178`*^9, 3.775926802671126*^9, 3.775927750035071*^9, 
+   3.775932731190497*^9, 3.7759341459918737`*^9, 3.77593515116796*^9, 
+   3.775936044112349*^9, 3.7760066135848923`*^9, 3.7760084074827023`*^9, 
+   3.776163794536191*^9, 3.776164765694577*^9, 3.776165477011409*^9, 
+   3.7761725151431007`*^9, 3.776439045651415*^9, 3.776442806151732*^9, 
+   3.776704970731813*^9, 3.7767651458445473`*^9, 3.776769048440855*^9, 
+   3.7767696718636227`*^9, 3.776769782959084*^9, 3.77677107630024*^9, 
+   3.7767848686859093`*^9, 3.7770392950048313`*^9, 3.778239119647573*^9, 
+   3.778510799831684*^9},
+ CellLabel->
+  "During evaluation of \
+In[5]:=",ExpressionUUID->"52438396-54ab-417c-b161-36fd4cadc0e5"]
+}, Open  ]]
+}, Open  ]],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"$Assumptions", "=", 
+   RowBox[{"{", 
+    RowBox[{
+     RowBox[{"Element", "[", 
+      RowBox[{
+       RowBox[{"{", 
+        RowBox[{
+        "ki", ",", "k1", ",", "k2", ",", "k3", ",", "k4", ",", " ", 
+         "\[Theta]1", ",", "\[Theta]2", ",", "\[Theta]3", ",", "\[Theta]4", 
+         ",", " ", "\[Phi]1", ",", "\[Phi]2", ",", "\[Phi]3", ",", "\[Phi]4", 
+         ",", "p", ",", "MT2", ",", "GS", ",", "EL", ",", "Alfas", ",", "a1", 
+         ",", "S", ",", "T", ",", "U", ",", "MT", ",", "MH", ",", "MH2", ",", 
+         "\[Eta]4", ",", "\[Eta]3", ",", "\[Beta]"}], "}"}], ",", "Reals"}], 
+      "]"}], ",", 
+     RowBox[{"ki", ">", "0"}], " ", ",", 
+     RowBox[{"MT2", ">", "0"}], ",", 
+     RowBox[{"MT", ">", "0"}], ",", 
+     RowBox[{"MH2", ">", "0"}], ",", " ", 
+     RowBox[{"MH", ">", "0"}], ",", 
+     RowBox[{"k4", ">", "0"}], ",", 
+     RowBox[{"p", ">", "0"}], ",", 
+     RowBox[{"k3", ">", "0"}], ",", 
+     RowBox[{"k1", ">", "0"}], ",", 
+     RowBox[{"k2", ">", "0"}], ",", 
+     RowBox[{"rS", ">", "0"}], ",", 
+     RowBox[{"kT4", ">", "0"}], ",", 
+     RowBox[{"kT3", ">", "0"}], ",", 
+     RowBox[{"\[Beta]", ">", "0"}]}], "}"}]}], ";"}]], "Input",
+ CellChangeTimes->{3.7767696725954723`*^9},
+ CellLabel->"In[9]:=",ExpressionUUID->"1c12ba0e-fd6c-4b7e-8de6-2b784fa72d92"],
+
+Cell[BoxData[{
+ RowBox[{
+  RowBox[{
+   RowBox[{"SubDen", ":=", 
+    RowBox[{"{", "\[IndentingNewLine]", 
+     RowBox[{
+      RowBox[{
+       RowBox[{"Den", "[", 
+        RowBox[{"a_", ",", "b_"}], "]"}], ":>", 
+       RowBox[{"1", "/", 
+        RowBox[{"(", 
+         RowBox[{"a", "-", "b"}], ")"}]}]}], ",", "\[IndentingNewLine]", 
+      RowBox[{"MH2", "\[Rule]", 
+       RowBox[{"MH", "^", "2"}]}], ",", "\[IndentingNewLine]", 
+      RowBox[{"MT2", "\[Rule]", 
+       RowBox[{"MT", "^", "2"}]}], ",", "\[IndentingNewLine]", 
+      RowBox[{"Alfas2", "\[Rule]", 
+       RowBox[{"Alfas", "^", "2"}]}]}], "\[IndentingNewLine]", "}"}]}], ";"}],
+   "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{
+   RowBox[{"MAT", ":=", 
+    RowBox[{"{", "\[IndentingNewLine]", 
+     RowBox[{
+      RowBox[{
+       RowBox[{"Mat", "[", 
+        RowBox[{"SUNT", "[", 
+         RowBox[{
+         "Glu1", ",", "Glu5", ",", "Glu2", ",", "Glu4", ",", "0", ",", "0"}], 
+         "]"}], "]"}], "\[Rule]", "A"}], ",", "\[IndentingNewLine]", 
+      RowBox[{
+       RowBox[{"Mat", "[", 
+        RowBox[{"SUNT", "[", 
+         RowBox[{
+         "Glu1", ",", "Glu4", ",", "Glu5", ",", "Glu2", ",", "0", ",", "0"}], 
+         "]"}], "]"}], "\[Rule]", "B"}], ",", "\[IndentingNewLine]", 
+      RowBox[{
+       RowBox[{"Mat", "[", 
+        RowBox[{"SUNT", "[", 
+         RowBox[{
+         "Glu1", ",", "Glu2", ",", "Glu5", ",", "Glu4", ",", "0", ",", "0"}], 
+         "]"}], "]"}], "\[Rule]", "C"}], ",", "\[IndentingNewLine]", 
+      RowBox[{
+       RowBox[{"Mat", "[", 
+        RowBox[{"SUNT", "[", 
+         RowBox[{
+         "Glu1", ",", "Glu4", ",", "Glu2", ",", "Glu5", ",", "0", ",", "0"}], 
+         "]"}], "]"}], "\[Rule]", "D"}], ",", "\[IndentingNewLine]", 
+      RowBox[{
+       RowBox[{"Mat", "[", 
+        RowBox[{"SUNT", "[", 
+         RowBox[{
+         "Glu1", ",", "Glu5", ",", "Glu4", ",", "Glu2", ",", "0", ",", "0"}], 
+         "]"}], "]"}], "\[Rule]", "F"}], ",", "\[IndentingNewLine]", 
+      RowBox[{
+       RowBox[{"Mat", "[", 
+        RowBox[{"SUNT", "[", 
+         RowBox[{
+         "Glu1", ",", "Glu2", ",", "Glu4", ",", "Glu5", ",", "0", ",", "0"}], 
+         "]"}], "]"}], "\[Rule]", "G"}]}], "\[IndentingNewLine]", "}"}]}], 
+   ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{
+   RowBox[{"MATColor", ":=", 
+    RowBox[{"{", "\[IndentingNewLine]", "\[IndentingNewLine]", 
+     RowBox[{
+      RowBox[{"A", "\[Rule]", "c3"}], " ", 
+      RowBox[{"(*", 
+       RowBox[{"Mat", "[", 
+        RowBox[{"SUNT", "[", 
+         RowBox[{
+         "Glu1", ",", "Glu5", ",", "Glu2", ",", "Glu4", ",", "0", ",", "0"}], 
+         "]"}], "]"}], "*)"}], ",", "\[IndentingNewLine]", 
+      RowBox[{"B", "\[Rule]", "c2"}], " ", 
+      RowBox[{"(*", 
+       RowBox[{"Mat", "[", 
+        RowBox[{"SUNT", "[", 
+         RowBox[{
+         "Glu1", ",", "Glu4", ",", "Glu5", ",", "Glu2", ",", "0", ",", "0"}], 
+         "]"}], "]"}], "*)"}], ",", "\[IndentingNewLine]", 
+      RowBox[{"C", "\[Rule]", "c2"}], " ", 
+      RowBox[{"(*", 
+       RowBox[{"Mat", "[", 
+        RowBox[{"SUNT", "[", 
+         RowBox[{
+         "Glu1", ",", "Glu2", ",", "Glu5", ",", "Glu4", ",", "0", ",", "0"}], 
+         "]"}], "]"}], "*)"}], ",", "\[IndentingNewLine]", 
+      RowBox[{"D", "\[Rule]", "c3"}], " ", 
+      RowBox[{"(*", 
+       RowBox[{"Mat", "[", 
+        RowBox[{"SUNT", "[", 
+         RowBox[{
+         "Glu1", ",", "Glu4", ",", "Glu2", ",", "Glu5", ",", "0", ",", "0"}], 
+         "]"}], "]"}], "*)"}], ",", "\[IndentingNewLine]", 
+      RowBox[{"F", "\[Rule]", "c1"}], " ", 
+      RowBox[{"(*", 
+       RowBox[{"Mat", "[", 
+        RowBox[{"SUNT", "[", 
+         RowBox[{
+         "Glu1", ",", "Glu5", ",", "Glu4", ",", "Glu2", ",", "0", ",", "0"}], 
+         "]"}], "]"}], "*)"}], ",", "\[IndentingNewLine]", 
+      RowBox[{"G", "\[Rule]", "c1"}]}], 
+     RowBox[{"(*", " ", 
+      RowBox[{"Mat", "[", 
+       RowBox[{"SUNT", "[", 
+        RowBox[{
+        "Glu1", ",", "Glu2", ",", "Glu4", ",", "Glu5", ",", "0", ",", "0"}], 
+        "]"}], "]"}], "*)"}], "\[IndentingNewLine]", "}"}]}], ";"}], 
+  "\[IndentingNewLine]", "\[IndentingNewLine]", 
+  RowBox[{"(*", " ", 
+   RowBox[{
+   "This", " ", "one", " ", "is", " ", "used", " ", "for", " ", "triangle", 
+    " ", "diagrams"}], " ", "*)"}]}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{
+   RowBox[{"LoopRefining", ":=", "\[IndentingNewLine]", 
+    RowBox[{"{", "\[IndentingNewLine]", 
+     RowBox[{
+      RowBox[{
+       RowBox[{"a_", "*", 
+        RowBox[{"PVB", "[", 
+         RowBox[{"r_", ",", "n1_", ",", "s_", ",", "m0_", ",", "m1_"}], 
+         "]"}]}], "\[RuleDelayed]", 
+       RowBox[{"a", "*", 
+        RowBox[{"LoopRefine", "[", 
+         RowBox[{"PVB", "[", 
+          RowBox[{"r", ",", "n1", ",", "s", ",", "m0", ",", "m1"}], "]"}], 
+         "]"}]}]}], ",", 
+      RowBox[{
+       RowBox[{"PVB", "[", 
+        RowBox[{"r_", ",", "n1_", ",", "s_", ",", "m0_", ",", "m1_"}], "]"}], 
+       "\[RuleDelayed]", 
+       RowBox[{"LoopRefine", "[", 
+        RowBox[{"PVB", "[", 
+         RowBox[{"r", ",", "n1", ",", "s", ",", "m0", ",", "m1"}], "]"}], 
+        "]"}]}], ",", "\[IndentingNewLine]", "\[IndentingNewLine]", 
+      RowBox[{
+       RowBox[{"a_", "*", 
+        RowBox[{"PVC", "[", 
+         RowBox[{
+         "r_", ",", "n1_", ",", "n2_", ",", "s1_", ",", "s12_", ",", "s2_", 
+          ",", "m0_", ",", "m1_", ",", "m2_"}], "]"}]}], "\[RuleDelayed]", 
+       RowBox[{"a", "*", 
+        RowBox[{"LoopRefine", "[", 
+         RowBox[{"PVC", "[", 
+          RowBox[{
+          "r", ",", "n1", ",", "n2", ",", "s1", ",", "s12", ",", "s2", ",", 
+           "m0", ",", "m1", ",", "m2"}], "]"}], "]"}]}]}], ",", 
+      RowBox[{
+       RowBox[{"PVC", "[", 
+        RowBox[{
+        "r_", ",", "n1_", ",", "n2_", ",", "s1_", ",", "s12_", ",", "s2_", 
+         ",", "m0_", ",", "m1_", ",", "m2_"}], "]"}], "\[RuleDelayed]", 
+       RowBox[{"LoopRefine", "[", 
+        RowBox[{"PVC", "[", 
+         RowBox[{
+         "r", ",", "n1", ",", "n2", ",", "s1", ",", "s12", ",", "s2", ",", 
+          "m0", ",", "m1", ",", "m2"}], "]"}], "]"}]}], ",", 
+      "\[IndentingNewLine]", "\[IndentingNewLine]", 
+      RowBox[{
+       RowBox[{"a_", "*", 
+        RowBox[{"PVD", "[", 
+         RowBox[{
+         "r_", ",", "n1_", ",", "n2_", ",", "n3_", ",", "s1_", ",", "s2_", 
+          ",", "s3_", ",", "s4_", ",", "s12_", ",", "s23_", ",", "m0_", ",", 
+          "m1_", ",", "m2_", ",", "m3_"}], "]"}]}], "\[RuleDelayed]", " ", 
+       RowBox[{"a", "*", 
+        RowBox[{"LoopRefine", "[", 
+         RowBox[{"PVD", "[", 
+          RowBox[{
+          "r", ",", "n1", ",", "n2", ",", "n3", ",", "s1", ",", "s2", ",", 
+           "s3", ",", "s4", ",", "s12", ",", "s23", ",", "m0", ",", "m1", ",",
+            "m2", ",", "m3"}], "]"}], "]"}]}]}], ",", 
+      RowBox[{
+       RowBox[{"PVD", "[", 
+        RowBox[{
+        "r_", ",", "n1_", ",", "n2_", ",", "n3_", ",", "s1_", ",", "s2_", ",",
+          "s3_", ",", "s4_", ",", "s12_", ",", "s23_", ",", "m0_", ",", "m1_",
+          ",", "m2_", ",", "m3_"}], "]"}], "\[RuleDelayed]", " ", 
+       RowBox[{"LoopRefine", "[", 
+        RowBox[{"PVD", "[", 
+         RowBox[{
+         "r", ",", "n1", ",", "n2", ",", "n3", ",", "s1", ",", "s2", ",", 
+          "s3", ",", "s4", ",", "s12", ",", "s23", ",", "m0", ",", "m1", ",", 
+          "m2", ",", "m3"}], "]"}], "]"}]}]}], "\[IndentingNewLine]", "}"}]}],
+    ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]", 
+  RowBox[{"(*", " ", 
+   RowBox[{
+   "This", " ", "one", " ", "is", " ", "used", " ", "for", " ", 
+    "ReplacementRule", " ", 
+    RowBox[{"(", "boxes", ")"}]}], " ", "*)"}]}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"LoopRef", " ", ":=", "\[IndentingNewLine]", 
+   RowBox[{"{", "\[IndentingNewLine]", 
+    RowBox[{
+     RowBox[{
+      RowBox[{
+       RowBox[{"PVC", "[", 
+        RowBox[{
+        "r_", ",", "n1_", ",", "n2_", ",", "s1_", ",", "s12_", ",", "s2_", 
+         ",", "m0_", ",", "m1_", ",", "m2_"}], "]"}], "\[RuleDelayed]", 
+       RowBox[{"LoopRefine", "[", 
+        RowBox[{"PVC", "[", 
+         RowBox[{
+         "r", ",", "n1", ",", "n2", ",", "a", ",", "b", ",", "c", ",", "d", 
+          ",", "e", ",", "f"}], "]"}], "]"}]}], "//.", " ", 
+      RowBox[{"{", 
+       RowBox[{
+        RowBox[{"a", "\[Rule]", "s1"}], ",", 
+        RowBox[{"b", "\[Rule]", "s12"}], ",", 
+        RowBox[{"c", "\[Rule]", "s2"}], ",", 
+        RowBox[{"d", "\[Rule]", "m0"}], ",", 
+        RowBox[{"e", "\[Rule]", "m1"}], ",", 
+        RowBox[{"f", "\[Rule]", "m2"}]}], "}"}]}], ",", "\[IndentingNewLine]", 
+     RowBox[{
+      RowBox[{
+       RowBox[{"PVD", "[", 
+        RowBox[{
+        "r_", ",", "n1_", ",", "n2_", ",", "n3_", ",", "s1_", ",", "s2_", ",",
+          "s3_", ",", "s4_", ",", "s12_", ",", "s23_", ",", "m0_", ",", "m1_",
+          ",", "m2_", ",", "m3_"}], "]"}], "\[RuleDelayed]", " ", 
+       RowBox[{"LoopRefine", "[", 
+        RowBox[{"PVD", "[", 
+         RowBox[{
+         "r", ",", "n1", ",", "n2", ",", "n3", ",", "a", ",", "b", ",", "c", 
+          ",", "d", ",", "e", ",", "f", ",", "g", ",", "g", ",", "g", ",", 
+          "g"}], "]"}], "]"}]}], "//.", " ", 
+      RowBox[{"{", 
+       RowBox[{
+        RowBox[{"a", "->", "s1"}], ",", 
+        RowBox[{"b", "->", "s2"}], ",", 
+        RowBox[{"c", "->", "s3"}], ",", 
+        RowBox[{"d", "->", "s4"}], ",", 
+        RowBox[{"e", "->", "s12"}], ",", 
+        RowBox[{"f", "->", "s23"}], ",", 
+        RowBox[{"g", "->", "m0"}]}], "}"}]}]}], "\[IndentingNewLine]", 
+    "}"}]}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", 
+ RowBox[{"VelSub", ":=", "\[IndentingNewLine]", 
+  RowBox[{"{", "\[IndentingNewLine]", 
+   RowBox[{"S", "\[Rule]", 
+    RowBox[{"(", 
+     RowBox[{"4", "*", 
+      RowBox[{"MT", "^", "2"}], "*", 
+      RowBox[{"(", 
+       RowBox[{"1", "/", 
+        RowBox[{"(", 
+         RowBox[{"1", "-", 
+          RowBox[{"\[Beta]", "^", "2"}]}], ")"}]}], ")"}]}], ")"}]}], 
+   "\[IndentingNewLine]", "}"}]}]}], "Input",
+ CellChangeTimes->{{3.769416382706212*^9, 3.769416403306004*^9}, {
+   3.7694168727346354`*^9, 3.769416881103343*^9}, {3.769420802600919*^9, 
+   3.769420810995673*^9}, {3.770096644875188*^9, 3.770096645965609*^9}, {
+   3.7758210651486483`*^9, 3.7758210658132687`*^9}, {3.77582111300533*^9, 
+   3.775821113279359*^9}, {3.775821205496907*^9, 3.7758212488675423`*^9}, 
+   3.7758233050860357`*^9, {3.775824239182519*^9, 3.775824245114826*^9}, {
+   3.775825392549559*^9, 3.7758254194463997`*^9}, {3.7758254536359*^9, 
+   3.775825506891447*^9}, {3.776769783675538*^9, 3.7767697849573727`*^9}},
+ CellLabel->"In[10]:=",ExpressionUUID->"a5c5e12e-157e-4719-b09d-930d037e0d1b"],
+
+Cell[BoxData[""], "Input",
+ CellChangeTimes->{{3.7723616669772577`*^9, 3.77236173423746*^9}, {
+   3.772361802632022*^9, 3.772361992535933*^9}, {3.772362060474169*^9, 
+   3.772362061390603*^9}, {3.772363406580842*^9, 3.772363416170678*^9}, {
+   3.77288530089063*^9, 3.772885309640726*^9}, 
+   3.775821111773324*^9},ExpressionUUID->"7741718d-edbc-49e5-a241-\
+fb84c7107f7d"],
+
+Cell[BoxData[{
+ RowBox[{
+  RowBox[{"triangle", " ", "=", " ", 
+   RowBox[{"Import", "[", "\"\<ggHgg_triangle_FeynAmp_38diags.m\>\"", "]"}]}],
+   ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"triangle", " ", "=", " ", 
+   RowBox[{
+    RowBox[{
+     RowBox[{"triangle", " ", "//.", "MAT"}], "//.", " ", "MATColor"}], " ", "//.",
+     " ", "SubDen"}]}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"t", " ", "=", " ", 
+   RowBox[{"Collect", "[", 
+    RowBox[{
+     RowBox[{"ReleaseHold", "[", 
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"(", 
+         RowBox[{"HoldForm", "[", 
+          RowBox[{"Evaluate", "[", "triangle", "]"}], "]"}], " ", ")"}], "//.",
+         " ", "RIntList"}], ")"}], "]"}], ",", 
+     RowBox[{"Mat", "[", "__", "]"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"ft", "=", 
+   RowBox[{
+    RowBox[{"t", "//.", "LoopRefining"}], "//", "Refine"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"Export", "[", 
+   RowBox[{"\"\<ggHgg_LR_triangle_38diags.m\>\"", ",", "ft"}], "]"}], 
+  ";"}], "\[IndentingNewLine]"}], "Input",
+ CellChangeTimes->{{3.76941678968123*^9, 3.769416834146682*^9}, {
+   3.769418270698312*^9, 3.7694182769864492`*^9}, {3.769420598958762*^9, 
+   3.769420642106495*^9}, {3.769421602470723*^9, 3.769421736756125*^9}, {
+   3.77374127963312*^9, 3.77374128280485*^9}, 3.7737414197690268`*^9, {
+   3.7743709763737383`*^9, 3.774370977433639*^9}, 3.774371636070733*^9, {
+   3.775823239864522*^9, 3.775823240880198*^9}, {3.775823320902609*^9, 
+   3.7758233229064703`*^9}},
+ CellLabel->"In[21]:=",ExpressionUUID->"6f54e202-a28b-4a1d-9e81-76bb7154ddaa"],
+
+Cell[BoxData[{
+ RowBox[{
+  RowBox[{"box", "=", 
+   RowBox[{"{", 
+    RowBox[{"box1", ",", "box2", ",", "box3", ",", "box4"}], "}"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"Do", "[", "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{
+     RowBox[{
+      RowBox[{"box", "[", 
+       RowBox[{"[", "n", "]"}], "]"}], "=", 
+      RowBox[{"Import", "[", 
+       RowBox[{"\"\<ggHgg_box_\>\"", "<>", 
+        RowBox[{"ToString", "[", "n", "]"}], "<>", 
+        "\"\<_FeynAmp_9diags.m\>\""}], "]"}]}], ";", "\[IndentingNewLine]", 
+     RowBox[{
+      RowBox[{"box", "[", 
+       RowBox[{"[", "n", "]"}], "]"}], "=", 
+      RowBox[{
+       RowBox[{
+        RowBox[{
+         RowBox[{"box", "[", 
+          RowBox[{"[", "n", "]"}], "]"}], "//.", " ", "MAT"}], "//.", 
+        "MATColor"}], "//.", "SubDen"}]}], ";", "\[IndentingNewLine]", 
+     RowBox[{"b", " ", "=", " ", 
+      RowBox[{"Collect", "[", 
+       RowBox[{
+        RowBox[{"ReleaseHold", "[", 
+         RowBox[{"(", 
+          RowBox[{
+           RowBox[{"(", 
+            RowBox[{"HoldForm", "[", 
+             RowBox[{"Evaluate", "[", 
+              RowBox[{"box", "[", 
+               RowBox[{"[", "n", "]"}], "]"}], "]"}], "]"}], " ", ")"}], "//.",
+            " ", "RIntList"}], ")"}], "]"}], ",", 
+        RowBox[{"Mat", "[", "__", "]"}]}], "]"}]}], ";", 
+     "\[IndentingNewLine]", 
+     RowBox[{"filename", " ", "=", " ", 
+      RowBox[{"\"\<ggHgg_PV_box_\>\"", "<>", 
+       RowBox[{"ToString", "[", "n", "]"}], "<>", "\"\<_9diags.m\>\""}]}], 
+     ";", "\[IndentingNewLine]", 
+     RowBox[{"Export", "[", 
+      RowBox[{"filename", ",", "b"}], "]"}], ";"}], "\[IndentingNewLine]", 
+    ",", 
+    RowBox[{"{", 
+     RowBox[{"n", ",", 
+      RowBox[{"Length", "[", "box", "]"}]}], "}"}]}], "]"}], ";"}]}], "Input",\
+
+ CellChangeTimes->{{3.7694219183728037`*^9, 3.769422297489303*^9}, {
+  3.769504882360436*^9, 3.769505019090507*^9}, {3.7695050585606737`*^9, 
+  3.769505063515582*^9}, {3.7695052102138042`*^9, 3.769505310153926*^9}, {
+  3.769505369005875*^9, 3.769505412252503*^9}, {3.7695054443825073`*^9, 
+  3.769505451983782*^9}, {3.769945660459434*^9, 3.769945679750164*^9}, {
+  3.769946200836536*^9, 3.769946269671582*^9}, {3.773741404418676*^9, 
+  3.773741405540168*^9}, {3.775825886751739*^9, 3.775825889636293*^9}},
+ CellLabel->"In[11]:=",ExpressionUUID->"51e1abda-d831-4042-bf3b-c17c153412bc"],
+
+Cell[BoxData[
+ RowBox[{"\[IndentingNewLine]", 
+  RowBox[{"(*", " ", 
+   RowBox[{"Here", " ", "the", " ", "program", " ", 
+    RowBox[{"pv", ".", "py"}], " ", "is", " ", "used", " ", "to", " ", 
+    "produce", " ", "the", " ", "files", " ", "output", 
+    RowBox[{"#", ".", "m"}]}], " ", "*)"}], "\[IndentingNewLine]", 
+  RowBox[{"(*", " ", 
+   RowBox[{"Do", ":", "\[IndentingNewLine]", "      ", 
+    RowBox[{
+     RowBox[{"python", " ", 
+      RowBox[{"pv", ".", "py"}], " ", "\"\<ggHgg_PV_#_9diags.m\>\""}], " ", 
+     "|", " ", 
+     RowBox[{
+      RowBox[{"sort", " ", "-", "u"}], " ", ">", " ", 
+      RowBox[{"output", 
+       RowBox[{"#", ".", "m"}], "       ", 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{"manually", " ", "change", " ", "#", " ", "for", " ", "1"}], 
+         ",", "2", ",", "3", ",", "4"}], ")"}], " ", "\[IndentingNewLine]", 
+       "   ", "cat", " ", 
+       RowBox[{"output1", ".", "m"}], " ", 
+       RowBox[{"output2", ".", "m"}], " ", 
+       RowBox[{"output3", ".", "m"}], " ", 
+       RowBox[{"output4", ".", "m"}]}]}], " ", "|", " ", 
+     RowBox[{
+      RowBox[{"sort", " ", "-", "u"}], " ", ">", " ", 
+      RowBox[{"allPVs", ".", "m"}]}]}]}], "\[IndentingNewLine]", 
+   "*)"}]}]], "Input",
+ CellChangeTimes->{{3.769951408543744*^9, 3.769951516031106*^9}, {
+  3.770009459536234*^9, 3.770009522564651*^9}, {3.775826780721582*^9, 
+  3.775826781197331*^9}, {3.778510819803602*^9, 
+  3.778510820329376*^9}},ExpressionUUID->"476a37c6-482c-4f61-9ced-\
+5d80a625711e"],
+
+Cell[BoxData[
+ RowBox[{"(*", " ", 
+  RowBox[{
+   RowBox[{"438", " ", "unique", " ", "expressions"}], "..."}], " ", 
+  "*)"}]], "Input",
+ CellChangeTimes->{{3.770010869763611*^9, 
+  3.770010879310418*^9}},ExpressionUUID->"705b77c9-9d55-4c91-a174-\
+596c11435d8d"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[{
+ RowBox[{
+  RowBox[{"listPV", "=", 
+   RowBox[{"ToExpression", "[", 
+    RowBox[{"Import", "[", 
+     RowBox[{"\"\<allPVs.m\>\"", ",", "\"\<Lines\>\""}], "]"}], "]"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{"Length", "[", "listPV", "]"}]}], "Input",
+ CellChangeTimes->{{3.769946457030057*^9, 3.769946510878006*^9}, {
+   3.7699501822216883`*^9, 3.769950241652359*^9}, {3.769950448721727*^9, 
+   3.769950557949745*^9}, {3.769950617170197*^9, 3.769950624920703*^9}, {
+   3.769950677394843*^9, 3.769950679542734*^9}, {3.769950710781026*^9, 
+   3.769950747626449*^9}, {3.769951294077387*^9, 3.769951300057988*^9}, {
+   3.7699513329326878`*^9, 3.769951349592226*^9}, {3.770009442006164*^9, 
+   3.770009456522052*^9}, 3.770009533388871*^9, {3.770010860120204*^9, 
+   3.770010860297134*^9}},
+ CellLabel->"In[13]:=",ExpressionUUID->"fd0c50cb-5e3d-46b2-a09e-275f25c954a6"],
+
+Cell[BoxData["438"], "Output",
+ CellChangeTimes->{3.7728886939277277`*^9, 3.7729648477990637`*^9, 
+  3.773141703253175*^9},
+ CellLabel->"Out[14]=",ExpressionUUID->"9f7e9a1a-0e98-444b-a2d6-4f9b40f3790f"]
+}, Open  ]],
+
+Cell[BoxData[
+ RowBox[{"LRlist", "=", 
+  RowBox[{"Range", "[", "438", "]"}]}]], "Input",
+ CellChangeTimes->{{3.772886836250914*^9, 
+  3.772886843215901*^9}},ExpressionUUID->"69614acb-c767-4819-96b5-\
+beee59afcf6a"],
+
+Cell[BoxData[
+ RowBox[{"\[IndentingNewLine]", 
+  RowBox[{"(*", 
+   RowBox[{"1", "-", "73"}], "*)"}]}]], "Input",
+ CellChangeTimes->{{3.772360684428249*^9, 3.772360688933934*^9}, 
+   3.772886598217041*^9},ExpressionUUID->"f1052ac6-e6f7-4371-afd6-\
+ad461c58d053"],
+
+Cell[BoxData[
+ RowBox[{"Do", "[", "\[IndentingNewLine]", 
+  RowBox[{
+   RowBox[{
+    RowBox[{
+     RowBox[{"LRlist", "[", 
+      RowBox[{"[", "n", "]"}], "]"}], "=", 
+     RowBox[{"LoopRefine", "[", 
+      RowBox[{"listPV", "[", 
+       RowBox[{"[", "n", "]"}], "]"}], "]"}]}], ";"}], "\[IndentingNewLine]", 
+   ",", 
+   RowBox[{"{", 
+    RowBox[{"n", ",", "73"}], "}"}]}], "]"}]], "Input",
+ CellChangeTimes->{{3.7700095396277313`*^9, 3.770009546050956*^9}, {
+   3.770010902307991*^9, 3.770010922003213*^9}, {3.770011069988926*^9, 
+   3.7700110795936203`*^9}, {3.770011149326112*^9, 3.770011156613451*^9}, {
+   3.7700112291788197`*^9, 3.77001124342817*^9}, 3.770092556097802*^9, {
+   3.770096509105474*^9, 3.7700965202949467`*^9}},
+ CellLabel->"In[11]:=",ExpressionUUID->"47c35d70-ef0a-4ee5-9de6-a89da37d395a"],
+
+Cell[BoxData[
+ RowBox[{"\[IndentingNewLine]", 
+  RowBox[{"(*", 
+   RowBox[{"74", "-", "146"}], "*)"}]}]], "Input",
+ CellChangeTimes->{{3.77236069586174*^9, 3.7723607148337317`*^9}, 
+   3.77288659631328*^9},ExpressionUUID->"e49bfcd0-2790-4662-b260-\
+1251fbf55656"],
+
+Cell[BoxData[
+ RowBox[{"Do", "[", "\[IndentingNewLine]", 
+  RowBox[{
+   RowBox[{
+    RowBox[{
+     RowBox[{"LRlist", "[", 
+      RowBox[{"[", 
+       RowBox[{"n", "+", "73"}], "]"}], "]"}], "=", 
+     RowBox[{"LoopRefine", "[", 
+      RowBox[{"listPV", "[", 
+       RowBox[{"[", 
+        RowBox[{"n", "+", "73"}], "]"}], "]"}], "]"}]}], ";"}], 
+   "\[IndentingNewLine]", ",", 
+   RowBox[{"{", 
+    RowBox[{"n", ",", "73"}], "}"}]}], "]"}]], "Input",
+ CellChangeTimes->{{3.770092567087772*^9, 3.770092567563299*^9}, {
+  3.770092655295905*^9, 3.770092663038951*^9}, {3.7700951188676767`*^9, 
+  3.770095120205538*^9}, {3.770096692911742*^9, 3.770096696498418*^9}},
+ CellLabel->"In[13]:=",ExpressionUUID->"7c31e5a1-c9d7-4139-bcbf-d567355f68ac"],
+
+Cell[BoxData[
+ RowBox[{"\[IndentingNewLine]", 
+  RowBox[{"(*", 
+   RowBox[{"147", "-", "219"}], "*)"}]}]], "Input",
+ CellChangeTimes->{{3.772360719354867*^9, 3.772360730955079*^9}, 
+   3.77288661329921*^9},ExpressionUUID->"df0e2446-e8a9-4c0f-ade0-\
+6243ed23f014"],
+
+Cell[BoxData[
+ RowBox[{"Do", "[", "\[IndentingNewLine]", 
+  RowBox[{
+   RowBox[{
+    RowBox[{
+     RowBox[{"LRlist", "[", 
+      RowBox[{"[", 
+       RowBox[{"n", "+", 
+        RowBox[{"2", "*", "73"}]}], "]"}], "]"}], "=", 
+     RowBox[{"LoopRefine", "[", 
+      RowBox[{"listPV", "[", 
+       RowBox[{"[", 
+        RowBox[{"n", "+", 
+         RowBox[{"2", "*", "73"}]}], "]"}], "]"}], "]"}]}], ";"}], 
+   "\[IndentingNewLine]", ",", 
+   RowBox[{"{", 
+    RowBox[{"n", ",", "73"}], "}"}]}], "]"}]], "Input",
+ CellChangeTimes->{{3.770096924865595*^9, 3.770096925250608*^9}, {
+  3.770097051583521*^9, 3.7700970520991364`*^9}},
+ CellLabel->"In[19]:=",ExpressionUUID->"b7439b12-cb51-47a1-a158-9fa93f157c7d"],
+
+Cell[BoxData[
+ RowBox[{"\[IndentingNewLine]", 
+  RowBox[{"(*", 
+   RowBox[{"220", "-", "292"}], "*)"}]}]], "Input",
+ CellChangeTimes->{{3.772360753433093*^9, 3.7723607635811663`*^9}, 
+   3.772886615105321*^9},ExpressionUUID->"ba9ecf49-d2ba-4baa-bc4a-\
+47072a88303d"],
+
+Cell[BoxData[
+ RowBox[{"Do", "[", "\[IndentingNewLine]", 
+  RowBox[{
+   RowBox[{
+    RowBox[{
+     RowBox[{"LRlist", "[", 
+      RowBox[{"[", 
+       RowBox[{"n", "+", 
+        RowBox[{"3", "*", "73"}]}], "]"}], "]"}], "=", 
+     RowBox[{"LoopRefine", "[", 
+      RowBox[{"listPV", "[", 
+       RowBox[{"[", 
+        RowBox[{"n", "+", 
+         RowBox[{"3", "*", "73"}]}], "]"}], "]"}], "]"}]}], ";"}], 
+   "\[IndentingNewLine]", ",", 
+   RowBox[{"{", 
+    RowBox[{"n", ",", "73"}], "}"}]}], "]"}]], "Input",
+ CellChangeTimes->{{3.770098878330305*^9, 3.770098880489415*^9}, 
+   3.771411006149096*^9, 
+   3.771739280516284*^9},ExpressionUUID->"c1cc9921-c84f-4990-9a13-\
+a36935fe08f6"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"LRlist", " ", "=", " ", 
+   RowBox[{"Import", "[", "\"\<analyticPV.m\>\"", "]"}]}], ";"}]], "Input",
+ CellChangeTimes->{3.772885455389707*^9},
+ CellLabel->"In[12]:=",ExpressionUUID->"b325e442-757f-4122-a460-9727e5485960"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{
+   RowBox[{"Export", "[", 
+    RowBox[{"\"\<analyticPV.m\>\"", ",", "LRlist"}], "]"}], ";"}], " ", 
+  RowBox[{"(*", " ", 
+   RowBox[{"Run", " ", "this", " ", "after", " ", "reading", " ", 
+    RowBox[{"analyticPV", ".", "m"}]}], " ", "*)"}]}]], "Input",
+ CellChangeTimes->{{3.772884594249895*^9, 3.7728846089750853`*^9}},
+ CellLabel->"In[64]:=",ExpressionUUID->"64072172-75c1-400c-b4be-a5a76fc27e9f"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(*", " ", 
+   RowBox[{
+   "Copy", " ", "the", " ", "PVs", " ", "to", " ", "a", " ", "new", " ", 
+    "list", " ", "LRlist", " ", "what", " ", "will", " ", "be", " ", "the", 
+    " ", "\"\<LoopRefined\>\"", " ", 
+    RowBox[{"terms", "."}]}], " ", "*)"}], "\[IndentingNewLine]", 
+  RowBox[{"(*", 
+   RowBox[{"293", "-", "365"}], "*)"}]}]], "Input",
+ CellChangeTimes->{{3.7728868675215187`*^9, 3.772886877363283*^9}, {
+  3.7728873184298553`*^9, 3.772887337415292*^9}, {3.775929495403804*^9, 
+  3.775929497245184*^9}},ExpressionUUID->"75ac93f2-7474-4481-b70f-\
+8b3ab1fc4f2c"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Do", "[", "\[IndentingNewLine]", 
+  RowBox[{
+   RowBox[{
+    RowBox[{
+     RowBox[{"LRlist", "[", 
+      RowBox[{"[", 
+       RowBox[{"n", "+", 
+        RowBox[{"4", "*", "73"}]}], "]"}], "]"}], "=", 
+     RowBox[{
+      RowBox[{"LRlist", "[", 
+       RowBox[{"[", 
+        RowBox[{"n", "+", 
+         RowBox[{"4", "*", "73"}]}], "]"}], "]"}], "//.", "LoopRef"}]}], ";", 
+    "\[IndentingNewLine]", 
+    RowBox[{"Print", "[", 
+     RowBox[{"n", "+", 
+      RowBox[{"4", "*", "73"}]}], "]"}], ";", "\[IndentingNewLine]", 
+    RowBox[{"Export", "[", 
+     RowBox[{"\"\<analyticPV.m\>\"", ",", "LRlist"}], "]"}], ";"}], 
+   "\[IndentingNewLine]", ",", " ", 
+   RowBox[{"{", 
+    RowBox[{"n", ",", "73"}], "}"}]}], "]"}]], "Input",
+ CellChangeTimes->{{3.77288694186665*^9, 3.772887010616581*^9}, {
+  3.772887072326515*^9, 3.7728871220446568`*^9}, {3.772887221297553*^9, 
+  3.772887227658811*^9}, {3.772887452365738*^9, 3.772887453395618*^9}, {
+  3.7728885491822968`*^9, 3.772888550011717*^9}},
+ CellLabel->"In[12]:=",ExpressionUUID->"df43f43c-f3df-4d31-8f47-e316129e404e"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["293"], "Print",
+ CellChangeTimes->{{3.772887221777728*^9, 3.7728872374316874`*^9}, 
+   3.772887315250904*^9, 3.772887359406661*^9, 3.77288745403798*^9, 
+   3.772888041610999*^9, 3.772888092854567*^9, 3.772888665630286*^9, 
+   3.77288870682581*^9, 3.772888739575129*^9, 3.772964867508161*^9},
+ CellLabel->
+  "During evaluation of \
+In[12]:=",ExpressionUUID->"13bb3e84-1aad-451c-9470-217fab9f697f"],
+
+Cell[BoxData["294"], "Print",
+ CellChangeTimes->{{3.772887221777728*^9, 3.7728872374316874`*^9}, 
+   3.772887315250904*^9, 3.772887359406661*^9, 3.77288745403798*^9, 
+   3.772888041610999*^9, 3.772888092854567*^9, 3.772888665630286*^9, 
+   3.77288870682581*^9, 3.772888739575129*^9, 3.7729648755876827`*^9},
+ CellLabel->
+  "During evaluation of \
+In[12]:=",ExpressionUUID->"c6fece5c-a585-4c90-ab33-806fa3705b71"]
+}, Open  ]],
+
+Cell[BoxData["$Aborted"], "Output",
+ CellChangeTimes->{3.772964876523367*^9},
+ CellLabel->"Out[12]=",ExpressionUUID->"829f296d-4387-479f-92bc-7a626dfe607c"]
+}, Open  ]],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(*", " ", 
+   RowBox[{"PV", " ", "300", " ", "was", " ", 
+    RowBox[{"stubborn", "."}]}], " ", "*)"}], "\[IndentingNewLine]", 
+  RowBox[{"LRlist", "[", 
+   RowBox[{"[", "300", "]"}], "]"}]}]], "Input",
+ CellChangeTimes->{{3.772887637509116*^9, 3.77288767378751*^9}, {
+  3.77288804979731*^9, 3.7728880669445*^9}},
+ CellLabel->"In[13]:=",ExpressionUUID->"0d3ce3b6-3c94-4932-a9ed-194cea17f2b9"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"PV300", "=", 
+   RowBox[{
+    RowBox[{
+     RowBox[{"PVD", "[", 
+      RowBox[{"0", ",", "1", ",", "2", ",", "0", ",", "0", ",", "a", ",", 
+       SuperscriptBox["MH", "2"], ",", "b", ",", "0", ",", "T14", ",", "g", 
+       ",", "g", ",", "g", ",", "g"}], "]"}], "//.", "LoopRef"}], "//.", 
+    RowBox[{"{", 
+     RowBox[{
+      RowBox[{"a", "\[Rule]", 
+       RowBox[{
+        SuperscriptBox["MH", "2"], "-", "S", "-", "T24", "-", "U"}]}], ",", 
+      RowBox[{"b", "->", 
+       RowBox[{
+        RowBox[{"2", " ", 
+         SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", "U"}]}], ",", 
+      RowBox[{"g", "\[Rule]", 
+       RowBox[{"Sqrt", "[", 
+        RowBox[{"MT", "^", "2"}], "]"}]}]}], "}"}]}]}], ";"}]], "Input",
+ CellChangeTimes->{{3.772887687307757*^9, 3.7728877045087748`*^9}, {
+  3.772887768481736*^9, 3.772887790741548*^9}, {3.772887834208604*^9, 
+  3.7728878601223297`*^9}, {3.7728879075747433`*^9, 3.772887957264495*^9}},
+ CellLabel->"In[59]:=",ExpressionUUID->"5a89f228-5332-4b40-9dd2-0e3e845f3970"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{
+   RowBox[{"LRlist", "[", 
+    RowBox[{"[", "300", "]"}], "]"}], " ", "=", " ", "PV300"}], 
+  ";"}]], "Input",
+ CellChangeTimes->{{3.772888005864108*^9, 3.772888014449572*^9}},
+ CellLabel->"In[60]:=",ExpressionUUID->"3a874326-a732-49f9-bf3f-018de4fbf690"],
+
+Cell[BoxData[
+ RowBox[{"\[IndentingNewLine]", 
+  RowBox[{"(*", 
+   RowBox[{"366", "-", "438"}], "*)"}]}]], "Input",
+ CellChangeTimes->{{3.772886684987542*^9, 
+  3.7728867268924503`*^9}},ExpressionUUID->"37adef6f-081e-487c-bd44-\
+ab449560d571"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Do", "[", "\[IndentingNewLine]", 
+  RowBox[{
+   RowBox[{
+    RowBox[{
+     RowBox[{"LRlist", "[", 
+      RowBox[{"[", 
+       RowBox[{"n", "+", 
+        RowBox[{"5", "*", "73"}]}], "]"}], "]"}], "=", 
+     RowBox[{
+      RowBox[{"LRlist", "[", 
+       RowBox[{"[", 
+        RowBox[{"n", "+", 
+         RowBox[{"5", "*", "73"}]}], "]"}], "]"}], "//.", " ", "LoopRef"}]}], 
+    ";", "\[IndentingNewLine]", 
+    RowBox[{"Print", "[", 
+     RowBox[{"n", "+", 
+      RowBox[{"5", "*", "73"}]}], "]"}], ";", "\[IndentingNewLine]", 
+    RowBox[{"Export", "[", 
+     RowBox[{"\"\<analyticPV.m\>\"", ",", "LRlist"}], "]"}], ";"}], 
+   "\[IndentingNewLine]", ",", 
+   RowBox[{"{", 
+    RowBox[{"n", ",", "73"}], "}"}]}], "]"}]], "Input",
+ CellChangeTimes->{{3.772886718627595*^9, 3.772886720721589*^9}, {
+  3.772887584696403*^9, 3.772887615370928*^9}, {3.7728902380144987`*^9, 
+  3.7728902382758827`*^9}},
+ CellLabel->"In[14]:=",ExpressionUUID->"f3c0843b-be94-4b77-89a7-a517bd2df868"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["366"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772964891668998*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"e2ec887b-8f74-4c58-b508-8180d0a5ab39"],
+
+Cell[BoxData["367"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772964898888381*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"37e2fbaf-ebf4-468b-9e07-64d66403941b"],
+
+Cell[BoxData["368"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.7729649060929813`*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"2e78dfd3-252a-4510-977f-b4f27ff8aa4b"],
+
+Cell[BoxData["369"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772964913212573*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"a0e44cf6-a61f-449f-8a34-2c8ce9d266f3"],
+
+Cell[BoxData["370"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772964920354567*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"a931e414-5259-4e72-acd7-dcee07599a82"],
+
+Cell[BoxData["371"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772964927557357*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"5594c2a5-c197-4faf-9ffb-e7ba76cbc538"],
+
+Cell[BoxData["372"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772964934685068*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"8ecef3ea-5555-4307-bcb5-45617481fea4"],
+
+Cell[BoxData["373"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.7729649417991037`*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"84060125-ad1a-4df3-8ce7-b2dbb52a255e"],
+
+Cell[BoxData["374"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772964949054049*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"ba89847a-a4aa-4bc8-bbdf-fc4fe94626a9"],
+
+Cell[BoxData["375"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772964956219346*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"4ad9a298-9033-4f95-ba31-e459488b2078"],
+
+Cell[BoxData["376"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.7729649633964767`*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"0f51e120-6ffe-40ed-90a9-16ffc4b8cd7b"],
+
+Cell[BoxData["377"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.7729649705714684`*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"55f10a7d-2dd2-42de-9c51-a8b42913981b"],
+
+Cell[BoxData["378"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772964977704796*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"4f770da7-96cd-4cb8-a4d4-ac8321d712cd"],
+
+Cell[BoxData["379"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772964984930636*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"649189dd-7c36-4840-a8f2-e90ccecbefc1"],
+
+Cell[BoxData["380"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772964992039103*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"69c8ff97-a48c-433d-a1af-293c970ff456"],
+
+Cell[BoxData["381"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772964999150893*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"e5097cc9-3fd7-4356-82cc-935a8fd99f37"],
+
+Cell[BoxData["382"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.7729650063531103`*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"2a4fa068-31d2-42b2-8e27-9cd47a215300"],
+
+Cell[BoxData["383"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772965013586713*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"d4490842-541b-4159-b08b-37254e2f02ee"],
+
+Cell[BoxData["384"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772965020837448*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"0ae6d1ae-d897-40b7-83ac-03676d9405d7"],
+
+Cell[BoxData["385"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772965027975287*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"dd1f2688-2c0e-4ed6-aa9d-d7b634519be6"],
+
+Cell[BoxData["386"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.77296503511196*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"28b3e938-3807-4e3b-9426-e708dcec15b0"],
+
+Cell[BoxData["387"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772965042224675*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"b68ca497-f2d7-495a-b577-5f5f7cc0b776"],
+
+Cell[BoxData["388"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772965049469451*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"d67f7e5b-0500-4072-a004-7f5c73342e3a"],
+
+Cell[BoxData["389"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772965056584694*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"ce08a793-ce51-4874-b4c7-0d99e3e47784"],
+
+Cell[BoxData["390"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772965063705216*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"fbbc2328-d686-4169-8a45-f2f916e0d9d2"],
+
+Cell[BoxData["391"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.7729650707852077`*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"1cb44eb4-a5e3-4f09-a2dc-7ed04f4bcf1f"],
+
+Cell[BoxData["392"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772965078094244*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"622b5b19-decc-4b43-aecb-2a18b830f72c"],
+
+Cell[BoxData["393"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.7729650851741037`*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"f6dc26ef-5813-4857-bfe4-c26b87bc1f7b"],
+
+Cell[BoxData["394"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772965092240261*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"2d3735df-91e7-4795-8dfd-6ed011d79107"],
+
+Cell[BoxData["395"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.7729651000320807`*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"50fe601d-1b2b-4d2e-807b-1d249afe001e"],
+
+Cell[BoxData["396"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.7729651072457933`*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"2fdfacbd-80ef-4c9a-b71f-e2cc0d9afe5e"],
+
+Cell[BoxData["397"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772965114382185*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"da85be8b-7972-4185-b906-d61dc785a9fd"],
+
+Cell[BoxData["398"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.7729651214583406`*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"1c79d656-868a-4326-8d0a-2659691bbe1c"],
+
+Cell[BoxData["399"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772965128592004*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"efa41b92-f275-451a-ac92-19e0f0f8ac9d"],
+
+Cell[BoxData["400"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.7729651357337923`*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"37e28f01-8fd3-4b48-b1b2-21df0a6ba950"],
+
+Cell[BoxData["401"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772965142812318*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"e844650c-6ee0-4b56-bc47-625127c32e2b"],
+
+Cell[BoxData["402"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.7729651498997393`*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"29f611a5-3fe6-49ea-ba52-f894c5b962a5"],
+
+Cell[BoxData["403"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772965156982112*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"0d1b53d7-40d6-416f-87a6-b7b7a755e497"],
+
+Cell[BoxData["404"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.7729651641069736`*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"dcd3c150-23ea-4f93-8005-bdd7678c1c03"],
+
+Cell[BoxData["405"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772965171237117*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"fe002903-a338-4ec6-ab39-693bb8f32eff"],
+
+Cell[BoxData["406"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.7729651784048862`*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"34a03c80-9c4e-4fcb-b5ff-f3ff0cb1f223"],
+
+Cell[BoxData["407"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772965185467684*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"6cb0347b-630c-40c9-be5c-e11d214769dc"],
+
+Cell[BoxData["408"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.7729651925712223`*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"0815e5f7-0b7c-4ceb-83e7-8cfc79826245"],
+
+Cell[BoxData["409"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772965199745579*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"92f96f11-b3a8-42e5-98e6-6fee3c21c719"],
+
+Cell[BoxData["410"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772965206835451*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"f5dc0de3-7380-4b70-b0d3-54def93aedd4"],
+
+Cell[BoxData["411"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.7729652139667263`*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"a1701a3b-5ef3-47a9-95a2-d8e512233777"],
+
+Cell[BoxData["412"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772965221097117*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"4097feba-7377-4752-bb38-a0921cc43c71"],
+
+Cell[BoxData["413"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772965228246559*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"dd3dbaf1-61f0-453b-9b9a-36874206af99"],
+
+Cell[BoxData["414"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.7729652353241167`*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"40b1ffb0-1c9e-42ee-9160-2930f36cdfaa"],
+
+Cell[BoxData["415"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.7729652423967*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"191f384d-858c-4d19-92a6-40c39817d766"],
+
+Cell[BoxData["416"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.77296524948139*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"0ad5044a-36b0-4d57-a03e-5b3764fa61c2"],
+
+Cell[BoxData["417"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772965256898061*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"777e0a58-0441-45aa-bb77-379de521b4ea"],
+
+Cell[BoxData["418"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772965264013151*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"26958225-f0de-4b0d-8418-1d0e741744db"],
+
+Cell[BoxData["419"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772965271160746*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"aa153189-1719-4ec3-a6c4-faeae6eb825e"],
+
+Cell[BoxData["420"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772965278275385*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"ad84b383-b8b6-4501-8354-e87c74b4fe47"],
+
+Cell[BoxData["421"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772965285455348*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"fb83c3a6-a8b1-4afc-8465-6456a8260a4f"],
+
+Cell[BoxData["422"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.77296529252765*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"cd5fc969-87ec-41e9-8094-20cb832c0cf2"],
+
+Cell[BoxData["423"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772965299605927*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"8f96c2e7-a606-44fd-9bd3-787dbc3507ca"],
+
+Cell[BoxData["424"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772965306700017*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"1cb89dfe-425a-4c52-9b55-b4a6014c9852"],
+
+Cell[BoxData["425"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772965313880247*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"ef7f8635-cadc-4f02-9e3b-547e00252d2e"],
+
+Cell[BoxData["426"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772965321075293*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"4f79ee0d-259f-4d53-809b-53a89f702a3d"],
+
+Cell[BoxData["427"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772965328169883*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"886f8afa-5606-4059-8b26-d7d6af479013"],
+
+Cell[BoxData["428"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.77296533642483*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"cd7e7c7e-efdb-40bf-ae88-e79e89aee24f"],
+
+Cell[BoxData["429"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772965344088553*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"f3dba259-3e90-4a75-828b-055cb49c87c8"],
+
+Cell[BoxData["430"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.7729653522431707`*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"37b1dcf0-6b49-4eb5-b721-89fc56a828df"],
+
+Cell[BoxData["431"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772965360769515*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"5f7c8d38-0599-40f0-9972-0a6d5997ecbf"],
+
+Cell[BoxData["432"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772965369070016*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"69c00823-96b0-4daa-9990-36f08fb6ce56"],
+
+Cell[BoxData["433"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772965377127087*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"fb97acd4-1d96-4a85-8bc6-3305a839a3da"],
+
+Cell[BoxData["434"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772965387417776*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"43bad5b4-c421-419d-9915-1b67c66f1036"],
+
+Cell[BoxData["435"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772965394992403*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"f5846949-e47a-4e77-914f-0a8f50e06332"],
+
+Cell[BoxData["436"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772965402651409*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"6a5ef075-fa3d-4ad6-b501-a5cb532fd6f5"],
+
+Cell[BoxData["437"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.772965410672473*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"ee5772c0-100c-4ff4-83b0-096fcfc8e2a6"],
+
+Cell[BoxData["438"], "Print",
+ CellChangeTimes->{3.7728902511762247`*^9, 3.772960997377637*^9, 
+  3.772963497325268*^9, 3.7729654227478647`*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"fec2f95e-20ad-473c-80c7-bfbc2b46c85f"]
+}, Closed]]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(*", " ", 
+   RowBox[{"PV", " ", "406", " ", "was", " ", 
+    RowBox[{"stubborn", "."}]}], " ", "*)"}], "\[IndentingNewLine]", 
+  RowBox[{"LRlist", "[", 
+   RowBox[{"[", "406", "]"}], "]"}]}]], "Input",
+ CellChangeTimes->{{3.772963340774973*^9, 3.772963345560577*^9}, {
+  3.772963519403051*^9, 
+  3.7729635244305058`*^9}},ExpressionUUID->"083fb79c-daba-4277-b94e-\
+78bed80412be"],
+
+Cell[BoxData[
+ RowBox[{"PVD", "[", 
+  RowBox[{"1", ",", "0", ",", "1", ",", "0", ",", "0", ",", 
+   RowBox[{
+    SuperscriptBox["MH", "2"], "-", "S", "-", "T24", "-", "U"}], ",", 
+   SuperscriptBox["MH", "2"], ",", 
+   RowBox[{
+    RowBox[{"2", " ", 
+     SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", "U"}], ",", "0", 
+   ",", "T14", ",", 
+   SqrtBox[
+    SuperscriptBox["MT", "2"]], ",", 
+   SqrtBox[
+    SuperscriptBox["MT", "2"]], ",", 
+   SqrtBox[
+    SuperscriptBox["MT", "2"]], ",", 
+   SqrtBox[
+    SuperscriptBox["MT", "2"]]}], "]"}]], "Output",
+ CellChangeTimes->{{3.772963343468006*^9, 3.772963372862679*^9}},
+ CellLabel->"Out[29]=",ExpressionUUID->"21437e94-a2d0-4030-9577-1fb730a2c01b"]
+}, Open  ]],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"PV406", "=", 
+   RowBox[{
+    RowBox[{
+     RowBox[{"PVD", "[", 
+      RowBox[{"1", ",", "0", ",", "1", ",", "0", ",", "0", ",", "a", ",", 
+       SuperscriptBox["MH", "2"], ",", "b", ",", "0", ",", "T14", ",", "g", 
+       ",", "g", ",", "g", ",", "g"}], "]"}], "//.", "LoopRef"}], "//.", 
+    RowBox[{"{", 
+     RowBox[{
+      RowBox[{"a", "\[Rule]", 
+       RowBox[{
+        SuperscriptBox["MH", "2"], "-", "S", "-", "T24", "-", "U"}]}], ",", 
+      RowBox[{"b", "->", 
+       RowBox[{
+        RowBox[{"2", " ", 
+         SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", "U"}]}], ",", 
+      RowBox[{"g", "\[Rule]", 
+       RowBox[{"Sqrt", "[", 
+        RowBox[{"MT", "^", "2"}], "]"}]}]}], "}"}]}]}], ";"}]], "Input",
+ CellChangeTimes->{{3.7729633514518003`*^9, 3.772963361873694*^9}},
+ CellLabel->"In[30]:=",ExpressionUUID->"c9749ffe-5ab8-4c9a-aef7-8af3843d725b"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{
+   RowBox[{"LRlist", "[", 
+    RowBox[{"[", "406", "]"}], "]"}], " ", "=", " ", "PV406"}], 
+  ";"}]], "Input",
+ CellChangeTimes->{{3.772963424367772*^9, 3.772963429904943*^9}},
+ CellLabel->"In[32]:=",ExpressionUUID->"2d6ff57e-8bdd-4f5e-9772-e77bcbd1d8d0"],
+
+Cell[BoxData["\[IndentingNewLine]"], "Input",
+ CellChangeTimes->{
+  3.773141712723225*^9},ExpressionUUID->"2239b8d8-532e-4c08-ac3b-\
+e377a166b460"],
+
+Cell[BoxData[
+ RowBox[{"(*", " ", 
+  RowBox[{
+  "Define", " ", "the", " ", "replacement", " ", "of", " ", "al", " ", "PV", 
+   " ", "coefficients", " ", "for", " ", "their", " ", "analytical", " ", 
+   RowBox[{"expansion", "."}]}], " ", "*)"}]], "Input",
+ CellChangeTimes->{{3.773741455033848*^9, 
+  3.77374148857545*^9}},ExpressionUUID->"e40759ab-7c04-4bf0-a25e-\
+f80786106946"],
+
+Cell[BoxData[{
+ RowBox[{"SetAttributes", "[", 
+  RowBox[{"f", ",", "Listable"}], "]"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"f", "[", 
+   RowBox[{"a_", ",", "b_"}], "]"}], ":=", 
+  RowBox[{"a", "\[Rule]", "b"}]}]}], "Input",
+ CellChangeTimes->{{3.773141715006895*^9, 3.7731417742477217`*^9}},
+ CellLabel->"In[15]:=",ExpressionUUID->"007158c3-a206-4cab-88ec-886b70f30fed"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"replacement", "=", 
+  RowBox[{"f", "[", 
+   RowBox[{"listPV", ",", "LRlist"}], "]"}]}]], "Input",
+ CellChangeTimes->{{3.7731417783694973`*^9, 3.773141825995413*^9}},
+ CellLabel->"In[18]:=",ExpressionUUID->"743fd8ff-17f3-49f2-85d6-506c6d73e5ad"],
+
+Cell[BoxData[
+ InterpretationBox[
+  TagBox[
+   FrameBox[GridBox[{
+      {
+       ItemBox[
+        TagBox[
+         RowBox[{"{", 
+          RowBox[{
+           RowBox[{
+            RowBox[{"PVC", "[", 
+             RowBox[{"0", ",", "0", ",", "0", ",", "0", ",", 
+              RowBox[{
+               SuperscriptBox["MH", "2"], "-", "S", "-", "T24", "-", "U"}], 
+              ",", "T", ",", 
+              SqrtBox[
+               SuperscriptBox["MT", "2"]], ",", 
+              SqrtBox[
+               SuperscriptBox["MT", "2"]], ",", 
+              SqrtBox[
+               SuperscriptBox["MT", "2"]]}], "]"}], "\[Rule]", 
+            RowBox[{
+             RowBox[{"-", 
+              FractionBox[
+               SuperscriptBox[
+                RowBox[{"Log", "[", 
+                 FractionBox[
+                  RowBox[{
+                   RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "+", 
+                   SqrtBox[
+                    TemplateBox[{"1"},
+                    "OutputSizeLimit`Skeleton"]]}], 
+                  RowBox[{"2", " ", 
+                   SuperscriptBox["MT", "2"]}]], "]"}], "2"], 
+               RowBox[{"2", " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  SuperscriptBox["MH", "2"], "-", "S", "-", "T", "-", "T24", 
+                  "-", "U"}], ")"}]}]]}], "+", 
+             FractionBox[
+              SuperscriptBox[
+               RowBox[{"Log", "[", 
+                FractionBox[
+                 RowBox[{
+                  RowBox[{"-", 
+                   SuperscriptBox["MH", "2"]}], "+", 
+                  TemplateBox[{"4"},
+                   "OutputSizeLimit`Skeleton"], "+", 
+                  SqrtBox[
+                   TemplateBox[{"1"},
+                    "OutputSizeLimit`Skeleton"]]}], 
+                 RowBox[{"2", " ", 
+                  SuperscriptBox["MT", "2"]}]], "]"}], "2"], 
+              RowBox[{"2", " ", 
+               RowBox[{"(", 
+                RowBox[{
+                 SuperscriptBox["MH", "2"], "-", "S", "-", "T", "-", "T24", 
+                 "-", "U"}], ")"}]}]]}]}], ",", 
+           TemplateBox[{"436"},
+            "OutputSizeLimit`Skeleton"], ",", 
+           RowBox[{
+            RowBox[{"PVD", "[", 
+             RowBox[{"1", ",", "1", ",", "0", ",", "0", ",", 
+              SuperscriptBox["MH", "2"], ",", "T24", ",", "0", ",", "0", ",", 
+              
+              RowBox[{
+               SuperscriptBox["MH", "2"], "-", "S", "-", "T", "-", "T14"}], 
+              ",", "T", ",", 
+              SqrtBox[
+               SuperscriptBox["MT", "2"]], ",", 
+              SqrtBox[
+               SuperscriptBox["MT", "2"]], ",", 
+              SqrtBox[
+               SuperscriptBox["MT", "2"]], ",", 
+              SqrtBox[
+               SuperscriptBox["MT", "2"]]}], "]"}], "\[Rule]", 
+            RowBox[{
+             RowBox[{"-", 
+              FractionBox[
+               RowBox[{"T", " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  SuperscriptBox["MH", "2"], "-", "S", "-", "T", "-", "T14"}],
+                  ")"}], " ", 
+                RowBox[{"DiscB", "[", 
+                 RowBox[{"T", ",", 
+                  SqrtBox[
+                   SuperscriptBox["MT", "2"]], ",", 
+                  SqrtBox[
+                   SuperscriptBox["MT", "2"]]}], "]"}]}], 
+               RowBox[{"4", " ", 
+                RowBox[{"Kibble\[Phi]", "[", 
+                 RowBox[{
+                  SuperscriptBox["MH", "2"], ",", "T24", ",", "0", ",", "0", 
+                  ",", 
+                  RowBox[{
+                   SuperscriptBox["MH", "2"], "-", "S", "-", "T", "-", 
+                   "T14"}], ",", "T"}], "]"}]}]]}], "-", 
+             FractionBox[
+              TemplateBox[{"1"},
+               "OutputSizeLimit`Skeleton"], 
+              TemplateBox[{"1"},
+               "OutputSizeLimit`Skeleton"]], "+", 
+             TemplateBox[{"6"},
+              "OutputSizeLimit`Skeleton"], "+", 
+             TemplateBox[{"1"},
+              "OutputSizeLimit`Skeleton"], "-", 
+             FractionBox[
+              RowBox[{"T", " ", 
+               TemplateBox[{"2"},
+                "OutputSizeLimit`Skeleton"], " ", 
+               RowBox[{"ScalarD0", "[", 
+                RowBox[{"0", ",", 
+                 TemplateBox[{"8"},
+                  "OutputSizeLimit`Skeleton"], ",", 
+                 SqrtBox[
+                  SuperscriptBox["MT", "2"]]}], "]"}]}], 
+              RowBox[{"8", " ", 
+               SuperscriptBox[
+                TemplateBox[{"1"},
+                 "OutputSizeLimit`Skeleton"], "2"]}]]}]}]}], "}"}],
+         Short[#, 5]& ],
+        BaseStyle->{Deployed -> False},
+        StripOnInput->False]},
+      {GridBox[{
+         {
+          TagBox[
+           TooltipBox[
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource[
+                "FEStrings", "sizeBriefExplanation"], StandardForm],
+               ImageSizeCache->{58., {2., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLText",
+             StripOnInput->False],
+            StyleBox[
+             DynamicBox[
+              ToBoxes[
+               FEPrivate`FrontEndResource["FEStrings", "sizeExplanation"], 
+               StandardForm]], DynamicUpdating -> True, StripOnInput -> 
+             False]],
+           Annotation[#, 
+            Style[
+             Dynamic[
+              FEPrivate`FrontEndResource["FEStrings", "sizeExplanation"]], 
+             DynamicUpdating -> True], "Tooltip"]& ], 
+          ButtonBox[
+           PaneSelectorBox[{False->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowLess"], 
+                StandardForm],
+               ImageSizeCache->{50., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControl",
+             StripOnInput->False], True->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowLess"], 
+                StandardForm],
+               ImageSizeCache->{50., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControlActive",
+             StripOnInput->False]}, Dynamic[
+             CurrentValue["MouseOver"]],
+            Alignment->Center,
+            FrameMargins->0,
+            ImageSize->{Automatic, 25}],
+           Appearance->None,
+           BaselinePosition->Baseline,
+           
+           ButtonFunction:>OutputSizeLimit`ButtonFunction[
+            OutputSizeLimit`Defer, 18, 17463603852504468309, 5/2],
+           Enabled->True,
+           Evaluator->Automatic,
+           Method->"Queued"], 
+          ButtonBox[
+           PaneSelectorBox[{False->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowMore"], 
+                StandardForm],
+               ImageSizeCache->{56., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControl",
+             StripOnInput->False], True->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowMore"], 
+                StandardForm],
+               ImageSizeCache->{56., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControlActive",
+             StripOnInput->False]}, Dynamic[
+             CurrentValue["MouseOver"]],
+            Alignment->Center,
+            FrameMargins->0,
+            ImageSize->{Automatic, 25}],
+           Appearance->None,
+           BaselinePosition->Baseline,
+           
+           ButtonFunction:>OutputSizeLimit`ButtonFunction[
+            OutputSizeLimit`Defer, 18, 17463603852504468309, 5 2],
+           Enabled->True,
+           Evaluator->Automatic,
+           Method->"Queued"], 
+          ButtonBox[
+           PaneSelectorBox[{False->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowAll"], 
+                StandardForm],
+               ImageSizeCache->{42., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControl",
+             StripOnInput->False], True->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowAll"], 
+                StandardForm],
+               ImageSizeCache->{42., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControlActive",
+             StripOnInput->False]}, Dynamic[
+             CurrentValue["MouseOver"]],
+            Alignment->Center,
+            FrameMargins->0,
+            ImageSize->{Automatic, 25}],
+           Appearance->None,
+           BaselinePosition->Baseline,
+           
+           ButtonFunction:>OutputSizeLimit`ButtonFunction[
+            OutputSizeLimit`Defer, 18, 17463603852504468309, Infinity],
+           Enabled->True,
+           Evaluator->Automatic,
+           Method->"Queued"], 
+          ButtonBox[
+           PaneSelectorBox[{False->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeChangeLimit"], 
+                StandardForm],
+               ImageSizeCache->{74., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControl",
+             StripOnInput->False], True->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeChangeLimit"], 
+                StandardForm],
+               ImageSizeCache->{74., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControlActive",
+             StripOnInput->False]}, Dynamic[
+             CurrentValue["MouseOver"]],
+            Alignment->Center,
+            FrameMargins->0,
+            ImageSize->{Automatic, 25}],
+           Appearance->None,
+           BaselinePosition->Baseline,
+           ButtonFunction:>FrontEndExecute[{
+              FrontEnd`SetOptions[
+              FrontEnd`$FrontEnd, 
+               FrontEnd`PreferencesSettings -> {"Page" -> "Advanced"}], 
+              FrontEnd`FrontEndToken["PreferencesDialog"]}],
+           Evaluator->None,
+           Method->"Preemptive"]}
+        },
+        AutoDelete->False,
+        FrameStyle->GrayLevel[0.85],
+        GridBoxDividers->{"Columns" -> {False, {True}}},
+        GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
+        GridBoxSpacings->{"Columns" -> {{2}}}]}
+     },
+     DefaultBaseStyle->"Column",
+     GridBoxAlignment->{
+      "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, 
+       "RowsIndexed" -> {}},
+     GridBoxDividers->{
+      "Columns" -> {{False}}, "ColumnsIndexed" -> {}, "Rows" -> {{False}}, 
+       "RowsIndexed" -> {}},
+     GridBoxItemSize->{
+      "Columns" -> {{Automatic}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}}, 
+       "RowsIndexed" -> {}},
+     GridBoxSpacings->{"Columns" -> {
+         Offset[0.27999999999999997`], {
+          Offset[0.5599999999999999]}, 
+         Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
+         Offset[0.2], 
+         Offset[1.2], {
+          Offset[0.4]}, 
+         Offset[0.2]}, "RowsIndexed" -> {}}],
+    BaseStyle->"OutputSizeLimit",
+    FrameMargins->{{12, 12}, {0, 15}},
+    FrameStyle->GrayLevel[0.85],
+    RoundingRadius->5,
+    StripOnInput->False],
+   Deploy,
+   DefaultBaseStyle->"Deploy"],
+  If[17463603852504468309 === $SessionID, 
+   Out[18], Message[
+     MessageName[Syntax, "noinfoker"]]; Missing["NotAvailable"]; 
+   Null]]], "Output",
+ CellChangeTimes->{{3.7731418073007402`*^9, 3.773141832563183*^9}},
+ CellLabel->"Out[18]=",ExpressionUUID->"0fce6bb0-45fe-4e6c-a361-d7b5261cb38e"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"Export", "[", 
+  RowBox[{"\"\<replacementRule.m\>\"", ",", "replacement"}], "]"}]], "Input",
+ CellChangeTimes->{{3.773141845931491*^9, 3.77314186938391*^9}},
+ CellLabel->"In[19]:=",ExpressionUUID->"f774e49f-9f49-4e9e-8986-5d0680aa1203"],
+
+Cell[BoxData["\<\"replacementRule.m\"\>"], "Output",
+ CellChangeTimes->{3.773141878024766*^9},
+ CellLabel->"Out[19]=",ExpressionUUID->"1a69893c-2615-4d54-91e8-335f2abb5de6"]
+}, Open  ]],
+
+Cell[BoxData[
+ RowBox[{"\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", 
+  "\[IndentingNewLine]", "\[IndentingNewLine]"}]], "Input",
+ CellChangeTimes->{{3.775927634314473*^9, 
+  3.775927634901973*^9}},ExpressionUUID->"9a42fe37-6411-44bf-809a-\
+1046a3483503"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"replacement", " ", "=", " ", 
+   RowBox[{"Import", "[", "\"\<replacementRule.m\>\"", "]"}]}], 
+  ";"}]], "Input",
+ CellChangeTimes->{{3.77374035501915*^9, 3.7737403937904577`*^9}},
+ CellLabel->"In[13]:=",ExpressionUUID->"9e2a44fe-0bb9-4f67-9e8b-da5c10ecf6b1"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["replacement"], "Input",
+ CellChangeTimes->{{3.775826665457222*^9, 3.775826666555854*^9}},
+ CellLabel->"In[24]:=",ExpressionUUID->"f396c3bc-ea1b-44d3-a6cc-f7fecc0fffe5"],
+
+Cell[BoxData[
+ InterpretationBox[
+  TagBox[
+   FrameBox[GridBox[{
+      {
+       ItemBox[
+        TagBox[
+         RowBox[{"{", 
+          RowBox[{
+           RowBox[{
+            RowBox[{"PVC", "[", 
+             RowBox[{"0", ",", "0", ",", "0", ",", "0", ",", 
+              RowBox[{
+               SuperscriptBox["MH", "2"], "-", "S", "-", "T24", "-", "U"}], 
+              ",", "T", ",", 
+              SqrtBox[
+               SuperscriptBox["MT", "2"]], ",", 
+              SqrtBox[
+               SuperscriptBox["MT", "2"]], ",", 
+              SqrtBox[
+               SuperscriptBox["MT", "2"]]}], "]"}], "\[Rule]", 
+            RowBox[{
+             RowBox[{"-", 
+              FractionBox[
+               SuperscriptBox[
+                RowBox[{"Log", "[", 
+                 FractionBox[
+                  RowBox[{
+                   RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "+", 
+                   SqrtBox[
+                    TemplateBox[{"1"},
+                    "OutputSizeLimit`Skeleton"]]}], 
+                  RowBox[{"2", " ", 
+                   SuperscriptBox["MT", "2"]}]], "]"}], "2"], 
+               RowBox[{"2", " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  SuperscriptBox["MH", "2"], "-", "S", "-", "T", "-", "T24", 
+                  "-", "U"}], ")"}]}]]}], "+", 
+             FractionBox[
+              SuperscriptBox[
+               RowBox[{"Log", "[", 
+                FractionBox[
+                 RowBox[{
+                  RowBox[{"-", 
+                   SuperscriptBox["MH", "2"]}], "+", 
+                  TemplateBox[{"4"},
+                   "OutputSizeLimit`Skeleton"], "+", 
+                  SqrtBox[
+                   TemplateBox[{"1"},
+                    "OutputSizeLimit`Skeleton"]]}], 
+                 RowBox[{"2", " ", 
+                  SuperscriptBox["MT", "2"]}]], "]"}], "2"], 
+              RowBox[{"2", " ", 
+               RowBox[{"(", 
+                RowBox[{
+                 SuperscriptBox["MH", "2"], "-", "S", "-", "T", "-", "T24", 
+                 "-", "U"}], ")"}]}]]}]}], ",", 
+           TemplateBox[{"436"},
+            "OutputSizeLimit`Skeleton"], ",", 
+           RowBox[{
+            RowBox[{"PVD", "[", 
+             RowBox[{"1", ",", "1", ",", "0", ",", "0", ",", 
+              SuperscriptBox["MH", "2"], ",", "T24", ",", "0", ",", "0", ",", 
+              
+              RowBox[{
+               SuperscriptBox["MH", "2"], "-", "S", "-", "T", "-", "T14"}], 
+              ",", "T", ",", 
+              SqrtBox[
+               SuperscriptBox["MT", "2"]], ",", 
+              SqrtBox[
+               SuperscriptBox["MT", "2"]], ",", 
+              SqrtBox[
+               SuperscriptBox["MT", "2"]], ",", 
+              SqrtBox[
+               SuperscriptBox["MT", "2"]]}], "]"}], "\[Rule]", 
+            RowBox[{
+             RowBox[{"-", 
+              FractionBox[
+               RowBox[{"T", " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  SuperscriptBox["MH", "2"], "-", "S", "-", "T", "-", "T14"}],
+                  ")"}], " ", 
+                RowBox[{"DiscB", "[", 
+                 RowBox[{"T", ",", 
+                  SqrtBox[
+                   SuperscriptBox["MT", "2"]], ",", 
+                  SqrtBox[
+                   SuperscriptBox["MT", "2"]]}], "]"}]}], 
+               RowBox[{"4", " ", 
+                RowBox[{"Kibble\[Phi]", "[", 
+                 RowBox[{
+                  SuperscriptBox["MH", "2"], ",", "T24", ",", "0", ",", "0", 
+                  ",", 
+                  RowBox[{
+                   SuperscriptBox["MH", "2"], "-", "S", "-", "T", "-", 
+                   "T14"}], ",", "T"}], "]"}]}]]}], "-", 
+             FractionBox[
+              TemplateBox[{"1"},
+               "OutputSizeLimit`Skeleton"], 
+              TemplateBox[{"1"},
+               "OutputSizeLimit`Skeleton"]], "+", 
+             TemplateBox[{"6"},
+              "OutputSizeLimit`Skeleton"], "+", 
+             FractionBox[
+              TemplateBox[{"1"},
+               "OutputSizeLimit`Skeleton"], 
+              TemplateBox[{"1"},
+               "OutputSizeLimit`Skeleton"]], "-", 
+             FractionBox[
+              RowBox[{"T", " ", 
+               TemplateBox[{"2"},
+                "OutputSizeLimit`Skeleton"], " ", 
+               RowBox[{"ScalarD0", "[", 
+                RowBox[{"0", ",", 
+                 SuperscriptBox["MH", "2"], ",", 
+                 TemplateBox[{"6"},
+                  "OutputSizeLimit`Skeleton"], ",", 
+                 SqrtBox[
+                  SuperscriptBox["MT", "2"]], ",", 
+                 SqrtBox[
+                  SuperscriptBox["MT", "2"]]}], "]"}]}], 
+              RowBox[{"8", " ", 
+               SuperscriptBox[
+                TemplateBox[{"1"},
+                 "OutputSizeLimit`Skeleton"], "2"]}]]}]}]}], "}"}],
+         Short[#, 5]& ],
+        BaseStyle->{Deployed -> False},
+        StripOnInput->False]},
+      {GridBox[{
+         {
+          TagBox[
+           TooltipBox[
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource[
+                "FEStrings", "sizeBriefExplanation"], StandardForm],
+               ImageSizeCache->{58., {2., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLText",
+             StripOnInput->False],
+            StyleBox[
+             DynamicBox[
+              ToBoxes[
+               FEPrivate`FrontEndResource["FEStrings", "sizeExplanation"], 
+               StandardForm]], DynamicUpdating -> True, StripOnInput -> 
+             False]],
+           Annotation[#, 
+            Style[
+             Dynamic[
+              FEPrivate`FrontEndResource["FEStrings", "sizeExplanation"]], 
+             DynamicUpdating -> True], "Tooltip"]& ], 
+          ButtonBox[
+           PaneSelectorBox[{False->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowLess"], 
+                StandardForm],
+               ImageSizeCache->{50., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControl",
+             StripOnInput->False], True->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowLess"], 
+                StandardForm]],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControlActive",
+             StripOnInput->False]}, Dynamic[
+             CurrentValue["MouseOver"]],
+            Alignment->Center,
+            FrameMargins->0,
+            ImageSize->{Automatic, 25}],
+           Appearance->None,
+           BaselinePosition->Baseline,
+           
+           ButtonFunction:>OutputSizeLimit`ButtonFunction[
+            OutputSizeLimit`Defer, 24, 17481197693528306459, 5/2],
+           Enabled->True,
+           Evaluator->Automatic,
+           Method->"Queued"], 
+          ButtonBox[
+           PaneSelectorBox[{False->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowMore"], 
+                StandardForm],
+               ImageSizeCache->{56., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControl",
+             StripOnInput->False], True->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowMore"], 
+                StandardForm]],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControlActive",
+             StripOnInput->False]}, Dynamic[
+             CurrentValue["MouseOver"]],
+            Alignment->Center,
+            FrameMargins->0,
+            ImageSize->{Automatic, 25}],
+           Appearance->None,
+           BaselinePosition->Baseline,
+           
+           ButtonFunction:>OutputSizeLimit`ButtonFunction[
+            OutputSizeLimit`Defer, 24, 17481197693528306459, 5 2],
+           Enabled->True,
+           Evaluator->Automatic,
+           Method->"Queued"], 
+          ButtonBox[
+           PaneSelectorBox[{False->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowAll"], 
+                StandardForm],
+               ImageSizeCache->{42., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControl",
+             StripOnInput->False], True->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowAll"], 
+                StandardForm]],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControlActive",
+             StripOnInput->False]}, Dynamic[
+             CurrentValue["MouseOver"]],
+            Alignment->Center,
+            FrameMargins->0,
+            ImageSize->{Automatic, 25}],
+           Appearance->None,
+           BaselinePosition->Baseline,
+           
+           ButtonFunction:>OutputSizeLimit`ButtonFunction[
+            OutputSizeLimit`Defer, 24, 17481197693528306459, Infinity],
+           Enabled->True,
+           Evaluator->Automatic,
+           Method->"Queued"], 
+          ButtonBox[
+           PaneSelectorBox[{False->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeChangeLimit"], 
+                StandardForm],
+               ImageSizeCache->{74., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControl",
+             StripOnInput->False], True->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeChangeLimit"], 
+                StandardForm]],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControlActive",
+             StripOnInput->False]}, Dynamic[
+             CurrentValue["MouseOver"]],
+            Alignment->Center,
+            FrameMargins->0,
+            ImageSize->{Automatic, 25}],
+           Appearance->None,
+           BaselinePosition->Baseline,
+           ButtonFunction:>FrontEndExecute[{
+              FrontEnd`SetOptions[
+              FrontEnd`$FrontEnd, 
+               FrontEnd`PreferencesSettings -> {"Page" -> "Advanced"}], 
+              FrontEnd`FrontEndToken["PreferencesDialog"]}],
+           Evaluator->None,
+           Method->"Preemptive"]}
+        },
+        AutoDelete->False,
+        FrameStyle->GrayLevel[0.85],
+        GridBoxDividers->{"Columns" -> {False, {True}}},
+        GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
+        GridBoxSpacings->{"Columns" -> {{2}}}]}
+     },
+     DefaultBaseStyle->"Column",
+     GridBoxAlignment->{
+      "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, 
+       "RowsIndexed" -> {}},
+     GridBoxDividers->{
+      "Columns" -> {{False}}, "ColumnsIndexed" -> {}, "Rows" -> {{False}}, 
+       "RowsIndexed" -> {}},
+     GridBoxItemSize->{
+      "Columns" -> {{Automatic}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}}, 
+       "RowsIndexed" -> {}},
+     GridBoxSpacings->{"Columns" -> {
+         Offset[0.27999999999999997`], {
+          Offset[0.5599999999999999]}, 
+         Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
+         Offset[0.2], 
+         Offset[1.2], {
+          Offset[0.4]}, 
+         Offset[0.2]}, "RowsIndexed" -> {}}],
+    BaseStyle->"OutputSizeLimit",
+    FrameMargins->{{12, 12}, {0, 15}},
+    FrameStyle->GrayLevel[0.85],
+    RoundingRadius->5,
+    StripOnInput->False],
+   Deploy,
+   DefaultBaseStyle->"Deploy"],
+  If[17481197693528306459 === $SessionID, 
+   Out[24], Message[
+     MessageName[Syntax, "noinfoker"]]; Missing["NotAvailable"]; 
+   Null]]], "Output",
+ CellChangeTimes->{3.7758269041780863`*^9},
+ CellLabel->"Out[24]=",ExpressionUUID->"1d1b26d3-3d5a-4f24-a113-21f43e2027cf"]
+}, Open  ]],
+
+Cell[BoxData[{
+ RowBox[{
+  RowBox[{"b1", " ", "=", " ", 
+   RowBox[{"Import", "[", "\"\<ggHgg_PV_box_1_9diags.m\>\"", "]"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"b2", " ", "=", " ", 
+   RowBox[{"Import", "[", "\"\<ggHgg_PV_box_2_9diags.m\>\"", "]"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"b3", " ", "=", " ", 
+   RowBox[{"Import", "[", "\"\<ggHgg_PV_box_3_9diags.m\>\"", "]"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"b4", " ", "=", " ", 
+   RowBox[{"Import", "[", "\"\<ggHgg_PV_box_4_9diags.m\>\"", "]"}]}], 
+  ";"}]}], "Input",
+ CellChangeTimes->{{3.7737413218610373`*^9, 3.7737413901038446`*^9}, {
+   3.7737415493403063`*^9, 3.7737415755620737`*^9}, 3.7737416080778503`*^9},
+ CellLabel->"In[14]:=",ExpressionUUID->"0484a78b-7482-4457-ac3e-5762b8c80c69"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"b1a", " ", "=", " ", 
+  RowBox[{"b1", "//.", " ", "replacement"}]}]], "Input",
+ CellChangeTimes->{{3.773741803035206*^9, 3.773741821644495*^9}},
+ CellLabel->"In[18]:=",ExpressionUUID->"6f58dd70-ec76-4b2e-8d7d-ae9f5adae4ca"],
+
+Cell[BoxData[
+ InterpretationBox[
+  TagBox[
+   FrameBox[GridBox[{
+      {
+       ItemBox[
+        TagBox[
+         RowBox[{
+          RowBox[{"Amp", "[", 
+           RowBox[{
+            RowBox[{"{", 
+             RowBox[{
+              RowBox[{"{", 
+               RowBox[{
+                RowBox[{"V", "[", 
+                 RowBox[{"5", ",", 
+                  RowBox[{"{", "Glu1", "}"}]}], "]"}], ",", 
+                RowBox[{"k", "[", "1", "]"}], ",", "0", ",", 
+                RowBox[{"{", 
+                 RowBox[{
+                  SqrtBox["3"], " ", "ColorCharge"}], "}"}]}], "}"}], ",", 
+              RowBox[{"{", 
+               RowBox[{
+                RowBox[{"V", "[", 
+                 RowBox[{"5", ",", 
+                  RowBox[{"{", "Glu2", "}"}]}], "]"}], ",", 
+                RowBox[{"k", "[", "2", "]"}], ",", "0", ",", 
+                RowBox[{"{", 
+                 RowBox[{
+                  SqrtBox["3"], " ", "ColorCharge"}], "}"}]}], "}"}]}], "}"}],
+             "\[Rule]", 
+            RowBox[{"{", 
+             RowBox[{
+              RowBox[{"{", 
+               RowBox[{
+                RowBox[{"S", "[", "1", "]"}], ",", 
+                RowBox[{"k", "[", "3", "]"}], ",", "MH", ",", 
+                RowBox[{"{", "}"}]}], "}"}], ",", 
+              RowBox[{"{", 
+               RowBox[{
+                RowBox[{"V", "[", 
+                 RowBox[{"5", ",", 
+                  RowBox[{"{", "Glu4", "}"}]}], "]"}], ",", 
+                RowBox[{"k", "[", "4", "]"}], ",", "0", ",", 
+                RowBox[{"{", 
+                 RowBox[{
+                  SqrtBox["3"], " ", "ColorCharge"}], "}"}]}], "}"}], ",", 
+              RowBox[{"{", 
+               RowBox[{
+                RowBox[{"V", "[", 
+                 RowBox[{"5", ",", 
+                  RowBox[{"{", "Glu5", "}"}]}], "]"}], ",", 
+                RowBox[{"k", "[", "5", "]"}], ",", "0", ",", 
+                RowBox[{"{", 
+                 RowBox[{
+                  SqrtBox["3"], " ", "ColorCharge"}], "}"}]}], "}"}]}], 
+             "}"}]}], "]"}], "[", 
+          RowBox[{
+           FractionBox[
+            RowBox[{"c3", " ", 
+             RowBox[{"(", 
+              TemplateBox[{"1"},
+               "OutputSizeLimit`Skeleton"], ")"}]}], "T14"], "+", 
+           FractionBox[
+            RowBox[{"c3", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"-", 
+                FractionBox[
+                 TemplateBox[{"1"},
+                  "OutputSizeLimit`Skeleton"], 
+                 RowBox[{"MW", " ", "SW"}]]}], "+", 
+               TemplateBox[{"69"},
+                "OutputSizeLimit`Skeleton"]}], ")"}]}], "T14"], "+", 
+           FractionBox[
+            RowBox[{"2", " ", "c1", " ", 
+             RowBox[{"(", 
+              TemplateBox[{"1"},
+               "OutputSizeLimit`Skeleton"], ")"}]}], "S"], "+", 
+           FractionBox[
+            RowBox[{
+             SuperscriptBox["Alfas", "2"], " ", "c2", " ", "EL", " ", 
+             SuperscriptBox["MT", "2"], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"-", 
+                FractionBox[
+                 TemplateBox[{"1"},
+                  "OutputSizeLimit`Skeleton"], "T14"]}], "+", 
+               FractionBox[
+                TemplateBox[{"1"},
+                 "OutputSizeLimit`Skeleton"], "S"]}], ")"}]}], 
+            RowBox[{"MW", " ", "SW"}]], "+", 
+           FractionBox[
+            RowBox[{
+             SuperscriptBox["Alfas", "2"], " ", "c2", " ", "EL", " ", 
+             SuperscriptBox["MT", "2"], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"-", 
+                FractionBox[
+                 TemplateBox[{"1"},
+                  "OutputSizeLimit`Skeleton"], "T14"]}], "+", 
+               FractionBox[
+                TemplateBox[{"1"},
+                 "OutputSizeLimit`Skeleton"], "S"]}], ")"}]}], 
+            RowBox[{"MW", " ", "SW"}]]}], "]"}],
+         Short[#, 5]& ],
+        BaseStyle->{Deployed -> False},
+        StripOnInput->False]},
+      {GridBox[{
+         {
+          TagBox[
+           TooltipBox[
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource[
+                "FEStrings", "sizeBriefExplanation"], StandardForm],
+               ImageSizeCache->{58., {2., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLText",
+             StripOnInput->False],
+            StyleBox[
+             DynamicBox[
+              ToBoxes[
+               FEPrivate`FrontEndResource["FEStrings", "sizeExplanation"], 
+               StandardForm]], DynamicUpdating -> True, StripOnInput -> 
+             False]],
+           Annotation[#, 
+            Style[
+             Dynamic[
+              FEPrivate`FrontEndResource["FEStrings", "sizeExplanation"]], 
+             DynamicUpdating -> True], "Tooltip"]& ], 
+          ButtonBox[
+           PaneSelectorBox[{False->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowLess"], 
+                StandardForm],
+               ImageSizeCache->{50., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControl",
+             StripOnInput->False], True->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowLess"], 
+                StandardForm],
+               ImageSizeCache->{50., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControlActive",
+             StripOnInput->False]}, Dynamic[
+             CurrentValue["MouseOver"]],
+            Alignment->Center,
+            FrameMargins->0,
+            ImageSize->{Automatic, 25}],
+           Appearance->None,
+           BaselinePosition->Baseline,
+           
+           ButtonFunction:>OutputSizeLimit`ButtonFunction[
+            OutputSizeLimit`Defer, 18, 17481197693528306459, 5/2],
+           Enabled->True,
+           Evaluator->Automatic,
+           Method->"Queued"], 
+          ButtonBox[
+           PaneSelectorBox[{False->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowMore"], 
+                StandardForm],
+               ImageSizeCache->{56., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControl",
+             StripOnInput->False], True->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowMore"], 
+                StandardForm],
+               ImageSizeCache->{56., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControlActive",
+             StripOnInput->False]}, Dynamic[
+             CurrentValue["MouseOver"]],
+            Alignment->Center,
+            FrameMargins->0,
+            ImageSize->{Automatic, 25}],
+           Appearance->None,
+           BaselinePosition->Baseline,
+           
+           ButtonFunction:>OutputSizeLimit`ButtonFunction[
+            OutputSizeLimit`Defer, 18, 17481197693528306459, 5 2],
+           Enabled->True,
+           Evaluator->Automatic,
+           Method->"Queued"], 
+          ButtonBox[
+           PaneSelectorBox[{False->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowAll"], 
+                StandardForm],
+               ImageSizeCache->{42., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControl",
+             StripOnInput->False], True->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowAll"], 
+                StandardForm],
+               ImageSizeCache->{42., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControlActive",
+             StripOnInput->False]}, Dynamic[
+             CurrentValue["MouseOver"]],
+            Alignment->Center,
+            FrameMargins->0,
+            ImageSize->{Automatic, 25}],
+           Appearance->None,
+           BaselinePosition->Baseline,
+           
+           ButtonFunction:>OutputSizeLimit`ButtonFunction[
+            OutputSizeLimit`Defer, 18, 17481197693528306459, Infinity],
+           Enabled->True,
+           Evaluator->Automatic,
+           Method->"Queued"], 
+          ButtonBox[
+           PaneSelectorBox[{False->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeChangeLimit"], 
+                StandardForm],
+               ImageSizeCache->{74., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControl",
+             StripOnInput->False], True->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeChangeLimit"], 
+                StandardForm],
+               ImageSizeCache->{74., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControlActive",
+             StripOnInput->False]}, Dynamic[
+             CurrentValue["MouseOver"]],
+            Alignment->Center,
+            FrameMargins->0,
+            ImageSize->{Automatic, 25}],
+           Appearance->None,
+           BaselinePosition->Baseline,
+           ButtonFunction:>FrontEndExecute[{
+              FrontEnd`SetOptions[
+              FrontEnd`$FrontEnd, 
+               FrontEnd`PreferencesSettings -> {"Page" -> "Advanced"}], 
+              FrontEnd`FrontEndToken["PreferencesDialog"]}],
+           Evaluator->None,
+           Method->"Preemptive"]}
+        },
+        AutoDelete->False,
+        FrameStyle->GrayLevel[0.85],
+        GridBoxDividers->{"Columns" -> {False, {True}}},
+        GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
+        GridBoxSpacings->{"Columns" -> {{2}}}]}
+     },
+     DefaultBaseStyle->"Column",
+     GridBoxAlignment->{
+      "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, 
+       "RowsIndexed" -> {}},
+     GridBoxDividers->{
+      "Columns" -> {{False}}, "ColumnsIndexed" -> {}, "Rows" -> {{False}}, 
+       "RowsIndexed" -> {}},
+     GridBoxItemSize->{
+      "Columns" -> {{Automatic}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}}, 
+       "RowsIndexed" -> {}},
+     GridBoxSpacings->{"Columns" -> {
+         Offset[0.27999999999999997`], {
+          Offset[0.5599999999999999]}, 
+         Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
+         Offset[0.2], 
+         Offset[1.2], {
+          Offset[0.4]}, 
+         Offset[0.2]}, "RowsIndexed" -> {}}],
+    BaseStyle->"OutputSizeLimit",
+    FrameMargins->{{12, 12}, {0, 15}},
+    FrameStyle->GrayLevel[0.85],
+    RoundingRadius->5,
+    StripOnInput->False],
+   Deploy,
+   DefaultBaseStyle->"Deploy"],
+  If[17481197693528306459 === $SessionID, 
+   Out[18], Message[
+     MessageName[Syntax, "noinfoker"]]; Missing["NotAvailable"]; 
+   Null]]], "Output",
+ CellChangeTimes->{3.7737419708335533`*^9, 3.775826465540903*^9},
+ CellLabel->"Out[18]=",ExpressionUUID->"b4f39a2e-5da3-4756-9d30-b57a024860f7"]
+}, Open  ]],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"Export", "[", 
+   RowBox[{
+    RowBox[{"\"\<ggHgg_LR_box_\>\"", "<>", 
+     RowBox[{"ToString", "[", "1", "]"}], "<>", "\"\<_9diags.m\>\""}], ",", 
+    RowBox[{"b1a", "[", 
+     RowBox[{"[", "1", "]"}], "]"}]}], "]"}], ";"}]], "Input",
+ CellChangeTimes->{{3.775826581607827*^9, 3.77582658845979*^9}},
+ CellLabel->"In[22]:=",ExpressionUUID->"6dc8539a-b6fb-45ed-bf01-82aab57aef98"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"b2a", "=", 
+  RowBox[{"b2", "//.", "replacement"}]}]], "Input",
+ CellChangeTimes->{{3.7737418303608932`*^9, 3.7737418362486486`*^9}},
+ CellLabel->"In[23]:=",ExpressionUUID->"cb0ca33d-b1f5-4703-8d8e-8c263a31064a"],
+
+Cell[BoxData[
+ InterpretationBox[
+  TagBox[
+   FrameBox[GridBox[{
+      {
+       ItemBox[
+        TagBox[
+         RowBox[{
+          RowBox[{"Amp", "[", 
+           RowBox[{
+            RowBox[{"{", 
+             RowBox[{
+              RowBox[{"{", 
+               RowBox[{
+                RowBox[{"V", "[", 
+                 RowBox[{"5", ",", 
+                  RowBox[{"{", "Glu1", "}"}]}], "]"}], ",", 
+                RowBox[{"k", "[", "1", "]"}], ",", "0", ",", 
+                RowBox[{"{", 
+                 RowBox[{
+                  SqrtBox["3"], " ", "ColorCharge"}], "}"}]}], "}"}], ",", 
+              RowBox[{"{", 
+               RowBox[{
+                RowBox[{"V", "[", 
+                 RowBox[{"5", ",", 
+                  RowBox[{"{", "Glu2", "}"}]}], "]"}], ",", 
+                RowBox[{"k", "[", "2", "]"}], ",", "0", ",", 
+                RowBox[{"{", 
+                 RowBox[{
+                  SqrtBox["3"], " ", "ColorCharge"}], "}"}]}], "}"}]}], "}"}],
+             "\[Rule]", 
+            RowBox[{"{", 
+             RowBox[{
+              RowBox[{"{", 
+               RowBox[{
+                RowBox[{"S", "[", "1", "]"}], ",", 
+                RowBox[{"k", "[", "3", "]"}], ",", "MH", ",", 
+                RowBox[{"{", "}"}]}], "}"}], ",", 
+              RowBox[{"{", 
+               RowBox[{
+                RowBox[{"V", "[", 
+                 RowBox[{"5", ",", 
+                  RowBox[{"{", "Glu4", "}"}]}], "]"}], ",", 
+                RowBox[{"k", "[", "4", "]"}], ",", "0", ",", 
+                RowBox[{"{", 
+                 RowBox[{
+                  SqrtBox["3"], " ", "ColorCharge"}], "}"}]}], "}"}], ",", 
+              RowBox[{"{", 
+               RowBox[{
+                RowBox[{"V", "[", 
+                 RowBox[{"5", ",", 
+                  RowBox[{"{", "Glu5", "}"}]}], "]"}], ",", 
+                RowBox[{"k", "[", "5", "]"}], ",", "0", ",", 
+                RowBox[{"{", 
+                 RowBox[{
+                  SqrtBox["3"], " ", "ColorCharge"}], "}"}]}], "}"}]}], 
+             "}"}]}], "]"}], "[", 
+          RowBox[{
+           FractionBox[
+            RowBox[{"2", " ", "c1", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               FractionBox[
+                RowBox[{"4", " ", 
+                 TemplateBox[{"5"},
+                  "OutputSizeLimit`Skeleton"], " ", 
+                 RowBox[{"(", 
+                  TemplateBox[{"1"},
+                   "OutputSizeLimit`Skeleton"], ")"}]}], 
+                RowBox[{"MW", " ", "SW"}]], "+", 
+               TemplateBox[{"100"},
+                "OutputSizeLimit`Skeleton"], "+", 
+               TemplateBox[{"1"},
+                "OutputSizeLimit`Skeleton"], "+", 
+               FractionBox[
+                TemplateBox[{"1"},
+                 "OutputSizeLimit`Skeleton"], 
+                RowBox[{"MW", " ", "SW"}]]}], ")"}]}], "T24"], "+", 
+           FractionBox[
+            RowBox[{"c2", " ", 
+             RowBox[{"(", 
+              TemplateBox[{"1"},
+               "OutputSizeLimit`Skeleton"], ")"}]}], "T14"], "+", 
+           FractionBox[
+            RowBox[{"c2", " ", 
+             TemplateBox[{"1"},
+              "OutputSizeLimit`Skeleton"]}], "T14"], "-", 
+           FractionBox[
+            RowBox[{
+             SuperscriptBox["Alfas", "2"], " ", 
+             TemplateBox[{"3"},
+              "OutputSizeLimit`Skeleton"], " ", 
+             RowBox[{"(", 
+              TemplateBox[{"1"},
+               "OutputSizeLimit`Skeleton"], ")"}]}], 
+            RowBox[{"MW", " ", "SW"}]], "-", 
+           FractionBox[
+            RowBox[{
+             SuperscriptBox["Alfas", "2"], " ", "c3", " ", "EL", " ", 
+             SuperscriptBox["MT", "2"], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"-", 
+                FractionBox[
+                 TemplateBox[{"1"},
+                  "OutputSizeLimit`Skeleton"], "T24"]}], "+", 
+               FractionBox[
+                TemplateBox[{"1"},
+                 "OutputSizeLimit`Skeleton"], "T14"]}], ")"}]}], 
+            RowBox[{"MW", " ", "SW"}]]}], "]"}],
+         Short[#, 5]& ],
+        BaseStyle->{Deployed -> False},
+        StripOnInput->False]},
+      {GridBox[{
+         {
+          TagBox[
+           TooltipBox[
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource[
+                "FEStrings", "sizeBriefExplanation"], StandardForm],
+               ImageSizeCache->{58., {2., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLText",
+             StripOnInput->False],
+            StyleBox[
+             DynamicBox[
+              ToBoxes[
+               FEPrivate`FrontEndResource["FEStrings", "sizeExplanation"], 
+               StandardForm]], DynamicUpdating -> True, StripOnInput -> 
+             False]],
+           Annotation[#, 
+            Style[
+             Dynamic[
+              FEPrivate`FrontEndResource["FEStrings", "sizeExplanation"]], 
+             DynamicUpdating -> True], "Tooltip"]& ], 
+          ButtonBox[
+           PaneSelectorBox[{False->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowLess"], 
+                StandardForm],
+               ImageSizeCache->{50., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControl",
+             StripOnInput->False], True->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowLess"], 
+                StandardForm]],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControlActive",
+             StripOnInput->False]}, Dynamic[
+             CurrentValue["MouseOver"]],
+            Alignment->Center,
+            FrameMargins->0,
+            ImageSize->{Automatic, 25}],
+           Appearance->None,
+           BaselinePosition->Baseline,
+           
+           ButtonFunction:>OutputSizeLimit`ButtonFunction[
+            OutputSizeLimit`Defer, 23, 17481197693528306459, 5/2],
+           Enabled->True,
+           Evaluator->Automatic,
+           Method->"Queued"], 
+          ButtonBox[
+           PaneSelectorBox[{False->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowMore"], 
+                StandardForm],
+               ImageSizeCache->{56., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControl",
+             StripOnInput->False], True->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowMore"], 
+                StandardForm]],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControlActive",
+             StripOnInput->False]}, Dynamic[
+             CurrentValue["MouseOver"]],
+            Alignment->Center,
+            FrameMargins->0,
+            ImageSize->{Automatic, 25}],
+           Appearance->None,
+           BaselinePosition->Baseline,
+           
+           ButtonFunction:>OutputSizeLimit`ButtonFunction[
+            OutputSizeLimit`Defer, 23, 17481197693528306459, 5 2],
+           Enabled->True,
+           Evaluator->Automatic,
+           Method->"Queued"], 
+          ButtonBox[
+           PaneSelectorBox[{False->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowAll"], 
+                StandardForm],
+               ImageSizeCache->{42., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControl",
+             StripOnInput->False], True->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowAll"], 
+                StandardForm]],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControlActive",
+             StripOnInput->False]}, Dynamic[
+             CurrentValue["MouseOver"]],
+            Alignment->Center,
+            FrameMargins->0,
+            ImageSize->{Automatic, 25}],
+           Appearance->None,
+           BaselinePosition->Baseline,
+           
+           ButtonFunction:>OutputSizeLimit`ButtonFunction[
+            OutputSizeLimit`Defer, 23, 17481197693528306459, Infinity],
+           Enabled->True,
+           Evaluator->Automatic,
+           Method->"Queued"], 
+          ButtonBox[
+           PaneSelectorBox[{False->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeChangeLimit"], 
+                StandardForm],
+               ImageSizeCache->{74., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControl",
+             StripOnInput->False], True->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeChangeLimit"], 
+                StandardForm],
+               ImageSizeCache->{74., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControlActive",
+             StripOnInput->False]}, Dynamic[
+             CurrentValue["MouseOver"]],
+            Alignment->Center,
+            FrameMargins->0,
+            ImageSize->{Automatic, 25}],
+           Appearance->None,
+           BaselinePosition->Baseline,
+           ButtonFunction:>FrontEndExecute[{
+              FrontEnd`SetOptions[
+              FrontEnd`$FrontEnd, 
+               FrontEnd`PreferencesSettings -> {"Page" -> "Advanced"}], 
+              FrontEnd`FrontEndToken["PreferencesDialog"]}],
+           Evaluator->None,
+           Method->"Preemptive"]}
+        },
+        AutoDelete->False,
+        FrameStyle->GrayLevel[0.85],
+        GridBoxDividers->{"Columns" -> {False, {True}}},
+        GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
+        GridBoxSpacings->{"Columns" -> {{2}}}]}
+     },
+     DefaultBaseStyle->"Column",
+     GridBoxAlignment->{
+      "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, 
+       "RowsIndexed" -> {}},
+     GridBoxDividers->{
+      "Columns" -> {{False}}, "ColumnsIndexed" -> {}, "Rows" -> {{False}}, 
+       "RowsIndexed" -> {}},
+     GridBoxItemSize->{
+      "Columns" -> {{Automatic}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}}, 
+       "RowsIndexed" -> {}},
+     GridBoxSpacings->{"Columns" -> {
+         Offset[0.27999999999999997`], {
+          Offset[0.5599999999999999]}, 
+         Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
+         Offset[0.2], 
+         Offset[1.2], {
+          Offset[0.4]}, 
+         Offset[0.2]}, "RowsIndexed" -> {}}],
+    BaseStyle->"OutputSizeLimit",
+    FrameMargins->{{12, 12}, {0, 15}},
+    FrameStyle->GrayLevel[0.85],
+    RoundingRadius->5,
+    StripOnInput->False],
+   Deploy,
+   DefaultBaseStyle->"Deploy"],
+  If[17481197693528306459 === $SessionID, 
+   Out[23], Message[
+     MessageName[Syntax, "noinfoker"]]; Missing["NotAvailable"]; 
+   Null]]], "Output",
+ CellChangeTimes->{3.7737423072521887`*^9, 3.775826897885051*^9},
+ CellLabel->"Out[23]=",ExpressionUUID->"1d5fa8ad-833f-46d5-a1dc-a4179db033a8"]
+}, Open  ]],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"Export", "[", 
+   RowBox[{
+    RowBox[{"\"\<ggHgg_LR_box_\>\"", "<>", 
+     RowBox[{"ToString", "[", "2", "]"}], "<>", "\"\<_9diags.m\>\""}], ",", 
+    RowBox[{"b2a", "[", 
+     RowBox[{"[", "1", "]"}], "]"}]}], "]"}], ";"}]], "Input",
+ CellChangeTimes->{{3.775826642706215*^9, 3.7758266432387667`*^9}},
+ CellLabel->"In[25]:=",ExpressionUUID->"5eff98d5-542a-4fb2-8a57-8b5bb386d93b"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"b3a", "=", 
+  RowBox[{"b3", "//.", "replacement"}]}]], "Input",
+ CellChangeTimes->{{3.773741839578579*^9, 3.7737418466102*^9}},
+ CellLabel->"In[26]:=",ExpressionUUID->"6b8a882a-c4d7-48c9-bd9a-89d690e1775f"],
+
+Cell[BoxData[
+ InterpretationBox[
+  TagBox[
+   FrameBox[GridBox[{
+      {
+       ItemBox[
+        TagBox[
+         RowBox[{
+          RowBox[{"Amp", "[", 
+           RowBox[{
+            RowBox[{"{", 
+             RowBox[{
+              RowBox[{"{", 
+               RowBox[{
+                RowBox[{"V", "[", 
+                 RowBox[{"5", ",", 
+                  RowBox[{"{", "Glu1", "}"}]}], "]"}], ",", 
+                RowBox[{"k", "[", "1", "]"}], ",", "0", ",", 
+                RowBox[{"{", 
+                 RowBox[{
+                  SqrtBox["3"], " ", "ColorCharge"}], "}"}]}], "}"}], ",", 
+              RowBox[{"{", 
+               RowBox[{
+                RowBox[{"V", "[", 
+                 RowBox[{"5", ",", 
+                  RowBox[{"{", "Glu2", "}"}]}], "]"}], ",", 
+                RowBox[{"k", "[", "2", "]"}], ",", "0", ",", 
+                RowBox[{"{", 
+                 RowBox[{
+                  SqrtBox["3"], " ", "ColorCharge"}], "}"}]}], "}"}]}], "}"}],
+             "\[Rule]", 
+            RowBox[{"{", 
+             RowBox[{
+              RowBox[{"{", 
+               RowBox[{
+                RowBox[{"S", "[", "1", "]"}], ",", 
+                RowBox[{"k", "[", "3", "]"}], ",", "MH", ",", 
+                RowBox[{"{", "}"}]}], "}"}], ",", 
+              RowBox[{"{", 
+               RowBox[{
+                RowBox[{"V", "[", 
+                 RowBox[{"5", ",", 
+                  RowBox[{"{", "Glu4", "}"}]}], "]"}], ",", 
+                RowBox[{"k", "[", "4", "]"}], ",", "0", ",", 
+                RowBox[{"{", 
+                 RowBox[{
+                  SqrtBox["3"], " ", "ColorCharge"}], "}"}]}], "}"}], ",", 
+              RowBox[{"{", 
+               RowBox[{
+                RowBox[{"V", "[", 
+                 RowBox[{"5", ",", 
+                  RowBox[{"{", "Glu5", "}"}]}], "]"}], ",", 
+                RowBox[{"k", "[", "5", "]"}], ",", "0", ",", 
+                RowBox[{"{", 
+                 RowBox[{
+                  SqrtBox["3"], " ", "ColorCharge"}], "}"}]}], "}"}]}], 
+             "}"}]}], "]"}], "[", 
+          RowBox[{
+           FractionBox[
+            RowBox[{"c2", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               TemplateBox[{"36"},
+                "OutputSizeLimit`Skeleton"], "+", 
+               FractionBox[
+                TemplateBox[{"1"},
+                 "OutputSizeLimit`Skeleton"], 
+                RowBox[{"MW", " ", "SW"}]]}], ")"}]}], 
+            RowBox[{
+             SuperscriptBox["MH", "2"], "-", "S", "-", "T24", "-", "U"}]], 
+           "+", 
+           FractionBox[
+            RowBox[{"c2", " ", 
+             RowBox[{"(", 
+              TemplateBox[{"1"},
+               "OutputSizeLimit`Skeleton"], ")"}]}], 
+            RowBox[{
+             SuperscriptBox["MH", "2"], "-", "S", "-", "T24", "-", "U"}]], 
+           "+", 
+           FractionBox[
+            RowBox[{"2", " ", "c1", " ", 
+             RowBox[{"(", 
+              TemplateBox[{"1"},
+               "OutputSizeLimit`Skeleton"], ")"}]}], 
+            RowBox[{
+             SuperscriptBox["MH", "2"], "-", "S", "-", "T", "-", "T14"}]], 
+           "-", 
+           FractionBox[
+            TemplateBox[{"1"},
+             "OutputSizeLimit`Skeleton"], 
+            RowBox[{"MW", " ", "SW"}]], "-", 
+           FractionBox[
+            RowBox[{
+             SuperscriptBox["Alfas", "2"], " ", "c3", " ", "EL", " ", 
+             SuperscriptBox["MT", "2"], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"-", 
+                FractionBox[
+                 TemplateBox[{"1"},
+                  "OutputSizeLimit`Skeleton"], 
+                 RowBox[{
+                  SuperscriptBox["MH", "2"], "-", "S", "-", "T24", "-", 
+                  "U"}]]}], "+", 
+               FractionBox[
+                TemplateBox[{"1"},
+                 "OutputSizeLimit`Skeleton"], 
+                TemplateBox[{"1"},
+                 "OutputSizeLimit`Skeleton"]]}], ")"}]}], 
+            RowBox[{"MW", " ", "SW"}]]}], "]"}],
+         Short[#, 5]& ],
+        BaseStyle->{Deployed -> False},
+        StripOnInput->False]},
+      {GridBox[{
+         {
+          TagBox[
+           TooltipBox[
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource[
+                "FEStrings", "sizeBriefExplanation"], StandardForm],
+               ImageSizeCache->{58., {2., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLText",
+             StripOnInput->False],
+            StyleBox[
+             DynamicBox[
+              ToBoxes[
+               FEPrivate`FrontEndResource["FEStrings", "sizeExplanation"], 
+               StandardForm]], DynamicUpdating -> True, StripOnInput -> 
+             False]],
+           Annotation[#, 
+            Style[
+             Dynamic[
+              FEPrivate`FrontEndResource["FEStrings", "sizeExplanation"]], 
+             DynamicUpdating -> True], "Tooltip"]& ], 
+          ButtonBox[
+           PaneSelectorBox[{False->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowLess"], 
+                StandardForm],
+               ImageSizeCache->{50., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControl",
+             StripOnInput->False], True->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowLess"], 
+                StandardForm],
+               ImageSizeCache->{50., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControlActive",
+             StripOnInput->False]}, Dynamic[
+             CurrentValue["MouseOver"]],
+            Alignment->Center,
+            FrameMargins->0,
+            ImageSize->{Automatic, 25}],
+           Appearance->None,
+           BaselinePosition->Baseline,
+           
+           ButtonFunction:>OutputSizeLimit`ButtonFunction[
+            OutputSizeLimit`Defer, 26, 17481197693528306459, 5/2],
+           Enabled->True,
+           Evaluator->Automatic,
+           Method->"Queued"], 
+          ButtonBox[
+           PaneSelectorBox[{False->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowMore"], 
+                StandardForm],
+               ImageSizeCache->{56., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControl",
+             StripOnInput->False], True->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowMore"], 
+                StandardForm],
+               ImageSizeCache->{56., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControlActive",
+             StripOnInput->False]}, Dynamic[
+             CurrentValue["MouseOver"]],
+            Alignment->Center,
+            FrameMargins->0,
+            ImageSize->{Automatic, 25}],
+           Appearance->None,
+           BaselinePosition->Baseline,
+           
+           ButtonFunction:>OutputSizeLimit`ButtonFunction[
+            OutputSizeLimit`Defer, 26, 17481197693528306459, 5 2],
+           Enabled->True,
+           Evaluator->Automatic,
+           Method->"Queued"], 
+          ButtonBox[
+           PaneSelectorBox[{False->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowAll"], 
+                StandardForm],
+               ImageSizeCache->{42., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControl",
+             StripOnInput->False], True->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowAll"], 
+                StandardForm]],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControlActive",
+             StripOnInput->False]}, Dynamic[
+             CurrentValue["MouseOver"]],
+            Alignment->Center,
+            FrameMargins->0,
+            ImageSize->{Automatic, 25}],
+           Appearance->None,
+           BaselinePosition->Baseline,
+           
+           ButtonFunction:>OutputSizeLimit`ButtonFunction[
+            OutputSizeLimit`Defer, 26, 17481197693528306459, Infinity],
+           Enabled->True,
+           Evaluator->Automatic,
+           Method->"Queued"], 
+          ButtonBox[
+           PaneSelectorBox[{False->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeChangeLimit"], 
+                StandardForm],
+               ImageSizeCache->{74., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControl",
+             StripOnInput->False], True->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeChangeLimit"], 
+                StandardForm],
+               ImageSizeCache->{74., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControlActive",
+             StripOnInput->False]}, Dynamic[
+             CurrentValue["MouseOver"]],
+            Alignment->Center,
+            FrameMargins->0,
+            ImageSize->{Automatic, 25}],
+           Appearance->None,
+           BaselinePosition->Baseline,
+           ButtonFunction:>FrontEndExecute[{
+              FrontEnd`SetOptions[
+              FrontEnd`$FrontEnd, 
+               FrontEnd`PreferencesSettings -> {"Page" -> "Advanced"}], 
+              FrontEnd`FrontEndToken["PreferencesDialog"]}],
+           Evaluator->None,
+           Method->"Preemptive"]}
+        },
+        AutoDelete->False,
+        FrameStyle->GrayLevel[0.85],
+        GridBoxDividers->{"Columns" -> {False, {True}}},
+        GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
+        GridBoxSpacings->{"Columns" -> {{2}}}]}
+     },
+     DefaultBaseStyle->"Column",
+     GridBoxAlignment->{
+      "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, 
+       "RowsIndexed" -> {}},
+     GridBoxDividers->{
+      "Columns" -> {{False}}, "ColumnsIndexed" -> {}, "Rows" -> {{False}}, 
+       "RowsIndexed" -> {}},
+     GridBoxItemSize->{
+      "Columns" -> {{Automatic}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}}, 
+       "RowsIndexed" -> {}},
+     GridBoxSpacings->{"Columns" -> {
+         Offset[0.27999999999999997`], {
+          Offset[0.5599999999999999]}, 
+         Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
+         Offset[0.2], 
+         Offset[1.2], {
+          Offset[0.4]}, 
+         Offset[0.2]}, "RowsIndexed" -> {}}],
+    BaseStyle->"OutputSizeLimit",
+    FrameMargins->{{12, 12}, {0, 15}},
+    FrameStyle->GrayLevel[0.85],
+    RoundingRadius->5,
+    StripOnInput->False],
+   Deploy,
+   DefaultBaseStyle->"Deploy"],
+  If[17481197693528306459 === $SessionID, 
+   Out[26], Message[
+     MessageName[Syntax, "noinfoker"]]; Missing["NotAvailable"]; 
+   Null]]], "Output",
+ CellChangeTimes->{3.773742529237939*^9, 3.775827007230092*^9},
+ CellLabel->"Out[26]=",ExpressionUUID->"0dd69f7f-556b-4cf0-903b-9a63338f9b78"]
+}, Open  ]],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"Export", "[", 
+   RowBox[{
+    RowBox[{"\"\<ggHgg_LR_box_\>\"", "<>", 
+     RowBox[{"ToString", "[", "3", "]"}], "<>", "\"\<_9diags.m\>\""}], ",", 
+    RowBox[{"b3a", "[", 
+     RowBox[{"[", "1", "]"}], "]"}]}], "]"}], ";"}]], "Input",
+ CellChangeTimes->{{3.77582665388268*^9, 3.77582665463208*^9}},
+ CellLabel->"In[27]:=",ExpressionUUID->"786a397e-8276-4b59-936c-1058b86fa2b4"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"b4a", "=", 
+  RowBox[{"b4", "//.", "replacement"}]}]], "Input",
+ CellChangeTimes->{{3.773741848534903*^9, 3.773741852401463*^9}},
+ CellLabel->"In[28]:=",ExpressionUUID->"cac28fd3-e795-47f1-a77e-e5a2fe196f33"],
+
+Cell[BoxData[
+ InterpretationBox[
+  TagBox[
+   FrameBox[GridBox[{
+      {
+       ItemBox[
+        TagBox[
+         RowBox[{
+          RowBox[{"Amp", "[", 
+           RowBox[{
+            RowBox[{"{", 
+             RowBox[{
+              RowBox[{"{", 
+               RowBox[{
+                RowBox[{"V", "[", 
+                 RowBox[{"5", ",", 
+                  RowBox[{"{", "Glu1", "}"}]}], "]"}], ",", 
+                RowBox[{"k", "[", "1", "]"}], ",", "0", ",", 
+                RowBox[{"{", 
+                 RowBox[{
+                  SqrtBox["3"], " ", "ColorCharge"}], "}"}]}], "}"}], ",", 
+              RowBox[{"{", 
+               RowBox[{
+                RowBox[{"V", "[", 
+                 RowBox[{"5", ",", 
+                  RowBox[{"{", "Glu2", "}"}]}], "]"}], ",", 
+                RowBox[{"k", "[", "2", "]"}], ",", "0", ",", 
+                RowBox[{"{", 
+                 RowBox[{
+                  SqrtBox["3"], " ", "ColorCharge"}], "}"}]}], "}"}]}], "}"}],
+             "\[Rule]", 
+            RowBox[{"{", 
+             RowBox[{
+              RowBox[{"{", 
+               RowBox[{
+                RowBox[{"S", "[", "1", "]"}], ",", 
+                RowBox[{"k", "[", "3", "]"}], ",", "MH", ",", 
+                RowBox[{"{", "}"}]}], "}"}], ",", 
+              RowBox[{"{", 
+               RowBox[{
+                RowBox[{"V", "[", 
+                 RowBox[{"5", ",", 
+                  RowBox[{"{", "Glu4", "}"}]}], "]"}], ",", 
+                RowBox[{"k", "[", "4", "]"}], ",", "0", ",", 
+                RowBox[{"{", 
+                 RowBox[{
+                  SqrtBox["3"], " ", "ColorCharge"}], "}"}]}], "}"}], ",", 
+              RowBox[{"{", 
+               RowBox[{
+                RowBox[{"V", "[", 
+                 RowBox[{"5", ",", 
+                  RowBox[{"{", "Glu5", "}"}]}], "]"}], ",", 
+                RowBox[{"k", "[", "5", "]"}], ",", "0", ",", 
+                RowBox[{"{", 
+                 RowBox[{
+                  SqrtBox["3"], " ", "ColorCharge"}], "}"}]}], "}"}]}], 
+             "}"}]}], "]"}], "[", 
+          RowBox[{
+           FractionBox[
+            RowBox[{"2", " ", "c1", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               FractionBox[
+                RowBox[{"4", " ", 
+                 TemplateBox[{"5"},
+                  "OutputSizeLimit`Skeleton"], " ", 
+                 RowBox[{"(", 
+                  TemplateBox[{"1"},
+                   "OutputSizeLimit`Skeleton"], ")"}]}], 
+                RowBox[{"MW", " ", "SW"}]], "+", 
+               TemplateBox[{"92"},
+                "OutputSizeLimit`Skeleton"], "+", 
+               TemplateBox[{"1"},
+                "OutputSizeLimit`Skeleton"], "+", 
+               FractionBox[
+                TemplateBox[{"1"},
+                 "OutputSizeLimit`Skeleton"], 
+                RowBox[{"MW", " ", "SW"}]]}], ")"}]}], 
+            RowBox[{
+             SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", "T24"}]],
+            "+", 
+           FractionBox[
+            RowBox[{"c3", " ", 
+             RowBox[{"(", 
+              TemplateBox[{"1"},
+               "OutputSizeLimit`Skeleton"], ")"}]}], 
+            RowBox[{
+             SuperscriptBox["MH", "2"], "-", "S", "-", "T24", "-", "U"}]], 
+           "+", 
+           FractionBox[
+            RowBox[{"c3", " ", 
+             TemplateBox[{"1"},
+              "OutputSizeLimit`Skeleton"]}], 
+            RowBox[{
+             SuperscriptBox["MH", "2"], "-", "S", "-", 
+             TemplateBox[{"3"},
+              "OutputSizeLimit`Skeleton"], "-", "U"}]], "+", 
+           FractionBox[
+            TemplateBox[{"1"},
+             "OutputSizeLimit`Skeleton"], 
+            RowBox[{"MW", " ", "SW"}]], "+", 
+           FractionBox[
+            RowBox[{
+             SuperscriptBox["Alfas", "2"], " ", "c2", " ", "EL", " ", 
+             SuperscriptBox["MT", "2"], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               FractionBox[
+                TemplateBox[{"1"},
+                 "OutputSizeLimit`Skeleton"], 
+                TemplateBox[{"1"},
+                 "OutputSizeLimit`Skeleton"]], "+", 
+               TemplateBox[{"1"},
+                "OutputSizeLimit`Skeleton"]}], ")"}]}], 
+            RowBox[{"MW", " ", "SW"}]]}], "]"}],
+         Short[#, 5]& ],
+        BaseStyle->{Deployed -> False},
+        StripOnInput->False]},
+      {GridBox[{
+         {
+          TagBox[
+           TooltipBox[
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource[
+                "FEStrings", "sizeBriefExplanation"], StandardForm],
+               ImageSizeCache->{58., {2., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLText",
+             StripOnInput->False],
+            StyleBox[
+             DynamicBox[
+              ToBoxes[
+               FEPrivate`FrontEndResource["FEStrings", "sizeExplanation"], 
+               StandardForm]], DynamicUpdating -> True, StripOnInput -> 
+             False]],
+           Annotation[#, 
+            Style[
+             Dynamic[
+              FEPrivate`FrontEndResource["FEStrings", "sizeExplanation"]], 
+             DynamicUpdating -> True], "Tooltip"]& ], 
+          ButtonBox[
+           PaneSelectorBox[{False->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowLess"], 
+                StandardForm],
+               ImageSizeCache->{50., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControl",
+             StripOnInput->False], True->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowLess"], 
+                StandardForm],
+               ImageSizeCache->{50., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControlActive",
+             StripOnInput->False]}, Dynamic[
+             CurrentValue["MouseOver"]],
+            Alignment->Center,
+            FrameMargins->0,
+            ImageSize->{Automatic, 25}],
+           Appearance->None,
+           BaselinePosition->Baseline,
+           
+           ButtonFunction:>OutputSizeLimit`ButtonFunction[
+            OutputSizeLimit`Defer, 28, 17481197693528306459, 5/2],
+           Enabled->True,
+           Evaluator->Automatic,
+           Method->"Queued"], 
+          ButtonBox[
+           PaneSelectorBox[{False->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowMore"], 
+                StandardForm],
+               ImageSizeCache->{56., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControl",
+             StripOnInput->False], True->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowMore"], 
+                StandardForm],
+               ImageSizeCache->{56., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControlActive",
+             StripOnInput->False]}, Dynamic[
+             CurrentValue["MouseOver"]],
+            Alignment->Center,
+            FrameMargins->0,
+            ImageSize->{Automatic, 25}],
+           Appearance->None,
+           BaselinePosition->Baseline,
+           
+           ButtonFunction:>OutputSizeLimit`ButtonFunction[
+            OutputSizeLimit`Defer, 28, 17481197693528306459, 5 2],
+           Enabled->True,
+           Evaluator->Automatic,
+           Method->"Queued"], 
+          ButtonBox[
+           PaneSelectorBox[{False->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowAll"], 
+                StandardForm],
+               ImageSizeCache->{42., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControl",
+             StripOnInput->False], True->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeShowAll"], 
+                StandardForm]],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControlActive",
+             StripOnInput->False]}, Dynamic[
+             CurrentValue["MouseOver"]],
+            Alignment->Center,
+            FrameMargins->0,
+            ImageSize->{Automatic, 25}],
+           Appearance->None,
+           BaselinePosition->Baseline,
+           
+           ButtonFunction:>OutputSizeLimit`ButtonFunction[
+            OutputSizeLimit`Defer, 28, 17481197693528306459, Infinity],
+           Enabled->True,
+           Evaluator->Automatic,
+           Method->"Queued"], 
+          ButtonBox[
+           PaneSelectorBox[{False->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeChangeLimit"], 
+                StandardForm],
+               ImageSizeCache->{74., {0., 8.}}],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControl",
+             StripOnInput->False], True->
+            StyleBox[
+             StyleBox[
+              DynamicBox[ToBoxes[
+                FEPrivate`FrontEndResource["FEStrings", "sizeChangeLimit"], 
+                StandardForm]],
+              StripOnInput->False,
+              DynamicUpdating->True], "OSLControlActive",
+             StripOnInput->False]}, Dynamic[
+             CurrentValue["MouseOver"]],
+            Alignment->Center,
+            FrameMargins->0,
+            ImageSize->{Automatic, 25}],
+           Appearance->None,
+           BaselinePosition->Baseline,
+           ButtonFunction:>FrontEndExecute[{
+              FrontEnd`SetOptions[
+              FrontEnd`$FrontEnd, 
+               FrontEnd`PreferencesSettings -> {"Page" -> "Advanced"}], 
+              FrontEnd`FrontEndToken["PreferencesDialog"]}],
+           Evaluator->None,
+           Method->"Preemptive"]}
+        },
+        AutoDelete->False,
+        FrameStyle->GrayLevel[0.85],
+        GridBoxDividers->{"Columns" -> {False, {True}}},
+        GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}},
+        GridBoxSpacings->{"Columns" -> {{2}}}]}
+     },
+     DefaultBaseStyle->"Column",
+     GridBoxAlignment->{
+      "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, 
+       "RowsIndexed" -> {}},
+     GridBoxDividers->{
+      "Columns" -> {{False}}, "ColumnsIndexed" -> {}, "Rows" -> {{False}}, 
+       "RowsIndexed" -> {}},
+     GridBoxItemSize->{
+      "Columns" -> {{Automatic}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}}, 
+       "RowsIndexed" -> {}},
+     GridBoxSpacings->{"Columns" -> {
+         Offset[0.27999999999999997`], {
+          Offset[0.5599999999999999]}, 
+         Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> {
+         Offset[0.2], 
+         Offset[1.2], {
+          Offset[0.4]}, 
+         Offset[0.2]}, "RowsIndexed" -> {}}],
+    BaseStyle->"OutputSizeLimit",
+    FrameMargins->{{12, 12}, {0, 15}},
+    FrameStyle->GrayLevel[0.85],
+    RoundingRadius->5,
+    StripOnInput->False],
+   Deploy,
+   DefaultBaseStyle->"Deploy"],
+  If[17481197693528306459 === $SessionID, 
+   Out[28], Message[
+     MessageName[Syntax, "noinfoker"]]; Missing["NotAvailable"]; 
+   Null]]], "Output",
+ CellChangeTimes->{3.773742742516061*^9, 3.775827111056859*^9},
+ CellLabel->"Out[28]=",ExpressionUUID->"fdf26c39-191c-4b8f-8ed6-4f24a3f9beeb"]
+}, Open  ]],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{
+   RowBox[{"Export", "[", 
+    RowBox[{
+     RowBox[{"\"\<ggHgg_LR_box_\>\"", "<>", 
+      RowBox[{"ToString", "[", "4", "]"}], "<>", "\"\<_9diags.m\>\""}], ",", 
+     RowBox[{"b4a", "[", 
+      RowBox[{"[", "1", "]"}], "]"}]}], "]"}], ";"}], 
+  "\[IndentingNewLine]"}]], "Input",
+ CellChangeTimes->{{3.7758266582866173`*^9, 3.775826658808209*^9}},
+ CellLabel->"In[29]:=",ExpressionUUID->"c7feecf3-f47a-423b-924d-e06efe08d9d2"],
+
+Cell[BoxData[
+ RowBox[{"\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", 
+  "\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", 
+  RowBox[{"(*", " ", 
+   RowBox[{
+    RowBox[{"Section", " ", "for", " ", "gg"}], "\[Rule]", "H"}], " ", 
+   "*)"}]}]], "Input",
+ CellChangeTimes->{{3.775231998315331*^9, 
+  3.775232007604499*^9}},ExpressionUUID->"7e7b9f75-0ed1-4382-a7dd-\
+99907c1473ac"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"ggHamp", "=", 
+  RowBox[{"Import", "[", "\"\<ggH.m\>\"", "]"}]}]], "Input",
+ CellChangeTimes->{{3.7752319134417143`*^9, 3.7752319328594646`*^9}},
+ CellLabel->"In[12]:=",ExpressionUUID->"ae98646f-6aec-43fc-bc4c-76b34b9d8371"],
+
+Cell[BoxData[
+ RowBox[{
+  FractionBox["1", 
+   RowBox[{"MW", " ", "\[Pi]", " ", "SW"}]], 
+  RowBox[{"Alfas", " ", "EL", " ", "MT2", " ", 
+   RowBox[{"Mat", "[", 
+    RowBox[{"SUNT", "[", 
+     RowBox[{"Glu1", ",", "Glu2", ",", "0", ",", "0"}], "]"}], "]"}], " ", 
+   RowBox[{"(", 
+    RowBox[{
+     RowBox[{
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"B0i", "[", 
+         RowBox[{"bb0", ",", "MH2", ",", "MT2", ",", "MT2"}], "]"}], "-", 
+        RowBox[{"4", " ", 
+         RowBox[{"C0i", "[", 
+          RowBox[{
+          "cc00", ",", "0", ",", "MH2", ",", "0", ",", "MT2", ",", "MT2", ",",
+            "MT2"}], "]"}]}]}], ")"}], " ", 
+      RowBox[{"Pair", "[", 
+       RowBox[{
+        RowBox[{"e", "[", "1", "]"}], ",", 
+        RowBox[{"e", "[", "2", "]"}]}], "]"}]}], "+", 
+     RowBox[{"4", " ", 
+      RowBox[{"C0i", "[", 
+       RowBox[{
+       "cc12", ",", "0", ",", "MH2", ",", "0", ",", "MT2", ",", "MT2", ",", 
+        "MT2"}], "]"}], " ", 
+      RowBox[{"Pair", "[", 
+       RowBox[{
+        RowBox[{"e", "[", "1", "]"}], ",", 
+        RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+      RowBox[{"Pair", "[", 
+       RowBox[{
+        RowBox[{"e", "[", "2", "]"}], ",", 
+        RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+     RowBox[{
+      FractionBox["1", "2"], " ", 
+      RowBox[{"C0i", "[", 
+       RowBox[{
+       "cc0", ",", "0", ",", "MH2", ",", "0", ",", "MT2", ",", "MT2", ",", 
+        "MT2"}], "]"}], " ", 
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{
+         RowBox[{"-", "MH2"}], " ", 
+         RowBox[{"Pair", "[", 
+          RowBox[{
+           RowBox[{"e", "[", "1", "]"}], ",", 
+           RowBox[{"e", "[", "2", "]"}]}], "]"}]}], "+", 
+        RowBox[{"2", " ", 
+         RowBox[{"Pair", "[", 
+          RowBox[{
+           RowBox[{"e", "[", "1", "]"}], ",", 
+           RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+         RowBox[{"Pair", "[", 
+          RowBox[{
+           RowBox[{"e", "[", "2", "]"}], ",", 
+           RowBox[{"k", "[", "1", "]"}]}], "]"}]}]}], ")"}]}]}], 
+    ")"}]}]}]], "Output",
+ CellChangeTimes->{3.775231935723737*^9},
+ CellLabel->"Out[12]=",ExpressionUUID->"b03d30ad-4939-46cf-b5fe-8b765a9784a2"]
+}, Open  ]],
+
+Cell[BoxData[{
+ RowBox[{
+  RowBox[{"ggHamp", " ", "=", " ", 
+   RowBox[{
+    RowBox[{"ggHamp", " ", "//.", " ", "MAT"}], " ", "//.", " ", "SubDen"}]}],
+   ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"d", " ", "=", " ", 
+   RowBox[{"Collect", "[", 
+    RowBox[{
+     RowBox[{"ReleaseHold", "[", 
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"(", 
+         RowBox[{"HoldForm", "[", 
+          RowBox[{"Evaluate", "[", "ggHamp", "]"}], "]"}], " ", ")"}], "//.", 
+        " ", "RIntList"}], ")"}], "]"}], ",", 
+     RowBox[{"Mat", "[", "__", "]"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"fd", "=", 
+   RowBox[{
+    RowBox[{
+     RowBox[{"d", "//.", "LoopRefining"}], "//", "Refine"}], "//", 
+    "Simplify"}]}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"Export", "[", 
+   RowBox[{"\"\<ggH_LR.m\>\"", ",", "fd"}], "]"}], 
+  ";"}], "\[IndentingNewLine]"}], "Input",
+ CellChangeTimes->{{3.7752320210741873`*^9, 3.775232083331502*^9}},
+ CellLabel->"In[20]:=",ExpressionUUID->"24b1d6d5-8138-410c-bad0-4688d4069032"],
+
+Cell[BoxData[
+ RowBox[{"\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", 
+  "\[IndentingNewLine]", "\[IndentingNewLine]", 
+  RowBox[{"(*", " ", 
+   RowBox[{
+    RowBox[{"Section", " ", "for", " ", "gg"}], "\[Rule]", "Hg"}], " ", 
+   "*)"}]}]], "Input",
+ CellChangeTimes->{{3.775233725799533*^9, 
+  3.77523374355394*^9}},ExpressionUUID->"1f278cce-b737-471d-abb8-\
+571bd986d464"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"ggHgamp", "=", 
+   RowBox[{"Import", "[", "\"\<ggHg.m\>\"", "]"}]}], ";"}]], "Input",
+ CellChangeTimes->{{3.775233745909586*^9, 3.775233763976185*^9}},
+ CellLabel->"In[10]:=",ExpressionUUID->"9a2e8cfd-31b0-4513-b860-e5717141a96f"],
+
+Cell[BoxData[{
+ RowBox[{
+  RowBox[{"ggHgamp", "=", 
+   RowBox[{"ggHgamp", "//.", "SubDen"}]}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"d", " ", "=", " ", 
+   RowBox[{"Collect", "[", 
+    RowBox[{
+     RowBox[{"ReleaseHold", "[", 
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"(", 
+         RowBox[{"HoldForm", "[", 
+          RowBox[{"Evaluate", "[", "ggHgamp", "]"}], "]"}], " ", ")"}], "//.",
+         " ", "RIntList"}], ")"}], "]"}], ",", 
+     RowBox[{"Mat", "[", "__", "]"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"fd", "=", 
+   RowBox[{
+    RowBox[{
+     RowBox[{"d", "//.", "LoopRefining"}], "//", "Refine"}], "//", 
+    "Simplify"}]}], ";"}]}], "Input",
+ CellChangeTimes->{{3.775233767887505*^9, 3.7752338144243193`*^9}},
+ CellLabel->"In[15]:=",ExpressionUUID->"f2581317-15ac-431d-858d-1506de0ee6ea"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"Export", "[", 
+   RowBox[{"\"\<ggHg_LR.m\>\"", ",", "fd"}], "]"}], ";"}]], "Input",
+ CellChangeTimes->{3.775233824527708*^9},
+ CellLabel->"In[19]:=",ExpressionUUID->"935c66bf-fd6a-4022-88ef-839267449906"],
+
+Cell[BoxData[
+ RowBox[{"\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", 
+  "\[IndentingNewLine]"}]], "Input",
+ CellChangeTimes->{{3.775489103187828*^9, 
+  3.775489103852584*^9}},ExpressionUUID->"e4eda86f-c0c1-4ed1-b09c-\
+a197bbc299c9"],
+
+Cell[BoxData[{
+ RowBox[{
+  RowBox[{"triangle", " ", "=", " ", 
+   RowBox[{"Import", "[", "\"\<ggHgg_triangle_FeynAmp_2diags.m\>\"", "]"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"triangle", " ", "=", " ", 
+   RowBox[{
+    RowBox[{"triangle", " ", "//.", " ", "MAT"}], " ", "//.", " ", 
+    "SubDen"}]}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"t", " ", "=", " ", 
+   RowBox[{"Collect", "[", 
+    RowBox[{
+     RowBox[{"ReleaseHold", "[", 
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"(", 
+         RowBox[{"HoldForm", "[", 
+          RowBox[{"Evaluate", "[", "triangle", "]"}], "]"}], " ", ")"}], "//.",
+         " ", "RIntList"}], ")"}], "]"}], ",", 
+     RowBox[{"Mat", "[", "__", "]"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"ft", "=", 
+   RowBox[{
+    RowBox[{"t", "//.", "LoopRefining"}], "//", "Refine"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"Export", "[", 
+   RowBox[{"\"\<ggHgg_LR_triangle_2diags.m\>\"", ",", "ft"}], "]"}], 
+  ";"}], "\[IndentingNewLine]"}], "Input",
+ CellChangeTimes->{{3.775489112120273*^9, 3.775489119038488*^9}},
+ CellLabel->"In[12]:=",ExpressionUUID->"e7549059-0b03-41c9-afd1-97986dde3359"],
+
+Cell[BoxData[""], "Input",
+ CellChangeTimes->{{3.7754904767164803`*^9, 
+  3.775490483960333*^9}},ExpressionUUID->"75c75df4-ee72-49af-9630-\
+1cf0eef74f43"],
+
+Cell[BoxData[""], "Input",
+ CellChangeTimes->{
+  3.775821061411274*^9},ExpressionUUID->"a4013e44-a682-4c70-a84f-\
+f4695f7dd230"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"triangle", " ", "=", " ", 
+   RowBox[{"Import", "[", "\"\<ggHgg_triangle_FeynAmp_2diags.m\>\"", "]"}]}], 
+  ";"}]], "Input",
+ CellLabel->"In[17]:=",ExpressionUUID->"73dfc6d7-5c31-463e-8864-6b5bef17b11d"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"triangle", "=", 
+  RowBox[{
+   RowBox[{
+    RowBox[{
+     RowBox[{
+      RowBox[{"triangle", "//.", 
+       RowBox[{"{", 
+        RowBox[{
+         RowBox[{"C0i", "[", "___", "]"}], "\[Rule]", "0"}], "}"}]}], "//.", 
+      "SubDen"}], "//.", "MAT"}], "//.", "MATColor"}], "//", 
+   "Simplify"}]}]], "Input",
+ CellChangeTimes->{{3.775490489071643*^9, 3.77549054704373*^9}, {
+  3.775490578383366*^9, 3.775490608694393*^9}},
+ CellLabel->"In[25]:=",ExpressionUUID->"b4100299-10f3-4c3c-90b5-db96319fb7d9"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"Amp", "[", 
+   RowBox[{
+    RowBox[{"{", 
+     RowBox[{
+      RowBox[{"{", 
+       RowBox[{
+        RowBox[{"V", "[", 
+         RowBox[{"5", ",", 
+          RowBox[{"{", "Glu1", "}"}]}], "]"}], ",", 
+        RowBox[{"k", "[", "1", "]"}], ",", "0", ",", 
+        RowBox[{"{", 
+         RowBox[{
+          SqrtBox["3"], " ", "ColorCharge"}], "}"}]}], "}"}], ",", 
+      RowBox[{"{", 
+       RowBox[{
+        RowBox[{"V", "[", 
+         RowBox[{"5", ",", 
+          RowBox[{"{", "Glu2", "}"}]}], "]"}], ",", 
+        RowBox[{"k", "[", "2", "]"}], ",", "0", ",", 
+        RowBox[{"{", 
+         RowBox[{
+          SqrtBox["3"], " ", "ColorCharge"}], "}"}]}], "}"}]}], "}"}], 
+    "\[Rule]", 
+    RowBox[{"{", 
+     RowBox[{
+      RowBox[{"{", 
+       RowBox[{
+        RowBox[{"S", "[", "1", "]"}], ",", 
+        RowBox[{"k", "[", "3", "]"}], ",", "MH", ",", 
+        RowBox[{"{", "}"}]}], "}"}], ",", 
+      RowBox[{"{", 
+       RowBox[{
+        RowBox[{"V", "[", 
+         RowBox[{"5", ",", 
+          RowBox[{"{", "Glu4", "}"}]}], "]"}], ",", 
+        RowBox[{"k", "[", "4", "]"}], ",", "0", ",", 
+        RowBox[{"{", 
+         RowBox[{
+          SqrtBox["3"], " ", "ColorCharge"}], "}"}]}], "}"}], ",", 
+      RowBox[{"{", 
+       RowBox[{
+        RowBox[{"V", "[", 
+         RowBox[{"5", ",", 
+          RowBox[{"{", "Glu5", "}"}]}], "]"}], ",", 
+        RowBox[{"k", "[", "5", "]"}], ",", "0", ",", 
+        RowBox[{"{", 
+         RowBox[{
+          SqrtBox["3"], " ", "ColorCharge"}], "}"}]}], "}"}]}], "}"}]}], 
+   "]"}], "[", 
+  RowBox[{"-", 
+   RowBox[{
+    FractionBox["1", 
+     RowBox[{"MW", " ", "SW", " ", "T"}]], 
+    RowBox[{"8", " ", 
+     SuperscriptBox["Alfas", "2"], " ", "EL", " ", 
+     SuperscriptBox["MT", "2"], " ", 
+     RowBox[{"B0i", "[", 
+      RowBox[{"bb0", ",", "T", ",", 
+       SuperscriptBox["MT", "2"], ",", 
+       SuperscriptBox["MT", "2"]}], "]"}], " ", 
+     RowBox[{"(", 
+      RowBox[{
+       RowBox[{
+        RowBox[{"(", 
+         RowBox[{"c1", "-", 
+          RowBox[{"2", " ", "c2"}], "+", "c3"}], ")"}], " ", 
+        RowBox[{"Pair", "[", 
+         RowBox[{
+          RowBox[{"e", "[", "1", "]"}], ",", 
+          RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+        RowBox[{"Pair", "[", 
+         RowBox[{
+          RowBox[{"e", "[", "2", "]"}], ",", 
+          RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+       RowBox[{
+        RowBox[{"(", 
+         RowBox[{
+          RowBox[{
+           RowBox[{"-", "2"}], " ", "c1"}], "+", "c2", "+", "c3"}], ")"}], 
+        " ", 
+        RowBox[{"Pair", "[", 
+         RowBox[{
+          RowBox[{"e", "[", "1", "]"}], ",", 
+          RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+        RowBox[{"Pair", "[", 
+         RowBox[{
+          RowBox[{"e", "[", "2", "]"}], ",", 
+          RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+       RowBox[{
+        RowBox[{"(", 
+         RowBox[{"c1", "+", "c2", "-", 
+          RowBox[{"2", " ", "c3"}]}], ")"}], " ", 
+        RowBox[{"Pair", "[", 
+         RowBox[{
+          RowBox[{"e", "[", "1", "]"}], ",", 
+          RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+        RowBox[{"Pair", "[", 
+         RowBox[{
+          RowBox[{"ec", "[", "4", "]"}], ",", 
+          RowBox[{"ec", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}]}], 
+  "]"}]], "Output",
+ CellChangeTimes->{{3.7754905181011047`*^9, 3.775490547530642*^9}, {
+   3.7754905806927757`*^9, 3.775490609286749*^9}, 3.7754907803036346`*^9},
+ CellLabel->"Out[25]=",ExpressionUUID->"227ac9fd-122f-4bdd-8ce6-0421fc3101b9"]
+}, Open  ]],
+
+Cell[BoxData[{
+ RowBox[{
+  RowBox[{"t", " ", "=", " ", 
+   RowBox[{"Collect", "[", 
+    RowBox[{
+     RowBox[{"ReleaseHold", "[", 
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"(", 
+         RowBox[{"HoldForm", "[", 
+          RowBox[{"Evaluate", "[", "triangle", "]"}], "]"}], " ", ")"}], "//.",
+         " ", "RIntList"}], ")"}], "]"}], ",", 
+     RowBox[{"Mat", "[", "__", "]"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"ft", "=", 
+   RowBox[{
+    RowBox[{"t", "//.", "LoopRefining"}], "//", "Refine"}]}], ";"}]}], "Input",\
+
+ CellLabel->"In[26]:=",ExpressionUUID->"d027658a-37f9-489d-a307-4d535ae073b9"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"ft", "//", "Simplify"}]], "Input",
+ CellChangeTimes->{{3.775490801911936*^9, 3.775490806703685*^9}},
+ CellLabel->"In[29]:=",ExpressionUUID->"55e4d6af-838f-45bf-ab25-da03c1c1d848"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"Amp", "[", 
+   RowBox[{
+    RowBox[{"{", 
+     RowBox[{
+      RowBox[{"{", 
+       RowBox[{
+        RowBox[{"V", "[", 
+         RowBox[{"5", ",", 
+          RowBox[{"{", "Glu1", "}"}]}], "]"}], ",", 
+        RowBox[{"k", "[", "1", "]"}], ",", "0", ",", 
+        RowBox[{"{", 
+         RowBox[{
+          SqrtBox["3"], " ", "ColorCharge"}], "}"}]}], "}"}], ",", 
+      RowBox[{"{", 
+       RowBox[{
+        RowBox[{"V", "[", 
+         RowBox[{"5", ",", 
+          RowBox[{"{", "Glu2", "}"}]}], "]"}], ",", 
+        RowBox[{"k", "[", "2", "]"}], ",", "0", ",", 
+        RowBox[{"{", 
+         RowBox[{
+          SqrtBox["3"], " ", "ColorCharge"}], "}"}]}], "}"}]}], "}"}], 
+    "\[Rule]", 
+    RowBox[{"{", 
+     RowBox[{
+      RowBox[{"{", 
+       RowBox[{
+        RowBox[{"S", "[", "1", "]"}], ",", 
+        RowBox[{"k", "[", "3", "]"}], ",", "MH", ",", 
+        RowBox[{"{", "}"}]}], "}"}], ",", 
+      RowBox[{"{", 
+       RowBox[{
+        RowBox[{"V", "[", 
+         RowBox[{"5", ",", 
+          RowBox[{"{", "Glu4", "}"}]}], "]"}], ",", 
+        RowBox[{"k", "[", "4", "]"}], ",", "0", ",", 
+        RowBox[{"{", 
+         RowBox[{
+          SqrtBox["3"], " ", "ColorCharge"}], "}"}]}], "}"}], ",", 
+      RowBox[{"{", 
+       RowBox[{
+        RowBox[{"V", "[", 
+         RowBox[{"5", ",", 
+          RowBox[{"{", "Glu5", "}"}]}], "]"}], ",", 
+        RowBox[{"k", "[", "5", "]"}], ",", "0", ",", 
+        RowBox[{"{", 
+         RowBox[{
+          SqrtBox["3"], " ", "ColorCharge"}], "}"}]}], "}"}]}], "}"}]}], 
+   "]"}], "[", 
+  RowBox[{"-", 
+   RowBox[{
+    FractionBox["1", 
+     RowBox[{"MW", " ", "SW", " ", "T"}]], 
+    RowBox[{"8", " ", 
+     SuperscriptBox["Alfas", "2"], " ", "EL", " ", 
+     SuperscriptBox["MT", "2"], " ", 
+     RowBox[{"(", 
+      RowBox[{"2", "+", 
+       FractionBox["1", "\[Epsilon]"], "+", 
+       RowBox[{"DiscB", "[", 
+        RowBox[{"T", ",", 
+         SqrtBox[
+          SuperscriptBox["MT", "2"]], ",", 
+         SqrtBox[
+          SuperscriptBox["MT", "2"]]}], "]"}], "+", 
+       RowBox[{"Log", "[", 
+        FractionBox[
+         SuperscriptBox["\[Micro]", "2"], 
+         SuperscriptBox["MT", "2"]], "]"}]}], ")"}], " ", 
+     RowBox[{"(", 
+      RowBox[{
+       RowBox[{
+        RowBox[{"(", 
+         RowBox[{"c1", "-", 
+          RowBox[{"2", " ", "c2"}], "+", "c3"}], ")"}], " ", 
+        RowBox[{"Pair", "[", 
+         RowBox[{
+          RowBox[{"e", "[", "1", "]"}], ",", 
+          RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+        RowBox[{"Pair", "[", 
+         RowBox[{
+          RowBox[{"e", "[", "2", "]"}], ",", 
+          RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+       RowBox[{
+        RowBox[{"(", 
+         RowBox[{
+          RowBox[{
+           RowBox[{"-", "2"}], " ", "c1"}], "+", "c2", "+", "c3"}], ")"}], 
+        " ", 
+        RowBox[{"Pair", "[", 
+         RowBox[{
+          RowBox[{"e", "[", "1", "]"}], ",", 
+          RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+        RowBox[{"Pair", "[", 
+         RowBox[{
+          RowBox[{"e", "[", "2", "]"}], ",", 
+          RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+       RowBox[{
+        RowBox[{"(", 
+         RowBox[{"c1", "+", "c2", "-", 
+          RowBox[{"2", " ", "c3"}]}], ")"}], " ", 
+        RowBox[{"Pair", "[", 
+         RowBox[{
+          RowBox[{"e", "[", "1", "]"}], ",", 
+          RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+        RowBox[{"Pair", "[", 
+         RowBox[{
+          RowBox[{"ec", "[", "4", "]"}], ",", 
+          RowBox[{"ec", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}]}], 
+  "]"}]], "Output",
+ CellChangeTimes->{{3.775490802450275*^9, 3.775490807137723*^9}},
+ CellLabel->"Out[29]=",ExpressionUUID->"f7adf7fb-3d44-404a-b9d8-8367ef825cc7"]
+}, Open  ]],
+
+Cell[BoxData[
+ RowBox[{"\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", 
+  "\[IndentingNewLine]"}]], "Input",
+ CellChangeTimes->{{3.775928007733971*^9, 3.775928050142716*^9}, 
+   3.775928158644534*^9, {3.776093459682819*^9, 
+   3.776093460132823*^9}},ExpressionUUID->"a9b9ca57-f825-4517-8b39-\
+8ebebaffad8a"],
+
+Cell[BoxData[
+ RowBox[{"\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", 
+  "\[IndentingNewLine]", 
+  RowBox[{"(*", " ", 
+   RowBox[{"VELOCITY", " ", "SERIES"}], " ", "*)"}], "\[IndentingNewLine]", 
+  RowBox[{"(*", 
+   RowBox[{"--", 
+    RowBox[{"--", 
+     RowBox[{"--", 
+      RowBox[{"--", 
+       RowBox[{"--", 
+        RowBox[{"--", 
+         RowBox[{"--", 
+          RowBox[{"--", 
+           RowBox[{"--", 
+            RowBox[{"--", 
+             RowBox[{"--", 
+              RowBox[{"--", 
+               RowBox[{"--", 
+                RowBox[{"--", 
+                 RowBox[{"--", 
+                  RowBox[{"--", 
+                   RowBox[{"--", 
+                    RowBox[{"--", 
+                    RowBox[{"--", 
+                    RowBox[{"--", 
+                    RowBox[{"--", 
+                    RowBox[{"--", 
+                    RowBox[{"--", 
+                    RowBox[{"--", 
+                    RowBox[{"--", 
+                    RowBox[{"--", 
+                    RowBox[{"--", 
+                    RowBox[{"--", 
+                    RowBox[{"--", 
+                    RowBox[{"--", 
+                    RowBox[{"--", 
+                    RowBox[{"--", 
+                    RowBox[{"--", 
+                    RowBox[{"--", 
+                    RowBox[{"--", 
+                    RowBox[{"--", 
+                    RowBox[{"--", 
+                    RowBox[{"--", 
+                    RowBox[{"--", 
+                    RowBox[{
+                    "--", "--"}]}]}]}]}]}]}]}]}]}]}]}]}]}]}]}]}]}]}]}]}]}]}]}]\
+}]}]}]}]}]}]}]}]}]}]}]}]}]}]}]}], "*)"}]}]], "Input",
+ CellChangeTimes->{{3.778422396725979*^9, 
+  3.778422453872706*^9}},ExpressionUUID->"f261cfc3-9a94-4830-9195-\
+aa48c3328d0f"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"MakeRefineSeriesOf", "[", 
+   RowBox[{"i_", ",", "f_", ",", "string_"}], "]"}], ":=", 
+  "\[IndentingNewLine]", 
+  RowBox[{"{", "\[IndentingNewLine]", 
+   RowBox[{"Do", "[", "\[IndentingNewLine]", 
+    RowBox[{
+     RowBox[{
+      RowBox[{
+       RowBox[{"Serieslist", "[", 
+        RowBox[{"[", "n", "]"}], "]"}], "=", 
+       RowBox[{"LoopRefineSeries", "[", 
+        RowBox[{
+         RowBox[{"LRlistVelSub", "[", 
+          RowBox[{"[", "n", "]"}], "]"}], ",", 
+         RowBox[{"{", 
+          RowBox[{"\[Beta]", ",", "0", ",", "2"}], "}"}]}], "]"}]}], ";", 
+      "\[IndentingNewLine]", 
+      RowBox[{"Print", "[", "n", "]"}], ";", "\[IndentingNewLine]", 
+      RowBox[{"Export", "[", 
+       RowBox[{"string", ",", "Serieslist"}], "]"}], ";"}], 
+     "\[IndentingNewLine]", ",", 
+     RowBox[{"{", 
+      RowBox[{"n", ",", "i", ",", "f"}], "}"}]}], "]"}], 
+   "\[IndentingNewLine]", "}"}]}]], "Input",
+ CellLabel->"In[47]:=",ExpressionUUID->"5fb9542c-66c2-4b59-b6c0-3d1e3db1842f"],
+
+Cell[BoxData[
+ RowBox[{"(*", " ", "TRIANGLES", " ", "*)"}]], "Input",
+ CellChangeTimes->{{3.778510730293254*^9, 
+  3.778510735378016*^9}},ExpressionUUID->"ce77b5bd-ebce-4c42-9263-\
+53392240007e"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(*", " ", 
+   RowBox[{
+   "Translate", " ", "from", " ", "FormCalc", " ", "to", " ", "Package", " ", 
+    "X", " ", 
+    RowBox[{"format", "."}]}], " ", "*)"}], "\[IndentingNewLine]", 
+  RowBox[{
+   RowBox[{
+    RowBox[{"triangle", " ", "=", " ", 
+     RowBox[{
+     "Import", "[", "\"\<ggHgg_triangle_FeynAmp_38diags.m\>\"", "]"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"triangle", " ", "=", " ", 
+     RowBox[{
+      RowBox[{
+       RowBox[{"triangle", " ", "//.", "MAT"}], "//.", " ", "MATColor"}], " ",
+       "//.", " ", "SubDen"}]}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"t", " ", "=", " ", 
+     RowBox[{"Collect", "[", 
+      RowBox[{
+       RowBox[{"ReleaseHold", "[", 
+        RowBox[{"(", 
+         RowBox[{
+          RowBox[{"(", 
+           RowBox[{"HoldForm", "[", 
+            RowBox[{"Evaluate", "[", "triangle", "]"}], "]"}], " ", ")"}], "//.",
+           " ", "RIntList"}], ")"}], "]"}], ",", 
+       RowBox[{"Mat", "[", "__", "]"}]}], "]"}]}], ";"}], 
+   "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{"\"\<ggHgg_PV_triangle_38diags.m\>\"", ",", "t"}], "]"}], 
+    ";"}]}]}]], "Input",
+ CellChangeTimes->{{3.778510715046095*^9, 3.7785107796040277`*^9}},
+ CellLabel->"In[16]:=",ExpressionUUID->"9997d1a8-9d83-430a-8554-6cfc2a974c27"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(*", " ", 
+   RowBox[{
+   "Loop", " ", "refine", " ", "each", " ", "term", " ", "to", " ", "get", 
+    " ", "analytical", " ", 
+    RowBox[{"expressions", "."}]}], " ", "*)"}], "\[IndentingNewLine]", 
+  RowBox[{
+   RowBox[{
+    RowBox[{"listPV", " ", "=", " ", 
+     RowBox[{"ToExpression", "[", 
+      RowBox[{"Import", "[", 
+       RowBox[{"\"\<trianglePVs.m\>\"", ",", "\"\<Lines\>\""}], "]"}], 
+      "]"}]}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"LRlist", " ", "=", " ", 
+     RowBox[{"Range", "[", 
+      RowBox[{"Length", "[", "listPV", "]"}], "]"}]}], ";"}], 
+   "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Do", "[", "\[IndentingNewLine]", 
+     RowBox[{
+      RowBox[{
+       RowBox[{
+        RowBox[{"LRlist", "[", 
+         RowBox[{"[", "n", "]"}], "]"}], "=", 
+        RowBox[{"LoopRefine", "[", 
+         RowBox[{"listPV", "[", 
+          RowBox[{"[", "n", "]"}], "]"}], "]"}]}], ";"}], 
+      "\[IndentingNewLine]", ",", 
+      RowBox[{"{", 
+       RowBox[{"n", ",", 
+        RowBox[{"Range", "[", 
+         RowBox[{"Length", "[", "listPV", "]"}], "]"}]}], "}"}]}], "]"}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"LRlist", "=", 
+     RowBox[{
+      RowBox[{"LRlist", " ", "//", "Refine"}], "//", "Simplify"}]}], ";"}], 
+   "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{"\"\<analyticPV_triangles.m\>\"", ",", "LRlist"}], "]"}], 
+    ";"}]}]}]], "Input",
+ CellChangeTimes->{{3.77851101564491*^9, 3.778511062594967*^9}, {
+  3.7785111136692533`*^9, 3.778511191309515*^9}, {3.778511261373001*^9, 
+  3.778511275963592*^9}, {3.7785113263462954`*^9, 3.778511340801446*^9}, {
+  3.7785119479302187`*^9, 3.778511963435474*^9}},
+ CellLabel->"In[73]:=",ExpressionUUID->"3e8bf30c-17cd-43d9-b2c2-32aaac3fabf4"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(*", " ", 
+   RowBox[{"Sub", " ", 
+    RowBox[{"velocities", "."}]}], " ", "*)"}], "\[IndentingNewLine]", 
+  RowBox[{
+   RowBox[{
+    RowBox[{"LRlist", "=", 
+     RowBox[{"Import", "[", "\"\<analyticPV_triangles.m\>\"", "]"}]}], ";"}], 
+   "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"LRlistVelSub", "=", 
+     RowBox[{"LRlist", "//.", "VelSub"}]}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{"\"\<analyticPVwVel_triangles.m\>\"", ",", "LRlistVelSub"}], 
+     "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Serieslist", "=", "LRlistVelSub"}], ";"}]}]}]], "Input",
+ CellChangeTimes->{{3.778511450788786*^9, 3.7785114862093163`*^9}, {
+  3.7785117654748707`*^9, 3.778511797626837*^9}, {3.7785119836535892`*^9, 
+  3.7785119907167*^9}},
+ CellLabel->"In[78]:=",ExpressionUUID->"0faeac76-b8a2-41ff-a322-8a7cc20f5cdc"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(*", " ", 
+   RowBox[{"Make", " ", "velocity", " ", 
+    RowBox[{"series", "."}]}], " ", "*)"}], "\[IndentingNewLine]", 
+  RowBox[{"MakeRefineSeriesOf", "[", 
+   RowBox[{"1", ",", 
+    RowBox[{"Length", "[", "LRlistVelSub", "]"}], ",", 
+    "\"\<SeriesPV_triangles.m\>\""}], "]"}]}]], "Input",
+ CellChangeTimes->{{3.7785115750348883`*^9, 3.778511599881691*^9}, 
+   3.778511760474266*^9, {3.778511968570036*^9, 3.778511982216249*^9}},
+ CellLabel->"In[82]:=",ExpressionUUID->"0aeaadd3-5332-4530-a274-2d257367f236"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["1"], "Print",
+ CellChangeTimes->{3.778511819059483*^9, 3.778512382902973*^9},
+ CellLabel->
+  "During evaluation of \
+In[82]:=",ExpressionUUID->"941d2971-0756-46af-bbfa-35b438dd0e63"],
+
+Cell[BoxData["2"], "Print",
+ CellChangeTimes->{3.778511819059483*^9, 3.7785123829155407`*^9},
+ CellLabel->
+  "During evaluation of \
+In[82]:=",ExpressionUUID->"7f9fc3c9-6ddc-47d5-af72-107027ebb276"],
+
+Cell[BoxData["3"], "Print",
+ CellChangeTimes->{3.778511819059483*^9, 3.778512382931138*^9},
+ CellLabel->
+  "During evaluation of \
+In[82]:=",ExpressionUUID->"da3f0120-fdef-4857-aa25-2ee29cd3ae1a"],
+
+Cell[BoxData["4"], "Print",
+ CellChangeTimes->{3.778511819059483*^9, 3.7785123829400806`*^9},
+ CellLabel->
+  "During evaluation of \
+In[82]:=",ExpressionUUID->"b6c871c9-430f-4950-8ffa-bdb5d1f09ffe"],
+
+Cell[BoxData["5"], "Print",
+ CellChangeTimes->{3.778511819059483*^9, 3.778512382949741*^9},
+ CellLabel->
+  "During evaluation of \
+In[82]:=",ExpressionUUID->"08b8650b-700a-4a81-98cd-762915822ac6"],
+
+Cell[BoxData["6"], "Print",
+ CellChangeTimes->{3.778511819059483*^9, 3.778512382958762*^9},
+ CellLabel->
+  "During evaluation of \
+In[82]:=",ExpressionUUID->"dc323011-3d7c-4c71-98f9-fc651ab59bcd"],
+
+Cell[BoxData["7"], "Print",
+ CellChangeTimes->{3.778511819059483*^9, 3.778512383041127*^9},
+ CellLabel->
+  "During evaluation of \
+In[82]:=",ExpressionUUID->"dcbc9173-996e-4615-8934-be1437da9dbc"],
+
+Cell[BoxData["8"], "Print",
+ CellChangeTimes->{3.778511819059483*^9, 3.778512383054595*^9},
+ CellLabel->
+  "During evaluation of \
+In[82]:=",ExpressionUUID->"5235f72f-1e09-460f-a972-86c8776de7bf"],
+
+Cell[BoxData["9"], "Print",
+ CellChangeTimes->{3.778511819059483*^9, 3.778512383069906*^9},
+ CellLabel->
+  "During evaluation of \
+In[82]:=",ExpressionUUID->"51d0dc87-3144-4105-a8ae-a650d049a319"],
+
+Cell[BoxData["10"], "Print",
+ CellChangeTimes->{3.778511819059483*^9, 3.778512383500832*^9},
+ CellLabel->
+  "During evaluation of \
+In[82]:=",ExpressionUUID->"61f11d61-f008-44dc-96d0-db1dad10327b"],
+
+Cell[BoxData["11"], "Print",
+ CellChangeTimes->{3.778511819059483*^9, 3.7785123835765142`*^9},
+ CellLabel->
+  "During evaluation of \
+In[82]:=",ExpressionUUID->"f3db9187-5fb7-4179-9d5d-fee11f151b8a"],
+
+Cell[BoxData["12"], "Print",
+ CellChangeTimes->{3.778511819059483*^9, 3.778512383592807*^9},
+ CellLabel->
+  "During evaluation of \
+In[82]:=",ExpressionUUID->"55143390-2218-4242-8577-41b5b68bf26f"],
+
+Cell[BoxData["13"], "Print",
+ CellChangeTimes->{3.778511819059483*^9, 3.778512383605513*^9},
+ CellLabel->
+  "During evaluation of \
+In[82]:=",ExpressionUUID->"de5e700a-5013-445e-b472-25d383ca5cf3"],
+
+Cell[BoxData["14"], "Print",
+ CellChangeTimes->{3.778511819059483*^9, 3.778512384074768*^9},
+ CellLabel->
+  "During evaluation of \
+In[82]:=",ExpressionUUID->"04316d54-f297-424b-9b49-acfd45d21630"],
+
+Cell[BoxData["15"], "Print",
+ CellChangeTimes->{3.778511819059483*^9, 3.7785123841633387`*^9},
+ CellLabel->
+  "During evaluation of \
+In[82]:=",ExpressionUUID->"017b3ad1-2b25-45a4-8b9d-111686161236"],
+
+Cell[BoxData["16"], "Print",
+ CellChangeTimes->{3.778511819059483*^9, 3.7785123857490664`*^9},
+ CellLabel->
+  "During evaluation of \
+In[82]:=",ExpressionUUID->"cf381b0c-ac88-40ab-b951-874fcfdfa6c6"],
+
+Cell[BoxData["17"], "Print",
+ CellChangeTimes->{3.778511819059483*^9, 3.778512385808852*^9},
+ CellLabel->
+  "During evaluation of \
+In[82]:=",ExpressionUUID->"67e161ed-8390-46fa-a181-f56c98936077"],
+
+Cell[BoxData["18"], "Print",
+ CellChangeTimes->{3.778511819059483*^9, 3.778512387347632*^9},
+ CellLabel->
+  "During evaluation of \
+In[82]:=",ExpressionUUID->"12eddb76-c821-45d5-9119-d5d357f2d4eb"],
+
+Cell[BoxData["19"], "Print",
+ CellChangeTimes->{3.778511819059483*^9, 3.778512387423924*^9},
+ CellLabel->
+  "During evaluation of \
+In[82]:=",ExpressionUUID->"f42cca31-6f52-49bc-b356-94d57c78fd27"],
+
+Cell[BoxData["20"], "Print",
+ CellChangeTimes->{3.778511819059483*^9, 3.778512387488948*^9},
+ CellLabel->
+  "During evaluation of \
+In[82]:=",ExpressionUUID->"812113fc-a308-46fd-b058-9e34214fc722"],
+
+Cell[BoxData["21"], "Print",
+ CellChangeTimes->{3.778511819059483*^9, 3.778512389090189*^9},
+ CellLabel->
+  "During evaluation of \
+In[82]:=",ExpressionUUID->"5f1deb06-8268-41a5-84bd-e5a8ada699a5"],
+
+Cell[BoxData["22"], "Print",
+ CellChangeTimes->{3.778511819059483*^9, 3.7785123892488117`*^9},
+ CellLabel->
+  "During evaluation of \
+In[82]:=",ExpressionUUID->"28c127e4-f366-4435-9db7-8b114a82b320"],
+
+Cell[BoxData["23"], "Print",
+ CellChangeTimes->{3.778511819059483*^9, 3.7785123893298607`*^9},
+ CellLabel->
+  "During evaluation of \
+In[82]:=",ExpressionUUID->"db1f8f22-c844-4e1e-892c-73ca3a41eaee"],
+
+Cell[BoxData["24"], "Print",
+ CellChangeTimes->{3.778511819059483*^9, 3.778512389413691*^9},
+ CellLabel->
+  "During evaluation of \
+In[82]:=",ExpressionUUID->"ae692077-c31d-43f0-a099-c52e179f8dea"],
+
+Cell[BoxData["25"], "Print",
+ CellChangeTimes->{3.778511819059483*^9, 3.77851239078407*^9},
+ CellLabel->
+  "During evaluation of \
+In[82]:=",ExpressionUUID->"8f0af9a8-1bc7-4b92-a518-3b7fb75be3ae"],
+
+Cell[BoxData["26"], "Print",
+ CellChangeTimes->{3.778511819059483*^9, 3.778512390869191*^9},
+ CellLabel->
+  "During evaluation of \
+In[82]:=",ExpressionUUID->"60b61b67-6c61-4599-a20d-463c308eb270"],
+
+Cell[BoxData["27"], "Print",
+ CellChangeTimes->{3.778511819059483*^9, 3.778512390930818*^9},
+ CellLabel->
+  "During evaluation of \
+In[82]:=",ExpressionUUID->"60c27d5d-d770-45b4-8b6e-611a3c03ef79"],
+
+Cell[BoxData["28"], "Print",
+ CellChangeTimes->{3.778511819059483*^9, 3.778512394937373*^9},
+ CellLabel->
+  "During evaluation of \
+In[82]:=",ExpressionUUID->"e5c01ae9-55fc-47f8-9c3d-6f54b4b00756"],
+
+Cell[BoxData["29"], "Print",
+ CellChangeTimes->{3.778511819059483*^9, 3.77851239595619*^9},
+ CellLabel->
+  "During evaluation of \
+In[82]:=",ExpressionUUID->"7f11c8de-f7aa-4313-ab85-f0bc8404662d"],
+
+Cell[BoxData["30"], "Print",
+ CellChangeTimes->{3.778511819059483*^9, 3.7785123961155777`*^9},
+ CellLabel->
+  "During evaluation of \
+In[82]:=",ExpressionUUID->"9e154613-6e9c-4d11-8ddd-6170705528ab"],
+
+Cell[BoxData["31"], "Print",
+ CellChangeTimes->{3.778511819059483*^9, 3.778512396272484*^9},
+ CellLabel->
+  "During evaluation of \
+In[82]:=",ExpressionUUID->"2f8e02d9-a5b4-4bd9-b9d9-aec02153dd7c"],
+
+Cell[BoxData["32"], "Print",
+ CellChangeTimes->{3.778511819059483*^9, 3.7785124016781063`*^9},
+ CellLabel->
+  "During evaluation of \
+In[82]:=",ExpressionUUID->"650def7c-a65f-44fb-811b-1fa0b5a45d15"],
+
+Cell[BoxData["33"], "Print",
+ CellChangeTimes->{3.778511819059483*^9, 3.7785124017895813`*^9},
+ CellLabel->
+  "During evaluation of \
+In[82]:=",ExpressionUUID->"6474532b-9599-4489-88db-58d38314ab6f"],
+
+Cell[BoxData["34"], "Print",
+ CellChangeTimes->{3.778511819059483*^9, 3.778512406577866*^9},
+ CellLabel->
+  "During evaluation of \
+In[82]:=",ExpressionUUID->"226a40c4-f169-42d2-8ab6-1f67a2f873ea"],
+
+Cell[BoxData["35"], "Print",
+ CellChangeTimes->{3.778511819059483*^9, 3.77851240750906*^9},
+ CellLabel->
+  "During evaluation of \
+In[82]:=",ExpressionUUID->"a1944f0f-52a8-49d8-b9c3-20fec2f3235a"],
+
+Cell[BoxData["36"], "Print",
+ CellChangeTimes->{3.778511819059483*^9, 3.778512407615101*^9},
+ CellLabel->
+  "During evaluation of \
+In[82]:=",ExpressionUUID->"3b4b9b10-ab7e-4de6-ab0f-e0018abf925b"],
+
+Cell[BoxData["37"], "Print",
+ CellChangeTimes->{3.778511819059483*^9, 3.77851240772073*^9},
+ CellLabel->
+  "During evaluation of \
+In[82]:=",ExpressionUUID->"6c480e69-9121-408a-8dec-f908c61e8d42"],
+
+Cell[BoxData["38"], "Print",
+ CellChangeTimes->{3.778511819059483*^9, 3.7785124137636633`*^9},
+ CellLabel->
+  "During evaluation of \
+In[82]:=",ExpressionUUID->"cba40a3e-274e-4ca6-acca-4f9780f8640b"],
+
+Cell[BoxData["39"], "Print",
+ CellChangeTimes->{3.778511819059483*^9, 3.778512413888442*^9},
+ CellLabel->
+  "During evaluation of \
+In[82]:=",ExpressionUUID->"e62616bb-5c74-4eeb-afa2-bb439d81b80e"],
+
+Cell[BoxData["40"], "Print",
+ CellChangeTimes->{3.778511819059483*^9, 3.778512414033155*^9},
+ CellLabel->
+  "During evaluation of \
+In[82]:=",ExpressionUUID->"52e54f32-ac58-4414-93fa-68fcf6f14698"],
+
+Cell[BoxData["41"], "Print",
+ CellChangeTimes->{3.778511819059483*^9, 3.778512415469339*^9},
+ CellLabel->
+  "During evaluation of \
+In[82]:=",ExpressionUUID->"50d0b363-2b99-4f39-bfc0-29a59ae13c83"],
+
+Cell[BoxData["42"], "Print",
+ CellChangeTimes->{3.778511819059483*^9, 3.778512415986779*^9},
+ CellLabel->
+  "During evaluation of \
+In[82]:=",ExpressionUUID->"5dca03fa-6242-4056-b5c8-360525f873d4"],
+
+Cell[BoxData["43"], "Print",
+ CellChangeTimes->{3.778511819059483*^9, 3.778512416119038*^9},
+ CellLabel->
+  "During evaluation of \
+In[82]:=",ExpressionUUID->"91a05c83-f424-4d73-8df9-fd9365c15c65"],
+
+Cell[BoxData["44"], "Print",
+ CellChangeTimes->{3.778511819059483*^9, 3.778512416251133*^9},
+ CellLabel->
+  "During evaluation of \
+In[82]:=",ExpressionUUID->"e35ff97f-1b31-4eec-84d3-b936608c353c"],
+
+Cell[BoxData["45"], "Print",
+ CellChangeTimes->{3.778511819059483*^9, 3.778512417701735*^9},
+ CellLabel->
+  "During evaluation of \
+In[82]:=",ExpressionUUID->"45f0eca5-0ad3-474d-8922-cc6c393a259f"]
+}, Open  ]],
+
+Cell[BoxData[
+ RowBox[{"{", "Null", "}"}]], "Output",
+ CellChangeTimes->{3.778511859290827*^9, 3.778512417825062*^9},
+ CellLabel->"Out[82]=",ExpressionUUID->"cfcdfb24-b305-466a-a1bb-a332ab352a9e"]
+}, Closed]],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"Serieslist", "=", 
+   RowBox[{
+    RowBox[{"Import", "[", "\"\<SeriesPV_triangles.m\>\"", "]"}], "//", 
+    "Simplify"}]}], ";"}]], "Input",
+ CellChangeTimes->{{3.7785118753455553`*^9, 3.778511898085145*^9}, {
+  3.778512429633429*^9, 3.778512431084112*^9}},
+ CellLabel->"In[83]:=",ExpressionUUID->"09576c11-deed-4e65-b168-19d328941f7e"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(*", " ", 
+   RowBox[{"Define", " ", "replacemente", " ", 
+    RowBox[{"rule", "."}]}], " ", "*)"}], "\[IndentingNewLine]", 
+  RowBox[{
+   RowBox[{
+    RowBox[{"SetAttributes", "[", 
+     RowBox[{"f", ",", "Listable"}], "]"}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{
+     RowBox[{"f", "[", 
+      RowBox[{"a_", ",", "b_"}], "]"}], ":=", 
+     RowBox[{"a", "\[Rule]", "b"}]}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"replacement", "=", 
+     RowBox[{"f", "[", 
+      RowBox[{"listPV", ",", "Serieslist"}], "]"}]}], ";"}], 
+   "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{
+     "\"\<replacementRule_triangles_velocity.m\>\"", ",", "replacement"}], 
+     "]"}], ";"}]}]}]], "Input",
+ CellChangeTimes->{{3.7785121633002787`*^9, 3.778512185802937*^9}, {
+  3.778512231802353*^9, 3.778512308738598*^9}, {3.778512611400076*^9, 
+  3.7785126155855703`*^9}, {3.778512712549934*^9, 
+  3.778512714813554*^9}},ExpressionUUID->"e9cb917d-6bce-4b94-a047-\
+15b919e9e4cc"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(*", " ", 
+   RowBox[{"Sub", " ", "back", " ", "into", " ", "the", " ", 
+    RowBox[{"amplitude", "."}]}], " ", "*)"}], "\[IndentingNewLine]", 
+  RowBox[{
+   RowBox[{
+    RowBox[{"t", "=", 
+     RowBox[{"Import", "[", "\"\<ggHgg_PV_triangle_38diags.m\>\"", "]"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"replacement", "=", 
+     RowBox[{
+     "Import", "[", "\"\<replacementRule_triangles_velocity.m\>\"", "]"}]}], 
+    ";"}], "\[IndentingNewLine]", 
+   RowBox[{"tvel", "=", 
+    RowBox[{"t", "//.", "replacement"}]}], "\[IndentingNewLine]", 
+   RowBox[{
+    RowBox[{"Export", "[", 
+     RowBox[{"\"\<ggHgg_VSeries_triangles.m\>\"", ",", "tvel"}], "]"}], 
+    ";"}]}]}]], "Input",
+ CellChangeTimes->{{3.778512663505072*^9, 3.778512822513528*^9}},
+ CellLabel->"In[98]:=",ExpressionUUID->"58da36ab-d8d7-464f-a677-c4ffb3b43015"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"tvelSeries", "=", 
+  RowBox[{"LoopRefineSeries", "[", 
+   RowBox[{"tvel", ",", 
+    RowBox[{"{", 
+     RowBox[{"\[Beta]", ",", "0", ",", "2"}], "}"}]}], "]"}]}]], "Input",
+ CellChangeTimes->{{3.778513234373919*^9, 3.77851323517974*^9}, {
+  3.778513335636904*^9, 3.778513337021649*^9}, {3.778513385435795*^9, 
+  3.778513408995431*^9}},
+ CellLabel->
+  "In[102]:=",ExpressionUUID->"93d22a91-7738-43f2-ae38-e21755ca22f1"],
+
+Cell[BoxData[
+ TemplateBox[{
+  "Simplify","time",
+   "\"Time spent on a transformation exceeded \
+\\!\\(\\*RowBox[{\\\"300.`\\\"}]\\) seconds, and the transformation was \
+aborted. Increasing the value of TimeConstraint option may improve the result \
+of simplification.\"",2,102,18,17498789627688163568,"Alternate Kernel"},
+  "MessageTemplate"]], "Message", "MSG",
+ CellChangeTimes->{3.7785140277805433`*^9},
+ CellLabel->
+  "During evaluation of \
+In[102]:=",ExpressionUUID->"dc04a919-7e52-45e2-bb44-a344b5d1d308"],
+
+Cell[BoxData[
+ TemplateBox[{
+  "Simplify","time",
+   "\"Time spent on a transformation exceeded \
+\\!\\(\\*RowBox[{\\\"300.`\\\"}]\\) seconds, and the transformation was \
+aborted. Increasing the value of TimeConstraint option may improve the result \
+of simplification.\"",2,102,19,17498789627688163568,"Alternate Kernel"},
+  "MessageTemplate"]], "Message", "MSG",
+ CellChangeTimes->{3.778514355993286*^9},
+ CellLabel->
+  "During evaluation of \
+In[102]:=",ExpressionUUID->"99a74ed9-9abc-451d-8242-fd4078fd5891"],
+
+Cell[BoxData[
+ TemplateBox[{
+  "Simplify","time",
+   "\"Time spent on a transformation exceeded \
+\\!\\(\\*RowBox[{\\\"300.`\\\"}]\\) seconds, and the transformation was \
+aborted. Increasing the value of TimeConstraint option may improve the result \
+of simplification.\"",2,102,20,17498789627688163568,"Alternate Kernel"},
+  "MessageTemplate"]], "Message", "MSG",
+ CellChangeTimes->{3.7785147038057737`*^9},
+ CellLabel->
+  "During evaluation of \
+In[102]:=",ExpressionUUID->"1070ad89-c66d-4906-aa54-fd4ac95964d8"],
+
+Cell[BoxData[
+ TemplateBox[{
+  "General","stop",
+   "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"Simplify\\\", \
+\\\"::\\\", \\\"time\\\"}], \\\"MessageName\\\"]\\) will be suppressed during \
+this calculation.\"",2,102,21,17498789627688163568,"Alternate Kernel"},
+  "MessageTemplate"]], "Message", "MSG",
+ CellChangeTimes->{3.7785147039936247`*^9},
+ CellLabel->
+  "During evaluation of \
+In[102]:=",ExpressionUUID->"9dbf4032-8c2f-4bba-9001-aa2649499b6f"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[""], "Input",
+ CellChangeTimes->{{3.778513238312398*^9, 
+  3.7785132395692987`*^9}},ExpressionUUID->"6e5f5a2d-f8d8-41cc-b7f7-\
+193907c772e2"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(", 
+   InterpretationBox[
+    RowBox[{
+     RowBox[{"-", 
+      RowBox[{
+       FractionBox["1", 
+        RowBox[{"MW", " ", "SW"}]], 
+       RowBox[{"2", " ", 
+        RowBox[{"(", 
+         RowBox[{
+          SuperscriptBox["Alfas", "2"], " ", "c3", " ", "EL", " ", 
+          SuperscriptBox["MT", "2"], " ", 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             FractionBox["1", "T"], 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{"2", "+", 
+                    FractionBox["1", "\[Epsilon]"], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T", ",", "MT", ",", "MT"}], "]"}], "+", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], ")"}]}], "-", 
+                  RowBox[{
+                   FractionBox["1", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}]], 
+                   RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    FractionBox[
+                    SuperscriptBox["MH", "2"], "\[Epsilon]"], "-", 
+                    RowBox[{"3", " ", "T"}], "-", 
+                    FractionBox["T", "\[Epsilon]"], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "+", 
+                    SqrtBox[
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], 
+                    ")"}]}]}]}], ")"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                  RowBox[{"2", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+               
+               RowBox[{
+                FractionBox["1", 
+                 RowBox[{
+                  SuperscriptBox["MH", "2"], "-", "T"}]], 
+                RowBox[{
+                 RowBox[{"(", 
+                  RowBox[{
+                   SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"], "-", 
+                   SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "+", 
+                    SqrtBox[
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], ")"}], " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                   RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                   RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                  ")"}]}]}], "-", 
+               RowBox[{"16", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   FractionBox["1", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], "2"]}]], 
+                   RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "+", 
+                    SqrtBox[
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}]}], ")"}]}]}], "+", 
+                  RowBox[{
+                   FractionBox["1", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}]}]], 
+                   RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T", ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                    
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}]}], 
+                 ")"}]}], "+", 
+               RowBox[{
+                FractionBox["1", 
+                 RowBox[{
+                  SuperscriptBox["MH", "2"], "-", "T"}]], 
+                RowBox[{"4", " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], "]"}], 
+                   "-", 
+                   RowBox[{"DiscB", "[", 
+                    RowBox[{"T", ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}]}], ")"}],
+                     " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                   RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                   RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}]}], ")"}]}], "+", 
+            RowBox[{
+             FractionBox["1", 
+              RowBox[{
+               RowBox[{"2", " ", 
+                SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+               "U"}]], 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{"2", "+", 
+                    FractionBox["1", "\[Epsilon]"], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ",", "MT", ",", "MT"}], "]"}], "+", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], ")"}]}], "+", 
+                  RowBox[{
+                   FractionBox["1", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}]], 
+                   RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}]}], "+", 
+                    FractionBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], "\[Epsilon]"], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U", "+", 
+                    SqrtBox[
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], 
+                    ")"}]}]}]}], ")"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                  RowBox[{"2", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+               
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   FractionBox["1", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}]], 
+                   RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], "]"}], 
+                    "-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], "-", 
+                  RowBox[{
+                   FractionBox["1", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], "2"]], 
+                   RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U", "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U", "+", 
+                    SqrtBox[
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}]}], 
+                 ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+               RowBox[{
+                FractionBox["1", 
+                 RowBox[{
+                  RowBox[{"-", 
+                   SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                  "U"}]], 
+                RowBox[{"4", " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{"-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                   RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                   RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                   RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                  ")"}]}]}], "-", 
+               RowBox[{
+                FractionBox["1", 
+                 RowBox[{
+                  RowBox[{"-", 
+                   SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                  "U"}]], 
+                RowBox[{
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{"-", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                   SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U", "+", 
+                    SqrtBox[
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], ")"}], " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                   RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                   RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                  ")"}]}]}], "+", 
+               RowBox[{
+                FractionBox["1", "T24"], 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"-", "8"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}]}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], "]"}], 
+                    "-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"3", " ", "S34"}], "+", "T", "+", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S", "-", "T14"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "+", "S34", "+", "T", "-", 
+                    RowBox[{"3", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "+", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "+", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}]}], "-", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], "2"]}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U", "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U", "+", 
+                    SqrtBox[
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"3", " ", "S34"}], "+", "T", "-", 
+                    RowBox[{"2", " ", "T24"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S", "-", "T14"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "+", "S34", "+", "T", "-", 
+                    RowBox[{"2", " ", "T24"}], "-", 
+                    RowBox[{"3", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "+", "T", "-", 
+                    RowBox[{"2", " ", "T24"}], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "+", "T", "-", 
+                    RowBox[{"2", " ", "T24"}], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}]}], ")"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"2", "+", 
+                    FractionBox["1", "\[Epsilon]"], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ",", "MT", ",", "MT"}], "]"}], "+", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}]], 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}]}], "+", 
+                    FractionBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], "\[Epsilon]"], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U", "+", 
+                    SqrtBox[
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], 
+                    ")"}]}]}]}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", "S"}], "+", "T14"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], "+", 
+                  RowBox[{
+                   FractionBox["1", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}]], 
+                   RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U", "+", 
+                    SqrtBox[
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{"S", "-", "T14"}], ")"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T24", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T24", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S", "-", "T14"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T", "-", "T24", "-", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", "S34"}], "+", "T", "-", "T24", "+", "U"}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], "+", 
+                  RowBox[{
+                   FractionBox["1", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}]], 
+                   RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{"S", "-", "T14"}], ")"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"3", " ", "S34"}], "+", "T", "-", 
+                    RowBox[{"2", " ", "T24"}], "-", 
+                    RowBox[{"3", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"3", " ", "S34"}], "+", "T", "-", 
+                    RowBox[{"2", " ", "T24"}], "-", 
+                    RowBox[{"3", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S", "-", "T14"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "+", 
+                    RowBox[{"3", " ", "S34"}], "+", 
+                    RowBox[{"3", " ", "T"}], "-", 
+                    RowBox[{"2", " ", "T24"}], "-", 
+                    RowBox[{"5", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"5", " ", "S34"}], "+", 
+                    RowBox[{"3", " ", "T"}], "-", 
+                    RowBox[{"2", " ", "T24"}], "+", 
+                    RowBox[{"3", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}]}], ")"}]}], "+", 
+               RowBox[{
+                FractionBox["1", "T14"], 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"8", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}]}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], "]"}], 
+                    "-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"3", " ", "S34"}], "+", "T", "+", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S", "-", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "+", "S34", "-", 
+                    RowBox[{"3", " ", "T"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}]}], "-", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], "2"]}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U", "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U", "+", 
+                    SqrtBox[
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    RowBox[{"2", " ", "T14"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S", "+", 
+                    RowBox[{"4", " ", "S34"}], "+", 
+                    RowBox[{"3", " ", "T14"}], "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S", "-", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S", "+", 
+                    RowBox[{"4", " ", "T"}], "+", 
+                    RowBox[{"3", " ", "T14"}], "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    RowBox[{"2", " ", "T14"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}]}], ")"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"2", "+", 
+                    FractionBox["1", "\[Epsilon]"], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ",", "MT", ",", "MT"}], "]"}], "+", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}]], 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}]}], "+", 
+                    FractionBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], "\[Epsilon]"], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U", "+", 
+                    SqrtBox[
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], 
+                    ")"}]}]}]}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", "S"}], "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], "+", 
+                  RowBox[{
+                   FractionBox["1", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}]], 
+                   RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"3", " ", "S34"}], "-", 
+                    RowBox[{"3", " ", "T"}], "-", 
+                    RowBox[{"2", " ", "T14"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"3", " ", "S34"}], "-", 
+                    RowBox[{"3", " ", "T"}], "-", 
+                    RowBox[{"2", " ", "T14"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{"S", "-", "T24"}], ")"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", "S"}], "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S", "-", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "7"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"3", " ", "S"}], "+", 
+                    RowBox[{"8", " ", "T"}], "+", 
+                    RowBox[{"5", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "7"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"3", " ", "S"}], "+", 
+                    RowBox[{"8", " ", "S34"}], "+", 
+                    RowBox[{"5", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], "+", 
+                  RowBox[{
+                   FractionBox["1", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}]], 
+                   RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U", "+", 
+                    SqrtBox[
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S", "+", "T24", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S", "+", "T24", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{"S", "-", "T24"}], ")"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S", "-", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S", "+", 
+                    RowBox[{"2", " ", "S34"}], "+", "T24", "+", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S", "+", 
+                    RowBox[{"2", " ", "T"}], "+", "T24", "+", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], ")"}]}]}]}], ")"}]}]}], ")"}]}], 
+            "+", 
+            RowBox[{
+             FractionBox["1", "S34"], 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{"2", "+", 
+                    FractionBox["1", "\[Epsilon]"], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"S34", ",", "MT", ",", "MT"}], "]"}], "+", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], ")"}]}], "-", 
+                  RowBox[{
+                   FractionBox["1", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}]], 
+                   RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    FractionBox[
+                    SuperscriptBox["MH", "2"], "\[Epsilon]"], "-", 
+                    RowBox[{"3", " ", "S34"}], "-", 
+                    FractionBox["S34", "\[Epsilon]"], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{"S34", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"S34", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{"S34", " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "S34", "+", 
+                    SqrtBox[
+                    RowBox[{"S34", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], 
+                    ")"}]}]}]}], ")"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                  RowBox[{"2", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+               
+               RowBox[{
+                FractionBox["1", 
+                 RowBox[{
+                  SuperscriptBox["MH", "2"], "-", "S34"}]], 
+                RowBox[{"4", " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], "]"}], 
+                   "-", 
+                   RowBox[{"DiscB", "[", 
+                    RowBox[{"S34", ",", "MT", ",", "MT"}], "]"}]}], ")"}], 
+                 " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                   RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                   RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"-", 
+                   RowBox[{
+                    FractionBox["1", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}]], 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"S34", ",", "MT", ",", "MT"}], "]"}]}], ")"}], 
+                    " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}]}], 
+                  "+", 
+                  RowBox[{
+                   FractionBox["1", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], "2"]], 
+                   RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"S34", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "S34", "+", 
+                    SqrtBox[
+                    RowBox[{"S34", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}]}], 
+                 ")"}]}], "+", 
+               RowBox[{
+                FractionBox["1", 
+                 RowBox[{
+                  SuperscriptBox["MH", "2"], "-", "S34"}]], 
+                RowBox[{
+                 RowBox[{"(", 
+                  RowBox[{
+                   SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"], "-", 
+                   SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "S34", "+", 
+                    SqrtBox[
+                    RowBox[{"S34", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], ")"}], " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                   RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                   RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                  ")"}]}]}], "-", 
+               RowBox[{
+                FractionBox["1", 
+                 RowBox[{
+                  SuperscriptBox["MH", "2"], "-", "S", "-", "T", "-", 
+                  "T14"}]], 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"2", "+", 
+                    FractionBox["1", "\[Epsilon]"], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"S34", ",", "MT", ",", "MT"}], "]"}], "+", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}]], 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    FractionBox[
+                    SuperscriptBox["MH", "2"], "\[Epsilon]"], "-", 
+                    RowBox[{"3", " ", "S34"}], "-", 
+                    FractionBox["S34", "\[Epsilon]"], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{"S34", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"S34", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{"S34", " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "S34", "+", 
+                    SqrtBox[
+                    RowBox[{"S34", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], 
+                    ")"}]}]}]}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S"}], "+", "T24", "+", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                  RowBox[{"8", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], "2"]}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"S34", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "S34", "+", 
+                    SqrtBox[
+                    RowBox[{"S34", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"2", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S34"}], "+", 
+                    RowBox[{"4", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"4", " ", "T14"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "+", 
+                    RowBox[{"2", " ", "S"}], "-", "S34", "-", 
+                    RowBox[{"2", " ", "T"}], "+", 
+                    RowBox[{"2", " ", "T14"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"2", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], "+", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}]}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"S34", ",", "MT", ",", "MT"}], "]"}]}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S34"}], "+", 
+                    RowBox[{"4", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"2", " ", "S"}], "+", "S34", "-", 
+                    RowBox[{"2", " ", "T"}], "+", 
+                    RowBox[{"2", " ", "T14"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"4", " ", "T"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}]}], ")"}]}], "-", 
+                  RowBox[{
+                   FractionBox["1", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}]], 
+                   RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"], "-", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "S34", "+", 
+                    SqrtBox[
+                    RowBox[{"S34", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"2", " ", "S"}], "-", "T24", "-", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", "T14", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "+", "S", "-", "S34", "-", "T",
+                     "+", "T14"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], ")"}]}]}], "-", 
+                  RowBox[{
+                   FractionBox["1", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}]], 
+                   RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], "]"}], 
+                    "-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"S34", ",", "MT", ",", "MT"}], "]"}]}], ")"}], 
+                    " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"2", " ", "S"}], "-", "T24", "-", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S"}], "-", 
+                    RowBox[{"3", " ", "S34"}], "-", 
+                    RowBox[{"6", " ", "T"}], "+", 
+                    RowBox[{"2", " ", "T14"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"2", " ", "S"}], "+", "S34", "-", 
+                    RowBox[{"2", " ", "T"}], "+", 
+                    RowBox[{"6", " ", "T14"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "+", 
+                    RowBox[{"2", " ", "T24"}], "-", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "+", 
+                    RowBox[{"2", " ", "T24"}], "-", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "+", 
+                    RowBox[{"2", " ", "T24"}], "-", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], ")"}]}]}]}], ")"}]}]}], ")"}]}], 
+            "+", 
+            RowBox[{
+             FractionBox["1", "U"], 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                FractionBox["1", 
+                 RowBox[{
+                  SuperscriptBox["MH", "2"], "-", "U"}]], 
+                RowBox[{
+                 RowBox[{"(", 
+                  RowBox[{
+                   SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"], "-", 
+                   SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "U", "+", 
+                    SqrtBox[
+                    RowBox[{"U", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], ")"}], " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                   RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                   RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                  ")"}]}]}], "-", 
+               RowBox[{"16", " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   FractionBox["1", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}]}]], 
+                   RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    FractionBox[
+                    SuperscriptBox["MH", "2"], "\[Epsilon]"], "-", 
+                    RowBox[{"3", " ", "U"}], "-", 
+                    FractionBox["U", "\[Epsilon]"], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{"U", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"U", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{"U", " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "U", "+", 
+                    SqrtBox[
+                    RowBox[{"U", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                  "+", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], "2"]}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "U", "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"U", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "U", "+", 
+                    SqrtBox[
+                    RowBox[{"U", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], "+", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}]}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"U", ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                    
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}]}], 
+                    ")"}]}]}], ")"}]}], "+", 
+               RowBox[{"4", " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{"2", "+", 
+                    FractionBox["1", "\[Epsilon]"], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"U", ",", "MT", ",", "MT"}], "]"}], "+", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                  
+                  RowBox[{
+                   FractionBox["1", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}]], 
+                   RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], "]"}], 
+                    "-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"U", ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                    
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}]}], ")"}]}], "+", 
+               RowBox[{
+                FractionBox["1", "T14"], 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"-", 
+                   RowBox[{
+                    FractionBox["1", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"], "-", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "U", "+", 
+                    SqrtBox[
+                    RowBox[{"U", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S", "-", "S34", "+", "T", "-", "T24"}], ")"}], 
+                    " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S", "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S", "+", "S34", "-", "T", "+", "T24"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", "S", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S", "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S", "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}]}], "+", 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"2", "+", 
+                    FractionBox["1", "\[Epsilon]"], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"U", ",", "MT", ",", "MT"}], "]"}], "+", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}]], 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    FractionBox[
+                    SuperscriptBox["MH", "2"], "\[Epsilon]"], "-", 
+                    RowBox[{"3", " ", "U"}], "-", 
+                    FractionBox["U", "\[Epsilon]"], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{"U", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"U", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{"U", " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "U", "+", 
+                    SqrtBox[
+                    RowBox[{"U", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], 
+                    ")"}]}]}]}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", "S"}], "+", "S34", "-", "T", "+", "T24"}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], "-", 
+                  RowBox[{"8", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], "2"]}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "U", "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"U", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "U", "+", 
+                    SqrtBox[
+                    RowBox[{"U", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S"}], "+", 
+                    RowBox[{"2", " ", "T24"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S"}], "+", 
+                    RowBox[{"2", " ", "T24"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S"}], "+", 
+                    RowBox[{"2", " ", "T24"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", "S", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", "T24", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", "S", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", "T24", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"U", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], "+", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}]}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"U", ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                    
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S34"}], "+", 
+                    RowBox[{"2", " ", "T"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S34"}], "+", 
+                    RowBox[{"2", " ", "T"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", "S34"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S", "-", "S34", "+", "T", "-", "T24"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", "T"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}]}], ")"}]}], "-", 
+                  RowBox[{
+                   FractionBox["1", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}]], 
+                   RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], "]"}], 
+                    "-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"U", ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                    
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "5"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", "S34"}], "+", 
+                    RowBox[{"4", " ", "T"}], "+", 
+                    RowBox[{"2", " ", "T14"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "5"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", "S34"}], "+", 
+                    RowBox[{"4", " ", "T"}], "+", 
+                    RowBox[{"2", " ", "T14"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S", "-", "S34", "+", "T", "-", "T24"}], ")"}], 
+                    " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"8", " ", "S34"}], "-", 
+                    RowBox[{"2", " ", "T14"}], "-", 
+                    RowBox[{"3", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S34"}], "+", "T14", "+", 
+                    RowBox[{"2", " ", "T24"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"8", " ", "T"}], "-", 
+                    RowBox[{"2", " ", "T14"}], "-", 
+                    RowBox[{"3", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}]}], ")"}]}], "+", 
+               RowBox[{
+                FractionBox["1", 
+                 RowBox[{
+                  SuperscriptBox["MH", "2"], "-", "S", "-", "T", "-", 
+                  "T14"}]], 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"2", "+", 
+                    FractionBox["1", "\[Epsilon]"], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"U", ",", "MT", ",", "MT"}], "]"}], "+", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}]], 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    FractionBox[
+                    SuperscriptBox["MH", "2"], "\[Epsilon]"], "-", 
+                    RowBox[{"3", " ", "U"}], "-", 
+                    FractionBox["U", "\[Epsilon]"], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{"U", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"U", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{"U", " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "U", "+", 
+                    SqrtBox[
+                    RowBox[{"U", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], 
+                    ")"}]}]}]}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"2", " ", "T14"}], "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                  RowBox[{"8", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}]}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"U", ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                    
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"2", " ", "S34"}], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", "S34"}], "+", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"4", " ", "T"}], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "+", 
+                    RowBox[{"2", " ", "S"}], "-", 
+                    RowBox[{"2", " ", "T"}], "-", 
+                    RowBox[{"2", " ", "T14"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"2", " ", "S34"}], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], "+", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], "2"]}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "U", "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"U", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "U", "+", 
+                    SqrtBox[
+                    RowBox[{"U", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "T24"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"2", " ", "S"}], "+", 
+                    RowBox[{"2", " ", "T"}], "-", 
+                    RowBox[{"2", " ", "T14"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", "S"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "T24"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}]}], ")"}]}], "-", 
+                  RowBox[{
+                   FractionBox["1", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}]], 
+                   RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], "]"}], 
+                    "-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"U", ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                    
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", 
+                    RowBox[{"2", " ", "T14"}], "-", "T24"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"2", " ", "S34"}], "+", 
+                    RowBox[{"2", " ", "T24"}], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "5"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"2", " ", "S"}], "+", 
+                    RowBox[{"6", " ", "T"}], "-", 
+                    RowBox[{"2", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "+", 
+                    RowBox[{"6", " ", "S"}], "-", 
+                    RowBox[{"2", " ", "T"}], "-", 
+                    RowBox[{"2", " ", "T14"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S34"}], "-", 
+                    RowBox[{"2", " ", "T24"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S34"}], "-", 
+                    RowBox[{"2", " ", "T24"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], ")"}]}]}], "-", 
+                  RowBox[{
+                   FractionBox["1", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}]], 
+                   RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"], "-", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "U", "+", 
+                    SqrtBox[
+                    RowBox[{"U", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", 
+                    RowBox[{"2", " ", "T14"}], "-", "T24"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", "T24", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "+", "S", "-", "T", "+", "T14",
+                     "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", "S", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"T24", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"T24", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], ")"}]}]}]}], ")"}]}]}], ")"}]}], 
+            "+", 
+            RowBox[{
+             FractionBox["1", "T24"], 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"-", 
+                RowBox[{
+                 FractionBox["1", "T"], 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{"-", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"], "-", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "+", 
+                    SqrtBox[
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S", "-", "S34", "-", "T14", "+", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S", "+", "T14"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S", "+", "T14"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S", "+", "S34", "+", "T14", "-", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S", "+", "T14"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", "S", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], ")"}]}]}]}], "+", 
+                   RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"2", "+", 
+                    FractionBox["1", "\[Epsilon]"], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T", ",", "MT", ",", "MT"}], "]"}], "+", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}]], 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    FractionBox[
+                    SuperscriptBox["MH", "2"], "\[Epsilon]"], "-", 
+                    RowBox[{"3", " ", "T"}], "-", 
+                    FractionBox["T", "\[Epsilon]"], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "+", 
+                    SqrtBox[
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], 
+                    ")"}]}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S", "-", "S34", "-", "T14", "+", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], "+", 
+                   RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}]}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T", ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                    
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S34"}], "+", "T", "+", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S34"}], "+", "T", "+", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", "S34"}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S", "-", "S34", "-", "T14", "+", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "+", 
+                    RowBox[{"4", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], "+", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], "2"]}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "+", 
+                    SqrtBox[
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S"}], "+", "T", "+", 
+                    RowBox[{"2", " ", "T14"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S"}], "+", "T", "+", 
+                    RowBox[{"2", " ", "T14"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", "S34"}], "+", "T", "+", 
+                    RowBox[{"2", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S", "-", "S34", "-", "T14", "+", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "+", 
+                    RowBox[{"2", " ", "T24"}], "+", 
+                    RowBox[{"4", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}]}], ")"}]}], "-", 
+                   RowBox[{
+                    FractionBox["1", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}]], 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], "]"}], 
+                    "-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T", ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                    
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "5"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", "S34"}], "+", "T", "+", 
+                    RowBox[{"2", " ", "T24"}], "+", 
+                    RowBox[{"4", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "5"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", "S34"}], "+", "T", "+", 
+                    RowBox[{"2", " ", "T24"}], "+", 
+                    RowBox[{"4", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S", "-", "S34", "-", "T14", "+", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "-", 
+                    RowBox[{"16", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"8", " ", "S34"}], "-", 
+                    RowBox[{"3", " ", "T"}], "-", 
+                    RowBox[{"2", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S34"}], "+", "T", "+", 
+                    RowBox[{"2", " ", "T14"}], "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"3", " ", "T"}], "-", 
+                    RowBox[{"2", " ", "T24"}], "-", 
+                    RowBox[{"8", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}]}], ")"}]}]}], "-", 
+               RowBox[{
+                FractionBox["1", 
+                 RowBox[{
+                  SuperscriptBox["MH", "2"], "-", "S", "-", "T", "-", 
+                  "T14"}]], 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"-", "2"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "S34"}], " ", "T"}], "+", 
+                    RowBox[{"S34", " ", "T14"}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "U"}], ")"}]}], "+", 
+                    RowBox[{"T", " ", "U"}], "+", 
+                    RowBox[{"T14", " ", "U"}], "-", 
+                    RowBox[{"S", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"U", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"S34", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"U", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"S34", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24", ",", "MT", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["S34", "2"]}], "-", 
+                    RowBox[{"4", " ", "S34", " ", "T"}], "+", 
+                    RowBox[{"2", " ", "S34", " ", "T14"}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "U"}], ")"}]}], "+", 
+                    RowBox[{"4", " ", "T", " ", "U"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "U"}], "+", 
+                    SuperscriptBox["U", "2"], "-", 
+                    RowBox[{"2", " ", "S", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"4", " ", "T"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"4", " ", "T"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"32", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", "S34"}], "+", "U"}], ")"}], " ", 
+                    
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", "S34"}], "+", "U"}], ")"}], " ", 
+                    
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], 
+                    ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T24", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24", ",", "MT", ",", "MT", ",", "MT"}], "]"}]}]}], 
+                    ")"}]}], ")"}], "/", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", "S"}], "-", "S34", "-", 
+                    RowBox[{"2", " ", "T14"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"2", "+", 
+                    FractionBox["1", "\[Epsilon]"], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T24", ",", "MT", ",", "MT"}], "]"}], "+", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}]}], ")"}]}],
+                     "+", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}]}], 
+                    "\[Epsilon]"], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14", "-", 
+                    "T24"}], ")"}], " ", "T24", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T24", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}]}], ")"}], 
+                    " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T", "-", "T14"}], ")"}], 
+                    " ", "T24"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}]}], ")"}]}]}], ")"}], 
+                    " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24", ",", "MT", ",", "MT", ",", "MT"}], "]"}]}]}], 
+                    ")"}]}], ")"}], "/", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], "-", 
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["S34", "2"]}], "-", 
+                    RowBox[{"2", " ", "S34", " ", "T"}], "-", 
+                    RowBox[{"S34", " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"2", " ", "S", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", "S34"}], "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", "S"}], "+", 
+                    RowBox[{"3", " ", "S34"}], "-", 
+                    RowBox[{"2", " ", "T14"}], "-", 
+                    RowBox[{"3", " ", "U"}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", "T", " ", "U"}], "+", 
+                    RowBox[{"4", " ", "T14", " ", "U"}], "+", 
+                    RowBox[{"T24", " ", "U"}], "+", 
+                    SuperscriptBox["U", "2"]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T24", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T24", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T24", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T24", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T24", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S34"}], "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", "S34"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", "U", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", "S34", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"S34", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"U", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", "U", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T24", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T24", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{"T14", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T24", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T24", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24", ",", "MT", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T", " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24", ",", "MT", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24", ",", "MT", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T24", " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24", ",", "MT", ",", "MT", ",", "MT"}], "]"}]}]}], 
+                    ")"}]}], ")"}], "/", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}]}], ")"}]}],
+                     "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "U"}], ")"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"2", " ", "T"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", 
+                    RowBox[{"2", " ", "T"}], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"16", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "16"}], " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    SuperscriptBox["T", "2"], "-", 
+                    SuperscriptBox["T14", "2"], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "-", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "-", 
+                    SuperscriptBox["T24", "2"], "-", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}]}], ")"}]}],
+                     "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"3", " ", "T"}], "+", 
+                    RowBox[{"3", " ", "T14"}], "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"3", " ", "T"}], "+", 
+                    RowBox[{"3", " ", "T14"}], "+", 
+                    RowBox[{"5", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"80", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"10", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"7", " ", "T", " ", "T24"}], "+", 
+                    RowBox[{"7", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["T24", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"10", " ", "T"}], "+", 
+                    RowBox[{"10", " ", "T14"}], "+", 
+                    RowBox[{"7", " ", "T24"}]}], ")"}]}]}], ")"}]}]}], ")"}], 
+                    " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{"6", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14"}], 
+                    ")"}], "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "192"}], " ", 
+                    SuperscriptBox["MT", "6"]}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T", "3"]}], "-", 
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T", "2"], " ", "T14"}], "-", 
+                    RowBox[{"9", " ", "T", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "3"]}], "-", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", "T"}], "+", 
+                    RowBox[{"9", " ", "T14"}], "-", "T24"}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T24"}], "+", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "+", 
+                    RowBox[{"5", " ", "T", " ", 
+                    SuperscriptBox["T24", "2"]}], "+", 
+                    RowBox[{"5", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "+", 
+                    SuperscriptBox["T24", "3"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"18", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"2", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox["T", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", "T14"}], "+", 
+                    SuperscriptBox["T14", "2"], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"8", " ", "T"}], "+", 
+                    RowBox[{"8", " ", "T14"}], "-", 
+                    RowBox[{"4", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"T", " ", "T24"}], "-", 
+                    RowBox[{"T14", " ", "T24"}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T24", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T24"}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14"}], 
+                    ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox["T", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", "T14"}], "+", 
+                    SuperscriptBox["T14", "2"], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "-", "T24"}], ")"}]}], "+", 
+                    SuperscriptBox["T24", "2"]}], ")"}]}]}], ")"}], " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24", ",", "MT", ",", "MT", ",", "MT"}], "]"}]}]}], 
+                    ")"}]}], ")"}], "/", 
+                    RowBox[{"(", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}]}], ")"}], 
+                    "2"]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "U"}], ")"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"2", " ", "T"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", 
+                    RowBox[{"2", " ", "T"}], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"16", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "16"}], " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    SuperscriptBox["T", "2"], "-", 
+                    SuperscriptBox["T14", "2"], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "-", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "-", 
+                    SuperscriptBox["T24", "2"], "-", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}]}], ")"}]}],
+                     "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "80"}], " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T", "2"]}], "-", 
+                    RowBox[{"10", " ", "T", " ", "T14"}], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"4", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"4", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"3", " ", "T"}], "+", 
+                    RowBox[{"3", " ", "T14"}], "+", "T24"}], ")"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", "T"}], "+", 
+                    RowBox[{"5", " ", "T14"}], "+", 
+                    RowBox[{"2", " ", "T24"}]}], ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"24", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"6", " ", "T"}], "+", 
+                    RowBox[{"6", " ", "T14"}], "-", 
+                    RowBox[{"2", " ", "T24"}]}], ")"}]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "-", 
+                    "T24"}], ")"}], "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T24"}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14"}], 
+                    ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T24", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "6"], " ", "T24"}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "3"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox["T", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", "T14"}], "+", 
+                    SuperscriptBox["T14", "2"], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", "T"}], "+", 
+                    RowBox[{"2", " ", "T14"}], "-", 
+                    RowBox[{"5", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"3", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"3", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", "T"}], "+", 
+                    RowBox[{"2", " ", "T14"}], "-", 
+                    RowBox[{"3", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"10", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"8", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"8", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", "T14"}], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"T", " ", "T24"}], "-", 
+                    RowBox[{"T14", " ", "T24"}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24", ",", "MT", ",", "MT", ",", "MT"}], "]"}]}]}], 
+                    ")"}]}], ")"}], "/", 
+                    RowBox[{"(", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}]}], ")"}], 
+                    "2"]}], ")"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}], "+", 
+            RowBox[{
+             FractionBox["1", 
+              RowBox[{
+               SuperscriptBox["MH", "2"], "-", "S", "-", "T24", "-", "U"}]], 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"-", 
+                RowBox[{
+                 FractionBox["1", "S34"], 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"2", "+", 
+                    FractionBox["1", "\[Epsilon]"], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"S34", ",", "MT", ",", "MT"}], "]"}], "+", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S"}], "+", "T", "+", "T14"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], "-", 
+                   RowBox[{
+                    FractionBox["1", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}]], 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    FractionBox[
+                    SuperscriptBox["MH", "2"], "\[Epsilon]"], "-", 
+                    RowBox[{"3", " ", "S34"}], "-", 
+                    FractionBox["S34", "\[Epsilon]"], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{"S34", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"S34", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{"S34", " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "S34", "+", 
+                    SqrtBox[
+                    RowBox[{"S34", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S"}], "+", "T", "+", "T14"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], "+", 
+                   RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}]}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"S34", ",", "MT", ",", "MT"}], "]"}]}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S34"}], "+", 
+                    RowBox[{"4", " ", "T"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"2", " ", "S"}], "+", "S34", "+", 
+                    RowBox[{"2", " ", "T24"}], "-", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"4", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"2", " ", "T"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"2", " ", "T"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], "+", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], "2"]}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"S34", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "S34", "+", 
+                    SqrtBox[
+                    RowBox[{"S34", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S34"}], "+", 
+                    RowBox[{"4", " ", "T14"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"4", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "+", 
+                    RowBox[{"2", " ", "S"}], "-", "S34", "+", 
+                    RowBox[{"2", " ", "T24"}], "-", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", 
+                    RowBox[{"2", " ", "T14"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", 
+                    RowBox[{"2", " ", "T14"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}]}], ")"}]}], "-", 
+                   RowBox[{
+                    FractionBox["1", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}]], 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], "]"}], 
+                    "-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"S34", ",", "MT", ",", "MT"}], "]"}]}], ")"}], 
+                    " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", 
+                    RowBox[{"2", " ", "T"}], "+", 
+                    RowBox[{"2", " ", "T14"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S"}], "-", 
+                    RowBox[{"3", " ", "S34"}], "+", 
+                    RowBox[{"2", " ", "T24"}], "-", 
+                    RowBox[{"6", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"2", " ", "S"}], "+", "S34", "+", 
+                    RowBox[{"6", " ", "T24"}], "-", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"2", " ", "S"}], "-", "T", "-", "T14"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", 
+                    RowBox[{"2", " ", "T"}], "+", 
+                    RowBox[{"2", " ", "T14"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", 
+                    RowBox[{"2", " ", "T"}], "+", 
+                    RowBox[{"2", " ", "T14"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], ")"}]}]}], "-", 
+                   RowBox[{
+                    FractionBox["1", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"], "-", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "S34", "+", 
+                    SqrtBox[
+                    RowBox[{"S34", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"2", " ", "S"}], "-", "T", "-", "T14"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"T14", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", "T14", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", "T24", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "+", "S", "-", "S34", "+", 
+                    "T24", "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"T14", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], ")"}]}]}]}], ")"}]}]}], "+", 
+               RowBox[{
+                FractionBox["1", "T"], 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{"2", "+", 
+                    FractionBox["1", "\[Epsilon]"], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T", ",", "MT", ",", "MT"}], "]"}], "+", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}]}], ")"}],
+                     " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T14", "+", 
+                    
+                    RowBox[{"2", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], "-", 
+                  RowBox[{
+                   FractionBox["1", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}]], 
+                   RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    FractionBox[
+                    SuperscriptBox["MH", "2"], "\[Epsilon]"], "-", 
+                    RowBox[{"3", " ", "T"}], "-", 
+                    FractionBox["T", "\[Epsilon]"], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "+", 
+                    SqrtBox[
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}]}], ")"}],
+                     " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T14", "+", 
+                    
+                    RowBox[{"2", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], "-", 
+                  RowBox[{
+                   FractionBox["1", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}]], 
+                   RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"], "-", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "+", 
+                    SqrtBox[
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"T14", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S"}], "+", "S34", "+", "T14", "+", 
+                    RowBox[{"2", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"T14", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"S", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"T14", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                    RowBox[{"2", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}]}]}], ")"}],
+                     " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], "-", 
+                  RowBox[{
+                   FractionBox["1", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}]], 
+                   RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], "]"}], 
+                    "-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T", ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                    
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"2", " ", "S34"}], "-", "T", "+", 
+                    RowBox[{"2", " ", "T14"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"2", " ", "S34"}], "-", 
+                    RowBox[{"5", " ", "T"}], "-", 
+                    RowBox[{"2", " ", "T14"}], "-", 
+                    RowBox[{"8", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"2", " ", "S34"}], "-", "T", "+", 
+                    RowBox[{"2", " ", "T14"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"8", " ", "S"}], "-", 
+                    RowBox[{"2", " ", "S34"}], "-", 
+                    RowBox[{"3", " ", "T"}], "-", 
+                    RowBox[{"2", " ", "T14"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"2", " ", "S34"}], "-", "T", "+", 
+                    RowBox[{"2", " ", "T14"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                    RowBox[{"2", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"16", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], "-", 
+                  RowBox[{"8", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], "2"]}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "+", 
+                    SqrtBox[
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "+", 
+                    RowBox[{"2", " ", "T14"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S34"}], "+", "T", "-", 
+                    RowBox[{"2", " ", "T14"}], "+", 
+                    RowBox[{"4", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T14", "+", 
+                    
+                    RowBox[{"2", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"2", " ", "S34"}], "-", 
+                    RowBox[{"3", " ", "T"}], "-", 
+                    RowBox[{"2", " ", "T14"}], "-", 
+                    RowBox[{"4", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "+", 
+                    RowBox[{"2", " ", "T14"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], "+", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}]}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T", ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                    
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"2", " ", "S34"}], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "5"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", "S34"}], "+", 
+                    RowBox[{"3", " ", "T"}], "+", 
+                    RowBox[{"4", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T14", "+", 
+                    
+                    RowBox[{"2", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "T", "-", 
+                    RowBox[{"4", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"2", " ", "S34"}], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}]}], ")"}]}]}], ")"}]}], "+", 
+               RowBox[{
+                FractionBox["1", "T14"], 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{"4", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", "S"}], "-", "S34", "+", "T", "-", 
+                    RowBox[{"2", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T14", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{"T14", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{"U", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T24", " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "U", " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT", ",", "MT"}], "]"}]}]}], ")"}]}], ")"}], 
+                   "/", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}], "-", 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", "S", " ", "S34"}], "-", 
+                    SuperscriptBox["S34", "2"], "+", 
+                    SuperscriptBox["T", "2"], "+", 
+                    RowBox[{"2", " ", "S34", " ", "T14"}], "-", 
+                    RowBox[{"2", " ", "T", " ", "T14"}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", "S"}], "-", "S34", "+", "T", "-", 
+                    RowBox[{"2", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"4", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"2", " ", "S34", " ", "U"}], "+", 
+                    RowBox[{"2", " ", "T", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T"}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T"}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T"}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"3", " ", "S34"}], "-", 
+                    RowBox[{"3", " ", "T"}], "-", 
+                    RowBox[{"4", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T"}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"3", " ", "S34"}], "-", 
+                    RowBox[{"3", " ", "T"}], "-", 
+                    RowBox[{"4", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T"}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T"}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"32", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}]}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{"2", " ", "T14", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T14", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{"T14", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{"U", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", "T14", " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{"T14", " ", "T24", " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{"T14", " ", "U", " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT", ",", "MT"}], "]"}]}]}], ")"}]}], ")"}], 
+                   "/", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", "S"}], "-", "S34", "+", "T", "-", 
+                    RowBox[{"2", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}], "+", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    "\[Epsilon]"], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{"T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T14", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}], " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T24", "-", "U"}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "8"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT", ",", "MT"}], "]"}]}]}], ")"}]}], ")"}], 
+                   "/", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}], "-", 
+                  RowBox[{"2", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"2", "+", 
+                    FractionBox["1", "\[Epsilon]"], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT"}], "]"}], "+", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", "S"}], "-", "S34", "+", "T", "-", 
+                    RowBox[{"2", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", "S", " ", "S34"}], "-", 
+                    RowBox[{"S34", " ", "T14"}], "+", 
+                    RowBox[{"T", " ", "T14"}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S", "-", "T24"}], ")"}]}], "+", 
+                    RowBox[{"2", " ", "T", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T"}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T"}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T"}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S", "+", "T14", "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T"}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S", "+", "T14", "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T"}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T"}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT", ",", "MT"}], "]"}]}]}], ")"}]}], "+", 
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "T"}], ")"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"16", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"64", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", "T14"}], "+", "T24", "+", "U"}], 
+                    ")"}]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", "T14"}], "+", 
+                    RowBox[{"5", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "10"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"10", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T14", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"64", " ", 
+                    SuperscriptBox["MT", "6"]}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "+", 
+                    RowBox[{"5", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "+", 
+                    SuperscriptBox["T24", "3"], "+", 
+                    RowBox[{
+                    SuperscriptBox["T14", "2"], " ", "U"}], "+", 
+                    RowBox[{"10", " ", "T14", " ", "T24", " ", "U"}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T24", "2"], " ", "U"}], "+", 
+                    RowBox[{"5", " ", "T14", " ", 
+                    SuperscriptBox["U", "2"]}], "+", 
+                    RowBox[{"3", " ", "T24", " ", 
+                    SuperscriptBox["U", "2"]}], "+", 
+                    SuperscriptBox["U", "3"], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", "T14"}], "-", 
+                    RowBox[{"5", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "10"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    SuperscriptBox["T14", "2"], "+", 
+                    RowBox[{"10", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{"2", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", "T14"}], "+", "T24", "+", "U"}], 
+                    ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "16"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"6", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], ")"}]}], "+", 
+                    RowBox[{"T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["MH", "4"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT", ",", "MT"}], "]"}]}]}], ")"}]}], ")"}], 
+                    "/", 
+                    RowBox[{"(", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}], "2"]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "T"}], ")"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"16", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"4", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "-", 
+                    RowBox[{"4", " ", "T14", " ", "U"}], "+", 
+                    RowBox[{"2", " ", "T24", " ", "U"}], "+", 
+                    SuperscriptBox["U", "2"], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", "T14"}], "+", "T24", "+", "U"}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{"T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], "2"], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T14", "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], ")"}], 
+                    " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T14", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14"}], "+", 
+                    RowBox[{"T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"10", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "5"}], " ", "T14"}], "+", "T24", "+", "U"}], 
+                    ")"}]}]}], ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"64", " ", 
+                    SuperscriptBox["MT", "8"]}], "+", 
+                    RowBox[{"48", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "-", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], ")"}]}], 
+                    "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "3"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", "T14"}], "+", 
+                    RowBox[{"5", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT", ",", "MT"}], "]"}]}]}], ")"}]}], ")"}], 
+                    "/", 
+                    RowBox[{"(", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}], "2"]}], ")"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}]}],
+            ")"}]}], ")"}]}]}]}], "-", 
+     RowBox[{
+      FractionBox["1", 
+       RowBox[{"MW", " ", "SW"}]], 
+      RowBox[{"2", " ", 
+       RowBox[{"(", 
+        RowBox[{
+         SuperscriptBox["Alfas", "2"], " ", "c3", " ", "EL", " ", 
+         SuperscriptBox["MT", "2"], " ", 
+         RowBox[{"(", 
+          RowBox[{
+           RowBox[{"-", 
+            RowBox[{
+             FractionBox["1", 
+              RowBox[{
+               RowBox[{"(", 
+                RowBox[{
+                 SuperscriptBox["MH", "2"], "-", "S", "-", "T", "-", "T14"}], 
+                ")"}], " ", "T24"}]], 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{"8", " ", 
+                  SuperscriptBox["MT", "2"], " ", 
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", "S"}], "-", "S34", "-", 
+                    RowBox[{"2", " ", "T14"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "-", 
+                    RowBox[{"2", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "-", 
+                    RowBox[{"2", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "-", 
+                    RowBox[{"4", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T24"}], "+", 
+                    RowBox[{"T24", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "-", 
+                    RowBox[{"5", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "-", 
+                    RowBox[{"5", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"10", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"3", " ", "T"}], "+", 
+                    RowBox[{"3", " ", "T14"}], "-", "T24"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T24", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24"}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"64", " ", 
+                    SuperscriptBox["MT", "8"]}], "+", 
+                    RowBox[{"48", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"T14", " ", "T24"}], "-", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", "T"}], "-", 
+                    RowBox[{"3", " ", "T14"}], "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", "T14"}], "+", "T24"}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "3"], "+", 
+                    SuperscriptBox["T14", "3"], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"T14", " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "20"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"3", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MH", "4"]}], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"]}], ")"}]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"6", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "20"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"3", " ", "T24"}]}], ")"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24", ",", "MT", ",", "MT", ",", "MT"}], "]"}]}]}], 
+                   ")"}]}], ")"}], "/", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}]}], ")"}], 
+                  " ", 
+                  RowBox[{"Kallen\[Lambda]", "[", 
+                   RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24"}], "]"}]}], ")"}]}], "-", 
+               RowBox[{"2", " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"-", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "S34"}], " ", "T"}], "+", 
+                    RowBox[{"S34", " ", "T14"}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "U"}], ")"}]}], "+", 
+                    RowBox[{"T", " ", "U"}], "+", 
+                    RowBox[{"T14", " ", "U"}], "-", 
+                    RowBox[{"S", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"U", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"S34", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"U", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"S34", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14", "-", 
+                    "T24"}], ")"}], " ", "T24", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"64", " ", 
+                    SuperscriptBox["MT", "8"]}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "+", "T14"}], 
+                    ")"}], "2"], " ", "T24"}], "+", 
+                    RowBox[{"48", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"6", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"6", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "20"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"3", " ", "T24"}]}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "3"], "+", 
+                    SuperscriptBox["T14", "3"], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"T14", " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "28"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"3", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"24", " ", 
+                    SuperscriptBox["MH", "4"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"]}], ")"}]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"6", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "28"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"3", " ", "T24"}]}], ")"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "-", 
+                    "T24"}], ")"}], " ", "T24", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T24", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T", "-", "T14"}], ")"}], 
+                    " ", "T24"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}]}], ")"}]}]}], ")"}], 
+                    " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24", ",", "MT", ",", "MT", ",", "MT"}], "]"}]}]}], 
+                    ")"}]}], ")"}], "/", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14"}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T", "-", "T14"}], ")"}], 
+                    " ", "T24"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}]}], ")"}]}]}], ")"}], 
+                    " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24"}], "]"}]}], ")"}]}], ")"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["S34", "2"]}], "-", 
+                    RowBox[{"4", " ", "S34", " ", "T"}], "+", 
+                    RowBox[{"2", " ", "S34", " ", "T14"}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "U"}], ")"}]}], "+", 
+                    RowBox[{"4", " ", "T", " ", "U"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "U"}], "+", 
+                    SuperscriptBox["U", "2"], "-", 
+                    RowBox[{"2", " ", "S", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"4", " ", "T"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"4", " ", "T"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"32", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", "S34"}], "+", "U"}], ")"}], " ", 
+                    
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", "S34"}], "+", "U"}], ")"}], " ", 
+                    
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MT", "2"]}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "4"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "6"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"3", " ", "T"}], "+", 
+                    RowBox[{"3", " ", "T14"}], "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", 
+                    RowBox[{"3", " ", "T24"}]}], ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"96", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"8", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"3", " ", "T", " ", "T24"}], "+", 
+                    RowBox[{"3", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"10", " ", "T"}], "+", 
+                    RowBox[{"10", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", "T24"}]}], ")"}]}]}], ")"}]}]}], 
+                    ")"}]}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"3", " ", "T"}], "+", 
+                    RowBox[{"3", " ", "T14"}], "-", "T24"}], ")"}], " ", 
+                    "T24"}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"3", " ", "T"}], "+", 
+                    RowBox[{"3", " ", "T14"}], "-", "T24"}], ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "3"]}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"112", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"10", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"48", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}]}], "-", 
+                    SuperscriptBox["T24", "2"]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"128", " ", 
+                    SuperscriptBox["MT", "8"]}], "+", 
+                    RowBox[{"96", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", 
+                    RowBox[{"3", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"6", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"22", " ", "T", " ", "T24"}], "+", 
+                    RowBox[{"22", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"T14", " ", "T24"}], "-", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", "T14"}], "+", "T24"}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "3"], "+", 
+                    SuperscriptBox["T14", "3"], "+", 
+                    RowBox[{"17", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "+", 
+                    RowBox[{"7", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T24", "3"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", "T14"}], "+", 
+                    RowBox[{"17", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"34", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "10"]}], "+", 
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "8"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T", "-", "T14"}], ")"}], 
+                    " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", "T14"}], "-", "T24"}], ")"}]}], "-", 
+                    RowBox[{"T14", " ", "T24"}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T24"}], ")"}], " ", 
+                    "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"6", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"3", " ", "T24"}]}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "3"], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T", "2"], " ", "T14"}], "+", 
+                    SuperscriptBox["T14", "3"], "-", 
+                    RowBox[{"3", " ", "T14", " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"2", " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "-", 
+                    SuperscriptBox["T24", "2"]}], ")"}]}], "+", 
+                    RowBox[{"3", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T24"}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "4"], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["T", "3"], " ", "T14"}], "+", 
+                    SuperscriptBox["T14", "4"], "-", 
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["T24", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "40"}], " ", 
+                    SuperscriptBox["MH", "4"]}], "+", 
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "-", 
+                    RowBox[{"8", " ", "T14", " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "4"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"]}], ")"}]}], "+", 
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T24"}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"4", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T14", "3"], "-", 
+                    RowBox[{"3", " ", "T14", " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T24"}], ")"}]}], "-", 
+                    RowBox[{"2", " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "4"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"]}], ")"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T24", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T", "-", "T14"}], ")"}], 
+                    " ", "T24"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}]}], ")"}]}]}], ")"}], 
+                    " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24"}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MH", "4"], " ", "T24"}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "-", "T24"}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "-", "T24"}], ")"}]}], "-", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "-", 
+                    SuperscriptBox["T24", "2"]}], ")"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T", "-", "T14"}], ")"}], 
+                    " ", "T24"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}]}], ")"}]}]}], ")"}], 
+                    " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24", ",", "MT", ",", "MT", ",", "MT"}], "]"}]}]}], 
+                    ")"}]}], ")"}], "/", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}]}], ")"}], 
+                    " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T", "-", "T14"}], ")"}], 
+                    " ", "T24"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}]}], ")"}]}]}], ")"}], 
+                    " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24"}], "]"}]}], ")"}]}]}], ")"}]}], "-", 
+               RowBox[{"4", " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"-", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "U"}], ")"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"2", " ", "T"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", 
+                    RowBox[{"2", " ", "T"}], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"16", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MH", "8"], " ", 
+                    SuperscriptBox["T24", "2"]}], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "4"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "6"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"176", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"11", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"22", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"11", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"11", " ", "T"}], "+", 
+                    RowBox[{"11", " ", "T14"}], "-", 
+                    RowBox[{"23", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"30", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"30", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"13", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "1408"}], " ", 
+                    SuperscriptBox["MT", "6"]}], "-", 
+                    RowBox[{"17", " ", 
+                    SuperscriptBox["T", "3"]}], "-", 
+                    RowBox[{"17", " ", 
+                    SuperscriptBox["T14", "3"]}], "-", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"61", " ", "T"}], "+", 
+                    RowBox[{"61", " ", "T14"}], "-", 
+                    RowBox[{"30", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "+", 
+                    RowBox[{"19", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "+", 
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["T24", "3"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "51"}], " ", "T14"}], "+", 
+                    RowBox[{"8", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"28", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"56", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"28", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"19", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"19", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"17", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "51"}], " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"16", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"19", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"144", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{"6", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "-", "T24"}], ")"}], " ", 
+                    "T24"}], "+", 
+                    RowBox[{"24", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", "T"}], "+", 
+                    RowBox[{"3", " ", "T14"}], "+", 
+                    RowBox[{"5", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"54", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"55", " ", 
+                    SuperscriptBox["T24", "2"]}], "+", 
+                    RowBox[{"18", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", 
+                    RowBox[{"3", " ", "T24"}]}], ")"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MH", "10"], " ", 
+                    SuperscriptBox["T24", "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "5"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "8"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"176", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"11", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"22", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"11", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"11", " ", "T"}], "+", 
+                    RowBox[{"11", " ", "T14"}], "-", 
+                    RowBox[{"32", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"48", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"48", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"11", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "6"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"400", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"35", " ", "T"}], "+", 
+                    RowBox[{"35", " ", "T14"}], "-", 
+                    RowBox[{"38", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"65", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"65", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"65", " ", "T14"}], "-", 
+                    RowBox[{"58", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"116", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"45", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"10", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "-", "T24"}], ")"}]}], "-", 
+                    RowBox[{"10", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", "T"}], "+", 
+                    RowBox[{"16", " ", "T14"}], "-", 
+                    RowBox[{"11", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "-", "T24"}], ")"}], " ", 
+                    "T24"}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"16", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"9", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"9", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4608", " ", 
+                    SuperscriptBox["MT", "10"]}], "+", 
+                    RowBox[{"1536", " ", 
+                    SuperscriptBox["MT", "8"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", "T"}], "+", 
+                    RowBox[{"3", " ", "T14"}], "+", 
+                    RowBox[{"5", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"64", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"27", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"54", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"27", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"109", " ", "T", " ", "T24"}], "+", 
+                    RowBox[{"109", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"58", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"18", " ", 
+                    SuperscriptBox["T", "3"]}], "+", 
+                    RowBox[{"18", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"147", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "-", 
+                    RowBox[{"130", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "-", 
+                    RowBox[{"93", " ", 
+                    SuperscriptBox["T24", "3"]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"18", " ", "T14"}], "+", 
+                    RowBox[{"49", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"27", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"147", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"65", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T", "4"]}], "+", 
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T14", "4"]}], "+", 
+                    RowBox[{"174", " ", 
+                    SuperscriptBox["T14", "3"], " ", "T24"}], "-", 
+                    RowBox[{"172", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox["T24", "2"]}], "-", 
+                    RowBox[{"254", " ", "T14", " ", 
+                    SuperscriptBox["T24", "3"]}], "-", 
+                    RowBox[{"21", " ", 
+                    SuperscriptBox["T24", "4"]}], "+", 
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["T", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"6", " ", "T14"}], "+", 
+                    RowBox[{"29", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"27", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"261", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"86", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"36", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"522", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "-", 
+                    RowBox[{"344", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "-", 
+                    RowBox[{"254", " ", 
+                    SuperscriptBox["T24", "3"]}]}], ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "19"}], " ", 
+                    SuperscriptBox["T", "4"]}], "-", 
+                    RowBox[{"19", " ", 
+                    SuperscriptBox["T14", "4"]}], "+", 
+                    RowBox[{"14", " ", 
+                    SuperscriptBox["T14", "3"], " ", "T24"}], "+", 
+                    RowBox[{"34", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox["T24", "2"]}], "+", 
+                    RowBox[{"2", " ", "T14", " ", 
+                    SuperscriptBox["T24", "3"]}], "+", 
+                    SuperscriptBox["T24", "4"], "+", 
+                    RowBox[{
+                    SuperscriptBox["T", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "76"}], " ", "T14"}], "+", 
+                    RowBox[{"14", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "114"}], " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"42", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"34", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "76"}], " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"42", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "+", 
+                    RowBox[{"68", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T24", "3"]}]}], ")"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "8"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"36", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"9", " ", "T"}], "+", 
+                    RowBox[{"9", " ", "T14"}], "-", "T24"}], ")"}], " ", 
+                    SuperscriptBox["T24", "2"]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "5"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "6"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"192", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T", "3"]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", "T"}], "+", 
+                    RowBox[{"9", " ", "T14"}], "-", 
+                    RowBox[{"50", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", "T14"}], "-", 
+                    RowBox[{"32", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "-", 
+                    RowBox[{"9", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "+", 
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["T24", "3"]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"64", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"18", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"82", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"82", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"64", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", "T"}], "+", 
+                    RowBox[{"4", " ", "T14"}], "-", 
+                    RowBox[{"11", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "-", "T24"}], ")"}], " ", 
+                    "T24"}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"4", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"9", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"9", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"]}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "512"}], " ", 
+                    SuperscriptBox["MT", "8"]}], "-", 
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["T", "4"]}], "-", 
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["T14", "4"]}], "-", 
+                    RowBox[{"64", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"13", " ", "T"}], "+", 
+                    RowBox[{"13", " ", "T14"}], "-", 
+                    RowBox[{"69", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"26", " ", 
+                    SuperscriptBox["T14", "3"], " ", "T24"}], "+", 
+                    RowBox[{"22", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox["T24", "2"]}], "-", 
+                    RowBox[{"10", " ", "T14", " ", 
+                    SuperscriptBox["T24", "3"]}], "+", 
+                    SuperscriptBox["T24", "4"], "+", 
+                    RowBox[{
+                    SuperscriptBox["T", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "28"}], " ", "T14"}], "+", 
+                    RowBox[{"26", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"27", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"54", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"27", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"164", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"164", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"49", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "42"}], " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"78", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"22", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "28"}], " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"78", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "+", 
+                    RowBox[{"44", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "-", 
+                    RowBox[{"10", " ", 
+                    SuperscriptBox["T24", "3"]}]}], ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"23", " ", 
+                    SuperscriptBox["T", "3"]}], "+", 
+                    RowBox[{"23", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"69", " ", "T14"}], "-", 
+                    RowBox[{"121", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"121", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "-", 
+                    RowBox[{"71", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "+", 
+                    RowBox[{"21", " ", 
+                    SuperscriptBox["T24", "3"]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"69", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"242", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"71", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T24", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"20", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"5", " ", "T"}], "+", 
+                    RowBox[{"5", " ", "T14"}], "-", "T24"}], ")"}]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T", "-", "T14"}], ")"}], 
+                    " ", "T24"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}]}], ")"}]}]}], ")"}], 
+                    " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24"}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T", "-", "T14"}], ")"}], 
+                    " ", "T24"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}]}], ")"}]}]}], ")"}], 
+                    " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"36", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"9", " ", "T"}], "+", 
+                    RowBox[{"9", " ", "T14"}], "-", "T24"}], ")"}], " ", 
+                    "T24"}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "4"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", "T"}], "+", 
+                    RowBox[{"5", " ", "T14"}], "-", 
+                    RowBox[{"21", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "-", 
+                    RowBox[{"2", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"4", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"]}], ")"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"192", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T", "3"]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", "T"}], "+", 
+                    RowBox[{"9", " ", "T14"}], "-", 
+                    RowBox[{"29", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", "T14"}], "-", 
+                    RowBox[{"23", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"23", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "-", 
+                    RowBox[{"13", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "+", 
+                    SuperscriptBox["T24", "3"], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"18", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"52", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"52", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"15", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"46", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"13", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24", ",", "MT", ",", "MT", ",", "MT"}], "]"}]}]}], 
+                    ")"}]}], ")"}], "/", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}]}], ")"}], 
+                    "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T", "-", "T14"}], ")"}], 
+                    " ", "T24"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}]}], ")"}]}]}], ")"}], 
+                    " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24"}], "]"}]}], ")"}]}], ")"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "U"}], ")"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"2", " ", "T"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", 
+                    RowBox[{"2", " ", "T"}], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"16", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MH", "10"], " ", 
+                    SuperscriptBox["T24", "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"3", " ", "T"}], "+", 
+                    RowBox[{"3", " ", "T14"}], "-", "T24"}], ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "5"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "8"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"176", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"11", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"22", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"11", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"11", " ", "T"}], "+", 
+                    RowBox[{"11", " ", "T14"}], "-", 
+                    RowBox[{"24", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"32", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"32", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"11", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"320", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", "T"}], "+", 
+                    RowBox[{"5", " ", "T14"}], "-", "T24"}], ")"}], " ", 
+                    "T24"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"20", " ", "T"}], "+", 
+                    RowBox[{"20", " ", "T14"}], "+", 
+                    RowBox[{"7", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"10", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"20", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"10", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"17", " ", "T", " ", "T24"}], "+", 
+                    RowBox[{"17", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "6"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"464", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"41", " ", "T"}], "+", 
+                    RowBox[{"41", " ", "T14"}], "-", 
+                    RowBox[{"18", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"11", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"14", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"4", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"4", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"6", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"T", " ", "T24"}], "-", 
+                    RowBox[{"T14", " ", "T24"}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4608", " ", 
+                    SuperscriptBox["MT", "10"]}], "+", 
+                    RowBox[{"512", " ", 
+                    SuperscriptBox["MT", "8"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", "T"}], "+", 
+                    RowBox[{"9", " ", "T14"}], "+", 
+                    RowBox[{"25", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"64", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"27", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"54", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"27", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"181", " ", "T", " ", "T24"}], "+", 
+                    RowBox[{"181", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"10", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"18", " ", 
+                    SuperscriptBox["T", "3"]}], "+", 
+                    RowBox[{"18", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"243", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "+", 
+                    RowBox[{"50", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "-", 
+                    RowBox[{"41", " ", 
+                    SuperscriptBox["T24", "3"]}], "+", 
+                    RowBox[{"27", " ", 
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", "T14"}], "+", 
+                    RowBox[{"9", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"54", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"486", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"50", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T", "4"]}], "+", 
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T14", "4"]}], "+", 
+                    RowBox[{"286", " ", 
+                    SuperscriptBox["T14", "3"], " ", "T24"}], "+", 
+                    RowBox[{"140", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox["T24", "2"]}], "-", 
+                    RowBox[{"78", " ", "T14", " ", 
+                    SuperscriptBox["T24", "3"]}], "-", 
+                    RowBox[{"13", " ", 
+                    SuperscriptBox["T24", "4"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["T", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"36", " ", "T14"}], "+", 
+                    RowBox[{"286", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"27", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"429", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"70", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"36", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"858", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "+", 
+                    RowBox[{"280", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "-", 
+                    RowBox[{"78", " ", 
+                    SuperscriptBox["T24", "3"]}]}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"31", " ", 
+                    SuperscriptBox["T", "4"]}], "+", 
+                    RowBox[{"31", " ", 
+                    SuperscriptBox["T14", "4"]}], "+", 
+                    RowBox[{"30", " ", 
+                    SuperscriptBox["T14", "3"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox["T24", "2"]}], "+", 
+                    RowBox[{"2", " ", "T14", " ", 
+                    SuperscriptBox["T24", "3"]}], "-", 
+                    SuperscriptBox["T24", "4"], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"62", " ", "T14"}], "+", 
+                    RowBox[{"15", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"93", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"45", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"62", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"45", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "+", 
+                    SuperscriptBox["T24", "3"]}], ")"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MH", "8"], " ", 
+                    SuperscriptBox["T24", "2"]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"4", " ", "T"}], "+", 
+                    RowBox[{"4", " ", "T14"}], "-", 
+                    RowBox[{"5", " ", "T24"}]}], ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "4"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "6"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"176", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"11", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"22", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"11", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"11", " ", "T"}], "+", 
+                    RowBox[{"11", " ", "T14"}], "-", 
+                    RowBox[{"25", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"34", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"34", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"13", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"144", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", "T"}], "+", 
+                    RowBox[{"5", " ", "T14"}], "-", 
+                    RowBox[{"6", " ", "T24"}]}], ")"}], " ", "T24"}], "+", 
+                    RowBox[{"72", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"18", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"38", " ", "T", " ", "T24"}], "+", 
+                    RowBox[{"38", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"55", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"672", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["T", "3"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"29", " ", "T"}], "+", 
+                    RowBox[{"29", " ", "T14"}], "-", 
+                    RowBox[{"20", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"24", " ", "T14"}], "-", 
+                    RowBox[{"7", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "-", 
+                    RowBox[{"10", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T24", "3"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"53", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"106", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"53", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"54", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"54", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"35", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"7", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "8"], " ", 
+                    SuperscriptBox["T24", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"36", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"9", " ", "T"}], "+", 
+                    RowBox[{"9", " ", "T14"}], "+", "T24"}], ")"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"48", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"6", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", "T"}], "+", 
+                    RowBox[{"3", " ", "T14"}], "-", 
+                    RowBox[{"7", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"14", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"14", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "6"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"192", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T", "3"]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", "T"}], "+", 
+                    RowBox[{"9", " ", "T14"}], "-", 
+                    RowBox[{"58", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", "T14"}], "-", 
+                    RowBox[{"40", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"40", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "-", 
+                    RowBox[{"17", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "-", 
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["T24", "3"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"18", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"98", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"98", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"19", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"80", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"17", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "1536"}], " ", 
+                    SuperscriptBox["MT", "8"]}], "-", 
+                    RowBox[{"11", " ", 
+                    SuperscriptBox["T", "4"]}], "-", 
+                    RowBox[{"11", " ", 
+                    SuperscriptBox["T14", "4"]}], "-", 
+                    RowBox[{"64", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"29", " ", "T"}], "+", 
+                    RowBox[{"29", " ", "T14"}], "-", 
+                    RowBox[{"115", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"50", " ", 
+                    SuperscriptBox["T14", "3"], " ", "T24"}], "+", 
+                    RowBox[{"56", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox["T24", "2"]}], "+", 
+                    RowBox[{"26", " ", "T14", " ", 
+                    SuperscriptBox["T24", "3"]}], "-", 
+                    SuperscriptBox["T24", "4"], "+", 
+                    RowBox[{
+                    SuperscriptBox["T", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "44"}], " ", "T14"}], "+", 
+                    RowBox[{"50", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"51", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"102", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"51", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"280", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"280", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"95", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "66"}], " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"150", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"56", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "44"}], " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"150", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "+", 
+                    RowBox[{"112", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "+", 
+                    RowBox[{"26", " ", 
+                    SuperscriptBox["T24", "3"]}]}], ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"39", " ", 
+                    SuperscriptBox["T", "3"]}], "+", 
+                    RowBox[{"39", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"117", " ", "T14"}], "-", 
+                    RowBox[{"215", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"215", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "-", 
+                    RowBox[{"151", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "-", 
+                    RowBox[{"37", " ", 
+                    SuperscriptBox["T24", "3"]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"117", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"430", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"151", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "8"]}], "+", 
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"6", " ", "T"}], "+", 
+                    RowBox[{"6", " ", "T14"}], "-", 
+                    RowBox[{"7", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"6", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"2", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"37", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", "T14"}], "-", 
+                    RowBox[{"8", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"16", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T", "3"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"13", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "-", 
+                    RowBox[{"106", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "-", 
+                    SuperscriptBox["T24", "3"], "+", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"6", " ", "T14"}], "+", 
+                    RowBox[{"13", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"13", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"53", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T24", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "64"}], " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["T", "2"]}], "-", 
+                    RowBox[{"8", " ", "T", " ", "T14"}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"3", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"3", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"20", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"5", " ", "T"}], "+", 
+                    RowBox[{"5", " ", "T14"}], "+", "T24"}], ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"8", " ", "T"}], "+", 
+                    RowBox[{"8", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", "T24"}]}], ")"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T", "-", "T14"}], ")"}], 
+                    " ", "T24"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}]}], ")"}]}]}], ")"}], 
+                    " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24"}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T", "-", "T14"}], ")"}], 
+                    " ", "T24"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}]}], ")"}]}]}], ")"}], 
+                    " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", "T"}], "+", 
+                    RowBox[{"4", " ", "T14"}], "-", 
+                    RowBox[{"6", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "-", 
+                    RowBox[{"2", " ", "T24"}]}], ")"}]}]}], ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "3"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "6"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"36", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"9", " ", "T"}], "+", 
+                    RowBox[{"9", " ", "T14"}], "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"192", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T", "3"]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", "T"}], "+", 
+                    RowBox[{"9", " ", "T14"}], "-", 
+                    RowBox[{"37", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", "T14"}], "-", 
+                    RowBox[{"31", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"31", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "-", 
+                    RowBox[{"19", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "-", 
+                    SuperscriptBox["T24", "3"], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"62", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"19", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"18", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"68", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"68", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"17", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"320", " ", 
+                    SuperscriptBox["MT", "8"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T", "4"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T14", "4"]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"23", " ", "T"}], "+", 
+                    RowBox[{"23", " ", "T14"}], "-", 
+                    RowBox[{"37", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["T", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"8", " ", "T14"}], "-", 
+                    RowBox[{"6", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["T14", "3"], " ", "T24"}], "-", 
+                    RowBox[{"10", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox["T24", "2"]}], "-", 
+                    RowBox[{"3", " ", "T14", " ", 
+                    SuperscriptBox["T24", "3"]}], "-", 
+                    SuperscriptBox["T24", "4"], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"39", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"78", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"39", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"98", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"98", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"45", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"9", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["T14", "3"]}], "-", 
+                    RowBox[{"18", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "-", 
+                    RowBox[{"20", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T24", "3"]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"29", " ", 
+                    SuperscriptBox["T", "3"]}], "+", 
+                    RowBox[{"29", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"87", " ", "T14"}], "-", 
+                    RowBox[{"85", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"85", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "-", 
+                    RowBox[{"85", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "-", 
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["T24", "3"]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"87", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"170", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"85", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24", ",", "MT", ",", "MT", ",", "MT"}], "]"}]}]}], 
+                    ")"}]}], ")"}], "/", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}]}], ")"}], 
+                    "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T", "-", "T14"}], ")"}], 
+                    " ", "T24"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}]}], ")"}]}]}], ")"}], 
+                    " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24"}], "]"}]}], ")"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["S34", "2"]}], "-", 
+                    RowBox[{"2", " ", "S34", " ", "T"}], "-", 
+                    RowBox[{"S34", " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"2", " ", "S", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", "S34"}], "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", "S"}], "+", 
+                    RowBox[{"3", " ", "S34"}], "-", 
+                    RowBox[{"2", " ", "T14"}], "-", 
+                    RowBox[{"3", " ", "U"}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", "T", " ", "U"}], "+", 
+                    RowBox[{"4", " ", "T14", " ", "U"}], "+", 
+                    RowBox[{"T24", " ", "U"}], "+", 
+                    SuperscriptBox["U", "2"]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T24", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T24", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T24", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T24", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T24", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S34"}], "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", "S34"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", "U", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", "S34", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"S34", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"U", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", "U", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14"}]], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "8"]}], "+", 
+                    RowBox[{"192", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"48", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "5"}], " ", 
+                    SuperscriptBox["T", "2"]}], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"4", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", "T"}], "+", 
+                    RowBox[{"3", " ", "T14"}], "+", "T24"}], ")"}]}], "-", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", "T14"}], "+", 
+                    RowBox[{"2", " ", "T24"}]}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "3"], "+", 
+                    SuperscriptBox["T14", "3"], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"T14", " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "14"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"3", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["MH", "4"]}], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"]}], ")"}]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"6", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "14"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"3", " ", "T24"}]}], ")"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], ")"}], "/", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T", "-", "T14"}], ")"}], 
+                    " ", "T24"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}]}], ")"}]}]}], ")"}], 
+                    " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24"}], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "10"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"3", " ", "T"}], "+", 
+                    RowBox[{"3", " ", "T14"}], "-", "T24"}], ")"}], " ", 
+                    "T24"}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "8"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"464", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"19", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"38", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"19", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"24", " ", "T"}], "+", 
+                    RowBox[{"24", " ", "T14"}], "-", "T24"}], ")"}]}], "-", 
+                    RowBox[{"4", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"4", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"]}], ")"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"40", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}], "2"], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"7", " ", "T"}], "+", 
+                    RowBox[{"7", " ", "T14"}], "+", "T24"}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"832", " ", 
+                    SuperscriptBox["MT", "8"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}], "3"], " ", "T24"}], "+", 
+                    RowBox[{"48", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"11", " ", "T"}], "+", 
+                    RowBox[{"11", " ", "T14"}], "+", 
+                    RowBox[{"10", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"14", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"26", " ", "T", " ", "T24"}], "+", 
+                    RowBox[{"26", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"27", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"54", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"27", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"52", " ", "T", " ", "T24"}], "+", 
+                    RowBox[{"52", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "8"]}], "+", 
+                    RowBox[{"192", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", 
+                    RowBox[{"17", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"14", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    SuperscriptBox["T24", "2"]}], ")"}]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"6", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"119", " ", "T", " ", "T24"}], "+", 
+                    RowBox[{"119", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"13", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "3"], "+", 
+                    SuperscriptBox["T14", "3"], "+", 
+                    RowBox[{"89", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "+", 
+                    RowBox[{"9", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "+", 
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["T24", "3"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", "T14"}], "+", 
+                    RowBox[{"89", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"178", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3584", " ", 
+                    SuperscriptBox["MT", "10"]}], "+", 
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "8"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"13", " ", "T"}], "+", 
+                    RowBox[{"13", " ", "T14"}], "+", 
+                    RowBox[{"40", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}], "2"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"18", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"4", " ", "T", " ", "T24"}], "+", 
+                    RowBox[{"4", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"128", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"18", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"60", " ", "T", " ", "T24"}], "+", 
+                    RowBox[{"60", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"14", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"11", " ", 
+                    SuperscriptBox["T", "3"]}], "+", 
+                    RowBox[{"11", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"129", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "+", 
+                    RowBox[{"51", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["T24", "3"]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"11", " ", "T14"}], "+", 
+                    RowBox[{"43", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"3", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"11", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"86", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"17", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T", "4"]}], "+", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T14", "4"]}], "+", 
+                    RowBox[{"116", " ", 
+                    SuperscriptBox["T14", "3"], " ", "T24"}], "+", 
+                    RowBox[{"54", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox["T24", "2"]}], "+", 
+                    RowBox[{"28", " ", "T14", " ", 
+                    SuperscriptBox["T24", "3"]}], "+", 
+                    SuperscriptBox["T24", "4"], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["T", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", "T14"}], "+", 
+                    RowBox[{"29", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"58", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"87", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "+", 
+                    RowBox[{"27", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "+", 
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["T24", "3"]}]}], ")"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], ")"}], "/", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], "+", 
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}], "2"], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14"}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T", "-", "T14"}], ")"}], 
+                    " ", "T24"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}]}], ")"}]}]}], ")"}], 
+                    " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24"}], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "10"]}], "+", 
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "8"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "-", "T24"}], ")"}], "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T24"}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}], "2"]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"6", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"6", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"3", " ", "T24"}]}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "4"], "+", 
+                    SuperscriptBox["T14", "4"], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["T14", "3"], " ", "T24"}], "+", 
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"4", " ", "T14", " ", "T24", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T24"}], ")"}], "2"]}], 
+                    "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["T", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["T24", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "32"}], " ", 
+                    SuperscriptBox["MH", "4"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"]}], ")"}]}], "+", 
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T14", "2"], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T24"}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"4", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T14", "3"], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "+", 
+                    RowBox[{"3", " ", "T14", " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"T24", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T24"}], ")"}], 
+                    "2"]}]}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "3"], "+", 
+                    SuperscriptBox["T14", "3"], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "+", 
+                    RowBox[{"3", " ", "T14", " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "4"]}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"]}], ")"}]}], "+", 
+                    RowBox[{"3", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T14", "2"], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T24"}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T24", ",", "MT", ",", "MT"}], "]"}]}], ")"}], 
+                    "/", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T", "-", "T14"}], ")"}], 
+                    " ", "T24"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}]}], ")"}]}]}], ")"}], 
+                    " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24"}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox["T", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", "T14"}], "+", 
+                    SuperscriptBox["T14", "2"], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"8", " ", "T"}], "+", 
+                    RowBox[{"8", " ", "T14"}], "-", 
+                    RowBox[{"4", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "-", 
+                    RowBox[{"T", " ", "T24"}], "-", 
+                    RowBox[{"T14", " ", "T24"}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}], " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24", ",", "MT", ",", "MT", ",", "MT"}], "]"}]}], ")"}], 
+                    "/", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24"}], "]"}]}]}], ")"}]}], ")"}], "/", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], ")"}]}]}], "+", 
+           RowBox[{
+            FractionBox["1", 
+             RowBox[{"T14", " ", 
+              RowBox[{"(", 
+               RowBox[{
+                SuperscriptBox["MH", "2"], "-", "S", "-", "T24", "-", "U"}], 
+               ")"}]}]], 
+            RowBox[{"(", 
+             RowBox[{
+              RowBox[{"-", 
+               RowBox[{"(", 
+                RowBox[{
+                 RowBox[{"(", 
+                  RowBox[{"8", " ", 
+                   SuperscriptBox["MT", "2"], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", "S"}], "-", "S34", "+", "T", "-", 
+                    RowBox[{"2", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"4", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "-", 
+                    RowBox[{"4", " ", "T14", " ", "U"}], "+", 
+                    RowBox[{"2", " ", "T24", " ", "U"}], "+", 
+                    SuperscriptBox["U", "2"], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", "T14"}], "+", "T24", "+", "U"}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{"T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], "2"], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T14", "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], ")"}], 
+                    " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T14", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14"}], "+", 
+                    RowBox[{"T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"10", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "5"}], " ", "T14"}], "+", "T24", "+", "U"}], 
+                    ")"}]}]}], ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}]}], 
+                    "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"64", " ", 
+                    SuperscriptBox["MT", "8"]}], "+", 
+                    RowBox[{"48", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "-", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], ")"}]}], 
+                    "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "3"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", "T14"}], "+", 
+                    RowBox[{"5", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT", ",", "MT"}], "]"}]}]}], ")"}]}], ")"}], 
+                 "/", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}], " ", 
+                   RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}]}], 
+                    "]"}]}], ")"}]}], ")"}]}], "+", 
+              RowBox[{
+               RowBox[{"(", 
+                RowBox[{"8", " ", 
+                 SuperscriptBox["MT", "2"], " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", "S", " ", "S34"}], "-", 
+                    SuperscriptBox["S34", "2"], "+", 
+                    SuperscriptBox["T", "2"], "+", 
+                    RowBox[{"2", " ", "S34", " ", "T14"}], "-", 
+                    RowBox[{"2", " ", "T", " ", "T14"}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", "S"}], "-", "S34", "+", "T", "-", 
+                    RowBox[{"2", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"4", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"2", " ", "S34", " ", "U"}], "+", 
+                    RowBox[{"2", " ", "T", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                   RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T"}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                   RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T"}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                   RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T"}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"3", " ", "S34"}], "-", 
+                    RowBox[{"3", " ", "T"}], "-", 
+                    RowBox[{"4", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T"}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"3", " ", "S34"}], "-", 
+                    RowBox[{"3", " ", "T"}], "-", 
+                    RowBox[{"4", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                   RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T"}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                   RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T"}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                   RowBox[{"32", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                   RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   FractionBox[
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T14", "+", "T24", "+", 
+                    "U"}], 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U"}]], "-", 
+                   RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "10"]}], "+", 
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "8"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "3"], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], ")"}]}], 
+                    "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "5"}], " ", "T14"}], "+", "T24", "+", "U"}], 
+                    ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "4"], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"2", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14"}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"T14", "-", "T24", "-", "U"}], ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"6", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], ")"}], "/", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T24", "-", "U"}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "8"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}]}], 
+                    "]"}]}], ")"}]}], "+", 
+                   RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "8"]}], "+", 
+                    RowBox[{"192", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"48", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"4", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], ")"}]}], 
+                    "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "3"], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", "T14"}], "+", 
+                    RowBox[{"7", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T14", ",", "MT", ",", "MT"}], "]"}]}], ")"}], 
+                    "/", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T24", "-", "U"}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "8"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}]}], 
+                    "]"}]}], ")"}]}], "+", 
+                   RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "10"], " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "8"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"28", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "20"}], " ", "T14"}], "+", "T24", "+", "U"}],
+                     ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "6"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "256"}], " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"72", " ", "T14"}], "-", 
+                    RowBox[{"11", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"14", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"52", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "-", 
+                    
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "5"}], " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"12", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"160", " ", 
+                    SuperscriptBox["MT", "6"]}], "-", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"7", " ", "T14"}], "-", 
+                    RowBox[{"6", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"22", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"9", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"4", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "10"]}], "+", 
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "8"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", "T14"}], "+", "T24", "+", "U"}], 
+                    ")"}]}], "-", 
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"115", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"36", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "-", 
+                    
+                    RowBox[{"T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"15", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"20", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "-", 
+                    
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"49", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"129", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"24", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "11"}], " ", 
+                    SuperscriptBox["T14", "4"]}], "-", 
+                    RowBox[{"232", " ", 
+                    SuperscriptBox["T14", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"366", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"56", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "4"]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3072", " ", 
+                    SuperscriptBox["MT", "12"]}], "+", 
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "10"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"11", " ", "T14"}], "+", 
+                    RowBox[{"14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{"128", " ", 
+                    SuperscriptBox["MT", "8"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"45", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"22", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"13", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{"T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "5"}], " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"4", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], ")"}]}], "-", 
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"61", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"134", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"35", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "-", 
+                    RowBox[{"12", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}]}], ")"}]}], "-", 
+                    
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"25", " ", 
+                    SuperscriptBox["T14", "4"]}], "+", 
+                    RowBox[{"236", " ", 
+                    SuperscriptBox["T14", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"282", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "-", 
+                    RowBox[{"56", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "-", 
+                    RowBox[{"11", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "4"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["T14", "5"]}], "-", 
+                    RowBox[{"18", " ", 
+                    SuperscriptBox["T14", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"134", " ", 
+                    SuperscriptBox["T14", "3"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "-", 
+                    RowBox[{"120", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "+", 
+                    RowBox[{"23", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "4"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "5"]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], ")"}], "/", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], "+", 
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U"}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T24", "-", "U"}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "8"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}]}], 
+                    "]"}]}], ")"}]}], "+", 
+                   RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"2", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], "2"], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], ")"}], 
+                    " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT", ",", "MT"}], "]"}]}], ")"}], "/", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}]}], 
+                    "]"}]}]}], ")"}]}], ")"}], "/", 
+               RowBox[{"(", 
+                RowBox[{
+                 RowBox[{"16", " ", 
+                  SuperscriptBox["MT", "4"]}], "-", 
+                 RowBox[{"4", " ", 
+                  SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                 RowBox[{"8", " ", 
+                  SuperscriptBox["MT", "2"], " ", 
+                  RowBox[{"(", 
+                   RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                 SuperscriptBox[
+                  RowBox[{"(", 
+                   RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                ")"}]}], "-", 
+              RowBox[{
+               RowBox[{"(", 
+                RowBox[{"16", " ", 
+                 SuperscriptBox["MT", "2"], " ", "T14", " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                   RowBox[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                   RowBox[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                   RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", "S"}], "-", "S34", "+", "T", "-", 
+                    RowBox[{"2", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], ")"}], " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   FractionBox[
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U"}]], "+", 
+                   RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "8"]}], "+", 
+                    RowBox[{"192", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"48", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"4", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], ")"}]}], 
+                    "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "3"], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", "T14"}], "+", 
+                    RowBox[{"7", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], ")"}], "/", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T24", "-", "U"}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "8"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}]}], 
+                    "]"}]}], ")"}]}], "-", 
+                   RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "10"]}], "+", 
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "8"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14"}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", "T14"}], "+", "T24", "+", "U"}], ")"}], 
+                    "2"]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "3"], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], ")"}]}], 
+                    "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", "T14"}], "+", "T24", "+", "U"}], 
+                    ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "4"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T14", "2"], "+", 
+                    RowBox[{"4", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T14", ",", "MT", ",", "MT"}], "]"}]}], ")"}], 
+                    "/", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T24", "-", "U"}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "8"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}]}], 
+                    "]"}]}], ")"}]}], "-", 
+                   RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "10"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T14", "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "8"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"464", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"4", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"19", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "-", 
+                    RowBox[{"24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], ")"}]}], 
+                    "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"40", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", 
+                    RowBox[{"7", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], ")"}]}], 
+                    "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"832", " ", 
+                    SuperscriptBox["MT", "8"]}], "+", 
+                    RowBox[{"T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "+", 
+                    RowBox[{"48", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"10", " ", "T14"}], "+", 
+                    RowBox[{"11", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"26", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"7", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"52", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"27", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "8"]}], "+", 
+                    RowBox[{"192", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"17", " ", "T14"}], "+", "T24", "+", "U"}], 
+                    ")"}]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"13", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"119", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{"3", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T14", "2"], "+", 
+                    RowBox[{"7", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"89", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3584", " ", 
+                    SuperscriptBox["MT", "10"]}], "+", 
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "8"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"40", " ", "T14"}], "+", 
+                    RowBox[{"13", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"4", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"9", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{"128", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"14", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"60", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"9", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"51", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"129", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"11", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T14", "4"], "+", 
+                    RowBox[{"28", " ", 
+                    SuperscriptBox["T14", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"54", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"116", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "+", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "4"]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], ")"}], "/", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], "+", 
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U"}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T24", "-", "U"}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "8"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}]}], 
+                    "]"}]}], ")"}]}], "+", 
+                   RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "-", 
+                    RowBox[{"T14", " ", "U"}], "+", 
+                    RowBox[{"2", " ", "T24", " ", "U"}], "+", 
+                    SuperscriptBox["U", "2"], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", "T14"}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], ")"}], 
+                    " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT", ",", "MT"}], "]"}]}], ")"}], "/", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}]}], 
+                    "]"}]}]}], ")"}]}], ")"}], "/", 
+               RowBox[{"(", 
+                RowBox[{
+                 RowBox[{"16", " ", 
+                  SuperscriptBox["MT", "4"]}], "-", 
+                 RowBox[{"4", " ", 
+                  SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                 RowBox[{"8", " ", 
+                  SuperscriptBox["MT", "2"], " ", 
+                  RowBox[{"(", 
+                   RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                 SuperscriptBox[
+                  RowBox[{"(", 
+                   RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                ")"}]}], "-", 
+              RowBox[{"2", " ", 
+               RowBox[{"(", 
+                RowBox[{
+                 RowBox[{"-", 
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U", "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", "S"}], "-", "S34", "+", "T", "-", 
+                    RowBox[{"2", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], ")"}]}], ")"}], "/", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U"}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U"}], 
+                    ")"}]}], ")"}]}], ")"}]}], "-", 
+                 RowBox[{
+                  RowBox[{"(", 
+                   RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", "S", " ", "S34"}], "-", 
+                    RowBox[{"S34", " ", "T14"}], "+", 
+                    RowBox[{"T", " ", "T14"}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S", "-", "T24"}], ")"}]}], "+", 
+                    RowBox[{"2", " ", "T", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T"}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T"}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T"}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S", "+", "T14", "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T"}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S", "+", "T14", "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T"}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T"}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T14", "-", "T24", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T14", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"64", " ", 
+                    SuperscriptBox["MT", "8"]}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T24", "+", "U"}], 
+                    ")"}], "2"]}], "+", 
+                    RowBox[{"48", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "20"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"24", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "3"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", 
+                    RowBox[{"7", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T24", "-", "U"}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "8"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT", ",", "MT"}], "]"}]}]}], ")"}]}], ")"}], 
+                  "/", 
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U"}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T24", "-", "U"}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "8"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}]}], 
+                    "]"}]}], ")"}]}]}], ")"}]}], "+", 
+              RowBox[{"4", " ", 
+               RowBox[{"(", 
+                RowBox[{
+                 RowBox[{
+                  RowBox[{"(", 
+                   RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "T"}], ")"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"16", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U"}]], 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14"}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"6", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", "T14"}], "+", "T24", "+", "U"}], 
+                    ")"}]}]}], ")"}]}]}], ")"}]}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"1024", " ", 
+                    SuperscriptBox["MT", "12"]}], "-", 
+                    RowBox[{"1280", " ", 
+                    SuperscriptBox["MT", "10"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "-", "T24", "-", "U"}], ")"}]}], "+", 
+                    RowBox[{"128", " ", 
+                    SuperscriptBox["MT", "8"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "-", 
+                    RowBox[{"15", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"10", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14"}], "-", 
+                    RowBox[{"5", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", "T14"}], "-", "T24", "-", "U"}], ")"}], 
+                    " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"19", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", "T14"}], "+", "T24", "+", "U"}], 
+                    ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"7", " ", "T14"}], "-", "T24", "-", "U"}], ")"}], 
+                    " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "3"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"55", " ", "T14"}], "-", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"91", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"130", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"15", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", "T14"}], "+", 
+                    RowBox[{"13", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"10", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "5"}], " ", 
+                    SuperscriptBox["T14", "3"]}], "-", 
+                    RowBox[{"27", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"33", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"104", " ", 
+                    SuperscriptBox["MH", "6"], " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", "T14"}], "-", "T24", "-", "U"}], ")"}], 
+                    " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "4"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"37", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"88", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"39", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"127", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"89", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], ")"}], "/", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T24", "-", "U"}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "8"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}]}], 
+                    "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"2", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "12"}], " ", 
+                    SuperscriptBox["MH", "8"], " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], "5"]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"40", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", "T14"}], "+", 
+                    RowBox[{"10", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], ")"}]}], 
+                    "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "6"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"96", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"9", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"6", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "60"}], " ", "T14"}], "+", 
+                    RowBox[{"48", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], ")"}]}], 
+                    "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"608", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    SuperscriptBox["T14", "3"], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"6", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "64"}], " ", "T14"}], "+", 
+                    RowBox[{"400", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"25", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"8", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"43", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T14", ",", "MT", ",", "MT"}], "]"}]}], ")"}], 
+                    "/", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T24", "-", "U"}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "8"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}]}], 
+                    "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "12"], " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"52", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", 
+                    RowBox[{"3", " ", "T14"}], "+", 
+                    RowBox[{"13", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], "5"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{"T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", "T14"}], "+", "T24", "+", "U"}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T14", "2"], "+", 
+                    RowBox[{"14", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "10"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"64", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"97", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2320"}], " ", "T14"}], "+", 
+                    RowBox[{"48", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"242", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"512", " ", 
+                    SuperscriptBox["MT", "10"]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "-", 
+                    RowBox[{"64", " ", 
+                    SuperscriptBox["MT", "8"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"46", " ", "T14"}], "-", 
+                    RowBox[{"7", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"26", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"114", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"9", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "-", 
+                    
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"45", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"90", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["T14", "3"]}], "-", 
+                    RowBox[{"23", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"22", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "8"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"128", " ", 
+                    SuperscriptBox["MT", "8"]}], "+", 
+                    SuperscriptBox["T14", "4"], "+", 
+                    RowBox[{"96", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"203", " ", "T14"}], "-", "T24", "-", "U"}], 
+                    ")"}]}], "-", 
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["T14", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"30", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"136", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "4"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"157", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"1446", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"15", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "-", 
+                    
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"33", " ", 
+                    SuperscriptBox["T14", "3"]}], "-", 
+                    RowBox[{"205", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"1109", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"17", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"1024", " ", 
+                    SuperscriptBox["MT", "12"]}], "-", 
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "10"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"51", " ", "T14"}], "-", 
+                    RowBox[{"5", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{"128", " ", 
+                    SuperscriptBox["MT", "8"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"609", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"87", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "-", 
+                    
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"381", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"1892", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"102", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}]}], ")"}]}], "-", 
+                    
+                    RowBox[{"T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "4"]}], "-", 
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["T14", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"48", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"86", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "4"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T14", "4"], "-", 
+                    RowBox[{"1566", " ", 
+                    SuperscriptBox["T14", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"4258", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "-", 
+                    RowBox[{"78", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "+", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "4"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "19"}], " ", 
+                    SuperscriptBox["T14", "5"]}], "+", 
+                    RowBox[{"43", " ", 
+                    SuperscriptBox["T14", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"996", " ", 
+                    SuperscriptBox["T14", "3"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "-", 
+                    RowBox[{"2036", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "+", 
+                    RowBox[{"15", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "4"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "5"]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "12288"}], " ", 
+                    SuperscriptBox["MT", "14"]}], "+", 
+                    RowBox[{"1024", " ", 
+                    SuperscriptBox["MT", "12"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"80", " ", "T14"}], "-", 
+                    RowBox[{"17", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "10"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"621", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"361", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"40", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{"128", " ", 
+                    SuperscriptBox["MT", "8"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"325", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"1187", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"320", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "-", 
+                    RowBox[{"25", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"157", " ", 
+                    SuperscriptBox["T14", "4"]}], "+", 
+                    RowBox[{"1832", " ", 
+                    SuperscriptBox["T14", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"3484", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"550", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "-", 
+                    RowBox[{"35", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "4"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{"T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "4"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["T14", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"24", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"22", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "4"]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"46", " ", 
+                    SuperscriptBox["T14", "5"]}], "+", 
+                    RowBox[{"263", " ", 
+                    SuperscriptBox["T14", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"1810", " ", 
+                    SuperscriptBox["T14", "3"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"2418", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "+", 
+                    RowBox[{"220", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "4"]}], "-", 
+                    RowBox[{"13", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "5"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T14", "6"], "+", 
+                    RowBox[{"43", " ", 
+                    SuperscriptBox["T14", "5"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"122", " ", 
+                    SuperscriptBox["T14", "4"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"724", " ", 
+                    SuperscriptBox["T14", "3"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "+", 
+                    RowBox[{"775", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "4"]}], "+", 
+                    RowBox[{"25", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "5"]}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "6"]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], ")"}], "/", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], "+", 
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U"}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T24", "-", "U"}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "8"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}]}], 
+                    "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "10"]}], "+", 
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "8"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "3"], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", "T14"}], "+", 
+                    RowBox[{"5", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], ")"}]}], 
+                    "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "4"], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", "T14"}], "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"14", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"19", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14"}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"T14", "-", "T24", "-", "U"}], ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T14", "2"], "+", 
+                    RowBox[{"T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT", ",", "MT"}], "]"}]}], ")"}], "/", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}]}], 
+                    "]"}]}]}], ")"}]}], ")"}], "/", 
+                  SuperscriptBox[
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}], "2"]}], "+", 
+                 RowBox[{
+                  RowBox[{"(", 
+                   RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "T"}], ")"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"16", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U"}]], 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"64", " ", 
+                    SuperscriptBox["MT", "6"]}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "+", 
+                    RowBox[{"9", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "+", 
+                    SuperscriptBox["T24", "3"], "+", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T14", "2"], " ", "U"}], "+", 
+                    RowBox[{"18", " ", "T14", " ", "T24", " ", "U"}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T24", "2"], " ", "U"}], "+", 
+                    RowBox[{"9", " ", "T14", " ", 
+                    SuperscriptBox["U", "2"]}], "+", 
+                    RowBox[{"3", " ", "T24", " ", 
+                    SuperscriptBox["U", "2"]}], "+", 
+                    SuperscriptBox["U", "3"], "+", 
+                    RowBox[{"48", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", "T14"}], "+", "T24", "+", "U"}], 
+                    ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "-", 
+                    RowBox[{"7", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "14"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"18", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}]}], 
+                    ")"}]}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4096", " ", 
+                    SuperscriptBox["MT", "14"]}], "+", 
+                    RowBox[{"2048", " ", 
+                    SuperscriptBox["MT", "12"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "8"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], " ", "T14"}], "+", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", "T14"}], "+", "T24", "+", "U"}], 
+                    ")"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"25", " ", "T14"}], "+", 
+                    RowBox[{"27", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], ")"}]}], 
+                    "-", 
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "10"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"26", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "-", 
+                    RowBox[{"5", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"10", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"8", " ", "T14"}], "+", "T24", "+", "U"}], 
+                    ")"}]}], "+", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"11", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"34", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"83", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"43", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "5"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", "T14"}], "+", "T24", "+", "U"}], 
+                    ")"}]}], "+", 
+                    RowBox[{"48", " ", 
+                    SuperscriptBox["MH", "6"], " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"10", " ", "T14"}], "-", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"56", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"21", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "-", 
+                    
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"14", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"21", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"36", " ", 
+                    SuperscriptBox["MH", "6"], " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"13", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"15", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"17", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"84", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"99", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"32", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"64", " ", 
+                    SuperscriptBox["MH", "6"], " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"12", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "-", 
+                    
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"5", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["T14", "4"]}], "+", 
+                    RowBox[{"26", " ", 
+                    SuperscriptBox["T14", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "-", 
+                    RowBox[{"26", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "4"]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], ")"}], "/", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T24", "-", "U"}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "8"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}]}], 
+                    "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], "4"]}], "-", 
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["MH", "6"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"20", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", 
+                    RowBox[{"5", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"104", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", "T14"}], "+", 
+                    RowBox[{"10", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"86", " ", "T14"}], "+", 
+                    RowBox[{"26", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], ")"}]}], 
+                    "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"1040", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"28", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"39", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"19", " ", "T14"}], "+", 
+                    RowBox[{"52", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T14", ",", "MT", ",", "MT"}], "]"}]}], ")"}], 
+                    "/", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T24", "-", "U"}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "8"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}]}], 
+                    "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"64", " ", 
+                    SuperscriptBox["MH", "12"], " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "10"], " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"144", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"27", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"130", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"9", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "744"}], " ", "T14"}], "+", 
+                    RowBox[{"72", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], ")"}]}], 
+                    "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "8"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "8"]}], "-", 
+                    RowBox[{"17", " ", 
+                    SuperscriptBox["T14", "4"]}], "-", 
+                    RowBox[{"190", " ", 
+                    SuperscriptBox["T14", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"400", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"62", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "4"], "+", 
+                    RowBox[{"128", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"43", " ", "T14"}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"404", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"117", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "-", 
+                    
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"159", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"580", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"105", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"640", " ", 
+                    SuperscriptBox["MT", "8"]}], "+", 
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"27", " ", "T14"}], "+", 
+                    RowBox[{"17", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{"24", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"19", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"22", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"7", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["T14", "3"]}], "-", 
+                    RowBox[{"15", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"6", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "7"}], " ", 
+                    SuperscriptBox["T14", "3"]}], "-", 
+                    RowBox[{"87", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"51", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"11", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "6"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9728", " ", 
+                    SuperscriptBox["MT", "10"]}], "+", 
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "8"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"148", " ", "T14"}], "+", 
+                    RowBox[{"41", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{"192", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"273", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"172", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"23", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "-", 
+                    
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"326", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"905", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"333", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "-", 
+                    RowBox[{"28", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "51"}], " ", 
+                    SuperscriptBox["T14", "4"]}], "-", 
+                    RowBox[{"246", " ", 
+                    SuperscriptBox["T14", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"280", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"78", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "4"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "221"}], " ", 
+                    SuperscriptBox["T14", "4"]}], "-", 
+                    RowBox[{"1664", " ", 
+                    SuperscriptBox["T14", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"2542", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"752", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "+", 
+                    RowBox[{"43", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "4"]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3072", " ", 
+                    SuperscriptBox["MT", "12"]}], "+", 
+                    RowBox[{"512", " ", 
+                    SuperscriptBox["MT", "10"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"43", " ", "T14"}], "+", 
+                    RowBox[{"7", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "17"}], " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"6", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], ")"}]}], "+", 
+                    RowBox[{"128", " ", 
+                    SuperscriptBox["MT", "8"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"155", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"13", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "-", 
+                    
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"208", " ", 
+                    SuperscriptBox["T14", "3"]}], "-", 
+                    RowBox[{"24", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"209", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "-", 
+                    RowBox[{"12", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "83"}], " ", 
+                    SuperscriptBox["T14", "4"]}], "-", 
+                    RowBox[{"782", " ", 
+                    SuperscriptBox["T14", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"108", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"254", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "+", 
+                    RowBox[{"11", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "4"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["T14", "5"]}], "-", 
+                    RowBox[{"27", " ", 
+                    SuperscriptBox["T14", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"217", " ", 
+                    SuperscriptBox["T14", "3"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"44", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "+", 
+                    RowBox[{"32", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "4"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "5"]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4096", " ", 
+                    SuperscriptBox["MT", "14"]}], "+", 
+                    RowBox[{"2048", " ", 
+                    SuperscriptBox["MT", "12"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"49", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"1280", " ", 
+                    SuperscriptBox["MT", "10"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"95", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"96", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "-", 
+                    
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "8"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"401", " ", 
+                    SuperscriptBox["T14", "3"]}], "-", 
+                    RowBox[{"497", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"238", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}]}], ")"}]}], "-", 
+                    
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2297", " ", 
+                    SuperscriptBox["T14", "4"]}], "+", 
+                    RowBox[{"4760", " ", 
+                    SuperscriptBox["T14", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"3282", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "-", 
+                    RowBox[{"968", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "-", 
+                    RowBox[{"15", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "4"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{"T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "51"}], " ", 
+                    SuperscriptBox["T14", "4"]}], "-", 
+                    RowBox[{"138", " ", 
+                    SuperscriptBox["T14", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"80", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"42", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "4"]}]}], ")"}]}], "-", 
+                    
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"431", " ", 
+                    SuperscriptBox["T14", "5"]}], "+", 
+                    RowBox[{"2349", " ", 
+                    SuperscriptBox["T14", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"2514", " ", 
+                    SuperscriptBox["T14", "3"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "-", 
+                    RowBox[{"1334", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "-", 
+                    RowBox[{"261", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "4"]}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "5"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "35"}], " ", 
+                    SuperscriptBox["T14", "6"]}], "-", 
+                    RowBox[{"920", " ", 
+                    SuperscriptBox["T14", "5"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"2953", " ", 
+                    SuperscriptBox["T14", "4"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "-", 
+                    RowBox[{"2192", " ", 
+                    SuperscriptBox["T14", "3"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "+", 
+                    RowBox[{"1067", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "4"]}], "+", 
+                    RowBox[{"136", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "5"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "6"]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], ")"}], "/", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], "+", 
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U"}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T24", "-", "U"}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "8"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}]}], 
+                    "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"6", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"128", " ", 
+                    SuperscriptBox["MT", "8"]}], "+", 
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"20", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14"}], "+", 
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"7", " ", "T14"}], "+", "T24", "+", "U"}], 
+                    ")"}]}], "-", 
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], ")"}]}], 
+                    "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "20"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"4", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "3"], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", 
+                    RowBox[{"5", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T14", "2"], "+", 
+                    RowBox[{"5", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT", ",", "MT"}], "]"}]}], ")"}], "/", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}]}], 
+                    "]"}]}]}], ")"}]}], ")"}], "/", 
+                  SuperscriptBox[
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}], "2"]}]}], ")"}]}]}], ")"}]}]}], ")"}]}], ")"}], 
+       " ", 
+       SuperscriptBox["\[Beta]", "2"]}]}], "+", 
+     InterpretationBox[
+      SuperscriptBox[
+       RowBox[{"O", "[", "\[Beta]", "]"}], "3"],
+      SeriesData[$CellContext`\[Beta], 0, {}, 0, 3, 1],
+      Editable->False]}],
+    SeriesData[$CellContext`\[Beta], 
+     0, {(-2) $CellContext`Alfas^2 $CellContext`c3 $CellContext`EL \
+$CellContext`MT^2 $CellContext`MW^(-1) $CellContext`SW^(-1) \
+($CellContext`T^(-1) ((
+           4 (2 + X`Eps^(-1) + 
+             X`DiscB[$CellContext`T, $CellContext`MT, $CellContext`MT] + 
+             Log[$CellContext`MT^(-2) X`Mu^2]) - 
+           4 ($CellContext`MH^2 - $CellContext`T)^(-1) (3 $CellContext`MH^2 + 
+            X`Eps^(-1) $CellContext`MH^2 - 3 $CellContext`T - 
+            X`Eps^(-1) $CellContext`T + $CellContext`MH^2 
+             X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - \
+$CellContext`T 
+            X`DiscB[$CellContext`T, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MT^2 
+             Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                 2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                   Rational[1, 2])]^2 + $CellContext`MH^2 
+             Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`T 
+            Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`MT^2 
+            Log[Rational[1, 2] $CellContext`MT^(-2) (
+                2 $CellContext`MT^2 - $CellContext`T + ($CellContext`T ((-4) \
+$CellContext`MT^2 + $CellContext`T))^Rational[1, 2])]^2)) ($CellContext`Pair[
+              $CellContext`e[1], 
+              $CellContext`ec[5]] $CellContext`Pair[
+              $CellContext`e[2], 
+              $CellContext`ec[4]] + $CellContext`Pair[
+              $CellContext`e[1], 
+              $CellContext`ec[4]] $CellContext`Pair[
+              $CellContext`e[2], 
+              $CellContext`ec[5]] - 2 $CellContext`Pair[
+             $CellContext`e[1], 
+             $CellContext`e[2]] $CellContext`Pair[
+             $CellContext`ec[4], 
+             $CellContext`ec[
+             5]]) + ($CellContext`MH^2 - $CellContext`T)^(-1) (
+           Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+               2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                  4 $CellContext`MT^2)^Rational[1, 2])]^2 - 
+           Log[Rational[1, 2] $CellContext`MT^(-2) (
+              2 $CellContext`MT^2 - $CellContext`T + ($CellContext`T ((-4) \
+$CellContext`MT^2 + $CellContext`T))^Rational[1, 2])]^2) (
+           2 ((-$CellContext`MH^2 + $CellContext`T) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`e[2]] + 2 $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[3]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[1]]) $CellContext`Pair[
+              $CellContext`ec[4], 
+              $CellContext`ec[5]] - $CellContext`Pair[
+             $CellContext`e[2], 
+             $CellContext`ec[
+             5]] ((-$CellContext`MH^2 + $CellContext`T) $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[4]] + 2 $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`k[3]] $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`k[1]]) - $CellContext`Pair[
+             $CellContext`e[2], 
+             $CellContext`ec[
+             4]] ((-$CellContext`MH^2 + $CellContext`T) $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[5]] + 2 $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`k[3]] $CellContext`Pair[
+               $CellContext`ec[5], 
+               $CellContext`k[1]])) - 16 $CellContext`Pair[
+           $CellContext`e[1], 
+           $CellContext`k[3]] (
+          Rational[
+            1, 2] ($CellContext`MH^2 - $CellContext`T)^(-2) \
+(-$CellContext`MH^2 + $CellContext`T - $CellContext`MH^2 
+            X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MH^2 
+             X`DiscB[$CellContext`T, $CellContext`MT, $CellContext`MT] - \
+$CellContext`MT^2 
+            Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                   4 $CellContext`MT^2)^
+                  Rational[1, 2])]^2 + $CellContext`MT^2 
+             Log[Rational[1, 2] $CellContext`MT^(-2) (
+                 2 $CellContext`MT^2 - $CellContext`T + ($CellContext`T ((-4) \
+$CellContext`MT^2 + $CellContext`T))^
+                  Rational[1, 2])]^2) ((-2) $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`k[1]] $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`ec[5]] + $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[5]] $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`k[1]] + $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[4]] $CellContext`Pair[
+               $CellContext`ec[5], 
+               $CellContext`k[1]]) + 
+          Rational[
+            1, 2] ($CellContext`MH^2 - $CellContext`T)^(-1) (-
+             X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + 
+            X`DiscB[$CellContext`T, $CellContext`MT, $CellContext`MT]) ((-2) \
+$CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`k[3]] $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`ec[5]] + $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[5]] $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`k[3]] + $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[4]] $CellContext`Pair[
+               $CellContext`ec[5], 
+               $CellContext`k[3]])) + 
+         4 ($CellContext`MH^2 - $CellContext`T)^(-1) (
+           X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - 
+           X`DiscB[$CellContext`T, $CellContext`MT, $CellContext`MT]) (
+           2 ((-$CellContext`MH^2 + $CellContext`T) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`e[2]] + 2 $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[3]] ($CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[1]] + $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[3]])) $CellContext`Pair[
+              $CellContext`ec[4], 
+              $CellContext`ec[5]] - $CellContext`Pair[
+             $CellContext`e[2], 
+             $CellContext`ec[
+             5]] ((-$CellContext`MH^2 + $CellContext`T) $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[4]] + 2 $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`k[3]] ($CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[1]] + $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[3]])) - $CellContext`Pair[
+             $CellContext`e[2], 
+             $CellContext`ec[
+             4]] ((-$CellContext`MH^2 + $CellContext`T) $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[5]] + 2 $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`k[3]] ($CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[1]] + $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[3]])))) + (
+          2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U)^(-1) ((
+           4 (2 + X`Eps^(-1) + 
+             X`DiscB[2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U, $CellContext`MT, $CellContext`MT] + 
+             Log[$CellContext`MT^(-2) X`Mu^2]) + 
+           4 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U)^(-1) (
+             3 ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U) + 
+             X`Eps^(-1) ($CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T - $CellContext`U) - $CellContext`MH^2 
+             X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + (
+               
+               2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U) 
+              X`DiscB[2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U, $CellContext`MT, $CellContext`MT] - $CellContext`MT^2 
+             Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                 2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                   Rational[
+                    1, 2])]^2 + ($CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T - $CellContext`U) 
+              Log[$CellContext`MT^(-2) X`Mu^2] + $CellContext`MT^2 
+              Log[Rational[1, 2] $CellContext`MT^(-2) ((-2) $CellContext`MH^2 + 
+                  2 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U + (((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) ((-2) $CellContext`MH^2 + 
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U))^Rational[1, 2])]^2)) ($CellContext`Pair[
+              $CellContext`e[1], 
+              $CellContext`ec[5]] $CellContext`Pair[
+              $CellContext`e[2], 
+              $CellContext`ec[4]] + $CellContext`Pair[
+              $CellContext`e[1], 
+              $CellContext`ec[4]] $CellContext`Pair[
+              $CellContext`e[2], 
+              $CellContext`ec[5]] - 2 $CellContext`Pair[
+             $CellContext`e[1], 
+             $CellContext`e[2]] $CellContext`Pair[
+             $CellContext`ec[4], 
+             $CellContext`ec[5]]) + (
+           8 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U)^(-1) (
+             X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - 
+             X`DiscB[2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U, $CellContext`MT, $CellContext`MT]) ($CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[3]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[4]] + $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[4]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[3]] - 2 $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`e[2]] $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`k[3]]) - 
+           8 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U)^(-2) (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U + $CellContext`MH^2 
+             X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - \
+$CellContext`MH^2 
+            X`DiscB[2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U, $CellContext`MT, $CellContext`MT] + $CellContext`MT^2 
+             Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                 2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                   Rational[1, 2])]^2 - $CellContext`MT^2 
+            Log[Rational[1, 2] $CellContext`MT^(-2) ((-2) $CellContext`MH^2 + 
+                2 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U + (((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) ((-2) $CellContext`MH^2 + 
+                   4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U))^Rational[1, 2])]^2) ($CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`k[5]] $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[4]] + $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[4]] $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`k[5]] - 2 $CellContext`Pair[
+              $CellContext`e[1], 
+              $CellContext`e[2]] $CellContext`Pair[
+              $CellContext`ec[4], 
+              $CellContext`k[5]])) $CellContext`Pair[
+            $CellContext`ec[5], 
+            $CellContext`k[3]] - 
+         4 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U)^(-1) (-
+           X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + 
+          X`DiscB[2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U, $CellContext`MT, $CellContext`MT]) ($CellContext`Pair[
+             $CellContext`e[2], 
+             $CellContext`ec[
+             4]] ((-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[5]] - 2 ($CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`k[3]] - $CellContext`Pair[
+              $CellContext`e[1], 
+              $CellContext`k[5]]) $CellContext`Pair[
+              $CellContext`ec[5], 
+              $CellContext`k[3]]) + $CellContext`Pair[
+             $CellContext`e[1], 
+             $CellContext`ec[
+             4]] ((-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[5]] - 2 ($CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`k[3]] - $CellContext`Pair[
+              $CellContext`e[2], 
+              $CellContext`k[5]]) $CellContext`Pair[
+              $CellContext`ec[5], 
+              $CellContext`k[3]]) - 2 $CellContext`Pair[
+            $CellContext`e[1], 
+            $CellContext`e[
+            2]] ((-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+              $CellContext`ec[4], 
+              $CellContext`ec[5]] - 2 ($CellContext`Pair[
+              $CellContext`ec[4], 
+              $CellContext`k[3]] - $CellContext`Pair[
+             $CellContext`ec[4], 
+             $CellContext`k[5]]) $CellContext`Pair[
+             $CellContext`ec[5], 
+             $CellContext`k[
+             3]])) - (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U)^(-1) (-
+           Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+               2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                  4 $CellContext`MT^2)^Rational[1, 2])]^2 + 
+          Log[Rational[1, 2] $CellContext`MT^(-2) ((-2) $CellContext`MH^2 + 
+              2 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U + (((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) ((-2) $CellContext`MH^2 + 
+                 4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U))^Rational[1, 2])]^2) ($CellContext`Pair[
+             $CellContext`e[2], 
+             $CellContext`ec[
+             4]] ((-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[5]] + 2 $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`k[5]] $CellContext`Pair[
+               $CellContext`ec[5], 
+               $CellContext`k[3]]) + $CellContext`Pair[
+             $CellContext`e[1], 
+             $CellContext`ec[
+             4]] ((-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[5]] + 2 $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`k[5]] $CellContext`Pair[
+               $CellContext`ec[5], 
+               $CellContext`k[3]]) - 2 $CellContext`Pair[
+            $CellContext`e[1], 
+            $CellContext`e[
+            2]] ((-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+              $CellContext`ec[4], 
+              $CellContext`ec[5]] + 2 $CellContext`Pair[
+              $CellContext`ec[4], 
+              $CellContext`k[5]] $CellContext`Pair[
+              $CellContext`ec[5], 
+              $CellContext`k[3]])) + $CellContext`T24^(-1) ((-8) (
+             Rational[-1, 
+                
+                2] (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U)^(-1) (
+               X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - 
+               X`DiscB[
+               2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U, $CellContext`MT, $CellContext`MT]) (-(($CellContext`MH^2 - 
+                   3 $CellContext`S34 + $CellContext`T + $CellContext`U) \
+$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] + 
+                 2 ($CellContext`S - $CellContext`T14) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[
+                    3]] + ($CellContext`MH^2 + $CellContext`S34 + \
+$CellContext`T - 3 $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] + 
+               2 ($CellContext`MH^2 - $CellContext`S34 + $CellContext`T - \
+$CellContext`U) $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[4]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[4]] + 
+               2 ($CellContext`MH^2 - $CellContext`S34 + $CellContext`T - \
+$CellContext`U) $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`e[2]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[2]] + 8 (-$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]]))) $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[3]] + 
+             Rational[-1, 
+                2] (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U)^(-2) (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U + $CellContext`MH^2 
+                X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - \
+$CellContext`MH^2 
+               X`DiscB[
+                2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U, $CellContext`MT, $CellContext`MT] + $CellContext`MT^2 
+                Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 - $CellContext`MT^2 
+               Log[Rational[
+                   1, 2] $CellContext`MT^(-2) ((-2) $CellContext`MH^2 + 
+                   2 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U + (((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) ((-2) $CellContext`MH^2 + 
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U))^Rational[1, 2])]^2) (-(($CellContext`MH^2 - 
+                   3 $CellContext`S34 + $CellContext`T - 
+                   2 $CellContext`T24 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] + 
+                 2 ($CellContext`S - $CellContext`T14) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[
+                    3]] + ($CellContext`MH^2 + $CellContext`S34 + \
+$CellContext`T - 2 $CellContext`T24 - 3 $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] + 
+               2 ($CellContext`MH^2 - $CellContext`S34 + $CellContext`T - 
+                 2 $CellContext`T24 - $CellContext`U) $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[4]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[4]] + 
+               2 ($CellContext`MH^2 - $CellContext`S34 + $CellContext`T - 
+                 2 $CellContext`T24 - $CellContext`U) $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`e[2]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[2]] + 8 (-$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]]))) $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[3]]) + (
+             4 (2 + X`Eps^(-1) + 
+               X`DiscB[
+                2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U, $CellContext`MT, $CellContext`MT] + 
+               Log[$CellContext`MT^(-2) X`Mu^2]) + 
+             4 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U)^(-1) (
+               3 ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U) + 
+               X`Eps^(-1) ($CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T - $CellContext`U) - $CellContext`MH^2 
+               X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + \
+(2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - $CellContext`U) 
+                X`DiscB[
+                 2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U, $CellContext`MT, $CellContext`MT] - $CellContext`MT^2 
+               Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                   2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[
+                    1, 2])]^2 + ($CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T - $CellContext`U) 
+                Log[$CellContext`MT^(-2) X`Mu^2] + $CellContext`MT^2 
+                Log[Rational[
+                    1, 2] $CellContext`MT^(-2) ((-2) $CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U + (((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) ((-2) $CellContext`MH^2 + 
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U))^Rational[1, 2])]^2)) ($CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[
+                5]] ((-$CellContext`S + $CellContext`T14) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] + 4 ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]])) - 2 (2 ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[2]] - $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[4]]) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[4]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`ec[5]] + $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[2]] (2 ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]]) $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`ec[5]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`e[2]] (2 $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]])) + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[4]] $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[4]] (2 $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] - $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[3]])) + $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[4]] ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[4]] ((-4) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]]) + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[2]] ($CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]] + 4 $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    4]]))) + (-$CellContext`MH^2 + $CellContext`S34 + \
+$CellContext`T + $CellContext`U)^(-1) (-
+              Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                  2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^Rational[1, 2])]^2 + 
+             Log[Rational[1, 2] $CellContext`MT^(-2) ((-2) $CellContext`MH^2 + 
+                 2 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U + (((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) ((-2) $CellContext`MH^2 + 
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U))^Rational[
+                   1, 2])]^2) ((-4) ($CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T - $CellContext`U) ($CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[2]] - $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[4]]) $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[4]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`ec[5]] - 
+             4 ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U) ($CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[2]] - $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`k[4]]) $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[5]] $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`k[2]] + $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[
+                5]] (-($CellContext`S - $CellContext`T14) (-$CellContext`MH^2 + \
+$CellContext`S + $CellContext`T14 + $CellContext`T24) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] + 
+               4 ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U) ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]])) + 8 (-$CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[5]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]])) $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[3]] + 4 $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[4]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[
+                4]] ((-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[
+                  1]] + ($CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T24 - $CellContext`U) $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[3]]) + 4 $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`e[2]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[
+                2]] ((-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[
+                  1]] + ($CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T24 - $CellContext`U) $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[3]]) - 2 $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[
+               4]] (($CellContext`S - $CellContext`T14) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[3]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[3]] + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[4]] (
+                2 ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[
+                   2]] + ($CellContext`S34 + $CellContext`T - \
+$CellContext`T24 - $CellContext`U) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]]) + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[
+                 
+                 2]] ((-$CellContext`S34 + $CellContext`T - $CellContext`T24 + \
+$CellContext`U) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]] + 
+                2 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[4]]))) + 
+           4 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U)^(-1) (-
+              X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + 
+             X`DiscB[2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U, $CellContext`MT, $CellContext`MT]) ($CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[
+                5]] (-($CellContext`S - $CellContext`T14) (-$CellContext`MH^2 + \
+$CellContext`S + $CellContext`T14 + $CellContext`T24) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] + 
+               4 ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U) ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]])) + 
+             2 ((-2) ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U) ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[2]] - $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[4]]) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[4]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`ec[5]] - 
+               
+               2 ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U) ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[2]] - $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[4]]) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[5]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[2]] + 8 (-$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]])) $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[3]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[4]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[4]] (
+                 2 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + (3 $CellContext`MH^2 - 
+                   3 $CellContext`S34 + $CellContext`T - 2 $CellContext`T24 - 
+                   3 $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`e[2]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[2]] (
+                 2 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + (3 $CellContext`MH^2 - 
+                   3 $CellContext`S34 + $CellContext`T - 2 $CellContext`T24 - 
+                   3 $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]])) - $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[4]] (
+              4 ($CellContext`S - $CellContext`T14) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[3]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[3]] + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[4]] (
+                4 ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[2]] + ($CellContext`MH^2 + 
+                  3 $CellContext`S34 + 3 $CellContext`T - 2 $CellContext`T24 - 
+                  5 $CellContext`U) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]]) + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[
+                 2]] (($CellContext`MH^2 - 5 $CellContext`S34 + 
+                  3 $CellContext`T - 2 $CellContext`T24 + 
+                  3 $CellContext`U) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]] + 
+                4 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[4]])))) + $CellContext`T14^(-1) (
+           8 (Rational[-1, 
+                2] (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U)^(-1) (
+               X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - 
+               X`DiscB[
+               2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U, $CellContext`MT, $CellContext`MT]) ((-2) ($CellContext`MH^2 - \
+$CellContext`S34 - $CellContext`T + $CellContext`U) $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[4]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[
+                  4]] (($CellContext`MH^2 - 
+                   3 $CellContext`S34 + $CellContext`T + $CellContext`U) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] + 
+                 2 ($CellContext`S - $CellContext`T24) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    3]] + ($CellContext`MH^2 + $CellContext`S34 - 
+                   3 $CellContext`T + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) - 
+               2 ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`e[2]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[1]] + 8 (-$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] - $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]]))) $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[3]] + 
+             Rational[-1, 
+                2] (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U)^(-2) (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U + $CellContext`MH^2 
+                X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - \
+$CellContext`MH^2 
+               X`DiscB[
+                2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U, $CellContext`MT, $CellContext`MT] + $CellContext`MT^2 
+                Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 - $CellContext`MT^2 
+               Log[Rational[
+                   1, 2] $CellContext`MT^(-2) ((-2) $CellContext`MH^2 + 
+                   2 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U + (((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) ((-2) $CellContext`MH^2 + 
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U))^Rational[
+                    1, 2])]^2) ((-2) ($CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T - 2 $CellContext`T14 + $CellContext`U) $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[4]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] - $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[
+                 4]] (((-3) $CellContext`MH^2 + $CellContext`S + 
+                  4 $CellContext`S34 + 
+                  3 $CellContext`T14 + $CellContext`T24) $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[1]] - 
+                2 ($CellContext`S - $CellContext`T24) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[
+                  3]] + ((-3) $CellContext`MH^2 + $CellContext`S + 
+                  4 $CellContext`T + 
+                  3 $CellContext`T14 + $CellContext`T24) $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[4]]) - 
+               2 ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T - 
+                2 $CellContext`T14 + $CellContext`U) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`e[2]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[1]] + 8 (-$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] - $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]]))) $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[3]]) + (
+             4 (2 + X`Eps^(-1) + 
+               X`DiscB[
+                2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U, $CellContext`MT, $CellContext`MT] + 
+               Log[$CellContext`MT^(-2) X`Mu^2]) + 
+             4 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U)^(-1) (
+               3 ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U) + 
+               X`Eps^(-1) ($CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T - $CellContext`U) - $CellContext`MH^2 
+               X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + \
+(2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - $CellContext`U) 
+                X`DiscB[
+                 2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U, $CellContext`MT, $CellContext`MT] - $CellContext`MT^2 
+               Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                   2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[
+                    1, 2])]^2 + ($CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T - $CellContext`U) 
+                Log[$CellContext`MT^(-2) X`Mu^2] + $CellContext`MT^2 
+                Log[Rational[
+                    1, 2] $CellContext`MT^(-2) ((-2) $CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U + (((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) ((-2) $CellContext`MH^2 + 
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U))^Rational[1, 2])]^2)) ((-2) ((-2) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[5]] ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]]) + $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[1]] (2 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[5]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[2]] (2 $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]])) + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[4]] (2 ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] (2 $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]))) + $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[
+                4]] ((-$CellContext`S + $CellContext`T24) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[5]] + $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[4]] ((-4) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]]) + $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[1]] ($CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]] + 4 $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]))) + 
+           4 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U)^(-1) (-
+              X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + 
+             X`DiscB[2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U, $CellContext`MT, $CellContext`MT]) (
+             2 ((-2) ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U) $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[5]] ($CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[1]] - $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[4]]) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[1]] + 
+               2 ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[5]] ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]]) - 8 (-$CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[5]] $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[5]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] - $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]])) $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[3]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`e[2]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[1]] (
+                 2 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + (3 $CellContext`MH^2 - 
+                   3 $CellContext`S34 - 3 $CellContext`T - 
+                   2 $CellContext`T14 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[
+                  4]] ((-2) ($CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T - $CellContext`U) ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] (
+                   2 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + (3 $CellContext`MH^2 - 
+                    3 $CellContext`S34 - 3 $CellContext`T - 
+                    2 $CellContext`T14 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]))) + $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[
+                4]] (-($CellContext`S - $CellContext`T24) (-$CellContext`MH^2 + \
+$CellContext`S + $CellContext`T14 + $CellContext`T24) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[5]] + 
+               4 (-$CellContext`S + $CellContext`T24) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[3]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[3]] + $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[4]] (
+                 4 ($CellContext`MH^2 - $CellContext`S - $CellContext`T14 - \
+$CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + ((-7) $CellContext`MH^2 + 
+                   3 $CellContext`S + 8 $CellContext`T + 5 $CellContext`T14 + 
+                   3 $CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[
+                  1]] (((-7) $CellContext`MH^2 + 3 $CellContext`S + 
+                   8 $CellContext`S34 + 5 $CellContext`T14 + 
+                   3 $CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + 
+                 4 (-$CellContext`MH^2 + $CellContext`S + $CellContext`T14 + \
+$CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    4]]))) + (-$CellContext`MH^2 + $CellContext`S34 + \
+$CellContext`T + $CellContext`U)^(-1) (-
+              Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                  2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^Rational[1, 2])]^2 + 
+             Log[Rational[1, 2] $CellContext`MT^(-2) ((-2) $CellContext`MH^2 + 
+                 2 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U + (((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) ((-2) $CellContext`MH^2 + 
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U))^Rational[1, 2])]^2) (
+             4 (-($CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U) $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[5]] ($CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[1]] - $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[4]]) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[
+                  1]] + ($CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T - $CellContext`U) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[5]] ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]]) - 2 (-$CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[5]] $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[5]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] - $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]])) $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[3]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`e[2]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[
+                  1]] ((-$CellContext`MH^2 + $CellContext`S34 + \
+$CellContext`T + $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    2]] + (-$CellContext`MH^2 + $CellContext`S + \
+$CellContext`T24 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[
+                  4]] (-($CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T - $CellContext`U) ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[
+                    4]] ((-$CellContext`MH^2 + $CellContext`S34 + \
+$CellContext`T + $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    2]] + (-$CellContext`MH^2 + $CellContext`S + \
+$CellContext`T24 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]))) + $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[
+                4]] (-($CellContext`S - $CellContext`T24) (-$CellContext`MH^2 + \
+$CellContext`S + $CellContext`T14 + $CellContext`T24) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[5]] - 
+               2 (($CellContext`S - $CellContext`T24) $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]] + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[4]] (
+                  2 ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    1]] + ((-2) $CellContext`MH^2 + $CellContext`S + 
+                    2 $CellContext`S34 + $CellContext`T24 + 
+                    2 $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[
+                   1]] (((-2) $CellContext`MH^2 + $CellContext`S + 
+                    2 $CellContext`T + $CellContext`T24 + 
+                    2 $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + 
+                  2 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])))))) + $CellContext`S34^(-1) ((
+           4 (2 + X`Eps^(-1) + 
+             X`DiscB[$CellContext`S34, $CellContext`MT, $CellContext`MT] + 
+             Log[$CellContext`MT^(-2) X`Mu^2]) - 
+           4 ($CellContext`MH^2 - $CellContext`S34)^(-1) (3 $CellContext`MH^2 + 
+            X`Eps^(-1) $CellContext`MH^2 - 3 $CellContext`S34 - 
+            X`Eps^(-1) $CellContext`S34 + $CellContext`MH^2 
+             X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - \
+$CellContext`S34 
+            X`DiscB[$CellContext`S34, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MT^2 
+             Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                 2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                   Rational[1, 2])]^2 + $CellContext`MH^2 
+             Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`S34 
+            Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`MT^2 
+            Log[Rational[1, 2] $CellContext`MT^(-2) (
+                2 $CellContext`MT^2 - $CellContext`S34 + ($CellContext`S34 \
+((-4) $CellContext`MT^2 + $CellContext`S34))^
+                 Rational[1, 2])]^2)) ($CellContext`Pair[
+              $CellContext`e[1], 
+              $CellContext`ec[5]] $CellContext`Pair[
+              $CellContext`e[2], 
+              $CellContext`ec[4]] + $CellContext`Pair[
+              $CellContext`e[1], 
+              $CellContext`ec[4]] $CellContext`Pair[
+              $CellContext`e[2], 
+              $CellContext`ec[5]] - 2 $CellContext`Pair[
+             $CellContext`e[1], 
+             $CellContext`e[2]] $CellContext`Pair[
+             $CellContext`ec[4], 
+             $CellContext`ec[5]]) - 
+         4 ($CellContext`MH^2 - $CellContext`S34)^(-1) (
+          X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - 
+          X`DiscB[$CellContext`S34, $CellContext`MT, $CellContext`MT]) \
+($CellContext`Pair[
+             $CellContext`e[2], 
+             $CellContext`ec[
+             5]] ((-$CellContext`MH^2 + $CellContext`S34) $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[4]] + 2 ($CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[3]] - $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`k[4]]) $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`k[3]]) + $CellContext`Pair[
+             $CellContext`e[1], 
+             $CellContext`ec[
+             5]] ((-$CellContext`MH^2 + $CellContext`S34) $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[4]] + 2 ($CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[3]] - $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`k[4]]) $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`k[3]]) - 2 $CellContext`Pair[
+            $CellContext`e[1], 
+            $CellContext`e[
+            2]] ((-$CellContext`MH^2 + $CellContext`S34) $CellContext`Pair[
+              $CellContext`ec[4], 
+              $CellContext`ec[5]] + 2 $CellContext`Pair[
+              $CellContext`ec[4], 
+              $CellContext`k[3]] ($CellContext`Pair[
+               $CellContext`ec[5], 
+               $CellContext`k[3]] - $CellContext`Pair[
+              $CellContext`ec[5], 
+              $CellContext`k[4]]))) + $CellContext`Pair[
+            $CellContext`ec[4], 
+            $CellContext`k[
+            3]] ((-8) ($CellContext`MH^2 - $CellContext`S34)^(-1) (-
+              X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + 
+             X`DiscB[$CellContext`S34, $CellContext`MT, $CellContext`MT]) \
+($CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[3]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[5]] + $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[5]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[3]] - 2 $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`e[2]] $CellContext`Pair[
+               $CellContext`ec[5], 
+               $CellContext`k[3]]) + 
+           8 ($CellContext`MH^2 - $CellContext`S34)^(-2) (-$CellContext`MH^2 + \
+$CellContext`S34 - $CellContext`MH^2 
+             X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MH^2 
+              X`DiscB[$CellContext`S34, $CellContext`MT, $CellContext`MT] - \
+$CellContext`MT^2 
+             Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                 2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                   Rational[1, 2])]^2 + $CellContext`MT^2 
+              Log[Rational[1, 2] $CellContext`MT^(-2) (
+                  2 $CellContext`MT^2 - $CellContext`S34 + ($CellContext`S34 \
+((-4) $CellContext`MT^2 + $CellContext`S34))^
+                   Rational[1, 2])]^2) ($CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[4]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[5]] + $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[5]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[4]] - 2 $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`e[2]] $CellContext`Pair[
+               $CellContext`ec[5], 
+               $CellContext`k[
+               4]])) + ($CellContext`MH^2 - $CellContext`S34)^(-1) (
+           Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+               2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                  4 $CellContext`MT^2)^Rational[1, 2])]^2 - 
+           Log[Rational[1, 2] $CellContext`MT^(-2) (
+              2 $CellContext`MT^2 - $CellContext`S34 + ($CellContext`S34 \
+((-4) $CellContext`MT^2 + $CellContext`S34))^
+               Rational[1, 2])]^2) ($CellContext`Pair[
+              $CellContext`e[2], 
+              $CellContext`ec[
+              5]] (($CellContext`MH^2 - $CellContext`S34) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[4]] + 2 $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[4]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[3]]) + $CellContext`Pair[
+              $CellContext`e[1], 
+              $CellContext`ec[
+              5]] (($CellContext`MH^2 - $CellContext`S34) $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[4]] + 2 $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[4]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[3]]) - 2 $CellContext`Pair[
+             $CellContext`e[1], 
+             $CellContext`e[
+             2]] (($CellContext`MH^2 - $CellContext`S34) $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`ec[5]] + 2 $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`k[3]] $CellContext`Pair[
+               $CellContext`ec[5], 
+               $CellContext`k[
+               4]])) - ($CellContext`MH^2 - $CellContext`S - $CellContext`T - \
+$CellContext`T14)^(-1) ((
+            4 (2 + X`Eps^(-1) + 
+              X`DiscB[$CellContext`S34, $CellContext`MT, $CellContext`MT] + 
+              Log[$CellContext`MT^(-2) X`Mu^2]) - 
+            4 ($CellContext`MH^2 - $CellContext`S34)^(-1) (
+             3 $CellContext`MH^2 + X`Eps^(-1) $CellContext`MH^2 - 
+             3 $CellContext`S34 - 
+             X`Eps^(-1) $CellContext`S34 + $CellContext`MH^2 
+              X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - \
+$CellContext`S34 
+             X`DiscB[$CellContext`S34, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MT^2 
+              Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                  2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 + $CellContext`MH^2 
+              Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`S34 
+             Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`MT^2 
+             Log[Rational[1, 2] $CellContext`MT^(-2) (
+                 2 $CellContext`MT^2 - $CellContext`S34 + ($CellContext`S34 \
+((-4) $CellContext`MT^2 + $CellContext`S34))^Rational[1, 2])]^2)) (
+            4 $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`k[5]] ($CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[1]] - $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`k[5]]) $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`ec[5]] + 2 $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`k[5]] $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[5]] (2 $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[2]] - $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`k[3]]) + $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[
+               5]] ((-$CellContext`MH^2 + 
+                2 $CellContext`S + $CellContext`T24 + $CellContext`U) \
+$CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[4]] - $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[5]] ((-4) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[1]] + $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[3]]) - $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[1]] ($CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[3]] + 4 $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[5]])) + 4 $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[4]] ($CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[1]] - $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`k[5]]) $CellContext`Pair[
+               $CellContext`ec[5], 
+               $CellContext`k[1]] + 2 $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`e[2]] (2 $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[2]] - $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`k[3]]) $CellContext`Pair[
+               $CellContext`ec[5], 
+               $CellContext`k[1]] - 4 $CellContext`Pair[
+              $CellContext`e[2], 
+              $CellContext`ec[4]] ($CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[2]] $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[1]] + $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[5]] $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[2]])) - 
+          8 (Rational[
+             1, 2] ($CellContext`MH^2 - $CellContext`S34)^(-2) \
+(-$CellContext`MH^2 + $CellContext`S34 - $CellContext`MH^2 
+             X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MH^2 
+              X`DiscB[$CellContext`S34, $CellContext`MT, $CellContext`MT] - \
+$CellContext`MT^2 
+             Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                 2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                   Rational[1, 2])]^2 + $CellContext`MT^2 
+              Log[Rational[1, 2] $CellContext`MT^(-2) (
+                  2 $CellContext`MT^2 - $CellContext`S34 + ($CellContext`S34 \
+((-4) $CellContext`MT^2 + $CellContext`S34))^
+                   Rational[1, 2])]^2) $CellContext`Pair[
+              $CellContext`ec[4], 
+              $CellContext`k[3]] (
+             2 (-$CellContext`MH^2 + $CellContext`S34 + 
+               2 $CellContext`T24) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[5]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[5]] - $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[
+               5]] (((-2) $CellContext`MH^2 + 2 $CellContext`S34 + 
+                4 $CellContext`T24) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[1]] + (-$CellContext`MH^2 + $CellContext`S34 + 
+                4 $CellContext`T14) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[3]] + ($CellContext`MH^2 + 
+                2 $CellContext`S - $CellContext`S34 - 2 $CellContext`T + 
+                2 $CellContext`T14) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[4]]) + 
+             2 (-$CellContext`MH^2 + $CellContext`S34 + 
+               2 $CellContext`T24) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`e[2]] $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[1]] + 8 (-$CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[4]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[3]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[1]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[3]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[4]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[1]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[5]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] - $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[4]]))) + 
+           Rational[
+             1, 2] ($CellContext`MH^2 - $CellContext`S34)^(-1) (-
+              X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + 
+             X`DiscB[$CellContext`S34, $CellContext`MT, $CellContext`MT]) \
+$CellContext`Pair[
+              $CellContext`ec[4], 
+              $CellContext`k[3]] (
+             2 ($CellContext`MH^2 - $CellContext`S34 - 
+               2 $CellContext`U) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[5]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[5]] + $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[
+                5]] (((-2) $CellContext`MH^2 + 2 $CellContext`S34 + 
+                 4 $CellContext`U) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[1]] - ($CellContext`MH^2 - 
+                2 $CellContext`S + $CellContext`S34 - 2 $CellContext`T + 
+                2 $CellContext`T14) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[
+                 3]] + ((-3) $CellContext`MH^2 + $CellContext`S34 + 
+                 4 $CellContext`T) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[4]]) + 
+             2 ($CellContext`MH^2 - $CellContext`S34 - 
+               2 $CellContext`U) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`e[2]] $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[1]] + 8 (-$CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[4]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[3]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[1]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[3]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[4]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[1]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[5]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] - $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[
+                   4]])))) - ($CellContext`MH^2 - $CellContext`S34)^(-1) (
+           Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+               2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                  4 $CellContext`MT^2)^Rational[1, 2])]^2 - 
+           Log[Rational[1, 2] $CellContext`MT^(-2) (
+              2 $CellContext`MT^2 - $CellContext`S34 + ($CellContext`S34 \
+((-4) $CellContext`MT^2 + $CellContext`S34))^
+               Rational[1, 2])]^2) ($CellContext`Pair[
+              $CellContext`e[1], 
+              $CellContext`ec[
+              5]] (($CellContext`MH^2 - $CellContext`S34) ($CellContext`MH^2 - 
+               2 $CellContext`S - $CellContext`T24 - $CellContext`U) \
+$CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[4]] - 2 ($CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[
+                 3]] ((-2) ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] + 2 $CellContext`T14 $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]]) + $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[
+                 4]] ((-2) ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[
+                   1]] + ($CellContext`MH^2 + $CellContext`S - \
+$CellContext`S34 - $CellContext`T + $CellContext`T14) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]]) + 2 $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[
+                 1]] ((-$CellContext`MH^2 + $CellContext`S34) \
+$CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[2]] + $CellContext`T24 $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]]))) + 4 ($CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[
+                5]] (-($CellContext`MH^2 - $CellContext`S34) \
+($CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[1]] - $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[5]]) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`ec[5]] + $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[
+                  5]] ((-$CellContext`MH^2 + $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`T24 $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[
+                    3]])) - ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[4]] ($CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[1]] - $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`k[5]]) $CellContext`Pair[
+               $CellContext`ec[5], 
+               $CellContext`k[1]] + $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`e[
+                2]] ((-$CellContext`MH^2 + $CellContext`S34) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[2]] + $CellContext`T24 $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]]) $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[
+                1]] + ($CellContext`MH^2 - $CellContext`S34) $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[4]] ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[2]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[1]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[2]]) + 2 $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[3]] (-$CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[4]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[3]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[1]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[3]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[4]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[1]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[5]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] - $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[4]])))) - 
+          4 ($CellContext`MH^2 - $CellContext`S34)^(-1) (
+           X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - 
+           X`DiscB[$CellContext`S34, $CellContext`MT, $CellContext`MT]) \
+(-$CellContext`Pair[
+              $CellContext`e[1], 
+              $CellContext`ec[
+              5]] (-($CellContext`MH^2 - $CellContext`S34) ($CellContext`MH^2 - 
+               2 $CellContext`S - $CellContext`T24 - $CellContext`U) \
+$CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[4]] + $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[
+                4]] ((-4) ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[1]] + (5 $CellContext`MH^2 + 
+                 2 $CellContext`S - 3 $CellContext`S34 - 6 $CellContext`T + 
+                 2 $CellContext`T14) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]]) + $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[
+                3]] ((-4) ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[1]] + ($CellContext`MH^2 - 
+                 2 $CellContext`S + $CellContext`S34 - 2 $CellContext`T + 
+                 6 $CellContext`T14) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]]) + 2 $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[
+                1]] ((-2) ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[2]] + ($CellContext`MH^2 - $CellContext`S34 + 
+                 2 $CellContext`T24 - 2 $CellContext`U) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]])) + 2 ($CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[
+                5]] ((-2) ($CellContext`MH^2 - $CellContext`S34) \
+($CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[1]] - $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[5]]) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`ec[5]] + $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[
+                  5]] ((-2) ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[
+                    2]] + ($CellContext`MH^2 - $CellContext`S34 + 
+                   2 $CellContext`T24 - 2 $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]])) - 
+             2 ($CellContext`MH^2 - $CellContext`S34) $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[4]] ($CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[1]] - $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`k[5]]) $CellContext`Pair[
+               $CellContext`ec[5], 
+               $CellContext`k[1]] + $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`e[
+                2]] ((-2) ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[2]] + ($CellContext`MH^2 - $CellContext`S34 + 
+                 2 $CellContext`T24 - 2 $CellContext`U) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]]) $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[1]] + 
+             2 ($CellContext`MH^2 - $CellContext`S34) $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[4]] ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[2]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[1]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[2]]) + 8 $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[3]] (-$CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[4]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[3]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[1]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[3]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[4]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[1]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[5]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] - $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[
+                   4]])))))) + $CellContext`U^(-1) (($CellContext`MH^2 - \
+$CellContext`U)^(-1) (
+           Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+               2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                  4 $CellContext`MT^2)^Rational[1, 2])]^2 - 
+           Log[Rational[1, 2] $CellContext`MT^(-2) (
+              2 $CellContext`MT^2 - $CellContext`U + ($CellContext`U ((-4) \
+$CellContext`MT^2 + $CellContext`U))^Rational[1, 2])]^2) (
+           2 ((-$CellContext`MH^2 + $CellContext`U) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`e[2]] + 2 $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[2]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[3]]) $CellContext`Pair[
+              $CellContext`ec[4], 
+              $CellContext`ec[5]] - $CellContext`Pair[
+             $CellContext`e[1], 
+             $CellContext`ec[
+             5]] ((-$CellContext`MH^2 + $CellContext`U) $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[4]] + 2 $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`k[3]] $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`k[2]]) - $CellContext`Pair[
+             $CellContext`e[1], 
+             $CellContext`ec[
+             4]] ((-$CellContext`MH^2 + $CellContext`U) $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[5]] + 2 $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`k[3]] $CellContext`Pair[
+               $CellContext`ec[5], 
+               $CellContext`k[2]])) - 
+         16 (Rational[1, 4] ($CellContext`MH^2 - $CellContext`U)^(-1) (
+            3 $CellContext`MH^2 + X`Eps^(-1) $CellContext`MH^2 - 
+            3 $CellContext`U - 
+            X`Eps^(-1) $CellContext`U + $CellContext`MH^2 
+             X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - \
+$CellContext`U 
+            X`DiscB[$CellContext`U, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MT^2 
+             Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                 2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                   Rational[1, 2])]^2 + $CellContext`MH^2 
+             Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`U 
+            Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`MT^2 
+            Log[Rational[1, 2] $CellContext`MT^(-2) (
+                2 $CellContext`MT^2 - $CellContext`U + ($CellContext`U ((-4) \
+$CellContext`MT^2 + $CellContext`U))^Rational[1, 2])]^2) ($CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[5]] $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[4]] + $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[4]] $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[5]] - 2 $CellContext`Pair[
+              $CellContext`e[1], 
+              $CellContext`e[2]] $CellContext`Pair[
+              $CellContext`ec[4], 
+              $CellContext`ec[5]]) + $CellContext`Pair[
+             $CellContext`e[2], 
+             $CellContext`k[3]] (
+            Rational[
+              1, 2] ($CellContext`MH^2 - $CellContext`U)^(-2) \
+(-$CellContext`MH^2 + $CellContext`U - $CellContext`MH^2 
+              
+              X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MH^2 
+               X`DiscB[$CellContext`U, $CellContext`MT, $CellContext`MT] - \
+$CellContext`MT^2 
+              Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                  2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 + $CellContext`MT^2 
+               Log[Rational[1, 2] $CellContext`MT^(-2) (
+                   2 $CellContext`MT^2 - $CellContext`U + ($CellContext`U \
+((-4) $CellContext`MT^2 + $CellContext`U))^
+                    Rational[1, 2])]^2) ((-2) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[2]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`ec[5]] + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[5]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[2]] + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[4]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[2]]) + 
+            Rational[
+              1, 2] ($CellContext`MH^2 - $CellContext`U)^(-1) (-
+               X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + 
+              X`DiscB[$CellContext`U, $CellContext`MT, $CellContext`MT]) \
+((-2) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[3]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`ec[5]] + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[5]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[3]] + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[4]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[3]]))) + 
+         4 ((2 + X`Eps^(-1) + 
+             X`DiscB[$CellContext`U, $CellContext`MT, $CellContext`MT] + 
+             Log[$CellContext`MT^(-2) X`Mu^2]) ($CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[5]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[4]] + $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[4]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[5]] - 2 $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`e[2]] $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`ec[
+               5]]) + ($CellContext`MH^2 - $CellContext`U)^(-1) (
+             X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - 
+             X`DiscB[$CellContext`U, $CellContext`MT, $CellContext`MT]) (
+             2 ((-$CellContext`MH^2 + $CellContext`U) $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`e[2]] + 2 ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[2]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]]) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[3]]) $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`ec[5]] - $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[
+               5]] ((-$CellContext`MH^2 + $CellContext`U) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[4]] + 2 $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[3]] ($CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[2]] + $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]])) - $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[
+               4]] ((-$CellContext`MH^2 + $CellContext`U) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[5]] + 2 $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[3]] ($CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[2]] + $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[
+                  3]])))) + $CellContext`T14^(-1) (-($CellContext`MH^2 - \
+$CellContext`U)^(-1) (
+             Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                 2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^Rational[1, 2])]^2 - 
+             Log[Rational[1, 2] $CellContext`MT^(-2) (
+                2 $CellContext`MT^2 - $CellContext`U + ($CellContext`U ((-4) \
+$CellContext`MT^2 + $CellContext`U))^Rational[1, 2])]^2) ($CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[
+                4]] (($CellContext`S - $CellContext`S34 + $CellContext`T - \
+$CellContext`T24) ($CellContext`MH^2 - $CellContext`U) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[5]] + 
+               2 (2 ($CellContext`MH^2 - $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - 
+                 2 ($CellContext`MH^2 - $CellContext`U) $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]]) + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] (
+                   2 ($CellContext`S + $CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    1]] + ($CellContext`S + $CellContext`S34 - $CellContext`T + \
+$CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] - 2 $CellContext`S $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]))) - 4 ($CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[
+                 5]] ((-$CellContext`MH^2 + $CellContext`U) \
+$CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[
+                   1]] + ($CellContext`S + $CellContext`T24) $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[
+                   3]] + ($CellContext`MH^2 - $CellContext`U) \
+$CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[4]]) $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[
+                 1]] + ($CellContext`MH^2 - $CellContext`U) \
+$CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[5]] ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[5]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[5]]) + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[
+                 4]] (((-$CellContext`MH^2 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    1]] + ($CellContext`S + $CellContext`T24) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    3]] + ($CellContext`MH^2 - $CellContext`U) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`ec[
+                   5]] + ($CellContext`MH^2 - $CellContext`U) \
+$CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`ec[4]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[4]])) - 2 $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[3]] ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[1]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[3]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[4]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])) + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[3]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[1]] ($CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] - $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[
+                  4]])) + ($CellContext`MH^2 - $CellContext`U) \
+$CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`e[2]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[1]] ($CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[1]] - $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[4]]))) + (
+             4 (2 + X`Eps^(-1) + 
+               X`DiscB[$CellContext`U, $CellContext`MT, $CellContext`MT] + 
+               Log[$CellContext`MT^(-2) X`Mu^2]) - 
+             4 ($CellContext`MH^2 - $CellContext`U)^(-1) (3 $CellContext`MH^2 + 
+              X`Eps^(-1) $CellContext`MH^2 - 3 $CellContext`U - 
+              X`Eps^(-1) $CellContext`U + $CellContext`MH^2 
+               X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - \
+$CellContext`U 
+              X`DiscB[$CellContext`U, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MT^2 
+               Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                   2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 + $CellContext`MH^2 
+               Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`U 
+              Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`MT^2 
+              Log[Rational[1, 2] $CellContext`MT^(-2) (
+                  2 $CellContext`MT^2 - $CellContext`U + ($CellContext`U \
+((-4) $CellContext`MT^2 + $CellContext`U))^
+                   Rational[1, 2])]^2)) ((-2) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[5]] ($CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[3]] + 2 $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[5]]) $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[1]] + 4 $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[5]] ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[1]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[4]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[5]]) + $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[4]] ((-2) ($CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[3]] + 2 $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]]) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`ec[5]] + 4 $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] ($CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] - $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[4]])) + 4 $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`e[2]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[1]] ($CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[1]] - $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[4]]) + $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[
+                4]] ((-$CellContext`S + $CellContext`S34 - $CellContext`T + \
+$CellContext`T24) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[5]] - 4 $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[4]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[1]] + 4 $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[1]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[4]] - $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[3]] ($CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[1]] + $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[4]]))) - 
+           8 (Rational[
+              1, 2] ($CellContext`MH^2 - $CellContext`U)^(-2) \
+(-$CellContext`MH^2 + $CellContext`U - $CellContext`MH^2 
+              X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MH^2 
+               X`DiscB[$CellContext`U, $CellContext`MT, $CellContext`MT] - \
+$CellContext`MT^2 
+              Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                  2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 + $CellContext`MT^2 
+               Log[Rational[1, 2] $CellContext`MT^(-2) (
+                   2 $CellContext`MT^2 - $CellContext`U + ($CellContext`U \
+((-4) $CellContext`MT^2 + $CellContext`U))^
+                    Rational[1, 2])]^2) $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`k[
+               3]] ((-2) (-$CellContext`MH^2 + 2 $CellContext`S + 
+                2 $CellContext`T24 + $CellContext`U) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[4]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`ec[5]] - 
+              2 (-$CellContext`MH^2 + 2 $CellContext`S + 
+               2 $CellContext`T24 + $CellContext`U) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[5]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[1]] + 8 ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[5]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])) + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[4]])) + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[
+                 4]] ((-$CellContext`MH^2 + 2 $CellContext`S + 
+                  2 $CellContext`T24 + $CellContext`U) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] + 
+                2 ($CellContext`S34 - $CellContext`T) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[2]] - 2 $CellContext`S $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[3]] + 2 $CellContext`T24 $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]] - $CellContext`MH^2 $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[4]] + 2 $CellContext`S $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[4]] + 2 $CellContext`T24 $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[4]] + $CellContext`U $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[4]])) + 
+            Rational[
+              1, 2] ($CellContext`MH^2 - $CellContext`U)^(-1) (-
+               X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + 
+              X`DiscB[$CellContext`U, $CellContext`MT, $CellContext`MT]) \
+$CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`k[3]] (
+              2 ((-3) $CellContext`MH^2 + 2 $CellContext`S34 + 
+                2 $CellContext`T + $CellContext`U) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[4]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`ec[5]] + 
+              2 ((-3) $CellContext`MH^2 + 2 $CellContext`S34 + 
+                2 $CellContext`T + $CellContext`U) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[5]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[1]] + 8 ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[5]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])) + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[4]])) - $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[
+                4]] (((-3) $CellContext`MH^2 + 
+                 4 $CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[1]] + 
+               2 ($CellContext`S - $CellContext`S34 + $CellContext`T - \
+$CellContext`T24) $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[3]] + ((-3) $CellContext`MH^2 + 
+                 4 $CellContext`T + $CellContext`U) $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[4]]))) - 
+           4 ($CellContext`MH^2 - $CellContext`U)^(-1) (
+            X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - 
+            X`DiscB[$CellContext`U, $CellContext`MT, $CellContext`MT]) (
+            2 ($CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[
+                 5]] (((-5) $CellContext`MH^2 + 4 $CellContext`S34 + 
+                  4 $CellContext`T + 
+                  2 $CellContext`T14 + $CellContext`U) $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[3]] + 
+                2 ($CellContext`MH^2 - $CellContext`U) $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[5]]) $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[1]] - 
+              2 ($CellContext`MH^2 - $CellContext`U) $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[5]] ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[1]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[4]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[5]]) + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[
+                 4]] ((((-5) $CellContext`MH^2 + 4 $CellContext`S34 + 
+                    4 $CellContext`T + 
+                    2 $CellContext`T14 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] + 
+                  2 ($CellContext`MH^2 - $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]]) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`ec[5]] - 
+                2 ($CellContext`MH^2 - $CellContext`U) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] ($CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] - $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[4]])) + 8 $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[3]] ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[5]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])) + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[4]])) - 
+              2 ($CellContext`MH^2 - $CellContext`U) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`e[2]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[1]] ($CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[1]] - $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[4]])) + $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[
+               4]] (($CellContext`S - $CellContext`S34 + $CellContext`T - \
+$CellContext`T24) ($CellContext`MH^2 - $CellContext`U) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[5]] + $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[
+                 3]] ((7 $CellContext`MH^2 - 8 $CellContext`S34 - 
+                  2 $CellContext`T14 - 3 $CellContext`U) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] + 
+                4 ((-2) $CellContext`MH^2 + 
+                  2 $CellContext`S34 + $CellContext`T14 + 
+                  2 $CellContext`T24 + $CellContext`U) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]] + (7 $CellContext`MH^2 - 
+                  8 $CellContext`T - 2 $CellContext`T14 - 
+                  3 $CellContext`U) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[4]]) + 
+              4 ($CellContext`MH^2 - $CellContext`U) ($CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[4]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] - $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[1]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[
+                  4]])))) + ($CellContext`MH^2 - $CellContext`S - \
+$CellContext`T - $CellContext`T14)^(-1) ((
+             4 (2 + X`Eps^(-1) + 
+               X`DiscB[$CellContext`U, $CellContext`MT, $CellContext`MT] + 
+               Log[$CellContext`MT^(-2) X`Mu^2]) - 
+             4 ($CellContext`MH^2 - $CellContext`U)^(-1) (3 $CellContext`MH^2 + 
+              X`Eps^(-1) $CellContext`MH^2 - 3 $CellContext`U - 
+              X`Eps^(-1) $CellContext`U + $CellContext`MH^2 
+               X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - \
+$CellContext`U 
+              X`DiscB[$CellContext`U, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MT^2 
+               Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                   2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 + $CellContext`MH^2 
+               Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`U 
+              Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`MT^2 
+              Log[Rational[1, 2] $CellContext`MT^(-2) (
+                  2 $CellContext`MT^2 - $CellContext`U + ($CellContext`U \
+((-4) $CellContext`MT^2 + $CellContext`U))^
+                   Rational[1, 2])]^2)) ((-2) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[5]] ($CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[3]] + 2 $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[4]]) $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`ec[5]] + 4 $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[5]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[5]] ($CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[1]] - $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[5]]) + $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[
+                5]] ((-$CellContext`MH^2 + $CellContext`S34 + 
+                 2 $CellContext`T14 + $CellContext`T24) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] - 4 $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[5]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[1]] + 4 $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[1]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[5]] - $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[3]] ($CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[1]] + $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[5]])) - 2 $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[4]] ($CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[3]] + 2 $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[4]]) $CellContext`Pair[
+               $CellContext`ec[5], 
+               $CellContext`k[1]] + 4 $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`e[2]] ($CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[1]] - $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[5]]) $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[1]] + 4 $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[4]] ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[4]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[1]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[4]])) - 
+           8 (Rational[
+              1, 2] ($CellContext`MH^2 - $CellContext`U)^(-1) (-
+               X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + 
+              X`DiscB[$CellContext`U, $CellContext`MT, $CellContext`MT]) \
+$CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`k[3]] (
+              2 ($CellContext`MH^2 - 
+                2 $CellContext`S34 - $CellContext`U) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[5]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`ec[5]] + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[
+                 5]] (((-2) $CellContext`MH^2 + 4 $CellContext`S34 + 
+                  2 $CellContext`U) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] + (3 $CellContext`MH^2 - 
+                  4 $CellContext`T - $CellContext`U) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[2]] - ($CellContext`MH^2 + 2 $CellContext`S - 
+                 2 $CellContext`T - 
+                 2 $CellContext`T14 + $CellContext`U) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]]) + 
+              2 ($CellContext`MH^2 - 
+                2 $CellContext`S34 - $CellContext`U) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[4]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[1]] + 8 ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[5]]) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[5]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]))) + 
+            Rational[
+              1, 2] ($CellContext`MH^2 - $CellContext`U)^(-2) \
+(-$CellContext`MH^2 + $CellContext`U - $CellContext`MH^2 
+              X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MH^2 
+               X`DiscB[$CellContext`U, $CellContext`MT, $CellContext`MT] - \
+$CellContext`MT^2 
+              Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                  2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 + $CellContext`MT^2 
+               Log[Rational[1, 2] $CellContext`MT^(-2) (
+                   2 $CellContext`MT^2 - $CellContext`U + ($CellContext`U \
+((-4) $CellContext`MT^2 + $CellContext`U))^
+                    Rational[1, 2])]^2) $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`k[3]] (
+              2 (-$CellContext`MH^2 + 
+                2 $CellContext`T24 + $CellContext`U) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[5]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`ec[5]] - $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[
+                5]] (((-2) $CellContext`MH^2 + 4 $CellContext`T24 + 
+                 2 $CellContext`U) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[1]] + (-$CellContext`MH^2 - 2 $CellContext`S + 
+                 2 $CellContext`T - 
+                 2 $CellContext`T14 + $CellContext`U) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[2]] + (-$CellContext`MH^2 + 
+                 4 $CellContext`S + $CellContext`U) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]]) + 
+              2 (-$CellContext`MH^2 + 
+                2 $CellContext`T24 + $CellContext`U) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[4]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[1]] + 8 ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[5]]) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[5]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])))) - 
+           4 ($CellContext`MH^2 - $CellContext`U)^(-1) (
+            X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - 
+            X`DiscB[$CellContext`U, $CellContext`MT, $CellContext`MT]) \
+($CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[
+               5]] (($CellContext`MH^2 - $CellContext`S34 - 
+                2 $CellContext`T14 - $CellContext`T24) ($CellContext`MH^2 - \
+$CellContext`U) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[4]] - 
+              4 ($CellContext`MH^2 - $CellContext`U) ($CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[4]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[1]] + $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[1]] ($CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[2]] - $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]])) - $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[3]] (
+               2 ($CellContext`MH^2 - 2 $CellContext`S34 + 
+                 2 $CellContext`T24 - $CellContext`U) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[1]] + ((-5) $CellContext`MH^2 - 
+                 2 $CellContext`S + 6 $CellContext`T - 2 $CellContext`T14 + 
+                 3 $CellContext`U) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[2]] + ($CellContext`MH^2 + 6 $CellContext`S - 
+                 2 $CellContext`T - 
+                 2 $CellContext`T14 + $CellContext`U) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]])) - 2 ($CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[
+                5]] (((-$CellContext`MH^2 + 2 $CellContext`S34 - 
+                   2 $CellContext`T24 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] + 
+                 2 (-$CellContext`MH^2 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`ec[5]] + 
+               2 ($CellContext`MH^2 - $CellContext`U) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[5]] ($CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] - $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[5]])) + $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[
+                4]] ((-$CellContext`MH^2 + 2 $CellContext`S34 - 
+                 2 $CellContext`T24 + $CellContext`U) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[3]] + 
+               2 (-$CellContext`MH^2 + $CellContext`U) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[4]]) $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[1]] + 
+             2 ($CellContext`MH^2 - $CellContext`U) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`e[2]] ($CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[1]] - $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[5]]) $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[1]] + 
+             2 ($CellContext`MH^2 - $CellContext`U) $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[4]] ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[4]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[1]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[4]]) - 8 $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`k[3]] ($CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[4]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[3]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[1]] + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[3]] ($CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[1]] - $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[5]]) $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[1]] + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[5]] ($CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]] - $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[3]] + $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[
+                   4]])))) - ($CellContext`MH^2 - $CellContext`U)^(-1) (
+            Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                   4 $CellContext`MT^2)^Rational[1, 2])]^2 - 
+            Log[Rational[1, 2] $CellContext`MT^(-2) (
+               2 $CellContext`MT^2 - $CellContext`U + ($CellContext`U ((-4) \
+$CellContext`MT^2 + $CellContext`U))^Rational[1, 2])]^2) ($CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[
+               5]] (($CellContext`MH^2 - $CellContext`S34 - 
+                2 $CellContext`T14 - $CellContext`T24) ($CellContext`MH^2 - \
+$CellContext`U) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[4]] + 
+              2 ((-2) ($CellContext`MH^2 - $CellContext`U) \
+($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]])) + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[3]] ((-2) $CellContext`T24 $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[
+                    1]] + ($CellContext`MH^2 + $CellContext`S - \
+$CellContext`T + $CellContext`T14 - $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] - 2 $CellContext`S $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]))) + 4 ($CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[5]] (($CellContext`T24 $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    3]] + ($CellContext`MH^2 - $CellContext`U) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`ec[
+                   5]] - ($CellContext`MH^2 - $CellContext`U) \
+$CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[5]] ($CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] - $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[5]])) + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[4]] ($CellContext`T24 $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[
+                   3]] + ($CellContext`MH^2 - $CellContext`U) \
+$CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[4]]) $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[
+                 1]] - ($CellContext`MH^2 - $CellContext`U) \
+$CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`e[2]] ($CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[1]] - $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[5]]) $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[
+                1]] - ($CellContext`MH^2 - $CellContext`U) $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[4]] ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[4]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[1]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[4]]) + 2 $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[3]] ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[5]]) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[5]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    4]])))))) + $CellContext`T24^(-1) (-$CellContext`T^(-1) \
+(-($CellContext`MH^2 - $CellContext`T)^(-1) (
+             Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                 2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^Rational[1, 2])]^2 - 
+             Log[Rational[1, 2] $CellContext`MT^(-2) (
+                2 $CellContext`MT^2 - $CellContext`T + ($CellContext`T ((-4) \
+$CellContext`MT^2 + $CellContext`T))^Rational[1, 2])]^2) ($CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[
+                5]] (-($CellContext`MH^2 - $CellContext`T) ($CellContext`S - \
+$CellContext`S34 - $CellContext`T14 + $CellContext`U) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] + 
+               4 ($CellContext`MH^2 - $CellContext`T) ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]])) - 
+             2 ((-2) ((-$CellContext`MH^2 + $CellContext`T) \
+$CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[
+                   2]] + ($CellContext`S + $CellContext`T14) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[
+                   3]] + ($CellContext`MH^2 - $CellContext`T) \
+$CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]]) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[4]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`ec[5]] - 
+              2 ((-$CellContext`MH^2 + $CellContext`T) $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[
+                  2]] + ($CellContext`S + $CellContext`T14) \
+$CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[
+                  3]] + ($CellContext`MH^2 - $CellContext`T) $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[4]]) $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[5]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[2]] + 
+              2 ($CellContext`MH^2 - $CellContext`T) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[4]] $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[4]] ($CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[1]] - $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[3]]) + 
+              2 ($CellContext`MH^2 - $CellContext`T) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`e[2]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[2]] ($CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[1]] - $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[3]]) + $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[4]] (
+                2 ($CellContext`MH^2 - $CellContext`T) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[2]] - 
+                2 ($CellContext`MH^2 - $CellContext`T) $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[2]] ($CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[2]] - $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[3]]) + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[
+                   3]] (($CellContext`S + $CellContext`S34 + $CellContext`T14 - \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + 
+                  2 ($CellContext`S + $CellContext`T14) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] - 2 $CellContext`S $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]])) + 4 $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[3]] ($CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[5]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[2]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[4]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])) + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[1]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[2]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[4]])))) + (
+             4 (2 + X`Eps^(-1) + 
+               X`DiscB[$CellContext`T, $CellContext`MT, $CellContext`MT] + 
+               Log[$CellContext`MT^(-2) X`Mu^2]) - 
+             4 ($CellContext`MH^2 - $CellContext`T)^(-1) (3 $CellContext`MH^2 + 
+              X`Eps^(-1) $CellContext`MH^2 - 3 $CellContext`T - 
+              X`Eps^(-1) $CellContext`T + $CellContext`MH^2 
+               X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - \
+$CellContext`T 
+              X`DiscB[$CellContext`T, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MT^2 
+               Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                   2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 + $CellContext`MH^2 
+               Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`T 
+              Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`MT^2 
+              Log[Rational[1, 2] $CellContext`MT^(-2) (
+                  2 $CellContext`MT^2 - $CellContext`T + ($CellContext`T \
+((-4) $CellContext`MT^2 + $CellContext`T))^Rational[1, 2])]^2)) (
+             2 ($CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[3]] + 2 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[5]]) $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[4]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`ec[5]] + 2 ($CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[3]] + 2 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[5]]) $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[5]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[2]] + $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[
+                5]] (($CellContext`S - $CellContext`S34 - $CellContext`T14 + \
+$CellContext`U) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] - 4 ($CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[5]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[2]] + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[4]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[5]])) + 4 $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[4]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[4]] ($CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[1]] - $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[3]]) + 4 $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`e[2]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[2]] ($CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[1]] - $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[3]]) - $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[4]] ((-4) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[4]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[2]] + 4 $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[2]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[4]] - $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[3]] ($CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[2]] + $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[4]]))) + 
+           8 (Rational[
+               1, 2] ($CellContext`MH^2 - $CellContext`T)^(-1) (-
+                X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + 
+               X`DiscB[$CellContext`T, $CellContext`MT, $CellContext`MT]) \
+$CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[3]] (
+               2 ((-3) $CellContext`MH^2 + 
+                 2 $CellContext`S34 + $CellContext`T + 
+                 2 $CellContext`U) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[4]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`ec[5]] + 
+               2 ((-3) $CellContext`MH^2 + 
+                 2 $CellContext`S34 + $CellContext`T + 
+                 2 $CellContext`U) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[5]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[2]] + 8 ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])) + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])) - $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[
+                 4]] (((-3) $CellContext`MH^2 + 
+                  4 $CellContext`S34 + $CellContext`T) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[2]] + 
+                2 ($CellContext`S - $CellContext`S34 - $CellContext`T14 + \
+$CellContext`U) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[
+                   3]] + ((-3) $CellContext`MH^2 + $CellContext`T + 
+                  4 $CellContext`U) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[4]])) + 
+             Rational[
+               1, 2] ($CellContext`MH^2 - $CellContext`T)^(-2) \
+(-$CellContext`MH^2 + $CellContext`T - $CellContext`MH^2 
+               X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MH^2 
+                X`DiscB[$CellContext`T, $CellContext`MT, $CellContext`MT] - \
+$CellContext`MT^2 
+               Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                   2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 + $CellContext`MT^2 
+                Log[Rational[1, 2] $CellContext`MT^(-2) (
+                    2 $CellContext`MT^2 - $CellContext`T + ($CellContext`T \
+((-4) $CellContext`MT^2 + $CellContext`T))^
+                    Rational[1, 2])]^2) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[
+                3]] ((-2) (-$CellContext`MH^2 + 
+                 2 $CellContext`S + $CellContext`T + 
+                 2 $CellContext`T14) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[4]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`ec[5]] - 
+               2 (-$CellContext`MH^2 + 2 $CellContext`S + $CellContext`T + 
+                2 $CellContext`T14) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[5]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[2]] + 8 (-$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] (-$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]])) - $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[
+                 4]] (((-3) $CellContext`MH^2 + 
+                  4 $CellContext`S34 + $CellContext`T + 
+                  2 $CellContext`T24) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[2]] + 
+                2 ($CellContext`S - $CellContext`S34 - $CellContext`T14 + \
+$CellContext`U) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[
+                   3]] + ((-3) $CellContext`MH^2 + $CellContext`T + 
+                  2 $CellContext`T24 + 4 $CellContext`U) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[4]]))) - 
+           4 ($CellContext`MH^2 - $CellContext`T)^(-1) (
+            X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - 
+            X`DiscB[$CellContext`T, $CellContext`MT, $CellContext`MT]) ((-2) \
+(((-5) $CellContext`MH^2 + 4 $CellContext`S34 + $CellContext`T + 
+                2 $CellContext`T24 + 4 $CellContext`U) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[3]] + 
+              2 ($CellContext`MH^2 - $CellContext`T) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[5]]) $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`k[4]] $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`ec[5]] - 
+            2 (((-5) $CellContext`MH^2 + 4 $CellContext`S34 + $CellContext`T + 
+               2 $CellContext`T24 + 4 $CellContext`U) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[3]] + 
+             2 ($CellContext`MH^2 - $CellContext`T) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[5]]) $CellContext`Pair[
+              $CellContext`e[2], 
+              $CellContext`ec[5]] $CellContext`Pair[
+              $CellContext`ec[4], 
+              $CellContext`k[2]] + $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[
+               5]] (-($CellContext`MH^2 - $CellContext`T) ($CellContext`S - \
+$CellContext`S34 - $CellContext`T14 + $CellContext`U) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[4]] + 
+              4 ($CellContext`MH^2 - $CellContext`T) ($CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[5]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[2]] + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[4]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[5]])) - 
+            4 ($CellContext`MH^2 - $CellContext`T) $CellContext`Pair[
+              $CellContext`e[1], 
+              $CellContext`ec[4]] $CellContext`Pair[
+              $CellContext`e[2], 
+              $CellContext`k[4]] ($CellContext`Pair[
+               $CellContext`ec[5], 
+               $CellContext`k[1]] - $CellContext`Pair[
+              $CellContext`ec[5], 
+              $CellContext`k[3]]) - 
+            4 ($CellContext`MH^2 - $CellContext`T) $CellContext`Pair[
+              $CellContext`e[1], 
+              $CellContext`e[2]] $CellContext`Pair[
+              $CellContext`ec[4], 
+              $CellContext`k[2]] ($CellContext`Pair[
+               $CellContext`ec[5], 
+               $CellContext`k[1]] - $CellContext`Pair[
+              $CellContext`ec[5], 
+              $CellContext`k[3]]) - 16 $CellContext`Pair[
+              $CellContext`e[1], 
+              $CellContext`k[3]] ($CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[5]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[2]] $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[3]] + $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[4]] ($CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[3]] + $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]] ($CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[2]] - $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[4]])) + $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[3]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[2]] ($CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[2]] - $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[4]])) - $CellContext`Pair[
+              $CellContext`e[2], 
+              $CellContext`ec[4]] ($CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[
+                3]] ((7 $CellContext`MH^2 - 8 $CellContext`S34 - 
+                 3 $CellContext`T - 2 $CellContext`T24) $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[2]] + 
+               4 ((-2) $CellContext`MH^2 + 
+                 2 $CellContext`S34 + $CellContext`T + 
+                 2 $CellContext`T14 + $CellContext`T24) $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[3]] + (7 $CellContext`MH^2 - 
+                 3 $CellContext`T - 2 $CellContext`T24 - 
+                 8 $CellContext`U) $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[4]]) + 
+             4 ($CellContext`MH^2 - $CellContext`T) ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[4]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[2]] - $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[2]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[
+                 4]])))) - ($CellContext`MH^2 - $CellContext`S - \
+$CellContext`T - $CellContext`T14)^(-1) ((-2) (((-$CellContext`S34 \
+$CellContext`T + $CellContext`S34 $CellContext`T14 + $CellContext`MH^2 \
+($CellContext`S34 - $CellContext`U) + $CellContext`T $CellContext`U + \
+$CellContext`T14 $CellContext`U - $CellContext`S ($CellContext`S34 + \
+$CellContext`U)) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[5]] $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[4]] - 
+              4 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[5]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[4]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`ec[5]] - 
+              4 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[5]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[5]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[2]] + 4 $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[
+                 5]] ((($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    1]] + (-$CellContext`MH^2 + $CellContext`T) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]]) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[2]] + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[
+                   4]] (($CellContext`S34 + $CellContext`U) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[
+                    1]] + (-$CellContext`MH^2 + $CellContext`T) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]])) - 
+              4 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[4]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[4]] $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[1]] - 
+              4 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`e[2]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[2]] $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[1]] + 8 ($CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[2]] + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[4]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]]) ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]]) + ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]]) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]]) + 4 $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[4]] ($CellContext`U $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[2]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] + $CellContext`S34 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[5]] ($CellContext`U $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`S34 $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]))) 
+             X`ScalarC0[$CellContext`MH^2, $CellContext`MH^2 - 
+               4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24, $CellContext`MT, $CellContext`MT, $CellContext`MT] + (
+               16 $CellContext`MT^4 + $CellContext`T^2 + $CellContext`T14^2 - 
+               4 $CellContext`MH^2 $CellContext`T24 + 
+               2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+               2 $CellContext`T ($CellContext`T14 + $CellContext`T24) + 
+               
+               8 $CellContext`MT^2 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24))^(-1) ((-$CellContext`S34^2 - 
+                4 $CellContext`S34 $CellContext`T + 
+                2 $CellContext`S34 $CellContext`T14 + 
+                4 $CellContext`MH^2 ($CellContext`S34 - $CellContext`U) + 
+                4 $CellContext`T $CellContext`U + 
+                2 $CellContext`T14 $CellContext`U + $CellContext`U^2 - 
+                2 $CellContext`S ($CellContext`S34 + $CellContext`U)) \
+$CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[5]] $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[4]] - 
+              8 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[5]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[4]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`ec[5]] - 
+              8 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[5]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[5]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[2]] + 4 $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[
+                 5]] ((2 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    1]] + ((-4) $CellContext`MH^2 + $CellContext`S34 + 
+                    4 $CellContext`T + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]]) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[2]] + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[4]] (
+                  2 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[
+                    1]] + ((-4) $CellContext`MH^2 + $CellContext`S34 + 
+                    4 $CellContext`T + $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]])) - 
+              8 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[4]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[4]] $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[1]] - 
+              8 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`e[2]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[2]] $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[1]] + 32 ($CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[2]] + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[4]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]]) ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]]) + ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]]) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]]) + 4 $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[4]] (
+                2 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[2]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[
+                   1]] + ((-3) $CellContext`S34 + $CellContext`U) \
+$CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[5]] (
+                  2 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    2]] + ((-3) $CellContext`S34 + $CellContext`U) \
+$CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]))) ((2 $CellContext`MH^2 - 
+                4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14 - \
+$CellContext`T24) 
+               X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - 
+              2 ($CellContext`MH^2 - 
+               4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14) 
+              X`DiscB[$CellContext`MH^2 - 
+                4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`MT, $CellContext`MT] - (
+               4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 - \
+$CellContext`T24) 
+              X`DiscB[$CellContext`T24, $CellContext`MT, $CellContext`MT] + \
+($CellContext`MH^2 - 
+                4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14) (
+                4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24) 
+               X`ScalarC0[$CellContext`MH^2, $CellContext`MH^2 - 
+                 4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24, $CellContext`MT, $CellContext`MT, $CellContext`MT])) + (
+            8 $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`k[5]] ($CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[4]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`ec[5]] + $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[5]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[2]]) + $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[
+               5]] ((2 $CellContext`S - $CellContext`S34 - 
+                2 $CellContext`T14 + $CellContext`U) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[4]] - 4 (($CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[5]]) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[2]] + $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[4]] ($CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[5]]))) + 8 ($CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[4]] $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[4]] + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`e[2]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[2]]) $CellContext`Pair[
+               $CellContext`ec[5], 
+               $CellContext`k[1]] - 4 $CellContext`Pair[
+              $CellContext`e[2], 
+              $CellContext`ec[4]] ($CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[2]] $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[1]] + $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[4]] $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[1]] + $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[5]] ($CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[2]] + $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[4]]))) (
+            2 (2 + X`Eps^(-1) + 
+              X`DiscB[$CellContext`T24, $CellContext`MT, $CellContext`MT] + 
+              Log[$CellContext`MT^(-2) X`Mu^2]) - 
+            2 (16 $CellContext`MT^4 + $CellContext`T^2 + $CellContext`T14^2 - 
+              4 $CellContext`MH^2 $CellContext`T24 + 
+              2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+              2 $CellContext`T ($CellContext`T14 + $CellContext`T24) + 
+              8 $CellContext`MT^2 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24))^(-1) (
+             3 (16 $CellContext`MT^4 + $CellContext`T^2 + $CellContext`T14^2 - 
+               4 $CellContext`MH^2 $CellContext`T24 + 
+               2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+               2 $CellContext`T ($CellContext`T14 + $CellContext`T24) + 
+               8 $CellContext`MT^2 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24)) + 
+             X`Eps^(-1) (
+               16 $CellContext`MT^4 + $CellContext`T^2 + $CellContext`T14^2 - 
+               4 $CellContext`MH^2 $CellContext`T24 + 
+               2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+               2 $CellContext`T ($CellContext`T14 + $CellContext`T24) + 
+               8 $CellContext`MT^2 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24)) + $CellContext`MH^2 (
+               4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 - \
+$CellContext`T24) 
+              X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - \
+($CellContext`MH^2 - 
+              4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14) (
+              4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24) 
+             X`DiscB[$CellContext`MH^2 - 
+               4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`MT, $CellContext`MT] - (2 $CellContext`MH^2 - 
+              4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14 - \
+$CellContext`T24) $CellContext`T24 
+             X`DiscB[$CellContext`T24, $CellContext`MT, $CellContext`MT] + (
+               16 $CellContext`MT^4 + $CellContext`T^2 + $CellContext`T14^2 - 
+               4 $CellContext`MH^2 $CellContext`T24 + 
+               2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+               2 $CellContext`T ($CellContext`T14 + $CellContext`T24) + 
+               8 $CellContext`MT^2 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24)) Log[$CellContext`MT^(-2) X`Mu^2] + 
+             2 (16 $CellContext`MT^6 + $CellContext`MH^2 ($CellContext`MH^2 - \
+$CellContext`T - $CellContext`T14) $CellContext`T24 + 
+               8 $CellContext`MT^4 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24) + $CellContext`MT^2 ($CellContext`T^2 + $CellContext`T14^2 - 
+                 8 $CellContext`MH^2 $CellContext`T24 + 
+                 2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+                 2 $CellContext`T ($CellContext`T14 + $CellContext`T24))) 
+              X`ScalarC0[$CellContext`MH^2, $CellContext`MH^2 - 
+                4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24, $CellContext`MT, $CellContext`MT, $CellContext`MT])) - 
+          4 ((16 $CellContext`MT^4 + $CellContext`T^2 + $CellContext`T14^2 - 
+              4 $CellContext`MH^2 $CellContext`T24 + 
+              2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+              2 $CellContext`T ($CellContext`T14 + $CellContext`T24) + 
+              8 $CellContext`MT^2 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24))^(-1) ((-$CellContext`S34^2 - 
+               2 $CellContext`S34 $CellContext`T - $CellContext`S34 \
+$CellContext`T24 + 2 $CellContext`T14 $CellContext`T24 - 
+               2 $CellContext`S (
+                2 $CellContext`S34 + $CellContext`T24) + $CellContext`MH^2 (
+                 2 $CellContext`S + 3 $CellContext`S34 - 2 $CellContext`T14 - 
+                 3 $CellContext`U) + 2 $CellContext`T $CellContext`U + 
+               
+               4 $CellContext`T14 $CellContext`U + $CellContext`T24 \
+$CellContext`U + $CellContext`U^2) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[5]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[4]] - 
+             8 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T24 + \
+$CellContext`U) $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`k[5]] $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`k[4]] $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`ec[5]] - 
+             8 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T24 + \
+$CellContext`U) $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`k[5]] $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[5]] $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`k[2]] - 
+             4 ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T24 - \
+$CellContext`U) $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[5]] ((2 $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[1]] - $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[3]]) $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[2]] + $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[4]] (2 $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] - $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[3]])) - 
+             8 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T24 + \
+$CellContext`U) $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[4]] $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`k[4]] $CellContext`Pair[
+               $CellContext`ec[5], 
+               $CellContext`k[1]] - 
+             8 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T24 + \
+$CellContext`U) $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`e[2]] $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`k[2]] $CellContext`Pair[
+               $CellContext`ec[5], 
+               $CellContext`k[1]] + 4 $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[
+                4]] ((-$CellContext`MH^2 + 
+                 2 $CellContext`S34 + $CellContext`T24) $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[2]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[
+                  1]] + (-$CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[3]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[1]] - $CellContext`MH^2 $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[4]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[1]] + $CellContext`T24 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[4]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[1]] + 2 $CellContext`U $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[4]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[1]] - $CellContext`MH^2 $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[5]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[2]] + 2 $CellContext`S34 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[2]] + $CellContext`T24 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[2]] - $CellContext`S34 $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[5]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[3]] + $CellContext`U $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[3]] - $CellContext`MH^2 $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[5]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[4]] + $CellContext`T24 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[4]] + 2 $CellContext`U $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[4]])) ((-2) $CellContext`MH^2 
+              X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + (
+               2 $CellContext`MH^2 - 
+               4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14 - \
+$CellContext`T24) 
+              X`DiscB[$CellContext`MH^2 - 
+                4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`MT, $CellContext`MT] + 
+             4 $CellContext`MT^2 
+              X`DiscB[$CellContext`T24, $CellContext`MT, $CellContext`MT] + \
+$CellContext`T 
+              X`DiscB[$CellContext`T24, $CellContext`MT, $CellContext`MT] + \
+$CellContext`T14 
+              X`DiscB[$CellContext`T24, $CellContext`MT, $CellContext`MT] + \
+$CellContext`T24 X`DiscB[$CellContext`T24, $CellContext`MT, $CellContext`MT] - 
+             4 $CellContext`MH^2 $CellContext`MT^2 
+             X`ScalarC0[$CellContext`MH^2, $CellContext`MH^2 - 
+               4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24, $CellContext`MT, $CellContext`MT, $CellContext`MT] - \
+$CellContext`MH^2 $CellContext`T 
+             X`ScalarC0[$CellContext`MH^2, $CellContext`MH^2 - 
+               4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24, $CellContext`MT, $CellContext`MT, $CellContext`MT] - \
+$CellContext`MH^2 $CellContext`T14 
+             X`ScalarC0[$CellContext`MH^2, $CellContext`MH^2 - 
+               4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24, $CellContext`MT, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MH^2 $CellContext`T24 
+              X`ScalarC0[$CellContext`MH^2, $CellContext`MH^2 - 
+                4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24, $CellContext`MT, $CellContext`MT, $CellContext`MT]) + 
+           Rational[
+             1, 2] (16 $CellContext`MT^4 + $CellContext`T^2 + \
+$CellContext`T14^2 - 4 $CellContext`MH^2 $CellContext`T24 + 
+              2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+              2 $CellContext`T ($CellContext`T14 + $CellContext`T24) + 
+              8 $CellContext`MT^2 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24))^(-2) (-($CellContext`S34 - $CellContext`U) ((-2) \
+$CellContext`MH^2 + $CellContext`S34 + 
+               2 $CellContext`T + $CellContext`U) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[5]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[4]] - 
+             4 (2 $CellContext`MH^2 - $CellContext`S34 - 
+              2 $CellContext`T - $CellContext`U) $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[5]] ($CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[3]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[2]] + $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[4]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[3]]) - 
+             4 ($CellContext`S34 - $CellContext`U) $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[4]] ($CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[3]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[1]] + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[5]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[3]]) + 16 ($CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[3]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[2]] + $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[4]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]]) ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[3]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[1]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[3]])) ((-2) ($CellContext`MH^2 - 
+               4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14) \
+((-16) $CellContext`MT^4 - $CellContext`T^2 - $CellContext`T14^2 + 
+               4 $CellContext`MH^2 $CellContext`T24 - 
+               2 $CellContext`T14 $CellContext`T24 - $CellContext`T24^2 - 
+               2 $CellContext`T ($CellContext`T14 + $CellContext`T24) - 
+               8 $CellContext`MT^2 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24)) + ((
+                  4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^2 (12 $CellContext`MT^2 + 3 $CellContext`T + 
+                 3 $CellContext`T14 + $CellContext`T24) + 
+               2 $CellContext`MH^4 (12 $CellContext`MT^2 + 3 $CellContext`T + 
+                 3 $CellContext`T14 + 5 $CellContext`T24) - 
+               2 $CellContext`MH^2 (80 $CellContext`MT^4 + 5 $CellContext`T^2 + 
+                10 $CellContext`T $CellContext`T14 + 5 $CellContext`T14^2 + 
+                7 $CellContext`T $CellContext`T24 + 
+                7 $CellContext`T14 $CellContext`T24 + 4 $CellContext`T24^2 + 
+                4 $CellContext`MT^2 (10 $CellContext`T + 10 $CellContext`T14 + 
+                  7 $CellContext`T24))) 
+              X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - 
+             6 (-$CellContext`MH^2 + 
+               4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14)^2 (
+              4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24) 
+             X`DiscB[$CellContext`MH^2 - 
+               4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`MT, $CellContext`MT] - ((-192) $CellContext`MT^6 - 
+              3 $CellContext`T^3 - 9 $CellContext`T^2 $CellContext`T14 - 
+              9 $CellContext`T $CellContext`T14^2 - 3 $CellContext`T14^3 - 
+              16 $CellContext`MT^4 (9 $CellContext`T + 
+               9 $CellContext`T14 - $CellContext`T24) + 
+              4 $CellContext`MH^4 $CellContext`T24 + $CellContext`T^2 \
+$CellContext`T24 + 
+              2 $CellContext`T $CellContext`T14 $CellContext`T24 + \
+$CellContext`T14^2 $CellContext`T24 + 5 $CellContext`T $CellContext`T24^2 + 
+              5 $CellContext`T14 $CellContext`T24^2 + $CellContext`T24^3 - 
+              4 $CellContext`MT^2 (9 $CellContext`T^2 + 
+               18 $CellContext`T $CellContext`T14 + 9 $CellContext`T14^2 - 
+               2 $CellContext`T $CellContext`T24 - 
+               2 $CellContext`T14 $CellContext`T24 - 5 $CellContext`T24^2) + 
+              2 $CellContext`MH^2 (16 $CellContext`MT^4 + $CellContext`T^2 + 
+                2 $CellContext`T $CellContext`T14 + $CellContext`T14^2 + \
+$CellContext`MT^2 (8 $CellContext`T + 8 $CellContext`T14 - 
+                  4 $CellContext`T24) - $CellContext`T $CellContext`T24 - \
+$CellContext`T14 $CellContext`T24 - 4 $CellContext`T24^2)) 
+             X`DiscB[$CellContext`T24, $CellContext`MT, $CellContext`MT] + 
+             2 ($CellContext`MH^2 - 
+               4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14) (
+               2 $CellContext`MH^4 $CellContext`T24 - (
+                2 $CellContext`MT^2 + $CellContext`T + $CellContext`T14) (
+                 4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^2 + $CellContext`MH^2 (
+                 16 $CellContext`MT^4 + $CellContext`T^2 + 
+                 2 $CellContext`T $CellContext`T14 + $CellContext`T14^2 + 
+                 8 $CellContext`MT^2 ($CellContext`T + $CellContext`T14 - \
+$CellContext`T24) + $CellContext`T24^2)) 
+              X`ScalarC0[$CellContext`MH^2, $CellContext`MH^2 - 
+                4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24, $CellContext`MT, $CellContext`MT, $CellContext`MT]) + 
+           Rational[
+             1, 2] (16 $CellContext`MT^4 + $CellContext`T^2 + \
+$CellContext`T14^2 - 4 $CellContext`MH^2 $CellContext`T24 + 
+              2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+              2 $CellContext`T ($CellContext`T14 + $CellContext`T24) + 
+              8 $CellContext`MT^2 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24))^(-2) (-($CellContext`S34 - $CellContext`U) ((-2) \
+$CellContext`MH^2 + $CellContext`S34 + 
+               2 $CellContext`T + $CellContext`U) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[5]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[4]] - 
+             4 (2 $CellContext`MH^2 - $CellContext`S34 - 
+              2 $CellContext`T - $CellContext`U) $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[5]] ($CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[3]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[2]] + $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[4]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[3]]) + 16 ($CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[3]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[2]] + $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[4]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]]) ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[3]] ($CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] - $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[3]]) + ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[2]] - $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[4]]) $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[3]]) - 
+             4 ($CellContext`S34 - $CellContext`U) $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[4]] ($CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[3]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[1]] + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[5]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[3]])) ((2 $CellContext`MH^2 - 
+               4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14 - \
+$CellContext`T24) ((-16) $CellContext`MT^4 - $CellContext`T^2 - \
+$CellContext`T14^2 + 4 $CellContext`MH^2 $CellContext`T24 - 
+               2 $CellContext`T14 $CellContext`T24 - $CellContext`T24^2 - 
+               2 $CellContext`T ($CellContext`T14 + $CellContext`T24) - 
+               8 $CellContext`MT^2 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24)) - $CellContext`MH^2 ((-80) $CellContext`MT^4 - 
+              5 $CellContext`T^2 - 10 $CellContext`T $CellContext`T14 - 
+              5 $CellContext`T14^2 - 4 $CellContext`T $CellContext`T24 - 
+              4 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+              2 $CellContext`MH^2 (12 $CellContext`MT^2 + 3 $CellContext`T + 
+                3 $CellContext`T14 + $CellContext`T24) - 
+              8 $CellContext`MT^2 (5 $CellContext`T + 5 $CellContext`T14 + 
+               2 $CellContext`T24)) 
+             X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + \
+($CellContext`MH^2 - 
+               4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14) \
+($CellContext`MH^2 (24 $CellContext`MT^2 + 6 $CellContext`T + 
+                 6 $CellContext`T14 - 2 $CellContext`T24) - (
+                4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^2) 
+              X`DiscB[$CellContext`MH^2 - 
+                4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`MT, $CellContext`MT] + (
+               2 $CellContext`MH^2 (
+                  4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 - \
+$CellContext`T24)^2 + 
+               4 $CellContext`MH^4 $CellContext`T24 - (
+                4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14) (
+                 4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^2) 
+              X`DiscB[$CellContext`T24, $CellContext`MT, $CellContext`MT] - 
+             2 (2 $CellContext`MH^6 $CellContext`T24 - $CellContext`MT^2 (
+                4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^3 + $CellContext`MH^4 (
+                16 $CellContext`MT^4 + $CellContext`T^2 + 
+                2 $CellContext`T $CellContext`T14 + $CellContext`T14^2 + 
+                4 $CellContext`MT^2 (2 $CellContext`T + 2 $CellContext`T14 - 
+                  5 $CellContext`T24) - 3 $CellContext`T $CellContext`T24 - 
+                3 $CellContext`T14 $CellContext`T24 - 
+                2 $CellContext`T24^2) - $CellContext`MH^2 (
+               32 $CellContext`MT^6 + 
+               16 $CellContext`MT^4 (2 $CellContext`T + 2 $CellContext`T14 - 
+                 3 $CellContext`T24) + 
+               2 $CellContext`MT^2 (5 $CellContext`T^2 + 
+                 10 $CellContext`T $CellContext`T14 + 5 $CellContext`T14^2 - 
+                 8 $CellContext`T $CellContext`T24 - 
+                 8 $CellContext`T14 $CellContext`T24 - 
+                 7 $CellContext`T24^2) + ($CellContext`T + $CellContext`T14) \
+($CellContext`T^2 + 
+                 2 $CellContext`T $CellContext`T14 + $CellContext`T14^2 - \
+$CellContext`T $CellContext`T24 - $CellContext`T14 $CellContext`T24 - 
+                 2 $CellContext`T24^2))) 
+             X`ScalarC0[$CellContext`MH^2, $CellContext`MH^2 - 
+               4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24, $CellContext`MT, $CellContext`MT, $CellContext`MT])))) + \
+($CellContext`MH^2 - $CellContext`S - $CellContext`T24 - $CellContext`U)^(-1) \
+(-$CellContext`S34^(-1) (
+           4 (2 + X`Eps^(-1) + 
+             X`DiscB[$CellContext`S34, $CellContext`MT, $CellContext`MT] + 
+             Log[$CellContext`MT^(-2) X`Mu^2]) (4 ($CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[2]] - $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[5]]) $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[5]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`ec[5]] + 2 $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[5]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[5]] (2 $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[1]] - $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[3]]) - $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[5]] ($CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[5]] ((-4) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[2]] + $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]]) + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[2]] ($CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]] + 4 $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[5]])) + 4 ($CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[2]] - $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[5]]) $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[4]] $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[2]] + 2 $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`e[2]] (2 $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[1]] - $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[3]]) $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[2]] + $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[
+                4]] ((-$CellContext`MH^2 + 
+                 2 $CellContext`S + $CellContext`T + $CellContext`T14) \
+$CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[5]] - 4 ($CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[5]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[1]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[2]]))) - 
+           4 ($CellContext`MH^2 - $CellContext`S34)^(-1) (3 $CellContext`MH^2 + 
+            X`Eps^(-1) $CellContext`MH^2 - 3 $CellContext`S34 - 
+            X`Eps^(-1) $CellContext`S34 + $CellContext`MH^2 
+             X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - \
+$CellContext`S34 
+            X`DiscB[$CellContext`S34, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MT^2 
+             Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                 2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                   Rational[1, 2])]^2 + $CellContext`MH^2 
+             Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`S34 
+            Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`MT^2 
+            Log[Rational[1, 2] $CellContext`MT^(-2) (
+                2 $CellContext`MT^2 - $CellContext`S34 + ($CellContext`S34 \
+((-4) $CellContext`MT^2 + $CellContext`S34))^Rational[1, 2])]^2) (
+            4 ($CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[2]] - $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`k[5]]) $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`k[5]] $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`ec[5]] + 2 $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[5]] $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`k[5]] (2 $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[1]] - $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`k[3]]) - $CellContext`Pair[
+              $CellContext`e[2], 
+              $CellContext`ec[5]] ($CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[5]] ((-4) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[2]] + $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[3]]) + $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[2]] ($CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[3]] + 4 $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[5]])) + 4 ($CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[2]] - $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`k[5]]) $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[4]] $CellContext`Pair[
+               $CellContext`ec[5], 
+               $CellContext`k[2]] + 2 $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`e[2]] (2 $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[1]] - $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`k[3]]) $CellContext`Pair[
+               $CellContext`ec[5], 
+               $CellContext`k[2]] + $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[
+               4]] ((-$CellContext`MH^2 + 
+                2 $CellContext`S + $CellContext`T + $CellContext`T14) \
+$CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[5]] - 4 ($CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[1]] + $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[1]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[2]]))) + 
+           8 (Rational[
+               1, 2] ($CellContext`MH^2 - $CellContext`S34)^(-1) (-
+                X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + 
+               X`DiscB[$CellContext`S34, $CellContext`MT, $CellContext`MT]) \
+$CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[
+                3]] (-(((-2) $CellContext`MH^2 + 2 $CellContext`S34 + 
+                   4 $CellContext`T) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] - ($CellContext`MH^2 - 
+                  2 $CellContext`S + $CellContext`S34 + 2 $CellContext`T24 - 
+                  2 $CellContext`U) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[
+                   3]] + ((-3) $CellContext`MH^2 + $CellContext`S34 + 
+                   4 $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[5]] + 
+               2 (-$CellContext`MH^2 + $CellContext`S34 + 
+                 2 $CellContext`T) $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[5]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[5]] + 
+               2 (-$CellContext`MH^2 + $CellContext`S34 + 
+                 2 $CellContext`T) $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`e[2]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[2]] + 8 (-$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]))) + 
+             Rational[
+               1, 2] ($CellContext`MH^2 - $CellContext`S34)^(-2) \
+(-$CellContext`MH^2 + $CellContext`S34 - $CellContext`MH^2 
+               X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MH^2 
+                X`DiscB[$CellContext`S34, $CellContext`MT, $CellContext`MT] - \
+$CellContext`MT^2 
+               Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                   2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 + $CellContext`MT^2 
+                Log[Rational[1, 2] $CellContext`MT^(-2) (
+                    2 $CellContext`MT^2 - $CellContext`S34 + \
+($CellContext`S34 ((-4) $CellContext`MT^2 + $CellContext`S34))^
+                    Rational[1, 2])]^2) $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[
+                3]] ((((-2) $CellContext`MH^2 + 2 $CellContext`S34 + 
+                   4 $CellContext`T14) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[
+                    2]] + (-$CellContext`MH^2 + $CellContext`S34 + 
+                   4 $CellContext`T24) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] + ($CellContext`MH^2 + 
+                   2 $CellContext`S - $CellContext`S34 + 2 $CellContext`T24 - 
+                   2 $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[5]] + 
+               2 ($CellContext`MH^2 - $CellContext`S34 - 
+                 2 $CellContext`T14) $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[5]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[5]] + 
+               2 ($CellContext`MH^2 - $CellContext`S34 - 
+                 2 $CellContext`T14) $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`e[2]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[2]] + 8 (-$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])))) - 
+           4 ($CellContext`MH^2 - $CellContext`S34)^(-1) (
+            X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - 
+            X`DiscB[$CellContext`S34, $CellContext`MT, $CellContext`MT]) \
+(-$CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[5]] ($CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[
+                 2]] ((-4) ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] + 
+                2 ($CellContext`MH^2 - $CellContext`S34 - 2 $CellContext`T + 
+                  2 $CellContext`T14) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]]) + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[
+                 4]] ((-4) ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[2]] + (5 $CellContext`MH^2 + 
+                  2 $CellContext`S - 3 $CellContext`S34 + 2 $CellContext`T24 - 
+                  6 $CellContext`U) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]]) + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[
+                 3]] ((-4) ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[2]] + ($CellContext`MH^2 - 
+                  2 $CellContext`S + $CellContext`S34 + 6 $CellContext`T24 - 
+                  2 $CellContext`U) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]])) + $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[
+               4]] (($CellContext`MH^2 - $CellContext`S34) ($CellContext`MH^2 - 
+                2 $CellContext`S - $CellContext`T - $CellContext`T14) \
+$CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[5]] + 
+              4 ($CellContext`MH^2 - $CellContext`S34) ($CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[5]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[1]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[2]])) + 
+            2 ((-2) ($CellContext`MH^2 - $CellContext`S34) \
+($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[2]] - $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[5]]) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[5]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`ec[5]] + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[5]] $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[
+                 5]] ((-2) ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] + ($CellContext`MH^2 - $CellContext`S34 - 
+                  2 $CellContext`T + 2 $CellContext`T14) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]]) - 
+              2 ($CellContext`MH^2 - $CellContext`S34) ($CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[2]] - $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[5]]) $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[4]] $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[2]] + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`e[
+                 2]] ((-2) ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] + ($CellContext`MH^2 - $CellContext`S34 - 
+                  2 $CellContext`T + 2 $CellContext`T14) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]]) $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[2]] - 8 $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[3]] (-$CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[4]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    4]])))) - ($CellContext`MH^2 - $CellContext`S34)^(-1) (
+            Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                   4 $CellContext`MT^2)^Rational[1, 2])]^2 - 
+            Log[Rational[1, 2] $CellContext`MT^(-2) (
+               2 $CellContext`MT^2 - $CellContext`S34 + ($CellContext`S34 \
+((-4) $CellContext`MT^2 + $CellContext`S34))^
+                Rational[1, 2])]^2) ($CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[
+               4]] (($CellContext`MH^2 - $CellContext`S34) ($CellContext`MH^2 - 
+                2 $CellContext`S - $CellContext`T - $CellContext`T14) \
+$CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[5]] + 
+              4 ($CellContext`MH^2 - $CellContext`S34) ($CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[5]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[1]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[2]])) - 
+            2 (2 ($CellContext`MH^2 - $CellContext`S34) ($CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[2]] - $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[5]]) $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[5]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`ec[5]] - 2 $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[5]] $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`k[
+               5]] ((-$CellContext`MH^2 + $CellContext`S34) \
+$CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[1]] + $CellContext`T14 $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[3]]) + $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[5]] ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[
+                  2]] ((-2) ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + 
+                 2 $CellContext`T14 $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[
+                  3]] ((-2) ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + 
+                 2 $CellContext`T24 $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[
+                  4]] ((-2) ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[
+                    2]] + ($CellContext`MH^2 + $CellContext`S - \
+$CellContext`S34 + $CellContext`T24 - $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]])) + 
+             2 ($CellContext`MH^2 - $CellContext`S34) ($CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[2]] - $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[5]]) $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[4]] $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[2]] - 2 $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`e[
+               2]] ((-$CellContext`MH^2 + $CellContext`S34) \
+$CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[1]] + $CellContext`T14 $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[3]]) $CellContext`Pair[
+               $CellContext`ec[5], 
+               $CellContext`k[2]] + 4 $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[3]] (-$CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[4]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]))))) + $CellContext`T^(-1) (
+           4 (2 + X`Eps^(-1) + 
+             X`DiscB[$CellContext`T, $CellContext`MT, $CellContext`MT] + 
+             Log[$CellContext`MT^(-2) X`Mu^2]) ($CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[5]] ((-4) $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[2]] + 4 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[2]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[5]] - $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[3]] ($CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[2]] + $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[5]])) - 2 (($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[3]] + 2 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]]) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[5]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`ec[5]] + 2 $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[5]] $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[5]] ($CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[1]] - $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[3]]) + (($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] + 2 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`ec[4]] + 2 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`e[2]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]])) $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[2]]) + $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[
+                4]] ((-$CellContext`MH^2 + $CellContext`S34 + \
+$CellContext`T14 + 2 $CellContext`T24) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[5]] + 4 ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]))) - 
+           4 ($CellContext`MH^2 - $CellContext`T)^(-1) (3 $CellContext`MH^2 + 
+            X`Eps^(-1) $CellContext`MH^2 - 3 $CellContext`T - 
+            X`Eps^(-1) $CellContext`T + $CellContext`MH^2 
+             X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - \
+$CellContext`T 
+            X`DiscB[$CellContext`T, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MT^2 
+             Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                 2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                   Rational[1, 2])]^2 + $CellContext`MH^2 
+             Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`T 
+            Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`MT^2 
+            Log[Rational[1, 2] $CellContext`MT^(-2) (
+                2 $CellContext`MT^2 - $CellContext`T + ($CellContext`T ((-4) \
+$CellContext`MT^2 + $CellContext`T))^Rational[1, 2])]^2) ($CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[5]] ((-4) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[5]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[2]] + 4 $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[2]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[5]] - $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[3]] ($CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[2]] + $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[5]])) - 2 (($CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[3]] + 2 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[4]]) $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[5]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`ec[5]] + 2 $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[5]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[5]] ($CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[1]] - $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[3]]) + (($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] + 2 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] + 2 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`e[2]] ($CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] - $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]])) $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[2]]) + $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[
+               4]] ((-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T14 + 
+                2 $CellContext`T24) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[5]] + 4 ($CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[4]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[2]] + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[5]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[
+                   4]]))) - ($CellContext`MH^2 - $CellContext`T)^(-1) (
+            Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                   4 $CellContext`MT^2)^Rational[1, 2])]^2 - 
+            Log[Rational[1, 2] $CellContext`MT^(-2) (
+               2 $CellContext`MT^2 - $CellContext`T + ($CellContext`T ((-4) \
+$CellContext`MT^2 + $CellContext`T))^Rational[1, 2])]^2) (
+            4 ($CellContext`T14 $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[
+                 3]] + ($CellContext`MH^2 - $CellContext`T) \
+$CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[4]]) $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`k[5]] $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`ec[5]] + 
+            4 ($CellContext`MH^2 - $CellContext`T) $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[5]] $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`k[5]] ($CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[1]] - $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`k[3]]) + 2 $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[5]] (
+              2 (-$CellContext`MH^2 + $CellContext`T) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[4]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[2]] - 
+              2 ($CellContext`MH^2 - $CellContext`T) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[2]] ($CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[1]] - $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[3]]) + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[
+                 3]] ((-$CellContext`MH^2 + 
+                  2 $CellContext`S + $CellContext`S34 + $CellContext`T14 + 
+                  2 $CellContext`T24) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] - 
+                2 ($CellContext`T14 $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`S $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]))) + 
+            4 ($CellContext`T14 $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[
+                 3]] + ($CellContext`MH^2 - $CellContext`T) \
+$CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[4]]) $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[4]] $CellContext`Pair[
+               $CellContext`ec[5], 
+               $CellContext`k[2]] + 
+            4 ($CellContext`MH^2 - $CellContext`T) $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`e[2]] ($CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[1]] - $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`k[3]]) $CellContext`Pair[
+               $CellContext`ec[5], 
+               $CellContext`k[2]] + $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[
+               4]] (($CellContext`MH^2 - $CellContext`T) ($CellContext`MH^2 - \
+$CellContext`S34 - $CellContext`T14 - 2 $CellContext`T24) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[5]] - 
+              4 ($CellContext`MH^2 - $CellContext`T) ($CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[4]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[2]] + $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[4]])) + 8 $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`k[3]] (($CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[4]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[5]])) $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[2]] + $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[5]] ($CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[2]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] - $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[4]]))) - 
+           4 ($CellContext`MH^2 - $CellContext`T)^(-1) (
+            X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - 
+            X`DiscB[$CellContext`T, $CellContext`MT, $CellContext`MT]) (
+            2 (($CellContext`MH^2 - 2 $CellContext`S34 - $CellContext`T + 
+                2 $CellContext`T14) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[3]] + 
+              2 ($CellContext`MH^2 - $CellContext`T) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[4]]) $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`k[5]] $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`ec[5]] + 
+            4 ($CellContext`MH^2 - $CellContext`T) $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[5]] $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`k[5]] ($CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[1]] - $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`k[3]]) + $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[5]] (
+              4 (-$CellContext`MH^2 + $CellContext`T) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[4]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[2]] - 
+              4 ($CellContext`MH^2 - $CellContext`T) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[2]] ($CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[1]] - $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[3]]) + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[
+                 3]] ((9 $CellContext`MH^2 - 2 $CellContext`S34 - 
+                  5 $CellContext`T - 2 $CellContext`T14 - 
+                  8 $CellContext`U) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] - 
+                2 ($CellContext`MH^2 - 2 $CellContext`S34 - $CellContext`T + 
+                 2 $CellContext`T14) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[2]] + (3 $CellContext`MH^2 - 
+                  8 $CellContext`S - 2 $CellContext`S34 - 3 $CellContext`T - 
+                  2 $CellContext`T14) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]])) + 
+            2 (($CellContext`MH^2 - 2 $CellContext`S34 - $CellContext`T + 
+                2 $CellContext`T14) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[3]] + 
+              2 ($CellContext`MH^2 - $CellContext`T) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[4]]) $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[4]] $CellContext`Pair[
+               $CellContext`ec[5], 
+               $CellContext`k[2]] + 
+            4 ($CellContext`MH^2 - $CellContext`T) $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`e[2]] ($CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[1]] - $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`k[3]]) $CellContext`Pair[
+               $CellContext`ec[5], 
+               $CellContext`k[2]] + $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[
+               4]] (($CellContext`MH^2 - $CellContext`T) ($CellContext`MH^2 - \
+$CellContext`S34 - $CellContext`T14 - 2 $CellContext`T24) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[5]] - 
+              4 ($CellContext`MH^2 - $CellContext`T) ($CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[4]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[2]] + $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[4]])) + 16 $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`k[3]] ($CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[4]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[3]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[2]] + $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[3]] ($CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[2]] - $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[5]]) $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[2]] + $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[5]] ($CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[2]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]] - $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[3]] + $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[4]]))) - 
+           8 (Rational[
+              1, 2] ($CellContext`MH^2 - $CellContext`T)^(-2) \
+(-$CellContext`MH^2 + $CellContext`T - $CellContext`MH^2 
+              X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MH^2 
+               X`DiscB[$CellContext`T, $CellContext`MT, $CellContext`MT] - \
+$CellContext`MT^2 
+              Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                  2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 + $CellContext`MT^2 
+               Log[Rational[1, 2] $CellContext`MT^(-2) (
+                   2 $CellContext`MT^2 - $CellContext`T + ($CellContext`T \
+((-4) $CellContext`MT^2 + $CellContext`T))^
+                    Rational[1, 2])]^2) $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`k[3]] (
+              2 (-$CellContext`MH^2 + $CellContext`T + 
+                2 $CellContext`T14) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[5]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`ec[5]] + $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[
+                 5]] (((-3) $CellContext`MH^2 + 
+                  2 $CellContext`S34 + $CellContext`T - 2 $CellContext`T14 + 
+                  4 $CellContext`U) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[2]] + 
+                2 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T14 + 
+                  2 $CellContext`T24) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]] + (5 $CellContext`MH^2 - 
+                  2 $CellContext`S34 - 3 $CellContext`T - 2 $CellContext`T14 - 
+                  4 $CellContext`U) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[5]]) + 
+              2 (-$CellContext`MH^2 + $CellContext`T + 
+                2 $CellContext`T14) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[4]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[2]] + 8 ((-$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[2]] + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[5]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]))) + 
+            Rational[
+              1, 2] ($CellContext`MH^2 - $CellContext`T)^(-1) (-
+               X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + 
+              X`DiscB[$CellContext`T, $CellContext`MT, $CellContext`MT]) \
+$CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`k[3]] (
+              2 ($CellContext`MH^2 - 
+                2 $CellContext`S34 - $CellContext`T) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[5]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`ec[5]] + $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[
+                 5]] (((-5) $CellContext`MH^2 + 4 $CellContext`S34 + 
+                  3 $CellContext`T + 4 $CellContext`U) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[2]] + 
+                2 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T14 + 
+                  2 $CellContext`T24) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]] + (3 $CellContext`MH^2 - $CellContext`T - 
+                  4 $CellContext`U) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[5]]) + 
+              2 ($CellContext`MH^2 - 
+                2 $CellContext`S34 - $CellContext`T) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[4]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[2]] + 8 ($CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[4]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[2]] + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[5]]) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[2]] + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[5]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]))))) + $CellContext`T14^(-1) (
+           4 $CellContext`T14 (16 $CellContext`MT^4 - 
+              4 $CellContext`MH^2 $CellContext`T14 + 
+              8 $CellContext`MT^2 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2)^(-1) ((-4) $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[5]] ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[2]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[1]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[1]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[4]] ($CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[2]] + $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[5]])) + 8 $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[1]] ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[5]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[5]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`e[2]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[2]]) + 8 $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[4]] ($CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`ec[5]] + $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[2]]) + $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[
+                4]] ((2 $CellContext`S - $CellContext`S34 + $CellContext`T - 
+                 2 $CellContext`T24) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[5]] - 4 (($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[2]] + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[5]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])))) (
+             2 $CellContext`MH^2 
+              X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - (
+              
+              4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) X`DiscB[$CellContext`T14, $CellContext`MT, $CellContext`MT] - 
+             2 $CellContext`MH^2 
+             X`DiscB[$CellContext`MH^2 - 
+               4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT] + 
+             4 $CellContext`MT^2 
+              X`DiscB[$CellContext`MH^2 - 
+                4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT] + $CellContext`T14 
+              X`DiscB[$CellContext`MH^2 - 
+                4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT] + $CellContext`T24 
+              X`DiscB[$CellContext`MH^2 - 
+                4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT] + $CellContext`U 
+              X`DiscB[$CellContext`MH^2 - 
+                4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT] + 
+             4 $CellContext`MH^2 $CellContext`MT^2 
+              X`ScalarC0[$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+                4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT, $CellContext`MT] - $CellContext`MH^2 \
+$CellContext`T14 
+             X`ScalarC0[$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+               4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT, $CellContext`MT] + $CellContext`MH^2 \
+$CellContext`T24 
+              X`ScalarC0[$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+                4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT, $CellContext`MT] + $CellContext`MH^2 \
+$CellContext`U 
+              X`ScalarC0[$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+                4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT, $CellContext`MT]) - 
+           2 (16 $CellContext`MT^4 - 4 $CellContext`MH^2 $CellContext`T14 + 
+             8 $CellContext`MT^2 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2)^(-1) ((
+              4 $CellContext`S $CellContext`S34 - $CellContext`S34^2 + \
+$CellContext`T^2 + 2 $CellContext`S34 $CellContext`T14 - 
+              2 $CellContext`T $CellContext`T14 - 
+              2 $CellContext`MH^2 (
+               2 $CellContext`S - $CellContext`S34 + $CellContext`T - 
+               2 $CellContext`T24) - 4 $CellContext`T $CellContext`T24 - 
+              2 $CellContext`S34 $CellContext`U + 
+              2 $CellContext`T $CellContext`U) $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[4]] $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[5]] + 
+            8 ((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T) \
+$CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`k[4]] $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`k[5]] $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`ec[5]] + 
+            8 ((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T) \
+$CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[5]] $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`k[5]] $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`k[1]] - 4 $CellContext`Pair[
+              $CellContext`e[2], 
+              $CellContext`ec[5]] (
+             2 ((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T) \
+$CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[2]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[1]] + (6 $CellContext`MH^2 - 
+               3 $CellContext`S34 - 3 $CellContext`T - 
+               4 $CellContext`U) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[3]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[1]] + $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[4]] (
+               2 ((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T) \
+$CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[2]] + (6 $CellContext`MH^2 - 
+                 3 $CellContext`S34 - 3 $CellContext`T - 
+                 4 $CellContext`U) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]])) + 
+            8 ((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T) \
+$CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`k[4]] $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[4]] $CellContext`Pair[
+               $CellContext`ec[5], 
+               $CellContext`k[2]] + 
+            8 ((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T) \
+$CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`e[2]] $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`k[1]] $CellContext`Pair[
+               $CellContext`ec[5], 
+               $CellContext`k[2]] + 32 ($CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[3]] ($CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[1]] - $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[3]]) + ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[2]] - $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[5]]) $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[3]]) ($CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[3]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[2]] + $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[5]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[3]]) - 4 $CellContext`Pair[
+              $CellContext`e[1], 
+              $CellContext`ec[
+              4]] (((-2) ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[
+                  1]] + ($CellContext`S34 - $CellContext`T) \
+$CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[3]] + 
+               2 (-$CellContext`MH^2 + $CellContext`T) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[4]]) $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[2]] + $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[
+                5]] ((-2) ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[
+                  1]] + ($CellContext`S34 - $CellContext`T) \
+$CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[3]] + 
+               2 (-$CellContext`MH^2 + $CellContext`T) $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[4]]))) (-(
+              4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + 
+            2 $CellContext`T14 
+             X`DiscB[$CellContext`T14, $CellContext`MT, $CellContext`MT] + 
+            4 $CellContext`MT^2 
+             X`DiscB[$CellContext`MH^2 - 
+               4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT] - $CellContext`T14 
+            X`DiscB[$CellContext`MH^2 - 
+              4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT] + $CellContext`T24 
+             X`DiscB[$CellContext`MH^2 - 
+               4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT] + $CellContext`U 
+             X`DiscB[$CellContext`MH^2 - 
+               4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT] - 2 $CellContext`MH^2 $CellContext`T14 
+            X`ScalarC0[$CellContext`MH^2, $CellContext`T14, $CellContext`MH^2 - 
+              4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT, $CellContext`MT] + 
+            4 $CellContext`MT^2 $CellContext`T14 
+             X`ScalarC0[$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+               4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT, $CellContext`MT] + $CellContext`T14^2 
+             X`ScalarC0[$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+               4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT, $CellContext`MT] + $CellContext`T14 \
+$CellContext`T24 
+             X`ScalarC0[$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+               4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT, $CellContext`MT] + $CellContext`T14 \
+$CellContext`U 
+             X`ScalarC0[$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+               4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT, $CellContext`MT]) + 
+           2 (16 $CellContext`MT^4 - 4 $CellContext`MH^2 $CellContext`T14 + 
+              8 $CellContext`MT^2 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2)^(-1) ((-4) $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[5]] ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[2]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[1]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[1]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[4]] ($CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[2]] + $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[5]])) + 8 $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[1]] ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[5]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[5]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`e[2]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[2]]) + 8 $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[4]] ($CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`ec[5]] + $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[2]]) + $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[
+                4]] ((2 $CellContext`S - $CellContext`S34 + $CellContext`T - 
+                 2 $CellContext`T24) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[5]] - 4 (($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[2]] + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[5]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])))) (
+             3 (16 $CellContext`MT^4 - 4 $CellContext`MH^2 $CellContext`T14 + 
+               8 $CellContext`MT^2 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + ($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2) + 
+             X`Eps^(-1) (16 $CellContext`MT^4 - 
+               4 $CellContext`MH^2 $CellContext`T14 + 
+               8 $CellContext`MT^2 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + ($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2) + \
+$CellContext`MH^2 (
+               4 $CellContext`MT^2 - $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) 
+              X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + \
+$CellContext`T14 ((-2) $CellContext`MH^2 + 
+               4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) 
+              X`DiscB[$CellContext`T14, $CellContext`MT, $CellContext`MT] - \
+($CellContext`MH^2 - 
+              4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U) (
+              4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) 
+             X`DiscB[$CellContext`MH^2 - 
+               4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT] + (16 $CellContext`MT^4 - 
+               4 $CellContext`MH^2 $CellContext`T14 + 
+               8 $CellContext`MT^2 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + ($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2) 
+              Log[$CellContext`MT^(-2) X`Mu^2] + 
+             2 (16 $CellContext`MT^6 + $CellContext`MH^2 $CellContext`T14 \
+($CellContext`MH^2 - $CellContext`T24 - $CellContext`U) + 
+               8 $CellContext`MT^4 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + $CellContext`MT^2 ((-8) $CellContext`MH^2 $CellContext`T14 + \
+($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2)) 
+              X`ScalarC0[$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+                4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT, $CellContext`MT]) - 
+           2 ((2 + X`Eps^(-1) + 
+              X`DiscB[$CellContext`MH^2 - 
+                4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT] + 
+              Log[$CellContext`MT^(-2) X`Mu^2]) ((-4) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[5]] ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[2]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[5]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]])) + 8 $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[1]] ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[5]] $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[5]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`e[2]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[2]]) + 8 $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[4]] ($CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[5]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`ec[5]] + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`ec[4]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[2]]) + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[
+                 4]] ((2 $CellContext`S - $CellContext`S34 + $CellContext`T - 
+                  2 $CellContext`T24) $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`ec[5]] - 4 (($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    4]])))) + (((-2) $CellContext`S $CellContext`S34 - \
+$CellContext`S34 $CellContext`T14 + $CellContext`T $CellContext`T14 + 
+                2 $CellContext`MH^2 ($CellContext`S - $CellContext`T24) + 
+                2 $CellContext`T $CellContext`T24) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[4]] $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[5]] - 
+              4 ((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T) \
+$CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[4]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[5]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`ec[5]] - 
+              4 ((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T) \
+$CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[5]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[5]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[1]] + 4 $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[
+                 5]] (((-2) $CellContext`MH^2 + $CellContext`S34 + \
+$CellContext`T) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[2]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[
+                   1]] + ($CellContext`S + $CellContext`T14 + \
+$CellContext`T24) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[
+                   4]] (((-2) $CellContext`MH^2 + $CellContext`S34 + \
+$CellContext`T) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[
+                    2]] + ($CellContext`S + $CellContext`T14 + \
+$CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]])) - 
+              4 ((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T) \
+$CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[4]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[4]] $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[2]] - 
+              4 ((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T) \
+$CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`e[2]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[1]] $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[2]] - 8 ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[3]] ($CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] - $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]]) + ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[2]] - $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[5]]) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]]) ($CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[3]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[2]] + $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[3]]) + 4 $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[
+                 4]] (((-$CellContext`MH^2 + $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    1]] + (-$CellContext`MH^2 + $CellContext`T) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[2]] + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[
+                   5]] ((-$CellContext`MH^2 + $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    1]] + (-$CellContext`MH^2 + $CellContext`T) \
+$CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]))) 
+             X`ScalarC0[$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+               4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT, $CellContext`MT]) + 
+           4 (Rational[
+               1, 2] (16 $CellContext`MT^4 - 
+                4 $CellContext`MH^2 $CellContext`T14 + 
+                8 $CellContext`MT^2 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2)^(-2) (-($CellContext`S34 - $CellContext`T) ((-2) \
+$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + 
+                 2 $CellContext`U) $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[4]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[5]] - 
+               4 (2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - 
+                2 $CellContext`U) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[5]] ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]]) - 
+               4 ($CellContext`S34 - $CellContext`T) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[4]] ($CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[2]] + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[5]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]]) + 16 ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]])) (
+               2 $CellContext`T14 (16 $CellContext`MT^4 - 
+                 4 $CellContext`MH^2 $CellContext`T14 + 
+                 8 $CellContext`MT^2 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + ($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2) - \
+(64 $CellContext`MT^6 + ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2 (3 $CellContext`T14 + $CellContext`T24 + $CellContext`U) + 
+                16 $CellContext`MT^4 (5 $CellContext`T14 + 
+                  3 ($CellContext`T24 + $CellContext`U)) - 
+                2 $CellContext`MH^2 $CellContext`T14 (3 $CellContext`T14 + 
+                 5 ($CellContext`T24 + $CellContext`U)) + 
+                4 $CellContext`MT^2 ((-10) $CellContext`MH^2 $CellContext`T14 + 
+                  7 $CellContext`T14^2 + 
+                  10 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + 
+                  3 ($CellContext`T24 + $CellContext`U)^2)) 
+               X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + 
+               6 $CellContext`T14^2 ((-2) $CellContext`MH^2 + 
+                 4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) 
+                X`DiscB[$CellContext`T14, $CellContext`MT, $CellContext`MT] + \
+(64 $CellContext`MT^6 - 
+                 3 $CellContext`T14^3 + $CellContext`T14^2 $CellContext`T24 + 
+                 5 $CellContext`T14 $CellContext`T24^2 + $CellContext`T24^3 + \
+$CellContext`T14^2 $CellContext`U + 
+                 10 $CellContext`T14 $CellContext`T24 $CellContext`U + 
+                 3 $CellContext`T24^2 $CellContext`U + 
+                 5 $CellContext`T14 $CellContext`U^2 + 
+                 3 $CellContext`T24 $CellContext`U^2 + $CellContext`U^3 + 
+                 2 $CellContext`MH^2 $CellContext`T14 (3 $CellContext`T14 - 
+                   5 ($CellContext`T24 + $CellContext`U)) + 
+                 16 $CellContext`MT^4 (5 $CellContext`T14 + 
+                   3 ($CellContext`T24 + $CellContext`U)) + 
+                 4 $CellContext`MT^2 ((-10) $CellContext`MH^2 \
+$CellContext`T14 + $CellContext`T14^2 + 
+                   10 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + 
+                   3 ($CellContext`T24 + $CellContext`U)^2)) 
+                X`DiscB[$CellContext`MH^2 - 
+                  4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT] + 
+               2 $CellContext`T14 (32 $CellContext`MT^6 + 
+                 16 $CellContext`MT^4 (
+                   2 $CellContext`T14 + $CellContext`T24 + $CellContext`U) + 
+                 2 $CellContext`MT^2 ((-16) $CellContext`MH^2 \
+$CellContext`T14 + 5 $CellContext`T14^2 + 
+                   6 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2) + $CellContext`T14 (
+                   6 $CellContext`MH^4 + ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2 - 2 $CellContext`MH^2 (2 $CellContext`T14 + 
+                    3 ($CellContext`T24 + $CellContext`U)))) 
+                X`ScalarC0[$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+                  4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT, $CellContext`MT]) + 
+             Rational[-1, 2] (16 $CellContext`MT^4 - 
+                4 $CellContext`MH^2 $CellContext`T14 + 
+                8 $CellContext`MT^2 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2)^(-2) (-($CellContext`S34 - $CellContext`T) ((-2) \
+$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + 
+                 2 $CellContext`U) $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[4]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[5]] - 
+               4 (2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - 
+                2 $CellContext`U) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[5]] ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]]) - 
+               4 ($CellContext`S34 - $CellContext`T) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[4]] ($CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[2]] + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[5]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]]) + 16 ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) + ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]]) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]])) ((
+                 4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) (16 $CellContext`MT^4 - 4 $CellContext`MH^2 $CellContext`T14 + 
+                 8 $CellContext`MT^2 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + ($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2) + \
+$CellContext`MH^2 (16 $CellContext`MT^4 + 
+                 8 $CellContext`MH^2 $CellContext`T14 - 5 $CellContext`T14^2 - 
+                 4 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 - 
+                 4 $CellContext`T14 $CellContext`U + 
+                 2 $CellContext`T24 $CellContext`U + $CellContext`U^2 + 
+                 8 $CellContext`MT^2 ((-2) $CellContext`T14 + \
+$CellContext`T24 + $CellContext`U)) 
+                X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + \
+$CellContext`T14 ((
+                   4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2 - 
+                 2 $CellContext`MH^2 (12 $CellContext`MT^2 - $CellContext`T14 + 
+                  3 ($CellContext`T24 + $CellContext`U))) 
+                X`DiscB[$CellContext`T14, $CellContext`MT, $CellContext`MT] - \
+(8 $CellContext`MH^4 $CellContext`T14 + $CellContext`T14 (
+                   4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2 + $CellContext`MH^2 (16 $CellContext`MT^4 - 
+                  3 $CellContext`T14^2 - 
+                  10 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2 + 
+                  8 $CellContext`MT^2 ((-5) $CellContext`T14 + \
+$CellContext`T24 + $CellContext`U))) 
+               X`DiscB[$CellContext`MH^2 - 
+                 4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT] + 
+               2 (64 $CellContext`MT^8 + 
+                 48 $CellContext`MT^6 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + 
+                 12 $CellContext`MT^4 ((-4) $CellContext`MH^2 \
+$CellContext`T14 + ($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2) - \
+$CellContext`MH^2 $CellContext`T14 (-$CellContext`T14^2 + $CellContext`T14 \
+($CellContext`T24 + $CellContext`U) + 
+                  2 ($CellContext`T24 + $CellContext`U)^2 + $CellContext`MH^2 \
+($CellContext`T14 - 
+                    3 ($CellContext`T24 + $CellContext`U))) + \
+$CellContext`MT^2 (
+                   12 $CellContext`MH^4 $CellContext`T14 + ($CellContext`T14 + \
+$CellContext`T24 + $CellContext`U)^3 - 
+                   4 $CellContext`MH^2 $CellContext`T14 (2 $CellContext`T14 + 
+                    5 ($CellContext`T24 + $CellContext`U)))) 
+                X`ScalarC0[$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+                  4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT, $CellContext`MT]))))), 
+      0, (-2) $CellContext`Alfas^2 $CellContext`c3 $CellContext`EL \
+$CellContext`MT^2 $CellContext`MW^(-1) $CellContext`SW^(-1) \
+(-($CellContext`MH^2 - $CellContext`S - $CellContext`T - \
+$CellContext`T14)^(-1) $CellContext`T24^(-1) (
+         8 $CellContext`MT^2 (
+            16 $CellContext`MT^4 + $CellContext`T^2 + $CellContext`T14^2 - 
+            4 $CellContext`MH^2 $CellContext`T24 + 
+            2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+            2 $CellContext`T ($CellContext`T14 + $CellContext`T24) + 
+            8 $CellContext`MT^2 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24))^(-1) 
+          X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`MH^2 - 
+             4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24]^(-1) (8 $CellContext`Pair[
+              $CellContext`e[1], 
+              $CellContext`k[5]] ($CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[4]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`ec[5]] + $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[5]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[2]]) + $CellContext`Pair[
+              $CellContext`e[1], 
+              $CellContext`ec[
+              5]] ((2 $CellContext`S - $CellContext`S34 - 
+               2 $CellContext`T14 + $CellContext`U) $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[4]] - 4 (($CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[1]] + $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[5]]) $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[2]] + $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[4]] ($CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[1]] + $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[5]]))) + 8 ($CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[4]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[4]] + $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`e[2]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[2]]) $CellContext`Pair[
+              $CellContext`ec[5], 
+              $CellContext`k[1]] - 4 $CellContext`Pair[
+             $CellContext`e[2], 
+             $CellContext`ec[4]] ($CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`k[2]] $CellContext`Pair[
+               $CellContext`ec[5], 
+               $CellContext`k[1]] + $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`k[4]] $CellContext`Pair[
+               $CellContext`ec[5], 
+               $CellContext`k[1]] + $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`k[5]] ($CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[2]] + $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[4]]))) ($CellContext`MH^2 (
+             16 $CellContext`MT^4 + $CellContext`T^2 + $CellContext`T14^2 + 
+             2 $CellContext`T ($CellContext`T14 - 2 $CellContext`T24) + 
+             8 $CellContext`MT^2 ($CellContext`T + $CellContext`T14 - 
+               2 $CellContext`T24) + 8 $CellContext`MH^2 $CellContext`T24 - 
+             4 $CellContext`T14 $CellContext`T24 - 5 $CellContext`T24^2) 
+            X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - (
+            8 $CellContext`MH^4 $CellContext`T24 + $CellContext`T24 (
+               4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^2 + $CellContext`MH^2 (
+              16 $CellContext`MT^4 + $CellContext`T^2 + $CellContext`T14^2 + 
+              2 $CellContext`T ($CellContext`T14 - 5 $CellContext`T24) + 
+              8 $CellContext`MT^2 ($CellContext`T + $CellContext`T14 - 
+                5 $CellContext`T24) - 10 $CellContext`T14 $CellContext`T24 - 
+              3 $CellContext`T24^2)) 
+           X`DiscB[$CellContext`MH^2 - 
+             4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`MT, $CellContext`MT] + $CellContext`T24 ((-2) $CellContext`MH^2 (
+               12 $CellContext`MT^2 + 3 $CellContext`T + 
+               3 $CellContext`T14 - $CellContext`T24) + (
+               4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^2) 
+            X`DiscB[$CellContext`T24, $CellContext`MT, $CellContext`MT] + (
+             4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24) 
+            X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`MH^2 - 
+              4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24] + 
+           2 (64 $CellContext`MT^8 + 
+             48 $CellContext`MT^6 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24) + 
+             12 $CellContext`MT^4 ($CellContext`T^2 + $CellContext`T14^2 + 
+               2 $CellContext`T14 $CellContext`T24 + $CellContext`T24 ((-4) \
+$CellContext`MH^2 + $CellContext`T24) + 
+               2 $CellContext`T ($CellContext`T14 + $CellContext`T24)) - \
+$CellContext`MH^2 $CellContext`T24 (2 $CellContext`T^2 + 
+              2 $CellContext`T14^2 + $CellContext`T14 $CellContext`T24 - \
+$CellContext`T24^2 + $CellContext`MH^2 ((-3) $CellContext`T - 
+                3 $CellContext`T14 + $CellContext`T24) + $CellContext`T (
+                4 $CellContext`T14 + $CellContext`T24)) + $CellContext`MT^2 \
+($CellContext`T^3 + $CellContext`T14^3 + 
+               3 $CellContext`T14^2 $CellContext`T24 + 
+               3 $CellContext`T^2 ($CellContext`T14 + $CellContext`T24) + \
+$CellContext`T14 $CellContext`T24 ((-20) $CellContext`MH^2 + 
+                 3 $CellContext`T24) + $CellContext`T24 (12 $CellContext`MH^4 - 
+                 8 $CellContext`MH^2 $CellContext`T24 + $CellContext`T24^2) + \
+$CellContext`T (3 $CellContext`T14^2 + 
+                 6 $CellContext`T14 $CellContext`T24 + $CellContext`T24 \
+((-20) $CellContext`MH^2 + 3 $CellContext`T24)))) 
+            X`ScalarC0[$CellContext`MH^2, $CellContext`MH^2 - 
+              4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24, $CellContext`MT, $CellContext`MT, $CellContext`MT]) - 
+         2 ((-4) $CellContext`MT^2 (-$CellContext`MH^2 + 
+             8 $CellContext`MT^2 + $CellContext`T + $CellContext`T14)^(-1) (
+             16 $CellContext`MT^6 + $CellContext`MH^2 ($CellContext`MH^2 - \
+$CellContext`T - $CellContext`T14) $CellContext`T24 + 
+             8 $CellContext`MT^4 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24) + $CellContext`MT^2 ($CellContext`T^2 + $CellContext`T14^2 - 
+               8 $CellContext`MH^2 $CellContext`T24 + 
+               2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+               2 $CellContext`T ($CellContext`T14 + $CellContext`T24)))^(-1) 
+           X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`MH^2 - 
+              4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24]^(-1) ((-$CellContext`S34 $CellContext`T + $CellContext`S34 \
+$CellContext`T14 + $CellContext`MH^2 ($CellContext`S34 - $CellContext`U) + \
+$CellContext`T $CellContext`U + $CellContext`T14 $CellContext`U - \
+$CellContext`S ($CellContext`S34 + $CellContext`U)) $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[5]] $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[4]] - 
+            4 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+              $CellContext`e[1], 
+              $CellContext`k[5]] $CellContext`Pair[
+              $CellContext`e[2], 
+              $CellContext`k[4]] $CellContext`Pair[
+              $CellContext`ec[4], 
+              $CellContext`ec[5]] - 
+            4 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+              $CellContext`e[1], 
+              $CellContext`k[5]] $CellContext`Pair[
+              $CellContext`e[2], 
+              $CellContext`ec[5]] $CellContext`Pair[
+              $CellContext`ec[4], 
+              $CellContext`k[2]] + 4 $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[
+               5]] ((($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[
+                   1]] + (-$CellContext`MH^2 + $CellContext`T) \
+$CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[3]]) $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[2]] + $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[
+                 4]] (($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[
+                   1]] + (-$CellContext`MH^2 + $CellContext`T) \
+$CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]])) - 
+            4 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+              $CellContext`e[1], 
+              $CellContext`ec[4]] $CellContext`Pair[
+              $CellContext`e[2], 
+              $CellContext`k[4]] $CellContext`Pair[
+              $CellContext`ec[5], 
+              $CellContext`k[1]] - 
+            4 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+              $CellContext`e[1], 
+              $CellContext`e[2]] $CellContext`Pair[
+              $CellContext`ec[4], 
+              $CellContext`k[2]] $CellContext`Pair[
+              $CellContext`ec[5], 
+              $CellContext`k[1]] + 8 ($CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[3]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[2]] + $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[4]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[3]]) ($CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[3]] ($CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[1]] - $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[3]]) + ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[2]] - $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[4]]) $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[3]]) + 4 $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[4]] ($CellContext`U $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[2]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[1]] + $CellContext`S34 $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[4]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[1]] + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[5]] ($CellContext`U $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[2]] + $CellContext`S34 $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[
+                   4]]))) (-$CellContext`MH^2 ($CellContext`MH^2 - 
+              8 $CellContext`MT^2 - $CellContext`T - $CellContext`T14) (
+              2 $CellContext`MH^2 - 
+              4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14 - \
+$CellContext`T24) $CellContext`T24 
+             X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - (
+             64 $CellContext`MT^8 - 
+             2 $CellContext`MH^2 (-$CellContext`MH^2 + $CellContext`T + \
+$CellContext`T14)^2 $CellContext`T24 + 
+             48 $CellContext`MT^6 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24) + 
+             4 $CellContext`MT^4 (3 $CellContext`T^2 + 3 $CellContext`T14^2 + 
+               6 $CellContext`T14 $CellContext`T24 + 
+               6 $CellContext`T ($CellContext`T14 + $CellContext`T24) + \
+$CellContext`T24 ((-20) $CellContext`MH^2 + 
+                 3 $CellContext`T24)) + $CellContext`MT^2 ($CellContext`T^3 + \
+$CellContext`T14^3 + 3 $CellContext`T14^2 $CellContext`T24 + 
+               3 $CellContext`T^2 ($CellContext`T14 + $CellContext`T24) + \
+$CellContext`T14 $CellContext`T24 ((-28) $CellContext`MH^2 + 
+                 3 $CellContext`T24) + $CellContext`T24 (24 $CellContext`MH^4 - 
+                 4 $CellContext`MH^2 $CellContext`T24 + $CellContext`T24^2) + \
+$CellContext`T (3 $CellContext`T14^2 + 
+                 6 $CellContext`T14 $CellContext`T24 + $CellContext`T24 \
+((-28) $CellContext`MH^2 + 3 $CellContext`T24)))) 
+            X`DiscB[$CellContext`MH^2 - 
+              4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`MT, $CellContext`MT] + $CellContext`MH^2 ($CellContext`MH^2 - 
+              8 $CellContext`MT^2 - $CellContext`T - $CellContext`T14) (
+              4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 - \
+$CellContext`T24) $CellContext`T24 
+             X`DiscB[$CellContext`T24, $CellContext`MT, $CellContext`MT] - \
+($CellContext`MH^2 - 
+             8 $CellContext`MT^2 - $CellContext`T - $CellContext`T14) (
+             4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24) (
+             16 $CellContext`MT^6 + $CellContext`MH^2 ($CellContext`MH^2 - \
+$CellContext`T - $CellContext`T14) $CellContext`T24 + 
+             8 $CellContext`MT^4 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24) + $CellContext`MT^2 ($CellContext`T^2 + $CellContext`T14^2 - 
+               8 $CellContext`MH^2 $CellContext`T24 + 
+               2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+               2 $CellContext`T ($CellContext`T14 + $CellContext`T24))) 
+            X`ScalarC0[$CellContext`MH^2, $CellContext`MH^2 - 
+              4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24, $CellContext`MT, $CellContext`MT, $CellContext`MT]) + 
+          4 $CellContext`MT^2 (
+             16 $CellContext`MT^4 + $CellContext`T^2 + $CellContext`T14^2 - 
+             4 $CellContext`MH^2 $CellContext`T24 + 
+             2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+             2 $CellContext`T ($CellContext`T14 + $CellContext`T24) + 
+             8 $CellContext`MT^2 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24))^(-1) (
+             16 $CellContext`MT^6 + $CellContext`MH^2 ($CellContext`MH^2 - \
+$CellContext`T - $CellContext`T14) $CellContext`T24 + 
+             8 $CellContext`MT^4 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24) + $CellContext`MT^2 ($CellContext`T^2 + $CellContext`T14^2 - 
+               8 $CellContext`MH^2 $CellContext`T24 + 
+               2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+               2 $CellContext`T ($CellContext`T14 + $CellContext`T24)))^(-1) 
+           X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`MH^2 - 
+              4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24]^(-1) ((-$CellContext`S34^2 - 
+              4 $CellContext`S34 $CellContext`T + 
+              2 $CellContext`S34 $CellContext`T14 + 
+              4 $CellContext`MH^2 ($CellContext`S34 - $CellContext`U) + 
+              4 $CellContext`T $CellContext`U + 
+              2 $CellContext`T14 $CellContext`U + $CellContext`U^2 - 
+              2 $CellContext`S ($CellContext`S34 + $CellContext`U)) \
+$CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[5]] $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[4]] - 
+            8 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+              $CellContext`e[1], 
+              $CellContext`k[5]] $CellContext`Pair[
+              $CellContext`e[2], 
+              $CellContext`k[4]] $CellContext`Pair[
+              $CellContext`ec[4], 
+              $CellContext`ec[5]] - 
+            8 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+              $CellContext`e[1], 
+              $CellContext`k[5]] $CellContext`Pair[
+              $CellContext`e[2], 
+              $CellContext`ec[5]] $CellContext`Pair[
+              $CellContext`ec[4], 
+              $CellContext`k[2]] + 4 $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[
+               5]] ((2 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[
+                   1]] + ((-4) $CellContext`MH^2 + $CellContext`S34 + 
+                  4 $CellContext`T + $CellContext`U) $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[3]]) $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[2]] + $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[4]] (
+                2 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[
+                   1]] + ((-4) $CellContext`MH^2 + $CellContext`S34 + 
+                  4 $CellContext`T + $CellContext`U) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]])) - 
+            8 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+              $CellContext`e[1], 
+              $CellContext`ec[4]] $CellContext`Pair[
+              $CellContext`e[2], 
+              $CellContext`k[4]] $CellContext`Pair[
+              $CellContext`ec[5], 
+              $CellContext`k[1]] - 
+            8 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+              $CellContext`e[1], 
+              $CellContext`e[2]] $CellContext`Pair[
+              $CellContext`ec[4], 
+              $CellContext`k[2]] $CellContext`Pair[
+              $CellContext`ec[5], 
+              $CellContext`k[1]] + 32 ($CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[3]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[2]] + $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[4]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[3]]) ($CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[3]] ($CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[1]] - $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[3]]) + ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[2]] - $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[4]]) $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[3]]) + 4 $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[4]] (
+              2 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[2]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[
+                 1]] + ((-3) $CellContext`S34 + $CellContext`U) \
+$CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[3]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[1]] + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[5]] (
+                2 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[
+                   2]] + ((-3) $CellContext`S34 + $CellContext`U) \
+$CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]]))) (-(-$CellContext`MT^2 (
+                 4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^4 + 
+              2 $CellContext`MH^6 $CellContext`T24 (12 $CellContext`MT^2 + 
+                3 $CellContext`T + 3 $CellContext`T14 + $CellContext`T24) + 
+              2 $CellContext`MH^2 (
+                 4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^2 (
+                8 $CellContext`MT^4 + ($CellContext`T + $CellContext`T14) \
+$CellContext`T24 + 
+                2 $CellContext`MT^2 ($CellContext`T + $CellContext`T14 + 
+                  3 $CellContext`T24)) - 
+              2 $CellContext`MH^4 $CellContext`T24 (96 $CellContext`MT^4 + 
+               4 $CellContext`T^2 + 8 $CellContext`T $CellContext`T14 + 
+               4 $CellContext`T14^2 + 3 $CellContext`T $CellContext`T24 + 
+               3 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+               4 $CellContext`MT^2 (10 $CellContext`T + 10 $CellContext`T14 + 
+                 3 $CellContext`T24))) 
+             X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + (
+              2 $CellContext`MH^6 (12 $CellContext`MT^2 + 3 $CellContext`T + 
+                3 $CellContext`T14 - $CellContext`T24) $CellContext`T24 - \
+$CellContext`MT^2 (12 $CellContext`MT^2 + 3 $CellContext`T + 
+               3 $CellContext`T14 - $CellContext`T24) (
+                4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^3 - 
+              2 $CellContext`MH^4 $CellContext`T24 (112 $CellContext`MT^4 + 
+               5 $CellContext`T^2 + 10 $CellContext`T $CellContext`T14 + 
+               5 $CellContext`T14^2 + 
+               48 $CellContext`MT^2 ($CellContext`T + $CellContext`T14) - \
+$CellContext`T24^2) + 
+              2 $CellContext`MH^2 (128 $CellContext`MT^8 + 
+                96 $CellContext`MT^6 ($CellContext`T + $CellContext`T14 + 
+                  3 $CellContext`T24) + 
+                8 $CellContext`MT^4 (3 $CellContext`T^2 + 
+                  6 $CellContext`T $CellContext`T14 + 3 $CellContext`T14^2 + 
+                  22 $CellContext`T $CellContext`T24 + 
+                  22 $CellContext`T14 $CellContext`T24 + 
+                  5 $CellContext`T24^2) + ($CellContext`T + $CellContext`T14) \
+$CellContext`T24 (2 $CellContext`T^2 + 
+                  2 $CellContext`T14^2 + $CellContext`T14 $CellContext`T24 - \
+$CellContext`T24^2 + $CellContext`T (4 $CellContext`T14 + $CellContext`T24)) + 
+                2 $CellContext`MT^2 ($CellContext`T^3 + $CellContext`T14^3 + 
+                  17 $CellContext`T14^2 $CellContext`T24 + 
+                  7 $CellContext`T14 $CellContext`T24^2 - 
+                  3 $CellContext`T24^3 + $CellContext`T^2 (3 $CellContext`T14 + 
+                    17 $CellContext`T24) + $CellContext`T (
+                    3 $CellContext`T14^2 + 
+                    34 $CellContext`T14 $CellContext`T24 + 
+                    7 $CellContext`T24^2)))) 
+             X`DiscB[$CellContext`MH^2 - 
+               4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`MT, $CellContext`MT] + (256 $CellContext`MT^10 + 
+              256 $CellContext`MT^8 ($CellContext`T + $CellContext`T14) + 
+              2 $CellContext`MH^2 ($CellContext`MH^2 - $CellContext`T - \
+$CellContext`T14) $CellContext`T24 ($CellContext`T^2 + $CellContext`T14^2 + \
+$CellContext`T (
+                  2 $CellContext`T14 - $CellContext`T24) - $CellContext`T14 \
+$CellContext`T24 + 2 ($CellContext`MH^2 - $CellContext`T24) $CellContext`T24) + 
+              32 $CellContext`MT^6 (3 $CellContext`T^2 + 
+                6 $CellContext`T $CellContext`T14 + 
+                3 $CellContext`T14^2 - $CellContext`T24 (4 $CellContext`MH^2 + 
+                 3 $CellContext`T24)) + 
+              16 $CellContext`MT^4 ($CellContext`T^3 + 
+                3 $CellContext`T^2 $CellContext`T14 + $CellContext`T14^3 - 
+                3 $CellContext`T14 $CellContext`T24 (
+                 2 $CellContext`MH^2 + $CellContext`T24) + 
+                2 $CellContext`T24 ($CellContext`MH^4 + 
+                  3 $CellContext`MH^2 $CellContext`T24 - $CellContext`T24^2) + 
+                3 $CellContext`T ($CellContext`T14^2 - $CellContext`T24 (
+                   2 $CellContext`MH^2 + $CellContext`T24))) + \
+$CellContext`MT^2 ($CellContext`T^4 + 
+                4 $CellContext`T^3 $CellContext`T14 + $CellContext`T14^4 - 
+                6 $CellContext`T14^2 $CellContext`T24 (
+                 4 $CellContext`MH^2 + $CellContext`T24) + $CellContext`T24^2 \
+((-40) $CellContext`MH^4 + 32 $CellContext`MH^2 $CellContext`T24 - 
+                  3 $CellContext`T24^2) - 
+                8 $CellContext`T14 $CellContext`T24 ((-2) $CellContext`MH^4 - 
+                 4 $CellContext`MH^2 $CellContext`T24 + $CellContext`T24^2) + 
+                6 $CellContext`T^2 ($CellContext`T14^2 - $CellContext`T24 (
+                   4 $CellContext`MH^2 + $CellContext`T24)) + 
+                4 $CellContext`T ($CellContext`T14^3 - 
+                  3 $CellContext`T14 $CellContext`T24 (
+                   4 $CellContext`MH^2 + $CellContext`T24) - 
+                  2 $CellContext`T24 ((-2) $CellContext`MH^4 - 
+                   4 $CellContext`MH^2 $CellContext`T24 + \
+$CellContext`T24^2)))) 
+             X`DiscB[$CellContext`T24, $CellContext`MT, $CellContext`MT] - 
+            2 (16 $CellContext`MT^6 + $CellContext`MH^2 ($CellContext`MH^2 - \
+$CellContext`T - $CellContext`T14) $CellContext`T24 + 
+             8 $CellContext`MT^4 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24) + $CellContext`MT^2 ($CellContext`T^2 + $CellContext`T14^2 - 
+               8 $CellContext`MH^2 $CellContext`T24 + 
+               2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+               2 $CellContext`T ($CellContext`T14 + $CellContext`T24))) 
+            X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`MH^2 - 
+              4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24] + ((-4) $CellContext`MH^4 $CellContext`T24 + (
+                4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 - \
+$CellContext`T24) (
+                 4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^2 - 
+              2 $CellContext`MH^2 (
+               16 $CellContext`MT^4 + $CellContext`T^2 + $CellContext`T14^2 + 
+               2 $CellContext`T ($CellContext`T14 - $CellContext`T24) + 
+               8 $CellContext`MT^2 ($CellContext`T + $CellContext`T14 - \
+$CellContext`T24) - 
+               2 $CellContext`T14 $CellContext`T24 - $CellContext`T24^2)) (
+              16 $CellContext`MT^6 + $CellContext`MH^2 ($CellContext`MH^2 - \
+$CellContext`T - $CellContext`T14) $CellContext`T24 + 
+              8 $CellContext`MT^4 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24) + $CellContext`MT^2 ($CellContext`T^2 + $CellContext`T14^2 - 
+                8 $CellContext`MH^2 $CellContext`T24 + 
+                2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+                2 $CellContext`T ($CellContext`T14 + $CellContext`T24))) 
+             X`ScalarC0[$CellContext`MH^2, $CellContext`MH^2 - 
+               4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24, $CellContext`MT, $CellContext`MT, $CellContext`MT])) - 
+         4 ((-2) $CellContext`MT^2 (
+             16 $CellContext`MT^4 + $CellContext`T^2 + $CellContext`T14^2 - 
+             4 $CellContext`MH^2 $CellContext`T24 + 
+             2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+             2 $CellContext`T ($CellContext`T14 + $CellContext`T24) + 
+             8 $CellContext`MT^2 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24))^(-2) (
+             16 $CellContext`MT^6 + $CellContext`MH^2 ($CellContext`MH^2 - \
+$CellContext`T - $CellContext`T14) $CellContext`T24 + 
+             8 $CellContext`MT^4 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24) + $CellContext`MT^2 ($CellContext`T^2 + $CellContext`T14^2 - 
+               8 $CellContext`MH^2 $CellContext`T24 + 
+               2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+               2 $CellContext`T ($CellContext`T14 + $CellContext`T24)))^(-1) 
+           X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`MH^2 - 
+              4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24]^(-1) (-($CellContext`S34 - $CellContext`U) ((-2) \
+$CellContext`MH^2 + $CellContext`S34 + 
+              2 $CellContext`T + $CellContext`U) $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[5]] $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[4]] - 
+            4 (2 $CellContext`MH^2 - $CellContext`S34 - 
+             2 $CellContext`T - $CellContext`U) $CellContext`Pair[
+              $CellContext`e[1], 
+              $CellContext`ec[5]] ($CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[3]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[2]] + $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[4]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[3]]) + 16 ($CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[3]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[2]] + $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[4]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[3]]) ($CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[3]] ($CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[1]] - $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[3]]) + ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[2]] - $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[4]]) $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[3]]) - 
+            4 ($CellContext`S34 - $CellContext`U) $CellContext`Pair[
+              $CellContext`e[2], 
+              $CellContext`ec[4]] ($CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[3]] $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[1]] + $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[5]] $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[3]])) ((-2) $CellContext`MH^2 (
+              16 $CellContext`MH^8 $CellContext`T24^2 - 
+              5 $CellContext`MT^2 (
+               4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 - \
+$CellContext`T24) (
+                
+                4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^4 + $CellContext`MH^6 $CellContext`T24 (
+                176 $CellContext`MT^4 + 11 $CellContext`T^2 + 
+                22 $CellContext`T $CellContext`T14 + 11 $CellContext`T14^2 + 
+                8 $CellContext`MT^2 (11 $CellContext`T + 11 $CellContext`T14 - 
+                  23 $CellContext`T24) - 30 $CellContext`T $CellContext`T24 - 
+                30 $CellContext`T14 $CellContext`T24 - 
+                13 $CellContext`T24^2) + $CellContext`MH^4 $CellContext`T24 \
+((-1408) $CellContext`MT^6 - 17 $CellContext`T^3 - 17 $CellContext`T14^3 - 
+                16 $CellContext`MT^4 (61 $CellContext`T + 61 $CellContext`T14 - 
+                 30 $CellContext`T24) + 8 $CellContext`T14^2 $CellContext`T24 + 
+                19 $CellContext`T14 $CellContext`T24^2 + 
+                6 $CellContext`T24^3 + $CellContext`T^2 ((-51) \
+$CellContext`T14 + 8 $CellContext`T24) - 
+                8 $CellContext`MT^2 (28 $CellContext`T^2 + 
+                 56 $CellContext`T $CellContext`T14 + 28 $CellContext`T14^2 - 
+                 19 $CellContext`T $CellContext`T24 - 
+                 19 $CellContext`T14 $CellContext`T24 - 
+                 17 $CellContext`T24^2) + $CellContext`T ((-51) \
+$CellContext`T14^2 + 16 $CellContext`T14 $CellContext`T24 + 
+                  19 $CellContext`T24^2)) + $CellContext`MH^2 (
+                 4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^2 (144 $CellContext`MT^6 + 
+                6 ($CellContext`T + $CellContext`T14) ($CellContext`T + \
+$CellContext`T14 - $CellContext`T24) $CellContext`T24 + 
+                24 $CellContext`MT^4 (3 $CellContext`T + 3 $CellContext`T14 + 
+                  5 $CellContext`T24) + $CellContext`MT^2 (9 $CellContext`T^2 + 
+                  9 $CellContext`T14^2 + 54 $CellContext`T14 $CellContext`T24 - 
+                  55 $CellContext`T24^2 + 
+                  18 $CellContext`T ($CellContext`T14 + 3 $CellContext`T24))))
+               X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + \
+(32 $CellContext`MH^10 $CellContext`T24^2 + $CellContext`MT^2 (
+                4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 - \
+$CellContext`T24) (
+                 4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^5 + 
+              2 $CellContext`MH^8 $CellContext`T24 (176 $CellContext`MT^4 + 
+                11 $CellContext`T^2 + 22 $CellContext`T $CellContext`T14 + 
+                11 $CellContext`T14^2 + 
+                8 $CellContext`MT^2 (11 $CellContext`T + 11 $CellContext`T14 - 
+                  32 $CellContext`T24) - 48 $CellContext`T $CellContext`T24 - 
+                48 $CellContext`T14 $CellContext`T24 - 11 $CellContext`T24^2) - 
+              8 $CellContext`MH^6 $CellContext`T24 (400 $CellContext`MT^6 + 
+               8 $CellContext`MT^4 (35 $CellContext`T + 35 $CellContext`T14 - 
+                 38 $CellContext`T24) + $CellContext`MT^2 (
+                 65 $CellContext`T^2 + 65 $CellContext`T14^2 + 
+                 2 $CellContext`T (65 $CellContext`T14 - 58 $CellContext`T24) - 
+                 116 $CellContext`T14 $CellContext`T24 - 
+                 45 $CellContext`T24^2) + ($CellContext`T + $CellContext`T14) \
+(5 $CellContext`T^2 + 5 $CellContext`T14^2 + 
+                 10 $CellContext`T ($CellContext`T14 - $CellContext`T24) - 
+                 10 $CellContext`T14 $CellContext`T24 - 
+                 7 $CellContext`T24^2)) - $CellContext`MH^2 (
+                4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^3 (256 $CellContext`MT^6 + 
+               8 $CellContext`MT^4 (16 $CellContext`T + 16 $CellContext`T14 - 
+                 11 $CellContext`T24) + ($CellContext`T + $CellContext`T14) \
+($CellContext`T + $CellContext`T14 - $CellContext`T24) $CellContext`T24 + 
+               2 $CellContext`MT^2 (8 $CellContext`T^2 + 
+                 16 $CellContext`T $CellContext`T14 + 8 $CellContext`T14^2 - 
+                 9 $CellContext`T $CellContext`T24 - 
+                 9 $CellContext`T14 $CellContext`T24 - 
+                 5 $CellContext`T24^2)) + $CellContext`MH^4 (
+                4608 $CellContext`MT^10 + 
+                1536 $CellContext`MT^8 (3 $CellContext`T + 3 $CellContext`T14 + 
+                  5 $CellContext`T24) + 
+                64 $CellContext`MT^6 (27 $CellContext`T^2 + 
+                  54 $CellContext`T $CellContext`T14 + 27 $CellContext`T14^2 + 
+                  109 $CellContext`T $CellContext`T24 + 
+                  109 $CellContext`T14 $CellContext`T24 - 
+                  58 $CellContext`T24^2) + 
+                16 $CellContext`MT^4 (18 $CellContext`T^3 + 
+                  18 $CellContext`T14^3 + 
+                  147 $CellContext`T14^2 $CellContext`T24 - 
+                  130 $CellContext`T14 $CellContext`T24^2 - 
+                  93 $CellContext`T24^3 + 
+                  3 $CellContext`T^2 (18 $CellContext`T14 + 
+                    49 $CellContext`T24) + 
+                  2 $CellContext`T (27 $CellContext`T14^2 + 
+                    147 $CellContext`T14 $CellContext`T24 - 
+                    65 $CellContext`T24^2)) + 
+                2 $CellContext`MT^2 (9 $CellContext`T^4 + 
+                  9 $CellContext`T14^4 + 
+                  174 $CellContext`T14^3 $CellContext`T24 - 
+                  172 $CellContext`T14^2 $CellContext`T24^2 - 
+                  254 $CellContext`T14 $CellContext`T24^3 - 
+                  21 $CellContext`T24^4 + 
+                  6 $CellContext`T^3 (6 $CellContext`T14 + 
+                    29 $CellContext`T24) + 
+                  2 $CellContext`T^2 (27 $CellContext`T14^2 + 
+                    261 $CellContext`T14 $CellContext`T24 - 
+                    86 $CellContext`T24^2) + $CellContext`T (
+                    36 $CellContext`T14^3 + 
+                    522 $CellContext`T14^2 $CellContext`T24 - 
+                    344 $CellContext`T14 $CellContext`T24^2 - 
+                    254 $CellContext`T24^3)) - $CellContext`T24 ((-19) \
+$CellContext`T^4 - 19 $CellContext`T14^4 + 
+                 14 $CellContext`T14^3 $CellContext`T24 + 
+                 34 $CellContext`T14^2 $CellContext`T24^2 + 
+                 2 $CellContext`T14 $CellContext`T24^3 + $CellContext`T24^4 + \
+$CellContext`T^3 ((-76) $CellContext`T14 + 
+                   14 $CellContext`T24) + $CellContext`T^2 ((-114) \
+$CellContext`T14^2 + 42 $CellContext`T14 $CellContext`T24 + 
+                   34 $CellContext`T24^2) + $CellContext`T ((-76) \
+$CellContext`T14^3 + 42 $CellContext`T14^2 $CellContext`T24 + 
+                   68 $CellContext`T14 $CellContext`T24^2 + 
+                   2 $CellContext`T24^3)))) 
+             X`DiscB[$CellContext`MH^2 - 
+               4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`MT, $CellContext`MT] + (
+              4 $CellContext`MH^8 (36 $CellContext`MT^2 + 9 $CellContext`T + 
+                9 $CellContext`T14 - $CellContext`T24) $CellContext`T24^2 - \
+$CellContext`MT^2 (
+               4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 - \
+$CellContext`T24) (
+                4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^5 + 
+              2 $CellContext`MH^6 $CellContext`T24 (192 $CellContext`MT^6 + 
+                3 $CellContext`T^3 + 3 $CellContext`T14^3 + 
+                16 $CellContext`MT^4 (9 $CellContext`T + 9 $CellContext`T14 - 
+                  50 $CellContext`T24) + $CellContext`T^2 (9 $CellContext`T14 - 
+                  32 $CellContext`T24) - 
+                32 $CellContext`T14^2 $CellContext`T24 - 
+                9 $CellContext`T14 $CellContext`T24^2 + 
+                6 $CellContext`T24^3 + $CellContext`T (9 $CellContext`T14^2 - 
+                  64 $CellContext`T14 $CellContext`T24 - 
+                  9 $CellContext`T24^2) + 
+                4 $CellContext`MT^2 (9 $CellContext`T^2 + 
+                  18 $CellContext`T $CellContext`T14 + 9 $CellContext`T14^2 - 
+                  82 $CellContext`T $CellContext`T24 - 
+                  82 $CellContext`T14 $CellContext`T24 - 
+                  7 $CellContext`T24^2)) + $CellContext`MH^2 (
+                 4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^3 (64 $CellContext`MT^6 + 
+                8 $CellContext`MT^4 (4 $CellContext`T + 4 $CellContext`T14 - 
+                  11 $CellContext`T24) + ($CellContext`T + $CellContext`T14) \
+($CellContext`T + $CellContext`T14 - $CellContext`T24) $CellContext`T24 + 
+                2 $CellContext`MT^2 (2 $CellContext`T^2 + 
+                  4 $CellContext`T $CellContext`T14 + 2 $CellContext`T14^2 - 
+                  9 $CellContext`T $CellContext`T24 - 
+                  9 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2)) + \
+$CellContext`MH^4 $CellContext`T24 ((-512) $CellContext`MT^8 - 
+                7 $CellContext`T^4 - 7 $CellContext`T14^4 - 
+                64 $CellContext`MT^6 (13 $CellContext`T + 13 $CellContext`T14 - 
+                 69 $CellContext`T24) + 
+                26 $CellContext`T14^3 $CellContext`T24 + 
+                22 $CellContext`T14^2 $CellContext`T24^2 - 
+                10 $CellContext`T14 $CellContext`T24^3 + $CellContext`T24^4 + \
+$CellContext`T^3 ((-28) $CellContext`T14 + 26 $CellContext`T24) - 
+                16 $CellContext`MT^4 (27 $CellContext`T^2 + 
+                 54 $CellContext`T $CellContext`T14 + 27 $CellContext`T14^2 - 
+                 164 $CellContext`T $CellContext`T24 - 
+                 164 $CellContext`T14 $CellContext`T24 - 
+                 49 $CellContext`T24^2) + $CellContext`T^2 ((-42) \
+$CellContext`T14^2 + 78 $CellContext`T14 $CellContext`T24 + 
+                  22 $CellContext`T24^2) + $CellContext`T ((-28) \
+$CellContext`T14^3 + 78 $CellContext`T14^2 $CellContext`T24 + 
+                  44 $CellContext`T14 $CellContext`T24^2 - 
+                  10 $CellContext`T24^3) - 
+                4 $CellContext`MT^2 (23 $CellContext`T^3 + 
+                 23 $CellContext`T14^3 + $CellContext`T^2 (
+                   69 $CellContext`T14 - 121 $CellContext`T24) - 
+                 121 $CellContext`T14^2 $CellContext`T24 - 
+                 71 $CellContext`T14 $CellContext`T24^2 + 
+                 21 $CellContext`T24^3 + $CellContext`T (
+                   69 $CellContext`T14^2 - 
+                   242 $CellContext`T14 $CellContext`T24 - 
+                   71 $CellContext`T24^2)))) 
+             X`DiscB[$CellContext`T24, $CellContext`MT, $CellContext`MT] - 
+            2 ($CellContext`MH^2 (20 $CellContext`MT^2 + 5 $CellContext`T + 
+               5 $CellContext`T14 - $CellContext`T24) - (
+              4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^2) (
+             16 $CellContext`MT^6 + $CellContext`MH^2 ($CellContext`MH^2 - \
+$CellContext`T - $CellContext`T14) $CellContext`T24 + 
+             8 $CellContext`MT^4 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24) + $CellContext`MT^2 ($CellContext`T^2 + $CellContext`T14^2 - 
+               8 $CellContext`MH^2 $CellContext`T24 + 
+               2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+               2 $CellContext`T ($CellContext`T14 + $CellContext`T24))) 
+            X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`MH^2 - 
+              4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24] + 
+            2 (16 $CellContext`MT^6 + $CellContext`MH^2 ($CellContext`MH^2 - \
+$CellContext`T - $CellContext`T14) $CellContext`T24 + 
+              8 $CellContext`MT^4 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24) + $CellContext`MT^2 ($CellContext`T^2 + $CellContext`T14^2 - 
+                8 $CellContext`MH^2 $CellContext`T24 + 
+                2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+                2 $CellContext`T ($CellContext`T14 + $CellContext`T24))) \
+((-2) $CellContext`MH^6 (36 $CellContext`MT^2 + 9 $CellContext`T + 
+                9 $CellContext`T14 - $CellContext`T24) $CellContext`T24 + 
+              2 $CellContext`MT^2 (
+                 4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^4 + 
+              2 $CellContext`MH^2 (
+                 4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^2 (
+                4 $CellContext`MT^4 + $CellContext`T^2 + $CellContext`T14^2 + \
+$CellContext`MT^2 (5 $CellContext`T + 5 $CellContext`T14 - 
+                  21 $CellContext`T24) + 
+                2 $CellContext`T ($CellContext`T14 - 2 $CellContext`T24) - 
+                4 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2) - \
+$CellContext`MH^4 (192 $CellContext`MT^6 + 3 $CellContext`T^3 + 
+               3 $CellContext`T14^3 + 
+               16 $CellContext`MT^4 (9 $CellContext`T + 9 $CellContext`T14 - 
+                 29 $CellContext`T24) + $CellContext`T^2 (9 $CellContext`T14 - 
+                 23 $CellContext`T24) - 
+               23 $CellContext`T14^2 $CellContext`T24 - 
+               13 $CellContext`T14 $CellContext`T24^2 + $CellContext`T24^3 + 
+               4 $CellContext`MT^2 (9 $CellContext`T^2 + 
+                 18 $CellContext`T $CellContext`T14 + 9 $CellContext`T14^2 - 
+                 52 $CellContext`T $CellContext`T24 - 
+                 52 $CellContext`T14 $CellContext`T24 - 
+                 15 $CellContext`T24^2) + $CellContext`T (
+                 9 $CellContext`T14^2 - 46 $CellContext`T14 $CellContext`T24 - 
+                 13 $CellContext`T24^2))) 
+             X`ScalarC0[$CellContext`MH^2, $CellContext`MH^2 - 
+               4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24, $CellContext`MT, $CellContext`MT, $CellContext`MT]) + 
+          2 $CellContext`MT^2 (
+             16 $CellContext`MT^4 + $CellContext`T^2 + $CellContext`T14^2 - 
+             4 $CellContext`MH^2 $CellContext`T24 + 
+             2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+             2 $CellContext`T ($CellContext`T14 + $CellContext`T24) + 
+             8 $CellContext`MT^2 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24))^(-2) (
+             16 $CellContext`MT^6 + $CellContext`MH^2 ($CellContext`MH^2 - \
+$CellContext`T - $CellContext`T14) $CellContext`T24 + 
+             8 $CellContext`MT^4 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24) + $CellContext`MT^2 ($CellContext`T^2 + $CellContext`T14^2 - 
+               8 $CellContext`MH^2 $CellContext`T24 + 
+               2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+               2 $CellContext`T ($CellContext`T14 + $CellContext`T24)))^(-1) 
+           X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`MH^2 - 
+              
+              4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24]^(-1) (-($CellContext`S34 - $CellContext`U) ((-2) \
+$CellContext`MH^2 + $CellContext`S34 + 
+              2 $CellContext`T + $CellContext`U) $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[5]] $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[4]] - 
+            4 (2 $CellContext`MH^2 - $CellContext`S34 - 
+             2 $CellContext`T - $CellContext`U) $CellContext`Pair[
+              $CellContext`e[1], 
+              $CellContext`ec[5]] ($CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[3]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[2]] + $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[4]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[3]]) - 
+            4 ($CellContext`S34 - $CellContext`U) $CellContext`Pair[
+              $CellContext`e[2], 
+              $CellContext`ec[4]] ($CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[3]] $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[1]] + $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[5]] $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[3]]) + 16 ($CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[3]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[2]] + $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[4]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[3]]) ($CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[3]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[1]] + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[5]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[3]])) (-(
+              32 $CellContext`MH^10 $CellContext`T24^2 + $CellContext`MT^2 (
+                12 $CellContext`MT^2 + 3 $CellContext`T + 
+                3 $CellContext`T14 - $CellContext`T24) (
+                 4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^5 + 
+              2 $CellContext`MH^8 $CellContext`T24 (176 $CellContext`MT^4 + 
+                11 $CellContext`T^2 + 22 $CellContext`T $CellContext`T14 + 
+                11 $CellContext`T14^2 + 
+                8 $CellContext`MT^2 (11 $CellContext`T + 11 $CellContext`T14 - 
+                  24 $CellContext`T24) - 32 $CellContext`T $CellContext`T24 - 
+                32 $CellContext`T14 $CellContext`T24 - 
+                11 $CellContext`T24^2) - $CellContext`MH^2 (
+                4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^3 (
+               320 $CellContext`MT^6 + ($CellContext`T + $CellContext`T14) (
+                 5 $CellContext`T + 
+                 5 $CellContext`T14 - $CellContext`T24) $CellContext`T24 + 
+               8 $CellContext`MT^4 (20 $CellContext`T + 20 $CellContext`T14 + 
+                 7 $CellContext`T24) + 
+               2 $CellContext`MT^2 (10 $CellContext`T^2 + 
+                 20 $CellContext`T $CellContext`T14 + 10 $CellContext`T14^2 + 
+                 17 $CellContext`T $CellContext`T24 + 
+                 17 $CellContext`T14 $CellContext`T24 - 
+                 5 $CellContext`T24^2)) - 
+              8 $CellContext`MH^6 $CellContext`T24 (464 $CellContext`MT^6 + 
+               8 $CellContext`MT^4 (41 $CellContext`T + 41 $CellContext`T14 - 
+                 18 $CellContext`T24) + 
+               11 $CellContext`MT^2 (7 $CellContext`T^2 + 
+                 14 $CellContext`T $CellContext`T14 + 7 $CellContext`T14^2 - 
+                 4 $CellContext`T $CellContext`T24 - 
+                 4 $CellContext`T14 $CellContext`T24 - 3 $CellContext`T24^2) + 
+               2 ($CellContext`T + $CellContext`T14) (3 $CellContext`T^2 + 
+                 6 $CellContext`T $CellContext`T14 + 
+                 3 $CellContext`T14^2 - $CellContext`T $CellContext`T24 - \
+$CellContext`T14 $CellContext`T24 - 
+                 2 $CellContext`T24^2)) + $CellContext`MH^4 (
+                4608 $CellContext`MT^10 + 
+                512 $CellContext`MT^8 (9 $CellContext`T + 9 $CellContext`T14 + 
+                  25 $CellContext`T24) + 
+                64 $CellContext`MT^6 (27 $CellContext`T^2 + 
+                  54 $CellContext`T $CellContext`T14 + 27 $CellContext`T14^2 + 
+                  181 $CellContext`T $CellContext`T24 + 
+                  181 $CellContext`T14 $CellContext`T24 + 
+                  10 $CellContext`T24^2) + 
+                16 $CellContext`MT^4 (18 $CellContext`T^3 + 
+                  18 $CellContext`T14^3 + 
+                  243 $CellContext`T14^2 $CellContext`T24 + 
+                  50 $CellContext`T14 $CellContext`T24^2 - 
+                  41 $CellContext`T24^3 + 
+                  27 $CellContext`T^2 (2 $CellContext`T14 + 
+                    9 $CellContext`T24) + $CellContext`T (
+                    54 $CellContext`T14^2 + 
+                    486 $CellContext`T14 $CellContext`T24 + 
+                    50 $CellContext`T24^2)) + 
+                2 $CellContext`MT^2 (9 $CellContext`T^4 + 
+                  9 $CellContext`T14^4 + 
+                  286 $CellContext`T14^3 $CellContext`T24 + 
+                  140 $CellContext`T14^2 $CellContext`T24^2 - 
+                  78 $CellContext`T14 $CellContext`T24^3 - 
+                  13 $CellContext`T24^4 + $CellContext`T^3 (
+                    36 $CellContext`T14 + 286 $CellContext`T24) + 
+                  2 $CellContext`T^2 (27 $CellContext`T14^2 + 
+                    429 $CellContext`T14 $CellContext`T24 + 
+                    70 $CellContext`T24^2) + $CellContext`T (
+                    36 $CellContext`T14^3 + 
+                    858 $CellContext`T14^2 $CellContext`T24 + 
+                    280 $CellContext`T14 $CellContext`T24^2 - 
+                    78 $CellContext`T24^3)) + $CellContext`T24 (
+                  31 $CellContext`T^4 + 31 $CellContext`T14^4 + 
+                  30 $CellContext`T14^3 $CellContext`T24 + 
+                  2 $CellContext`T14^2 $CellContext`T24^2 + 
+                  2 $CellContext`T14 $CellContext`T24^3 - $CellContext`T24^4 + 
+                  2 $CellContext`T^3 (62 $CellContext`T14 + 
+                    15 $CellContext`T24) + 
+                  2 $CellContext`T^2 (93 $CellContext`T14^2 + 
+                    45 $CellContext`T14 $CellContext`T24 + \
+$CellContext`T24^2) + 
+                  2 $CellContext`T (62 $CellContext`T14^3 + 
+                    45 $CellContext`T14^2 $CellContext`T24 + 
+                    2 $CellContext`T14 $CellContext`T24^2 + \
+$CellContext`T24^3)))) 
+             X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + 
+            2 ($CellContext`MH^2 - 
+              4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14) (
+              16 $CellContext`MH^8 $CellContext`T24^2 - $CellContext`MT^2 (
+               16 $CellContext`MT^2 + 4 $CellContext`T + 4 $CellContext`T14 - 
+               5 $CellContext`T24) (
+                4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^4 + $CellContext`MH^6 $CellContext`T24 (
+                176 $CellContext`MT^4 + 11 $CellContext`T^2 + 
+                22 $CellContext`T $CellContext`T14 + 11 $CellContext`T14^2 + 
+                8 $CellContext`MT^2 (11 $CellContext`T + 11 $CellContext`T14 - 
+                  25 $CellContext`T24) - 34 $CellContext`T $CellContext`T24 - 
+                34 $CellContext`T14 $CellContext`T24 - 
+                13 $CellContext`T24^2) + $CellContext`MH^2 (
+                 4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^2 (
+                144 $CellContext`MT^6 + ($CellContext`T + $CellContext`T14) (
+                  5 $CellContext`T + 5 $CellContext`T14 - 
+                  6 $CellContext`T24) $CellContext`T24 + 
+                72 $CellContext`MT^4 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24) + $CellContext`MT^2 (9 $CellContext`T^2 + 
+                  18 $CellContext`T $CellContext`T14 + 9 $CellContext`T14^2 + 
+                  38 $CellContext`T $CellContext`T24 + 
+                  38 $CellContext`T14 $CellContext`T24 - 
+                  55 $CellContext`T24^2)) - 
+              2 $CellContext`MH^4 $CellContext`T24 (672 $CellContext`MT^6 + 
+               8 $CellContext`T^3 + 8 $CellContext`T14^3 + 
+               16 $CellContext`MT^4 (29 $CellContext`T + 29 $CellContext`T14 - 
+                 20 $CellContext`T24) + $CellContext`T^2 (24 $CellContext`T14 - 
+                 7 $CellContext`T24) - 7 $CellContext`T14^2 $CellContext`T24 - 
+               10 $CellContext`T14 $CellContext`T24^2 - 3 $CellContext`T24^3 + 
+               2 $CellContext`MT^2 (53 $CellContext`T^2 + 
+                 106 $CellContext`T $CellContext`T14 + 53 $CellContext`T14^2 - 
+                 54 $CellContext`T $CellContext`T24 - 
+                 54 $CellContext`T14 $CellContext`T24 - 
+                 35 $CellContext`T24^2) + 
+               2 $CellContext`T (12 $CellContext`T14^2 - 
+                 7 $CellContext`T14 $CellContext`T24 - 5 $CellContext`T24^2)))
+               X`DiscB[$CellContext`MH^2 - 
+               
+               4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`MT, $CellContext`MT] + (
+              4 $CellContext`MH^8 $CellContext`T24^2 (36 $CellContext`MT^2 + 
+                9 $CellContext`T + 
+                9 $CellContext`T14 + $CellContext`T24) - $CellContext`MT^2 (
+                4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^4 (48 $CellContext`MT^4 + 3 $CellContext`T^2 + 
+               6 $CellContext`T $CellContext`T14 + 3 $CellContext`T14^2 + 
+               8 $CellContext`MT^2 (3 $CellContext`T + 3 $CellContext`T14 - 
+                 7 $CellContext`T24) - 14 $CellContext`T $CellContext`T24 - 
+               14 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2) + 
+              2 $CellContext`MH^6 $CellContext`T24 (192 $CellContext`MT^6 + 
+                3 $CellContext`T^3 + 3 $CellContext`T14^3 + 
+                16 $CellContext`MT^4 (9 $CellContext`T + 9 $CellContext`T14 - 
+                  58 $CellContext`T24) + $CellContext`T^2 (9 $CellContext`T14 - 
+                  40 $CellContext`T24) - 
+                40 $CellContext`T14^2 $CellContext`T24 - 
+                17 $CellContext`T14 $CellContext`T24^2 - 6 $CellContext`T24^3 + 
+                4 $CellContext`MT^2 (9 $CellContext`T^2 + 
+                  18 $CellContext`T $CellContext`T14 + 9 $CellContext`T14^2 - 
+                  98 $CellContext`T $CellContext`T24 - 
+                  98 $CellContext`T14 $CellContext`T24 - 
+                  19 $CellContext`T24^2) + $CellContext`T (
+                  9 $CellContext`T14^2 - 80 $CellContext`T14 $CellContext`T24 - 
+                  17 $CellContext`T24^2)) + $CellContext`MH^4 \
+$CellContext`T24 ((-1536) $CellContext`MT^8 - 11 $CellContext`T^4 - 
+                11 $CellContext`T14^4 - 
+                64 $CellContext`MT^6 (29 $CellContext`T + 29 $CellContext`T14 - 
+                 115 $CellContext`T24) + 
+                50 $CellContext`T14^3 $CellContext`T24 + 
+                56 $CellContext`T14^2 $CellContext`T24^2 + 
+                26 $CellContext`T14 $CellContext`T24^3 - $CellContext`T24^4 + \
+$CellContext`T^3 ((-44) $CellContext`T14 + 50 $CellContext`T24) - 
+                16 $CellContext`MT^4 (51 $CellContext`T^2 + 
+                 102 $CellContext`T $CellContext`T14 + 51 $CellContext`T14^2 - 
+                 280 $CellContext`T $CellContext`T24 - 
+                 280 $CellContext`T14 $CellContext`T24 - 
+                 
+                 95 $CellContext`T24^2) + $CellContext`T^2 ((-66) \
+$CellContext`T14^2 + 150 $CellContext`T14 $CellContext`T24 + 
+                  56 $CellContext`T24^2) + $CellContext`T ((-44) \
+$CellContext`T14^3 + 150 $CellContext`T14^2 $CellContext`T24 + 
+                  112 $CellContext`T14 $CellContext`T24^2 + 
+                  26 $CellContext`T24^3) - 
+                4 $CellContext`MT^2 (39 $CellContext`T^3 + 
+                 39 $CellContext`T14^3 + $CellContext`T^2 (
+                   117 $CellContext`T14 - 215 $CellContext`T24) - 
+                 215 $CellContext`T14^2 $CellContext`T24 - 
+                 151 $CellContext`T14 $CellContext`T24^2 - 
+                 37 $CellContext`T24^3 + $CellContext`T (
+                   117 $CellContext`T14^2 - 
+                   430 $CellContext`T14 $CellContext`T24 - 
+                   151 $CellContext`T24^2))) + $CellContext`MH^2 (
+                 4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^2 (256 $CellContext`MT^8 + 
+                32 $CellContext`MT^6 (6 $CellContext`T + 6 $CellContext`T14 - 
+                  7 $CellContext`T24) + 
+                16 $CellContext`MT^4 (3 $CellContext`T^2 + 
+                  6 $CellContext`T $CellContext`T14 + 3 $CellContext`T14^2 - 
+                  2 $CellContext`T $CellContext`T24 - 
+                  2 $CellContext`T14 $CellContext`T24 - 
+                  37 $CellContext`T24^2) + ($CellContext`T + \
+$CellContext`T14) $CellContext`T24 (5 $CellContext`T^2 + 5 $CellContext`T14^2 + 
+                  2 $CellContext`T (5 $CellContext`T14 - 8 $CellContext`T24) - 
+                  16 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2) + 
+                2 $CellContext`MT^2 (2 $CellContext`T^3 + 
+                  2 $CellContext`T14^3 + 
+                  13 $CellContext`T14^2 $CellContext`T24 - 
+                  106 $CellContext`T14 $CellContext`T24^2 - \
+$CellContext`T24^3 + $CellContext`T^2 (6 $CellContext`T14 + 
+                    13 $CellContext`T24) + 
+                  2 $CellContext`T (3 $CellContext`T14^2 + 
+                    13 $CellContext`T14 $CellContext`T24 - 
+                    53 $CellContext`T24^2)))) 
+             X`DiscB[$CellContext`T24, $CellContext`MT, $CellContext`MT] - 
+            2 ((-64) $CellContext`MT^4 - 4 $CellContext`T^2 - 
+             8 $CellContext`T $CellContext`T14 - 4 $CellContext`T14^2 - 
+             3 $CellContext`T $CellContext`T24 - 
+             3 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + \
+$CellContext`MH^2 (20 $CellContext`MT^2 + 5 $CellContext`T + 
+               5 $CellContext`T14 + $CellContext`T24) - 
+             4 $CellContext`MT^2 (8 $CellContext`T + 8 $CellContext`T14 + 
+              3 $CellContext`T24)) (
+             16 $CellContext`MT^6 + $CellContext`MH^2 ($CellContext`MH^2 - \
+$CellContext`T - $CellContext`T14) $CellContext`T24 + 
+             8 $CellContext`MT^4 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24) + $CellContext`MT^2 ($CellContext`T^2 + $CellContext`T14^2 - 
+               8 $CellContext`MH^2 $CellContext`T24 + 
+               2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+               2 $CellContext`T ($CellContext`T14 + $CellContext`T24))) 
+            X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`MH^2 - 
+              4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24] - 
+            2 (16 $CellContext`MT^6 + $CellContext`MH^2 ($CellContext`MH^2 - \
+$CellContext`T - $CellContext`T14) $CellContext`T24 + 
+             8 $CellContext`MT^4 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24) + $CellContext`MT^2 ($CellContext`T^2 + $CellContext`T14^2 - 
+               8 $CellContext`MH^2 $CellContext`T24 + 
+               2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+               2 $CellContext`T ($CellContext`T14 + $CellContext`T24))) \
+(($CellContext`MT^2 (4 $CellContext`T + 4 $CellContext`T14 - 
+                 6 $CellContext`T24) + ($CellContext`T + $CellContext`T14) \
+($CellContext`T + $CellContext`T14 - 2 $CellContext`T24)) (
+                4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^3 + 
+             2 $CellContext`MH^6 $CellContext`T24 (36 $CellContext`MT^2 + 
+               9 $CellContext`T + 
+               9 $CellContext`T14 + $CellContext`T24) + $CellContext`MH^4 (
+               192 $CellContext`MT^6 + 3 $CellContext`T^3 + 
+               3 $CellContext`T14^3 + 
+               16 $CellContext`MT^4 (9 $CellContext`T + 9 $CellContext`T14 - 
+                 37 $CellContext`T24) + $CellContext`T^2 (9 $CellContext`T14 - 
+                 31 $CellContext`T24) - 
+               31 $CellContext`T14^2 $CellContext`T24 - 
+               19 $CellContext`T14 $CellContext`T24^2 - $CellContext`T24^3 + \
+$CellContext`T (9 $CellContext`T14^2 - 62 $CellContext`T14 $CellContext`T24 - 
+                 19 $CellContext`T24^2) + 
+               4 $CellContext`MT^2 (9 $CellContext`T^2 + 
+                 18 $CellContext`T $CellContext`T14 + 9 $CellContext`T14^2 - 
+                 68 $CellContext`T $CellContext`T24 - 
+                 68 $CellContext`T14 $CellContext`T24 - 
+                 17 $CellContext`T24^2)) - 
+             2 $CellContext`MH^2 (320 $CellContext`MT^8 + 2 $CellContext`T^4 + 
+              2 $CellContext`T14^4 + 
+              16 $CellContext`MT^6 (23 $CellContext`T + 23 $CellContext`T14 - 
+                37 $CellContext`T24) + $CellContext`T^3 (8 $CellContext`T14 - 
+                6 $CellContext`T24) - 6 $CellContext`T14^3 $CellContext`T24 - 
+              10 $CellContext`T14^2 $CellContext`T24^2 - 
+              3 $CellContext`T14 $CellContext`T24^3 - $CellContext`T24^4 + 
+              4 $CellContext`MT^4 (39 $CellContext`T^2 + 
+                78 $CellContext`T $CellContext`T14 + 39 $CellContext`T14^2 - 
+                98 $CellContext`T $CellContext`T24 - 
+                98 $CellContext`T14 $CellContext`T24 - 45 $CellContext`T24^2) + 
+              2 $CellContext`T^2 (6 $CellContext`T14^2 - 
+                9 $CellContext`T14 $CellContext`T24 - 
+                5 $CellContext`T24^2) + $CellContext`T (8 $CellContext`T14^3 - 
+                18 $CellContext`T14^2 $CellContext`T24 - 
+                20 $CellContext`T14 $CellContext`T24^2 - 
+                3 $CellContext`T24^3) + $CellContext`MT^2 (
+                29 $CellContext`T^3 + 
+                29 $CellContext`T14^3 + $CellContext`T^2 (87 $CellContext`T14 - 
+                  85 $CellContext`T24) - 
+                85 $CellContext`T14^2 $CellContext`T24 - 
+                85 $CellContext`T14 $CellContext`T24^2 - 
+                7 $CellContext`T24^3 + $CellContext`T (87 $CellContext`T14^2 - 
+                  170 $CellContext`T14 $CellContext`T24 - 
+                  85 $CellContext`T24^2)))) 
+            X`ScalarC0[$CellContext`MH^2, $CellContext`MH^2 - 
+              4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24, $CellContext`MT, $CellContext`MT, $CellContext`MT]) + 
+          4 $CellContext`MT^2 (
+             16 $CellContext`MT^4 + $CellContext`T^2 + $CellContext`T14^2 - 
+             4 $CellContext`MH^2 $CellContext`T24 + 
+             2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+             2 $CellContext`T ($CellContext`T14 + $CellContext`T24) + 
+             
+             8 $CellContext`MT^2 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24))^(-1) ((-$CellContext`S34^2 - 
+              2 $CellContext`S34 $CellContext`T - $CellContext`S34 \
+$CellContext`T24 + 2 $CellContext`T14 $CellContext`T24 - 
+              2 $CellContext`S (
+               2 $CellContext`S34 + $CellContext`T24) + $CellContext`MH^2 (
+                2 $CellContext`S + 3 $CellContext`S34 - 2 $CellContext`T14 - 
+                3 $CellContext`U) + 2 $CellContext`T $CellContext`U + 
+              4 $CellContext`T14 $CellContext`U + $CellContext`T24 \
+$CellContext`U + $CellContext`U^2) $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[5]] $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[4]] - 
+            8 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T24 + \
+$CellContext`U) $CellContext`Pair[
+              $CellContext`e[1], 
+              $CellContext`k[5]] $CellContext`Pair[
+              $CellContext`e[2], 
+              $CellContext`k[4]] $CellContext`Pair[
+              $CellContext`ec[4], 
+              $CellContext`ec[5]] - 
+            8 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T24 + \
+$CellContext`U) $CellContext`Pair[
+              $CellContext`e[1], 
+              $CellContext`k[5]] $CellContext`Pair[
+              $CellContext`e[2], 
+              $CellContext`ec[5]] $CellContext`Pair[
+              $CellContext`ec[4], 
+              $CellContext`k[2]] - 
+            4 ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T24 - \
+$CellContext`U) $CellContext`Pair[
+              $CellContext`e[1], 
+              $CellContext`ec[5]] ((2 $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[1]] - $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[3]]) $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[2]] + $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[4]] (2 $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[1]] - $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[3]])) - 
+            8 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T24 + \
+$CellContext`U) $CellContext`Pair[
+              $CellContext`e[1], 
+              $CellContext`ec[4]] $CellContext`Pair[
+              $CellContext`e[2], 
+              $CellContext`k[4]] $CellContext`Pair[
+              $CellContext`ec[5], 
+              $CellContext`k[1]] - 
+            8 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T24 + \
+$CellContext`U) $CellContext`Pair[
+              $CellContext`e[1], 
+              $CellContext`e[2]] $CellContext`Pair[
+              $CellContext`ec[4], 
+              $CellContext`k[2]] $CellContext`Pair[
+              $CellContext`ec[5], 
+              $CellContext`k[1]] + 4 $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[
+               4]] ((-$CellContext`MH^2 + 
+                2 $CellContext`S34 + $CellContext`T24) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[2]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[
+                 1]] + (-$CellContext`S34 + $CellContext`U) \
+$CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[3]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[1]] - $CellContext`MH^2 $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[4]] $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[1]] + $CellContext`T24 $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[4]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[1]] + 2 $CellContext`U $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[4]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[1]] - $CellContext`MH^2 $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[5]] $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[2]] + 2 $CellContext`S34 $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[5]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[2]] + $CellContext`T24 $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[5]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[2]] - $CellContext`S34 $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[5]] $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[3]] + $CellContext`U $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[5]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[3]] - $CellContext`MH^2 $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[5]] $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[4]] + $CellContext`T24 $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[5]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[4]] + 2 $CellContext`U $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[5]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[4]])) ((-$CellContext`MH^2 + 
+               4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14)^(-1) \
+((-2) $CellContext`MH^2 + 
+              4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24) + $CellContext`MH^2 (
+               16 $CellContext`MT^6 + $CellContext`MH^2 ($CellContext`MH^2 - \
+$CellContext`T - $CellContext`T14) $CellContext`T24 + 
+               8 $CellContext`MT^4 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24) + $CellContext`MT^2 ($CellContext`T^2 + $CellContext`T14^2 - 
+                 8 $CellContext`MH^2 $CellContext`T24 + 
+                 2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+                 2 $CellContext`T ($CellContext`T14 + \
+$CellContext`T24)))^(-1) (256 $CellContext`MT^8 + 
+              192 $CellContext`MT^6 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24) + 
+              48 $CellContext`MT^4 ($CellContext`T^2 + $CellContext`T14^2 + 
+                2 $CellContext`T14 $CellContext`T24 + $CellContext`T24 ((-3) \
+$CellContext`MH^2 + $CellContext`T24) + 
+                2 $CellContext`T ($CellContext`T14 + $CellContext`T24)) + \
+$CellContext`MH^2 $CellContext`T24 ((-5) $CellContext`T^2 - 
+                5 $CellContext`T14^2 - 
+                4 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+                2 $CellContext`MH^2 (3 $CellContext`T + 
+                  3 $CellContext`T14 + $CellContext`T24) - 
+                2 $CellContext`T (5 $CellContext`T14 + 2 $CellContext`T24)) + 
+              4 $CellContext`MT^2 ($CellContext`T^3 + $CellContext`T14^3 + 
+                3 $CellContext`T14^2 $CellContext`T24 + 
+                3 $CellContext`T^2 ($CellContext`T14 + $CellContext`T24) + \
+$CellContext`T14 $CellContext`T24 ((-14) $CellContext`MH^2 + 
+                  3 $CellContext`T24) + $CellContext`T24 (6 $CellContext`MH^4 - 
+                  8 $CellContext`MH^2 $CellContext`T24 + $CellContext`T24^2) + \
+$CellContext`T (3 $CellContext`T14^2 + 
+                  6 $CellContext`T14 $CellContext`T24 + $CellContext`T24 \
+((-14) $CellContext`MH^2 + 3 $CellContext`T24)))) 
+             X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT]/
+             X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`MH^2 - 
+              4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24] - ($CellContext`MH^4 + 32 $CellContext`MT^4 + 
+              
+              12 $CellContext`MT^2 ($CellContext`T + $CellContext`T14) + \
+($CellContext`T + $CellContext`T14)^2 - 
+              2 $CellContext`MH^2 (
+               6 $CellContext`MT^2 + $CellContext`T + $CellContext`T14))^(-1) \
+(16 $CellContext`MT^6 + $CellContext`MH^2 ($CellContext`MH^2 - $CellContext`T - \
+$CellContext`T14) $CellContext`T24 + 
+              8 $CellContext`MT^4 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24) + $CellContext`MT^2 ($CellContext`T^2 + $CellContext`T14^2 - 
+                8 $CellContext`MH^2 $CellContext`T24 + 
+                2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+                2 $CellContext`T ($CellContext`T14 + $CellContext`T24)))^(-1) \
+(2 $CellContext`MH^10 (12 $CellContext`MT^2 + 3 $CellContext`T + 
+               3 $CellContext`T14 - $CellContext`T24) $CellContext`T24 - \
+$CellContext`MH^8 $CellContext`T24 (464 $CellContext`MT^4 + 
+              19 $CellContext`T^2 + 38 $CellContext`T $CellContext`T14 + 
+              19 $CellContext`T14^2 + 
+              8 $CellContext`MT^2 (24 $CellContext`T + 
+                24 $CellContext`T14 - $CellContext`T24) - 
+              4 $CellContext`T $CellContext`T24 - 
+              4 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2) - \
+$CellContext`MT^2 (
+               4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^4 (
+              40 $CellContext`MT^4 + ($CellContext`T + $CellContext`T14)^2 + 
+              2 $CellContext`MT^2 (7 $CellContext`T + 
+                7 $CellContext`T14 + $CellContext`T24)) + $CellContext`MH^2 (
+                4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^2 (
+               832 $CellContext`MT^8 + ($CellContext`T + $CellContext`T14)^3 \
+$CellContext`T24 + 
+               48 $CellContext`MT^6 (11 $CellContext`T + 11 $CellContext`T14 + 
+                 10 $CellContext`T24) + $CellContext`MT^2 ($CellContext`T + \
+$CellContext`T14) (7 $CellContext`T^2 + 14 $CellContext`T $CellContext`T14 + 
+                 7 $CellContext`T14^2 + 26 $CellContext`T $CellContext`T24 + 
+                 26 $CellContext`T14 $CellContext`T24 + 3 $CellContext`T24^2) + 
+               4 $CellContext`MT^4 (27 $CellContext`T^2 + 
+                 54 $CellContext`T $CellContext`T14 + 27 $CellContext`T14^2 + 
+                 52 $CellContext`T $CellContext`T24 + 
+                 52 $CellContext`T14 $CellContext`T24 + 
+                 9 $CellContext`T24^2)) + $CellContext`MH^6 (
+               256 $CellContext`MT^8 + 
+               192 $CellContext`MT^6 ($CellContext`T + $CellContext`T14 + 
+                 17 $CellContext`T24) + 
+               3 ($CellContext`T + $CellContext`T14) $CellContext`T24 (
+                 7 $CellContext`T^2 + 14 $CellContext`T $CellContext`T14 + 
+                 7 $CellContext`T14^2 + $CellContext`T24^2) + 
+               16 $CellContext`MT^4 (3 $CellContext`T^2 + 
+                 6 $CellContext`T $CellContext`T14 + 3 $CellContext`T14^2 + 
+                 119 $CellContext`T $CellContext`T24 + 
+                 119 $CellContext`T14 $CellContext`T24 + 
+                 13 $CellContext`T24^2) + 
+               4 $CellContext`MT^2 ($CellContext`T^3 + $CellContext`T14^3 + 
+                 89 $CellContext`T14^2 $CellContext`T24 + 
+                 9 $CellContext`T14 $CellContext`T24^2 + 
+                 7 $CellContext`T24^3 + $CellContext`T^2 (3 $CellContext`T14 + 
+                   89 $CellContext`T24) + $CellContext`T (
+                   3 $CellContext`T14^2 + 
+                   178 $CellContext`T14 $CellContext`T24 + 
+                   9 $CellContext`T24^2))) - $CellContext`MH^4 (
+              3584 $CellContext`MT^10 + 
+              256 $CellContext`MT^8 (13 $CellContext`T + 13 $CellContext`T14 + 
+                40 $CellContext`T24) + ($CellContext`T + $CellContext`T14)^2 \
+$CellContext`T24 (9 $CellContext`T^2 + 18 $CellContext`T $CellContext`T14 + 
+                9 $CellContext`T14^2 + 4 $CellContext`T $CellContext`T24 + 
+                4 $CellContext`T14 $CellContext`T24 + 3 $CellContext`T24^2) + 
+              128 $CellContext`MT^6 (9 $CellContext`T^2 + 
+                18 $CellContext`T $CellContext`T14 + 9 $CellContext`T14^2 + 
+                60 $CellContext`T $CellContext`T24 + 
+                60 $CellContext`T14 $CellContext`T24 + 14 $CellContext`T24^2) + 
+              16 $CellContext`MT^4 (11 $CellContext`T^3 + 
+                11 $CellContext`T14^3 + 
+                129 $CellContext`T14^2 $CellContext`T24 + 
+                51 $CellContext`T14 $CellContext`T24^2 + 
+                16 $CellContext`T24^3 + 
+                3 $CellContext`T^2 (11 $CellContext`T14 + 
+                  43 $CellContext`T24) + 
+                3 $CellContext`T (11 $CellContext`T14^2 + 
+                  86 $CellContext`T14 $CellContext`T24 + 
+                  17 $CellContext`T24^2)) + 
+              2 $CellContext`MT^2 (5 $CellContext`T^4 + 5 $CellContext`T14^4 + 
+                116 $CellContext`T14^3 $CellContext`T24 + 
+                54 $CellContext`T14^2 $CellContext`T24^2 + 
+                28 $CellContext`T14 $CellContext`T24^3 + $CellContext`T24^4 + 
+                4 $CellContext`T^3 (5 $CellContext`T14 + 29 $CellContext`T24) + 
+                6 $CellContext`T^2 (5 $CellContext`T14^2 + 
+                  58 $CellContext`T14 $CellContext`T24 + 
+                  9 $CellContext`T24^2) + 
+                4 $CellContext`T (5 $CellContext`T14^3 + 
+                  87 $CellContext`T14^2 $CellContext`T24 + 
+                  27 $CellContext`T14 $CellContext`T24^2 + 
+                  7 $CellContext`T24^3)))) 
+            X`DiscB[$CellContext`MH^2 - 
+              4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`MT, $CellContext`MT]/
+            X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`MH^2 - 
+             4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24] - (
+              16 $CellContext`MT^6 + $CellContext`MH^2 ($CellContext`MH^2 - \
+$CellContext`T - $CellContext`T14) $CellContext`T24 + 
+              8 $CellContext`MT^4 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24) + $CellContext`MT^2 ($CellContext`T^2 + $CellContext`T14^2 - 
+                8 $CellContext`MH^2 $CellContext`T24 + 
+                2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+                2 $CellContext`T ($CellContext`T14 + $CellContext`T24)))^(-1) \
+(256 $CellContext`MT^10 + 
+             256 $CellContext`MT^8 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24) + $CellContext`MH^2 $CellContext`T24 (
+               2 $CellContext`MH^2 ($CellContext`T + $CellContext`T14 - \
+$CellContext`T24)^2 + 
+               4 $CellContext`MH^4 $CellContext`T24 - ($CellContext`T + \
+$CellContext`T14) ($CellContext`T + $CellContext`T14 + $CellContext`T24)^2) + 
+             32 $CellContext`MT^6 (3 $CellContext`T^2 + 3 $CellContext`T14^2 + 
+               6 $CellContext`T14 $CellContext`T24 + 
+               6 $CellContext`T ($CellContext`T14 + $CellContext`T24) + \
+$CellContext`T24 ((-2) $CellContext`MH^2 + 
+                 3 $CellContext`T24)) + $CellContext`MT^2 ($CellContext`T^4 + \
+$CellContext`T14^4 + 4 $CellContext`T14^3 $CellContext`T24 + 
+               6 $CellContext`T14^2 $CellContext`T24 ((-2) $CellContext`MH^2 + \
+$CellContext`T24) + 
+               4 $CellContext`T14 $CellContext`T24 ((-2) $CellContext`MH^2 + \
+$CellContext`T24)^2 + 
+               4 $CellContext`T^3 ($CellContext`T14 + $CellContext`T24) + \
+$CellContext`T24^2 ((-32) $CellContext`MH^4 - 
+                 4 $CellContext`MH^2 $CellContext`T24 + $CellContext`T24^2) + 
+               6 $CellContext`T^2 ($CellContext`T14^2 + 
+                 2 $CellContext`T14 $CellContext`T24 + $CellContext`T24 ((-2) \
+$CellContext`MH^2 + $CellContext`T24)) + 
+               4 $CellContext`T ($CellContext`T14^3 + 
+                 3 $CellContext`T14^2 $CellContext`T24 + 
+                 3 $CellContext`T14 $CellContext`T24 ((-2) $CellContext`MH^2 + \
+$CellContext`T24) + $CellContext`T24 ((-2) $CellContext`MH^2 + \
+$CellContext`T24)^2)) + 
+             16 $CellContext`MT^4 ($CellContext`T^3 + $CellContext`T14^3 + 
+               3 $CellContext`T14^2 $CellContext`T24 + 
+               3 $CellContext`T14 $CellContext`T24 (-$CellContext`MH^2 + \
+$CellContext`T24) + 
+               3 $CellContext`T^2 ($CellContext`T14 + $CellContext`T24) + \
+$CellContext`T24 (2 $CellContext`MH^4 - 
+                 2 $CellContext`MH^2 $CellContext`T24 + $CellContext`T24^2) + 
+               3 $CellContext`T ($CellContext`T14^2 + 
+                 2 $CellContext`T14 $CellContext`T24 + $CellContext`T24 \
+(-$CellContext`MH^2 + $CellContext`T24)))) 
+            X`DiscB[$CellContext`T24, $CellContext`MT, $CellContext`MT]/
+            X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`MH^2 - 
+             4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24] + 
+            2 $CellContext`MH^2 (16 $CellContext`MT^4 + $CellContext`T^2 + 
+              2 $CellContext`T $CellContext`T14 + $CellContext`T14^2 + \
+$CellContext`MT^2 (8 $CellContext`T + 8 $CellContext`T14 - 
+                4 $CellContext`T24) + 
+              2 $CellContext`MH^2 $CellContext`T24 - $CellContext`T \
+$CellContext`T24 - $CellContext`T14 $CellContext`T24 - 2 $CellContext`T24^2) 
+             X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`MH^2 - 
+                4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24]^(-1) 
+             X`ScalarC0[$CellContext`MH^2, $CellContext`MH^2 - 
+               4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24, $CellContext`MT, $CellContext`MT, $CellContext`MT]))) + \
+$CellContext`T14^(-1) ($CellContext`MH^2 - $CellContext`S - $CellContext`T24 - \
+$CellContext`U)^(-1) ((-8) $CellContext`MT^2 (16 $CellContext`MT^4 - 
+            4 $CellContext`MH^2 $CellContext`T14 + 
+            8 $CellContext`MT^2 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2)^(-1) 
+          X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+             4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U]^(-1) \
+((-4) $CellContext`Pair[
+              $CellContext`e[2], 
+              $CellContext`ec[5]] ($CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[2]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[1]] + $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[5]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[1]] + $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[4]] ($CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[2]] + $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[5]])) + 8 $CellContext`Pair[
+              $CellContext`ec[4], 
+              $CellContext`k[1]] ($CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[5]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[5]] + $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`e[2]] $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[2]]) + 8 $CellContext`Pair[
+              $CellContext`e[1], 
+              $CellContext`k[4]] ($CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[5]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`ec[5]] + $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[4]] $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[2]]) + $CellContext`Pair[
+              $CellContext`e[1], 
+              $CellContext`ec[
+              4]] ((2 $CellContext`S - $CellContext`S34 + $CellContext`T - 
+               2 $CellContext`T24) $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[5]] - 4 (($CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[1]] + $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[4]]) $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[2]] + $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[5]] ($CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[1]] + $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[4]])))) ($CellContext`MH^2 (
+             16 $CellContext`MT^4 + 8 $CellContext`MH^2 $CellContext`T14 - 
+             5 $CellContext`T14^2 - 
+             4 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 - 
+             4 $CellContext`T14 $CellContext`U + 
+             2 $CellContext`T24 $CellContext`U + $CellContext`U^2 + 
+             8 $CellContext`MT^2 ((-2) $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)) 
+            X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + \
+$CellContext`T14 ((
+               4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2 - 
+             2 $CellContext`MH^2 (12 $CellContext`MT^2 - $CellContext`T14 + 
+              3 ($CellContext`T24 + $CellContext`U))) 
+            X`DiscB[$CellContext`T14, $CellContext`MT, $CellContext`MT] - (
+            8 $CellContext`MH^4 $CellContext`T14 + $CellContext`T14 (
+               
+               4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2 + $CellContext`MH^2 (16 $CellContext`MT^4 - 
+              3 $CellContext`T14^2 - 
+              10 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2 + 
+              8 $CellContext`MT^2 ((-5) $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U))) 
+           X`DiscB[$CellContext`MH^2 - 
+             4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT] + (
+             4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) 
+            X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U] + 
+           2 (64 $CellContext`MT^8 + 
+             48 $CellContext`MT^6 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + 
+             12 $CellContext`MT^4 ((-4) $CellContext`MH^2 $CellContext`T14 + \
+($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2) - $CellContext`MH^2 \
+$CellContext`T14 (-$CellContext`T14^2 + $CellContext`T14 ($CellContext`T24 + \
+$CellContext`U) + 
+              2 ($CellContext`T24 + $CellContext`U)^2 + $CellContext`MH^2 \
+($CellContext`T14 - 
+                3 ($CellContext`T24 + $CellContext`U))) + $CellContext`MT^2 (
+               12 $CellContext`MH^4 $CellContext`T14 + ($CellContext`T14 + \
+$CellContext`T24 + $CellContext`U)^3 - 
+               4 $CellContext`MH^2 $CellContext`T14 (2 $CellContext`T14 + 
+                5 ($CellContext`T24 + $CellContext`U)))) 
+            X`ScalarC0[$CellContext`MH^2, $CellContext`T14, $CellContext`MH^2 - 
+              4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT, $CellContext`MT]) + 
+         8 $CellContext`MT^2 (16 $CellContext`MT^4 - 
+            4 $CellContext`MH^2 $CellContext`T14 + 
+            8 $CellContext`MT^2 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2)^(-1) ((
+             4 $CellContext`S $CellContext`S34 - $CellContext`S34^2 + \
+$CellContext`T^2 + 2 $CellContext`S34 $CellContext`T14 - 
+             2 $CellContext`T $CellContext`T14 - 
+             2 $CellContext`MH^2 (
+              2 $CellContext`S - $CellContext`S34 + $CellContext`T - 
+              2 $CellContext`T24) - 4 $CellContext`T $CellContext`T24 - 
+             2 $CellContext`S34 $CellContext`U + 
+             2 $CellContext`T $CellContext`U) $CellContext`Pair[
+              $CellContext`e[1], 
+              $CellContext`ec[4]] $CellContext`Pair[
+              $CellContext`e[2], 
+              $CellContext`ec[5]] + 
+           8 ((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T) \
+$CellContext`Pair[
+              $CellContext`e[1], 
+              $CellContext`k[4]] $CellContext`Pair[
+              $CellContext`e[2], 
+              $CellContext`k[5]] $CellContext`Pair[
+              $CellContext`ec[4], 
+              $CellContext`ec[5]] + 
+           8 ((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T) \
+$CellContext`Pair[
+              $CellContext`e[1], 
+              $CellContext`ec[5]] $CellContext`Pair[
+              $CellContext`e[2], 
+              $CellContext`k[5]] $CellContext`Pair[
+              $CellContext`ec[4], 
+              $CellContext`k[1]] - 4 $CellContext`Pair[
+             $CellContext`e[2], 
+             $CellContext`ec[5]] (
+            2 ((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T) \
+$CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`k[2]] $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`k[1]] + (6 $CellContext`MH^2 - 3 $CellContext`S34 - 
+              3 $CellContext`T - 4 $CellContext`U) $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`k[3]] $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`k[1]] + $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`k[4]] (
+              2 ((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T) \
+$CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[2]] + (6 $CellContext`MH^2 - 
+                3 $CellContext`S34 - 3 $CellContext`T - 
+                4 $CellContext`U) $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[3]])) + 
+           8 ((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T) \
+$CellContext`Pair[
+              $CellContext`e[1], 
+              $CellContext`k[4]] $CellContext`Pair[
+              $CellContext`e[2], 
+              $CellContext`ec[4]] $CellContext`Pair[
+              $CellContext`ec[5], 
+              $CellContext`k[2]] + 
+           8 ((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T) \
+$CellContext`Pair[
+              $CellContext`e[1], 
+              $CellContext`e[2]] $CellContext`Pair[
+              $CellContext`ec[4], 
+              $CellContext`k[1]] $CellContext`Pair[
+              $CellContext`ec[5], 
+              $CellContext`k[2]] + 32 ($CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[3]] ($CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[1]] - $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[3]]) + ($CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[2]] - $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[5]]) $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[3]]) ($CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[3]] $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[2]] + $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[5]] $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[3]]) - 4 $CellContext`Pair[
+             $CellContext`e[1], 
+             $CellContext`ec[
+             4]] (((-2) ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[
+                 1]] + ($CellContext`S34 - $CellContext`T) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[3]] + 
+              2 (-$CellContext`MH^2 + $CellContext`T) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[4]]) $CellContext`Pair[
+               $CellContext`ec[5], 
+               $CellContext`k[2]] + $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`k[
+               5]] ((-2) ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[
+                 1]] + ($CellContext`S34 - $CellContext`T) $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[3]] + 
+              2 (-$CellContext`MH^2 + $CellContext`T) $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[4]]))) ((-$CellContext`MH^2 + 
+              4 $CellContext`MT^2 + $CellContext`T24 + $CellContext`U)^(-1) (
+             4 $CellContext`MT^2 - $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) - (
+             16 $CellContext`MT^6 + $CellContext`MH^2 $CellContext`T14 \
+($CellContext`MH^2 - $CellContext`T24 - $CellContext`U) + 
+             8 $CellContext`MT^4 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + $CellContext`MT^2 ((-8) $CellContext`MH^2 $CellContext`T14 + \
+($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2))^(-1) (
+            256 $CellContext`MT^10 + 
+            256 $CellContext`MT^8 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) - 
+            32 $CellContext`MT^6 (2 $CellContext`MH^2 $CellContext`T14 - 
+             3 ($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2) + 
+            16 $CellContext`MT^4 ($CellContext`MH^4 $CellContext`T14 + \
+($CellContext`T14 + $CellContext`T24 + $CellContext`U)^3 - $CellContext`MH^2 \
+$CellContext`T14 ($CellContext`T14 + 
+               3 ($CellContext`T24 + $CellContext`U))) + $CellContext`MT^2 (
+              8 $CellContext`MH^4 $CellContext`T14 ((-5) $CellContext`T14 + \
+$CellContext`T24 + $CellContext`U) + ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^4 + 
+              4 $CellContext`MH^2 $CellContext`T14 ($CellContext`T14^2 - 
+                2 $CellContext`T14 ($CellContext`T24 + $CellContext`U) - 
+                3 ($CellContext`T24 + $CellContext`U)^2)) + $CellContext`MH^2 \
+$CellContext`T14 (
+              8 $CellContext`MH^4 $CellContext`T14 + ($CellContext`T14 - \
+$CellContext`T24 - $CellContext`U) ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2 + $CellContext`MH^2 ((-3) $CellContext`T14^2 - 
+                6 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2))) 
+           X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT]/
+           X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+            4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U] + \
+$CellContext`T14 (
+              16 $CellContext`MT^6 + $CellContext`MH^2 $CellContext`T14 \
+($CellContext`MH^2 - $CellContext`T24 - $CellContext`U) + 
+              8 $CellContext`MT^4 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + $CellContext`MT^2 ((-8) $CellContext`MH^2 $CellContext`T14 + \
+($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2))^(-1) (
+             256 $CellContext`MT^8 + 
+             192 $CellContext`MT^6 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) - 
+             48 $CellContext`MT^4 (
+              3 $CellContext`MH^2 $CellContext`T14 - ($CellContext`T14 + \
+$CellContext`T24 + $CellContext`U)^2) + $CellContext`MH^2 $CellContext`T14 \
+($CellContext`T14^2 - 4 $CellContext`T14 ($CellContext`T24 + $CellContext`U) - 
+               5 ($CellContext`T24 + $CellContext`U)^2 + 
+               2 $CellContext`MH^2 ($CellContext`T14 + 
+                 3 ($CellContext`T24 + $CellContext`U))) + 
+             4 $CellContext`MT^2 (
+               6 $CellContext`MH^4 $CellContext`T14 + ($CellContext`T14 + \
+$CellContext`T24 + $CellContext`U)^3 - 
+               2 $CellContext`MH^2 $CellContext`T14 (4 $CellContext`T14 + 
+                7 ($CellContext`T24 + $CellContext`U)))) 
+            X`DiscB[$CellContext`T14, $CellContext`MT, $CellContext`MT]/
+            X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+             4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U] + \
+($CellContext`MH^4 + 32 $CellContext`MT^4 + 
+              12 $CellContext`MT^2 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2 - 
+              2 $CellContext`MH^2 (
+               6 $CellContext`MT^2 + $CellContext`T24 + $CellContext`U))^(-1) \
+(16 $CellContext`MT^6 + $CellContext`MH^2 $CellContext`T14 ($CellContext`MH^2 - \
+$CellContext`T24 - $CellContext`U) + 
+              8 $CellContext`MT^4 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + $CellContext`MT^2 ((-8) $CellContext`MH^2 $CellContext`T14 + \
+($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2))^(-1) (
+             8 $CellContext`MH^10 $CellContext`T14^2 + $CellContext`MH^8 \
+$CellContext`T14 (16 $CellContext`MT^4 - 5 $CellContext`T14^2 - 
+               28 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2 + 
+               8 $CellContext`MT^2 ((-20) $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)) + $CellContext`MH^6 $CellContext`T14 ((-256) \
+$CellContext`MT^6 + 
+               16 $CellContext`MT^4 (72 $CellContext`T14 - 
+                 11 ($CellContext`T24 + $CellContext`U)) + 
+               8 $CellContext`MT^2 (14 $CellContext`T14^2 + 
+                 52 $CellContext`T14 ($CellContext`T24 + $CellContext`U) - 
+                 5 ($CellContext`T24 + $CellContext`U)^2) - 
+               3 ($CellContext`T24 + $CellContext`U) ((-5) $CellContext`T14^2 - 
+                12 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2)) + $CellContext`MT^2 (
+                4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^3 (160 $CellContext`MT^6 - 
+               16 $CellContext`MT^4 (7 $CellContext`T14 - 
+                6 ($CellContext`T24 + $CellContext`U)) - 
+               2 $CellContext`MT^2 (3 $CellContext`T14^2 + 
+                22 $CellContext`T14 ($CellContext`T24 + $CellContext`U) - 
+                
+                9 ($CellContext`T24 + $CellContext`U)^2) + ($CellContext`T24 + \
+$CellContext`U) (-$CellContext`T14^2 - 
+                 4 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2)) + $CellContext`MH^4 (
+               256 $CellContext`MT^10 + 
+               256 $CellContext`MT^8 (
+                 5 $CellContext`T14 + $CellContext`T24 + $CellContext`U) - 
+               32 $CellContext`MT^6 (115 $CellContext`T14^2 - 
+                36 $CellContext`T14 ($CellContext`T24 + $CellContext`U) - 
+                3 ($CellContext`T24 + $CellContext`U)^2) - $CellContext`T14 \
+($CellContext`T24 + $CellContext`U)^2 (15 $CellContext`T14^2 + 
+                20 $CellContext`T14 ($CellContext`T24 + $CellContext`U) - 
+                3 ($CellContext`T24 + $CellContext`U)^2) - 
+               16 $CellContext`MT^4 (49 $CellContext`T14^3 + 
+                129 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U) - 
+                24 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^2 - \
+($CellContext`T24 + $CellContext`U)^3) + $CellContext`MT^2 ((-11) \
+$CellContext`T14^4 - 
+                 232 $CellContext`T14^3 ($CellContext`T24 + $CellContext`U) - 
+                 366 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U)^2 + 
+                 56 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^3 + \
+($CellContext`T24 + $CellContext`U)^4)) - $CellContext`MH^2 (
+              3072 $CellContext`MT^12 + 
+              256 $CellContext`MT^10 (11 $CellContext`T14 + 
+                14 ($CellContext`T24 + $CellContext`U)) - 
+              128 $CellContext`MT^8 (45 $CellContext`T14^2 - 
+               22 $CellContext`T14 ($CellContext`T24 + $CellContext`U) - 
+               13 ($CellContext`T24 + $CellContext`U)^2) + $CellContext`T14 \
+($CellContext`T24 + $CellContext`U)^3 ((-5) $CellContext`T14^2 - 
+                4 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2) - 
+              32 $CellContext`MT^6 (61 $CellContext`T14^3 + 
+               134 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U) - 
+               35 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^2 - 
+               12 ($CellContext`T24 + $CellContext`U)^3) - 
+              4 $CellContext`MT^4 (25 $CellContext`T14^4 + 
+               236 $CellContext`T14^3 ($CellContext`T24 + $CellContext`U) + 
+               282 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U)^2 - 
+               56 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^3 - 
+               11 ($CellContext`T24 + $CellContext`U)^4) + $CellContext`MT^2 \
+(-$CellContext`T14^5 - 
+                18 $CellContext`T14^4 ($CellContext`T24 + $CellContext`U) - 
+                134 $CellContext`T14^3 ($CellContext`T24 + $CellContext`U)^2 - 
+                120 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U)^3 + 
+                23 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^4 + 
+                2 ($CellContext`T24 + $CellContext`U)^5))) 
+            X`DiscB[$CellContext`MH^2 - 
+              4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT]/
+            X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U] + 
+           2 $CellContext`T14 ((
+               4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2 - $CellContext`MH^2 (
+              12 $CellContext`MT^2 + $CellContext`T14 + 
+              3 ($CellContext`T24 + $CellContext`U))) 
+            X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+               4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U]^(-1) 
+            X`ScalarC0[$CellContext`MH^2, $CellContext`T14, $CellContext`MH^2 - 
+              4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT, $CellContext`MT]) - 
+         16 $CellContext`MT^2 $CellContext`T14 (16 $CellContext`MT^4 - 
+           4 $CellContext`MH^2 $CellContext`T14 + 
+           8 $CellContext`MT^2 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2)^(-1) ((-4) $CellContext`Pair[
+             $CellContext`e[2], 
+             $CellContext`ec[5]] ($CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`k[2]] $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`k[1]] + $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`k[5]] $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`k[1]] + $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`k[4]] ($CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[2]] + $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[5]])) + 8 $CellContext`Pair[
+             $CellContext`ec[4], 
+             $CellContext`k[1]] ($CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[5]] $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`k[5]] + $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`e[2]] $CellContext`Pair[
+               $CellContext`ec[5], 
+               $CellContext`k[2]]) + 8 $CellContext`Pair[
+             $CellContext`e[1], 
+             $CellContext`k[4]] ($CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`k[5]] $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`ec[5]] + $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[4]] $CellContext`Pair[
+               $CellContext`ec[5], 
+               $CellContext`k[2]]) + $CellContext`Pair[
+             $CellContext`e[1], 
+             $CellContext`ec[
+             4]] ((2 $CellContext`S - $CellContext`S34 + $CellContext`T - 
+              2 $CellContext`T24) $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[5]] - 4 (($CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[1]] + $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[4]]) $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[2]] + $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[5]] ($CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[1]] + $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[4]])))) ((-$CellContext`MH^2 + 
+             4 $CellContext`MT^2 + $CellContext`T24 + $CellContext`U)^(-1) \
+((-2) $CellContext`MH^2 + 
+            4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + $CellContext`MH^2 (
+             16 $CellContext`MT^6 + $CellContext`MH^2 $CellContext`T14 \
+($CellContext`MH^2 - $CellContext`T24 - $CellContext`U) + 
+             8 $CellContext`MT^4 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + $CellContext`MT^2 ((-8) $CellContext`MH^2 $CellContext`T14 + \
+($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2))^(-1) (
+            256 $CellContext`MT^8 + 
+            192 $CellContext`MT^6 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) - 
+            48 $CellContext`MT^4 (
+             3 $CellContext`MH^2 $CellContext`T14 - ($CellContext`T14 + \
+$CellContext`T24 + $CellContext`U)^2) + $CellContext`MH^2 $CellContext`T14 \
+($CellContext`T14^2 - 4 $CellContext`T14 ($CellContext`T24 + $CellContext`U) - 
+              5 ($CellContext`T24 + $CellContext`U)^2 + 
+              2 $CellContext`MH^2 ($CellContext`T14 + 
+                3 ($CellContext`T24 + $CellContext`U))) + 
+            4 $CellContext`MT^2 (
+              6 $CellContext`MH^4 $CellContext`T14 + ($CellContext`T14 + \
+$CellContext`T24 + $CellContext`U)^3 - 
+              2 $CellContext`MH^2 $CellContext`T14 (4 $CellContext`T14 + 
+               7 ($CellContext`T24 + $CellContext`U)))) 
+           X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT]/
+           X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+            4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U] - (
+            16 $CellContext`MT^6 + $CellContext`MH^2 $CellContext`T14 \
+($CellContext`MH^2 - $CellContext`T24 - $CellContext`U) + 
+            8 $CellContext`MT^4 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + $CellContext`MT^2 ((-8) $CellContext`MH^2 $CellContext`T14 + \
+($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2))^(-1) (
+           256 $CellContext`MT^10 + 
+           256 $CellContext`MT^8 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) - 
+           32 $CellContext`MT^6 (2 $CellContext`MH^2 $CellContext`T14 - 
+            3 ($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2) + \
+$CellContext`MH^2 $CellContext`T14 (4 $CellContext`MH^4 $CellContext`T14 + 
+             2 $CellContext`MH^2 (-$CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2 - ($CellContext`T24 + $CellContext`U) ($CellContext`T14 + \
+$CellContext`T24 + $CellContext`U)^2) + 
+           16 $CellContext`MT^4 (
+             2 $CellContext`MH^4 $CellContext`T14 + ($CellContext`T14 + \
+$CellContext`T24 + $CellContext`U)^3 - $CellContext`MH^2 $CellContext`T14 (
+              2 $CellContext`T14 + 
+              3 ($CellContext`T24 + $CellContext`U))) + $CellContext`MT^2 (
+             16 $CellContext`MH^4 $CellContext`T14 ((-2) $CellContext`T14 + \
+$CellContext`T24 + $CellContext`U) + ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^4 - 
+             4 $CellContext`MH^2 $CellContext`T14 ($CellContext`T14^2 + 
+              4 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + 
+              3 ($CellContext`T24 + $CellContext`U)^2))) 
+          X`DiscB[$CellContext`T14, $CellContext`MT, $CellContext`MT]/
+          X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+           4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U] - \
+($CellContext`MH^4 + 32 $CellContext`MT^4 + 
+            12 $CellContext`MT^2 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2 - 
+            2 $CellContext`MH^2 (
+             6 $CellContext`MT^2 + $CellContext`T24 + $CellContext`U))^(-1) (
+            16 $CellContext`MT^6 + $CellContext`MH^2 $CellContext`T14 \
+($CellContext`MH^2 - $CellContext`T24 - $CellContext`U) + 
+            8 $CellContext`MT^4 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + $CellContext`MT^2 ((-8) $CellContext`MH^2 $CellContext`T14 + \
+($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2))^(-1) (
+           2 $CellContext`MH^10 $CellContext`T14 (
+             12 $CellContext`MT^2 - $CellContext`T14 + 
+             3 ($CellContext`T24 + $CellContext`U)) - $CellContext`MH^8 \
+$CellContext`T14 (464 $CellContext`MT^4 + $CellContext`T14^2 - 
+            4 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + 
+            19 ($CellContext`T24 + $CellContext`U)^2 - 
+            8 $CellContext`MT^2 ($CellContext`T14 - 
+             24 ($CellContext`T24 + $CellContext`U))) - $CellContext`MT^2 (
+             4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^4 (
+            40 $CellContext`MT^4 + ($CellContext`T24 + $CellContext`U)^2 + 
+            2 $CellContext`MT^2 ($CellContext`T14 + 
+              7 ($CellContext`T24 + $CellContext`U))) + $CellContext`MH^2 (
+              4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2 (
+             832 $CellContext`MT^8 + $CellContext`T14 ($CellContext`T24 + \
+$CellContext`U)^3 + 
+             48 $CellContext`MT^6 (10 $CellContext`T14 + 
+               11 ($CellContext`T24 + $CellContext`U)) + $CellContext`MT^2 \
+($CellContext`T24 + $CellContext`U) (3 $CellContext`T14^2 + 
+               26 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + 
+               7 ($CellContext`T24 + $CellContext`U)^2) + 
+             4 $CellContext`MT^4 (9 $CellContext`T14^2 + 
+               52 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + 
+               27 ($CellContext`T24 + $CellContext`U)^2)) + $CellContext`MH^6 \
+(256 $CellContext`MT^8 + 
+             192 $CellContext`MT^6 (
+               17 $CellContext`T14 + $CellContext`T24 + $CellContext`U) + 
+             16 $CellContext`MT^4 (13 $CellContext`T14^2 + 
+               119 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + 
+               3 ($CellContext`T24 + $CellContext`U)^2) + 
+             3 $CellContext`T14 ($CellContext`T24 + $CellContext`U) \
+($CellContext`T14^2 + 7 ($CellContext`T24 + $CellContext`U)^2) + 
+             4 $CellContext`MT^2 (7 $CellContext`T14^3 + 
+               9 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U) + 
+               89 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^2 + \
+($CellContext`T24 + $CellContext`U)^3)) - $CellContext`MH^4 (
+            3584 $CellContext`MT^10 + 
+            256 $CellContext`MT^8 (40 $CellContext`T14 + 
+              
+              13 ($CellContext`T24 + $CellContext`U)) + $CellContext`T14 \
+($CellContext`T24 + $CellContext`U)^2 (3 $CellContext`T14^2 + 
+              4 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + 
+              9 ($CellContext`T24 + $CellContext`U)^2) + 
+            128 $CellContext`MT^6 (14 $CellContext`T14^2 + 
+              60 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + 
+              9 ($CellContext`T24 + $CellContext`U)^2) + 
+            16 $CellContext`MT^4 (16 $CellContext`T14^3 + 
+              51 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U) + 
+              129 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^2 + 
+              11 ($CellContext`T24 + $CellContext`U)^3) + 
+            2 $CellContext`MT^2 ($CellContext`T14^4 + 
+              28 $CellContext`T14^3 ($CellContext`T24 + $CellContext`U) + 
+              54 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U)^2 + 
+              116 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^3 + 
+              5 ($CellContext`T24 + $CellContext`U)^4))) 
+          X`DiscB[$CellContext`MH^2 - 
+            4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT]/
+          X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U] + 
+          2 $CellContext`MH^2 (16 $CellContext`MT^4 + 
+            2 $CellContext`MH^2 $CellContext`T14 - 
+            2 $CellContext`T14^2 - $CellContext`T14 $CellContext`T24 + \
+$CellContext`T24^2 - $CellContext`T14 $CellContext`U + 
+            2 $CellContext`T24 $CellContext`U + $CellContext`U^2 + \
+$CellContext`MT^2 ((-4) $CellContext`T14 + 
+              8 ($CellContext`T24 + $CellContext`U))) 
+           X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+              4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U]^(-1) 
+           X`ScalarC0[$CellContext`MH^2, $CellContext`T14, $CellContext`MH^2 - 
+             4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT, $CellContext`MT]) - 
+         2 ((-4) $CellContext`MT^2 (-$CellContext`MH^2 + 
+             4 $CellContext`MT^2 + $CellContext`T24 + $CellContext`U)^(-1) \
+(-$CellContext`MH^2 + 
+             8 $CellContext`MT^2 + $CellContext`T24 + $CellContext`U)^(-1) \
+(-$CellContext`MH^2 + 8 $CellContext`MT^2 + $CellContext`T24 + $CellContext`U + 
+            2 $CellContext`MT^2 
+             X`DiscB[$CellContext`MH^2 - 
+               4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT]) ((-4) $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[5]] ($CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[2]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[1]] + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[5]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[1]] + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[4]] ($CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[2]] + $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[5]])) + 8 $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`k[1]] ($CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[5]] $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[5]] + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`e[2]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[2]]) + 8 $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`k[4]] ($CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[5]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`ec[5]] + $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[4]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[2]]) + $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[
+               4]] ((2 $CellContext`S - $CellContext`S34 + $CellContext`T - 
+                2 $CellContext`T24) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[5]] - 4 (($CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[4]]) $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[2]] + $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[5]] ($CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[4]])))) - 
+          4 $CellContext`MT^2 (-$CellContext`MH^2 + 
+            8 $CellContext`MT^2 + $CellContext`T24 + $CellContext`U)^(-1) (
+            16 $CellContext`MT^6 + $CellContext`MH^2 $CellContext`T14 \
+($CellContext`MH^2 - $CellContext`T24 - $CellContext`U) + 
+            8 $CellContext`MT^4 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + $CellContext`MT^2 ((-8) $CellContext`MH^2 $CellContext`T14 + \
+($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2))^(-1) 
+          X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+             4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U]^(-1) \
+(((-2) $CellContext`S $CellContext`S34 - $CellContext`S34 $CellContext`T14 + \
+$CellContext`T $CellContext`T14 + 
+             2 $CellContext`MH^2 ($CellContext`S - $CellContext`T24) + 
+             2 $CellContext`T $CellContext`T24) $CellContext`Pair[
+              $CellContext`e[1], 
+              $CellContext`ec[4]] $CellContext`Pair[
+              $CellContext`e[2], 
+              $CellContext`ec[5]] - 
+           4 ((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T) \
+$CellContext`Pair[
+             $CellContext`e[1], 
+             $CellContext`k[4]] $CellContext`Pair[
+             $CellContext`e[2], 
+             $CellContext`k[5]] $CellContext`Pair[
+             $CellContext`ec[4], 
+             $CellContext`ec[5]] - 
+           4 ((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T) \
+$CellContext`Pair[
+             $CellContext`e[1], 
+             $CellContext`ec[5]] $CellContext`Pair[
+             $CellContext`e[2], 
+             $CellContext`k[5]] $CellContext`Pair[
+             $CellContext`ec[4], 
+             $CellContext`k[1]] + 4 $CellContext`Pair[
+              $CellContext`e[2], 
+              $CellContext`ec[
+              5]] (((-2) $CellContext`MH^2 + $CellContext`S34 + \
+$CellContext`T) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[2]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[
+                1]] + ($CellContext`S + $CellContext`T14 + $CellContext`T24) \
+$CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[3]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[1]] + $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[
+                4]] (((-2) $CellContext`MH^2 + $CellContext`S34 + \
+$CellContext`T) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[
+                  2]] + ($CellContext`S + $CellContext`T14 + \
+$CellContext`T24) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]])) - 
+           4 ((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T) \
+$CellContext`Pair[
+             $CellContext`e[1], 
+             $CellContext`k[4]] $CellContext`Pair[
+             $CellContext`e[2], 
+             $CellContext`ec[4]] $CellContext`Pair[
+             $CellContext`ec[5], 
+             $CellContext`k[2]] - 
+           4 ((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T) \
+$CellContext`Pair[
+             $CellContext`e[1], 
+             $CellContext`e[2]] $CellContext`Pair[
+             $CellContext`ec[4], 
+             $CellContext`k[1]] $CellContext`Pair[
+             $CellContext`ec[5], 
+             $CellContext`k[2]] - 8 ($CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`k[3]] ($CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[1]] - $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`k[3]]) + ($CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[2]] - $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`k[5]]) $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`k[3]]) ($CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`k[3]] $CellContext`Pair[
+               $CellContext`ec[5], 
+               $CellContext`k[2]] + $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`k[5]] $CellContext`Pair[
+               $CellContext`ec[5], 
+               $CellContext`k[3]]) + 4 $CellContext`Pair[
+              $CellContext`e[1], 
+              $CellContext`ec[
+              4]] (((-$CellContext`MH^2 + $CellContext`S34) \
+$CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[
+                  1]] + (-$CellContext`MH^2 + $CellContext`T) \
+$CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[4]]) $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[2]] + $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[
+                5]] ((-$CellContext`MH^2 + $CellContext`S34) $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[
+                  1]] + (-$CellContext`MH^2 + $CellContext`T) \
+$CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[
+                  4]]))) (-$CellContext`MH^2 $CellContext`T14 \
+($CellContext`MH^2 - 
+             8 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U) (
+             2 $CellContext`MH^2 - 
+             4 $CellContext`MT^2 - $CellContext`T14 - $CellContext`T24 - \
+$CellContext`U) 
+            X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MH^2 $CellContext`T14 ($CellContext`MH^2 - 
+             8 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U) (
+             4 $CellContext`MT^2 - $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) 
+            X`DiscB[$CellContext`T14, $CellContext`MT, $CellContext`MT] - (
+            64 $CellContext`MT^8 - 
+            2 $CellContext`MH^2 $CellContext`T14 (-$CellContext`MH^2 + \
+$CellContext`T24 + $CellContext`U)^2 + 
+            48 $CellContext`MT^6 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + 
+            4 $CellContext`MT^4 ((-20) $CellContext`MH^2 $CellContext`T14 + 
+              3 ($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2) + \
+$CellContext`MT^2 (
+              24 $CellContext`MH^4 $CellContext`T14 + ($CellContext`T14 + \
+$CellContext`T24 + $CellContext`U)^3 - 
+              4 $CellContext`MH^2 $CellContext`T14 ($CellContext`T14 + 
+               7 ($CellContext`T24 + $CellContext`U)))) 
+           X`DiscB[$CellContext`MH^2 - 
+             4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT] - ($CellContext`MH^2 - 
+            8 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U) (
+            4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) (
+            16 $CellContext`MT^6 + $CellContext`MH^2 $CellContext`T14 \
+($CellContext`MH^2 - $CellContext`T24 - $CellContext`U) + 
+            8 $CellContext`MT^4 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + $CellContext`MT^2 ((-8) $CellContext`MH^2 $CellContext`T14 + \
+($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2)) 
+           X`ScalarC0[$CellContext`MH^2, $CellContext`T14, $CellContext`MH^2 - 
+             4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT, $CellContext`MT])) + 
+         4 (2 $CellContext`MT^2 (16 $CellContext`MT^4 - 
+              4 $CellContext`MH^2 $CellContext`T14 + 
+              8 $CellContext`MT^2 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2)^(-2) (-($CellContext`S34 - $CellContext`T) ((-2) \
+$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + 
+               2 $CellContext`U) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[4]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[5]] - 
+             4 (2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - 
+              2 $CellContext`U) $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[5]] ($CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[3]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[1]] + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[4]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[3]]) - 
+             4 ($CellContext`S34 - $CellContext`T) $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[4]] ($CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[3]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[2]] + $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[5]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[3]]) + 16 ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[3]] ($CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] - $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]]) + ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[2]] - $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[5]]) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]]) ($CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[3]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[2]] + $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[3]])) (-(-$CellContext`MH^2 + 
+                4 $CellContext`MT^2 + $CellContext`T24 + $CellContext`U)^(-1) \
+(12 $CellContext`MH^4 $CellContext`T14 - (
+                4 $CellContext`MT^2 - $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) (
+                 4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2 + 
+               2 $CellContext`MH^2 (16 $CellContext`MT^4 - $CellContext`T14^2 - 
+                 6 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2 + 
+                 8 $CellContext`MT^2 ((-3) $CellContext`T14 + \
+$CellContext`T24 + $CellContext`U))) + 
+             2 $CellContext`MH^2 (
+                16 $CellContext`MT^6 + $CellContext`MH^2 $CellContext`T14 \
+($CellContext`MH^2 - $CellContext`T24 - $CellContext`U) + 
+                8 $CellContext`MT^4 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + $CellContext`MT^2 ((-8) $CellContext`MH^2 $CellContext`T14 + \
+($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2))^(-1) (
+               1024 $CellContext`MT^12 - 
+               1280 $CellContext`MT^10 ($CellContext`T14 - $CellContext`T24 - \
+$CellContext`U) + 128 $CellContext`MT^8 (7 $CellContext`MH^2 $CellContext`T14 - 
+                 15 $CellContext`T14^2 - 
+                 10 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + 
+                 5 ($CellContext`T24 + $CellContext`U)^2) + 
+               32 $CellContext`MT^6 (2 $CellContext`MH^4 $CellContext`T14 - 
+                 5 (5 $CellContext`T14 - $CellContext`T24 - $CellContext`U) \
+($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2 + 
+                 19 $CellContext`MH^2 $CellContext`T14 (
+                   3 $CellContext`T14 + $CellContext`T24 + $CellContext`U)) - 
+               4 $CellContext`MT^4 (
+                5 (7 $CellContext`T14 - $CellContext`T24 - $CellContext`U) \
+($CellContext`T14 + $CellContext`T24 + $CellContext`U)^3 + 
+                4 $CellContext`MH^4 $CellContext`T14 (55 $CellContext`T14 - 
+                  3 ($CellContext`T24 + $CellContext`U)) - 
+                2 $CellContext`MH^2 $CellContext`T14 (91 $CellContext`T14^2 + 
+                 130 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + 
+                 15 ($CellContext`T24 + $CellContext`U)^2)) + \
+$CellContext`MH^2 $CellContext`T14 (
+                 2 $CellContext`MH^4 $CellContext`T14 (3 $CellContext`T14 + 
+                   13 ($CellContext`T24 + $CellContext`U)) - \
+($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2 ($CellContext`T14^2 - 
+                  10 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2) + $CellContext`MH^2 ((-5) \
+$CellContext`T14^3 - 
+                   27 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U) - 
+                   33 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^2 + \
+($CellContext`T24 + $CellContext`U)^3)) + $CellContext`MT^2 (
+                 104 $CellContext`MH^6 $CellContext`T14^2 - (
+                  9 $CellContext`T14 - $CellContext`T24 - $CellContext`U) \
+($CellContext`T14 + $CellContext`T24 + $CellContext`U)^4 - 
+                 4 $CellContext`MH^4 $CellContext`T14 (37 $CellContext`T14^2 + 
+                  88 $CellContext`T14 ($CellContext`T24 + $CellContext`U) - 
+                  3 ($CellContext`T24 + $CellContext`U)^2) + 
+                 2 $CellContext`MH^2 $CellContext`T14 (39 $CellContext`T14^3 + 
+                   127 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U) + 
+                   
+                   89 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^2 + \
+($CellContext`T24 + $CellContext`U)^3))) 
+              X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT]/
+              X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U] + 
+             2 $CellContext`T14 (
+                16 $CellContext`MT^6 + $CellContext`MH^2 $CellContext`T14 \
+($CellContext`MH^2 - $CellContext`T24 - $CellContext`U) + 
+                8 $CellContext`MT^4 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + $CellContext`MT^2 ((-8) $CellContext`MH^2 $CellContext`T14 + \
+($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2))^(-1) ((-12) \
+$CellContext`MH^8 $CellContext`T14^2 + $CellContext`MT^2 (
+                  4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^5 - $CellContext`MH^2 (
+                 4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^3 (
+                40 $CellContext`MT^4 + $CellContext`T14 ($CellContext`T24 + \
+$CellContext`U) + $CellContext`MT^2 ((-4) $CellContext`T14 + 
+                  10 ($CellContext`T24 + $CellContext`U))) - 
+               2 $CellContext`MH^6 $CellContext`T14 (96 $CellContext`MT^4 - 
+                5 $CellContext`T14^2 - 
+                9 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + 
+                6 ($CellContext`T24 + $CellContext`U)^2 + $CellContext`MT^2 \
+((-60) $CellContext`T14 + 48 ($CellContext`T24 + $CellContext`U))) + 
+               2 $CellContext`MH^4 $CellContext`T14 (
+                 608 $CellContext`MT^6 + $CellContext`T14^3 - 
+                 5 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U) + 
+                 6 ($CellContext`T24 + $CellContext`U)^3 + $CellContext`MT^4 \
+((-64) $CellContext`T14 + 400 ($CellContext`T24 + $CellContext`U)) - 
+                 2 $CellContext`MT^2 (25 $CellContext`T14^2 + 
+                  8 $CellContext`T14 ($CellContext`T24 + $CellContext`U) - 
+                  43 ($CellContext`T24 + $CellContext`U)^2))) 
+              X`DiscB[$CellContext`T14, $CellContext`MT, $CellContext`MT]/
+              X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U] - 
+             2 ($CellContext`MH^4 + 32 $CellContext`MT^4 + 
+               12 $CellContext`MT^2 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2 - 
+               2 $CellContext`MH^2 (
+                6 $CellContext`MT^2 + $CellContext`T24 + \
+$CellContext`U))^(-1) (
+               16 $CellContext`MT^6 + $CellContext`MH^2 $CellContext`T14 \
+($CellContext`MH^2 - $CellContext`T24 - $CellContext`U) + 
+               8 $CellContext`MT^4 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + $CellContext`MT^2 ((-8) $CellContext`MH^2 $CellContext`T14 + \
+($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2))^(-1) (
+              2 $CellContext`MH^12 $CellContext`T14^2 (52 $CellContext`MT^2 - 
+                3 $CellContext`T14 + 
+                13 ($CellContext`T24 + $CellContext`U)) + $CellContext`MT^2 (
+                 4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^5 (
+                16 $CellContext`MT^6 + $CellContext`T14 ($CellContext`T24 + \
+$CellContext`U)^2 + 
+                8 $CellContext`MT^4 (
+                  5 $CellContext`T14 + $CellContext`T24 + $CellContext`U) + \
+$CellContext`MT^2 ($CellContext`T14^2 + 
+                  14 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2)) + $CellContext`MH^10 $CellContext`T14 \
+(64 $CellContext`MT^6 + 5 $CellContext`T14^3 + 
+                3 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U) - 
+                97 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^2 + \
+($CellContext`T24 + $CellContext`U)^3 + $CellContext`MT^4 ((-2320) \
+$CellContext`T14 + 48 ($CellContext`T24 + $CellContext`U)) + 
+                4 $CellContext`MT^2 (3 $CellContext`T14^2 - 
+                  242 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + 
+                  3 ($CellContext`T24 + $CellContext`U)^2)) + \
+$CellContext`MH^2 (
+                 4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^3 (
+                512 $CellContext`MT^10 - $CellContext`T14^2 ($CellContext`T24 + \
+$CellContext`U)^3 - 
+                64 $CellContext`MT^8 (46 $CellContext`T14 - 
+                 7 ($CellContext`T24 + $CellContext`U)) - 
+                16 $CellContext`MT^6 (26 $CellContext`T14^2 + 
+                 114 $CellContext`T14 ($CellContext`T24 + $CellContext`U) - 
+                 9 ($CellContext`T24 + $CellContext`U)^2) - 
+                4 $CellContext`MT^4 (6 $CellContext`T14^3 + 
+                 45 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U) + 
+                 90 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^2 - 
+                 5 ($CellContext`T24 + $CellContext`U)^3) + $CellContext`MT^2 \
+($CellContext`T24 + $CellContext`U) ((-2) $CellContext`T14^3 - 
+                  23 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U) - 
+                  22 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^2 + \
+($CellContext`T24 + $CellContext`U)^3)) + $CellContext`MH^8 $CellContext`T14 (
+                128 $CellContext`MT^8 + $CellContext`T14^4 + 
+                96 $CellContext`MT^6 (
+                  203 $CellContext`T14 - $CellContext`T24 - $CellContext`U) - 
+                12 $CellContext`T14^3 ($CellContext`T24 + $CellContext`U) + 
+                30 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U)^2 + 
+                136 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^3 - 
+                3 ($CellContext`T24 + $CellContext`U)^4 + 
+                8 $CellContext`MT^4 (157 $CellContext`T14^2 + 
+                  1446 $CellContext`T14 ($CellContext`T24 + $CellContext`U) - 
+                  15 ($CellContext`T24 + $CellContext`U)^2) - 
+                2 $CellContext`MT^2 (33 $CellContext`T14^3 - 
+                 205 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U) - 
+                 1109 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^2 + 
+                 17 ($CellContext`T24 + $CellContext`U)^3)) + \
+$CellContext`MH^6 (1024 $CellContext`MT^12 - 
+                256 $CellContext`MT^10 (51 $CellContext`T14 - 
+                 5 ($CellContext`T24 + $CellContext`U)) - 
+                128 $CellContext`MT^8 (609 $CellContext`T14^2 + 
+                 87 $CellContext`T14 ($CellContext`T24 + $CellContext`U) - 
+                 5 ($CellContext`T24 + $CellContext`U)^2) - 
+                32 $CellContext`MT^6 (381 $CellContext`T14^3 + 
+                 1892 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U) + 
+                 102 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^2 - 
+                 5 ($CellContext`T24 + $CellContext`U)^3) - $CellContext`T14 \
+($CellContext`T24 + $CellContext`U) (3 $CellContext`T14^4 - 
+                 6 $CellContext`T14^3 ($CellContext`T24 + $CellContext`U) + 
+                 48 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U)^2 + 
+                 86 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^3 - 
+                 3 ($CellContext`T24 + $CellContext`U)^4) + 
+                4 $CellContext`MT^4 ($CellContext`T14^4 - 
+                  1566 $CellContext`T14^3 ($CellContext`T24 + $CellContext`U) - 
+                  4258 $CellContext`T14^2 ($CellContext`T24 + \
+$CellContext`U)^2 - 78 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^3 + 
+                  5 ($CellContext`T24 + $CellContext`U)^4) + \
+$CellContext`MT^2 ((-19) $CellContext`T14^5 + 
+                  43 $CellContext`T14^4 ($CellContext`T24 + $CellContext`U) - 
+                  996 $CellContext`T14^3 ($CellContext`T24 + \
+$CellContext`U)^2 - 
+                  2036 $CellContext`T14^2 ($CellContext`T24 + \
+$CellContext`U)^3 + 
+                  15 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^4 + \
+($CellContext`T24 + $CellContext`U)^5)) + $CellContext`MH^4 ((-12288) \
+$CellContext`MT^14 + 
+                1024 $CellContext`MT^12 (80 $CellContext`T14 - 
+                  17 ($CellContext`T24 + $CellContext`U)) + 
+                256 $CellContext`MT^10 (621 $CellContext`T14^2 + 
+                  361 $CellContext`T14 ($CellContext`T24 + $CellContext`U) - 
+                  40 ($CellContext`T24 + $CellContext`U)^2) + 
+                128 $CellContext`MT^8 (325 $CellContext`T14^3 + 
+                  1187 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U) + 
+                  320 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^2 - 
+                  25 ($CellContext`T24 + $CellContext`U)^3) + 
+                16 $CellContext`MT^6 (157 $CellContext`T14^4 + 
+                  1832 $CellContext`T14^3 ($CellContext`T24 + $CellContext`U) + 
+                  3484 $CellContext`T14^2 ($CellContext`T24 + \
+$CellContext`U)^2 + 
+                  550 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^3 - 
+                  35 ($CellContext`T24 + $CellContext`U)^4) + \
+$CellContext`T14 ($CellContext`T24 + $CellContext`U)^2 (3 $CellContext`T14^4 + 
+                  4 $CellContext`T14^3 ($CellContext`T24 + $CellContext`U) + 
+                  24 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U)^2 + 
+                  
+                  22 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^3 - \
+($CellContext`T24 + $CellContext`U)^4) + 
+                4 $CellContext`MT^4 (46 $CellContext`T14^5 + 
+                  263 $CellContext`T14^4 ($CellContext`T24 + $CellContext`U) + 
+                  1810 $CellContext`T14^3 ($CellContext`T24 + \
+$CellContext`U)^2 + 
+                  2418 $CellContext`T14^2 ($CellContext`T24 + \
+$CellContext`U)^3 + 
+                  220 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^4 - 
+                  13 ($CellContext`T24 + $CellContext`U)^5) + \
+$CellContext`MT^2 ($CellContext`T14^6 + 
+                  43 $CellContext`T14^5 ($CellContext`T24 + $CellContext`U) + 
+                  122 $CellContext`T14^4 ($CellContext`T24 + \
+$CellContext`U)^2 + 
+                  724 $CellContext`T14^3 ($CellContext`T24 + \
+$CellContext`U)^3 + 
+                  775 $CellContext`T14^2 ($CellContext`T24 + \
+$CellContext`U)^4 + 25 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^5 - 
+                  2 ($CellContext`T24 + $CellContext`U)^6))) 
+             X`DiscB[$CellContext`MH^2 - 
+               4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT]/
+             X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U] + 
+             4 (256 $CellContext`MT^10 + 
+               256 $CellContext`MT^8 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) - 
+               32 $CellContext`MT^6 (7 $CellContext`MH^2 $CellContext`T14 - 
+                3 ($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2) + 
+               16 $CellContext`MT^4 (
+                 6 $CellContext`MH^4 $CellContext`T14 + ($CellContext`T14 + \
+$CellContext`T24 + $CellContext`U)^3 - 
+                 2 $CellContext`MH^2 $CellContext`T14 (2 $CellContext`T14 + 
+                  5 ($CellContext`T24 + $CellContext`U))) + $CellContext`MT^2 \
+(($CellContext`T14 + $CellContext`T24 + $CellContext`U)^4 + 
+                 16 $CellContext`MH^4 $CellContext`T14 ((-2) $CellContext`T14 + 
+                   3 ($CellContext`T24 + $CellContext`U)) + 
+                 2 $CellContext`MH^2 $CellContext`T14 (5 $CellContext`T14^2 - 
+                   14 $CellContext`T14 ($CellContext`T24 + $CellContext`U) - 
+                   19 ($CellContext`T24 + $CellContext`U)^2)) + 
+               3 $CellContext`MH^2 $CellContext`T14 (
+                 2 $CellContext`MH^4 $CellContext`T14 + ($CellContext`T14 - \
+$CellContext`T24 - $CellContext`U) ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2 - 
+                 2 $CellContext`MH^2 ($CellContext`T14^2 + $CellContext`T14 \
+($CellContext`T24 + $CellContext`U) - ($CellContext`T24 + $CellContext`U)^2)))
+                X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+                 4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U]^(-1)
+                 X`ScalarC0[$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+                4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT, $CellContext`MT]) + 
+           2 $CellContext`MT^2 (16 $CellContext`MT^4 - 
+              4 $CellContext`MH^2 $CellContext`T14 + 
+              8 $CellContext`MT^2 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2)^(-2) (-($CellContext`S34 - $CellContext`T) ((-2) \
+$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + 
+               2 $CellContext`U) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[4]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[5]] - 
+             4 (2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - 
+              2 $CellContext`U) $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[5]] ($CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[3]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[1]] + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[4]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[3]]) - 
+             4 ($CellContext`S34 - $CellContext`T) $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[4]] ($CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[3]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[2]] + $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[5]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[3]]) + 16 ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[3]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[1]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[4]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]]) ($CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[3]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[2]] + $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[3]])) (-(-$CellContext`MH^2 + 
+                4 $CellContext`MT^2 + $CellContext`T24 + $CellContext`U)^(-1) \
+(64 $CellContext`MT^6 - 3 $CellContext`T14^3 + 
+               5 $CellContext`T14^2 $CellContext`T24 + 
+               9 $CellContext`T14 $CellContext`T24^2 + $CellContext`T24^3 + 
+               5 $CellContext`T14^2 $CellContext`U + 
+               18 $CellContext`T14 $CellContext`T24 $CellContext`U + 
+               3 $CellContext`T24^2 $CellContext`U + 
+               9 $CellContext`T14 $CellContext`U^2 + 
+               3 $CellContext`T24 $CellContext`U^2 + $CellContext`U^3 + 
+               48 $CellContext`MT^4 (
+                 3 $CellContext`T14 + $CellContext`T24 + $CellContext`U) + 
+               2 $CellContext`MH^2 $CellContext`T14 ($CellContext`T14 - 
+                 7 ($CellContext`T24 + $CellContext`U)) + 
+               4 $CellContext`MT^2 ((-14) $CellContext`MH^2 $CellContext`T14 + 
+                 5 $CellContext`T14^2 + 
+                 18 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + 
+                 3 ($CellContext`T24 + $CellContext`U)^2)) + (
+                16 $CellContext`MT^6 + $CellContext`MH^2 $CellContext`T14 \
+($CellContext`MH^2 - $CellContext`T24 - $CellContext`U) + 
+                8 $CellContext`MT^4 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + $CellContext`MT^2 ((-8) $CellContext`MH^2 $CellContext`T14 + \
+($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2))^(-1) (
+               4096 $CellContext`MT^14 + 
+               2048 $CellContext`MT^12 (5 $CellContext`T14 + 
+                 3 ($CellContext`T24 + $CellContext`U)) + 
+               256 $CellContext`MT^8 ($CellContext`MH^4 $CellContext`T14 + 
+                 5 ($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2 (
+                   3 $CellContext`T14 + $CellContext`T24 + $CellContext`U) - \
+$CellContext`MH^2 $CellContext`T14 (25 $CellContext`T14 + 
+                  27 ($CellContext`T24 + $CellContext`U))) - 
+               256 $CellContext`MT^10 (26 $CellContext`MH^2 $CellContext`T14 - 
+                5 (7 $CellContext`T14^2 + 
+                 10 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + 
+                 3 ($CellContext`T24 + $CellContext`U)^2)) + 
+               16 $CellContext`MT^6 (
+                 16 $CellContext`MH^4 $CellContext`T14 (
+                   8 $CellContext`T14 + $CellContext`T24 + $CellContext`U) + 
+                 5 ($CellContext`T14 + $CellContext`T24 + $CellContext`U)^3 (
+                   11 $CellContext`T14 + 
+                   3 ($CellContext`T24 + $CellContext`U)) - 
+                 4 $CellContext`MH^2 $CellContext`T14 (34 $CellContext`T14^2 + 
+                  83 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + 
+                  43 ($CellContext`T24 + $CellContext`U)^2)) + \
+$CellContext`MT^2 (($CellContext`T14 + $CellContext`T24 + $CellContext`U)^5 (
+                   5 $CellContext`T14 + $CellContext`T24 + $CellContext`U) + 
+                 48 $CellContext`MH^6 $CellContext`T14^2 (10 $CellContext`T14 - 
+                   3 ($CellContext`T24 + $CellContext`U)) + 
+                 2 $CellContext`MH^2 $CellContext`T14 ($CellContext`T14 + \
+$CellContext`T24 + $CellContext`U)^2 ($CellContext`T14^2 - 
+                   56 $CellContext`T14 ($CellContext`T24 + $CellContext`U) - 
+                   21 ($CellContext`T24 + $CellContext`U)^2) - 
+                 16 $CellContext`MH^4 $CellContext`T14 (14 $CellContext`T14^3 + 
+                  3 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U) - 
+                  21 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^2 - \
+($CellContext`T24 + $CellContext`U)^3)) - 
+               8 $CellContext`MT^4 (
+                36 $CellContext`MH^6 $CellContext`T14^2 - ($CellContext`T14 + \
+$CellContext`T24 + $CellContext`U)^4 (13 $CellContext`T14 + 
+                 3 ($CellContext`T24 + $CellContext`U)) + 
+                12 $CellContext`MH^4 $CellContext`T14 (3 $CellContext`T14^2 - 
+                  15 $CellContext`T14 ($CellContext`T24 + $CellContext`U) - \
+($CellContext`T24 + $CellContext`U)^2) + 
+                2 $CellContext`MH^2 $CellContext`T14 (17 $CellContext`T14^3 + 
+                  84 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U) + 
+                  99 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^2 + 
+                  32 ($CellContext`T24 + $CellContext`U)^3)) - \
+$CellContext`MH^2 $CellContext`T14 (64 $CellContext`MH^6 $CellContext`T14^2 - 
+                6 $CellContext`MH^4 $CellContext`T14 (7 $CellContext`T14^2 + 
+                 12 $CellContext`T14 ($CellContext`T24 + $CellContext`U) - 
+                 3 ($CellContext`T24 + $CellContext`U)^2) - ($CellContext`T14 + \
+$CellContext`T24 + $CellContext`U)^3 (2 $CellContext`T14^2 - 
+                 5 $CellContext`T14 ($CellContext`T24 + $CellContext`U) - \
+($CellContext`T24 + $CellContext`U)^2) + $CellContext`MH^2 (
+                  7 $CellContext`T14^4 + 
+                  26 $CellContext`T14^3 ($CellContext`T24 + $CellContext`U) - 
+                  6 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U)^2 - 
+                  26 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^3 - \
+($CellContext`T24 + $CellContext`U)^4))) 
+              X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT]/
+              X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U] - 
+             2 $CellContext`T14^2 (
+               16 $CellContext`MT^6 + $CellContext`MH^2 $CellContext`T14 \
+($CellContext`MH^2 - $CellContext`T24 - $CellContext`U) + 
+               8 $CellContext`MT^4 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + $CellContext`MT^2 ((-8) $CellContext`MH^2 $CellContext`T14 + \
+($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2))^(-1) (
+              9 $CellContext`MT^2 (
+                 4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^4 - 
+              6 $CellContext`MH^6 $CellContext`T14 (
+               20 $CellContext`MT^2 + $CellContext`T14 + 
+               5 ($CellContext`T24 + $CellContext`U)) - $CellContext`MH^2 (
+                4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2 (
+               104 $CellContext`MT^4 + $CellContext`T14 (-$CellContext`T14 + 
+                 10 ($CellContext`T24 + $CellContext`U)) + $CellContext`MT^2 (
+                 86 $CellContext`T14 + 
+                 26 ($CellContext`T24 + $CellContext`U))) + $CellContext`MH^4 \
+$CellContext`T14 (1040 $CellContext`MT^4 + 5 $CellContext`T14^2 + 
+                28 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + 
+                39 ($CellContext`T24 + $CellContext`U)^2 + 
+                8 $CellContext`MT^2 (19 $CellContext`T14 + 
+                  52 ($CellContext`T24 + $CellContext`U)))) 
+             X`DiscB[$CellContext`T14, $CellContext`MT, $CellContext`MT]/
+             X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+              4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U] + \
+($CellContext`MH^4 + 32 $CellContext`MT^4 + 
+                12 $CellContext`MT^2 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2 - 
+                2 $CellContext`MH^2 (
+                 6 $CellContext`MT^2 + $CellContext`T24 + \
+$CellContext`U))^(-1) (
+                16 $CellContext`MT^6 + $CellContext`MH^2 $CellContext`T14 \
+($CellContext`MH^2 - $CellContext`T24 - $CellContext`U) + 
+                8 $CellContext`MT^4 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + $CellContext`MT^2 ((-8) $CellContext`MH^2 $CellContext`T14 + \
+($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2))^(-1) (
+               64 $CellContext`MH^12 $CellContext`T14^3 + 
+               2 $CellContext`MH^10 $CellContext`T14^2 (144 $CellContext`MT^4 - 
+                 27 $CellContext`T14^2 - 
+                 130 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + 
+                 9 ($CellContext`T24 + $CellContext`U)^2 + $CellContext`MT^2 \
+((-744) $CellContext`T14 + 
+                   72 ($CellContext`T24 + $CellContext`U))) - \
+$CellContext`MH^8 $CellContext`T14 (256 $CellContext`MT^8 - 
+                17 $CellContext`T14^4 - 
+                190 $CellContext`T14^3 ($CellContext`T24 + $CellContext`U) - 
+                400 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U)^2 + 
+                62 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^3 + \
+($CellContext`T24 + $CellContext`U)^4 + 
+                128 $CellContext`MT^6 (43 $CellContext`T14 + 
+                  2 ($CellContext`T24 + $CellContext`U)) - 
+                32 $CellContext`MT^4 (404 $CellContext`T14^2 - 
+                 117 $CellContext`T14 ($CellContext`T24 + $CellContext`U) - 
+                 3 ($CellContext`T24 + $CellContext`U)^2) - 
+                8 $CellContext`MT^2 (159 $CellContext`T14^3 + 
+                 580 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U) - 
+                 105 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^2 - 
+                 2 ($CellContext`T24 + $CellContext`U)^3)) - \
+$CellContext`MT^2 (
+                 4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^4 (640 $CellContext`MT^8 + 
+                32 $CellContext`MT^6 (27 $CellContext`T14 + 
+                  17 ($CellContext`T24 + $CellContext`U)) - 
+                24 $CellContext`MT^4 (19 $CellContext`T14^2 - 
+                 22 $CellContext`T14 ($CellContext`T24 + $CellContext`U) - 
+                 7 ($CellContext`T24 + $CellContext`U)^2) + ($CellContext`T24 + \
+$CellContext`U) ((-2) $CellContext`T14^3 - 
+                  15 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U) + 
+                  6 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^2 + \
+($CellContext`T24 + $CellContext`U)^3) + 
+                2 $CellContext`MT^2 ((-7) $CellContext`T14^3 - 
+                  87 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U) + 
+                  51 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^2 + 
+                  11 ($CellContext`T24 + $CellContext`U)^3)) + \
+$CellContext`MH^6 $CellContext`T14 (9728 $CellContext`MT^10 + 
+                 256 $CellContext`MT^8 (148 $CellContext`T14 + 
+                   41 ($CellContext`T24 + $CellContext`U)) - 
+                 192 $CellContext`MT^6 (273 $CellContext`T14^2 - 
+                  172 $CellContext`T14 ($CellContext`T24 + $CellContext`U) - 
+                  23 ($CellContext`T24 + $CellContext`U)^2) - 
+                 32 $CellContext`MT^4 (326 $CellContext`T14^3 + 
+                  905 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U) - 
+                  333 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^2 - 
+                  28 ($CellContext`T24 + $CellContext`U)^3) + \
+($CellContext`T24 + $CellContext`U) ((-51) $CellContext`T14^4 - 
+                   246 $CellContext`T14^3 ($CellContext`T24 + $CellContext`U) - 
+                   280 $CellContext`T14^2 ($CellContext`T24 + \
+$CellContext`U)^2 + 78 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^3 + 
+                   3 ($CellContext`T24 + $CellContext`U)^4) + 
+                 2 $CellContext`MT^2 ((-221) $CellContext`T14^4 - 
+                   1664 $CellContext`T14^3 ($CellContext`T24 + \
+$CellContext`U) - 
+                   2542 $CellContext`T14^2 ($CellContext`T24 + \
+$CellContext`U)^2 + 
+                   752 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^3 + 
+                   43 ($CellContext`T24 + $CellContext`U)^4)) + \
+$CellContext`MH^2 (
+                  4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2 (3072 $CellContext`MT^12 + 
+                 512 $CellContext`MT^10 (43 $CellContext`T14 + 
+                   7 ($CellContext`T24 + $CellContext`U)) + $CellContext`T14 \
+($CellContext`T24 + $CellContext`U)^3 ((-17) $CellContext`T14^2 + 
+                   6 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2) + 
+                 128 $CellContext`MT^8 (2 $CellContext`T14^2 + 
+                   155 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + 
+                   13 ($CellContext`T24 + $CellContext`U)^2) - 
+                 32 $CellContext`MT^6 (208 $CellContext`T14^3 - 
+                  24 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U) - 
+                  209 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^2 - 
+                  12 ($CellContext`T24 + $CellContext`U)^3) + 
+                 4 $CellContext`MT^4 ((-83) $CellContext`T14^4 - 
+                   782 $CellContext`T14^3 ($CellContext`T24 + $CellContext`U) + 
+                   108 $CellContext`T14^2 ($CellContext`T24 + \
+$CellContext`U)^2 + 
+                   254 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^3 + 
+                   11 ($CellContext`T24 + $CellContext`U)^4) + 
+                 2 $CellContext`MT^2 (-$CellContext`T14^5 - 
+                   27 $CellContext`T14^4 ($CellContext`T24 + $CellContext`U) - 
+                   
+                   217 $CellContext`T14^3 ($CellContext`T24 + \
+$CellContext`U)^2 + 
+                   44 $CellContext`T14^2 ($CellContext`T24 + \
+$CellContext`U)^3 + 
+                   32 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^4 + \
+($CellContext`T24 + $CellContext`U)^5)) - $CellContext`MH^4 (
+                4096 $CellContext`MT^14 + 
+                2048 $CellContext`MT^12 (49 $CellContext`T14 + 
+                  3 ($CellContext`T24 + $CellContext`U)) + 
+                1280 $CellContext`MT^10 (95 $CellContext`T14^2 + 
+                  96 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + 
+                  3 ($CellContext`T24 + $CellContext`U)^2) - 
+                256 $CellContext`MT^8 (401 $CellContext`T14^3 - 
+                 497 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U) - 
+                 238 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^2 - 
+                 5 ($CellContext`T24 + $CellContext`U)^3) - 
+                16 $CellContext`MT^6 (2297 $CellContext`T14^4 + 
+                 4760 $CellContext`T14^3 ($CellContext`T24 + $CellContext`U) - 
+                 3282 $CellContext`T14^2 ($CellContext`T24 + \
+$CellContext`U)^2 - 
+                 968 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^3 - 
+                 15 ($CellContext`T24 + $CellContext`U)^4) + $CellContext`T14 \
+($CellContext`T24 + $CellContext`U)^2 ((-51) $CellContext`T14^4 - 
+                  138 $CellContext`T14^3 ($CellContext`T24 + $CellContext`U) - 
+                  80 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U)^2 + 
+                  42 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^3 + 
+                  3 ($CellContext`T24 + $CellContext`U)^4) - 
+                8 $CellContext`MT^4 (431 $CellContext`T14^5 + 
+                 2349 $CellContext`T14^4 ($CellContext`T24 + $CellContext`U) + 
+                 2514 $CellContext`T14^3 ($CellContext`T24 + \
+$CellContext`U)^2 - 
+                 1334 $CellContext`T14^2 ($CellContext`T24 + \
+$CellContext`U)^3 - 
+                 261 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^4 - 
+                 3 ($CellContext`T24 + $CellContext`U)^5) + $CellContext`MT^2 \
+((-35) $CellContext`T14^6 - 
+                  920 $CellContext`T14^5 ($CellContext`T24 + $CellContext`U) - 
+                  2953 $CellContext`T14^4 ($CellContext`T24 + \
+$CellContext`U)^2 - 
+                  2192 $CellContext`T14^3 ($CellContext`T24 + \
+$CellContext`U)^3 + 
+                  1067 $CellContext`T14^2 ($CellContext`T24 + \
+$CellContext`U)^4 + 
+                  136 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^5 + \
+($CellContext`T24 + $CellContext`U)^6))) 
+              X`DiscB[$CellContext`MH^2 - 
+                4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT]/
+              X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U] - 
+             6 $CellContext`T14 (128 $CellContext`MT^8 + 
+              32 $CellContext`MT^6 (5 $CellContext`T14 + 
+                3 ($CellContext`T24 + $CellContext`U)) + 
+              2 $CellContext`MT^2 (
+                20 $CellContext`MH^4 $CellContext`T14 + ($CellContext`T14 + \
+$CellContext`T24 + $CellContext`U)^2 (
+                  7 $CellContext`T14 + $CellContext`T24 + $CellContext`U) - 
+                12 $CellContext`MH^2 $CellContext`T14 (2 $CellContext`T14 + 
+                 3 ($CellContext`T24 + $CellContext`U))) + 
+              8 $CellContext`MT^4 ((-20) $CellContext`MH^2 $CellContext`T14 + 
+                3 (3 $CellContext`T14^2 + 
+                  4 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2)) + $CellContext`T14 (($CellContext`T14 + \
+$CellContext`T24 + $CellContext`U)^3 + 
+                2 $CellContext`MH^4 ($CellContext`T14 + 
+                  5 ($CellContext`T24 + $CellContext`U)) - 
+                2 $CellContext`MH^2 ($CellContext`T14^2 + 
+                 5 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + 
+                 4 ($CellContext`T24 + $CellContext`U)^2))) 
+             X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+                4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U]^(-1) 
+             X`ScalarC0[$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+               4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT, $CellContext`MT]))))}, 0, 3, 1],
+    Editable->False], ")"}], "-", 
+  RowBox[{
+   FractionBox["1", 
+    RowBox[{"MW", " ", "SW"}]], 
+   RowBox[{"2", " ", 
+    SuperscriptBox["Alfas", "2"], " ", "c1", " ", "EL", " ", 
+    SuperscriptBox["MT", "2"], " ", 
+    RowBox[{"(", 
+     RowBox[{
+      RowBox[{"(", 
+       InterpretationBox[
+        RowBox[{
+         RowBox[{"(", 
+          RowBox[{
+           RowBox[{
+            FractionBox["1", "T"], 
+            RowBox[{"(", 
+             RowBox[{
+              RowBox[{
+               RowBox[{"(", 
+                RowBox[{
+                 RowBox[{"4", " ", 
+                  RowBox[{"(", 
+                   RowBox[{"2", "+", 
+                    FractionBox["1", "\[Epsilon]"], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T", ",", "MT", ",", "MT"}], "]"}], "+", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], ")"}]}], "-", 
+                 RowBox[{
+                  FractionBox["1", 
+                   RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}]], 
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    FractionBox[
+                    SuperscriptBox["MH", "2"], "\[Epsilon]"], "-", 
+                    RowBox[{"3", " ", "T"}], "-", 
+                    FractionBox["T", "\[Epsilon]"], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "+", 
+                    SqrtBox[
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], 
+                    ")"}]}]}]}], ")"}], " ", 
+               RowBox[{"(", 
+                RowBox[{
+                 RowBox[{
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                 RowBox[{"2", " ", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                 RowBox[{
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+              
+              RowBox[{
+               FractionBox["1", 
+                RowBox[{
+                 SuperscriptBox["MH", "2"], "-", "T"}]], 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  SuperscriptBox[
+                   RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"], "-", 
+                  SuperscriptBox[
+                   RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "+", 
+                    SqrtBox[
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], ")"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}]}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                  RowBox[{"2", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                 ")"}]}]}], "-", 
+              RowBox[{"16", " ", 
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"e", "[", "1", "]"}], ",", 
+                 RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+               RowBox[{"(", 
+                RowBox[{
+                 RowBox[{
+                  FractionBox["1", 
+                   RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], "2"]}]], 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "+", 
+                    SqrtBox[
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}]}], ")"}]}]}], "+", 
+                 RowBox[{
+                  FractionBox["1", 
+                   RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}]}]], 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T", ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                   
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}]}], 
+                ")"}]}], "-", 
+              RowBox[{
+               FractionBox["1", 
+                RowBox[{
+                 SuperscriptBox["MH", "2"], "-", "T"}]], 
+               RowBox[{"4", " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"DiscB", "[", 
+                   RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], "]"}], 
+                  "-", 
+                  RowBox[{"DiscB", "[", 
+                   RowBox[{"T", ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}]}], ")"}],
+                    " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                  RowBox[{"2", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}]}], ")"}]}], "+", 
+           RowBox[{
+            FractionBox["1", 
+             RowBox[{
+              RowBox[{"2", " ", 
+               SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", "U"}]], 
+            RowBox[{"(", 
+             RowBox[{
+              RowBox[{
+               RowBox[{"(", 
+                RowBox[{
+                 RowBox[{"4", " ", 
+                  RowBox[{"(", 
+                   RowBox[{"2", "+", 
+                    FractionBox["1", "\[Epsilon]"], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ",", "MT", ",", "MT"}], "]"}], "+", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], ")"}]}], "+", 
+                 RowBox[{
+                  FractionBox["1", 
+                   RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}]], 
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}]}], "+", 
+                    FractionBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], "\[Epsilon]"], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U", "+", 
+                    SqrtBox[
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], 
+                    ")"}]}]}]}], ")"}], " ", 
+               RowBox[{"(", 
+                RowBox[{
+                 RowBox[{
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                 RowBox[{"2", " ", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                 RowBox[{
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+              
+              RowBox[{
+               RowBox[{"(", 
+                RowBox[{
+                 RowBox[{
+                  FractionBox["1", 
+                   RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}]], 
+                  RowBox[{"8", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], "]"}], 
+                    "-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], "-", 
+                 RowBox[{
+                  FractionBox["1", 
+                   SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], "2"]], 
+                  RowBox[{"8", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U", "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U", "+", 
+                    SqrtBox[
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}]}], 
+                ")"}], " ", 
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"ec", "[", "5", "]"}], ",", 
+                 RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+              RowBox[{
+               FractionBox["1", 
+                RowBox[{
+                 RowBox[{"-", 
+                  SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                 "U"}]], 
+               RowBox[{"4", " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"-", 
+                   RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                  RowBox[{"DiscB", "[", 
+                   RowBox[{
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                  RowBox[{"2", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                 ")"}]}]}], "+", 
+              RowBox[{
+               FractionBox["1", 
+                RowBox[{
+                 RowBox[{"-", 
+                  SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                 "U"}]], 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"-", 
+                   SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                  SuperscriptBox[
+                   RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U", "+", 
+                    SqrtBox[
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], ")"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                  RowBox[{"2", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                 ")"}]}]}], "-", 
+              RowBox[{
+               FractionBox["1", "T24"], 
+               RowBox[{"(", 
+                RowBox[{
+                 RowBox[{
+                  RowBox[{"-", "8"}], " ", 
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}]}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], "]"}], 
+                    "-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"3", " ", "S34"}], "+", "T", "+", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S", "-", "T14"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "+", "S34", "+", "T", "-", 
+                    RowBox[{"3", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "+", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "+", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}]}], "-", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], "2"]}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U", "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U", "+", 
+                    SqrtBox[
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"3", " ", "S34"}], "+", "T", "-", 
+                    RowBox[{"2", " ", "T24"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S", "-", "T14"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "+", "S34", "+", "T", "-", 
+                    RowBox[{"2", " ", "T24"}], "-", 
+                    RowBox[{"3", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "+", "T", "-", 
+                    RowBox[{"2", " ", "T24"}], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "+", "T", "-", 
+                    RowBox[{"2", " ", "T24"}], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}]}], ")"}]}], "+", 
+                 RowBox[{
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"2", "+", 
+                    FractionBox["1", "\[Epsilon]"], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ",", "MT", ",", "MT"}], "]"}], "+", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}]], 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}]}], "+", 
+                    FractionBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], "\[Epsilon]"], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U", "+", 
+                    SqrtBox[
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], 
+                    ")"}]}]}]}], ")"}], " ", 
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", "S"}], "+", "T14"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], "+", 
+                 RowBox[{
+                  FractionBox["1", 
+                   RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}]], 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U", "+", 
+                    SqrtBox[
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{"S", "-", "T14"}], ")"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T24", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T24", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S", "-", "T14"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T", "-", "T24", "-", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", "S34"}], "+", "T", "-", "T24", "+", "U"}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], "+", 
+                 RowBox[{
+                  FractionBox["1", 
+                   RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}]], 
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{"S", "-", "T14"}], ")"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"3", " ", "S34"}], "+", "T", "-", 
+                    RowBox[{"2", " ", "T24"}], "-", 
+                    RowBox[{"3", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"3", " ", "S34"}], "+", "T", "-", 
+                    RowBox[{"2", " ", "T24"}], "-", 
+                    RowBox[{"3", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S", "-", "T14"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "+", 
+                    RowBox[{"3", " ", "S34"}], "+", 
+                    RowBox[{"3", " ", "T"}], "-", 
+                    RowBox[{"2", " ", "T24"}], "-", 
+                    RowBox[{"5", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"5", " ", "S34"}], "+", 
+                    RowBox[{"3", " ", "T"}], "-", 
+                    RowBox[{"2", " ", "T24"}], "+", 
+                    RowBox[{"3", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}]}], ")"}]}], "+", 
+              RowBox[{
+               FractionBox["1", "S"], 
+               RowBox[{"(", 
+                RowBox[{
+                 RowBox[{
+                  RowBox[{"-", "8"}], " ", 
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], "2"]}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U", "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U", "+", 
+                    SqrtBox[
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "+", "S", "-", 
+                    RowBox[{"2", " ", "S34"}], "-", "T14", "-", "T24"}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "-", "S", "+", 
+                    RowBox[{"2", " ", "S34"}], "+", "T14", "+", "T24"}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"3", " ", "S"}], "+", "T14", "+", "T24", "+", 
+                    RowBox[{"4", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"3", " ", "S"}], "-", 
+                    RowBox[{"4", " ", "T"}], "-", "T14", "-", "T24"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", "T14"}], "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}]}], "-", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}]}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], "]"}], 
+                    "-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "+", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "+", "S34", "+", "T", "-", 
+                    RowBox[{"3", " ", "U"}]}], ")"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "+", "S34", "-", 
+                    RowBox[{"3", " ", "T"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", "T14"}], "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}]}], ")"}]}], "+", 
+                 RowBox[{
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"2", "+", 
+                    FractionBox["1", "\[Epsilon]"], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ",", "MT", ",", "MT"}], "]"}], "+", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}]], 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}]}], "+", 
+                    FractionBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], "\[Epsilon]"], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U", "+", 
+                    SqrtBox[
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], 
+                    ")"}]}]}]}], ")"}], " ", 
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", "T14"}], "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                   ")"}]}], "+", 
+                 RowBox[{
+                  FractionBox["1", 
+                   RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}]], 
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S", "-", "T14", "-", 
+                    "T24"}], ")"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "-", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "-", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S", "-", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "7"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"5", " ", "S"}], "+", 
+                    RowBox[{"8", " ", "T"}], "+", 
+                    RowBox[{"3", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"5", " ", "S"}], "-", 
+                    RowBox[{"3", " ", "T14"}], "-", 
+                    RowBox[{"3", " ", "T24"}], "-", 
+                    RowBox[{"8", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S", "+", 
+                    RowBox[{"4", " ", "S34"}], "+", 
+                    RowBox[{"3", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S", "+", 
+                    RowBox[{"4", " ", "S34"}], "+", 
+                    RowBox[{"3", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], "+", 
+                 RowBox[{
+                  FractionBox["1", 
+                   RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}]], 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U", "+", 
+                    SqrtBox[
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S", "-", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "-", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", "T14"}], "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S34"}], "+", 
+                    RowBox[{"2", " ", "T"}], "+", "T14", "+", "T24"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S34"}], "+", "T14", "+", "T24", "+", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], ")"}]}]}]}], ")"}]}]}], ")"}]}], 
+           "+", 
+           RowBox[{
+            FractionBox["1", "S34"], 
+            RowBox[{"(", 
+             RowBox[{
+              RowBox[{
+               RowBox[{"(", 
+                RowBox[{
+                 RowBox[{"4", " ", 
+                  RowBox[{"(", 
+                   RowBox[{"2", "+", 
+                    FractionBox["1", "\[Epsilon]"], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"S34", ",", "MT", ",", "MT"}], "]"}], "+", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], ")"}]}], "-", 
+                 RowBox[{
+                  FractionBox["1", 
+                   RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}]], 
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    FractionBox[
+                    SuperscriptBox["MH", "2"], "\[Epsilon]"], "-", 
+                    RowBox[{"3", " ", "S34"}], "-", 
+                    FractionBox["S34", "\[Epsilon]"], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{"S34", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"S34", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{"S34", " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "S34", "+", 
+                    SqrtBox[
+                    RowBox[{"S34", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], 
+                    ")"}]}]}]}], ")"}], " ", 
+               RowBox[{"(", 
+                RowBox[{
+                 RowBox[{
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                 RowBox[{"2", " ", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                 RowBox[{
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+              
+              RowBox[{
+               FractionBox["1", 
+                RowBox[{
+                 SuperscriptBox["MH", "2"], "-", "S34"}]], 
+               RowBox[{"4", " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"DiscB", "[", 
+                   RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], "]"}], 
+                  "-", 
+                  RowBox[{"DiscB", "[", 
+                   RowBox[{"S34", ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"2", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], "+", 
+              RowBox[{
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"ec", "[", "4", "]"}], ",", 
+                 RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+               RowBox[{"(", 
+                RowBox[{
+                 RowBox[{"-", 
+                  RowBox[{
+                   FractionBox["1", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}]], 
+                   RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"S34", ",", "MT", ",", "MT"}], "]"}]}], ")"}], 
+                    " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}]}], 
+                 "+", 
+                 RowBox[{
+                  FractionBox["1", 
+                   SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], "2"]], 
+                  RowBox[{"8", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"S34", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "S34", "+", 
+                    SqrtBox[
+                    RowBox[{"S34", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}]}], 
+                ")"}]}], "-", 
+              RowBox[{
+               FractionBox["1", 
+                RowBox[{
+                 SuperscriptBox["MH", "2"], "-", "S34"}]], 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  SuperscriptBox[
+                   RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"], "-", 
+                  SuperscriptBox[
+                   RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "S34", "+", 
+                    SqrtBox[
+                    RowBox[{"S34", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], ")"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"2", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                 ")"}]}]}], "+", 
+              RowBox[{
+               FractionBox["1", "S"], 
+               RowBox[{"(", 
+                RowBox[{
+                 RowBox[{
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"2", "+", 
+                    FractionBox["1", "\[Epsilon]"], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"S34", ",", "MT", ",", "MT"}], "]"}], "+", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}]], 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    FractionBox[
+                    SuperscriptBox["MH", "2"], "\[Epsilon]"], "-", 
+                    RowBox[{"3", " ", "S34"}], "-", 
+                    FractionBox["S34", "\[Epsilon]"], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{"S34", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"S34", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{"S34", " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "S34", "+", 
+                    SqrtBox[
+                    RowBox[{"S34", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], 
+                    ")"}]}]}]}], ")"}], " ", 
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", "T"}], "-", "T14", "+", "T24", "+", "U"}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                   ")"}]}], "-", 
+                 RowBox[{
+                  FractionBox["1", 
+                   RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}]], 
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], "]"}], 
+                    "-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"S34", ",", "MT", ",", "MT"}], "]"}]}], ")"}], 
+                   " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "-", "T24", "-", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"2", " ", "S"}], "-", 
+                    RowBox[{"3", " ", "S34"}], "-", 
+                    RowBox[{"8", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "7"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S"}], "+", 
+                    RowBox[{"3", " ", "S34"}], "+", 
+                    RowBox[{"8", " ", "T"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S", "+", "S34", "+", 
+                    RowBox[{"2", " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S"}], "+", 
+                    RowBox[{"3", " ", "S34"}], "+", 
+                    RowBox[{"4", " ", "T14"}], "+", 
+                    RowBox[{"4", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S"}], "+", 
+                    RowBox[{"3", " ", "S34"}], "+", 
+                    RowBox[{"4", " ", "T14"}], "+", 
+                    RowBox[{"4", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], ")"}]}]}], "+", 
+                 RowBox[{"8", " ", 
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}]}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"S34", ",", "MT", ",", "MT"}], "]"}]}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "U"}], ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "U"}], ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"4", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", 
+                    RowBox[{"4", " ", "T"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "-", "T24", "-", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], "+", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], "2"]}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"S34", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "S34", "+", 
+                    SqrtBox[
+                    RowBox[{"S34", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", "T14"}], "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}]}], ")"}]}], "-", 
+                 RowBox[{
+                  FractionBox["1", 
+                   RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}]], 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"], "-", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "S34", "+", 
+                    SqrtBox[
+                    RowBox[{"S34", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "-", "T24", "-", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", "T14", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"T", "-", "T14", "-", "T24", "-", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], ")"}]}]}]}], ")"}]}], "+", 
+              RowBox[{
+               FractionBox["1", 
+                RowBox[{
+                 SuperscriptBox["MH", "2"], "-", "S", "-", "T", "-", "T14"}]], 
+               RowBox[{"(", 
+                RowBox[{
+                 RowBox[{
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"2", "+", 
+                    FractionBox["1", "\[Epsilon]"], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"S34", ",", "MT", ",", "MT"}], "]"}], "+", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}]], 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    FractionBox[
+                    SuperscriptBox["MH", "2"], "\[Epsilon]"], "-", 
+                    RowBox[{"3", " ", "S34"}], "-", 
+                    FractionBox["S34", "\[Epsilon]"], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{"S34", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"S34", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{"S34", " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "S34", "+", 
+                    SqrtBox[
+                    RowBox[{"S34", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], 
+                    ")"}]}]}]}], ")"}], " ", 
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S"}], "+", "T24", "+", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                   ")"}]}], "-", 
+                 RowBox[{"8", " ", 
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], "2"]}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"S34", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "S34", "+", 
+                    SqrtBox[
+                    RowBox[{"S34", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"2", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S34"}], "+", 
+                    RowBox[{"4", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"4", " ", "T14"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "+", 
+                    RowBox[{"2", " ", "S"}], "-", "S34", "-", 
+                    RowBox[{"2", " ", "T"}], "+", 
+                    RowBox[{"2", " ", "T14"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"2", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], "+", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}]}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"S34", ",", "MT", ",", "MT"}], "]"}]}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S34"}], "+", 
+                    RowBox[{"4", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"2", " ", "S"}], "+", "S34", "-", 
+                    RowBox[{"2", " ", "T"}], "+", 
+                    RowBox[{"2", " ", "T14"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"4", " ", "T"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}]}], ")"}]}], "-", 
+                 RowBox[{
+                  FractionBox["1", 
+                   RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}]], 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"], "-", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "S34", "+", 
+                    SqrtBox[
+                    RowBox[{"S34", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"2", " ", "S"}], "-", "T24", "-", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", "T14", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "+", "S", "-", "S34", "-", "T",
+                     "+", "T14"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], ")"}]}]}], "-", 
+                 RowBox[{
+                  FractionBox["1", 
+                   RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}]], 
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], "]"}], 
+                    "-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"S34", ",", "MT", ",", "MT"}], "]"}]}], ")"}], 
+                   " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"2", " ", "S"}], "-", "T24", "-", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S"}], "-", 
+                    RowBox[{"3", " ", "S34"}], "-", 
+                    RowBox[{"6", " ", "T"}], "+", 
+                    RowBox[{"2", " ", "T14"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"2", " ", "S"}], "+", "S34", "-", 
+                    RowBox[{"2", " ", "T"}], "+", 
+                    RowBox[{"6", " ", "T14"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "+", 
+                    RowBox[{"2", " ", "T24"}], "-", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "+", 
+                    RowBox[{"2", " ", "T24"}], "-", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "+", 
+                    RowBox[{"2", " ", "T24"}], "-", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], ")"}]}]}]}], ")"}]}]}], ")"}]}], 
+           "+", 
+           RowBox[{
+            FractionBox["1", "U"], 
+            RowBox[{"(", 
+             RowBox[{
+              RowBox[{"4", " ", 
+               RowBox[{"(", 
+                RowBox[{"2", "+", 
+                 FractionBox["1", "\[Epsilon]"], "+", 
+                 RowBox[{"DiscB", "[", 
+                  RowBox[{"U", ",", "MT", ",", "MT"}], "]"}], "+", 
+                 RowBox[{"Log", "[", 
+                  FractionBox[
+                   SuperscriptBox["\[Micro]", "2"], 
+                   SuperscriptBox["MT", "2"]], "]"}]}], ")"}], " ", 
+               RowBox[{"(", 
+                RowBox[{
+                 RowBox[{
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                 RowBox[{"2", " ", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                 RowBox[{
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+              
+              RowBox[{
+               FractionBox["1", 
+                RowBox[{
+                 SuperscriptBox["MH", "2"], "-", "U"}]], 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  SuperscriptBox[
+                   RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"], "-", 
+                  SuperscriptBox[
+                   RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "U", "+", 
+                    SqrtBox[
+                    RowBox[{"U", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], ")"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                  RowBox[{"2", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                 ")"}]}]}], "-", 
+              RowBox[{"16", " ", 
+               RowBox[{"(", 
+                RowBox[{
+                 RowBox[{
+                  FractionBox["1", 
+                   RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}]}]], 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    FractionBox[
+                    SuperscriptBox["MH", "2"], "\[Epsilon]"], "-", 
+                    RowBox[{"3", " ", "U"}], "-", 
+                    FractionBox["U", "\[Epsilon]"], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{"U", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"U", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{"U", " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "U", "+", 
+                    SqrtBox[
+                    RowBox[{"U", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                 "+", 
+                 RowBox[{
+                  FractionBox["1", 
+                   RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], "2"]}]], 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "U", "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"U", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "U", "+", 
+                    SqrtBox[
+                    RowBox[{"U", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], "+", 
+                 RowBox[{
+                  FractionBox["1", 
+                   RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}]}]], 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"U", ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                   
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}]}], 
+                ")"}]}], "-", 
+              RowBox[{
+               FractionBox["1", 
+                RowBox[{
+                 SuperscriptBox["MH", "2"], "-", "U"}]], 
+               RowBox[{"4", " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"DiscB", "[", 
+                   RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], "]"}], 
+                  "-", 
+                  RowBox[{"DiscB", "[", 
+                   RowBox[{"U", ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                  RowBox[{"2", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], "-", 
+              RowBox[{
+               FractionBox["1", 
+                RowBox[{
+                 SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                 "T24"}]], 
+               RowBox[{"(", 
+                RowBox[{
+                 RowBox[{"4", " ", 
+                  RowBox[{"(", 
+                   RowBox[{"2", "+", 
+                    FractionBox["1", "\[Epsilon]"], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"U", ",", "MT", ",", "MT"}], "]"}], "+", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], ")"}], " ", 
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S", "+", "T", "+", 
+                    RowBox[{"2", " ", "T14"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], "-", 
+                 RowBox[{
+                  FractionBox["1", 
+                   RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}]], 
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    FractionBox[
+                    SuperscriptBox["MH", "2"], "\[Epsilon]"], "-", 
+                    RowBox[{"3", " ", "U"}], "-", 
+                    FractionBox["U", "\[Epsilon]"], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{"U", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"U", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{"U", " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "U", "+", 
+                    SqrtBox[
+                    RowBox[{"U", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S", "+", "T", "+", 
+                    RowBox[{"2", " ", "T14"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], "-", 
+                 RowBox[{
+                  FractionBox["1", 
+                   SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], "2"]], 
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "U", "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"U", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "U", "+", 
+                    SqrtBox[
+                    RowBox[{"U", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S34"}], "-", 
+                    RowBox[{"2", " ", "T14"}], "-", 
+                    RowBox[{"2", " ", "T24"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", "T24"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"2", " ", "S"}], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"2", " ", "S"}], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], "-", 
+                 RowBox[{
+                  FractionBox["1", 
+                   RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}]], 
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"U", ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                   
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", "S34"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"2", " ", "S34"}], "-", 
+                    RowBox[{"2", " ", "T14"}], "+", 
+                    RowBox[{"2", " ", "T24"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "T"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"2", " ", "T"}], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "T"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], "-", 
+                 RowBox[{
+                  FractionBox["1", 
+                   RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}]], 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"], "-", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "U", "+", 
+                    SqrtBox[
+                    RowBox[{"U", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"S", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"T24", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "+", "T14", "+", 
+                    "T24", "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"S", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"S", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S", "-", "T", "-", 
+                    RowBox[{"2", " ", "T14"}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], "-", 
+                 RowBox[{
+                  FractionBox["1", 
+                   RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}]], 
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], "]"}], 
+                    "-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"U", ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                   
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"2", " ", "S"}], "+", 
+                    RowBox[{"2", " ", "T"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"2", " ", "S34"}], "-", 
+                    RowBox[{"2", " ", "T14"}], "+", 
+                    RowBox[{"6", " ", "T24"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "5"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"6", " ", "S34"}], "-", 
+                    RowBox[{"2", " ", "T14"}], "-", 
+                    RowBox[{"2", " ", "T24"}], "+", 
+                    RowBox[{"3", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "+", 
+                    RowBox[{"2", " ", "S"}], "-", 
+                    RowBox[{"2", " ", "T"}], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "+", 
+                    RowBox[{"2", " ", "S"}], "-", 
+                    RowBox[{"2", " ", "T"}], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S", "-", "T", "-", 
+                    RowBox[{"2", " ", "T14"}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"16", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}]}], ")"}]}], "-", 
+              RowBox[{
+               FractionBox["1", 
+                RowBox[{
+                 SuperscriptBox["MH", "2"], "-", "S", "-", "T", "-", "T14"}]], 
+               RowBox[{"(", 
+                RowBox[{
+                 RowBox[{"4", " ", 
+                  RowBox[{"(", 
+                   RowBox[{"2", "+", 
+                    FractionBox["1", "\[Epsilon]"], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"U", ",", "MT", ",", "MT"}], "]"}], "+", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], ")"}], " ", 
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"2", " ", "T14"}], "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                   ")"}]}], "-", 
+                 RowBox[{
+                  FractionBox["1", 
+                   RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}]], 
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    FractionBox[
+                    SuperscriptBox["MH", "2"], "\[Epsilon]"], "-", 
+                    RowBox[{"3", " ", "U"}], "-", 
+                    FractionBox["U", "\[Epsilon]"], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{"U", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"U", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{"U", " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "U", "+", 
+                    SqrtBox[
+                    RowBox[{"U", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"2", " ", "T14"}], "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], "-", 
+                 RowBox[{
+                  FractionBox["1", 
+                   RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}]], 
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"U", ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                   
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"2", " ", "S34"}], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", "S34"}], "+", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"4", " ", "T"}], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "+", 
+                    RowBox[{"2", " ", "S"}], "-", 
+                    RowBox[{"2", " ", "T"}], "-", 
+                    RowBox[{"2", " ", "T14"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"2", " ", "S34"}], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], "-", 
+                 RowBox[{
+                  FractionBox["1", 
+                   SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], "2"]], 
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "U", "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"U", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "U", "+", 
+                    SqrtBox[
+                    RowBox[{"U", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "T24"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"2", " ", "S"}], "+", 
+                    RowBox[{"2", " ", "T"}], "-", 
+                    RowBox[{"2", " ", "T14"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", "S"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "T24"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], "-", 
+                 RowBox[{
+                  FractionBox["1", 
+                   RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}]], 
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], "]"}], 
+                    "-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"U", ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                   
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", 
+                    RowBox[{"2", " ", "T14"}], "-", "T24"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"2", " ", "S34"}], "+", 
+                    RowBox[{"2", " ", "T24"}], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "5"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"2", " ", "S"}], "+", 
+                    RowBox[{"6", " ", "T"}], "-", 
+                    RowBox[{"2", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "+", 
+                    RowBox[{"6", " ", "S"}], "-", 
+                    RowBox[{"2", " ", "T"}], "-", 
+                    RowBox[{"2", " ", "T14"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S34"}], "-", 
+                    RowBox[{"2", " ", "T24"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S34"}], "-", 
+                    RowBox[{"2", " ", "T24"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], ")"}]}]}], "-", 
+                 RowBox[{
+                  FractionBox["1", 
+                   RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}]], 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"], "-", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "U", "+", 
+                    SqrtBox[
+                    RowBox[{"U", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", 
+                    RowBox[{"2", " ", "T14"}], "-", "T24"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", "T24", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "+", "S", "-", "T", "+", "T14",
+                     "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", "S", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"T24", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"T24", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], ")"}]}]}]}], ")"}]}]}], ")"}]}], 
+           "+", 
+           RowBox[{
+            FractionBox["1", "T24"], 
+            RowBox[{"(", 
+             RowBox[{
+              RowBox[{
+               FractionBox["1", "T"], 
+               RowBox[{"(", 
+                RowBox[{
+                 RowBox[{"-", 
+                  RowBox[{
+                   FractionBox["1", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}]], 
+                   RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"], "-", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "+", 
+                    SqrtBox[
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S", "-", "S34", "-", "T14", "+", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S", "+", "T14"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S", "+", "T14"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S", "+", "S34", "+", "T14", "-", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S", "+", "T14"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", "S", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], ")"}]}]}]}], "+", 
+                 RowBox[{
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"2", "+", 
+                    FractionBox["1", "\[Epsilon]"], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T", ",", "MT", ",", "MT"}], "]"}], "+", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}]], 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    FractionBox[
+                    SuperscriptBox["MH", "2"], "\[Epsilon]"], "-", 
+                    RowBox[{"3", " ", "T"}], "-", 
+                    FractionBox["T", "\[Epsilon]"], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "+", 
+                    SqrtBox[
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], 
+                    ")"}]}]}]}], ")"}], " ", 
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S", "-", "S34", "-", "T14", "+", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], "+", 
+                 RowBox[{"8", " ", 
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}]}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T", ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                    
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S34"}], "+", "T", "+", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S34"}], "+", "T", "+", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", "S34"}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S", "-", "S34", "-", "T14", "+", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "+", 
+                    RowBox[{"4", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], "+", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], "2"]}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "+", 
+                    SqrtBox[
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S"}], "+", "T", "+", 
+                    RowBox[{"2", " ", "T14"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S"}], "+", "T", "+", 
+                    RowBox[{"2", " ", "T14"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", "S34"}], "+", "T", "+", 
+                    RowBox[{"2", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S", "-", "S34", "-", "T14", "+", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "+", 
+                    RowBox[{"2", " ", "T24"}], "+", 
+                    RowBox[{"4", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}]}], ")"}]}], "-", 
+                 RowBox[{
+                  FractionBox["1", 
+                   RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}]], 
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], "]"}], 
+                    "-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T", ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                   
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "5"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", "S34"}], "+", "T", "+", 
+                    RowBox[{"2", " ", "T24"}], "+", 
+                    RowBox[{"4", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "5"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", "S34"}], "+", "T", "+", 
+                    RowBox[{"2", " ", "T24"}], "+", 
+                    RowBox[{"4", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S", "-", "S34", "-", "T14", "+", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "-", 
+                    RowBox[{"16", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"8", " ", "S34"}], "-", 
+                    RowBox[{"3", " ", "T"}], "-", 
+                    RowBox[{"2", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S34"}], "+", "T", "+", 
+                    RowBox[{"2", " ", "T14"}], "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"3", " ", "T"}], "-", 
+                    RowBox[{"2", " ", "T24"}], "-", 
+                    RowBox[{"8", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}]}], ")"}]}], "+", 
+              RowBox[{
+               FractionBox["1", 
+                RowBox[{
+                 SuperscriptBox["MH", "2"], "-", "S", "-", "T", "-", "T14"}]], 
+               RowBox[{"(", 
+                RowBox[{
+                 RowBox[{
+                  RowBox[{"-", "2"}], " ", 
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "S34"}], " ", "T"}], "+", 
+                    RowBox[{"S34", " ", "T14"}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "U"}], ")"}]}], "+", 
+                    RowBox[{"T", " ", "U"}], "+", 
+                    RowBox[{"T14", " ", "U"}], "-", 
+                    RowBox[{"S", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"U", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"S34", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"U", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"S34", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24", ",", "MT", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["S34", "2"]}], "-", 
+                    RowBox[{"4", " ", "S34", " ", "T"}], "+", 
+                    RowBox[{"2", " ", "S34", " ", "T14"}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "U"}], ")"}]}], "+", 
+                    RowBox[{"4", " ", "T", " ", "U"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "U"}], "+", 
+                    SuperscriptBox["U", "2"], "-", 
+                    RowBox[{"2", " ", "S", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"4", " ", "T"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"4", " ", "T"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"32", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", "S34"}], "+", "U"}], ")"}], " ", 
+                    
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", "S34"}], "+", "U"}], ")"}], " ", 
+                    
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], 
+                    ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T24", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24", ",", "MT", ",", "MT", ",", "MT"}], "]"}]}]}], 
+                    ")"}]}], ")"}], "/", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], "+", 
+                 RowBox[{
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", "S"}], "-", "S34", "-", 
+                    RowBox[{"2", " ", "T14"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"2", "+", 
+                    FractionBox["1", "\[Epsilon]"], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T24", ",", "MT", ",", "MT"}], "]"}], "+", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}]}], ")"}]}],
+                     "+", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}]}], 
+                    "\[Epsilon]"], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14", "-", 
+                    "T24"}], ")"}], " ", "T24", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T24", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}]}], ")"}], 
+                    " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T", "-", "T14"}], ")"}], 
+                    " ", "T24"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}]}], ")"}]}]}], ")"}], 
+                    " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24", ",", "MT", ",", "MT", ",", "MT"}], "]"}]}]}], 
+                    ")"}]}], ")"}], "/", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], "-", 
+                 RowBox[{"4", " ", 
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["S34", "2"]}], "-", 
+                    RowBox[{"2", " ", "S34", " ", "T"}], "-", 
+                    RowBox[{"S34", " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"2", " ", "S", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", "S34"}], "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", "S"}], "+", 
+                    RowBox[{"3", " ", "S34"}], "-", 
+                    RowBox[{"2", " ", "T14"}], "-", 
+                    RowBox[{"3", " ", "U"}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", "T", " ", "U"}], "+", 
+                    RowBox[{"4", " ", "T14", " ", "U"}], "+", 
+                    RowBox[{"T24", " ", "U"}], "+", 
+                    SuperscriptBox["U", "2"]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T24", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T24", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T24", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T24", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T24", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S34"}], "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", "S34"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", "U", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", "S34", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"S34", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"U", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", "U", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T24", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T24", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{"T14", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T24", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T24", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24", ",", "MT", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T", " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24", ",", "MT", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24", ",", "MT", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T24", " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24", ",", "MT", ",", "MT", ",", "MT"}], "]"}]}]}], 
+                    ")"}]}], ")"}], "/", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}]}], ")"}]}],
+                     "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "U"}], ")"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"2", " ", "T"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", 
+                    RowBox[{"2", " ", "T"}], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"16", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "16"}], " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    SuperscriptBox["T", "2"], "-", 
+                    SuperscriptBox["T14", "2"], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "-", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "-", 
+                    SuperscriptBox["T24", "2"], "-", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}]}], ")"}]}],
+                     "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"3", " ", "T"}], "+", 
+                    RowBox[{"3", " ", "T14"}], "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"3", " ", "T"}], "+", 
+                    RowBox[{"3", " ", "T14"}], "+", 
+                    RowBox[{"5", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"80", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"10", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"7", " ", "T", " ", "T24"}], "+", 
+                    RowBox[{"7", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["T24", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"10", " ", "T"}], "+", 
+                    RowBox[{"10", " ", "T14"}], "+", 
+                    RowBox[{"7", " ", "T24"}]}], ")"}]}]}], ")"}]}]}], ")"}], 
+                    " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{"6", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14"}], 
+                    ")"}], "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "192"}], " ", 
+                    SuperscriptBox["MT", "6"]}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T", "3"]}], "-", 
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T", "2"], " ", "T14"}], "-", 
+                    RowBox[{"9", " ", "T", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "3"]}], "-", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", "T"}], "+", 
+                    RowBox[{"9", " ", "T14"}], "-", "T24"}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T24"}], "+", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "+", 
+                    RowBox[{"5", " ", "T", " ", 
+                    SuperscriptBox["T24", "2"]}], "+", 
+                    RowBox[{"5", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "+", 
+                    SuperscriptBox["T24", "3"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"18", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"2", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox["T", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", "T14"}], "+", 
+                    SuperscriptBox["T14", "2"], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"8", " ", "T"}], "+", 
+                    RowBox[{"8", " ", "T14"}], "-", 
+                    RowBox[{"4", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"T", " ", "T24"}], "-", 
+                    RowBox[{"T14", " ", "T24"}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T24", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T24"}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14"}], 
+                    ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox["T", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", "T14"}], "+", 
+                    SuperscriptBox["T14", "2"], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "-", "T24"}], ")"}]}], "+", 
+                    SuperscriptBox["T24", "2"]}], ")"}]}]}], ")"}], " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24", ",", "MT", ",", "MT", ",", "MT"}], "]"}]}]}], 
+                    ")"}]}], ")"}], "/", 
+                    RowBox[{"(", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}]}], ")"}], 
+                    "2"]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "U"}], ")"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"2", " ", "T"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", 
+                    RowBox[{"2", " ", "T"}], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"16", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "16"}], " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    SuperscriptBox["T", "2"], "-", 
+                    SuperscriptBox["T14", "2"], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "-", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "-", 
+                    SuperscriptBox["T24", "2"], "-", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}]}], ")"}]}],
+                     "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "80"}], " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T", "2"]}], "-", 
+                    RowBox[{"10", " ", "T", " ", "T14"}], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"4", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"4", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"3", " ", "T"}], "+", 
+                    RowBox[{"3", " ", "T14"}], "+", "T24"}], ")"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", "T"}], "+", 
+                    RowBox[{"5", " ", "T14"}], "+", 
+                    RowBox[{"2", " ", "T24"}]}], ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"24", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"6", " ", "T"}], "+", 
+                    RowBox[{"6", " ", "T14"}], "-", 
+                    RowBox[{"2", " ", "T24"}]}], ")"}]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "-", 
+                    "T24"}], ")"}], "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T24"}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14"}], 
+                    ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T24", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "6"], " ", "T24"}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "3"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox["T", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", "T14"}], "+", 
+                    SuperscriptBox["T14", "2"], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", "T"}], "+", 
+                    RowBox[{"2", " ", "T14"}], "-", 
+                    RowBox[{"5", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"3", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"3", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", "T"}], "+", 
+                    RowBox[{"2", " ", "T14"}], "-", 
+                    RowBox[{"3", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"10", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"8", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"8", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", "T14"}], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"T", " ", "T24"}], "-", 
+                    RowBox[{"T14", " ", "T24"}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24", ",", "MT", ",", "MT", ",", "MT"}], "]"}]}]}], 
+                    ")"}]}], ")"}], "/", 
+                    RowBox[{"(", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}]}], ")"}], 
+                    "2"]}], ")"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}]}], ")"}],
+          "+", 
+         RowBox[{
+          FractionBox["1", 
+           RowBox[{
+            RowBox[{"(", 
+             RowBox[{
+              SuperscriptBox["MH", "2"], "-", "S", "-", "T", "-", "T14"}], 
+             ")"}], " ", "T24"}]], 
+          RowBox[{
+           RowBox[{"(", 
+            RowBox[{
+             RowBox[{
+              RowBox[{"(", 
+               RowBox[{"8", " ", 
+                SuperscriptBox["MT", "2"], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"8", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", "S"}], "-", "S34", "-", 
+                    RowBox[{"2", " ", "T14"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], "+", 
+                  RowBox[{"8", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                  RowBox[{"4", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   SuperscriptBox["MH", "2"], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "-", 
+                    RowBox[{"2", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "-", 
+                    RowBox[{"2", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "-", 
+                    RowBox[{"4", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}], " ", 
+                   RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T24"}], "+", 
+                    RowBox[{"T24", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "-", 
+                    RowBox[{"5", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "-", 
+                    RowBox[{"5", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"10", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}], " ", 
+                   RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "+", 
+                  RowBox[{"T24", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"3", " ", "T"}], "+", 
+                    RowBox[{"3", " ", "T14"}], "-", "T24"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}], " ", 
+                   RowBox[{"DiscB", "[", 
+                    RowBox[{"T24", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", 
+                   RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24"}], "]"}]}], "+", 
+                  RowBox[{"2", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"64", " ", 
+                    SuperscriptBox["MT", "8"]}], "+", 
+                    RowBox[{"48", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"T14", " ", "T24"}], "-", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", "T"}], "-", 
+                    RowBox[{"3", " ", "T14"}], "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", "T14"}], "+", "T24"}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "3"], "+", 
+                    SuperscriptBox["T14", "3"], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"T14", " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "20"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"3", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MH", "4"]}], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"]}], ")"}]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"6", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "20"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"3", " ", "T24"}]}], ")"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                   RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24", ",", "MT", ",", "MT", ",", "MT"}], "]"}]}]}], 
+                 ")"}]}], ")"}], "/", 
+              RowBox[{"(", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"16", " ", 
+                   SuperscriptBox["MT", "4"]}], "+", 
+                  SuperscriptBox["T", "2"], "+", 
+                  SuperscriptBox["T14", "2"], "-", 
+                  RowBox[{"4", " ", 
+                   SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                  RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                  SuperscriptBox["T24", "2"], "+", 
+                  RowBox[{"2", " ", "T", " ", 
+                   RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}], "+", 
+                  RowBox[{"8", " ", 
+                   SuperscriptBox["MT", "2"], " ", 
+                   RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}]}], ")"}], 
+                " ", 
+                RowBox[{"Kallen\[Lambda]", "[", 
+                 RowBox[{
+                  SuperscriptBox["MH", "2"], ",", 
+                  RowBox[{
+                   SuperscriptBox["MH", "2"], "-", 
+                   RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                  "T24"}], "]"}]}], ")"}]}], "-", 
+             RowBox[{"2", " ", 
+              RowBox[{"(", 
+               RowBox[{
+                RowBox[{"-", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "S34"}], " ", "T"}], "+", 
+                    RowBox[{"S34", " ", "T14"}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "U"}], ")"}]}], "+", 
+                    RowBox[{"T", " ", "U"}], "+", 
+                    RowBox[{"T14", " ", "U"}], "-", 
+                    RowBox[{"S", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"U", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"S34", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"U", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"S34", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14", "-", 
+                    "T24"}], ")"}], " ", "T24", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"64", " ", 
+                    SuperscriptBox["MT", "8"]}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "+", "T14"}], 
+                    ")"}], "2"], " ", "T24"}], "+", 
+                    RowBox[{"48", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"6", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"6", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "20"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"3", " ", "T24"}]}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "3"], "+", 
+                    SuperscriptBox["T14", "3"], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"T14", " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "28"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"3", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"24", " ", 
+                    SuperscriptBox["MH", "4"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"]}], ")"}]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"6", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "28"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"3", " ", "T24"}]}], ")"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "-", 
+                    "T24"}], ")"}], " ", "T24", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T24", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T", "-", "T14"}], ")"}], 
+                    " ", "T24"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}]}], ")"}]}]}], ")"}], 
+                    " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24", ",", "MT", ",", "MT", ",", "MT"}], "]"}]}]}], 
+                    ")"}]}], ")"}], "/", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14"}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T", "-", "T14"}], ")"}], 
+                    " ", "T24"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}]}], ")"}]}]}], ")"}], 
+                    " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24"}], "]"}]}], ")"}]}], ")"}]}], "+", 
+                RowBox[{
+                 RowBox[{"(", 
+                  RowBox[{"4", " ", 
+                   SuperscriptBox["MT", "2"], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["S34", "2"]}], "-", 
+                    RowBox[{"4", " ", "S34", " ", "T"}], "+", 
+                    RowBox[{"2", " ", "S34", " ", "T14"}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "U"}], ")"}]}], "+", 
+                    RowBox[{"4", " ", "T", " ", "U"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "U"}], "+", 
+                    SuperscriptBox["U", "2"], "-", 
+                    RowBox[{"2", " ", "S", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"4", " ", "T"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"4", " ", "T"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"32", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", "S34"}], "+", "U"}], ")"}], " ", 
+                    
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", "S34"}], "+", "U"}], ")"}], " ", 
+                    
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MT", "2"]}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "4"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "6"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"3", " ", "T"}], "+", 
+                    RowBox[{"3", " ", "T14"}], "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", 
+                    RowBox[{"3", " ", "T24"}]}], ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"96", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"8", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"3", " ", "T", " ", "T24"}], "+", 
+                    RowBox[{"3", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"10", " ", "T"}], "+", 
+                    RowBox[{"10", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", "T24"}]}], ")"}]}]}], ")"}]}]}], 
+                    ")"}]}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"3", " ", "T"}], "+", 
+                    RowBox[{"3", " ", "T14"}], "-", "T24"}], ")"}], " ", 
+                    "T24"}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"3", " ", "T"}], "+", 
+                    RowBox[{"3", " ", "T14"}], "-", "T24"}], ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "3"]}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"112", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"10", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"48", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}]}], "-", 
+                    SuperscriptBox["T24", "2"]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"128", " ", 
+                    SuperscriptBox["MT", "8"]}], "+", 
+                    RowBox[{"96", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", 
+                    RowBox[{"3", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"6", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"22", " ", "T", " ", "T24"}], "+", 
+                    RowBox[{"22", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"T14", " ", "T24"}], "-", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", "T14"}], "+", "T24"}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "3"], "+", 
+                    SuperscriptBox["T14", "3"], "+", 
+                    RowBox[{"17", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "+", 
+                    RowBox[{"7", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T24", "3"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", "T14"}], "+", 
+                    RowBox[{"17", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"34", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "10"]}], "+", 
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "8"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T", "-", "T14"}], ")"}], 
+                    " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", "T14"}], "-", "T24"}], ")"}]}], "-", 
+                    RowBox[{"T14", " ", "T24"}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T24"}], ")"}], " ", 
+                    "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"6", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"3", " ", "T24"}]}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "3"], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T", "2"], " ", "T14"}], "+", 
+                    SuperscriptBox["T14", "3"], "-", 
+                    RowBox[{"3", " ", "T14", " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"2", " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "-", 
+                    SuperscriptBox["T24", "2"]}], ")"}]}], "+", 
+                    RowBox[{"3", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T24"}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "4"], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["T", "3"], " ", "T14"}], "+", 
+                    SuperscriptBox["T14", "4"], "-", 
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["T24", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "40"}], " ", 
+                    SuperscriptBox["MH", "4"]}], "+", 
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "-", 
+                    RowBox[{"8", " ", "T14", " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "4"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"]}], ")"}]}], "+", 
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T24"}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"4", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T14", "3"], "-", 
+                    RowBox[{"3", " ", "T14", " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T24"}], ")"}]}], "-", 
+                    RowBox[{"2", " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "4"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"]}], ")"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T24", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T", "-", "T14"}], ")"}], 
+                    " ", "T24"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}]}], ")"}]}]}], ")"}], 
+                    " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24"}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MH", "4"], " ", "T24"}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "-", "T24"}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "-", "T24"}], ")"}]}], "-", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "-", 
+                    SuperscriptBox["T24", "2"]}], ")"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T", "-", "T14"}], ")"}], 
+                    " ", "T24"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}]}], ")"}]}]}], ")"}], 
+                    " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24", ",", "MT", ",", "MT", ",", "MT"}], "]"}]}]}], 
+                    ")"}]}], ")"}], "/", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}]}], ")"}], 
+                   " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T", "-", "T14"}], ")"}], 
+                    " ", "T24"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}]}], ")"}]}]}], ")"}], 
+                   " ", 
+                   RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24"}], "]"}]}], ")"}]}]}], ")"}]}], "-", 
+             RowBox[{"4", " ", 
+              RowBox[{"(", 
+               RowBox[{
+                RowBox[{"-", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "U"}], ")"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"2", " ", "T"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", 
+                    RowBox[{"2", " ", "T"}], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"16", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MH", "8"], " ", 
+                    SuperscriptBox["T24", "2"]}], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "4"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "6"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"176", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"11", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"22", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"11", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"11", " ", "T"}], "+", 
+                    RowBox[{"11", " ", "T14"}], "-", 
+                    RowBox[{"23", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"30", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"30", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"13", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "1408"}], " ", 
+                    SuperscriptBox["MT", "6"]}], "-", 
+                    RowBox[{"17", " ", 
+                    SuperscriptBox["T", "3"]}], "-", 
+                    RowBox[{"17", " ", 
+                    SuperscriptBox["T14", "3"]}], "-", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"61", " ", "T"}], "+", 
+                    RowBox[{"61", " ", "T14"}], "-", 
+                    RowBox[{"30", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "+", 
+                    RowBox[{"19", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "+", 
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["T24", "3"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "51"}], " ", "T14"}], "+", 
+                    RowBox[{"8", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"28", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"56", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"28", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"19", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"19", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"17", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "51"}], " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"16", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"19", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"144", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{"6", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "-", "T24"}], ")"}], " ", 
+                    "T24"}], "+", 
+                    RowBox[{"24", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", "T"}], "+", 
+                    RowBox[{"3", " ", "T14"}], "+", 
+                    RowBox[{"5", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"54", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"55", " ", 
+                    SuperscriptBox["T24", "2"]}], "+", 
+                    RowBox[{"18", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", 
+                    RowBox[{"3", " ", "T24"}]}], ")"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MH", "10"], " ", 
+                    SuperscriptBox["T24", "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "5"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "8"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"176", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"11", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"22", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"11", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"11", " ", "T"}], "+", 
+                    RowBox[{"11", " ", "T14"}], "-", 
+                    RowBox[{"32", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"48", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"48", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"11", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "6"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"400", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"35", " ", "T"}], "+", 
+                    RowBox[{"35", " ", "T14"}], "-", 
+                    RowBox[{"38", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"65", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"65", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"65", " ", "T14"}], "-", 
+                    RowBox[{"58", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"116", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"45", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"10", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "-", "T24"}], ")"}]}], "-", 
+                    RowBox[{"10", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", "T"}], "+", 
+                    RowBox[{"16", " ", "T14"}], "-", 
+                    RowBox[{"11", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "-", "T24"}], ")"}], " ", 
+                    "T24"}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"16", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"9", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"9", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4608", " ", 
+                    SuperscriptBox["MT", "10"]}], "+", 
+                    RowBox[{"1536", " ", 
+                    SuperscriptBox["MT", "8"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", "T"}], "+", 
+                    RowBox[{"3", " ", "T14"}], "+", 
+                    RowBox[{"5", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"64", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"27", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"54", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"27", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"109", " ", "T", " ", "T24"}], "+", 
+                    RowBox[{"109", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"58", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"18", " ", 
+                    SuperscriptBox["T", "3"]}], "+", 
+                    RowBox[{"18", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"147", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "-", 
+                    RowBox[{"130", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "-", 
+                    RowBox[{"93", " ", 
+                    SuperscriptBox["T24", "3"]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"18", " ", "T14"}], "+", 
+                    RowBox[{"49", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"27", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"147", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"65", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T", "4"]}], "+", 
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T14", "4"]}], "+", 
+                    RowBox[{"174", " ", 
+                    SuperscriptBox["T14", "3"], " ", "T24"}], "-", 
+                    RowBox[{"172", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox["T24", "2"]}], "-", 
+                    RowBox[{"254", " ", "T14", " ", 
+                    SuperscriptBox["T24", "3"]}], "-", 
+                    RowBox[{"21", " ", 
+                    SuperscriptBox["T24", "4"]}], "+", 
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["T", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"6", " ", "T14"}], "+", 
+                    RowBox[{"29", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"27", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"261", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"86", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"36", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"522", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "-", 
+                    RowBox[{"344", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "-", 
+                    RowBox[{"254", " ", 
+                    SuperscriptBox["T24", "3"]}]}], ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "19"}], " ", 
+                    SuperscriptBox["T", "4"]}], "-", 
+                    RowBox[{"19", " ", 
+                    SuperscriptBox["T14", "4"]}], "+", 
+                    RowBox[{"14", " ", 
+                    SuperscriptBox["T14", "3"], " ", "T24"}], "+", 
+                    RowBox[{"34", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox["T24", "2"]}], "+", 
+                    RowBox[{"2", " ", "T14", " ", 
+                    SuperscriptBox["T24", "3"]}], "+", 
+                    SuperscriptBox["T24", "4"], "+", 
+                    RowBox[{
+                    SuperscriptBox["T", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "76"}], " ", "T14"}], "+", 
+                    RowBox[{"14", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "114"}], " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"42", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"34", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "76"}], " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"42", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "+", 
+                    RowBox[{"68", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T24", "3"]}]}], ")"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "8"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"36", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"9", " ", "T"}], "+", 
+                    RowBox[{"9", " ", "T14"}], "-", "T24"}], ")"}], " ", 
+                    SuperscriptBox["T24", "2"]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "5"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "6"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"192", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T", "3"]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", "T"}], "+", 
+                    RowBox[{"9", " ", "T14"}], "-", 
+                    RowBox[{"50", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", "T14"}], "-", 
+                    RowBox[{"32", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "-", 
+                    RowBox[{"9", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "+", 
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["T24", "3"]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"64", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"18", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"82", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"82", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"64", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", "T"}], "+", 
+                    RowBox[{"4", " ", "T14"}], "-", 
+                    RowBox[{"11", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "-", "T24"}], ")"}], " ", 
+                    "T24"}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"4", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"9", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"9", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"]}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "512"}], " ", 
+                    SuperscriptBox["MT", "8"]}], "-", 
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["T", "4"]}], "-", 
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["T14", "4"]}], "-", 
+                    RowBox[{"64", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"13", " ", "T"}], "+", 
+                    RowBox[{"13", " ", "T14"}], "-", 
+                    RowBox[{"69", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"26", " ", 
+                    SuperscriptBox["T14", "3"], " ", "T24"}], "+", 
+                    RowBox[{"22", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox["T24", "2"]}], "-", 
+                    RowBox[{"10", " ", "T14", " ", 
+                    SuperscriptBox["T24", "3"]}], "+", 
+                    SuperscriptBox["T24", "4"], "+", 
+                    RowBox[{
+                    SuperscriptBox["T", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "28"}], " ", "T14"}], "+", 
+                    RowBox[{"26", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"27", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"54", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"27", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"164", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"164", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"49", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "42"}], " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"78", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"22", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "28"}], " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"78", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "+", 
+                    RowBox[{"44", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "-", 
+                    RowBox[{"10", " ", 
+                    SuperscriptBox["T24", "3"]}]}], ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"23", " ", 
+                    SuperscriptBox["T", "3"]}], "+", 
+                    RowBox[{"23", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"69", " ", "T14"}], "-", 
+                    RowBox[{"121", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"121", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "-", 
+                    RowBox[{"71", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "+", 
+                    RowBox[{"21", " ", 
+                    SuperscriptBox["T24", "3"]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"69", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"242", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"71", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T24", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"20", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"5", " ", "T"}], "+", 
+                    RowBox[{"5", " ", "T14"}], "-", "T24"}], ")"}]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T", "-", "T14"}], ")"}], 
+                    " ", "T24"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}]}], ")"}]}]}], ")"}], 
+                    " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24"}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T", "-", "T14"}], ")"}], 
+                    " ", "T24"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}]}], ")"}]}]}], ")"}], 
+                    " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"36", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"9", " ", "T"}], "+", 
+                    RowBox[{"9", " ", "T14"}], "-", "T24"}], ")"}], " ", 
+                    "T24"}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "4"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", "T"}], "+", 
+                    RowBox[{"5", " ", "T14"}], "-", 
+                    RowBox[{"21", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "-", 
+                    RowBox[{"2", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"4", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"]}], ")"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"192", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T", "3"]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", "T"}], "+", 
+                    RowBox[{"9", " ", "T14"}], "-", 
+                    RowBox[{"29", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", "T14"}], "-", 
+                    RowBox[{"23", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"23", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "-", 
+                    RowBox[{"13", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "+", 
+                    SuperscriptBox["T24", "3"], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"18", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"52", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"52", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"15", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"46", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"13", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24", ",", "MT", ",", "MT", ",", "MT"}], "]"}]}]}], 
+                    ")"}]}], ")"}], "/", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}]}], ")"}], 
+                    "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T", "-", "T14"}], ")"}], 
+                    " ", "T24"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}]}], ")"}]}]}], ")"}], 
+                    " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24"}], "]"}]}], ")"}]}], ")"}]}], "+", 
+                RowBox[{
+                 RowBox[{"(", 
+                  RowBox[{"2", " ", 
+                   SuperscriptBox["MT", "2"], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "U"}], ")"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"2", " ", "T"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", 
+                    RowBox[{"2", " ", "T"}], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"16", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MH", "10"], " ", 
+                    SuperscriptBox["T24", "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"3", " ", "T"}], "+", 
+                    RowBox[{"3", " ", "T14"}], "-", "T24"}], ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "5"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "8"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"176", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"11", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"22", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"11", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"11", " ", "T"}], "+", 
+                    RowBox[{"11", " ", "T14"}], "-", 
+                    RowBox[{"24", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"32", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"32", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"11", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"320", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", "T"}], "+", 
+                    RowBox[{"5", " ", "T14"}], "-", "T24"}], ")"}], " ", 
+                    "T24"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"20", " ", "T"}], "+", 
+                    RowBox[{"20", " ", "T14"}], "+", 
+                    RowBox[{"7", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"10", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"20", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"10", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"17", " ", "T", " ", "T24"}], "+", 
+                    RowBox[{"17", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "6"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"464", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"41", " ", "T"}], "+", 
+                    RowBox[{"41", " ", "T14"}], "-", 
+                    RowBox[{"18", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"11", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"14", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"4", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"4", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"6", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"T", " ", "T24"}], "-", 
+                    RowBox[{"T14", " ", "T24"}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4608", " ", 
+                    SuperscriptBox["MT", "10"]}], "+", 
+                    RowBox[{"512", " ", 
+                    SuperscriptBox["MT", "8"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", "T"}], "+", 
+                    RowBox[{"9", " ", "T14"}], "+", 
+                    RowBox[{"25", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"64", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"27", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"54", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"27", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"181", " ", "T", " ", "T24"}], "+", 
+                    RowBox[{"181", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"10", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"18", " ", 
+                    SuperscriptBox["T", "3"]}], "+", 
+                    RowBox[{"18", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"243", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "+", 
+                    RowBox[{"50", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "-", 
+                    RowBox[{"41", " ", 
+                    SuperscriptBox["T24", "3"]}], "+", 
+                    RowBox[{"27", " ", 
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", "T14"}], "+", 
+                    RowBox[{"9", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"54", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"486", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"50", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T", "4"]}], "+", 
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T14", "4"]}], "+", 
+                    RowBox[{"286", " ", 
+                    SuperscriptBox["T14", "3"], " ", "T24"}], "+", 
+                    RowBox[{"140", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox["T24", "2"]}], "-", 
+                    RowBox[{"78", " ", "T14", " ", 
+                    SuperscriptBox["T24", "3"]}], "-", 
+                    RowBox[{"13", " ", 
+                    SuperscriptBox["T24", "4"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["T", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"36", " ", "T14"}], "+", 
+                    RowBox[{"286", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"27", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"429", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"70", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"36", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"858", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "+", 
+                    RowBox[{"280", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "-", 
+                    RowBox[{"78", " ", 
+                    SuperscriptBox["T24", "3"]}]}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"31", " ", 
+                    SuperscriptBox["T", "4"]}], "+", 
+                    RowBox[{"31", " ", 
+                    SuperscriptBox["T14", "4"]}], "+", 
+                    RowBox[{"30", " ", 
+                    SuperscriptBox["T14", "3"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox["T24", "2"]}], "+", 
+                    RowBox[{"2", " ", "T14", " ", 
+                    SuperscriptBox["T24", "3"]}], "-", 
+                    SuperscriptBox["T24", "4"], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"62", " ", "T14"}], "+", 
+                    RowBox[{"15", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"93", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"45", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"62", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"45", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "+", 
+                    SuperscriptBox["T24", "3"]}], ")"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MH", "8"], " ", 
+                    SuperscriptBox["T24", "2"]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"4", " ", "T"}], "+", 
+                    RowBox[{"4", " ", "T14"}], "-", 
+                    RowBox[{"5", " ", "T24"}]}], ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "4"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "6"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"176", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"11", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"22", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"11", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"11", " ", "T"}], "+", 
+                    RowBox[{"11", " ", "T14"}], "-", 
+                    RowBox[{"25", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"34", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"34", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"13", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"144", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", "T"}], "+", 
+                    RowBox[{"5", " ", "T14"}], "-", 
+                    RowBox[{"6", " ", "T24"}]}], ")"}], " ", "T24"}], "+", 
+                    RowBox[{"72", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"18", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"38", " ", "T", " ", "T24"}], "+", 
+                    RowBox[{"38", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"55", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"672", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["T", "3"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"29", " ", "T"}], "+", 
+                    RowBox[{"29", " ", "T14"}], "-", 
+                    RowBox[{"20", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"24", " ", "T14"}], "-", 
+                    RowBox[{"7", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "-", 
+                    RowBox[{"10", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T24", "3"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"53", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"106", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"53", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"54", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"54", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"35", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"7", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "8"], " ", 
+                    SuperscriptBox["T24", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"36", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"9", " ", "T"}], "+", 
+                    RowBox[{"9", " ", "T14"}], "+", "T24"}], ")"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"48", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"6", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", "T"}], "+", 
+                    RowBox[{"3", " ", "T14"}], "-", 
+                    RowBox[{"7", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"14", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"14", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "6"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"192", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T", "3"]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", "T"}], "+", 
+                    RowBox[{"9", " ", "T14"}], "-", 
+                    RowBox[{"58", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", "T14"}], "-", 
+                    RowBox[{"40", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"40", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "-", 
+                    RowBox[{"17", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "-", 
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["T24", "3"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"18", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"98", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"98", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"19", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"80", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"17", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "1536"}], " ", 
+                    SuperscriptBox["MT", "8"]}], "-", 
+                    RowBox[{"11", " ", 
+                    SuperscriptBox["T", "4"]}], "-", 
+                    RowBox[{"11", " ", 
+                    SuperscriptBox["T14", "4"]}], "-", 
+                    RowBox[{"64", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"29", " ", "T"}], "+", 
+                    RowBox[{"29", " ", "T14"}], "-", 
+                    RowBox[{"115", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"50", " ", 
+                    SuperscriptBox["T14", "3"], " ", "T24"}], "+", 
+                    RowBox[{"56", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox["T24", "2"]}], "+", 
+                    RowBox[{"26", " ", "T14", " ", 
+                    SuperscriptBox["T24", "3"]}], "-", 
+                    SuperscriptBox["T24", "4"], "+", 
+                    RowBox[{
+                    SuperscriptBox["T", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "44"}], " ", "T14"}], "+", 
+                    RowBox[{"50", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"51", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"102", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"51", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"280", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"280", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"95", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "66"}], " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"150", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"56", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "44"}], " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"150", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "+", 
+                    RowBox[{"112", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "+", 
+                    RowBox[{"26", " ", 
+                    SuperscriptBox["T24", "3"]}]}], ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"39", " ", 
+                    SuperscriptBox["T", "3"]}], "+", 
+                    RowBox[{"39", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"117", " ", "T14"}], "-", 
+                    RowBox[{"215", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"215", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "-", 
+                    RowBox[{"151", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "-", 
+                    RowBox[{"37", " ", 
+                    SuperscriptBox["T24", "3"]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"117", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"430", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"151", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "8"]}], "+", 
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"6", " ", "T"}], "+", 
+                    RowBox[{"6", " ", "T14"}], "-", 
+                    RowBox[{"7", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"6", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"2", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"37", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", "T14"}], "-", 
+                    RowBox[{"8", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"16", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T", "3"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"13", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "-", 
+                    RowBox[{"106", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "-", 
+                    SuperscriptBox["T24", "3"], "+", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"6", " ", "T14"}], "+", 
+                    RowBox[{"13", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"13", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"53", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T24", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "64"}], " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["T", "2"]}], "-", 
+                    RowBox[{"8", " ", "T", " ", "T14"}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"3", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"3", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"20", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"5", " ", "T"}], "+", 
+                    RowBox[{"5", " ", "T14"}], "+", "T24"}], ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"8", " ", "T"}], "+", 
+                    RowBox[{"8", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", "T24"}]}], ")"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T", "-", "T14"}], ")"}], 
+                    " ", "T24"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}]}], ")"}]}]}], ")"}], 
+                    " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24"}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T", "-", "T14"}], ")"}], 
+                    " ", "T24"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}]}], ")"}]}]}], ")"}], 
+                    " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", "T"}], "+", 
+                    RowBox[{"4", " ", "T14"}], "-", 
+                    RowBox[{"6", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "-", 
+                    RowBox[{"2", " ", "T24"}]}], ")"}]}]}], ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "3"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "6"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"36", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"9", " ", "T"}], "+", 
+                    RowBox[{"9", " ", "T14"}], "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"192", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T", "3"]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", "T"}], "+", 
+                    RowBox[{"9", " ", "T14"}], "-", 
+                    RowBox[{"37", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", "T14"}], "-", 
+                    RowBox[{"31", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"31", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "-", 
+                    RowBox[{"19", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "-", 
+                    SuperscriptBox["T24", "3"], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"62", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"19", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"18", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"68", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"68", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"17", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"320", " ", 
+                    SuperscriptBox["MT", "8"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T", "4"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T14", "4"]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"23", " ", "T"}], "+", 
+                    RowBox[{"23", " ", "T14"}], "-", 
+                    RowBox[{"37", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["T", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"8", " ", "T14"}], "-", 
+                    RowBox[{"6", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["T14", "3"], " ", "T24"}], "-", 
+                    RowBox[{"10", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox["T24", "2"]}], "-", 
+                    RowBox[{"3", " ", "T14", " ", 
+                    SuperscriptBox["T24", "3"]}], "-", 
+                    SuperscriptBox["T24", "4"], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"39", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"78", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"39", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"98", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"98", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"45", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"9", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["T14", "3"]}], "-", 
+                    RowBox[{"18", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "-", 
+                    RowBox[{"20", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T24", "3"]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"29", " ", 
+                    SuperscriptBox["T", "3"]}], "+", 
+                    RowBox[{"29", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"87", " ", "T14"}], "-", 
+                    RowBox[{"85", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"85", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "-", 
+                    RowBox[{"85", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "-", 
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["T24", "3"]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"87", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"170", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"85", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24", ",", "MT", ",", "MT", ",", "MT"}], "]"}]}]}], 
+                    ")"}]}], ")"}], "/", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}]}], ")"}], 
+                    "2"], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T", "-", "T14"}], ")"}], 
+                    " ", "T24"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}]}], ")"}]}]}], ")"}], 
+                   " ", 
+                   RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24"}], "]"}]}], ")"}]}], "+", 
+                RowBox[{
+                 RowBox[{"(", 
+                  RowBox[{"4", " ", 
+                   SuperscriptBox["MT", "2"], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["S34", "2"]}], "-", 
+                    RowBox[{"2", " ", "S34", " ", "T"}], "-", 
+                    RowBox[{"S34", " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "-", 
+                    RowBox[{"2", " ", "S", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", "S34"}], "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", "S"}], "+", 
+                    RowBox[{"3", " ", "S34"}], "-", 
+                    RowBox[{"2", " ", "T14"}], "-", 
+                    RowBox[{"3", " ", "U"}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", "T", " ", "U"}], "+", 
+                    RowBox[{"4", " ", "T14", " ", "U"}], "+", 
+                    RowBox[{"T24", " ", "U"}], "+", 
+                    SuperscriptBox["U", "2"]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T24", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T24", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T24", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T24", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T24", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S34"}], "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", "S34"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", "U", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", "S34", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"S34", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"U", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", "U", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14"}]], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "8"]}], "+", 
+                    RowBox[{"192", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"48", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "5"}], " ", 
+                    SuperscriptBox["T", "2"]}], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"4", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", "T"}], "+", 
+                    RowBox[{"3", " ", "T14"}], "+", "T24"}], ")"}]}], "-", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", "T14"}], "+", 
+                    RowBox[{"2", " ", "T24"}]}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "3"], "+", 
+                    SuperscriptBox["T14", "3"], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"T14", " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "14"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"3", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["MH", "4"]}], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"]}], ")"}]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"6", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "14"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"3", " ", "T24"}]}], ")"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], ")"}], "/", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T", "-", "T14"}], ")"}], 
+                    " ", "T24"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}]}], ")"}]}]}], ")"}], 
+                    " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24"}], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "10"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"3", " ", "T"}], "+", 
+                    RowBox[{"3", " ", "T14"}], "-", "T24"}], ")"}], " ", 
+                    "T24"}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "8"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"464", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"19", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"38", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"19", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"24", " ", "T"}], "+", 
+                    RowBox[{"24", " ", "T14"}], "-", "T24"}], ")"}]}], "-", 
+                    RowBox[{"4", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"4", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"]}], ")"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"40", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}], "2"], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"7", " ", "T"}], "+", 
+                    RowBox[{"7", " ", "T14"}], "+", "T24"}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"832", " ", 
+                    SuperscriptBox["MT", "8"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}], "3"], " ", "T24"}], "+", 
+                    RowBox[{"48", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"11", " ", "T"}], "+", 
+                    RowBox[{"11", " ", "T14"}], "+", 
+                    RowBox[{"10", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"14", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"26", " ", "T", " ", "T24"}], "+", 
+                    RowBox[{"26", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"27", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"54", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"27", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"52", " ", "T", " ", "T24"}], "+", 
+                    RowBox[{"52", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "8"]}], "+", 
+                    RowBox[{"192", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", 
+                    RowBox[{"17", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"14", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    SuperscriptBox["T24", "2"]}], ")"}]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"6", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"119", " ", "T", " ", "T24"}], "+", 
+                    RowBox[{"119", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"13", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "3"], "+", 
+                    SuperscriptBox["T14", "3"], "+", 
+                    RowBox[{"89", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "+", 
+                    RowBox[{"9", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "+", 
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["T24", "3"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", "T14"}], "+", 
+                    RowBox[{"89", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"178", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3584", " ", 
+                    SuperscriptBox["MT", "10"]}], "+", 
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "8"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"13", " ", "T"}], "+", 
+                    RowBox[{"13", " ", "T14"}], "+", 
+                    RowBox[{"40", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}], "2"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"18", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"4", " ", "T", " ", "T24"}], "+", 
+                    RowBox[{"4", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"128", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"18", " ", "T", " ", "T14"}], "+", 
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"60", " ", "T", " ", "T24"}], "+", 
+                    RowBox[{"60", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"14", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"11", " ", 
+                    SuperscriptBox["T", "3"]}], "+", 
+                    RowBox[{"11", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"129", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "+", 
+                    RowBox[{"51", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["T24", "3"]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"11", " ", "T14"}], "+", 
+                    RowBox[{"43", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"3", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"11", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"86", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"17", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T", "4"]}], "+", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T14", "4"]}], "+", 
+                    RowBox[{"116", " ", 
+                    SuperscriptBox["T14", "3"], " ", "T24"}], "+", 
+                    RowBox[{"54", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox["T24", "2"]}], "+", 
+                    RowBox[{"28", " ", "T14", " ", 
+                    SuperscriptBox["T24", "3"]}], "+", 
+                    SuperscriptBox["T24", "4"], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["T", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", "T14"}], "+", 
+                    RowBox[{"29", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"58", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"87", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "+", 
+                    RowBox[{"27", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "+", 
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["T24", "3"]}]}], ")"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], ")"}], "/", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], "+", 
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}], "2"], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T", "+", "T14"}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T", "-", "T14"}], ")"}], 
+                    " ", "T24"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}]}], ")"}]}]}], ")"}], 
+                    " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24"}], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "10"]}], "+", 
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "8"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "-", "T24"}], ")"}], "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T24"}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14"}], ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}], "2"]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T", "2"]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"6", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"6", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"3", " ", "T24"}]}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "4"], "+", 
+                    SuperscriptBox["T14", "4"], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["T14", "3"], " ", "T24"}], "+", 
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"4", " ", "T14", " ", "T24", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T24"}], ")"}], "2"]}], 
+                    "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["T", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["T24", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "32"}], " ", 
+                    SuperscriptBox["MH", "4"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"]}], ")"}]}], "+", 
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T14", "2"], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T24"}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"4", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T14", "3"], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "+", 
+                    RowBox[{"3", " ", "T14", " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"T24", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T24"}], ")"}], 
+                    "2"]}]}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "3"], "+", 
+                    SuperscriptBox["T14", "3"], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "+", 
+                    RowBox[{"3", " ", "T14", " ", "T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "4"]}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"]}], ")"}]}], "+", 
+                    RowBox[{"3", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T14", "2"], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T24"}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T24", ",", "MT", ",", "MT"}], "]"}]}], ")"}], 
+                    "/", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T", "-", "T14"}], ")"}], 
+                    " ", "T24"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T", "2"], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}]}], ")"}]}]}], ")"}], 
+                    " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24"}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox["T", "2"], "+", 
+                    RowBox[{"2", " ", "T", " ", "T14"}], "+", 
+                    SuperscriptBox["T14", "2"], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"8", " ", "T"}], "+", 
+                    RowBox[{"8", " ", "T14"}], "-", 
+                    RowBox[{"4", " ", "T24"}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "-", 
+                    RowBox[{"T", " ", "T24"}], "-", 
+                    RowBox[{"T14", " ", "T24"}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T24", "2"]}]}], ")"}], " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24", ",", "MT", ",", "MT", ",", "MT"}], "]"}]}], ")"}], 
+                    "/", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "-", "T14"}], ",", 
+                    "T24"}], "]"}]}]}], ")"}]}], ")"}], "/", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                   SuperscriptBox["T", "2"], "+", 
+                   SuperscriptBox["T14", "2"], "-", 
+                   RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "+", 
+                   RowBox[{"2", " ", "T14", " ", "T24"}], "+", 
+                   SuperscriptBox["T24", "2"], "+", 
+                   RowBox[{"2", " ", "T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}], "+", 
+                   RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "+", "T24"}], ")"}]}]}], 
+                  ")"}]}]}], ")"}]}]}], ")"}], " ", 
+           SuperscriptBox["\[Beta]", "2"]}]}], "+", 
+         InterpretationBox[
+          SuperscriptBox[
+           RowBox[{"O", "[", "\[Beta]", "]"}], "3"],
+          SeriesData[$CellContext`\[Beta], 0, {}, 0, 3, 1],
+          Editable->False]}],
+        SeriesData[$CellContext`\[Beta], 
+         0, {$CellContext`T^(-1) ((
+              4 (2 + X`Eps^(-1) + 
+                X`DiscB[$CellContext`T, $CellContext`MT, $CellContext`MT] + 
+                Log[$CellContext`MT^(-2) X`Mu^2]) - 
+              4 ($CellContext`MH^2 - $CellContext`T)^(-1) (
+               3 $CellContext`MH^2 + X`Eps^(-1) $CellContext`MH^2 - 
+               3 $CellContext`T - 
+               X`Eps^(-1) $CellContext`T + $CellContext`MH^2 
+                X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - \
+$CellContext`T 
+               X`DiscB[$CellContext`T, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MT^2 
+                Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 + $CellContext`MH^2 
+                Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`T 
+               Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`MT^2 
+               Log[Rational[1, 2] $CellContext`MT^(-2) (
+                   2 $CellContext`MT^2 - $CellContext`T + ($CellContext`T \
+((-4) $CellContext`MT^2 + $CellContext`T))^
+                    Rational[1, 2])]^2)) ($CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[5]] $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[4]] - 2 $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[4]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[5]] + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`e[2]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`ec[
+                 5]]) - ($CellContext`MH^2 - $CellContext`T)^(-1) (
+             Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                 2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^Rational[1, 2])]^2 - 
+             Log[Rational[1, 2] $CellContext`MT^(-2) (
+                2 $CellContext`MT^2 - $CellContext`T + ($CellContext`T ((-4) \
+$CellContext`MT^2 + $CellContext`T))^
+                 Rational[
+                  1, 2])]^2) (((-$CellContext`MH^2 + $CellContext`T) \
+$CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`e[2]] + 2 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[3]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[1]]) $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`ec[5]] - 2 $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[
+               5]] ((-$CellContext`MH^2 + $CellContext`T) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[4]] + 2 $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[3]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[1]]) + $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[
+                4]] ((-$CellContext`MH^2 + $CellContext`T) $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[5]] + 2 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[3]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[1]])) - 16 $CellContext`Pair[
+              $CellContext`e[1], 
+              $CellContext`k[3]] (
+             Rational[
+               1, 2] ($CellContext`MH^2 - $CellContext`T)^(-2) \
+(-$CellContext`MH^2 + $CellContext`T - $CellContext`MH^2 
+               X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MH^2 
+                X`DiscB[$CellContext`T, $CellContext`MT, $CellContext`MT] - \
+$CellContext`MT^2 
+               Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                   2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 + $CellContext`MT^2 
+                Log[Rational[1, 2] $CellContext`MT^(-2) (
+                    2 $CellContext`MT^2 - $CellContext`T + ($CellContext`T \
+((-4) $CellContext`MT^2 + $CellContext`T))^
+                    Rational[1, 2])]^2) ($CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[1]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`ec[5]] - 2 $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[5]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[1]] + $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[1]]) + 
+             Rational[
+               1, 2] ($CellContext`MH^2 - $CellContext`T)^(-1) (-
+                X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + 
+               X`DiscB[$CellContext`T, $CellContext`MT, $CellContext`MT]) \
+($CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[3]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`ec[5]] - 2 $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[5]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[3]] + $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[3]])) - 
+            4 ($CellContext`MH^2 - $CellContext`T)^(-1) (
+             X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - 
+             X`DiscB[$CellContext`T, $CellContext`MT, $CellContext`MT]) \
+(((-$CellContext`MH^2 + $CellContext`T) $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`e[2]] + 2 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[3]] ($CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[3]])) $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`ec[5]] - 2 $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[
+               5]] ((-$CellContext`MH^2 + $CellContext`T) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[4]] + 2 $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[3]] ($CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[1]] + $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]])) + $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[
+                4]] ((-$CellContext`MH^2 + $CellContext`T) $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[5]] + 2 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[3]] ($CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]])))) + (
+             
+             2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U)^(-1) ((
+              4 (2 + X`Eps^(-1) + 
+                X`DiscB[
+                 2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U, $CellContext`MT, $CellContext`MT] + 
+                Log[$CellContext`MT^(-2) X`Mu^2]) + 
+              4 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U)^(-1) (
+                3 ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U) + 
+                X`Eps^(-1) ($CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T - $CellContext`U) - $CellContext`MH^2 
+                X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + \
+(2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - $CellContext`U) 
+                 X`DiscB[
+                  2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U, $CellContext`MT, $CellContext`MT] - $CellContext`MT^2 
+                Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[
+                    1, 2])]^2 + ($CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T - $CellContext`U) 
+                 Log[$CellContext`MT^(-2) X`Mu^2] + $CellContext`MT^2 
+                 Log[Rational[
+                    1, 2] $CellContext`MT^(-2) ((-2) $CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U + (((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) ((-2) $CellContext`MH^2 + 
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U))^Rational[1, 2])]^2)) ($CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[5]] $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[4]] - 2 $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[4]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[5]] + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`e[2]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`ec[5]]) + (
+              8 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U)^(-1) (
+                X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - 
+                X`DiscB[
+                2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U, $CellContext`MT, $CellContext`MT]) ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`ec[4]] - 2 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[4]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[3]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`e[2]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]]) - 
+              8 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U)^(-2) (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U + $CellContext`MH^2 
+                X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - \
+$CellContext`MH^2 
+               X`DiscB[
+                2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U, $CellContext`MT, $CellContext`MT] + $CellContext`MT^2 
+                Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 - $CellContext`MT^2 
+               Log[Rational[
+                   1, 2] $CellContext`MT^(-2) ((-2) $CellContext`MH^2 + 
+                   2 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U + (((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) ((-2) $CellContext`MH^2 + 
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U))^Rational[1, 2])]^2) ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] - 2 $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[4]] $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[5]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`e[2]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[5]])) $CellContext`Pair[
+               $CellContext`ec[5], 
+               $CellContext`k[3]] - 
+            4 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U)^(-1) (-
+              X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + 
+             X`DiscB[2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U, $CellContext`MT, $CellContext`MT]) ($CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[
+                4]] ((-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[5]] - 2 ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[3]] - $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[5]]) $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[3]]) - 2 $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[
+               4]] ((-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[5]] - 2 ($CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[3]] - $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[5]]) $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[3]]) + $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`e[
+                2]] ((-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`ec[5]] - 2 ($CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]] - $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[5]]) $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[
+                 3]])) + (-$CellContext`MH^2 + $CellContext`S34 + \
+$CellContext`T + $CellContext`U)^(-1) (-
+               Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                   2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^Rational[1, 2])]^2 + 
+              Log[Rational[1, 2] $CellContext`MT^(-2) ((-2) $CellContext`MH^2 + 
+                  2 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U + (((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) ((-2) $CellContext`MH^2 + 
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U))^Rational[1, 2])]^2) (-$CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[
+                 4]] ((-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[5]] + 2 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[5]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]]) + 2 $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[
+                 4]] ((-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + $\
+CellContext`U) $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`ec[5]] + 2 $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[5]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]]) - $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`e[
+                2]] ((-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`ec[5]] + 2 $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[3]])) - $CellContext`T24^(-1) ((-8) (
+               Rational[-1, 
+                  2] (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U)^(-1) (
+                 X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - 
+                 X`DiscB[
+                 2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U, $CellContext`MT, $CellContext`MT]) (-(($CellContext`MH^2 - 
+                    3 $CellContext`S34 + $CellContext`T + $CellContext`U) \
+$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] + 
+                   2 ($CellContext`S - $CellContext`T14) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[
+                    3]] + ($CellContext`MH^2 + $CellContext`S34 + \
+$CellContext`T - 3 $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] + 
+                 2 ($CellContext`MH^2 - $CellContext`S34 + $CellContext`T - \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] + 
+                 2 ($CellContext`MH^2 - $CellContext`S34 + $CellContext`T - \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[2]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + 8 (-$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]]))) $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[3]] + 
+               Rational[-1, 
+                  2] (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U)^(-2) (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U + $CellContext`MH^2 
+                  X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] - $CellContext`MH^2 
+                 X`DiscB[
+                  2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U, $CellContext`MT, $CellContext`MT] + $CellContext`MT^2 
+                  Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 - $CellContext`MT^2 
+                 Log[Rational[
+                    1, 2] $CellContext`MT^(-2) ((-2) $CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U + (((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) ((-2) $CellContext`MH^2 + 
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U))^Rational[1, 2])]^2) (-(($CellContext`MH^2 - 
+                    3 $CellContext`S34 + $CellContext`T - 
+                    2 $CellContext`T24 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] + 
+                   2 ($CellContext`S - $CellContext`T14) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[
+                    3]] + ($CellContext`MH^2 + $CellContext`S34 + \
+$CellContext`T - 2 $CellContext`T24 - 3 $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] + 
+                 2 ($CellContext`MH^2 - $CellContext`S34 + $CellContext`T - 
+                   2 $CellContext`T24 - $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] + 
+                 2 ($CellContext`MH^2 - $CellContext`S34 + $CellContext`T - 
+                   2 $CellContext`T24 - $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[2]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + 8 (-$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]]))) $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[3]]) + (
+               4 (2 + X`Eps^(-1) + 
+                 X`DiscB[
+                  2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U, $CellContext`MT, $CellContext`MT] + 
+                 Log[$CellContext`MT^(-2) X`Mu^2]) + 
+               4 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U)^(-1) (
+                 3 ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U) + 
+                 X`Eps^(-1) ($CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T - $CellContext`U) - $CellContext`MH^2 
+                 X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + \
+(2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - $CellContext`U) 
+                  X`DiscB[
+                   2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U, $CellContext`MT, $CellContext`MT] - $CellContext`MT^2 
+                 Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[
+                    1, 2])]^2 + ($CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T - $CellContext`U) 
+                  Log[$CellContext`MT^(-2) X`Mu^2] + $CellContext`MT^2 
+                  Log[Rational[
+                    1, 2] $CellContext`MT^(-2) ((-2) $CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U + (((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) ((-2) $CellContext`MH^2 + 
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U))^Rational[1, 2])]^2)) ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[
+                  5]] ((-$CellContext`S + $CellContext`T14) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] + 4 ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]])) - 2 (2 ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]]) $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[4]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`ec[5]] + $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[2]] (2 ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[2]] (2 $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]])) + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[4]] $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[4]] (2 $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]])) + $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] ((-4) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + 4 $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    4]]))) + (-$CellContext`MH^2 + $CellContext`S34 + \
+$CellContext`T + $CellContext`U)^(-1) (-
+                Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^Rational[1, 2])]^2 + 
+               Log[Rational[
+                   1, 2] $CellContext`MT^(-2) ((-2) $CellContext`MH^2 + 
+                   2 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U + (((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) ((-2) $CellContext`MH^2 + 
+                    
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U))^Rational[
+                    1, 2])]^2) ((-4) ($CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T - $CellContext`U) ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[2]] - $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[4]]) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[4]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`ec[5]] - 
+               4 ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U) ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[2]] - $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[4]]) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[5]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[2]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[
+                  5]] (-($CellContext`S - $CellContext`T14) \
+(-$CellContext`MH^2 + $CellContext`S + $CellContext`T14 + $CellContext`T24) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] + 
+                 4 ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U) ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]])) + 8 (-$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]])) $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[3]] + 4 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[4]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[
+                  4]] ((-$CellContext`MH^2 + $CellContext`S34 + \
+$CellContext`T + $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    1]] + ($CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T24 - $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) + 4 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`e[2]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[
+                  2]] ((-$CellContext`MH^2 + $CellContext`S34 + \
+$CellContext`T + $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    1]] + ($CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T24 - $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) - 2 $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[
+                 4]] (($CellContext`S - $CellContext`T14) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]] (
+                  2 ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    2]] + ($CellContext`S34 + $CellContext`T - \
+$CellContext`T24 - $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[
+                   2]] ((-$CellContext`S34 + $CellContext`T - \
+$CellContext`T24 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + 
+                  2 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]))) + 
+             4 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U)^(-1) (-
+                X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + 
+               X`DiscB[
+                2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U, $CellContext`MT, $CellContext`MT]) ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[
+                  5]] (-($CellContext`S - $CellContext`T14) \
+(-$CellContext`MH^2 + $CellContext`S + $CellContext`T14 + $CellContext`T24) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] + 
+                 4 ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U) ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]])) + 
+               2 ((-2) ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U) ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] - 
+                 2 ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U) ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]]) $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`ec[5]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[2]] + 8 (-$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]])) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] (
+                   2 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + (3 $CellContext`MH^2 - 
+                    3 $CellContext`S34 + $CellContext`T - 2 $CellContext`T24 - 
+                    3 $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[2]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] (
+                   2 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + (3 $CellContext`MH^2 - 
+                    3 $CellContext`S34 + $CellContext`T - 2 $CellContext`T24 - 
+                    3 $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]])) - $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[4]] (
+                4 ($CellContext`S - $CellContext`T14) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]] (
+                  4 ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + ($CellContext`MH^2 + 
+                    3 $CellContext`S34 + 3 $CellContext`T - 
+                    2 $CellContext`T24 - 5 $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[
+                   2]] (($CellContext`MH^2 - 5 $CellContext`S34 + 
+                    3 $CellContext`T - 2 $CellContext`T24 + 
+                    3 $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + 
+                  4 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])))) + $CellContext`S^(-1) ((-8) (
+                Rational[-1, 
+                   2] (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U)^(-2) (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U + $CellContext`MH^2 
+                   X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] - $CellContext`MH^2 
+                  X`DiscB[
+                   2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U, $CellContext`MT, $CellContext`MT] + $CellContext`MT^2 
+                   Log[Rational[
+                    1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 - $CellContext`MT^2 
+                  Log[Rational[
+                    1, 2] $CellContext`MT^(-2) ((-2) $CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U + (((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) ((-2) $CellContext`MH^2 + 
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U))^Rational[1, 2])]^2) (
+                  2 ($CellContext`MH^2 + $CellContext`S - 
+                    2 $CellContext`S34 - $CellContext`T14 - $CellContext`T24) \
+$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] + 
+                  2 (-$CellContext`MH^2 - $CellContext`S + 
+                    2 $CellContext`S34 + $CellContext`T14 + $CellContext`T24) \
+$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[
+                    2]] (((-3) $CellContext`MH^2 + 
+                    3 $CellContext`S + $CellContext`T14 + $CellContext`T24 + 
+                    4 $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + (3 $CellContext`MH^2 - 
+                    3 $CellContext`S - 
+                    4 $CellContext`T - $CellContext`T14 - $CellContext`T24) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + 
+                    2 (-$CellContext`T14 + $CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) + 8 ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] - $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] (-$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]]))) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]] + 
+                Rational[-1, 
+                   2] (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U)^(-1) (
+                  X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] - X`DiscB[
+                  2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U, $CellContext`MT, $CellContext`MT]) (
+                  2 (-$CellContext`MH^2 - $CellContext`S34 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] + 
+                  2 ($CellContext`MH^2 + $CellContext`S34 - $CellContext`T - \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[
+                    2]] (-($CellContext`MH^2 + $CellContext`S34 + \
+$CellContext`T - 3 $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[
+                    1]] + ($CellContext`MH^2 + $CellContext`S34 - 
+                    3 $CellContext`T + $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + 
+                    2 (-$CellContext`T14 + $CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) + 8 ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] - $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] (-$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]]))) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]]) + (
+                4 (2 + X`Eps^(-1) + 
+                  X`DiscB[
+                   2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U, $CellContext`MT, $CellContext`MT] + 
+                  Log[$CellContext`MT^(-2) X`Mu^2]) + 
+                4 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U)^(-1) (
+                  3 ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U) + 
+                  X`Eps^(-1) ($CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T - $CellContext`U) - $CellContext`MH^2 
+                  X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] + (
+                    2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U) X`DiscB[
+                    2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U, $CellContext`MT, $CellContext`MT] - $CellContext`MT^2 
+                  Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[
+                    1, 2])]^2 + ($CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T - $CellContext`U) 
+                   Log[$CellContext`MT^(-2) X`Mu^2] + $CellContext`MT^2 
+                   Log[Rational[
+                    1, 2] $CellContext`MT^(-2) ((-2) $CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U + (((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) ((-2) $CellContext`MH^2 + 
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U))^Rational[
+                    1, 2])]^2)) ((-$CellContext`T14 + $CellContext`T24) \
+$CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`e[2]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`ec[5]] + 4 (-$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`ec[5]] + 4 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[2]] $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`ec[5]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]]) - 4 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[5]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[1]] ($CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[2]]) - $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`e[2]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] (4 $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] ((-4) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]])) - 2 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[2]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] ($CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]] + 2 $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]) + 2 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[4]] $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + 2 $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])) + 
+              4 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U)^(-1) (-
+                 X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + 
+                X`DiscB[
+                 2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U, $CellContext`MT, $CellContext`MT]) (-$CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`e[
+                   2]] (-($CellContext`MH^2 - $CellContext`S - \
+$CellContext`T14 - $CellContext`T24) ($CellContext`T14 - $CellContext`T24) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] + 
+                  4 ($CellContext`T14 - $CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] (
+                    4 ($CellContext`MH^2 - $CellContext`S - $CellContext`T14 - \
+$CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + ((-7) $CellContext`MH^2 + 
+                    5 $CellContext`S + 8 $CellContext`T + 3 $CellContext`T14 + 
+                    3 $CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] (
+                    4 (-$CellContext`MH^2 + $CellContext`S + $CellContext`T14 + \
+$CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + (7 $CellContext`MH^2 - 
+                    5 $CellContext`S - 3 $CellContext`T14 - 
+                    3 $CellContext`T24 - 8 $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]])) + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[2]] (
+                  4 ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]]) - 2 $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[
+                    4]] (((-3) $CellContext`MH^2 + $CellContext`S + 
+                    4 $CellContext`S34 + 3 $CellContext`T14 + 
+                    3 $CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + 
+                   2 (-$CellContext`MH^2 + $CellContext`S + $CellContext`T14 + \
+$CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])) + 
+                2 ((-2) ($CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T - $CellContext`U) ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] - 
+                  2 ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]]) + 8 ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] - $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] (-$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]])) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    1]] (((-3) $CellContext`MH^2 + $CellContext`S + 
+                    4 $CellContext`S34 + 3 $CellContext`T14 + 
+                    3 $CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + 
+                    2 (-$CellContext`MH^2 + $CellContext`S + $CellContext`T14 + \
+$CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    4]]))) + (-$CellContext`MH^2 + $CellContext`S34 + \
+$CellContext`T + $CellContext`U)^(-1) (-
+                 Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^Rational[1, 2])]^2 + 
+                Log[Rational[
+                    1, 2] $CellContext`MT^(-2) ((-2) $CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U + (((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) ((-2) $CellContext`MH^2 + 
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U))^Rational[1, 2])]^2) ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`e[
+                   2]] (($CellContext`MH^2 - $CellContext`S - \
+$CellContext`T14 - $CellContext`T24) ($CellContext`T14 - $CellContext`T24) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] + 
+                  2 ((-$CellContext`T14 + $CellContext`T24) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] (
+                    2 ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + ((-2) $CellContext`MH^2 + 
+                    2 $CellContext`S34 + 
+                    2 $CellContext`T + $CellContext`T14 + $CellContext`T24) \
+$CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] (
+                    2 ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + ((-2) $CellContext`MH^2 + 
+                    2 $CellContext`S34 + $CellContext`T14 + $CellContext`T24 + 
+                    2 $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]))) - 
+                4 (($CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U) ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[
+                    5]] + ($CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T - $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]]) - 2 ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] - $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] (-$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]])) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]] - $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[4]] $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[
+                   1]] ((-$CellContext`MH^2 + $CellContext`S34 + \
+$CellContext`T14 + $CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    3]] + ($CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T - $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]) + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[
+                    2]] (-($CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T - $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]]) + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[
+                    4]] ((-$CellContext`MH^2 + $CellContext`S34 + \
+$CellContext`T14 + $CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    3]] + ($CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T - $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])))))) + $CellContext`S34^(-1) ((
+              4 (2 + X`Eps^(-1) + 
+                X`DiscB[$CellContext`S34, $CellContext`MT, $CellContext`MT] + 
+                Log[$CellContext`MT^(-2) X`Mu^2]) - 
+              4 ($CellContext`MH^2 - $CellContext`S34)^(-1) (
+               3 $CellContext`MH^2 + X`Eps^(-1) $CellContext`MH^2 - 
+               3 $CellContext`S34 - 
+               X`Eps^(-1) $CellContext`S34 + $CellContext`MH^2 
+                X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - \
+$CellContext`S34 
+               X`DiscB[$CellContext`S34, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MT^2 
+                Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 + $CellContext`MH^2 
+                Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`S34 
+               Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`MT^2 
+               Log[Rational[1, 2] $CellContext`MT^(-2) (
+                   2 $CellContext`MT^2 - $CellContext`S34 + ($CellContext`S34 \
+((-4) $CellContext`MT^2 + $CellContext`S34))^
+                    Rational[1, 2])]^2)) ($CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[5]] $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[4]] - 2 $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[4]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[5]] + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`e[2]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`ec[5]]) + 
+            4 ($CellContext`MH^2 - $CellContext`S34)^(-1) (
+              X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - 
+              X`DiscB[$CellContext`S34, $CellContext`MT, $CellContext`MT]) (
+              2 $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[
+                 5]] ((-$CellContext`MH^2 + $CellContext`S34) \
+$CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[4]] + 2 ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] - $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]]) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]]) - $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[
+                5]] ((-$CellContext`MH^2 + $CellContext`S34) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] + 2 ($CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[3]] - $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[4]]) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]]) - $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`e[
+                2]] ((-$CellContext`MH^2 + $CellContext`S34) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`ec[5]] + 2 $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]] ($CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]] - $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[4]]))) + $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`k[
+               3]] ((-8) ($CellContext`MH^2 - $CellContext`S34)^(-1) (-
+                 X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + 
+                X`DiscB[$CellContext`S34, $CellContext`MT, $CellContext`MT]) \
+((-2) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`ec[5]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[5]] $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[3]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`e[2]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]]) + 
+              8 ($CellContext`MH^2 - $CellContext`S34)^(-2) \
+(-$CellContext`MH^2 + $CellContext`S34 - $CellContext`MH^2 
+                X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MH^2 
+                 X`DiscB[$CellContext`S34, $CellContext`MT, $CellContext`MT] - \
+$CellContext`MT^2 
+                Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 + $CellContext`MT^2 
+                 Log[Rational[1, 2] $CellContext`MT^(-2) (
+                    2 $CellContext`MT^2 - $CellContext`S34 + \
+($CellContext`S34 ((-4) $CellContext`MT^2 + $CellContext`S34))^
+                    Rational[1, 2])]^2) ((-2) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]] $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`ec[5]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[5]] $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[4]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`e[2]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[
+                   4]])) - ($CellContext`MH^2 - $CellContext`S34)^(-1) (
+             Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                 2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^Rational[1, 2])]^2 - 
+             Log[Rational[1, 2] $CellContext`MT^(-2) (
+                2 $CellContext`MT^2 - $CellContext`S34 + ($CellContext`S34 \
+((-4) $CellContext`MT^2 + $CellContext`S34))^Rational[1, 2])]^2) (
+             2 $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[
+                5]] (($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[4]] + 2 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[4]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]]) - $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[
+               5]] (($CellContext`MH^2 - $CellContext`S34) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[4]] + 2 $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[4]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[3]]) - $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`e[
+               2]] (($CellContext`MH^2 - $CellContext`S34) $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`ec[5]] + 2 $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[3]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[4]])) + $CellContext`S^(-1) ((
+                4 (2 + X`Eps^(-1) + 
+                  X`DiscB[$CellContext`S34, $CellContext`MT, $CellContext`MT] + 
+                  Log[$CellContext`MT^(-2) X`Mu^2]) - 
+                4 ($CellContext`MH^2 - $CellContext`S34)^(-1) (
+                 3 $CellContext`MH^2 + X`Eps^(-1) $CellContext`MH^2 - 
+                 3 $CellContext`S34 - 
+                 X`Eps^(-1) $CellContext`S34 + $CellContext`MH^2 
+                  X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] - $CellContext`S34 
+                 X`DiscB[$CellContext`S34, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MT^2 
+                  Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 + $CellContext`MH^2 
+                  Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`S34 
+                 Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`MT^2 
+                 Log[Rational[1, 2] $CellContext`MT^(-2) (
+                    2 $CellContext`MT^2 - $CellContext`S34 + \
+($CellContext`S34 ((-4) $CellContext`MT^2 + $CellContext`S34))^
+                    Rational[
+                    1, 2])]^2)) ((-$CellContext`T - $CellContext`T14 + \
+$CellContext`T24 + $CellContext`U) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`e[2]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`ec[5]] - 4 (-$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]]) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`ec[5]] + 2 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[2]] $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`ec[5]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] + 2 $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]]) - 2 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[5]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[1]] ($CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]] + 2 $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]]) - 4 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[2]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] ($CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[2]]) + 4 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[4]] $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]]) - $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`e[2]] ((-4) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]]) + 4 $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]])) - 
+              4 ($CellContext`MH^2 - $CellContext`S34)^(-1) (
+               X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - 
+               X`DiscB[$CellContext`S34, $CellContext`MT, $CellContext`MT]) \
+(-$CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`e[
+                  2]] (-($CellContext`MH^2 - $CellContext`S34) \
+($CellContext`T + $CellContext`T14 - $CellContext`T24 - $CellContext`U) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] + 
+                 4 ($CellContext`MH^2 - $CellContext`S34) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + 
+                 4 (-$CellContext`MH^2 + $CellContext`S34) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[
+                   3]] ((7 $CellContext`MH^2 - 2 $CellContext`S - 
+                    3 $CellContext`S34 - 8 $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + ((-7) $CellContext`MH^2 + 
+                    2 $CellContext`S + 3 $CellContext`S34 + 
+                    8 $CellContext`T) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + 
+                  4 ((-2) $CellContext`MH^2 + $CellContext`S + \
+$CellContext`S34 + 2 $CellContext`T24 + 2 $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]])) - 
+               2 (2 ($CellContext`MH^2 - $CellContext`S34) \
+($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]]) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`ec[5]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[5]] $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[
+                   1]] (((-3) $CellContext`MH^2 + 2 $CellContext`S + 
+                    3 $CellContext`S34 + 4 $CellContext`T14 + 
+                    4 $CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] + 
+                  2 (-$CellContext`MH^2 + $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]]) + 
+                2 ($CellContext`MH^2 - $CellContext`S34) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[4]] $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]]) - $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[2]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[
+                    5]] (((-3) $CellContext`MH^2 + 2 $CellContext`S + 
+                    3 $CellContext`S34 + 4 $CellContext`T14 + 
+                    4 $CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] + 
+                   2 (-$CellContext`MH^2 + $CellContext`S34) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]]) + 
+                 2 ($CellContext`MH^2 - $CellContext`S34) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]])) + 8 $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]] (-$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]]) - $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]]) + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]])))) + 
+              8 (Rational[
+                  1, 2] ($CellContext`MH^2 - $CellContext`S34)^(-1) (-
+                   X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] + 
+                  X`DiscB[$CellContext`S34, $CellContext`MT, \
+$CellContext`MT]) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]] (
+                  2 ((-3) $CellContext`MH^2 + $CellContext`S34 + 
+                    2 ($CellContext`T + $CellContext`U)) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] - 
+                  2 ((-3) $CellContext`MH^2 + $CellContext`S34 + 
+                   2 ($CellContext`T + $CellContext`U)) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[
+                    2]] (((-3) $CellContext`MH^2 + $CellContext`S34 + 
+                    4 $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + (
+                    3 $CellContext`MH^2 - $CellContext`S34 - 
+                    4 $CellContext`T) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + 
+                    2 ($CellContext`T + $CellContext`T14 - $CellContext`T24 - \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) + 8 (-$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]]) - $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]]) + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]))) + 
+                Rational[
+                  1, 2] ($CellContext`MH^2 - $CellContext`S34)^(-2) \
+(-$CellContext`MH^2 + $CellContext`S34 - $CellContext`MH^2 
+                  X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] + $CellContext`MH^2 
+                   X`DiscB[$CellContext`S34, $CellContext`MT, \
+$CellContext`MT] - $CellContext`MT^2 
+                  Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 + $CellContext`MT^2 
+                   Log[Rational[1, 2] $CellContext`MT^(-2) (
+                    2 $CellContext`MT^2 - $CellContext`S34 + \
+($CellContext`S34 ((-4) $CellContext`MT^2 + $CellContext`S34))^
+                    Rational[1, 2])]^2) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[
+                   3]] ((-2) (-$CellContext`MH^2 + $CellContext`S34 + 
+                    2 ($CellContext`T14 + $CellContext`T24)) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] + 
+                  2 (-$CellContext`MH^2 + $CellContext`S34 + 
+                    2 ($CellContext`T14 + $CellContext`T24)) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] + 8 (-$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]]) - $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]]) + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]])) - $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[
+                    2]] ((-$CellContext`MH^2 + $CellContext`S34 + 
+                    2 ($CellContext`T14 + $CellContext`T24)) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    1]] + ($CellContext`MH^2 - $CellContext`S34 - 
+                    2 ($CellContext`T14 + $CellContext`T24)) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + 
+                   2 (-$CellContext`T14 + $CellContext`T24) \
+$CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + 
+                   2 ($CellContext`T - $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    4]]))) - ($CellContext`MH^2 - $CellContext`S34)^(-1) (
+               Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                   2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^Rational[1, 2])]^2 - 
+               Log[Rational[1, 2] $CellContext`MT^(-2) (
+                  2 $CellContext`MT^2 - $CellContext`S34 + ($CellContext`S34 \
+((-4) $CellContext`MT^2 + $CellContext`S34))^
+                   Rational[
+                    1, 2])]^2) ((-4) (($CellContext`MH^2 - $CellContext`S34) \
+($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]]) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    1]] ((-$CellContext`MH^2 + $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[
+                    
+                    1]] + (-$CellContext`MH^2 + $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[
+                    2]] + ($CellContext`T14 + $CellContext`T24) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[
+                    3]]) + ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]]) - $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[2]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[
+                    5]] ((-$CellContext`MH^2 + $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[
+                    1]] + (-$CellContext`MH^2 + $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[
+                    2]] + ($CellContext`T14 + $CellContext`T24) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[
+                    3]]) + ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]])) + 2 $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] (-$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]]) - $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]]) + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]))) + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`e[
+                  2]] (($CellContext`MH^2 - $CellContext`S34) ($CellContext`T + \
+$CellContext`T14 - $CellContext`T24 - $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] + 
+                 2 (2 (-$CellContext`MH^2 + $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - 
+                   2 ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] - $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]) + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] (
+                    2 ($CellContext`T14 + $CellContext`T24) \
+$CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - 
+                    2 $CellContext`T14 $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    3]] + ($CellContext`T - $CellContext`T14 - \
+$CellContext`T24 - $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    4]]))))) + ($CellContext`MH^2 - $CellContext`S - \
+$CellContext`T - $CellContext`T14)^(-1) ((
+                4 (2 + X`Eps^(-1) + 
+                  X`DiscB[$CellContext`S34, $CellContext`MT, $CellContext`MT] + 
+                  Log[$CellContext`MT^(-2) X`Mu^2]) - 
+                4 ($CellContext`MH^2 - $CellContext`S34)^(-1) (
+                 3 $CellContext`MH^2 + X`Eps^(-1) $CellContext`MH^2 - 
+                 3 $CellContext`S34 - 
+                 X`Eps^(-1) $CellContext`S34 + $CellContext`MH^2 
+                  X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] - $CellContext`S34 
+                 X`DiscB[$CellContext`S34, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MT^2 
+                  Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 + $CellContext`MH^2 
+                  Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`S34 
+                 Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`MT^2 
+                 Log[Rational[1, 2] $CellContext`MT^(-2) (
+                    2 $CellContext`MT^2 - $CellContext`S34 + \
+($CellContext`S34 ((-4) $CellContext`MT^2 + $CellContext`S34))^
+                    Rational[1, 2])]^2)) (4 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[5]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[5]]) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`ec[5]] + 2 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[5]] $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`ec[5]] (2 $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]]) + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[
+                   5]] ((-$CellContext`MH^2 + 
+                    2 $CellContext`S + $CellContext`T24 + $CellContext`U) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] - $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] ((-4) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) - $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] + 4 $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]])) + 4 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[4]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[5]]) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] + 2 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`e[2]] (2 $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]]) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] - 4 $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]])) - 
+              8 (Rational[
+                 1, 2] ($CellContext`MH^2 - $CellContext`S34)^(-2) \
+(-$CellContext`MH^2 + $CellContext`S34 - $CellContext`MH^2 
+                 X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MH^2 
+                  X`DiscB[$CellContext`S34, $CellContext`MT, $CellContext`MT] - \
+$CellContext`MT^2 
+                 Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 + $CellContext`MT^2 
+                  Log[Rational[1, 2] $CellContext`MT^(-2) (
+                    2 $CellContext`MT^2 - $CellContext`S34 + \
+($CellContext`S34 ((-4) $CellContext`MT^2 + $CellContext`S34))^
+                    Rational[1, 2])]^2) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]] (
+                 2 (-$CellContext`MH^2 + $CellContext`S34 + 
+                   2 $CellContext`T24) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] - $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[
+                   5]] (((-2) $CellContext`MH^2 + 2 $CellContext`S34 + 
+                    4 $CellContext`T24) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    1]] + (-$CellContext`MH^2 + $CellContext`S34 + 
+                    4 $CellContext`T14) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] + ($CellContext`MH^2 + 
+                    2 $CellContext`S - $CellContext`S34 - 2 $CellContext`T + 
+                    2 $CellContext`T14) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) + 
+                 2 (-$CellContext`MH^2 + $CellContext`S34 + 
+                   2 $CellContext`T24) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[2]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + 8 (-$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] - $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]))) + 
+               Rational[
+                 1, 2] ($CellContext`MH^2 - $CellContext`S34)^(-1) (-
+                  X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] + 
+                 X`DiscB[$CellContext`S34, $CellContext`MT, $CellContext`MT]) \
+$CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]] (
+                 2 ($CellContext`MH^2 - $CellContext`S34 - 
+                   2 $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[
+                    5]] (((-2) $CellContext`MH^2 + 2 $CellContext`S34 + 
+                    4 $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - ($CellContext`MH^2 - 
+                    2 $CellContext`S + $CellContext`S34 - 2 $CellContext`T + 
+                    2 $CellContext`T14) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    3]] + ((-3) $CellContext`MH^2 + $CellContext`S34 + 
+                    4 $CellContext`T) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) + 
+                 2 ($CellContext`MH^2 - $CellContext`S34 - 
+                   2 $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[2]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + 8 (-$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] - $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    4]])))) - ($CellContext`MH^2 - $CellContext`S34)^(-1) (
+               Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                   2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^Rational[1, 2])]^2 - 
+               Log[Rational[1, 2] $CellContext`MT^(-2) (
+                  2 $CellContext`MT^2 - $CellContext`S34 + ($CellContext`S34 \
+((-4) $CellContext`MT^2 + $CellContext`S34))^
+                   Rational[1, 2])]^2) ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[
+                  5]] (($CellContext`MH^2 - $CellContext`S34) \
+($CellContext`MH^2 - 
+                   2 $CellContext`S - $CellContext`T24 - $CellContext`U) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] - 2 ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    3]] ((-2) ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + 
+                    2 $CellContext`T14 $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    4]] ((-2) ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[
+                    1]] + ($CellContext`MH^2 + $CellContext`S - \
+$CellContext`S34 - $CellContext`T + $CellContext`T14) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) + 2 $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    1]] ((-$CellContext`MH^2 + $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`T24 $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]))) + 4 ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[
+                    5]] (-($CellContext`MH^2 - $CellContext`S34) \
+($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]]) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[
+                    5]] ((-$CellContext`MH^2 + $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`T24 $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[
+                    3]])) - ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[4]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[5]]) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[
+                    2]] ((-$CellContext`MH^2 + $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`T24 $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    1]] + ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]]) + 2 $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] (-$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] - $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])))) - 
+              4 ($CellContext`MH^2 - $CellContext`S34)^(-1) (
+               X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - 
+               X`DiscB[$CellContext`S34, $CellContext`MT, $CellContext`MT]) \
+(-$CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[
+                  5]] (-($CellContext`MH^2 - $CellContext`S34) \
+($CellContext`MH^2 - 
+                   2 $CellContext`S - $CellContext`T24 - $CellContext`U) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    4]] ((-4) ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + (5 $CellContext`MH^2 + 
+                    2 $CellContext`S - 3 $CellContext`S34 - 6 $CellContext`T + 
+                    2 $CellContext`T14) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    3]] ((-4) ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + ($CellContext`MH^2 - 
+                    2 $CellContext`S + $CellContext`S34 - 2 $CellContext`T + 
+                    6 $CellContext`T14) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) + 2 $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    1]] ((-2) ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[
+                    2]] + ($CellContext`MH^2 - $CellContext`S34 + 
+                    2 $CellContext`T24 - 2 $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]])) + 2 ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[
+                    5]] ((-2) ($CellContext`MH^2 - $CellContext`S34) \
+($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]]) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[
+                    5]] ((-2) ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[
+                    2]] + ($CellContext`MH^2 - $CellContext`S34 + 
+                    2 $CellContext`T24 - 2 $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]])) - 
+                 2 ($CellContext`MH^2 - $CellContext`S34) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[4]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[5]]) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[
+                    2]] ((-2) ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[
+                    2]] + ($CellContext`MH^2 - $CellContext`S34 + 
+                    2 $CellContext`T24 - 2 $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + 
+                 2 ($CellContext`MH^2 - $CellContext`S34) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]]) + 8 $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] (-$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] - $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])))))) + $CellContext`U^(-1) (
+            4 (2 + X`Eps^(-1) + 
+              X`DiscB[$CellContext`U, $CellContext`MT, $CellContext`MT] + 
+              Log[$CellContext`MT^(-2) X`Mu^2]) ($CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[5]] $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[4]] - 2 $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[4]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[5]] + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`e[2]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`ec[
+                 5]]) - ($CellContext`MH^2 - $CellContext`U)^(-1) (
+             Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                 2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^Rational[1, 2])]^2 - 
+             Log[Rational[1, 2] $CellContext`MT^(-2) (
+                2 $CellContext`MT^2 - $CellContext`U + ($CellContext`U ((-4) \
+$CellContext`MT^2 + $CellContext`U))^
+                 Rational[
+                  1, 2])]^2) (((-$CellContext`MH^2 + $CellContext`U) \
+$CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`e[2]] + 2 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[2]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[3]]) $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`ec[5]] + $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[
+                5]] ((-$CellContext`MH^2 + $CellContext`U) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] + 2 $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[3]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[2]]) - 2 $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[
+               4]] ((-$CellContext`MH^2 + $CellContext`U) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[5]] + 2 $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[3]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[2]])) - 
+            16 (Rational[1, 4] ($CellContext`MH^2 - $CellContext`U)^(-1) (
+               3 $CellContext`MH^2 + X`Eps^(-1) $CellContext`MH^2 - 
+               3 $CellContext`U - 
+               X`Eps^(-1) $CellContext`U + $CellContext`MH^2 
+                X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - \
+$CellContext`U 
+               X`DiscB[$CellContext`U, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MT^2 
+                Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 + $CellContext`MH^2 
+                Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`U 
+               Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`MT^2 
+               Log[Rational[1, 2] $CellContext`MT^(-2) (
+                   2 $CellContext`MT^2 - $CellContext`U + ($CellContext`U \
+((-4) $CellContext`MT^2 + $CellContext`U))^
+                    Rational[1, 2])]^2) ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[5]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] - 2 $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[4]] $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[5]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`e[2]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`ec[5]]) + 
+             Rational[
+               1, 2] ($CellContext`MH^2 - $CellContext`U)^(-2) \
+(-$CellContext`MH^2 + $CellContext`U - $CellContext`MH^2 
+               X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MH^2 
+                X`DiscB[$CellContext`U, $CellContext`MT, $CellContext`MT] - \
+$CellContext`MT^2 
+               Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                   2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 + $CellContext`MT^2 
+                Log[Rational[1, 2] $CellContext`MT^(-2) (
+                    2 $CellContext`MT^2 - $CellContext`U + ($CellContext`U \
+((-4) $CellContext`MT^2 + $CellContext`U))^
+                    Rational[1, 2])]^2) $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[3]] ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[2]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`ec[5]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[5]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[2]] - 2 $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[4]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[2]]) + 
+             Rational[
+               1, 2] ($CellContext`MH^2 - $CellContext`U)^(-1) (-
+                X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + 
+               X`DiscB[$CellContext`U, $CellContext`MT, $CellContext`MT]) \
+$CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[3]] ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[3]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`ec[5]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[5]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]] - 2 $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[4]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[3]])) - 
+            4 ($CellContext`MH^2 - $CellContext`U)^(-1) (
+             X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - 
+             X`DiscB[$CellContext`U, $CellContext`MT, $CellContext`MT]) \
+(((-$CellContext`MH^2 + $CellContext`U) $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`e[2]] + 2 ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[2]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]]) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[3]]) $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`ec[5]] + $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[
+                5]] ((-$CellContext`MH^2 + $CellContext`U) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] + 2 $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[3]] ($CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[2]] + $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]])) - 2 $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[
+               4]] ((-$CellContext`MH^2 + $CellContext`U) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[5]] + 2 $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[3]] ($CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[2]] + $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[
+                  3]]))) - ($CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T14 - $CellContext`T24)^(-1) (
+             4 (2 + X`Eps^(-1) + 
+               X`DiscB[$CellContext`U, $CellContext`MT, $CellContext`MT] + 
+               Log[$CellContext`MT^(-2) X`Mu^2]) (($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] + 4 $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]]) + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] ((-4) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] + 3 $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] + 4 $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]])) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`ec[5]] - 4 ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[2]] - $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[3]]) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[5]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[5]] + 2 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[5]] (2 $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[3]]) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[5]] + 4 ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[2]] - $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[3]]) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[4]] - 2 $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[4]] (2 $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[1]] - $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[3]]) $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[4]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`e[
+                  2]] ((-$CellContext`MH^2 + $CellContext`S + $CellContext`T + 
+                   2 $CellContext`T14) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] + 4 (-$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]))) - 
+             4 ($CellContext`MH^2 - $CellContext`U)^(-1) (3 $CellContext`MH^2 + 
+              X`Eps^(-1) $CellContext`MH^2 - 3 $CellContext`U - 
+              X`Eps^(-1) $CellContext`U + $CellContext`MH^2 
+               
+               X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - \
+$CellContext`U 
+              X`DiscB[$CellContext`U, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MT^2 
+               Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                   2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 + $CellContext`MH^2 
+               Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`U 
+              Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`MT^2 
+              Log[Rational[1, 2] $CellContext`MT^(-2) (
+                  2 $CellContext`MT^2 - $CellContext`U + ($CellContext`U \
+((-4) $CellContext`MT^2 + $CellContext`U))^
+                   Rational[1, 2])]^2) (($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] + 4 $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]]) + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[5]] ((-4) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] + 3 $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] + 4 $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]])) $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`ec[5]] - 4 ($CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[2]] - $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[3]]) $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[5]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[5]] + 2 $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[5]] (2 $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[1]] - $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[3]]) $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[5]] + 4 ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[2]] - $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[3]]) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[4]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[4]] - 2 $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[4]] (2 $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[1]] - $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[3]]) $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[4]] + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`e[
+                 2]] ((-$CellContext`MH^2 + $CellContext`S + $CellContext`T + 
+                  2 $CellContext`T14) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`ec[5]] + 4 (-$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]))) - 
+             4 ($CellContext`MH^2 - $CellContext`U)^(-2) (-$CellContext`MH^2 + \
+$CellContext`U - $CellContext`MH^2 
+              X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MH^2 
+               X`DiscB[$CellContext`U, $CellContext`MT, $CellContext`MT] - \
+$CellContext`MT^2 
+              Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                  2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 + $CellContext`MT^2 
+               Log[Rational[1, 2] $CellContext`MT^(-2) (
+                   2 $CellContext`MT^2 - $CellContext`U + ($CellContext`U \
+((-4) $CellContext`MT^2 + $CellContext`U))^
+                    Rational[1, 2])]^2) $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`k[
+               3]] (-((-$CellContext`MH^2 + 2 $CellContext`S34 - 
+                  2 $CellContext`T14 - 
+                  2 $CellContext`T24 + $CellContext`U) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[2]] + (-$CellContext`MH^2 + 
+                  4 $CellContext`T24 + $CellContext`U) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] + 
+                2 ($CellContext`MH^2 - 
+                  2 $CellContext`S - $CellContext`U) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]]) $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`ec[5]] + 
+              2 (-$CellContext`MH^2 + 
+                2 $CellContext`S + $CellContext`U) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[5]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[5]] + 
+              2 ($CellContext`MH^2 - 
+                2 $CellContext`S - $CellContext`U) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[4]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[4]] + 8 ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]) + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[2]] (-$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]))) - 
+             4 ($CellContext`MH^2 - $CellContext`U)^(-1) (-
+               X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + 
+              X`DiscB[$CellContext`U, $CellContext`MT, $CellContext`MT]) \
+$CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`k[
+               3]] (-(((-3) $CellContext`MH^2 + 
+                  4 $CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[2]] + ($CellContext`MH^2 - 
+                  2 $CellContext`S34 - 2 $CellContext`T14 + 
+                  2 $CellContext`T24 + $CellContext`U) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] + 
+                2 (-$CellContext`MH^2 + 
+                  2 $CellContext`T + $CellContext`U) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]]) $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`ec[5]] + 
+              2 ($CellContext`MH^2 - 
+                2 $CellContext`T - $CellContext`U) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[5]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[5]] + 
+              2 (-$CellContext`MH^2 + 
+                2 $CellContext`T + $CellContext`U) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[4]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[4]] + 8 ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]) + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[2]] (-$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    4]]))) - ($CellContext`MH^2 - $CellContext`U)^(-1) (
+              Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                  2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^Rational[1, 2])]^2 - 
+              Log[Rational[1, 2] $CellContext`MT^(-2) (
+                 2 $CellContext`MT^2 - $CellContext`U + ($CellContext`U ((-4) \
+$CellContext`MT^2 + $CellContext`U))^Rational[1, 2])]^2) ((-2) (
+                2 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[
+                   4]] (($CellContext`MH^2 - $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - $CellContext`S $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]]) + 2 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] ($CellContext`T24 $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    3]] + ($CellContext`MH^2 - $CellContext`U) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) - $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[
+                  2]] (($CellContext`MH^2 - $CellContext`S34 + \
+$CellContext`T14 + $CellContext`T24 - $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] + 
+                 2 ($CellContext`MH^2 - $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]])) $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`ec[5]] + 
+              4 ($CellContext`MH^2 - $CellContext`U) ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[2]] - $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[3]]) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[5]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[5]] + 4 $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[
+                 5]] ((-$CellContext`MH^2 + $CellContext`U) \
+$CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[1]] + $CellContext`S $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[3]]) $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[5]] - 
+              4 ($CellContext`MH^2 - $CellContext`U) ($CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[2]] - $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[3]]) $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[4]] $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[4]] - 4 $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[
+                4]] ((-$CellContext`MH^2 + $CellContext`U) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[1]] + $CellContext`S $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[3]]) $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[4]] + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`e[
+                 2]] (($CellContext`MH^2 - $CellContext`S - $CellContext`T - 
+                  2 $CellContext`T14) ($CellContext`MH^2 - $CellContext`U) \
+$CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`ec[5]] + 
+                4 ($CellContext`MH^2 - $CellContext`U) ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])) + 8 $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[3]] ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]) + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[2]] (-$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]))) - 
+             4 ($CellContext`MH^2 - $CellContext`U)^(-1) (
+              X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - 
+              X`DiscB[$CellContext`U, $CellContext`MT, $CellContext`MT]) (-(
+                2 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]] (
+                  2 ($CellContext`MH^2 - $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] + (-$CellContext`MH^2 - 
+                    2 $CellContext`S + 
+                    2 $CellContext`T + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[
+                   3]] (($CellContext`MH^2 - 2 $CellContext`S34 - 
+                    2 $CellContext`T14 + 
+                    6 $CellContext`T24 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] + 
+                  4 ($CellContext`MH^2 - $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[
+                   2]] (((-5) $CellContext`MH^2 + 6 $CellContext`S34 - 
+                    2 $CellContext`T14 - 2 $CellContext`T24 + 
+                    3 $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] + 
+                  4 (-$CellContext`MH^2 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]])) $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`ec[5]] + 
+              4 ($CellContext`MH^2 - $CellContext`U) ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[2]] - $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[3]]) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[5]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[5]] + 2 $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[
+                 5]] ((-2) ($CellContext`MH^2 - $CellContext`U) \
+$CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[1]] + ($CellContext`MH^2 + 2 $CellContext`S - 
+                  2 $CellContext`T - $CellContext`U) $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[3]]) $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[5]] - 
+              4 ($CellContext`MH^2 - $CellContext`U) ($CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[2]] - $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[3]]) $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[4]] $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[4]] - 2 $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[
+                4]] ((-2) ($CellContext`MH^2 - $CellContext`U) \
+$CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[1]] + ($CellContext`MH^2 + 2 $CellContext`S - 
+                 2 $CellContext`T - $CellContext`U) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[3]]) $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[4]] + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`e[
+                 2]] (($CellContext`MH^2 - $CellContext`S - $CellContext`T - 
+                  2 $CellContext`T14) ($CellContext`MH^2 - $CellContext`U) \
+$CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`ec[5]] + 
+                4 ($CellContext`MH^2 - $CellContext`U) ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])) + 16 $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[3]] ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]) + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[2]] (-$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    4]])))) - ($CellContext`MH^2 - $CellContext`S - \
+$CellContext`T - $CellContext`T14)^(-1) (
+             4 (2 + X`Eps^(-1) + 
+               X`DiscB[$CellContext`U, $CellContext`MT, $CellContext`MT] + 
+               Log[$CellContext`MT^(-2) X`Mu^2]) ((-2) $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[5]] ($CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[3]] + 2 $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`ec[5]] + 4 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[5]] ($CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] - $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[5]]) + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[
+                  5]] ((-$CellContext`MH^2 + $CellContext`S34 + 
+                   2 $CellContext`T14 + $CellContext`T24) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] - 4 $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[5]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] + 4 $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] - $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]])) - 2 $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[4]] ($CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[3]] + 2 $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[4]]) $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[1]] + 4 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`e[2]] ($CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] - $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[5]]) $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[1]] + 4 $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])) - 
+             4 ($CellContext`MH^2 - $CellContext`U)^(-1) (3 $CellContext`MH^2 + 
+              X`Eps^(-1) $CellContext`MH^2 - 3 $CellContext`U - 
+              X`Eps^(-1) $CellContext`U + $CellContext`MH^2 
+               
+               X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - \
+$CellContext`U 
+              X`DiscB[$CellContext`U, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MT^2 
+               Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                   2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 + $CellContext`MH^2 
+               Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`U 
+              Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`MT^2 
+              Log[Rational[1, 2] $CellContext`MT^(-2) (
+                  2 $CellContext`MT^2 - $CellContext`U + ($CellContext`U \
+((-4) $CellContext`MT^2 + $CellContext`U))^
+                   Rational[1, 2])]^2) ((-2) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[5]] ($CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[3]] + 2 $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[4]]) $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`ec[5]] + 4 $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[5]] $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[5]] ($CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[1]] - $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[5]]) + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[
+                 5]] ((-$CellContext`MH^2 + $CellContext`S34 + 
+                  2 $CellContext`T14 + $CellContext`T24) $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`ec[4]] - 4 $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[1]] + 4 $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[1]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[5]] - $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[3]] ($CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[5]])) - 2 $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[4]] ($CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[3]] + 2 $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[4]]) $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[1]] + 4 $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`e[2]] ($CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[1]] - $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[5]]) $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[1]] + 4 $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[4]] ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[5]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[4]])) - 
+             4 ($CellContext`MH^2 - $CellContext`U)^(-1) (-
+               X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + 
+              X`DiscB[$CellContext`U, $CellContext`MT, $CellContext`MT]) \
+$CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`k[3]] (
+              2 ($CellContext`MH^2 - 
+                2 $CellContext`S34 - $CellContext`U) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[5]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`ec[5]] + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[
+                 5]] (((-2) $CellContext`MH^2 + 4 $CellContext`S34 + 
+                  2 $CellContext`U) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] + (3 $CellContext`MH^2 - 
+                  4 $CellContext`T - $CellContext`U) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[2]] - ($CellContext`MH^2 + 2 $CellContext`S - 
+                 2 $CellContext`T - 
+                 2 $CellContext`T14 + $CellContext`U) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]]) + 
+              2 ($CellContext`MH^2 - 
+                2 $CellContext`S34 - $CellContext`U) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[4]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[1]] + 8 ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[5]]) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[5]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]))) - 
+             4 ($CellContext`MH^2 - $CellContext`U)^(-2) (-$CellContext`MH^2 + \
+$CellContext`U - $CellContext`MH^2 
+              X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MH^2 
+               X`DiscB[$CellContext`U, $CellContext`MT, $CellContext`MT] - \
+$CellContext`MT^2 
+              Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                  2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 + $CellContext`MT^2 
+               Log[Rational[1, 2] $CellContext`MT^(-2) (
+                   2 $CellContext`MT^2 - $CellContext`U + ($CellContext`U \
+((-4) $CellContext`MT^2 + $CellContext`U))^
+                    Rational[1, 2])]^2) $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`k[3]] (
+              2 (-$CellContext`MH^2 + 
+                2 $CellContext`T24 + $CellContext`U) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[5]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`ec[5]] - $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[
+                5]] (((-2) $CellContext`MH^2 + 4 $CellContext`T24 + 
+                 2 $CellContext`U) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[1]] + (-$CellContext`MH^2 - 2 $CellContext`S + 
+                 2 $CellContext`T - 
+                 2 $CellContext`T14 + $CellContext`U) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[2]] + (-$CellContext`MH^2 + 
+                 4 $CellContext`S + $CellContext`U) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]]) + 
+              2 (-$CellContext`MH^2 + 
+                2 $CellContext`T24 + $CellContext`U) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[4]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[1]] + 8 ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[5]]) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[5]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]))) - 
+             4 ($CellContext`MH^2 - $CellContext`U)^(-1) (
+              X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - 
+              X`DiscB[$CellContext`U, $CellContext`MT, $CellContext`MT]) \
+($CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[
+                 5]] (($CellContext`MH^2 - $CellContext`S34 - 
+                  2 $CellContext`T14 - $CellContext`T24) ($CellContext`MH^2 - \
+$CellContext`U) $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`ec[4]] - 
+                4 ($CellContext`MH^2 - $CellContext`U) ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]])) - $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[3]] (
+                 2 ($CellContext`MH^2 - 2 $CellContext`S34 + 
+                   2 $CellContext`T24 - $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + ((-5) $CellContext`MH^2 - 
+                   2 $CellContext`S + 6 $CellContext`T - 2 $CellContext`T14 + 
+                   3 $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + ($CellContext`MH^2 + 
+                   6 $CellContext`S - 2 $CellContext`T - 
+                   2 $CellContext`T14 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]])) - 2 ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[
+                  5]] (((-$CellContext`MH^2 + 2 $CellContext`S34 - 
+                    2 $CellContext`T24 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] + 
+                   2 (-$CellContext`MH^2 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] + 
+                 2 ($CellContext`MH^2 - $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]])) + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[
+                  4]] ((-$CellContext`MH^2 + 2 $CellContext`S34 - 
+                   2 $CellContext`T24 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] + 
+                 2 (-$CellContext`MH^2 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[1]] + 
+               2 ($CellContext`MH^2 - $CellContext`U) $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`e[2]] ($CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] - $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[5]]) $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[1]] + 
+               2 ($CellContext`MH^2 - $CellContext`U) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]) - 8 $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[3]] ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[5]]) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[5]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    4]])))) - ($CellContext`MH^2 - $CellContext`U)^(-1) (
+              Log[
+                Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                  2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^Rational[1, 2])]^2 - 
+              Log[Rational[1, 2] $CellContext`MT^(-2) (
+                 2 $CellContext`MT^2 - $CellContext`U + ($CellContext`U ((-4) \
+$CellContext`MT^2 + $CellContext`U))^Rational[1, 2])]^2) ($CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[
+                 5]] (($CellContext`MH^2 - $CellContext`S34 - 
+                  2 $CellContext`T14 - $CellContext`T24) ($CellContext`MH^2 - \
+$CellContext`U) $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`ec[4]] + 
+                2 ((-2) ($CellContext`MH^2 - $CellContext`U) \
+($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]])) + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    3]] ((-2) $CellContext`T24 $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[
+                    1]] + ($CellContext`MH^2 + $CellContext`S - \
+$CellContext`T + $CellContext`T14 - $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] - 2 $CellContext`S $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]))) + 4 ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[5]] (($CellContext`T24 $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    3]] + ($CellContext`MH^2 - $CellContext`U) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[
+                    5]] - ($CellContext`MH^2 - $CellContext`U) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]])) + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[4]] ($CellContext`T24 $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    3]] + ($CellContext`MH^2 - $CellContext`U) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[
+                   1]] - ($CellContext`MH^2 - $CellContext`U) \
+$CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`e[2]] ($CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] - $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[5]]) $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[
+                  1]] - ($CellContext`MH^2 - $CellContext`U) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]) + 2 $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]]) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    4]])))))) + $CellContext`T24^(-1) ($CellContext`T^(-1) \
+(-($CellContext`MH^2 - $CellContext`T)^(-1) (
+                Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^Rational[1, 2])]^2 - 
+                Log[Rational[1, 2] $CellContext`MT^(-2) (
+                   2 $CellContext`MT^2 - $CellContext`T + ($CellContext`T \
+((-4) $CellContext`MT^2 + $CellContext`T))^
+                    Rational[1, 2])]^2) ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[
+                   5]] (-($CellContext`MH^2 - $CellContext`T) ($CellContext`S - \
+$CellContext`S34 - $CellContext`T14 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] + 
+                  4 ($CellContext`MH^2 - $CellContext`T) ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]])) - 
+                2 ((-2) ((-$CellContext`MH^2 + $CellContext`T) \
+$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[
+                    2]] + ($CellContext`S + $CellContext`T14) \
+$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[
+                    3]] + ($CellContext`MH^2 - $CellContext`T) \
+$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] - 
+                 2 ((-$CellContext`MH^2 + $CellContext`T) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[
+                    2]] + ($CellContext`S + $CellContext`T14) \
+$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[
+                    3]] + ($CellContext`MH^2 - $CellContext`T) \
+$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`ec[5]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[2]] + 
+                 2 ($CellContext`MH^2 - $CellContext`T) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) + 
+                 2 ($CellContext`MH^2 - $CellContext`T) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[2]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] (
+                   2 ($CellContext`MH^2 - $CellContext`T) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] - 
+                   2 ($CellContext`MH^2 - $CellContext`T) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[
+                    3]] (($CellContext`S + $CellContext`S34 + \
+$CellContext`T14 - $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + 
+                    2 ($CellContext`S + $CellContext`T14) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] - 2 $CellContext`S $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]])) + 4 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])) + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])))) + (
+                4 (2 + X`Eps^(-1) + 
+                  X`DiscB[$CellContext`T, $CellContext`MT, $CellContext`MT] + 
+                  Log[$CellContext`MT^(-2) X`Mu^2]) - 
+                4 ($CellContext`MH^2 - $CellContext`T)^(-1) (
+                 3 $CellContext`MH^2 + X`Eps^(-1) $CellContext`MH^2 - 
+                 3 $CellContext`T - 
+                 X`Eps^(-1) $CellContext`T + $CellContext`MH^2 
+                  X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] - $CellContext`T 
+                 X`DiscB[$CellContext`T, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MT^2 
+                  Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 + $CellContext`MH^2 
+                  Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`T 
+                 Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`MT^2 
+                 Log[Rational[1, 2] $CellContext`MT^(-2) (
+                    2 $CellContext`MT^2 - $CellContext`T + ($CellContext`T \
+((-4) $CellContext`MT^2 + $CellContext`T))^Rational[1, 2])]^2)) (
+                2 ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] + 2 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]]) $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[4]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`ec[5]] + 2 ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] + 2 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]]) $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`ec[5]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[2]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[
+                   5]] (($CellContext`S - $CellContext`S34 - $CellContext`T14 + \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] - 4 ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]])) + 4 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[4]] $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[4]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]]) + 4 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`e[2]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[2]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]]) - $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] ((-4) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + 4 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]] - $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]))) + 
+              8 (Rational[
+                  1, 2] ($CellContext`MH^2 - $CellContext`T)^(-1) (-
+                   X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] + 
+                  X`DiscB[$CellContext`T, $CellContext`MT, $CellContext`MT]) \
+$CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] (
+                  2 ((-3) $CellContext`MH^2 + 
+                    2 $CellContext`S34 + $CellContext`T + 
+                    2 $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] + 
+                  2 ((-3) $CellContext`MH^2 + 
+                    2 $CellContext`S34 + $CellContext`T + 
+                    2 $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + 8 ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])) + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])) - $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[
+                    4]] (((-3) $CellContext`MH^2 + 
+                    4 $CellContext`S34 + $CellContext`T) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + 
+                   2 ($CellContext`S - $CellContext`S34 - $CellContext`T14 + \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    3]] + ((-3) $CellContext`MH^2 + $CellContext`T + 
+                    4 $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])) + 
+                Rational[
+                  1, 2] ($CellContext`MH^2 - $CellContext`T)^(-2) \
+(-$CellContext`MH^2 + $CellContext`T - $CellContext`MH^2 
+                  X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] + $CellContext`MH^2 
+                   X`DiscB[$CellContext`T, $CellContext`MT, $CellContext`MT] - \
+$CellContext`MT^2 
+                  Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 + $CellContext`MT^2 
+                   Log[Rational[1, 2] $CellContext`MT^(-2) (
+                    2 $CellContext`MT^2 - $CellContext`T + ($CellContext`T \
+((-4) $CellContext`MT^2 + $CellContext`T))^
+                    Rational[1, 2])]^2) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[
+                   3]] ((-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`S + $CellContext`T + 
+                    2 $CellContext`T14) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] - 
+                  2 (-$CellContext`MH^2 + 2 $CellContext`S + $CellContext`T + 
+                   2 $CellContext`T14) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + 8 (-$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] (-$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]])) - $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[
+                    4]] (((-3) $CellContext`MH^2 + 
+                    4 $CellContext`S34 + $CellContext`T + 
+                    2 $CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + 
+                   2 ($CellContext`S - $CellContext`S34 - $CellContext`T14 + \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    3]] + ((-3) $CellContext`MH^2 + $CellContext`T + 
+                    2 $CellContext`T24 + 4 $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]))) - 
+              4 ($CellContext`MH^2 - $CellContext`T)^(-1) (
+               X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - 
+               X`DiscB[$CellContext`T, $CellContext`MT, $CellContext`MT]) \
+((-2) (((-5) $CellContext`MH^2 + 4 $CellContext`S34 + $CellContext`T + 
+                   2 $CellContext`T24 + 4 $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] + 
+                 2 ($CellContext`MH^2 - $CellContext`T) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]]) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[4]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`ec[5]] - 
+               2 (((-5) $CellContext`MH^2 + 
+                  4 $CellContext`S34 + $CellContext`T + 2 $CellContext`T24 + 
+                  4 $CellContext`U) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] + 
+                2 ($CellContext`MH^2 - $CellContext`T) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[5]]) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[5]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[2]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[
+                  5]] (-($CellContext`MH^2 - $CellContext`T) ($CellContext`S - \
+$CellContext`S34 - $CellContext`T14 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] + 
+                 4 ($CellContext`MH^2 - $CellContext`T) ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]])) - 
+               4 ($CellContext`MH^2 - $CellContext`T) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[4]] $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[4]] ($CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[1]] - $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[3]]) - 
+               4 ($CellContext`MH^2 - $CellContext`T) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`e[2]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[2]] ($CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[1]] - $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[3]]) - 16 $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[3]] ($CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[5]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[2]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]] + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[4]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])) + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[2]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[4]])) - $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[4]] ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[
+                   3]] ((7 $CellContext`MH^2 - 8 $CellContext`S34 - 
+                    3 $CellContext`T - 2 $CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + 
+                  4 ((-2) $CellContext`MH^2 + 
+                    2 $CellContext`S34 + $CellContext`T + 
+                    2 $CellContext`T14 + $CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + (7 $CellContext`MH^2 - 
+                    3 $CellContext`T - 2 $CellContext`T24 - 
+                    8 $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]) + 
+                4 ($CellContext`MH^2 - $CellContext`T) ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    4]])))) + ($CellContext`MH^2 - $CellContext`S - \
+$CellContext`T - $CellContext`T14)^(-1) ((-2) (((-$CellContext`S34 \
+$CellContext`T + $CellContext`S34 $CellContext`T14 + $CellContext`MH^2 \
+($CellContext`S34 - $CellContext`U) + $CellContext`T $CellContext`U + \
+$CellContext`T14 $CellContext`U - $CellContext`S ($CellContext`S34 + \
+$CellContext`U)) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] - 
+                  4 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] - 
+                  4 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + 4 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[
+                    5]] ((($CellContext`S34 + $CellContext`U) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    1]] + (-$CellContext`MH^2 + $CellContext`T) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]]) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    4]] (($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[
+                    1]] + (-$CellContext`MH^2 + $CellContext`T) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]])) - 
+                  4 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - 
+                  4 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[2]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + 8 ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) + ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) + 4 $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] ($CellContext`U $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`S34 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] ($CellContext`U $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`S34 $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]))) 
+                 X`ScalarC0[$CellContext`MH^2, $CellContext`MH^2 - 
+                   4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24, $CellContext`MT, $CellContext`MT, $CellContext`MT] + (
+                   16 $CellContext`MT^4 + $CellContext`T^2 + \
+$CellContext`T14^2 - 4 $CellContext`MH^2 $CellContext`T24 + 
+                   2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+                   2 $CellContext`T ($CellContext`T14 + $CellContext`T24) + 
+                   8 $CellContext`MT^2 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24))^(-1) ((-$CellContext`S34^2 - 
+                    4 $CellContext`S34 $CellContext`T + 
+                    2 $CellContext`S34 $CellContext`T14 + 
+                    4 $CellContext`MH^2 ($CellContext`S34 - $CellContext`U) + 
+                    4 $CellContext`T $CellContext`U + 
+                    2 $CellContext`T14 $CellContext`U + $CellContext`U^2 - 
+                    2 $CellContext`S ($CellContext`S34 + $CellContext`U)) \
+$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] - 
+                  8 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] - 
+                  8 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + 4 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[
+                    5]] ((2 ($CellContext`S34 + $CellContext`U) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    1]] + ((-4) $CellContext`MH^2 + $CellContext`S34 + 
+                    4 $CellContext`T + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]]) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] (
+                    2 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[
+                    1]] + ((-4) $CellContext`MH^2 + $CellContext`S34 + 
+                    4 $CellContext`T + $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]])) - 
+                  8 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - 
+                  8 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[2]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + 32 ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) + ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) + 4 $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] (
+                    2 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    1]] + ((-3) $CellContext`S34 + $CellContext`U) \
+$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] (
+                    2 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    2]] + ((-3) $CellContext`S34 + $CellContext`U) \
+$CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]))) ((2 $CellContext`MH^2 - 
+                    4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14 - \
+$CellContext`T24) 
+                   X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] - 2 ($CellContext`MH^2 - 
+                   4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14) 
+                  X`DiscB[$CellContext`MH^2 - 
+                    4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`MT, $CellContext`MT] - (
+                   4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 - \
+$CellContext`T24) 
+                  X`DiscB[$CellContext`T24, $CellContext`MT, $CellContext`MT] + \
+($CellContext`MH^2 - 
+                    4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14) (
+                    4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24) X`ScalarC0[$CellContext`MH^2, $CellContext`MH^2 - 
+                    4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24, $CellContext`MT, $CellContext`MT, $CellContext`MT])) + (
+                8 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[5]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]]) + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[
+                   5]] ((2 $CellContext`S - $CellContext`S34 - 
+                    2 $CellContext`T14 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] - 4 (($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]]) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]]))) + 8 ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[2]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]]) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] - 4 $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]))) (
+                2 (2 + X`Eps^(-1) + 
+                  X`DiscB[$CellContext`T24, $CellContext`MT, $CellContext`MT] + 
+                  Log[$CellContext`MT^(-2) X`Mu^2]) - 
+                2 (16 $CellContext`MT^4 + $CellContext`T^2 + \
+$CellContext`T14^2 - 4 $CellContext`MH^2 $CellContext`T24 + 
+                  2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+                  2 $CellContext`T ($CellContext`T14 + $CellContext`T24) + 
+                  8 $CellContext`MT^2 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24))^(-1) (
+                 3 (16 $CellContext`MT^4 + $CellContext`T^2 + \
+$CellContext`T14^2 - 4 $CellContext`MH^2 $CellContext`T24 + 
+                   2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+                   2 $CellContext`T ($CellContext`T14 + $CellContext`T24) + 
+                   8 $CellContext`MT^2 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24)) + 
+                 X`Eps^(-1) (
+                   16 $CellContext`MT^4 + $CellContext`T^2 + \
+$CellContext`T14^2 - 4 $CellContext`MH^2 $CellContext`T24 + 
+                   2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+                   2 $CellContext`T ($CellContext`T14 + $CellContext`T24) + 
+                   8 $CellContext`MT^2 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24)) + $CellContext`MH^2 (
+                   4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 - \
+$CellContext`T24) 
+                  X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] - ($CellContext`MH^2 - 
+                  4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14) (
+                  4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24) 
+                 X`DiscB[$CellContext`MH^2 - 
+                   4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`MT, $CellContext`MT] - (2 $CellContext`MH^2 - 
+                  4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14 - \
+$CellContext`T24) $CellContext`T24 
+                 X`DiscB[$CellContext`T24, $CellContext`MT, $CellContext`MT] + \
+(16 $CellContext`MT^4 + $CellContext`T^2 + $CellContext`T14^2 - 
+                   4 $CellContext`MH^2 $CellContext`T24 + 
+                   2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+                   2 $CellContext`T ($CellContext`T14 + $CellContext`T24) + 
+                   8 $CellContext`MT^2 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24)) Log[$CellContext`MT^(-2) X`Mu^2] + 
+                 2 (16 $CellContext`MT^6 + $CellContext`MH^2 \
+($CellContext`MH^2 - $CellContext`T - $CellContext`T14) $CellContext`T24 + 
+                   8 $CellContext`MT^4 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24) + $CellContext`MT^2 ($CellContext`T^2 + $CellContext`T14^2 - 
+                    8 $CellContext`MH^2 $CellContext`T24 + 
+                    2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+                    2 $CellContext`T ($CellContext`T14 + $CellContext`T24))) 
+                  X`ScalarC0[$CellContext`MH^2, $CellContext`MH^2 - 
+                    4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24, $CellContext`MT, $CellContext`MT, $CellContext`MT])) - 
+              4 ((16 $CellContext`MT^4 + $CellContext`T^2 + \
+$CellContext`T14^2 - 4 $CellContext`MH^2 $CellContext`T24 + 
+                  2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+                  2 $CellContext`T ($CellContext`T14 + $CellContext`T24) + 
+                  8 $CellContext`MT^2 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24))^(-1) ((-$CellContext`S34^2 - 
+                   2 $CellContext`S34 $CellContext`T - $CellContext`S34 \
+$CellContext`T24 + 2 $CellContext`T14 $CellContext`T24 - 
+                   2 $CellContext`S (
+                    2 $CellContext`S34 + $CellContext`T24) + \
+$CellContext`MH^2 (2 $CellContext`S + 3 $CellContext`S34 - 2 $CellContext`T14 - 
+                    3 $CellContext`U) + 2 $CellContext`T $CellContext`U + 
+                   4 $CellContext`T14 $CellContext`U + $CellContext`T24 \
+$CellContext`U + $CellContext`U^2) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] - 
+                 8 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T24 + \
+$CellContext`U) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[5]] $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[4]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`ec[5]] - 
+                 8 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T24 + \
+$CellContext`U) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[5]] $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`ec[5]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[2]] - 
+                 4 ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T24 - \
+$CellContext`U) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[5]] ((2 $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]]) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] (2 $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]])) - 
+                 8 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T24 + \
+$CellContext`U) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[4]] $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[4]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] - 
+                 8 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T24 + \
+$CellContext`U) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`e[2]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[2]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] + 4 $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[
+                    4]] ((-$CellContext`MH^2 + 
+                    2 $CellContext`S34 + $CellContext`T24) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    1]] + (-$CellContext`S34 + $CellContext`U) \
+$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`MH^2 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`T24 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + 2 $CellContext`U $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`MH^2 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + 
+                   2 $CellContext`S34 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`T24 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] - $CellContext`S34 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`U $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] - $CellContext`MH^2 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]] + $CellContext`T24 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]] + 2 $CellContext`U $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])) ((-2) $CellContext`MH^2 
+                  X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] + (2 $CellContext`MH^2 - 
+                   4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14 - \
+$CellContext`T24) 
+                  X`DiscB[$CellContext`MH^2 - 
+                    4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`MT, $CellContext`MT] + 
+                 4 $CellContext`MT^2 
+                  
+                  X`DiscB[$CellContext`T24, $CellContext`MT, $CellContext`MT] + \
+$CellContext`T 
+                  X`DiscB[$CellContext`T24, $CellContext`MT, $CellContext`MT] + \
+$CellContext`T14 
+                  X`DiscB[$CellContext`T24, $CellContext`MT, $CellContext`MT] + \
+$CellContext`T24 X`DiscB[$CellContext`T24, $CellContext`MT, $CellContext`MT] - 
+                 4 $CellContext`MH^2 $CellContext`MT^2 
+                 X`ScalarC0[$CellContext`MH^2, $CellContext`MH^2 - 
+                   4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24, $CellContext`MT, $CellContext`MT, $CellContext`MT] - \
+$CellContext`MH^2 $CellContext`T 
+                 X`ScalarC0[$CellContext`MH^2, $CellContext`MH^2 - 
+                   4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24, $CellContext`MT, $CellContext`MT, $CellContext`MT] - \
+$CellContext`MH^2 $CellContext`T14 
+                 X`ScalarC0[$CellContext`MH^2, $CellContext`MH^2 - 
+                   4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24, $CellContext`MT, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MH^2 $CellContext`T24 
+                  X`ScalarC0[$CellContext`MH^2, $CellContext`MH^2 - 
+                    4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24, $CellContext`MT, $CellContext`MT, $CellContext`MT]) + 
+               Rational[
+                 1, 2] (16 $CellContext`MT^4 + $CellContext`T^2 + \
+$CellContext`T14^2 - 4 $CellContext`MH^2 $CellContext`T24 + 
+                  2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+                  2 $CellContext`T ($CellContext`T14 + $CellContext`T24) + 
+                  8 $CellContext`MT^2 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24))^(-2) (-($CellContext`S34 - $CellContext`U) ((-2) \
+$CellContext`MH^2 + $CellContext`S34 + 
+                   2 $CellContext`T + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] - 
+                 4 (2 $CellContext`MH^2 - $CellContext`S34 - 
+                  2 $CellContext`T - $CellContext`U) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[5]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) - 
+                 4 ($CellContext`S34 - $CellContext`U) $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`ec[4]] ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) + 16 ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]])) ((-2) ($CellContext`MH^2 - 
+                   4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14) \
+((-16) $CellContext`MT^4 - $CellContext`T^2 - $CellContext`T14^2 + 
+                   4 $CellContext`MH^2 $CellContext`T24 - 
+                   2 $CellContext`T14 $CellContext`T24 - $CellContext`T24^2 - 
+                   2 $CellContext`T ($CellContext`T14 + $CellContext`T24) - 
+                   8 $CellContext`MT^2 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24)) + ((
+                    4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^2 (12 $CellContext`MT^2 + 3 $CellContext`T + 
+                    3 $CellContext`T14 + $CellContext`T24) + 
+                   2 $CellContext`MH^4 (12 $CellContext`MT^2 + 
+                    3 $CellContext`T + 3 $CellContext`T14 + 
+                    5 $CellContext`T24) - 
+                   2 $CellContext`MH^2 (80 $CellContext`MT^4 + 
+                    5 $CellContext`T^2 + 10 $CellContext`T $CellContext`T14 + 
+                    5 $CellContext`T14^2 + 7 $CellContext`T $CellContext`T24 + 
+                    7 $CellContext`T14 $CellContext`T24 + 
+                    4 $CellContext`T24^2 + 
+                    4 $CellContext`MT^2 (10 $CellContext`T + 
+                    10 $CellContext`T14 + 7 $CellContext`T24))) 
+                  X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] - 
+                 6 (-$CellContext`MH^2 + 
+                   4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14)^2 \
+(4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + $CellContext`T24) 
+                 X`DiscB[$CellContext`MH^2 - 
+                   4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`MT, $CellContext`MT] - ((-192) $CellContext`MT^6 - 
+                  3 $CellContext`T^3 - 9 $CellContext`T^2 $CellContext`T14 - 
+                  9 $CellContext`T $CellContext`T14^2 - 3 $CellContext`T14^3 - 
+                  16 $CellContext`MT^4 (9 $CellContext`T + 
+                   9 $CellContext`T14 - $CellContext`T24) + 
+                  4 $CellContext`MH^4 $CellContext`T24 + $CellContext`T^2 \
+$CellContext`T24 + 
+                  2 $CellContext`T $CellContext`T14 $CellContext`T24 + \
+$CellContext`T14^2 $CellContext`T24 + 5 $CellContext`T $CellContext`T24^2 + 
+                  5 $CellContext`T14 $CellContext`T24^2 + $CellContext`T24^3 - 
+                  4 $CellContext`MT^2 (9 $CellContext`T^2 + 
+                   18 $CellContext`T $CellContext`T14 + 9 $CellContext`T14^2 - 
+                   2 $CellContext`T $CellContext`T24 - 
+                   2 $CellContext`T14 $CellContext`T24 - 
+                   5 $CellContext`T24^2) + 
+                  2 $CellContext`MH^2 (
+                    16 $CellContext`MT^4 + $CellContext`T^2 + 
+                    2 $CellContext`T $CellContext`T14 + $CellContext`T14^2 + \
+$CellContext`MT^2 (8 $CellContext`T + 8 $CellContext`T14 - 
+                    4 $CellContext`T24) - $CellContext`T $CellContext`T24 - \
+$CellContext`T14 $CellContext`T24 - 4 $CellContext`T24^2)) 
+                 X`DiscB[$CellContext`T24, $CellContext`MT, $CellContext`MT] + 
+                 2 ($CellContext`MH^2 - 
+                   4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14) (
+                   2 $CellContext`MH^4 $CellContext`T24 - (
+                    2 $CellContext`MT^2 + $CellContext`T + $CellContext`T14) (
+                    4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^2 + $CellContext`MH^2 (
+                    16 $CellContext`MT^4 + $CellContext`T^2 + 
+                    2 $CellContext`T $CellContext`T14 + $CellContext`T14^2 + 
+                    8 $CellContext`MT^2 ($CellContext`T + $CellContext`T14 - \
+$CellContext`T24) + $CellContext`T24^2)) 
+                  X`ScalarC0[$CellContext`MH^2, $CellContext`MH^2 - 
+                    4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24, $CellContext`MT, $CellContext`MT, $CellContext`MT]) + 
+               Rational[
+                 1, 2] (16 $CellContext`MT^4 + $CellContext`T^2 + \
+$CellContext`T14^2 - 4 $CellContext`MH^2 $CellContext`T24 + 
+                  2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+                  2 $CellContext`T ($CellContext`T14 + $CellContext`T24) + 
+                  8 $CellContext`MT^2 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24))^(-2) (-($CellContext`S34 - $CellContext`U) ((-2) \
+$CellContext`MH^2 + $CellContext`S34 + 
+                   2 $CellContext`T + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] - 
+                 4 (2 $CellContext`MH^2 - $CellContext`S34 - 
+                  2 $CellContext`T - $CellContext`U) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[5]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) + 16 ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) + ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) - 
+                 4 ($CellContext`S34 - $CellContext`U) $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`ec[4]] ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]])) ((2 $CellContext`MH^2 - 
+                   4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14 - \
+$CellContext`T24) ((-16) $CellContext`MT^4 - $CellContext`T^2 - \
+$CellContext`T14^2 + 4 $CellContext`MH^2 $CellContext`T24 - 
+                   2 $CellContext`T14 $CellContext`T24 - $CellContext`T24^2 - 
+                   2 $CellContext`T ($CellContext`T14 + $CellContext`T24) - 
+                   8 $CellContext`MT^2 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24)) - $CellContext`MH^2 ((-80) $CellContext`MT^4 - 
+                  5 $CellContext`T^2 - 10 $CellContext`T $CellContext`T14 - 
+                  5 $CellContext`T14^2 - 4 $CellContext`T $CellContext`T24 - 
+                  4 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+                  2 $CellContext`MH^2 (12 $CellContext`MT^2 + 
+                    3 $CellContext`T + 3 $CellContext`T14 + $CellContext`T24) - 
+                  8 $CellContext`MT^2 (5 $CellContext`T + 5 $CellContext`T14 + 
+                   2 $CellContext`T24)) 
+                 X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + \
+($CellContext`MH^2 - 
+                   4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14) \
+($CellContext`MH^2 (24 $CellContext`MT^2 + 6 $CellContext`T + 
+                    6 $CellContext`T14 - 2 $CellContext`T24) - (
+                    4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^2) 
+                  X`DiscB[$CellContext`MH^2 - 
+                    4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`MT, $CellContext`MT] + (
+                   2 $CellContext`MH^2 (
+                    4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 - \
+$CellContext`T24)^2 + 
+                   4 $CellContext`MH^4 $CellContext`T24 - (
+                    4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14) (
+                    4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^2) 
+                  X`DiscB[$CellContext`T24, $CellContext`MT, $CellContext`MT] - 
+                 2 (2 $CellContext`MH^6 $CellContext`T24 - $CellContext`MT^2 (
+                    4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^3 + $CellContext`MH^4 (
+                    16 $CellContext`MT^4 + $CellContext`T^2 + 
+                    2 $CellContext`T $CellContext`T14 + $CellContext`T14^2 + 
+                    4 $CellContext`MT^2 (2 $CellContext`T + 
+                    2 $CellContext`T14 - 5 $CellContext`T24) - 
+                    3 $CellContext`T $CellContext`T24 - 
+                    3 $CellContext`T14 $CellContext`T24 - 
+                    2 $CellContext`T24^2) - $CellContext`MH^2 (
+                   32 $CellContext`MT^6 + 
+                   16 $CellContext`MT^4 (2 $CellContext`T + 
+                    2 $CellContext`T14 - 3 $CellContext`T24) + 
+                   2 $CellContext`MT^2 (5 $CellContext`T^2 + 
+                    10 $CellContext`T $CellContext`T14 + 5 $CellContext`T14^2 - 
+                    8 $CellContext`T $CellContext`T24 - 
+                    8 $CellContext`T14 $CellContext`T24 - 
+                    7 $CellContext`T24^2) + ($CellContext`T + \
+$CellContext`T14) ($CellContext`T^2 + 
+                    2 $CellContext`T $CellContext`T14 + $CellContext`T14^2 - \
+$CellContext`T $CellContext`T24 - $CellContext`T14 $CellContext`T24 - 
+                    2 $CellContext`T24^2))) 
+                 X`ScalarC0[$CellContext`MH^2, $CellContext`MH^2 - 
+                   4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24, $CellContext`MT, $CellContext`MT, $CellContext`MT])))), 
+          0, ($CellContext`MH^2 - $CellContext`S - $CellContext`T - \
+$CellContext`T14)^(-1) $CellContext`T24^(-1) (
+           8 $CellContext`MT^2 (
+              16 $CellContext`MT^4 + $CellContext`T^2 + $CellContext`T14^2 - 
+              4 $CellContext`MH^2 $CellContext`T24 + 
+              2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+              2 $CellContext`T ($CellContext`T14 + $CellContext`T24) + 
+              8 $CellContext`MT^2 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24))^(-1) 
+            X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`MH^2 - 
+               4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24]^(-1) (8 $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[5]] ($CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[4]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`ec[5]] + $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[5]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[2]]) + $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[
+                5]] ((2 $CellContext`S - $CellContext`S34 - 
+                 2 $CellContext`T14 + $CellContext`U) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] - 4 (($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]]) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[2]] + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[4]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]]))) + 8 ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[4]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[4]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`e[2]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[2]]) $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[1]] - 4 $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[4]] ($CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[2]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[1]] + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[4]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[1]] + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[5]] ($CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[2]] + $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[4]]))) ($CellContext`MH^2 (
+               16 $CellContext`MT^4 + $CellContext`T^2 + $CellContext`T14^2 + 
+               2 $CellContext`T ($CellContext`T14 - 2 $CellContext`T24) + 
+               8 $CellContext`MT^2 ($CellContext`T + $CellContext`T14 - 
+                 2 $CellContext`T24) + 8 $CellContext`MH^2 $CellContext`T24 - 
+               4 $CellContext`T14 $CellContext`T24 - 5 $CellContext`T24^2) 
+              X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - (
+              8 $CellContext`MH^4 $CellContext`T24 + $CellContext`T24 (
+                 4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^2 + $CellContext`MH^2 (
+                16 $CellContext`MT^4 + $CellContext`T^2 + $CellContext`T14^2 + 
+                2 $CellContext`T ($CellContext`T14 - 5 $CellContext`T24) + 
+                8 $CellContext`MT^2 ($CellContext`T + $CellContext`T14 - 
+                  5 $CellContext`T24) - 10 $CellContext`T14 $CellContext`T24 - 
+                3 $CellContext`T24^2)) 
+             X`DiscB[$CellContext`MH^2 - 
+               4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`MT, $CellContext`MT] + $CellContext`T24 ((-2) $CellContext`MH^2 (
+                 12 $CellContext`MT^2 + 3 $CellContext`T + 
+                 3 $CellContext`T14 - $CellContext`T24) + (
+                 4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^2) 
+              X`DiscB[$CellContext`T24, $CellContext`MT, $CellContext`MT] + (
+               4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24) 
+              X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`MH^2 - 
+                4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24] + 
+             2 (64 $CellContext`MT^8 + 
+               48 $CellContext`MT^6 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24) + 
+               12 $CellContext`MT^4 ($CellContext`T^2 + $CellContext`T14^2 + 
+                 
+                 2 $CellContext`T14 $CellContext`T24 + $CellContext`T24 ((-4) \
+$CellContext`MH^2 + $CellContext`T24) + 
+                 2 $CellContext`T ($CellContext`T14 + $CellContext`T24)) - \
+$CellContext`MH^2 $CellContext`T24 (2 $CellContext`T^2 + 
+                2 $CellContext`T14^2 + $CellContext`T14 $CellContext`T24 - \
+$CellContext`T24^2 + $CellContext`MH^2 ((-3) $CellContext`T - 
+                  3 $CellContext`T14 + $CellContext`T24) + $CellContext`T (
+                  4 $CellContext`T14 + $CellContext`T24)) + $CellContext`MT^2 \
+($CellContext`T^3 + $CellContext`T14^3 + 
+                 3 $CellContext`T14^2 $CellContext`T24 + 
+                 3 $CellContext`T^2 ($CellContext`T14 + $CellContext`T24) + \
+$CellContext`T14 $CellContext`T24 ((-20) $CellContext`MH^2 + 
+                   3 $CellContext`T24) + $CellContext`T24 (
+                   12 $CellContext`MH^4 - 
+                   8 $CellContext`MH^2 $CellContext`T24 + $CellContext`T24^2) + \
+$CellContext`T (3 $CellContext`T14^2 + 
+                   6 $CellContext`T14 $CellContext`T24 + $CellContext`T24 \
+((-20) $CellContext`MH^2 + 3 $CellContext`T24)))) 
+              X`ScalarC0[$CellContext`MH^2, $CellContext`MH^2 - 
+                4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24, $CellContext`MT, $CellContext`MT, $CellContext`MT]) - 
+           2 ((-4) $CellContext`MT^2 (-$CellContext`MH^2 + 
+               8 $CellContext`MT^2 + $CellContext`T + $CellContext`T14)^(-1) (
+               16 $CellContext`MT^6 + $CellContext`MH^2 ($CellContext`MH^2 - \
+$CellContext`T - $CellContext`T14) $CellContext`T24 + 
+               8 $CellContext`MT^4 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24) + $CellContext`MT^2 ($CellContext`T^2 + $CellContext`T14^2 - 
+                 8 $CellContext`MH^2 $CellContext`T24 + 
+                 2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+                 2 $CellContext`T ($CellContext`T14 + $CellContext`T24)))^(-1)
+                X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`MH^2 - 
+                4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24]^(-1) ((-$CellContext`S34 $CellContext`T + $CellContext`S34 \
+$CellContext`T14 + $CellContext`MH^2 ($CellContext`S34 - $CellContext`U) + \
+$CellContext`T $CellContext`U + $CellContext`T14 $CellContext`U - \
+$CellContext`S ($CellContext`S34 + $CellContext`U)) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[5]] $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[4]] - 
+              4 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[5]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[4]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`ec[5]] - 
+              4 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[5]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[5]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[2]] + 4 $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[
+                 5]] ((($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    1]] + (-$CellContext`MH^2 + $CellContext`T) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]]) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[2]] + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[
+                   4]] (($CellContext`S34 + $CellContext`U) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[
+                    1]] + (-$CellContext`MH^2 + $CellContext`T) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]])) - 
+              4 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[4]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[4]] $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[1]] - 
+              4 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`e[2]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[2]] $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[1]] + 8 ($CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[2]] + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[4]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]]) ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]]) + ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]]) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]]) + 4 $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[4]] ($CellContext`U $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[2]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] + $CellContext`S34 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[5]] ($CellContext`U $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`S34 $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    4]]))) (-$CellContext`MH^2 ($CellContext`MH^2 - 
+                8 $CellContext`MT^2 - $CellContext`T - $CellContext`T14) (
+                2 $CellContext`MH^2 - 
+                4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14 - \
+$CellContext`T24) $CellContext`T24 
+               X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - \
+(64 $CellContext`MT^8 - 
+               2 $CellContext`MH^2 (-$CellContext`MH^2 + $CellContext`T + \
+$CellContext`T14)^2 $CellContext`T24 + 
+               48 $CellContext`MT^6 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24) + 
+               4 $CellContext`MT^4 (3 $CellContext`T^2 + 3 $CellContext`T14^2 + 
+                 6 $CellContext`T14 $CellContext`T24 + 
+                 6 $CellContext`T ($CellContext`T14 + $CellContext`T24) + \
+$CellContext`T24 ((-20) $CellContext`MH^2 + 
+                   3 $CellContext`T24)) + $CellContext`MT^2 ($CellContext`T^3 + \
+$CellContext`T14^3 + 3 $CellContext`T14^2 $CellContext`T24 + 
+                 3 $CellContext`T^2 ($CellContext`T14 + $CellContext`T24) + \
+$CellContext`T14 $CellContext`T24 ((-28) $CellContext`MH^2 + 
+                   3 $CellContext`T24) + $CellContext`T24 (
+                   24 $CellContext`MH^4 - 
+                   4 $CellContext`MH^2 $CellContext`T24 + $CellContext`T24^2) + \
+$CellContext`T (3 $CellContext`T14^2 + 
+                   6 $CellContext`T14 $CellContext`T24 + $CellContext`T24 \
+((-28) $CellContext`MH^2 + 3 $CellContext`T24)))) 
+              X`DiscB[$CellContext`MH^2 - 
+                4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`MT, $CellContext`MT] + $CellContext`MH^2 ($CellContext`MH^2 - 
+                8 $CellContext`MT^2 - $CellContext`T - $CellContext`T14) (
+                
+                4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 - \
+$CellContext`T24) $CellContext`T24 
+               X`DiscB[$CellContext`T24, $CellContext`MT, $CellContext`MT] - \
+($CellContext`MH^2 - 
+               8 $CellContext`MT^2 - $CellContext`T - $CellContext`T14) (
+               4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24) (
+               16 $CellContext`MT^6 + $CellContext`MH^2 ($CellContext`MH^2 - \
+$CellContext`T - $CellContext`T14) $CellContext`T24 + 
+               8 $CellContext`MT^4 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24) + $CellContext`MT^2 ($CellContext`T^2 + $CellContext`T14^2 - 
+                 8 $CellContext`MH^2 $CellContext`T24 + 
+                 2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+                 2 $CellContext`T ($CellContext`T14 + $CellContext`T24))) 
+              X`ScalarC0[$CellContext`MH^2, $CellContext`MH^2 - 
+                4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24, $CellContext`MT, $CellContext`MT, $CellContext`MT]) + 
+            4 $CellContext`MT^2 (
+               16 $CellContext`MT^4 + $CellContext`T^2 + $CellContext`T14^2 - 
+               4 $CellContext`MH^2 $CellContext`T24 + 
+               2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+               2 $CellContext`T ($CellContext`T14 + $CellContext`T24) + 
+               8 $CellContext`MT^2 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24))^(-1) (
+               16 $CellContext`MT^6 + $CellContext`MH^2 ($CellContext`MH^2 - \
+$CellContext`T - $CellContext`T14) $CellContext`T24 + 
+               8 $CellContext`MT^4 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24) + $CellContext`MT^2 ($CellContext`T^2 + $CellContext`T14^2 - 
+                 8 $CellContext`MH^2 $CellContext`T24 + 
+                 2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+                 2 $CellContext`T ($CellContext`T14 + $CellContext`T24)))^(-1)
+                X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`MH^2 - 
+                4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24]^(-1) ((-$CellContext`S34^2 - 
+                4 $CellContext`S34 $CellContext`T + 
+                2 $CellContext`S34 $CellContext`T14 + 
+                4 $CellContext`MH^2 ($CellContext`S34 - $CellContext`U) + 
+                4 $CellContext`T $CellContext`U + 
+                2 $CellContext`T14 $CellContext`U + $CellContext`U^2 - 
+                2 $CellContext`S ($CellContext`S34 + $CellContext`U)) \
+$CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[5]] $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[4]] - 
+              8 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[5]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[4]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`ec[5]] - 
+              8 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[5]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[5]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[2]] + 4 $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[
+                 5]] ((2 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    1]] + ((-4) $CellContext`MH^2 + $CellContext`S34 + 
+                    4 $CellContext`T + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]]) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[2]] + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[4]] (
+                  2 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[
+                    1]] + ((-4) $CellContext`MH^2 + $CellContext`S34 + 
+                    4 $CellContext`T + $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]])) - 
+              8 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[4]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[4]] $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[1]] - 
+              8 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`e[2]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[2]] $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[1]] + 32 ($CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[2]] + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[4]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]]) ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]]) + ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]]) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]]) + 4 $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[4]] (
+                2 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[2]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[
+                   1]] + ((-3) $CellContext`S34 + $CellContext`U) \
+$CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[5]] (
+                  2 ($CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    2]] + ((-3) $CellContext`S34 + $CellContext`U) \
+$CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]))) (-(-$CellContext`MT^2 (
+                   4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^4 + 
+                2 $CellContext`MH^6 $CellContext`T24 (12 $CellContext`MT^2 + 
+                  3 $CellContext`T + 3 $CellContext`T14 + $CellContext`T24) + 
+                2 $CellContext`MH^2 (
+                   4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^2 (
+                  8 $CellContext`MT^4 + ($CellContext`T + $CellContext`T14) \
+$CellContext`T24 + 2 $CellContext`MT^2 ($CellContext`T + $CellContext`T14 + 
+                    3 $CellContext`T24)) - 
+                2 $CellContext`MH^4 $CellContext`T24 (96 $CellContext`MT^4 + 
+                 4 $CellContext`T^2 + 8 $CellContext`T $CellContext`T14 + 
+                 4 $CellContext`T14^2 + 3 $CellContext`T $CellContext`T24 + 
+                 3 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+                 4 $CellContext`MT^2 (10 $CellContext`T + 10 $CellContext`T14 + 
+                   3 $CellContext`T24))) 
+               X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + \
+(2 $CellContext`MH^6 (12 $CellContext`MT^2 + 3 $CellContext`T + 
+                  3 $CellContext`T14 - $CellContext`T24) $CellContext`T24 - \
+$CellContext`MT^2 (12 $CellContext`MT^2 + 3 $CellContext`T + 
+                 3 $CellContext`T14 - $CellContext`T24) (
+                  
+                  4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^3 - 
+                2 $CellContext`MH^4 $CellContext`T24 (112 $CellContext`MT^4 + 
+                 5 $CellContext`T^2 + 10 $CellContext`T $CellContext`T14 + 
+                 5 $CellContext`T14^2 + 
+                 48 $CellContext`MT^2 ($CellContext`T + $CellContext`T14) - \
+$CellContext`T24^2) + 
+                2 $CellContext`MH^2 (128 $CellContext`MT^8 + 
+                  96 $CellContext`MT^6 ($CellContext`T + $CellContext`T14 + 
+                    3 $CellContext`T24) + 
+                  8 $CellContext`MT^4 (3 $CellContext`T^2 + 
+                    6 $CellContext`T $CellContext`T14 + 3 $CellContext`T14^2 + 
+                    22 $CellContext`T $CellContext`T24 + 
+                    22 $CellContext`T14 $CellContext`T24 + 
+                    5 $CellContext`T24^2) + ($CellContext`T + \
+$CellContext`T14) $CellContext`T24 (2 $CellContext`T^2 + 
+                    2 $CellContext`T14^2 + $CellContext`T14 $CellContext`T24 - \
+$CellContext`T24^2 + $CellContext`T (4 $CellContext`T14 + $CellContext`T24)) + 
+                  2 $CellContext`MT^2 ($CellContext`T^3 + $CellContext`T14^3 + 
+                    17 $CellContext`T14^2 $CellContext`T24 + 
+                    7 $CellContext`T14 $CellContext`T24^2 - 
+                    3 $CellContext`T24^3 + $CellContext`T^2 (
+                    3 $CellContext`T14 + 
+                    17 $CellContext`T24) + $CellContext`T (
+                    3 $CellContext`T14^2 + 
+                    34 $CellContext`T14 $CellContext`T24 + 
+                    7 $CellContext`T24^2)))) 
+               X`DiscB[$CellContext`MH^2 - 
+                 4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`MT, $CellContext`MT] + (256 $CellContext`MT^10 + 
+                256 $CellContext`MT^8 ($CellContext`T + $CellContext`T14) + 
+                2 $CellContext`MH^2 ($CellContext`MH^2 - $CellContext`T - \
+$CellContext`T14) $CellContext`T24 ($CellContext`T^2 + $CellContext`T14^2 + \
+$CellContext`T (
+                    2 $CellContext`T14 - $CellContext`T24) - $CellContext`T14 \
+$CellContext`T24 + 2 ($CellContext`MH^2 - $CellContext`T24) $CellContext`T24) + 
+                32 $CellContext`MT^6 (3 $CellContext`T^2 + 
+                  6 $CellContext`T $CellContext`T14 + 
+                  3 $CellContext`T14^2 - $CellContext`T24 (
+                   4 $CellContext`MH^2 + 3 $CellContext`T24)) + 
+                16 $CellContext`MT^4 ($CellContext`T^3 + 
+                  3 $CellContext`T^2 $CellContext`T14 + $CellContext`T14^3 - 
+                  3 $CellContext`T14 $CellContext`T24 (
+                   2 $CellContext`MH^2 + $CellContext`T24) + 
+                  2 $CellContext`T24 ($CellContext`MH^4 + 
+                    3 $CellContext`MH^2 $CellContext`T24 - \
+$CellContext`T24^2) + 
+                  3 $CellContext`T ($CellContext`T14^2 - $CellContext`T24 (
+                    2 $CellContext`MH^2 + $CellContext`T24))) + \
+$CellContext`MT^2 ($CellContext`T^4 + 
+                  4 $CellContext`T^3 $CellContext`T14 + $CellContext`T14^4 - 
+                  6 $CellContext`T14^2 $CellContext`T24 (
+                   4 $CellContext`MH^2 + $CellContext`T24) + \
+$CellContext`T24^2 ((-40) $CellContext`MH^4 + 
+                    32 $CellContext`MH^2 $CellContext`T24 - 
+                    3 $CellContext`T24^2) - 
+                  8 $CellContext`T14 $CellContext`T24 ((-2) $CellContext`MH^4 - 
+                   4 $CellContext`MH^2 $CellContext`T24 + $CellContext`T24^2) + 
+                  6 $CellContext`T^2 ($CellContext`T14^2 - $CellContext`T24 (
+                    4 $CellContext`MH^2 + $CellContext`T24)) + 
+                  4 $CellContext`T ($CellContext`T14^3 - 
+                    3 $CellContext`T14 $CellContext`T24 (
+                    4 $CellContext`MH^2 + $CellContext`T24) - 
+                    2 $CellContext`T24 ((-2) $CellContext`MH^4 - 
+                    4 $CellContext`MH^2 $CellContext`T24 + \
+$CellContext`T24^2)))) 
+               X`DiscB[$CellContext`T24, $CellContext`MT, $CellContext`MT] - 
+              2 (16 $CellContext`MT^6 + $CellContext`MH^2 ($CellContext`MH^2 - \
+$CellContext`T - $CellContext`T14) $CellContext`T24 + 
+               8 $CellContext`MT^4 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24) + $CellContext`MT^2 ($CellContext`T^2 + $CellContext`T14^2 - 
+                 8 $CellContext`MH^2 $CellContext`T24 + 
+                 2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+                 2 $CellContext`T ($CellContext`T14 + $CellContext`T24))) 
+              X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`MH^2 - 
+                4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24] + ((-4) $CellContext`MH^4 $CellContext`T24 + (
+                  4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 - \
+$CellContext`T24) (
+                   4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^2 - 
+                2 $CellContext`MH^2 (
+                 16 $CellContext`MT^4 + $CellContext`T^2 + $CellContext`T14^2 + 
+                 2 $CellContext`T ($CellContext`T14 - $CellContext`T24) + 
+                 8 $CellContext`MT^2 ($CellContext`T + $CellContext`T14 - \
+$CellContext`T24) - 
+                 2 $CellContext`T14 $CellContext`T24 - $CellContext`T24^2)) (
+                16 $CellContext`MT^6 + $CellContext`MH^2 ($CellContext`MH^2 - \
+$CellContext`T - $CellContext`T14) $CellContext`T24 + 
+                8 $CellContext`MT^4 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24) + $CellContext`MT^2 ($CellContext`T^2 + $CellContext`T14^2 - 
+                  8 $CellContext`MH^2 $CellContext`T24 + 
+                  2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+                  2 $CellContext`T ($CellContext`T14 + $CellContext`T24))) 
+               X`ScalarC0[$CellContext`MH^2, $CellContext`MH^2 - 
+                 4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24, $CellContext`MT, $CellContext`MT, $CellContext`MT])) - 
+           4 ((-2) $CellContext`MT^2 (
+               16 $CellContext`MT^4 + $CellContext`T^2 + $CellContext`T14^2 - 
+               4 $CellContext`MH^2 $CellContext`T24 + 
+               2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+               2 $CellContext`T ($CellContext`T14 + $CellContext`T24) + 
+               8 $CellContext`MT^2 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24))^(-2) (
+               16 $CellContext`MT^6 + $CellContext`MH^2 ($CellContext`MH^2 - \
+$CellContext`T - $CellContext`T14) $CellContext`T24 + 
+               8 $CellContext`MT^4 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24) + $CellContext`MT^2 ($CellContext`T^2 + $CellContext`T14^2 - 
+                 8 $CellContext`MH^2 $CellContext`T24 + 
+                 2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+                 2 $CellContext`T ($CellContext`T14 + $CellContext`T24)))^(-1)
+                X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`MH^2 - 
+                4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24]^(-1) (-($CellContext`S34 - $CellContext`U) ((-2) \
+$CellContext`MH^2 + $CellContext`S34 + 
+                2 $CellContext`T + $CellContext`U) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[5]] $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[4]] - 
+              4 (2 $CellContext`MH^2 - $CellContext`S34 - 
+               2 $CellContext`T - $CellContext`U) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[5]] ($CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[3]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[2]] + $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[4]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]]) + 16 ($CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[2]] + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[4]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]]) ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]]) + ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]]) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]]) - 
+              4 ($CellContext`S34 - $CellContext`U) $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[4]] ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[3]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[1]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[3]])) ((-2) $CellContext`MH^2 (
+                16 $CellContext`MH^8 $CellContext`T24^2 - 
+                5 $CellContext`MT^2 (
+                 4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 - \
+$CellContext`T24) (
+                  4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^4 + $CellContext`MH^6 $CellContext`T24 (
+                  176 $CellContext`MT^4 + 11 $CellContext`T^2 + 
+                  22 $CellContext`T $CellContext`T14 + 11 $CellContext`T14^2 + 
+                  8 $CellContext`MT^2 (11 $CellContext`T + 
+                    11 $CellContext`T14 - 23 $CellContext`T24) - 
+                  30 $CellContext`T $CellContext`T24 - 
+                  30 $CellContext`T14 $CellContext`T24 - 
+                  13 $CellContext`T24^2) + $CellContext`MH^4 $CellContext`T24 \
+((-1408) $CellContext`MT^6 - 17 $CellContext`T^3 - 17 $CellContext`T14^3 - 
+                  16 $CellContext`MT^4 (61 $CellContext`T + 
+                   61 $CellContext`T14 - 30 $CellContext`T24) + 
+                  8 $CellContext`T14^2 $CellContext`T24 + 
+                  19 $CellContext`T14 $CellContext`T24^2 + 
+                  6 $CellContext`T24^3 + $CellContext`T^2 ((-51) \
+$CellContext`T14 + 8 $CellContext`T24) - 
+                  8 $CellContext`MT^2 (28 $CellContext`T^2 + 
+                   56 $CellContext`T $CellContext`T14 + 28 $CellContext`T14^2 - 
+                   19 $CellContext`T $CellContext`T24 - 
+                   19 $CellContext`T14 $CellContext`T24 - 
+                   17 $CellContext`T24^2) + $CellContext`T ((-51) \
+$CellContext`T14^2 + 16 $CellContext`T14 $CellContext`T24 + 
+                    19 $CellContext`T24^2)) + $CellContext`MH^2 (
+                   4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^2 (144 $CellContext`MT^6 + 
+                  6 ($CellContext`T + $CellContext`T14) ($CellContext`T + \
+$CellContext`T14 - $CellContext`T24) $CellContext`T24 + 
+                  24 $CellContext`MT^4 (3 $CellContext`T + 3 $CellContext`T14 + 
+                    5 $CellContext`T24) + $CellContext`MT^2 (
+                    9 $CellContext`T^2 + 9 $CellContext`T14^2 + 
+                    54 $CellContext`T14 $CellContext`T24 - 
+                    55 $CellContext`T24^2 + 
+                    18 $CellContext`T ($CellContext`T14 + 
+                    3 $CellContext`T24)))) 
+               X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + \
+(32 $CellContext`MH^10 $CellContext`T24^2 + $CellContext`MT^2 (
+                  4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 - \
+$CellContext`T24) (
+                   4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^5 + 
+                2 $CellContext`MH^8 $CellContext`T24 (176 $CellContext`MT^4 + 
+                  11 $CellContext`T^2 + 22 $CellContext`T $CellContext`T14 + 
+                  11 $CellContext`T14^2 + 
+                  8 $CellContext`MT^2 (11 $CellContext`T + 
+                    11 $CellContext`T14 - 32 $CellContext`T24) - 
+                  48 $CellContext`T $CellContext`T24 - 
+                  48 $CellContext`T14 $CellContext`T24 - 
+                  11 $CellContext`T24^2) - 
+                8 $CellContext`MH^6 $CellContext`T24 (400 $CellContext`MT^6 + 
+                 8 $CellContext`MT^4 (35 $CellContext`T + 35 $CellContext`T14 - 
+                   38 $CellContext`T24) + $CellContext`MT^2 (
+                   65 $CellContext`T^2 + 65 $CellContext`T14^2 + 
+                   2 $CellContext`T (65 $CellContext`T14 - 
+                    58 $CellContext`T24) - 
+                   116 $CellContext`T14 $CellContext`T24 - 
+                   45 $CellContext`T24^2) + ($CellContext`T + \
+$CellContext`T14) (5 $CellContext`T^2 + 5 $CellContext`T14^2 + 
+                   10 $CellContext`T ($CellContext`T14 - $CellContext`T24) - 
+                   10 $CellContext`T14 $CellContext`T24 - 
+                   7 $CellContext`T24^2)) - $CellContext`MH^2 (
+                  4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^3 (256 $CellContext`MT^6 + 
+                 8 $CellContext`MT^4 (16 $CellContext`T + 16 $CellContext`T14 - 
+                   11 $CellContext`T24) + ($CellContext`T + $CellContext`T14) \
+($CellContext`T + $CellContext`T14 - $CellContext`T24) $CellContext`T24 + 
+                 2 $CellContext`MT^2 (8 $CellContext`T^2 + 
+                   16 $CellContext`T $CellContext`T14 + 8 $CellContext`T14^2 - 
+                   9 $CellContext`T $CellContext`T24 - 
+                   9 $CellContext`T14 $CellContext`T24 - 
+                   5 $CellContext`T24^2)) + $CellContext`MH^4 (
+                  4608 $CellContext`MT^10 + 
+                  1536 $CellContext`MT^8 (3 $CellContext`T + 
+                    3 $CellContext`T14 + 5 $CellContext`T24) + 
+                  64 $CellContext`MT^6 (27 $CellContext`T^2 + 
+                    54 $CellContext`T $CellContext`T14 + 
+                    27 $CellContext`T14^2 + 
+                    109 $CellContext`T $CellContext`T24 + 
+                    109 $CellContext`T14 $CellContext`T24 - 
+                    58 $CellContext`T24^2) + 
+                  16 $CellContext`MT^4 (18 $CellContext`T^3 + 
+                    18 $CellContext`T14^3 + 
+                    147 $CellContext`T14^2 $CellContext`T24 - 
+                    130 $CellContext`T14 $CellContext`T24^2 - 
+                    93 $CellContext`T24^3 + 
+                    3 $CellContext`T^2 (18 $CellContext`T14 + 
+                    49 $CellContext`T24) + 
+                    2 $CellContext`T (27 $CellContext`T14^2 + 
+                    147 $CellContext`T14 $CellContext`T24 - 
+                    65 $CellContext`T24^2)) + 
+                  2 $CellContext`MT^2 (9 $CellContext`T^4 + 
+                    9 $CellContext`T14^4 + 
+                    174 $CellContext`T14^3 $CellContext`T24 - 
+                    172 $CellContext`T14^2 $CellContext`T24^2 - 
+                    254 $CellContext`T14 $CellContext`T24^3 - 
+                    21 $CellContext`T24^4 + 
+                    6 $CellContext`T^3 (6 $CellContext`T14 + 
+                    29 $CellContext`T24) + 
+                    2 $CellContext`T^2 (27 $CellContext`T14^2 + 
+                    261 $CellContext`T14 $CellContext`T24 - 
+                    86 $CellContext`T24^2) + $CellContext`T (
+                    36 $CellContext`T14^3 + 
+                    522 $CellContext`T14^2 $CellContext`T24 - 
+                    344 $CellContext`T14 $CellContext`T24^2 - 
+                    254 $CellContext`T24^3)) - $CellContext`T24 ((-19) \
+$CellContext`T^4 - 19 $CellContext`T14^4 + 
+                   14 $CellContext`T14^3 $CellContext`T24 + 
+                   34 $CellContext`T14^2 $CellContext`T24^2 + 
+                   2 $CellContext`T14 $CellContext`T24^3 + $CellContext`T24^4 + \
+$CellContext`T^3 ((-76) $CellContext`T14 + 
+                    14 $CellContext`T24) + $CellContext`T^2 ((-114) \
+$CellContext`T14^2 + 42 $CellContext`T14 $CellContext`T24 + 
+                    34 $CellContext`T24^2) + $CellContext`T ((-76) \
+$CellContext`T14^3 + 42 $CellContext`T14^2 $CellContext`T24 + 
+                    68 $CellContext`T14 $CellContext`T24^2 + 
+                    2 $CellContext`T24^3)))) 
+               X`DiscB[$CellContext`MH^2 - 
+                 4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`MT, $CellContext`MT] + (
+                4 $CellContext`MH^8 (36 $CellContext`MT^2 + 9 $CellContext`T + 
+                  9 $CellContext`T14 - $CellContext`T24) $CellContext`T24^2 - \
+$CellContext`MT^2 (
+                 4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 - \
+$CellContext`T24) (
+                  4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^5 + 
+                2 $CellContext`MH^6 $CellContext`T24 (192 $CellContext`MT^6 + 
+                  3 $CellContext`T^3 + 3 $CellContext`T14^3 + 
+                  16 $CellContext`MT^4 (9 $CellContext`T + 9 $CellContext`T14 - 
+                    50 $CellContext`T24) + $CellContext`T^2 (
+                    9 $CellContext`T14 - 32 $CellContext`T24) - 
+                  32 $CellContext`T14^2 $CellContext`T24 - 
+                  9 $CellContext`T14 $CellContext`T24^2 + 
+                  6 $CellContext`T24^3 + $CellContext`T (9 $CellContext`T14^2 - 
+                    64 $CellContext`T14 $CellContext`T24 - 
+                    9 $CellContext`T24^2) + 
+                  4 $CellContext`MT^2 (9 $CellContext`T^2 + 
+                    18 $CellContext`T $CellContext`T14 + 9 $CellContext`T14^2 - 
+                    82 $CellContext`T $CellContext`T24 - 
+                    82 $CellContext`T14 $CellContext`T24 - 
+                    7 $CellContext`T24^2)) + $CellContext`MH^2 (
+                   4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^3 (64 $CellContext`MT^6 + 
+                  8 $CellContext`MT^4 (4 $CellContext`T + 4 $CellContext`T14 - 
+                    11 $CellContext`T24) + ($CellContext`T + \
+$CellContext`T14) ($CellContext`T + $CellContext`T14 - $CellContext`T24) \
+$CellContext`T24 + 2 $CellContext`MT^2 (2 $CellContext`T^2 + 
+                    4 $CellContext`T $CellContext`T14 + 2 $CellContext`T14^2 - 
+                    9 $CellContext`T $CellContext`T24 - 
+                    9 $CellContext`T14 $CellContext`T24 + \
+$CellContext`T24^2)) + $CellContext`MH^4 $CellContext`T24 ((-512) \
+$CellContext`MT^8 - 7 $CellContext`T^4 - 7 $CellContext`T14^4 - 
+                  64 $CellContext`MT^6 (13 $CellContext`T + 
+                   13 $CellContext`T14 - 69 $CellContext`T24) + 
+                  26 $CellContext`T14^3 $CellContext`T24 + 
+                  22 $CellContext`T14^2 $CellContext`T24^2 - 
+                  10 $CellContext`T14 $CellContext`T24^3 + $CellContext`T24^4 + \
+$CellContext`T^3 ((-28) $CellContext`T14 + 26 $CellContext`T24) - 
+                  16 $CellContext`MT^4 (27 $CellContext`T^2 + 
+                   54 $CellContext`T $CellContext`T14 + 27 $CellContext`T14^2 - 
+                   164 $CellContext`T $CellContext`T24 - 
+                   164 $CellContext`T14 $CellContext`T24 - 
+                   49 $CellContext`T24^2) + $CellContext`T^2 ((-42) \
+$CellContext`T14^2 + 78 $CellContext`T14 $CellContext`T24 + 
+                    22 $CellContext`T24^2) + $CellContext`T ((-28) \
+$CellContext`T14^3 + 78 $CellContext`T14^2 $CellContext`T24 + 
+                    44 $CellContext`T14 $CellContext`T24^2 - 
+                    10 $CellContext`T24^3) - 
+                  4 $CellContext`MT^2 (23 $CellContext`T^3 + 
+                   23 $CellContext`T14^3 + $CellContext`T^2 (
+                    69 $CellContext`T14 - 121 $CellContext`T24) - 
+                   121 $CellContext`T14^2 $CellContext`T24 - 
+                   71 $CellContext`T14 $CellContext`T24^2 + 
+                   21 $CellContext`T24^3 + $CellContext`T (
+                    69 $CellContext`T14^2 - 
+                    242 $CellContext`T14 $CellContext`T24 - 
+                    71 $CellContext`T24^2)))) 
+               X`DiscB[$CellContext`T24, $CellContext`MT, $CellContext`MT] - 
+              2 ($CellContext`MH^2 (20 $CellContext`MT^2 + 5 $CellContext`T + 
+                 5 $CellContext`T14 - $CellContext`T24) - (
+                4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^2) (
+               16 $CellContext`MT^6 + $CellContext`MH^2 ($CellContext`MH^2 - \
+$CellContext`T - $CellContext`T14) $CellContext`T24 + 
+               8 $CellContext`MT^4 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24) + $CellContext`MT^2 ($CellContext`T^2 + $CellContext`T14^2 - 
+                 8 $CellContext`MH^2 $CellContext`T24 + 
+                 2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+                 2 $CellContext`T ($CellContext`T14 + $CellContext`T24))) 
+              X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`MH^2 - 
+                4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24] + 
+              2 (16 $CellContext`MT^6 + $CellContext`MH^2 ($CellContext`MH^2 - \
+$CellContext`T - $CellContext`T14) $CellContext`T24 + 
+                8 $CellContext`MT^4 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24) + $CellContext`MT^2 ($CellContext`T^2 + $CellContext`T14^2 - 
+                  8 $CellContext`MH^2 $CellContext`T24 + 
+                  2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+                  2 $CellContext`T ($CellContext`T14 + $CellContext`T24))) \
+((-2) $CellContext`MH^6 (36 $CellContext`MT^2 + 9 $CellContext`T + 
+                  9 $CellContext`T14 - $CellContext`T24) $CellContext`T24 + 
+                2 $CellContext`MT^2 (
+                   4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^4 + 
+                2 $CellContext`MH^2 (
+                   4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^2 (
+                  4 $CellContext`MT^4 + $CellContext`T^2 + $CellContext`T14^2 + \
+$CellContext`MT^2 (5 $CellContext`T + 5 $CellContext`T14 - 
+                    21 $CellContext`T24) + 
+                  2 $CellContext`T ($CellContext`T14 - 2 $CellContext`T24) - 
+                  4 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2) - \
+$CellContext`MH^4 (192 $CellContext`MT^6 + 3 $CellContext`T^3 + 
+                 3 $CellContext`T14^3 + 
+                 16 $CellContext`MT^4 (9 $CellContext`T + 9 $CellContext`T14 - 
+                   29 $CellContext`T24) + $CellContext`T^2 (
+                   9 $CellContext`T14 - 23 $CellContext`T24) - 
+                 23 $CellContext`T14^2 $CellContext`T24 - 
+                 13 $CellContext`T14 $CellContext`T24^2 + $CellContext`T24^3 + 
+                 4 $CellContext`MT^2 (9 $CellContext`T^2 + 
+                   18 $CellContext`T $CellContext`T14 + 9 $CellContext`T14^2 - 
+                   52 $CellContext`T $CellContext`T24 - 
+                   52 $CellContext`T14 $CellContext`T24 - 
+                   15 $CellContext`T24^2) + $CellContext`T (
+                   9 $CellContext`T14^2 - 
+                   46 $CellContext`T14 $CellContext`T24 - 
+                   13 $CellContext`T24^2))) 
+               X`ScalarC0[$CellContext`MH^2, $CellContext`MH^2 - 
+                 4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24, $CellContext`MT, $CellContext`MT, $CellContext`MT]) + 
+            2 $CellContext`MT^2 (
+               16 $CellContext`MT^4 + $CellContext`T^2 + $CellContext`T14^2 - 
+               4 $CellContext`MH^2 $CellContext`T24 + 
+               2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+               2 $CellContext`T ($CellContext`T14 + $CellContext`T24) + 
+               8 $CellContext`MT^2 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24))^(-2) (
+               16 $CellContext`MT^6 + $CellContext`MH^2 ($CellContext`MH^2 - \
+$CellContext`T - $CellContext`T14) $CellContext`T24 + 
+               8 $CellContext`MT^4 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24) + $CellContext`MT^2 ($CellContext`T^2 + $CellContext`T14^2 - 
+                 8 $CellContext`MH^2 $CellContext`T24 + 
+                 2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+                 2 $CellContext`T ($CellContext`T14 + $CellContext`T24)))^(-1)
+                X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`MH^2 - 
+                4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24]^(-1) (-($CellContext`S34 - $CellContext`U) ((-2) \
+$CellContext`MH^2 + $CellContext`S34 + 
+                2 $CellContext`T + $CellContext`U) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[5]] $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[4]] - 
+              4 (2 $CellContext`MH^2 - $CellContext`S34 - 
+               2 $CellContext`T - $CellContext`U) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[5]] ($CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[3]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[2]] + $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[4]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]]) - 
+              4 ($CellContext`S34 - $CellContext`U) $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[4]] ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[3]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[1]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[3]]) + 16 ($CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[2]] + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[4]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]]) ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[5]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]])) (-(
+                32 $CellContext`MH^10 $CellContext`T24^2 + $CellContext`MT^2 (
+                  12 $CellContext`MT^2 + 3 $CellContext`T + 
+                  3 $CellContext`T14 - $CellContext`T24) (
+                   4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^5 + 
+                2 $CellContext`MH^8 $CellContext`T24 (176 $CellContext`MT^4 + 
+                  11 $CellContext`T^2 + 22 $CellContext`T $CellContext`T14 + 
+                  11 $CellContext`T14^2 + 
+                  8 $CellContext`MT^2 (11 $CellContext`T + 
+                    11 $CellContext`T14 - 24 $CellContext`T24) - 
+                  32 $CellContext`T $CellContext`T24 - 
+                  32 $CellContext`T14 $CellContext`T24 - 
+                  11 $CellContext`T24^2) - $CellContext`MH^2 (
+                  4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^3 (
+                 320 $CellContext`MT^6 + ($CellContext`T + $CellContext`T14) (
+                   5 $CellContext`T + 
+                   5 $CellContext`T14 - $CellContext`T24) $CellContext`T24 + 
+                 8 $CellContext`MT^4 (20 $CellContext`T + 20 $CellContext`T14 + 
+                   7 $CellContext`T24) + 
+                 2 $CellContext`MT^2 (10 $CellContext`T^2 + 
+                   20 $CellContext`T $CellContext`T14 + 10 $CellContext`T14^2 + 
+                   17 $CellContext`T $CellContext`T24 + 
+                   17 $CellContext`T14 $CellContext`T24 - 
+                   5 $CellContext`T24^2)) - 
+                8 $CellContext`MH^6 $CellContext`T24 (464 $CellContext`MT^6 + 
+                 8 $CellContext`MT^4 (41 $CellContext`T + 41 $CellContext`T14 - 
+                   18 $CellContext`T24) + 
+                 11 $CellContext`MT^2 (7 $CellContext`T^2 + 
+                   14 $CellContext`T $CellContext`T14 + 7 $CellContext`T14^2 - 
+                   4 $CellContext`T $CellContext`T24 - 
+                   4 $CellContext`T14 $CellContext`T24 - 
+                   3 $CellContext`T24^2) + 
+                 2 ($CellContext`T + $CellContext`T14) (3 $CellContext`T^2 + 
+                   6 $CellContext`T $CellContext`T14 + 
+                   3 $CellContext`T14^2 - $CellContext`T $CellContext`T24 - \
+$CellContext`T14 $CellContext`T24 - 
+                   2 $CellContext`T24^2)) + $CellContext`MH^4 (
+                  4608 $CellContext`MT^10 + 
+                  512 $CellContext`MT^8 (9 $CellContext`T + 
+                    9 $CellContext`T14 + 25 $CellContext`T24) + 
+                  64 $CellContext`MT^6 (27 $CellContext`T^2 + 
+                    54 $CellContext`T $CellContext`T14 + 
+                    27 $CellContext`T14^2 + 
+                    181 $CellContext`T $CellContext`T24 + 
+                    181 $CellContext`T14 $CellContext`T24 + 
+                    10 $CellContext`T24^2) + 
+                  16 $CellContext`MT^4 (18 $CellContext`T^3 + 
+                    18 $CellContext`T14^3 + 
+                    243 $CellContext`T14^2 $CellContext`T24 + 
+                    50 $CellContext`T14 $CellContext`T24^2 - 
+                    41 $CellContext`T24^3 + 
+                    27 $CellContext`T^2 (2 $CellContext`T14 + 
+                    9 $CellContext`T24) + $CellContext`T (
+                    54 $CellContext`T14^2 + 
+                    486 $CellContext`T14 $CellContext`T24 + 
+                    50 $CellContext`T24^2)) + 
+                  2 $CellContext`MT^2 (9 $CellContext`T^4 + 
+                    9 $CellContext`T14^4 + 
+                    286 $CellContext`T14^3 $CellContext`T24 + 
+                    140 $CellContext`T14^2 $CellContext`T24^2 - 
+                    78 $CellContext`T14 $CellContext`T24^3 - 
+                    13 $CellContext`T24^4 + $CellContext`T^3 (
+                    36 $CellContext`T14 + 286 $CellContext`T24) + 
+                    2 $CellContext`T^2 (27 $CellContext`T14^2 + 
+                    429 $CellContext`T14 $CellContext`T24 + 
+                    70 $CellContext`T24^2) + $CellContext`T (
+                    36 $CellContext`T14^3 + 
+                    858 $CellContext`T14^2 $CellContext`T24 + 
+                    280 $CellContext`T14 $CellContext`T24^2 - 
+                    78 $CellContext`T24^3)) + $CellContext`T24 (
+                    31 $CellContext`T^4 + 31 $CellContext`T14^4 + 
+                    30 $CellContext`T14^3 $CellContext`T24 + 
+                    2 $CellContext`T14^2 $CellContext`T24^2 + 
+                    2 $CellContext`T14 $CellContext`T24^3 - \
+$CellContext`T24^4 + 2 $CellContext`T^3 (62 $CellContext`T14 + 
+                    15 $CellContext`T24) + 
+                    2 $CellContext`T^2 (93 $CellContext`T14^2 + 
+                    45 $CellContext`T14 $CellContext`T24 + \
+$CellContext`T24^2) + 
+                    2 $CellContext`T (62 $CellContext`T14^3 + 
+                    45 $CellContext`T14^2 $CellContext`T24 + 
+                    2 $CellContext`T14 $CellContext`T24^2 + \
+$CellContext`T24^3)))) 
+               X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + 
+              2 ($CellContext`MH^2 - 
+                4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14) (
+                16 $CellContext`MH^8 $CellContext`T24^2 - $CellContext`MT^2 (
+                 16 $CellContext`MT^2 + 4 $CellContext`T + 4 $CellContext`T14 - 
+                 5 $CellContext`T24) (
+                  4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^4 + $CellContext`MH^6 $CellContext`T24 (
+                  176 $CellContext`MT^4 + 11 $CellContext`T^2 + 
+                  22 $CellContext`T $CellContext`T14 + 11 $CellContext`T14^2 + 
+                  8 $CellContext`MT^2 (11 $CellContext`T + 
+                    11 $CellContext`T14 - 25 $CellContext`T24) - 
+                  34 $CellContext`T $CellContext`T24 - 
+                  34 $CellContext`T14 $CellContext`T24 - 
+                  13 $CellContext`T24^2) + $CellContext`MH^2 (
+                   4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^2 (
+                  144 $CellContext`MT^6 + ($CellContext`T + $CellContext`T14) \
+(5 $CellContext`T + 5 $CellContext`T14 - 6 $CellContext`T24) $CellContext`T24 + 
+                  72 $CellContext`MT^4 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24) + $CellContext`MT^2 (9 $CellContext`T^2 + 
+                    18 $CellContext`T $CellContext`T14 + 9 $CellContext`T14^2 + 
+                    38 $CellContext`T $CellContext`T24 + 
+                    38 $CellContext`T14 $CellContext`T24 - 
+                    55 $CellContext`T24^2)) - 
+                2 $CellContext`MH^4 $CellContext`T24 (672 $CellContext`MT^6 + 
+                 8 $CellContext`T^3 + 8 $CellContext`T14^3 + 
+                 16 $CellContext`MT^4 (29 $CellContext`T + 
+                   29 $CellContext`T14 - 
+                   20 $CellContext`T24) + $CellContext`T^2 (
+                   24 $CellContext`T14 - 7 $CellContext`T24) - 
+                 7 $CellContext`T14^2 $CellContext`T24 - 
+                 10 $CellContext`T14 $CellContext`T24^2 - 
+                 3 $CellContext`T24^3 + 
+                 2 $CellContext`MT^2 (53 $CellContext`T^2 + 
+                   106 $CellContext`T $CellContext`T14 + 
+                   53 $CellContext`T14^2 - 54 $CellContext`T $CellContext`T24 - 
+                   54 $CellContext`T14 $CellContext`T24 - 
+                   35 $CellContext`T24^2) + 
+                 2 $CellContext`T (12 $CellContext`T14^2 - 
+                   7 $CellContext`T14 $CellContext`T24 - 
+                   5 $CellContext`T24^2))) 
+               X`DiscB[$CellContext`MH^2 - 
+                 4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`MT, $CellContext`MT] + (
+                4 $CellContext`MH^8 $CellContext`T24^2 (36 $CellContext`MT^2 + 
+                  9 $CellContext`T + 
+                  9 $CellContext`T14 + $CellContext`T24) - $CellContext`MT^2 (
+                  4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^4 (48 $CellContext`MT^4 + 3 $CellContext`T^2 + 
+                 6 $CellContext`T $CellContext`T14 + 3 $CellContext`T14^2 + 
+                 8 $CellContext`MT^2 (3 $CellContext`T + 3 $CellContext`T14 - 
+                   7 $CellContext`T24) - 14 $CellContext`T $CellContext`T24 - 
+                 14 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2) + 
+                2 $CellContext`MH^6 $CellContext`T24 (192 $CellContext`MT^6 + 
+                  3 $CellContext`T^3 + 3 $CellContext`T14^3 + 
+                  16 $CellContext`MT^4 (9 $CellContext`T + 9 $CellContext`T14 - 
+                    58 $CellContext`T24) + $CellContext`T^2 (
+                    9 $CellContext`T14 - 40 $CellContext`T24) - 
+                  40 $CellContext`T14^2 $CellContext`T24 - 
+                  17 $CellContext`T14 $CellContext`T24^2 - 
+                  6 $CellContext`T24^3 + 
+                  4 $CellContext`MT^2 (9 $CellContext`T^2 + 
+                    18 $CellContext`T $CellContext`T14 + 9 $CellContext`T14^2 - 
+                    98 $CellContext`T $CellContext`T24 - 
+                    98 $CellContext`T14 $CellContext`T24 - 
+                    19 $CellContext`T24^2) + $CellContext`T (
+                    9 $CellContext`T14^2 - 
+                    80 $CellContext`T14 $CellContext`T24 - 
+                    17 $CellContext`T24^2)) + $CellContext`MH^4 \
+$CellContext`T24 ((-1536) $CellContext`MT^8 - 11 $CellContext`T^4 - 
+                  11 $CellContext`T14^4 - 
+                  64 $CellContext`MT^6 (29 $CellContext`T + 
+                   29 $CellContext`T14 - 115 $CellContext`T24) + 
+                  50 $CellContext`T14^3 $CellContext`T24 + 
+                  56 $CellContext`T14^2 $CellContext`T24^2 + 
+                  26 $CellContext`T14 $CellContext`T24^3 - $CellContext`T24^4 + \
+$CellContext`T^3 ((-44) $CellContext`T14 + 50 $CellContext`T24) - 
+                  16 $CellContext`MT^4 (51 $CellContext`T^2 + 
+                   102 $CellContext`T $CellContext`T14 + 
+                   51 $CellContext`T14^2 - 
+                   280 $CellContext`T $CellContext`T24 - 
+                   280 $CellContext`T14 $CellContext`T24 - 
+                   95 $CellContext`T24^2) + $CellContext`T^2 ((-66) \
+$CellContext`T14^2 + 150 $CellContext`T14 $CellContext`T24 + 
+                    56 $CellContext`T24^2) + $CellContext`T ((-44) \
+$CellContext`T14^3 + 150 $CellContext`T14^2 $CellContext`T24 + 
+                    112 $CellContext`T14 $CellContext`T24^2 + 
+                    26 $CellContext`T24^3) - 
+                  4 $CellContext`MT^2 (39 $CellContext`T^3 + 
+                   39 $CellContext`T14^3 + $CellContext`T^2 (
+                    117 $CellContext`T14 - 215 $CellContext`T24) - 
+                   215 $CellContext`T14^2 $CellContext`T24 - 
+                   151 $CellContext`T14 $CellContext`T24^2 - 
+                   37 $CellContext`T24^3 + $CellContext`T (
+                    117 $CellContext`T14^2 - 
+                    430 $CellContext`T14 $CellContext`T24 - 
+                    151 $CellContext`T24^2))) + $CellContext`MH^2 (
+                   4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^2 (256 $CellContext`MT^8 + 
+                  32 $CellContext`MT^6 (6 $CellContext`T + 6 $CellContext`T14 - 
+                    7 $CellContext`T24) + 
+                  16 $CellContext`MT^4 (3 $CellContext`T^2 + 
+                    6 $CellContext`T $CellContext`T14 + 3 $CellContext`T14^2 - 
+                    2 $CellContext`T $CellContext`T24 - 
+                    2 $CellContext`T14 $CellContext`T24 - 
+                    37 $CellContext`T24^2) + ($CellContext`T + \
+$CellContext`T14) $CellContext`T24 (5 $CellContext`T^2 + 5 $CellContext`T14^2 + 
+                    2 $CellContext`T (5 $CellContext`T14 - 
+                    8 $CellContext`T24) - 
+                    16 $CellContext`T14 $CellContext`T24 + \
+$CellContext`T24^2) + 
+                  2 $CellContext`MT^2 (2 $CellContext`T^3 + 
+                    2 $CellContext`T14^3 + 
+                    13 $CellContext`T14^2 $CellContext`T24 - 
+                    106 $CellContext`T14 $CellContext`T24^2 - \
+$CellContext`T24^3 + $CellContext`T^2 (6 $CellContext`T14 + 
+                    13 $CellContext`T24) + 
+                    2 $CellContext`T (3 $CellContext`T14^2 + 
+                    13 $CellContext`T14 $CellContext`T24 - 
+                    53 $CellContext`T24^2)))) 
+               X`DiscB[$CellContext`T24, $CellContext`MT, $CellContext`MT] - 
+              2 ((-64) $CellContext`MT^4 - 4 $CellContext`T^2 - 
+               8 $CellContext`T $CellContext`T14 - 4 $CellContext`T14^2 - 
+               3 $CellContext`T $CellContext`T24 - 
+               3 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + \
+$CellContext`MH^2 (20 $CellContext`MT^2 + 5 $CellContext`T + 
+                 5 $CellContext`T14 + $CellContext`T24) - 
+               4 $CellContext`MT^2 (8 $CellContext`T + 8 $CellContext`T14 + 
+                3 $CellContext`T24)) (
+               16 $CellContext`MT^6 + $CellContext`MH^2 ($CellContext`MH^2 - \
+$CellContext`T - $CellContext`T14) $CellContext`T24 + 
+               8 $CellContext`MT^4 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24) + $CellContext`MT^2 ($CellContext`T^2 + $CellContext`T14^2 - 
+                 8 $CellContext`MH^2 $CellContext`T24 + 
+                 2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+                 2 $CellContext`T ($CellContext`T14 + $CellContext`T24))) 
+              X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`MH^2 - 
+                4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24] - 
+              2 (16 $CellContext`MT^6 + $CellContext`MH^2 ($CellContext`MH^2 - \
+$CellContext`T - $CellContext`T14) $CellContext`T24 + 
+               8 $CellContext`MT^4 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24) + $CellContext`MT^2 ($CellContext`T^2 + $CellContext`T14^2 - 
+                 8 $CellContext`MH^2 $CellContext`T24 + 
+                 2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+                 2 $CellContext`T ($CellContext`T14 + $CellContext`T24))) \
+(($CellContext`MT^2 (4 $CellContext`T + 4 $CellContext`T14 - 
+                   6 $CellContext`T24) + ($CellContext`T + $CellContext`T14) \
+($CellContext`T + $CellContext`T14 - 2 $CellContext`T24)) (
+                  
+                  4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^3 + 
+               2 $CellContext`MH^6 $CellContext`T24 (36 $CellContext`MT^2 + 
+                 9 $CellContext`T + 
+                 9 $CellContext`T14 + $CellContext`T24) + $CellContext`MH^4 (
+                 192 $CellContext`MT^6 + 3 $CellContext`T^3 + 
+                 3 $CellContext`T14^3 + 
+                 16 $CellContext`MT^4 (9 $CellContext`T + 9 $CellContext`T14 - 
+                   37 $CellContext`T24) + $CellContext`T^2 (
+                   9 $CellContext`T14 - 31 $CellContext`T24) - 
+                 31 $CellContext`T14^2 $CellContext`T24 - 
+                 19 $CellContext`T14 $CellContext`T24^2 - $CellContext`T24^3 + \
+$CellContext`T (9 $CellContext`T14^2 - 62 $CellContext`T14 $CellContext`T24 - 
+                   19 $CellContext`T24^2) + 
+                 4 $CellContext`MT^2 (9 $CellContext`T^2 + 
+                   18 $CellContext`T $CellContext`T14 + 9 $CellContext`T14^2 - 
+                   68 $CellContext`T $CellContext`T24 - 
+                   68 $CellContext`T14 $CellContext`T24 - 
+                   17 $CellContext`T24^2)) - 
+               2 $CellContext`MH^2 (320 $CellContext`MT^8 + 
+                2 $CellContext`T^4 + 2 $CellContext`T14^4 + 
+                16 $CellContext`MT^6 (23 $CellContext`T + 23 $CellContext`T14 - 
+                  37 $CellContext`T24) + $CellContext`T^3 (8 $CellContext`T14 - 
+                  6 $CellContext`T24) - 6 $CellContext`T14^3 $CellContext`T24 - 
+                10 $CellContext`T14^2 $CellContext`T24^2 - 
+                3 $CellContext`T14 $CellContext`T24^3 - $CellContext`T24^4 + 
+                4 $CellContext`MT^4 (39 $CellContext`T^2 + 
+                  78 $CellContext`T $CellContext`T14 + 39 $CellContext`T14^2 - 
+                  98 $CellContext`T $CellContext`T24 - 
+                  98 $CellContext`T14 $CellContext`T24 - 
+                  45 $CellContext`T24^2) + 
+                2 $CellContext`T^2 (6 $CellContext`T14^2 - 
+                  9 $CellContext`T14 $CellContext`T24 - 
+                  5 $CellContext`T24^2) + $CellContext`T (
+                  8 $CellContext`T14^3 - 
+                  18 $CellContext`T14^2 $CellContext`T24 - 
+                  20 $CellContext`T14 $CellContext`T24^2 - 
+                  3 $CellContext`T24^3) + $CellContext`MT^2 (
+                  29 $CellContext`T^3 + 
+                  29 $CellContext`T14^3 + $CellContext`T^2 (
+                    87 $CellContext`T14 - 85 $CellContext`T24) - 
+                  85 $CellContext`T14^2 $CellContext`T24 - 
+                  85 $CellContext`T14 $CellContext`T24^2 - 
+                  7 $CellContext`T24^3 + $CellContext`T (
+                    87 $CellContext`T14^2 - 
+                    170 $CellContext`T14 $CellContext`T24 - 
+                    85 $CellContext`T24^2)))) 
+              X`ScalarC0[$CellContext`MH^2, $CellContext`MH^2 - 
+                4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24, $CellContext`MT, $CellContext`MT, $CellContext`MT]) + 
+            4 $CellContext`MT^2 (
+               16 $CellContext`MT^4 + $CellContext`T^2 + $CellContext`T14^2 - 
+               4 $CellContext`MH^2 $CellContext`T24 + 
+               2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+               2 $CellContext`T ($CellContext`T14 + $CellContext`T24) + 
+               8 $CellContext`MT^2 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24))^(-1) ((-$CellContext`S34^2 - 
+                2 $CellContext`S34 $CellContext`T - $CellContext`S34 \
+$CellContext`T24 + 2 $CellContext`T14 $CellContext`T24 - 
+                2 $CellContext`S (
+                 2 $CellContext`S34 + $CellContext`T24) + $CellContext`MH^2 (
+                  2 $CellContext`S + 3 $CellContext`S34 - 2 $CellContext`T14 - 
+                  3 $CellContext`U) + 2 $CellContext`T $CellContext`U + 
+                4 $CellContext`T14 $CellContext`U + $CellContext`T24 \
+$CellContext`U + $CellContext`U^2) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[5]] $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[4]] - 
+              8 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T24 + \
+$CellContext`U) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[5]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[4]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`ec[5]] - 
+              8 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T24 + \
+$CellContext`U) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[5]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[5]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[2]] - 
+              4 ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T24 - \
+$CellContext`U) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[5]] ((2 $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[3]]) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[2]] + $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[4]] (2 $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]])) - 
+              8 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T24 + \
+$CellContext`U) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[4]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[4]] $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[1]] - 
+              8 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T24 + \
+$CellContext`U) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`e[2]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[2]] $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[1]] + 4 $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[
+                 4]] ((-$CellContext`MH^2 + 
+                  2 $CellContext`S34 + $CellContext`T24) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[2]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[
+                   1]] + (-$CellContext`S34 + $CellContext`U) \
+$CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] - $CellContext`MH^2 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[4]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[1]] + $CellContext`T24 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] + 2 $CellContext`U $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] - $CellContext`MH^2 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[2]] + 2 $CellContext`S34 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[5]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[2]] + $CellContext`T24 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[5]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[2]] - $CellContext`S34 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[3]] + $CellContext`U $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[5]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]] - $CellContext`MH^2 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[4]] + $CellContext`T24 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[5]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[4]] + 2 $CellContext`U $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[5]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[4]])) ((-$CellContext`MH^2 + 
+                 4 $CellContext`MT^2 + $CellContext`T + \
+$CellContext`T14)^(-1) ((-2) $CellContext`MH^2 + 
+                4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24) + $CellContext`MH^2 (
+                 16 $CellContext`MT^6 + $CellContext`MH^2 ($CellContext`MH^2 - \
+$CellContext`T - $CellContext`T14) $CellContext`T24 + 
+                 8 $CellContext`MT^4 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24) + $CellContext`MT^2 ($CellContext`T^2 + $CellContext`T14^2 - 
+                   8 $CellContext`MH^2 $CellContext`T24 + 
+                   2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+                   2 $CellContext`T ($CellContext`T14 + \
+$CellContext`T24)))^(-1) (256 $CellContext`MT^8 + 
+                192 $CellContext`MT^6 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24) + 
+                48 $CellContext`MT^4 ($CellContext`T^2 + $CellContext`T14^2 + 
+                  2 $CellContext`T14 $CellContext`T24 + $CellContext`T24 \
+((-3) $CellContext`MH^2 + $CellContext`T24) + 
+                  2 $CellContext`T ($CellContext`T14 + $CellContext`T24)) + \
+$CellContext`MH^2 $CellContext`T24 ((-5) $CellContext`T^2 - 
+                  5 $CellContext`T14^2 - 
+                  4 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+                  2 $CellContext`MH^2 (3 $CellContext`T + 
+                    3 $CellContext`T14 + $CellContext`T24) - 
+                  2 $CellContext`T (5 $CellContext`T14 + 2 $CellContext`T24)) + 
+                4 $CellContext`MT^2 ($CellContext`T^3 + $CellContext`T14^3 + 
+                  3 $CellContext`T14^2 $CellContext`T24 + 
+                  3 $CellContext`T^2 ($CellContext`T14 + $CellContext`T24) + \
+$CellContext`T14 $CellContext`T24 ((-14) $CellContext`MH^2 + 
+                    3 $CellContext`T24) + $CellContext`T24 (
+                    6 $CellContext`MH^4 - 
+                    8 $CellContext`MH^2 $CellContext`T24 + \
+$CellContext`T24^2) + $CellContext`T (3 $CellContext`T14^2 + 
+                    6 $CellContext`T14 $CellContext`T24 + $CellContext`T24 \
+((-14) $CellContext`MH^2 + 3 $CellContext`T24)))) 
+               X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT]/
+               X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`MH^2 - 
+                4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24] - ($CellContext`MH^4 + 32 $CellContext`MT^4 + 
+                12 $CellContext`MT^2 ($CellContext`T + $CellContext`T14) + \
+($CellContext`T + $CellContext`T14)^2 - 
+                2 $CellContext`MH^2 (
+                 6 $CellContext`MT^2 + $CellContext`T + \
+$CellContext`T14))^(-1) (
+                16 $CellContext`MT^6 + $CellContext`MH^2 ($CellContext`MH^2 - \
+$CellContext`T - $CellContext`T14) $CellContext`T24 + 
+                8 $CellContext`MT^4 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24) + $CellContext`MT^2 ($CellContext`T^2 + $CellContext`T14^2 - 
+                  8 $CellContext`MH^2 $CellContext`T24 + 
+                  2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+                  2 $CellContext`T ($CellContext`T14 + \
+$CellContext`T24)))^(-1) (
+               2 $CellContext`MH^10 (12 $CellContext`MT^2 + 3 $CellContext`T + 
+                 3 $CellContext`T14 - $CellContext`T24) $CellContext`T24 - \
+$CellContext`MH^8 $CellContext`T24 (464 $CellContext`MT^4 + 
+                19 $CellContext`T^2 + 38 $CellContext`T $CellContext`T14 + 
+                19 $CellContext`T14^2 + 
+                8 $CellContext`MT^2 (24 $CellContext`T + 
+                  24 $CellContext`T14 - $CellContext`T24) - 
+                4 $CellContext`T $CellContext`T24 - 
+                4 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2) - \
+$CellContext`MT^2 (
+                 4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^4 (
+                40 $CellContext`MT^4 + ($CellContext`T + $CellContext`T14)^2 + 
+                2 $CellContext`MT^2 (7 $CellContext`T + 
+                  7 $CellContext`T14 + $CellContext`T24)) + $CellContext`MH^2 \
+(4 $CellContext`MT^2 + $CellContext`T + $CellContext`T14 + \
+$CellContext`T24)^2 (
+                 832 $CellContext`MT^8 + ($CellContext`T + \
+$CellContext`T14)^3 $CellContext`T24 + 
+                 48 $CellContext`MT^6 (11 $CellContext`T + 
+                   11 $CellContext`T14 + 
+                   10 $CellContext`T24) + $CellContext`MT^2 ($CellContext`T + \
+$CellContext`T14) (7 $CellContext`T^2 + 14 $CellContext`T $CellContext`T14 + 
+                   7 $CellContext`T14^2 + 26 $CellContext`T $CellContext`T24 + 
+                   26 $CellContext`T14 $CellContext`T24 + 
+                   3 $CellContext`T24^2) + 
+                 4 $CellContext`MT^4 (27 $CellContext`T^2 + 
+                   54 $CellContext`T $CellContext`T14 + 27 $CellContext`T14^2 + 
+                   52 $CellContext`T $CellContext`T24 + 
+                   52 $CellContext`T14 $CellContext`T24 + 
+                   9 $CellContext`T24^2)) + $CellContext`MH^6 (
+                 256 $CellContext`MT^8 + 
+                 192 $CellContext`MT^6 ($CellContext`T + $CellContext`T14 + 
+                   17 $CellContext`T24) + 
+                 3 ($CellContext`T + $CellContext`T14) $CellContext`T24 (
+                   7 $CellContext`T^2 + 14 $CellContext`T $CellContext`T14 + 
+                   7 $CellContext`T14^2 + $CellContext`T24^2) + 
+                 16 $CellContext`MT^4 (3 $CellContext`T^2 + 
+                   6 $CellContext`T $CellContext`T14 + 3 $CellContext`T14^2 + 
+                   119 $CellContext`T $CellContext`T24 + 
+                   119 $CellContext`T14 $CellContext`T24 + 
+                   13 $CellContext`T24^2) + 
+                 4 $CellContext`MT^2 ($CellContext`T^3 + $CellContext`T14^3 + 
+                   89 $CellContext`T14^2 $CellContext`T24 + 
+                   9 $CellContext`T14 $CellContext`T24^2 + 
+                   7 $CellContext`T24^3 + $CellContext`T^2 (
+                    3 $CellContext`T14 + 
+                    89 $CellContext`T24) + $CellContext`T (
+                    3 $CellContext`T14^2 + 
+                    178 $CellContext`T14 $CellContext`T24 + 
+                    9 $CellContext`T24^2))) - $CellContext`MH^4 (
+                3584 $CellContext`MT^10 + 
+                256 $CellContext`MT^8 (13 $CellContext`T + 
+                  13 $CellContext`T14 + 
+                  
+                  40 $CellContext`T24) + ($CellContext`T + \
+$CellContext`T14)^2 $CellContext`T24 (9 $CellContext`T^2 + 
+                  18 $CellContext`T $CellContext`T14 + 9 $CellContext`T14^2 + 
+                  4 $CellContext`T $CellContext`T24 + 
+                  4 $CellContext`T14 $CellContext`T24 + 3 $CellContext`T24^2) + 
+                128 $CellContext`MT^6 (9 $CellContext`T^2 + 
+                  18 $CellContext`T $CellContext`T14 + 9 $CellContext`T14^2 + 
+                  60 $CellContext`T $CellContext`T24 + 
+                  60 $CellContext`T14 $CellContext`T24 + 
+                  14 $CellContext`T24^2) + 
+                16 $CellContext`MT^4 (11 $CellContext`T^3 + 
+                  11 $CellContext`T14^3 + 
+                  129 $CellContext`T14^2 $CellContext`T24 + 
+                  51 $CellContext`T14 $CellContext`T24^2 + 
+                  16 $CellContext`T24^3 + 
+                  3 $CellContext`T^2 (11 $CellContext`T14 + 
+                    43 $CellContext`T24) + 
+                  3 $CellContext`T (11 $CellContext`T14^2 + 
+                    86 $CellContext`T14 $CellContext`T24 + 
+                    17 $CellContext`T24^2)) + 
+                2 $CellContext`MT^2 (5 $CellContext`T^4 + 
+                  5 $CellContext`T14^4 + 
+                  116 $CellContext`T14^3 $CellContext`T24 + 
+                  54 $CellContext`T14^2 $CellContext`T24^2 + 
+                  28 $CellContext`T14 $CellContext`T24^3 + $CellContext`T24^4 + 
+                  4 $CellContext`T^3 (5 $CellContext`T14 + 
+                    29 $CellContext`T24) + 
+                  6 $CellContext`T^2 (5 $CellContext`T14^2 + 
+                    58 $CellContext`T14 $CellContext`T24 + 
+                    9 $CellContext`T24^2) + 
+                  4 $CellContext`T (5 $CellContext`T14^3 + 
+                    87 $CellContext`T14^2 $CellContext`T24 + 
+                    27 $CellContext`T14 $CellContext`T24^2 + 
+                    7 $CellContext`T24^3)))) 
+              X`DiscB[$CellContext`MH^2 - 
+                4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`MT, $CellContext`MT]/
+              X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`MH^2 - 
+               4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24] - (
+                16 $CellContext`MT^6 + $CellContext`MH^2 ($CellContext`MH^2 - \
+$CellContext`T - $CellContext`T14) $CellContext`T24 + 
+                8 $CellContext`MT^4 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24) + $CellContext`MT^2 ($CellContext`T^2 + $CellContext`T14^2 - 
+                  8 $CellContext`MH^2 $CellContext`T24 + 
+                  2 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 + 
+                  2 $CellContext`T ($CellContext`T14 + \
+$CellContext`T24)))^(-1) (256 $CellContext`MT^10 + 
+               256 $CellContext`MT^8 ($CellContext`T + $CellContext`T14 + \
+$CellContext`T24) + $CellContext`MH^2 $CellContext`T24 (
+                 2 $CellContext`MH^2 ($CellContext`T + $CellContext`T14 - \
+$CellContext`T24)^2 + 
+                 4 $CellContext`MH^4 $CellContext`T24 - ($CellContext`T + \
+$CellContext`T14) ($CellContext`T + $CellContext`T14 + $CellContext`T24)^2) + 
+               32 $CellContext`MT^6 (3 $CellContext`T^2 + 
+                 3 $CellContext`T14^2 + 6 $CellContext`T14 $CellContext`T24 + 
+                 6 $CellContext`T ($CellContext`T14 + $CellContext`T24) + \
+$CellContext`T24 ((-2) $CellContext`MH^2 + 
+                   3 $CellContext`T24)) + $CellContext`MT^2 ($CellContext`T^4 + \
+$CellContext`T14^4 + 4 $CellContext`T14^3 $CellContext`T24 + 
+                 6 $CellContext`T14^2 $CellContext`T24 ((-2) \
+$CellContext`MH^2 + $CellContext`T24) + 
+                 4 $CellContext`T14 $CellContext`T24 ((-2) $CellContext`MH^2 + \
+$CellContext`T24)^2 + 
+                 4 $CellContext`T^3 ($CellContext`T14 + $CellContext`T24) + \
+$CellContext`T24^2 ((-32) $CellContext`MH^4 - 
+                   4 $CellContext`MH^2 $CellContext`T24 + $CellContext`T24^2) + 
+                 6 $CellContext`T^2 ($CellContext`T14^2 + 
+                   2 $CellContext`T14 $CellContext`T24 + $CellContext`T24 \
+((-2) $CellContext`MH^2 + $CellContext`T24)) + 
+                 4 $CellContext`T ($CellContext`T14^3 + 
+                   3 $CellContext`T14^2 $CellContext`T24 + 
+                   3 $CellContext`T14 $CellContext`T24 ((-2) \
+$CellContext`MH^2 + $CellContext`T24) + $CellContext`T24 ((-2) \
+$CellContext`MH^2 + $CellContext`T24)^2)) + 
+               16 $CellContext`MT^4 ($CellContext`T^3 + $CellContext`T14^3 + 
+                 3 $CellContext`T14^2 $CellContext`T24 + 
+                 3 $CellContext`T14 $CellContext`T24 (-$CellContext`MH^2 + \
+$CellContext`T24) + 
+                 3 $CellContext`T^2 ($CellContext`T14 + $CellContext`T24) + \
+$CellContext`T24 (2 $CellContext`MH^4 - 
+                   2 $CellContext`MH^2 $CellContext`T24 + $CellContext`T24^2) + 
+                 3 $CellContext`T ($CellContext`T14^2 + 
+                   2 $CellContext`T14 $CellContext`T24 + $CellContext`T24 \
+(-$CellContext`MH^2 + $CellContext`T24)))) 
+              X`DiscB[$CellContext`T24, $CellContext`MT, $CellContext`MT]/
+              X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`MH^2 - 
+               4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24] + 
+              2 $CellContext`MH^2 (16 $CellContext`MT^4 + $CellContext`T^2 + 
+                2 $CellContext`T $CellContext`T14 + $CellContext`T14^2 + \
+$CellContext`MT^2 (8 $CellContext`T + 8 $CellContext`T14 - 
+                  4 $CellContext`T24) + 
+                2 $CellContext`MH^2 $CellContext`T24 - $CellContext`T \
+$CellContext`T24 - $CellContext`T14 $CellContext`T24 - 2 $CellContext`T24^2) 
+               X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`MH^2 - 
+                  4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24]^(-1) 
+               X`ScalarC0[$CellContext`MH^2, $CellContext`MH^2 - 
+                 4 $CellContext`MT^2 - $CellContext`T - $CellContext`T14, \
+$CellContext`T24, $CellContext`MT, $CellContext`MT, $CellContext`MT])))}, 0, 
+         3, 1],
+        Editable->False], ")"}], "+", 
+      RowBox[{
+       FractionBox["1", 
+        RowBox[{
+         SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", "T24"}]], 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{
+          FractionBox["1", "T"], 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"4", " ", 
+                RowBox[{"(", 
+                 RowBox[{"2", "+", 
+                  FractionBox["1", "\[Epsilon]"], "+", 
+                  RowBox[{"DiscB", "[", 
+                   RowBox[{"T", ",", "MT", ",", "MT"}], "]"}], "+", 
+                  RowBox[{"Log", "[", 
+                   FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], ")"}]}], "-", 
+               RowBox[{
+                FractionBox["1", 
+                 RowBox[{
+                  SuperscriptBox["MH", "2"], "-", "T"}]], 
+                RowBox[{"4", " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                   FractionBox[
+                    SuperscriptBox["MH", "2"], "\[Epsilon]"], "-", 
+                   RowBox[{"3", " ", "T"}], "-", 
+                   FractionBox["T", "\[Epsilon]"], "+", 
+                   RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                   RowBox[{"T", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                   RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                   RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                   RowBox[{"T", " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                   RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "+", 
+                    SqrtBox[
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], 
+                  ")"}]}]}]}], ")"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"4", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}]}], "-", 
+                  RowBox[{"4", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+               RowBox[{"2", " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"2", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "-", 
+               RowBox[{"4", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "-", 
+               RowBox[{"2", " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"2", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+               RowBox[{"4", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S", "+", 
+                    RowBox[{"2", " ", "T24"}], "+", "U"}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                 ")"}]}]}], ")"}]}], "-", 
+            RowBox[{
+             FractionBox["1", 
+              RowBox[{
+               SuperscriptBox["MH", "2"], "-", "T"}]], 
+             RowBox[{
+              RowBox[{"(", 
+               RowBox[{
+                SuperscriptBox[
+                 RowBox[{"Log", "[", 
+                  FractionBox[
+                   RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                   RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"], "-", 
+                SuperscriptBox[
+                 RowBox[{"Log", "[", 
+                  FractionBox[
+                   RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "+", 
+                    SqrtBox[
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T"}], ")"}]}]]}], 
+                   RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], ")"}], " ", 
+              RowBox[{"(", 
+               RowBox[{
+                RowBox[{"2", " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S", "+", 
+                    RowBox[{"2", " ", "T14"}], "+", 
+                    RowBox[{"2", " ", "T24"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", "T14", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", "S", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                   RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                  ")"}], " ", 
+                 RowBox[{"Pair", "[", 
+                  RowBox[{
+                   RowBox[{"ec", "[", "4", "]"}], ",", 
+                   RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                RowBox[{"4", " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                   RowBox[{"S", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                 RowBox[{"Pair", "[", 
+                  RowBox[{
+                   RowBox[{"e", "[", "2", "]"}], ",", 
+                   RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                 RowBox[{"Pair", "[", 
+                  RowBox[{
+                   RowBox[{"ec", "[", "4", "]"}], ",", 
+                   RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                RowBox[{"4", " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                 RowBox[{"Pair", "[", 
+                  RowBox[{
+                   RowBox[{"e", "[", "1", "]"}], ",", 
+                   RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}], " ", 
+                 RowBox[{"Pair", "[", 
+                  RowBox[{
+                   RowBox[{"ec", "[", "4", "]"}], ",", 
+                   RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "-", 
+                RowBox[{"4", " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                   RowBox[{"S", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                 RowBox[{"Pair", "[", 
+                  RowBox[{
+                   RowBox[{"e", "[", "2", "]"}], ",", 
+                   RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                 RowBox[{"Pair", "[", 
+                  RowBox[{
+                   RowBox[{"ec", "[", "5", "]"}], ",", 
+                   RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "-", 
+                RowBox[{"4", " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                 RowBox[{"Pair", "[", 
+                  RowBox[{
+                   RowBox[{"e", "[", "1", "]"}], ",", 
+                   RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}], " ", 
+                 RowBox[{"Pair", "[", 
+                  RowBox[{
+                   RowBox[{"ec", "[", "5", "]"}], ",", 
+                   RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                RowBox[{
+                 RowBox[{"Pair", "[", 
+                  RowBox[{
+                   RowBox[{"e", "[", "1", "]"}], ",", 
+                   RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S", "-", 
+                    RowBox[{"2", " ", "T24"}], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                   RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                  ")"}]}], "+", 
+                RowBox[{"8", " ", 
+                 RowBox[{"Pair", "[", 
+                  RowBox[{
+                   RowBox[{"e", "[", "1", "]"}], ",", 
+                   RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                   RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                   RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                  ")"}]}]}], ")"}]}]}], "-", 
+            RowBox[{
+             FractionBox["1", 
+              RowBox[{
+               SuperscriptBox["MH", "2"], "-", "T"}]], 
+             RowBox[{"4", " ", 
+              RowBox[{"(", 
+               RowBox[{
+                RowBox[{"DiscB", "[", 
+                 RowBox[{
+                  SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], "]"}], 
+                "-", 
+                RowBox[{"DiscB", "[", 
+                 RowBox[{"T", ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+              RowBox[{"(", 
+               RowBox[{
+                RowBox[{
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S", "-", 
+                    RowBox[{"2", " ", "T24"}], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "7"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"2", " ", "S"}], "+", 
+                    RowBox[{"8", " ", "S34"}], "+", 
+                    RowBox[{"3", " ", "T"}], "+", 
+                    RowBox[{"6", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "9"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S"}], "+", 
+                    RowBox[{"8", " ", "S34"}], "+", 
+                    RowBox[{"5", " ", "T"}], "+", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                   RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                  ")"}], " ", 
+                 RowBox[{"Pair", "[", 
+                  RowBox[{
+                   RowBox[{"ec", "[", "4", "]"}], ",", 
+                   RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                RowBox[{"2", " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                   RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "+", 
+                    RowBox[{"2", " ", "S"}], "-", "T", "-", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                 RowBox[{"Pair", "[", 
+                  RowBox[{
+                   RowBox[{"e", "[", "2", "]"}], ",", 
+                   RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                 RowBox[{"Pair", "[", 
+                  RowBox[{
+                   RowBox[{"ec", "[", "4", "]"}], ",", 
+                   RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                RowBox[{"4", " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                 RowBox[{"Pair", "[", 
+                  RowBox[{
+                   RowBox[{"e", "[", "1", "]"}], ",", 
+                   RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}], " ", 
+                 RowBox[{"Pair", "[", 
+                  RowBox[{
+                   RowBox[{"ec", "[", "4", "]"}], ",", 
+                   RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "-", 
+                RowBox[{"2", " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                   RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "+", 
+                    RowBox[{"2", " ", "S"}], "-", "T", "-", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                 RowBox[{"Pair", "[", 
+                  RowBox[{
+                   RowBox[{"e", "[", "2", "]"}], ",", 
+                   RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                 RowBox[{"Pair", "[", 
+                  RowBox[{
+                   RowBox[{"ec", "[", "5", "]"}], ",", 
+                   RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "-", 
+                RowBox[{"4", " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                 RowBox[{"Pair", "[", 
+                  RowBox[{
+                   RowBox[{"e", "[", "1", "]"}], ",", 
+                   RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}], " ", 
+                 RowBox[{"Pair", "[", 
+                  RowBox[{
+                   RowBox[{"ec", "[", "5", "]"}], ",", 
+                   RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                RowBox[{
+                 RowBox[{"Pair", "[", 
+                  RowBox[{
+                   RowBox[{"e", "[", "1", "]"}], ",", 
+                   RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S", "-", 
+                    RowBox[{"2", " ", "T24"}], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                   RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                  ")"}]}], "+", 
+                RowBox[{"16", " ", 
+                 RowBox[{"Pair", "[", 
+                  RowBox[{
+                   RowBox[{"e", "[", "1", "]"}], ",", 
+                   RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                   RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                  ")"}]}]}], ")"}]}]}], "-", 
+            RowBox[{"8", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                FractionBox["1", 
+                 RowBox[{"2", " ", 
+                  SuperscriptBox[
+                   RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], "2"]}]], 
+                RowBox[{
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "-", 
+                   RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                   RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                   RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                   RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "+", 
+                    SqrtBox[
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+                 RowBox[{"Pair", "[", 
+                  RowBox[{
+                   RowBox[{"e", "[", "1", "]"}], ",", 
+                   RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S", "+", 
+                    RowBox[{"2", " ", "T24"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S"}], "-", 
+                    RowBox[{"4", " ", "S34"}], "-", "T", "-", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"2", " ", "S"}], "-", 
+                    RowBox[{"4", " ", "S34"}], "-", 
+                    RowBox[{"3", " ", "T"}], "-", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                   RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S"}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                   RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"2", " ", "S"}], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                   RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], "+", 
+               RowBox[{
+                FractionBox["1", 
+                 RowBox[{"2", " ", 
+                  RowBox[{"(", 
+                   RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}]}]], 
+                RowBox[{
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{"-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                   RowBox[{"DiscB", "[", 
+                    RowBox[{"T", ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                 
+                 RowBox[{"Pair", "[", 
+                  RowBox[{
+                   RowBox[{"e", "[", "1", "]"}], ",", 
+                   RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S", "+", 
+                    RowBox[{"2", " ", "T24"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"4", " ", "S34"}], "-", 
+                    RowBox[{"3", " ", "T"}], "-", 
+                    RowBox[{"4", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"4", " ", "S34"}], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                   RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T", "-", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                   RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "+", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                   RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}]}], ")"}]}]}], ")"}]}], "+", 
+         RowBox[{
+          FractionBox["1", "S"], 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"2", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{"2", "+", 
+                  FractionBox["1", "\[Epsilon]"], "+", 
+                  RowBox[{"DiscB", "[", 
+                   RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ",", "MT", ",", "MT"}], "]"}], "+", 
+                  RowBox[{"Log", "[", 
+                   FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], ")"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"-", "4"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"8", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "-", 
+                  RowBox[{"8", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "-", 
+                  RowBox[{"8", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"8", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", "T"}], "-", 
+                    RowBox[{"2", " ", "T14"}], "+", 
+                    RowBox[{"2", " ", "T24"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "-", 
+                    RowBox[{"2", " ", "T", " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "U"}], "+", 
+                    RowBox[{"S", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", "T"}], "+", "U"}], ")"}]}]}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{"S", "+", "T14", "+", "T24"}], ")"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "+", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S", "+", "T14", "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "T", "-", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "+", "U"}], ")"}], 
+                   " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "+", "U"}], ")"}], 
+                   " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "+", "U"}], ")"}], 
+                   " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "-", 
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "+", "U"}], ")"}], 
+                   " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"8", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                  RowBox[{"4", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                 ")"}], " ", 
+                RowBox[{"ScalarC0", "[", 
+                 RowBox[{
+                  SuperscriptBox["MH", "2"], ",", 
+                  RowBox[{
+                   SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                   "T24"}], ",", 
+                  RowBox[{"-", 
+                   FractionBox[
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], 
+                    RowBox[{
+                    RowBox[{"-", "1"}], "+", 
+                    SuperscriptBox["\[Beta]", "2"]}]]}], ",", "MT", ",", "MT",
+                   ",", "MT"}], "]"}]}]}], ")"}]}], "-", 
+            RowBox[{"4", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"2", " ", "S34"}], "-", "T", "-", "U"}], ")"}], 
+                   " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                  RowBox[{"16", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"2", " ", "S34"}], "-", "T", "-", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "-", "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ",", 
+                    RowBox[{"-", 
+                    FractionBox[
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], 
+                    RowBox[{
+                    RowBox[{"-", "1"}], "+", 
+                    SuperscriptBox["\[Beta]", "2"]}]]}], ",", "MT", ",", "MT",
+                     ",", "MT"}], "]"}], " ", 
+                   RowBox[{"(", 
+                    InterpretationBox[
+                    RowBox[{
+                    FractionBox[
+                    RowBox[{"24", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "16"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}], "2"]], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", 
+                    RowBox[{"5", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "2"]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"14", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "2"]}], 
+                    "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "3"]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    SuperscriptBox["\[Beta]", "2"]}], ")"}], "/", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}], "3"]}], "+", 
+                    InterpretationBox[
+                    SuperscriptBox[
+                    RowBox[{"O", "[", "\[Beta]", "]"}], "4"],
+                    SeriesData[$CellContext`\[Beta], 0, {}, 0, 4, 1],
+                    Editable->False]}],
+                    
+                    SeriesData[$CellContext`\[Beta], 0, {
+                    24 $CellContext`MT^4 ((-2) $CellContext`MH^2 + 
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2 ((-16) $CellContext`MH^2 $CellContext`MT^2 + (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)^(-2), 0, 
+                    8 $CellContext`MT^4 (
+                    16 $CellContext`MH^2 $CellContext`MT^2 - (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)^(-3) ((
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^3 (4 $CellContext`MT^2 - 
+                    5 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)) - 8 $CellContext`MH^4 (16 $CellContext`MT^4 + 
+                    3 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2) + 8 $CellContext`MH^2 (32 $CellContext`MT^6 + 
+                    16 $CellContext`MT^4 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24) + 
+                    14 $CellContext`MT^2 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2 + 
+                    3 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^3))}, 0, 4, 1],
+                    Editable->False], ")"}]}], "+", 
+                  RowBox[{"(", 
+                   InterpretationBox[
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "16"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"5", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "192"}], " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"20", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "2"]}], 
+                    "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "3"], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ",", "MT", ",", "MT"}], "]"}]}]}], ")"}], "/", 
+                    RowBox[{"(", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "16"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}], "2"]}], ")"}]}], "+", 
+                    FractionBox[
+                    RowBox[{"48", " ", "\[ImaginaryI]", " ", 
+                    SuperscriptBox["MT", "4"], " ", "\[Pi]", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", "\[Beta]"}], 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "16"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}], "2"]], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"48", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "-", 
+                    RowBox[{"112", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"24", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "2"]}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"768", " ", 
+                    SuperscriptBox["MT", "8"]}], "+", 
+                    RowBox[{"512", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}], "-", 
+                    RowBox[{"96", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "3"]}], 
+                    "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"10", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"7", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"768", " ", 
+                    SuperscriptBox["MT", "8"]}], "-", 
+                    RowBox[{"512", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "3"]}], 
+                    "+", 
+                    RowBox[{"96", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"10", " ", 
+                    SuperscriptBox["MH", "4"]}], "-", 
+                    RowBox[{"13", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "2"]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ",", "MT", ",", "MT"}], "]"}]}]}], ")"}]}], 
+                    ")"}], " ", 
+                    SuperscriptBox["\[Beta]", "2"]}], ")"}], "/", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}], "3"]}], "+", 
+                    FractionBox[
+                    RowBox[{"96", " ", "\[ImaginaryI]", " ", 
+                    SuperscriptBox["MT", "4"], " ", "\[Pi]", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "6"]}], "-", 
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "2"]}], 
+                    "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "2"]}]}], 
+                    ")"}], " ", 
+                    SuperscriptBox["\[Beta]", "3"]}], 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}], "3"]], "+", 
+                    InterpretationBox[
+                    SuperscriptBox[
+                    RowBox[{"O", "[", "\[Beta]", "]"}], "4"],
+                    SeriesData[$CellContext`\[Beta], 0, {}, 0, 4, 1],
+                    Editable->False]}],
+                    
+                    SeriesData[$CellContext`\[Beta], 0, {
+                    Rational[
+                    1, 2] ((-16) $CellContext`MH^2 $CellContext`MT^2 + (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)^(-2) (
+                    8 $CellContext`MT^2 ((-16) $CellContext`MH^2 \
+$CellContext`MT^2 + (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2) + (-(
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2 (
+                    12 $CellContext`MT^2 + $CellContext`S34 + \
+$CellContext`T14 + $CellContext`T24) + 
+                    8 $CellContext`MH^2 $CellContext`MT^2 (
+                    12 $CellContext`MT^2 + 
+                    5 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24))) 
+                    X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] + ((-192) $CellContext`MT^6 + 
+                    16 $CellContext`MT^4 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24) + 
+                    20 $CellContext`MT^2 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2 + ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^3 + 8 $CellContext`MH^2 (12 $CellContext`MT^4 - 
+                    5 $CellContext`MT^2 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24))) 
+                    X`DiscB[$CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T14 - $CellContext`T24, $CellContext`MT, $CellContext`MT]), 
+                    Complex[0, 48] $CellContext`MT^4 
+                    Pi ((-2) $CellContext`MH^2 + 
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24) ((-16) $CellContext`MH^2 $CellContext`MT^2 + (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)^(-2), (-2) $CellContext`MT^2 (
+                    16 $CellContext`MH^2 $CellContext`MT^2 - (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)^(-3) ((-2) (48 $CellContext`MH^2 $CellContext`MT^2 - 
+                    112 $CellContext`MT^4 - 
+                    24 $CellContext`MT^2 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24) + ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2) (16 $CellContext`MH^2 $CellContext`MT^2 - (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2) + (768 $CellContext`MT^8 + 
+                    512 $CellContext`MT^6 ($CellContext`S34 + \
+$CellContext`T14 + $CellContext`T24) - 
+                    96 $CellContext`MT^4 (
+                    5 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T14 - \
+$CellContext`T24) ($CellContext`S34 + $CellContext`T14 + $CellContext`T24) + (
+                    2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T14 - \
+$CellContext`T24) ($CellContext`S34 + $CellContext`T14 + $CellContext`T24)^3 + 
+                    16 $CellContext`MH^2 $CellContext`MT^2 ($CellContext`S34 + \
+$CellContext`T14 + $CellContext`T24) (10 $CellContext`MH^2 - 
+                    7 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24))) 
+                    X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] + (768 $CellContext`MT^8 - 
+                    512 $CellContext`MT^6 ($CellContext`S34 + \
+$CellContext`T14 + $CellContext`T24) - (
+                    2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T14 - \
+$CellContext`T24) ($CellContext`S34 + $CellContext`T14 + $CellContext`T24)^3 + 
+                    96 $CellContext`MT^4 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24) (5 $CellContext`MH^2 - 
+                    4 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)) - 
+                    16 $CellContext`MT^2 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24) (10 $CellContext`MH^4 - 
+                    13 $CellContext`MH^2 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24) + 
+                    3 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)) 
+                    X`DiscB[$CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T14 - $CellContext`T24, $CellContext`MT, $CellContext`MT]), 
+                    Complex[0, 96] $CellContext`MT^4 
+                    Pi (32 $CellContext`MT^6 - 
+                    6 $CellContext`MT^2 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2 + (
+                    2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T14 - \
+$CellContext`T24) ($CellContext`S34 + $CellContext`T14 + $CellContext`T24)^2) \
+(16 $CellContext`MH^2 $CellContext`MT^2 - (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)^(-3)}, 0, 4, 1],
+                    Editable->False], ")"}]}], ")"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"2", " ", "S34"}], "-", "T", "-", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"2", " ", "S34"}], "-", "T", "-", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "-", "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ",", 
+                    RowBox[{"-", 
+                    FractionBox[
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], 
+                    RowBox[{
+                    RowBox[{"-", "1"}], "+", 
+                    SuperscriptBox["\[Beta]", "2"]}]]}], ",", "MT", ",", "MT",
+                     ",", "MT"}], "]"}], " ", 
+                   RowBox[{"(", 
+                    InterpretationBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "8"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "3"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], ")"}], "/", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "16"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}], "2"]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "48"}], " ", 
+                    SuperscriptBox["MH", "6"], " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"14", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "4"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"128", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{"208", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"64", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "2"]}], 
+                    "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "3"]}]}], 
+                    ")"}]}]}], ")"}]}], ")"}], " ", 
+                    SuperscriptBox["\[Beta]", "2"]}], ")"}], "/", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}], "3"]}], "+", 
+                    InterpretationBox[
+                    SuperscriptBox[
+                    RowBox[{"O", "[", "\[Beta]", "]"}], "4"],
+                    SeriesData[$CellContext`\[Beta], 0, {}, 0, 4, 1],
+                    Editable->False]}],
+                    SeriesData[$CellContext`\[Beta], 
+                    0, {-$CellContext`MT^2 ((-16) $CellContext`MH^2 \
+$CellContext`MT^2 + (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)^(-2) ((-8) $CellContext`MH^2 ($CellContext`S34 + \
+$CellContext`T14 + $CellContext`T24) (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24) + (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^3 - 4 $CellContext`MH^4 (4 $CellContext`MT^2 - 
+                    3 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24))), 0, (-4) $CellContext`MT^2 (
+                    16 $CellContext`MH^2 $CellContext`MT^2 - (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)^(-3) ((-48) $CellContext`MH^6 $CellContext`MT^2 \
+($CellContext`S34 + $CellContext`T14 + $CellContext`T24) - 
+                    2 $CellContext`MH^2 (
+                    14 $CellContext`MT^2 - $CellContext`S34 - \
+$CellContext`T14 - $CellContext`T24) ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24) (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2 + $CellContext`MT^2 (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^4 + $CellContext`MH^4 (128 $CellContext`MT^6 + 
+                    208 $CellContext`MT^4 ($CellContext`S34 + \
+$CellContext`T14 + $CellContext`T24) + 
+                    64 $CellContext`MT^2 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2 - 
+                    3 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^3))}, 0, 4, 1],
+                    Editable->False], ")"}]}], "+", 
+                  RowBox[{"(", 
+                   InterpretationBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "16"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "-", 
+                    RowBox[{"80", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "2"]}], 
+                    ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MH", "4"], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "48"}], " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"40", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "2"]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ",", "MT", ",", "MT"}], "]"}]}]}], ")"}], "/", 
+                    RowBox[{"(", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "16"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}], "2"]}], ")"}]}], ")"}]}], 
+                    "-", 
+                    FractionBox[
+                    RowBox[{"2", " ", "\[ImaginaryI]", " ", 
+                    SuperscriptBox["MT", "2"], " ", "\[Pi]", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", 
+                    RowBox[{"6", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", "\[Beta]"}], 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "16"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}], "2"]], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ")"}]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MH", "4"], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "24"}], " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "2"]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"128", " ", 
+                    SuperscriptBox["MH", "6"], " ", 
+                    SuperscriptBox["MT", "2"]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "3"]}], "-", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MH", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"24", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"14", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "2"]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"64", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{"240", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"28", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "2"]}], 
+                    "-", 
+                    RowBox[{"7", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "3"]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ",", "MT", ",", "MT"}], "]"}]}]}], ")"}], " ", 
+                    SuperscriptBox["\[Beta]", "2"]}], ")"}], "/", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}], "3"]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"2", " ", "\[ImaginaryI]", " ", 
+                    SuperscriptBox["MT", "2"], " ", "\[Pi]", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"96", " ", 
+                    SuperscriptBox["MH", "4"], " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "3"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "6"]}], "-", 
+                    RowBox[{"144", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}], "-", 
+                    RowBox[{"40", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "2"]}], 
+                    "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "3"]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    SuperscriptBox["\[Beta]", "3"]}], ")"}], "/", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}], "3"]}], "+", 
+                    InterpretationBox[
+                    SuperscriptBox[
+                    RowBox[{"O", "[", "\[Beta]", "]"}], "4"],
+                    SeriesData[$CellContext`\[Beta], 0, {}, 0, 4, 1],
+                    Editable->False]}],
+                    
+                    SeriesData[$CellContext`\[Beta], 0, {
+                    Rational[-1, 
+                    2] ((-16) $CellContext`MH^2 $CellContext`MT^2 + (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)^(-2) ((
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24) ((-16) $CellContext`MH^2 $CellContext`MT^2 + (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2) + $CellContext`MH^2 (
+                    32 $CellContext`MH^2 $CellContext`MT^2 - 
+                    80 $CellContext`MT^4 - 
+                    16 $CellContext`MT^2 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24) + ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2) 
+                    X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] - (32 $CellContext`MH^4 $CellContext`MT^2 + 
+                    4 $CellContext`MT^2 (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2 + $CellContext`MH^2 ((-48) $CellContext`MT^4 - 
+                    40 $CellContext`MT^2 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24) + ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)) 
+                    X`DiscB[$CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T14 - $CellContext`T24, $CellContext`MT, $CellContext`MT]), 
+                    Complex[0, -2] $CellContext`MT^2 
+                    Pi ((-16) $CellContext`MH^2 $CellContext`MT^2 + (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)^(-2) ((
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2 + $CellContext`MH^2 (8 $CellContext`MT^2 - 
+                    6 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24))), 2 $CellContext`MT^2 (
+                    16 $CellContext`MH^2 $CellContext`MT^2 - (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)^(-3) ((
+                    16 $CellContext`MH^2 $CellContext`MT^2 - (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2) (
+                    16 $CellContext`MH^2 ($CellContext`MT^2 - \
+$CellContext`S34 - $CellContext`T14 - $CellContext`T24) + 
+                    3 (4 $CellContext`MT^2 + $CellContext`S34 + \
+$CellContext`T14 + $CellContext`T24)^2) + 
+                    8 $CellContext`MH^2 (
+                    16 $CellContext`MH^4 $CellContext`MT^2 + (
+                    5 $CellContext`MT^2 - $CellContext`S34 - $CellContext`T14 - \
+$CellContext`T24) (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2 + 2 $CellContext`MH^2 ((-24) $CellContext`MT^4 - 
+                    8 $CellContext`MT^2 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24) + ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)) 
+                    X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] - (128 $CellContext`MH^6 $CellContext`MT^2 - (
+                    4 $CellContext`MT^2 - $CellContext`S34 - $CellContext`T14 - \
+$CellContext`T24) (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^3 - 16 $CellContext`MH^4 (24 $CellContext`MT^4 + 
+                    14 $CellContext`MT^2 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24) - ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2) + 2 $CellContext`MH^2 (64 $CellContext`MT^6 + 
+                    240 $CellContext`MT^4 ($CellContext`S34 + \
+$CellContext`T14 + $CellContext`T24) + 
+                    28 $CellContext`MT^2 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2 - 
+                    7 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^3)) 
+                    X`DiscB[$CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T14 - $CellContext`T24, $CellContext`MT, $CellContext`MT]), 
+                    Complex[0, -2] $CellContext`MT^2 
+                    Pi (16 $CellContext`MH^2 $CellContext`MT^2 - (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)^(-3) (
+                    96 $CellContext`MH^4 $CellContext`MT^2 ($CellContext`S34 + \
+$CellContext`T14 + $CellContext`T24) + (
+                    4 $CellContext`MT^2 - $CellContext`S34 - $CellContext`T14 - \
+$CellContext`T24) (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^3 + 2 $CellContext`MH^2 (256 $CellContext`MT^6 - 
+                    144 $CellContext`MT^4 ($CellContext`S34 + \
+$CellContext`T14 + $CellContext`T24) - 
+                    40 $CellContext`MT^2 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2 + 
+                    3 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^3))}, 0, 4, 1],
+                    Editable->False], ")"}]}], ")"}]}]}], ")"}]}], "-", 
+            RowBox[{"8", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"-", "4"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                  RowBox[{"2", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                 ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+               RowBox[{"8", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "-", 
+               RowBox[{"8", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "-", 
+               RowBox[{"8", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+               RowBox[{"8", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", "T"}], "-", 
+                    RowBox[{"2", " ", "T14"}], "+", 
+                    RowBox[{"2", " ", "T24"}], "+", "U"}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                 ")"}]}]}], ")"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"ScalarC0", "[", 
+                 RowBox[{
+                  SuperscriptBox["MH", "2"], ",", 
+                  RowBox[{
+                   SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                   "T24"}], ",", 
+                  RowBox[{"-", 
+                   FractionBox[
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], 
+                    RowBox[{
+                    RowBox[{"-", "1"}], "+", 
+                    SuperscriptBox["\[Beta]", "2"]}]]}], ",", "MT", ",", "MT",
+                   ",", "MT"}], "]"}], " ", 
+                RowBox[{"(", 
+                 InterpretationBox[
+                  RowBox[{
+                   RowBox[{"-", 
+                    FractionBox[
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}]}]]}], "-", 
+                   FractionBox[
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "2"]}], 
+                    ")"}]}], ")"}], " ", 
+                    SuperscriptBox["\[Beta]", "2"]}], 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "16"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}], "2"]], "+", 
+                   InterpretationBox[
+                    SuperscriptBox[
+                    RowBox[{"O", "[", "\[Beta]", "]"}], "4"],
+                    SeriesData[$CellContext`\[Beta], 0, {}, 0, 4, 1],
+                    Editable->False]}],
+                  
+                  SeriesData[$CellContext`\[Beta], 0, {
+                   Rational[-1, 2] $CellContext`MT^2 ((-2) $CellContext`MH^2 + 
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2/(
+                    16 $CellContext`MH^2 $CellContext`MT^2 - (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2), 
+                    0, (-2) $CellContext`MH^2 $CellContext`MT^2 \
+($CellContext`MH^2 - $CellContext`S34 - $CellContext`T14 - $CellContext`T24) (
+                    16 $CellContext`MT^4 - ($CellContext`S34 + \
+$CellContext`T14 + $CellContext`T24)^2) ((-16) $CellContext`MH^2 \
+$CellContext`MT^2 + (
+                    
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)^(-2)}, 0, 4, 1],
+                  Editable->False], ")"}]}], "+", 
+               RowBox[{"(", 
+                InterpretationBox[
+                 RowBox[{
+                  RowBox[{
+                   FractionBox["1", "4"], " ", 
+                   RowBox[{"(", 
+                    RowBox[{"3", "+", 
+                    FractionBox["1", "\[Epsilon]"], "+", 
+                    FractionBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}]], "+", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ",", "MT", ",", "MT"}], "]"}]}], 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}]], "+", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], ")"}]}], "+", 
+                  FractionBox[
+                   RowBox[{"\[ImaginaryI]", " ", 
+                    SuperscriptBox["MT", "2"], " ", "\[Pi]", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", "\[Beta]"}], 
+                   RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "16"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}]], "+", 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "2"]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ",", "MT", ",", "MT"}], "]"}]}]}], ")"}], " ", 
+                    SuperscriptBox["\[Beta]", "2"]}], ")"}], "/", 
+                   SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "16"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}], "2"]}], "-", 
+                  FractionBox[
+                   RowBox[{"\[ImaginaryI]", " ", 
+                    SuperscriptBox["MT", "2"], " ", "\[Pi]", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "2"]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    SuperscriptBox["\[Beta]", "3"]}], 
+                   SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "16"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}], "2"]], "+", 
+                  InterpretationBox[
+                   SuperscriptBox[
+                    RowBox[{"O", "[", "\[Beta]", "]"}], "4"],
+                   SeriesData[$CellContext`\[Beta], 0, {}, 0, 4, 1],
+                   Editable->False]}],
+                 
+                 SeriesData[$CellContext`\[Beta], 0, {
+                  Rational[1, 4] (3 + 
+                    X`Eps^(-1) + $CellContext`MH^2 (
+                    4 $CellContext`MT^2 - $CellContext`S34 - $CellContext`T14 - \
+$CellContext`T24) (16 $CellContext`MH^2 $CellContext`MT^2 - (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)^(-1) 
+                    X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] + ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T14 - \
+$CellContext`T24) (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24) (16 $CellContext`MH^2 $CellContext`MT^2 - (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)^(-1) 
+                    X`DiscB[$CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T14 - $CellContext`T24, $CellContext`MT, $CellContext`MT] + 
+                    Log[$CellContext`MT^(-2) X`Mu^2]), 
+                   Complex[0, 1] $CellContext`MT^2 
+                   Pi ((-2) $CellContext`MH^2 + 
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)/((-16) $CellContext`MH^2 $CellContext`MT^2 + (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2), $CellContext`MT^2 ((-16) $CellContext`MH^2 \
+$CellContext`MT^2 + (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)^(-2) ((-2) (2 $CellContext`MH^2 - 
+                    4 $CellContext`MT^2 - $CellContext`S34 - $CellContext`T14 - \
+$CellContext`T24) (16 $CellContext`MH^2 $CellContext`MT^2 - (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2) + $CellContext`MH^2 (16 $CellContext`MT^4 - 
+                    8 $CellContext`MT^2 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24) + ($CellContext`S34 + $CellContext`T14 + $CellContext`T24) (
+                    4 $CellContext`MH^2 - 
+                    3 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24))) 
+                    X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] - (
+                    4 $CellContext`MH^4 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24) + ($CellContext`S34 + $CellContext`T14 + $CellContext`T24) (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2 - $CellContext`MH^2 (16 $CellContext`MT^4 + 
+                    8 $CellContext`MT^2 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24) + 
+                    5 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)) 
+                    X`DiscB[$CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T14 - $CellContext`T24, $CellContext`MT, $CellContext`MT]), 
+                   Complex[0, -1] $CellContext`MT^2 
+                   Pi ((-16) $CellContext`MH^2 $CellContext`MT^2 + (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)^(-2) (-($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24) (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2 + 
+                    2 $CellContext`MH^2 (
+                    16 $CellContext`MT^4 + ($CellContext`S34 + \
+$CellContext`T14 + $CellContext`T24)^2))}, 0, 4, 1],
+                 Editable->False], ")"}]}], ")"}]}], "+", 
+            RowBox[{
+             RowBox[{"(", 
+              InterpretationBox[
+               RowBox[{
+                RowBox[{
+                 RowBox[{"(", 
+                  RowBox[{"4", " ", "S", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", "T"}], "-", 
+                    RowBox[{"2", " ", "T14"}], "+", 
+                    RowBox[{"2", " ", "T24"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], ")"}], "/", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{
+                    RowBox[{"-", "16"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                   SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}]}], "-", 
+                RowBox[{
+                 RowBox[{"(", 
+                  RowBox[{"32", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", "S", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", "T"}], "-", 
+                    RowBox[{"2", " ", "T14"}], "+", 
+                    RowBox[{"2", " ", "T24"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], ")"}], " ", 
+                   SuperscriptBox["\[Beta]", "2"]}], ")"}], "/", 
+                 SuperscriptBox[
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "16"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}], "2"]}], "+", 
+                InterpretationBox[
+                 SuperscriptBox[
+                  RowBox[{"O", "[", "\[Beta]", "]"}], "3"],
+                 SeriesData[$CellContext`\[Beta], 0, {}, 0, 3, 1],
+                 Editable->False]}],
+               SeriesData[$CellContext`\[Beta], 0, {
+                4 $CellContext`S ((-16) $CellContext`MH^2 $CellContext`MT^2 + \
+(4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)^(-1) (4 (-$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - 2 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] + 2 $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]])) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] + 8 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] - 8 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] - 8 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]] + 8 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[
+                    2]] ((-$CellContext`T - 2 $CellContext`T14 + 
+                    2 $CellContext`T24 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] - 4 ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] (-$CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]]) + ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]]) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]))), 
+                 0, (-32) $CellContext`MT^2 $CellContext`S ((-2) \
+$CellContext`MH^2 + 
+                  4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24) ((-16) $CellContext`MH^2 $CellContext`MT^2 + (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)^(-2) (4 (-$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - 2 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] + 2 $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]])) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] + 8 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] - 8 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] - 8 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]] + 8 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[
+                    2]] ((-$CellContext`T - 2 $CellContext`T14 + 
+                    2 $CellContext`T24 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] - 4 ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] (-$CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]]) + ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]]) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])))}, 0, 3, 1],
+               Editable->False], ")"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"ScalarC0", "[", 
+                 RowBox[{
+                  SuperscriptBox["MH", "2"], ",", 
+                  RowBox[{
+                   SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                   "T24"}], ",", 
+                  RowBox[{"-", 
+                   FractionBox[
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], 
+                    RowBox[{
+                    RowBox[{"-", "1"}], "+", 
+                    SuperscriptBox["\[Beta]", "2"]}]]}], ",", "MT", ",", "MT",
+                   ",", "MT"}], "]"}], " ", 
+                RowBox[{"(", 
+                 InterpretationBox[
+                  RowBox[{
+                   RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ")"}]}], "+", 
+                   RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox["\[Beta]", "2"]}], "+", 
+                   RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox["\[Beta]", "4"]}], "+", 
+                   InterpretationBox[
+                    SuperscriptBox[
+                    RowBox[{"O", "[", "\[Beta]", "]"}], "5"],
+                    SeriesData[$CellContext`\[Beta], 0, {}, 0, 5, 1],
+                    Editable->False]}],
+                  
+                  SeriesData[$CellContext`\[Beta], 
+                   0, {$CellContext`MH^2 (
+                    4 $CellContext`MT^2 - $CellContext`S34 - $CellContext`T14 - \
+$CellContext`T24), 0, 4 $CellContext`MH^2 $CellContext`MT^2, 0, 
+                    4 $CellContext`MH^2 $CellContext`MT^2}, 0, 5, 1],
+                  Editable->False], ")"}]}], "+", 
+               RowBox[{"(", 
+                InterpretationBox[
+                 RowBox[{
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ",", "MT", ",", "MT"}], "]"}]}]}], ")"}], "+", 
+                  RowBox[{"\[ImaginaryI]", " ", "\[Pi]", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", "\[Beta]"}], "-", 
+                  RowBox[{"2", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24", "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ",", "MT", ",", "MT"}], "]"}]}]}], ")"}], " ", 
+                   SuperscriptBox["\[Beta]", "2"]}], "+", 
+                  RowBox[{"4", " ", "\[ImaginaryI]", " ", 
+                   SuperscriptBox["MT", "2"], " ", "\[Pi]", " ", 
+                   SuperscriptBox["\[Beta]", "3"]}], "-", 
+                  RowBox[{
+                   FractionBox["2", "3"], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24", "+", 
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ",", "MT", ",", "MT"}], "]"}]}]}], ")"}], " ", 
+                   SuperscriptBox["\[Beta]", "4"]}], "+", 
+                  InterpretationBox[
+                   SuperscriptBox[
+                    RowBox[{"O", "[", "\[Beta]", "]"}], "5"],
+                   SeriesData[$CellContext`\[Beta], 0, {}, 0, 5, 1],
+                   Editable->False]}],
+                 
+                 SeriesData[$CellContext`\[Beta], 
+                  0, {(-2) $CellContext`MH^2 
+                    X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] + (2 $CellContext`MH^2 - 
+                    4 $CellContext`MT^2 - $CellContext`S34 - $CellContext`T14 - \
+$CellContext`T24) 
+                    X`DiscB[$CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T14 - $CellContext`T24, $CellContext`MT, $CellContext`MT], 
+                   Complex[0, 1] 
+                   Pi (4 $CellContext`MT^2 + $CellContext`S34 + \
+$CellContext`T14 + $CellContext`T24), (-2) (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24 + 2 $CellContext`MT^2 
+                    X`DiscB[$CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T14 - $CellContext`T24, $CellContext`MT, $CellContext`MT]), 
+                   Complex[0, 4] $CellContext`MT^2 Pi, 
+                   Rational[-2, 3] (
+                    16 $CellContext`MT^2 + $CellContext`S34 + \
+$CellContext`T14 + $CellContext`T24 + 
+                    6 $CellContext`MT^2 
+                    X`DiscB[$CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T14 - $CellContext`T24, $CellContext`MT, $CellContext`MT])}, 0, 
+                  5, 1],
+                 Editable->False], ")"}]}], ")"}]}], "+", 
+            RowBox[{
+             RowBox[{"(", 
+              InterpretationBox[
+               RowBox[{
+                RowBox[{"-", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", "S34", " ", "T"}], "-", 
+                    SuperscriptBox["T", "2"], "+", 
+                    RowBox[{"4", " ", "T", " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "S", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "-", "U"}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", 
+                    RowBox[{"2", " ", "T14"}], "-", 
+                    RowBox[{"2", " ", "T24"}], "-", "U"}], ")"}]}], "+", 
+                    RowBox[{"2", " ", "S34", " ", "U"}], "-", 
+                    RowBox[{"4", " ", "T14", " ", "U"}], "+", 
+                    SuperscriptBox["U", "2"]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S", "-", "S34", "+", "T14", "+", "T24"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "+", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"U", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", "S", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", "S34", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", "T14", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", "T24", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"U", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"U", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "+", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "+", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"32", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "+", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "+", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"T", "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", "T"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], ")"}], "/", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "16"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}]}], ")"}]}], "+", 
+                RowBox[{
+                 RowBox[{"(", 
+                  RowBox[{"16", " ", 
+                   SuperscriptBox["MT", "2"], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", "S34", " ", "T"}], "-", 
+                    SuperscriptBox["T", "2"], "+", 
+                    RowBox[{"4", " ", "T", " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "S", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "-", "U"}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", 
+                    RowBox[{"2", " ", "T14"}], "-", 
+                    RowBox[{"2", " ", "T24"}], "-", "U"}], ")"}]}], "+", 
+                    RowBox[{"2", " ", "S34", " ", "U"}], "-", 
+                    RowBox[{"4", " ", "T14", " ", "U"}], "+", 
+                    SuperscriptBox["U", "2"]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S", "-", "S34", "+", "T14", "+", "T24"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "+", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"U", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", "S", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", "S34", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", "T14", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", "T24", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"U", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"U", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "+", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "+", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"32", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "+", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "+", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"T", "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", "T"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                   SuperscriptBox["\[Beta]", "2"]}], ")"}], "/", 
+                 SuperscriptBox[
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "16"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}], "2"]}], "+", 
+                InterpretationBox[
+                 SuperscriptBox[
+                  RowBox[{"O", "[", "\[Beta]", "]"}], "3"],
+                 SeriesData[$CellContext`\[Beta], 0, {}, 0, 3, 1],
+                 Editable->False]}],
+               
+               SeriesData[$CellContext`\[Beta], 
+                0, {(-2) ((-16) $CellContext`MH^2 $CellContext`MT^2 + (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)^(-1) (((-2) $CellContext`S34 $CellContext`T - \
+$CellContext`T^2 + 4 $CellContext`T $CellContext`T24 + 
+                    2 $CellContext`S ($CellContext`T - $CellContext`U) + 
+                    2 $CellContext`MH^2 ($CellContext`T + 2 $CellContext`T14 - 
+                    2 $CellContext`T24 - $CellContext`U) + 
+                    2 $CellContext`S34 $CellContext`U - 
+                    4 $CellContext`T14 $CellContext`U + $CellContext`U^2) \
+$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[2]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] - 
+                  4 ((-2) ($CellContext`S - $CellContext`S34 + \
+$CellContext`T14 + $CellContext`T24) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    1]] + ((-2) $CellContext`MH^2 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] + 2 $CellContext`MH^2 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - $CellContext`T $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - $CellContext`U $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] + 2 $CellContext`S $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] - 
+                   2 $CellContext`S34 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] + 
+                   2 $CellContext`T14 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] + 
+                   2 $CellContext`T24 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] + 2 $CellContext`MH^2 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] - $CellContext`T $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] - $CellContext`U $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] - 2 $CellContext`MH^2 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] + $CellContext`T $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] + $CellContext`U $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]]) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] + 
+                  8 ((-2) $CellContext`MH^2 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] - 
+                  8 ((-2) $CellContext`MH^2 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] + 32 ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]]) ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]]) - ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]]) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) - 
+                  8 ((-2) $CellContext`MH^2 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]] + 
+                  8 ((-2) $CellContext`MH^2 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]] - 4 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[2]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] (
+                    2 ($CellContext`MH^2 - $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - 
+                    2 ($CellContext`MH^2 - $CellContext`T) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    2]] + ($CellContext`T - $CellContext`U) \
+$CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    3]]) + ((-2) ($CellContext`MH^2 - $CellContext`U) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + 
+                    2 ($CellContext`MH^2 - $CellContext`T) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[
+                    2]] + (-$CellContext`T + $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])), 0, 
+                 16 $CellContext`MT^2 ((-2) $CellContext`MH^2 + 
+                  4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24) ((-16) $CellContext`MH^2 $CellContext`MT^2 + (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)^(-2) (((-2) $CellContext`S34 $CellContext`T - \
+$CellContext`T^2 + 4 $CellContext`T $CellContext`T24 + 
+                    2 $CellContext`S ($CellContext`T - $CellContext`U) + 
+                    2 $CellContext`MH^2 ($CellContext`T + 2 $CellContext`T14 - 
+                    2 $CellContext`T24 - $CellContext`U) + 
+                    2 $CellContext`S34 $CellContext`U - 
+                    4 $CellContext`T14 $CellContext`U + $CellContext`U^2) \
+$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[2]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] - 
+                  4 ((-2) ($CellContext`S - $CellContext`S34 + \
+$CellContext`T14 + $CellContext`T24) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    1]] + ((-2) $CellContext`MH^2 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] + 2 $CellContext`MH^2 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - $CellContext`T $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - $CellContext`U $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] + 2 $CellContext`S $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] - 
+                   2 $CellContext`S34 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] + 
+                   2 $CellContext`T14 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] + 
+                   2 $CellContext`T24 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] + 2 $CellContext`MH^2 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] - $CellContext`T $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] - $CellContext`U $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] - 2 $CellContext`MH^2 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] + $CellContext`T $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] + $CellContext`U $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]]) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] + 
+                  8 ((-2) $CellContext`MH^2 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] - 
+                  8 ((-2) $CellContext`MH^2 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] + 32 ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]]) ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]]) - ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]]) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) - 
+                  8 ((-2) $CellContext`MH^2 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]] + 
+                  8 ((-2) $CellContext`MH^2 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]] - 4 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[2]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] (
+                    2 ($CellContext`MH^2 - $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - 
+                    2 ($CellContext`MH^2 - $CellContext`T) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    2]] + ($CellContext`T - $CellContext`U) \
+$CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    3]]) + ((-2) ($CellContext`MH^2 - $CellContext`U) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + 
+                    2 ($CellContext`MH^2 - $CellContext`T) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[
+                    2]] + (-$CellContext`T + $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]))}, 0, 3, 1],
+               Editable->False], ")"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"ScalarC0", "[", 
+                 RowBox[{
+                  SuperscriptBox["MH", "2"], ",", 
+                  RowBox[{
+                   SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                   "T24"}], ",", 
+                  RowBox[{"-", 
+                   FractionBox[
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], 
+                    RowBox[{
+                    RowBox[{"-", "1"}], "+", 
+                    SuperscriptBox["\[Beta]", "2"]}]]}], ",", "MT", ",", "MT",
+                   ",", "MT"}], "]"}], " ", 
+                RowBox[{"(", 
+                 InterpretationBox[
+                  RowBox[{
+                   RowBox[{"-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}]}], ")"}]}]}], "-", 
+                   RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}]}], ")"}], " ", 
+                    SuperscriptBox["\[Beta]", "2"]}], "-", 
+                   RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}]}], ")"}], " ", 
+                    SuperscriptBox["\[Beta]", "4"]}], "+", 
+                   InterpretationBox[
+                    SuperscriptBox[
+                    RowBox[{"O", "[", "\[Beta]", "]"}], "5"],
+                    SeriesData[$CellContext`\[Beta], 0, {}, 0, 5, 1],
+                    Editable->False]}],
+                  
+                  SeriesData[$CellContext`\[Beta], 
+                   0, {(-4) $CellContext`MT^2 ((-2) $CellContext`MH^2 + 
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24), 0, (-4) $CellContext`MT^2 ((-2) $CellContext`MH^2 + 
+                    8 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24), 0, (-4) $CellContext`MT^2 ((-2) $CellContext`MH^2 + 
+                    12 $CellContext`MT^2 + $CellContext`S34 + \
+$CellContext`T14 + $CellContext`T24)}, 0, 5, 1],
+                  Editable->False], ")"}]}], "+", 
+               RowBox[{"(", 
+                InterpretationBox[
+                 RowBox[{
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ",", "MT", ",", "MT"}], "]"}]}]}], ")"}], "-", 
+                  RowBox[{"8", " ", "\[ImaginaryI]", " ", 
+                   SuperscriptBox["MT", "2"], " ", "\[Pi]", " ", "\[Beta]"}], 
+                  "+", 
+                  RowBox[{"4", " ", 
+                   SuperscriptBox["MT", "2"], " ", 
+                   RowBox[{"(", 
+                    RowBox[{"4", "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], "]"}], 
+                    "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                   SuperscriptBox["\[Beta]", "2"]}], "-", 
+                  RowBox[{"8", " ", "\[ImaginaryI]", " ", 
+                   SuperscriptBox["MT", "2"], " ", "\[Pi]", " ", 
+                   SuperscriptBox["\[Beta]", "3"]}], "+", 
+                  RowBox[{
+                   FractionBox["4", "3"], " ", 
+                   SuperscriptBox["MT", "2"], " ", 
+                   RowBox[{"(", 
+                    RowBox[{"16", "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ",", "MT", ",", "MT"}], "]"}]}]}], ")"}], " ", 
+                   SuperscriptBox["\[Beta]", "4"]}], "+", 
+                  InterpretationBox[
+                   SuperscriptBox[
+                    RowBox[{"O", "[", "\[Beta]", "]"}], "5"],
+                   SeriesData[$CellContext`\[Beta], 0, {}, 0, 5, 1],
+                   Editable->False]}],
+                 
+                 SeriesData[$CellContext`\[Beta], 
+                  0, {(4 $CellContext`MT^2 + $CellContext`S34 + \
+$CellContext`T14 + $CellContext`T24) 
+                    X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] + (
+                    4 $CellContext`MT^2 - $CellContext`S34 - $CellContext`T14 - \
+$CellContext`T24) 
+                    X`DiscB[$CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T14 - $CellContext`T24, $CellContext`MT, $CellContext`MT], 
+                   Complex[0, -8] $CellContext`MT^2 Pi, 
+                   4 $CellContext`MT^2 (4 + 
+                    X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] + 
+                    X`DiscB[$CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T14 - $CellContext`T24, $CellContext`MT, $CellContext`MT]), 
+                   Complex[0, -8] $CellContext`MT^2 Pi, 
+                   Rational[4, 3] $CellContext`MT^2 (16 + 
+                    3 X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] + 3 
+                    X`DiscB[$CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T14 - $CellContext`T24, $CellContext`MT, $CellContext`MT])}, 0, 
+                  5, 1],
+                 Editable->False], ")"}]}], ")"}]}]}], ")"}]}]}], ")"}]}]}], 
+     ")"}]}]}], "+", 
+  RowBox[{
+   FractionBox["1", 
+    RowBox[{"MW", " ", "SW"}]], 
+   RowBox[{"2", " ", 
+    SuperscriptBox["Alfas", "2"], " ", "c2", " ", "EL", " ", 
+    SuperscriptBox["MT", "2"], " ", 
+    RowBox[{"(", 
+     RowBox[{
+      RowBox[{"(", 
+       InterpretationBox[
+        RowBox[{
+         RowBox[{"(", 
+          RowBox[{
+           RowBox[{
+            FractionBox["1", "T"], 
+            RowBox[{"(", 
+             RowBox[{
+              RowBox[{
+               RowBox[{"(", 
+                RowBox[{
+                 RowBox[{"4", " ", 
+                  RowBox[{"(", 
+                   RowBox[{"2", "+", 
+                    FractionBox["1", "\[Epsilon]"], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T", ",", "MT", ",", "MT"}], "]"}], "+", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], ")"}]}], "-", 
+                 RowBox[{
+                  FractionBox["1", 
+                   RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}]], 
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    FractionBox[
+                    SuperscriptBox["MH", "2"], "\[Epsilon]"], "-", 
+                    RowBox[{"3", " ", "T"}], "-", 
+                    FractionBox["T", "\[Epsilon]"], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "+", 
+                    SqrtBox[
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], 
+                    ")"}]}]}]}], ")"}], " ", 
+               RowBox[{"(", 
+                RowBox[{
+                 RowBox[{"2", " ", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                 RowBox[{
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                 RowBox[{
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+              
+              RowBox[{
+               FractionBox["1", 
+                RowBox[{
+                 SuperscriptBox["MH", "2"], "-", "T"}]], 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  SuperscriptBox[
+                   RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"], "-", 
+                  SuperscriptBox[
+                   RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "+", 
+                    SqrtBox[
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], ")"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}]}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                  RowBox[{"2", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                 ")"}]}]}], "+", 
+              RowBox[{"16", " ", 
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"e", "[", "1", "]"}], ",", 
+                 RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+               RowBox[{"(", 
+                RowBox[{
+                 RowBox[{
+                  FractionBox["1", 
+                   RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], "2"]}]], 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "+", 
+                    SqrtBox[
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}]}], ")"}]}]}], "+", 
+                 RowBox[{
+                  FractionBox["1", 
+                   RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}]}]], 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T", ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                   
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}]}], 
+                ")"}]}], "+", 
+              RowBox[{
+               FractionBox["1", 
+                RowBox[{
+                 SuperscriptBox["MH", "2"], "-", "T"}]], 
+               RowBox[{"4", " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"DiscB", "[", 
+                   RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], "]"}], 
+                  "-", 
+                  RowBox[{"DiscB", "[", 
+                   RowBox[{"T", ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}]}], ")"}],
+                    " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                  RowBox[{"2", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}]}], ")"}]}], "+", 
+           RowBox[{
+            FractionBox["1", "S34"], 
+            RowBox[{"(", 
+             RowBox[{
+              RowBox[{
+               RowBox[{"(", 
+                RowBox[{
+                 RowBox[{"4", " ", 
+                  RowBox[{"(", 
+                   RowBox[{"2", "+", 
+                    FractionBox["1", "\[Epsilon]"], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"S34", ",", "MT", ",", "MT"}], "]"}], "+", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], ")"}]}], "-", 
+                 RowBox[{
+                  FractionBox["1", 
+                   RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}]], 
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    FractionBox[
+                    SuperscriptBox["MH", "2"], "\[Epsilon]"], "-", 
+                    RowBox[{"3", " ", "S34"}], "-", 
+                    FractionBox["S34", "\[Epsilon]"], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{"S34", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"S34", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{"S34", " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "S34", "+", 
+                    SqrtBox[
+                    RowBox[{"S34", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], 
+                    ")"}]}]}]}], ")"}], " ", 
+               RowBox[{"(", 
+                RowBox[{
+                 RowBox[{"2", " ", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                 RowBox[{
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                 RowBox[{
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+              
+              RowBox[{
+               FractionBox["1", 
+                RowBox[{
+                 SuperscriptBox["MH", "2"], "-", "S34"}]], 
+               RowBox[{"4", " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"DiscB", "[", 
+                   RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], "]"}], 
+                  "-", 
+                  RowBox[{"DiscB", "[", 
+                   RowBox[{"S34", ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                  RowBox[{"2", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], "+", 
+              RowBox[{
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"ec", "[", "4", "]"}], ",", 
+                 RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+               RowBox[{"(", 
+                RowBox[{
+                 RowBox[{"-", 
+                  RowBox[{
+                   FractionBox["1", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}]], 
+                   RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"S34", ",", "MT", ",", "MT"}], "]"}]}], ")"}], 
+                    " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}]}], 
+                 "+", 
+                 RowBox[{
+                  FractionBox["1", 
+                   SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], "2"]], 
+                  RowBox[{"8", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"S34", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "S34", "+", 
+                    SqrtBox[
+                    RowBox[{"S34", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}]}], 
+                ")"}]}], "-", 
+              RowBox[{
+               FractionBox["1", 
+                RowBox[{
+                 SuperscriptBox["MH", "2"], "-", "S34"}]], 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  SuperscriptBox[
+                   RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"], "-", 
+                  SuperscriptBox[
+                   RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "S34", "+", 
+                    SqrtBox[
+                    RowBox[{"S34", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], ")"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                  RowBox[{"2", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                 ")"}]}]}], "+", 
+              RowBox[{
+               FractionBox["1", "S"], 
+               RowBox[{"(", 
+                RowBox[{
+                 RowBox[{
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"2", "+", 
+                    FractionBox["1", "\[Epsilon]"], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"S34", ",", "MT", ",", "MT"}], "]"}], "+", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}]], 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    FractionBox[
+                    SuperscriptBox["MH", "2"], "\[Epsilon]"], "-", 
+                    RowBox[{"3", " ", "S34"}], "-", 
+                    FractionBox["S34", "\[Epsilon]"], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{"S34", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"S34", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{"S34", " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "S34", "+", 
+                    SqrtBox[
+                    RowBox[{"S34", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], 
+                    ")"}]}]}]}], ")"}], " ", 
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", "T"}], "-", "T14", "+", "T24", "+", "U"}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                   ")"}]}], "-", 
+                 RowBox[{
+                  FractionBox["1", 
+                   RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}]], 
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], "]"}], 
+                    "-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"S34", ",", "MT", ",", "MT"}], "]"}]}], ")"}], 
+                   " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "-", "T24", "-", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"2", " ", "S"}], "-", 
+                    RowBox[{"3", " ", "S34"}], "-", 
+                    RowBox[{"8", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "7"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S"}], "+", 
+                    RowBox[{"3", " ", "S34"}], "+", 
+                    RowBox[{"8", " ", "T"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S", "+", "S34", "+", 
+                    RowBox[{"2", " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S"}], "+", 
+                    RowBox[{"3", " ", "S34"}], "+", 
+                    RowBox[{"4", " ", "T14"}], "+", 
+                    RowBox[{"4", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S"}], "+", 
+                    RowBox[{"3", " ", "S34"}], "+", 
+                    RowBox[{"4", " ", "T14"}], "+", 
+                    RowBox[{"4", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], ")"}]}]}], "+", 
+                 RowBox[{"8", " ", 
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}]}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"S34", ",", "MT", ",", "MT"}], "]"}]}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "U"}], ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "U"}], ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"4", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", 
+                    RowBox[{"4", " ", "T"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "-", "T24", "-", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], "+", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], "2"]}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"S34", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "S34", "+", 
+                    SqrtBox[
+                    RowBox[{"S34", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", "T14"}], "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}]}], ")"}]}], "-", 
+                 RowBox[{
+                  FractionBox["1", 
+                   RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}]], 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"], "-", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "S34", "+", 
+                    SqrtBox[
+                    RowBox[{"S34", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", "T14", "-", "T24", "-", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", "T14", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"T", "-", "T14", "-", "T24", "-", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], ")"}]}]}]}], ")"}]}]}], ")"}]}], 
+           "+", 
+           RowBox[{
+            FractionBox["1", 
+             RowBox[{
+              RowBox[{"2", " ", 
+               SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", "U"}]], 
+            RowBox[{"(", 
+             RowBox[{
+              RowBox[{
+               RowBox[{"(", 
+                RowBox[{
+                 RowBox[{"4", " ", 
+                  RowBox[{"(", 
+                   RowBox[{"2", "+", 
+                    FractionBox["1", "\[Epsilon]"], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ",", "MT", ",", "MT"}], "]"}], "+", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], ")"}]}], "+", 
+                 RowBox[{
+                  FractionBox["1", 
+                   RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}]], 
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}]}], "+", 
+                    FractionBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], "\[Epsilon]"], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U", "+", 
+                    SqrtBox[
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], 
+                    ")"}]}]}]}], ")"}], " ", 
+               RowBox[{"(", 
+                RowBox[{
+                 RowBox[{"2", " ", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                 RowBox[{
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                 RowBox[{
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+              
+              RowBox[{
+               RowBox[{"(", 
+                RowBox[{
+                 RowBox[{
+                  FractionBox["1", 
+                   RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}]], 
+                  RowBox[{"8", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], "]"}], 
+                    "-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], "-", 
+                 RowBox[{
+                  FractionBox["1", 
+                   SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], "2"]], 
+                  RowBox[{"8", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U", "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U", "+", 
+                    SqrtBox[
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}]}], 
+                ")"}], " ", 
+               RowBox[{"Pair", "[", 
+                RowBox[{
+                 RowBox[{"ec", "[", "5", "]"}], ",", 
+                 RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+              RowBox[{
+               FractionBox["1", 
+                RowBox[{
+                 RowBox[{"-", 
+                  SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                 "U"}]], 
+               RowBox[{"4", " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"-", 
+                   RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                  RowBox[{"DiscB", "[", 
+                   RowBox[{
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"2", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                 ")"}]}]}], "+", 
+              RowBox[{
+               FractionBox["1", 
+                RowBox[{
+                 RowBox[{"-", 
+                  SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                 "U"}]], 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"-", 
+                   SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                  SuperscriptBox[
+                   RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U", "+", 
+                    SqrtBox[
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], ")"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"-", "2"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                 ")"}]}]}], "+", 
+              RowBox[{
+               FractionBox["1", "S"], 
+               RowBox[{"(", 
+                RowBox[{
+                 RowBox[{
+                  RowBox[{"-", "8"}], " ", 
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], "2"]}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U", "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U", "+", 
+                    SqrtBox[
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "+", "S", "-", 
+                    RowBox[{"2", " ", "S34"}], "-", "T14", "-", "T24"}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "-", "S", "+", 
+                    RowBox[{"2", " ", "S34"}], "+", "T14", "+", "T24"}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"3", " ", "S"}], "+", "T14", "+", "T24", "+", 
+                    RowBox[{"4", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"3", " ", "S"}], "-", 
+                    RowBox[{"4", " ", "T"}], "-", "T14", "-", "T24"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", "T14"}], "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}]}], "-", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}]}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], "]"}], 
+                    "-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "+", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "+", "S34", "+", "T", "-", 
+                    RowBox[{"3", " ", "U"}]}], ")"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "+", "S34", "-", 
+                    RowBox[{"3", " ", "T"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", "T14"}], "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}]}], ")"}]}], "+", 
+                 RowBox[{
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"2", "+", 
+                    FractionBox["1", "\[Epsilon]"], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ",", "MT", ",", "MT"}], "]"}], "+", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}]], 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}]}], "+", 
+                    FractionBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], "\[Epsilon]"], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U", "+", 
+                    SqrtBox[
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], 
+                    ")"}]}]}]}], ")"}], " ", 
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", "T14"}], "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                   ")"}]}], "+", 
+                 RowBox[{
+                  FractionBox["1", 
+                   RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}]], 
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S", "-", "T14", "-", 
+                    "T24"}], ")"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "-", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "-", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S", "-", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "7"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"5", " ", "S"}], "+", 
+                    RowBox[{"8", " ", "T"}], "+", 
+                    RowBox[{"3", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"5", " ", "S"}], "-", 
+                    RowBox[{"3", " ", "T14"}], "-", 
+                    RowBox[{"3", " ", "T24"}], "-", 
+                    RowBox[{"8", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S", "+", 
+                    RowBox[{"4", " ", "S34"}], "+", 
+                    RowBox[{"3", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S", "+", 
+                    RowBox[{"4", " ", "S34"}], "+", 
+                    RowBox[{"3", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], "+", 
+                 RowBox[{
+                  FractionBox["1", 
+                   RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}]], 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U", "+", 
+                    SqrtBox[
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S", "-", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "-", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", "T14"}], "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S34"}], "+", 
+                    RowBox[{"2", " ", "T"}], "+", "T14", "+", "T24"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S34"}], "+", "T14", "+", "T24", "+", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], ")"}]}]}]}], ")"}]}], "+", 
+              RowBox[{
+               FractionBox["1", "T14"], 
+               RowBox[{"(", 
+                RowBox[{
+                 RowBox[{"8", " ", 
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}]}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], "]"}], 
+                    "-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"3", " ", "S34"}], "+", "T", "+", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S", "-", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "+", "S34", "-", 
+                    RowBox[{"3", " ", "T"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}]}], "-", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], "2"]}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U", "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U", "+", 
+                    SqrtBox[
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    RowBox[{"2", " ", "T14"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S", "+", 
+                    RowBox[{"4", " ", "S34"}], "+", 
+                    RowBox[{"3", " ", "T14"}], "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S", "-", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S", "+", 
+                    RowBox[{"4", " ", "T"}], "+", 
+                    RowBox[{"3", " ", "T14"}], "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    RowBox[{"2", " ", "T14"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}]}], ")"}]}], "+", 
+                 RowBox[{
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"2", "+", 
+                    FractionBox["1", "\[Epsilon]"], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ",", "MT", ",", "MT"}], "]"}], "+", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}]], 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}]}], "+", 
+                    FractionBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], "\[Epsilon]"], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U", "+", 
+                    SqrtBox[
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], 
+                    ")"}]}]}]}], ")"}], " ", 
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", "S"}], "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], "+", 
+                 RowBox[{
+                  FractionBox["1", 
+                   RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}]], 
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    "U"}], ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"3", " ", "S34"}], "-", 
+                    RowBox[{"3", " ", "T"}], "-", 
+                    RowBox[{"2", " ", "T14"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"3", " ", "S34"}], "-", 
+                    RowBox[{"3", " ", "T"}], "-", 
+                    RowBox[{"2", " ", "T14"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{"S", "-", "T24"}], ")"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", "S"}], "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S", "-", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "7"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"3", " ", "S"}], "+", 
+                    RowBox[{"8", " ", "T"}], "+", 
+                    RowBox[{"5", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "7"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"3", " ", "S"}], "+", 
+                    RowBox[{"8", " ", "S34"}], "+", 
+                    RowBox[{"5", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], "+", 
+                 RowBox[{
+                  FractionBox["1", 
+                   RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}]], 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U", "+", 
+                    SqrtBox[
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S", "+", "T24", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S", "+", "T24", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{"S", "-", "T24"}], ")"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S", "-", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S", "+", 
+                    RowBox[{"2", " ", "S34"}], "+", "T24", "+", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S", "+", 
+                    RowBox[{"2", " ", "T"}], "+", "T24", "+", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], ")"}]}]}]}], ")"}]}]}], ")"}]}], 
+           "+", 
+           RowBox[{
+            FractionBox["1", "U"], 
+            RowBox[{"(", 
+             RowBox[{
+              RowBox[{
+               FractionBox["1", 
+                RowBox[{
+                 SuperscriptBox["MH", "2"], "-", "U"}]], 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  SuperscriptBox[
+                   RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"], "-", 
+                  SuperscriptBox[
+                   RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "U", "+", 
+                    SqrtBox[
+                    RowBox[{"U", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], ")"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                  RowBox[{"2", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                 ")"}]}]}], "-", 
+              RowBox[{"16", " ", 
+               RowBox[{"(", 
+                RowBox[{
+                 RowBox[{
+                  FractionBox["1", 
+                   RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}]}]], 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    FractionBox[
+                    SuperscriptBox["MH", "2"], "\[Epsilon]"], "-", 
+                    RowBox[{"3", " ", "U"}], "-", 
+                    FractionBox["U", "\[Epsilon]"], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{"U", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"U", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{"U", " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "U", "+", 
+                    SqrtBox[
+                    RowBox[{"U", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                 "+", 
+                 RowBox[{
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], "2"]}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "U", "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"U", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "U", "+", 
+                    SqrtBox[
+                    RowBox[{"U", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], "+", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}]}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"U", ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                    
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}]}], 
+                   ")"}]}]}], ")"}]}], "+", 
+              RowBox[{"4", " ", 
+               RowBox[{"(", 
+                RowBox[{
+                 RowBox[{
+                  RowBox[{"(", 
+                   RowBox[{"2", "+", 
+                    FractionBox["1", "\[Epsilon]"], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"U", ",", "MT", ",", "MT"}], "]"}], "+", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], ")"}], " ", 
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                 
+                 RowBox[{
+                  FractionBox["1", 
+                   RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}]], 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], "]"}], 
+                    "-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"U", ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                   
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}]}], ")"}]}], "+", 
+              RowBox[{
+               FractionBox["1", "T14"], 
+               RowBox[{"(", 
+                RowBox[{
+                 RowBox[{"-", 
+                  RowBox[{
+                   FractionBox["1", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}]], 
+                   RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"], "-", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "U", "+", 
+                    SqrtBox[
+                    RowBox[{"U", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S", "-", "S34", "+", "T", "-", "T24"}], ")"}], 
+                    " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S", "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S", "+", "S34", "-", "T", "+", "T24"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", "S", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S", "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S", "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}]}], "+", 
+                 RowBox[{
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"2", "+", 
+                    FractionBox["1", "\[Epsilon]"], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"U", ",", "MT", ",", "MT"}], "]"}], "+", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}]], 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    FractionBox[
+                    SuperscriptBox["MH", "2"], "\[Epsilon]"], "-", 
+                    RowBox[{"3", " ", "U"}], "-", 
+                    FractionBox["U", "\[Epsilon]"], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{"U", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"U", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{"U", " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "U", "+", 
+                    SqrtBox[
+                    RowBox[{"U", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], 
+                    ")"}]}]}]}], ")"}], " ", 
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", "S"}], "+", "S34", "-", "T", "+", "T24"}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], "-", 
+                 RowBox[{"8", " ", 
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], "2"]}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "U", "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"U", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "U", "+", 
+                    SqrtBox[
+                    RowBox[{"U", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S"}], "+", 
+                    RowBox[{"2", " ", "T24"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S"}], "+", 
+                    RowBox[{"2", " ", "T24"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S"}], "+", 
+                    RowBox[{"2", " ", "T24"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", "S", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", "T24", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", "S", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", "T24", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"U", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], "+", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}]}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"U", ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                    
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S34"}], "+", 
+                    RowBox[{"2", " ", "T"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S34"}], "+", 
+                    RowBox[{"2", " ", "T"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", "S34"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S", "-", "S34", "+", "T", "-", "T24"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", "T"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}]}], ")"}]}], "-", 
+                 RowBox[{
+                  FractionBox["1", 
+                   RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}]], 
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], "]"}], 
+                    "-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"U", ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                   
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "5"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", "S34"}], "+", 
+                    RowBox[{"4", " ", "T"}], "+", 
+                    RowBox[{"2", " ", "T14"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "5"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", "S34"}], "+", 
+                    RowBox[{"4", " ", "T"}], "+", 
+                    RowBox[{"2", " ", "T14"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S", "-", "S34", "+", "T", "-", "T24"}], ")"}], 
+                    " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"8", " ", "S34"}], "-", 
+                    RowBox[{"2", " ", "T14"}], "-", 
+                    RowBox[{"3", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S34"}], "+", "T14", "+", 
+                    RowBox[{"2", " ", "T24"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"8", " ", "T"}], "-", 
+                    RowBox[{"2", " ", "T14"}], "-", 
+                    RowBox[{"3", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}]}], ")"}]}], "-", 
+              RowBox[{
+               FractionBox["1", 
+                RowBox[{
+                 SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                 "T24"}]], 
+               RowBox[{"(", 
+                RowBox[{
+                 RowBox[{
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"2", "+", 
+                    FractionBox["1", "\[Epsilon]"], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"U", ",", "MT", ",", "MT"}], "]"}], "+", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}]], 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    FractionBox[
+                    SuperscriptBox["MH", "2"], "\[Epsilon]"], "-", 
+                    RowBox[{"3", " ", "U"}], "-", 
+                    FractionBox["U", "\[Epsilon]"], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{"U", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"U", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{"U", " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "U", "+", 
+                    SqrtBox[
+                    RowBox[{"U", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], 
+                    ")"}]}]}]}], ")"}], " ", 
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S", "+", "T", "+", 
+                    RowBox[{"2", " ", "T14"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], "-", 
+                 RowBox[{
+                  FractionBox["1", 
+                   RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}]], 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"], "-", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "U", "+", 
+                    SqrtBox[
+                    RowBox[{"U", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"S", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"T24", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "+", "T14", "+", 
+                    "T24", "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"S", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"S", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S", "-", "T", "-", 
+                    RowBox[{"2", " ", "T14"}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], "-", 
+                 RowBox[{
+                  FractionBox["1", 
+                   RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}]], 
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], "]"}], 
+                    "-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"U", ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                   
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"2", " ", "S"}], "+", 
+                    RowBox[{"2", " ", "T"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"2", " ", "S34"}], "-", 
+                    RowBox[{"2", " ", "T14"}], "+", 
+                    RowBox[{"6", " ", "T24"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "5"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"6", " ", "S34"}], "-", 
+                    RowBox[{"2", " ", "T14"}], "-", 
+                    RowBox[{"2", " ", "T24"}], "+", 
+                    RowBox[{"3", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "+", 
+                    RowBox[{"2", " ", "S"}], "-", 
+                    RowBox[{"2", " ", "T"}], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "+", 
+                    RowBox[{"2", " ", "S"}], "-", 
+                    RowBox[{"2", " ", "T"}], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S", "-", "T", "-", 
+                    RowBox[{"2", " ", "T14"}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"16", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], "-", 
+                 RowBox[{"8", " ", 
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], "2"]}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "U", "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"U", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "U", "+", 
+                    SqrtBox[
+                    RowBox[{"U", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "U"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S34"}], "-", 
+                    RowBox[{"2", " ", "T14"}], "-", 
+                    RowBox[{"2", " ", "T24"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", "T24"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"2", " ", "S"}], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"2", " ", "S"}], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], "+", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}]}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"U", ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                    
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", "S34"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"2", " ", "S34"}], "-", 
+                    RowBox[{"2", " ", "T14"}], "+", 
+                    RowBox[{"2", " ", "T24"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "T"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"2", " ", "T"}], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "T"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}], 
+           "+", 
+           RowBox[{
+            FractionBox["1", 
+             RowBox[{
+              SuperscriptBox["MH", "2"], "-", "S", "-", "T24", "-", "U"}]], 
+            RowBox[{"(", 
+             RowBox[{
+              RowBox[{"-", 
+               RowBox[{
+                FractionBox["1", "S34"], 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{"2", "+", 
+                    FractionBox["1", "\[Epsilon]"], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"S34", ",", "MT", ",", "MT"}], "]"}], "+", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S"}], "+", "T", "+", "T14"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], "-", 
+                  RowBox[{
+                   FractionBox["1", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}]], 
+                   RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    FractionBox[
+                    SuperscriptBox["MH", "2"], "\[Epsilon]"], "-", 
+                    RowBox[{"3", " ", "S34"}], "-", 
+                    FractionBox["S34", "\[Epsilon]"], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{"S34", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"S34", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{"S34", " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "S34", "+", 
+                    SqrtBox[
+                    RowBox[{"S34", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S"}], "+", "T", "+", "T14"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], "+", 
+                  RowBox[{"8", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}]}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"S34", ",", "MT", ",", "MT"}], "]"}]}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S34"}], "+", 
+                    RowBox[{"4", " ", "T"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"2", " ", "S"}], "+", "S34", "+", 
+                    RowBox[{"2", " ", "T24"}], "-", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"4", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"2", " ", "T"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"2", " ", "T"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], "+", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], "2"]}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"S34", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "S34", "+", 
+                    SqrtBox[
+                    RowBox[{"S34", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S34"}], "+", 
+                    RowBox[{"4", " ", "T14"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", 
+                    RowBox[{"4", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "+", 
+                    RowBox[{"2", " ", "S"}], "-", "S34", "+", 
+                    RowBox[{"2", " ", "T24"}], "-", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", 
+                    RowBox[{"2", " ", "T14"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", 
+                    RowBox[{"2", " ", "T14"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}]}], ")"}]}], "-", 
+                  RowBox[{
+                   FractionBox["1", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}]], 
+                   RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], "]"}], 
+                    "-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"S34", ",", "MT", ",", "MT"}], "]"}]}], ")"}], 
+                    " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", 
+                    RowBox[{"2", " ", "T"}], "+", 
+                    RowBox[{"2", " ", "T14"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S"}], "-", 
+                    RowBox[{"3", " ", "S34"}], "+", 
+                    RowBox[{"2", " ", "T24"}], "-", 
+                    RowBox[{"6", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"2", " ", "S"}], "+", "S34", "+", 
+                    RowBox[{"6", " ", "T24"}], "-", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"2", " ", "S"}], "-", "T", "-", "T14"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", 
+                    RowBox[{"2", " ", "T"}], "+", 
+                    RowBox[{"2", " ", "T14"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", 
+                    RowBox[{"2", " ", "T"}], "+", 
+                    RowBox[{"2", " ", "T14"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], ")"}]}]}], "-", 
+                  RowBox[{
+                   FractionBox["1", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}]], 
+                   RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"], "-", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "S34", "+", 
+                    SqrtBox[
+                    RowBox[{"S34", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"2", " ", "S"}], "-", "T", "-", "T14"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"T14", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", "T14", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", "T24", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "+", "S", "-", "S34", "+", 
+                    "T24", "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"T14", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], ")"}]}]}]}], ")"}]}]}], "+", 
+              RowBox[{
+               FractionBox["1", "T"], 
+               RowBox[{"(", 
+                RowBox[{
+                 RowBox[{"4", " ", 
+                  RowBox[{"(", 
+                   RowBox[{"2", "+", 
+                    FractionBox["1", "\[Epsilon]"], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T", ",", "MT", ",", "MT"}], "]"}], "+", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], ")"}], " ", 
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}]}], ")"}],
+                     " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T14", "+", 
+                    
+                    RowBox[{"2", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], "-", 
+                 RowBox[{
+                  FractionBox["1", 
+                   RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}]], 
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    FractionBox[
+                    SuperscriptBox["MH", "2"], "\[Epsilon]"], "-", 
+                    RowBox[{"3", " ", "T"}], "-", 
+                    FractionBox["T", "\[Epsilon]"], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "+", 
+                    SqrtBox[
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}]}], ")"}],
+                     " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T14", "+", 
+                    
+                    RowBox[{"2", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], "-", 
+                 RowBox[{
+                  FractionBox["1", 
+                   RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}]], 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"], "-", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "+", 
+                    SqrtBox[
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"T14", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S"}], "+", "S34", "+", "T14", "+", 
+                    RowBox[{"2", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"T14", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"S", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"T14", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                    RowBox[{"2", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}]}]}], ")"}],
+                     " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], "-", 
+                 RowBox[{
+                  FractionBox["1", 
+                   RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}]], 
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], "]"}], 
+                    "-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T", ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                   
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"2", " ", "S34"}], "-", "T", "+", 
+                    RowBox[{"2", " ", "T14"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"2", " ", "S34"}], "-", 
+                    RowBox[{"5", " ", "T"}], "-", 
+                    RowBox[{"2", " ", "T14"}], "-", 
+                    RowBox[{"8", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"2", " ", "S34"}], "-", "T", "+", 
+                    RowBox[{"2", " ", "T14"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"8", " ", "S"}], "-", 
+                    RowBox[{"2", " ", "S34"}], "-", 
+                    RowBox[{"3", " ", "T"}], "-", 
+                    RowBox[{"2", " ", "T14"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"2", " ", "S34"}], "-", "T", "+", 
+                    RowBox[{"2", " ", "T14"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                    RowBox[{"2", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"16", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], "-", 
+                 RowBox[{"8", " ", 
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], "2"]}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "+", 
+                    SqrtBox[
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "+", 
+                    RowBox[{"2", " ", "T14"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S34"}], "+", "T", "-", 
+                    RowBox[{"2", " ", "T14"}], "+", 
+                    RowBox[{"4", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T14", "+", 
+                    
+                    RowBox[{"2", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"2", " ", "S34"}], "-", 
+                    RowBox[{"3", " ", "T"}], "-", 
+                    RowBox[{"2", " ", "T14"}], "-", 
+                    RowBox[{"4", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "+", 
+                    RowBox[{"2", " ", "T14"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], "+", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}]}]], 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T", ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                    
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"2", " ", "S34"}], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "5"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", "S34"}], "+", 
+                    RowBox[{"3", " ", "T"}], "+", 
+                    RowBox[{"4", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T14", "+", 
+                    
+                    RowBox[{"2", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "T", "-", 
+                    RowBox[{"4", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"2", " ", "S34"}], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}]}], ")"}]}]}], ")"}]}], "+", 
+              RowBox[{
+               FractionBox["1", "T14"], 
+               RowBox[{"(", 
+                RowBox[{
+                 RowBox[{
+                  RowBox[{"(", 
+                   RowBox[{"4", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", "S"}], "-", "S34", "+", "T", "-", 
+                    RowBox[{"2", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T14", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{"T14", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{"U", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T24", " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "U", " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT", ",", "MT"}], "]"}]}]}], ")"}]}], ")"}], 
+                  "/", 
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                   ")"}]}], "-", 
+                 RowBox[{
+                  RowBox[{"(", 
+                   RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", "S", " ", "S34"}], "-", 
+                    SuperscriptBox["S34", "2"], "+", 
+                    SuperscriptBox["T", "2"], "+", 
+                    RowBox[{"2", " ", "S34", " ", "T14"}], "-", 
+                    RowBox[{"2", " ", "T", " ", "T14"}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", "S"}], "-", "S34", "+", "T", "-", 
+                    RowBox[{"2", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"4", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"2", " ", "S34", " ", "U"}], "+", 
+                    RowBox[{"2", " ", "T", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T"}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T"}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T"}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"3", " ", "S34"}], "-", 
+                    RowBox[{"3", " ", "T"}], "-", 
+                    RowBox[{"4", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T"}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"3", " ", "S34"}], "-", 
+                    RowBox[{"3", " ", "T"}], "-", 
+                    RowBox[{"4", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T"}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T"}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"32", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}]}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{"2", " ", "T14", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T14", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{"T14", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{"T24", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{"U", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", "T14", " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{"T14", " ", "T24", " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{"T14", " ", "U", " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT", ",", "MT"}], "]"}]}]}], ")"}]}], ")"}], 
+                  "/", 
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                   ")"}]}], "+", 
+                 RowBox[{
+                  RowBox[{"(", 
+                   RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", "S"}], "-", "S34", "+", "T", "-", 
+                    RowBox[{"2", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}], "+", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    "\[Epsilon]"], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{"T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T14", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}], " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T24", "-", "U"}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "8"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT", ",", "MT"}], "]"}]}]}], ")"}]}], ")"}], 
+                  "/", 
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                   ")"}]}], "-", 
+                 RowBox[{"2", " ", 
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"2", "+", 
+                    FractionBox["1", "\[Epsilon]"], "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT"}], "]"}], "+", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", "S"}], "-", "S34", "+", "T", "-", 
+                    RowBox[{"2", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", "S", " ", "S34"}], "-", 
+                    RowBox[{"S34", " ", "T14"}], "+", 
+                    RowBox[{"T", " ", "T14"}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S", "-", "T24"}], ")"}]}], "+", 
+                    RowBox[{"2", " ", "T", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T"}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T"}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T"}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S", "+", "T14", "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T"}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S", "+", "T14", "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T"}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T"}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT", ",", "MT"}], "]"}]}]}], ")"}]}], "+", 
+                 RowBox[{"4", " ", 
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "T"}], ")"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"16", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"64", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", "T14"}], "+", "T24", "+", "U"}], 
+                    ")"}]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", "T14"}], "+", 
+                    RowBox[{"5", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "10"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"10", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T14", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"64", " ", 
+                    SuperscriptBox["MT", "6"]}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "+", 
+                    RowBox[{"5", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "+", 
+                    SuperscriptBox["T24", "3"], "+", 
+                    RowBox[{
+                    SuperscriptBox["T14", "2"], " ", "U"}], "+", 
+                    RowBox[{"10", " ", "T14", " ", "T24", " ", "U"}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T24", "2"], " ", "U"}], "+", 
+                    RowBox[{"5", " ", "T14", " ", 
+                    SuperscriptBox["U", "2"]}], "+", 
+                    RowBox[{"3", " ", "T24", " ", 
+                    SuperscriptBox["U", "2"]}], "+", 
+                    SuperscriptBox["U", "3"], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", "T14"}], "-", 
+                    RowBox[{"5", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "10"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    SuperscriptBox["T14", "2"], "+", 
+                    RowBox[{"10", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{"2", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", "T14"}], "+", "T24", "+", "U"}], 
+                    ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "16"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"6", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], ")"}]}], "+", 
+                    RowBox[{"T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["MH", "4"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT", ",", "MT"}], "]"}]}]}], ")"}]}], ")"}], 
+                    "/", 
+                    RowBox[{"(", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}], "2"]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "T"}], ")"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"16", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"4", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "-", 
+                    RowBox[{"4", " ", "T14", " ", "U"}], "+", 
+                    RowBox[{"2", " ", "T24", " ", "U"}], "+", 
+                    SuperscriptBox["U", "2"], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", "T14"}], "+", "T24", "+", "U"}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{"T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], "2"], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T14", "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], ")"}], 
+                    " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T14", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14"}], "+", 
+                    RowBox[{"T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"10", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "5"}], " ", "T14"}], "+", "T24", "+", "U"}], 
+                    ")"}]}]}], ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"64", " ", 
+                    SuperscriptBox["MT", "8"]}], "+", 
+                    RowBox[{"48", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "-", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], ")"}]}], 
+                    "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "3"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", "T14"}], "+", 
+                    RowBox[{"5", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT", ",", "MT"}], "]"}]}]}], ")"}]}], ")"}], 
+                    "/", 
+                    RowBox[{"(", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}], "2"]}], ")"}]}]}], ")"}]}]}], ")"}]}]}], ")"}]}]}],
+           ")"}], "+", 
+         RowBox[{
+          FractionBox["1", 
+           RowBox[{"T14", " ", 
+            RowBox[{"(", 
+             RowBox[{
+              SuperscriptBox["MH", "2"], "-", "S", "-", "T24", "-", "U"}], 
+             ")"}]}]], 
+          RowBox[{
+           RowBox[{"(", 
+            RowBox[{
+             RowBox[{"-", 
+              RowBox[{"(", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{"8", " ", 
+                  SuperscriptBox["MT", "2"], " ", 
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", "S"}], "-", "S34", "+", "T", "-", 
+                    RowBox[{"2", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], ")"}], " ", 
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"4", " ", "T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "-", 
+                    RowBox[{"4", " ", "T14", " ", "U"}], "+", 
+                    RowBox[{"2", " ", "T24", " ", "U"}], "+", 
+                    SuperscriptBox["U", "2"], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", "T14"}], "+", "T24", "+", "U"}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{"T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], "2"], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T14", "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], ")"}], 
+                    " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T14", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14"}], "+", 
+                    RowBox[{"T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"10", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "5"}], " ", "T14"}], "+", "T24", "+", "U"}], 
+                    ")"}]}]}], ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}]}], 
+                    "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"64", " ", 
+                    SuperscriptBox["MT", "8"]}], "+", 
+                    RowBox[{"48", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "-", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], ")"}]}], 
+                    "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "3"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", "T14"}], "+", 
+                    RowBox[{"5", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT", ",", "MT"}], "]"}]}]}], ")"}]}], ")"}], 
+                "/", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                   ")"}], " ", 
+                  RowBox[{"Kallen\[Lambda]", "[", 
+                   RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}]}], 
+                   "]"}]}], ")"}]}], ")"}]}], "+", 
+             RowBox[{
+              RowBox[{"(", 
+               RowBox[{"8", " ", 
+                SuperscriptBox["MT", "2"], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", "S", " ", "S34"}], "-", 
+                    SuperscriptBox["S34", "2"], "+", 
+                    SuperscriptBox["T", "2"], "+", 
+                    RowBox[{"2", " ", "S34", " ", "T14"}], "-", 
+                    RowBox[{"2", " ", "T", " ", "T14"}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", "S"}], "-", "S34", "+", "T", "-", 
+                    RowBox[{"2", " ", "T24"}]}], ")"}]}], "-", 
+                    RowBox[{"4", " ", "T", " ", "T24"}], "-", 
+                    RowBox[{"2", " ", "S34", " ", "U"}], "+", 
+                    RowBox[{"2", " ", "T", " ", "U"}]}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"8", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T"}], 
+                    ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"8", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T"}], 
+                    ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                  RowBox[{"4", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T"}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"3", " ", "S34"}], "-", 
+                    RowBox[{"3", " ", "T"}], "-", 
+                    RowBox[{"4", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T"}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"3", " ", "S34"}], "-", 
+                    RowBox[{"3", " ", "T"}], "-", 
+                    RowBox[{"4", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                  RowBox[{"8", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T"}], 
+                    ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"8", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T"}], 
+                    ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"32", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                  RowBox[{"4", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  FractionBox[
+                   RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T14", "+", "T24", "+", 
+                    "U"}], 
+                   RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U"}]], "-", 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "10"]}], "+", 
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "8"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "3"], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], ")"}]}], 
+                    "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "5"}], " ", "T14"}], "+", "T24", "+", "U"}], 
+                    ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "4"], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"2", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14"}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"T14", "-", "T24", "-", "U"}], ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"6", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], ")"}], "/", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T24", "-", "U"}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "8"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}]}], 
+                    "]"}]}], ")"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{"T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "8"]}], "+", 
+                    RowBox[{"192", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"48", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"4", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], ")"}]}], 
+                    "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "3"], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", "T14"}], "+", 
+                    RowBox[{"7", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T14", ",", "MT", ",", "MT"}], "]"}]}], ")"}], 
+                   "/", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T24", "-", "U"}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "8"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}]}], 
+                    "]"}]}], ")"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "10"], " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "8"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"28", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "20"}], " ", "T14"}], "+", "T24", "+", "U"}],
+                     ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "6"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "256"}], " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"72", " ", "T14"}], "-", 
+                    RowBox[{"11", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"14", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"52", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "-", 
+                    
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "5"}], " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"12", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"160", " ", 
+                    SuperscriptBox["MT", "6"]}], "-", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"7", " ", "T14"}], "-", 
+                    RowBox[{"6", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"22", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"9", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"4", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "10"]}], "+", 
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "8"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", "T14"}], "+", "T24", "+", "U"}], 
+                    ")"}]}], "-", 
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"115", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"36", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "-", 
+                    
+                    RowBox[{"T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"15", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"20", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "-", 
+                    
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"49", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"129", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"24", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "11"}], " ", 
+                    SuperscriptBox["T14", "4"]}], "-", 
+                    RowBox[{"232", " ", 
+                    SuperscriptBox["T14", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"366", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"56", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "4"]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3072", " ", 
+                    SuperscriptBox["MT", "12"]}], "+", 
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "10"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"11", " ", "T14"}], "+", 
+                    RowBox[{"14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{"128", " ", 
+                    SuperscriptBox["MT", "8"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"45", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"22", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"13", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{"T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "5"}], " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"4", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], ")"}]}], "-", 
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"61", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"134", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"35", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "-", 
+                    RowBox[{"12", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}]}], ")"}]}], "-", 
+                    
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"25", " ", 
+                    SuperscriptBox["T14", "4"]}], "+", 
+                    RowBox[{"236", " ", 
+                    SuperscriptBox["T14", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"282", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "-", 
+                    RowBox[{"56", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "-", 
+                    RowBox[{"11", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "4"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["T14", "5"]}], "-", 
+                    RowBox[{"18", " ", 
+                    SuperscriptBox["T14", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"134", " ", 
+                    SuperscriptBox["T14", "3"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "-", 
+                    RowBox[{"120", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "+", 
+                    RowBox[{"23", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "4"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "5"]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], ")"}], "/", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], "+", 
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U"}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T24", "-", "U"}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "8"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}]}], 
+                    "]"}]}], ")"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{"2", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], "2"], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], ")"}], 
+                    " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT", ",", "MT"}], "]"}]}], ")"}], "/", 
+                   RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}]}], 
+                    "]"}]}]}], ")"}]}], ")"}], "/", 
+              RowBox[{"(", 
+               RowBox[{
+                RowBox[{"16", " ", 
+                 SuperscriptBox["MT", "4"]}], "-", 
+                RowBox[{"4", " ", 
+                 SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                RowBox[{"8", " ", 
+                 SuperscriptBox["MT", "2"], " ", 
+                 RowBox[{"(", 
+                  RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                SuperscriptBox[
+                 RowBox[{"(", 
+                  RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+               ")"}]}], "-", 
+             RowBox[{
+              RowBox[{"(", 
+               RowBox[{"16", " ", 
+                SuperscriptBox["MT", "2"], " ", "T14", " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"-", "4"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                  RowBox[{"8", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                  RowBox[{"8", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", "S"}], "-", "S34", "+", "T", "-", 
+                    RowBox[{"2", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], ")"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  FractionBox[
+                   RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], 
+                   RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U"}]], "+", 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "8"]}], "+", 
+                    RowBox[{"192", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"48", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"4", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], ")"}]}], 
+                    "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "3"], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", "T14"}], "+", 
+                    RowBox[{"7", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], ")"}], "/", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T24", "-", "U"}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "8"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}]}], 
+                    "]"}]}], ")"}]}], "-", 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "10"]}], "+", 
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "8"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14"}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", "T14"}], "+", "T24", "+", "U"}], ")"}], 
+                    "2"]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "3"], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], ")"}]}], 
+                    "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", "T14"}], "+", "T24", "+", "U"}], 
+                    ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "4"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T14", "2"], "+", 
+                    RowBox[{"4", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T14", ",", "MT", ",", "MT"}], "]"}]}], ")"}], 
+                   "/", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T24", "-", "U"}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "8"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}]}], 
+                    "]"}]}], ")"}]}], "-", 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "10"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T14", "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "8"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"464", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"4", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"19", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "-", 
+                    RowBox[{"24", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], ")"}]}], 
+                    "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"40", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", 
+                    RowBox[{"7", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], ")"}]}], 
+                    "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"832", " ", 
+                    SuperscriptBox["MT", "8"]}], "+", 
+                    RowBox[{"T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "+", 
+                    RowBox[{"48", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"10", " ", "T14"}], "+", 
+                    RowBox[{"11", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"26", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"7", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"52", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"27", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "8"]}], "+", 
+                    RowBox[{"192", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"17", " ", "T14"}], "+", "T24", "+", "U"}], 
+                    ")"}]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"13", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"119", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{"3", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T14", "2"], "+", 
+                    RowBox[{"7", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"89", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3584", " ", 
+                    SuperscriptBox["MT", "10"]}], "+", 
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "8"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"40", " ", "T14"}], "+", 
+                    RowBox[{"13", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"4", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"9", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{"128", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"14", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"60", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"9", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"51", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"129", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"11", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T14", "4"], "+", 
+                    RowBox[{"28", " ", 
+                    SuperscriptBox["T14", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"54", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"116", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "+", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "4"]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], ")"}], "/", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], "+", 
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U"}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T24", "-", "U"}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "8"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}]}], 
+                    "]"}]}], ")"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"T14", " ", "T24"}], "+", 
+                    SuperscriptBox["T24", "2"], "-", 
+                    RowBox[{"T14", " ", "U"}], "+", 
+                    RowBox[{"2", " ", "T24", " ", "U"}], "+", 
+                    SuperscriptBox["U", "2"], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", "T14"}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], ")"}], 
+                    " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT", ",", "MT"}], "]"}]}], ")"}], "/", 
+                   RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}]}], 
+                    "]"}]}]}], ")"}]}], ")"}], "/", 
+              RowBox[{"(", 
+               RowBox[{
+                RowBox[{"16", " ", 
+                 SuperscriptBox["MT", "4"]}], "-", 
+                RowBox[{"4", " ", 
+                 SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                RowBox[{"8", " ", 
+                 SuperscriptBox["MT", "2"], " ", 
+                 RowBox[{"(", 
+                  RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                SuperscriptBox[
+                 RowBox[{"(", 
+                  RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+               ")"}]}], "-", 
+             RowBox[{"2", " ", 
+              RowBox[{"(", 
+               RowBox[{
+                RowBox[{"-", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U", "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", "S"}], "-", "S34", "+", "T", "-", 
+                    RowBox[{"2", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], ")"}]}], ")"}], "/", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U"}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U"}], 
+                    ")"}]}], ")"}]}], ")"}]}], "-", 
+                RowBox[{
+                 RowBox[{"(", 
+                  RowBox[{"4", " ", 
+                   SuperscriptBox["MT", "2"], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", "S", " ", "S34"}], "-", 
+                    RowBox[{"S34", " ", "T14"}], "+", 
+                    RowBox[{"T", " ", "T14"}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S", "-", "T24"}], ")"}]}], "+", 
+                    RowBox[{"2", " ", "T", " ", "T24"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T"}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T"}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T"}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S", "+", "T14", "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T"}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S", "+", "T14", "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T"}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T"}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T14", "-", "T24", "-", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T14", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"64", " ", 
+                    SuperscriptBox["MT", "8"]}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T24", "+", "U"}], 
+                    ")"}], "2"]}], "+", 
+                    RowBox[{"48", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "20"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"24", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "3"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", 
+                    RowBox[{"7", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T24", "-", "U"}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "8"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT", ",", "MT"}], "]"}]}]}], ")"}]}], ")"}], 
+                 "/", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U"}], 
+                    ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T24", "-", "U"}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "8"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}]}], ")"}], " ", 
+                   RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}]}], 
+                    "]"}]}], ")"}]}]}], ")"}]}], "+", 
+             RowBox[{"4", " ", 
+              RowBox[{"(", 
+               RowBox[{
+                RowBox[{
+                 RowBox[{"(", 
+                  RowBox[{"2", " ", 
+                   SuperscriptBox["MT", "2"], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "T"}], ")"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"16", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U"}]], 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14"}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"6", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "3"}], " ", "T14"}], "+", "T24", "+", "U"}], 
+                    ")"}]}]}], ")"}]}]}], ")"}]}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"1024", " ", 
+                    SuperscriptBox["MT", "12"]}], "-", 
+                    RowBox[{"1280", " ", 
+                    SuperscriptBox["MT", "10"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "-", "T24", "-", "U"}], ")"}]}], "+", 
+                    RowBox[{"128", " ", 
+                    SuperscriptBox["MT", "8"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "-", 
+                    RowBox[{"15", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"10", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14"}], "-", 
+                    RowBox[{"5", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", "T14"}], "-", "T24", "-", "U"}], ")"}], 
+                    " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"19", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", "T14"}], "+", "T24", "+", "U"}], 
+                    ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"7", " ", "T14"}], "-", "T24", "-", "U"}], ")"}], 
+                    " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "3"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"55", " ", "T14"}], "-", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"91", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"130", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"15", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", "T14"}], "+", 
+                    RowBox[{"13", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"10", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "5"}], " ", 
+                    SuperscriptBox["T14", "3"]}], "-", 
+                    RowBox[{"27", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"33", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"104", " ", 
+                    SuperscriptBox["MH", "6"], " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", "T14"}], "-", "T24", "-", "U"}], ")"}], 
+                    " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "4"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"37", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"88", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"39", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"127", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"89", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], ")"}], "/", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T24", "-", "U"}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "8"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}]}], 
+                    "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"2", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "12"}], " ", 
+                    SuperscriptBox["MH", "8"], " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], "5"]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"40", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", "T14"}], "+", 
+                    RowBox[{"10", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], ")"}]}], 
+                    "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "6"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"96", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"9", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"6", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "60"}], " ", "T14"}], "+", 
+                    RowBox[{"48", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], ")"}]}], 
+                    "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"608", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    SuperscriptBox["T14", "3"], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"6", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "64"}], " ", "T14"}], "+", 
+                    RowBox[{"400", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"25", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"8", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"43", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T14", ",", "MT", ",", "MT"}], "]"}]}], ")"}], 
+                    "/", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T24", "-", "U"}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "8"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}]}], 
+                    "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "12"], " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"52", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", 
+                    RowBox[{"3", " ", "T14"}], "+", 
+                    RowBox[{"13", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], "5"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{"T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", "T14"}], "+", "T24", "+", "U"}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T14", "2"], "+", 
+                    RowBox[{"14", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "10"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"64", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"97", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2320"}], " ", "T14"}], "+", 
+                    RowBox[{"48", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"242", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"512", " ", 
+                    SuperscriptBox["MT", "10"]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "-", 
+                    RowBox[{"64", " ", 
+                    SuperscriptBox["MT", "8"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"46", " ", "T14"}], "-", 
+                    RowBox[{"7", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"26", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"114", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"9", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "-", 
+                    
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"45", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"90", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["T14", "3"]}], "-", 
+                    RowBox[{"23", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"22", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "8"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"128", " ", 
+                    SuperscriptBox["MT", "8"]}], "+", 
+                    SuperscriptBox["T14", "4"], "+", 
+                    RowBox[{"96", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"203", " ", "T14"}], "-", "T24", "-", "U"}], 
+                    ")"}]}], "-", 
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["T14", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"30", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"136", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "4"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"157", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"1446", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"15", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "-", 
+                    
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"33", " ", 
+                    SuperscriptBox["T14", "3"]}], "-", 
+                    RowBox[{"205", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"1109", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"17", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"1024", " ", 
+                    SuperscriptBox["MT", "12"]}], "-", 
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "10"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"51", " ", "T14"}], "-", 
+                    RowBox[{"5", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{"128", " ", 
+                    SuperscriptBox["MT", "8"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"609", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"87", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "-", 
+                    
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"381", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"1892", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"102", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}]}], ")"}]}], "-", 
+                    
+                    RowBox[{"T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "4"]}], "-", 
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["T14", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"48", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"86", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "4"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T14", "4"], "-", 
+                    RowBox[{"1566", " ", 
+                    SuperscriptBox["T14", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"4258", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "-", 
+                    RowBox[{"78", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "+", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "4"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "19"}], " ", 
+                    SuperscriptBox["T14", "5"]}], "+", 
+                    RowBox[{"43", " ", 
+                    SuperscriptBox["T14", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"996", " ", 
+                    SuperscriptBox["T14", "3"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "-", 
+                    RowBox[{"2036", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "+", 
+                    RowBox[{"15", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "4"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "5"]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "12288"}], " ", 
+                    SuperscriptBox["MT", "14"]}], "+", 
+                    RowBox[{"1024", " ", 
+                    SuperscriptBox["MT", "12"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"80", " ", "T14"}], "-", 
+                    RowBox[{"17", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "10"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"621", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"361", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"40", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{"128", " ", 
+                    SuperscriptBox["MT", "8"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"325", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"1187", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"320", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "-", 
+                    RowBox[{"25", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"157", " ", 
+                    SuperscriptBox["T14", "4"]}], "+", 
+                    RowBox[{"1832", " ", 
+                    SuperscriptBox["T14", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"3484", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"550", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "-", 
+                    RowBox[{"35", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "4"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{"T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "4"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["T14", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"24", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"22", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "4"]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"46", " ", 
+                    SuperscriptBox["T14", "5"]}], "+", 
+                    RowBox[{"263", " ", 
+                    SuperscriptBox["T14", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"1810", " ", 
+                    SuperscriptBox["T14", "3"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"2418", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "+", 
+                    RowBox[{"220", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "4"]}], "-", 
+                    RowBox[{"13", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "5"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T14", "6"], "+", 
+                    RowBox[{"43", " ", 
+                    SuperscriptBox["T14", "5"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"122", " ", 
+                    SuperscriptBox["T14", "4"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"724", " ", 
+                    SuperscriptBox["T14", "3"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "+", 
+                    RowBox[{"775", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "4"]}], "+", 
+                    RowBox[{"25", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "5"]}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "6"]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], ")"}], "/", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], "+", 
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U"}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T24", "-", "U"}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "8"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}]}], 
+                    "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "10"]}], "+", 
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "8"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "3"], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", "T14"}], "+", 
+                    RowBox[{"5", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], ")"}]}], 
+                    "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "4"], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", "T14"}], "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"14", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"19", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14"}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"T14", "-", "T24", "-", "U"}], ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T14", "2"], "+", 
+                    RowBox[{"T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT", ",", "MT"}], "]"}]}], ")"}], "/", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}]}], 
+                    "]"}]}]}], ")"}]}], ")"}], "/", 
+                 SuperscriptBox[
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                   ")"}], "2"]}], "+", 
+                RowBox[{
+                 RowBox[{"(", 
+                  RowBox[{"2", " ", 
+                   SuperscriptBox["MT", "2"], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "T"}], ")"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "S34", "+", "T", "+", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{"16", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{
+                    FractionBox["1", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U"}]], 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"64", " ", 
+                    SuperscriptBox["MT", "6"]}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T14", "2"], " ", "T24"}], "+", 
+                    RowBox[{"9", " ", "T14", " ", 
+                    SuperscriptBox["T24", "2"]}], "+", 
+                    SuperscriptBox["T24", "3"], "+", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T14", "2"], " ", "U"}], "+", 
+                    RowBox[{"18", " ", "T14", " ", "T24", " ", "U"}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T24", "2"], " ", "U"}], "+", 
+                    RowBox[{"9", " ", "T14", " ", 
+                    SuperscriptBox["U", "2"]}], "+", 
+                    RowBox[{"3", " ", "T24", " ", 
+                    SuperscriptBox["U", "2"]}], "+", 
+                    SuperscriptBox["U", "3"], "+", 
+                    RowBox[{"48", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", "T14"}], "+", "T24", "+", "U"}], 
+                    ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "-", 
+                    RowBox[{"7", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "14"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"18", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}]}], 
+                    ")"}]}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4096", " ", 
+                    SuperscriptBox["MT", "14"]}], "+", 
+                    RowBox[{"2048", " ", 
+                    SuperscriptBox["MT", "12"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "8"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], " ", "T14"}], "+", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", "T14"}], "+", "T24", "+", "U"}], 
+                    ")"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"25", " ", "T14"}], "+", 
+                    RowBox[{"27", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], ")"}]}], 
+                    "-", 
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "10"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"26", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "-", 
+                    RowBox[{"5", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"10", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"8", " ", "T14"}], "+", "T24", "+", "U"}], 
+                    ")"}]}], "+", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"11", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"34", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"83", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"43", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "5"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", "T14"}], "+", "T24", "+", "U"}], 
+                    ")"}]}], "+", 
+                    RowBox[{"48", " ", 
+                    SuperscriptBox["MH", "6"], " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"10", " ", "T14"}], "-", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T14", "2"], "-", 
+                    RowBox[{"56", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"21", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "-", 
+                    
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"14", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"21", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"36", " ", 
+                    SuperscriptBox["MH", "6"], " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"13", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"15", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"17", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"84", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"99", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"32", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"64", " ", 
+                    SuperscriptBox["MH", "6"], " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"12", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "-", 
+                    
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"5", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"7", " ", 
+                    SuperscriptBox["T14", "4"]}], "+", 
+                    RowBox[{"26", " ", 
+                    SuperscriptBox["T14", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "-", 
+                    RowBox[{"26", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "4"]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], ")"}], "/", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T24", "-", "U"}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "8"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}]}], 
+                    "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], "4"]}], "-", 
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["MH", "6"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"20", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", 
+                    RowBox[{"5", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"104", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", "T14"}], "+", 
+                    RowBox[{"10", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"86", " ", "T14"}], "+", 
+                    RowBox[{"26", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], ")"}]}], 
+                    "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"1040", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"28", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"39", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"19", " ", "T14"}], "+", 
+                    RowBox[{"52", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T14", ",", "MT", ",", "MT"}], "]"}]}], ")"}], 
+                    "/", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T24", "-", "U"}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "8"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}]}], 
+                    "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"64", " ", 
+                    SuperscriptBox["MH", "12"], " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "10"], " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"144", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"27", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"130", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"9", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "744"}], " ", "T14"}], "+", 
+                    RowBox[{"72", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], ")"}]}], 
+                    "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "8"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "8"]}], "-", 
+                    RowBox[{"17", " ", 
+                    SuperscriptBox["T14", "4"]}], "-", 
+                    RowBox[{"190", " ", 
+                    SuperscriptBox["T14", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"400", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"62", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "4"], "+", 
+                    RowBox[{"128", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"43", " ", "T14"}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"404", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"117", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "-", 
+                    
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"159", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"580", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"105", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"640", " ", 
+                    SuperscriptBox["MT", "8"]}], "+", 
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"27", " ", "T14"}], "+", 
+                    RowBox[{"17", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{"24", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"19", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"22", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"7", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["T14", "3"]}], "-", 
+                    RowBox[{"15", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"6", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "7"}], " ", 
+                    SuperscriptBox["T14", "3"]}], "-", 
+                    RowBox[{"87", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"51", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"11", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "6"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"9728", " ", 
+                    SuperscriptBox["MT", "10"]}], "+", 
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "8"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"148", " ", "T14"}], "+", 
+                    RowBox[{"41", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{"192", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"273", " ", 
+                    SuperscriptBox["T14", "2"]}], "-", 
+                    RowBox[{"172", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"23", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "-", 
+                    
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"326", " ", 
+                    SuperscriptBox["T14", "3"]}], "+", 
+                    RowBox[{"905", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"333", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "-", 
+                    RowBox[{"28", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "51"}], " ", 
+                    SuperscriptBox["T14", "4"]}], "-", 
+                    RowBox[{"246", " ", 
+                    SuperscriptBox["T14", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"280", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"78", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "4"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "221"}], " ", 
+                    SuperscriptBox["T14", "4"]}], "-", 
+                    RowBox[{"1664", " ", 
+                    SuperscriptBox["T14", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"2542", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"752", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "+", 
+                    RowBox[{"43", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "4"]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T14", "+", "T24", "+", 
+                    "U"}], ")"}], "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3072", " ", 
+                    SuperscriptBox["MT", "12"]}], "+", 
+                    RowBox[{"512", " ", 
+                    SuperscriptBox["MT", "10"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"43", " ", "T14"}], "+", 
+                    RowBox[{"7", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "17"}], " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"6", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], ")"}]}], "+", 
+                    RowBox[{"128", " ", 
+                    SuperscriptBox["MT", "8"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"155", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"13", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "-", 
+                    
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"208", " ", 
+                    SuperscriptBox["T14", "3"]}], "-", 
+                    RowBox[{"24", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"209", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "-", 
+                    RowBox[{"12", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "83"}], " ", 
+                    SuperscriptBox["T14", "4"]}], "-", 
+                    RowBox[{"782", " ", 
+                    SuperscriptBox["T14", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"108", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"254", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "+", 
+                    RowBox[{"11", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "4"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["T14", "5"]}], "-", 
+                    RowBox[{"27", " ", 
+                    SuperscriptBox["T14", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"217", " ", 
+                    SuperscriptBox["T14", "3"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"44", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "+", 
+                    RowBox[{"32", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "4"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "5"]}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4096", " ", 
+                    SuperscriptBox["MT", "14"]}], "+", 
+                    RowBox[{"2048", " ", 
+                    SuperscriptBox["MT", "12"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"49", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"1280", " ", 
+                    SuperscriptBox["MT", "10"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"95", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"96", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}], "-", 
+                    
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "8"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"401", " ", 
+                    SuperscriptBox["T14", "3"]}], "-", 
+                    RowBox[{"497", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"238", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}]}], ")"}]}], "-", 
+                    
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2297", " ", 
+                    SuperscriptBox["T14", "4"]}], "+", 
+                    RowBox[{"4760", " ", 
+                    SuperscriptBox["T14", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"3282", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "-", 
+                    RowBox[{"968", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "-", 
+                    RowBox[{"15", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "4"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{"T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "51"}], " ", 
+                    SuperscriptBox["T14", "4"]}], "-", 
+                    RowBox[{"138", " ", 
+                    SuperscriptBox["T14", "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"80", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "+", 
+                    RowBox[{"42", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "4"]}]}], ")"}]}], "-", 
+                    
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"431", " ", 
+                    SuperscriptBox["T14", "5"]}], "+", 
+                    RowBox[{"2349", " ", 
+                    SuperscriptBox["T14", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"2514", " ", 
+                    SuperscriptBox["T14", "3"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "-", 
+                    RowBox[{"1334", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "-", 
+                    RowBox[{"261", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "4"]}], "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "5"]}]}], ")"}]}], "+", 
+                    
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "35"}], " ", 
+                    SuperscriptBox["T14", "6"]}], "-", 
+                    RowBox[{"920", " ", 
+                    SuperscriptBox["T14", "5"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "-", 
+                    RowBox[{"2953", " ", 
+                    SuperscriptBox["T14", "4"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], "-", 
+                    RowBox[{"2192", " ", 
+                    SuperscriptBox["T14", "3"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "3"]}], "+", 
+                    RowBox[{"1067", " ", 
+                    SuperscriptBox["T14", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "4"]}], "+", 
+                    RowBox[{"136", " ", "T14", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "5"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "6"]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT"}], "]"}]}], ")"}], "/", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], "+", 
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U"}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T24", "-", "U"}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "8"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}]}], 
+                    "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"6", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"128", " ", 
+                    SuperscriptBox["MT", "8"]}], "+", 
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"20", " ", 
+                    SuperscriptBox["MH", "4"], " ", "T14"}], "+", 
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"7", " ", "T14"}], "+", "T24", "+", "U"}], 
+                    ")"}]}], "-", 
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", "T14"}], "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}]}], ")"}]}], 
+                    "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "20"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["T14", "2"]}], "+", 
+                    RowBox[{"4", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "3"], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", 
+                    RowBox[{"5", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}]}], ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["T14", "2"], "+", 
+                    RowBox[{"5", " ", "T14", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T24", "+", "U"}], ")"}], "2"]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+                    "MT", ",", "MT", ",", "MT"}], "]"}]}], ")"}], "/", 
+                    RowBox[{"Kallen\[Lambda]", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "T14", ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}]}], 
+                    "]"}]}]}], ")"}]}], ")"}], "/", 
+                 SuperscriptBox[
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"T14", "+", "T24", "+", "U"}], ")"}], "2"]}], 
+                   ")"}], "2"]}]}], ")"}]}]}], ")"}], " ", 
+           SuperscriptBox["\[Beta]", "2"]}]}], "+", 
+         InterpretationBox[
+          SuperscriptBox[
+           RowBox[{"O", "[", "\[Beta]", "]"}], "3"],
+          SeriesData[$CellContext`\[Beta], 0, {}, 0, 3, 1],
+          Editable->False]}],
+        SeriesData[$CellContext`\[Beta], 
+         0, {$CellContext`T^(-1) ((
+              4 (2 + X`Eps^(-1) + 
+                X`DiscB[$CellContext`T, $CellContext`MT, $CellContext`MT] + 
+                Log[$CellContext`MT^(-2) X`Mu^2]) - 
+              4 ($CellContext`MH^2 - $CellContext`T)^(-1) (
+               3 $CellContext`MH^2 + X`Eps^(-1) $CellContext`MH^2 - 
+               3 $CellContext`T - 
+               X`Eps^(-1) $CellContext`T + $CellContext`MH^2 
+                X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - \
+$CellContext`T 
+               X`DiscB[$CellContext`T, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MT^2 
+                Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 + $CellContext`MH^2 
+                Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`T 
+               Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`MT^2 
+               Log[Rational[1, 2] $CellContext`MT^(-2) (
+                   2 $CellContext`MT^2 - $CellContext`T + ($CellContext`T \
+((-4) $CellContext`MT^2 + $CellContext`T))^Rational[1, 2])]^2)) (
+              2 $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[5]] $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[4]] - $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[4]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[5]] - $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`e[2]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`ec[
+                5]]) + ($CellContext`MH^2 - $CellContext`T)^(-1) (
+              Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                  2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^Rational[1, 2])]^2 - 
+              Log[Rational[1, 2] $CellContext`MT^(-2) (
+                 2 $CellContext`MT^2 - $CellContext`T + ($CellContext`T ((-4) \
+$CellContext`MT^2 + $CellContext`T))^
+                  Rational[
+                   1, 2])]^2) (((-$CellContext`MH^2 + $CellContext`T) \
+$CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`e[2]] + 2 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[1]]) $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`ec[5]] + $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[
+                 5]] ((-$CellContext`MH^2 + $CellContext`T) $CellContext`Pair[
+                  
+                   $CellContext`e[1], 
+                   $CellContext`ec[4]] + 2 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]]) - 2 $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[
+                4]] ((-$CellContext`MH^2 + $CellContext`T) $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[5]] + 2 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[3]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[1]])) + 16 $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`k[3]] (
+              Rational[
+                1, 2] ($CellContext`MH^2 - $CellContext`T)^(-2) \
+(-$CellContext`MH^2 + $CellContext`T - $CellContext`MH^2 
+                X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MH^2 
+                 X`DiscB[$CellContext`T, $CellContext`MT, $CellContext`MT] - \
+$CellContext`MT^2 
+                Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 + $CellContext`MT^2 
+                 Log[Rational[1, 2] $CellContext`MT^(-2) (
+                    2 $CellContext`MT^2 - $CellContext`T + ($CellContext`T \
+((-4) $CellContext`MT^2 + $CellContext`T))^
+                    Rational[1, 2])]^2) ($CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[1]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`ec[5]] + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`ec[5]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] - 2 $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[1]]) + 
+              Rational[
+                1, 2] ($CellContext`MH^2 - $CellContext`T)^(-1) (-
+                 X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + 
+                X`DiscB[$CellContext`T, $CellContext`MT, $CellContext`MT]) \
+($CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`ec[5]] + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`ec[5]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]] - 2 $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[3]])) + 
+            4 ($CellContext`MH^2 - $CellContext`T)^(-1) (
+              X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - 
+              X`DiscB[$CellContext`T, $CellContext`MT, $CellContext`MT]) \
+(((-$CellContext`MH^2 + $CellContext`T) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`e[2]] + 2 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]])) $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`ec[5]] + $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[
+                 5]] ((-$CellContext`MH^2 + $CellContext`T) \
+$CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[4]] + 2 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]])) - 2 $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[
+                4]] ((-$CellContext`MH^2 + $CellContext`T) $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[5]] + 2 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[3]] ($CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]])))) + $CellContext`S34^(-1) ((
+              4 (2 + X`Eps^(-1) + 
+                X`DiscB[$CellContext`S34, $CellContext`MT, $CellContext`MT] + 
+                Log[$CellContext`MT^(-2) X`Mu^2]) - 
+              4 ($CellContext`MH^2 - $CellContext`S34)^(-1) (
+               3 $CellContext`MH^2 + X`Eps^(-1) $CellContext`MH^2 - 
+               3 $CellContext`S34 - 
+               X`Eps^(-1) $CellContext`S34 + $CellContext`MH^2 
+                X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - \
+$CellContext`S34 
+               X`DiscB[$CellContext`S34, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MT^2 
+                Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 + $CellContext`MH^2 
+                Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`S34 
+               Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`MT^2 
+               Log[Rational[1, 2] $CellContext`MT^(-2) (
+                   2 $CellContext`MT^2 - $CellContext`S34 + ($CellContext`S34 \
+((-4) $CellContext`MT^2 + $CellContext`S34))^Rational[1, 2])]^2)) (
+              2 $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[5]] $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[4]] - $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[4]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[5]] - $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`e[2]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`ec[5]]) + 
+            4 ($CellContext`MH^2 - $CellContext`S34)^(-1) (
+              X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - 
+              X`DiscB[$CellContext`S34, $CellContext`MT, $CellContext`MT]) \
+($CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[
+                 5]] ((-$CellContext`MH^2 + $CellContext`S34) \
+$CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[4]] + 2 ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] - $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]]) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]]) - 2 $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[
+                5]] ((-$CellContext`MH^2 + $CellContext`S34) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] + 2 ($CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[3]] - $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[4]]) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]]) + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`e[
+                 2]] ((-$CellContext`MH^2 + $CellContext`S34) \
+$CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`ec[5]] + 2 $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] - $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[4]]))) + $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`k[
+               3]] ((-8) ($CellContext`MH^2 - $CellContext`S34)^(-1) (-
+                 X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + 
+                X`DiscB[$CellContext`S34, $CellContext`MT, $CellContext`MT]) \
+(-$CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`ec[5]] + 2 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[5]] $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[3]] - $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`e[2]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[3]]) + 
+              8 ($CellContext`MH^2 - $CellContext`S34)^(-2) \
+(-$CellContext`MH^2 + $CellContext`S34 - $CellContext`MH^2 
+                X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MH^2 
+                 X`DiscB[$CellContext`S34, $CellContext`MT, $CellContext`MT] - \
+$CellContext`MT^2 
+                Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 + $CellContext`MT^2 
+                 Log[Rational[1, 2] $CellContext`MT^(-2) (
+                    2 $CellContext`MT^2 - $CellContext`S34 + \
+($CellContext`S34 ((-4) $CellContext`MT^2 + $CellContext`S34))^
+                    Rational[1, 2])]^2) (-$CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]] $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`ec[5]] + 2 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[5]] $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[4]] - $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`e[2]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[
+                  4]])) - ($CellContext`MH^2 - $CellContext`S34)^(-1) (
+             Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                 2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^Rational[1, 2])]^2 - 
+             Log[Rational[1, 2] $CellContext`MT^(-2) (
+                2 $CellContext`MT^2 - $CellContext`S34 + ($CellContext`S34 \
+((-4) $CellContext`MT^2 + $CellContext`S34))^
+                 Rational[1, 2])]^2) ($CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[
+                5]] (($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[4]] + 2 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[4]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]]) - 2 $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[
+               5]] (($CellContext`MH^2 - $CellContext`S34) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[4]] + 2 $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[4]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[3]]) + $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`e[
+                2]] (($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`ec[5]] + 2 $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[4]])) + $CellContext`S^(-1) ((
+                4 (2 + X`Eps^(-1) + 
+                  X`DiscB[$CellContext`S34, $CellContext`MT, $CellContext`MT] + 
+                  Log[$CellContext`MT^(-2) X`Mu^2]) - 
+                4 ($CellContext`MH^2 - $CellContext`S34)^(-1) (
+                 3 $CellContext`MH^2 + X`Eps^(-1) $CellContext`MH^2 - 
+                 3 $CellContext`S34 - 
+                 X`Eps^(-1) $CellContext`S34 + $CellContext`MH^2 
+                  X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] - $CellContext`S34 
+                 X`DiscB[$CellContext`S34, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MT^2 
+                  Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 + $CellContext`MH^2 
+                  Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`S34 
+                 Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`MT^2 
+                 Log[Rational[1, 2] $CellContext`MT^(-2) (
+                    2 $CellContext`MT^2 - $CellContext`S34 + \
+($CellContext`S34 ((-4) $CellContext`MT^2 + $CellContext`S34))^
+                    Rational[
+                    1, 2])]^2)) ((-$CellContext`T - $CellContext`T14 + \
+$CellContext`T24 + $CellContext`U) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`e[2]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`ec[5]] - 4 (-$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]]) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`ec[5]] + 2 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[2]] $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`ec[5]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] + 2 $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]]) - 2 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[5]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[1]] ($CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]] + 2 $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]]) - 4 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[2]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] ($CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[2]]) + 4 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[4]] $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]]) - $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`e[2]] ((-4) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]]) + 4 $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]])) - 
+              4 ($CellContext`MH^2 - $CellContext`S34)^(-1) (
+               X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - 
+               X`DiscB[$CellContext`S34, $CellContext`MT, $CellContext`MT]) \
+(-$CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`e[
+                  2]] (-($CellContext`MH^2 - $CellContext`S34) \
+($CellContext`T + $CellContext`T14 - $CellContext`T24 - $CellContext`U) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] + 
+                 4 ($CellContext`MH^2 - $CellContext`S34) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + 
+                 4 (-$CellContext`MH^2 + $CellContext`S34) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[
+                   3]] ((7 $CellContext`MH^2 - 2 $CellContext`S - 
+                    3 $CellContext`S34 - 8 $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + ((-7) $CellContext`MH^2 + 
+                    2 $CellContext`S + 3 $CellContext`S34 + 
+                    8 $CellContext`T) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + 
+                  4 ((-2) $CellContext`MH^2 + $CellContext`S + \
+$CellContext`S34 + 2 $CellContext`T24 + 2 $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]])) - 
+               2 (2 ($CellContext`MH^2 - $CellContext`S34) \
+($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]]) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`ec[5]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[5]] $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[
+                   1]] (((-3) $CellContext`MH^2 + 2 $CellContext`S + 
+                    3 $CellContext`S34 + 4 $CellContext`T14 + 
+                    4 $CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] + 
+                  2 (-$CellContext`MH^2 + $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]]) + 
+                2 ($CellContext`MH^2 - $CellContext`S34) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[4]] $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]]) - $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[2]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[
+                    5]] (((-3) $CellContext`MH^2 + 2 $CellContext`S + 
+                    3 $CellContext`S34 + 4 $CellContext`T14 + 
+                    4 $CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] + 
+                   2 (-$CellContext`MH^2 + $CellContext`S34) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]]) + 
+                 2 ($CellContext`MH^2 - $CellContext`S34) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]])) + 8 $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]] (-$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]]) - $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]]) + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]])))) + 
+              8 (Rational[
+                  1, 2] ($CellContext`MH^2 - $CellContext`S34)^(-1) (-
+                   X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] + 
+                  X`DiscB[$CellContext`S34, $CellContext`MT, \
+$CellContext`MT]) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]] (
+                  2 ((-3) $CellContext`MH^2 + $CellContext`S34 + 
+                    2 ($CellContext`T + $CellContext`U)) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] - 
+                  2 ((-3) $CellContext`MH^2 + $CellContext`S34 + 
+                   2 ($CellContext`T + $CellContext`U)) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[
+                    2]] (((-3) $CellContext`MH^2 + $CellContext`S34 + 
+                    4 $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + (
+                    3 $CellContext`MH^2 - $CellContext`S34 - 
+                    4 $CellContext`T) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + 
+                    2 ($CellContext`T + $CellContext`T14 - $CellContext`T24 - \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) + 8 (-$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]]) - $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]]) + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]))) + 
+                Rational[
+                  1, 2] ($CellContext`MH^2 - $CellContext`S34)^(-2) \
+(-$CellContext`MH^2 + $CellContext`S34 - $CellContext`MH^2 
+                  X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] + $CellContext`MH^2 
+                   X`DiscB[$CellContext`S34, $CellContext`MT, \
+$CellContext`MT] - $CellContext`MT^2 
+                  Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 + $CellContext`MT^2 
+                   Log[Rational[1, 2] $CellContext`MT^(-2) (
+                    2 $CellContext`MT^2 - $CellContext`S34 + \
+($CellContext`S34 ((-4) $CellContext`MT^2 + $CellContext`S34))^
+                    Rational[1, 2])]^2) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[
+                   3]] ((-2) (-$CellContext`MH^2 + $CellContext`S34 + 
+                    2 ($CellContext`T14 + $CellContext`T24)) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] + 
+                  2 (-$CellContext`MH^2 + $CellContext`S34 + 
+                    2 ($CellContext`T14 + $CellContext`T24)) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] + 8 (-$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]]) - $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]]) + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]])) - $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[
+                    2]] ((-$CellContext`MH^2 + $CellContext`S34 + 
+                    2 ($CellContext`T14 + $CellContext`T24)) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    1]] + ($CellContext`MH^2 - $CellContext`S34 - 
+                    2 ($CellContext`T14 + $CellContext`T24)) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + 
+                   2 (-$CellContext`T14 + $CellContext`T24) \
+$CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + 
+                   2 ($CellContext`T - $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    4]]))) - ($CellContext`MH^2 - $CellContext`S34)^(-1) (
+               Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                   2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^Rational[1, 2])]^2 - 
+               Log[Rational[1, 2] $CellContext`MT^(-2) (
+                  2 $CellContext`MT^2 - $CellContext`S34 + ($CellContext`S34 \
+((-4) $CellContext`MT^2 + $CellContext`S34))^
+                   Rational[
+                    1, 2])]^2) ((-4) (($CellContext`MH^2 - $CellContext`S34) \
+($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]]) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    1]] ((-$CellContext`MH^2 + $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[
+                    1]] + (-$CellContext`MH^2 + $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[
+                    2]] + ($CellContext`T14 + $CellContext`T24) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[
+                    3]]) + ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]]) - $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[2]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[
+                    5]] ((-$CellContext`MH^2 + $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[
+                    1]] + (-$CellContext`MH^2 + $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[
+                    2]] + ($CellContext`T14 + $CellContext`T24) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[
+                    3]]) + ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]])) + 2 $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] (-$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]]) - $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]]) + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]))) + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`e[
+                  2]] (($CellContext`MH^2 - $CellContext`S34) ($CellContext`T + \
+$CellContext`T14 - $CellContext`T24 - $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] + 
+                 2 (2 (-$CellContext`MH^2 + $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - 
+                   2 ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] - $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]) + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] (
+                    2 ($CellContext`T14 + $CellContext`T24) \
+$CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - 
+                    2 $CellContext`T14 $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    3]] + ($CellContext`T - $CellContext`T14 - \
+$CellContext`T24 - $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])))))) + (
+             2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U)^(-1) ((
+              4 (2 + X`Eps^(-1) + 
+                X`DiscB[
+                 2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U, $CellContext`MT, $CellContext`MT] + 
+                Log[$CellContext`MT^(-2) X`Mu^2]) + 
+              4 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U)^(-1) (
+                3 ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U) + 
+                X`Eps^(-1) ($CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T - $CellContext`U) - $CellContext`MH^2 
+                X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + \
+(2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - $CellContext`U) 
+                 X`DiscB[
+                  2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U, $CellContext`MT, $CellContext`MT] - $CellContext`MT^2 
+                Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[
+                    1, 2])]^2 + ($CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T - $CellContext`U) 
+                 Log[$CellContext`MT^(-2) X`Mu^2] + $CellContext`MT^2 
+                 Log[Rational[
+                    1, 2] $CellContext`MT^(-2) ((-2) $CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U + (((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) ((-2) $CellContext`MH^2 + 
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U))^Rational[1, 2])]^2)) (2 $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[5]] $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[4]] - $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[4]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[5]] - $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`e[2]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`ec[5]]) + (
+              8 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U)^(-1) (
+                X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - 
+                X`DiscB[
+                2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U, $CellContext`MT, $CellContext`MT]) (2 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`ec[4]] - $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[4]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[3]] - $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`e[2]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]]) - 
+              8 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U)^(-2) (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U + $CellContext`MH^2 
+                X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - \
+$CellContext`MH^2 
+               X`DiscB[
+                2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U, $CellContext`MT, $CellContext`MT] + $CellContext`MT^2 
+                Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 - $CellContext`MT^2 
+               Log[Rational[
+                   1, 2] $CellContext`MT^(-2) ((-2) $CellContext`MH^2 + 
+                   2 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U + (((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) ((-2) $CellContext`MH^2 + 
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U))^Rational[1, 2])]^2) (2 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] - $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[4]] $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[5]] - $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`e[2]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[5]])) $CellContext`Pair[
+               $CellContext`ec[5], 
+               $CellContext`k[3]] - 
+            4 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U)^(-1) (-
+              X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + 
+             X`DiscB[2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U, $CellContext`MT, $CellContext`MT]) (2 $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[
+                4]] ((-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[5]] - 2 ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[3]] - $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[5]]) $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[3]]) - $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[
+               4]] ((-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[5]] - 2 ($CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[3]] - $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[5]]) $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[3]]) - $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`e[
+               2]] ((-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`ec[5]] - 2 ($CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[3]] - $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[5]]) $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[
+                3]])) + (-$CellContext`MH^2 + $CellContext`S34 + \
+$CellContext`T + $CellContext`U)^(-1) (-
+               Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                   2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^Rational[1, 2])]^2 + 
+              Log[Rational[1, 2] $CellContext`MT^(-2) ((-2) $CellContext`MH^2 + 
+                  2 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U + (((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) ((-2) $CellContext`MH^2 + 
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U))^Rational[1, 2])]^2) ((-2) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[
+                 4]] ((-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[5]] + 2 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[5]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]]) + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[
+                 4]] ((-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`ec[5]] + 2 $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[5]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]]) + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`e[
+                 2]] ((-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`ec[5]] + 2 $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[5]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]])) + $CellContext`S^(-1) ((-8) (
+                Rational[-1, 
+                   2] (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U)^(-2) (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U + $CellContext`MH^2 
+                   X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] - $CellContext`MH^2 
+                  X`DiscB[
+                   2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U, $CellContext`MT, $CellContext`MT] + $CellContext`MT^2 
+                   Log[Rational[
+                    1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 - $CellContext`MT^2 
+                  Log[Rational[
+                    1, 2] $CellContext`MT^(-2) ((-2) $CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U + (((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) ((-2) $CellContext`MH^2 + 
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U))^Rational[1, 2])]^2) (
+                  2 ($CellContext`MH^2 + $CellContext`S - 
+                    2 $CellContext`S34 - $CellContext`T14 - $CellContext`T24) \
+$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] + 
+                  2 (-$CellContext`MH^2 - $CellContext`S + 
+                    2 $CellContext`S34 + $CellContext`T14 + $CellContext`T24) \
+$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[
+                    2]] (((-3) $CellContext`MH^2 + 
+                    3 $CellContext`S + $CellContext`T14 + $CellContext`T24 + 
+                    4 $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + (3 $CellContext`MH^2 - 
+                    3 $CellContext`S - 
+                    4 $CellContext`T - $CellContext`T14 - $CellContext`T24) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + 
+                    2 (-$CellContext`T14 + $CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) + 8 ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] - $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] (-$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]]))) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]] + 
+                Rational[-1, 
+                   2] (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U)^(-1) (
+                  X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] - X`DiscB[
+                  2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U, $CellContext`MT, $CellContext`MT]) (
+                  2 (-$CellContext`MH^2 - $CellContext`S34 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] + 
+                  2 ($CellContext`MH^2 + $CellContext`S34 - $CellContext`T - \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[
+                    2]] (-($CellContext`MH^2 + $CellContext`S34 + \
+$CellContext`T - 3 $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[
+                    1]] + ($CellContext`MH^2 + $CellContext`S34 - 
+                    3 $CellContext`T + $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + 
+                    2 (-$CellContext`T14 + $CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) + 8 ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] - $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] (-$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]]))) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]]) + (
+                4 (2 + X`Eps^(-1) + 
+                  X`DiscB[
+                   2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U, $CellContext`MT, $CellContext`MT] + 
+                  Log[$CellContext`MT^(-2) X`Mu^2]) + 
+                4 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U)^(-1) (
+                  3 ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U) + 
+                  X`Eps^(-1) ($CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T - $CellContext`U) - $CellContext`MH^2 
+                  X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] + (
+                    2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U) X`DiscB[
+                    2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U, $CellContext`MT, $CellContext`MT] - $CellContext`MT^2 
+                  Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[
+                    1, 2])]^2 + ($CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T - $CellContext`U) 
+                   Log[$CellContext`MT^(-2) X`Mu^2] + $CellContext`MT^2 
+                   Log[Rational[
+                    1, 2] $CellContext`MT^(-2) ((-2) $CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U + (((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) ((-2) $CellContext`MH^2 + 
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U))^Rational[
+                    1, 2])]^2)) ((-$CellContext`T14 + $CellContext`T24) \
+$CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`e[2]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`ec[5]] + 4 (-$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`ec[5]] + 4 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[2]] $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`ec[5]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]]) - 4 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[5]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[1]] ($CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[2]]) - $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`e[2]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] (4 $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] ((-4) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]])) - 2 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[2]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] ($CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]] + 2 $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]) + 2 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[4]] $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + 2 $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])) + 
+              4 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U)^(-1) (-
+                 X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + 
+                X`DiscB[
+                 2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U, $CellContext`MT, $CellContext`MT]) (-$CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`e[
+                   2]] (-($CellContext`MH^2 - $CellContext`S - \
+$CellContext`T14 - $CellContext`T24) ($CellContext`T14 - $CellContext`T24) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] + 
+                  4 ($CellContext`T14 - $CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] (
+                    4 ($CellContext`MH^2 - $CellContext`S - $CellContext`T14 - \
+$CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + ((-7) $CellContext`MH^2 + 
+                    5 $CellContext`S + 8 $CellContext`T + 3 $CellContext`T14 + 
+                    3 $CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] (
+                    4 (-$CellContext`MH^2 + $CellContext`S + $CellContext`T14 + \
+$CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + (7 $CellContext`MH^2 - 
+                    5 $CellContext`S - 3 $CellContext`T14 - 
+                    3 $CellContext`T24 - 8 $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]])) + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[2]] (
+                  4 ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]]) - 2 $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[
+                    4]] (((-3) $CellContext`MH^2 + $CellContext`S + 
+                    4 $CellContext`S34 + 3 $CellContext`T14 + 
+                    3 $CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + 
+                   2 (-$CellContext`MH^2 + $CellContext`S + $CellContext`T14 + \
+$CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])) + 
+                2 ((-2) ($CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T - $CellContext`U) ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] - 
+                  2 ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]]) + 8 ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] - $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] (-$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]])) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    1]] (((-3) $CellContext`MH^2 + $CellContext`S + 
+                    4 $CellContext`S34 + 3 $CellContext`T14 + 
+                    3 $CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + 
+                    2 (-$CellContext`MH^2 + $CellContext`S + $CellContext`T14 + \
+$CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    4]]))) + (-$CellContext`MH^2 + $CellContext`S34 + \
+$CellContext`T + $CellContext`U)^(-1) (-
+                 Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^Rational[1, 2])]^2 + 
+                Log[Rational[
+                    1, 2] $CellContext`MT^(-2) ((-2) $CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U + (((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) ((-2) $CellContext`MH^2 + 
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U))^Rational[1, 2])]^2) ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`e[
+                   2]] (($CellContext`MH^2 - $CellContext`S - \
+$CellContext`T14 - $CellContext`T24) ($CellContext`T14 - $CellContext`T24) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] + 
+                  2 ((-$CellContext`T14 + $CellContext`T24) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] (
+                    2 ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + ((-2) $CellContext`MH^2 + 
+                    2 $CellContext`S34 + 
+                    2 $CellContext`T + $CellContext`T14 + $CellContext`T24) \
+$CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] (
+                    2 ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + ((-2) $CellContext`MH^2 + 
+                    2 $CellContext`S34 + $CellContext`T14 + $CellContext`T24 + 
+                    2 $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]))) - 
+                4 (($CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U) ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[
+                    5]] + ($CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T - $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]]) - 2 ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] - $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] (-$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]])) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]] - $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[4]] $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[
+                   1]] ((-$CellContext`MH^2 + $CellContext`S34 + \
+$CellContext`T14 + $CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    3]] + ($CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T - $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]) + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[
+                    2]] (-($CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T - $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]]) + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[
+                    4]] ((-$CellContext`MH^2 + $CellContext`S34 + \
+$CellContext`T14 + $CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    3]] + ($CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T - $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]))))) + $CellContext`T14^(-1) (
+              8 (Rational[-1, 
+                   2] (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U)^(-1) (
+                  X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] - X`DiscB[
+                  2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U, $CellContext`MT, $CellContext`MT]) ((-2) ($CellContext`MH^2 - \
+$CellContext`S34 - $CellContext`T + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[
+                    4]] (($CellContext`MH^2 - 
+                    3 $CellContext`S34 + $CellContext`T + $CellContext`U) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] + 
+                    2 ($CellContext`S - $CellContext`T24) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    3]] + ($CellContext`MH^2 + $CellContext`S34 - 
+                    3 $CellContext`T + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) - 
+                  2 ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[2]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + 8 (-$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] - $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]]))) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]] + 
+                Rational[-1, 
+                   2] (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U)^(-2) (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U + $CellContext`MH^2 
+                   X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] - $CellContext`MH^2 
+                  X`DiscB[
+                   2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U, $CellContext`MT, $CellContext`MT] + $CellContext`MT^2 
+                   Log[Rational[
+                    1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 - $CellContext`MT^2 
+                  Log[Rational[
+                    1, 2] $CellContext`MT^(-2) ((-2) $CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U + (((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) ((-2) $CellContext`MH^2 + 
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U))^Rational[
+                    1, 2])]^2) ((-2) ($CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T - 2 $CellContext`T14 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] - $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[
+                    4]] (((-3) $CellContext`MH^2 + $CellContext`S + 
+                    4 $CellContext`S34 + 
+                    3 $CellContext`T14 + $CellContext`T24) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - 
+                   2 ($CellContext`S - $CellContext`T24) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    3]] + ((-3) $CellContext`MH^2 + $CellContext`S + 
+                    4 $CellContext`T + 
+                    3 $CellContext`T14 + $CellContext`T24) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) - 
+                  2 ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T - 
+                   2 $CellContext`T14 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[2]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + 8 (-$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] - $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]]))) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]]) + (
+                4 (2 + X`Eps^(-1) + 
+                  X`DiscB[
+                   2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U, $CellContext`MT, $CellContext`MT] + 
+                  Log[$CellContext`MT^(-2) X`Mu^2]) + 
+                4 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U)^(-1) (
+                  3 ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U) + 
+                  X`Eps^(-1) ($CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T - $CellContext`U) - $CellContext`MH^2 
+                  X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] + (
+                    2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U) X`DiscB[
+                    2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U, $CellContext`MT, $CellContext`MT] - $CellContext`MT^2 
+                  Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[
+                    1, 2])]^2 + ($CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T - $CellContext`U) 
+                   Log[$CellContext`MT^(-2) X`Mu^2] + $CellContext`MT^2 
+                   Log[Rational[
+                    1, 2] $CellContext`MT^(-2) ((-2) $CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U + (((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) ((-2) $CellContext`MH^2 + 
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U))^Rational[1, 2])]^2)) ((-2) ((-2) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]]) + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] (2 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[5]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[2]] (2 $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]])) + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] (2 ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] (2 $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]))) + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[
+                   4]] ((-$CellContext`S + $CellContext`T24) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] ((-4) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + 4 $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]))) + 
+              4 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U)^(-1) (-
+                 X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + 
+                X`DiscB[
+                 2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U, $CellContext`MT, $CellContext`MT]) (
+                2 ((-2) ($CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T - $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[5]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + 
+                  2 ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]]) - 8 (-$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] - $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]])) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[2]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] (
+                    2 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + (3 $CellContext`MH^2 - 
+                    3 $CellContext`S34 - 3 $CellContext`T - 
+                    2 $CellContext`T14 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[
+                    4]] ((-2) ($CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T - $CellContext`U) ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] (
+                    2 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + (3 $CellContext`MH^2 - 
+                    3 $CellContext`S34 - 3 $CellContext`T - 
+                    2 $CellContext`T14 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]))) + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[
+                   4]] (-($CellContext`S - $CellContext`T24) \
+(-$CellContext`MH^2 + $CellContext`S + $CellContext`T14 + $CellContext`T24) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] + 
+                  4 (-$CellContext`S + $CellContext`T24) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] (
+                    4 ($CellContext`MH^2 - $CellContext`S - $CellContext`T14 - \
+$CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + ((-7) $CellContext`MH^2 + 
+                    3 $CellContext`S + 8 $CellContext`T + 5 $CellContext`T14 + 
+                    3 $CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    1]] (((-7) $CellContext`MH^2 + 3 $CellContext`S + 
+                    8 $CellContext`S34 + 5 $CellContext`T14 + 
+                    3 $CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + 
+                    4 (-$CellContext`MH^2 + $CellContext`S + $CellContext`T14 + \
+$CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    4]]))) + (-$CellContext`MH^2 + $CellContext`S34 + \
+$CellContext`T + $CellContext`U)^(-1) (-
+                 Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^Rational[1, 2])]^2 + 
+                Log[Rational[
+                    1, 2] $CellContext`MT^(-2) ((-2) $CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U + (((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) ((-2) $CellContext`MH^2 + 
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U))^Rational[1, 2])]^2) (
+                4 (-($CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[5]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[
+                    1]] + ($CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T - $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]]) - 2 (-$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] - $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]])) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[2]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[
+                    1]] ((-$CellContext`MH^2 + $CellContext`S34 + \
+$CellContext`T + $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    2]] + (-$CellContext`MH^2 + $CellContext`S + \
+$CellContext`T24 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[
+                    4]] (-($CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T - $CellContext`U) ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[
+                    4]] ((-$CellContext`MH^2 + $CellContext`S34 + \
+$CellContext`T + $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    2]] + (-$CellContext`MH^2 + $CellContext`S + \
+$CellContext`T24 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]))) + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[
+                   4]] (-($CellContext`S - $CellContext`T24) \
+(-$CellContext`MH^2 + $CellContext`S + $CellContext`T14 + $CellContext`T24) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] - 
+                  2 (($CellContext`S - $CellContext`T24) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] (
+                    2 ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T - \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    1]] + ((-2) $CellContext`MH^2 + $CellContext`S + 
+                    2 $CellContext`S34 + $CellContext`T24 + 
+                    2 $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    1]] (((-2) $CellContext`MH^2 + $CellContext`S + 
+                    2 $CellContext`T + $CellContext`T24 + 
+                    2 $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + 
+                    2 (-$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    4]])))))) + $CellContext`U^(-1) (($CellContext`MH^2 - \
+$CellContext`U)^(-1) (
+              Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                  2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^Rational[1, 2])]^2 - 
+              Log[Rational[1, 2] $CellContext`MT^(-2) (
+                 2 $CellContext`MT^2 - $CellContext`U + ($CellContext`U ((-4) \
+$CellContext`MT^2 + $CellContext`U))^
+                  Rational[
+                   1, 2])]^2) (((-$CellContext`MH^2 + $CellContext`U) \
+$CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`e[2]] + 2 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[2]] $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[3]]) $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`ec[5]] - 2 $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[
+                5]] ((-$CellContext`MH^2 + $CellContext`U) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] + 2 $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[3]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[2]]) + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[
+                 4]] ((-$CellContext`MH^2 + $CellContext`U) \
+$CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`ec[5]] + 2 $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[2]])) - 
+            16 (Rational[1, 4] ($CellContext`MH^2 - $CellContext`U)^(-1) (
+               3 $CellContext`MH^2 + X`Eps^(-1) $CellContext`MH^2 - 
+               3 $CellContext`U - 
+               X`Eps^(-1) $CellContext`U + $CellContext`MH^2 
+                
+                X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - \
+$CellContext`U 
+               X`DiscB[$CellContext`U, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MT^2 
+                Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 + $CellContext`MH^2 
+                Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`U 
+               Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`MT^2 
+               Log[Rational[1, 2] $CellContext`MT^(-2) (
+                   2 $CellContext`MT^2 - $CellContext`U + ($CellContext`U \
+((-4) $CellContext`MT^2 + $CellContext`U))^Rational[1, 2])]^2) (
+               2 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[5]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] - $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[4]] $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[5]] - $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`e[2]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`ec[5]]) + $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[3]] (
+               Rational[
+                 1, 2] ($CellContext`MH^2 - $CellContext`U)^(-2) \
+(-$CellContext`MH^2 + $CellContext`U - $CellContext`MH^2 
+                 X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MH^2 
+                  X`DiscB[$CellContext`U, $CellContext`MT, $CellContext`MT] - \
+$CellContext`MT^2 
+                 Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 + $CellContext`MT^2 
+                  Log[Rational[1, 2] $CellContext`MT^(-2) (
+                    2 $CellContext`MT^2 - $CellContext`U + ($CellContext`U \
+((-4) $CellContext`MT^2 + $CellContext`U))^
+                    Rational[1, 2])]^2) (-$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] + 2 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[4]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[2]]) + 
+               Rational[
+                 1, 2] ($CellContext`MH^2 - $CellContext`U)^(-1) (-
+                  X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] + 
+                 X`DiscB[$CellContext`U, $CellContext`MT, $CellContext`MT]) \
+(-$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] + 2 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] - $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[4]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]]))) + 
+            4 ((2 + X`Eps^(-1) + 
+                X`DiscB[$CellContext`U, $CellContext`MT, $CellContext`MT] + 
+                Log[$CellContext`MT^(-2) X`Mu^2]) (2 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[5]] $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`ec[4]] - $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[4]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[5]] - $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`e[2]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`ec[
+                  5]]) + ($CellContext`MH^2 - $CellContext`U)^(-1) (
+                X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - 
+                X`DiscB[$CellContext`U, $CellContext`MT, $CellContext`MT]) \
+(((-$CellContext`MH^2 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[2]] + 2 ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]]) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]]) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`ec[5]] - 2 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[
+                  5]] ((-$CellContext`MH^2 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] + 2 $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]])) + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[
+                   4]] ((-$CellContext`MH^2 + $CellContext`U) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] + 2 $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    3]])))) + $CellContext`T14^(-1) (-($CellContext`MH^2 - \
+$CellContext`U)^(-1) (
+                Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^Rational[1, 2])]^2 - 
+                Log[Rational[1, 2] $CellContext`MT^(-2) (
+                   2 $CellContext`MT^2 - $CellContext`U + ($CellContext`U \
+((-4) $CellContext`MT^2 + $CellContext`U))^
+                    Rational[1, 2])]^2) ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[
+                   4]] (($CellContext`S - $CellContext`S34 + $CellContext`T - \
+$CellContext`T24) ($CellContext`MH^2 - $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] + 
+                  2 (2 ($CellContext`MH^2 - $CellContext`U) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - 
+                    2 ($CellContext`MH^2 - $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] (
+                    2 ($CellContext`S + $CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    1]] + ($CellContext`S + $CellContext`S34 - $CellContext`T + \
+$CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] - 2 $CellContext`S $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]))) - 4 ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[
+                    5]] ((-$CellContext`MH^2 + $CellContext`U) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    1]] + ($CellContext`S + $CellContext`T24) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    3]] + ($CellContext`MH^2 - $CellContext`U) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[
+                    1]] + ($CellContext`MH^2 - $CellContext`U) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]]) + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[
+                    4]] (((-$CellContext`MH^2 + $CellContext`U) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    1]] + ($CellContext`S + $CellContext`T24) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    3]] + ($CellContext`MH^2 - $CellContext`U) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[
+                    5]] + ($CellContext`MH^2 - $CellContext`U) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])) - 2 $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])) + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    4]])) + ($CellContext`MH^2 - $CellContext`U) \
+$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[2]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]))) + (
+                4 (2 + X`Eps^(-1) + 
+                  X`DiscB[$CellContext`U, $CellContext`MT, $CellContext`MT] + 
+                  Log[$CellContext`MT^(-2) X`Mu^2]) - 
+                4 ($CellContext`MH^2 - $CellContext`U)^(-1) (
+                 3 $CellContext`MH^2 + X`Eps^(-1) $CellContext`MH^2 - 
+                 3 $CellContext`U - 
+                 X`Eps^(-1) $CellContext`U + $CellContext`MH^2 
+                  X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] - $CellContext`U 
+                 X`DiscB[$CellContext`U, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MT^2 
+                  Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 + $CellContext`MH^2 
+                  Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`U 
+                 Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`MT^2 
+                 Log[Rational[1, 2] $CellContext`MT^(-2) (
+                    2 $CellContext`MT^2 - $CellContext`U + ($CellContext`U \
+((-4) $CellContext`MT^2 + $CellContext`U))^
+                    Rational[1, 2])]^2)) ((-2) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[5]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] + 2 $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]]) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] + 4 $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`ec[5]] ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]]) + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]] ((-2) ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] + 2 $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]]) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] + 4 $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])) + 4 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`e[2]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[4]]) + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[
+                   4]] ((-$CellContext`S + $CellContext`S34 - $CellContext`T + \
+$CellContext`T24) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] - 4 $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + 4 $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]] - $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]))) - 
+              8 (Rational[
+                 1, 2] ($CellContext`MH^2 - $CellContext`U)^(-2) \
+(-$CellContext`MH^2 + $CellContext`U - $CellContext`MH^2 
+                 X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MH^2 
+                  X`DiscB[$CellContext`U, $CellContext`MT, $CellContext`MT] - \
+$CellContext`MT^2 
+                 Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 + $CellContext`MT^2 
+                  Log[Rational[1, 2] $CellContext`MT^(-2) (
+                    2 $CellContext`MT^2 - $CellContext`U + ($CellContext`U \
+((-4) $CellContext`MT^2 + $CellContext`U))^
+                    Rational[1, 2])]^2) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[
+                  3]] ((-2) (-$CellContext`MH^2 + 2 $CellContext`S + 
+                   2 $CellContext`T24 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] - 
+                 2 (-$CellContext`MH^2 + 2 $CellContext`S + 
+                  2 $CellContext`T24 + $CellContext`U) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[5]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] + 8 ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])) + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])) + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[
+                    4]] ((-$CellContext`MH^2 + 2 $CellContext`S + 
+                    2 $CellContext`T24 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + 
+                   2 ($CellContext`S34 - $CellContext`T) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] - 2 $CellContext`S $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + 
+                   2 $CellContext`T24 $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] - $CellContext`MH^2 $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]] + 2 $CellContext`S $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]] + 
+                   2 $CellContext`T24 $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]] + $CellContext`U $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])) + 
+               Rational[
+                 1, 2] ($CellContext`MH^2 - $CellContext`U)^(-1) (-
+                  X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] + 
+                 X`DiscB[$CellContext`U, $CellContext`MT, $CellContext`MT]) \
+$CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[3]] (
+                 2 ((-3) $CellContext`MH^2 + 2 $CellContext`S34 + 
+                   2 $CellContext`T + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] + 
+                 2 ((-3) $CellContext`MH^2 + 2 $CellContext`S34 + 
+                   2 $CellContext`T + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + 8 ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])) + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])) - $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[
+                   4]] (((-3) $CellContext`MH^2 + 
+                    4 $CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + 
+                  2 ($CellContext`S - $CellContext`S34 + $CellContext`T - \
+$CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + ((-3) $CellContext`MH^2 + 
+                    4 $CellContext`T + $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]))) - 
+              4 ($CellContext`MH^2 - $CellContext`U)^(-1) (
+               X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - 
+               X`DiscB[$CellContext`U, $CellContext`MT, $CellContext`MT]) (
+               2 ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[
+                    5]] (((-5) $CellContext`MH^2 + 4 $CellContext`S34 + 
+                    4 $CellContext`T + 
+                    2 $CellContext`T14 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] + 
+                   2 ($CellContext`MH^2 - $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]]) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] - 
+                 2 ($CellContext`MH^2 - $CellContext`U) $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`ec[5]] ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]]) + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[
+                    4]] ((((-5) $CellContext`MH^2 + 4 $CellContext`S34 + 
+                    4 $CellContext`T + 
+                    2 $CellContext`T14 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] + 
+                    2 ($CellContext`MH^2 - $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]]) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] - 
+                   2 ($CellContext`MH^2 - $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])) + 8 $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])) + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])) - 
+                 2 ($CellContext`MH^2 - $CellContext`U) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`e[2]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[4]])) + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[
+                  4]] (($CellContext`S - $CellContext`S34 + $CellContext`T - \
+$CellContext`T24) ($CellContext`MH^2 - $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    3]] ((7 $CellContext`MH^2 - 8 $CellContext`S34 - 
+                    2 $CellContext`T14 - 3 $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + 
+                   4 ((-2) $CellContext`MH^2 + 
+                    2 $CellContext`S34 + $CellContext`T14 + 
+                    2 $CellContext`T24 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + (7 $CellContext`MH^2 - 
+                    8 $CellContext`T - 2 $CellContext`T14 - 
+                    3 $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]) + 
+                 4 ($CellContext`MH^2 - $CellContext`U) ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    4]])))) - ($CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T14 - $CellContext`T24)^(-1) ((
+               4 (2 + X`Eps^(-1) + 
+                 X`DiscB[$CellContext`U, $CellContext`MT, $CellContext`MT] + 
+                 Log[$CellContext`MT^(-2) X`Mu^2]) - 
+               4 ($CellContext`MH^2 - $CellContext`U)^(-1) (
+                3 $CellContext`MH^2 + X`Eps^(-1) $CellContext`MH^2 - 
+                3 $CellContext`U - 
+                X`Eps^(-1) $CellContext`U + $CellContext`MH^2 
+                 X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - \
+$CellContext`U 
+                X`DiscB[$CellContext`U, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MT^2 
+                 Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 + $CellContext`MH^2 
+                 Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`U 
+                Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`MT^2 
+                Log[Rational[1, 2] $CellContext`MT^(-2) (
+                    2 $CellContext`MT^2 - $CellContext`U + ($CellContext`U \
+((-4) $CellContext`MT^2 + $CellContext`U))^
+                    Rational[1, 2])]^2)) (($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] + 4 $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]]) + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] ((-4) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] + 3 $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] + 4 $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]])) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`ec[5]] - 4 ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[2]] - $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[3]]) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[5]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[5]] + 2 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[5]] (2 $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[3]]) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[5]] + 4 ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[2]] - $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[3]]) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[4]] - 2 $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[4]] (2 $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[1]] - $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[3]]) $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[4]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`e[
+                  2]] ((-$CellContext`MH^2 + $CellContext`S + $CellContext`T + 
+                   2 $CellContext`T14) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] + 4 (-$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    4]]))) - ($CellContext`MH^2 - $CellContext`U)^(-1) (
+              Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                  2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^Rational[1, 2])]^2 - 
+              Log[Rational[1, 2] $CellContext`MT^(-2) (
+                 2 $CellContext`MT^2 - $CellContext`U + ($CellContext`U ((-4) \
+$CellContext`MT^2 + $CellContext`U))^Rational[1, 2])]^2) ((-2) (
+                2 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[
+                   4]] (($CellContext`MH^2 - $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - $CellContext`S $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]]) + 2 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] ($CellContext`T24 $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    3]] + ($CellContext`MH^2 - $CellContext`U) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) - $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[
+                  2]] (($CellContext`MH^2 - $CellContext`S34 + \
+$CellContext`T14 + $CellContext`T24 - $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] + 
+                 2 ($CellContext`MH^2 - $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]])) $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`ec[5]] + 
+              4 ($CellContext`MH^2 - $CellContext`U) ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[2]] - $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[3]]) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[5]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[5]] + 4 $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[
+                 5]] ((-$CellContext`MH^2 + $CellContext`U) \
+$CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[1]] + $CellContext`S $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[3]]) $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[5]] - 
+              4 ($CellContext`MH^2 - $CellContext`U) ($CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[2]] - $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[3]]) $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[4]] $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[4]] - 4 $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[
+                4]] ((-$CellContext`MH^2 + $CellContext`U) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[1]] + $CellContext`S $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[3]]) $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[4]] + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`e[
+                 2]] (($CellContext`MH^2 - $CellContext`S - $CellContext`T - 
+                  2 $CellContext`T14) ($CellContext`MH^2 - $CellContext`U) \
+$CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`ec[5]] + 
+                4 ($CellContext`MH^2 - $CellContext`U) ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])) + 8 $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[3]] ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]) + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[2]] (-$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]))) - 
+             4 ($CellContext`MH^2 - $CellContext`U)^(-1) (
+              X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - 
+              X`DiscB[$CellContext`U, $CellContext`MT, $CellContext`MT]) (-(
+                2 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]] (
+                  2 ($CellContext`MH^2 - $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] + (-$CellContext`MH^2 - 
+                    2 $CellContext`S + 
+                    2 $CellContext`T + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[
+                   3]] (($CellContext`MH^2 - 2 $CellContext`S34 - 
+                    2 $CellContext`T14 + 
+                    6 $CellContext`T24 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] + 
+                  4 ($CellContext`MH^2 - $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[
+                   2]] (((-5) $CellContext`MH^2 + 6 $CellContext`S34 - 
+                    2 $CellContext`T14 - 2 $CellContext`T24 + 
+                    3 $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] + 
+                  4 (-$CellContext`MH^2 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]])) $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`ec[5]] + 
+              4 ($CellContext`MH^2 - $CellContext`U) ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[2]] - $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[3]]) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[5]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[5]] + 2 $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[
+                 5]] ((-2) ($CellContext`MH^2 - $CellContext`U) \
+$CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[1]] + ($CellContext`MH^2 + 2 $CellContext`S - 
+                  2 $CellContext`T - $CellContext`U) $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[3]]) $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[5]] - 
+              4 ($CellContext`MH^2 - $CellContext`U) ($CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[2]] - $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[3]]) $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[4]] $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[4]] - 2 $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[
+                4]] ((-2) ($CellContext`MH^2 - $CellContext`U) \
+$CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[1]] + ($CellContext`MH^2 + 2 $CellContext`S - 
+                 2 $CellContext`T - $CellContext`U) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[3]]) $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[4]] + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`e[
+                 2]] (($CellContext`MH^2 - $CellContext`S - $CellContext`T - 
+                  2 $CellContext`T14) ($CellContext`MH^2 - $CellContext`U) \
+$CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`ec[5]] + 
+                4 ($CellContext`MH^2 - $CellContext`U) ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])) + 16 $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[3]] ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]) + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[2]] (-$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]))) - 
+             8 (Rational[
+                1, 2] ($CellContext`MH^2 - $CellContext`U)^(-2) \
+(-$CellContext`MH^2 + $CellContext`U - $CellContext`MH^2 
+                X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MH^2 
+                 X`DiscB[$CellContext`U, $CellContext`MT, $CellContext`MT] - \
+$CellContext`MT^2 
+                Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 + $CellContext`MT^2 
+                 Log[Rational[1, 2] $CellContext`MT^(-2) (
+                    2 $CellContext`MT^2 - $CellContext`U + ($CellContext`U \
+((-4) $CellContext`MT^2 + $CellContext`U))^
+                    Rational[1, 2])]^2) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[
+                 3]] (-((-$CellContext`MH^2 + 2 $CellContext`S34 - 
+                    2 $CellContext`T14 - 
+                    2 $CellContext`T24 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] + (-$CellContext`MH^2 + 
+                    4 $CellContext`T24 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] + 
+                  2 ($CellContext`MH^2 - 
+                    2 $CellContext`S - $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`ec[5]] + 
+                2 (-$CellContext`MH^2 + 
+                  2 $CellContext`S + $CellContext`U) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[5]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[5]] + 
+                2 ($CellContext`MH^2 - 
+                  2 $CellContext`S - $CellContext`U) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[4]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[4]] + 8 ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]) + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] (-$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]))) + 
+              Rational[
+                1, 2] ($CellContext`MH^2 - $CellContext`U)^(-1) (-
+                 X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + 
+                X`DiscB[$CellContext`U, $CellContext`MT, $CellContext`MT]) \
+$CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[
+                 3]] (-(((-3) $CellContext`MH^2 + 
+                    4 $CellContext`S34 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] + ($CellContext`MH^2 - 
+                    2 $CellContext`S34 - 2 $CellContext`T14 + 
+                    2 $CellContext`T24 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] + 
+                  2 (-$CellContext`MH^2 + 
+                    2 $CellContext`T + $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`ec[5]] + 
+                2 ($CellContext`MH^2 - 
+                  2 $CellContext`T - $CellContext`U) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[5]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[5]] + 
+                2 (-$CellContext`MH^2 + 
+                  2 $CellContext`T + $CellContext`U) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[4]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[4]] + 8 ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]) + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] (-$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    4]])))))) + ($CellContext`MH^2 - $CellContext`S - \
+$CellContext`T24 - $CellContext`U)^(-1) (-$CellContext`S34^(-1) (
+              4 (2 + X`Eps^(-1) + 
+                X`DiscB[$CellContext`S34, $CellContext`MT, $CellContext`MT] + 
+                Log[$CellContext`MT^(-2) X`Mu^2]) (4 ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[5]]) $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[5]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`ec[5]] + 2 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[5]] $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[5]] (2 $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]]) - $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[5]] ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] ((-4) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] + 4 $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]])) + 4 ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[5]]) $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`ec[4]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[2]] + 2 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`e[2]] (2 $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]]) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[2]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[
+                   4]] ((-$CellContext`MH^2 + 
+                    2 $CellContext`S + $CellContext`T + $CellContext`T14) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] - 4 ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]]))) - 
+              4 ($CellContext`MH^2 - $CellContext`S34)^(-1) (
+               3 $CellContext`MH^2 + X`Eps^(-1) $CellContext`MH^2 - 
+               3 $CellContext`S34 - 
+               X`Eps^(-1) $CellContext`S34 + $CellContext`MH^2 
+                X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - \
+$CellContext`S34 
+               X`DiscB[$CellContext`S34, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MT^2 
+                Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 + $CellContext`MH^2 
+                Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`S34 
+               Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`MT^2 
+               Log[
+                 Rational[1, 2] $CellContext`MT^(-2) (
+                   2 $CellContext`MT^2 - $CellContext`S34 + ($CellContext`S34 \
+((-4) $CellContext`MT^2 + $CellContext`S34))^Rational[1, 2])]^2) (
+               4 ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[2]] - $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[5]]) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`ec[5]] + 2 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[5]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[5]] (2 $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]]) - $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[5]] ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[5]] ((-4) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[2]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] + 4 $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]])) + 4 ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[2]] - $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[5]]) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[2]] + 2 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`e[2]] (2 $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]]) $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[2]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[
+                  4]] ((-$CellContext`MH^2 + 
+                   2 $CellContext`S + $CellContext`T + $CellContext`T14) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] - 4 ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]]))) + 
+              8 (Rational[
+                  1, 2] ($CellContext`MH^2 - $CellContext`S34)^(-1) (-
+                   X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] + 
+                  X`DiscB[$CellContext`S34, $CellContext`MT, \
+$CellContext`MT]) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[
+                   3]] (-(((-2) $CellContext`MH^2 + 2 $CellContext`S34 + 
+                    4 $CellContext`T) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] - ($CellContext`MH^2 - 
+                    2 $CellContext`S + $CellContext`S34 + 2 $CellContext`T24 - 
+                    2 $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[
+                    3]] + ((-3) $CellContext`MH^2 + $CellContext`S34 + 
+                    4 $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] + 
+                  2 (-$CellContext`MH^2 + $CellContext`S34 + 
+                    2 $CellContext`T) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] + 
+                  2 (-$CellContext`MH^2 + $CellContext`S34 + 
+                    2 $CellContext`T) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[2]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + 8 (-$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]))) + 
+                Rational[
+                  1, 2] ($CellContext`MH^2 - $CellContext`S34)^(-2) \
+(-$CellContext`MH^2 + $CellContext`S34 - $CellContext`MH^2 
+                  X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] + $CellContext`MH^2 
+                   X`DiscB[$CellContext`S34, $CellContext`MT, \
+$CellContext`MT] - $CellContext`MT^2 
+                  Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 + $CellContext`MT^2 
+                   Log[Rational[1, 2] $CellContext`MT^(-2) (
+                    2 $CellContext`MT^2 - $CellContext`S34 + \
+($CellContext`S34 ((-4) $CellContext`MT^2 + $CellContext`S34))^
+                    Rational[1, 2])]^2) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[
+                   3]] ((((-2) $CellContext`MH^2 + 2 $CellContext`S34 + 
+                    4 $CellContext`T14) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[
+                    2]] + (-$CellContext`MH^2 + $CellContext`S34 + 
+                    4 $CellContext`T24) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] + ($CellContext`MH^2 + 
+                    2 $CellContext`S - $CellContext`S34 + 2 $CellContext`T24 - 
+                    2 $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] + 
+                  2 ($CellContext`MH^2 - $CellContext`S34 - 
+                    2 $CellContext`T14) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] + 
+                  2 ($CellContext`MH^2 - $CellContext`S34 - 
+                    2 $CellContext`T14) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[2]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + 8 (-$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])))) - 
+              4 ($CellContext`MH^2 - $CellContext`S34)^(-1) (
+               X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - 
+               X`DiscB[$CellContext`S34, $CellContext`MT, $CellContext`MT]) \
+(-$CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[5]] ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[
+                    2]] ((-4) ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + 
+                   2 ($CellContext`MH^2 - $CellContext`S34 - 2 $CellContext`T + 
+                    2 $CellContext`T14) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[
+                    4]] ((-4) ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + (5 $CellContext`MH^2 + 
+                    2 $CellContext`S - 3 $CellContext`S34 + 
+                    2 $CellContext`T24 - 6 $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[
+                    3]] ((-4) ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + ($CellContext`MH^2 - 
+                    2 $CellContext`S + $CellContext`S34 + 6 $CellContext`T24 - 
+                    2 $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]])) + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[
+                  4]] (($CellContext`MH^2 - $CellContext`S34) \
+($CellContext`MH^2 - 
+                   2 $CellContext`S - $CellContext`T - $CellContext`T14) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] + 
+                 4 ($CellContext`MH^2 - $CellContext`S34) ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]])) + 
+               2 ((-2) ($CellContext`MH^2 - $CellContext`S34) \
+($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]]) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    5]] ((-2) ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[
+                    1]] + ($CellContext`MH^2 - $CellContext`S34 - 
+                    2 $CellContext`T + 2 $CellContext`T14) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) - 
+                 2 ($CellContext`MH^2 - $CellContext`S34) ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[5]]) $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`ec[4]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[
+                    2]] ((-2) ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[
+                    1]] + ($CellContext`MH^2 - $CellContext`S34 - 
+                    2 $CellContext`T + 2 $CellContext`T14) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] - 8 $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]] (-$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    4]])))) - ($CellContext`MH^2 - $CellContext`S34)^(-1) (
+               Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                   2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^Rational[1, 2])]^2 - 
+               Log[Rational[1, 2] $CellContext`MT^(-2) (
+                  2 $CellContext`MT^2 - $CellContext`S34 + ($CellContext`S34 \
+((-4) $CellContext`MT^2 + $CellContext`S34))^
+                   Rational[1, 2])]^2) ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[
+                  4]] (($CellContext`MH^2 - $CellContext`S34) \
+($CellContext`MH^2 - 
+                   2 $CellContext`S - $CellContext`T - $CellContext`T14) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] + 
+                 4 ($CellContext`MH^2 - $CellContext`S34) ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]])) - 
+               2 (2 ($CellContext`MH^2 - $CellContext`S34) \
+($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[5]]) $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[5]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`ec[5]] - 2 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[5]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[
+                  5]] ((-$CellContext`MH^2 + $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`T14 $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`ec[5]] ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[
+                    2]] ((-2) ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + 
+                    2 $CellContext`T14 $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[
+                    3]] ((-2) ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + 
+                    2 $CellContext`T24 $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[
+                    4]] ((-2) ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[
+                    2]] + ($CellContext`MH^2 + $CellContext`S - \
+$CellContext`S34 + $CellContext`T24 - $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]])) + 
+                2 ($CellContext`MH^2 - $CellContext`S34) ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[5]]) $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`ec[4]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[2]] - 2 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`e[
+                  2]] ((-$CellContext`MH^2 + $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`T14 $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[2]] + 4 $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]] (-$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]))))) + $CellContext`T^(-1) (
+              4 (2 + X`Eps^(-1) + 
+                X`DiscB[$CellContext`T, $CellContext`MT, $CellContext`MT] + 
+                Log[$CellContext`MT^(-2) X`Mu^2]) ($CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`ec[5]] ((-4) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + 4 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] - $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]])) - 2 (($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] + 2 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] + 2 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) + (($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] + 2 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] + 2 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[2]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]])) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]]) + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[
+                   4]] ((-$CellContext`MH^2 + $CellContext`S34 + \
+$CellContext`T14 + 2 $CellContext`T24) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] + 4 ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]))) - 
+              4 ($CellContext`MH^2 - $CellContext`T)^(-1) (
+               3 $CellContext`MH^2 + X`Eps^(-1) $CellContext`MH^2 - 
+               3 $CellContext`T - 
+               X`Eps^(-1) $CellContext`T + $CellContext`MH^2 
+                X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - \
+$CellContext`T 
+               X`DiscB[$CellContext`T, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MT^2 
+                Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 + $CellContext`MH^2 
+                Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`T 
+               Log[$CellContext`MT^(-2) X`Mu^2] - $CellContext`MT^2 
+               Log[Rational[1, 2] $CellContext`MT^(-2) (
+                   2 $CellContext`MT^2 - $CellContext`T + ($CellContext`T \
+((-4) $CellContext`MT^2 + $CellContext`T))^
+                    Rational[1, 2])]^2) ($CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[5]] ((-4) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + 4 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] - $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]])) - 2 (($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] + 2 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[5]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`ec[5]] + 2 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[5]] $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[5]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]]) + (($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] + 2 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] + 2 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[2]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]])) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[2]]) + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[
+                  4]] ((-$CellContext`MH^2 + $CellContext`S34 + \
+$CellContext`T14 + 2 $CellContext`T24) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] + 4 ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    4]]))) - ($CellContext`MH^2 - $CellContext`T)^(-1) (
+               Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                   2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^Rational[1, 2])]^2 - 
+               Log[Rational[1, 2] $CellContext`MT^(-2) (
+                  2 $CellContext`MT^2 - $CellContext`T + ($CellContext`T \
+((-4) $CellContext`MT^2 + $CellContext`T))^Rational[1, 2])]^2) (
+               4 ($CellContext`T14 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[
+                    3]] + ($CellContext`MH^2 - $CellContext`T) \
+$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`ec[5]] + 
+               4 ($CellContext`MH^2 - $CellContext`T) $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[5]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[5]] ($CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] - $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]]) + 2 $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[5]] (
+                 2 (-$CellContext`MH^2 + $CellContext`T) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] - 
+                 2 ($CellContext`MH^2 - $CellContext`T) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[2]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]]) + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[
+                    3]] ((-$CellContext`MH^2 + 
+                    2 $CellContext`S + $CellContext`S34 + $CellContext`T14 + 
+                    2 $CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] - 2 ($CellContext`T14 $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`S $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]))) + 
+               4 ($CellContext`T14 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[
+                    3]] + ($CellContext`MH^2 - $CellContext`T) \
+$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[2]] + 
+               4 ($CellContext`MH^2 - $CellContext`T) $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`e[2]] ($CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] - $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]]) $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[2]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[
+                  4]] (($CellContext`MH^2 - $CellContext`T) \
+($CellContext`MH^2 - $CellContext`S34 - $CellContext`T14 - 
+                   2 $CellContext`T24) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] - 
+                 4 ($CellContext`MH^2 - $CellContext`T) ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])) + 8 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[3]] (($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]])) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]))) - 
+              4 ($CellContext`MH^2 - $CellContext`T)^(-1) (
+               X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - 
+               X`DiscB[$CellContext`T, $CellContext`MT, $CellContext`MT]) (
+               2 (($CellContext`MH^2 - 2 $CellContext`S34 - $CellContext`T + 
+                   2 $CellContext`T14) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] + 
+                 2 ($CellContext`MH^2 - $CellContext`T) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`ec[5]] + 
+               4 ($CellContext`MH^2 - $CellContext`T) $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[5]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[5]] ($CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] - $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]]) + $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[5]] (
+                 4 (-$CellContext`MH^2 + $CellContext`T) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] - 
+                 4 ($CellContext`MH^2 - $CellContext`T) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[2]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]]) + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[
+                    3]] ((9 $CellContext`MH^2 - 2 $CellContext`S34 - 
+                    5 $CellContext`T - 2 $CellContext`T14 - 
+                    8 $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] - 
+                   2 ($CellContext`MH^2 - 2 $CellContext`S34 - $CellContext`T + 
+                    2 $CellContext`T14) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + (3 $CellContext`MH^2 - 
+                    8 $CellContext`S - 2 $CellContext`S34 - 3 $CellContext`T - 
+                    2 $CellContext`T14) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]])) + 
+               2 (($CellContext`MH^2 - 2 $CellContext`S34 - $CellContext`T + 
+                   2 $CellContext`T14) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] + 
+                 2 ($CellContext`MH^2 - $CellContext`T) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[2]] + 
+               4 ($CellContext`MH^2 - $CellContext`T) $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`e[2]] ($CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] - $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]]) $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[2]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[
+                  4]] (($CellContext`MH^2 - $CellContext`T) \
+($CellContext`MH^2 - $CellContext`S34 - $CellContext`T14 - 
+                   2 $CellContext`T24) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] - 
+                 4 ($CellContext`MH^2 - $CellContext`T) ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])) + 16 $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]]) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]))) - 
+              8 (Rational[
+                 1, 2] ($CellContext`MH^2 - $CellContext`T)^(-2) \
+(-$CellContext`MH^2 + $CellContext`T - $CellContext`MH^2 
+                 X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MH^2 
+                  X`DiscB[$CellContext`T, $CellContext`MT, $CellContext`MT] - \
+$CellContext`MT^2 
+                 Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+                    2 $CellContext`MT^2 + $CellContext`MH ($CellContext`MH^2 - 
+                    4 $CellContext`MT^2)^
+                    Rational[1, 2])]^2 + $CellContext`MT^2 
+                  Log[Rational[1, 2] $CellContext`MT^(-2) (
+                    2 $CellContext`MT^2 - $CellContext`T + ($CellContext`T \
+((-4) $CellContext`MT^2 + $CellContext`T))^
+                    Rational[1, 2])]^2) $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[3]] (
+                 2 (-$CellContext`MH^2 + $CellContext`T + 
+                   2 $CellContext`T14) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[
+                    5]] (((-3) $CellContext`MH^2 + 
+                    2 $CellContext`S34 + $CellContext`T - 2 $CellContext`T14 + 
+                    4 $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + 
+                   2 (-$CellContext`MH^2 + $CellContext`S34 + \
+$CellContext`T14 + 2 $CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] + (5 $CellContext`MH^2 - 
+                    2 $CellContext`S34 - 3 $CellContext`T - 
+                    2 $CellContext`T14 - 4 $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]]) + 
+                 2 (-$CellContext`MH^2 + $CellContext`T + 
+                   2 $CellContext`T14) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + 8 ((-$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]))) + 
+               Rational[
+                 1, 2] ($CellContext`MH^2 - $CellContext`T)^(-1) (-
+                  X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] + 
+                 X`DiscB[$CellContext`T, $CellContext`MT, $CellContext`MT]) \
+$CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[3]] (
+                 2 ($CellContext`MH^2 - 
+                   2 $CellContext`S34 - $CellContext`T) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[
+                    5]] (((-5) $CellContext`MH^2 + 4 $CellContext`S34 + 
+                    3 $CellContext`T + 4 $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + 
+                   2 (-$CellContext`MH^2 + $CellContext`S34 + \
+$CellContext`T14 + 2 $CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] + (
+                    3 $CellContext`MH^2 - $CellContext`T - 
+                    4 $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]]) + 
+                 2 ($CellContext`MH^2 - 
+                   2 $CellContext`S34 - $CellContext`T) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + 8 ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]]) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]))))) + $CellContext`T14^(-1) (
+              4 $CellContext`T14 (16 $CellContext`MT^4 - 
+                 4 $CellContext`MH^2 $CellContext`T14 + 
+                 8 $CellContext`MT^2 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2)^(-1) ((-4) $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`ec[5]] ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]])) + 8 $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[2]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]]) + 8 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]]) + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[
+                   4]] ((2 $CellContext`S - $CellContext`S34 + $CellContext`T - 
+                    2 $CellContext`T24) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] - 4 (($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])))) (
+                2 $CellContext`MH^2 
+                 X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] - \
+(4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + $CellContext`U) 
+                X`DiscB[$CellContext`T14, $CellContext`MT, $CellContext`MT] - 
+                2 $CellContext`MH^2 
+                X`DiscB[$CellContext`MH^2 - 
+                  4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT] + 
+                4 $CellContext`MT^2 
+                 X`DiscB[$CellContext`MH^2 - 
+                   4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT] + $CellContext`T14 
+                 X`DiscB[$CellContext`MH^2 - 
+                   4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT] + $CellContext`T24 
+                 X`DiscB[$CellContext`MH^2 - 
+                   4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT] + $CellContext`U 
+                 X`DiscB[$CellContext`MH^2 - 
+                   4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT] + 
+                4 $CellContext`MH^2 $CellContext`MT^2 
+                 X`ScalarC0[$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+                   4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT, $CellContext`MT] - $CellContext`MH^2 \
+$CellContext`T14 
+                X`ScalarC0[$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+                  4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT, $CellContext`MT] + $CellContext`MH^2 \
+$CellContext`T24 
+                 X`ScalarC0[$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+                   4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT, $CellContext`MT] + $CellContext`MH^2 \
+$CellContext`U 
+                 X`ScalarC0[$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+                   4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT, $CellContext`MT]) - 
+              2 (16 $CellContext`MT^4 - 4 $CellContext`MH^2 $CellContext`T14 + 
+                8 $CellContext`MT^2 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2)^(-1) ((
+                 4 $CellContext`S $CellContext`S34 - $CellContext`S34^2 + \
+$CellContext`T^2 + 2 $CellContext`S34 $CellContext`T14 - 
+                 2 $CellContext`T $CellContext`T14 - 
+                 2 $CellContext`MH^2 (
+                  2 $CellContext`S - $CellContext`S34 + $CellContext`T - 
+                  2 $CellContext`T24) - 4 $CellContext`T $CellContext`T24 - 
+                 2 $CellContext`S34 $CellContext`U + 
+                 2 $CellContext`T $CellContext`U) $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[4]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[5]] + 
+               8 ((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T) \
+$CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[4]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`ec[5]] + 
+               8 ((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T) \
+$CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[5]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[1]] - 4 $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[5]] (
+                2 ((-2) $CellContext`MH^2 + $CellContext`S34 + \
+$CellContext`T) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[2]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] + (6 $CellContext`MH^2 - 
+                  3 $CellContext`S34 - 3 $CellContext`T - 
+                  4 $CellContext`U) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]] (
+                  2 ((-2) $CellContext`MH^2 + $CellContext`S34 + \
+$CellContext`T) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + (6 $CellContext`MH^2 - 
+                    3 $CellContext`S34 - 3 $CellContext`T - 
+                    4 $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]])) + 
+               8 ((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T) \
+$CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[4]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[2]] + 
+               8 ((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T) \
+$CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`e[2]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[1]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[2]] + 32 ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) + ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]]) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) - 4 $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[
+                 4]] (((-2) ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    1]] + ($CellContext`S34 - $CellContext`T) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] + 
+                  2 (-$CellContext`MH^2 + $CellContext`T) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[2]] + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[
+                   5]] ((-2) ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    1]] + ($CellContext`S34 - $CellContext`T) \
+$CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]] + 
+                  2 (-$CellContext`MH^2 + $CellContext`T) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]))) (-(
+                 4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + 
+               2 $CellContext`T14 
+                X`DiscB[$CellContext`T14, $CellContext`MT, $CellContext`MT] + 
+               4 $CellContext`MT^2 
+                X`DiscB[$CellContext`MH^2 - 
+                  4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT] - $CellContext`T14 
+               X`DiscB[$CellContext`MH^2 - 
+                 4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT] + $CellContext`T24 
+                X`DiscB[$CellContext`MH^2 - 
+                  4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT] + $CellContext`U 
+                X`DiscB[$CellContext`MH^2 - 
+                  4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT] - 2 $CellContext`MH^2 $CellContext`T14 
+               X`ScalarC0[$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+                 4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT, $CellContext`MT] + 
+               4 $CellContext`MT^2 $CellContext`T14 
+                X`ScalarC0[$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+                  4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT, $CellContext`MT] + $CellContext`T14^2 
+                X`ScalarC0[$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+                  4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT, $CellContext`MT] + $CellContext`T14 \
+$CellContext`T24 
+                X`ScalarC0[$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+                  4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT, $CellContext`MT] + $CellContext`T14 \
+$CellContext`U 
+                X`ScalarC0[$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+                  4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT, $CellContext`MT]) + 
+              2 (16 $CellContext`MT^4 - 4 $CellContext`MH^2 $CellContext`T14 + 
+                 8 $CellContext`MT^2 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2)^(-1) ((-4) $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`ec[5]] ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]])) + 8 $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[2]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]]) + 8 $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]]) + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[
+                   4]] ((2 $CellContext`S - $CellContext`S34 + $CellContext`T - 
+                    2 $CellContext`T24) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] - 4 (($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])))) (
+                3 (16 $CellContext`MT^4 - 
+                  4 $CellContext`MH^2 $CellContext`T14 + 
+                  8 $CellContext`MT^2 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + ($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2) + 
+                X`Eps^(-1) (16 $CellContext`MT^4 - 
+                  4 $CellContext`MH^2 $CellContext`T14 + 
+                  8 $CellContext`MT^2 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + ($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2) + \
+$CellContext`MH^2 (
+                  4 $CellContext`MT^2 - $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) 
+                 X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + \
+$CellContext`T14 ((-2) $CellContext`MH^2 + 
+                  4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) 
+                 X`DiscB[$CellContext`T14, $CellContext`MT, $CellContext`MT] - \
+($CellContext`MH^2 - 
+                 4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U) (
+                 4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) 
+                X`DiscB[$CellContext`MH^2 - 
+                  4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT] + (16 $CellContext`MT^4 - 
+                  4 $CellContext`MH^2 $CellContext`T14 + 
+                  8 $CellContext`MT^2 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + ($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2) 
+                 Log[$CellContext`MT^(-2) X`Mu^2] + 
+                2 (16 $CellContext`MT^6 + $CellContext`MH^2 $CellContext`T14 \
+($CellContext`MH^2 - $CellContext`T24 - $CellContext`U) + 
+                  8 $CellContext`MT^4 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + $CellContext`MT^2 ((-8) $CellContext`MH^2 $CellContext`T14 + \
+($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2)) 
+                 X`ScalarC0[$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+                   4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT, $CellContext`MT]) - 
+              2 ((2 + X`Eps^(-1) + 
+                 X`DiscB[$CellContext`MH^2 - 
+                   4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT] + 
+                 Log[$CellContext`MT^(-2) X`Mu^2]) ((-4) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]])) + 8 $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[2]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]]) + 8 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]]) + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[
+                    4]] ((2 $CellContext`S - $CellContext`S34 + \
+$CellContext`T - 2 $CellContext`T24) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] - 4 (($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    4]])))) + (((-2) $CellContext`S $CellContext`S34 - \
+$CellContext`S34 $CellContext`T14 + $CellContext`T $CellContext`T14 + 
+                   2 $CellContext`MH^2 ($CellContext`S - $CellContext`T24) + 
+                   2 $CellContext`T $CellContext`T24) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] - 
+                 4 ((-2) $CellContext`MH^2 + $CellContext`S34 + \
+$CellContext`T) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]] $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[5]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`ec[5]] - 
+                 4 ((-2) $CellContext`MH^2 + $CellContext`S34 + \
+$CellContext`T) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[5]] $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[5]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] + 4 $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[
+                    5]] (((-2) $CellContext`MH^2 + $CellContext`S34 + \
+$CellContext`T) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[
+                    1]] + ($CellContext`S + $CellContext`T14 + \
+$CellContext`T24) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[
+                    4]] (((-2) $CellContext`MH^2 + $CellContext`S34 + \
+$CellContext`T) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[
+                    2]] + ($CellContext`S + $CellContext`T14 + \
+$CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]])) - 
+                 4 ((-2) $CellContext`MH^2 + $CellContext`S34 + \
+$CellContext`T) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]] $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`ec[4]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[2]] - 
+                 4 ((-2) $CellContext`MH^2 + $CellContext`S34 + \
+$CellContext`T) $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`e[2]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[2]] - 8 ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) + ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]]) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) + 4 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[
+                    4]] (((-$CellContext`MH^2 + $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    1]] + (-$CellContext`MH^2 + $CellContext`T) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    5]] ((-$CellContext`MH^2 + $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    1]] + (-$CellContext`MH^2 + $CellContext`T) \
+$CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]))) 
+                X`ScalarC0[$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+                  4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT, $CellContext`MT]) + 
+              4 (Rational[
+                  1, 2] (16 $CellContext`MT^4 - 
+                   4 $CellContext`MH^2 $CellContext`T14 + 
+                   8 $CellContext`MT^2 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2)^(-2) (-($CellContext`S34 - $CellContext`T) ((-2) \
+$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + 
+                    2 $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] - 
+                  4 (2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - 
+                   2 $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) - 
+                  4 ($CellContext`S34 - $CellContext`T) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[4]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) + 16 ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]])) (
+                  2 $CellContext`T14 (16 $CellContext`MT^4 - 
+                    4 $CellContext`MH^2 $CellContext`T14 + 
+                    8 $CellContext`MT^2 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + ($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2) - \
+(64 $CellContext`MT^6 + ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2 (3 $CellContext`T14 + $CellContext`T24 + $CellContext`U) + 
+                   16 $CellContext`MT^4 (5 $CellContext`T14 + 
+                    3 ($CellContext`T24 + $CellContext`U)) - 
+                   2 $CellContext`MH^2 $CellContext`T14 (3 $CellContext`T14 + 
+                    5 ($CellContext`T24 + $CellContext`U)) + 
+                   4 $CellContext`MT^2 ((-10) $CellContext`MH^2 \
+$CellContext`T14 + 7 $CellContext`T14^2 + 
+                    10 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + 
+                    3 ($CellContext`T24 + $CellContext`U)^2)) 
+                  X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] + 6 $CellContext`T14^2 ((-2) $CellContext`MH^2 + 
+                    4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) 
+                   X`DiscB[$CellContext`T14, $CellContext`MT, \
+$CellContext`MT] + (64 $CellContext`MT^6 - 
+                    3 $CellContext`T14^3 + $CellContext`T14^2 \
+$CellContext`T24 + 
+                    5 $CellContext`T14 $CellContext`T24^2 + \
+$CellContext`T24^3 + $CellContext`T14^2 $CellContext`U + 
+                    10 $CellContext`T14 $CellContext`T24 $CellContext`U + 
+                    3 $CellContext`T24^2 $CellContext`U + 
+                    5 $CellContext`T14 $CellContext`U^2 + 
+                    3 $CellContext`T24 $CellContext`U^2 + $CellContext`U^3 + 
+                    2 $CellContext`MH^2 $CellContext`T14 (3 $CellContext`T14 - 
+                    5 ($CellContext`T24 + $CellContext`U)) + 
+                    16 $CellContext`MT^4 (5 $CellContext`T14 + 
+                    3 ($CellContext`T24 + $CellContext`U)) + 
+                    4 $CellContext`MT^2 ((-10) $CellContext`MH^2 \
+$CellContext`T14 + $CellContext`T14^2 + 
+                    10 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + 
+                    3 ($CellContext`T24 + $CellContext`U)^2)) 
+                   X`DiscB[$CellContext`MH^2 - 
+                    4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT] + 
+                  2 $CellContext`T14 (32 $CellContext`MT^6 + 
+                    16 $CellContext`MT^4 (
+                    2 $CellContext`T14 + $CellContext`T24 + $CellContext`U) + 
+                    2 $CellContext`MT^2 ((-16) $CellContext`MH^2 \
+$CellContext`T14 + 5 $CellContext`T14^2 + 
+                    6 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2) + $CellContext`T14 (
+                    6 $CellContext`MH^4 + ($CellContext`T14 + \
+$CellContext`T24 + $CellContext`U)^2 - 
+                    2 $CellContext`MH^2 (2 $CellContext`T14 + 
+                    3 ($CellContext`T24 + $CellContext`U)))) 
+                   X`ScalarC0[$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+                    4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT, $CellContext`MT]) + 
+                Rational[-1, 2] (16 $CellContext`MT^4 - 
+                   4 $CellContext`MH^2 $CellContext`T14 + 
+                   8 $CellContext`MT^2 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2)^(-2) (-($CellContext`S34 - $CellContext`T) ((-2) \
+$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + 
+                    2 $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] - 
+                  4 (2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - 
+                   2 $CellContext`U) $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) - 
+                  4 ($CellContext`S34 - $CellContext`T) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[4]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) + 16 ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) + ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]]) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]])) ((
+                    4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) (16 $CellContext`MT^4 - 4 $CellContext`MH^2 $CellContext`T14 + 
+                    8 $CellContext`MT^2 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + ($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2) + \
+$CellContext`MH^2 (16 $CellContext`MT^4 + 
+                    8 $CellContext`MH^2 $CellContext`T14 - 
+                    5 $CellContext`T14^2 - 
+                    4 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 - 
+                    4 $CellContext`T14 $CellContext`U + 
+                    2 $CellContext`T24 $CellContext`U + $CellContext`U^2 + 
+                    8 $CellContext`MT^2 ((-2) $CellContext`T14 + \
+$CellContext`T24 + $CellContext`U)) 
+                   X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] + $CellContext`T14 ((
+                    4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2 - 2 $CellContext`MH^2 (
+                    12 $CellContext`MT^2 - $CellContext`T14 + 
+                    3 ($CellContext`T24 + $CellContext`U))) 
+                   X`DiscB[$CellContext`T14, $CellContext`MT, \
+$CellContext`MT] - (
+                   8 $CellContext`MH^4 $CellContext`T14 + $CellContext`T14 (
+                    4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2 + $CellContext`MH^2 (16 $CellContext`MT^4 - 
+                    3 $CellContext`T14^2 - 
+                    10 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2 + 
+                    8 $CellContext`MT^2 ((-5) $CellContext`T14 + \
+$CellContext`T24 + $CellContext`U))) 
+                  X`DiscB[$CellContext`MH^2 - 
+                    4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT] + 
+                  2 (64 $CellContext`MT^8 + 
+                    48 $CellContext`MT^6 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + 
+                    12 $CellContext`MT^4 ((-4) $CellContext`MH^2 \
+$CellContext`T14 + ($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2) - \
+$CellContext`MH^2 $CellContext`T14 (-$CellContext`T14^2 + $CellContext`T14 \
+($CellContext`T24 + $CellContext`U) + 
+                    2 ($CellContext`T24 + $CellContext`U)^2 + \
+$CellContext`MH^2 ($CellContext`T14 - 
+                    3 ($CellContext`T24 + $CellContext`U))) + \
+$CellContext`MT^2 (
+                    12 $CellContext`MH^4 $CellContext`T14 + ($CellContext`T14 + \
+$CellContext`T24 + $CellContext`U)^3 - 
+                    4 $CellContext`MH^2 $CellContext`T14 (2 $CellContext`T14 + 
+                    5 ($CellContext`T24 + $CellContext`U)))) 
+                   X`ScalarC0[$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+                    4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT, $CellContext`MT])))), 
+          0, $CellContext`T14^(-1) ($CellContext`MH^2 - $CellContext`S - \
+$CellContext`T24 - $CellContext`U)^(-1) ((-8) $CellContext`MT^2 (
+              16 $CellContext`MT^4 - 4 $CellContext`MH^2 $CellContext`T14 + 
+              8 $CellContext`MT^2 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2)^(-1) 
+            X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+               4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U]^(-1) \
+((-4) $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[5]] ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[2]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[1]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[1]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[4]] ($CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[2]] + $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[5]])) + 8 $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[1]] ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[5]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[5]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`e[2]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[2]]) + 8 $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[4]] ($CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`ec[5]] + $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[4]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[2]]) + $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[
+                4]] ((2 $CellContext`S - $CellContext`S34 + $CellContext`T - 
+                 2 $CellContext`T24) $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[5]] - 4 (($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[2]] + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[5]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])))) ($CellContext`MH^2 (
+               16 $CellContext`MT^4 + 8 $CellContext`MH^2 $CellContext`T14 - 
+               5 $CellContext`T14^2 - 
+               4 $CellContext`T14 $CellContext`T24 + $CellContext`T24^2 - 
+               4 $CellContext`T14 $CellContext`U + 
+               2 $CellContext`T24 $CellContext`U + $CellContext`U^2 + 
+               8 $CellContext`MT^2 ((-2) $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)) 
+              X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + \
+$CellContext`T14 ((
+                 4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2 - 
+               2 $CellContext`MH^2 (12 $CellContext`MT^2 - $CellContext`T14 + 
+                3 ($CellContext`T24 + $CellContext`U))) 
+              X`DiscB[$CellContext`T14, $CellContext`MT, $CellContext`MT] - (
+              8 $CellContext`MH^4 $CellContext`T14 + $CellContext`T14 (
+                 4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2 + $CellContext`MH^2 (16 $CellContext`MT^4 - 
+                3 $CellContext`T14^2 - 
+                10 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2 + 
+                8 $CellContext`MT^2 ((-5) $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U))) 
+             X`DiscB[$CellContext`MH^2 - 
+               4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT] + (
+               4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) 
+              X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U] + 
+             2 (64 $CellContext`MT^8 + 
+               48 $CellContext`MT^6 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + 
+               12 $CellContext`MT^4 ((-4) $CellContext`MH^2 $CellContext`T14 + \
+($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2) - $CellContext`MH^2 \
+$CellContext`T14 (-$CellContext`T14^2 + $CellContext`T14 ($CellContext`T24 + \
+$CellContext`U) + 
+                2 ($CellContext`T24 + $CellContext`U)^2 + $CellContext`MH^2 \
+($CellContext`T14 - 
+                  3 ($CellContext`T24 + $CellContext`U))) + $CellContext`MT^2 \
+(12 $CellContext`MH^4 $CellContext`T14 + ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^3 - 
+                 4 $CellContext`MH^2 $CellContext`T14 (2 $CellContext`T14 + 
+                  5 ($CellContext`T24 + $CellContext`U)))) 
+              X`ScalarC0[$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+                4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT, $CellContext`MT]) + 
+           8 $CellContext`MT^2 (16 $CellContext`MT^4 - 
+              4 $CellContext`MH^2 $CellContext`T14 + 
+              8 $CellContext`MT^2 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2)^(-1) ((
+               4 $CellContext`S $CellContext`S34 - $CellContext`S34^2 + \
+$CellContext`T^2 + 2 $CellContext`S34 $CellContext`T14 - 
+               2 $CellContext`T $CellContext`T14 - 
+               2 $CellContext`MH^2 (
+                2 $CellContext`S - $CellContext`S34 + $CellContext`T - 
+                2 $CellContext`T24) - 4 $CellContext`T $CellContext`T24 - 
+               2 $CellContext`S34 $CellContext`U + 
+               2 $CellContext`T $CellContext`U) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[4]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[5]] + 
+             8 ((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T) \
+$CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[4]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[5]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`ec[5]] + 
+             8 ((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T) \
+$CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[5]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`k[5]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[1]] - 4 $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[5]] (
+              2 ((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T) \
+$CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[2]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[1]] + (6 $CellContext`MH^2 - 
+                3 $CellContext`S34 - 3 $CellContext`T - 
+                4 $CellContext`U) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[3]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[1]] + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[4]] (
+                2 ((-2) $CellContext`MH^2 + $CellContext`S34 + \
+$CellContext`T) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[2]] + (6 $CellContext`MH^2 - 
+                  3 $CellContext`S34 - 3 $CellContext`T - 
+                  4 $CellContext`U) $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]])) + 
+             8 ((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T) \
+$CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`k[4]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[4]] $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[2]] + 
+             8 ((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T) \
+$CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`e[2]] $CellContext`Pair[
+                $CellContext`ec[4], 
+                $CellContext`k[1]] $CellContext`Pair[
+                $CellContext`ec[5], 
+                $CellContext`k[2]] + 32 ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[3]] ($CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] - $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]]) + ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[2]] - $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[5]]) $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[3]]) ($CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[3]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[2]] + $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[5]] $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[3]]) - 4 $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[
+               4]] (((-2) ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[
+                   1]] + ($CellContext`S34 - $CellContext`T) $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[3]] + 
+                2 (-$CellContext`MH^2 + $CellContext`T) $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[4]]) $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[2]] + $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[
+                 5]] ((-2) ($CellContext`MH^2 - $CellContext`S34) \
+$CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[
+                   1]] + ($CellContext`S34 - $CellContext`T) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]] + 
+                2 (-$CellContext`MH^2 + $CellContext`T) $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[4]]))) ((-$CellContext`MH^2 + 
+                4 $CellContext`MT^2 + $CellContext`T24 + $CellContext`U)^(-1) \
+(4 $CellContext`MT^2 - $CellContext`T14 + $CellContext`T24 + $CellContext`U) - \
+(16 $CellContext`MT^6 + $CellContext`MH^2 $CellContext`T14 ($CellContext`MH^2 - \
+$CellContext`T24 - $CellContext`U) + 
+               8 $CellContext`MT^4 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + $CellContext`MT^2 ((-8) $CellContext`MH^2 $CellContext`T14 + \
+($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2))^(-1) (
+              256 $CellContext`MT^10 + 
+              256 $CellContext`MT^8 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) - 
+              32 $CellContext`MT^6 (2 $CellContext`MH^2 $CellContext`T14 - 
+               3 ($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2) + 
+              16 $CellContext`MT^4 ($CellContext`MH^4 $CellContext`T14 + \
+($CellContext`T14 + $CellContext`T24 + $CellContext`U)^3 - $CellContext`MH^2 \
+$CellContext`T14 ($CellContext`T14 + 
+                 3 ($CellContext`T24 + $CellContext`U))) + $CellContext`MT^2 (
+                8 $CellContext`MH^4 $CellContext`T14 ((-5) $CellContext`T14 + \
+$CellContext`T24 + $CellContext`U) + ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^4 + 
+                4 $CellContext`MH^2 $CellContext`T14 ($CellContext`T14^2 - 
+                  2 $CellContext`T14 ($CellContext`T24 + $CellContext`U) - 
+                  3 ($CellContext`T24 + $CellContext`U)^2)) + \
+$CellContext`MH^2 $CellContext`T14 (
+                8 $CellContext`MH^4 $CellContext`T14 + ($CellContext`T14 - \
+$CellContext`T24 - $CellContext`U) ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2 + $CellContext`MH^2 ((-3) $CellContext`T14^2 - 
+                  6 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2))) 
+             X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT]/
+             X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+              4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U] + \
+$CellContext`T14 (
+                16 $CellContext`MT^6 + $CellContext`MH^2 $CellContext`T14 \
+($CellContext`MH^2 - $CellContext`T24 - $CellContext`U) + 
+                8 $CellContext`MT^4 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + $CellContext`MT^2 ((-8) $CellContext`MH^2 $CellContext`T14 + \
+($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2))^(-1) (
+               256 $CellContext`MT^8 + 
+               192 $CellContext`MT^6 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) - 
+               48 $CellContext`MT^4 (
+                3 $CellContext`MH^2 $CellContext`T14 - ($CellContext`T14 + \
+$CellContext`T24 + $CellContext`U)^2) + $CellContext`MH^2 $CellContext`T14 \
+($CellContext`T14^2 - 4 $CellContext`T14 ($CellContext`T24 + $CellContext`U) - 
+                 5 ($CellContext`T24 + $CellContext`U)^2 + 
+                 2 $CellContext`MH^2 ($CellContext`T14 + 
+                   3 ($CellContext`T24 + $CellContext`U))) + 
+               4 $CellContext`MT^2 (
+                 6 $CellContext`MH^4 $CellContext`T14 + ($CellContext`T14 + \
+$CellContext`T24 + $CellContext`U)^3 - 
+                 2 $CellContext`MH^2 $CellContext`T14 (4 $CellContext`T14 + 
+                  7 ($CellContext`T24 + $CellContext`U)))) 
+              X`DiscB[$CellContext`T14, $CellContext`MT, $CellContext`MT]/
+              X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+               4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U] + \
+($CellContext`MH^4 + 32 $CellContext`MT^4 + 
+                12 $CellContext`MT^2 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2 - 
+                2 $CellContext`MH^2 (
+                 6 $CellContext`MT^2 + $CellContext`T24 + \
+$CellContext`U))^(-1) (
+                16 $CellContext`MT^6 + $CellContext`MH^2 $CellContext`T14 \
+($CellContext`MH^2 - $CellContext`T24 - $CellContext`U) + 
+                8 $CellContext`MT^4 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + $CellContext`MT^2 ((-8) $CellContext`MH^2 $CellContext`T14 + \
+($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2))^(-1) (
+               8 $CellContext`MH^10 $CellContext`T14^2 + $CellContext`MH^8 \
+$CellContext`T14 (16 $CellContext`MT^4 - 5 $CellContext`T14^2 - 
+                 28 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2 + 
+                 8 $CellContext`MT^2 ((-20) $CellContext`T14 + \
+$CellContext`T24 + $CellContext`U)) + $CellContext`MH^6 $CellContext`T14 \
+((-256) $CellContext`MT^6 + 
+                 16 $CellContext`MT^4 (72 $CellContext`T14 - 
+                   11 ($CellContext`T24 + $CellContext`U)) + 
+                 8 $CellContext`MT^2 (14 $CellContext`T14^2 + 
+                   52 $CellContext`T14 ($CellContext`T24 + $CellContext`U) - 
+                   5 ($CellContext`T24 + $CellContext`U)^2) - 
+                 3 ($CellContext`T24 + $CellContext`U) ((-5) \
+$CellContext`T14^2 - 
+                  12 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2)) + $CellContext`MT^2 (
+                  
+                  4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^3 (160 $CellContext`MT^6 - 
+                 16 $CellContext`MT^4 (7 $CellContext`T14 - 
+                  6 ($CellContext`T24 + $CellContext`U)) - 
+                 2 $CellContext`MT^2 (3 $CellContext`T14^2 + 
+                  22 $CellContext`T14 ($CellContext`T24 + $CellContext`U) - 
+                  9 ($CellContext`T24 + $CellContext`U)^2) + \
+($CellContext`T24 + $CellContext`U) (-$CellContext`T14^2 - 
+                   4 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2)) + $CellContext`MH^4 (
+                 256 $CellContext`MT^10 + 
+                 256 $CellContext`MT^8 (
+                   5 $CellContext`T14 + $CellContext`T24 + $CellContext`U) - 
+                 32 $CellContext`MT^6 (115 $CellContext`T14^2 - 
+                  36 $CellContext`T14 ($CellContext`T24 + $CellContext`U) - 
+                  3 ($CellContext`T24 + $CellContext`U)^2) - $CellContext`T14 \
+($CellContext`T24 + $CellContext`U)^2 (15 $CellContext`T14^2 + 
+                  20 $CellContext`T14 ($CellContext`T24 + $CellContext`U) - 
+                  3 ($CellContext`T24 + $CellContext`U)^2) - 
+                 16 $CellContext`MT^4 (49 $CellContext`T14^3 + 
+                  129 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U) - 
+                  24 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^2 - \
+($CellContext`T24 + $CellContext`U)^3) + $CellContext`MT^2 ((-11) \
+$CellContext`T14^4 - 
+                   232 $CellContext`T14^3 ($CellContext`T24 + $CellContext`U) - 
+                   366 $CellContext`T14^2 ($CellContext`T24 + \
+$CellContext`U)^2 + 
+                   56 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^3 + \
+($CellContext`T24 + $CellContext`U)^4)) - $CellContext`MH^2 (
+                3072 $CellContext`MT^12 + 
+                256 $CellContext`MT^10 (11 $CellContext`T14 + 
+                  14 ($CellContext`T24 + $CellContext`U)) - 
+                128 $CellContext`MT^8 (45 $CellContext`T14^2 - 
+                 22 $CellContext`T14 ($CellContext`T24 + $CellContext`U) - 
+                 13 ($CellContext`T24 + $CellContext`U)^2) + $CellContext`T14 \
+($CellContext`T24 + $CellContext`U)^3 ((-5) $CellContext`T14^2 - 
+                  4 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2) - 
+                32 $CellContext`MT^6 (61 $CellContext`T14^3 + 
+                 134 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U) - 
+                 35 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^2 - 
+                 12 ($CellContext`T24 + $CellContext`U)^3) - 
+                4 $CellContext`MT^4 (25 $CellContext`T14^4 + 
+                 236 $CellContext`T14^3 ($CellContext`T24 + $CellContext`U) + 
+                 282 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U)^2 - 
+                 56 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^3 - 
+                 11 ($CellContext`T24 + $CellContext`U)^4) + \
+$CellContext`MT^2 (-$CellContext`T14^5 - 
+                  18 $CellContext`T14^4 ($CellContext`T24 + $CellContext`U) - 
+                  134 $CellContext`T14^3 ($CellContext`T24 + \
+$CellContext`U)^2 - 
+                  120 $CellContext`T14^2 ($CellContext`T24 + \
+$CellContext`U)^3 + 23 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^4 + 
+                  2 ($CellContext`T24 + $CellContext`U)^5))) 
+              X`DiscB[$CellContext`MH^2 - 
+                4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT]/
+              X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U] + 
+             2 $CellContext`T14 ((
+                 4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2 - $CellContext`MH^2 (
+                12 $CellContext`MT^2 + $CellContext`T14 + 
+                3 ($CellContext`T24 + $CellContext`U))) 
+              X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+                 4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U]^(-1)
+                 X`ScalarC0[$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+                4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT, $CellContext`MT]) - 
+           16 $CellContext`MT^2 $CellContext`T14 (16 $CellContext`MT^4 - 
+             4 $CellContext`MH^2 $CellContext`T14 + 
+             8 $CellContext`MT^2 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2)^(-1) ((-4) $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[5]] ($CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[2]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[1]] + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[5]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[1]] + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[4]] ($CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[2]] + $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[5]])) + 8 $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`k[1]] ($CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[5]] $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[5]] + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`e[2]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[2]]) + 8 $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`k[4]] ($CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[5]] $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`ec[5]] + $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[4]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[2]]) + $CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[
+               4]] ((2 $CellContext`S - $CellContext`S34 + $CellContext`T - 
+                2 $CellContext`T24) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[5]] - 4 (($CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[4]]) $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[2]] + $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[5]] ($CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[4]])))) ((-$CellContext`MH^2 + 
+               4 $CellContext`MT^2 + $CellContext`T24 + $CellContext`U)^(-1) \
+((-2) $CellContext`MH^2 + 
+              4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + $CellContext`MH^2 (
+               16 $CellContext`MT^6 + $CellContext`MH^2 $CellContext`T14 \
+($CellContext`MH^2 - $CellContext`T24 - $CellContext`U) + 
+               8 $CellContext`MT^4 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + $CellContext`MT^2 ((-8) $CellContext`MH^2 $CellContext`T14 + \
+($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2))^(-1) (
+              256 $CellContext`MT^8 + 
+              192 $CellContext`MT^6 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) - 
+              48 $CellContext`MT^4 (
+               3 $CellContext`MH^2 $CellContext`T14 - ($CellContext`T14 + \
+$CellContext`T24 + $CellContext`U)^2) + $CellContext`MH^2 $CellContext`T14 \
+($CellContext`T14^2 - 4 $CellContext`T14 ($CellContext`T24 + $CellContext`U) - 
+                5 ($CellContext`T24 + $CellContext`U)^2 + 
+                2 $CellContext`MH^2 ($CellContext`T14 + 
+                  3 ($CellContext`T24 + $CellContext`U))) + 
+              4 $CellContext`MT^2 (
+                6 $CellContext`MH^4 $CellContext`T14 + ($CellContext`T14 + \
+$CellContext`T24 + $CellContext`U)^3 - 
+                2 $CellContext`MH^2 $CellContext`T14 (4 $CellContext`T14 + 
+                 7 ($CellContext`T24 + $CellContext`U)))) 
+             X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT]/
+             X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+              4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U] - (
+              16 $CellContext`MT^6 + $CellContext`MH^2 $CellContext`T14 \
+($CellContext`MH^2 - $CellContext`T24 - $CellContext`U) + 
+              8 $CellContext`MT^4 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + $CellContext`MT^2 ((-8) $CellContext`MH^2 $CellContext`T14 + \
+($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2))^(-1) (
+             256 $CellContext`MT^10 + 
+             256 $CellContext`MT^8 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) - 
+             32 $CellContext`MT^6 (2 $CellContext`MH^2 $CellContext`T14 - 
+              3 ($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2) + \
+$CellContext`MH^2 $CellContext`T14 (4 $CellContext`MH^4 $CellContext`T14 + 
+               2 $CellContext`MH^2 (-$CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2 - ($CellContext`T24 + $CellContext`U) ($CellContext`T14 + \
+$CellContext`T24 + $CellContext`U)^2) + 
+             16 $CellContext`MT^4 (
+               2 $CellContext`MH^4 $CellContext`T14 + ($CellContext`T14 + \
+$CellContext`T24 + $CellContext`U)^3 - $CellContext`MH^2 $CellContext`T14 (
+                2 $CellContext`T14 + 
+                3 ($CellContext`T24 + $CellContext`U))) + $CellContext`MT^2 (
+               16 $CellContext`MH^4 $CellContext`T14 ((-2) $CellContext`T14 + \
+$CellContext`T24 + $CellContext`U) + ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^4 - 
+               4 $CellContext`MH^2 $CellContext`T14 ($CellContext`T14^2 + 
+                4 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + 
+                3 ($CellContext`T24 + $CellContext`U)^2))) 
+            X`DiscB[$CellContext`T14, $CellContext`MT, $CellContext`MT]/
+            X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+             4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U] - \
+($CellContext`MH^4 + 32 $CellContext`MT^4 + 
+              12 $CellContext`MT^2 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2 - 
+              2 $CellContext`MH^2 (
+               6 $CellContext`MT^2 + $CellContext`T24 + $CellContext`U))^(-1) \
+(16 $CellContext`MT^6 + $CellContext`MH^2 $CellContext`T14 ($CellContext`MH^2 - \
+$CellContext`T24 - $CellContext`U) + 
+              8 $CellContext`MT^4 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + $CellContext`MT^2 ((-8) $CellContext`MH^2 $CellContext`T14 + \
+($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2))^(-1) (
+             2 $CellContext`MH^10 $CellContext`T14 (
+               12 $CellContext`MT^2 - $CellContext`T14 + 
+               3 ($CellContext`T24 + $CellContext`U)) - $CellContext`MH^8 \
+$CellContext`T14 (464 $CellContext`MT^4 + $CellContext`T14^2 - 
+              4 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + 
+              19 ($CellContext`T24 + $CellContext`U)^2 - 
+              8 $CellContext`MT^2 ($CellContext`T14 - 
+               24 ($CellContext`T24 + $CellContext`U))) - $CellContext`MT^2 (
+               4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^4 (
+              40 $CellContext`MT^4 + ($CellContext`T24 + $CellContext`U)^2 + 
+              2 $CellContext`MT^2 ($CellContext`T14 + 
+                7 ($CellContext`T24 + $CellContext`U))) + $CellContext`MH^2 (
+                4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2 (
+               832 $CellContext`MT^8 + $CellContext`T14 ($CellContext`T24 + \
+$CellContext`U)^3 + 
+               48 $CellContext`MT^6 (10 $CellContext`T14 + 
+                 11 ($CellContext`T24 + $CellContext`U)) + $CellContext`MT^2 \
+($CellContext`T24 + $CellContext`U) (3 $CellContext`T14^2 + 
+                 26 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + 
+                 7 ($CellContext`T24 + $CellContext`U)^2) + 
+               4 $CellContext`MT^4 (9 $CellContext`T14^2 + 
+                 52 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + 
+                 27 ($CellContext`T24 + $CellContext`U)^2)) + \
+$CellContext`MH^6 (256 $CellContext`MT^8 + 
+               192 $CellContext`MT^6 (
+                 17 $CellContext`T14 + $CellContext`T24 + $CellContext`U) + 
+               16 $CellContext`MT^4 (13 $CellContext`T14^2 + 
+                 119 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + 
+                 3 ($CellContext`T24 + $CellContext`U)^2) + 
+               3 $CellContext`T14 ($CellContext`T24 + $CellContext`U) \
+($CellContext`T14^2 + 7 ($CellContext`T24 + $CellContext`U)^2) + 
+               4 $CellContext`MT^2 (7 $CellContext`T14^3 + 
+                 9 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U) + 
+                 89 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^2 + \
+($CellContext`T24 + $CellContext`U)^3)) - $CellContext`MH^4 (
+              3584 $CellContext`MT^10 + 
+              256 $CellContext`MT^8 (40 $CellContext`T14 + 
+                13 ($CellContext`T24 + $CellContext`U)) + $CellContext`T14 \
+($CellContext`T24 + $CellContext`U)^2 (3 $CellContext`T14^2 + 
+                4 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + 
+                9 ($CellContext`T24 + $CellContext`U)^2) + 
+              128 $CellContext`MT^6 (14 $CellContext`T14^2 + 
+                60 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + 
+                9 ($CellContext`T24 + $CellContext`U)^2) + 
+              16 $CellContext`MT^4 (16 $CellContext`T14^3 + 
+                51 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U) + 
+                129 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^2 + 
+                11 ($CellContext`T24 + $CellContext`U)^3) + 
+              2 $CellContext`MT^2 ($CellContext`T14^4 + 
+                28 $CellContext`T14^3 ($CellContext`T24 + $CellContext`U) + 
+                54 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U)^2 + 
+                116 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^3 + 
+                5 ($CellContext`T24 + $CellContext`U)^4))) 
+            X`DiscB[$CellContext`MH^2 - 
+              4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT]/
+            X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U] + 
+            2 $CellContext`MH^2 (16 $CellContext`MT^4 + 
+              2 $CellContext`MH^2 $CellContext`T14 - 
+              2 $CellContext`T14^2 - $CellContext`T14 $CellContext`T24 + \
+$CellContext`T24^2 - $CellContext`T14 $CellContext`U + 
+              2 $CellContext`T24 $CellContext`U + $CellContext`U^2 + \
+$CellContext`MT^2 ((-4) $CellContext`T14 + 
+                8 ($CellContext`T24 + $CellContext`U))) 
+             X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+                4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U]^(-1) 
+             X`ScalarC0[$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+               4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT, $CellContext`MT]) - 
+           2 ((-4) $CellContext`MT^2 (-$CellContext`MH^2 + 
+               4 $CellContext`MT^2 + $CellContext`T24 + $CellContext`U)^(-1) \
+(-$CellContext`MH^2 + 
+               8 $CellContext`MT^2 + $CellContext`T24 + $CellContext`U)^(-1) \
+(-$CellContext`MH^2 + 8 $CellContext`MT^2 + $CellContext`T24 + $CellContext`U + 
+              2 $CellContext`MT^2 
+               X`DiscB[$CellContext`MH^2 - 
+                 4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT]) ((-4) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[5]] ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[2]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[5]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]])) + 8 $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[1]] ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`ec[5]] $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[5]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`e[2]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[2]]) + 8 $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[4]] ($CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[5]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`ec[5]] + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`ec[4]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[2]]) + $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[
+                 4]] ((2 $CellContext`S - $CellContext`S34 + $CellContext`T - 
+                  2 $CellContext`T24) $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`ec[5]] - 4 (($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])))) - 
+            4 $CellContext`MT^2 (-$CellContext`MH^2 + 
+              8 $CellContext`MT^2 + $CellContext`T24 + $CellContext`U)^(-1) (
+              16 $CellContext`MT^6 + $CellContext`MH^2 $CellContext`T14 \
+($CellContext`MH^2 - $CellContext`T24 - $CellContext`U) + 
+              8 $CellContext`MT^4 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + $CellContext`MT^2 ((-8) $CellContext`MH^2 $CellContext`T14 + \
+($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2))^(-1) 
+            X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+               4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U]^(-1) \
+(((-2) $CellContext`S $CellContext`S34 - $CellContext`S34 $CellContext`T14 + \
+$CellContext`T $CellContext`T14 + 
+               2 $CellContext`MH^2 ($CellContext`S - $CellContext`T24) + 
+               2 $CellContext`T $CellContext`T24) $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[4]] $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[5]] - 
+             4 ((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T) \
+$CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`k[4]] $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`k[5]] $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`ec[5]] - 
+             4 ((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T) \
+$CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`ec[5]] $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`k[5]] $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`k[1]] + 4 $CellContext`Pair[
+                $CellContext`e[2], 
+                $CellContext`ec[
+                5]] (((-2) $CellContext`MH^2 + $CellContext`S34 + \
+$CellContext`T) $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[2]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[
+                  1]] + ($CellContext`S + $CellContext`T14 + \
+$CellContext`T24) $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[3]] $CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[1]] + $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[
+                  4]] (((-2) $CellContext`MH^2 + $CellContext`S34 + \
+$CellContext`T) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[
+                    2]] + ($CellContext`S + $CellContext`T14 + \
+$CellContext`T24) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]])) - 
+             4 ((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T) \
+$CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`k[4]] $CellContext`Pair[
+               $CellContext`e[2], 
+               $CellContext`ec[4]] $CellContext`Pair[
+               $CellContext`ec[5], 
+               $CellContext`k[2]] - 
+             4 ((-2) $CellContext`MH^2 + $CellContext`S34 + $CellContext`T) \
+$CellContext`Pair[
+               $CellContext`e[1], 
+               $CellContext`e[2]] $CellContext`Pair[
+               $CellContext`ec[4], 
+               $CellContext`k[1]] $CellContext`Pair[
+               $CellContext`ec[5], 
+               $CellContext`k[2]] - 8 ($CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[3]] ($CellContext`Pair[
+                  $CellContext`ec[4], 
+                  $CellContext`k[1]] - $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[3]]) + ($CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`k[2]] - $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`k[5]]) $CellContext`Pair[
+                 $CellContext`ec[4], 
+                 $CellContext`k[3]]) ($CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[3]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[2]] + $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`k[5]] $CellContext`Pair[
+                 $CellContext`ec[5], 
+                 $CellContext`k[3]]) + 4 $CellContext`Pair[
+                $CellContext`e[1], 
+                $CellContext`ec[
+                4]] (((-$CellContext`MH^2 + $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    1]] + (-$CellContext`MH^2 + $CellContext`T) \
+$CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]]) $CellContext`Pair[
+                  $CellContext`ec[5], 
+                  $CellContext`k[2]] + $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`k[
+                  5]] ((-$CellContext`MH^2 + $CellContext`S34) \
+$CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    1]] + (-$CellContext`MH^2 + $CellContext`T) \
+$CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    4]]))) (-$CellContext`MH^2 $CellContext`T14 \
+($CellContext`MH^2 - 
+               8 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U) (
+               2 $CellContext`MH^2 - 
+               4 $CellContext`MT^2 - $CellContext`T14 - $CellContext`T24 - \
+$CellContext`U) 
+              X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT] + \
+$CellContext`MH^2 $CellContext`T14 ($CellContext`MH^2 - 
+               8 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U) (
+               4 $CellContext`MT^2 - $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) 
+              X`DiscB[$CellContext`T14, $CellContext`MT, $CellContext`MT] - (
+              64 $CellContext`MT^8 - 
+              2 $CellContext`MH^2 $CellContext`T14 (-$CellContext`MH^2 + \
+$CellContext`T24 + $CellContext`U)^2 + 
+              48 $CellContext`MT^6 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + 
+              4 $CellContext`MT^4 ((-20) $CellContext`MH^2 $CellContext`T14 + 
+                3 ($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2) + \
+$CellContext`MT^2 (
+                24 $CellContext`MH^4 $CellContext`T14 + ($CellContext`T14 + \
+$CellContext`T24 + $CellContext`U)^3 - 
+                4 $CellContext`MH^2 $CellContext`T14 ($CellContext`T14 + 
+                 7 ($CellContext`T24 + $CellContext`U)))) 
+             X`DiscB[$CellContext`MH^2 - 
+               4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT] - ($CellContext`MH^2 - 
+              8 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U) (
+              4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) (
+              16 $CellContext`MT^6 + $CellContext`MH^2 $CellContext`T14 \
+($CellContext`MH^2 - $CellContext`T24 - $CellContext`U) + 
+              8 $CellContext`MT^4 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + $CellContext`MT^2 ((-8) $CellContext`MH^2 $CellContext`T14 + \
+($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2)) 
+             X`ScalarC0[$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+               4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT, $CellContext`MT])) + 
+           4 (2 $CellContext`MT^2 (16 $CellContext`MT^4 - 
+                4 $CellContext`MH^2 $CellContext`T14 + 
+                8 $CellContext`MT^2 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2)^(-2) (-($CellContext`S34 - $CellContext`T) ((-2) \
+$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + 
+                 2 $CellContext`U) $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[4]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[5]] - 
+               4 (2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - 
+                2 $CellContext`U) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[5]] ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]]) - 
+               4 ($CellContext`S34 - $CellContext`T) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[4]] ($CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[2]] + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[5]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]]) + 16 ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) + ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] - $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]]) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]])) (-(-$CellContext`MH^2 + 
+                  4 $CellContext`MT^2 + $CellContext`T24 + \
+$CellContext`U)^(-1) (
+                 12 $CellContext`MH^4 $CellContext`T14 - (
+                  4 $CellContext`MT^2 - $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) (
+                   4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2 + 
+                 2 $CellContext`MH^2 (
+                   16 $CellContext`MT^4 - $CellContext`T14^2 - 
+                   6 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2 + 
+                   8 $CellContext`MT^2 ((-3) $CellContext`T14 + \
+$CellContext`T24 + $CellContext`U))) + 
+               2 $CellContext`MH^2 (
+                  16 $CellContext`MT^6 + $CellContext`MH^2 $CellContext`T14 \
+($CellContext`MH^2 - $CellContext`T24 - $CellContext`U) + 
+                  8 $CellContext`MT^4 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + $CellContext`MT^2 ((-8) $CellContext`MH^2 $CellContext`T14 + \
+($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2))^(-1) (
+                 1024 $CellContext`MT^12 - 
+                 1280 $CellContext`MT^10 ($CellContext`T14 - $CellContext`T24 - \
+$CellContext`U) + 128 $CellContext`MT^8 (7 $CellContext`MH^2 $CellContext`T14 - 
+                   15 $CellContext`T14^2 - 
+                   10 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + 
+                   5 ($CellContext`T24 + $CellContext`U)^2) + 
+                 32 $CellContext`MT^6 (2 $CellContext`MH^4 $CellContext`T14 - 
+                   5 (5 $CellContext`T14 - $CellContext`T24 - $CellContext`U) \
+($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2 + 
+                   19 $CellContext`MH^2 $CellContext`T14 (
+                    3 $CellContext`T14 + $CellContext`T24 + $CellContext`U)) - 
+                 4 $CellContext`MT^4 (
+                  5 (7 $CellContext`T14 - $CellContext`T24 - $CellContext`U) \
+($CellContext`T14 + $CellContext`T24 + $CellContext`U)^3 + 
+                  4 $CellContext`MH^4 $CellContext`T14 (55 $CellContext`T14 - 
+                    3 ($CellContext`T24 + $CellContext`U)) - 
+                  2 $CellContext`MH^2 $CellContext`T14 (91 $CellContext`T14^2 + 
+                   130 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + 
+                   15 ($CellContext`T24 + $CellContext`U)^2)) + \
+$CellContext`MH^2 $CellContext`T14 (
+                   2 $CellContext`MH^4 $CellContext`T14 (3 $CellContext`T14 + 
+                    13 ($CellContext`T24 + $CellContext`U)) - \
+($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2 ($CellContext`T14^2 - 
+                    
+                    10 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2) + $CellContext`MH^2 ((-5) \
+$CellContext`T14^3 - 
+                    27 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U) - 
+                    33 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^2 + \
+($CellContext`T24 + $CellContext`U)^3)) + $CellContext`MT^2 (
+                   104 $CellContext`MH^6 $CellContext`T14^2 - (
+                    9 $CellContext`T14 - $CellContext`T24 - $CellContext`U) \
+($CellContext`T14 + $CellContext`T24 + $CellContext`U)^4 - 
+                   4 $CellContext`MH^4 $CellContext`T14 (
+                    37 $CellContext`T14^2 + 
+                    88 $CellContext`T14 ($CellContext`T24 + $CellContext`U) - 
+                    3 ($CellContext`T24 + $CellContext`U)^2) + 
+                   2 $CellContext`MH^2 $CellContext`T14 (
+                    39 $CellContext`T14^3 + 
+                    127 $CellContext`T14^2 ($CellContext`T24 + \
+$CellContext`U) + 
+                    89 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^2 + \
+($CellContext`T24 + $CellContext`U)^3))) 
+                X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT]/
+                X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U] + 
+               2 $CellContext`T14 (
+                  16 $CellContext`MT^6 + $CellContext`MH^2 $CellContext`T14 \
+($CellContext`MH^2 - $CellContext`T24 - $CellContext`U) + 
+                  8 $CellContext`MT^4 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + $CellContext`MT^2 ((-8) $CellContext`MH^2 $CellContext`T14 + \
+($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2))^(-1) ((-12) \
+$CellContext`MH^8 $CellContext`T14^2 + $CellContext`MT^2 (
+                    4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^5 - $CellContext`MH^2 (
+                   4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^3 (
+                  40 $CellContext`MT^4 + $CellContext`T14 ($CellContext`T24 + \
+$CellContext`U) + $CellContext`MT^2 ((-4) $CellContext`T14 + 
+                    10 ($CellContext`T24 + $CellContext`U))) - 
+                 2 $CellContext`MH^6 $CellContext`T14 (96 $CellContext`MT^4 - 
+                  5 $CellContext`T14^2 - 
+                  9 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + 
+                  6 ($CellContext`T24 + $CellContext`U)^2 + $CellContext`MT^2 \
+((-60) $CellContext`T14 + 48 ($CellContext`T24 + $CellContext`U))) + 
+                 2 $CellContext`MH^4 $CellContext`T14 (
+                   608 $CellContext`MT^6 + $CellContext`T14^3 - 
+                   5 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U) + 
+                   6 ($CellContext`T24 + $CellContext`U)^3 + \
+$CellContext`MT^4 ((-64) $CellContext`T14 + 
+                    400 ($CellContext`T24 + $CellContext`U)) - 
+                   2 $CellContext`MT^2 (25 $CellContext`T14^2 + 
+                    8 $CellContext`T14 ($CellContext`T24 + $CellContext`U) - 
+                    43 ($CellContext`T24 + $CellContext`U)^2))) 
+                X`DiscB[$CellContext`T14, $CellContext`MT, $CellContext`MT]/
+                X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U] - 
+               2 ($CellContext`MH^4 + 32 $CellContext`MT^4 + 
+                 12 $CellContext`MT^2 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2 - 
+                 2 $CellContext`MH^2 (
+                  6 $CellContext`MT^2 + $CellContext`T24 + \
+$CellContext`U))^(-1) (
+                 16 $CellContext`MT^6 + $CellContext`MH^2 $CellContext`T14 \
+($CellContext`MH^2 - $CellContext`T24 - $CellContext`U) + 
+                 8 $CellContext`MT^4 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + $CellContext`MT^2 ((-8) $CellContext`MH^2 $CellContext`T14 + \
+($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2))^(-1) (
+                2 $CellContext`MH^12 $CellContext`T14^2 (52 $CellContext`MT^2 - 
+                  3 $CellContext`T14 + 
+                  13 ($CellContext`T24 + $CellContext`U)) + $CellContext`MT^2 \
+(4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^5 (
+                  16 $CellContext`MT^6 + $CellContext`T14 ($CellContext`T24 + \
+$CellContext`U)^2 + 
+                  8 $CellContext`MT^4 (
+                    5 $CellContext`T14 + $CellContext`T24 + $CellContext`U) + \
+$CellContext`MT^2 ($CellContext`T14^2 + 
+                    14 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2)) + $CellContext`MH^10 $CellContext`T14 \
+(64 $CellContext`MT^6 + 5 $CellContext`T14^3 + 
+                  3 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U) - 
+                  97 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^2 + \
+($CellContext`T24 + $CellContext`U)^3 + $CellContext`MT^4 ((-2320) \
+$CellContext`T14 + 48 ($CellContext`T24 + $CellContext`U)) + 
+                  4 $CellContext`MT^2 (3 $CellContext`T14^2 - 
+                    242 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + 
+                    3 ($CellContext`T24 + $CellContext`U)^2)) + \
+$CellContext`MH^2 (
+                   4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^3 (
+                  512 $CellContext`MT^10 - $CellContext`T14^2 \
+($CellContext`T24 + $CellContext`U)^3 - 
+                  64 $CellContext`MT^8 (46 $CellContext`T14 - 
+                   7 ($CellContext`T24 + $CellContext`U)) - 
+                  16 $CellContext`MT^6 (26 $CellContext`T14^2 + 
+                   114 $CellContext`T14 ($CellContext`T24 + $CellContext`U) - 
+                   9 ($CellContext`T24 + $CellContext`U)^2) - 
+                  4 $CellContext`MT^4 (6 $CellContext`T14^3 + 
+                   45 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U) + 
+                   90 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^2 - 
+                   5 ($CellContext`T24 + $CellContext`U)^3) + \
+$CellContext`MT^2 ($CellContext`T24 + $CellContext`U) ((-2) \
+$CellContext`T14^3 - 
+                    23 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U) - 
+                    22 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^2 + \
+($CellContext`T24 + $CellContext`U)^3)) + $CellContext`MH^8 $CellContext`T14 (
+                  128 $CellContext`MT^8 + $CellContext`T14^4 + 
+                  96 $CellContext`MT^6 (
+                    203 $CellContext`T14 - $CellContext`T24 - $CellContext`U) - 
+                  12 $CellContext`T14^3 ($CellContext`T24 + $CellContext`U) + 
+                  30 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U)^2 + 
+                  136 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^3 - 
+                  3 ($CellContext`T24 + $CellContext`U)^4 + 
+                  8 $CellContext`MT^4 (157 $CellContext`T14^2 + 
+                    1446 $CellContext`T14 ($CellContext`T24 + $CellContext`U) - 
+                    15 ($CellContext`T24 + $CellContext`U)^2) - 
+                  2 $CellContext`MT^2 (33 $CellContext`T14^3 - 
+                   205 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U) - 
+                   1109 $CellContext`T14 ($CellContext`T24 + \
+$CellContext`U)^2 + 
+                   17 ($CellContext`T24 + $CellContext`U)^3)) + \
+$CellContext`MH^6 (1024 $CellContext`MT^12 - 
+                  256 $CellContext`MT^10 (51 $CellContext`T14 - 
+                   5 ($CellContext`T24 + $CellContext`U)) - 
+                  128 $CellContext`MT^8 (609 $CellContext`T14^2 + 
+                   87 $CellContext`T14 ($CellContext`T24 + $CellContext`U) - 
+                   5 ($CellContext`T24 + $CellContext`U)^2) - 
+                  32 $CellContext`MT^6 (381 $CellContext`T14^3 + 
+                   1892 $CellContext`T14^2 ($CellContext`T24 + \
+$CellContext`U) + 102 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^2 - 
+                   5 ($CellContext`T24 + $CellContext`U)^3) - \
+$CellContext`T14 ($CellContext`T24 + $CellContext`U) (3 $CellContext`T14^4 - 
+                   6 $CellContext`T14^3 ($CellContext`T24 + $CellContext`U) + 
+                   48 $CellContext`T14^2 ($CellContext`T24 + \
+$CellContext`U)^2 + 86 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^3 - 
+                   3 ($CellContext`T24 + $CellContext`U)^4) + 
+                  4 $CellContext`MT^4 ($CellContext`T14^4 - 
+                    1566 $CellContext`T14^3 ($CellContext`T24 + \
+$CellContext`U) - 
+                    4258 $CellContext`T14^2 ($CellContext`T24 + \
+$CellContext`U)^2 - 78 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^3 + 
+                    5 ($CellContext`T24 + $CellContext`U)^4) + \
+$CellContext`MT^2 ((-19) $CellContext`T14^5 + 
+                    43 $CellContext`T14^4 ($CellContext`T24 + $CellContext`U) - 
+                    996 $CellContext`T14^3 ($CellContext`T24 + \
+$CellContext`U)^2 - 
+                    2036 $CellContext`T14^2 ($CellContext`T24 + \
+$CellContext`U)^3 + 
+                    15 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^4 + \
+($CellContext`T24 + $CellContext`U)^5)) + $CellContext`MH^4 ((-12288) \
+$CellContext`MT^14 + 
+                  1024 $CellContext`MT^12 (80 $CellContext`T14 - 
+                    17 ($CellContext`T24 + $CellContext`U)) + 
+                  256 $CellContext`MT^10 (621 $CellContext`T14^2 + 
+                    361 $CellContext`T14 ($CellContext`T24 + $CellContext`U) - 
+                    40 ($CellContext`T24 + $CellContext`U)^2) + 
+                  128 $CellContext`MT^8 (325 $CellContext`T14^3 + 
+                    1187 $CellContext`T14^2 ($CellContext`T24 + \
+$CellContext`U) + 320 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^2 - 
+                    25 ($CellContext`T24 + $CellContext`U)^3) + 
+                  16 $CellContext`MT^6 (157 $CellContext`T14^4 + 
+                    1832 $CellContext`T14^3 ($CellContext`T24 + \
+$CellContext`U) + 
+                    3484 $CellContext`T14^2 ($CellContext`T24 + \
+$CellContext`U)^2 + 
+                    550 $CellContext`T14 ($CellContext`T24 + \
+$CellContext`U)^3 - 
+                    35 ($CellContext`T24 + $CellContext`U)^4) + \
+$CellContext`T14 ($CellContext`T24 + $CellContext`U)^2 (3 $CellContext`T14^4 + 
+                    4 $CellContext`T14^3 ($CellContext`T24 + $CellContext`U) + 
+                    24 $CellContext`T14^2 ($CellContext`T24 + \
+$CellContext`U)^2 + 
+                    22 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^3 - \
+($CellContext`T24 + $CellContext`U)^4) + 
+                  4 $CellContext`MT^4 (46 $CellContext`T14^5 + 
+                    263 $CellContext`T14^4 ($CellContext`T24 + \
+$CellContext`U) + 
+                    1810 $CellContext`T14^3 ($CellContext`T24 + \
+$CellContext`U)^2 + 
+                    2418 $CellContext`T14^2 ($CellContext`T24 + \
+$CellContext`U)^3 + 
+                    220 $CellContext`T14 ($CellContext`T24 + \
+$CellContext`U)^4 - 
+                    13 ($CellContext`T24 + $CellContext`U)^5) + \
+$CellContext`MT^2 ($CellContext`T14^6 + 
+                    43 $CellContext`T14^5 ($CellContext`T24 + $CellContext`U) + 
+                    122 $CellContext`T14^4 ($CellContext`T24 + \
+$CellContext`U)^2 + 
+                    724 $CellContext`T14^3 ($CellContext`T24 + \
+$CellContext`U)^3 + 
+                    775 $CellContext`T14^2 ($CellContext`T24 + \
+$CellContext`U)^4 + 25 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^5 - 
+                    2 ($CellContext`T24 + $CellContext`U)^6))) 
+               X`DiscB[$CellContext`MH^2 - 
+                 4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT]/
+               X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U] + 
+               4 (256 $CellContext`MT^10 + 
+                 
+                 256 $CellContext`MT^8 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) - 32 $CellContext`MT^6 (7 $CellContext`MH^2 $CellContext`T14 - 
+                  3 ($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2) + 
+                 16 $CellContext`MT^4 (
+                   6 $CellContext`MH^4 $CellContext`T14 + ($CellContext`T14 + \
+$CellContext`T24 + $CellContext`U)^3 - 
+                   2 $CellContext`MH^2 $CellContext`T14 (2 $CellContext`T14 + 
+                    5 ($CellContext`T24 + $CellContext`U))) + \
+$CellContext`MT^2 (($CellContext`T14 + $CellContext`T24 + $CellContext`U)^4 + 
+                   16 $CellContext`MH^4 $CellContext`T14 ((-2) \
+$CellContext`T14 + 3 ($CellContext`T24 + $CellContext`U)) + 
+                   2 $CellContext`MH^2 $CellContext`T14 (5 $CellContext`T14^2 - 
+                    14 $CellContext`T14 ($CellContext`T24 + $CellContext`U) - 
+                    19 ($CellContext`T24 + $CellContext`U)^2)) + 
+                 3 $CellContext`MH^2 $CellContext`T14 (
+                   2 $CellContext`MH^4 $CellContext`T14 + ($CellContext`T14 - \
+$CellContext`T24 - $CellContext`U) ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2 - 
+                   2 $CellContext`MH^2 ($CellContext`T14^2 + $CellContext`T14 \
+($CellContext`T24 + $CellContext`U) - ($CellContext`T24 + $CellContext`U)^2)))
+                  X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+                   4 $CellContext`MT^2 - $CellContext`T24 - \
+$CellContext`U]^(-1) 
+                X`ScalarC0[$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+                  4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT, $CellContext`MT]) + 
+             2 $CellContext`MT^2 (16 $CellContext`MT^4 - 
+                4 $CellContext`MH^2 $CellContext`T14 + 
+                8 $CellContext`MT^2 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2)^(-2) (-($CellContext`S34 - $CellContext`T) ((-2) \
+$CellContext`MH^2 + $CellContext`S34 + $CellContext`T + 
+                 2 $CellContext`U) $CellContext`Pair[
+                  $CellContext`e[1], 
+                  $CellContext`ec[4]] $CellContext`Pair[
+                  $CellContext`e[2], 
+                  $CellContext`ec[5]] - 
+               4 (2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T - 
+                2 $CellContext`U) $CellContext`Pair[
+                 $CellContext`e[2], 
+                 $CellContext`ec[5]] ($CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[1]] + $CellContext`Pair[
+                   $CellContext`e[1], 
+                   $CellContext`k[4]] $CellContext`Pair[
+                   $CellContext`ec[4], 
+                   $CellContext`k[3]]) - 
+               4 ($CellContext`S34 - $CellContext`T) $CellContext`Pair[
+                 $CellContext`e[1], 
+                 $CellContext`ec[4]] ($CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[3]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[2]] + $CellContext`Pair[
+                   $CellContext`e[2], 
+                   $CellContext`k[5]] $CellContext`Pair[
+                   $CellContext`ec[5], 
+                   $CellContext`k[3]]) + 16 ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]] + $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]])) (-(-$CellContext`MH^2 + 
+                  4 $CellContext`MT^2 + $CellContext`T24 + \
+$CellContext`U)^(-1) (64 $CellContext`MT^6 - 3 $CellContext`T14^3 + 
+                 5 $CellContext`T14^2 $CellContext`T24 + 
+                 9 $CellContext`T14 $CellContext`T24^2 + $CellContext`T24^3 + 
+                 5 $CellContext`T14^2 $CellContext`U + 
+                 18 $CellContext`T14 $CellContext`T24 $CellContext`U + 
+                 3 $CellContext`T24^2 $CellContext`U + 
+                 9 $CellContext`T14 $CellContext`U^2 + 
+                 3 $CellContext`T24 $CellContext`U^2 + $CellContext`U^3 + 
+                 48 $CellContext`MT^4 (
+                   3 $CellContext`T14 + $CellContext`T24 + $CellContext`U) + 
+                 2 $CellContext`MH^2 $CellContext`T14 ($CellContext`T14 - 
+                   7 ($CellContext`T24 + $CellContext`U)) + 
+                 4 $CellContext`MT^2 ((-14) $CellContext`MH^2 \
+$CellContext`T14 + 5 $CellContext`T14^2 + 
+                   18 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + 
+                   3 ($CellContext`T24 + $CellContext`U)^2)) + (
+                  16 $CellContext`MT^6 + $CellContext`MH^2 $CellContext`T14 \
+($CellContext`MH^2 - $CellContext`T24 - $CellContext`U) + 
+                  8 $CellContext`MT^4 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + $CellContext`MT^2 ((-8) $CellContext`MH^2 $CellContext`T14 + \
+($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2))^(-1) (
+                 4096 $CellContext`MT^14 + 
+                 2048 $CellContext`MT^12 (5 $CellContext`T14 + 
+                   3 ($CellContext`T24 + $CellContext`U)) + 
+                 256 $CellContext`MT^8 ($CellContext`MH^4 $CellContext`T14 + 
+                   5 ($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2 \
+(3 $CellContext`T14 + $CellContext`T24 + $CellContext`U) - $CellContext`MH^2 \
+$CellContext`T14 (25 $CellContext`T14 + 
+                    27 ($CellContext`T24 + $CellContext`U))) - 
+                 256 $CellContext`MT^10 (
+                  26 $CellContext`MH^2 $CellContext`T14 - 
+                  5 (7 $CellContext`T14^2 + 
+                   10 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + 
+                   3 ($CellContext`T24 + $CellContext`U)^2)) + 
+                 16 $CellContext`MT^6 (
+                   16 $CellContext`MH^4 $CellContext`T14 (
+                    8 $CellContext`T14 + $CellContext`T24 + $CellContext`U) + 
+                   5 ($CellContext`T14 + $CellContext`T24 + $CellContext`U)^3 \
+(11 $CellContext`T14 + 3 ($CellContext`T24 + $CellContext`U)) - 
+                   4 $CellContext`MH^2 $CellContext`T14 (
+                    34 $CellContext`T14^2 + 
+                    83 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + 
+                    43 ($CellContext`T24 + $CellContext`U)^2)) + \
+$CellContext`MT^2 (($CellContext`T14 + $CellContext`T24 + $CellContext`U)^5 (
+                    5 $CellContext`T14 + $CellContext`T24 + $CellContext`U) + 
+                   48 $CellContext`MH^6 $CellContext`T14^2 (
+                    10 $CellContext`T14 - 
+                    3 ($CellContext`T24 + $CellContext`U)) + 
+                   2 $CellContext`MH^2 $CellContext`T14 ($CellContext`T14 + \
+$CellContext`T24 + $CellContext`U)^2 ($CellContext`T14^2 - 
+                    56 $CellContext`T14 ($CellContext`T24 + $CellContext`U) - 
+                    21 ($CellContext`T24 + $CellContext`U)^2) - 
+                   16 $CellContext`MH^4 $CellContext`T14 (
+                    14 $CellContext`T14^3 + 
+                    3 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U) - 
+                    21 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^2 - \
+($CellContext`T24 + $CellContext`U)^3)) - 
+                 8 $CellContext`MT^4 (
+                  36 $CellContext`MH^6 $CellContext`T14^2 - ($CellContext`T14 + \
+$CellContext`T24 + $CellContext`U)^4 (13 $CellContext`T14 + 
+                   3 ($CellContext`T24 + $CellContext`U)) + 
+                  12 $CellContext`MH^4 $CellContext`T14 (3 $CellContext`T14^2 - 
+                    15 $CellContext`T14 ($CellContext`T24 + $CellContext`U) - \
+($CellContext`T24 + $CellContext`U)^2) + 
+                  2 $CellContext`MH^2 $CellContext`T14 (17 $CellContext`T14^3 + 
+                    84 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U) + 
+                    99 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^2 + 
+                    32 ($CellContext`T24 + $CellContext`U)^3)) - \
+$CellContext`MH^2 $CellContext`T14 (64 $CellContext`MH^6 $CellContext`T14^2 - 
+                  6 $CellContext`MH^4 $CellContext`T14 (7 $CellContext`T14^2 + 
+                   12 $CellContext`T14 ($CellContext`T24 + $CellContext`U) - 
+                   3 ($CellContext`T24 + $CellContext`U)^2) - \
+($CellContext`T14 + $CellContext`T24 + $CellContext`U)^3 (
+                   2 $CellContext`T14^2 - 
+                   5 $CellContext`T14 ($CellContext`T24 + $CellContext`U) - \
+($CellContext`T24 + $CellContext`U)^2) + $CellContext`MH^2 (
+                    7 $CellContext`T14^4 + 
+                    26 $CellContext`T14^3 ($CellContext`T24 + $CellContext`U) - 
+                    6 $CellContext`T14^2 ($CellContext`T24 + \
+$CellContext`U)^2 - 
+                    26 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^3 - \
+($CellContext`T24 + $CellContext`U)^4))) 
+                X`DiscB[$CellContext`MH^2, $CellContext`MT, $CellContext`MT]/
+                X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U] - 
+               2 $CellContext`T14^2 (
+                 16 $CellContext`MT^6 + $CellContext`MH^2 $CellContext`T14 \
+($CellContext`MH^2 - $CellContext`T24 - $CellContext`U) + 
+                 8 $CellContext`MT^4 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + $CellContext`MT^2 ((-8) $CellContext`MH^2 $CellContext`T14 + \
+($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2))^(-1) (
+                9 $CellContext`MT^2 (
+                   4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^4 - 
+                6 $CellContext`MH^6 $CellContext`T14 (
+                 20 $CellContext`MT^2 + $CellContext`T14 + 
+                 5 ($CellContext`T24 + $CellContext`U)) - $CellContext`MH^2 (
+                  4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2 (
+                 104 $CellContext`MT^4 + $CellContext`T14 (-$CellContext`T14 + 
+                   10 ($CellContext`T24 + $CellContext`U)) + \
+$CellContext`MT^2 (86 $CellContext`T14 + 
+                   26 ($CellContext`T24 + $CellContext`U))) + \
+$CellContext`MH^4 $CellContext`T14 (1040 $CellContext`MT^4 + 
+                  5 $CellContext`T14^2 + 
+                  28 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + 
+                  39 ($CellContext`T24 + $CellContext`U)^2 + 
+                  8 $CellContext`MT^2 (19 $CellContext`T14 + 
+                    52 ($CellContext`T24 + $CellContext`U)))) 
+               X`DiscB[$CellContext`T14, $CellContext`MT, $CellContext`MT]/
+               X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+                4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U] + \
+($CellContext`MH^4 + 32 $CellContext`MT^4 + 
+                  12 $CellContext`MT^2 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2 - 
+                  2 $CellContext`MH^2 (
+                   6 $CellContext`MT^2 + $CellContext`T24 + \
+$CellContext`U))^(-1) (
+                  16 $CellContext`MT^6 + $CellContext`MH^2 $CellContext`T14 \
+($CellContext`MH^2 - $CellContext`T24 - $CellContext`U) + 
+                  8 $CellContext`MT^4 ($CellContext`T14 + $CellContext`T24 + \
+$CellContext`U) + $CellContext`MT^2 ((-8) $CellContext`MH^2 $CellContext`T14 + \
+($CellContext`T14 + $CellContext`T24 + $CellContext`U)^2))^(-1) (
+                 64 $CellContext`MH^12 $CellContext`T14^3 + 
+                 2 $CellContext`MH^10 $CellContext`T14^2 (
+                   144 $CellContext`MT^4 - 27 $CellContext`T14^2 - 
+                   130 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + 
+                   9 ($CellContext`T24 + $CellContext`U)^2 + \
+$CellContext`MT^2 ((-744) $CellContext`T14 + 
+                    72 ($CellContext`T24 + $CellContext`U))) - \
+$CellContext`MH^8 $CellContext`T14 (256 $CellContext`MT^8 - 
+                  17 $CellContext`T14^4 - 
+                  190 $CellContext`T14^3 ($CellContext`T24 + $CellContext`U) - 
+                  400 $CellContext`T14^2 ($CellContext`T24 + \
+$CellContext`U)^2 + 
+                  62 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^3 + \
+($CellContext`T24 + $CellContext`U)^4 + 
+                  128 $CellContext`MT^6 (43 $CellContext`T14 + 
+                    2 ($CellContext`T24 + $CellContext`U)) - 
+                  32 $CellContext`MT^4 (404 $CellContext`T14^2 - 
+                   117 $CellContext`T14 ($CellContext`T24 + $CellContext`U) - 
+                   3 ($CellContext`T24 + $CellContext`U)^2) - 
+                  8 $CellContext`MT^2 (159 $CellContext`T14^3 + 
+                   580 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U) - 
+                   105 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^2 - 
+                   2 ($CellContext`T24 + $CellContext`U)^3)) - \
+$CellContext`MT^2 (
+                   4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^4 (640 $CellContext`MT^8 + 
+                  32 $CellContext`MT^6 (27 $CellContext`T14 + 
+                    17 ($CellContext`T24 + $CellContext`U)) - 
+                  24 $CellContext`MT^4 (19 $CellContext`T14^2 - 
+                   22 $CellContext`T14 ($CellContext`T24 + $CellContext`U) - 
+                   7 ($CellContext`T24 + $CellContext`U)^2) + \
+($CellContext`T24 + $CellContext`U) ((-2) $CellContext`T14^3 - 
+                    15 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U) + 
+                    6 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^2 + \
+($CellContext`T24 + $CellContext`U)^3) + 
+                  2 $CellContext`MT^2 ((-7) $CellContext`T14^3 - 
+                    87 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U) + 
+                    51 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^2 + 
+                    11 ($CellContext`T24 + $CellContext`U)^3)) + \
+$CellContext`MH^6 $CellContext`T14 (9728 $CellContext`MT^10 + 
+                   256 $CellContext`MT^8 (148 $CellContext`T14 + 
+                    41 ($CellContext`T24 + $CellContext`U)) - 
+                   192 $CellContext`MT^6 (273 $CellContext`T14^2 - 
+                    172 $CellContext`T14 ($CellContext`T24 + $CellContext`U) - 
+                    23 ($CellContext`T24 + $CellContext`U)^2) - 
+                   32 $CellContext`MT^4 (326 $CellContext`T14^3 + 
+                    905 $CellContext`T14^2 ($CellContext`T24 + \
+$CellContext`U) - 333 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^2 - 
+                    28 ($CellContext`T24 + $CellContext`U)^3) + \
+($CellContext`T24 + $CellContext`U) ((-51) $CellContext`T14^4 - 
+                    246 $CellContext`T14^3 ($CellContext`T24 + \
+$CellContext`U) - 
+                    280 $CellContext`T14^2 ($CellContext`T24 + \
+$CellContext`U)^2 + 78 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^3 + 
+                    3 ($CellContext`T24 + $CellContext`U)^4) + 
+                   2 $CellContext`MT^2 ((-221) $CellContext`T14^4 - 
+                    1664 $CellContext`T14^3 ($CellContext`T24 + \
+$CellContext`U) - 
+                    2542 $CellContext`T14^2 ($CellContext`T24 + \
+$CellContext`U)^2 + 
+                    752 $CellContext`T14 ($CellContext`T24 + \
+$CellContext`U)^3 + 
+                    43 ($CellContext`T24 + $CellContext`U)^4)) + \
+$CellContext`MH^2 (
+                    4 $CellContext`MT^2 + $CellContext`T14 + $CellContext`T24 + \
+$CellContext`U)^2 (3072 $CellContext`MT^12 + 
+                   512 $CellContext`MT^10 (43 $CellContext`T14 + 
+                    
+                    7 ($CellContext`T24 + $CellContext`U)) + $CellContext`T14 \
+($CellContext`T24 + $CellContext`U)^3 ((-17) $CellContext`T14^2 + 
+                    6 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2) + 
+                   128 $CellContext`MT^8 (2 $CellContext`T14^2 + 
+                    155 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + 
+                    13 ($CellContext`T24 + $CellContext`U)^2) - 
+                   32 $CellContext`MT^6 (208 $CellContext`T14^3 - 
+                    24 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U) - 
+                    209 $CellContext`T14 ($CellContext`T24 + \
+$CellContext`U)^2 - 12 ($CellContext`T24 + $CellContext`U)^3) + 
+                   4 $CellContext`MT^4 ((-83) $CellContext`T14^4 - 
+                    782 $CellContext`T14^3 ($CellContext`T24 + \
+$CellContext`U) + 
+                    108 $CellContext`T14^2 ($CellContext`T24 + \
+$CellContext`U)^2 + 
+                    254 $CellContext`T14 ($CellContext`T24 + \
+$CellContext`U)^3 + 11 ($CellContext`T24 + $CellContext`U)^4) + 
+                   2 $CellContext`MT^2 (-$CellContext`T14^5 - 
+                    27 $CellContext`T14^4 ($CellContext`T24 + $CellContext`U) - 
+                    217 $CellContext`T14^3 ($CellContext`T24 + \
+$CellContext`U)^2 + 
+                    44 $CellContext`T14^2 ($CellContext`T24 + \
+$CellContext`U)^3 + 
+                    32 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^4 + \
+($CellContext`T24 + $CellContext`U)^5)) - $CellContext`MH^4 (
+                  4096 $CellContext`MT^14 + 
+                  2048 $CellContext`MT^12 (49 $CellContext`T14 + 
+                    3 ($CellContext`T24 + $CellContext`U)) + 
+                  1280 $CellContext`MT^10 (95 $CellContext`T14^2 + 
+                    96 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + 
+                    3 ($CellContext`T24 + $CellContext`U)^2) - 
+                  256 $CellContext`MT^8 (401 $CellContext`T14^3 - 
+                   497 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U) - 
+                   238 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^2 - 
+                   5 ($CellContext`T24 + $CellContext`U)^3) - 
+                  16 $CellContext`MT^6 (2297 $CellContext`T14^4 + 
+                   4760 $CellContext`T14^3 ($CellContext`T24 + \
+$CellContext`U) - 
+                   3282 $CellContext`T14^2 ($CellContext`T24 + \
+$CellContext`U)^2 - 
+                   968 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^3 - 
+                   15 ($CellContext`T24 + $CellContext`U)^4) + \
+$CellContext`T14 ($CellContext`T24 + $CellContext`U)^2 ((-51) \
+$CellContext`T14^4 - 
+                    138 $CellContext`T14^3 ($CellContext`T24 + \
+$CellContext`U) - 80 $CellContext`T14^2 ($CellContext`T24 + $CellContext`U)^2 + 
+                    42 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^3 + 
+                    3 ($CellContext`T24 + $CellContext`U)^4) - 
+                  8 $CellContext`MT^4 (431 $CellContext`T14^5 + 
+                   2349 $CellContext`T14^4 ($CellContext`T24 + \
+$CellContext`U) + 
+                   2514 $CellContext`T14^3 ($CellContext`T24 + \
+$CellContext`U)^2 - 
+                   1334 $CellContext`T14^2 ($CellContext`T24 + \
+$CellContext`U)^3 - 
+                   261 $CellContext`T14 ($CellContext`T24 + $CellContext`U)^4 - 
+                   3 ($CellContext`T24 + $CellContext`U)^5) + \
+$CellContext`MT^2 ((-35) $CellContext`T14^6 - 
+                    920 $CellContext`T14^5 ($CellContext`T24 + \
+$CellContext`U) - 
+                    2953 $CellContext`T14^4 ($CellContext`T24 + \
+$CellContext`U)^2 - 
+                    2192 $CellContext`T14^3 ($CellContext`T24 + \
+$CellContext`U)^3 + 
+                    1067 $CellContext`T14^2 ($CellContext`T24 + \
+$CellContext`U)^4 + 
+                    136 $CellContext`T14 ($CellContext`T24 + \
+$CellContext`U)^5 + ($CellContext`T24 + $CellContext`U)^6))) 
+                X`DiscB[$CellContext`MH^2 - 
+                  4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT]/
+                X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U] - 
+               6 $CellContext`T14 (128 $CellContext`MT^8 + 
+                32 $CellContext`MT^6 (5 $CellContext`T14 + 
+                  3 ($CellContext`T24 + $CellContext`U)) + 
+                2 $CellContext`MT^2 (
+                  20 $CellContext`MH^4 $CellContext`T14 + ($CellContext`T14 + \
+$CellContext`T24 + $CellContext`U)^2 (
+                    7 $CellContext`T14 + $CellContext`T24 + $CellContext`U) - 
+                  12 $CellContext`MH^2 $CellContext`T14 (2 $CellContext`T14 + 
+                   3 ($CellContext`T24 + $CellContext`U))) + 
+                8 $CellContext`MT^4 ((-20) $CellContext`MH^2 $CellContext`T14 + 
+                  3 (3 $CellContext`T14^2 + 
+                    4 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2)) + $CellContext`T14 (($CellContext`T14 + \
+$CellContext`T24 + $CellContext`U)^3 + 
+                  2 $CellContext`MH^4 ($CellContext`T14 + 
+                    5 ($CellContext`T24 + $CellContext`U)) - 
+                  2 $CellContext`MH^2 ($CellContext`T14^2 + 
+                   5 $CellContext`T14 ($CellContext`T24 + $CellContext`U) + 
+                   4 ($CellContext`T24 + $CellContext`U)^2))) 
+               X`Kallen\[Lambda][$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+                  4 $CellContext`MT^2 - $CellContext`T24 - \
+$CellContext`U]^(-1) 
+               X`ScalarC0[$CellContext`MH^2, $CellContext`T14, \
+$CellContext`MH^2 - 
+                 4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+$CellContext`MT, $CellContext`MT, $CellContext`MT])))}, 0, 3, 1],
+        Editable->False], ")"}], "+", 
+      RowBox[{
+       FractionBox["1", 
+        RowBox[{
+         SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", "T24"}]], 
+       RowBox[{"(", 
+        RowBox[{
+         RowBox[{
+          FractionBox["1", "T"], 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"4", " ", 
+                RowBox[{"(", 
+                 RowBox[{"2", "+", 
+                  FractionBox["1", "\[Epsilon]"], "+", 
+                  RowBox[{"DiscB", "[", 
+                   RowBox[{"T", ",", "MT", ",", "MT"}], "]"}], "+", 
+                  RowBox[{"Log", "[", 
+                   FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], ")"}]}], "-", 
+               RowBox[{
+                FractionBox["1", 
+                 RowBox[{
+                  SuperscriptBox["MH", "2"], "-", "T"}]], 
+                RowBox[{"4", " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                   FractionBox[
+                    SuperscriptBox["MH", "2"], "\[Epsilon]"], "-", 
+                   RowBox[{"3", " ", "T"}], "-", 
+                   FractionBox["T", "\[Epsilon]"], "+", 
+                   RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                   RowBox[{"T", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T", ",", "MT", ",", "MT"}], "]"}]}], "+", 
+                   RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                   RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                   RowBox[{"T", " ", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], "-", 
+                   RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "+", 
+                    SqrtBox[
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], 
+                  ")"}]}]}]}], ")"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"4", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}]}], "-", 
+                  RowBox[{"4", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+               RowBox[{"2", " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"2", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "-", 
+               RowBox[{"4", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "-", 
+               RowBox[{"2", " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"2", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+               RowBox[{"4", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                  RowBox[{"Pair", "[", 
+                   RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S", "+", 
+                    RowBox[{"2", " ", "T24"}], "+", "U"}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                 ")"}]}]}], ")"}]}], "-", 
+            RowBox[{
+             FractionBox["1", 
+              RowBox[{
+               SuperscriptBox["MH", "2"], "-", "T"}]], 
+             RowBox[{
+              RowBox[{"(", 
+               RowBox[{
+                SuperscriptBox[
+                 RowBox[{"Log", "[", 
+                  FractionBox[
+                   RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                   RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"], "-", 
+                SuperscriptBox[
+                 RowBox[{"Log", "[", 
+                  FractionBox[
+                   RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "+", 
+                    SqrtBox[
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T"}], ")"}]}]]}], 
+                   RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], ")"}], " ", 
+              RowBox[{"(", 
+               RowBox[{
+                RowBox[{"2", " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S", "+", 
+                    RowBox[{"2", " ", "T14"}], "+", 
+                    RowBox[{"2", " ", "T24"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", "T14", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", "S", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                   RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                  ")"}], " ", 
+                 RowBox[{"Pair", "[", 
+                  RowBox[{
+                   RowBox[{"ec", "[", "4", "]"}], ",", 
+                   RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                RowBox[{"4", " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                   RowBox[{"S", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                 RowBox[{"Pair", "[", 
+                  RowBox[{
+                   RowBox[{"e", "[", "2", "]"}], ",", 
+                   RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                 RowBox[{"Pair", "[", 
+                  RowBox[{
+                   RowBox[{"ec", "[", "4", "]"}], ",", 
+                   RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                RowBox[{"4", " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                 RowBox[{"Pair", "[", 
+                  RowBox[{
+                   RowBox[{"e", "[", "1", "]"}], ",", 
+                   RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}], " ", 
+                 RowBox[{"Pair", "[", 
+                  RowBox[{
+                   RowBox[{"ec", "[", "4", "]"}], ",", 
+                   RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "-", 
+                RowBox[{"4", " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                   RowBox[{"S", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                 RowBox[{"Pair", "[", 
+                  RowBox[{
+                   RowBox[{"e", "[", "2", "]"}], ",", 
+                   RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                 RowBox[{"Pair", "[", 
+                  RowBox[{
+                   RowBox[{"ec", "[", "5", "]"}], ",", 
+                   RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "-", 
+                RowBox[{"4", " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                 RowBox[{"Pair", "[", 
+                  RowBox[{
+                   RowBox[{"e", "[", "1", "]"}], ",", 
+                   RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}], " ", 
+                 RowBox[{"Pair", "[", 
+                  RowBox[{
+                   RowBox[{"ec", "[", "5", "]"}], ",", 
+                   RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                RowBox[{
+                 RowBox[{"Pair", "[", 
+                  RowBox[{
+                   RowBox[{"e", "[", "1", "]"}], ",", 
+                   RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S", "-", 
+                    RowBox[{"2", " ", "T24"}], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                   RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                  ")"}]}], "+", 
+                RowBox[{"8", " ", 
+                 RowBox[{"Pair", "[", 
+                  RowBox[{
+                   RowBox[{"e", "[", "1", "]"}], ",", 
+                   RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                   RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                   RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                  ")"}]}]}], ")"}]}]}], "-", 
+            RowBox[{
+             FractionBox["1", 
+              RowBox[{
+               SuperscriptBox["MH", "2"], "-", "T"}]], 
+             RowBox[{"4", " ", 
+              RowBox[{"(", 
+               RowBox[{
+                RowBox[{"DiscB", "[", 
+                 RowBox[{
+                  SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], "]"}], 
+                "-", 
+                RowBox[{"DiscB", "[", 
+                 RowBox[{"T", ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+              RowBox[{"(", 
+               RowBox[{
+                RowBox[{
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S", "-", 
+                    RowBox[{"2", " ", "T24"}], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "7"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"2", " ", "S"}], "+", 
+                    RowBox[{"8", " ", "S34"}], "+", 
+                    RowBox[{"3", " ", "T"}], "+", 
+                    RowBox[{"6", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "9"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S"}], "+", 
+                    RowBox[{"8", " ", "S34"}], "+", 
+                    RowBox[{"5", " ", "T"}], "+", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                   RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                  ")"}], " ", 
+                 RowBox[{"Pair", "[", 
+                  RowBox[{
+                   RowBox[{"ec", "[", "4", "]"}], ",", 
+                   RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                RowBox[{"2", " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                   RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "+", 
+                    RowBox[{"2", " ", "S"}], "-", "T", "-", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                 RowBox[{"Pair", "[", 
+                  RowBox[{
+                   RowBox[{"e", "[", "2", "]"}], ",", 
+                   RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                 RowBox[{"Pair", "[", 
+                  RowBox[{
+                   RowBox[{"ec", "[", "4", "]"}], ",", 
+                   RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                RowBox[{"4", " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                 RowBox[{"Pair", "[", 
+                  RowBox[{
+                   RowBox[{"e", "[", "1", "]"}], ",", 
+                   RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}], " ", 
+                 RowBox[{"Pair", "[", 
+                  RowBox[{
+                   RowBox[{"ec", "[", "4", "]"}], ",", 
+                   RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "-", 
+                RowBox[{"2", " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                   RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "+", 
+                    RowBox[{"2", " ", "S"}], "-", "T", "-", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                 RowBox[{"Pair", "[", 
+                  RowBox[{
+                   RowBox[{"e", "[", "2", "]"}], ",", 
+                   RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                 RowBox[{"Pair", "[", 
+                  RowBox[{
+                   RowBox[{"ec", "[", "5", "]"}], ",", 
+                   RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "-", 
+                RowBox[{"4", " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                 RowBox[{"Pair", "[", 
+                  RowBox[{
+                   RowBox[{"e", "[", "1", "]"}], ",", 
+                   RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], ")"}], " ", 
+                 RowBox[{"Pair", "[", 
+                  RowBox[{
+                   RowBox[{"ec", "[", "5", "]"}], ",", 
+                   RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                RowBox[{
+                 RowBox[{"Pair", "[", 
+                  RowBox[{
+                   RowBox[{"e", "[", "1", "]"}], ",", 
+                   RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S", "-", 
+                    RowBox[{"2", " ", "T24"}], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                   RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                  ")"}]}], "+", 
+                RowBox[{"16", " ", 
+                 RowBox[{"Pair", "[", 
+                  RowBox[{
+                   RowBox[{"e", "[", "1", "]"}], ",", 
+                   RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                   RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                  ")"}]}]}], ")"}]}]}], "-", 
+            RowBox[{"8", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                FractionBox["1", 
+                 RowBox[{"2", " ", 
+                  SuperscriptBox[
+                   RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], "2"]}]], 
+                RowBox[{
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "-", 
+                   RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                   RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{"T", ",", "MT", ",", "MT"}], "]"}]}], "-", 
+                   RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"MH", " ", 
+                    SqrtBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}]}]]}]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+                   RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "T", "+", 
+                    SqrtBox[
+                    RowBox[{"T", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "4"}], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "T"}], ")"}]}]]}], 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"]}]], "]"}], "2"]}]}], ")"}], " ", 
+                 RowBox[{"Pair", "[", 
+                  RowBox[{
+                   RowBox[{"e", "[", "1", "]"}], ",", 
+                   RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S", "+", 
+                    RowBox[{"2", " ", "T24"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S"}], "-", 
+                    RowBox[{"4", " ", "S34"}], "-", "T", "-", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"2", " ", "S"}], "-", 
+                    RowBox[{"4", " ", "S34"}], "-", 
+                    RowBox[{"3", " ", "T"}], "-", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                   RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"2", " ", "S"}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                   RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", 
+                    RowBox[{"2", " ", "S"}], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                   RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}], "+", 
+               RowBox[{
+                FractionBox["1", 
+                 RowBox[{"2", " ", 
+                  RowBox[{"(", 
+                   RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}]}]], 
+                RowBox[{
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{"-", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                   RowBox[{"DiscB", "[", 
+                    RowBox[{"T", ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                 
+                 RowBox[{"Pair", "[", 
+                  RowBox[{
+                   RowBox[{"e", "[", "1", "]"}], ",", 
+                   RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "S", "+", 
+                    RowBox[{"2", " ", "T24"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"4", " ", "S34"}], "-", 
+                    RowBox[{"3", " ", "T"}], "-", 
+                    RowBox[{"4", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"3", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"4", " ", "S34"}], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                   RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T", "-", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                   RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "+", 
+                    RowBox[{"2", " ", "U"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                   RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}]}]}], ")"}]}]}], ")"}]}], "+", 
+         RowBox[{
+          FractionBox["1", "S"], 
+          RowBox[{"(", 
+           RowBox[{
+            RowBox[{"2", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{"2", "+", 
+                  FractionBox["1", "\[Epsilon]"], "+", 
+                  RowBox[{"DiscB", "[", 
+                   RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ",", "MT", ",", "MT"}], "]"}], "+", 
+                  RowBox[{"Log", "[", 
+                   FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], ")"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"-", "4"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"8", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "-", 
+                  RowBox[{"8", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "-", 
+                  RowBox[{"8", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"8", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", "T"}], "-", 
+                    RowBox[{"2", " ", "T14"}], "+", 
+                    RowBox[{"2", " ", "T24"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", "T14"}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", "T24"}], "-", 
+                    RowBox[{"2", " ", "T", " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "T14", " ", "U"}], "+", 
+                    RowBox[{"S", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", "T"}], "+", "U"}], ")"}]}]}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{"S", "+", "T14", "+", "T24"}], ")"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "+", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S", "+", "T14", "+", "T24"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "T", "-", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "+", "U"}], ")"}], 
+                   " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "+", "U"}], ")"}], 
+                   " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "+", "U"}], ")"}], 
+                   " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "-", 
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "+", "U"}], ")"}], 
+                   " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                  RowBox[{"8", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                  RowBox[{"4", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox["MH", "2"]}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                 ")"}], " ", 
+                RowBox[{"ScalarC0", "[", 
+                 RowBox[{
+                  SuperscriptBox["MH", "2"], ",", 
+                  RowBox[{
+                   SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                   "T24"}], ",", 
+                  RowBox[{"-", 
+                   FractionBox[
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], 
+                    RowBox[{
+                    RowBox[{"-", "1"}], "+", 
+                    SuperscriptBox["\[Beta]", "2"]}]]}], ",", "MT", ",", "MT",
+                   ",", "MT"}], "]"}]}]}], ")"}]}], "-", 
+            RowBox[{"4", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"2", " ", "S34"}], "-", "T", "-", "U"}], ")"}], 
+                   " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                  RowBox[{"16", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"2", " ", "S34"}], "-", "T", "-", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "-", "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ",", 
+                    RowBox[{"-", 
+                    FractionBox[
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], 
+                    RowBox[{
+                    RowBox[{"-", "1"}], "+", 
+                    SuperscriptBox["\[Beta]", "2"]}]]}], ",", "MT", ",", "MT",
+                     ",", "MT"}], "]"}], " ", 
+                   RowBox[{"(", 
+                    InterpretationBox[
+                    RowBox[{
+                    FractionBox[
+                    RowBox[{"24", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "16"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}], "2"]], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "3"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", 
+                    RowBox[{"5", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "2"]}]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"14", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "2"]}], 
+                    "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "3"]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    SuperscriptBox["\[Beta]", "2"]}], ")"}], "/", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}], "3"]}], "+", 
+                    InterpretationBox[
+                    SuperscriptBox[
+                    RowBox[{"O", "[", "\[Beta]", "]"}], "4"],
+                    SeriesData[$CellContext`\[Beta], 0, {}, 0, 4, 1],
+                    Editable->False]}],
+                    
+                    SeriesData[$CellContext`\[Beta], 0, {
+                    24 $CellContext`MT^4 ((-2) $CellContext`MH^2 + 
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2 ((-16) $CellContext`MH^2 $CellContext`MT^2 + (
+                    
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)^(-2), 0, 
+                    8 $CellContext`MT^4 (
+                    16 $CellContext`MH^2 $CellContext`MT^2 - (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)^(-3) ((
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^3 (4 $CellContext`MT^2 - 
+                    5 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)) - 8 $CellContext`MH^4 (16 $CellContext`MT^4 + 
+                    3 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2) + 8 $CellContext`MH^2 (32 $CellContext`MT^6 + 
+                    16 $CellContext`MT^4 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24) + 
+                    14 $CellContext`MT^2 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2 + 
+                    3 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^3))}, 0, 4, 1],
+                    Editable->False], ")"}]}], "+", 
+                  RowBox[{"(", 
+                   InterpretationBox[
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "16"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"5", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "192"}], " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"20", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "2"]}], 
+                    "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "3"], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ",", "MT", ",", "MT"}], "]"}]}]}], ")"}], "/", 
+                    RowBox[{"(", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "16"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}], "2"]}], ")"}]}], "+", 
+                    FractionBox[
+                    RowBox[{"48", " ", "\[ImaginaryI]", " ", 
+                    SuperscriptBox["MT", "4"], " ", "\[Pi]", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", "\[Beta]"}], 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "16"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}], "2"]], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"48", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "-", 
+                    RowBox[{"112", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"24", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "2"]}], 
+                    ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"768", " ", 
+                    SuperscriptBox["MT", "8"]}], "+", 
+                    RowBox[{"512", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}], "-", 
+                    RowBox[{"96", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "3"]}], 
+                    "+", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"10", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"7", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"768", " ", 
+                    SuperscriptBox["MT", "8"]}], "-", 
+                    RowBox[{"512", " ", 
+                    SuperscriptBox["MT", "6"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "3"]}], 
+                    "+", 
+                    RowBox[{"96", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}]}], 
+                    ")"}]}], "-", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"10", " ", 
+                    SuperscriptBox["MH", "4"]}], "-", 
+                    RowBox[{"13", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "2"]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ",", "MT", ",", "MT"}], "]"}]}]}], ")"}]}], 
+                    ")"}], " ", 
+                    SuperscriptBox["\[Beta]", "2"]}], ")"}], "/", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}], "3"]}], "+", 
+                    FractionBox[
+                    RowBox[{"96", " ", "\[ImaginaryI]", " ", 
+                    SuperscriptBox["MT", "4"], " ", "\[Pi]", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MT", "6"]}], "-", 
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "2"]}], 
+                    "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "2"]}]}], 
+                    ")"}], " ", 
+                    SuperscriptBox["\[Beta]", "3"]}], 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}], "3"]], "+", 
+                    InterpretationBox[
+                    SuperscriptBox[
+                    RowBox[{"O", "[", "\[Beta]", "]"}], "4"],
+                    SeriesData[$CellContext`\[Beta], 0, {}, 0, 4, 1],
+                    Editable->False]}],
+                    
+                    SeriesData[$CellContext`\[Beta], 0, {
+                    Rational[
+                    1, 2] ((-16) $CellContext`MH^2 $CellContext`MT^2 + (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)^(-2) (
+                    8 $CellContext`MT^2 ((-16) $CellContext`MH^2 \
+$CellContext`MT^2 + (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2) + (-(
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2 (
+                    12 $CellContext`MT^2 + $CellContext`S34 + \
+$CellContext`T14 + $CellContext`T24) + 
+                    8 $CellContext`MH^2 $CellContext`MT^2 (
+                    12 $CellContext`MT^2 + 
+                    5 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24))) 
+                    X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] + ((-192) $CellContext`MT^6 + 
+                    16 $CellContext`MT^4 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24) + 
+                    20 $CellContext`MT^2 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2 + ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^3 + 8 $CellContext`MH^2 (12 $CellContext`MT^4 - 
+                    5 $CellContext`MT^2 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24))) 
+                    X`DiscB[$CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T14 - $CellContext`T24, $CellContext`MT, $CellContext`MT]), 
+                    Complex[0, 48] $CellContext`MT^4 
+                    Pi ((-2) $CellContext`MH^2 + 
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24) ((-16) $CellContext`MH^2 $CellContext`MT^2 + (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)^(-2), (-2) $CellContext`MT^2 (
+                    16 $CellContext`MH^2 $CellContext`MT^2 - (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)^(-3) ((-2) (48 $CellContext`MH^2 $CellContext`MT^2 - 
+                    112 $CellContext`MT^4 - 
+                    24 $CellContext`MT^2 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24) + ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2) (16 $CellContext`MH^2 $CellContext`MT^2 - (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2) + (768 $CellContext`MT^8 + 
+                    512 $CellContext`MT^6 ($CellContext`S34 + \
+$CellContext`T14 + $CellContext`T24) - 
+                    96 $CellContext`MT^4 (
+                    5 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T14 - \
+$CellContext`T24) ($CellContext`S34 + $CellContext`T14 + $CellContext`T24) + (
+                    2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T14 - \
+$CellContext`T24) ($CellContext`S34 + $CellContext`T14 + $CellContext`T24)^3 + 
+                    16 $CellContext`MH^2 $CellContext`MT^2 ($CellContext`S34 + \
+$CellContext`T14 + $CellContext`T24) (10 $CellContext`MH^2 - 
+                    7 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24))) 
+                    X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] + (768 $CellContext`MT^8 - 
+                    512 $CellContext`MT^6 ($CellContext`S34 + \
+$CellContext`T14 + $CellContext`T24) - (
+                    2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T14 - \
+$CellContext`T24) ($CellContext`S34 + $CellContext`T14 + $CellContext`T24)^3 + 
+                    96 $CellContext`MT^4 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24) (5 $CellContext`MH^2 - 
+                    4 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)) - 
+                    16 $CellContext`MT^2 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24) (10 $CellContext`MH^4 - 
+                    13 $CellContext`MH^2 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24) + 
+                    3 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)) 
+                    X`DiscB[$CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T14 - $CellContext`T24, $CellContext`MT, $CellContext`MT]), 
+                    Complex[0, 96] $CellContext`MT^4 
+                    Pi (32 $CellContext`MT^6 - 
+                    6 $CellContext`MT^2 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2 + (
+                    2 $CellContext`MH^2 - $CellContext`S34 - $CellContext`T14 - \
+$CellContext`T24) ($CellContext`S34 + $CellContext`T14 + $CellContext`T24)^2) \
+(16 $CellContext`MH^2 $CellContext`MT^2 - (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)^(-3)}, 0, 4, 1],
+                    Editable->False], ")"}]}], ")"}]}], "+", 
+               RowBox[{
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"2", " ", "S34"}], "-", "T", "-", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"2", " ", "S34"}], "-", "T", "-", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "-", "U"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"ScalarC0", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ",", 
+                    RowBox[{"-", 
+                    FractionBox[
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], 
+                    RowBox[{
+                    RowBox[{"-", "1"}], "+", 
+                    SuperscriptBox["\[Beta]", "2"]}]]}], ",", "MT", ",", "MT",
+                     ",", "MT"}], "]"}], " ", 
+                   RowBox[{"(", 
+                    InterpretationBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "8"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "3"], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], ")"}], "/", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "16"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}], "2"]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "48"}], " ", 
+                    SuperscriptBox["MH", "6"], " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"14", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "4"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"128", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{"208", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"64", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "2"]}], 
+                    "-", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "3"]}]}], 
+                    ")"}]}]}], ")"}]}], ")"}], " ", 
+                    SuperscriptBox["\[Beta]", "2"]}], ")"}], "/", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}], "3"]}], "+", 
+                    InterpretationBox[
+                    SuperscriptBox[
+                    RowBox[{"O", "[", "\[Beta]", "]"}], "4"],
+                    SeriesData[$CellContext`\[Beta], 0, {}, 0, 4, 1],
+                    Editable->False]}],
+                    
+                    SeriesData[$CellContext`\[Beta], 
+                    0, {-$CellContext`MT^2 ((-16) $CellContext`MH^2 \
+$CellContext`MT^2 + (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)^(-2) ((-8) $CellContext`MH^2 ($CellContext`S34 + \
+$CellContext`T14 + $CellContext`T24) (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24) + (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^3 - 4 $CellContext`MH^4 (4 $CellContext`MT^2 - 
+                    3 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24))), 0, (-4) $CellContext`MT^2 (
+                    16 $CellContext`MH^2 $CellContext`MT^2 - (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)^(-3) ((-48) $CellContext`MH^6 $CellContext`MT^2 \
+($CellContext`S34 + $CellContext`T14 + $CellContext`T24) - 
+                    2 $CellContext`MH^2 (
+                    14 $CellContext`MT^2 - $CellContext`S34 - \
+$CellContext`T14 - $CellContext`T24) ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24) (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2 + $CellContext`MT^2 (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^4 + $CellContext`MH^4 (128 $CellContext`MT^6 + 
+                    208 $CellContext`MT^4 ($CellContext`S34 + \
+$CellContext`T14 + $CellContext`T24) + 
+                    64 $CellContext`MT^2 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2 - 
+                    3 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^3))}, 0, 4, 1],
+                    Editable->False], ")"}]}], "+", 
+                  RowBox[{"(", 
+                   InterpretationBox[
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "16"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "-", 
+                    RowBox[{"80", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "2"]}], 
+                    ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"32", " ", 
+                    SuperscriptBox["MH", "4"], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "48"}], " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"40", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "2"]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ",", "MT", ",", "MT"}], "]"}]}]}], ")"}], "/", 
+                    RowBox[{"(", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "16"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}], "2"]}], ")"}]}], ")"}]}], 
+                    "-", 
+                    FractionBox[
+                    RowBox[{"2", " ", "\[ImaginaryI]", " ", 
+                    SuperscriptBox["MT", "2"], " ", "\[Pi]", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", 
+                    RowBox[{"6", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", "\[Beta]"}], 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "16"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}], "2"]], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ")"}]}], "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}]}], ")"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MH", "4"], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"5", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "24"}], " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "2"]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"128", " ", 
+                    SuperscriptBox["MH", "6"], " ", 
+                    SuperscriptBox["MT", "2"]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "3"]}], "-", 
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MH", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"24", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"14", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "2"]}], 
+                    ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"64", " ", 
+                    SuperscriptBox["MT", "6"]}], "+", 
+                    RowBox[{"240", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"28", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "2"]}], 
+                    "-", 
+                    RowBox[{"7", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "3"]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ",", "MT", ",", "MT"}], "]"}]}]}], ")"}], " ", 
+                    SuperscriptBox["\[Beta]", "2"]}], ")"}], "/", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}], "3"]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"2", " ", "\[ImaginaryI]", " ", 
+                    SuperscriptBox["MT", "2"], " ", "\[Pi]", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"96", " ", 
+                    SuperscriptBox["MH", "4"], " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "3"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"256", " ", 
+                    SuperscriptBox["MT", "6"]}], "-", 
+                    RowBox[{"144", " ", 
+                    SuperscriptBox["MT", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}], "-", 
+                    RowBox[{"40", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "2"]}], 
+                    "+", 
+                    RowBox[{"3", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "3"]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    SuperscriptBox["\[Beta]", "3"]}], ")"}], "/", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}], "3"]}], "+", 
+                    InterpretationBox[
+                    SuperscriptBox[
+                    RowBox[{"O", "[", "\[Beta]", "]"}], "4"],
+                    SeriesData[$CellContext`\[Beta], 0, {}, 0, 4, 1],
+                    Editable->False]}],
+                    
+                    SeriesData[$CellContext`\[Beta], 0, {
+                    Rational[-1, 
+                    2] ((-16) $CellContext`MH^2 $CellContext`MT^2 + (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)^(-2) ((
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24) ((-16) $CellContext`MH^2 $CellContext`MT^2 + (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2) + $CellContext`MH^2 (
+                    32 $CellContext`MH^2 $CellContext`MT^2 - 
+                    80 $CellContext`MT^4 - 
+                    16 $CellContext`MT^2 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24) + ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2) 
+                    X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] - (32 $CellContext`MH^4 $CellContext`MT^2 + 
+                    4 $CellContext`MT^2 (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2 + $CellContext`MH^2 ((-48) $CellContext`MT^4 - 
+                    40 $CellContext`MT^2 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24) + ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)) 
+                    X`DiscB[$CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T14 - $CellContext`T24, $CellContext`MT, $CellContext`MT]), 
+                    Complex[0, -2] $CellContext`MT^2 
+                    Pi ((-16) $CellContext`MH^2 $CellContext`MT^2 + (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)^(-2) ((
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2 + $CellContext`MH^2 (8 $CellContext`MT^2 - 
+                    
+                    6 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24))), 2 $CellContext`MT^2 (
+                    16 $CellContext`MH^2 $CellContext`MT^2 - (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)^(-3) ((
+                    16 $CellContext`MH^2 $CellContext`MT^2 - (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2) (
+                    16 $CellContext`MH^2 ($CellContext`MT^2 - \
+$CellContext`S34 - $CellContext`T14 - $CellContext`T24) + 
+                    3 (4 $CellContext`MT^2 + $CellContext`S34 + \
+$CellContext`T14 + $CellContext`T24)^2) + 
+                    8 $CellContext`MH^2 (
+                    16 $CellContext`MH^4 $CellContext`MT^2 + (
+                    5 $CellContext`MT^2 - $CellContext`S34 - $CellContext`T14 - \
+$CellContext`T24) (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2 + 2 $CellContext`MH^2 ((-24) $CellContext`MT^4 - 
+                    8 $CellContext`MT^2 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24) + ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)) 
+                    X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] - (128 $CellContext`MH^6 $CellContext`MT^2 - (
+                    4 $CellContext`MT^2 - $CellContext`S34 - $CellContext`T14 - \
+$CellContext`T24) (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^3 - 16 $CellContext`MH^4 (24 $CellContext`MT^4 + 
+                    14 $CellContext`MT^2 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24) - ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2) + 2 $CellContext`MH^2 (64 $CellContext`MT^6 + 
+                    240 $CellContext`MT^4 ($CellContext`S34 + \
+$CellContext`T14 + $CellContext`T24) + 
+                    28 $CellContext`MT^2 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2 - 
+                    7 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^3)) 
+                    X`DiscB[$CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T14 - $CellContext`T24, $CellContext`MT, $CellContext`MT]), 
+                    Complex[0, -2] $CellContext`MT^2 
+                    Pi (16 $CellContext`MH^2 $CellContext`MT^2 - (
+                    
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)^(-3) (
+                    96 $CellContext`MH^4 $CellContext`MT^2 ($CellContext`S34 + \
+$CellContext`T14 + $CellContext`T24) + (
+                    4 $CellContext`MT^2 - $CellContext`S34 - $CellContext`T14 - \
+$CellContext`T24) (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^3 + 2 $CellContext`MH^2 (256 $CellContext`MT^6 - 
+                    144 $CellContext`MT^4 ($CellContext`S34 + \
+$CellContext`T14 + $CellContext`T24) - 
+                    40 $CellContext`MT^2 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2 + 
+                    3 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^3))}, 0, 4, 1],
+                    Editable->False], ")"}]}], ")"}]}]}], ")"}]}], "-", 
+            RowBox[{"8", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"-", "4"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                  RowBox[{"2", " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                  RowBox[{
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                 ")"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+               RowBox[{"8", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "-", 
+               RowBox[{"8", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "4", "]"}], ",", 
+                  RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "-", 
+               RowBox[{"8", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+               RowBox[{"8", " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "2", "]"}], ",", 
+                  RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"ec", "[", "5", "]"}], ",", 
+                  RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+               RowBox[{
+                RowBox[{"Pair", "[", 
+                 RowBox[{
+                  RowBox[{"e", "[", "1", "]"}], ",", 
+                  RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                RowBox[{"(", 
+                 RowBox[{
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", "T"}], "-", 
+                    RowBox[{"2", " ", "T14"}], "+", 
+                    RowBox[{"2", " ", "T24"}], "+", "U"}], ")"}], " ", 
+                   RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                  RowBox[{"4", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                 ")"}]}]}], ")"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"ScalarC0", "[", 
+                 RowBox[{
+                  SuperscriptBox["MH", "2"], ",", 
+                  RowBox[{
+                   SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                   "T24"}], ",", 
+                  RowBox[{"-", 
+                   FractionBox[
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], 
+                    RowBox[{
+                    RowBox[{"-", "1"}], "+", 
+                    SuperscriptBox["\[Beta]", "2"]}]]}], ",", "MT", ",", "MT",
+                   ",", "MT"}], "]"}], " ", 
+                RowBox[{"(", 
+                 InterpretationBox[
+                  RowBox[{
+                   RowBox[{"-", 
+                    FractionBox[
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}]}]]}], "-", 
+                   FractionBox[
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "2"]}], 
+                    ")"}]}], ")"}], " ", 
+                    SuperscriptBox["\[Beta]", "2"]}], 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "16"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}], "2"]], "+", 
+                   InterpretationBox[
+                    SuperscriptBox[
+                    RowBox[{"O", "[", "\[Beta]", "]"}], "4"],
+                    SeriesData[$CellContext`\[Beta], 0, {}, 0, 4, 1],
+                    Editable->False]}],
+                  
+                  SeriesData[$CellContext`\[Beta], 0, {
+                   Rational[-1, 2] $CellContext`MT^2 ((-2) $CellContext`MH^2 + 
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2/(
+                    16 $CellContext`MH^2 $CellContext`MT^2 - (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2), 
+                    0, (-2) $CellContext`MH^2 $CellContext`MT^2 \
+($CellContext`MH^2 - $CellContext`S34 - $CellContext`T14 - $CellContext`T24) (
+                    16 $CellContext`MT^4 - ($CellContext`S34 + \
+$CellContext`T14 + $CellContext`T24)^2) ((-16) $CellContext`MH^2 \
+$CellContext`MT^2 + (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)^(-2)}, 0, 4, 1],
+                  Editable->False], ")"}]}], "+", 
+               RowBox[{"(", 
+                InterpretationBox[
+                 RowBox[{
+                  RowBox[{
+                   FractionBox["1", "4"], " ", 
+                   RowBox[{"(", 
+                    RowBox[{"3", "+", 
+                    FractionBox["1", "\[Epsilon]"], "+", 
+                    FractionBox[
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}]], "+", 
+                    FractionBox[
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ",", "MT", ",", "MT"}], "]"}]}], 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}]], "+", 
+                    RowBox[{"Log", "[", 
+                    FractionBox[
+                    SuperscriptBox["\[Micro]", "2"], 
+                    SuperscriptBox["MT", "2"]], "]"}]}], ")"}]}], "+", 
+                  FractionBox[
+                   RowBox[{"\[ImaginaryI]", " ", 
+                    SuperscriptBox["MT", "2"], " ", "\[Pi]", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", "\[Beta]"}], 
+                   RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "16"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}]], "+", 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "-", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}]}], "+", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "-", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "4"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], "-", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}], "+", 
+                    RowBox[{"5", " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "2"]}]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ",", "MT", ",", "MT"}], "]"}]}]}], ")"}], " ", 
+                    SuperscriptBox["\[Beta]", "2"]}], ")"}], "/", 
+                   SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "16"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}], "2"]}], "-", 
+                  FractionBox[
+                   RowBox[{"\[ImaginaryI]", " ", 
+                    SuperscriptBox["MT", "2"], " ", "\[Pi]", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}]}], " ", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "4"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{"S34", "+", "T14", "+", "T24"}], ")"}], "2"]}], 
+                    ")"}]}]}], ")"}], " ", 
+                    SuperscriptBox["\[Beta]", "3"]}], 
+                   SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "16"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}], "2"]], "+", 
+                  InterpretationBox[
+                   SuperscriptBox[
+                    RowBox[{"O", "[", "\[Beta]", "]"}], "4"],
+                   SeriesData[$CellContext`\[Beta], 0, {}, 0, 4, 1],
+                   Editable->False]}],
+                 
+                 SeriesData[$CellContext`\[Beta], 0, {
+                  Rational[1, 4] (3 + 
+                    X`Eps^(-1) + $CellContext`MH^2 (
+                    4 $CellContext`MT^2 - $CellContext`S34 - $CellContext`T14 - \
+$CellContext`T24) (16 $CellContext`MH^2 $CellContext`MT^2 - (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)^(-1) 
+                    X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] + ($CellContext`MH^2 - $CellContext`S34 - $CellContext`T14 - \
+$CellContext`T24) (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24) (16 $CellContext`MH^2 $CellContext`MT^2 - (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)^(-1) 
+                    X`DiscB[$CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T14 - $CellContext`T24, $CellContext`MT, $CellContext`MT] + 
+                    Log[$CellContext`MT^(-2) X`Mu^2]), 
+                   Complex[0, 1] $CellContext`MT^2 
+                   Pi ((-2) $CellContext`MH^2 + 
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)/((-16) $CellContext`MH^2 $CellContext`MT^2 + (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2), $CellContext`MT^2 ((-16) $CellContext`MH^2 \
+$CellContext`MT^2 + (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)^(-2) ((-2) (2 $CellContext`MH^2 - 
+                    4 $CellContext`MT^2 - $CellContext`S34 - $CellContext`T14 - \
+$CellContext`T24) (16 $CellContext`MH^2 $CellContext`MT^2 - (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2) + $CellContext`MH^2 (16 $CellContext`MT^4 - 
+                    8 $CellContext`MT^2 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24) + ($CellContext`S34 + $CellContext`T14 + $CellContext`T24) (
+                    4 $CellContext`MH^2 - 
+                    
+                    3 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24))) 
+                    X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] - (
+                    4 $CellContext`MH^4 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24) + ($CellContext`S34 + $CellContext`T14 + $CellContext`T24) (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2 - $CellContext`MH^2 (16 $CellContext`MT^4 + 
+                    8 $CellContext`MT^2 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24) + 
+                    5 ($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)) 
+                    X`DiscB[$CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T14 - $CellContext`T24, $CellContext`MT, $CellContext`MT]), 
+                   Complex[0, -1] $CellContext`MT^2 
+                   Pi ((-16) $CellContext`MH^2 $CellContext`MT^2 + (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)^(-2) (-($CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24) (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2 + 
+                    2 $CellContext`MH^2 (
+                    16 $CellContext`MT^4 + ($CellContext`S34 + \
+$CellContext`T14 + $CellContext`T24)^2))}, 0, 4, 1],
+                 Editable->False], ")"}]}], ")"}]}], "+", 
+            RowBox[{
+             RowBox[{"(", 
+              InterpretationBox[
+               RowBox[{
+                RowBox[{
+                 RowBox[{"(", 
+                  RowBox[{"4", " ", "S", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", "T"}], "-", 
+                    RowBox[{"2", " ", "T14"}], "+", 
+                    RowBox[{"2", " ", "T24"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], ")"}], "/", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{
+                    RowBox[{"-", "16"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                   SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}]}], "-", 
+                RowBox[{
+                 RowBox[{"(", 
+                  RowBox[{"32", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", "S", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", "T"}], "-", 
+                    RowBox[{"2", " ", "T14"}], "+", 
+                    RowBox[{"2", " ", "T24"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "-", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}]}], ")"}]}], ")"}], " ", 
+                   SuperscriptBox["\[Beta]", "2"]}], ")"}], "/", 
+                 SuperscriptBox[
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "16"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}], "2"]}], "+", 
+                InterpretationBox[
+                 SuperscriptBox[
+                  RowBox[{"O", "[", "\[Beta]", "]"}], "3"],
+                 SeriesData[$CellContext`\[Beta], 0, {}, 0, 3, 1],
+                 Editable->False]}],
+               
+               SeriesData[$CellContext`\[Beta], 0, {
+                4 $CellContext`S ((-16) $CellContext`MH^2 $CellContext`MT^2 + \
+(4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)^(-1) (4 (-$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - 2 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] + 2 $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]])) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] + 8 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] - 8 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] - 8 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]] + 8 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[
+                    2]] ((-$CellContext`T - 2 $CellContext`T14 + 
+                    2 $CellContext`T24 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] - 4 ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] (-$CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]]) + ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]]) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]))), 
+                 0, (-32) $CellContext`MT^2 $CellContext`S ((-2) \
+$CellContext`MH^2 + 
+                  4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24) ((-16) $CellContext`MH^2 $CellContext`MT^2 + (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)^(-2) (4 (-$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - 2 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] ($CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] + 2 $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]])) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] + 8 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] - 8 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] - 8 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]] + 8 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]] + $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[
+                    2]] ((-$CellContext`T - 2 $CellContext`T14 + 
+                    2 $CellContext`T24 + $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] - 4 ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] (-$CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]]) + ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]]) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])))}, 0, 3, 1],
+               Editable->False], ")"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"ScalarC0", "[", 
+                 RowBox[{
+                  SuperscriptBox["MH", "2"], ",", 
+                  RowBox[{
+                   SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                   "T24"}], ",", 
+                  RowBox[{"-", 
+                   FractionBox[
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], 
+                    RowBox[{
+                    RowBox[{"-", "1"}], "+", 
+                    SuperscriptBox["\[Beta]", "2"]}]]}], ",", "MT", ",", "MT",
+                   ",", "MT"}], "]"}], " ", 
+                RowBox[{"(", 
+                 InterpretationBox[
+                  RowBox[{
+                   RowBox[{
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ")"}]}], "+", 
+                   RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox["\[Beta]", "2"]}], "+", 
+                   RowBox[{"4", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    SuperscriptBox["\[Beta]", "4"]}], "+", 
+                   InterpretationBox[
+                    SuperscriptBox[
+                    RowBox[{"O", "[", "\[Beta]", "]"}], "5"],
+                    SeriesData[$CellContext`\[Beta], 0, {}, 0, 5, 1],
+                    Editable->False]}],
+                  
+                  SeriesData[$CellContext`\[Beta], 
+                   0, {$CellContext`MH^2 (
+                    4 $CellContext`MT^2 - $CellContext`S34 - $CellContext`T14 - \
+$CellContext`T24), 0, 4 $CellContext`MH^2 $CellContext`MT^2, 0, 
+                    4 $CellContext`MH^2 $CellContext`MT^2}, 0, 5, 1],
+                  Editable->False], ")"}]}], "+", 
+               RowBox[{"(", 
+                InterpretationBox[
+                 RowBox[{
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"]}], "-", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ",", "MT", ",", "MT"}], "]"}]}]}], ")"}], "+", 
+                  RowBox[{"\[ImaginaryI]", " ", "\[Pi]", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", "\[Beta]"}], "-", 
+                  RowBox[{"2", " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24", "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ",", "MT", ",", "MT"}], "]"}]}]}], ")"}], " ", 
+                   SuperscriptBox["\[Beta]", "2"]}], "+", 
+                  RowBox[{"4", " ", "\[ImaginaryI]", " ", 
+                   SuperscriptBox["MT", "2"], " ", "\[Pi]", " ", 
+                   SuperscriptBox["\[Beta]", "3"]}], "-", 
+                  RowBox[{
+                   FractionBox["2", "3"], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"16", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24", "+", 
+                    RowBox[{"6", " ", 
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ",", "MT", ",", "MT"}], "]"}]}]}], ")"}], " ", 
+                   SuperscriptBox["\[Beta]", "4"]}], "+", 
+                  InterpretationBox[
+                   SuperscriptBox[
+                    RowBox[{"O", "[", "\[Beta]", "]"}], "5"],
+                   SeriesData[$CellContext`\[Beta], 0, {}, 0, 5, 1],
+                   Editable->False]}],
+                 
+                 SeriesData[$CellContext`\[Beta], 
+                  0, {(-2) $CellContext`MH^2 
+                    X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] + (2 $CellContext`MH^2 - 
+                    4 $CellContext`MT^2 - $CellContext`S34 - $CellContext`T14 - \
+$CellContext`T24) 
+                    X`DiscB[$CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T14 - $CellContext`T24, $CellContext`MT, $CellContext`MT], 
+                   Complex[0, 1] 
+                   Pi (4 $CellContext`MT^2 + $CellContext`S34 + \
+$CellContext`T14 + $CellContext`T24), (-2) (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24 + 2 $CellContext`MT^2 
+                    X`DiscB[$CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T14 - $CellContext`T24, $CellContext`MT, $CellContext`MT]), 
+                   Complex[0, 4] $CellContext`MT^2 Pi, 
+                   Rational[-2, 3] (
+                    16 $CellContext`MT^2 + $CellContext`S34 + \
+$CellContext`T14 + $CellContext`T24 + 
+                    6 $CellContext`MT^2 
+                    X`DiscB[$CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T14 - $CellContext`T24, $CellContext`MT, $CellContext`MT])}, 0, 
+                  5, 1],
+                 Editable->False], ")"}]}], ")"}]}], "+", 
+            RowBox[{
+             RowBox[{"(", 
+              InterpretationBox[
+               RowBox[{
+                RowBox[{"-", 
+                 RowBox[{"(", 
+                  RowBox[{
+                   RowBox[{"(", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", "S34", " ", "T"}], "-", 
+                    SuperscriptBox["T", "2"], "+", 
+                    RowBox[{"4", " ", "T", " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "S", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "-", "U"}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", 
+                    RowBox[{"2", " ", "T14"}], "-", 
+                    RowBox[{"2", " ", "T24"}], "-", "U"}], ")"}]}], "+", 
+                    RowBox[{"2", " ", "S34", " ", "U"}], "-", 
+                    RowBox[{"4", " ", "T14", " ", "U"}], "+", 
+                    SuperscriptBox["U", "2"]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S", "-", "S34", "+", "T14", "+", "T24"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "+", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"U", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", "S", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", "S34", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", "T14", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", "T24", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"U", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"U", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "+", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "+", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"32", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "+", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "+", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"T", "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", "T"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}]}], ")"}], "/", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "16"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}]}], ")"}]}], "+", 
+                RowBox[{
+                 RowBox[{"(", 
+                  RowBox[{"16", " ", 
+                   SuperscriptBox["MT", "2"], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", 
+                   RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", "S34", " ", "T"}], "-", 
+                    SuperscriptBox["T", "2"], "+", 
+                    RowBox[{"4", " ", "T", " ", "T24"}], "+", 
+                    RowBox[{"2", " ", "S", " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "-", "U"}], ")"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"T", "+", 
+                    RowBox[{"2", " ", "T14"}], "-", 
+                    RowBox[{"2", " ", "T24"}], "-", "U"}], ")"}]}], "+", 
+                    RowBox[{"2", " ", "S34", " ", "U"}], "-", 
+                    RowBox[{"4", " ", "T14", " ", "U"}], "+", 
+                    SuperscriptBox["U", "2"]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{"S", "-", "S34", "+", "T14", "+", "T24"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "+", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"U", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", "S", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", "S34", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", "T14", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", "T24", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"U", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"T", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"U", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "+", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "+", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"32", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}]}], "-", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], "+", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "-", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "+", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"8", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", "T", "+", "U"}], ")"}], 
+                    " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"ec", "[", "4", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "2", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"e", "[", "1", "]"}], ",", 
+                    RowBox[{"e", "[", "2", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "5", "]"}]}], "]"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "-", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{"T", "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "1", "]"}]}], "]"}]}], "+", 
+                    RowBox[{"2", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "T"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "2", "]"}]}], "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"-", "T"}], "+", "U"}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "4", "]"}], ",", 
+                    RowBox[{"k", "[", "3", "]"}]}], "]"}]}]}], ")"}], " ", 
+                    RowBox[{"Pair", "[", 
+                    RowBox[{
+                    RowBox[{"ec", "[", "5", "]"}], ",", 
+                    RowBox[{"k", "[", "4", "]"}]}], "]"}]}]}], ")"}]}]}], 
+                    ")"}], " ", 
+                   SuperscriptBox["\[Beta]", "2"]}], ")"}], "/", 
+                 SuperscriptBox[
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "16"}], " ", 
+                    SuperscriptBox["MH", "2"], " ", 
+                    SuperscriptBox["MT", "2"]}], "+", 
+                    SuperscriptBox[
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], "2"]}], ")"}], "2"]}], "+", 
+                InterpretationBox[
+                 SuperscriptBox[
+                  RowBox[{"O", "[", "\[Beta]", "]"}], "3"],
+                 SeriesData[$CellContext`\[Beta], 0, {}, 0, 3, 1],
+                 Editable->False]}],
+               
+               SeriesData[$CellContext`\[Beta], 
+                0, {(-2) ((-16) $CellContext`MH^2 $CellContext`MT^2 + (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)^(-1) (((-2) $CellContext`S34 $CellContext`T - \
+$CellContext`T^2 + 4 $CellContext`T $CellContext`T24 + 
+                    2 $CellContext`S ($CellContext`T - $CellContext`U) + 
+                    2 $CellContext`MH^2 ($CellContext`T + 2 $CellContext`T14 - 
+                    2 $CellContext`T24 - $CellContext`U) + 
+                    2 $CellContext`S34 $CellContext`U - 
+                    4 $CellContext`T14 $CellContext`U + $CellContext`U^2) \
+$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[2]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] - 
+                  4 ((-2) ($CellContext`S - $CellContext`S34 + \
+$CellContext`T14 + $CellContext`T24) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    1]] + ((-2) $CellContext`MH^2 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] + 2 $CellContext`MH^2 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - $CellContext`T $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - $CellContext`U $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] + 2 $CellContext`S $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] - 
+                   2 $CellContext`S34 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] + 
+                   2 $CellContext`T14 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] + 
+                   2 $CellContext`T24 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] + 2 $CellContext`MH^2 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] - $CellContext`T $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] - $CellContext`U $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] - 2 $CellContext`MH^2 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] + $CellContext`T $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] + $CellContext`U $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]]) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] + 
+                  8 ((-2) $CellContext`MH^2 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] - 
+                  8 ((-2) $CellContext`MH^2 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] + 32 ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]]) ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]]) - ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]]) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) - 
+                  8 ((-2) $CellContext`MH^2 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]] + 
+                  8 ((-2) $CellContext`MH^2 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]] - 4 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[2]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] (
+                    2 ($CellContext`MH^2 - $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - 
+                    2 ($CellContext`MH^2 - $CellContext`T) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    2]] + ($CellContext`T - $CellContext`U) \
+$CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    3]]) + ((-2) ($CellContext`MH^2 - $CellContext`U) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + 
+                    2 ($CellContext`MH^2 - $CellContext`T) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[
+                    2]] + (-$CellContext`T + $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]])), 0, 
+                 16 $CellContext`MT^2 ((-2) $CellContext`MH^2 + 
+                  4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24) ((-16) $CellContext`MH^2 $CellContext`MT^2 + (
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24)^2)^(-2) (((-2) $CellContext`S34 $CellContext`T - \
+$CellContext`T^2 + 4 $CellContext`T $CellContext`T24 + 
+                    2 $CellContext`S ($CellContext`T - $CellContext`U) + 
+                    2 $CellContext`MH^2 ($CellContext`T + 2 $CellContext`T14 - 
+                    2 $CellContext`T24 - $CellContext`U) + 
+                    2 $CellContext`S34 $CellContext`U - 
+                    4 $CellContext`T14 $CellContext`U + $CellContext`U^2) \
+$CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[2]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] - 
+                  4 ((-2) ($CellContext`S - $CellContext`S34 + \
+$CellContext`T14 + $CellContext`T24) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[
+                    1]] + ((-2) $CellContext`MH^2 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] + 2 $CellContext`MH^2 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - $CellContext`T $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - $CellContext`U $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] + 2 $CellContext`S $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] - 
+                   2 $CellContext`S34 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] + 
+                   2 $CellContext`T14 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] + 
+                   2 $CellContext`T24 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]] + 2 $CellContext`MH^2 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] - $CellContext`T $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] - $CellContext`U $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[4]] - 2 $CellContext`MH^2 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] + $CellContext`T $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]] + $CellContext`U $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[5]]) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`ec[5]] + 
+                  8 ((-2) $CellContext`MH^2 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] - 
+                  8 ((-2) $CellContext`MH^2 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[5]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] + 32 ($CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[3]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] - $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[3]]) ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]] ($CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[2]]) - ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[2]]) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[3]]) - 
+                  8 ((-2) $CellContext`MH^2 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`k[2]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`ec[4]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]] + 
+                  8 ((-2) $CellContext`MH^2 + $CellContext`T + \
+$CellContext`U) $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`ec[4]] $CellContext`Pair[
+                    $CellContext`e[2], 
+                    $CellContext`k[1]] $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]] - 4 $CellContext`Pair[
+                    $CellContext`e[1], 
+                    $CellContext`e[2]] ($CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[5]] (
+                    2 ($CellContext`MH^2 - $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[1]] - 
+                    2 ($CellContext`MH^2 - $CellContext`T) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    2]] + ($CellContext`T - $CellContext`U) \
+$CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[
+                    3]]) + ((-2) ($CellContext`MH^2 - $CellContext`U) \
+$CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[1]] + 
+                    2 ($CellContext`MH^2 - $CellContext`T) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[
+                    2]] + (-$CellContext`T + $CellContext`U) $CellContext`Pair[
+                    $CellContext`ec[4], 
+                    $CellContext`k[3]]) $CellContext`Pair[
+                    $CellContext`ec[5], 
+                    $CellContext`k[4]]))}, 0, 3, 1],
+               Editable->False], ")"}], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"ScalarC0", "[", 
+                 RowBox[{
+                  SuperscriptBox["MH", "2"], ",", 
+                  RowBox[{
+                   SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                   "T24"}], ",", 
+                  RowBox[{"-", 
+                   FractionBox[
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], 
+                    RowBox[{
+                    RowBox[{"-", "1"}], "+", 
+                    SuperscriptBox["\[Beta]", "2"]}]]}], ",", "MT", ",", "MT",
+                   ",", "MT"}], "]"}], " ", 
+                RowBox[{"(", 
+                 InterpretationBox[
+                  RowBox[{
+                   RowBox[{"-", 
+                    RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}]}], ")"}]}]}], "-", 
+                   RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"8", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}]}], ")"}], " ", 
+                    SuperscriptBox["\[Beta]", "2"]}], "-", 
+                   RowBox[{"4", " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    SuperscriptBox["MT", "2"], " ", 
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{
+                    RowBox[{"-", "2"}], " ", 
+                    SuperscriptBox["MH", "2"]}], "+", 
+                    RowBox[{"12", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}]}], ")"}], " ", 
+                    SuperscriptBox["\[Beta]", "4"]}], "+", 
+                   InterpretationBox[
+                    SuperscriptBox[
+                    RowBox[{"O", "[", "\[Beta]", "]"}], "5"],
+                    SeriesData[$CellContext`\[Beta], 0, {}, 0, 5, 1],
+                    Editable->False]}],
+                  
+                  SeriesData[$CellContext`\[Beta], 
+                   0, {(-4) $CellContext`MT^2 ((-2) $CellContext`MH^2 + 
+                    4 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24), 0, (-4) $CellContext`MT^2 ((-2) $CellContext`MH^2 + 
+                    
+                    8 $CellContext`MT^2 + $CellContext`S34 + $CellContext`T14 + \
+$CellContext`T24), 0, (-4) $CellContext`MT^2 ((-2) $CellContext`MH^2 + 
+                    12 $CellContext`MT^2 + $CellContext`S34 + \
+$CellContext`T14 + $CellContext`T24)}, 0, 5, 1],
+                  Editable->False], ")"}]}], "+", 
+               RowBox[{"(", 
+                InterpretationBox[
+                 RowBox[{
+                  RowBox[{"(", 
+                   RowBox[{
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "+", "S34", "+", "T14", "+", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{
+                    RowBox[{"(", 
+                    RowBox[{
+                    RowBox[{"4", " ", 
+                    SuperscriptBox["MT", "2"]}], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ")"}], " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ",", "MT", ",", "MT"}], "]"}]}]}], ")"}], "-", 
+                  RowBox[{"8", " ", "\[ImaginaryI]", " ", 
+                   SuperscriptBox["MT", "2"], " ", "\[Pi]", " ", "\[Beta]"}], 
+                  "+", 
+                  RowBox[{"4", " ", 
+                   SuperscriptBox["MT", "2"], " ", 
+                   RowBox[{"(", 
+                    RowBox[{"4", "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], "]"}], 
+                    "+", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ",", "MT", ",", "MT"}], "]"}]}], ")"}], " ", 
+                   SuperscriptBox["\[Beta]", "2"]}], "-", 
+                  RowBox[{"8", " ", "\[ImaginaryI]", " ", 
+                   SuperscriptBox["MT", "2"], " ", "\[Pi]", " ", 
+                   SuperscriptBox["\[Beta]", "3"]}], "+", 
+                  RowBox[{
+                   FractionBox["4", "3"], " ", 
+                   SuperscriptBox["MT", "2"], " ", 
+                   RowBox[{"(", 
+                    RowBox[{"16", "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], ",", "MT", ",", "MT"}], 
+                    "]"}]}], "+", 
+                    RowBox[{"3", " ", 
+                    RowBox[{"DiscB", "[", 
+                    RowBox[{
+                    RowBox[{
+                    SuperscriptBox["MH", "2"], "-", "S34", "-", "T14", "-", 
+                    "T24"}], ",", "MT", ",", "MT"}], "]"}]}]}], ")"}], " ", 
+                   SuperscriptBox["\[Beta]", "4"]}], "+", 
+                  InterpretationBox[
+                   SuperscriptBox[
+                    RowBox[{"O", "[", "\[Beta]", "]"}], "5"],
+                   SeriesData[$CellContext`\[Beta], 0, {}, 0, 5, 1],
+                   Editable->False]}],
+                 
+                 SeriesData[$CellContext`\[Beta], 
+                  0, {(4 $CellContext`MT^2 + $CellContext`S34 + \
+$CellContext`T14 + $CellContext`T24) 
+                    X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] + (
+                    4 $CellContext`MT^2 - $CellContext`S34 - $CellContext`T14 - \
+$CellContext`T24) 
+                    X`DiscB[$CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T14 - $CellContext`T24, $CellContext`MT, $CellContext`MT], 
+                   Complex[0, -8] $CellContext`MT^2 Pi, 
+                   4 $CellContext`MT^2 (4 + 
+                    X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] + 
+                    X`DiscB[$CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T14 - $CellContext`T24, $CellContext`MT, $CellContext`MT]), 
+                   Complex[0, -8] $CellContext`MT^2 Pi, 
+                   Rational[4, 3] $CellContext`MT^2 (16 + 
+                    3 X`DiscB[$CellContext`MH^2, $CellContext`MT, \
+$CellContext`MT] + 3 
+                    X`DiscB[$CellContext`MH^2 - $CellContext`S34 - \
+$CellContext`T14 - $CellContext`T24, $CellContext`MT, $CellContext`MT])}, 0, 
+                  5, 1],
+                 Editable->False], ")"}]}], ")"}]}]}], ")"}]}]}], ")"}]}]}], 
+     ")"}]}]}]}]], "Output",
+ CellChangeTimes->{3.778513163539002*^9},
+ CellLabel->
+  "Out[100]=",ExpressionUUID->"6849d88e-ad0f-49c4-99da-875ddf3df840"]
+}, Closed]],
+
+Cell[BoxData[""], "Input",
+ CellChangeTimes->{{3.778511510005802*^9, 
+  3.778511515077896*^9}},ExpressionUUID->"3bccd808-2d0d-4aed-ad5c-\
+f98dce1bb2fa"],
+
+Cell[BoxData[""], "Input",
+ CellChangeTimes->{{3.77851141463636*^9, 
+  3.778511424867489*^9}},ExpressionUUID->"9214d531-c1c4-4f0b-8067-\
+62d509d3780e"],
+
+Cell[BoxData[""], "Input",
+ CellChangeTimes->{{3.778511201027299*^9, 
+  3.778511260406787*^9}},ExpressionUUID->"5d134bbf-d270-4d46-9aad-\
+c35a20b3af10"],
+
+Cell[BoxData[{
+ RowBox[{
+  RowBox[{"listPV", "=", 
+   RowBox[{"ToExpression", "[", 
+    RowBox[{"Import", "[", 
+     RowBox[{"\"\<allPVs.m\>\"", ",", "\"\<Lines\>\""}], "]"}], "]"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"LRlist", "=", 
+   RowBox[{"Import", "[", "\"\<analyticPV.m\>\"", "]"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{
+   RowBox[{"LRlistVelSub", "=", 
+    RowBox[{"LRlist", "//.", "VelSub"}]}], ";"}], "\[IndentingNewLine]", 
+  RowBox[{"(*", " ", 
+   RowBox[{
+    RowBox[{
+    "Take", " ", "analytic", " ", "expansions", " ", "of", " ", "PV", " ", 
+     "coefficients", " ", "and", " ", "sub", " ", "S"}], "\[Rule]", 
+    RowBox[{"4", "*", 
+     RowBox[{
+      RowBox[{"MT", "^", "2"}], "/", 
+      RowBox[{"(", 
+       RowBox[{"1", "-", 
+        RowBox[{"\[Beta]", "^", "2"}]}], ")"}]}]}]}], 
+   "*)"}]}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"Export", "[", 
+   RowBox[{"\"\<analyticPVwVel.m\>\"", ",", "LRlistVelSub"}], "]"}], 
+  ";"}]}], "Input",
+ CellChangeTimes->{{3.776094397166354*^9, 3.776094421774979*^9}, {
+  3.776094465962419*^9, 3.77609447206217*^9}, {3.776097668612061*^9, 
+  3.776097774958314*^9}},
+ CellLabel->"In[23]:=",ExpressionUUID->"c9706e32-aa64-4bea-be5e-fca139f74b78"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(*", " ", 
+   RowBox[{
+   "Copy", " ", "the", " ", "analytical", " ", "list", " ", "in", " ", 
+    "terms", " ", "of", " ", "\[Beta]", " ", "into", " ", "a", " ", "new", 
+    " ", "list", " ", "where", " ", "all", " ", "the", " ", "series", " ", 
+    "will", " ", 
+    RowBox[{"be", "."}]}], " ", "*)"}], "\[IndentingNewLine]", 
+  RowBox[{"(*", 
+   RowBox[{
+    RowBox[{"LRlistVelSub", "=", 
+     RowBox[{
+      RowBox[{
+       RowBox[{"Import", "[", "\"\<analyticPVwVel.m\>\"", "]"}], 
+       "\[IndentingNewLine]", "Serieslist"}], "=", "LRlistVelSub"}]}], ";", 
+    "\[IndentingNewLine]", 
+    RowBox[{"Export", "[", 
+     RowBox[{"\"\<SeriesPV.m\>\"", ",", "Serieslist"}], "]"}], ";"}], 
+   "*)"}]}]], "Input",
+ CellChangeTimes->{{3.7760979510647297`*^9, 3.776098054974638*^9}, {
+   3.776098200620619*^9, 3.776098218898759*^9}, {3.776441930928959*^9, 
+   3.7764419581321993`*^9}, {3.776784952061544*^9, 3.776785007236261*^9}, 
+   3.776785058756402*^9},ExpressionUUID->"2098a55c-4e04-413e-b48c-\
+2e3e1420aeba"],
+
+Cell[BoxData[{
+ RowBox[{
+  RowBox[{"listPV", "=", 
+   RowBox[{"ToExpression", "[", 
+    RowBox[{"Import", "[", 
+     RowBox[{"\"\<allPVs.m\>\"", ",", "\"\<Lines\>\""}], "]"}], "]"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"LRlistVelSub", "=", 
+   RowBox[{"Import", "[", "\"\<analyticPVwVel.m\>\"", "]"}]}], 
+  ";"}], "\[IndentingNewLine]", 
+ RowBox[{
+  RowBox[{"Serieslist", "=", 
+   RowBox[{"Import", "[", "\"\<SeriesPV.m\>\"", "]"}]}], ";"}]}], "Input",
+ CellChangeTimes->{{3.776098079828*^9, 3.776098100180982*^9}, {
+  3.776785024592134*^9, 3.7767850503846416`*^9}, {3.7770393437154408`*^9, 
+  3.777039344707755*^9}},
+ CellLabel->"In[50]:=",ExpressionUUID->"f11165e8-30f4-4621-91cb-e78cc1116c62"],
+
+Cell[BoxData[""], "Input",
+ CellChangeTimes->{{3.7764430997613564`*^9, 3.776443193530168*^9}, {
+  3.776785094676215*^9, 3.7767850983052683`*^9}, {3.7785115369627542`*^9, 
+  3.778511543496728*^9}, {3.778511607544853*^9, 
+  3.778511621841559*^9}},ExpressionUUID->"881beb7c-e557-4703-a5ed-\
+8b7345c6403b"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"MakeRefineSeriesOf", "[", 
+  RowBox[{"1", ",", "10"}], "]"}]], "Input",
+ CellChangeTimes->{{3.776443243134263*^9, 3.776443254122056*^9}},
+ CellLabel->"In[34]:=",ExpressionUUID->"86953094-992b-4ece-81d3-0f54f8c99910"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["1"], "Print",
+ CellChangeTimes->{3.7764432560233297`*^9, 3.77678515057268*^9},
+ CellLabel->
+  "During evaluation of \
+In[34]:=",ExpressionUUID->"8b88be0a-a13e-4a7b-8295-c1008ad658d6"],
+
+Cell[BoxData["2"], "Print",
+ CellChangeTimes->{3.7764432560233297`*^9, 3.776785163091247*^9},
+ CellLabel->
+  "During evaluation of \
+In[34]:=",ExpressionUUID->"f854acc1-f24a-43ce-9107-892da3741105"],
+
+Cell[BoxData["3"], "Print",
+ CellChangeTimes->{3.7764432560233297`*^9, 3.776785174993379*^9},
+ CellLabel->
+  "During evaluation of \
+In[34]:=",ExpressionUUID->"0ebf2041-29ad-490d-ae2c-fb00ea60e896"],
+
+Cell[BoxData["4"], "Print",
+ CellChangeTimes->{3.7764432560233297`*^9, 3.776785186604517*^9},
+ CellLabel->
+  "During evaluation of \
+In[34]:=",ExpressionUUID->"ce7c7420-29bb-4bc7-9fe1-c52d92b3c17c"],
+
+Cell[BoxData["5"], "Print",
+ CellChangeTimes->{3.7764432560233297`*^9, 3.776785198456546*^9},
+ CellLabel->
+  "During evaluation of \
+In[34]:=",ExpressionUUID->"bdb7f0f5-ae0e-47e3-bde4-add2b2e9172d"],
+
+Cell[BoxData["6"], "Print",
+ CellChangeTimes->{3.7764432560233297`*^9, 3.776785210430993*^9},
+ CellLabel->
+  "During evaluation of \
+In[34]:=",ExpressionUUID->"6ccc5234-8d31-4f80-b860-fb9bc1ead01e"],
+
+Cell[BoxData["7"], "Print",
+ CellChangeTimes->{3.7764432560233297`*^9, 3.776785222781147*^9},
+ CellLabel->
+  "During evaluation of \
+In[34]:=",ExpressionUUID->"9f6f5a15-4625-4559-aeb6-4e62d60ea660"],
+
+Cell[BoxData["8"], "Print",
+ CellChangeTimes->{3.7764432560233297`*^9, 3.7767852353323383`*^9},
+ CellLabel->
+  "During evaluation of \
+In[34]:=",ExpressionUUID->"cc753901-6a7d-4228-ac53-35d451b86d77"],
+
+Cell[BoxData["9"], "Print",
+ CellChangeTimes->{3.7764432560233297`*^9, 3.776785249113072*^9},
+ CellLabel->
+  "During evaluation of \
+In[34]:=",ExpressionUUID->"8fe1d30b-85ec-47bd-8e46-174bcc6be6cf"],
+
+Cell[BoxData["10"], "Print",
+ CellChangeTimes->{3.7764432560233297`*^9, 3.776785262024439*^9},
+ CellLabel->
+  "During evaluation of \
+In[34]:=",ExpressionUUID->"cd6b11e5-086b-4a28-ba23-c88ce09cbddb"]
+}, Open  ]],
+
+Cell[BoxData[
+ RowBox[{"{", "Null", "}"}]], "Output",
+ CellChangeTimes->{3.776443394718553*^9, 3.776785274825478*^9},
+ CellLabel->"Out[34]=",ExpressionUUID->"f9eb79c9-79ab-4972-ac5d-9bf4d7c5706c"]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"MakeRefineSeriesOf", "[", 
+  RowBox[{"11", ",", "20"}], "]"}]], "Input",
+ CellChangeTimes->{{3.776443269263505*^9, 3.776443297130433*^9}},
+ CellLabel->"In[35]:=",ExpressionUUID->"f96bfd50-3c93-487b-b72c-0efa966db052"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["11"], "Print",
+ CellChangeTimes->{3.776443394822617*^9, 3.776785275132083*^9},
+ CellLabel->
+  "During evaluation of \
+In[35]:=",ExpressionUUID->"0df55f20-b51c-4417-8687-560b75680ad9"],
+
+Cell[BoxData["12"], "Print",
+ CellChangeTimes->{3.776443394822617*^9, 3.7767852879137363`*^9},
+ CellLabel->
+  "During evaluation of \
+In[35]:=",ExpressionUUID->"65afac5f-ac1b-405d-95ca-d88dcc034907"],
+
+Cell[BoxData["13"], "Print",
+ CellChangeTimes->{3.776443394822617*^9, 3.7767853015886583`*^9},
+ CellLabel->
+  "During evaluation of \
+In[35]:=",ExpressionUUID->"155d77b5-d5ca-47b5-bba8-036aff1d2443"],
+
+Cell[BoxData["14"], "Print",
+ CellChangeTimes->{3.776443394822617*^9, 3.7767853138957233`*^9},
+ CellLabel->
+  "During evaluation of \
+In[35]:=",ExpressionUUID->"6402840f-e54b-49d2-8ce8-0175340b2083"],
+
+Cell[BoxData["15"], "Print",
+ CellChangeTimes->{3.776443394822617*^9, 3.7767853287329063`*^9},
+ CellLabel->
+  "During evaluation of \
+In[35]:=",ExpressionUUID->"736736de-4f33-4375-9ad5-d9f98f5dba87"],
+
+Cell[BoxData["16"], "Print",
+ CellChangeTimes->{3.776443394822617*^9, 3.776785343544771*^9},
+ CellLabel->
+  "During evaluation of \
+In[35]:=",ExpressionUUID->"5d2d9825-5632-4457-8211-7dd6cee750a8"],
+
+Cell[BoxData["17"], "Print",
+ CellChangeTimes->{3.776443394822617*^9, 3.776785355100485*^9},
+ CellLabel->
+  "During evaluation of \
+In[35]:=",ExpressionUUID->"23906453-43f1-4403-92b6-e9fb94c0ae50"],
+
+Cell[BoxData["18"], "Print",
+ CellChangeTimes->{3.776443394822617*^9, 3.776785367047596*^9},
+ CellLabel->
+  "During evaluation of \
+In[35]:=",ExpressionUUID->"2ba2eb99-fc54-459f-85c0-ed99d7ad07c9"],
+
+Cell[BoxData["19"], "Print",
+ CellChangeTimes->{3.776443394822617*^9, 3.776785378980294*^9},
+ CellLabel->
+  "During evaluation of \
+In[35]:=",ExpressionUUID->"94070629-691b-4d0a-9eb7-69b91078a11e"],
+
+Cell[BoxData["20"], "Print",
+ CellChangeTimes->{3.776443394822617*^9, 3.776785394147324*^9},
+ CellLabel->
+  "During evaluation of \
+In[35]:=",ExpressionUUID->"3812bf93-11c7-45dc-bd0e-7ed9238191ce"]
+}, Open  ]],
+
+Cell[BoxData[
+ RowBox[{"{", "Null", "}"}]], "Output",
+ CellChangeTimes->{3.776443542586445*^9, 3.776785425375132*^9},
+ CellLabel->"Out[35]=",ExpressionUUID->"3f41a929-7beb-4259-8ecb-4fc1d8a69374"]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"MakeRefineSeriesOf", "[", 
+  RowBox[{"21", ",", "30"}], "]"}]], "Input",
+ CellChangeTimes->{{3.7764432864380407`*^9, 3.776443300191421*^9}},
+ CellLabel->"In[36]:=",ExpressionUUID->"fe1a97a8-532e-4e7a-8a88-f565caae5f97"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["21"], "Print",
+ CellChangeTimes->{3.7764435427174063`*^9, 3.7767854255703907`*^9},
+ CellLabel->
+  "During evaluation of \
+In[36]:=",ExpressionUUID->"203826e8-d100-4a48-aa61-b8cae880ddf2"],
+
+Cell[BoxData["22"], "Print",
+ CellChangeTimes->{3.7764435427174063`*^9, 3.776785442882122*^9},
+ CellLabel->
+  "During evaluation of \
+In[36]:=",ExpressionUUID->"9a8a2d64-a921-4ebe-b6c4-e90419eee1c2"],
+
+Cell[BoxData["23"], "Print",
+ CellChangeTimes->{3.7764435427174063`*^9, 3.776785459608718*^9},
+ CellLabel->
+  "During evaluation of \
+In[36]:=",ExpressionUUID->"ceff1cb8-2c39-4c0f-a43a-efcbdbef0fe2"],
+
+Cell[BoxData["24"], "Print",
+ CellChangeTimes->{3.7764435427174063`*^9, 3.7767854716911592`*^9},
+ CellLabel->
+  "During evaluation of \
+In[36]:=",ExpressionUUID->"89a661a3-5c0c-4326-a393-6e4972db4a6b"],
+
+Cell[BoxData["25"], "Print",
+ CellChangeTimes->{3.7764435427174063`*^9, 3.7767854851652393`*^9},
+ CellLabel->
+  "During evaluation of \
+In[36]:=",ExpressionUUID->"6aa6f90c-6c91-4f86-8968-1103cba7975b"],
+
+Cell[BoxData["26"], "Print",
+ CellChangeTimes->{3.7764435427174063`*^9, 3.776785499030817*^9},
+ CellLabel->
+  "During evaluation of \
+In[36]:=",ExpressionUUID->"0dcb36c1-0668-4b8a-bc01-4945a598c78a"],
+
+Cell[BoxData["27"], "Print",
+ CellChangeTimes->{3.7764435427174063`*^9, 3.776785515033786*^9},
+ CellLabel->
+  "During evaluation of \
+In[36]:=",ExpressionUUID->"0fcfcd70-8d7b-435d-a163-acb028e6e16e"],
+
+Cell[BoxData["28"], "Print",
+ CellChangeTimes->{3.7764435427174063`*^9, 3.776785529395587*^9},
+ CellLabel->
+  "During evaluation of \
+In[36]:=",ExpressionUUID->"3b7724cb-54a4-4dde-8ea0-50e5610b792e"],
+
+Cell[BoxData["29"], "Print",
+ CellChangeTimes->{3.7764435427174063`*^9, 3.776785544335827*^9},
+ CellLabel->
+  "During evaluation of \
+In[36]:=",ExpressionUUID->"b613c9c7-96f4-4a6c-8f08-8e6df52762df"],
+
+Cell[BoxData["30"], "Print",
+ CellChangeTimes->{3.7764435427174063`*^9, 3.776785557473522*^9},
+ CellLabel->
+  "During evaluation of \
+In[36]:=",ExpressionUUID->"a6fd0189-8e91-469a-9897-389a4893d7b0"]
+}, Open  ]],
+
+Cell[BoxData[
+ RowBox[{"{", "Null", "}"}]], "Output",
+ CellChangeTimes->{3.776443670712986*^9, 3.776785570034812*^9},
+ CellLabel->"Out[36]=",ExpressionUUID->"4a8fef41-31e5-42c1-8bdc-68e9f7afbd6a"]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"MakeRefineSeriesOf", "[", 
+  RowBox[{"31", ",", "40"}], "]"}]], "Input",
+ CellChangeTimes->{{3.7764435657641363`*^9, 3.77644357390454*^9}},
+ CellLabel->"In[37]:=",ExpressionUUID->"2aecbe65-4b44-4dfa-93ef-65fd39540c9b"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["31"], "Print",
+ CellChangeTimes->{3.776443670904154*^9, 3.776785570242344*^9},
+ CellLabel->
+  "During evaluation of \
+In[37]:=",ExpressionUUID->"2fca990b-8284-4e3f-8a3b-7f56db89acc5"],
+
+Cell[BoxData["32"], "Print",
+ CellChangeTimes->{3.776443670904154*^9, 3.776785587092491*^9},
+ CellLabel->
+  "During evaluation of \
+In[37]:=",ExpressionUUID->"3177b850-296d-49fe-8867-d3473a1b0c35"],
+
+Cell[BoxData["33"], "Print",
+ CellChangeTimes->{3.776443670904154*^9, 3.776785603039337*^9},
+ CellLabel->
+  "During evaluation of \
+In[37]:=",ExpressionUUID->"c0b4e928-89e9-4d85-8e51-5cbdf9ce41aa"],
+
+Cell[BoxData["34"], "Print",
+ CellChangeTimes->{3.776443670904154*^9, 3.776785615262904*^9},
+ CellLabel->
+  "During evaluation of \
+In[37]:=",ExpressionUUID->"a373700f-9836-44d5-8a5f-930119678171"],
+
+Cell[BoxData["35"], "Print",
+ CellChangeTimes->{3.776443670904154*^9, 3.776785628518416*^9},
+ CellLabel->
+  "During evaluation of \
+In[37]:=",ExpressionUUID->"ca822f7e-70c9-46a4-a25f-582acb77abcb"],
+
+Cell[BoxData["36"], "Print",
+ CellChangeTimes->{3.776443670904154*^9, 3.776785640345977*^9},
+ CellLabel->
+  "During evaluation of \
+In[37]:=",ExpressionUUID->"96e22b30-8c73-4518-8d23-873121d8fc48"],
+
+Cell[BoxData["37"], "Print",
+ CellChangeTimes->{3.776443670904154*^9, 3.776785654876864*^9},
+ CellLabel->
+  "During evaluation of \
+In[37]:=",ExpressionUUID->"83708b79-d67b-4c05-93e9-38073aa7fe05"],
+
+Cell[BoxData["38"], "Print",
+ CellChangeTimes->{3.776443670904154*^9, 3.776785669062007*^9},
+ CellLabel->
+  "During evaluation of \
+In[37]:=",ExpressionUUID->"78e88359-b700-4328-bea6-a2b0d14a7cac"],
+
+Cell[BoxData["39"], "Print",
+ CellChangeTimes->{3.776443670904154*^9, 3.776785684171424*^9},
+ CellLabel->
+  "During evaluation of \
+In[37]:=",ExpressionUUID->"704157f3-bfb2-4f43-b5f0-c5bfbc560aab"],
+
+Cell[BoxData["40"], "Print",
+ CellChangeTimes->{3.776443670904154*^9, 3.776785699617958*^9},
+ CellLabel->
+  "During evaluation of \
+In[37]:=",ExpressionUUID->"7565254f-9a77-48dc-9444-33b886723862"]
+}, Open  ]],
+
+Cell[BoxData[
+ RowBox[{"{", "Null", "}"}]], "Output",
+ CellChangeTimes->{3.7764437965534983`*^9, 3.7767857127548532`*^9},
+ CellLabel->"Out[37]=",ExpressionUUID->"2e1c38af-7450-4ecc-a05c-257dcdba5451"]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"MakeRefineSeriesOf", "[", 
+  RowBox[{"41", ",", "50"}], "]"}]], "Input",
+ CellChangeTimes->{{3.776443577378374*^9, 3.776443584277933*^9}},
+ CellLabel->"In[38]:=",ExpressionUUID->"8ee863b5-d147-4e8a-bd18-9c421dd23787"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["41"], "Print",
+ CellChangeTimes->{3.776443982326789*^9, 3.776785714716011*^9},
+ CellLabel->
+  "During evaluation of \
+In[38]:=",ExpressionUUID->"2009a193-ceea-46ef-bd80-037d926017cf"],
+
+Cell[BoxData["42"], "Print",
+ CellChangeTimes->{3.776443982326789*^9, 3.7767857269185553`*^9},
+ CellLabel->
+  "During evaluation of \
+In[38]:=",ExpressionUUID->"0a74d1db-0a55-41c7-a355-eca543eb70e7"],
+
+Cell[BoxData["43"], "Print",
+ CellChangeTimes->{3.776443982326789*^9, 3.776785741022086*^9},
+ CellLabel->
+  "During evaluation of \
+In[38]:=",ExpressionUUID->"e55077bb-d892-44dc-b006-f69eb07618f5"],
+
+Cell[BoxData["44"], "Print",
+ CellChangeTimes->{3.776443982326789*^9, 3.776785753210094*^9},
+ CellLabel->
+  "During evaluation of \
+In[38]:=",ExpressionUUID->"55c1e9be-56a5-4944-b983-985ca4b80876"],
+
+Cell[BoxData["45"], "Print",
+ CellChangeTimes->{3.776443982326789*^9, 3.776785766312956*^9},
+ CellLabel->
+  "During evaluation of \
+In[38]:=",ExpressionUUID->"17abba4e-1848-488c-bde6-35cdf05998d4"],
+
+Cell[BoxData["46"], "Print",
+ CellChangeTimes->{3.776443982326789*^9, 3.7767857790050087`*^9},
+ CellLabel->
+  "During evaluation of \
+In[38]:=",ExpressionUUID->"8842af6b-8a1e-48e1-98ef-18ca8f39a91d"],
+
+Cell[BoxData["47"], "Print",
+ CellChangeTimes->{3.776443982326789*^9, 3.776785791100809*^9},
+ CellLabel->
+  "During evaluation of \
+In[38]:=",ExpressionUUID->"c65f5711-d87e-4702-85dc-948bb2237f08"],
+
+Cell[BoxData["48"], "Print",
+ CellChangeTimes->{3.776443982326789*^9, 3.776785802631966*^9},
+ CellLabel->
+  "During evaluation of \
+In[38]:=",ExpressionUUID->"c6fbe64a-ceca-439e-8b29-9c26adf965ef"],
+
+Cell[BoxData["49"], "Print",
+ CellChangeTimes->{3.776443982326789*^9, 3.7767858142527943`*^9},
+ CellLabel->
+  "During evaluation of \
+In[38]:=",ExpressionUUID->"9fcc8d20-19ef-45d4-bc4b-aefbb0a6e431"],
+
+Cell[BoxData["50"], "Print",
+ CellChangeTimes->{3.776443982326789*^9, 3.776785826998526*^9},
+ CellLabel->
+  "During evaluation of \
+In[38]:=",ExpressionUUID->"3f30f015-4bfc-47f5-99d8-e3f68011c8c2"]
+}, Open  ]],
+
+Cell[BoxData[
+ RowBox[{"{", "Null", "}"}]], "Output",
+ CellChangeTimes->{3.776444120895063*^9, 3.776785840151104*^9},
+ CellLabel->"Out[38]=",ExpressionUUID->"6069c659-d902-4918-a553-fc39b0ec194b"]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"MakeRefineSeriesOf", "[", 
+  RowBox[{"51", ",", "60"}], "]"}]], "Input",
+ CellChangeTimes->{{3.776443586530539*^9, 3.776443592423757*^9}},
+ CellLabel->"In[39]:=",ExpressionUUID->"71acea69-b2b3-491d-ae15-f4df099b9b39"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["51"], "Print",
+ CellChangeTimes->{3.776443800474946*^9, 3.7767858419914427`*^9},
+ CellLabel->
+  "During evaluation of \
+In[39]:=",ExpressionUUID->"4145e9a2-b86f-444d-9e6f-514e102a7a17"],
+
+Cell[BoxData["52"], "Print",
+ CellChangeTimes->{3.776443800474946*^9, 3.776785854642742*^9},
+ CellLabel->
+  "During evaluation of \
+In[39]:=",ExpressionUUID->"0f110600-9945-4ce8-ada0-239cd91d8e03"],
+
+Cell[BoxData["53"], "Print",
+ CellChangeTimes->{3.776443800474946*^9, 3.7767858670519247`*^9},
+ CellLabel->
+  "During evaluation of \
+In[39]:=",ExpressionUUID->"f8453fc4-a721-4441-9016-2af31abf7022"],
+
+Cell[BoxData["54"], "Print",
+ CellChangeTimes->{3.776443800474946*^9, 3.77678587860671*^9},
+ CellLabel->
+  "During evaluation of \
+In[39]:=",ExpressionUUID->"e7b4daf0-0724-4551-8ded-34ecced4ec32"],
+
+Cell[BoxData["55"], "Print",
+ CellChangeTimes->{3.776443800474946*^9, 3.776785899077808*^9},
+ CellLabel->
+  "During evaluation of \
+In[39]:=",ExpressionUUID->"654cff30-d67b-463f-9d66-f38a5cbd6e2c"],
+
+Cell[BoxData["56"], "Print",
+ CellChangeTimes->{3.776443800474946*^9, 3.776785911675519*^9},
+ CellLabel->
+  "During evaluation of \
+In[39]:=",ExpressionUUID->"0398c397-cea0-48c6-adee-2da2335e66cb"],
+
+Cell[BoxData["57"], "Print",
+ CellChangeTimes->{3.776443800474946*^9, 3.776785970139532*^9},
+ CellLabel->
+  "During evaluation of \
+In[39]:=",ExpressionUUID->"0f95316d-23be-46b1-8fb4-6dfdb7e99fe2"],
+
+Cell[BoxData["58"], "Print",
+ CellChangeTimes->{3.776443800474946*^9, 3.7767860221105433`*^9},
+ CellLabel->
+  "During evaluation of \
+In[39]:=",ExpressionUUID->"0996f87d-8f52-4872-8581-efb748040ff9"],
+
+Cell[BoxData["59"], "Print",
+ CellChangeTimes->{3.776443800474946*^9, 3.776786035628929*^9},
+ CellLabel->
+  "During evaluation of \
+In[39]:=",ExpressionUUID->"6098c8b1-ad3d-4b8a-850a-4b9fb5e363cf"],
+
+Cell[BoxData["60"], "Print",
+ CellChangeTimes->{3.776443800474946*^9, 3.776786056778813*^9},
+ CellLabel->
+  "During evaluation of \
+In[39]:=",ExpressionUUID->"57383c2a-c8e3-461c-bd50-359a76498569"]
+}, Open  ]],
+
+Cell[BoxData[
+ RowBox[{"{", "Null", "}"}]], "Output",
+ CellChangeTimes->{3.776443976586389*^9, 3.776786068478281*^9},
+ CellLabel->"Out[39]=",ExpressionUUID->"abee5d57-ae1c-4b68-8896-520cd5335c43"]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"MakeRefineSeriesOf", "[", 
+  RowBox[{"61", ",", "70"}], "]"}]], "Input",
+ CellChangeTimes->{{3.776443895676042*^9, 3.7764439025510397`*^9}},
+ CellLabel->"In[40]:=",ExpressionUUID->"75b90654-1ac3-4894-8e5d-81d701b5e39a"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["61"], "Print",
+ CellChangeTimes->{3.776444121014134*^9, 3.776786068647437*^9},
+ CellLabel->
+  "During evaluation of \
+In[40]:=",ExpressionUUID->"eea3546e-d9ee-471e-845d-31f4851702d4"],
+
+Cell[BoxData["62"], "Print",
+ CellChangeTimes->{3.776444121014134*^9, 3.77678608583508*^9},
+ CellLabel->
+  "During evaluation of \
+In[40]:=",ExpressionUUID->"aedb175e-f30c-4a30-9760-18498d2f5ebb"],
+
+Cell[BoxData["63"], "Print",
+ CellChangeTimes->{3.776444121014134*^9, 3.776786106159192*^9},
+ CellLabel->
+  "During evaluation of \
+In[40]:=",ExpressionUUID->"9ef01fde-35d5-4cdb-8e20-06150be4917d"],
+
+Cell[BoxData["64"], "Print",
+ CellChangeTimes->{3.776444121014134*^9, 3.77678612326231*^9},
+ CellLabel->
+  "During evaluation of \
+In[40]:=",ExpressionUUID->"801f39b3-2897-4def-aace-35be798602f1"],
+
+Cell[BoxData["65"], "Print",
+ CellChangeTimes->{3.776444121014134*^9, 3.7767862008943367`*^9},
+ CellLabel->
+  "During evaluation of \
+In[40]:=",ExpressionUUID->"4524b0a4-c3cf-4eee-9bae-4a4411158765"],
+
+Cell[BoxData["66"], "Print",
+ CellChangeTimes->{3.776444121014134*^9, 3.7767862141571617`*^9},
+ CellLabel->
+  "During evaluation of \
+In[40]:=",ExpressionUUID->"9ad23010-af47-4eb5-80b1-72cc7a2f8eb2"],
+
+Cell[BoxData["67"], "Print",
+ CellChangeTimes->{3.776444121014134*^9, 3.77678622905718*^9},
+ CellLabel->
+  "During evaluation of \
+In[40]:=",ExpressionUUID->"9a39c0cc-b71d-4bfb-b47a-e3532770aa9b"],
+
+Cell[BoxData["68"], "Print",
+ CellChangeTimes->{3.776444121014134*^9, 3.7767862419295692`*^9},
+ CellLabel->
+  "During evaluation of \
+In[40]:=",ExpressionUUID->"e9a4811a-4dfc-4847-9ed8-9f5e7fb0a1bd"],
+
+Cell[BoxData["69"], "Print",
+ CellChangeTimes->{3.776444121014134*^9, 3.776786261757922*^9},
+ CellLabel->
+  "During evaluation of \
+In[40]:=",ExpressionUUID->"4a551457-b8aa-425f-b484-9ebe7095e485"],
+
+Cell[BoxData["70"], "Print",
+ CellChangeTimes->{3.776444121014134*^9, 3.77678627337957*^9},
+ CellLabel->
+  "During evaluation of \
+In[40]:=",ExpressionUUID->"ed43c117-5a2c-4198-9efb-7da7dd4d4034"]
+}, Open  ]],
+
+Cell[BoxData[
+ RowBox[{"{", "Null", "}"}]], "Output",
+ CellChangeTimes->{3.776444349736045*^9, 3.776786285140325*^9},
+ CellLabel->"Out[40]=",ExpressionUUID->"1a9dd832-cded-404a-9e8e-55603b4d7433"]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"MakeRefineSeriesOf", "[", 
+  RowBox[{"71", ",", "74"}], "]"}]], "Input",
+ CellChangeTimes->{{3.776443911251691*^9, 3.776443916249816*^9}, {
+  3.776689273159155*^9, 3.7766892742943563`*^9}},
+ CellLabel->"In[41]:=",ExpressionUUID->"f824d033-691a-4d1f-92f5-4ab01423a5ad"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["71"], "Print",
+ CellChangeTimes->{3.7767867569465714`*^9},
+ CellLabel->
+  "During evaluation of \
+In[41]:=",ExpressionUUID->"92d7c1bd-c362-4205-9f66-6a01b447a4eb"],
+
+Cell[BoxData["72"], "Print",
+ CellChangeTimes->{3.776786775814592*^9},
+ CellLabel->
+  "During evaluation of \
+In[41]:=",ExpressionUUID->"54df0102-003b-4884-bb53-111b767a4c0f"],
+
+Cell[BoxData["73"], "Print",
+ CellChangeTimes->{3.77678681709319*^9},
+ CellLabel->
+  "During evaluation of \
+In[41]:=",ExpressionUUID->"42fe5d37-9e86-4d1b-b9a2-35370152be1a"],
+
+Cell[BoxData["74"], "Print",
+ CellChangeTimes->{3.7767868301606617`*^9},
+ CellLabel->
+  "During evaluation of \
+In[41]:=",ExpressionUUID->"e05f68ba-59c9-4014-82ba-94955347b056"]
+}, Open  ]],
+
+Cell[BoxData[
+ RowBox[{"{", "Null", "}"}]], "Output",
+ CellChangeTimes->{3.776786842276802*^9},
+ CellLabel->"Out[41]=",ExpressionUUID->"52db8c9f-9b99-4b63-bfd9-226b29998173"]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"listPV", "[", 
+  RowBox[{"[", "75", "]"}], "]"}]], "Input",
+ CellChangeTimes->{{3.776787459822847*^9, 3.776787465570936*^9}},
+ CellLabel->"In[19]:=",ExpressionUUID->"e1619147-dbd8-4b95-92c0-a0a9e3d6e05f"],
+
+Cell[BoxData[
+ RowBox[{"PVD", "[", 
+  RowBox[{"0", ",", "0", ",", "0", ",", "1", ",", "0", ",", 
+   SuperscriptBox["MH", "2"], ",", "T24", ",", "0", ",", 
+   RowBox[{
+    RowBox[{"2", " ", 
+     SuperscriptBox["MH", "2"]}], "-", "S34", "-", "T", "-", "U"}], ",", 
+   RowBox[{
+    SuperscriptBox["MH", "2"], "-", "S", "-", "T", "-", "T14"}], ",", 
+   SqrtBox[
+    SuperscriptBox["MT", "2"]], ",", 
+   SqrtBox[
+    SuperscriptBox["MT", "2"]], ",", 
+   SqrtBox[
+    SuperscriptBox["MT", "2"]], ",", 
+   SqrtBox[
+    SuperscriptBox["MT", "2"]]}], "]"}]], "Output",
+ CellChangeTimes->{3.7767874660047407`*^9, 3.777039323951621*^9, 
+  3.77703936276413*^9},
+ CellLabel->"Out[19]=",ExpressionUUID->"6b31f62a-bb61-4325-bbb2-0f8b38f9d9b0"]
+}, Open  ]],
+
+Cell["75!!!", "Item",
+ CellChangeTimes->{{3.7766892897103367`*^9, 3.776689292589683*^9}, {
+  3.776771111675651*^9, 
+  3.7767711116789007`*^9}},ExpressionUUID->"b8f7dd32-654c-4d69-a388-\
+00e73e20b2c5"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{
+   RowBox[{
+    RowBox[{"Serieslist", "[", 
+     RowBox[{"[", "75", "]"}], "]"}], "=", 
+    RowBox[{"LoopRefineSeries", "[", 
+     RowBox[{
+      RowBox[{
+       RowBox[{"Serieslist", "[", 
+        RowBox[{"[", "75", "]"}], "]"}], "//", "C0Expand"}], ",", 
+      RowBox[{"{", 
+       RowBox[{"\[Beta]", ",", "0", ",", "2"}], "}"}]}], "]"}]}], ";"}], 
+  "\[IndentingNewLine]"}]], "Input",
+ CellChangeTimes->{{3.776771115782947*^9, 3.776771166696539*^9}, {
+   3.776774759564896*^9, 3.776774774035293*^9}, 3.777039366299951*^9},
+ CellLabel->"In[20]:=",ExpressionUUID->"6385e4e6-3aa6-4ca7-8de4-83d30633a5ae"],
+
+Cell[BoxData["$Aborted"], "Output",
+ CellChangeTimes->{3.7770488168803797`*^9},
+ CellLabel->"Out[20]=",ExpressionUUID->"20e798ff-b0ce-4e4d-8da1-a093ebf96720"]
+}, Open  ]],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"Export", "[", 
+   RowBox[{"\"\<SeriesPV.m\>\"", ",", "Serieslist"}], "]"}], ";"}]], "Input",E\
+xpressionUUID->"35538101-3df6-4320-82c6-fb90398dcf8b"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"MakeRefineSeriesOf", "[", 
+  RowBox[{"76", ",", "80"}], "]"}]], "Input",
+ CellChangeTimes->{{3.776689276561438*^9, 3.776689284488558*^9}},
+ CellLabel->"In[45]:=",ExpressionUUID->"c6f1e48f-f2b3-4633-a270-2d837481a3a1"],
+
+Cell[BoxData[
+ TemplateBox[{
+  "PowerMod","ninv",
+   "\"\\!\\(\\*RowBox[{\\\"0\\\"}]\\) is not invertible modulo \
+\\!\\(\\*RowBox[{\\\"12979\\\"}]\\).\"",2,45,18,17487480350447340170,
+   "Alternate Kernel"},
+  "MessageTemplate"]], "Message", "MSG",
+ CellChangeTimes->{3.776792950030538*^9},
+ CellLabel->
+  "During evaluation of \
+In[45]:=",ExpressionUUID->"da0ce5b5-a752-4f0c-81a9-b9f06d7ab115"],
+
+Cell[BoxData[
+ TemplateBox[{
+  "PowerMod","ninv",
+   "\"\\!\\(\\*RowBox[{\\\"0\\\"}]\\) is not invertible modulo \
+\\!\\(\\*RowBox[{\\\"12983\\\"}]\\).\"",2,45,19,17487480350447340170,
+   "Alternate Kernel"},
+  "MessageTemplate"]], "Message", "MSG",
+ CellChangeTimes->{3.7767940973463*^9},
+ CellLabel->
+  "During evaluation of \
+In[45]:=",ExpressionUUID->"be0f414f-c102-4bf4-9e35-0d311e65c76f"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["76"], "Print",
+ CellChangeTimes->{3.7768541523191643`*^9},
+ CellLabel->
+  "During evaluation of \
+In[45]:=",ExpressionUUID->"3bba7d8f-9b06-484f-b4d3-632f231afc37"],
+
+Cell[BoxData["77"], "Print",
+ CellChangeTimes->{3.7768541668859043`*^9},
+ CellLabel->
+  "During evaluation of \
+In[45]:=",ExpressionUUID->"f659f692-01ec-4858-acaa-d60f4b4998e6"],
+
+Cell[BoxData["78"], "Print",
+ CellChangeTimes->{3.776854212135365*^9},
+ CellLabel->
+  "During evaluation of \
+In[45]:=",ExpressionUUID->"e9e35560-6a98-4d85-ba46-29424be208af"],
+
+Cell[BoxData["79"], "Print",
+ CellChangeTimes->{3.7768542239248447`*^9},
+ CellLabel->
+  "During evaluation of \
+In[45]:=",ExpressionUUID->"5d1876d0-f98c-4bb2-9711-124711ea1dab"],
+
+Cell[BoxData["80"], "Print",
+ CellChangeTimes->{3.776854254612438*^9},
+ CellLabel->
+  "During evaluation of \
+In[45]:=",ExpressionUUID->"ae667c6d-6a3b-4b8a-9bf8-9c76aa4faf28"]
+}, Open  ]],
+
+Cell[BoxData[
+ RowBox[{"{", "Null", "}"}]], "Output",
+ CellChangeTimes->{3.776689267763878*^9, 3.776699593931198*^9, 
+  3.7767874206690207`*^9, 3.7768542661889467`*^9},
+ CellLabel->"Out[45]=",ExpressionUUID->"88acd967-1c2c-4b4e-b73d-ecbd06540448"]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"MakeRefineSeriesOf", "[", 
+  RowBox[{"81", ",", "90"}], "]"}]], "Input",
+ CellChangeTimes->{{3.776443917783449*^9, 3.776443919685523*^9}},
+ CellLabel->"In[46]:=",ExpressionUUID->"8d487f69-3cc5-4b15-a17c-36b0f0a098da"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["81"], "Print",
+ CellChangeTimes->{3.776700119904262*^9},
+ CellLabel->
+  "During evaluation of \
+In[41]:=",ExpressionUUID->"2846bb9c-a0e3-4cc6-9863-49dc879372fb"],
+
+Cell[BoxData["82"], "Print",
+ CellChangeTimes->{3.776700154471498*^9},
+ CellLabel->
+  "During evaluation of \
+In[41]:=",ExpressionUUID->"8e8e94ae-2685-46cf-824c-9dccd6aaa7c9"],
+
+Cell[BoxData["83"], "Print",
+ CellChangeTimes->{3.776700232105164*^9},
+ CellLabel->
+  "During evaluation of \
+In[41]:=",ExpressionUUID->"ea5a6e57-459b-44f3-af8d-e27fd9f73504"],
+
+Cell[BoxData["84"], "Print",
+ CellChangeTimes->{3.776700243872916*^9},
+ CellLabel->
+  "During evaluation of \
+In[41]:=",ExpressionUUID->"236d0628-1541-4ee1-8294-d993f0d4fc6b"],
+
+Cell[BoxData["85"], "Print",
+ CellChangeTimes->{3.776700255672224*^9},
+ CellLabel->
+  "During evaluation of \
+In[41]:=",ExpressionUUID->"41931755-f8dd-4016-8ec3-12f189f6c48b"],
+
+Cell[BoxData["86"], "Print",
+ CellChangeTimes->{3.7767002710240192`*^9},
+ CellLabel->
+  "During evaluation of \
+In[41]:=",ExpressionUUID->"87cc3efa-15c5-4aac-9f59-fc77c411956d"],
+
+Cell[BoxData["87"], "Print",
+ CellChangeTimes->{3.776700312653447*^9},
+ CellLabel->
+  "During evaluation of \
+In[41]:=",ExpressionUUID->"c28fc9bb-8175-41ae-b5b8-a2af110aa01e"],
+
+Cell[BoxData["88"], "Print",
+ CellChangeTimes->{3.776700325253311*^9},
+ CellLabel->
+  "During evaluation of \
+In[41]:=",ExpressionUUID->"c804e0fc-13b8-404c-be08-a7e750465f41"],
+
+Cell[BoxData["89"], "Print",
+ CellChangeTimes->{3.776700337712092*^9},
+ CellLabel->
+  "During evaluation of \
+In[41]:=",ExpressionUUID->"017215f5-e5a5-412a-95b0-02e856ef17cf"],
+
+Cell[BoxData["90"], "Print",
+ CellChangeTimes->{3.776700369863812*^9},
+ CellLabel->
+  "During evaluation of \
+In[41]:=",ExpressionUUID->"27abe593-5557-4139-b432-a9d130c93652"]
+}, Open  ]],
+
+Cell[BoxData[
+ RowBox[{"{", "Null", "}"}]], "Output",
+ CellChangeTimes->{3.776700381356884*^9},
+ CellLabel->"Out[41]=",ExpressionUUID->"27df6f47-5fa2-4e39-b7f2-afc3c720e098"]
+}, Closed]],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"91", "!!"}], "!"}]], "Input",
+ CellChangeTimes->{{3.776710137747867*^9, 
+  3.776710140512113*^9}},ExpressionUUID->"df98973f-1c7c-43bf-ada2-\
+bc8f065d9ee0"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"MakeRefineSeriesOf", "[", 
+  RowBox[{"92", ",", "93"}], "]"}]], "Input",
+ CellChangeTimes->{{3.776443921988063*^9, 3.776443924549123*^9}, {
+  3.776710129712762*^9, 3.776710129777527*^9}, {3.7767651224554663`*^9, 
+  3.776765122530267*^9}},ExpressionUUID->"2649d505-baee-414f-ba61-\
+a848c431375f"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["92"], "Print",
+ CellChangeTimes->{3.7767105057578077`*^9},
+ CellLabel->
+  "During evaluation of \
+In[16]:=",ExpressionUUID->"d990281d-da4e-44ce-bba0-3be9e51984c8"],
+
+Cell[BoxData["93"], "Print",
+ CellChangeTimes->{3.776710524276116*^9},
+ CellLabel->
+  "During evaluation of \
+In[16]:=",ExpressionUUID->"8e564ec2-2ba2-4af6-8839-241a48c4b011"]
+}, Open  ]]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"MakeRefineSeriesOf", "[", 
+  RowBox[{"94", ",", "96"}], "]"}]], "Input",
+ CellChangeTimes->{{3.776765131249621*^9, 3.77676513359492*^9}, {
+  3.776769027719905*^9, 
+  3.776769028143591*^9}},ExpressionUUID->"e440a8fa-6daf-4e52-952c-\
+f2a2da027d58"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["94"], "Print",
+ CellChangeTimes->{3.776765358159745*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"47e9eb29-eb3c-44eb-bde5-daa461e7965a"],
+
+Cell[BoxData["95"], "Print",
+ CellChangeTimes->{3.776766430832265*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"3c8d7c90-91f7-46fd-ac69-8701bacfe25a"],
+
+Cell[BoxData["96"], "Print",
+ CellChangeTimes->{3.776766650819006*^9},
+ CellLabel->
+  "During evaluation of \
+In[14]:=",ExpressionUUID->"44a1988b-44c7-4cc4-accc-daccc86bdfec"]
+}, Open  ]]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"MakeRefineSeriesOf", "[", 
+  RowBox[{"97", ",", "99"}], "]"}]], "Input",
+ CellChangeTimes->{{3.7767690384336767`*^9, 3.776769041527905*^9}, {
+  3.776769652566134*^9, 
+  3.776769652707741*^9}},ExpressionUUID->"ccd5003b-7be8-4452-a781-\
+58d0de738e3e"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["97"], "Print",
+ CellChangeTimes->{3.7767692848390903`*^9},
+ CellLabel->
+  "During evaluation of \
+In[20]:=",ExpressionUUID->"590c91e2-ef3c-4505-aa0b-95d55137b2bb"],
+
+Cell[BoxData["98"], "Print",
+ CellChangeTimes->{3.776769324118517*^9},
+ CellLabel->
+  "During evaluation of \
+In[20]:=",ExpressionUUID->"69d37e74-c56f-4a12-bc84-953b1ee45562"],
+
+Cell[BoxData["99"], "Print",
+ CellChangeTimes->{3.776769364155541*^9},
+ CellLabel->
+  "During evaluation of \
+In[20]:=",ExpressionUUID->"400a6676-c5b0-4df1-b6bb-83a59b331179"]
+}, Open  ]]
+}, Closed]],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"100", "!!"}], "!"}]], "Input",
+ CellChangeTimes->{{3.77676980141416*^9, 
+  3.776769804422761*^9}},ExpressionUUID->"07237824-5e81-41b0-bd1d-\
+7d744858c3ed"],
+
+Cell[BoxData[
+ RowBox[{"MakeRefineSeriesOf", "[", 
+  RowBox[{"100", ",", "100"}], "]"}]], "Input",
+ CellChangeTimes->{{3.7767696618153877`*^9, 3.776769664581789*^9}},
+ CellLabel->"In[14]:=",ExpressionUUID->"4d28e53c-4af5-40ba-890a-a6a9f9544d99"],
+
+Cell[BoxData[
+ RowBox[{"MakeRefineSeriesOf", "[", 
+  RowBox[{"101", ",", "110"}], "]"}]], "Input",
+ CellChangeTimes->{{3.776444442314954*^9, 3.7764444486258802`*^9}},
+ CellLabel->"In[14]:=",ExpressionUUID->"712b80aa-b8c4-4294-a783-8d276a083f12"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"MakeRefineSeriesOf", "[", 
+  RowBox[{"111", ",", "120"}], "]"}]], "Input",
+ CellChangeTimes->{{3.776444452743092*^9, 3.7764444558555803`*^9}},
+ CellLabel->"In[18]:=",ExpressionUUID->"0121b0f2-33a2-4f93-abd0-b7335f00f4ba"],
+
+Cell[BoxData[
+ TemplateBox[{
+  "Part","partd",
+   "\"Part specification \\!\\(\\*RowBox[{\\\"Null\\\", \\\"\
+\[LeftDoubleBracket]\\\", \\\"111\\\", \\\"\[RightDoubleBracket]\\\"}]\\) is \
+longer than depth of object.\"",2,18,9,17487480350447340170,
+   "Alternate Kernel"},
+  "MessageTemplate"]], "Message", "MSG",
+ CellChangeTimes->{{3.776784888098915*^9, 3.7767849123546*^9}},
+ CellLabel->
+  "During evaluation of \
+In[18]:=",ExpressionUUID->"535114a6-b030-4308-8246-00c024410468"],
+
+Cell[BoxData[
+ TemplateBox[{
+  "Set","partd",
+   "\"Part specification \\!\\(\\*RowBox[{\\\"Serieslist\\\", \\\"\
+\[LeftDoubleBracket]\\\", \\\"n\\\", \\\"\[RightDoubleBracket]\\\"}]\\) is \
+longer than depth of object.\"",2,18,10,17487480350447340170,
+   "Alternate Kernel"},
+  "MessageTemplate"]], "Message", "MSG",
+ CellChangeTimes->{{3.776784888098915*^9, 3.776784912383677*^9}},
+ CellLabel->
+  "During evaluation of \
+In[18]:=",ExpressionUUID->"3fff711e-1dcc-463e-a740-414e01e7545b"],
+
+Cell[BoxData["111"], "Print",
+ CellChangeTimes->{{3.776784888135707*^9, 3.776784912404812*^9}},
+ CellLabel->
+  "During evaluation of \
+In[18]:=",ExpressionUUID->"02b1fe8c-97b1-4f62-af5e-560a0f061657"],
+
+Cell[BoxData[
+ TemplateBox[{
+  "Part","partd",
+   "\"Part specification \\!\\(\\*RowBox[{\\\"Null\\\", \\\"\
+\[LeftDoubleBracket]\\\", \\\"112\\\", \\\"\[RightDoubleBracket]\\\"}]\\) is \
+longer than depth of object.\"",2,18,11,17487480350447340170,
+   "Alternate Kernel"},
+  "MessageTemplate"]], "Message", "MSG",
+ CellChangeTimes->{{3.776784888098915*^9, 3.776784912411974*^9}},
+ CellLabel->
+  "During evaluation of \
+In[18]:=",ExpressionUUID->"4d229124-7f85-4bce-9345-8223a1b56caa"],
+
+Cell[BoxData[
+ TemplateBox[{
+  "Set","partd",
+   "\"Part specification \\!\\(\\*RowBox[{\\\"Serieslist\\\", \\\"\
+\[LeftDoubleBracket]\\\", \\\"n\\\", \\\"\[RightDoubleBracket]\\\"}]\\) is \
+longer than depth of object.\"",2,18,12,17487480350447340170,
+   "Alternate Kernel"},
+  "MessageTemplate"]], "Message", "MSG",
+ CellChangeTimes->{{3.776784888098915*^9, 3.776784912433069*^9}},
+ CellLabel->
+  "During evaluation of \
+In[18]:=",ExpressionUUID->"9b026f9b-c1da-4642-96e1-ffec3e99e1ad"],
+
+Cell[BoxData["112"], "Print",
+ CellChangeTimes->{{3.776784888135707*^9, 3.776784912454528*^9}},
+ CellLabel->
+  "During evaluation of \
+In[18]:=",ExpressionUUID->"ee45a9cb-8f55-46b4-86d8-aa90b6d7b196"],
+
+Cell[BoxData[
+ TemplateBox[{
+  "Part","partd",
+   "\"Part specification \\!\\(\\*RowBox[{\\\"Null\\\", \\\"\
+\[LeftDoubleBracket]\\\", \\\"113\\\", \\\"\[RightDoubleBracket]\\\"}]\\) is \
+longer than depth of object.\"",2,18,13,17487480350447340170,
+   "Alternate Kernel"},
+  "MessageTemplate"]], "Message", "MSG",
+ CellChangeTimes->{{3.776784888098915*^9, 3.7767849124617*^9}},
+ CellLabel->
+  "During evaluation of \
+In[18]:=",ExpressionUUID->"3f134fed-054a-4e7f-bf83-da4ec88b63a5"],
+
+Cell[BoxData[
+ TemplateBox[{
+  "General","stop",
+   "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"Part\\\", \\\"::\\\", \
+\\\"partd\\\"}], \\\"MessageName\\\"]\\) will be suppressed during this \
+calculation.\"",2,18,14,17487480350447340170,"Alternate Kernel"},
+  "MessageTemplate"]], "Message", "MSG",
+ CellChangeTimes->{{3.776784888098915*^9, 3.776784912483165*^9}},
+ CellLabel->
+  "During evaluation of \
+In[18]:=",ExpressionUUID->"deb651cd-9750-4f33-8892-dc4873ea19f8"],
+
+Cell[BoxData[
+ TemplateBox[{
+  "Set","partd",
+   "\"Part specification \\!\\(\\*RowBox[{\\\"Serieslist\\\", \\\"\
+\[LeftDoubleBracket]\\\", \\\"n\\\", \\\"\[RightDoubleBracket]\\\"}]\\) is \
+longer than depth of object.\"",2,18,15,17487480350447340170,
+   "Alternate Kernel"},
+  "MessageTemplate"]], "Message", "MSG",
+ CellChangeTimes->{{3.776784888098915*^9, 3.7767849125091677`*^9}},
+ CellLabel->
+  "During evaluation of \
+In[18]:=",ExpressionUUID->"5597723e-0b2d-4d43-b93e-f96034ffcb06"],
+
+Cell[BoxData[
+ TemplateBox[{
+  "General","stop",
+   "\"Further output of \\!\\(\\*StyleBox[RowBox[{\\\"Set\\\", \\\"::\\\", \\\
+\"partd\\\"}], \\\"MessageName\\\"]\\) will be suppressed during this \
+calculation.\"",2,18,16,17487480350447340170,"Alternate Kernel"},
+  "MessageTemplate"]], "Message", "MSG",
+ CellChangeTimes->{{3.776784888098915*^9, 3.77678491253011*^9}},
+ CellLabel->
+  "During evaluation of \
+In[18]:=",ExpressionUUID->"8ef06157-c74b-48e8-9c7f-327d7302c28c"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData["113"], "Print",
+ CellChangeTimes->{{3.776784888135707*^9, 3.776784912553726*^9}},
+ CellLabel->
+  "During evaluation of \
+In[18]:=",ExpressionUUID->"6d010356-450e-479a-ba67-eeb3e26ec291"],
+
+Cell[BoxData["114"], "Print",
+ CellChangeTimes->{{3.776784888135707*^9, 3.7767849125613317`*^9}},
+ CellLabel->
+  "During evaluation of \
+In[18]:=",ExpressionUUID->"3f15cc52-1ff6-45cb-a9fd-644d776c5f89"],
+
+Cell[BoxData["115"], "Print",
+ CellChangeTimes->{{3.776784888135707*^9, 3.776784912578126*^9}},
+ CellLabel->
+  "During evaluation of \
+In[18]:=",ExpressionUUID->"4feea194-42f6-4ca1-9312-62f92ec665a5"],
+
+Cell[BoxData["116"], "Print",
+ CellChangeTimes->{{3.776784888135707*^9, 3.7767849125886307`*^9}},
+ CellLabel->
+  "During evaluation of \
+In[18]:=",ExpressionUUID->"6258c9d5-91a7-48d5-8231-34e495c40fa5"],
+
+Cell[BoxData["117"], "Print",
+ CellChangeTimes->{{3.776784888135707*^9, 3.776784912599008*^9}},
+ CellLabel->
+  "During evaluation of \
+In[18]:=",ExpressionUUID->"ffc76446-691d-4b15-befd-5803a78522c1"],
+
+Cell[BoxData["118"], "Print",
+ CellChangeTimes->{{3.776784888135707*^9, 3.776784912609436*^9}},
+ CellLabel->
+  "During evaluation of \
+In[18]:=",ExpressionUUID->"0837e534-d7bb-47f7-aed6-303356623331"],
+
+Cell[BoxData["119"], "Print",
+ CellChangeTimes->{{3.776784888135707*^9, 3.7767849126170053`*^9}},
+ CellLabel->
+  "During evaluation of \
+In[18]:=",ExpressionUUID->"f10d2730-aa78-4b6e-80cd-badb4c9a088b"],
+
+Cell[BoxData["120"], "Print",
+ CellChangeTimes->{{3.776784888135707*^9, 3.776784912624434*^9}},
+ CellLabel->
+  "During evaluation of \
+In[18]:=",ExpressionUUID->"38a8da08-2436-4aa2-9ed3-acd6b62059aa"]
+}, Open  ]],
+
+Cell[BoxData[
+ RowBox[{"{", "Null", "}"}]], "Output",
+ CellChangeTimes->{{3.776784888384467*^9, 3.776784912631989*^9}},
+ CellLabel->"Out[18]=",ExpressionUUID->"3bacc01c-d443-45cd-8552-6920b7d54570"]
+}, Closed]],
+
+Cell[BoxData[
+ RowBox[{"MakeRefineSeriesOf", "[", 
+  RowBox[{"121", ",", "130"}], "]"}]], "Input",
+ CellChangeTimes->{{3.776444458244686*^9, 
+  3.776444461374363*^9}},ExpressionUUID->"0a825a05-32b2-4319-8639-\
+70ebb7dae721"],
+
+Cell[BoxData[
+ RowBox[{"MakeRefineSeriesOf", "[", 
+  RowBox[{"131", ",", "140"}], "]"}]], "Input",
+ CellChangeTimes->{{3.7764444638773613`*^9, 
+  3.776444468707367*^9}},ExpressionUUID->"e4a86cf3-8ee8-4a68-8635-\
+217b0ba4a640"],
+
+Cell[BoxData[
+ RowBox[{"MakeRefineSeriesOf", "[", 
+  RowBox[{"141", ",", "150"}], "]"}]], "Input",
+ CellChangeTimes->{{3.77644446538631*^9, 
+  3.776444471430943*^9}},ExpressionUUID->"4e14b37b-639b-46ea-b50a-\
+b14416358740"],
+
+Cell[BoxData[
+ RowBox[{"MakeRefineSeriesOf", "[", 
+  RowBox[{"151", ",", "160"}], "]"}]], "Input",
+ CellChangeTimes->{{3.7764444787943296`*^9, 
+  3.776444482084239*^9}},ExpressionUUID->"bf2275c2-8d1c-4d02-b7e4-\
+41137641140c"],
+
+Cell[BoxData[
+ RowBox[{"MakeRefineSeriesOf", "[", 
+  RowBox[{"161", ",", "170"}], "]"}]], "Input",
+ CellChangeTimes->{{3.776444494542491*^9, 
+  3.776444507655608*^9}},ExpressionUUID->"6e0c2be4-ee3a-45fa-b831-\
+83a1095ac1be"],
+
+Cell[BoxData[
+ RowBox[{"MakeRefineSeriesOf", "[", 
+  RowBox[{"171", ",", "180"}], "]"}]], "Input",
+ CellChangeTimes->{{3.776444496397092*^9, 
+  3.776444509668532*^9}},ExpressionUUID->"9186e914-9912-4033-a987-\
+f84144195af6"],
+
+Cell[BoxData[
+ RowBox[{"MakeRefineSeriesOf", "[", 
+  RowBox[{"181", ",", "190"}], "]"}]], "Input",
+ CellChangeTimes->{{3.776444498515769*^9, 
+  3.776444511347576*^9}},ExpressionUUID->"f6a2e77b-0b25-4468-8b4c-\
+79e5f414742d"],
+
+Cell[BoxData[
+ RowBox[{"MakeRefineSeriesOf", "[", 
+  RowBox[{"191", ",", "200"}], "]"}]], "Input",
+ CellChangeTimes->{{3.7764445005724*^9, 
+  3.776444513235516*^9}},ExpressionUUID->"a3b27975-8859-466d-a7c0-\
+b105c7fe73d9"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(*", 
+   RowBox[{"--", 
+    RowBox[{"--", 
+     RowBox[{"--", 
+      RowBox[{"--", 
+       RowBox[{"--", 
+        RowBox[{"--", 
+         RowBox[{"--", 
+          RowBox[{"--", 
+           RowBox[{"--", 
+            RowBox[{"--", 
+             RowBox[{"--", 
+              RowBox[{"--", 
+               RowBox[{"--", 
+                RowBox[{"--", 
+                 RowBox[{"--", 
+                  RowBox[{"--", 
+                   RowBox[{"--", 
+                    RowBox[{"--", 
+                    RowBox[{"--", 
+                    RowBox[{"--", 
+                    RowBox[{"--", 
+                    RowBox[{"--", 
+                    RowBox[{"--", 
+                    RowBox[{"--", 
+                    RowBox[{"--", 
+                    RowBox[{"--", 
+                    RowBox[{"--", 
+                    RowBox[{"--", 
+                    RowBox[{"--", 
+                    RowBox[{"--", 
+                    RowBox[{"--", 
+                    RowBox[{
+                    "--", "-"}]}]}]}]}]}]}]}]}]}]}]}]}]}]}]}]}]}]}]}]}]}]}]}]}\
+]}]}]}]}]}]}]}], "*)"}], "\[IndentingNewLine]", "\[IndentingNewLine]", 
+  "\[IndentingNewLine]"}]], "Input",
+ CellChangeTimes->{{3.778422435234481*^9, 
+  3.7784224443536377`*^9}},ExpressionUUID->"25926e05-bb3c-422b-8e2b-\
+9a57e964ba2b"],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"\[IndentingNewLine]", "\[IndentingNewLine]", 
+  RowBox[{"(*", " ", 
+   RowBox[{
+   "Testing", " ", "best", " ", "way", " ", "to", " ", "do", " ", "a", " ", 
+    "velocity", " ", "expansion"}], " ", "*)"}], "\[IndentingNewLine]", 
+  RowBox[{"PV1", "=", 
+   RowBox[{"listPV", "[", 
+    RowBox[{"[", "1", "]"}], "]"}]}]}]], "Input",
+ CellChangeTimes->{{3.7760942680435867`*^9, 3.776094278882065*^9}, {
+  3.776094338531843*^9, 3.776094352527562*^9}},
+ CellLabel->
+  "In[117]:=",ExpressionUUID->"a36cae1e-df45-49d4-a412-416ac62654e5"],
+
+Cell[BoxData[
+ RowBox[{"PVC", "[", 
+  RowBox[{"0", ",", "0", ",", "0", ",", "0", ",", 
+   RowBox[{
+    SuperscriptBox["MH", "2"], "-", "S", "-", "T24", "-", "U"}], ",", "T", 
+   ",", 
+   SqrtBox[
+    SuperscriptBox["MT", "2"]], ",", 
+   SqrtBox[
+    SuperscriptBox["MT", "2"]], ",", 
+   SqrtBox[
+    SuperscriptBox["MT", "2"]]}], "]"}]], "Output",
+ CellChangeTimes->{{3.776094343698943*^9, 3.7760943624781322`*^9}},
+ CellLabel->
+  "Out[117]=",ExpressionUUID->"a396975e-2717-4a82-90d1-7c091fb198e9"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"PV2", "=", 
+  RowBox[{"LRSlist", "[", 
+   RowBox[{"[", "1", "]"}], "]"}]}]], "Input",
+ CellChangeTimes->{{3.776094367741146*^9, 3.776094368596299*^9}},
+ CellLabel->
+  "In[119]:=",ExpressionUUID->"9b7c4721-c242-428f-936b-c73b023c8d5b"],
+
+Cell[BoxData[
+ RowBox[{"PVC", "[", 
+  RowBox[{"0", ",", "0", ",", "0", ",", "0", ",", 
+   RowBox[{
+    SuperscriptBox["MH", "2"], "-", "T24", "-", "U", "-", 
+    FractionBox[
+     RowBox[{"4", " ", 
+      SuperscriptBox["MT", "2"]}], 
+     RowBox[{"1", "-", 
+      SuperscriptBox["\[Beta]", "2"]}]]}], ",", "T", ",", 
+   SqrtBox[
+    SuperscriptBox["MT", "2"]], ",", 
+   SqrtBox[
+    SuperscriptBox["MT", "2"]], ",", 
+   SqrtBox[
+    SuperscriptBox["MT", "2"]]}], "]"}]], "Output",
+ CellChangeTimes->{{3.7760943646124887`*^9, 3.776094368962675*^9}},
+ CellLabel->
+  "Out[119]=",ExpressionUUID->"234fb216-0308-486e-aa4f-ee9ceb3aa02b"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{"LRPV1", "=", 
+  RowBox[{"LRlist", "[", 
+   RowBox[{"[", "1", "]"}], "]"}]}]], "Input",
+ CellChangeTimes->{{3.7760945284004583`*^9, 3.776094540625855*^9}},
+ CellLabel->
+  "In[123]:=",ExpressionUUID->"38f9a86e-2833-456d-aa7a-12baa82bf6d4"],
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"-", 
+   FractionBox[
+    SuperscriptBox[
+     RowBox[{"Log", "[", 
+      FractionBox[
+       RowBox[{
+        RowBox[{"2", " ", 
+         SuperscriptBox["MT", "2"]}], "-", "T", "+", 
+        SqrtBox[
+         RowBox[{
+          RowBox[{"-", 
+           RowBox[{"(", 
+            RowBox[{
+             RowBox[{"4", " ", 
+              SuperscriptBox["MT", "2"]}], "-", "T"}], ")"}]}], " ", "T"}]]}], 
+       RowBox[{"2", " ", 
+        SuperscriptBox["MT", "2"]}]], "]"}], "2"], 
+    RowBox[{"2", " ", 
+     RowBox[{"(", 
+      RowBox[{
+       SuperscriptBox["MH", "2"], "-", "S", "-", "T", "-", "T24", "-", "U"}], 
+      ")"}]}]]}], "+", 
+  FractionBox[
+   SuperscriptBox[
+    RowBox[{"Log", "[", 
+     FractionBox[
+      RowBox[{
+       RowBox[{"-", 
+        SuperscriptBox["MH", "2"]}], "+", 
+       RowBox[{"2", " ", 
+        SuperscriptBox["MT", "2"]}], "+", "S", "+", "T24", "+", "U", "+", 
+       SqrtBox[
+        RowBox[{
+         RowBox[{"-", 
+          RowBox[{"(", 
+           RowBox[{
+            SuperscriptBox["MH", "2"], "-", "S", "-", "T24", "-", "U"}], 
+           ")"}]}], " ", 
+         RowBox[{"(", 
+          RowBox[{
+           RowBox[{"-", 
+            SuperscriptBox["MH", "2"]}], "+", 
+           RowBox[{"4", " ", 
+            SuperscriptBox["MT", "2"]}], "+", "S", "+", "T24", "+", "U"}], 
+          ")"}]}]]}], 
+      RowBox[{"2", " ", 
+       SuperscriptBox["MT", "2"]}]], "]"}], "2"], 
+   RowBox[{"2", " ", 
+    RowBox[{"(", 
+     RowBox[{
+      SuperscriptBox["MH", "2"], "-", "S", "-", "T", "-", "T24", "-", "U"}], 
+     ")"}]}]]}]], "Output",
+ CellChangeTimes->{{3.776094534901574*^9, 3.776094541151403*^9}},
+ CellLabel->
+  "Out[123]=",ExpressionUUID->"1c05b19f-f3b9-494a-b37f-364f77e0b0b1"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(*", " ", 
+   RowBox[{"Case", " ", "1"}], " ", "*)"}], "\[IndentingNewLine]", 
+  RowBox[{"(*", " ", 
+   RowBox[{
+    RowBox[{
+    "Use", " ", "our", " ", "already", " ", "expanded", " ", "PV", " ", 
+     "coefficient"}], ",", " ", 
+    RowBox[{
+     RowBox[{"sub", " ", "S"}], "\[Rule]", 
+     RowBox[{"4", "*", 
+      RowBox[{
+       RowBox[{"MT", "^", "2"}], "/", 
+       RowBox[{"(", 
+        RowBox[{"1", "-", 
+         RowBox[{"\[Beta]", "^", "2"}]}], ")"}]}]}]}], ",", " ", 
+    RowBox[{"use", " ", "LoopRefineSeries"}]}], "*)"}], "\[IndentingNewLine]", 
+  RowBox[{
+   RowBox[{
+    RowBox[{"mLRPV1", "=", 
+     RowBox[{"LRPV1", "//.", "VelSub"}]}], ";"}], "\[IndentingNewLine]", 
+   RowBox[{"mLRPV1LoopSeries", "=", 
+    RowBox[{
+     RowBox[{"LoopRefineSeries", "[", 
+      RowBox[{"mLRPV1", ",", 
+       RowBox[{"{", 
+        RowBox[{"\[Beta]", ",", "0", ",", "2"}], "}"}]}], "]"}], "//", 
+     "Simplify"}]}]}]}]], "Input",
+ CellChangeTimes->{{3.7760942132860537`*^9, 3.7760942177198477`*^9}, {
+  3.776094285750037*^9, 3.776094337363894*^9}, {3.77609437704847*^9, 
+  3.776094389854731*^9}, {3.776094549422592*^9, 3.7760946761359653`*^9}, {
+  3.7760947685302134`*^9, 3.77609476909201*^9}},
+ CellLabel->
+  "In[135]:=",ExpressionUUID->"b2c199ef-3321-44d3-a08a-1b1de3e1b269"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{
+   RowBox[{"-", 
+    FractionBox[
+     RowBox[{
+      RowBox[{"-", 
+       SuperscriptBox[
+        RowBox[{"Log", "[", 
+         FractionBox[
+          RowBox[{
+           RowBox[{"2", " ", 
+            SuperscriptBox["MT", "2"]}], "-", "T", "+", 
+           SqrtBox[
+            RowBox[{"T", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"-", "4"}], " ", 
+                SuperscriptBox["MT", "2"]}], "+", "T"}], ")"}]}]]}], 
+          RowBox[{"2", " ", 
+           SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+      SuperscriptBox[
+       RowBox[{"Log", "[", 
+        FractionBox[
+         RowBox[{
+          RowBox[{"-", 
+           SuperscriptBox["MH", "2"]}], "+", 
+          RowBox[{"6", " ", 
+           SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U", "+", 
+          SqrtBox[
+           RowBox[{
+            SuperscriptBox["MH", "4"], "+", 
+            RowBox[{"32", " ", 
+             SuperscriptBox["MT", "4"]}], "+", 
+            RowBox[{"12", " ", 
+             SuperscriptBox["MT", "2"], " ", 
+             RowBox[{"(", 
+              RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+            SuperscriptBox[
+             RowBox[{"(", 
+              RowBox[{"T24", "+", "U"}], ")"}], "2"], "-", 
+            RowBox[{"2", " ", 
+             SuperscriptBox["MH", "2"], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"6", " ", 
+                SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U"}], 
+              ")"}]}]}]]}], 
+         RowBox[{"2", " ", 
+          SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], 
+     RowBox[{"2", " ", 
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"-", 
+         SuperscriptBox["MH", "2"]}], "+", 
+        RowBox[{"4", " ", 
+         SuperscriptBox["MT", "2"]}], "+", "T", "+", "T24", "+", "U"}], 
+       ")"}]}]]}], "+", 
+   RowBox[{
+    FractionBox["1", 
+     SuperscriptBox[
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"-", 
+         SuperscriptBox["MH", "2"]}], "+", 
+        RowBox[{"4", " ", 
+         SuperscriptBox["MT", "2"]}], "+", "T", "+", "T24", "+", "U"}], ")"}],
+       "2"]], 
+    RowBox[{"2", " ", 
+     SuperscriptBox["MT", "2"], " ", 
+     RowBox[{"(", 
+      RowBox[{
+       RowBox[{"-", 
+        SuperscriptBox[
+         RowBox[{"Log", "[", 
+          FractionBox[
+           RowBox[{
+            RowBox[{"2", " ", 
+             SuperscriptBox["MT", "2"]}], "-", "T", "+", 
+            SqrtBox[
+             RowBox[{"T", " ", 
+              RowBox[{"(", 
+               RowBox[{
+                RowBox[{
+                 RowBox[{"-", "4"}], " ", 
+                 SuperscriptBox["MT", "2"]}], "+", "T"}], ")"}]}]]}], 
+           RowBox[{"2", " ", 
+            SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "-", 
+       FractionBox[
+        RowBox[{"2", " ", 
+         RowBox[{"(", 
+          RowBox[{
+           RowBox[{"-", 
+            SuperscriptBox["MH", "2"]}], "+", 
+           RowBox[{"4", " ", 
+            SuperscriptBox["MT", "2"]}], "+", "T", "+", "T24", "+", "U"}], 
+          ")"}], " ", 
+         RowBox[{"Log", "[", 
+          FractionBox[
+           RowBox[{
+            RowBox[{"-", 
+             SuperscriptBox["MH", "2"]}], "+", 
+            RowBox[{"6", " ", 
+             SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U", "+", 
+            SqrtBox[
+             RowBox[{
+              SuperscriptBox["MH", "4"], "+", 
+              RowBox[{"32", " ", 
+               SuperscriptBox["MT", "4"]}], "+", 
+              RowBox[{"12", " ", 
+               SuperscriptBox["MT", "2"], " ", 
+               RowBox[{"(", 
+                RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+              SuperscriptBox[
+               RowBox[{"(", 
+                RowBox[{"T24", "+", "U"}], ")"}], "2"], "-", 
+              RowBox[{"2", " ", 
+               SuperscriptBox["MH", "2"], " ", 
+               RowBox[{"(", 
+                RowBox[{
+                 RowBox[{"6", " ", 
+                  SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U"}], 
+                ")"}]}]}]]}], 
+           RowBox[{"2", " ", 
+            SuperscriptBox["MT", "2"]}]], "]"}]}], 
+        SqrtBox[
+         RowBox[{
+          SuperscriptBox["MH", "4"], "+", 
+          RowBox[{"32", " ", 
+           SuperscriptBox["MT", "4"]}], "+", 
+          RowBox[{"12", " ", 
+           SuperscriptBox["MT", "2"], " ", 
+           RowBox[{"(", 
+            RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+          SuperscriptBox[
+           RowBox[{"(", 
+            RowBox[{"T24", "+", "U"}], ")"}], "2"], "-", 
+          RowBox[{"2", " ", 
+           SuperscriptBox["MH", "2"], " ", 
+           RowBox[{"(", 
+            RowBox[{
+             RowBox[{"6", " ", 
+              SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U"}], 
+            ")"}]}]}]]], "+", 
+       SuperscriptBox[
+        RowBox[{"Log", "[", 
+         FractionBox[
+          RowBox[{
+           RowBox[{"-", 
+            SuperscriptBox["MH", "2"]}], "+", 
+           RowBox[{"6", " ", 
+            SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U", "+", 
+           SqrtBox[
+            RowBox[{
+             SuperscriptBox["MH", "4"], "+", 
+             RowBox[{"32", " ", 
+              SuperscriptBox["MT", "4"]}], "+", 
+             RowBox[{"12", " ", 
+              SuperscriptBox["MT", "2"], " ", 
+              RowBox[{"(", 
+               RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+             SuperscriptBox[
+              RowBox[{"(", 
+               RowBox[{"T24", "+", "U"}], ")"}], "2"], "-", 
+             RowBox[{"2", " ", 
+              SuperscriptBox["MH", "2"], " ", 
+              RowBox[{"(", 
+               RowBox[{
+                RowBox[{"6", " ", 
+                 SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U"}], 
+               ")"}]}]}]]}], 
+          RowBox[{"2", " ", 
+           SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], ")"}], " ", 
+     SuperscriptBox["\[Beta]", "2"]}]}], "+", 
+   InterpretationBox[
+    SuperscriptBox[
+     RowBox[{"O", "[", "\[Beta]", "]"}], "3"],
+    SeriesData[$CellContext`\[Beta], 0, {}, 0, 3, 1],
+    Editable->False]}],
+  SeriesData[$CellContext`\[Beta], 0, {
+   Rational[-1, 2] (-$CellContext`MH^2 + 
+      4 $CellContext`MT^2 + $CellContext`T + $CellContext`T24 + \
+$CellContext`U)^(-1) (-
+      Log[Rational[1, 2] $CellContext`MT^(-2) (
+          2 $CellContext`MT^2 - $CellContext`T + ($CellContext`T ((-4) \
+$CellContext`MT^2 + $CellContext`T))^Rational[1, 2])]^2 + 
+     Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+         6 $CellContext`MT^2 + $CellContext`T24 + $CellContext`U + \
+($CellContext`MH^4 + 32 $CellContext`MT^4 + 
+           12 $CellContext`MT^2 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2 - 
+           2 $CellContext`MH^2 (
+            6 $CellContext`MT^2 + $CellContext`T24 + $CellContext`U))^
+          Rational[1, 2])]^2), 0, 
+    2 $CellContext`MT^2 (-$CellContext`MH^2 + 
+      4 $CellContext`MT^2 + $CellContext`T + $CellContext`T24 + \
+$CellContext`U)^(-2) (-
+      Log[Rational[1, 2] $CellContext`MT^(-2) (
+          2 $CellContext`MT^2 - $CellContext`T + ($CellContext`T ((-4) \
+$CellContext`MT^2 + $CellContext`T))^Rational[1, 2])]^2 - 
+     2 (-$CellContext`MH^2 + 
+      4 $CellContext`MT^2 + $CellContext`T + $CellContext`T24 + \
+$CellContext`U) ($CellContext`MH^4 + 32 $CellContext`MT^4 + 
+       12 $CellContext`MT^2 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2 - 
+       2 $CellContext`MH^2 (
+        6 $CellContext`MT^2 + $CellContext`T24 + $CellContext`U))^
+      Rational[-1, 2] 
+     Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+        6 $CellContext`MT^2 + $CellContext`T24 + $CellContext`U + \
+($CellContext`MH^4 + 32 $CellContext`MT^4 + 
+          12 $CellContext`MT^2 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2 - 
+          2 $CellContext`MH^2 (
+           6 $CellContext`MT^2 + $CellContext`T24 + $CellContext`U))^
+         Rational[1, 2])] + 
+     Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+         6 $CellContext`MT^2 + $CellContext`T24 + $CellContext`U + \
+($CellContext`MH^4 + 32 $CellContext`MT^4 + 
+           12 $CellContext`MT^2 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2 - 
+           2 $CellContext`MH^2 (
+            6 $CellContext`MT^2 + $CellContext`T24 + $CellContext`U))^
+          Rational[1, 2])]^2)}, 0, 3, 1],
+  Editable->False]], "Output",
+ CellChangeTimes->{{3.776094672071906*^9, 3.7760946764443398`*^9}, 
+   3.776094771951503*^9},
+ CellLabel->
+  "Out[136]=",ExpressionUUID->"f04f6eb6-3a6c-42bd-b978-23a251c30109"]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(*", " ", 
+   RowBox[{"Case", " ", "2"}], " ", "*)"}], "\[IndentingNewLine]", 
+  RowBox[{"(*", 
+   RowBox[{
+    RowBox[{" ", 
+     RowBox[{
+      RowBox[{
+      "Use", " ", "our", " ", "already", " ", "expanded", " ", "PV", " ", 
+       "coefficient"}], ",", " ", 
+      RowBox[{
+       RowBox[{"sub", " ", "S"}], "\[Rule]", 
+       RowBox[{"4", "*", 
+        RowBox[{
+         RowBox[{"MT", "^", "2"}], "/", 
+         RowBox[{"(", 
+          RowBox[{"1", "-", 
+           RowBox[{"\[Beta]", "^", "2"}]}], ")"}]}]}]}]}], ")"}], ",", " ", 
+    RowBox[{"use", " ", "Series"}]}], " ", "*)"}], "\[IndentingNewLine]", 
+  RowBox[{"mLRPV1Series", "=", 
+   RowBox[{
+    RowBox[{"Series", "[", 
+     RowBox[{"mLRPV1", ",", 
+      RowBox[{"{", 
+       RowBox[{"\[Beta]", ",", "0", ",", "2"}], "}"}]}], "]"}], "//", 
+    "Simplify"}]}]}]], "Input",
+ CellChangeTimes->{{3.776094683105962*^9, 3.776094777128416*^9}},
+ CellLabel->
+  "In[137]:=",ExpressionUUID->"a7e9b28f-cd05-4629-a301-685337db32b1"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{
+   RowBox[{"-", 
+    FractionBox[
+     RowBox[{
+      RowBox[{"-", 
+       SuperscriptBox[
+        RowBox[{"Log", "[", 
+         FractionBox[
+          RowBox[{
+           RowBox[{"2", " ", 
+            SuperscriptBox["MT", "2"]}], "-", "T", "+", 
+           SqrtBox[
+            RowBox[{"T", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"-", "4"}], " ", 
+                SuperscriptBox["MT", "2"]}], "+", "T"}], ")"}]}]]}], 
+          RowBox[{"2", " ", 
+           SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+      SuperscriptBox[
+       RowBox[{"Log", "[", 
+        FractionBox[
+         RowBox[{
+          RowBox[{"-", 
+           SuperscriptBox["MH", "2"]}], "+", 
+          RowBox[{"6", " ", 
+           SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U", "+", 
+          SqrtBox[
+           RowBox[{
+            SuperscriptBox["MH", "4"], "+", 
+            RowBox[{"32", " ", 
+             SuperscriptBox["MT", "4"]}], "+", 
+            RowBox[{"12", " ", 
+             SuperscriptBox["MT", "2"], " ", 
+             RowBox[{"(", 
+              RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+            SuperscriptBox[
+             RowBox[{"(", 
+              RowBox[{"T24", "+", "U"}], ")"}], "2"], "-", 
+            RowBox[{"2", " ", 
+             SuperscriptBox["MH", "2"], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"6", " ", 
+                SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U"}], 
+              ")"}]}]}]]}], 
+         RowBox[{"2", " ", 
+          SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], 
+     RowBox[{"2", " ", 
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"-", 
+         SuperscriptBox["MH", "2"]}], "+", 
+        RowBox[{"4", " ", 
+         SuperscriptBox["MT", "2"]}], "+", "T", "+", "T24", "+", "U"}], 
+       ")"}]}]]}], "+", 
+   RowBox[{
+    FractionBox["1", 
+     SuperscriptBox[
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"-", 
+         SuperscriptBox["MH", "2"]}], "+", 
+        RowBox[{"4", " ", 
+         SuperscriptBox["MT", "2"]}], "+", "T", "+", "T24", "+", "U"}], ")"}],
+       "2"]], 
+    RowBox[{"2", " ", 
+     SuperscriptBox["MT", "2"], " ", 
+     RowBox[{"(", 
+      RowBox[{
+       RowBox[{"-", 
+        SuperscriptBox[
+         RowBox[{"Log", "[", 
+          FractionBox[
+           RowBox[{
+            RowBox[{"2", " ", 
+             SuperscriptBox["MT", "2"]}], "-", "T", "+", 
+            SqrtBox[
+             RowBox[{"T", " ", 
+              RowBox[{"(", 
+               RowBox[{
+                RowBox[{
+                 RowBox[{"-", "4"}], " ", 
+                 SuperscriptBox["MT", "2"]}], "+", "T"}], ")"}]}]]}], 
+           RowBox[{"2", " ", 
+            SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "-", 
+       FractionBox[
+        RowBox[{"2", " ", 
+         RowBox[{"(", 
+          RowBox[{
+           RowBox[{"-", 
+            SuperscriptBox["MH", "2"]}], "+", 
+           RowBox[{"4", " ", 
+            SuperscriptBox["MT", "2"]}], "+", "T", "+", "T24", "+", "U"}], 
+          ")"}], " ", 
+         RowBox[{"Log", "[", 
+          FractionBox[
+           RowBox[{
+            RowBox[{"-", 
+             SuperscriptBox["MH", "2"]}], "+", 
+            RowBox[{"6", " ", 
+             SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U", "+", 
+            SqrtBox[
+             RowBox[{
+              SuperscriptBox["MH", "4"], "+", 
+              RowBox[{"32", " ", 
+               SuperscriptBox["MT", "4"]}], "+", 
+              RowBox[{"12", " ", 
+               SuperscriptBox["MT", "2"], " ", 
+               RowBox[{"(", 
+                RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+              SuperscriptBox[
+               RowBox[{"(", 
+                RowBox[{"T24", "+", "U"}], ")"}], "2"], "-", 
+              RowBox[{"2", " ", 
+               SuperscriptBox["MH", "2"], " ", 
+               RowBox[{"(", 
+                RowBox[{
+                 RowBox[{"6", " ", 
+                  SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U"}], 
+                ")"}]}]}]]}], 
+           RowBox[{"2", " ", 
+            SuperscriptBox["MT", "2"]}]], "]"}]}], 
+        SqrtBox[
+         RowBox[{
+          SuperscriptBox["MH", "4"], "+", 
+          RowBox[{"32", " ", 
+           SuperscriptBox["MT", "4"]}], "+", 
+          RowBox[{"12", " ", 
+           SuperscriptBox["MT", "2"], " ", 
+           RowBox[{"(", 
+            RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+          SuperscriptBox[
+           RowBox[{"(", 
+            RowBox[{"T24", "+", "U"}], ")"}], "2"], "-", 
+          RowBox[{"2", " ", 
+           SuperscriptBox["MH", "2"], " ", 
+           RowBox[{"(", 
+            RowBox[{
+             RowBox[{"6", " ", 
+              SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U"}], 
+            ")"}]}]}]]], "+", 
+       SuperscriptBox[
+        RowBox[{"Log", "[", 
+         FractionBox[
+          RowBox[{
+           RowBox[{"-", 
+            SuperscriptBox["MH", "2"]}], "+", 
+           RowBox[{"6", " ", 
+            SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U", "+", 
+           SqrtBox[
+            RowBox[{
+             SuperscriptBox["MH", "4"], "+", 
+             RowBox[{"32", " ", 
+              SuperscriptBox["MT", "4"]}], "+", 
+             RowBox[{"12", " ", 
+              SuperscriptBox["MT", "2"], " ", 
+              RowBox[{"(", 
+               RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+             SuperscriptBox[
+              RowBox[{"(", 
+               RowBox[{"T24", "+", "U"}], ")"}], "2"], "-", 
+             RowBox[{"2", " ", 
+              SuperscriptBox["MH", "2"], " ", 
+              RowBox[{"(", 
+               RowBox[{
+                RowBox[{"6", " ", 
+                 SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U"}], 
+               ")"}]}]}]]}], 
+          RowBox[{"2", " ", 
+           SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], ")"}], " ", 
+     SuperscriptBox["\[Beta]", "2"]}]}], "+", 
+   InterpretationBox[
+    SuperscriptBox[
+     RowBox[{"O", "[", "\[Beta]", "]"}], "3"],
+    SeriesData[$CellContext`\[Beta], 0, {}, 0, 3, 1],
+    Editable->False]}],
+  SeriesData[$CellContext`\[Beta], 0, {
+   Rational[-1, 2] (-$CellContext`MH^2 + 
+      4 $CellContext`MT^2 + $CellContext`T + $CellContext`T24 + \
+$CellContext`U)^(-1) (-
+      Log[Rational[1, 2] $CellContext`MT^(-2) (
+          2 $CellContext`MT^2 - $CellContext`T + ($CellContext`T ((-4) \
+$CellContext`MT^2 + $CellContext`T))^Rational[1, 2])]^2 + 
+     Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+         6 $CellContext`MT^2 + $CellContext`T24 + $CellContext`U + \
+($CellContext`MH^4 + 32 $CellContext`MT^4 + 
+           12 $CellContext`MT^2 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2 - 
+           2 $CellContext`MH^2 (
+            6 $CellContext`MT^2 + $CellContext`T24 + $CellContext`U))^
+          Rational[1, 2])]^2), 0, 
+    2 $CellContext`MT^2 (-$CellContext`MH^2 + 
+      4 $CellContext`MT^2 + $CellContext`T + $CellContext`T24 + \
+$CellContext`U)^(-2) (-
+      Log[Rational[1, 2] $CellContext`MT^(-2) (
+          2 $CellContext`MT^2 - $CellContext`T + ($CellContext`T ((-4) \
+$CellContext`MT^2 + $CellContext`T))^Rational[1, 2])]^2 - 
+     2 (-$CellContext`MH^2 + 
+      4 $CellContext`MT^2 + $CellContext`T + $CellContext`T24 + \
+$CellContext`U) ($CellContext`MH^4 + 32 $CellContext`MT^4 + 
+       12 $CellContext`MT^2 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2 - 
+       2 $CellContext`MH^2 (
+        6 $CellContext`MT^2 + $CellContext`T24 + $CellContext`U))^
+      Rational[-1, 2] 
+     Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+        6 $CellContext`MT^2 + $CellContext`T24 + $CellContext`U + \
+($CellContext`MH^4 + 32 $CellContext`MT^4 + 
+          12 $CellContext`MT^2 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2 - 
+          2 $CellContext`MH^2 (
+           6 $CellContext`MT^2 + $CellContext`T24 + $CellContext`U))^
+         Rational[1, 2])] + 
+     Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+         6 $CellContext`MT^2 + $CellContext`T24 + $CellContext`U + \
+($CellContext`MH^4 + 32 $CellContext`MT^4 + 
+           12 $CellContext`MT^2 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2 - 
+           2 $CellContext`MH^2 (
+            6 $CellContext`MT^2 + $CellContext`T24 + $CellContext`U))^
+          Rational[1, 2])]^2)}, 0, 3, 1],
+  Editable->False]], "Output",
+ CellChangeTimes->{3.776094778441732*^9},
+ CellLabel->
+  "Out[137]=",ExpressionUUID->"fb8aa450-fac0-43d2-94fb-164b894fd43e"]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(*", " ", 
+   RowBox[{
+    RowBox[{"Case", " ", "1"}], ",", 
+    RowBox[{"2", " ", "give", " ", "the", " ", "same", " ", "value"}], ",", 
+    " ", 
+    RowBox[{"no", " ", "difference", " ", "in", " ", 
+     RowBox[{"performance", "?"}]}]}], " ", "*)"}], "\[IndentingNewLine]", 
+  RowBox[{"mLRPV1LoopSeries", "\[Equal]", "mLRPV1Series"}]}]], "Input",
+ CellChangeTimes->{{3.776094786738435*^9, 3.776094815754766*^9}, {
+  3.77609488885246*^9, 
+  3.776094893262938*^9}},ExpressionUUID->"1e5b2a80-6558-4a6a-a208-\
+6ffd66be10ca"],
+
+Cell[BoxData["True"], "Output",
+ CellChangeTimes->{3.77609479503203*^9},
+ CellLabel->
+  "Out[138]=",ExpressionUUID->"ba76a9bc-1692-4293-93e4-3b98a9ab7916"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(*", " ", 
+   RowBox[{"Case", " ", "3"}], " ", "*)"}], "\[IndentingNewLine]", 
+  RowBox[{"(*", " ", 
+   RowBox[{
+    RowBox[{
+     RowBox[{"Use", " ", "un"}], "-", 
+     RowBox[{"expanded", " ", "PV", " ", "coefficient"}]}], ",", " ", 
+    RowBox[{
+     RowBox[{"sub", " ", "S"}], "\[Rule]", 
+     RowBox[{"4", "*", 
+      RowBox[{
+       RowBox[{"MT", "^", "2"}], "/", 
+       RowBox[{"(", 
+        RowBox[{"1", "-", 
+         RowBox[{"\[Beta]", "^", "2"}]}], ")"}]}]}]}], ",", " ", 
+    RowBox[{"use", " ", "LoopRefineSeries"}]}], " ", "*)"}], 
+  "\[IndentingNewLine]", 
+  RowBox[{"mLRPV2LoopSeries", "=", 
+   RowBox[{
+    RowBox[{"LoopRefineSeries", "[", 
+     RowBox[{"PV2", ",", 
+      RowBox[{"{", 
+       RowBox[{"\[Beta]", ",", "0", ",", "2"}], "}"}]}], "]"}], "//", 
+    "Simplify"}]}]}]], "Input",
+ CellChangeTimes->{{3.7760948569997253`*^9, 3.776095006903996*^9}},
+ CellLabel->
+  "In[139]:=",ExpressionUUID->"0c715131-89c6-40ef-8f9e-32d8bd8c07e3"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{
+   RowBox[{"-", 
+    FractionBox[
+     RowBox[{
+      RowBox[{"-", 
+       SuperscriptBox[
+        RowBox[{"Log", "[", 
+         FractionBox[
+          RowBox[{
+           RowBox[{"2", " ", 
+            SuperscriptBox["MT", "2"]}], "-", "T", "+", 
+           SqrtBox[
+            RowBox[{"T", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"-", "4"}], " ", 
+                SuperscriptBox["MT", "2"]}], "+", "T"}], ")"}]}]]}], 
+          RowBox[{"2", " ", 
+           SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+      SuperscriptBox[
+       RowBox[{"Log", "[", 
+        FractionBox[
+         RowBox[{
+          RowBox[{"-", 
+           SuperscriptBox["MH", "2"]}], "+", 
+          RowBox[{"6", " ", 
+           SuperscriptBox["MT", "2"]}], "+", "T24", "+", 
+          SqrtBox[
+           RowBox[{
+            RowBox[{"(", 
+             RowBox[{
+              SuperscriptBox["MH", "2"], "-", 
+              RowBox[{"8", " ", 
+               SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ")"}], 
+            " ", 
+            RowBox[{"(", 
+             RowBox[{
+              SuperscriptBox["MH", "2"], "-", 
+              RowBox[{"4", " ", 
+               SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ")"}]}]], 
+          "+", "U"}], 
+         RowBox[{"2", " ", 
+          SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], 
+     RowBox[{"2", " ", 
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"-", 
+         SuperscriptBox["MH", "2"]}], "+", 
+        RowBox[{"4", " ", 
+         SuperscriptBox["MT", "2"]}], "+", "T", "+", "T24", "+", "U"}], 
+       ")"}]}]]}], "+", 
+   RowBox[{
+    FractionBox["1", 
+     SuperscriptBox[
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"-", 
+         SuperscriptBox["MH", "2"]}], "+", 
+        RowBox[{"4", " ", 
+         SuperscriptBox["MT", "2"]}], "+", "T", "+", "T24", "+", "U"}], ")"}],
+       "2"]], 
+    RowBox[{"2", " ", 
+     SuperscriptBox["MT", "2"], " ", 
+     RowBox[{"(", 
+      RowBox[{
+       FractionBox[
+        RowBox[{"2", " ", 
+         RowBox[{"(", 
+          RowBox[{
+           RowBox[{"-", 
+            SuperscriptBox["MH", "2"]}], "+", 
+           RowBox[{"4", " ", 
+            SuperscriptBox["MT", "2"]}], "+", "T", "+", "T24", "+", "U"}], 
+          ")"}], " ", 
+         RowBox[{"DiscB", "[", 
+          RowBox[{
+           RowBox[{
+            SuperscriptBox["MH", "2"], "-", 
+            RowBox[{"4", " ", 
+             SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+           SqrtBox[
+            SuperscriptBox["MT", "2"]], ",", 
+           SqrtBox[
+            SuperscriptBox["MT", "2"]]}], "]"}]}], 
+        RowBox[{
+         RowBox[{"-", 
+          SuperscriptBox["MH", "2"]}], "+", 
+         RowBox[{"8", " ", 
+          SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U"}]], "-", 
+       SuperscriptBox[
+        RowBox[{"Log", "[", 
+         FractionBox[
+          RowBox[{
+           RowBox[{"2", " ", 
+            SuperscriptBox["MT", "2"]}], "-", "T", "+", 
+           SqrtBox[
+            RowBox[{"T", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"-", "4"}], " ", 
+                SuperscriptBox["MT", "2"]}], "+", "T"}], ")"}]}]]}], 
+          RowBox[{"2", " ", 
+           SuperscriptBox["MT", "2"]}]], "]"}], "2"], "+", 
+       SuperscriptBox[
+        RowBox[{"Log", "[", 
+         FractionBox[
+          RowBox[{
+           RowBox[{"-", 
+            SuperscriptBox["MH", "2"]}], "+", 
+           RowBox[{"6", " ", 
+            SuperscriptBox["MT", "2"]}], "+", "T24", "+", 
+           SqrtBox[
+            RowBox[{
+             RowBox[{"(", 
+              RowBox[{
+               SuperscriptBox["MH", "2"], "-", 
+               RowBox[{"8", " ", 
+                SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ")"}], 
+             " ", 
+             RowBox[{"(", 
+              RowBox[{
+               SuperscriptBox["MH", "2"], "-", 
+               RowBox[{"4", " ", 
+                SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ")"}]}]],
+            "+", "U"}], 
+          RowBox[{"2", " ", 
+           SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], ")"}], " ", 
+     SuperscriptBox["\[Beta]", "2"]}]}], "+", 
+   InterpretationBox[
+    SuperscriptBox[
+     RowBox[{"O", "[", "\[Beta]", "]"}], "3"],
+    SeriesData[$CellContext`\[Beta], 0, {}, 0, 3, 1],
+    Editable->False]}],
+  SeriesData[$CellContext`\[Beta], 0, {
+   Rational[-1, 2] (-$CellContext`MH^2 + 
+      4 $CellContext`MT^2 + $CellContext`T + $CellContext`T24 + \
+$CellContext`U)^(-1) (-
+      Log[Rational[1, 2] $CellContext`MT^(-2) (
+          2 $CellContext`MT^2 - $CellContext`T + ($CellContext`T ((-4) \
+$CellContext`MT^2 + $CellContext`T))^Rational[1, 2])]^2 + 
+     Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+         6 $CellContext`MT^2 + $CellContext`T24 + (($CellContext`MH^2 - 
+            8 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U) \
+($CellContext`MH^2 - 
+            4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U))^
+          Rational[1, 2] + $CellContext`U)]^2), 0, 
+    2 $CellContext`MT^2 (-$CellContext`MH^2 + 
+      4 $CellContext`MT^2 + $CellContext`T + $CellContext`T24 + \
+$CellContext`U)^(-2) (
+     2 (-$CellContext`MH^2 + 
+        8 $CellContext`MT^2 + $CellContext`T24 + $CellContext`U)^(-1) \
+(-$CellContext`MH^2 + 
+       4 $CellContext`MT^2 + $CellContext`T + $CellContext`T24 + \
+$CellContext`U) 
+      X`DiscB[$CellContext`MH^2 - 
+        4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+($CellContext`MT^2)^Rational[1, 2], ($CellContext`MT^2)^Rational[1, 2]] - 
+     Log[Rational[1, 2] $CellContext`MT^(-2) (
+        2 $CellContext`MT^2 - $CellContext`T + ($CellContext`T ((-4) \
+$CellContext`MT^2 + $CellContext`T))^Rational[1, 2])]^2 + 
+     Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+         6 $CellContext`MT^2 + $CellContext`T24 + (($CellContext`MH^2 - 
+            8 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U) \
+($CellContext`MH^2 - 
+            4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U))^
+          Rational[1, 2] + $CellContext`U)]^2)}, 0, 3, 1],
+  Editable->False]], "Output",
+ CellChangeTimes->{3.7760950081103888`*^9},
+ CellLabel->
+  "Out[139]=",ExpressionUUID->"ee09fd16-2531-4ab1-be6d-4d7237f2c0f6"]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(*", " ", 
+   RowBox[{"Case", " ", "4"}], " ", "*)"}], "\[IndentingNewLine]", 
+  RowBox[{"(*", " ", 
+   RowBox[{
+    RowBox[{
+     RowBox[{"Use", " ", "un"}], "-", 
+     RowBox[{"expanded", " ", "PV", " ", "coefficient"}]}], ",", " ", 
+    RowBox[{
+     RowBox[{"sub", " ", "S"}], "\[Rule]", 
+     RowBox[{"4", "*", 
+      RowBox[{
+       RowBox[{"MT", "^", "2"}], "/", 
+       RowBox[{"(", 
+        RowBox[{"1", "-", 
+         RowBox[{"\[Beta]", "^", "2"}]}], ")"}]}]}]}], ",", " ", 
+    RowBox[{"use", " ", "LoopRefine"}], ",", " ", 
+    RowBox[{"then", " ", "LoopRefineSeries"}]}], " ", "*)"}], 
+  "\[IndentingNewLine]", 
+  RowBox[{"mLRPV2LoopSeries2", "=", 
+   RowBox[{
+    RowBox[{"LoopRefineSeries", "[", 
+     RowBox[{
+      RowBox[{"LoopRefine", "[", "PV2", "]"}], ",", 
+      RowBox[{"{", 
+       RowBox[{"\[Beta]", ",", "0", ",", "2"}], "}"}]}], "]"}], "//", 
+    "Simplify"}]}]}]], "Input",
+ CellChangeTimes->{{3.776094943833243*^9, 3.776094948875589*^9}, {
+  3.776095031975548*^9, 3.7760950965361834`*^9}},
+ CellLabel->
+  "In[142]:=",ExpressionUUID->"192cc319-c4e4-49c2-9aae-8c5e3d52b6b5"],
+
+Cell[BoxData[
+ InterpretationBox[
+  RowBox[{
+   RowBox[{"-", 
+    FractionBox[
+     RowBox[{
+      RowBox[{"-", 
+       SuperscriptBox[
+        RowBox[{"Log", "[", 
+         FractionBox[
+          RowBox[{
+           RowBox[{"2", " ", 
+            SuperscriptBox["MT", "2"]}], "-", "T", "+", 
+           SqrtBox[
+            RowBox[{"T", " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{
+                RowBox[{"-", "4"}], " ", 
+                SuperscriptBox["MT", "2"]}], "+", "T"}], ")"}]}]]}], 
+          RowBox[{"2", " ", 
+           SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "+", 
+      SuperscriptBox[
+       RowBox[{"Log", "[", 
+        FractionBox[
+         RowBox[{
+          RowBox[{"-", 
+           SuperscriptBox["MH", "2"]}], "+", 
+          RowBox[{"6", " ", 
+           SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U", "+", 
+          SqrtBox[
+           RowBox[{
+            SuperscriptBox["MH", "4"], "+", 
+            RowBox[{"32", " ", 
+             SuperscriptBox["MT", "4"]}], "+", 
+            RowBox[{"12", " ", 
+             SuperscriptBox["MT", "2"], " ", 
+             RowBox[{"(", 
+              RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+            SuperscriptBox[
+             RowBox[{"(", 
+              RowBox[{"T24", "+", "U"}], ")"}], "2"], "-", 
+            RowBox[{"2", " ", 
+             SuperscriptBox["MH", "2"], " ", 
+             RowBox[{"(", 
+              RowBox[{
+               RowBox[{"6", " ", 
+                SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U"}], 
+              ")"}]}]}]]}], 
+         RowBox[{"2", " ", 
+          SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], 
+     RowBox[{"2", " ", 
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"-", 
+         SuperscriptBox["MH", "2"]}], "+", 
+        RowBox[{"4", " ", 
+         SuperscriptBox["MT", "2"]}], "+", "T", "+", "T24", "+", "U"}], 
+       ")"}]}]]}], "+", 
+   RowBox[{
+    FractionBox["1", 
+     SuperscriptBox[
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"-", 
+         SuperscriptBox["MH", "2"]}], "+", 
+        RowBox[{"4", " ", 
+         SuperscriptBox["MT", "2"]}], "+", "T", "+", "T24", "+", "U"}], ")"}],
+       "2"]], 
+    RowBox[{"2", " ", 
+     SuperscriptBox["MT", "2"], " ", 
+     RowBox[{"(", 
+      RowBox[{
+       RowBox[{"-", 
+        SuperscriptBox[
+         RowBox[{"Log", "[", 
+          FractionBox[
+           RowBox[{
+            RowBox[{"2", " ", 
+             SuperscriptBox["MT", "2"]}], "-", "T", "+", 
+            SqrtBox[
+             RowBox[{"T", " ", 
+              RowBox[{"(", 
+               RowBox[{
+                RowBox[{
+                 RowBox[{"-", "4"}], " ", 
+                 SuperscriptBox["MT", "2"]}], "+", "T"}], ")"}]}]]}], 
+           RowBox[{"2", " ", 
+            SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], "-", 
+       FractionBox[
+        RowBox[{"2", " ", 
+         RowBox[{"(", 
+          RowBox[{
+           RowBox[{"-", 
+            SuperscriptBox["MH", "2"]}], "+", 
+           RowBox[{"4", " ", 
+            SuperscriptBox["MT", "2"]}], "+", "T", "+", "T24", "+", "U"}], 
+          ")"}], " ", 
+         RowBox[{"Log", "[", 
+          FractionBox[
+           RowBox[{
+            RowBox[{"-", 
+             SuperscriptBox["MH", "2"]}], "+", 
+            RowBox[{"6", " ", 
+             SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U", "+", 
+            SqrtBox[
+             RowBox[{
+              SuperscriptBox["MH", "4"], "+", 
+              RowBox[{"32", " ", 
+               SuperscriptBox["MT", "4"]}], "+", 
+              RowBox[{"12", " ", 
+               SuperscriptBox["MT", "2"], " ", 
+               RowBox[{"(", 
+                RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+              SuperscriptBox[
+               RowBox[{"(", 
+                RowBox[{"T24", "+", "U"}], ")"}], "2"], "-", 
+              RowBox[{"2", " ", 
+               SuperscriptBox["MH", "2"], " ", 
+               RowBox[{"(", 
+                RowBox[{
+                 RowBox[{"6", " ", 
+                  SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U"}], 
+                ")"}]}]}]]}], 
+           RowBox[{"2", " ", 
+            SuperscriptBox["MT", "2"]}]], "]"}]}], 
+        SqrtBox[
+         RowBox[{
+          SuperscriptBox["MH", "4"], "+", 
+          RowBox[{"32", " ", 
+           SuperscriptBox["MT", "4"]}], "+", 
+          RowBox[{"12", " ", 
+           SuperscriptBox["MT", "2"], " ", 
+           RowBox[{"(", 
+            RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+          SuperscriptBox[
+           RowBox[{"(", 
+            RowBox[{"T24", "+", "U"}], ")"}], "2"], "-", 
+          RowBox[{"2", " ", 
+           SuperscriptBox["MH", "2"], " ", 
+           RowBox[{"(", 
+            RowBox[{
+             RowBox[{"6", " ", 
+              SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U"}], 
+            ")"}]}]}]]], "+", 
+       SuperscriptBox[
+        RowBox[{"Log", "[", 
+         FractionBox[
+          RowBox[{
+           RowBox[{"-", 
+            SuperscriptBox["MH", "2"]}], "+", 
+           RowBox[{"6", " ", 
+            SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U", "+", 
+           SqrtBox[
+            RowBox[{
+             SuperscriptBox["MH", "4"], "+", 
+             RowBox[{"32", " ", 
+              SuperscriptBox["MT", "4"]}], "+", 
+             RowBox[{"12", " ", 
+              SuperscriptBox["MT", "2"], " ", 
+              RowBox[{"(", 
+               RowBox[{"T24", "+", "U"}], ")"}]}], "+", 
+             SuperscriptBox[
+              RowBox[{"(", 
+               RowBox[{"T24", "+", "U"}], ")"}], "2"], "-", 
+             RowBox[{"2", " ", 
+              SuperscriptBox["MH", "2"], " ", 
+              RowBox[{"(", 
+               RowBox[{
+                RowBox[{"6", " ", 
+                 SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U"}], 
+               ")"}]}]}]]}], 
+          RowBox[{"2", " ", 
+           SuperscriptBox["MT", "2"]}]], "]"}], "2"]}], ")"}], " ", 
+     SuperscriptBox["\[Beta]", "2"]}]}], "+", 
+   InterpretationBox[
+    SuperscriptBox[
+     RowBox[{"O", "[", "\[Beta]", "]"}], "3"],
+    SeriesData[$CellContext`\[Beta], 0, {}, 0, 3, 1],
+    Editable->False]}],
+  SeriesData[$CellContext`\[Beta], 0, {
+   Rational[-1, 2] (-$CellContext`MH^2 + 
+      4 $CellContext`MT^2 + $CellContext`T + $CellContext`T24 + \
+$CellContext`U)^(-1) (-
+      Log[Rational[1, 2] $CellContext`MT^(-2) (
+          2 $CellContext`MT^2 - $CellContext`T + ($CellContext`T ((-4) \
+$CellContext`MT^2 + $CellContext`T))^Rational[1, 2])]^2 + 
+     Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+         6 $CellContext`MT^2 + $CellContext`T24 + $CellContext`U + \
+($CellContext`MH^4 + 32 $CellContext`MT^4 + 
+           12 $CellContext`MT^2 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2 - 
+           2 $CellContext`MH^2 (
+            6 $CellContext`MT^2 + $CellContext`T24 + $CellContext`U))^
+          Rational[1, 2])]^2), 0, 
+    2 $CellContext`MT^2 (-$CellContext`MH^2 + 
+      4 $CellContext`MT^2 + $CellContext`T + $CellContext`T24 + \
+$CellContext`U)^(-2) (-
+      Log[Rational[1, 2] $CellContext`MT^(-2) (
+          2 $CellContext`MT^2 - $CellContext`T + ($CellContext`T ((-4) \
+$CellContext`MT^2 + $CellContext`T))^Rational[1, 2])]^2 - 
+     2 (-$CellContext`MH^2 + 
+      4 $CellContext`MT^2 + $CellContext`T + $CellContext`T24 + \
+$CellContext`U) ($CellContext`MH^4 + 32 $CellContext`MT^4 + 
+       12 $CellContext`MT^2 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2 - 
+       2 $CellContext`MH^2 (
+        6 $CellContext`MT^2 + $CellContext`T24 + $CellContext`U))^
+      Rational[-1, 2] 
+     Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+        6 $CellContext`MT^2 + $CellContext`T24 + $CellContext`U + \
+($CellContext`MH^4 + 32 $CellContext`MT^4 + 
+          12 $CellContext`MT^2 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2 - 
+          2 $CellContext`MH^2 (
+           6 $CellContext`MT^2 + $CellContext`T24 + $CellContext`U))^
+         Rational[1, 2])] + 
+     Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+         6 $CellContext`MT^2 + $CellContext`T24 + $CellContext`U + \
+($CellContext`MH^4 + 32 $CellContext`MT^4 + 
+           12 $CellContext`MT^2 ($CellContext`T24 + $CellContext`U) + \
+($CellContext`T24 + $CellContext`U)^2 - 
+           2 $CellContext`MH^2 (
+            6 $CellContext`MT^2 + $CellContext`T24 + $CellContext`U))^
+          Rational[1, 2])]^2)}, 0, 3, 1],
+  Editable->False]], "Output",
+ CellChangeTimes->{{3.7760950761911373`*^9, 3.776095096903057*^9}},
+ CellLabel->
+  "Out[142]=",ExpressionUUID->"72f30e8f-2cdf-4cf1-b2ac-4bad814133c2"]
+}, Closed]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(*", " ", 
+   RowBox[{
+    RowBox[{"Case", " ", "3"}], ",", 
+    RowBox[{"4", " ", "give", " ", "DIFFERENT", " ", "answers"}]}], " ", 
+   "*)"}], "\[IndentingNewLine]", 
+  RowBox[{"FullSimplify", "[", 
+   RowBox[{"mLRPV2LoopSeries", "\[Equal]", "mLRPV2LoopSeries2"}], 
+   "]"}]}]], "Input",
+ CellChangeTimes->{{3.7760951076835823`*^9, 
+  3.776095161154098*^9}},ExpressionUUID->"aa4bbc56-9042-4ac4-9da9-\
+d8a6a099ffb0"],
+
+Cell[BoxData[
+ RowBox[{
+  InterpretationBox[
+   RowBox[{
+    FractionBox[
+     RowBox[{"4", " ", 
+      SuperscriptBox["MT", "2"], " ", 
+      RowBox[{"(", 
+       RowBox[{
+        FractionBox[
+         RowBox[{"DiscB", "[", 
+          RowBox[{
+           RowBox[{
+            SuperscriptBox["MH", "2"], "-", 
+            RowBox[{"4", " ", 
+             SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+           SqrtBox[
+            SuperscriptBox["MT", "2"]], ",", 
+           SqrtBox[
+            SuperscriptBox["MT", "2"]]}], "]"}], 
+         RowBox[{
+          RowBox[{"-", 
+           SuperscriptBox["MH", "2"]}], "+", 
+          RowBox[{"8", " ", 
+           SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U"}]], "+", 
+        FractionBox[
+         RowBox[{"Log", "[", 
+          FractionBox[
+           RowBox[{
+            RowBox[{"-", 
+             SuperscriptBox["MH", "2"]}], "+", 
+            RowBox[{"6", " ", 
+             SuperscriptBox["MT", "2"]}], "+", "T24", "+", 
+            SqrtBox[
+             RowBox[{
+              RowBox[{"(", 
+               RowBox[{
+                SuperscriptBox["MH", "2"], "-", 
+                RowBox[{"8", " ", 
+                 SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ")"}], 
+              " ", 
+              RowBox[{"(", 
+               RowBox[{
+                SuperscriptBox["MH", "2"], "-", 
+                RowBox[{"4", " ", 
+                 SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], 
+               ")"}]}]], "+", "U"}], 
+           RowBox[{"2", " ", 
+            SuperscriptBox["MT", "2"]}]], "]"}], 
+         SqrtBox[
+          RowBox[{
+           RowBox[{"(", 
+            RowBox[{
+             SuperscriptBox["MH", "2"], "-", 
+             RowBox[{"8", " ", 
+              SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ")"}], " ", 
+           RowBox[{"(", 
+            RowBox[{
+             SuperscriptBox["MH", "2"], "-", 
+             RowBox[{"4", " ", 
+              SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], 
+            ")"}]}]]]}], ")"}], " ", 
+      SuperscriptBox["\[Beta]", "2"]}], 
+     RowBox[{
+      RowBox[{"-", 
+       SuperscriptBox["MH", "2"]}], "+", 
+      RowBox[{"4", " ", 
+       SuperscriptBox["MT", "2"]}], "+", "T", "+", "T24", "+", "U"}]], "+", 
+    InterpretationBox[
+     SuperscriptBox[
+      RowBox[{"O", "[", "\[Beta]", "]"}], "3"],
+     SeriesData[$CellContext`\[Beta], 0, {}, 2, 3, 1],
+     Editable->False]}],
+   SeriesData[$CellContext`\[Beta], 0, {
+    4 $CellContext`MT^2 (-$CellContext`MH^2 + 
+       4 $CellContext`MT^2 + $CellContext`T + $CellContext`T24 + \
+$CellContext`U)^(-1) ((-$CellContext`MH^2 + 
+         8 $CellContext`MT^2 + $CellContext`T24 + $CellContext`U)^(-1) 
+       X`DiscB[$CellContext`MH^2 - 
+         4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+($CellContext`MT^2)^Rational[1, 2], ($CellContext`MT^2)^
+         Rational[1, 2]] + (($CellContext`MH^2 - 
+          8 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U) \
+($CellContext`MH^2 - 
+          4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U))^
+        Rational[-1, 2] 
+       Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+          6 $CellContext`MT^2 + $CellContext`T24 + (($CellContext`MH^2 - 
+             8 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U) \
+($CellContext`MH^2 - 
+             4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U))^
+           Rational[1, 2] + $CellContext`U)])}, 2, 3, 1],
+   Editable->False], "\[Equal]", "0"}]], "Output",
+ CellChangeTimes->{{3.7760951169017067`*^9, 3.776095125732332*^9}},
+ CellLabel->
+  "Out[144]=",ExpressionUUID->"5dd7bd0b-df4b-42b4-afa6-169da77820b0"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(*", " ", 
+   RowBox[{
+    RowBox[{"Case", " ", "1"}], ",", 
+    RowBox[{
+    "2", " ", "and", " ", "4", " ", "give", " ", "the", " ", "same", " ", 
+     "result"}]}], " ", "*)"}], "\[IndentingNewLine]", 
+  RowBox[{"mLRPV1LoopSeries", "\[Equal]", "mLRPV2LoopSeries2"}]}]], "Input",
+ CellChangeTimes->{{3.776095186462483*^9, 3.7760951971387672`*^9}, {
+  3.776095252021922*^9, 
+  3.776095266705385*^9}},ExpressionUUID->"acbb6382-4324-4bfb-aa84-\
+71272d55c7d4"],
+
+Cell[BoxData["True"], "Output",
+ CellChangeTimes->{3.776095198717999*^9},
+ CellLabel->
+  "Out[145]=",ExpressionUUID->"f4100da3-c681-47f2-ac13-8b324b099b4e"]
+}, Open  ]],
+
+Cell[CellGroupData[{
+
+Cell[BoxData[
+ RowBox[{
+  RowBox[{"(*", " ", 
+   RowBox[{"Case", " ", "3", " ", "is", " ", "different"}], " ", "*)"}], 
+  "\[IndentingNewLine]", 
+  RowBox[{"FullSimplify", "[", 
+   RowBox[{"mLRPV1LoopSeries", "\[Equal]", "mLRPV2LoopSeries"}], 
+   "]"}]}]], "Input",
+ CellChangeTimes->{{3.776095201801568*^9, 3.776095278918404*^9}},
+ CellLabel->
+  "In[149]:=",ExpressionUUID->"1be0f3b4-e047-4a26-9afa-df89d8bb25eb"],
+
+Cell[BoxData[
+ RowBox[{
+  InterpretationBox[
+   RowBox[{
+    FractionBox[
+     RowBox[{"4", " ", 
+      SuperscriptBox["MT", "2"], " ", 
+      RowBox[{"(", 
+       RowBox[{
+        RowBox[{"-", 
+         FractionBox[
+          RowBox[{"DiscB", "[", 
+           RowBox[{
+            RowBox[{
+             SuperscriptBox["MH", "2"], "-", 
+             RowBox[{"4", " ", 
+              SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ",", 
+            SqrtBox[
+             SuperscriptBox["MT", "2"]], ",", 
+            SqrtBox[
+             SuperscriptBox["MT", "2"]]}], "]"}], 
+          RowBox[{
+           RowBox[{"-", 
+            SuperscriptBox["MH", "2"]}], "+", 
+           RowBox[{"8", " ", 
+            SuperscriptBox["MT", "2"]}], "+", "T24", "+", "U"}]]}], "-", 
+        FractionBox[
+         RowBox[{"Log", "[", 
+          FractionBox[
+           RowBox[{
+            RowBox[{"-", 
+             SuperscriptBox["MH", "2"]}], "+", 
+            RowBox[{"6", " ", 
+             SuperscriptBox["MT", "2"]}], "+", "T24", "+", 
+            SqrtBox[
+             RowBox[{
+              RowBox[{"(", 
+               RowBox[{
+                SuperscriptBox["MH", "2"], "-", 
+                RowBox[{"8", " ", 
+                 SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ")"}], 
+              " ", 
+              RowBox[{"(", 
+               RowBox[{
+                SuperscriptBox["MH", "2"], "-", 
+                RowBox[{"4", " ", 
+                 SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], 
+               ")"}]}]], "+", "U"}], 
+           RowBox[{"2", " ", 
+            SuperscriptBox["MT", "2"]}]], "]"}], 
+         SqrtBox[
+          RowBox[{
+           RowBox[{"(", 
+            RowBox[{
+             SuperscriptBox["MH", "2"], "-", 
+             RowBox[{"8", " ", 
+              SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], ")"}], " ", 
+           RowBox[{"(", 
+            RowBox[{
+             SuperscriptBox["MH", "2"], "-", 
+             RowBox[{"4", " ", 
+              SuperscriptBox["MT", "2"]}], "-", "T24", "-", "U"}], 
+            ")"}]}]]]}], ")"}], " ", 
+      SuperscriptBox["\[Beta]", "2"]}], 
+     RowBox[{
+      RowBox[{"-", 
+       SuperscriptBox["MH", "2"]}], "+", 
+      RowBox[{"4", " ", 
+       SuperscriptBox["MT", "2"]}], "+", "T", "+", "T24", "+", "U"}]], "+", 
+    InterpretationBox[
+     SuperscriptBox[
+      RowBox[{"O", "[", "\[Beta]", "]"}], "3"],
+     SeriesData[$CellContext`\[Beta], 0, {}, 2, 3, 1],
+     Editable->False]}],
+   SeriesData[$CellContext`\[Beta], 0, {
+    4 $CellContext`MT^2 (-$CellContext`MH^2 + 
+       4 $CellContext`MT^2 + $CellContext`T + $CellContext`T24 + \
+$CellContext`U)^(-1) (-(-$CellContext`MH^2 + 
+         8 $CellContext`MT^2 + $CellContext`T24 + $CellContext`U)^(-1) 
+       X`DiscB[$CellContext`MH^2 - 
+         4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U, \
+($CellContext`MT^2)^Rational[1, 2], ($CellContext`MT^2)^
+         Rational[1, 2]] - (($CellContext`MH^2 - 
+         8 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U) \
+($CellContext`MH^2 - 
+         4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U))^
+       Rational[-1, 2] 
+      Log[Rational[1, 2] $CellContext`MT^(-2) (-$CellContext`MH^2 + 
+         6 $CellContext`MT^2 + $CellContext`T24 + (($CellContext`MH^2 - 
+            8 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U) \
+($CellContext`MH^2 - 
+            4 $CellContext`MT^2 - $CellContext`T24 - $CellContext`U))^
+          Rational[1, 2] + $CellContext`U)])}, 2, 3, 1],
+   Editable->False], "\[Equal]", "0"}]], "Output",
+ CellChangeTimes->{{3.776095218727405*^9, 3.776095249937913*^9}, 
+   3.776095280416049*^9},
+ CellLabel->
+  "Out[149]=",ExpressionUUID->"481fa417-77b8-4946-b4f9-04ed930e142d"]
+}, Open  ]],
+
+Cell[BoxData[
+ RowBox[{"\[IndentingNewLine]", "\[IndentingNewLine]", "\[IndentingNewLine]", 
+  "\[IndentingNewLine]", "\[IndentingNewLine]", 
+  "\[IndentingNewLine]"}]], "Input",
+ CellChangeTimes->{{3.776094017637576*^9, 
+  3.776094018336205*^9}},ExpressionUUID->"1e1abde8-f7ad-44b1-99b4-\
+1370e978f66d"]
+},
+WindowSize->{992, 755},
+WindowMargins->{{87, Automatic}, {Automatic, 0}},
+FrontEndVersion->"11.3 for Mac OS X x86 (32-bit, 64-bit Kernel) (March 5, \
+2018)",
+StyleDefinitions->"Default.nb"
+]
+(* End of Notebook Content *)
+
+(* Internal cache information *)
+(*CellTagsOutline
+CellTagsIndex->{}
+*)
+(*CellTagsIndex
+CellTagsIndex->{}
+*)
+(*NotebookFileOutline
+Notebook[{
+Cell[558, 20, 1118, 25, 94, "Input",ExpressionUUID->"a9eb43f9-c437-4ff0-ae8b-eb31f4d06b38"],
+Cell[CellGroupData[{
+Cell[1701, 49, 636, 12, 94, "Input",ExpressionUUID->"aa6e76d2-ec10-49c0-b6e0-1dd4d91b1a18"],
+Cell[CellGroupData[{
+Cell[2362, 65, 1820, 27, 46, "Print",ExpressionUUID->"9d8d0d32-258e-459a-8da1-f1a084891668"],
+Cell[4185, 94, 1687, 26, 101, "Print",ExpressionUUID->"52438396-54ab-417c-b161-36fd4cadc0e5"]
+}, Open  ]]
+}, Open  ]],
+Cell[5899, 124, 1328, 31, 94, "Input",ExpressionUUID->"1c12ba0e-fd6c-4b7e-8de6-2b784fa72d92"],
+Cell[7230, 157, 10661, 257, 1165, "Input",ExpressionUUID->"a5c5e12e-157e-4719-b09d-930d037e0d1b"],
+Cell[17894, 416, 371, 6, 30, "Input",ExpressionUUID->"7741718d-edbc-49e5-a241-fb84c7107f7d"],
+Cell[18268, 424, 1634, 39, 136, "Input",ExpressionUUID->"6f54e202-a28b-4a1d-9e81-76bb7154ddaa"],
+Cell[19905, 465, 2379, 58, 178, "Input",ExpressionUUID->"51e1abda-d831-4042-bf3b-c17c153412bc"],
+Cell[22287, 525, 1508, 34, 136, "Input",ExpressionUUID->"476a37c6-482c-4f61-9ced-5d80a625711e"],
+Cell[23798, 561, 261, 7, 30, "Input",ExpressionUUID->"705b77c9-9d55-4c91-a174-596c11435d8d"],
+Cell[CellGroupData[{
+Cell[24084, 572, 883, 16, 52, "Input",ExpressionUUID->"fd0c50cb-5e3d-46b2-a09e-275f25c954a6"],
+Cell[24970, 590, 202, 3, 34, "Output",ExpressionUUID->"9f7e9a1a-0e98-444b-a2d6-4f9b40f3790f"]
+}, Open  ]],
+Cell[25187, 596, 214, 5, 30, "Input",ExpressionUUID->"69614acb-c767-4819-96b5-beee59afcf6a"],
+Cell[25404, 603, 261, 6, 52, "Input",ExpressionUUID->"f1052ac6-e6f7-4371-afd6-ad461c58d053"],
+Cell[25668, 611, 810, 18, 73, "Input",ExpressionUUID->"47c35d70-ef0a-4ee5-9de6-a89da37d395a"],
+Cell[26481, 631, 263, 6, 52, "Input",ExpressionUUID->"e49bfcd0-2790-4662-b260-1251fbf55656"],
+Cell[26747, 639, 740, 18, 73, "Input",ExpressionUUID->"7c31e5a1-c9d7-4139-bcbf-d567355f68ac"],
+Cell[27490, 659, 263, 6, 52, "Input",ExpressionUUID->"df0e2446-e8a9-4c0f-ade0-6243ed23f014"],
+Cell[27756, 667, 704, 19, 73, "Input",ExpressionUUID->"b7439b12-cb51-47a1-a158-9fa93f157c7d"],
+Cell[28463, 688, 266, 6, 52, "Input",ExpressionUUID->"ba9ecf49-d2ba-4baa-bc4a-47072a88303d"],
+Cell[28732, 696, 683, 20, 73, "Input",ExpressionUUID->"c1cc9921-c84f-4990-9a13-a36935fe08f6"],
+Cell[29418, 718, 256, 5, 30, "Input",ExpressionUUID->"b325e442-757f-4122-a460-9727e5485960"],
+Cell[29677, 725, 435, 9, 30, "Input",ExpressionUUID->"64072172-75c1-400c-b4be-a5a76fc27e9f"],
+Cell[30115, 736, 607, 13, 52, "Input",ExpressionUUID->"75ac93f2-7474-4481-b70f-8b3ab1fc4f2c"],
+Cell[CellGroupData[{
+Cell[30747, 753, 1092, 27, 115, "Input",ExpressionUUID->"df43f43c-f3df-4d31-8f47-e316129e404e"],
+Cell[CellGroupData[{
+Cell[31864, 784, 410, 7, 24, "Print",ExpressionUUID->"13bb3e84-1aad-451c-9470-217fab9f697f"],
+Cell[32277, 793, 412, 7, 24, "Print",ExpressionUUID->"c6fece5c-a585-4c90-ab33-806fa3705b71"]
+}, Open  ]],
+Cell[32704, 803, 156, 2, 34, "Output",ExpressionUUID->"829f296d-4387-479f-92bc-7a626dfe607c"]
+}, Open  ]],
+Cell[32875, 808, 427, 9, 52, "Input",ExpressionUUID->"0d3ce3b6-3c94-4932-a9ed-194cea17f2b9"],
+Cell[33305, 819, 1058, 24, 56, "Input",ExpressionUUID->"5a89f228-5332-4b40-9dd2-0e3e845f3970"],
+Cell[34366, 845, 290, 7, 30, "Input",ExpressionUUID->"3a874326-a732-49f9-bf3f-018de4fbf690"],
+Cell[34659, 854, 243, 6, 52, "Input",ExpressionUUID->"37adef6f-081e-487c-bd44-ab449560d571"],
+Cell[CellGroupData[{
+Cell[34927, 864, 998, 26, 115, "Input",ExpressionUUID->"f3c0843b-be94-4b77-89a7-a517bd2df868"],
+Cell[CellGroupData[{
+Cell[35950, 894, 247, 5, 24, "Print",ExpressionUUID->"e2ec887b-8f74-4c58-b508-8180d0a5ab39"],
+Cell[36200, 901, 247, 5, 24, "Print",ExpressionUUID->"37e2fbaf-ebf4-468b-9e07-64d66403941b"],
+Cell[36450, 908, 249, 5, 24, "Print",ExpressionUUID->"2e78dfd3-252a-4510-977f-b4f27ff8aa4b"],
+Cell[36702, 915, 247, 5, 24, "Print",ExpressionUUID->"a0e44cf6-a61f-449f-8a34-2c8ce9d266f3"],
+Cell[36952, 922, 247, 5, 24, "Print",ExpressionUUID->"a931e414-5259-4e72-acd7-dcee07599a82"],
+Cell[37202, 929, 247, 5, 24, "Print",ExpressionUUID->"5594c2a5-c197-4faf-9ffb-e7ba76cbc538"],
+Cell[37452, 936, 247, 5, 24, "Print",ExpressionUUID->"8ecef3ea-5555-4307-bcb5-45617481fea4"],
+Cell[37702, 943, 249, 5, 24, "Print",ExpressionUUID->"84060125-ad1a-4df3-8ce7-b2dbb52a255e"],
+Cell[37954, 950, 247, 5, 24, "Print",ExpressionUUID->"ba89847a-a4aa-4bc8-bbdf-fc4fe94626a9"],
+Cell[38204, 957, 247, 5, 24, "Print",ExpressionUUID->"4ad9a298-9033-4f95-ba31-e459488b2078"],
+Cell[38454, 964, 249, 5, 24, "Print",ExpressionUUID->"0f51e120-6ffe-40ed-90a9-16ffc4b8cd7b"],
+Cell[38706, 971, 249, 5, 24, "Print",ExpressionUUID->"55f10a7d-2dd2-42de-9c51-a8b42913981b"],
+Cell[38958, 978, 247, 5, 24, "Print",ExpressionUUID->"4f770da7-96cd-4cb8-a4d4-ac8321d712cd"],
+Cell[39208, 985, 247, 5, 24, "Print",ExpressionUUID->"649189dd-7c36-4840-a8f2-e90ccecbefc1"],
+Cell[39458, 992, 247, 5, 24, "Print",ExpressionUUID->"69c8ff97-a48c-433d-a1af-293c970ff456"],
+Cell[39708, 999, 247, 5, 24, "Print",ExpressionUUID->"e5097cc9-3fd7-4356-82cc-935a8fd99f37"],
+Cell[39958, 1006, 249, 5, 24, "Print",ExpressionUUID->"2a4fa068-31d2-42b2-8e27-9cd47a215300"],
+Cell[40210, 1013, 247, 5, 24, "Print",ExpressionUUID->"d4490842-541b-4159-b08b-37254e2f02ee"],
+Cell[40460, 1020, 247, 5, 24, "Print",ExpressionUUID->"0ae6d1ae-d897-40b7-83ac-03676d9405d7"],
+Cell[40710, 1027, 247, 5, 24, "Print",ExpressionUUID->"dd1f2688-2c0e-4ed6-aa9d-d7b634519be6"],
+Cell[40960, 1034, 246, 5, 24, "Print",ExpressionUUID->"28b3e938-3807-4e3b-9426-e708dcec15b0"],
+Cell[41209, 1041, 247, 5, 24, "Print",ExpressionUUID->"b68ca497-f2d7-495a-b577-5f5f7cc0b776"],
+Cell[41459, 1048, 247, 5, 24, "Print",ExpressionUUID->"d67f7e5b-0500-4072-a004-7f5c73342e3a"],
+Cell[41709, 1055, 247, 5, 24, "Print",ExpressionUUID->"ce08a793-ce51-4874-b4c7-0d99e3e47784"],
+Cell[41959, 1062, 247, 5, 24, "Print",ExpressionUUID->"fbbc2328-d686-4169-8a45-f2f916e0d9d2"],
+Cell[42209, 1069, 249, 5, 24, "Print",ExpressionUUID->"1cb44eb4-a5e3-4f09-a2dc-7ed04f4bcf1f"],
+Cell[42461, 1076, 247, 5, 24, "Print",ExpressionUUID->"622b5b19-decc-4b43-aecb-2a18b830f72c"],
+Cell[42711, 1083, 249, 5, 24, "Print",ExpressionUUID->"f6dc26ef-5813-4857-bfe4-c26b87bc1f7b"],
+Cell[42963, 1090, 247, 5, 24, "Print",ExpressionUUID->"2d3735df-91e7-4795-8dfd-6ed011d79107"],
+Cell[43213, 1097, 249, 5, 24, "Print",ExpressionUUID->"50fe601d-1b2b-4d2e-807b-1d249afe001e"],
+Cell[43465, 1104, 249, 5, 24, "Print",ExpressionUUID->"2fdfacbd-80ef-4c9a-b71f-e2cc0d9afe5e"],
+Cell[43717, 1111, 247, 5, 24, "Print",ExpressionUUID->"da85be8b-7972-4185-b906-d61dc785a9fd"],
+Cell[43967, 1118, 249, 5, 24, "Print",ExpressionUUID->"1c79d656-868a-4326-8d0a-2659691bbe1c"],
+Cell[44219, 1125, 247, 5, 24, "Print",ExpressionUUID->"efa41b92-f275-451a-ac92-19e0f0f8ac9d"],
+Cell[44469, 1132, 249, 5, 24, "Print",ExpressionUUID->"37e28f01-8fd3-4b48-b1b2-21df0a6ba950"],
+Cell[44721, 1139, 247, 5, 24, "Print",ExpressionUUID->"e844650c-6ee0-4b56-bc47-625127c32e2b"],
+Cell[44971, 1146, 249, 5, 24, "Print",ExpressionUUID->"29f611a5-3fe6-49ea-ba52-f894c5b962a5"],
+Cell[45223, 1153, 247, 5, 24, "Print",ExpressionUUID->"0d1b53d7-40d6-416f-87a6-b7b7a755e497"],
+Cell[45473, 1160, 249, 5, 24, "Print",ExpressionUUID->"dcd3c150-23ea-4f93-8005-bdd7678c1c03"],
+Cell[45725, 1167, 247, 5, 24, "Print",ExpressionUUID->"fe002903-a338-4ec6-ab39-693bb8f32eff"],
+Cell[45975, 1174, 249, 5, 24, "Print",ExpressionUUID->"34a03c80-9c4e-4fcb-b5ff-f3ff0cb1f223"],
+Cell[46227, 1181, 247, 5, 24, "Print",ExpressionUUID->"6cb0347b-630c-40c9-be5c-e11d214769dc"],
+Cell[46477, 1188, 249, 5, 24, "Print",ExpressionUUID->"0815e5f7-0b7c-4ceb-83e7-8cfc79826245"],
+Cell[46729, 1195, 247, 5, 24, "Print",ExpressionUUID->"92f96f11-b3a8-42e5-98e6-6fee3c21c719"],
+Cell[46979, 1202, 247, 5, 24, "Print",ExpressionUUID->"f5dc0de3-7380-4b70-b0d3-54def93aedd4"],
+Cell[47229, 1209, 249, 5, 24, "Print",ExpressionUUID->"a1701a3b-5ef3-47a9-95a2-d8e512233777"],
+Cell[47481, 1216, 247, 5, 24, "Print",ExpressionUUID->"4097feba-7377-4752-bb38-a0921cc43c71"],
+Cell[47731, 1223, 247, 5, 24, "Print",ExpressionUUID->"dd3dbaf1-61f0-453b-9b9a-36874206af99"],
+Cell[47981, 1230, 249, 5, 24, "Print",ExpressionUUID->"40b1ffb0-1c9e-42ee-9160-2930f36cdfaa"],
+Cell[48233, 1237, 245, 5, 24, "Print",ExpressionUUID->"191f384d-858c-4d19-92a6-40c39817d766"],
+Cell[48481, 1244, 246, 5, 24, "Print",ExpressionUUID->"0ad5044a-36b0-4d57-a03e-5b3764fa61c2"],
+Cell[48730, 1251, 247, 5, 24, "Print",ExpressionUUID->"777e0a58-0441-45aa-bb77-379de521b4ea"],
+Cell[48980, 1258, 247, 5, 24, "Print",ExpressionUUID->"26958225-f0de-4b0d-8418-1d0e741744db"],
+Cell[49230, 1265, 247, 5, 24, "Print",ExpressionUUID->"aa153189-1719-4ec3-a6c4-faeae6eb825e"],
+Cell[49480, 1272, 247, 5, 24, "Print",ExpressionUUID->"ad84b383-b8b6-4501-8354-e87c74b4fe47"],
+Cell[49730, 1279, 247, 5, 24, "Print",ExpressionUUID->"fb83c3a6-a8b1-4afc-8465-6456a8260a4f"],
+Cell[49980, 1286, 246, 5, 24, "Print",ExpressionUUID->"cd5fc969-87ec-41e9-8094-20cb832c0cf2"],
+Cell[50229, 1293, 247, 5, 24, "Print",ExpressionUUID->"8f96c2e7-a606-44fd-9bd3-787dbc3507ca"],
+Cell[50479, 1300, 247, 5, 24, "Print",ExpressionUUID->"1cb89dfe-425a-4c52-9b55-b4a6014c9852"],
+Cell[50729, 1307, 247, 5, 24, "Print",ExpressionUUID->"ef7f8635-cadc-4f02-9e3b-547e00252d2e"],
+Cell[50979, 1314, 247, 5, 24, "Print",ExpressionUUID->"4f79ee0d-259f-4d53-809b-53a89f702a3d"],
+Cell[51229, 1321, 247, 5, 24, "Print",ExpressionUUID->"886f8afa-5606-4059-8b26-d7d6af479013"],
+Cell[51479, 1328, 246, 5, 24, "Print",ExpressionUUID->"cd7e7c7e-efdb-40bf-ae88-e79e89aee24f"],
+Cell[51728, 1335, 247, 5, 24, "Print",ExpressionUUID->"f3dba259-3e90-4a75-828b-055cb49c87c8"],
+Cell[51978, 1342, 249, 5, 24, "Print",ExpressionUUID->"37b1dcf0-6b49-4eb5-b721-89fc56a828df"],
+Cell[52230, 1349, 247, 5, 24, "Print",ExpressionUUID->"5f7c8d38-0599-40f0-9972-0a6d5997ecbf"],
+Cell[52480, 1356, 247, 5, 24, "Print",ExpressionUUID->"69c00823-96b0-4daa-9990-36f08fb6ce56"],
+Cell[52730, 1363, 247, 5, 24, "Print",ExpressionUUID->"fb97acd4-1d96-4a85-8bc6-3305a839a3da"],
+Cell[52980, 1370, 247, 5, 24, "Print",ExpressionUUID->"43bad5b4-c421-419d-9915-1b67c66f1036"],
+Cell[53230, 1377, 247, 5, 24, "Print",ExpressionUUID->"f5846949-e47a-4e77-914f-0a8f50e06332"],
+Cell[53480, 1384, 247, 5, 24, "Print",ExpressionUUID->"6a5ef075-fa3d-4ad6-b501-a5cb532fd6f5"],
+Cell[53730, 1391, 247, 5, 24, "Print",ExpressionUUID->"ee5772c0-100c-4ff4-83b0-096fcfc8e2a6"],
+Cell[53980, 1398, 249, 5, 24, "Print",ExpressionUUID->"fec2f95e-20ad-473c-80c7-bfbc2b46c85f"]
+}, Closed]]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[54278, 1409, 414, 10, 52, "Input",ExpressionUUID->"083fb79c-daba-4277-b94e-78bed80412be"],
+Cell[54695, 1421, 709, 19, 46, "Output",ExpressionUUID->"21437e94-a2d0-4030-9577-1fb730a2c01b"]
+}, Open  ]],
+Cell[55419, 1443, 910, 22, 56, "Input",ExpressionUUID->"c9749ffe-5ab8-4c9a-aef7-8af3843d725b"],
+Cell[56332, 1467, 290, 7, 30, "Input",ExpressionUUID->"2d6ff57e-8bdd-4f5e-9772-e77bcbd1d8d0"],
+Cell[56625, 1476, 147, 3, 52, "Input",ExpressionUUID->"2239b8d8-532e-4c08-ac3b-e377a166b460"],
+Cell[56775, 1481, 379, 8, 30, "Input",ExpressionUUID->"e40759ab-7c04-4bf0-a25e-f80786106946"],
+Cell[57157, 1491, 379, 8, 52, "Input",ExpressionUUID->"007158c3-a206-4cab-88ec-886b70f30fed"],
+Cell[CellGroupData[{
+Cell[57561, 1503, 268, 5, 30, "Input",ExpressionUUID->"743fd8ff-17f3-49f2-85d6-506c6d73e5ad"],
+Cell[57832, 1510, 12097, 315, 213, "Output",ExpressionUUID->"0fce6bb0-45fe-4e6c-a361-d7b5261cb38e"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[69966, 1830, 260, 4, 30, "Input",ExpressionUUID->"f774e49f-9f49-4e9e-8986-5d0680aa1203"],
+Cell[70229, 1836, 173, 2, 34, "Output",ExpressionUUID->"1a69893c-2615-4d54-91e8-335f2abb5de6"]
+}, Open  ]],
+Cell[70417, 1841, 278, 5, 136, "Input",ExpressionUUID->"9a42fe37-6411-44bf-809a-1046a3483503"],
+Cell[70698, 1848, 294, 6, 30, "Input",ExpressionUUID->"9e2a44fe-0bb9-4f67-9e8b-da5c10ecf6b1"],
+Cell[CellGroupData[{
+Cell[71017, 1858, 182, 2, 30, "Input",ExpressionUUID->"f396c3bc-ea1b-44d3-a6cc-f7fecc0fffe5"],
+Cell[71202, 1862, 12116, 317, 213, "Output",ExpressionUUID->"1d1b26d3-3d5a-4f24-a113-21f43e2027cf"]
+}, Open  ]],
+Cell[83333, 2182, 812, 19, 94, "Input",ExpressionUUID->"0484a78b-7482-4457-ac3e-5762b8c80c69"],
+Cell[CellGroupData[{
+Cell[84170, 2205, 247, 4, 30, "Input",ExpressionUUID->"6f58dd70-ec76-4b2e-8d7d-ae9f5adae4ca"],
+Cell[84420, 2211, 11414, 300, 191, "Output",ExpressionUUID->"b4f39a2e-5da3-4756-9d30-b57a024860f7"]
+}, Open  ]],
+Cell[95849, 2514, 414, 9, 30, "Input",ExpressionUUID->"6dc8539a-b6fb-45ed-bf01-82aab57aef98"],
+Cell[CellGroupData[{
+Cell[96288, 2527, 236, 4, 30, "Input",ExpressionUUID->"cb0ca33d-b1f5-4703-8d8e-8c263a31064a"],
+Cell[96527, 2533, 11410, 300, 196, "Output",ExpressionUUID->"1d5fa8ad-833f-46d5-a1dc-a4179db033a8"]
+}, Open  ]],
+Cell[107952, 2836, 417, 9, 30, "Input",ExpressionUUID->"5eff98d5-542a-4fb2-8a57-8b5bb386d93b"],
+Cell[CellGroupData[{
+Cell[108394, 2849, 230, 4, 30, "Input",ExpressionUUID->"6b8a882a-c4d7-48c9-bd9a-89d690e1775f"],
+Cell[108627, 2855, 11431, 302, 194, "Output",ExpressionUUID->"0dd69f7f-556b-4cf0-903b-9a63338f9b78"]
+}, Open  ]],
+Cell[120073, 3160, 413, 9, 30, "Input",ExpressionUUID->"786a397e-8276-4b59-936c-1058b86fa2b4"],
+Cell[CellGroupData[{
+Cell[120511, 3173, 232, 4, 30, "Input",ExpressionUUID->"cac28fd3-e795-47f1-a77e-e5a2fe196f33"],
+Cell[120746, 3179, 11631, 306, 199, "Output",ExpressionUUID->"fdf26c39-191c-4b8f-8ed6-4f24a3f9beeb"]
+}, Open  ]],
+Cell[132392, 3488, 462, 11, 52, "Input",ExpressionUUID->"c7feecf3-f47a-423b-924d-e06efe08d9d2"],
+Cell[132857, 3501, 419, 9, 157, "Input",ExpressionUUID->"7e7b9f75-0ed1-4382-a7dd-99907c1473ac"],
+Cell[CellGroupData[{
+Cell[133301, 3514, 248, 4, 30, "Input",ExpressionUUID->"ae98646f-6aec-43fc-bc4c-76b34b9d8371"],
+Cell[133552, 3520, 2181, 62, 146, "Output",ExpressionUUID->"b03d30ad-4939-46cf-b5fe-8b765a9784a2"]
+}, Open  ]],
+Cell[135748, 3585, 1054, 29, 115, "Input",ExpressionUUID->"24b1d6d5-8138-410c-bad0-4688d4069032"],
+Cell[136805, 3616, 396, 9, 136, "Input",ExpressionUUID->"1f278cce-b737-471d-abb8-571bd986d464"],
+Cell[137204, 3627, 265, 5, 30, "Input",ExpressionUUID->"9a2e8cfd-31b0-4513-b860-e5717141a96f"],
+Cell[137472, 3634, 851, 23, 73, "Input",ExpressionUUID->"f2581317-15ac-431d-858d-1506de0ee6ea"],
+Cell[138326, 3659, 239, 5, 30, "Input",ExpressionUUID->"935c66bf-fd6a-4022-88ef-839267449906"],
+Cell[138568, 3666, 255, 5, 115, "Input",ExpressionUUID->"e4eda86f-c0c1-4ed1-b09c-a197bbc299c9"],
+Cell[138826, 3673, 1202, 32, 136, "Input",ExpressionUUID->"e7549059-0b03-41c9-afd1-97986dde3359"],
+Cell[140031, 3707, 154, 3, 30, "Input",ExpressionUUID->"75c75df4-ee72-49af-9630-1cf0eef74f43"],
+Cell[140188, 3712, 128, 3, 30, "Input",ExpressionUUID->"a4013e44-a682-4c70-a84f-f4695f7dd230"],
+Cell[140319, 3717, 238, 5, 30, "Input",ExpressionUUID->"73dfc6d7-5c31-463e-8864-6b5bef17b11d"],
+Cell[CellGroupData[{
+Cell[140582, 3726, 524, 14, 30, "Input",ExpressionUUID->"b4100299-10f3-4c3c-90b5-db96319fb7d9"],
+Cell[141109, 3742, 3541, 105, 133, "Output",ExpressionUUID->"227ac9fd-122f-4bdd-8ce6-0421fc3101b9"]
+}, Open  ]],
+Cell[144665, 3850, 636, 18, 52, "Input",ExpressionUUID->"d027658a-37f9-489d-a307-4d535ae073b9"],
+Cell[CellGroupData[{
+Cell[145326, 3872, 203, 3, 30, "Input",ExpressionUUID->"55e4d6af-838f-45bf-ab25-da03c1c1d848"],
+Cell[145532, 3877, 3741, 113, 161, "Output",ExpressionUUID->"f7adf7fb-3d44-404a-b9d8-8367ef825cc7"]
+}, Open  ]],
+Cell[149288, 3993, 328, 6, 115, "Input",ExpressionUUID->"a9b9ca57-f825-4517-8b39-8ebebaffad8a"],
+Cell[149619, 4001, 1735, 50, 136, "Input",ExpressionUUID->"f261cfc3-9a94-4830-9195-aa48c3328d0f"],
+Cell[151357, 4053, 1023, 26, 178, "Input",ExpressionUUID->"5fb9542c-66c2-4b59-b6c0-3d1e3db1842f"],
+Cell[152383, 4081, 195, 4, 30, "Input",ExpressionUUID->"ce77b5bd-ebce-4c42-9263-53392240007e"],
+Cell[152581, 4087, 1358, 37, 115, "Input",ExpressionUUID->"9997d1a8-9d83-430a-8554-6cfc2a974c27"],
+Cell[153942, 4126, 1818, 48, 178, "Input",ExpressionUUID->"3e8bf30c-17cd-43d9-b2c2-32aaac3fabf4"],
+Cell[155763, 4176, 906, 22, 115, "Input",ExpressionUUID->"0faeac76-b8a2-41ff-a322-8a7cc20f5cdc"],
+Cell[CellGroupData[{
+Cell[156694, 4202, 547, 11, 52, "Input",ExpressionUUID->"0aeaadd3-5332-4530-a274-2d257367f236"],
+Cell[CellGroupData[{
+Cell[157266, 4217, 196, 4, 24, "Print",ExpressionUUID->"941d2971-0756-46af-bbfa-35b438dd0e63"],
+Cell[157465, 4223, 198, 4, 24, "Print",ExpressionUUID->"7f9fc3c9-6ddc-47d5-af72-107027ebb276"],
+Cell[157666, 4229, 196, 4, 24, "Print",ExpressionUUID->"da3f0120-fdef-4857-aa25-2ee29cd3ae1a"],
+Cell[157865, 4235, 198, 4, 24, "Print",ExpressionUUID->"b6c871c9-430f-4950-8ffa-bdb5d1f09ffe"],
+Cell[158066, 4241, 196, 4, 24, "Print",ExpressionUUID->"08b8650b-700a-4a81-98cd-762915822ac6"],
+Cell[158265, 4247, 196, 4, 24, "Print",ExpressionUUID->"dc323011-3d7c-4c71-98f9-fc651ab59bcd"],
+Cell[158464, 4253, 196, 4, 24, "Print",ExpressionUUID->"dcbc9173-996e-4615-8934-be1437da9dbc"],
+Cell[158663, 4259, 196, 4, 24, "Print",ExpressionUUID->"5235f72f-1e09-460f-a972-86c8776de7bf"],
+Cell[158862, 4265, 196, 4, 24, "Print",ExpressionUUID->"51d0dc87-3144-4105-a8ae-a650d049a319"],
+Cell[159061, 4271, 197, 4, 24, "Print",ExpressionUUID->"61f11d61-f008-44dc-96d0-db1dad10327b"],
+Cell[159261, 4277, 199, 4, 24, "Print",ExpressionUUID->"f3db9187-5fb7-4179-9d5d-fee11f151b8a"],
+Cell[159463, 4283, 197, 4, 24, "Print",ExpressionUUID->"55143390-2218-4242-8577-41b5b68bf26f"],
+Cell[159663, 4289, 197, 4, 24, "Print",ExpressionUUID->"de5e700a-5013-445e-b472-25d383ca5cf3"],
+Cell[159863, 4295, 197, 4, 24, "Print",ExpressionUUID->"04316d54-f297-424b-9b49-acfd45d21630"],
+Cell[160063, 4301, 199, 4, 24, "Print",ExpressionUUID->"017b3ad1-2b25-45a4-8b9d-111686161236"],
+Cell[160265, 4307, 199, 4, 24, "Print",ExpressionUUID->"cf381b0c-ac88-40ab-b951-874fcfdfa6c6"],
+Cell[160467, 4313, 197, 4, 24, "Print",ExpressionUUID->"67e161ed-8390-46fa-a181-f56c98936077"],
+Cell[160667, 4319, 197, 4, 24, "Print",ExpressionUUID->"12eddb76-c821-45d5-9119-d5d357f2d4eb"],
+Cell[160867, 4325, 197, 4, 24, "Print",ExpressionUUID->"f42cca31-6f52-49bc-b356-94d57c78fd27"],
+Cell[161067, 4331, 197, 4, 24, "Print",ExpressionUUID->"812113fc-a308-46fd-b058-9e34214fc722"],
+Cell[161267, 4337, 197, 4, 24, "Print",ExpressionUUID->"5f1deb06-8268-41a5-84bd-e5a8ada699a5"],
+Cell[161467, 4343, 199, 4, 24, "Print",ExpressionUUID->"28c127e4-f366-4435-9db7-8b114a82b320"],
+Cell[161669, 4349, 199, 4, 24, "Print",ExpressionUUID->"db1f8f22-c844-4e1e-892c-73ca3a41eaee"],
+Cell[161871, 4355, 197, 4, 24, "Print",ExpressionUUID->"ae692077-c31d-43f0-a099-c52e179f8dea"],
+Cell[162071, 4361, 196, 4, 24, "Print",ExpressionUUID->"8f0af9a8-1bc7-4b92-a518-3b7fb75be3ae"],
+Cell[162270, 4367, 197, 4, 24, "Print",ExpressionUUID->"60b61b67-6c61-4599-a20d-463c308eb270"],
+Cell[162470, 4373, 197, 4, 24, "Print",ExpressionUUID->"60c27d5d-d770-45b4-8b6e-611a3c03ef79"],
+Cell[162670, 4379, 197, 4, 24, "Print",ExpressionUUID->"e5c01ae9-55fc-47f8-9c3d-6f54b4b00756"],
+Cell[162870, 4385, 196, 4, 24, "Print",ExpressionUUID->"7f11c8de-f7aa-4313-ab85-f0bc8404662d"],
+Cell[163069, 4391, 199, 4, 24, "Print",ExpressionUUID->"9e154613-6e9c-4d11-8ddd-6170705528ab"],
+Cell[163271, 4397, 197, 4, 24, "Print",ExpressionUUID->"2f8e02d9-a5b4-4bd9-b9d9-aec02153dd7c"],
+Cell[163471, 4403, 199, 4, 24, "Print",ExpressionUUID->"650def7c-a65f-44fb-811b-1fa0b5a45d15"],
+Cell[163673, 4409, 199, 4, 24, "Print",ExpressionUUID->"6474532b-9599-4489-88db-58d38314ab6f"],
+Cell[163875, 4415, 197, 4, 24, "Print",ExpressionUUID->"226a40c4-f169-42d2-8ab6-1f67a2f873ea"],
+Cell[164075, 4421, 196, 4, 24, "Print",ExpressionUUID->"a1944f0f-52a8-49d8-b9c3-20fec2f3235a"],
+Cell[164274, 4427, 197, 4, 24, "Print",ExpressionUUID->"3b4b9b10-ab7e-4de6-ab0f-e0018abf925b"],
+Cell[164474, 4433, 196, 4, 24, "Print",ExpressionUUID->"6c480e69-9121-408a-8dec-f908c61e8d42"],
+Cell[164673, 4439, 199, 4, 24, "Print",ExpressionUUID->"cba40a3e-274e-4ca6-acca-4f9780f8640b"],
+Cell[164875, 4445, 197, 4, 24, "Print",ExpressionUUID->"e62616bb-5c74-4eeb-afa2-bb439d81b80e"],
+Cell[165075, 4451, 197, 4, 24, "Print",ExpressionUUID->"52e54f32-ac58-4414-93fa-68fcf6f14698"],
+Cell[165275, 4457, 197, 4, 24, "Print",ExpressionUUID->"50d0b363-2b99-4f39-bfc0-29a59ae13c83"],
+Cell[165475, 4463, 197, 4, 24, "Print",ExpressionUUID->"5dca03fa-6242-4056-b5c8-360525f873d4"],
+Cell[165675, 4469, 197, 4, 24, "Print",ExpressionUUID->"91a05c83-f424-4d73-8df9-fd9365c15c65"],
+Cell[165875, 4475, 197, 4, 24, "Print",ExpressionUUID->"e35ff97f-1b31-4eec-84d3-b936608c353c"],
+Cell[166075, 4481, 197, 4, 24, "Print",ExpressionUUID->"45f0eca5-0ad3-474d-8922-cc6c393a259f"]
+}, Open  ]],
+Cell[166287, 4488, 196, 3, 34, "Output",ExpressionUUID->"cfcdfb24-b305-466a-a1bb-a332ab352a9e"]
+}, Closed]],
+Cell[166498, 4494, 371, 8, 26, "Input",ExpressionUUID->"09576c11-deed-4e65-b168-19d328941f7e"],
+Cell[166872, 4504, 1052, 28, 115, "Input",ExpressionUUID->"e9cb917d-6bce-4b94-a047-15b919e9e4cc"],
+Cell[167927, 4534, 883, 22, 115, "Input",ExpressionUUID->"58da36ab-d8d7-464f-a677-c4ffb3b43015"],
+Cell[CellGroupData[{
+Cell[168835, 4560, 441, 10, 30, "Input",ExpressionUUID->"93d22a91-7738-43f2-ae38-e21755ca22f1"],
+Cell[169279, 4572, 515, 11, 42, "Message",ExpressionUUID->"dc04a919-7e52-45e2-bb44-a344b5d1d308"],
+Cell[169797, 4585, 513, 11, 42, "Message",ExpressionUUID->"99a74ed9-9abc-451d-8242-fd4078fd5891"],
+Cell[170313, 4598, 515, 11, 42, "Message",ExpressionUUID->"1070ad89-c66d-4906-aa54-fd4ac95964d8"],
+Cell[170831, 4611, 461, 10, 24, "Message",ExpressionUUID->"9dbf4032-8c2f-4bba-9001-aa2649499b6f"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[171329, 4626, 154, 3, 30, "Input",ExpressionUUID->"6e5f5a2d-f8d8-41cc-b7f7-193907c772e2"],
+Cell[171486, 4631, 4419372, 95030, 90964, "Output",ExpressionUUID->"6849d88e-ad0f-49c4-99da-875ddf3df840"]
+}, Closed]],
+Cell[4590873, 99664, 152, 3, 26, "Input",ExpressionUUID->"3bccd808-2d0d-4aed-ad5c-f98dce1bb2fa"],
+Cell[4591028, 99669, 151, 3, 30, "Input",ExpressionUUID->"9214d531-c1c4-4f0b-8067-62d509d3780e"],
+Cell[4591182, 99674, 152, 3, 30, "Input",ExpressionUUID->"5d134bbf-d270-4d46-9aad-c35a20b3af10"],
+Cell[4591337, 99679, 1248, 34, 115, "Input",ExpressionUUID->"c9706e32-aa64-4bea-be5e-fca139f74b78"],
+Cell[4592588, 99715, 1047, 24, 94, "Input",ExpressionUUID->"2098a55c-4e04-413e-b48c-2e3e1420aeba"],
+Cell[4593638, 99741, 716, 17, 73, "Input",ExpressionUUID->"f11165e8-30f4-4621-91cb-e78cc1116c62"],
+Cell[4594357, 99760, 302, 5, 30, "Input",ExpressionUUID->"881beb7c-e557-4703-a5ed-8b7345c6403b"],
+Cell[CellGroupData[{
+Cell[4594684, 99769, 240, 4, 30, "Input",ExpressionUUID->"86953094-992b-4ece-81d3-0f54f8c99910"],
+Cell[CellGroupData[{
+Cell[4594949, 99777, 197, 4, 24, "Print",ExpressionUUID->"8b88be0a-a13e-4a7b-8295-c1008ad658d6"],
+Cell[4595149, 99783, 198, 4, 24, "Print",ExpressionUUID->"f854acc1-f24a-43ce-9107-892da3741105"],
+Cell[4595350, 99789, 198, 4, 24, "Print",ExpressionUUID->"0ebf2041-29ad-490d-ae2c-fb00ea60e896"],
+Cell[4595551, 99795, 198, 4, 24, "Print",ExpressionUUID->"ce7c7420-29bb-4bc7-9fe1-c52d92b3c17c"],
+Cell[4595752, 99801, 198, 4, 24, "Print",ExpressionUUID->"bdb7f0f5-ae0e-47e3-bde4-add2b2e9172d"],
+Cell[4595953, 99807, 198, 4, 24, "Print",ExpressionUUID->"6ccc5234-8d31-4f80-b860-fb9bc1ead01e"],
+Cell[4596154, 99813, 198, 4, 24, "Print",ExpressionUUID->"9f6f5a15-4625-4559-aeb6-4e62d60ea660"],
+Cell[4596355, 99819, 200, 4, 24, "Print",ExpressionUUID->"cc753901-6a7d-4228-ac53-35d451b86d77"],
+Cell[4596558, 99825, 198, 4, 24, "Print",ExpressionUUID->"8fe1d30b-85ec-47bd-8e46-174bcc6be6cf"],
+Cell[4596759, 99831, 199, 4, 24, "Print",ExpressionUUID->"cd6b11e5-086b-4a28-ba23-c88ce09cbddb"]
+}, Open  ]],
+Cell[4596973, 99838, 196, 3, 34, "Output",ExpressionUUID->"f9eb79c9-79ab-4972-ac5d-9bf4d7c5706c"]
+}, Closed]],
+Cell[CellGroupData[{
+Cell[4597206, 99846, 241, 4, 26, "Input",ExpressionUUID->"f96bfd50-3c93-487b-b72c-0efa966db052"],
+Cell[CellGroupData[{
+Cell[4597472, 99854, 197, 4, 24, "Print",ExpressionUUID->"0df55f20-b51c-4417-8687-560b75680ad9"],
+Cell[4597672, 99860, 199, 4, 24, "Print",ExpressionUUID->"65afac5f-ac1b-405d-95ca-d88dcc034907"],
+Cell[4597874, 99866, 199, 4, 24, "Print",ExpressionUUID->"155d77b5-d5ca-47b5-bba8-036aff1d2443"],
+Cell[4598076, 99872, 199, 4, 24, "Print",ExpressionUUID->"6402840f-e54b-49d2-8ce8-0175340b2083"],
+Cell[4598278, 99878, 199, 4, 24, "Print",ExpressionUUID->"736736de-4f33-4375-9ad5-d9f98f5dba87"],
+Cell[4598480, 99884, 197, 4, 24, "Print",ExpressionUUID->"5d2d9825-5632-4457-8211-7dd6cee750a8"],
+Cell[4598680, 99890, 197, 4, 24, "Print",ExpressionUUID->"23906453-43f1-4403-92b6-e9fb94c0ae50"],
+Cell[4598880, 99896, 197, 4, 24, "Print",ExpressionUUID->"2ba2eb99-fc54-459f-85c0-ed99d7ad07c9"],
+Cell[4599080, 99902, 197, 4, 24, "Print",ExpressionUUID->"94070629-691b-4d0a-9eb7-69b91078a11e"],
+Cell[4599280, 99908, 197, 4, 24, "Print",ExpressionUUID->"3812bf93-11c7-45dc-bd0e-7ed9238191ce"]
+}, Open  ]],
+Cell[4599492, 99915, 196, 3, 34, "Output",ExpressionUUID->"3f41a929-7beb-4259-8ecb-4fc1d8a69374"]
+}, Closed]],
+Cell[CellGroupData[{
+Cell[4599725, 99923, 243, 4, 26, "Input",ExpressionUUID->"fe1a97a8-532e-4e7a-8a88-f565caae5f97"],
+Cell[CellGroupData[{
+Cell[4599993, 99931, 201, 4, 24, "Print",ExpressionUUID->"203826e8-d100-4a48-aa61-b8cae880ddf2"],
+Cell[4600197, 99937, 199, 4, 24, "Print",ExpressionUUID->"9a8a2d64-a921-4ebe-b6c4-e90419eee1c2"],
+Cell[4600399, 99943, 199, 4, 24, "Print",ExpressionUUID->"ceff1cb8-2c39-4c0f-a43a-efcbdbef0fe2"],
+Cell[4600601, 99949, 201, 4, 24, "Print",ExpressionUUID->"89a661a3-5c0c-4326-a393-6e4972db4a6b"],
+Cell[4600805, 99955, 201, 4, 24, "Print",ExpressionUUID->"6aa6f90c-6c91-4f86-8968-1103cba7975b"],
+Cell[4601009, 99961, 199, 4, 24, "Print",ExpressionUUID->"0dcb36c1-0668-4b8a-bc01-4945a598c78a"],
+Cell[4601211, 99967, 199, 4, 24, "Print",ExpressionUUID->"0fcfcd70-8d7b-435d-a163-acb028e6e16e"],
+Cell[4601413, 99973, 199, 4, 24, "Print",ExpressionUUID->"3b7724cb-54a4-4dde-8ea0-50e5610b792e"],
+Cell[4601615, 99979, 199, 4, 24, "Print",ExpressionUUID->"b613c9c7-96f4-4a6c-8f08-8e6df52762df"],
+Cell[4601817, 99985, 199, 4, 24, "Print",ExpressionUUID->"a6fd0189-8e91-469a-9897-389a4893d7b0"]
+}, Open  ]],
+Cell[4602031, 99992, 196, 3, 34, "Output",ExpressionUUID->"4a8fef41-31e5-42c1-8bdc-68e9f7afbd6a"]
+}, Closed]],
+Cell[CellGroupData[{
+Cell[4602264, 100000, 242, 4, 26, "Input",ExpressionUUID->"2aecbe65-4b44-4dfa-93ef-65fd39540c9b"],
+Cell[CellGroupData[{
+Cell[4602531, 100008, 197, 4, 24, "Print",ExpressionUUID->"2fca990b-8284-4e3f-8a3b-7f56db89acc5"],
+Cell[4602731, 100014, 197, 4, 24, "Print",ExpressionUUID->"3177b850-296d-49fe-8867-d3473a1b0c35"],
+Cell[4602931, 100020, 197, 4, 24, "Print",ExpressionUUID->"c0b4e928-89e9-4d85-8e51-5cbdf9ce41aa"],
+Cell[4603131, 100026, 197, 4, 24, "Print",ExpressionUUID->"a373700f-9836-44d5-8a5f-930119678171"],
+Cell[4603331, 100032, 197, 4, 24, "Print",ExpressionUUID->"ca822f7e-70c9-46a4-a25f-582acb77abcb"],
+Cell[4603531, 100038, 197, 4, 24, "Print",ExpressionUUID->"96e22b30-8c73-4518-8d23-873121d8fc48"],
+Cell[4603731, 100044, 197, 4, 24, "Print",ExpressionUUID->"83708b79-d67b-4c05-93e9-38073aa7fe05"],
+Cell[4603931, 100050, 197, 4, 24, "Print",ExpressionUUID->"78e88359-b700-4328-bea6-a2b0d14a7cac"],
+Cell[4604131, 100056, 197, 4, 24, "Print",ExpressionUUID->"704157f3-bfb2-4f43-b5f0-c5bfbc560aab"],
+Cell[4604331, 100062, 197, 4, 24, "Print",ExpressionUUID->"7565254f-9a77-48dc-9444-33b886723862"]
+}, Open  ]],
+Cell[4604543, 100069, 200, 3, 34, "Output",ExpressionUUID->"2e1c38af-7450-4ecc-a05c-257dcdba5451"]
+}, Closed]],
+Cell[CellGroupData[{
+Cell[4604780, 100077, 241, 4, 26, "Input",ExpressionUUID->"8ee863b5-d147-4e8a-bd18-9c421dd23787"],
+Cell[CellGroupData[{
+Cell[4605046, 100085, 197, 4, 24, "Print",ExpressionUUID->"2009a193-ceea-46ef-bd80-037d926017cf"],
+Cell[4605246, 100091, 199, 4, 24, "Print",ExpressionUUID->"0a74d1db-0a55-41c7-a355-eca543eb70e7"],
+Cell[4605448, 100097, 197, 4, 24, "Print",ExpressionUUID->"e55077bb-d892-44dc-b006-f69eb07618f5"],
+Cell[4605648, 100103, 197, 4, 24, "Print",ExpressionUUID->"55c1e9be-56a5-4944-b983-985ca4b80876"],
+Cell[4605848, 100109, 197, 4, 24, "Print",ExpressionUUID->"17abba4e-1848-488c-bde6-35cdf05998d4"],
+Cell[4606048, 100115, 199, 4, 24, "Print",ExpressionUUID->"8842af6b-8a1e-48e1-98ef-18ca8f39a91d"],
+Cell[4606250, 100121, 197, 4, 24, "Print",ExpressionUUID->"c65f5711-d87e-4702-85dc-948bb2237f08"],
+Cell[4606450, 100127, 197, 4, 24, "Print",ExpressionUUID->"c6fbe64a-ceca-439e-8b29-9c26adf965ef"],
+Cell[4606650, 100133, 199, 4, 24, "Print",ExpressionUUID->"9fcc8d20-19ef-45d4-bc4b-aefbb0a6e431"],
+Cell[4606852, 100139, 197, 4, 24, "Print",ExpressionUUID->"3f30f015-4bfc-47f5-99d8-e3f68011c8c2"]
+}, Open  ]],
+Cell[4607064, 100146, 196, 3, 34, "Output",ExpressionUUID->"6069c659-d902-4918-a553-fc39b0ec194b"]
+}, Closed]],
+Cell[CellGroupData[{
+Cell[4607297, 100154, 241, 4, 26, "Input",ExpressionUUID->"71acea69-b2b3-491d-ae15-f4df099b9b39"],
+Cell[CellGroupData[{
+Cell[4607563, 100162, 199, 4, 24, "Print",ExpressionUUID->"4145e9a2-b86f-444d-9e6f-514e102a7a17"],
+Cell[4607765, 100168, 197, 4, 24, "Print",ExpressionUUID->"0f110600-9945-4ce8-ada0-239cd91d8e03"],
+Cell[4607965, 100174, 199, 4, 24, "Print",ExpressionUUID->"f8453fc4-a721-4441-9016-2af31abf7022"],
+Cell[4608167, 100180, 196, 4, 24, "Print",ExpressionUUID->"e7b4daf0-0724-4551-8ded-34ecced4ec32"],
+Cell[4608366, 100186, 197, 4, 24, "Print",ExpressionUUID->"654cff30-d67b-463f-9d66-f38a5cbd6e2c"],
+Cell[4608566, 100192, 197, 4, 24, "Print",ExpressionUUID->"0398c397-cea0-48c6-adee-2da2335e66cb"],
+Cell[4608766, 100198, 197, 4, 24, "Print",ExpressionUUID->"0f95316d-23be-46b1-8fb4-6dfdb7e99fe2"],
+Cell[4608966, 100204, 199, 4, 24, "Print",ExpressionUUID->"0996f87d-8f52-4872-8581-efb748040ff9"],
+Cell[4609168, 100210, 197, 4, 24, "Print",ExpressionUUID->"6098c8b1-ad3d-4b8a-850a-4b9fb5e363cf"],
+Cell[4609368, 100216, 197, 4, 24, "Print",ExpressionUUID->"57383c2a-c8e3-461c-bd50-359a76498569"]
+}, Open  ]],
+Cell[4609580, 100223, 196, 3, 34, "Output",ExpressionUUID->"abee5d57-ae1c-4b68-8896-520cd5335c43"]
+}, Closed]],
+Cell[CellGroupData[{
+Cell[4609813, 100231, 243, 4, 26, "Input",ExpressionUUID->"75b90654-1ac3-4894-8e5d-81d701b5e39a"],
+Cell[CellGroupData[{
+Cell[4610081, 100239, 197, 4, 24, "Print",ExpressionUUID->"eea3546e-d9ee-471e-845d-31f4851702d4"],
+Cell[4610281, 100245, 196, 4, 24, "Print",ExpressionUUID->"aedb175e-f30c-4a30-9760-18498d2f5ebb"],
+Cell[4610480, 100251, 197, 4, 24, "Print",ExpressionUUID->"9ef01fde-35d5-4cdb-8e20-06150be4917d"],
+Cell[4610680, 100257, 196, 4, 24, "Print",ExpressionUUID->"801f39b3-2897-4def-aace-35be798602f1"],
+Cell[4610879, 100263, 199, 4, 24, "Print",ExpressionUUID->"4524b0a4-c3cf-4eee-9bae-4a4411158765"],
+Cell[4611081, 100269, 199, 4, 24, "Print",ExpressionUUID->"9ad23010-af47-4eb5-80b1-72cc7a2f8eb2"],
+Cell[4611283, 100275, 196, 4, 24, "Print",ExpressionUUID->"9a39c0cc-b71d-4bfb-b47a-e3532770aa9b"],
+Cell[4611482, 100281, 199, 4, 24, "Print",ExpressionUUID->"e9a4811a-4dfc-4847-9ed8-9f5e7fb0a1bd"],
+Cell[4611684, 100287, 197, 4, 24, "Print",ExpressionUUID->"4a551457-b8aa-425f-b484-9ebe7095e485"],
+Cell[4611884, 100293, 196, 4, 24, "Print",ExpressionUUID->"ed43c117-5a2c-4198-9efb-7da7dd4d4034"]
+}, Open  ]],
+Cell[4612095, 100300, 196, 3, 34, "Output",ExpressionUUID->"1a9dd832-cded-404a-9e8e-55603b4d7433"]
+}, Closed]],
+Cell[CellGroupData[{
+Cell[4612328, 100308, 292, 5, 26, "Input",ExpressionUUID->"f824d033-691a-4d1f-92f5-4ab01423a5ad"],
+Cell[CellGroupData[{
+Cell[4612645, 100317, 177, 4, 24, "Print",ExpressionUUID->"92d7c1bd-c362-4205-9f66-6a01b447a4eb"],
+Cell[4612825, 100323, 175, 4, 24, "Print",ExpressionUUID->"54df0102-003b-4884-bb53-111b767a4c0f"],
+Cell[4613003, 100329, 174, 4, 24, "Print",ExpressionUUID->"42fe5d37-9e86-4d1b-b9a2-35370152be1a"],
+Cell[4613180, 100335, 177, 4, 24, "Print",ExpressionUUID->"e05f68ba-59c9-4014-82ba-94955347b056"]
+}, Open  ]],
+Cell[4613372, 100342, 174, 3, 34, "Output",ExpressionUUID->"52db8c9f-9b99-4b63-bfd9-226b29998173"]
+}, Closed]],
+Cell[CellGroupData[{
+Cell[4613583, 100350, 228, 4, 26, "Input",ExpressionUUID->"e1619147-dbd8-4b95-92c0-a0a9e3d6e05f"],
+Cell[4613814, 100356, 729, 19, 46, "Output",ExpressionUUID->"6b31f62a-bb61-4325-bbb2-0f8b38f9d9b0"]
+}, Open  ]],
+Cell[4614558, 100378, 200, 4, 32, "Item",ExpressionUUID->"b8f7dd32-654c-4d69-a388-00e73e20b2c5"],
+Cell[CellGroupData[{
+Cell[4614783, 100386, 639, 16, 52, "Input",ExpressionUUID->"6385e4e6-3aa6-4ca7-8de4-83d30633a5ae"],
+Cell[4615425, 100404, 158, 2, 34, "Output",ExpressionUUID->"20e798ff-b0ce-4e4d-8da1-a093ebf96720"]
+}, Open  ]],
+Cell[4615598, 100409, 184, 4, 30, "Input",ExpressionUUID->"35538101-3df6-4320-82c6-fb90398dcf8b"],
+Cell[CellGroupData[{
+Cell[4615807, 100417, 241, 4, 30, "Input",ExpressionUUID->"c6f1e48f-f2b3-4633-a270-2d837481a3a1"],
+Cell[4616051, 100423, 396, 10, 24, "Message",ExpressionUUID->"da0ce5b5-a752-4f0c-81a9-b9f06d7ab115"],
+Cell[4616450, 100435, 394, 10, 24, "Message",ExpressionUUID->"be0f414f-c102-4bf4-9e35-0d311e65c76f"],
+Cell[CellGroupData[{
+Cell[4616869, 100449, 177, 4, 24, "Print",ExpressionUUID->"3bba7d8f-9b06-484f-b4d3-632f231afc37"],
+Cell[4617049, 100455, 177, 4, 24, "Print",ExpressionUUID->"f659f692-01ec-4858-acaa-d60f4b4998e6"],
+Cell[4617229, 100461, 175, 4, 24, "Print",ExpressionUUID->"e9e35560-6a98-4d85-ba46-29424be208af"],
+Cell[4617407, 100467, 177, 4, 24, "Print",ExpressionUUID->"5d1876d0-f98c-4bb2-9711-124711ea1dab"],
+Cell[4617587, 100473, 175, 4, 24, "Print",ExpressionUUID->"ae667c6d-6a3b-4b8a-9bf8-9c76aa4faf28"]
+}, Open  ]],
+Cell[4617777, 100480, 247, 4, 34, "Output",ExpressionUUID->"88acd967-1c2c-4b4e-b73d-ecbd06540448"]
+}, Closed]],
+Cell[CellGroupData[{
+Cell[4618061, 100489, 241, 4, 26, "Input",ExpressionUUID->"8d487f69-3cc5-4b15-a17c-36b0f0a098da"],
+Cell[CellGroupData[{
+Cell[4618327, 100497, 175, 4, 24, "Print",ExpressionUUID->"2846bb9c-a0e3-4cc6-9863-49dc879372fb"],
+Cell[4618505, 100503, 175, 4, 24, "Print",ExpressionUUID->"8e8e94ae-2685-46cf-824c-9dccd6aaa7c9"],
+Cell[4618683, 100509, 175, 4, 24, "Print",ExpressionUUID->"ea5a6e57-459b-44f3-af8d-e27fd9f73504"],
+Cell[4618861, 100515, 175, 4, 24, "Print",ExpressionUUID->"236d0628-1541-4ee1-8294-d993f0d4fc6b"],
+Cell[4619039, 100521, 175, 4, 24, "Print",ExpressionUUID->"41931755-f8dd-4016-8ec3-12f189f6c48b"],
+Cell[4619217, 100527, 177, 4, 24, "Print",ExpressionUUID->"87cc3efa-15c5-4aac-9f59-fc77c411956d"],
+Cell[4619397, 100533, 175, 4, 24, "Print",ExpressionUUID->"c28fc9bb-8175-41ae-b5b8-a2af110aa01e"],
+Cell[4619575, 100539, 175, 4, 24, "Print",ExpressionUUID->"c804e0fc-13b8-404c-be08-a7e750465f41"],
+Cell[4619753, 100545, 175, 4, 24, "Print",ExpressionUUID->"017215f5-e5a5-412a-95b0-02e856ef17cf"],
+Cell[4619931, 100551, 175, 4, 24, "Print",ExpressionUUID->"27abe593-5557-4139-b432-a9d130c93652"]
+}, Open  ]],
+Cell[4620121, 100558, 174, 3, 34, "Output",ExpressionUUID->"27df6f47-5fa2-4e39-b7f2-afc3c720e098"]
+}, Closed]],
+Cell[4620310, 100564, 190, 5, 26, "Input",ExpressionUUID->"df98973f-1c7c-43bf-ada2-bc8f065d9ee0"],
+Cell[CellGroupData[{
+Cell[4620525, 100573, 319, 6, 30, "Input",ExpressionUUID->"2649d505-baee-414f-ba61-a848c431375f"],
+Cell[CellGroupData[{
+Cell[4620869, 100583, 177, 4, 24, "Print",ExpressionUUID->"d990281d-da4e-44ce-bba0-3be9e51984c8"],
+Cell[4621049, 100589, 175, 4, 24, "Print",ExpressionUUID->"8e564ec2-2ba2-4af6-8839-241a48c4b011"]
+}, Open  ]]
+}, Closed]],
+Cell[CellGroupData[{
+Cell[4621273, 100599, 270, 6, 26, "Input",ExpressionUUID->"e440a8fa-6daf-4e52-952c-f2a2da027d58"],
+Cell[CellGroupData[{
+Cell[4621568, 100609, 175, 4, 24, "Print",ExpressionUUID->"47e9eb29-eb3c-44eb-bde5-daa461e7965a"],
+Cell[4621746, 100615, 175, 4, 24, "Print",ExpressionUUID->"3c8d7c90-91f7-46fd-ac69-8701bacfe25a"],
+Cell[4621924, 100621, 175, 4, 24, "Print",ExpressionUUID->"44a1988b-44c7-4cc4-accc-daccc86bdfec"]
+}, Open  ]]
+}, Closed]],
+Cell[CellGroupData[{
+Cell[4622148, 100631, 273, 6, 26, "Input",ExpressionUUID->"ccd5003b-7be8-4452-a781-58d0de738e3e"],
+Cell[CellGroupData[{
+Cell[4622446, 100641, 177, 4, 24, "Print",ExpressionUUID->"590c91e2-ef3c-4505-aa0b-95d55137b2bb"],
+Cell[4622626, 100647, 175, 4, 24, "Print",ExpressionUUID->"69d37e74-c56f-4a12-bc84-953b1ee45562"],
+Cell[4622804, 100653, 175, 4, 24, "Print",ExpressionUUID->"400a6676-c5b0-4df1-b6bb-83a59b331179"]
+}, Open  ]]
+}, Closed]],
+Cell[4623006, 100661, 190, 5, 26, "Input",ExpressionUUID->"07237824-5e81-41b0-bd1d-7d744858c3ed"],
+Cell[4623199, 100668, 245, 4, 30, "Input",ExpressionUUID->"4d28e53c-4af5-40ba-890a-a6a9f9544d99"],
+Cell[4623447, 100674, 245, 4, 30, "Input",ExpressionUUID->"712b80aa-b8c4-4294-a783-8d276a083f12"],
+Cell[CellGroupData[{
+Cell[4623717, 100682, 245, 4, 30, "Input",ExpressionUUID->"0121b0f2-33a2-4f93-abd0-b7335f00f4ba"],
+Cell[4623965, 100688, 482, 11, 24, "Message",ExpressionUUID->"535114a6-b030-4308-8246-00c024410468"],
+Cell[4624450, 100701, 488, 11, 24, "Message",ExpressionUUID->"3fff711e-1dcc-463e-a740-414e01e7545b"],
+Cell[4624941, 100714, 200, 4, 24, "Print",ExpressionUUID->"02b1fe8c-97b1-4f62-af5e-560a0f061657"],
+Cell[4625144, 100720, 485, 11, 24, "Message",ExpressionUUID->"4d229124-7f85-4bce-9345-8223a1b56caa"],
+Cell[4625632, 100733, 488, 11, 24, "Message",ExpressionUUID->"9b026f9b-c1da-4642-96e1-ffec3e99e1ad"],
+Cell[4626123, 100746, 200, 4, 24, "Print",ExpressionUUID->"ee45a9cb-8f55-46b4-86d8-aa90b6d7b196"],
+Cell[4626326, 100752, 483, 11, 24, "Message",ExpressionUUID->"3f134fed-054a-4e7f-bf83-da4ec88b63a5"],
+Cell[4626812, 100765, 478, 10, 24, "Message",ExpressionUUID->"deb651cd-9750-4f33-8892-dc4873ea19f8"],
+Cell[4627293, 100777, 490, 11, 24, "Message",ExpressionUUID->"5597723e-0b2d-4d43-b93e-f96034ffcb06"],
+Cell[4627786, 100790, 476, 10, 24, "Message",ExpressionUUID->"8ef06157-c74b-48e8-9c7f-327d7302c28c"],
+Cell[CellGroupData[{
+Cell[4628287, 100804, 200, 4, 24, "Print",ExpressionUUID->"6d010356-450e-479a-ba67-eeb3e26ec291"],
+Cell[4628490, 100810, 202, 4, 24, "Print",ExpressionUUID->"3f15cc52-1ff6-45cb-a9fd-644d776c5f89"],
+Cell[4628695, 100816, 200, 4, 24, "Print",ExpressionUUID->"4feea194-42f6-4ca1-9312-62f92ec665a5"],
+Cell[4628898, 100822, 202, 4, 24, "Print",ExpressionUUID->"6258c9d5-91a7-48d5-8231-34e495c40fa5"],
+Cell[4629103, 100828, 200, 4, 24, "Print",ExpressionUUID->"ffc76446-691d-4b15-befd-5803a78522c1"],
+Cell[4629306, 100834, 200, 4, 24, "Print",ExpressionUUID->"0837e534-d7bb-47f7-aed6-303356623331"],
+Cell[4629509, 100840, 202, 4, 24, "Print",ExpressionUUID->"f10d2730-aa78-4b6e-80cd-badb4c9a088b"],
+Cell[4629714, 100846, 200, 4, 24, "Print",ExpressionUUID->"38a8da08-2436-4aa2-9ed3-acd6b62059aa"]
+}, Open  ]],
+Cell[4629929, 100853, 198, 3, 34, "Output",ExpressionUUID->"3bacc01c-d443-45cd-8552-6920b7d54570"]
+}, Closed]],
+Cell[4630142, 100859, 224, 5, 26, "Input",ExpressionUUID->"0a825a05-32b2-4319-8639-70ebb7dae721"],
+Cell[4630369, 100866, 226, 5, 30, "Input",ExpressionUUID->"e4a86cf3-8ee8-4a68-8635-217b0ba4a640"],
+Cell[4630598, 100873, 223, 5, 30, "Input",ExpressionUUID->"4e14b37b-639b-46ea-b50a-b14416358740"],
+Cell[4630824, 100880, 226, 5, 30, "Input",ExpressionUUID->"bf2275c2-8d1c-4d02-b7e4-41137641140c"],
+Cell[4631053, 100887, 224, 5, 30, "Input",ExpressionUUID->"6e0c2be4-ee3a-45fa-b831-83a1095ac1be"],
+Cell[4631280, 100894, 224, 5, 30, "Input",ExpressionUUID->"9186e914-9912-4033-a987-f84144195af6"],
+Cell[4631507, 100901, 224, 5, 30, "Input",ExpressionUUID->"f6a2e77b-0b25-4468-8b4c-79e5f414742d"],
+Cell[4631734, 100908, 222, 5, 30, "Input",ExpressionUUID->"a3b27975-8859-466d-a7c0-b105c7fe73d9"],
+Cell[4631959, 100915, 1318, 40, 94, "Input",ExpressionUUID->"25926e05-bb3c-422b-8e2b-9a57e964ba2b"],
+Cell[CellGroupData[{
+Cell[4633302, 100959, 553, 12, 94, "Input",ExpressionUUID->"a36cae1e-df45-49d4-a412-416ac62654e5"],
+Cell[4633858, 100973, 498, 14, 46, "Output",ExpressionUUID->"a396975e-2717-4a82-90d1-7c091fb198e9"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[4634393, 100992, 258, 6, 30, "Input",ExpressionUUID->"9b7c4721-c242-428f-936b-c73b023c8d5b"],
+Cell[4634654, 101000, 632, 18, 56, "Output",ExpressionUUID->"234fb216-0308-486e-aa4f-ee9ceb3aa02b"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[4635323, 101023, 261, 6, 30, "Input",ExpressionUUID->"38f9a86e-2833-456d-aa7a-12baa82bf6d4"],
+Cell[4635587, 101031, 1757, 56, 85, "Output",ExpressionUUID->"1c05b19f-f3b9-494a-b37f-364f77e0b0b1"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[4637381, 101092, 1315, 34, 94, "Input",ExpressionUUID->"b2c199ef-3321-44d3-a08a-1b1de3e1b269"],
+Cell[4638699, 101128, 8708, 229, 381, "Output",ExpressionUUID->"f04f6eb6-3a6c-42bd-b978-23a251c30109"]
+}, Closed]],
+Cell[CellGroupData[{
+Cell[4647444, 101362, 1021, 29, 69, "Input",ExpressionUUID->"a7e9b28f-cd05-4629-a301-685337db32b1"],
+Cell[4648468, 101393, 8656, 228, 381, "Output",ExpressionUUID->"fb8aa450-fac0-43d2-94fb-164b894fd43e"]
+}, Closed]],
+Cell[CellGroupData[{
+Cell[4657161, 101626, 558, 13, 48, "Input",ExpressionUUID->"1e5b2a80-6558-4a6a-a208-6ffd66be10ca"],
+Cell[4657722, 101641, 155, 3, 34, "Output",ExpressionUUID->"ba76a9bc-1692-4293-93e4-3b98a9ab7916"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[4657914, 101649, 993, 28, 73, "Input",ExpressionUUID->"0c715131-89c6-40ef-8f9e-32d8bd8c07e3"],
+Cell[4658910, 101679, 6402, 173, 229, "Output",ExpressionUUID->"ee09fd16-2531-4ab1-be6d-4d7237f2c0f6"]
+}, Closed]],
+Cell[CellGroupData[{
+Cell[4665349, 101857, 1136, 31, 69, "Input",ExpressionUUID->"192cc319-c4e4-49c2-9aae-8c5e3d52b6b5"],
+Cell[4666488, 101890, 8682, 228, 381, "Output",ExpressionUUID->"72f30e8f-2cdf-4cf1-b2ac-4bad814133c2"]
+}, Closed]],
+Cell[CellGroupData[{
+Cell[4675207, 102123, 453, 12, 48, "Input",ExpressionUUID->"aa4bbc56-9042-4ac4-9da9-d8a6a099ffb0"],
+Cell[4675663, 102137, 3697, 95, 120, "Output",ExpressionUUID->"5dd7bd0b-df4b-42b4-afa6-169da77820b0"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[4679397, 102237, 493, 12, 52, "Input",ExpressionUUID->"acbb6382-4324-4bfb-aa84-71272d55c7d4"],
+Cell[4679893, 102251, 156, 3, 34, "Output",ExpressionUUID->"f4100da3-c681-47f2-ac13-8b324b099b4e"]
+}, Open  ]],
+Cell[CellGroupData[{
+Cell[4680086, 102259, 414, 10, 52, "Input",ExpressionUUID->"1be0f3b4-e047-4a26-9afa-df89d8bb25eb"],
+Cell[4680503, 102271, 3754, 97, 120, "Output",ExpressionUUID->"481fa417-77b8-4946-b4f9-04ed930e142d"]
+}, Open  ]],
+Cell[4684272, 102371, 304, 6, 157, "Input",ExpressionUUID->"1e1abde8-f7ad-44b1-99b4-1370e978f66d"]
+}
+]
+*)
+
diff --git a/tests/ggH.m b/tests/ggH.m
new file mode 100644
index 00000000..369a5e16
--- /dev/null
+++ b/tests/ggH.m
@@ -0,0 +1,7 @@
+(* Created with the Wolfram Language for Students - Personal Use Only : www.wolfram.com *)
+(Alfas*EL*MT2*Mat[SUNT[Glu1, Glu2, 0, 0]]*
+  ((B0i[bb0, MH2, MT2, MT2] - 4*C0i[cc00, 0, MH2, 0, MT2, MT2, MT2])*
+    Pair[e[1], e[2]] + 4*C0i[cc12, 0, MH2, 0, MT2, MT2, MT2]*Pair[e[1], k[2]]*
+    Pair[e[2], k[1]] - (C0i[cc0, 0, MH2, 0, MT2, MT2, MT2]*
+     (-(MH2*Pair[e[1], e[2]]) + 2*Pair[e[1], k[2]]*Pair[e[2], k[1]]))/2))/
+ (MW*Pi*SW)
diff --git a/tests/ggH_LR.m b/tests/ggH_LR.m
new file mode 100644
index 00000000..e7096658
--- /dev/null
+++ b/tests/ggH_LR.m
@@ -0,0 +1,5 @@
+(* Created with the Wolfram Language for Students - Personal Use Only : www.wolfram.com *)
+(Alfas*EL*MT^2*(-4*MH^2 + (MH^2 - 4*MT^2)*
+    Log[(-MH^2 + 2*MT^2 + Sqrt[MH^4 - 4*MH^2*MT^2])/(2*MT^2)]^2)*
+  Mat[SUNT[Glu1, Glu2, 0, 0]]*(MH^2*Pair[e[1], e[2]] - 
+   2*Pair[e[1], k[2]]*Pair[e[2], k[1]]))/(4*MH^4*MW*Pi*SW)
diff --git a/tests/ggHg.m b/tests/ggHg.m
new file mode 100644
index 00000000..bbd9f0ff
--- /dev/null
+++ b/tests/ggHg.m
@@ -0,0 +1,125 @@
+(* Created with the Wolfram Language for Students - Personal Use Only : www.wolfram.com *)
+(Alfas*EL*GS*MT2*Mat[SUNT[Glu1, Glu2, Glu4, 0, 0]]*
+   (Den[S, 0]*((B0i[bb0, S, MT2, MT2] - 4*C0i[cc00, MH2, S, 0, MT2, MT2, 
+          MT2])*(2*Pair[e[1], k[2]]*Pair[e[2], ec[4]] - 
+        2*Pair[e[1], ec[4]]*Pair[e[2], k[1]] + Pair[e[1], e[2]]*
+         (Pair[ec[4], k[1]] - Pair[ec[4], k[2]])) - 
+      2*(C0i[cc11, MH2, S, 0, MT2, MT2, MT2] + C0i[cc12, MH2, S, 0, MT2, MT2, 
+         MT2])*((-T + U)*Pair[e[1], e[2]] + 
+        4*(-(Pair[e[1], k[3]]*Pair[e[2], k[1]]) + Pair[e[1], k[2]]*
+           Pair[e[2], k[3]]))*Pair[ec[4], k[3]] - 
+      C0i[cc1, MH2, S, 0, MT2, MT2, MT2]*(2*(-MH2 + S)*Pair[e[1], k[2]]*
+         Pair[e[2], ec[4]] + 2*(MH2 - S)*Pair[e[1], ec[4]]*Pair[e[2], k[1]] + 
+        8*(-(Pair[e[1], k[3]]*Pair[e[2], k[1]]) + Pair[e[1], k[2]]*
+           Pair[e[2], k[3]])*Pair[ec[4], k[3]] - Pair[e[1], e[2]]*
+         (2*(T + U)*Pair[ec[4], k[1]] + (T - 3*U)*Pair[ec[4], k[3]])) - 
+      C0i[cc0, MH2, S, 0, MT2, MT2, MT2]*((-MH2 + S)*Pair[e[1], k[2]]*
+         Pair[e[2], ec[4]] + (MH2 - S)*Pair[e[1], ec[4]]*Pair[e[2], k[1]] + 
+        2*(-(Pair[e[1], k[3]]*Pair[e[2], k[1]]) + Pair[e[1], k[2]]*
+           Pair[e[2], k[3]])*Pair[ec[4], k[3]] - Pair[e[1], e[2]]*
+         ((T + U)*Pair[ec[4], k[1]] - U*Pair[ec[4], k[3]]))) + 
+    Den[U, 0]*((B0i[bb0, U, MT2, MT2] - 4*C0i[cc00, 0, U, MH2, MT2, MT2, 
+          MT2])*(2*Pair[e[1], k[4]]*Pair[e[2], ec[4]] - 
+        Pair[e[1], ec[4]]*(Pair[e[2], k[1]] + Pair[e[2], k[4]]) + 
+        2*Pair[e[1], e[2]]*Pair[ec[4], k[1]]) - 
+      2*C0i[cc12, 0, U, MH2, MT2, MT2, MT2]*Pair[e[2], k[3]]*
+       ((-S + T)*Pair[e[1], ec[4]] + 4*(Pair[e[1], k[2]]*Pair[ec[4], k[1]] + 
+          Pair[e[1], k[4]]*Pair[ec[4], k[2]])) - 
+      C0i[cc0, 0, U, MH2, MT2, MT2, MT2]*((-MH2 + U)*Pair[e[1], k[4]]*
+         Pair[e[2], ec[4]] - Pair[e[1], ec[4]]*((-MH2 + U)*Pair[e[2], k[1]] + 
+          S*Pair[e[2], k[3]]) + (-MH2 + U)*Pair[e[1], e[2]]*
+         Pair[ec[4], k[1]] + 2*Pair[e[2], k[3]]*
+         (Pair[e[1], k[2]]*Pair[ec[4], k[1]] + Pair[e[1], k[4]]*
+           Pair[ec[4], k[2]])) - 2*C0i[cc22, 0, U, MH2, MT2, MT2, MT2]*
+       Pair[e[2], k[3]]*((-S + T)*Pair[e[1], ec[4]] + 
+        4*(Pair[e[1], k[3]]*Pair[ec[4], k[1]] + Pair[e[1], k[4]]*
+           Pair[ec[4], k[3]])) - C0i[cc2, 0, U, MH2, MT2, MT2, MT2]*
+       (2*(-MH2 + U)*Pair[e[1], k[4]]*Pair[e[2], ec[4]] + 
+        Pair[e[1], ec[4]]*(2*(S + T)*Pair[e[2], k[1]] + 
+          (-3*S + T)*Pair[e[2], k[3]]) + 2*(-MH2 + U)*Pair[e[1], e[2]]*
+         Pair[ec[4], k[1]] + 8*Pair[e[2], k[3]]*
+         (Pair[e[1], k[3]]*Pair[ec[4], k[1]] + Pair[e[1], k[4]]*
+           Pair[ec[4], k[3]]))) - Den[T, 0]*
+     ((B0i[bb0, T, MT2, MT2] - 4*C0i[cc00, MH2, T, 0, MT2, MT2, MT2])*
+       (-((Pair[e[1], k[2]] + Pair[e[1], k[4]])*Pair[e[2], ec[4]]) + 
+        2*Pair[e[1], ec[4]]*Pair[e[2], k[4]] + 2*Pair[e[1], e[2]]*
+         Pair[ec[4], k[2]]) - C0i[cc0, MH2, T, 0, MT2, MT2, MT2]*
+       (((S + U)*Pair[e[1], k[2]] - S*Pair[e[1], k[3]])*Pair[e[2], ec[4]] - 
+        (MH2 - T)*(Pair[e[1], ec[4]]*Pair[e[2], k[4]] + Pair[e[1], e[2]]*
+           Pair[ec[4], k[2]]) + 2*Pair[e[1], k[3]]*
+         (Pair[e[2], k[4]]*Pair[ec[4], k[1]] + Pair[e[2], k[1]]*
+           Pair[ec[4], k[2]])) - C0i[cc1, MH2, T, 0, MT2, MT2, MT2]*
+       ((2*(S + U)*Pair[e[1], k[2]] + (-3*S + U)*Pair[e[1], k[3]])*
+         Pair[e[2], ec[4]] - 2*(MH2 - T)*(Pair[e[1], ec[4]]*
+           Pair[e[2], k[4]] + Pair[e[1], e[2]]*Pair[ec[4], k[2]]) + 
+        8*Pair[e[1], k[3]]*(Pair[e[2], k[3]]*Pair[ec[4], k[2]] + 
+          Pair[e[2], k[4]]*Pair[ec[4], k[3]])) - 
+      2*(C0i[cc12, MH2, T, 0, MT2, MT2, MT2]*Pair[e[1], k[3]]*
+         ((-S + U)*Pair[e[2], ec[4]] + 
+          4*(-(Pair[e[2], k[3]]*Pair[ec[4], k[1]]) + Pair[e[2], k[1]]*
+             Pair[ec[4], k[3]])) + C0i[cc11, MH2, T, 0, MT2, MT2, MT2]*
+         Pair[e[1], k[3]]*((-S + U)*Pair[e[2], ec[4]] + 
+          4*(Pair[e[2], k[3]]*Pair[ec[4], k[2]] + Pair[e[2], k[4]]*
+             Pair[ec[4], k[3]]))))))/(MW*Pi*SW) - 
+ (Alfas*EL*GS*MT2*Mat[SUNT[Glu1, Glu4, Glu2, 0, 0]]*
+   (Den[S, 0]*((B0i[bb0, S, MT2, MT2] - 4*C0i[cc00, MH2, S, 0, MT2, MT2, 
+          MT2])*(2*Pair[e[1], k[2]]*Pair[e[2], ec[4]] - 
+        2*Pair[e[1], ec[4]]*Pair[e[2], k[1]] + Pair[e[1], e[2]]*
+         (Pair[ec[4], k[1]] - Pair[ec[4], k[2]])) - 
+      2*(C0i[cc11, MH2, S, 0, MT2, MT2, MT2] + C0i[cc12, MH2, S, 0, MT2, MT2, 
+         MT2])*((-T + U)*Pair[e[1], e[2]] + 
+        4*(-(Pair[e[1], k[3]]*Pair[e[2], k[1]]) + Pair[e[1], k[2]]*
+           Pair[e[2], k[3]]))*Pair[ec[4], k[3]] - 
+      C0i[cc1, MH2, S, 0, MT2, MT2, MT2]*(2*(-MH2 + S)*Pair[e[1], k[2]]*
+         Pair[e[2], ec[4]] + 2*(MH2 - S)*Pair[e[1], ec[4]]*Pair[e[2], k[1]] + 
+        8*(-(Pair[e[1], k[3]]*Pair[e[2], k[1]]) + Pair[e[1], k[2]]*
+           Pair[e[2], k[3]])*Pair[ec[4], k[3]] - Pair[e[1], e[2]]*
+         (2*(T + U)*Pair[ec[4], k[1]] + (T - 3*U)*Pair[ec[4], k[3]])) - 
+      C0i[cc0, MH2, S, 0, MT2, MT2, MT2]*((-MH2 + S)*Pair[e[1], k[2]]*
+         Pair[e[2], ec[4]] + (MH2 - S)*Pair[e[1], ec[4]]*Pair[e[2], k[1]] + 
+        2*(-(Pair[e[1], k[3]]*Pair[e[2], k[1]]) + Pair[e[1], k[2]]*
+           Pair[e[2], k[3]])*Pair[ec[4], k[3]] - Pair[e[1], e[2]]*
+         ((T + U)*Pair[ec[4], k[1]] - U*Pair[ec[4], k[3]]))) + 
+    Den[U, 0]*((B0i[bb0, U, MT2, MT2] - 4*C0i[cc00, 0, U, MH2, MT2, MT2, 
+          MT2])*(2*Pair[e[1], k[4]]*Pair[e[2], ec[4]] - 
+        Pair[e[1], ec[4]]*(Pair[e[2], k[1]] + Pair[e[2], k[4]]) + 
+        2*Pair[e[1], e[2]]*Pair[ec[4], k[1]]) - 
+      2*C0i[cc12, 0, U, MH2, MT2, MT2, MT2]*Pair[e[2], k[3]]*
+       ((-S + T)*Pair[e[1], ec[4]] + 4*(Pair[e[1], k[2]]*Pair[ec[4], k[1]] + 
+          Pair[e[1], k[4]]*Pair[ec[4], k[2]])) - 
+      C0i[cc0, 0, U, MH2, MT2, MT2, MT2]*((-MH2 + U)*Pair[e[1], k[4]]*
+         Pair[e[2], ec[4]] - Pair[e[1], ec[4]]*((-MH2 + U)*Pair[e[2], k[1]] + 
+          S*Pair[e[2], k[3]]) + (-MH2 + U)*Pair[e[1], e[2]]*
+         Pair[ec[4], k[1]] + 2*Pair[e[2], k[3]]*
+         (Pair[e[1], k[2]]*Pair[ec[4], k[1]] + Pair[e[1], k[4]]*
+           Pair[ec[4], k[2]])) - 2*C0i[cc22, 0, U, MH2, MT2, MT2, MT2]*
+       Pair[e[2], k[3]]*((-S + T)*Pair[e[1], ec[4]] + 
+        4*(Pair[e[1], k[3]]*Pair[ec[4], k[1]] + Pair[e[1], k[4]]*
+           Pair[ec[4], k[3]])) - C0i[cc2, 0, U, MH2, MT2, MT2, MT2]*
+       (2*(-MH2 + U)*Pair[e[1], k[4]]*Pair[e[2], ec[4]] + 
+        Pair[e[1], ec[4]]*(2*(S + T)*Pair[e[2], k[1]] + 
+          (-3*S + T)*Pair[e[2], k[3]]) + 2*(-MH2 + U)*Pair[e[1], e[2]]*
+         Pair[ec[4], k[1]] + 8*Pair[e[2], k[3]]*
+         (Pair[e[1], k[3]]*Pair[ec[4], k[1]] + Pair[e[1], k[4]]*
+           Pair[ec[4], k[3]]))) - Den[T, 0]*
+     ((B0i[bb0, T, MT2, MT2] - 4*C0i[cc00, MH2, T, 0, MT2, MT2, MT2])*
+       (-((Pair[e[1], k[2]] + Pair[e[1], k[4]])*Pair[e[2], ec[4]]) + 
+        2*Pair[e[1], ec[4]]*Pair[e[2], k[4]] + 2*Pair[e[1], e[2]]*
+         Pair[ec[4], k[2]]) - C0i[cc0, MH2, T, 0, MT2, MT2, MT2]*
+       (((S + U)*Pair[e[1], k[2]] - S*Pair[e[1], k[3]])*Pair[e[2], ec[4]] - 
+        (MH2 - T)*(Pair[e[1], ec[4]]*Pair[e[2], k[4]] + Pair[e[1], e[2]]*
+           Pair[ec[4], k[2]]) + 2*Pair[e[1], k[3]]*
+         (Pair[e[2], k[4]]*Pair[ec[4], k[1]] + Pair[e[2], k[1]]*
+           Pair[ec[4], k[2]])) - C0i[cc1, MH2, T, 0, MT2, MT2, MT2]*
+       ((2*(S + U)*Pair[e[1], k[2]] + (-3*S + U)*Pair[e[1], k[3]])*
+         Pair[e[2], ec[4]] - 2*(MH2 - T)*(Pair[e[1], ec[4]]*
+           Pair[e[2], k[4]] + Pair[e[1], e[2]]*Pair[ec[4], k[2]]) + 
+        8*Pair[e[1], k[3]]*(Pair[e[2], k[3]]*Pair[ec[4], k[2]] + 
+          Pair[e[2], k[4]]*Pair[ec[4], k[3]])) - 
+      2*(C0i[cc12, MH2, T, 0, MT2, MT2, MT2]*Pair[e[1], k[3]]*
+         ((-S + U)*Pair[e[2], ec[4]] + 
+          4*(-(Pair[e[2], k[3]]*Pair[ec[4], k[1]]) + Pair[e[2], k[1]]*
+             Pair[ec[4], k[3]])) + C0i[cc11, MH2, T, 0, MT2, MT2, MT2]*
+         Pair[e[1], k[3]]*((-S + U)*Pair[e[2], ec[4]] + 
+          4*(Pair[e[2], k[3]]*Pair[ec[4], k[2]] + Pair[e[2], k[4]]*
+             Pair[ec[4], k[3]]))))))/(MW*Pi*SW)
diff --git a/tests/ggHg_LR.m b/tests/ggHg_LR.m
new file mode 100644
index 00000000..eecf972a
--- /dev/null
+++ b/tests/ggHg_LR.m
@@ -0,0 +1,93 @@
+(* Created with the Wolfram Language for Students - Personal Use Only : www.wolfram.com *)
+(Alfas*EL*GS*MT^2*(Mat[SUNT[Glu1, Glu2, Glu4, 0, 0]] - 
+   Mat[SUNT[Glu1, Glu4, Glu2, 0, 0]])*
+  (-((2*(MH^2 - S)*(MH^2 - S + MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]] - 
+        MH^2*DiscB[S, Sqrt[MT^2], Sqrt[MT^2]] + 
+        MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[MH^4 - 4*MH^2*MT^2])/(2*MT^2)]^2 - 
+        MT^2*Log[(2*MT^2 - S + Sqrt[S*(-4*MT^2 + S)])/(2*MT^2)]^2)*
+       (2*Pair[e[1], k[2]]*Pair[e[2], ec[4]] - 2*Pair[e[1], ec[4]]*
+         Pair[e[2], k[1]] + Pair[e[1], e[2]]*(Pair[ec[4], k[1]] - 
+          Pair[ec[4], k[2]])) + 2*(MH^2 - S + (2*MH^2 - S)*
+         DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]] + (-2*MH^2 + S)*
+         DiscB[S, Sqrt[MT^2], Sqrt[MT^2]] + 
+        MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[MH^4 - 4*MH^2*MT^2])/(2*MT^2)]^2 - 
+        MT^2*Log[(2*MT^2 - S + Sqrt[S*(-4*MT^2 + S)])/(2*MT^2)]^2)*
+       ((T - U)*Pair[e[1], e[2]] + 4*Pair[e[1], k[3]]*Pair[e[2], k[1]] - 
+        4*Pair[e[1], k[2]]*Pair[e[2], k[3]])*Pair[ec[4], k[3]] + 
+      2*(MH^2 - S)*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]] - 
+        DiscB[S, Sqrt[MT^2], Sqrt[MT^2]])*(2*(-MH^2 + S)*Pair[e[1], k[2]]*
+         Pair[e[2], ec[4]] + 2*(MH^2 - S)*Pair[e[1], ec[4]]*
+         Pair[e[2], k[1]] + 8*(-(Pair[e[1], k[3]]*Pair[e[2], k[1]]) + 
+          Pair[e[1], k[2]]*Pair[e[2], k[3]])*Pair[ec[4], k[3]] - 
+        Pair[e[1], e[2]]*(2*(T + U)*Pair[ec[4], k[1]] + 
+          (T - 3*U)*Pair[ec[4], k[3]])) + (MH^2 - S)*
+       (Log[(-MH^2 + 2*MT^2 + Sqrt[MH^4 - 4*MH^2*MT^2])/(2*MT^2)]^2 - 
+        Log[(2*MT^2 - S + Sqrt[S*(-4*MT^2 + S)])/(2*MT^2)]^2)*
+       ((-MH^2 + S)*Pair[e[1], k[2]]*Pair[e[2], ec[4]] + 
+        (MH^2 - S)*Pair[e[1], ec[4]]*Pair[e[2], k[1]] + 
+        2*(-(Pair[e[1], k[3]]*Pair[e[2], k[1]]) + Pair[e[1], k[2]]*
+           Pair[e[2], k[3]])*Pair[ec[4], k[3]] - Pair[e[1], e[2]]*
+         ((T + U)*Pair[ec[4], k[1]] - U*Pair[ec[4], k[3]])))/
+     ((MH^2 - S)^2*S)) + 
+   (-2*(MH^2 - U)*(MH^2 - U + MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]] - 
+       MH^2*DiscB[U, Sqrt[MT^2], Sqrt[MT^2]] + 
+       MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[MH^4 - 4*MH^2*MT^2])/(2*MT^2)]^2 - 
+       MT^2*Log[(2*MT^2 - U + Sqrt[U*(-4*MT^2 + U)])/(2*MT^2)]^2)*
+      (2*Pair[e[1], k[4]]*Pair[e[2], ec[4]] - Pair[e[1], ec[4]]*
+        (Pair[e[2], k[1]] + Pair[e[2], k[4]]) + 2*Pair[e[1], e[2]]*
+        Pair[ec[4], k[1]]) + 
+     2*(MH^2 - U + MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]] - 
+       MH^2*DiscB[U, Sqrt[MT^2], Sqrt[MT^2]] + 
+       MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[MH^4 - 4*MH^2*MT^2])/(2*MT^2)]^2 - 
+       MT^2*Log[(2*MT^2 - U + Sqrt[U*(-4*MT^2 + U)])/(2*MT^2)]^2)*
+      Pair[e[2], k[3]]*((-S + T)*Pair[e[1], ec[4]] + 
+       4*(Pair[e[1], k[2]]*Pair[ec[4], k[1]] + Pair[e[1], k[4]]*
+          Pair[ec[4], k[2]])) - (MH^2 - U)*
+      (Log[(-MH^2 + 2*MT^2 + Sqrt[MH^4 - 4*MH^2*MT^2])/(2*MT^2)]^2 - 
+       Log[(2*MT^2 - U + Sqrt[U*(-4*MT^2 + U)])/(2*MT^2)]^2)*
+      (Pair[e[1], ec[4]]*((MH^2 - U)*Pair[e[2], k[1]] - S*Pair[e[2], k[3]]) + 
+       ((-MH^2 + U)*Pair[e[1], e[2]] + 2*Pair[e[1], k[2]]*Pair[e[2], k[3]])*
+        Pair[ec[4], k[1]] + Pair[e[1], k[4]]*((-MH^2 + U)*Pair[e[2], ec[4]] + 
+         2*Pair[e[2], k[3]]*Pair[ec[4], k[2]])) + 
+     2*(MH^2 - U)*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]] - 
+       DiscB[U, Sqrt[MT^2], Sqrt[MT^2]])*Pair[e[2], k[3]]*
+      ((-S + T)*Pair[e[1], ec[4]] + 4*(Pair[e[1], k[3]]*Pair[ec[4], k[1]] + 
+         Pair[e[1], k[4]]*Pair[ec[4], k[3]])) - 
+     2*(MH^2 - U)*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]] - 
+       DiscB[U, Sqrt[MT^2], Sqrt[MT^2]])*
+      (Pair[e[1], ec[4]]*(2*(S + T)*Pair[e[2], k[1]] + 
+         (-3*S + T)*Pair[e[2], k[3]]) + 2*((-MH^2 + U)*Pair[e[1], e[2]] + 
+         4*Pair[e[1], k[3]]*Pair[e[2], k[3]])*Pair[ec[4], k[1]] + 
+       Pair[e[1], k[4]]*(-2*(MH^2 - U)*Pair[e[2], ec[4]] + 
+         8*Pair[e[2], k[3]]*Pair[ec[4], k[3]])))/((MH^2 - U)^2*U) + 
+   (-2*(MH^2 - T)*(MH^2 - T + MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]] - 
+       MH^2*DiscB[T, Sqrt[MT^2], Sqrt[MT^2]] + 
+       MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[MH^4 - 4*MH^2*MT^2])/(2*MT^2)]^2 - 
+       MT^2*Log[(2*MT^2 - T + Sqrt[T*(-4*MT^2 + T)])/(2*MT^2)]^2)*
+      (Pair[e[1], k[2]]*Pair[e[2], ec[4]] + Pair[e[1], k[4]]*
+        Pair[e[2], ec[4]] - 2*(Pair[e[1], ec[4]]*Pair[e[2], k[4]] + 
+         Pair[e[1], e[2]]*Pair[ec[4], k[2]])) + 
+     (MH^2 - T)*(Log[(-MH^2 + 2*MT^2 + Sqrt[MH^4 - 4*MH^2*MT^2])/(2*MT^2)]^
+        2 - Log[(2*MT^2 - T + Sqrt[T*(-4*MT^2 + T)])/(2*MT^2)]^2)*
+      ((S + U)*Pair[e[1], k[2]]*Pair[e[2], ec[4]] - 
+       (MH^2 - T)*(Pair[e[1], ec[4]]*Pair[e[2], k[4]] + 
+         Pair[e[1], e[2]]*Pair[ec[4], k[2]]) + Pair[e[1], k[3]]*
+        (-(S*Pair[e[2], ec[4]]) + 2*Pair[e[2], k[4]]*Pair[ec[4], k[1]] + 
+         2*Pair[e[2], k[1]]*Pair[ec[4], k[2]])) - 2*Pair[e[1], k[3]]*
+      ((MH^2 - T + MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]] - 
+         MH^2*DiscB[T, Sqrt[MT^2], Sqrt[MT^2]] + 
+         MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[MH^4 - 4*MH^2*MT^2])/(2*MT^2)]^2 - 
+         MT^2*Log[(2*MT^2 - T + Sqrt[T*(-4*MT^2 + T)])/(2*MT^2)]^2)*
+        ((-S + U)*Pair[e[2], ec[4]] - 4*Pair[e[2], k[3]]*Pair[ec[4], k[1]] + 
+         4*Pair[e[2], k[1]]*Pair[ec[4], k[3]]) + 
+       (MH^2 - T)*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]] - 
+         DiscB[T, Sqrt[MT^2], Sqrt[MT^2]])*((-S + U)*Pair[e[2], ec[4]] + 
+         4*(Pair[e[2], k[3]]*Pair[ec[4], k[2]] + Pair[e[2], k[4]]*
+            Pair[ec[4], k[3]]))) + 2*(MH^2 - T)*
+      (DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]] - DiscB[T, Sqrt[MT^2], 
+        Sqrt[MT^2]])*(2*(S + U)*Pair[e[1], k[2]]*Pair[e[2], ec[4]] - 
+       2*(MH^2 - T)*(Pair[e[1], ec[4]]*Pair[e[2], k[4]] + 
+         Pair[e[1], e[2]]*Pair[ec[4], k[2]]) + Pair[e[1], k[3]]*
+        ((-3*S + U)*Pair[e[2], ec[4]] + 
+         8*(Pair[e[2], k[3]]*Pair[ec[4], k[2]] + Pair[e[2], k[4]]*
+            Pair[ec[4], k[3]]))))/((MH^2 - T)^2*T)))/(2*MW*Pi*SW)
diff --git a/tests/ggHgg_LR_triangle_2diags.m b/tests/ggHgg_LR_triangle_2diags.m
new file mode 100644
index 00000000..ffc67c9b
--- /dev/null
+++ b/tests/ggHgg_LR_triangle_2diags.m
@@ -0,0 +1,281 @@
+(* Created with the Wolfram Language for Students - Personal Use Only : www.wolfram.com *)
+Amp[{{V[5, {Glu1}], k[1], 0, {Sqrt[3]*ColorCharge}}, 
+    {V[5, {Glu2}], k[2], 0, {Sqrt[3]*ColorCharge}}} -> 
+   {{S[1], k[3], MH, {}}, {V[5, {Glu4}], k[4], 0, {Sqrt[3]*ColorCharge}}, 
+    {V[5, {Glu5}], k[5], 0, {Sqrt[3]*ColorCharge}}}][
+ (B*((-4*Alfas^2*EL*MT^2*(2 + Eps^(-1) + DiscB[T, Sqrt[MT^2], Sqrt[MT^2]] + 
+        Log[Mu^2/MT^2])*(-2*Pair[e[1], ec[5]]*Pair[e[2], ec[4]] + 
+        Pair[e[1], ec[4]]*Pair[e[2], ec[5]] + Pair[e[1], e[2]]*
+         Pair[ec[4], ec[5]]))/(MW*SW) + 
+     (16*Alfas^2*EL*MT^2*(3/4 + (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/
+         (4*(MH^2 - T)) - (T*DiscB[T, Sqrt[MT^2], Sqrt[MT^2]])/
+         (4*(MH^2 - T)) + 
+        (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^
+           2)/(4*(MH^2 - T)) + (Eps^(-1) + Log[Mu^2/MT^2])/4 - 
+        (MT^2*Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/(2*MT^2)]^2)/
+         (4*(MH^2 - T)))*(-2*Pair[e[1], ec[5]]*Pair[e[2], ec[4]] + 
+        Pair[e[1], ec[4]]*Pair[e[2], ec[5]] + Pair[e[1], e[2]]*
+         Pair[ec[4], ec[5]]))/(MW*SW) - 
+     (16*Alfas^2*EL*MT^2*(-1/(2*(MH^2 - T)) - 
+        (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/(2*(MH^2 - T)^2) + 
+        (MH^2*DiscB[T, Sqrt[MT^2], Sqrt[MT^2]])/(2*(MH^2 - T)^2) - 
+        (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^
+           2)/(2*(MH^2 - T)^2) + 
+        (MT^2*Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/(2*MT^2)]^2)/
+         (2*(MH^2 - T)^2))*Pair[e[1], k[3]]*
+       (-(Pair[e[2], k[1]]*Pair[ec[4], ec[5]]) - Pair[e[2], ec[5]]*
+         Pair[ec[4], k[1]] + 2*Pair[e[2], ec[4]]*Pair[ec[5], k[1]]))/
+      (MW*SW) + (2*Alfas^2*EL*MT^2*
+       (Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+         (2*(MH^2 - T)) - Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/
+            (2*MT^2)]^2/(2*(MH^2 - T)))*
+       (((-MH^2 + T)*Pair[e[1], e[2]] + 2*Pair[e[1], k[3]]*Pair[e[2], k[1]])*
+         Pair[ec[4], ec[5]] + Pair[e[2], ec[5]]*
+         ((-MH^2 + T)*Pair[e[1], ec[4]] + 2*Pair[e[1], k[3]]*
+           Pair[ec[4], k[1]]) - 2*Pair[e[2], ec[4]]*
+         ((-MH^2 + T)*Pair[e[1], ec[5]] + 2*Pair[e[1], k[3]]*
+           Pair[ec[5], k[1]])))/(MW*SW) + 
+     (16*Alfas^2*EL*MT^2*(-DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/
+         (2*(MH^2 - T)) + DiscB[T, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - T)))*
+       Pair[e[1], k[3]]*(Pair[e[2], k[3]]*Pair[ec[4], ec[5]] + 
+        Pair[e[2], ec[5]]*Pair[ec[4], k[3]] - 2*Pair[e[2], ec[4]]*
+         Pair[ec[5], k[3]]))/(MW*SW) + 
+     (4*Alfas^2*EL*MT^2*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - T) - 
+        DiscB[T, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - T))*
+       (((-MH^2 + T)*Pair[e[1], e[2]] + 2*Pair[e[1], k[3]]*
+           (Pair[e[2], k[1]] + Pair[e[2], k[3]]))*Pair[ec[4], ec[5]] + 
+        Pair[e[2], ec[5]]*((-MH^2 + T)*Pair[e[1], ec[4]] + 
+          2*Pair[e[1], k[3]]*(Pair[ec[4], k[1]] + Pair[ec[4], k[3]])) - 
+        2*Pair[e[2], ec[4]]*((-MH^2 + T)*Pair[e[1], ec[5]] + 
+          2*Pair[e[1], k[3]]*(Pair[ec[5], k[1]] + Pair[ec[5], k[3]]))))/
+      (MW*SW)))/T + 
+  (C*((-4*Alfas^2*EL*MT^2*(2 + Eps^(-1) + DiscB[T, Sqrt[MT^2], Sqrt[MT^2]] + 
+        Log[Mu^2/MT^2])*(-2*Pair[e[1], ec[5]]*Pair[e[2], ec[4]] + 
+        Pair[e[1], ec[4]]*Pair[e[2], ec[5]] + Pair[e[1], e[2]]*
+         Pair[ec[4], ec[5]]))/(MW*SW) + 
+     (16*Alfas^2*EL*MT^2*(3/4 + (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/
+         (4*(MH^2 - T)) - (T*DiscB[T, Sqrt[MT^2], Sqrt[MT^2]])/
+         (4*(MH^2 - T)) + 
+        (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^
+           2)/(4*(MH^2 - T)) + (Eps^(-1) + Log[Mu^2/MT^2])/4 - 
+        (MT^2*Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/(2*MT^2)]^2)/
+         (4*(MH^2 - T)))*(-2*Pair[e[1], ec[5]]*Pair[e[2], ec[4]] + 
+        Pair[e[1], ec[4]]*Pair[e[2], ec[5]] + Pair[e[1], e[2]]*
+         Pair[ec[4], ec[5]]))/(MW*SW) - 
+     (16*Alfas^2*EL*MT^2*(-1/(2*(MH^2 - T)) - 
+        (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/(2*(MH^2 - T)^2) + 
+        (MH^2*DiscB[T, Sqrt[MT^2], Sqrt[MT^2]])/(2*(MH^2 - T)^2) - 
+        (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^
+           2)/(2*(MH^2 - T)^2) + 
+        (MT^2*Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/(2*MT^2)]^2)/
+         (2*(MH^2 - T)^2))*Pair[e[1], k[3]]*
+       (-(Pair[e[2], k[1]]*Pair[ec[4], ec[5]]) - Pair[e[2], ec[5]]*
+         Pair[ec[4], k[1]] + 2*Pair[e[2], ec[4]]*Pair[ec[5], k[1]]))/
+      (MW*SW) + (2*Alfas^2*EL*MT^2*
+       (Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+         (2*(MH^2 - T)) - Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/
+            (2*MT^2)]^2/(2*(MH^2 - T)))*
+       (((-MH^2 + T)*Pair[e[1], e[2]] + 2*Pair[e[1], k[3]]*Pair[e[2], k[1]])*
+         Pair[ec[4], ec[5]] + Pair[e[2], ec[5]]*
+         ((-MH^2 + T)*Pair[e[1], ec[4]] + 2*Pair[e[1], k[3]]*
+           Pair[ec[4], k[1]]) - 2*Pair[e[2], ec[4]]*
+         ((-MH^2 + T)*Pair[e[1], ec[5]] + 2*Pair[e[1], k[3]]*
+           Pair[ec[5], k[1]])))/(MW*SW) + 
+     (16*Alfas^2*EL*MT^2*(-DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/
+         (2*(MH^2 - T)) + DiscB[T, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - T)))*
+       Pair[e[1], k[3]]*(Pair[e[2], k[3]]*Pair[ec[4], ec[5]] + 
+        Pair[e[2], ec[5]]*Pair[ec[4], k[3]] - 2*Pair[e[2], ec[4]]*
+         Pair[ec[5], k[3]]))/(MW*SW) + 
+     (4*Alfas^2*EL*MT^2*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - T) - 
+        DiscB[T, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - T))*
+       (((-MH^2 + T)*Pair[e[1], e[2]] + 2*Pair[e[1], k[3]]*
+           (Pair[e[2], k[1]] + Pair[e[2], k[3]]))*Pair[ec[4], ec[5]] + 
+        Pair[e[2], ec[5]]*((-MH^2 + T)*Pair[e[1], ec[4]] + 
+          2*Pair[e[1], k[3]]*(Pair[ec[4], k[1]] + Pair[ec[4], k[3]])) - 
+        2*Pair[e[2], ec[4]]*((-MH^2 + T)*Pair[e[1], ec[5]] + 
+          2*Pair[e[1], k[3]]*(Pair[ec[5], k[1]] + Pair[ec[5], k[3]]))))/
+      (MW*SW)))/T + 
+  (A*((-4*Alfas^2*EL*MT^2*(2 + Eps^(-1) + DiscB[T, Sqrt[MT^2], Sqrt[MT^2]] + 
+        Log[Mu^2/MT^2])*(Pair[e[1], ec[5]]*Pair[e[2], ec[4]] + 
+        Pair[e[1], ec[4]]*Pair[e[2], ec[5]] - 2*Pair[e[1], e[2]]*
+         Pair[ec[4], ec[5]]))/(MW*SW) + 
+     (16*Alfas^2*EL*MT^2*(3/4 + (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/
+         (4*(MH^2 - T)) - (T*DiscB[T, Sqrt[MT^2], Sqrt[MT^2]])/
+         (4*(MH^2 - T)) + 
+        (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^
+           2)/(4*(MH^2 - T)) + (Eps^(-1) + Log[Mu^2/MT^2])/4 - 
+        (MT^2*Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/(2*MT^2)]^2)/
+         (4*(MH^2 - T)))*(Pair[e[1], ec[5]]*Pair[e[2], ec[4]] + 
+        Pair[e[1], ec[4]]*Pair[e[2], ec[5]] - 2*Pair[e[1], e[2]]*
+         Pair[ec[4], ec[5]]))/(MW*SW) + 
+     (16*Alfas^2*EL*MT^2*(-1/(2*(MH^2 - T)) - 
+        (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/(2*(MH^2 - T)^2) + 
+        (MH^2*DiscB[T, Sqrt[MT^2], Sqrt[MT^2]])/(2*(MH^2 - T)^2) - 
+        (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^
+           2)/(2*(MH^2 - T)^2) + 
+        (MT^2*Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/(2*MT^2)]^2)/
+         (2*(MH^2 - T)^2))*Pair[e[1], k[3]]*
+       (-2*Pair[e[2], k[1]]*Pair[ec[4], ec[5]] + Pair[e[2], ec[5]]*
+         Pair[ec[4], k[1]] + Pair[e[2], ec[4]]*Pair[ec[5], k[1]]))/(MW*SW) - 
+     (2*Alfas^2*EL*MT^2*
+       (Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+         (2*(MH^2 - T)) - Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/
+            (2*MT^2)]^2/(2*(MH^2 - T)))*
+       (2*((-MH^2 + T)*Pair[e[1], e[2]] + 2*Pair[e[1], k[3]]*
+           Pair[e[2], k[1]])*Pair[ec[4], ec[5]] - Pair[e[2], ec[5]]*
+         ((-MH^2 + T)*Pair[e[1], ec[4]] + 2*Pair[e[1], k[3]]*
+           Pair[ec[4], k[1]]) - Pair[e[2], ec[4]]*
+         ((-MH^2 + T)*Pair[e[1], ec[5]] + 2*Pair[e[1], k[3]]*
+           Pair[ec[5], k[1]])))/(MW*SW) - 
+     (16*Alfas^2*EL*MT^2*(-DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/
+         (2*(MH^2 - T)) + DiscB[T, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - T)))*
+       Pair[e[1], k[3]]*(2*Pair[e[2], k[3]]*Pair[ec[4], ec[5]] - 
+        Pair[e[2], ec[5]]*Pair[ec[4], k[3]] - Pair[e[2], ec[4]]*
+         Pair[ec[5], k[3]]))/(MW*SW) - 
+     (4*Alfas^2*EL*MT^2*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - T) - 
+        DiscB[T, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - T))*
+       (2*((-MH^2 + T)*Pair[e[1], e[2]] + 2*Pair[e[1], k[3]]*
+           (Pair[e[2], k[1]] + Pair[e[2], k[3]]))*Pair[ec[4], ec[5]] - 
+        Pair[e[2], ec[5]]*((-MH^2 + T)*Pair[e[1], ec[4]] + 
+          2*Pair[e[1], k[3]]*(Pair[ec[4], k[1]] + Pair[ec[4], k[3]])) - 
+        Pair[e[2], ec[4]]*((-MH^2 + T)*Pair[e[1], ec[5]] + 
+          2*Pair[e[1], k[3]]*(Pair[ec[5], k[1]] + Pair[ec[5], k[3]]))))/
+      (MW*SW)))/T + 
+  (D*((-4*Alfas^2*EL*MT^2*(2 + Eps^(-1) + DiscB[T, Sqrt[MT^2], Sqrt[MT^2]] + 
+        Log[Mu^2/MT^2])*(Pair[e[1], ec[5]]*Pair[e[2], ec[4]] + 
+        Pair[e[1], ec[4]]*Pair[e[2], ec[5]] - 2*Pair[e[1], e[2]]*
+         Pair[ec[4], ec[5]]))/(MW*SW) + 
+     (16*Alfas^2*EL*MT^2*(3/4 + (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/
+         (4*(MH^2 - T)) - (T*DiscB[T, Sqrt[MT^2], Sqrt[MT^2]])/
+         (4*(MH^2 - T)) + 
+        (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^
+           2)/(4*(MH^2 - T)) + (Eps^(-1) + Log[Mu^2/MT^2])/4 - 
+        (MT^2*Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/(2*MT^2)]^2)/
+         (4*(MH^2 - T)))*(Pair[e[1], ec[5]]*Pair[e[2], ec[4]] + 
+        Pair[e[1], ec[4]]*Pair[e[2], ec[5]] - 2*Pair[e[1], e[2]]*
+         Pair[ec[4], ec[5]]))/(MW*SW) + 
+     (16*Alfas^2*EL*MT^2*(-1/(2*(MH^2 - T)) - 
+        (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/(2*(MH^2 - T)^2) + 
+        (MH^2*DiscB[T, Sqrt[MT^2], Sqrt[MT^2]])/(2*(MH^2 - T)^2) - 
+        (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^
+           2)/(2*(MH^2 - T)^2) + 
+        (MT^2*Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/(2*MT^2)]^2)/
+         (2*(MH^2 - T)^2))*Pair[e[1], k[3]]*
+       (-2*Pair[e[2], k[1]]*Pair[ec[4], ec[5]] + Pair[e[2], ec[5]]*
+         Pair[ec[4], k[1]] + Pair[e[2], ec[4]]*Pair[ec[5], k[1]]))/(MW*SW) - 
+     (2*Alfas^2*EL*MT^2*
+       (Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+         (2*(MH^2 - T)) - Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/
+            (2*MT^2)]^2/(2*(MH^2 - T)))*
+       (2*((-MH^2 + T)*Pair[e[1], e[2]] + 2*Pair[e[1], k[3]]*
+           Pair[e[2], k[1]])*Pair[ec[4], ec[5]] - Pair[e[2], ec[5]]*
+         ((-MH^2 + T)*Pair[e[1], ec[4]] + 2*Pair[e[1], k[3]]*
+           Pair[ec[4], k[1]]) - Pair[e[2], ec[4]]*
+         ((-MH^2 + T)*Pair[e[1], ec[5]] + 2*Pair[e[1], k[3]]*
+           Pair[ec[5], k[1]])))/(MW*SW) - 
+     (16*Alfas^2*EL*MT^2*(-DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/
+         (2*(MH^2 - T)) + DiscB[T, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - T)))*
+       Pair[e[1], k[3]]*(2*Pair[e[2], k[3]]*Pair[ec[4], ec[5]] - 
+        Pair[e[2], ec[5]]*Pair[ec[4], k[3]] - Pair[e[2], ec[4]]*
+         Pair[ec[5], k[3]]))/(MW*SW) - 
+     (4*Alfas^2*EL*MT^2*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - T) - 
+        DiscB[T, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - T))*
+       (2*((-MH^2 + T)*Pair[e[1], e[2]] + 2*Pair[e[1], k[3]]*
+           (Pair[e[2], k[1]] + Pair[e[2], k[3]]))*Pair[ec[4], ec[5]] - 
+        Pair[e[2], ec[5]]*((-MH^2 + T)*Pair[e[1], ec[4]] + 
+          2*Pair[e[1], k[3]]*(Pair[ec[4], k[1]] + Pair[ec[4], k[3]])) - 
+        Pair[e[2], ec[4]]*((-MH^2 + T)*Pair[e[1], ec[5]] + 
+          2*Pair[e[1], k[3]]*(Pair[ec[5], k[1]] + Pair[ec[5], k[3]]))))/
+      (MW*SW)))/T + 
+  (F*((4*Alfas^2*EL*MT^2*(2 + Eps^(-1) + DiscB[T, Sqrt[MT^2], Sqrt[MT^2]] + 
+        Log[Mu^2/MT^2])*(-(Pair[e[1], ec[5]]*Pair[e[2], ec[4]]) + 
+        2*Pair[e[1], ec[4]]*Pair[e[2], ec[5]] - Pair[e[1], e[2]]*
+         Pair[ec[4], ec[5]]))/(MW*SW) - 
+     (16*Alfas^2*EL*MT^2*(3/4 + (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/
+         (4*(MH^2 - T)) - (T*DiscB[T, Sqrt[MT^2], Sqrt[MT^2]])/
+         (4*(MH^2 - T)) + 
+        (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^
+           2)/(4*(MH^2 - T)) + (Eps^(-1) + Log[Mu^2/MT^2])/4 - 
+        (MT^2*Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/(2*MT^2)]^2)/
+         (4*(MH^2 - T)))*(-(Pair[e[1], ec[5]]*Pair[e[2], ec[4]]) + 
+        2*Pair[e[1], ec[4]]*Pair[e[2], ec[5]] - Pair[e[1], e[2]]*
+         Pair[ec[4], ec[5]]))/(MW*SW) + 
+     (16*Alfas^2*EL*MT^2*(-1/(2*(MH^2 - T)) - 
+        (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/(2*(MH^2 - T)^2) + 
+        (MH^2*DiscB[T, Sqrt[MT^2], Sqrt[MT^2]])/(2*(MH^2 - T)^2) - 
+        (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^
+           2)/(2*(MH^2 - T)^2) + 
+        (MT^2*Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/(2*MT^2)]^2)/
+         (2*(MH^2 - T)^2))*Pair[e[1], k[3]]*
+       (Pair[e[2], k[1]]*Pair[ec[4], ec[5]] - 2*Pair[e[2], ec[5]]*
+         Pair[ec[4], k[1]] + Pair[e[2], ec[4]]*Pair[ec[5], k[1]]))/(MW*SW) + 
+     (2*Alfas^2*EL*MT^2*
+       (Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+         (2*(MH^2 - T)) - Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/
+            (2*MT^2)]^2/(2*(MH^2 - T)))*
+       (((-MH^2 + T)*Pair[e[1], e[2]] + 2*Pair[e[1], k[3]]*Pair[e[2], k[1]])*
+         Pair[ec[4], ec[5]] - 2*Pair[e[2], ec[5]]*
+         ((-MH^2 + T)*Pair[e[1], ec[4]] + 2*Pair[e[1], k[3]]*
+           Pair[ec[4], k[1]]) + Pair[e[2], ec[4]]*
+         ((-MH^2 + T)*Pair[e[1], ec[5]] + 2*Pair[e[1], k[3]]*
+           Pair[ec[5], k[1]])))/(MW*SW) + 
+     (16*Alfas^2*EL*MT^2*(-DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/
+         (2*(MH^2 - T)) + DiscB[T, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - T)))*
+       Pair[e[1], k[3]]*(Pair[e[2], k[3]]*Pair[ec[4], ec[5]] - 
+        2*Pair[e[2], ec[5]]*Pair[ec[4], k[3]] + Pair[e[2], ec[4]]*
+         Pair[ec[5], k[3]]))/(MW*SW) + 
+     (4*Alfas^2*EL*MT^2*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - T) - 
+        DiscB[T, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - T))*
+       (((-MH^2 + T)*Pair[e[1], e[2]] + 2*Pair[e[1], k[3]]*
+           (Pair[e[2], k[1]] + Pair[e[2], k[3]]))*Pair[ec[4], ec[5]] - 
+        2*Pair[e[2], ec[5]]*((-MH^2 + T)*Pair[e[1], ec[4]] + 
+          2*Pair[e[1], k[3]]*(Pair[ec[4], k[1]] + Pair[ec[4], k[3]])) + 
+        Pair[e[2], ec[4]]*((-MH^2 + T)*Pair[e[1], ec[5]] + 
+          2*Pair[e[1], k[3]]*(Pair[ec[5], k[1]] + Pair[ec[5], k[3]]))))/
+      (MW*SW)))/T + 
+  (G*((4*Alfas^2*EL*MT^2*(2 + Eps^(-1) + DiscB[T, Sqrt[MT^2], Sqrt[MT^2]] + 
+        Log[Mu^2/MT^2])*(-(Pair[e[1], ec[5]]*Pair[e[2], ec[4]]) + 
+        2*Pair[e[1], ec[4]]*Pair[e[2], ec[5]] - Pair[e[1], e[2]]*
+         Pair[ec[4], ec[5]]))/(MW*SW) - 
+     (16*Alfas^2*EL*MT^2*(3/4 + (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/
+         (4*(MH^2 - T)) - (T*DiscB[T, Sqrt[MT^2], Sqrt[MT^2]])/
+         (4*(MH^2 - T)) + 
+        (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^
+           2)/(4*(MH^2 - T)) + (Eps^(-1) + Log[Mu^2/MT^2])/4 - 
+        (MT^2*Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/(2*MT^2)]^2)/
+         (4*(MH^2 - T)))*(-(Pair[e[1], ec[5]]*Pair[e[2], ec[4]]) + 
+        2*Pair[e[1], ec[4]]*Pair[e[2], ec[5]] - Pair[e[1], e[2]]*
+         Pair[ec[4], ec[5]]))/(MW*SW) + 
+     (16*Alfas^2*EL*MT^2*(-1/(2*(MH^2 - T)) - 
+        (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/(2*(MH^2 - T)^2) + 
+        (MH^2*DiscB[T, Sqrt[MT^2], Sqrt[MT^2]])/(2*(MH^2 - T)^2) - 
+        (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^
+           2)/(2*(MH^2 - T)^2) + 
+        (MT^2*Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/(2*MT^2)]^2)/
+         (2*(MH^2 - T)^2))*Pair[e[1], k[3]]*
+       (Pair[e[2], k[1]]*Pair[ec[4], ec[5]] - 2*Pair[e[2], ec[5]]*
+         Pair[ec[4], k[1]] + Pair[e[2], ec[4]]*Pair[ec[5], k[1]]))/(MW*SW) + 
+     (2*Alfas^2*EL*MT^2*
+       (Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+         (2*(MH^2 - T)) - Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/
+            (2*MT^2)]^2/(2*(MH^2 - T)))*
+       (((-MH^2 + T)*Pair[e[1], e[2]] + 2*Pair[e[1], k[3]]*Pair[e[2], k[1]])*
+         Pair[ec[4], ec[5]] - 2*Pair[e[2], ec[5]]*
+         ((-MH^2 + T)*Pair[e[1], ec[4]] + 2*Pair[e[1], k[3]]*
+           Pair[ec[4], k[1]]) + Pair[e[2], ec[4]]*
+         ((-MH^2 + T)*Pair[e[1], ec[5]] + 2*Pair[e[1], k[3]]*
+           Pair[ec[5], k[1]])))/(MW*SW) + 
+     (16*Alfas^2*EL*MT^2*(-DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/
+         (2*(MH^2 - T)) + DiscB[T, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - T)))*
+       Pair[e[1], k[3]]*(Pair[e[2], k[3]]*Pair[ec[4], ec[5]] - 
+        2*Pair[e[2], ec[5]]*Pair[ec[4], k[3]] + Pair[e[2], ec[4]]*
+         Pair[ec[5], k[3]]))/(MW*SW) + 
+     (4*Alfas^2*EL*MT^2*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - T) - 
+        DiscB[T, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - T))*
+       (((-MH^2 + T)*Pair[e[1], e[2]] + 2*Pair[e[1], k[3]]*
+           (Pair[e[2], k[1]] + Pair[e[2], k[3]]))*Pair[ec[4], ec[5]] - 
+        2*Pair[e[2], ec[5]]*((-MH^2 + T)*Pair[e[1], ec[4]] + 
+          2*Pair[e[1], k[3]]*(Pair[ec[4], k[1]] + Pair[ec[4], k[3]])) + 
+        Pair[e[2], ec[4]]*((-MH^2 + T)*Pair[e[1], ec[5]] + 
+          2*Pair[e[1], k[3]]*(Pair[ec[5], k[1]] + Pair[ec[5], k[3]]))))/
+      (MW*SW)))/T]
diff --git a/tests/ggHgg_triangle_FeynAmp_2diags.m b/tests/ggHgg_triangle_FeynAmp_2diags.m
new file mode 100644
index 00000000..a0e51a8b
--- /dev/null
+++ b/tests/ggHgg_triangle_FeynAmp_2diags.m
@@ -0,0 +1,167 @@
+(* Created with the Wolfram Language for Students - Personal Use Only : www.wolfram.com *)
+Amp[{{V[5, {Glu1}], k[1], 0, {Sqrt[3]*ColorCharge}}, 
+    {V[5, {Glu2}], k[2], 0, {Sqrt[3]*ColorCharge}}} -> 
+   {{S[1], k[3], MH, {}}, {V[5, {Glu4}], k[4], 0, {Sqrt[3]*ColorCharge}}, 
+    {V[5, {Glu5}], k[5], 0, {Sqrt[3]*ColorCharge}}}][
+ Den[T, 0]*Mat[SUNT[Glu1, Glu2, Glu5, Glu4, 0, 0]]*
+   ((-4*Alfas2*EL*MT2*B0i[bb0, T, MT2, MT2]*
+      (-2*Pair[e[1], ec[5]]*Pair[e[2], ec[4]] + Pair[e[1], ec[4]]*
+        Pair[e[2], ec[5]] + Pair[e[1], e[2]]*Pair[ec[4], ec[5]]))/(MW*SW) + 
+    (16*Alfas2*EL*MT2*C0i[cc00, MH2, T, 0, MT2, MT2, MT2]*
+      (-2*Pair[e[1], ec[5]]*Pair[e[2], ec[4]] + Pair[e[1], ec[4]]*
+        Pair[e[2], ec[5]] + Pair[e[1], e[2]]*Pair[ec[4], ec[5]]))/(MW*SW) - 
+    (16*Alfas2*EL*MT2*C0i[cc12, MH2, T, 0, MT2, MT2, MT2]*Pair[e[1], k[3]]*
+      (-(Pair[e[2], k[1]]*Pair[ec[4], ec[5]]) - Pair[e[2], ec[5]]*
+        Pair[ec[4], k[1]] + 2*Pair[e[2], ec[4]]*Pair[ec[5], k[1]]))/(MW*SW) + 
+    (2*Alfas2*EL*MT2*C0i[cc0, MH2, T, 0, MT2, MT2, MT2]*
+      (((-MH2 + T)*Pair[e[1], e[2]] + 2*Pair[e[1], k[3]]*Pair[e[2], k[1]])*
+        Pair[ec[4], ec[5]] + Pair[e[2], ec[5]]*
+        ((-MH2 + T)*Pair[e[1], ec[4]] + 2*Pair[e[1], k[3]]*
+          Pair[ec[4], k[1]]) - 2*Pair[e[2], ec[4]]*
+        ((-MH2 + T)*Pair[e[1], ec[5]] + 2*Pair[e[1], k[3]]*
+          Pair[ec[5], k[1]])))/(MW*SW) + 
+    (16*Alfas2*EL*MT2*C0i[cc11, MH2, T, 0, MT2, MT2, MT2]*Pair[e[1], k[3]]*
+      (Pair[e[2], k[3]]*Pair[ec[4], ec[5]] + Pair[e[2], ec[5]]*
+        Pair[ec[4], k[3]] - 2*Pair[e[2], ec[4]]*Pair[ec[5], k[3]]))/(MW*SW) + 
+    (4*Alfas2*EL*MT2*C0i[cc1, MH2, T, 0, MT2, MT2, MT2]*
+      (((-MH2 + T)*Pair[e[1], e[2]] + 2*Pair[e[1], k[3]]*(Pair[e[2], k[1]] + 
+           Pair[e[2], k[3]]))*Pair[ec[4], ec[5]] + Pair[e[2], ec[5]]*
+        ((-MH2 + T)*Pair[e[1], ec[4]] + 2*Pair[e[1], k[3]]*
+          (Pair[ec[4], k[1]] + Pair[ec[4], k[3]])) - 2*Pair[e[2], ec[4]]*
+        ((-MH2 + T)*Pair[e[1], ec[5]] + 2*Pair[e[1], k[3]]*
+          (Pair[ec[5], k[1]] + Pair[ec[5], k[3]]))))/(MW*SW)) + 
+  Den[T, 0]*Mat[SUNT[Glu1, Glu4, Glu5, Glu2, 0, 0]]*
+   ((-4*Alfas2*EL*MT2*B0i[bb0, T, MT2, MT2]*
+      (-2*Pair[e[1], ec[5]]*Pair[e[2], ec[4]] + Pair[e[1], ec[4]]*
+        Pair[e[2], ec[5]] + Pair[e[1], e[2]]*Pair[ec[4], ec[5]]))/(MW*SW) + 
+    (16*Alfas2*EL*MT2*C0i[cc00, MH2, T, 0, MT2, MT2, MT2]*
+      (-2*Pair[e[1], ec[5]]*Pair[e[2], ec[4]] + Pair[e[1], ec[4]]*
+        Pair[e[2], ec[5]] + Pair[e[1], e[2]]*Pair[ec[4], ec[5]]))/(MW*SW) - 
+    (16*Alfas2*EL*MT2*C0i[cc12, MH2, T, 0, MT2, MT2, MT2]*Pair[e[1], k[3]]*
+      (-(Pair[e[2], k[1]]*Pair[ec[4], ec[5]]) - Pair[e[2], ec[5]]*
+        Pair[ec[4], k[1]] + 2*Pair[e[2], ec[4]]*Pair[ec[5], k[1]]))/(MW*SW) + 
+    (2*Alfas2*EL*MT2*C0i[cc0, MH2, T, 0, MT2, MT2, MT2]*
+      (((-MH2 + T)*Pair[e[1], e[2]] + 2*Pair[e[1], k[3]]*Pair[e[2], k[1]])*
+        Pair[ec[4], ec[5]] + Pair[e[2], ec[5]]*
+        ((-MH2 + T)*Pair[e[1], ec[4]] + 2*Pair[e[1], k[3]]*
+          Pair[ec[4], k[1]]) - 2*Pair[e[2], ec[4]]*
+        ((-MH2 + T)*Pair[e[1], ec[5]] + 2*Pair[e[1], k[3]]*
+          Pair[ec[5], k[1]])))/(MW*SW) + 
+    (16*Alfas2*EL*MT2*C0i[cc11, MH2, T, 0, MT2, MT2, MT2]*Pair[e[1], k[3]]*
+      (Pair[e[2], k[3]]*Pair[ec[4], ec[5]] + Pair[e[2], ec[5]]*
+        Pair[ec[4], k[3]] - 2*Pair[e[2], ec[4]]*Pair[ec[5], k[3]]))/(MW*SW) + 
+    (4*Alfas2*EL*MT2*C0i[cc1, MH2, T, 0, MT2, MT2, MT2]*
+      (((-MH2 + T)*Pair[e[1], e[2]] + 2*Pair[e[1], k[3]]*(Pair[e[2], k[1]] + 
+           Pair[e[2], k[3]]))*Pair[ec[4], ec[5]] + Pair[e[2], ec[5]]*
+        ((-MH2 + T)*Pair[e[1], ec[4]] + 2*Pair[e[1], k[3]]*
+          (Pair[ec[4], k[1]] + Pair[ec[4], k[3]])) - 2*Pair[e[2], ec[4]]*
+        ((-MH2 + T)*Pair[e[1], ec[5]] + 2*Pair[e[1], k[3]]*
+          (Pair[ec[5], k[1]] + Pair[ec[5], k[3]]))))/(MW*SW)) + 
+  Den[T, 0]*Mat[SUNT[Glu1, Glu4, Glu2, Glu5, 0, 0]]*
+   ((-4*Alfas2*EL*MT2*B0i[bb0, T, MT2, MT2]*
+      (Pair[e[1], ec[5]]*Pair[e[2], ec[4]] + Pair[e[1], ec[4]]*
+        Pair[e[2], ec[5]] - 2*Pair[e[1], e[2]]*Pair[ec[4], ec[5]]))/(MW*SW) + 
+    (16*Alfas2*EL*MT2*C0i[cc00, MH2, T, 0, MT2, MT2, MT2]*
+      (Pair[e[1], ec[5]]*Pair[e[2], ec[4]] + Pair[e[1], ec[4]]*
+        Pair[e[2], ec[5]] - 2*Pair[e[1], e[2]]*Pair[ec[4], ec[5]]))/(MW*SW) + 
+    (16*Alfas2*EL*MT2*C0i[cc12, MH2, T, 0, MT2, MT2, MT2]*Pair[e[1], k[3]]*
+      (-2*Pair[e[2], k[1]]*Pair[ec[4], ec[5]] + Pair[e[2], ec[5]]*
+        Pair[ec[4], k[1]] + Pair[e[2], ec[4]]*Pair[ec[5], k[1]]))/(MW*SW) - 
+    (2*Alfas2*EL*MT2*C0i[cc0, MH2, T, 0, MT2, MT2, MT2]*
+      (2*((-MH2 + T)*Pair[e[1], e[2]] + 2*Pair[e[1], k[3]]*Pair[e[2], k[1]])*
+        Pair[ec[4], ec[5]] - Pair[e[2], ec[5]]*
+        ((-MH2 + T)*Pair[e[1], ec[4]] + 2*Pair[e[1], k[3]]*
+          Pair[ec[4], k[1]]) - Pair[e[2], ec[4]]*
+        ((-MH2 + T)*Pair[e[1], ec[5]] + 2*Pair[e[1], k[3]]*
+          Pair[ec[5], k[1]])))/(MW*SW) - 
+    (16*Alfas2*EL*MT2*C0i[cc11, MH2, T, 0, MT2, MT2, MT2]*Pair[e[1], k[3]]*
+      (2*Pair[e[2], k[3]]*Pair[ec[4], ec[5]] - Pair[e[2], ec[5]]*
+        Pair[ec[4], k[3]] - Pair[e[2], ec[4]]*Pair[ec[5], k[3]]))/(MW*SW) - 
+    (4*Alfas2*EL*MT2*C0i[cc1, MH2, T, 0, MT2, MT2, MT2]*
+      (2*((-MH2 + T)*Pair[e[1], e[2]] + 2*Pair[e[1], k[3]]*
+          (Pair[e[2], k[1]] + Pair[e[2], k[3]]))*Pair[ec[4], ec[5]] - 
+       Pair[e[2], ec[5]]*((-MH2 + T)*Pair[e[1], ec[4]] + 
+         2*Pair[e[1], k[3]]*(Pair[ec[4], k[1]] + Pair[ec[4], k[3]])) - 
+       Pair[e[2], ec[4]]*((-MH2 + T)*Pair[e[1], ec[5]] + 
+         2*Pair[e[1], k[3]]*(Pair[ec[5], k[1]] + Pair[ec[5], k[3]]))))/
+     (MW*SW)) + Den[T, 0]*Mat[SUNT[Glu1, Glu5, Glu2, Glu4, 0, 0]]*
+   ((-4*Alfas2*EL*MT2*B0i[bb0, T, MT2, MT2]*
+      (Pair[e[1], ec[5]]*Pair[e[2], ec[4]] + Pair[e[1], ec[4]]*
+        Pair[e[2], ec[5]] - 2*Pair[e[1], e[2]]*Pair[ec[4], ec[5]]))/(MW*SW) + 
+    (16*Alfas2*EL*MT2*C0i[cc00, MH2, T, 0, MT2, MT2, MT2]*
+      (Pair[e[1], ec[5]]*Pair[e[2], ec[4]] + Pair[e[1], ec[4]]*
+        Pair[e[2], ec[5]] - 2*Pair[e[1], e[2]]*Pair[ec[4], ec[5]]))/(MW*SW) + 
+    (16*Alfas2*EL*MT2*C0i[cc12, MH2, T, 0, MT2, MT2, MT2]*Pair[e[1], k[3]]*
+      (-2*Pair[e[2], k[1]]*Pair[ec[4], ec[5]] + Pair[e[2], ec[5]]*
+        Pair[ec[4], k[1]] + Pair[e[2], ec[4]]*Pair[ec[5], k[1]]))/(MW*SW) - 
+    (2*Alfas2*EL*MT2*C0i[cc0, MH2, T, 0, MT2, MT2, MT2]*
+      (2*((-MH2 + T)*Pair[e[1], e[2]] + 2*Pair[e[1], k[3]]*Pair[e[2], k[1]])*
+        Pair[ec[4], ec[5]] - Pair[e[2], ec[5]]*
+        ((-MH2 + T)*Pair[e[1], ec[4]] + 2*Pair[e[1], k[3]]*
+          Pair[ec[4], k[1]]) - Pair[e[2], ec[4]]*
+        ((-MH2 + T)*Pair[e[1], ec[5]] + 2*Pair[e[1], k[3]]*
+          Pair[ec[5], k[1]])))/(MW*SW) - 
+    (16*Alfas2*EL*MT2*C0i[cc11, MH2, T, 0, MT2, MT2, MT2]*Pair[e[1], k[3]]*
+      (2*Pair[e[2], k[3]]*Pair[ec[4], ec[5]] - Pair[e[2], ec[5]]*
+        Pair[ec[4], k[3]] - Pair[e[2], ec[4]]*Pair[ec[5], k[3]]))/(MW*SW) - 
+    (4*Alfas2*EL*MT2*C0i[cc1, MH2, T, 0, MT2, MT2, MT2]*
+      (2*((-MH2 + T)*Pair[e[1], e[2]] + 2*Pair[e[1], k[3]]*
+          (Pair[e[2], k[1]] + Pair[e[2], k[3]]))*Pair[ec[4], ec[5]] - 
+       Pair[e[2], ec[5]]*((-MH2 + T)*Pair[e[1], ec[4]] + 
+         2*Pair[e[1], k[3]]*(Pair[ec[4], k[1]] + Pair[ec[4], k[3]])) - 
+       Pair[e[2], ec[4]]*((-MH2 + T)*Pair[e[1], ec[5]] + 
+         2*Pair[e[1], k[3]]*(Pair[ec[5], k[1]] + Pair[ec[5], k[3]]))))/
+     (MW*SW)) + Den[T, 0]*Mat[SUNT[Glu1, Glu2, Glu4, Glu5, 0, 0]]*
+   ((4*Alfas2*EL*MT2*B0i[bb0, T, MT2, MT2]*
+      (-(Pair[e[1], ec[5]]*Pair[e[2], ec[4]]) + 2*Pair[e[1], ec[4]]*
+        Pair[e[2], ec[5]] - Pair[e[1], e[2]]*Pair[ec[4], ec[5]]))/(MW*SW) - 
+    (16*Alfas2*EL*MT2*C0i[cc00, MH2, T, 0, MT2, MT2, MT2]*
+      (-(Pair[e[1], ec[5]]*Pair[e[2], ec[4]]) + 2*Pair[e[1], ec[4]]*
+        Pair[e[2], ec[5]] - Pair[e[1], e[2]]*Pair[ec[4], ec[5]]))/(MW*SW) + 
+    (16*Alfas2*EL*MT2*C0i[cc12, MH2, T, 0, MT2, MT2, MT2]*Pair[e[1], k[3]]*
+      (Pair[e[2], k[1]]*Pair[ec[4], ec[5]] - 2*Pair[e[2], ec[5]]*
+        Pair[ec[4], k[1]] + Pair[e[2], ec[4]]*Pair[ec[5], k[1]]))/(MW*SW) + 
+    (2*Alfas2*EL*MT2*C0i[cc0, MH2, T, 0, MT2, MT2, MT2]*
+      (((-MH2 + T)*Pair[e[1], e[2]] + 2*Pair[e[1], k[3]]*Pair[e[2], k[1]])*
+        Pair[ec[4], ec[5]] - 2*Pair[e[2], ec[5]]*
+        ((-MH2 + T)*Pair[e[1], ec[4]] + 2*Pair[e[1], k[3]]*
+          Pair[ec[4], k[1]]) + Pair[e[2], ec[4]]*
+        ((-MH2 + T)*Pair[e[1], ec[5]] + 2*Pair[e[1], k[3]]*
+          Pair[ec[5], k[1]])))/(MW*SW) + 
+    (16*Alfas2*EL*MT2*C0i[cc11, MH2, T, 0, MT2, MT2, MT2]*Pair[e[1], k[3]]*
+      (Pair[e[2], k[3]]*Pair[ec[4], ec[5]] - 2*Pair[e[2], ec[5]]*
+        Pair[ec[4], k[3]] + Pair[e[2], ec[4]]*Pair[ec[5], k[3]]))/(MW*SW) + 
+    (4*Alfas2*EL*MT2*C0i[cc1, MH2, T, 0, MT2, MT2, MT2]*
+      (((-MH2 + T)*Pair[e[1], e[2]] + 2*Pair[e[1], k[3]]*(Pair[e[2], k[1]] + 
+           Pair[e[2], k[3]]))*Pair[ec[4], ec[5]] - 2*Pair[e[2], ec[5]]*
+        ((-MH2 + T)*Pair[e[1], ec[4]] + 2*Pair[e[1], k[3]]*
+          (Pair[ec[4], k[1]] + Pair[ec[4], k[3]])) + Pair[e[2], ec[4]]*
+        ((-MH2 + T)*Pair[e[1], ec[5]] + 2*Pair[e[1], k[3]]*
+          (Pair[ec[5], k[1]] + Pair[ec[5], k[3]]))))/(MW*SW)) + 
+  Den[T, 0]*Mat[SUNT[Glu1, Glu5, Glu4, Glu2, 0, 0]]*
+   ((4*Alfas2*EL*MT2*B0i[bb0, T, MT2, MT2]*
+      (-(Pair[e[1], ec[5]]*Pair[e[2], ec[4]]) + 2*Pair[e[1], ec[4]]*
+        Pair[e[2], ec[5]] - Pair[e[1], e[2]]*Pair[ec[4], ec[5]]))/(MW*SW) - 
+    (16*Alfas2*EL*MT2*C0i[cc00, MH2, T, 0, MT2, MT2, MT2]*
+      (-(Pair[e[1], ec[5]]*Pair[e[2], ec[4]]) + 2*Pair[e[1], ec[4]]*
+        Pair[e[2], ec[5]] - Pair[e[1], e[2]]*Pair[ec[4], ec[5]]))/(MW*SW) + 
+    (16*Alfas2*EL*MT2*C0i[cc12, MH2, T, 0, MT2, MT2, MT2]*Pair[e[1], k[3]]*
+      (Pair[e[2], k[1]]*Pair[ec[4], ec[5]] - 2*Pair[e[2], ec[5]]*
+        Pair[ec[4], k[1]] + Pair[e[2], ec[4]]*Pair[ec[5], k[1]]))/(MW*SW) + 
+    (2*Alfas2*EL*MT2*C0i[cc0, MH2, T, 0, MT2, MT2, MT2]*
+      (((-MH2 + T)*Pair[e[1], e[2]] + 2*Pair[e[1], k[3]]*Pair[e[2], k[1]])*
+        Pair[ec[4], ec[5]] - 2*Pair[e[2], ec[5]]*
+        ((-MH2 + T)*Pair[e[1], ec[4]] + 2*Pair[e[1], k[3]]*
+          Pair[ec[4], k[1]]) + Pair[e[2], ec[4]]*
+        ((-MH2 + T)*Pair[e[1], ec[5]] + 2*Pair[e[1], k[3]]*
+          Pair[ec[5], k[1]])))/(MW*SW) + 
+    (16*Alfas2*EL*MT2*C0i[cc11, MH2, T, 0, MT2, MT2, MT2]*Pair[e[1], k[3]]*
+      (Pair[e[2], k[3]]*Pair[ec[4], ec[5]] - 2*Pair[e[2], ec[5]]*
+        Pair[ec[4], k[3]] + Pair[e[2], ec[4]]*Pair[ec[5], k[3]]))/(MW*SW) + 
+    (4*Alfas2*EL*MT2*C0i[cc1, MH2, T, 0, MT2, MT2, MT2]*
+      (((-MH2 + T)*Pair[e[1], e[2]] + 2*Pair[e[1], k[3]]*(Pair[e[2], k[1]] + 
+           Pair[e[2], k[3]]))*Pair[ec[4], ec[5]] - 2*Pair[e[2], ec[5]]*
+        ((-MH2 + T)*Pair[e[1], ec[4]] + 2*Pair[e[1], k[3]]*
+          (Pair[ec[4], k[1]] + Pair[ec[4], k[3]])) + Pair[e[2], ec[4]]*
+        ((-MH2 + T)*Pair[e[1], ec[5]] + 2*Pair[e[1], k[3]]*
+          (Pair[ec[5], k[1]] + Pair[ec[5], k[3]]))))/(MW*SW))]
diff --git a/tests/triangle_++++.m b/tests/triangle_++++.m
new file mode 100644
index 00000000..b7dd4164
--- /dev/null
+++ b/tests/triangle_++++.m
@@ -0,0 +1,38214 @@
+(* Created with the Wolfram Language for Students - Personal Use Only : www.wolfram.com *)
+(-2*Alfas^2*c2*EL*MT^2*
+   (((4*(2 + Eps^(-1) + DiscB[T, Sqrt[MT^2], Sqrt[MT^2]] + Log[Mu^2/MT^2]) - 
+        16*(3/4 + (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/(4*(MH^2 - T)) - 
+          (T*DiscB[T, Sqrt[MT^2], Sqrt[MT^2]])/(4*(MH^2 - T)) + 
+          (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*
+                MT^2)]^2)/(4*(MH^2 - T)) + (Eps^(-1) + Log[Mu^2/MT^2])/4 - 
+          (MT^2*Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/(2*MT^2)]^2)/
+           (4*(MH^2 - T))))*
+       (-(((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]] + Conjugate[
+             (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+               kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+               (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                   2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+           (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+          Sqrt[2]) - (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                  kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                  kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                    Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                   kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                    Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                    \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+           Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+               Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+          (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/
+         (2*Sqrt[2]) - (Sech[\[Eta]4]*
+          (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+           I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+           Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2]) - 
+      2*(Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+         (2*(MH^2 - T)) - Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/
+            (2*MT^2)]^2/(2*(MH^2 - T)))*
+       (-(Sech[\[Eta]4]*(((-MH^2 + T)*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                     kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+               (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                 kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] - 
+           (kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                   Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                  kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                   Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                 (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+             (Cos[\[Phi]3] + I*Sin[\[Phi]3]))/Sqrt[2])*
+          (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4])) + 
+        ((MH^2 - T)*Sech[\[Eta]4]*
+          (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+           I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+           Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2] + 
+        (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]] + Conjugate[
+            (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+              kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+              (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+          (-(kT3*Sqrt[S]*Sech[\[Eta]4]*(Cos[\[Phi]3] + I*Sin[\[Phi]3]))/2 - 
+           ((-MH^2 + T)*Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+              Sinh[\[Eta]4 + I*\[Phi]4]))/2))/Sqrt[2]) - 
+      8*Sqrt[2]*kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+       ((-1/(2*(MH^2 - T)) - (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/
+           (2*(MH^2 - T)^2) + (MH^2*DiscB[T, Sqrt[MT^2], Sqrt[MT^2]])/
+           (2*(MH^2 - T)^2) - (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[
+                 -(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2)/(2*(MH^2 - T)^2) + 
+          (MT^2*Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/(2*MT^2)]^2)/
+           (2*(MH^2 - T)^2))*
+         (-(Sqrt[S]*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                    kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+              Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4])/4 + 
+          (Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+            (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/2) + 
+        (-DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - T)) + 
+          DiscB[T, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - T)))*
+         (kT3*Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                   kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + 
+                  kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                 Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                     \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+            Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+            Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])*
+           (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]) + 
+          (kT3*Sech[\[Eta]4]*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+            (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+             I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                I*\[Phi]4]))/2 + 
+          (kT3*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + 
+             Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/2)) - 
+      4*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - T) - 
+        DiscB[T, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - T))*
+       (-(Sech[\[Eta]4]*(((-MH^2 + T)*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                     kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+               (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                 kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] + 
+           Sqrt[2]*kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+            (-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 - 
+             kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                      Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Cos[\[Phi]3] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+               Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])))*
+          (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4])) + 
+        (Sech[\[Eta]4]*(MH^2 - T + kT3^2*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+            (Cos[\[Phi]3] + I*Sin[\[Phi]3]))*
+          (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+           I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+           Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2] + 
+        (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]] + Conjugate[
+            (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+              kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+              (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+          (-((-MH^2 + T)*Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[
+                \[Eta]4 + I*\[Phi]4]))/2 + Sqrt[2]*kT3*(Cos[\[Phi]3] + 
+             I*Sin[\[Phi]3])*(-(Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) + 
+             (kT3*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                  I*\[Phi]4]))/Sqrt[2])))/Sqrt[2]))/T + 
+    ((4*(2 + Eps^(-1) + DiscB[S34, Sqrt[MT^2], Sqrt[MT^2]] + 
+          Log[Mu^2/MT^2]) - 16*(3/4 + (MH^2*DiscB[MH^2, Sqrt[MT^2], 
+             Sqrt[MT^2]])/(4*(MH^2 - S34)) - 
+          (S34*DiscB[S34, Sqrt[MT^2], Sqrt[MT^2]])/(4*(MH^2 - S34)) + 
+          (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*
+                MT^2)]^2)/(4*(MH^2 - S34)) + (Eps^(-1) + Log[Mu^2/MT^2])/4 - 
+          (MT^2*Log[(2*MT^2 - S34 + Sqrt[-((4*MT^2 - S34)*S34)])/(2*MT^2)]^2)/
+           (4*(MH^2 - S34))))*
+       (-(((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]] + Conjugate[
+             (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+               kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+               (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                   2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+           (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+          Sqrt[2]) - (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                  kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                  kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                    Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                   kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                    Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                    \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+           Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+               Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+          (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/
+         (2*Sqrt[2]) - (Sech[\[Eta]4]*
+          (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+           I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+           Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2]) + 
+      (kT3*Sech[\[Eta]4]*(-16*(-DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/
+            (2*(MH^2 - S34)) + DiscB[S34, Sqrt[MT^2], Sqrt[MT^2]]/
+            (2*(MH^2 - S34)))*
+          (-(kT3*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+              Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*(Cos[\[Phi]3] - 
+              I*Sin[\[Phi]3])) + (kT3*((-I)*Conjugate[
+                (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+               (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                 kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*(Cos[\[Phi]3] + 
+              I*Sin[\[Phi]3]))/2 + 
+           kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+             Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+             Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])) + 
+         16*(-1/(2*(MH^2 - S34)) - (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/
+            (2*(MH^2 - S34)^2) + (MH^2*DiscB[S34, Sqrt[MT^2], Sqrt[MT^2]])/
+            (2*(MH^2 - S34)^2) - (MT^2*Log[(-MH^2 + 2*MT^2 + 
+                 Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2)/
+            (2*(MH^2 - S34)^2) + (MT^2*Log[(2*MT^2 - S34 + Sqrt[
+                  -((4*MT^2 - S34)*S34)])/(2*MT^2)]^2)/(2*(MH^2 - S34)^2))*
+          (-(kT4*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+              Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*(Cos[\[Phi]4] - 
+              I*Sin[\[Phi]4])) + (kT4*((-I)*Conjugate[
+                (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+               (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                 kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*(Cos[\[Phi]4] + 
+              I*Sin[\[Phi]4]))/2 + 
+           kT4*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+             Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+             Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])))*
+        (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2] - 
+      4*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - S34) - 
+        DiscB[S34, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - S34))*
+       (-(((-MH^2 + S34)*Sech[\[Eta]4]*
+           (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+            I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2]) - 
+        Sqrt[2]*kT3*Sech[\[Eta]4]*
+         (-(kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+             Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+             Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])) + 
+          kT4*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+            Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4]))*
+         (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]) - 
+        Sqrt[2]*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+               Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+          Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+              Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[
+                kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*
+                kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+         (((-MH^2 + S34)*Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+             Sinh[\[Eta]4 + I*\[Phi]4]))/2 + Sqrt[2]*kT3*Sech[\[Eta]4]*
+           ((kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/Sqrt[2] - 
+            (kT4*(Cos[\[Phi]4] - I*Sin[\[Phi]4]))/Sqrt[2])*
+           (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4])) + 
+        (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]] + Conjugate[
+            (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+              kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+              (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+          (-((-MH^2 + S34)*Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[
+                \[Eta]4 + I*\[Phi]4]))/2 + Sqrt[2]*kT3*Sech[\[Eta]4]*
+            ((kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3]))/Sqrt[2] - 
+             (kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4]))/Sqrt[2])*
+            (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4])))/
+         Sqrt[2]) - 2*(Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/
+            (2*MT^2)]^2/(2*(MH^2 - S34)) - 
+        Log[(2*MT^2 - S34 + Sqrt[-((4*MT^2 - S34)*S34)])/(2*MT^2)]^2/
+         (2*(MH^2 - S34)))*(((MH^2 - S34)*Sech[\[Eta]4]*
+          (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+           I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+           Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2] - 
+        Sqrt[2]*kT3*kT4*Sech[\[Eta]4]*
+         (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+               Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+          Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+               Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+          Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                 Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                 Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])*
+         (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]) + 
+        Sqrt[2]*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+               Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+          Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+              Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[
+                kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*
+                kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+         (((MH^2 - S34)*Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+             Sinh[\[Eta]4 + I*\[Phi]4]))/2 + kT3*kT4*Sech[\[Eta]4]*
+           (Cos[\[Phi]4] - I*Sin[\[Phi]4])*(-Sinh[\[Eta]3] + 
+            Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4])) - 
+        (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]] + Conjugate[
+            (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+              kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+              (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+          (-((MH^2 - S34)*Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[
+                \[Eta]4 + I*\[Phi]4]))/2 + kT3*kT4*Sech[\[Eta]4]*
+            (Cos[\[Phi]4] + I*Sin[\[Phi]4])*(-Sinh[\[Eta]3] + 
+             Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4])))/Sqrt[2]) - 
+      ((4*(2 + Eps^(-1) + DiscB[S34, Sqrt[MT^2], Sqrt[MT^2]] + 
+            Log[Mu^2/MT^2]) - 16*(3/4 + (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[
+                MT^2]])/(4*(MH^2 - S34)) - (S34*DiscB[S34, Sqrt[MT^2], Sqrt[
+                MT^2]])/(4*(MH^2 - S34)) + 
+            (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/
+                 (2*MT^2)]^2)/(4*(MH^2 - S34)) + (Eps^(-1) + Log[Mu^2/MT^2])/
+             4 - (MT^2*Log[(2*MT^2 - S34 + Sqrt[-((4*MT^2 - S34)*S34)])/
+                 (2*MT^2)]^2)/(4*(MH^2 - S34))))*
+         (-(((-T - T14 + T24 + U)*Sech[\[Eta]4]*
+             (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                    2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - I*Conjugate[
+                (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                 I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                 I*\[Phi]4]))/Sqrt[2]) - (kT3*Sqrt[S]*Conjugate[
+             1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                    \[Phi]4])]]*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + 
+             Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]) - 
+        4*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - S34) - 
+          DiscB[S34, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - S34))*
+         (-((S*(MH^2 - S34)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                   Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                  kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                   Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                 (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+             Sech[\[Eta]4])/Sqrt[2]) - (S*(-MH^2 + S34)*
+            Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4])/Sqrt[2] - 
+          ((MH^2 - S34)*(T + T14 - T24 - U)*Sech[\[Eta]4]*
+            (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+             I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                I*\[Phi]4]))/Sqrt[2] - (kT3*Sech[\[Eta]4]*
+            ((Sqrt[S]*(-7*MH^2 + 2*S + 3*S34 + 8*T)*Conjugate[
+                1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                     Cos[\[Phi]3 - \[Phi]4])]])/2 - (Sqrt[S]*(7*MH^2 - 2*S - 
+                3*S34 - 8*U)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                   (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 - 
+             4*kT3*(-2*MH^2 + S + S34 + 2*T24 + 2*U)*
+              (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                      Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Cos[\[Phi]3] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+               Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3]))*
+            (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+           Sqrt[2]) + 8*((kT3*(-DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/
+              (2*(MH^2 - S34)) + DiscB[S34, Sqrt[MT^2], Sqrt[MT^2]]/
+              (2*(MH^2 - S34)))*Sech[\[Eta]4]*(-(Sqrt[S]*(3*MH^2 - S34 - 4*T)*
+                Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 + 
+             (Sqrt[S]*(-3*MH^2 + S34 + 4*U)*Conjugate[
+                1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                     Cos[\[Phi]3 - \[Phi]4])]])/2 + 2*kT3*(T + T14 - T24 - U)*
+              (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                      Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Cos[\[Phi]3] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+               Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3]))*
+            (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+           Sqrt[2] + (kT3*(-1/(2*(MH^2 - S34)) - (MH^2*DiscB[MH^2, 
+                Sqrt[MT^2], Sqrt[MT^2]])/(2*(MH^2 - S34)^2) + 
+             (MH^2*DiscB[S34, Sqrt[MT^2], Sqrt[MT^2]])/(2*(MH^2 - S34)^2) - 
+             (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/
+                  (2*MT^2)]^2)/(2*(MH^2 - S34)^2) + 
+             (MT^2*Log[(2*MT^2 - S34 + Sqrt[-((4*MT^2 - S34)*S34)])/(2*MT^2)]^
+                2)/(2*(MH^2 - S34)^2))*Sech[\[Eta]4]*
+            ((Sqrt[S]*(MH^2 - S34 - 2*(T14 + T24))*Conjugate[
+                1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                     Cos[\[Phi]3 - \[Phi]4])]])/2 - (Sqrt[S]*(-MH^2 + S34 + 
+                2*(T14 + T24))*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                   (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 - 
+             2*kT3*(-T14 + T24)*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+               Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Sin[\[Phi]3] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                Sinh[\[Eta]3]) - 2*kT4*(T - U)*(Conjugate[
+                 (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+               Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Sin[\[Phi]4] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                Sinh[\[Eta]4]))*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+               I*\[Phi]4]))/Sqrt[2]) - 
+        2*(Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+           (2*(MH^2 - S34)) - Log[(2*MT^2 - S34 + Sqrt[-((4*MT^2 - S34)*
+                  S34)])/(2*MT^2)]^2/(2*(MH^2 - S34)))*
+         (-(((MH^2 - S34)*(T + T14 - T24 - U)*Sech[\[Eta]4]*
+             (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                    2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - I*Conjugate[
+                (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                 I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                 I*\[Phi]4]))/Sqrt[2]) - 
+          2*(-(S*(-MH^2 + S34)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                   (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[
+                \[Eta]4])/(2*Sqrt[2]) + (Sqrt[S]*(MH^2 - S34)*Sech[\[Eta]4]*
+              (-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                      (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/
+                2 + kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                     (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                         kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                         kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                         4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                    Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                      (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+                 Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3]) + kT4*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                      (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                     (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                         kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                         kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                         4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                    Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                      (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+                 Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]4])))/Sqrt[2] + (kT3*Sech[\[Eta]4]*
+              (-(Sqrt[S]*(T14 + T24)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                      4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                        2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                       Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                       Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                        \[Phi]3 - \[Phi]4])]]) + 2*kT3*T14*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3]) - kT4*(T - T14 - T24 - U)*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]4]))*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                 I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2])))/S)/S34 + 
+    ((4*(2 + Eps^(-1) + DiscB[2*MH^2 - S34 - T - U, Sqrt[MT^2], Sqrt[MT^2]] + 
+          Log[Mu^2/MT^2]) - 16*(3/4 - (MH^2*DiscB[MH^2, Sqrt[MT^2], 
+             Sqrt[MT^2]])/(4*(MH^2 - S34 - T - U)) + 
+          ((2*MH^2 - S34 - T - U)*DiscB[2*MH^2 - S34 - T - U, Sqrt[MT^2], 
+             Sqrt[MT^2]])/(4*(MH^2 - S34 - T - U)) - 
+          (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*
+                MT^2)]^2)/(4*(MH^2 - S34 - T - U)) + 
+          (Eps^(-1) + Log[Mu^2/MT^2])/4 + 
+          (MT^2*Log[(-2*MH^2 + 2*MT^2 + S34 + T + U + Sqrt[
+                 -((2*MH^2 - S34 - T - U)*(-2*MH^2 + 4*MT^2 + S34 + T + U))])/
+               (2*MT^2)]^2)/(4*(MH^2 - S34 - T - U))))*
+       (-(((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]] + Conjugate[
+             (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+               kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+               (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                   2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+           (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+          Sqrt[2]) - (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                  kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                  kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                    Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                   kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                    Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                    \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+           Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+               Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+          (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/
+         (2*Sqrt[2]) - (Sech[\[Eta]4]*
+          (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+           I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+           Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2]) - 
+      2*(-Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+         (2*(MH^2 - S34 - T - U)) + 
+        Log[(-2*MH^2 + 2*MT^2 + S34 + T + U + Sqrt[-((2*MH^2 - S34 - T - U)*
+                (-2*MH^2 + 4*MT^2 + S34 + T + U))])/(2*MT^2)]^2/
+         (2*(MH^2 - S34 - T - U)))*
+       (Sech[\[Eta]4]*(((-MH^2 + S34 + T + U)*
+            (I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]))/Sqrt[2] + Sqrt[2]*kT3*
+           (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+              kT4*Sin[\[Phi]4]))*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                   kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + 
+                  kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                 Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                     \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+            Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+            Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3]))*
+         (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]) + 
+        (Sech[\[Eta]4]*(((-MH^2 + S34 + T + U)*((-I)*Conjugate[
+                (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+               (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                 kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] - 
+           Sqrt[2]*kT3*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+             I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+            (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+             Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+             Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3]))*
+          (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+        ((-MH^2 + S34 + T + U)*Sech[\[Eta]4]*
+          (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+           I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+           Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2] - 
+        Sqrt[2]*kT3^2*Sech[\[Eta]4]*
+         (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+               Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+          Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+               Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+          Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                 Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                 Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])*
+         (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4])) - 
+      kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+              Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+             Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+              Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                 Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                 Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+              2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+              4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+              kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+              4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+        Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+              Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+             Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+              Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                 Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                 Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+              2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+              4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+              kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+              4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+        Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+              4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+               Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                 \[Phi]4])]]*Sinh[\[Eta]3])*
+       (16*(1/(2*(MH^2 - S34 - T - U)) - (MH^2*DiscB[MH^2, Sqrt[MT^2], 
+             Sqrt[MT^2]])/(2*(MH^2 - S34 - T - U)^2) + 
+          (MH^2*DiscB[2*MH^2 - S34 - T - U, Sqrt[MT^2], Sqrt[MT^2]])/
+           (2*(MH^2 - S34 - T - U)^2) - 
+          (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*
+                MT^2)]^2)/(2*(MH^2 - S34 - T - U)^2) + 
+          (MT^2*Log[(-2*MH^2 + 2*MT^2 + S34 + T + U + Sqrt[
+                 -((2*MH^2 - S34 - T - U)*(-2*MH^2 + 4*MT^2 + S34 + T + U))])/
+               (2*MT^2)]^2)/(2*(MH^2 - S34 - T - U)^2))*
+         ((Sech[\[Eta]4]*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + 
+             I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+            (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+           Sqrt[2] - (Sech[\[Eta]4]*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+             I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+            (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/
+           (2*Sqrt[2]) - (kT3*Sech[\[Eta]4]*(Sinh[\[Eta]3] - 
+             Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]) - 
+        16*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - S34 - T - U)) - 
+          DiscB[2*MH^2 - S34 - T - U, Sqrt[MT^2], Sqrt[MT^2]]/
+           (2*(MH^2 - S34 - T - U)))*
+         (-((kT3*Sech[\[Eta]4]*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+             (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+            Sqrt[2]) - (kT3*Sech[\[Eta]4]*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+            (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/
+           (2*Sqrt[2]) - (kT3*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + 
+             Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2])) - 
+      4*(-(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - S34 - T - U)) + 
+        DiscB[2*MH^2 - S34 - T - U, Sqrt[MT^2], Sqrt[MT^2]]/
+         (MH^2 - S34 - T - U))*(Sech[\[Eta]4]*
+         (((-MH^2 + S34 + T + U)*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                    kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                 (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]))/Sqrt[2] + 
+          2*kT3*((kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3]))/Sqrt[2] + 
+            (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                kT4*Sin[\[Phi]4]))/Sqrt[2])*
+           (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+            Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+            Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3]))*
+         (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]) + 
+        (Sech[\[Eta]4]*(((-MH^2 + S34 + T + U)*((-I)*Conjugate[
+                (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+               (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                 kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] + 
+           2*kT3*((kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/Sqrt[2] - 
+             (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4]))/Sqrt[2])*
+            (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+             Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+             Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3]))*
+          (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+        ((-MH^2 + S34 + T + U)*Sech[\[Eta]4]*
+          (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+           I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+           Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2] + 
+        2*kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+               Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+          Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+               Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+          Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                 Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                 Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])*
+         (-((kT3*Sech[\[Eta]4]*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+                I*\[Phi]4]))/Sqrt[2]) + (kT3*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + 
+             Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2])) - 
+      (4*(2 + Eps^(-1) + DiscB[2*MH^2 - S34 - T - U, Sqrt[MT^2], 
+           Sqrt[MT^2]] + Log[Mu^2/MT^2])*
+         ((Sqrt[S]*Sech[\[Eta]4]*(2*Sqrt[S]*Conjugate[1/Sqrt[
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                    Cos[\[Phi]3 - \[Phi]4])]] - 
+             kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                      Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Cos[\[Phi]3] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+               Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])))/
+           (2*Sqrt[2]) - (Sqrt[S]*Sech[\[Eta]4]*
+            (2*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                    Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                   kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                    Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                  (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] + 
+             kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                      Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Cos[\[Phi]3] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+               Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])))/
+           (2*Sqrt[2]) - ((-T14 + T24)*Sech[\[Eta]4]*
+            (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+             I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                I*\[Phi]4]))/Sqrt[2]) - 
+        16*(3/4 - (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/
+           (4*(MH^2 - S34 - T - U)) + ((2*MH^2 - S34 - T - U)*
+            DiscB[2*MH^2 - S34 - T - U, Sqrt[MT^2], Sqrt[MT^2]])/
+           (4*(MH^2 - S34 - T - U)) - 
+          (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*
+                MT^2)]^2)/(4*(MH^2 - S34 - T - U)) + 
+          (Eps^(-1) + Log[Mu^2/MT^2])/4 + 
+          (MT^2*Log[(-2*MH^2 + 2*MT^2 + S34 + T + U + Sqrt[
+                 -((2*MH^2 - S34 - T - U)*(-2*MH^2 + 4*MT^2 + S34 + T + U))])/
+               (2*MT^2)]^2)/(4*(MH^2 - S34 - T - U)))*
+         ((Sqrt[S]*Sech[\[Eta]4]*(2*Sqrt[S]*Conjugate[1/Sqrt[
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                    Cos[\[Phi]3 - \[Phi]4])]] - 
+             kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                      Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Cos[\[Phi]3] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+               Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])))/
+           (2*Sqrt[2]) - (Sqrt[S]*Sech[\[Eta]4]*
+            (2*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                    Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                   kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                    Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                  (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] + 
+             kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                      Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Cos[\[Phi]3] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+               Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])))/
+           (2*Sqrt[2]) - ((-T14 + T24)*Sech[\[Eta]4]*
+            (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+             I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                I*\[Phi]4]))/Sqrt[2]) - 
+        4*(-(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - S34 - T - U)) + 
+          DiscB[2*MH^2 - S34 - T - U, Sqrt[MT^2], Sqrt[MT^2]]/
+           (MH^2 - S34 - T - U))*((Sqrt[S]*Sech[\[Eta]4]*
+            (-2*Sqrt[S]*(MH^2 - S - T14 - T24)*Conjugate[1/
+                Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                    Cos[\[Phi]3 - \[Phi]4])]] - kT3*(-7*MH^2 + 5*S + 8*T + 3*
+                T14 + 3*T24)*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+               Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Sin[\[Phi]3] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                Sinh[\[Eta]3])))/(2*Sqrt[2]) - (Sqrt[S]*Sech[\[Eta]4]*
+            (2*Sqrt[S]*(-MH^2 + S + T14 + T24)*Conjugate[1/
+                Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                    Cos[\[Phi]3 - \[Phi]4])]] - kT3*(7*MH^2 - 5*S - 3*T14 - 3*
+                T24 - 8*U)*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+               Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Sin[\[Phi]3] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                Sinh[\[Eta]3])))/(2*Sqrt[2]) - ((MH^2 - S - T14 - T24)*
+            (T14 - T24)*Sech[\[Eta]4]*(-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                      \[Phi]4])]] - I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                    kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                 (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                I*\[Phi]4]))/Sqrt[2] - 2*Sqrt[2]*kT3^2*(T14 - T24)*
+           Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                   kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + 
+                  kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                 Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                     \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+            Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+            Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])*
+           (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4])) - 
+        8*(-(kT3*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - S34 - T - 
+                U)) - DiscB[2*MH^2 - S34 - T - U, Sqrt[MT^2], Sqrt[MT^2]]/
+              (2*(MH^2 - S34 - T - U)))*
+            (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+             Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+             Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])*
+            (-(Sqrt[S]*(MH^2 + S34 + T - 3*U)*Sech[\[Eta]4])/(2*Sqrt[2]) - 
+             (Sqrt[S]*(MH^2 + S34 - 3*T + U)*Sech[\[Eta]4])/(2*Sqrt[2]) - 
+             Sqrt[2]*kT3*(-T14 + T24)*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[
+                \[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))) - 
+          kT3*(1/(2*(MH^2 - S34 - T - U)) - (MH^2*DiscB[MH^2, Sqrt[MT^2], 
+               Sqrt[MT^2]])/(2*(MH^2 - S34 - T - U)^2) + 
+            (MH^2*DiscB[2*MH^2 - S34 - T - U, Sqrt[MT^2], Sqrt[MT^2]])/
+             (2*(MH^2 - S34 - T - U)^2) - 
+            (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/
+                 (2*MT^2)]^2)/(2*(MH^2 - S34 - T - U)^2) + 
+            (MT^2*Log[(-2*MH^2 + 2*MT^2 + S34 + T + U + Sqrt[
+                   -((2*MH^2 - S34 - T - U)*(-2*MH^2 + 4*MT^2 + S34 + T + 
+                      U))])/(2*MT^2)]^2)/(2*(MH^2 - S34 - T - U)^2))*
+           (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+            Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+            Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])*
+           (-(Sqrt[S]*(3*MH^2 - 3*S - 4*T - T14 - T24)*Sech[\[Eta]4])/
+             (2*Sqrt[2]) + (Sqrt[S]*(-3*MH^2 + 3*S + T14 + T24 + 4*U)*
+              Sech[\[Eta]4])/(2*Sqrt[2]) - Sqrt[2]*kT3*(-T14 + T24)*
+             Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                I*\[Phi]4]))) - 
+        2*(-Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+           (2*(MH^2 - S34 - T - U)) + 
+          Log[(-2*MH^2 + 2*MT^2 + S34 + T + U + Sqrt[-((2*MH^2 - S34 - T - U)*
+                  (-2*MH^2 + 4*MT^2 + S34 + T + U))])/(2*MT^2)]^2/
+           (2*(MH^2 - S34 - T - U)))*(-(((MH^2 - S - T14 - T24)*(T14 - T24)*
+             Sech[\[Eta]4]*(-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                   (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+              I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[
+                \[Eta]4 + I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                 I*\[Phi]4]))/Sqrt[2]) - 
+          2*((Sqrt[S]*Sech[\[Eta]4]*(Sqrt[S]*(MH^2 - S34 - T - U)*
+                Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - kT3*(-2*MH^2 + 
+                 2*S34 + 2*T + T14 + T24)*(Conjugate[
+                   (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3])))/(2*Sqrt[2]) + (Sqrt[S]*Sech[\[Eta]4]*
+              (-(Sqrt[S]*(MH^2 - S34 - T - U)*Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]) - kT3*
+                (-2*MH^2 + 2*S34 + T14 + T24 + 2*U)*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3])))/(2*Sqrt[2]) - (kT3^2*(-T14 + T24)*
+              Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+               Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Sin[\[Phi]3] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                Sinh[\[Eta]3])*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                 I*\[Phi]4]))/Sqrt[2])))/S - 
+      (4*(2 + Eps^(-1) + DiscB[2*MH^2 - S34 - T - U, Sqrt[MT^2], 
+           Sqrt[MT^2]] + Log[Mu^2/MT^2])*
+         (-(Sech[\[Eta]4]*(((-S + T24)*((-I)*Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                    (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] + 
+              (kT4*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*(2*Sqrt[S]*Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                 kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                         Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                         2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                         4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                     (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                    Sinh[\[Eta]3])))/Sqrt[2])*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+              Sinh[\[Eta]4 + I*\[Phi]4]))/2 - 
+          2*(-(kT4*Sqrt[S]*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                       kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                    (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                 (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(
+                Cos[\[Phi]4] + I*Sin[\[Phi]4]))/(2*Sqrt[2]) - 
+            (Sqrt[S]*Sech[\[Eta]4]*(-(Sqrt[S]*Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]) - kT4*
+                (I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                    (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*(Cos[\[Phi]4] - 
+                 I*Sin[\[Phi]4]) - kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                      (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                     (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                         kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                         kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                         4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                    Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                      (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+                 Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3])))/(2*Sqrt[2]) + 
+            (kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*((Sech[\[Eta]4]*
+                 (Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]] + kT3*(Conjugate[
+                      (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]3]))*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+                  Sinh[\[Eta]4 + I*\[Phi]4]))/2 - kT4*Sech[\[Eta]4]*
+                (Cos[\[Phi]4] - I*Sin[\[Phi]4])*(-Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                 I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+                 Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4])))/Sqrt[2])) - 
+        16*(3/4 - (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/
+           (4*(MH^2 - S34 - T - U)) + ((2*MH^2 - S34 - T - U)*
+            DiscB[2*MH^2 - S34 - T - U, Sqrt[MT^2], Sqrt[MT^2]])/
+           (4*(MH^2 - S34 - T - U)) - 
+          (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*
+                MT^2)]^2)/(4*(MH^2 - S34 - T - U)) + 
+          (Eps^(-1) + Log[Mu^2/MT^2])/4 + 
+          (MT^2*Log[(-2*MH^2 + 2*MT^2 + S34 + T + U + Sqrt[
+                 -((2*MH^2 - S34 - T - U)*(-2*MH^2 + 4*MT^2 + S34 + T + U))])/
+               (2*MT^2)]^2)/(4*(MH^2 - S34 - T - U)))*
+         (-(Sech[\[Eta]4]*(((-S + T24)*((-I)*Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                    (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] + 
+              (kT4*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*(2*Sqrt[S]*Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                 kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                         Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                         2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                         4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                     (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                    Sinh[\[Eta]3])))/Sqrt[2])*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+              Sinh[\[Eta]4 + I*\[Phi]4]))/2 - 
+          2*(-(kT4*Sqrt[S]*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                       kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                    (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                 (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(
+                Cos[\[Phi]4] + I*Sin[\[Phi]4]))/(2*Sqrt[2]) - 
+            (Sqrt[S]*Sech[\[Eta]4]*(-(Sqrt[S]*Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]) - kT4*
+                (I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                    (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*(Cos[\[Phi]4] - 
+                 I*Sin[\[Phi]4]) - kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                      (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                     (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                         kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                         kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                         4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                    Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                      (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+                 Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3])))/(2*Sqrt[2]) + 
+            (kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*((Sech[\[Eta]4]*
+                 (Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]] + kT3*(Conjugate[
+                      (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]3]))*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+                  Sinh[\[Eta]4 + I*\[Phi]4]))/2 - kT4*Sech[\[Eta]4]*
+                (Cos[\[Phi]4] - I*Sin[\[Phi]4])*(-Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                 I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+                 Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4])))/Sqrt[2])) + 
+        8*(-(kT3*(1/(2*(MH^2 - S34 - T - U)) - (MH^2*DiscB[MH^2, Sqrt[MT^2], 
+                Sqrt[MT^2]])/(2*(MH^2 - S34 - T - U)^2) + 
+             (MH^2*DiscB[2*MH^2 - S34 - T - U, Sqrt[MT^2], Sqrt[MT^2]])/
+              (2*(MH^2 - S34 - T - U)^2) - (MT^2*Log[(-MH^2 + 2*MT^2 + 
+                   Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2)/
+              (2*(MH^2 - S34 - T - U)^2) + (MT^2*Log[(-2*MH^2 + 2*MT^2 + 
+                   S34 + T + U + Sqrt[-((2*MH^2 - S34 - T - U)*(-2*MH^2 + 
+                       4*MT^2 + S34 + T + U))])/(2*MT^2)]^2)/
+              (2*(MH^2 - S34 - T - U)^2))*
+            (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+             Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+             Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])*
+            (-((Sqrt[S]*(MH^2 - S34 - T - 2*T14 + U)*Sech[\[Eta]4])/Sqrt[
+                2]) - (kT4*(MH^2 - S34 - T - 2*T14 + U)*Sech[\[Eta]4]*(
+                Cos[\[Phi]4] + I*Sin[\[Phi]4])*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+                Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2] + 
+             (Sech[\[Eta]4]*(-(Sqrt[2]*kT3*(S - T24)*(Cos[\[Phi]3] - 
+                   I*Sin[\[Phi]3])) + (kT4*(-3*MH^2 + S + 4*T + 3*T14 + T24)*
+                  (Cos[\[Phi]4] - I*Sin[\[Phi]4]))/Sqrt[2])*(
+                Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+             8*(-(kT3*Sqrt[S]*Sech[\[Eta]4]*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+                  (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                   I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))/(4*Sqrt[2]) - 
+               (kT3*Sqrt[S]*Sech[\[Eta]4]*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+                 (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                    kT4*Sin[\[Phi]4])))/(4*Sqrt[2]) + (kT4*(Cos[\[Phi]4] + 
+                  I*Sin[\[Phi]4])*(-(kT3^2*Sech[\[Eta]4]*(Cos[\[Phi]3] - 
+                      I*Sin[\[Phi]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - 
+                        I*\[Phi]3 + I*\[Phi]4]))/2 + (kT3*Sech[\[Eta]4]*
+                    (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                     I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                    (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                   2))/Sqrt[2]))) - kT3*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/
+             (2*(MH^2 - S34 - T - U)) - DiscB[2*MH^2 - S34 - T - U, 
+              Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - S34 - T - U)))*
+           (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+            Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+            Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])*
+           (-((Sqrt[S]*(MH^2 - S34 - T + U)*Sech[\[Eta]4])/Sqrt[2]) - 
+            (kT4*(MH^2 - S34 - T + U)*Sech[\[Eta]4]*(Cos[\[Phi]4] + I*
+                Sin[\[Phi]4])*(Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + 
+                 I*\[Phi]4]))/Sqrt[2] - (Sech[\[Eta]4]*(Sqrt[2]*kT3*(S - T24)*
+                (Cos[\[Phi]3] - I*Sin[\[Phi]3]) + (kT4*(MH^2 + S34 - 3*T + U)*
+                 (Cos[\[Phi]4] - I*Sin[\[Phi]4]))/Sqrt[2])*
+              (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+            8*(-(kT3*Sqrt[S]*Sech[\[Eta]4]*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+                 (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                  I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))/(4*Sqrt[2]) - 
+              (kT3*Sqrt[S]*Sech[\[Eta]4]*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+                (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])))/(4*Sqrt[2]) + (kT4*(Cos[\[Phi]4] + 
+                 I*Sin[\[Phi]4])*(-(kT3^2*Sech[\[Eta]4]*(Cos[\[Phi]3] - 
+                     I*Sin[\[Phi]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - 
+                       I*\[Phi]3 + I*\[Phi]4]))/2 + (kT3*Sech[\[Eta]4]*
+                   (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                    I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                   (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                  2))/Sqrt[2]))) - 
+        2*(-Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+           (2*(MH^2 - S34 - T - U)) + 
+          Log[(-2*MH^2 + 2*MT^2 + S34 + T + U + Sqrt[-((2*MH^2 - S34 - T - U)*
+                  (-2*MH^2 + 4*MT^2 + S34 + T + U))])/(2*MT^2)]^2/
+           (2*(MH^2 - S34 - T - U)))*
+         (-(Sech[\[Eta]4]*(-(((S - T24)*(-MH^2 + S + T14 + T24)*
+                 ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                         Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                      (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                     (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                         kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                         kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                         4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                    Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                      (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2]) - 
+              2*(-((kT3^2*(S - T24)*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+                   (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]3]))/Sqrt[2]) + (kT4*(Cos[\[Phi]4] - 
+                   I*Sin[\[Phi]4])*(-(Sqrt[S]*(MH^2 - S34 - T - U)*Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]]) - kT3*(-2*MH^2 + S + 2*S34 + T24 + 
+                     2*U)*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                         (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[
+                          kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                        Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                      Cos[\[Phi]3] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                          (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                          Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                          \[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                       1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                          (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]]*Sinh[\[Eta]3])))/Sqrt[2]))*
+             (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+          4*(-(kT4*Sqrt[S]*(MH^2 - S34 - T - U)*(I*Conjugate[
+                  (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                       \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                        4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                 (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(
+                Cos[\[Phi]4] - I*Sin[\[Phi]4]))/(4*Sqrt[2]) + 
+            (kT4*Sqrt[S]*(MH^2 - S34 - T - U)*((-I)*Conjugate[
+                 (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+              (Cos[\[Phi]4] + I*Sin[\[Phi]4]))/(4*Sqrt[2]) + 
+            (Sqrt[S]*Sech[\[Eta]4]*((Sqrt[S]*(-MH^2 + S34 + T + U)*
+                 Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                       Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                       Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                        \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/
+                2 - kT3*(-MH^2 + S + T24 + U)*(Conjugate[
+                   (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3])))/(2*Sqrt[2]) + 
+            (kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*((Sech[\[Eta]4]*
+                 ((Sqrt[S]*(-MH^2 + S34 + T + U)*Conjugate[1/Sqrt[
+                       (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                         kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                         4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                         2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 - 
+                  kT3*(-MH^2 + S + T24 + U)*(Conjugate[
+                      (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]3]))*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+                  Sinh[\[Eta]4 + I*\[Phi]4]))/2 + (kT4*(MH^2 - S34 - T - U)*
+                 Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+                 (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                  I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                         Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+                  Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/2))/
+             Sqrt[2] + 2*kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+              Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+              Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                    2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])*
+             (-(kT3*Sqrt[S]*Sech[\[Eta]4]*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+                 (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                  I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))/(4*Sqrt[2]) - 
+              (kT3*Sqrt[S]*Sech[\[Eta]4]*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+                (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])))/(4*Sqrt[2]) + (kT4*(Cos[\[Phi]4] + 
+                 I*Sin[\[Phi]4])*(-(kT3^2*Sech[\[Eta]4]*(Cos[\[Phi]3] - 
+                     I*Sin[\[Phi]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - 
+                       I*\[Phi]3 + I*\[Phi]4]))/2 + (kT3*Sech[\[Eta]4]*
+                   (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                    I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                   (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                  2))/Sqrt[2]))) - 4*(-(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/
+            (MH^2 - S34 - T - U)) + DiscB[2*MH^2 - S34 - T - U, Sqrt[MT^2], 
+            Sqrt[MT^2]]/(MH^2 - S34 - T - U))*
+         (-(Sech[\[Eta]4]*(-(((S - T24)*(-MH^2 + S + T14 + T24)*
+                 ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                         Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                      (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                     (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                         kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                         kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                         4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                    Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                      (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2]) - 
+              2*Sqrt[2]*kT3^2*(-S + T24)*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*(
+                Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                       Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                       kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                  (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                       \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                        4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+                Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                       Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                       Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                        \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                 Sinh[\[Eta]3]) + (kT4*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+                (-2*Sqrt[S]*(MH^2 - S - T14 - T24)*Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                 kT3*(-7*MH^2 + 3*S + 8*T + 5*T14 + 3*T24)*
+                  (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                         Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                         2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                         4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                     (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                    Sinh[\[Eta]3])))/Sqrt[2])*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+              Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+          2*(-(kT4*Sqrt[S]*(MH^2 - S34 - T - U)*(I*Conjugate[
+                  (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                       \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                        4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                 (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(
+                Cos[\[Phi]4] - I*Sin[\[Phi]4]))/(2*Sqrt[2]) + 
+            (kT4*Sqrt[S]*(MH^2 - S34 - T - U)*((-I)*Conjugate[
+                 (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+              (Cos[\[Phi]4] + I*Sin[\[Phi]4]))/(2*Sqrt[2]) + 
+            (Sqrt[S]*Sech[\[Eta]4]*(Sqrt[S]*(-MH^2 + S34 + T + U)*
+                Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - kT3*(3*MH^2 - 
+                 3*S34 - 3*T - 2*T14 + U)*(Conjugate[
+                   (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3])))/(2*Sqrt[2]) + 
+            (kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*((Sech[\[Eta]4]*
+                 (Sqrt[S]*(-MH^2 + S34 + T + U)*Conjugate[1/Sqrt[
+                      (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                        2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                  kT3*(3*MH^2 - 3*S34 - 3*T - 2*T14 + U)*(Conjugate[
+                      (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]3]))*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+                  Sinh[\[Eta]4 + I*\[Phi]4]))/2 + kT4*(MH^2 - S34 - T - U)*
+                Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+                (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                        Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                        Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                         \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                      (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                 I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+                 Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4])))/Sqrt[2] + 
+            8*kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                     Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                     kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+              Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+              Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                    2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])*
+             (-(kT3*Sqrt[S]*Sech[\[Eta]4]*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+                 (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                  I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))/(4*Sqrt[2]) - 
+              (kT3*Sqrt[S]*Sech[\[Eta]4]*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+                (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])))/(4*Sqrt[2]) + (kT4*(Cos[\[Phi]4] + 
+                 I*Sin[\[Phi]4])*(-(kT3^2*Sech[\[Eta]4]*(Cos[\[Phi]3] - 
+                     I*Sin[\[Phi]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - 
+                       I*\[Phi]3 + I*\[Phi]4]))/2 + (kT3*Sech[\[Eta]4]*
+                   (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                    I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                   (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                  2))/Sqrt[2]))))/T14)/(2*MH^2 - S34 - T - U) + 
+    ((4*T14*((-2*MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/
+           Kallen\[Lambda][MH^2, T14, MH^2 - S - T24 - U] + 
+          ((S + T14 + T24 + U)*DiscB[T14, Sqrt[MT^2], Sqrt[MT^2]])/
+           Kallen\[Lambda][MH^2, T14, MH^2 - S - T24 - U] + 
+          ((2*MH^2 - S - T14 - T24 - U)*DiscB[MH^2 - S - T24 - U, Sqrt[MT^2], 
+             Sqrt[MT^2]])/Kallen\[Lambda][MH^2, T14, MH^2 - S - T24 - U] - 
+          (MH^2*(S - T14 + T24 + U)*ScalarC0[MH^2, T14, MH^2 - S - T24 - U, 
+             Sqrt[MT^2], Sqrt[MT^2], Sqrt[MT^2]])/Kallen\[Lambda][MH^2, T14, 
+            MH^2 - S - T24 - U])*(-2*Sqrt[2]*Sqrt[S]*Sech[\[Eta]4]*
+           (-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                   (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 + 
+            ((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                       \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*(-(kT3*Cos[\[Phi]3]) - 
+               kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))/
+             2) - (Sech[\[Eta]4]*(((2*S - S34 + T - 2*T24)*(
+                (-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                       Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] - 
+             4*((kT4*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                 (Cos[\[Phi]4] - I*Sin[\[Phi]4]))/(2*Sqrt[2]) + 
+               ((-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                  I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                 (-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]])/2 - kT4*(Conjugate[
+                      (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]4])))/Sqrt[2]))*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+             Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 4*Sqrt[2]*kT4*
+           (Cos[\[Phi]4] + I*Sin[\[Phi]4])*
+           ((Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+              (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/4 + 
+            (Sech[\[Eta]4]*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + I*
+                (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+              (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - I*Conjugate[
+                 (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                  I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                  I*\[Phi]4]))/2) - 2*Sqrt[2]*
+           ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]] + Conjugate[
+             (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+               kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+               (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                   2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*((Sqrt[S]*Sech[\[Eta]4]*
+              (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4])))/4 + (kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*
+              ((Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) + (kT3*Sech[\[Eta]4]*
+                 (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                Sqrt[2]))/Sqrt[2])) - 
+        8*(3/4 + (MH^2*(S - T14 + T24 + U)*DiscB[MH^2, Sqrt[MT^2], 
+             Sqrt[MT^2]])/(4*Kallen\[Lambda][MH^2, T14, MH^2 - S - T24 - 
+              U]) - (T14*(2*MH^2 - S - T14 - T24 - U)*DiscB[T14, Sqrt[MT^2], 
+             Sqrt[MT^2]])/(4*Kallen\[Lambda][MH^2, T14, MH^2 - S - T24 - 
+              U]) - ((MH^2 - S - T24 - U)*(S + T14 + T24 + U)*
+            DiscB[MH^2 - S - T24 - U, Sqrt[MT^2], Sqrt[MT^2]])/
+           (4*Kallen\[Lambda][MH^2, T14, MH^2 - S - T24 - U]) + 
+          (Eps^(-1) + Log[Mu^2/MT^2])/4 + 
+          ((MT^2*S^2 + MH^4*T14 - 4*MH^2*MT^2*T14 - MH^2*S*T14 + 
+             2*MT^2*S*T14 + MT^2*T14^2 + 2*MT^2*S*T24 - MH^2*T14*T24 + 
+             2*MT^2*T14*T24 + MT^2*T24^2 + 2*MT^2*S*U - MH^2*T14*U + 
+             2*MT^2*T14*U + 2*MT^2*T24*U + MT^2*U^2)*ScalarC0[MH^2, T14, 
+             MH^2 - S - T24 - U, Sqrt[MT^2], Sqrt[MT^2], Sqrt[MT^2]])/
+           (2*Kallen\[Lambda][MH^2, T14, MH^2 - S - T24 - U]))*
+         (-2*Sqrt[2]*Sqrt[S]*Sech[\[Eta]4]*
+           (-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                   (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 + 
+            ((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                       \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*(-(kT3*Cos[\[Phi]3]) - 
+               kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))/
+             2) - (Sech[\[Eta]4]*(((2*S - S34 + T - 2*T24)*(
+                (-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                       Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] - 
+             4*((kT4*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                 (Cos[\[Phi]4] - I*Sin[\[Phi]4]))/(2*Sqrt[2]) + 
+               ((-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                  I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                 (-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]])/2 - kT4*(Conjugate[
+                      (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]4])))/Sqrt[2]))*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+             Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 4*Sqrt[2]*kT4*
+           (Cos[\[Phi]4] + I*Sin[\[Phi]4])*
+           ((Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+              (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/4 + 
+            (Sech[\[Eta]4]*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + I*
+                (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+              (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - I*Conjugate[
+                 (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                  I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                  I*\[Phi]4]))/2) - 2*Sqrt[2]*
+           ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]] + Conjugate[
+             (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+               kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+               (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                   2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*((Sqrt[S]*Sech[\[Eta]4]*
+              (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4])))/4 + (kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*
+              ((Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) + (kT3*Sech[\[Eta]4]*
+                 (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                Sqrt[2]))/Sqrt[2])) - 
+        2*(((S + T14 + T24 + U)*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/
+           Kallen\[Lambda][MH^2, T14, MH^2 - S - T24 - U] - 
+          (2*T14*DiscB[T14, Sqrt[MT^2], Sqrt[MT^2]])/Kallen\[Lambda][MH^2, 
+            T14, MH^2 - S - T24 - U] - ((S - T14 + T24 + U)*
+            DiscB[MH^2 - S - T24 - U, Sqrt[MT^2], Sqrt[MT^2]])/
+           Kallen\[Lambda][MH^2, T14, MH^2 - S - T24 - U] + 
+          (T14*(2*MH^2 - S - T14 - T24 - U)*ScalarC0[MH^2, T14, 
+             MH^2 - S - T24 - U, Sqrt[MT^2], Sqrt[MT^2], Sqrt[MT^2]])/
+           Kallen\[Lambda][MH^2, T14, MH^2 - S - T24 - U])*
+         (Sqrt[2]*S*(-2*MH^2 + S34 + T)*Conjugate[
+            1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                 Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                 Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                   \[Phi]4])]]*Sech[\[Eta]4] - Sqrt[2]*Sqrt[S]*
+           (-2*MH^2 + S34 + T)*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                  kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                   kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                 Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                     \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(-(kT3*Cos[\[Phi]3]) - 
+            kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])) + 
+          Sqrt[2]*kT4*Sqrt[S]*(-2*MH^2 + S34 + T)*Conjugate[
+            1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                 Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                 Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                   \[Phi]4])]]*Sech[\[Eta]4]*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*
+           (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]) - 
+          ((4*S*S34 - S34^2 + T^2 + 2*S34*T14 - 2*T*T14 - 
+             2*MH^2*(2*S - S34 + T - 2*T24) - 4*T*T24 - 2*S34*U + 2*T*U)*
+            ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+            (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/
+           (2*Sqrt[2]) + 2*Sech[\[Eta]4]*
+           ((Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*((kT3*(S34 - T)*
+                 (Cos[\[Phi]3] - I*Sin[\[Phi]3]))/Sqrt[2] + Sqrt[2]*kT4*
+                (-MH^2 + T)*(Cos[\[Phi]4] - I*Sin[\[Phi]4])))/2 + 
+            ((-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4]))*(Sqrt[S]*(MH^2 - S34)*Conjugate[
+                 1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                       \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                       2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - kT3*(S34 - T)*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3]) - 2*kT4*(-MH^2 + T)*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]4])))/Sqrt[2])*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+            Sinh[\[Eta]4 + I*\[Phi]4]) + 2*Sqrt[2]*kT4*(-2*MH^2 + S34 + T)*
+           Sech[\[Eta]4]*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*
+           (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+            I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+           (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+            I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]) + 
+          32*((kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                    Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                   kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                    Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                  (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+              (Cos[\[Phi]3] - I*Sin[\[Phi]3]))/(2*Sqrt[2]) - 
+            (kT3*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + I*
+                (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+              (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                      Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Cos[\[Phi]3] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+               Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3]))/
+             Sqrt[2])*((kT3*Sech[\[Eta]4]*(kT3*Cos[\[Phi]3] + kT4*
+                Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+              (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/2 + 
+            (kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*(-(Sqrt[S]*Sech[\[Eta]4])/
+                (2*Sqrt[2]) - (kT3*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + 
+                  Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/
+             Sqrt[2]) - 2*Sqrt[2]*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                  kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                   kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                 Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                     \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*(-(kT3*Sqrt[S]*(6*MH^2 - 3*S34 - 3*T - 
+                4*U)*Sech[\[Eta]4]*(Cos[\[Phi]3] + I*Sin[\[Phi]3]))/4 + 
+            (kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*((Sqrt[S]*(-2*MH^2 + S34 + 
+                  T)*Sech[\[Eta]4])/Sqrt[2] + (kT3*(6*MH^2 - 3*S34 - 3*T - 
+                  4*U)*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                    I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/Sqrt[2])) - 
+        4*((-((S^3 - 10*MH^2*S*T14 + 5*S^2*T14 - 6*MH^2*T14^2 + 7*S*T14^2 + 
+                3*T14^3 + 3*S^2*T24 - 10*MH^2*T14*T24 + 10*S*T14*T24 + 
+                7*T14^2*T24 + 3*S*T24^2 + 5*T14*T24^2 + T24^3 + 3*S^2*U - 
+                10*MH^2*T14*U + 10*S*T14*U + 7*T14^2*U + 6*S*T24*U + 
+                10*T14*T24*U + 3*T24^2*U + 3*S*U^2 + 5*T14*U^2 + 3*T24*U^2 + 
+                U^3)*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/
+             (2*Kallen\[Lambda][MH^2, T14, MH^2 - S - T24 - U]^2) - 
+            (3*T14^2*(2*MH^2 - S - T14 - T24 - U)*DiscB[T14, Sqrt[MT^2], Sqrt[
+                MT^2]])/Kallen\[Lambda][MH^2, T14, MH^2 - S - T24 - U]^2 + 
+            ((S^3 - 10*MH^2*S*T14 + 5*S^2*T14 + 6*MH^2*T14^2 + S*T14^2 - 3*
+                T14^3 + 3*S^2*T24 - 10*MH^2*T14*T24 + 10*S*T14*T24 + T14^2*
+                T24 + 3*S*T24^2 + 5*T14*T24^2 + T24^3 + 3*S^2*U - 10*MH^2*T14*
+                U + 10*S*T14*U + T14^2*U + 6*S*T24*U + 10*T14*T24*U + 3*T24^2*
+                U + 3*S*U^2 + 5*T14*U^2 + 3*T24*U^2 + U^3)*DiscB[MH^2 - S - 
+                T24 - U, Sqrt[MT^2], Sqrt[MT^2]])/(2*Kallen\[Lambda][MH^2, 
+                T14, MH^2 - S - T24 - U]^2) + T14/Kallen\[Lambda][MH^2, T14, 
+              MH^2 - S - T24 - U] + (T14*(2*MT^2*S^2 + 6*MH^4*T14 - 8*MH^2*
+                MT^2*T14 - 6*MH^2*S*T14 + 4*MT^2*S*T14 + S^2*T14 - 4*MH^2*
+                T14^2 + 2*MT^2*T14^2 + 2*S*T14^2 + T14^3 + 4*MT^2*S*T24 - 6*
+                MH^2*T14*T24 + 4*MT^2*T14*T24 + 2*S*T14*T24 + 2*T14^2*T24 + 2*
+                MT^2*T24^2 + T14*T24^2 + 4*MT^2*S*U - 6*MH^2*T14*U + 4*MT^2*
+                T14*U + 2*S*T14*U + 2*T14^2*U + 4*MT^2*T24*U + 2*T14*T24*U + 
+               2*MT^2*U^2 + T14*U^2)*ScalarC0[MH^2, T14, MH^2 - S - T24 - 
+                U, Sqrt[MT^2], Sqrt[MT^2], Sqrt[MT^2]])/
+             Kallen\[Lambda][MH^2, T14, MH^2 - S - T24 - U]^2)*
+           (((S34 - T)*(-2*MH^2 + S34 + T + 2*U)*((-I)*Conjugate[
+                 (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+              (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/
+             (2*Sqrt[2]) + 2*(S34 - T)*Sech[\[Eta]4]*
+             ((kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                (Cos[\[Phi]3] - I*Sin[\[Phi]3]))/(2*Sqrt[2]) - 
+              (kT3*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                 I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3]))/Sqrt[2])*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+              Sinh[\[Eta]4 + I*\[Phi]4]) - 2*Sqrt[2]*(2*MH^2 - S34 - T - 2*U)*
+             ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+              Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+             (-(kT3*Sqrt[S]*Sech[\[Eta]4]*(Cos[\[Phi]3] + I*Sin[\[Phi]3]))/
+               4 + (kT3*kT4*Sech[\[Eta]4]*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*
+                (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+               2) + 16*((kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                     4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                       2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                      Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                      Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                        \[Phi]4])]]*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/(2*
+                Sqrt[2]) - (kT3*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                 I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3]))/Sqrt[2])*(-(kT3*Sqrt[S]*Sech[\[Eta]4]*
+                 (Cos[\[Phi]3] + I*Sin[\[Phi]3]))/4 + (kT3*kT4*Sech[\[Eta]4]*
+                (Cos[\[Phi]4] + I*Sin[\[Phi]4])*(-Sinh[\[Eta]3] + 
+                 Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/2)) + 
+          (-(MH^2*(S^2 + 8*MH^2*T14 - 4*S*T14 - 5*T14^2 + 2*S*T24 - 
+                4*T14*T24 + T24^2 + 2*S*U - 4*T14*U + 2*T24*U + U^2)*DiscB[
+                MH^2, Sqrt[MT^2], Sqrt[MT^2]])/(2*Kallen\[Lambda][MH^2, T14, 
+                MH^2 - S - T24 - U]^2) + (T14*(6*MH^2*S - S^2 - 2*MH^2*T14 - 
+               2*S*T14 - T14^2 + 6*MH^2*T24 - 2*S*T24 - 2*T14*T24 - T24^2 + 6*
+                MH^2*U - 2*S*U - 2*T14*U - 2*T24*U - U^2)*DiscB[T14, Sqrt[
+                MT^2], Sqrt[MT^2]])/(2*Kallen\[Lambda][MH^2, T14, 
+                MH^2 - S - T24 - U]^2) + ((MH^2*S^2 + 8*MH^4*T14 - 10*MH^2*S*
+                T14 + S^2*T14 - 3*MH^2*T14^2 + 2*S*T14^2 + T14^3 + 2*MH^2*S*
+                T24 - 10*MH^2*T14*T24 + 2*S*T14*T24 + 2*T14^2*T24 + MH^2*
+                T24^2 + T14*T24^2 + 2*MH^2*S*U - 10*MH^2*T14*U + 2*S*T14*U + 
+               2*T14^2*U + 2*MH^2*T24*U + 2*T14*T24*U + MH^2*U^2 + T14*U^2)*
+              DiscB[MH^2 - S - T24 - U, Sqrt[MT^2], Sqrt[MT^2]])/
+             (2*Kallen\[Lambda][MH^2, T14, MH^2 - S - T24 - U]^2) - 
+            (S + T14 + T24 + U)/(2*Kallen\[Lambda][MH^2, T14, MH^2 - S - 
+                T24 - U]) - ((MT^2*S^3 + 3*MH^4*S*T14 - 4*MH^2*MT^2*S*T14 - 2*
+                MH^2*S^2*T14 + 3*MT^2*S^2*T14 - MH^4*T14^2 - 4*MH^2*MT^2*
+                T14^2 - MH^2*S*T14^2 + 3*MT^2*S*T14^2 + MH^2*T14^3 + MT^2*
+                T14^3 + 3*MT^2*S^2*T24 + 3*MH^4*T14*T24 - 4*MH^2*MT^2*T14*
+                T24 - 4*MH^2*S*T14*T24 + 6*MT^2*S*T14*T24 - MH^2*T14^2*T24 + 
+               3*MT^2*T14^2*T24 + 3*MT^2*S*T24^2 - 2*MH^2*T14*T24^2 + 3*MT^2*
+                T14*T24^2 + MT^2*T24^3 + 3*MT^2*S^2*U + 3*MH^4*T14*U - 4*MH^2*
+                MT^2*T14*U - 4*MH^2*S*T14*U + 6*MT^2*S*T14*U - MH^2*T14^2*
+                U + 3*MT^2*T14^2*U + 6*MT^2*S*T24*U - 4*MH^2*T14*T24*U + 6*
+                MT^2*T14*T24*U + 3*MT^2*T24^2*U + 3*MT^2*S*U^2 - 2*MH^2*T14*
+                U^2 + 3*MT^2*T14*U^2 + 3*MT^2*T24*U^2 + MT^2*U^3)*
+              ScalarC0[MH^2, T14, MH^2 - S - T24 - U, Sqrt[MT^2], Sqrt[MT^2], 
+               Sqrt[MT^2]])/Kallen\[Lambda][MH^2, T14, MH^2 - S - T24 - U]^2)*
+           (((S34 - T)*(-2*MH^2 + S34 + T + 2*U)*((-I)*Conjugate[
+                 (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+              (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/
+             (2*Sqrt[2]) + 2*(S34 - T)*Sech[\[Eta]4]*
+             ((kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                (Cos[\[Phi]3] - I*Sin[\[Phi]3]))/(2*Sqrt[2]) - 
+              (kT3*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                 I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3]))/Sqrt[2])*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+              Sinh[\[Eta]4 + I*\[Phi]4]) - 2*Sqrt[2]*(2*MH^2 - S34 - T - 2*U)*
+             ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+              Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+             (-(kT3*Sqrt[S]*Sech[\[Eta]4]*(Cos[\[Phi]3] + I*Sin[\[Phi]3]))/
+               4 + (kT3*kT4*Sech[\[Eta]4]*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*
+                (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+               2) + 16*((kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                     4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                       2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                      Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                      Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                        \[Phi]4])]]*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/(2*
+                Sqrt[2]) - (kT3*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                 I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3]))/Sqrt[2])*((kT3*Sech[\[Eta]4]*
+                (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4]))*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                   I*\[Phi]3 + I*\[Phi]4]))/2 + (kT3*(Cos[\[Phi]3] + 
+                 I*Sin[\[Phi]3])*(-(Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) - 
+                 (kT3*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                      I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/Sqrt[2]))) + 
+        2*((2 + Eps^(-1) + DiscB[MH^2 - S - T24 - U, Sqrt[MT^2], 
+             Sqrt[MT^2]] + Log[Mu^2/MT^2])*(-2*Sqrt[2]*Sqrt[S]*Sech[\[Eta]4]*
+             (-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/
+               2 + ((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                    (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*(-(kT3*Cos[\[Phi]3]) - 
+                 kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))/
+               2) - (Sech[\[Eta]4]*(((2*S - S34 + T - 2*T24)*
+                 ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                         Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                      (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                     (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                         kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                         kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                         4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                    Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                      (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] - 4*
+                ((kT4*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]]*(Cos[\[Phi]4] - I*Sin[\[Phi]4]))/
+                  (2*Sqrt[2]) + ((-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                    I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                   (-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]])/2 - kT4*(Conjugate[
+                        (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                        (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[1/Sqrt[
+                          (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                          kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                       Sinh[\[Eta]4])))/Sqrt[2]))*(Cosh[\[Eta]4 + 
+                 I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+            4*Sqrt[2]*kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*
+             ((Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + 
+                   I*\[Phi]4]))/4 + (Sech[\[Eta]4]*(-(kT3*Cos[\[Phi]3]) - 
+                 kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                        Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                        Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                         \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                      (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                 I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+                 Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/2) - 
+            2*Sqrt[2]*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                     kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+               (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                 kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*((Sqrt[S]*Sech[\[Eta]4]*
+                (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])))/4 + (kT4*(Cos[\[Phi]4] + 
+                 I*Sin[\[Phi]4])*((Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) + 
+                 (kT3*Sech[\[Eta]4]*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - 
+                      I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/Sqrt[2])) + 
+          ScalarC0[MH^2, T14, MH^2 - S - T24 - U, Sqrt[MT^2], Sqrt[MT^2], 
+            Sqrt[MT^2]]*(-((S*(-2*MH^2 + S34 + T)*Conjugate[
+                1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                     Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4])/Sqrt[2]) + 
+            (Sqrt[S]*(-2*MH^2 + S34 + T)*(I*Conjugate[
+                 (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+              (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4])))/Sqrt[2] - 
+            (kT4*Sqrt[S]*(-2*MH^2 + S34 + T)*Conjugate[1/Sqrt[
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                    Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*(Cos[\[Phi]4] + I*
+                Sin[\[Phi]4])*(Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + 
+                 I*\[Phi]4]))/Sqrt[2] - ((-2*S*S34 - S34*T14 + T*T14 + 2*MH^2*
+                (S - T24) + 2*T*T24)*((-I)*Conjugate[
+                 (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+              (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/
+             (2*Sqrt[2]) - 2*Sech[\[Eta]4]*((kT4*Sqrt[S]*(-MH^2 + T)*
+                Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*(Cos[\[Phi]4] - 
+                 I*Sin[\[Phi]4]))/(2*Sqrt[2]) + ((-(kT3*Cos[\[Phi]3]) - 
+                 kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                (-(Sqrt[S]*(-MH^2 + S34)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                         4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])]])/2 - kT4*(-MH^2 + T)*
+                  (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                         Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                         2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                         4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                     (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                    Sinh[\[Eta]4])))/Sqrt[2])*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+              Sinh[\[Eta]4 + I*\[Phi]4]) - Sqrt[2]*kT4*(-2*MH^2 + S34 + T)*
+             Sech[\[Eta]4]*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*
+             (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                kT4*Sin[\[Phi]4]))*(-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])]] - I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                     kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                 I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                 I*\[Phi]4]) - 8*((kT3*Sqrt[S]*Conjugate[
+                 1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                       \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                       2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*(Cos[\[Phi]3] - 
+                 I*Sin[\[Phi]3]))/(2*Sqrt[2]) - (kT3*(-(kT3*Cos[\[Phi]3]) - 
+                 kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3]))/Sqrt[2])*((kT3*Sech[\[Eta]4]*
+                (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4]))*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                   I*\[Phi]3 + I*\[Phi]4]))/2 + (kT3*(Cos[\[Phi]3] + 
+                 I*Sin[\[Phi]3])*(-(Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) - 
+                 (kT3*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                      I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/Sqrt[2]) + 
+            2*Sqrt[2]*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                     kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+               (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                 kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+             (-(kT3*Sqrt[S]*(S + T14 + T24)*Sech[\[Eta]4]*(Cos[\[Phi]3] + 
+                  I*Sin[\[Phi]3]))/4 + (kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*
+                ((Sqrt[S]*(-2*MH^2 + S34 + T)*Sech[\[Eta]4])/(2*Sqrt[2]) + 
+                 (kT3*(S + T14 + T24)*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + 
+                    Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/Sqrt[
+                2]))))/T14 + 
+      (8*((kT3*(-DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - S34)) + 
+             DiscB[S34, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - S34)))*
+            Sech[\[Eta]4]*(-(Sqrt[S]*(-MH^2 + S34 + 2*T)*Conjugate[
+                1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                     Cos[\[Phi]3 - \[Phi]4])]]) - 
+             (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                       Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*(
+                -((kT3*(MH^2 - 2*S + S34 + 2*T24 - 2*U)*(Cos[\[Phi]3] + 
+                    I*Sin[\[Phi]3]))/Sqrt[2]) + (kT4*(-3*MH^2 + S34 + 4*U)*
+                  (Cos[\[Phi]4] + I*Sin[\[Phi]4]))/Sqrt[2]))/Sqrt[2] + 
+             (-MH^2 + S34 + 2*T)*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*(-(kT3*Cos[\[Phi]3]) - 
+               kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])) + 
+             8*(-((kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*((kT3*Sqrt[S]*
+                     Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     (Cos[\[Phi]3] - I*Sin[\[Phi]3]))/(2*Sqrt[2]) - 
+                   (kT3*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                      I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                     (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                        (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[1/Sqrt[
+                          (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                          kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                       Sinh[\[Eta]3]))/Sqrt[2]))/Sqrt[2]) + (kT3*
+                 (Cos[\[Phi]3] + I*Sin[\[Phi]3])*((kT4*Sqrt[S]*Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                    (Cos[\[Phi]4] - I*Sin[\[Phi]4]))/(2*Sqrt[2]) - 
+                  (kT4*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                     I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                    (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                       (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                       1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                          (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]]*Sinh[\[Eta]4]))/Sqrt[2]))/Sqrt[2]))*
+            (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+           Sqrt[2] + (kT3*(-1/(2*(MH^2 - S34)) - (MH^2*DiscB[MH^2, 
+                Sqrt[MT^2], Sqrt[MT^2]])/(2*(MH^2 - S34)^2) + 
+             (MH^2*DiscB[S34, Sqrt[MT^2], Sqrt[MT^2]])/(2*(MH^2 - S34)^2) - 
+             (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/
+                  (2*MT^2)]^2)/(2*(MH^2 - S34)^2) + 
+             (MT^2*Log[(2*MT^2 - S34 + Sqrt[-((4*MT^2 - S34)*S34)])/(2*MT^2)]^
+                2)/(2*(MH^2 - S34)^2))*Sech[\[Eta]4]*
+            (-(Sqrt[S]*(MH^2 - S34 - 2*T14)*Conjugate[
+                1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                     Cos[\[Phi]3 - \[Phi]4])]]) + 
+             (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                       Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*((kT3*(-MH^2 + S34 + 
+                   4*T24)*(Cos[\[Phi]3] + I*Sin[\[Phi]3]))/Sqrt[2] + 
+                (kT4*(MH^2 + 2*S - S34 + 2*T24 - 2*U)*(Cos[\[Phi]4] + 
+                   I*Sin[\[Phi]4]))/Sqrt[2]))/Sqrt[2] + (MH^2 - S34 - 2*T14)*
+              (I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                       \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*(-(kT3*Cos[\[Phi]3]) - 
+               kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])) + 
+             8*(-((kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*((kT3*Sqrt[S]*
+                     Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     (Cos[\[Phi]3] - I*Sin[\[Phi]3]))/(2*Sqrt[2]) - 
+                   (kT3*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                      I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                     (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                        (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[1/Sqrt[
+                          (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                          kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                       Sinh[\[Eta]3]))/Sqrt[2]))/Sqrt[2]) + (kT3*
+                 (Cos[\[Phi]3] + I*Sin[\[Phi]3])*((kT4*Sqrt[S]*Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                    (Cos[\[Phi]4] - I*Sin[\[Phi]4]))/(2*Sqrt[2]) - 
+                  (kT4*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                     I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                    (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                       (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                       1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                          (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]]*Sinh[\[Eta]4]))/Sqrt[2]))/Sqrt[2]))*
+            (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+           Sqrt[2]) + (4*(2 + Eps^(-1) + DiscB[S34, Sqrt[MT^2], Sqrt[MT^2]] + 
+            Log[Mu^2/MT^2]) - 16*(3/4 + (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[
+                MT^2]])/(4*(MH^2 - S34)) - (S34*DiscB[S34, Sqrt[MT^2], Sqrt[
+                MT^2]])/(4*(MH^2 - S34)) + 
+            (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/
+                 (2*MT^2)]^2)/(4*(MH^2 - S34)) + (Eps^(-1) + Log[Mu^2/MT^2])/
+             4 - (MT^2*Log[(2*MT^2 - S34 + Sqrt[-((4*MT^2 - S34)*S34)])/
+                 (2*MT^2)]^2)/(4*(MH^2 - S34))))*
+         ((Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+            (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*
+                Sin[\[Phi]4]))*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+             Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2] - 
+          (Sech[\[Eta]4]*(((-MH^2 + 2*S + T + T14)*((-I)*Conjugate[
+                  (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                       \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                        4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                 (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] + 
+             Sqrt[2]*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                    Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                   kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                    Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                  (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+              (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4])))*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+             Sinh[\[Eta]4 + I*\[Phi]4]))/2 + Sqrt[2]*Sech[\[Eta]4]*
+           (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+            I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*(kT3*Cos[\[Phi]3] + 
+            kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+           (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+            I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]) - 
+          Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                 Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                 Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+           (-((Sqrt[S]*Sech[\[Eta]4])/Sqrt[2]) - (kT3*Sech[\[Eta]4]*
+              (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+             Sqrt[2]) + (I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                  kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                   kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                 Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                     \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+            I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+           (-((Sqrt[S]*Sech[\[Eta]4])/Sqrt[2]) - (kT3*Sech[\[Eta]4]*
+              (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+             Sqrt[2]) + (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                    kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                 (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + 
+             I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+            (-(Sqrt[2]*Sqrt[S]*Sech[\[Eta]4]) + (kT3*Sech[\[Eta]4]*(
+                -Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+              Sqrt[2]))/2) - 4*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/
+           (MH^2 - S34) - DiscB[S34, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - S34))*
+         (-(Sech[\[Eta]4]*(((MH^2 - S34)*(MH^2 - 2*S - T - T14)*
+                ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                    (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] - 
+              Sqrt[2]*Sqrt[S]*(MH^2 - S34)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])]]*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))*
+             (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+          2*(-(Sqrt[S]*(MH^2 - S34)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])]]*Sech[\[Eta]4]*(kT3*Cos[\[Phi]3] + 
+                kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*(
+                Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+             (2*Sqrt[2]) - ((MH^2 - S34)*Sech[\[Eta]4]*(-(kT3*Cos[\[Phi]3]) - 
+               kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+              (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4]))*(-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                     4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                       2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                      Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                      Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                        \[Phi]4])]] - I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                  I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                  I*\[Phi]4]))/Sqrt[2] - 4*Sqrt[2]*kT3*Sech[\[Eta]4]*
+             (-((kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*((kT3*Sqrt[S]*Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                    (Cos[\[Phi]3] - I*Sin[\[Phi]3]))/(2*Sqrt[2]) - 
+                  (kT3*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                     I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                    (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                       (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                       1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                          (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]]*Sinh[\[Eta]3]))/Sqrt[2]))/Sqrt[2]) + 
+              (kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*((kT4*Sqrt[S]*Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   (Cos[\[Phi]4] - I*Sin[\[Phi]4]))/(2*Sqrt[2]) - 
+                 (kT4*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                    I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                   (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]4]))/Sqrt[2]))/Sqrt[2])*(-Sinh[\[Eta]3] + 
+              Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]) - 
+            (Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*((Sqrt[S]*(MH^2 - S34)*
+                 Sech[\[Eta]4])/Sqrt[2] + (kT3*(MH^2 - S34 - 2*T + 2*T14)*
+                 Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                    I*\[Phi]4]))/Sqrt[2]))/2 + 
+            ((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                       \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*(-(kT3*Cos[\[Phi]3]) - 
+               kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+              ((Sqrt[S]*(MH^2 - S34)*Sech[\[Eta]4])/Sqrt[2] + 
+               (kT3*(MH^2 - S34 - 2*T + 2*T14)*Sech[\[Eta]4]*
+                 (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                Sqrt[2]))/2) - 
+          (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*((kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*(
+                -(Sqrt[2]*Sqrt[S]*(MH^2 - S34)*Sech[\[Eta]4]) + 
+                (kT3*(5*MH^2 + 2*S - 3*S34 + 2*T24 - 6*U)*Sech[\[Eta]4]*
+                  (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                 Sqrt[2]))/Sqrt[2] + (kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*(
+                -(Sqrt[2]*Sqrt[S]*(MH^2 - S34)*Sech[\[Eta]4]) + 
+                (kT3*(MH^2 - 2*S + S34 + 6*T24 - 2*U)*Sech[\[Eta]4]*
+                  (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                 Sqrt[2]))/Sqrt[2]))/Sqrt[2]) - 
+        2*(Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+           (2*(MH^2 - S34)) - Log[(2*MT^2 - S34 + Sqrt[-((4*MT^2 - S34)*
+                  S34)])/(2*MT^2)]^2/(2*(MH^2 - S34)))*
+         (-(Sech[\[Eta]4]*(((MH^2 - S34)*(MH^2 - 2*S - T - T14)*
+                ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                    (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] - 
+              Sqrt[2]*Sqrt[S]*(MH^2 - S34)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])]]*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))*
+             (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/2 - 
+          2*((Sqrt[S]*(MH^2 - S34)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                      \[Phi]4])]]*Sech[\[Eta]4]*(kT3*Cos[\[Phi]3] + kT4*
+                Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+              (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+             (2*Sqrt[2]) + ((MH^2 - S34)*Sech[\[Eta]4]*(-(kT3*Cos[\[Phi]3]) - 
+               kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+              (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4]))*(-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                     4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                       2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                      Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                      Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                        \[Phi]4])]] - I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                  I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                  I*\[Phi]4]))/Sqrt[2] + 2*Sqrt[2]*kT3*Sech[\[Eta]4]*
+             (-((kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*((kT3*Sqrt[S]*Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                    (Cos[\[Phi]3] - I*Sin[\[Phi]3]))/(2*Sqrt[2]) - 
+                  (kT3*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                     I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                    (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                       (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                       1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                          (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]]*Sinh[\[Eta]3]))/Sqrt[2]))/Sqrt[2]) + 
+              (kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*((kT4*Sqrt[S]*Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   (Cos[\[Phi]4] - I*Sin[\[Phi]4]))/(2*Sqrt[2]) - 
+                 (kT4*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                    I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                   (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]4]))/Sqrt[2]))/Sqrt[2])*(-Sinh[\[Eta]3] + 
+              Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]) + 
+            Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+             (-(Sqrt[S]*(-MH^2 + S34)*Sech[\[Eta]4])/(2*Sqrt[2]) + 
+              (kT3*T14*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                   I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]) - 
+            (I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+              Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*(-(kT3*Cos[\[Phi]3]) - 
+              kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+             (-(Sqrt[S]*(-MH^2 + S34)*Sech[\[Eta]4])/(2*Sqrt[2]) + 
+              (kT3*T14*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                   I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]) + 
+            (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                       \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*((kT3*(Cos[\[Phi]3] + 
+                  I*Sin[\[Phi]3])*(-((Sqrt[S]*(MH^2 - S34)*Sech[\[Eta]4])/
+                    Sqrt[2]) + Sqrt[2]*kT3*T24*Sech[\[Eta]4]*
+                   (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4])))/
+                Sqrt[2] + (kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*
+                 (-((Sqrt[S]*(MH^2 - S34)*Sech[\[Eta]4])/Sqrt[2]) + 
+                  (kT3*(MH^2 + S - S34 + T24 - U)*Sech[\[Eta]4]*
+                    (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                   Sqrt[2]))/Sqrt[2]))/Sqrt[2])))/S34 - 
+      (-4*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - T) - 
+          DiscB[T, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - T))*
+         ((Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+            ((kT3*(MH^2 - 2*S34 - T + 2*T14)*(Cos[\[Phi]3] + I*Sin[\[Phi]3]))/
+              Sqrt[2] + Sqrt[2]*kT4*(MH^2 - T)*(Cos[\[Phi]4] + I*
+                Sin[\[Phi]4]))*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+             Sinh[\[Eta]4 + I*\[Phi]4]))/2 - 
+          (Sech[\[Eta]4]*(((MH^2 - T)*(MH^2 - S34 - T14 - 2*T24)*(
+                (-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                       Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] - 
+             4*(MH^2 - T)*((kT4*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                      4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                        2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                       Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                       Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                        \[Phi]3 - \[Phi]4])]]*(Cos[\[Phi]4] - 
+                  I*Sin[\[Phi]4]))/(2*Sqrt[2]) - (kT4*(-(kT3*Cos[\[Phi]3]) - 
+                  kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                 (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]4]))/Sqrt[2]))*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+             Sinh[\[Eta]4 + I*\[Phi]4]))/2 + Sech[\[Eta]4]*
+           ((kT3*(MH^2 - 2*S34 - T + 2*T14)*(Cos[\[Phi]3] + I*Sin[\[Phi]3]))/
+             Sqrt[2] + Sqrt[2]*kT4*(MH^2 - T)*(Cos[\[Phi]4] + 
+              I*Sin[\[Phi]4]))*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+            I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+           (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+            I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]) - 
+          2*Sqrt[S]*(MH^2 - T)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+           (-(Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) - 
+            (kT3*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                 I*\[Phi]4]))/Sqrt[2]) + 2*(MH^2 - T)*
+           (I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]] + Conjugate[
+             (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+               kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+               (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                   2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+            I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+           (-(Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) - 
+            (kT3*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                 I*\[Phi]4]))/Sqrt[2]) + 
+          (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*(kT4*Sqrt[S]*(-MH^2 + T)*Sech[\[Eta]4]*
+              (Cos[\[Phi]4] + I*Sin[\[Phi]4]) + (kT3*(Cos[\[Phi]3] + 
+                I*Sin[\[Phi]3])*(-((Sqrt[S]*(MH^2 - 2*S34 - T + 2*T14)*
+                   Sech[\[Eta]4])/Sqrt[2]) - (Sqrt[S]*(9*MH^2 - 2*S34 - 5*T - 
+                   2*T14 - 8*U)*Sech[\[Eta]4])/(2*Sqrt[2]) + 
+                (kT3*(3*MH^2 - 8*S - 2*S34 - 3*T - 2*T14)*Sech[\[Eta]4]*
+                  (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                 Sqrt[2]))/Sqrt[2]))/Sqrt[2] + 8*Sqrt[2]*kT3*
+           (Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+           ((kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                    Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                   kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                    Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                  (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+              (Cos[\[Phi]3] - I*Sin[\[Phi]3])*((Sqrt[S]*Sech[\[Eta]4])/
+                (2*Sqrt[2]) - (kT3*Sech[\[Eta]4]*(Sinh[\[Eta]3] - 
+                  Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/
+             (2*Sqrt[2]) + (kT3*kT4*Sqrt[S]*Conjugate[1/Sqrt[
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                    Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*(Cos[\[Phi]4] - I*
+                Sin[\[Phi]4])*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                 I*\[Phi]4]))/4 + ((-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+               I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+              (-(kT3*Sqrt[S]*Sech[\[Eta]4]*(Conjugate[
+                     (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                     (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                    Sinh[\[Eta]3]))/(2*Sqrt[2]) + (kT3^2*Sech[\[Eta]4]*
+                 (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+                    I*\[Phi]4]))/Sqrt[2] - (kT3*kT4*Sech[\[Eta]4]*
+                 (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]4])*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                    I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/Sqrt[2])) + 
+        (4*(2 + Eps^(-1) + DiscB[T, Sqrt[MT^2], Sqrt[MT^2]] + 
+            Log[Mu^2/MT^2]) - 16*(3/4 + (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[
+                MT^2]])/(4*(MH^2 - T)) - (T*DiscB[T, Sqrt[MT^2], Sqrt[MT^2]])/
+             (4*(MH^2 - T)) + (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[
+                   -(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2)/(4*(MH^2 - T)) + 
+            (Eps^(-1) + Log[Mu^2/MT^2])/4 - 
+            (MT^2*Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/(2*MT^2)]^2)/
+             (4*(MH^2 - T))))*(-(Sech[\[Eta]4]*(((-MH^2 + S34 + T14 + 2*T24)*
+                ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                    (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] + 
+              4*((kT4*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                      (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  (Cos[\[Phi]4] - I*Sin[\[Phi]4]))/(2*Sqrt[2]) - 
+                (kT4*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                   I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                  (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                         Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                         2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                         4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                     (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                    Sinh[\[Eta]4]))/Sqrt[2]))*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+              Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+          (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*(Sqrt[S]*Sech[\[Eta]4]*
+              (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4])) - (kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*(
+                (Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) + (kT3*Sech[\[Eta]4]*
+                  (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                 Sqrt[2]))/Sqrt[2]))/Sqrt[2] - 
+          2*((Sech[\[Eta]4]*((kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3]))/Sqrt[2] + 
+               Sqrt[2]*kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4]))*
+              (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4]))*(-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                     4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                       2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                      Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                      Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                        \[Phi]4])]] - I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                  I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                  I*\[Phi]4]))/2 + (I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                     kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+               (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                 kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*(-(kT3*Cos[\[Phi]3]) - 
+              kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+             (-(Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) - (kT3*Sech[\[Eta]4]*
+                (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+               Sqrt[2]) + (Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                      \[Phi]4])]]*((Sech[\[Eta]4]*((kT3*(Cos[\[Phi]3] + 
+                     I*Sin[\[Phi]3]))/Sqrt[2] + Sqrt[2]*kT4*(Cos[\[Phi]4] + 
+                    I*Sin[\[Phi]4]))*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+                  Sinh[\[Eta]4 + I*\[Phi]4]))/2 - 2*(-(Sqrt[S]*Sech[\[Eta]4])/
+                  (2*Sqrt[2]) - (kT3*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + 
+                    Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2])))/2)) - 
+        2*(Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+           (2*(MH^2 - T)) - Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/
+              (2*MT^2)]^2/(2*(MH^2 - T)))*
+         (Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                 Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                 Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+           ((kT3*T14*(Cos[\[Phi]3] + I*Sin[\[Phi]3]))/Sqrt[2] + 
+            (kT4*(MH^2 - T)*(Cos[\[Phi]4] + I*Sin[\[Phi]4]))/Sqrt[2])*
+           (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]) - 
+          (Sech[\[Eta]4]*(((MH^2 - T)*(MH^2 - S34 - T14 - 2*T24)*(
+                (-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                       Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] - 
+             4*(MH^2 - T)*((kT4*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                      4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                        2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                       Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                       Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                        \[Phi]3 - \[Phi]4])]]*(Cos[\[Phi]4] - 
+                  I*Sin[\[Phi]4]))/(2*Sqrt[2]) - (kT4*(-(kT3*Cos[\[Phi]3]) - 
+                  kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                 (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]4]))/Sqrt[2]))*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+             Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 2*Sech[\[Eta]4]*
+           ((kT3*T14*(Cos[\[Phi]3] + I*Sin[\[Phi]3]))/Sqrt[2] + 
+            (kT4*(MH^2 - T)*(Cos[\[Phi]4] + I*Sin[\[Phi]4]))/Sqrt[2])*
+           (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+            I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+           (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+            I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]) + 
+          4*Sqrt[2]*kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+           (-(kT4*S*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                    2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*(
+                Cos[\[Phi]4] - I*Sin[\[Phi]4]))/8 + 
+            ((-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4]))*(-(S*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                       4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                         2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                        Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                        Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                         \[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4])/(4*Sqrt[2]) + 
+               (kT4*Sqrt[S]*Sech[\[Eta]4]*(Conjugate[
+                    (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]4]))/(2*Sqrt[2]) + (kT3*Sqrt[S]*Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+                 (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                (2*Sqrt[2])))/Sqrt[2]) - 2*Sqrt[S]*(MH^2 - T)*
+           Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                 Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                 Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+           (-(Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) - 
+            (kT3*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                 I*\[Phi]4]))/Sqrt[2]) + 2*(MH^2 - T)*
+           (I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]] + Conjugate[
+             (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+               kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+               (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                   2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+            I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+           (-(Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) - 
+            (kT3*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                 I*\[Phi]4]))/Sqrt[2]) + Sqrt[2]*
+           ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]] + Conjugate[
+             (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+               kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+               (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                   2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*((kT4*Sqrt[S]*(-MH^2 + T)*Sech[\[Eta]4]*
+              (Cos[\[Phi]4] + I*Sin[\[Phi]4]))/2 + 
+            (kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*(-(Sqrt[S]*(-MH^2 + 2*S + 
+                   S34 + T14 + 2*T24)*Sech[\[Eta]4])/(2*Sqrt[2]) - 2*
+                ((Sqrt[S]*T14*Sech[\[Eta]4])/(2*Sqrt[2]) + 
+                 (kT3*S*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                      I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2])))/Sqrt[2])) - 
+        8*((kT3*(-1/(2*(MH^2 - T)) - (MH^2*DiscB[MH^2, Sqrt[MT^2], 
+                Sqrt[MT^2]])/(2*(MH^2 - T)^2) + (MH^2*DiscB[T, Sqrt[MT^2], 
+                Sqrt[MT^2]])/(2*(MH^2 - T)^2) - 
+             (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/
+                  (2*MT^2)]^2)/(2*(MH^2 - T)^2) + 
+             (MT^2*Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/(2*MT^2)]^2)/
+              (2*(MH^2 - T)^2))*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+            ((Sqrt[S]*(-MH^2 + T + 2*T14)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])]]*Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+                Sinh[\[Eta]4 + I*\[Phi]4]))/2 + (-MH^2 + T + 2*T14)*
+              Sech[\[Eta]4]*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + I*
+                (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+              (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - I*Conjugate[
+                 (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                  I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                  I*\[Phi]4]) + (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                       kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                    (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                 (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*((Sqrt[S]*(-3*MH^2 + 
+                   2*S34 + T - 2*T14 + 4*U)*Sech[\[Eta]4])/(2*Sqrt[2]) + 
+                (kT3*(5*MH^2 - 2*S34 - 3*T - 2*T14 - 4*U)*Sech[\[Eta]4]*
+                  (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                 Sqrt[2] + Sqrt[2]*kT3*(-MH^2 + S34 + T14 + 2*T24)*
+                 Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                    I*\[Phi]4])))/Sqrt[2] + 8*((kT3*S*Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+                 (Cos[\[Phi]3] - I*Sin[\[Phi]3]))/8 + ((-(kT3*Cos[\[Phi]3]) - 
+                  kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                 (-(kT3*Sqrt[S]*Sech[\[Eta]4]*(Conjugate[
+                        (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                        (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[1/Sqrt[
+                          (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                          kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                       Sinh[\[Eta]3]))/(2*Sqrt[2]) - (kT3*Sqrt[S]*Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                    Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                       I*\[Phi]3 + I*\[Phi]4]))/(2*Sqrt[2])))/Sqrt[2])))/
+           Sqrt[2] + (kT3*(-DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/
+              (2*(MH^2 - T)) + DiscB[T, Sqrt[MT^2], Sqrt[MT^2]]/
+              (2*(MH^2 - T)))*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+            ((Sqrt[S]*(MH^2 - 2*S34 - T)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])]]*Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+                Sinh[\[Eta]4 + I*\[Phi]4]))/2 + (MH^2 - 2*S34 - T)*
+              Sech[\[Eta]4]*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + I*
+                (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+              (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - I*Conjugate[
+                 (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                  I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                  I*\[Phi]4]) + (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                       kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                    (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                 (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*((Sqrt[S]*(-5*MH^2 + 
+                   4*S34 + 3*T + 4*U)*Sech[\[Eta]4])/(2*Sqrt[2]) + 
+                (kT3*(3*MH^2 - T - 4*U)*Sech[\[Eta]4]*(Sinh[\[Eta]3] - 
+                   Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2] + 
+                Sqrt[2]*kT3*(-MH^2 + S34 + T14 + 2*T24)*Sech[\[Eta]4]*
+                 (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4])))/
+              Sqrt[2] + 8*((kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                      4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                        2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                       Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                       Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                        \[Phi]3 - \[Phi]4])]]*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+                 ((Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) - (kT3*Sech[\[Eta]4]*
+                    (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                   Sqrt[2]))/(2*Sqrt[2]) + (kT3*kT4*Sqrt[S]*Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+                 (Cos[\[Phi]4] - I*Sin[\[Phi]4])*(-Sinh[\[Eta]3] + 
+                  Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/4 + 
+               ((-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                  I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                 (-(kT3*Sqrt[S]*Sech[\[Eta]4]*(Conjugate[
+                        (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                        (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[1/Sqrt[
+                          (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                          kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                       Sinh[\[Eta]3]))/(2*Sqrt[2]) + (kT3^2*Sech[\[Eta]4]*
+                    (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                       (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                       1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                          (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]]*Sinh[\[Eta]3])*(Sinh[\[Eta]3] - 
+                     Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2] - 
+                  (kT3*kT4*Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[
+                          \[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                         kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                          Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                          Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                          \[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                       (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                       1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                          (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]]*Sinh[\[Eta]4])*(-Sinh[\[Eta]3] + 
+                     Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/
+                Sqrt[2])))/Sqrt[2]))/T)/(MH^2 - S - T24 - U) - 
+    ((2*((2 + Eps^(-1) + DiscB[MH^2 - S34 - T14 - T24, Sqrt[MT^2], 
+             Sqrt[MT^2]] + Log[Mu^2/MT^2])*
+           (-(((-T - 2*T14 + 2*T24 + U)*Sech[\[Eta]4]*(-Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                       Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+                Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                       Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                       kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2]) + 
+            4*((kT4*Sqrt[S]*Sech[\[Eta]4]*(Conjugate[
+                   (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]4]))/Sqrt[2] + (kT3*Sqrt[S]*Conjugate[
+                 1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                       \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                       2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+                (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[
+                2])) + ScalarC0[MH^2, S, MH^2 - S34 - T14 - T24, Sqrt[MT^2], 
+            Sqrt[MT^2], Sqrt[MT^2]]*(-(((-2*MH^2*T14 + 2*MH^2*T24 - 2*T*T24 + 
+                2*T14*U + S*(-T + U))*Sech[\[Eta]4]*(-Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                       Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+                Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                       Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                       kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2]) - 
+            4*(-(kT4*((Sqrt[S]*(MH^2 - T)*Sech[\[Eta]4])/(2*Sqrt[2]) - 
+                 (Sqrt[S]*(-MH^2 + U)*Sech[\[Eta]4])/(2*Sqrt[2]))*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]4])) + (kT3*((Sqrt[S]*(-MH^2 + T)*Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/
+                  2 - (Sqrt[S]*(MH^2 - U)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                        4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                         Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                         Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])]])/2)*Sech[\[Eta]4]*
+                (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[
+                2]))) + 4*S*((-2*MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/
+           Kallen\[Lambda][MH^2, S, MH^2 - S34 - T14 - T24] + 
+          ((S + S34 + T14 + T24)*DiscB[S, Sqrt[MT^2], Sqrt[MT^2]])/
+           Kallen\[Lambda][MH^2, S, MH^2 - S34 - T14 - T24] + 
+          ((2*MH^2 - S - S34 - T14 - T24)*DiscB[MH^2 - S34 - T14 - T24, 
+             Sqrt[MT^2], Sqrt[MT^2]])/Kallen\[Lambda][MH^2, S, 
+            MH^2 - S34 - T14 - T24] + (MH^2*(S - S34 - T14 - T24)*
+            ScalarC0[MH^2, S, MH^2 - S34 - T14 - T24, Sqrt[MT^2], Sqrt[MT^2], 
+             Sqrt[MT^2]])/Kallen\[Lambda][MH^2, S, MH^2 - S34 - T14 - T24])*
+         (-(((-T - 2*T14 + 2*T24 + U)*Sech[\[Eta]4]*
+             (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                    2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - I*Conjugate[
+                (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                 I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                 I*\[Phi]4]))/Sqrt[2]) + 
+          4*((kT4*Sqrt[S]*Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+               Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Sin[\[Phi]4] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                Sinh[\[Eta]4]))/Sqrt[2] + (kT3*Sqrt[S]*Conjugate[1/
+                Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                    Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*(Sinh[\[Eta]3] - 
+               Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2])) - 
+        8*(3/4 - (MH^2*(S - S34 - T14 - T24)*DiscB[MH^2, Sqrt[MT^2], 
+             Sqrt[MT^2]])/(4*Kallen\[Lambda][MH^2, S, MH^2 - S34 - T14 - 
+              T24]) - (S*(2*MH^2 - S - S34 - T14 - T24)*DiscB[S, Sqrt[MT^2], 
+             Sqrt[MT^2]])/(4*Kallen\[Lambda][MH^2, S, MH^2 - S34 - T14 - 
+              T24]) - ((MH^2 - S34 - T14 - T24)*(S + S34 + T14 + T24)*
+            DiscB[MH^2 - S34 - T14 - T24, Sqrt[MT^2], Sqrt[MT^2]])/
+           (4*Kallen\[Lambda][MH^2, S, MH^2 - S34 - T14 - T24]) + 
+          (Eps^(-1) + Log[Mu^2/MT^2])/4 + ((MH^4*S - 4*MH^2*MT^2*S + 
+             MT^2*S^2 - MH^2*S*S34 + 2*MT^2*S*S34 + MT^2*S34^2 - MH^2*S*T14 + 
+             2*MT^2*S*T14 + 2*MT^2*S34*T14 + MT^2*T14^2 - MH^2*S*T24 + 
+             2*MT^2*S*T24 + 2*MT^2*S34*T24 + 2*MT^2*T14*T24 + MT^2*T24^2)*
+            ScalarC0[MH^2, S, MH^2 - S34 - T14 - T24, Sqrt[MT^2], Sqrt[MT^2], 
+             Sqrt[MT^2]])/(2*Kallen\[Lambda][MH^2, S, MH^2 - S34 - T14 - 
+              T24]))*(-(((-T - 2*T14 + 2*T24 + U)*Sech[\[Eta]4]*
+             (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                    2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - I*Conjugate[
+                (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                 I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                 I*\[Phi]4]))/Sqrt[2]) + 
+          4*((kT4*Sqrt[S]*Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+               Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Sin[\[Phi]4] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                Sinh[\[Eta]4]))/Sqrt[2] + (kT3*Sqrt[S]*Conjugate[1/
+                Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                    Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*(Sinh[\[Eta]3] - 
+               Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2])) - 
+        2*(((S + S34 + T14 + T24)*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/
+           Kallen\[Lambda][MH^2, S, MH^2 - S34 - T14 - T24] - 
+          (2*S*DiscB[S, Sqrt[MT^2], Sqrt[MT^2]])/Kallen\[Lambda][MH^2, S, 
+            MH^2 - S34 - T14 - T24] + ((S - S34 - T14 - T24)*
+            DiscB[MH^2 - S34 - T14 - T24, Sqrt[MT^2], Sqrt[MT^2]])/
+           Kallen\[Lambda][MH^2, S, MH^2 - S34 - T14 - T24] + 
+          (S*(2*MH^2 - S - S34 - T14 - T24)*ScalarC0[MH^2, S, 
+             MH^2 - S34 - T14 - T24, Sqrt[MT^2], Sqrt[MT^2], Sqrt[MT^2]])/
+           Kallen\[Lambda][MH^2, S, MH^2 - S34 - T14 - T24])*
+         (-(((-2*S34*T - T^2 + 4*T*T24 + 2*S*(T - U) + 2*MH^2*(T + 2*T14 - 
+                2*T24 - U) + 2*S34*U - 4*T14*U + U^2)*Sech[\[Eta]4]*
+             (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                    2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - I*Conjugate[
+                (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                 I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                 I*\[Phi]4]))/Sqrt[2]) + 
+          4*((kT3*Sech[\[Eta]4]*(-(Sqrt[S]*(MH^2 - T)*Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]) - Sqrt[S]*
+                (MH^2 - U)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+               kT3*(T - U)*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                      (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                     (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                         kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                         kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                         4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                    Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                      (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+                 Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3]))*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+                 I*\[Phi]4]))/Sqrt[2] - 
+            kT4*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                     Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                     kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+              Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+              Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                    2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])*
+             ((Sqrt[S]*(MH^2 - T)*Sech[\[Eta]4])/Sqrt[2] + 
+              (Sqrt[S]*(MH^2 - U)*Sech[\[Eta]4])/Sqrt[2] + (kT3*(-T + U)*
+                Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                   I*\[Phi]4]))/Sqrt[2]))) - 
+        4*((((6*MH^2*S^2 - 3*S^3 + 10*MH^2*S*S34 - 7*S^2*S34 - 5*S*S34^2 - 
+               S34^3 + 10*MH^2*S*T14 - 7*S^2*T14 - 10*S*S34*T14 - 3*S34^2*
+                T14 - 5*S*T14^2 - 3*S34*T14^2 - T14^3 + 10*MH^2*S*T24 - 7*S^2*
+                T24 - 10*S*S34*T24 - 3*S34^2*T24 - 10*S*T14*T24 - 6*S34*T14*
+                T24 - 3*T14^2*T24 - 5*S*T24^2 - 3*S34*T24^2 - 3*T14*T24^2 - 
+               T24^3)*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/
+             (2*Kallen\[Lambda][MH^2, S, MH^2 - S34 - T14 - T24]^2) - 
+            (3*S^2*(2*MH^2 - S - S34 - T14 - T24)*DiscB[S, Sqrt[MT^2], Sqrt[
+                MT^2]])/Kallen\[Lambda][MH^2, S, MH^2 - S34 - T14 - T24]^2 + 
+            ((6*MH^2*S^2 - 3*S^3 - 10*MH^2*S*S34 + S^2*S34 + 5*S*S34^2 + S34^
+                3 - 10*MH^2*S*T14 + S^2*T14 + 10*S*S34*T14 + 3*S34^2*T14 + 5*
+                S*T14^2 + 3*S34*T14^2 + T14^3 - 10*MH^2*S*T24 + S^2*T24 + 10*
+                S*S34*T24 + 3*S34^2*T24 + 10*S*T14*T24 + 6*S34*T14*T24 + 3*
+                T14^2*T24 + 5*S*T24^2 + 3*S34*T24^2 + 3*T14*T24^2 + T24^3)*
+              DiscB[MH^2 - S34 - T14 - T24, Sqrt[MT^2], Sqrt[MT^2]])/
+             (2*Kallen\[Lambda][MH^2, S, MH^2 - S34 - T14 - T24]^2) + 
+            S/Kallen\[Lambda][MH^2, S, MH^2 - S34 - T14 - T24] + 
+            (S*(6*MH^4*S - 8*MH^2*MT^2*S - 4*MH^2*S^2 + 2*MT^2*S^2 + S^3 - 6*
+                MH^2*S*S34 + 4*MT^2*S*S34 + 2*S^2*S34 + 2*MT^2*S34^2 + S*
+                S34^2 - 6*MH^2*S*T14 + 4*MT^2*S*T14 + 2*S^2*T14 + 4*MT^2*S34*
+                T14 + 2*S*S34*T14 + 2*MT^2*T14^2 + S*T14^2 - 6*MH^2*S*T24 + 4*
+                MT^2*S*T24 + 2*S^2*T24 + 4*MT^2*S34*T24 + 2*S*S34*T24 + 4*
+                MT^2*T14*T24 + 2*S*T14*T24 + 2*MT^2*T24^2 + S*T24^2)*
+              ScalarC0[MH^2, S, MH^2 - S34 - T14 - T24, Sqrt[MT^2], Sqrt[
+                MT^2], Sqrt[MT^2]])/Kallen\[Lambda][MH^2, S, MH^2 - S34 - 
+                T14 - T24]^2)*(-(((2*MH^2 - 2*S34 - T - U)*(T - U)*Sech[
+                \[Eta]4]*(-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                       Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+                Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                       Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                       kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2]) + 
+            4*(T - U)*(-((kT3^2*Sech[\[Eta]4]*(Conjugate[
+                    (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+                    I*\[Phi]4]))/Sqrt[2]) + (kT3*kT4*Sech[\[Eta]4]*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]4])*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                   I*\[Phi]4]))/Sqrt[2])) + 
+          (-(MH^2*(8*MH^2*S - 5*S^2 - 4*S*S34 + S34^2 - 4*S*T14 + 2*S34*T14 + 
+                T14^2 - 4*S*T24 + 2*S34*T24 + 2*T14*T24 + T24^2)*DiscB[MH^2, 
+                Sqrt[MT^2], Sqrt[MT^2]])/(2*Kallen\[Lambda][MH^2, S, 
+                MH^2 - S34 - T14 - T24]^2) - (S*(2*MH^2*S + S^2 - 6*MH^2*
+                S34 + 2*S*S34 + S34^2 - 6*MH^2*T14 + 2*S*T14 + 2*S34*T14 + 
+               T14^2 - 6*MH^2*T24 + 2*S*T24 + 2*S34*T24 + 2*T14*T24 + T24^2)*
+              DiscB[S, Sqrt[MT^2], Sqrt[MT^2]])/(2*Kallen\[Lambda][MH^2, S, 
+                MH^2 - S34 - T14 - T24]^2) + ((8*MH^4*S - 3*MH^2*S^2 + S^3 - 
+               10*MH^2*S*S34 + 2*S^2*S34 + MH^2*S34^2 + S*S34^2 - 10*MH^2*S*
+                T14 + 2*S^2*T14 + 2*MH^2*S34*T14 + 2*S*S34*T14 + MH^2*T14^2 + 
+               S*T14^2 - 10*MH^2*S*T24 + 2*S^2*T24 + 2*MH^2*S34*T24 + 2*S*S34*
+                T24 + 2*MH^2*T14*T24 + 2*S*T14*T24 + MH^2*T24^2 + S*T24^2)*
+              DiscB[MH^2 - S34 - T14 - T24, Sqrt[MT^2], Sqrt[MT^2]])/
+             (2*Kallen\[Lambda][MH^2, S, MH^2 - S34 - T14 - T24]^2) - 
+            (S + S34 + T14 + T24)/(2*Kallen\[Lambda][MH^2, S, MH^2 - S34 - 
+                T14 - T24]) + ((MH^4*S^2 + 4*MH^2*MT^2*S^2 - MH^2*S^3 - MT^2*
+                S^3 - 3*MH^4*S*S34 + 4*MH^2*MT^2*S*S34 + MH^2*S^2*S34 - 3*
+                MT^2*S^2*S34 + 2*MH^2*S*S34^2 - 3*MT^2*S*S34^2 - MT^2*S34^3 - 
+               3*MH^4*S*T14 + 4*MH^2*MT^2*S*T14 + MH^2*S^2*T14 - 3*MT^2*S^2*
+                T14 + 4*MH^2*S*S34*T14 - 6*MT^2*S*S34*T14 - 3*MT^2*S34^2*
+                T14 + 2*MH^2*S*T14^2 - 3*MT^2*S*T14^2 - 3*MT^2*S34*T14^2 - 
+               MT^2*T14^3 - 3*MH^4*S*T24 + 4*MH^2*MT^2*S*T24 + MH^2*S^2*T24 - 
+               3*MT^2*S^2*T24 + 4*MH^2*S*S34*T24 - 6*MT^2*S*S34*T24 - 3*MT^2*
+                S34^2*T24 + 4*MH^2*S*T14*T24 - 6*MT^2*S*T14*T24 - 6*MT^2*S34*
+                T14*T24 - 3*MT^2*T14^2*T24 + 2*MH^2*S*T24^2 - 3*MT^2*S*
+                T24^2 - 3*MT^2*S34*T24^2 - 3*MT^2*T14*T24^2 - MT^2*T24^3)*
+              ScalarC0[MH^2, S, MH^2 - S34 - T14 - T24, Sqrt[MT^2], Sqrt[
+                MT^2], Sqrt[MT^2]])/Kallen\[Lambda][MH^2, S, MH^2 - S34 - 
+                T14 - T24]^2)*(-(((2*MH^2 - 2*S34 - T - U)*(T - U)*Sech[
+                \[Eta]4]*(-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                       Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+                Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                       Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                       kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2]) + 
+            4*(T - U)*(-((kT3^2*Sech[\[Eta]4]*(Conjugate[
+                    (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+                    I*\[Phi]4]))/Sqrt[2]) + (kT3*kT4*Sech[\[Eta]4]*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]4])*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                   I*\[Phi]4]))/Sqrt[2]))))/S + 
+      ((4*(2 + Eps^(-1) + DiscB[T, Sqrt[MT^2], Sqrt[MT^2]] + 
+            Log[Mu^2/MT^2]) - 16*(3/4 + (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[
+                MT^2]])/(4*(MH^2 - T)) - (T*DiscB[T, Sqrt[MT^2], Sqrt[MT^2]])/
+             (4*(MH^2 - T)) + (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[
+                   -(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2)/(4*(MH^2 - T)) + 
+            (Eps^(-1) + Log[Mu^2/MT^2])/4 - 
+            (MT^2*Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/(2*MT^2)]^2)/
+             (4*(MH^2 - T))))*(-((kT3*kT4*Sech[\[Eta]4]*(Cos[\[Phi]3] + 
+              I*Sin[\[Phi]3])*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+              Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+              Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                    2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])*
+             (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+            Sqrt[2]) - Sqrt[2]*kT3*kT4*Sech[\[Eta]4]*(Cos[\[Phi]3] - 
+            I*Sin[\[Phi]3])*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                   kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + 
+                  kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                 Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                     \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+            Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])*
+           (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]) - 
+          ((-MH^2 + S + 2*T24 + U)*Sech[\[Eta]4]*
+            (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+             I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                I*\[Phi]4]))/Sqrt[2] + (Sech[\[Eta]4]*
+            (-2*kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*(-(kT3*Cos[\[Phi]3]) - 
+               kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])) - 
+             2*kT4*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*(kT3*Cos[\[Phi]3] + kT4*
+                Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])) + 
+             (kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*((kT4*(Cos[\[Phi]4] - 
+                   I*Sin[\[Phi]4]))/Sqrt[2] - (-(kT3*Cos[\[Phi]3]) - 
+                  kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))/
+                 Sqrt[2]))/Sqrt[2])*(-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                      \[Phi]4])]] - I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                    kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                 (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                I*\[Phi]4]))/Sqrt[2] - 
+          4*(-(kT4*Sqrt[S]*Sech[\[Eta]4]*(Conjugate[
+                  (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                       \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                        4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+                Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                       Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4]))/
+             (2*Sqrt[2]) - (kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                      \[Phi]4])]]*Sech[\[Eta]4]*(Sinh[\[Eta]3] - Sinh[
+                \[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/(2*Sqrt[2])) + 
+          Sqrt[2]*kT3^2*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                  kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                   kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                 Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                     \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(Cos[\[Phi]3] - 
+            I*Sin[\[Phi]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+              I*\[Phi]4]) - (kT3^2*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                    kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                 (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(Cos[\[Phi]3] + 
+             I*Sin[\[Phi]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*
+                \[Phi]4]))/Sqrt[2]) - 
+        2*(Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+           (2*(MH^2 - T)) - Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/
+              (2*MT^2)]^2/(2*(MH^2 - T)))*(Sqrt[2]*kT3*kT4*S*Sech[\[Eta]4]*
+           (Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+           (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+            Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])*
+           (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]) + 
+          Sqrt[2]*kT3*kT4*(MH^2 - T)*Sech[\[Eta]4]*(Cos[\[Phi]3] - 
+            I*Sin[\[Phi]3])*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                   kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + 
+                  kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                 Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                     \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+            Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])*
+           (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]) - 
+          ((MH^2 - T)*(MH^2 - S - 2*T24 - U)*Sech[\[Eta]4]*
+            (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+             I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                I*\[Phi]4]))/Sqrt[2] + Sqrt[2]*Sech[\[Eta]4]*
+           ((kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*(-(Sqrt[2]*kT3*T14*
+                 (Cos[\[Phi]3] - I*Sin[\[Phi]3])) + Sqrt[2]*kT4*S*
+                (Cos[\[Phi]4] - I*Sin[\[Phi]4])))/Sqrt[2] - 
+            kT3*kT4*(MH^2 - T)*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+             (Cos[\[Phi]4] + I*Sin[\[Phi]4]))*
+           (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+            I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]) + 
+          4*Sqrt[2]*kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+           ((kT4*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*((kT4*Sqrt[S]*Sech[\[Eta]4]*
+                 (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]4]))/(2*Sqrt[2]) + (kT3*Sqrt[S]*Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+                 (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                (2*Sqrt[2])))/Sqrt[2] + ((-(kT3*Cos[\[Phi]3]) - kT4*
+                Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+              ((kT4*Sqrt[S]*Sech[\[Eta]4]*(Conjugate[
+                    (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]4]))/(2*Sqrt[2]) + (kT3*Sqrt[S]*Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+                 (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                (2*Sqrt[2])))/Sqrt[2]) - 4*(MH^2 - T)*
+           ((kT4*Sqrt[S]*Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+               Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Sin[\[Phi]4] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                Sinh[\[Eta]4]))/(2*Sqrt[2]) + (kT3*Sqrt[S]*Conjugate[1/
+                Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                    Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*(Sinh[\[Eta]3] - 
+               Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/(2*Sqrt[2])) - 
+          Sqrt[2]*kT3^2*(MH^2 - T)*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                  kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                   kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                 Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                     \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(Cos[\[Phi]3] - 
+            I*Sin[\[Phi]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+              I*\[Phi]4]) + Sqrt[2]*kT3^2*S*
+           ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]] + Conjugate[
+             (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+               kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+               (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                   2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(Cos[\[Phi]3] + 
+            I*Sin[\[Phi]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+              I*\[Phi]4])) - 4*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/
+           (MH^2 - T) - DiscB[T, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - T))*
+         ((kT3*kT4*(MH^2 + 2*S - T - 2*U)*Sech[\[Eta]4]*(Cos[\[Phi]3] + 
+             I*Sin[\[Phi]3])*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+             Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+             Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])*
+            (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+           Sqrt[2] + Sqrt[2]*kT3*kT4*(MH^2 - T)*Sech[\[Eta]4]*
+           (Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+           (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+            Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])*
+           (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]) - 
+          ((MH^2 - T)*(MH^2 - S - 2*T24 - U)*Sech[\[Eta]4]*
+            (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+             I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                I*\[Phi]4]))/Sqrt[2] + (Sech[\[Eta]4]*
+            (-((kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*(2*Sqrt[2]*kT3*
+                  (MH^2 - S - 2*T24 - U)*(Cos[\[Phi]3] - I*Sin[\[Phi]3]) + 
+                 (kT4*(-7*MH^2 - 2*S + 8*S34 + 3*T + 6*U)*(Cos[\[Phi]4] - 
+                    I*Sin[\[Phi]4]))/Sqrt[2] + ((-9*MH^2 + 2*S + 8*S34 + 
+                    5*T + 2*U)*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                    I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))/Sqrt[2]))/Sqrt[
+                2]) - 4*(MH^2 - T)*(-(kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*
+                  (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                   I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))/2 - 
+               (kT4*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*(kT3*Cos[\[Phi]3] + 
+                  kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                      \[Phi]4])))/2))*(-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                      \[Phi]4])]] - I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                    kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                 (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                I*\[Phi]4]))/Sqrt[2] - 4*(MH^2 - T)*
+           ((kT4*Sqrt[S]*Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+               Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Sin[\[Phi]4] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                Sinh[\[Eta]4]))/(2*Sqrt[2]) + (kT3*Sqrt[S]*Conjugate[1/
+                Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                    Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*(Sinh[\[Eta]3] - 
+               Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/(2*Sqrt[2])) - 
+          Sqrt[2]*kT3^2*(MH^2 - T)*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                  kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                   kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                 Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                     \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(Cos[\[Phi]3] - 
+            I*Sin[\[Phi]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+              I*\[Phi]4]) + (kT3^2*(MH^2 + 2*S - T - 2*U)*
+            ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(Cos[\[Phi]3] + 
+             I*Sin[\[Phi]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*
+                \[Phi]4]))/Sqrt[2] + 8*Sqrt[2]*kT3*(Cos[\[Phi]3] + 
+            I*Sin[\[Phi]3])*((kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+              (-(kT4*Sqrt[S]*Sech[\[Eta]4]*(Conjugate[
+                     (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                     (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                    Sinh[\[Eta]4]))/(2*Sqrt[2]) - (kT3*Sqrt[S]*Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+                 (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                (2*Sqrt[2])))/Sqrt[2] - ((kT4*(Cos[\[Phi]4] - 
+                 I*Sin[\[Phi]4]))/Sqrt[2] + (-(kT3*Cos[\[Phi]3]) - 
+                kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))/
+               Sqrt[2])*(-((kT3^2*Sech[\[Eta]4]*(Conjugate[
+                    (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+                    I*\[Phi]4]))/Sqrt[2]) + (kT3*kT4*Sech[\[Eta]4]*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]4])*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                   I*\[Phi]4]))/Sqrt[2]))) - 
+        8*((kT3*(-1/(2*(MH^2 - T)) - (MH^2*DiscB[MH^2, Sqrt[MT^2], 
+                Sqrt[MT^2]])/(2*(MH^2 - T)^2) + (MH^2*DiscB[T, Sqrt[MT^2], 
+                Sqrt[MT^2]])/(2*(MH^2 - T)^2) - 
+             (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/
+                  (2*MT^2)]^2)/(2*(MH^2 - T)^2) + 
+             (MT^2*Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/(2*MT^2)]^2)/
+              (2*(MH^2 - T)^2))*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+            (-(kT4*(MH^2 - 2*S - T)*Sech[\[Eta]4]*(Conjugate[
+                  (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                       \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                        4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+                Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                       Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])*(
+                Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4])) + 
+             (Sech[\[Eta]4]*(Sqrt[2]*kT3*(-MH^2 + S + 2*T24 + U)*
+                 (Cos[\[Phi]3] - I*Sin[\[Phi]3]) + (kT4*(3*MH^2 + 2*S - 
+                   4*S34 - T - 2*U)*(Cos[\[Phi]4] - I*Sin[\[Phi]4]))/
+                 Sqrt[2] + ((5*MH^2 - 2*S - 4*S34 - 3*T - 2*U)*
+                  (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                   I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))/Sqrt[2])*(
+                -Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                       Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                       Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                        \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                       Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+                Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                       Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                       kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2] + 
+             kT3*(-MH^2 + 2*S + T)*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+              (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]) + 
+             8*((kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+                 (-(kT4*Sqrt[S]*Sech[\[Eta]4]*(Conjugate[
+                        (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                        (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[1/Sqrt[
+                          (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                          kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                       Sinh[\[Eta]4]))/(2*Sqrt[2]) - (kT3*Sqrt[S]*Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                    Sech[\[Eta]4]*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+                       I*\[Phi]4]))/(2*Sqrt[2])))/Sqrt[2] - 
+               ((kT4*(Cos[\[Phi]4] - I*Sin[\[Phi]4]))/Sqrt[2] + 
+                 (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                   I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))/Sqrt[2])*
+                (-((kT3^2*Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                          (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                          Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                          Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                          \[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                       (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                       1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                          (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]]*Sinh[\[Eta]3])*(Sinh[\[Eta]3] - 
+                     Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]) + 
+                 (kT3*kT4*Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                         (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                          Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                         Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                          \[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]4])*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                      I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))))/Sqrt[2] + 
+          (kT3*(-DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - T)) + 
+             DiscB[T, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - T)))*
+            (Cos[\[Phi]3] + I*Sin[\[Phi]3])*(-(kT4*(-MH^2 + T + 2*U)*Sech[
+                \[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                    (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+                Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                       Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])*(
+                Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4])) + 
+             (Sech[\[Eta]4]*(Sqrt[2]*kT3*(-MH^2 + S + 2*T24 + U)*
+                 (Cos[\[Phi]3] - I*Sin[\[Phi]3]) + (kT4*(5*MH^2 - 4*S34 - 
+                   3*T - 4*U)*(Cos[\[Phi]4] - I*Sin[\[Phi]4]))/Sqrt[2] + 
+                ((3*MH^2 - 4*S34 - T)*(-(kT3*Cos[\[Phi]3]) - 
+                   kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                       \[Phi]4])))/Sqrt[2])*(-Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                       Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+                Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                       Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                       kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2] + 
+             kT3*(MH^2 - T - 2*U)*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+              (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]) + 
+             8*((kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+                 (-(kT4*Sqrt[S]*Sech[\[Eta]4]*(Conjugate[
+                        (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                        (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[1/Sqrt[
+                          (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                          kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                       Sinh[\[Eta]4]))/(2*Sqrt[2]) - (kT3*Sqrt[S]*Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                    Sech[\[Eta]4]*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+                       I*\[Phi]4]))/(2*Sqrt[2])))/Sqrt[2] - 
+               ((kT4*(Cos[\[Phi]4] - I*Sin[\[Phi]4]))/Sqrt[2] + 
+                 (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                   I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))/Sqrt[2])*
+                (-((kT3^2*Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                          (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                          Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                          Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                          \[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                       (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                       1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                          (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]]*Sinh[\[Eta]3])*(Sinh[\[Eta]3] - 
+                     Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]) + 
+                 (kT3*kT4*Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                         (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                          Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                         Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                          \[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]4])*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                      I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))))/Sqrt[2]))/T)/
+     (MH^2 - S34 - T14 - T24) + 
+    (4*(2 + Eps^(-1) + DiscB[U, Sqrt[MT^2], Sqrt[MT^2]] + Log[Mu^2/MT^2])*
+       (-(((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]] + Conjugate[
+             (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+               kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+               (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                   2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+           (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+          Sqrt[2]) - (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                  kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                  kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                    Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                   kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                    Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                    \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+           Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+               Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+          (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/
+         (2*Sqrt[2]) - (Sech[\[Eta]4]*
+          (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+           I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+           Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2]) + 
+      2*(Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+         (2*(MH^2 - U)) - Log[(2*MT^2 - U + Sqrt[-((4*MT^2 - U)*U)])/
+            (2*MT^2)]^2/(2*(MH^2 - U)))*
+       (Sqrt[2]*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+               Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+          Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+              Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[
+                kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*
+                kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+         ((kT3*Sqrt[S]*Sech[\[Eta]4]*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/2 + 
+          ((-MH^2 + U)*Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+             Sinh[\[Eta]4 + I*\[Phi]4]))/2) + 
+        (Sech[\[Eta]4]*(((-MH^2 + U)*((-I)*Conjugate[
+                (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+               (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                 kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] + 
+           (kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                   Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                  kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                   Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                 (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+             (Cos[\[Phi]3] - I*Sin[\[Phi]3]))/Sqrt[2])*
+          (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/2 - 
+        ((MH^2 - U)*Sech[\[Eta]4]*
+          (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+           I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+           Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2]) + 
+      (-8*((kT3*(-DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - U)) + 
+             DiscB[U, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - U)))*
+            (Cos[\[Phi]3] - I*Sin[\[Phi]3])*(kT4*(-MH^2 + 2*T + U)*
+              Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+               Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Sin[\[Phi]4] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                Sinh[\[Eta]4])*(Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[
+                \[Eta]4 + I*\[Phi]4]) - (Sech[\[Eta]4]*((kT3*(MH^2 - 2*S34 - 
+                   2*T14 + 2*T24 + U)*(Cos[\[Phi]3] + I*Sin[\[Phi]3]))/
+                 Sqrt[2] + Sqrt[2]*kT4*(-MH^2 + 2*T + U)*(Cos[\[Phi]4] + 
+                  I*Sin[\[Phi]4]))*(-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                      4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                        2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                       Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                       Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                        \[Phi]3 - \[Phi]4])]] - I*Conjugate[
+                  (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                       \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                        4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                   I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                    (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                   I*\[Phi]4]))/Sqrt[2] + 4*Sqrt[2]*kT3*(Cos[\[Phi]3] + I*
+                Sin[\[Phi]3])*((kT4*Sqrt[S]*Sech[\[Eta]4]*
+                 (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]4]))/(2*Sqrt[2]) + (kT3*Sqrt[S]*Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+                 (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                (2*Sqrt[2])) + kT3*(MH^2 - 2*T - U)*(I*Conjugate[
+                 (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+              (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4])))/
+           Sqrt[2] + (kT3*(-1/(2*(MH^2 - U)) - (MH^2*DiscB[MH^2, Sqrt[MT^2], 
+                Sqrt[MT^2]])/(2*(MH^2 - U)^2) + (MH^2*DiscB[U, Sqrt[MT^2], 
+                Sqrt[MT^2]])/(2*(MH^2 - U)^2) - 
+             (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/
+                  (2*MT^2)]^2)/(2*(MH^2 - U)^2) + 
+             (MT^2*Log[(2*MT^2 - U + Sqrt[-((4*MT^2 - U)*U)])/(2*MT^2)]^2)/
+              (2*(MH^2 - U)^2))*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+            (kT4*(MH^2 - 2*S - U)*Sech[\[Eta]4]*(Conjugate[
+                 (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+               Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Sin[\[Phi]4] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                Sinh[\[Eta]4])*(Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[
+                \[Eta]4 + I*\[Phi]4]) - (Sech[\[Eta]4]*((kT3*(-MH^2 + 4*T24 + 
+                   U)*(Cos[\[Phi]3] + I*Sin[\[Phi]3]))/Sqrt[2] + 
+                Sqrt[2]*kT4*(MH^2 - 2*S - U)*(Cos[\[Phi]4] + I*Sin[\[Phi]4]))*
+               (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                       Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                       Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                        \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                       Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+                Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                       Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                       kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2] + 
+             4*Sqrt[2]*kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+              ((kT4*Sqrt[S]*Sech[\[Eta]4]*(Conjugate[
+                    (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]4]))/(2*Sqrt[2]) + (kT3*Sqrt[S]*Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+                 (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                (2*Sqrt[2])) + kT3*(-MH^2 + 2*S + U)*(I*Conjugate[
+                 (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+              (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4])))/
+           Sqrt[2]) + (4*(2 + Eps^(-1) + DiscB[U, Sqrt[MT^2], Sqrt[MT^2]] + 
+            Log[Mu^2/MT^2]) - 16*(3/4 + (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[
+                MT^2]])/(4*(MH^2 - U)) - (U*DiscB[U, Sqrt[MT^2], Sqrt[MT^2]])/
+             (4*(MH^2 - U)) + (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[
+                   -(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2)/(4*(MH^2 - U)) + 
+            (Eps^(-1) + Log[Mu^2/MT^2])/4 - 
+            (MT^2*Log[(2*MT^2 - U + Sqrt[-((4*MT^2 - U)*U)])/(2*MT^2)]^2)/
+             (4*(MH^2 - U))))*(Sqrt[2]*kT3*kT4*Sech[\[Eta]4]*
+           (Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+           (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+            Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])*
+           (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]) + 
+          (kT3*kT4*Sech[\[Eta]4]*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+            (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+             Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+             Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])*
+            (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/
+           Sqrt[2] - ((-MH^2 + S + T + 2*T14)*Sech[\[Eta]4]*
+            (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+             I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                I*\[Phi]4]))/Sqrt[2] + (Sech[\[Eta]4]*
+            ((kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*((kT3*(Cos[\[Phi]3] - 
+                   I*Sin[\[Phi]3]))/Sqrt[2] + 2*Sqrt[2]*
+                 (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                  I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))))/Sqrt[2] - 
+             ((kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                  kT4*Sin[\[Phi]4]))*((3*kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/
+                 Sqrt[2] + 2*Sqrt[2]*(-(kT3*Cos[\[Phi]3]) - 
+                  kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                      \[Phi]4]))))/Sqrt[2])*
+            (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+             I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                I*\[Phi]4]))/Sqrt[2] - 
+          4*((kT4*Sqrt[S]*Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+               Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Sin[\[Phi]4] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                Sinh[\[Eta]4]))/(2*Sqrt[2]) + (kT3*Sqrt[S]*Conjugate[1/
+                Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                    Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*(Sinh[\[Eta]3] - 
+               Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/(2*Sqrt[2])) - 
+          (kT3^2*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(Cos[\[Phi]3] - 
+             I*Sin[\[Phi]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*
+                \[Phi]4]))/Sqrt[2] + Sqrt[2]*kT3^2*
+           ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]] + Conjugate[
+             (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+               kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+               (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                   2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(Cos[\[Phi]3] + 
+            I*Sin[\[Phi]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+              I*\[Phi]4])) - 
+        2*(Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+           (2*(MH^2 - U)) - Log[(2*MT^2 - U + Sqrt[-((4*MT^2 - U)*U)])/
+              (2*MT^2)]^2/(2*(MH^2 - U)))*
+         (-(Sqrt[2]*kT3*kT4*(MH^2 - U)*Sech[\[Eta]4]*(Cos[\[Phi]3] + 
+             I*Sin[\[Phi]3])*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+             Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+             Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])*
+            (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4])) - 
+          Sqrt[2]*kT3*kT4*S*Sech[\[Eta]4]*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+           (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+            Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])*
+           (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]) - 
+          ((MH^2 - S - T - 2*T14)*(MH^2 - U)*Sech[\[Eta]4]*
+            (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+             I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                I*\[Phi]4]))/Sqrt[2] - Sqrt[2]*Sech[\[Eta]4]*
+           (Sqrt[2]*kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+             ((kT3*T24*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/Sqrt[2] + 
+              (kT4*(MH^2 - U)*(Cos[\[Phi]4] - I*Sin[\[Phi]4]))/Sqrt[2]) - 
+            kT3*kT4*S*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*(Cos[\[Phi]4] + 
+              I*Sin[\[Phi]4]))*(-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                     \[Phi]4])]] - I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                  kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                   kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                 Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                     \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+             Cosh[\[Eta]4 + I*\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]) - 
+          4*(MH^2 - U)*(-(kT4*Sqrt[S]*Sech[\[Eta]4]*(Conjugate[
+                  (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                       \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                        4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+                Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                       Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4]))/
+             (2*Sqrt[2]) - (kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                      \[Phi]4])]]*Sech[\[Eta]4]*(Sinh[\[Eta]3] - Sinh[
+                \[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/(2*Sqrt[2])) + 
+          4*kT3^2*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*(Cos[\[Phi]3] + 
+            I*Sin[\[Phi]3])*((kT4*Sqrt[S]*Sech[\[Eta]4]*
+              (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                      Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Cos[\[Phi]4] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+               Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4]))/
+             (2*Sqrt[2]) + (kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                      \[Phi]4])]]*Sech[\[Eta]4]*(Sinh[\[Eta]3] - Sinh[
+                \[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/(2*Sqrt[2])) + 
+          Sqrt[2]*kT3^2*S*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                  kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                   kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                 Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                     \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(Cos[\[Phi]3] - 
+            I*Sin[\[Phi]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+              I*\[Phi]4]) - Sqrt[2]*kT3^2*(MH^2 - U)*
+           ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]] + Conjugate[
+             (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+               kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+               (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                   2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(Cos[\[Phi]3] + 
+            I*Sin[\[Phi]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+              I*\[Phi]4])) - 4*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/
+           (MH^2 - U) - DiscB[U, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - U))*
+         (-(Sqrt[2]*kT3*kT4*(MH^2 - U)*Sech[\[Eta]4]*(Cos[\[Phi]3] + 
+             I*Sin[\[Phi]3])*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+             Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+             Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])*
+            (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4])) - 
+          (kT3*kT4*(MH^2 + 2*S - 2*T - U)*Sech[\[Eta]4]*(Cos[\[Phi]3] - 
+             I*Sin[\[Phi]3])*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+             Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+             Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])*
+            (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/
+           Sqrt[2] - ((MH^2 - S - T - 2*T14)*(MH^2 - U)*Sech[\[Eta]4]*
+            (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+             I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                I*\[Phi]4]))/Sqrt[2] - (Sech[\[Eta]4]*
+            ((kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*((kT3*(MH^2 - 2*S34 - 
+                   2*T14 + 6*T24 + U)*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/
+                 Sqrt[2] + 2*Sqrt[2]*kT4*(MH^2 - U)*(Cos[\[Phi]4] - 
+                  I*Sin[\[Phi]4])))/Sqrt[2] + kT3*kT4*(-MH^2 - 2*S + 2*T + U)*
+              (Cos[\[Phi]3] - I*Sin[\[Phi]3])*(Cos[\[Phi]4] + I*
+                Sin[\[Phi]4]))*(-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                      \[Phi]4])]] - I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                    kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                 (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                I*\[Phi]4]))/Sqrt[2] - 4*(MH^2 - U)*
+           (-(kT4*Sqrt[S]*Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                    (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+                Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                       Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4]))/
+             (2*Sqrt[2]) - (kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                      \[Phi]4])]]*Sech[\[Eta]4]*(Sinh[\[Eta]3] - Sinh[
+                \[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/(2*Sqrt[2])) + 
+          8*kT3^2*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*(Cos[\[Phi]3] + 
+            I*Sin[\[Phi]3])*((kT4*Sqrt[S]*Sech[\[Eta]4]*
+              (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                      Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Cos[\[Phi]4] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+               Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4]))/
+             (2*Sqrt[2]) + (kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                      \[Phi]4])]]*Sech[\[Eta]4]*(Sinh[\[Eta]3] - Sinh[
+                \[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/(2*Sqrt[2])) + 
+          (kT3^2*(MH^2 + 2*S - 2*T - U)*
+            (I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(Cos[\[Phi]3] - 
+             I*Sin[\[Phi]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*
+                \[Phi]4]))/Sqrt[2] - Sqrt[2]*kT3^2*(MH^2 - U)*
+           ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]] + Conjugate[
+             (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+               kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+               (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                   2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(Cos[\[Phi]3] + 
+            I*Sin[\[Phi]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+              I*\[Phi]4])))/(MH^2 - S34 - T14 - T24) - 
+      4*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - U) - 
+        DiscB[U, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - U))*
+       (-(Sech[\[Eta]4]*(((-MH^2 + U)*((-I)*Conjugate[
+                 (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] + 
+            Sqrt[2]*kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+             ((Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 - 
+              kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                       Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                       kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                  (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                       \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                        4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+                Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                       Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                       Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                        \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                 Sinh[\[Eta]3])))*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+            Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+        (Sech[\[Eta]4]*(MH^2 - U + kT3^2*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+            (Cos[\[Phi]3] + I*Sin[\[Phi]3]))*
+          (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+           I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+           Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2] - 
+        Sqrt[2]*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+               Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+          Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+              Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[
+                kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*
+                kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+         (((-MH^2 + U)*Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+             Sinh[\[Eta]4 + I*\[Phi]4]))/2 + Sqrt[2]*kT3*(Cos[\[Phi]3] - 
+            I*Sin[\[Phi]3])*((Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) + 
+            (kT3*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                 I*\[Phi]4]))/Sqrt[2]))) - 
+      16*((3/4 + (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/(4*(MH^2 - U)) - 
+          (U*DiscB[U, Sqrt[MT^2], Sqrt[MT^2]])/(4*(MH^2 - U)) + 
+          (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*
+                MT^2)]^2)/(4*(MH^2 - U)) + (Eps^(-1) + Log[Mu^2/MT^2])/4 - 
+          (MT^2*Log[(2*MT^2 - U + Sqrt[-((4*MT^2 - U)*U)])/(2*MT^2)]^2)/
+           (4*(MH^2 - U)))*
+         (-(((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+              Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+             (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+            Sqrt[2]) - (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                    kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                 (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+            (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/
+           (2*Sqrt[2]) - (Sech[\[Eta]4]*(-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                      \[Phi]4])]] - I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                    kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                 (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                I*\[Phi]4]))/Sqrt[2]) + (kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+          ((-1/(2*(MH^2 - U)) - (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/
+              (2*(MH^2 - U)^2) + (MH^2*DiscB[U, Sqrt[MT^2], Sqrt[MT^2]])/
+              (2*(MH^2 - U)^2) - (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[
+                    -(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2)/(2*(MH^2 - U)^
+                2) + (MT^2*Log[(2*MT^2 - U + Sqrt[-((4*MT^2 - U)*U)])/
+                  (2*MT^2)]^2)/(2*(MH^2 - U)^2))*
+            (-(Sqrt[S]*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*
+                         Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                      (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                     (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                         kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                         kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                         4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                    Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                      (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                  (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                       \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                        4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4])/2 - 
+             (Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                   (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[
+                \[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + 
+                  I*\[Phi]4]))/4) + (-DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/
+              (2*(MH^2 - U)) + DiscB[U, Sqrt[MT^2], Sqrt[MT^2]]/
+              (2*(MH^2 - U)))*((kT3*Sech[\[Eta]4]*(Conjugate[
+                  (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                       \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                        4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+                Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                       Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])*(
+                Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+             (kT3*Sech[\[Eta]4]*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*(
+                -Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                       Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                       Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                        \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                       Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+                Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                       Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                       kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/2 - 
+             kT3*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                       \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+              (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))))/
+         Sqrt[2]) - ((4*(2 + Eps^(-1) + DiscB[U, Sqrt[MT^2], Sqrt[MT^2]] + 
+            Log[Mu^2/MT^2]) - 16*(3/4 + (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[
+                MT^2]])/(4*(MH^2 - U)) - (U*DiscB[U, Sqrt[MT^2], Sqrt[MT^2]])/
+             (4*(MH^2 - U)) + (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[
+                   -(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2)/(4*(MH^2 - U)) + 
+            (Eps^(-1) + Log[Mu^2/MT^2])/4 - 
+            (MT^2*Log[(2*MT^2 - U + Sqrt[-((4*MT^2 - U)*U)])/(2*MT^2)]^2)/
+             (4*(MH^2 - U))))*
+         ((Sqrt[S]*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+            ((kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/Sqrt[2] + 
+             Sqrt[2]*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + I*
+                (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))))/2 + 
+          Sqrt[2]*Sqrt[S]*Sech[\[Eta]4]*
+           (-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                   (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 + 
+            kT4*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                     Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                     kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+              Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+              Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                    2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])) - 
+          (Sech[\[Eta]4]*(((-S + S34 - T + T24)*((-I)*Conjugate[
+                  (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                       \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                        4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                 (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] + 
+             Sqrt[2]*kT4*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                      \[Phi]4])]]*(Cos[\[Phi]4] - I*Sin[\[Phi]4]) - 
+             (kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*(-(Sqrt[S]*Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/
+                 2 - kT4*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                      (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                          kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                          kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                          4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                      (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                       (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+                  Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                         Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]4])))/Sqrt[2])*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+             Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+          (kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*(2*Sech[\[Eta]4]*
+              (-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                      (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/
+                2 + kT4*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                     (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                         kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                         kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                         4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                    Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                      (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+                 Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]4]))*(Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[
+                \[Eta]4 + I*\[Phi]4]) - Sqrt[2]*Sech[\[Eta]4]*
+              ((kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/Sqrt[2] + Sqrt[2]*
+                (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                 I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))*
+              (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - I*Conjugate[
+                 (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                  I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                  I*\[Phi]4])))/Sqrt[2] + 2*Sqrt[2]*
+           ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]] + Conjugate[
+             (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+               kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+               (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                   2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*((Sqrt[S]*Sech[\[Eta]4]*
+              (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4])))/4 + (kT3*kT4*Sech[\[Eta]4]*
+              (Cos[\[Phi]4] + I*Sin[\[Phi]4])*(Sinh[\[Eta]3] - Sinh[
+                \[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/2)) - 
+        8*((kT3*(-DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - U)) + 
+             DiscB[U, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - U)))*
+            (Cos[\[Phi]3] - I*Sin[\[Phi]3])*(-(Sqrt[S]*(-3*MH^2 + 2*S34 + 
+                 2*T + U)*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*
+                         Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                      (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                     (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                         kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                         kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                         4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                    Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                      (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                  (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                       \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                        4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4])/2 + 
+             (Sech[\[Eta]4]*(-(Sqrt[S]*(-3*MH^2 + 4*S34 + U)*Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/
+                 2 - 2*kT3*(S - S34 + T - T24)*(Conjugate[
+                    (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]3]) - kT4*(-3*MH^2 + 4*T + U)*
+                 (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]4]))*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+                Sinh[\[Eta]4 + I*\[Phi]4]))/2 + kT4*(-3*MH^2 + 2*S34 + 2*T + 
+               U)*Sech[\[Eta]4]*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*
+              (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - I*Conjugate[
+                 (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                  I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                  I*\[Phi]4]) + 8*(-(kT3*Sqrt[S]*Sech[\[Eta]4]*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + 
+                   I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                  (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                         Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                         2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                         4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                     (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                    Sinh[\[Eta]3]))/4 - (kT3*Sqrt[S]*Sech[\[Eta]4]*
+                 (Cos[\[Phi]3] + I*Sin[\[Phi]3])*(-(Sqrt[S]*Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]])/2 + kT4*(Conjugate[
+                      (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]4])))/4 + (kT4*(Cos[\[Phi]4] + 
+                  I*Sin[\[Phi]4])*(-((kT3^2*Sech[\[Eta]4]*(Conjugate[
+                        (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                        (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[1/Sqrt[
+                          (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                          kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                       Sinh[\[Eta]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - 
+                        I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]) + 
+                  (kT3*Sech[\[Eta]4]*(-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + 
+                          kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                          kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                          4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 + 
+                     kT4*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                         (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[1/Sqrt[
+                          (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                          kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                        Sinh[\[Eta]4]))*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                       I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/Sqrt[2])))/
+           Sqrt[2] + (kT3*(-1/(2*(MH^2 - U)) - (MH^2*DiscB[MH^2, Sqrt[MT^2], 
+                Sqrt[MT^2]])/(2*(MH^2 - U)^2) + (MH^2*DiscB[U, Sqrt[MT^2], 
+                Sqrt[MT^2]])/(2*(MH^2 - U)^2) - 
+             (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/
+                  (2*MT^2)]^2)/(2*(MH^2 - U)^2) + 
+             (MT^2*Log[(2*MT^2 - U + Sqrt[-((4*MT^2 - U)*U)])/(2*MT^2)]^2)/
+              (2*(MH^2 - U)^2))*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+            ((Sqrt[S]*(-MH^2 + 2*S + 2*T24 + U)*(I*Conjugate[
+                  (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                       \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                        4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                 (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4])/2 - 
+             (Sech[\[Eta]4]*(Sqrt[S]*(S34 - T)*Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                (Sqrt[S]*(-MH^2 + 2*S + 2*T24 + U)*Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 + 
+                2*kT3*S*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                      (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                          kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                          kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                          4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                      (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                       (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+                  Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                         Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]3]) - 2*kT3*T24*(Conjugate[
+                    (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]3]) + kT4*MH^2*(Conjugate[
+                    (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]4]) - 2*kT4*S*(Conjugate[
+                    (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]4]) - 2*kT4*T24*(Conjugate[
+                    (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]4]) - kT4*U*(Conjugate[
+                    (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]4]))*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+                Sinh[\[Eta]4 + I*\[Phi]4]))/2 - kT4*(-MH^2 + 2*S + 2*T24 + U)*
+              Sech[\[Eta]4]*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*
+              (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - I*Conjugate[
+                 (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                  I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                  I*\[Phi]4]) + 8*(-(kT3*Sqrt[S]*Sech[\[Eta]4]*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + 
+                   I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                  (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                         Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                         2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                         4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                     (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                    Sinh[\[Eta]3]))/4 - (kT3*Sqrt[S]*Sech[\[Eta]4]*
+                 (Cos[\[Phi]3] + I*Sin[\[Phi]3])*(-(Sqrt[S]*Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]])/2 + kT4*(Conjugate[
+                      (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]4])))/4 + (kT4*(Cos[\[Phi]4] + 
+                  I*Sin[\[Phi]4])*(-((kT3^2*Sech[\[Eta]4]*(Conjugate[
+                        (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                        (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[1/Sqrt[
+                          (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                          kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                       Sinh[\[Eta]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - 
+                        I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]) + 
+                  (kT3*Sech[\[Eta]4]*(-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + 
+                          kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                          kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                          4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 + 
+                     kT4*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                         (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[1/Sqrt[
+                          (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                          kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                        Sinh[\[Eta]4]))*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                       I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/Sqrt[2])))/
+           Sqrt[2]) - 
+        2*(Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+           (2*(MH^2 - U)) - Log[(2*MT^2 - U + Sqrt[-((4*MT^2 - U)*U)])/
+              (2*MT^2)]^2/(2*(MH^2 - U)))*
+         (-(Sech[\[Eta]4]*(((S - S34 + T - T24)*(MH^2 - U)*
+                ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                    (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] + 
+              2*(-((kT4*Sqrt[S]*(MH^2 - U)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                        4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                         Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                         Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])]]*(Cos[\[Phi]4] - 
+                    I*Sin[\[Phi]4]))/Sqrt[2]) + (kT3*(Cos[\[Phi]3] - 
+                   I*Sin[\[Phi]3])*(-(Sqrt[S]*(S + T24)*Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]]) + (Sqrt[S]*(S + S34 - T + T24)*
+                     Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]])/2 + 2*kT3*S*(Conjugate[
+                       (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                       (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                       1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                          (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]]*Sinh[\[Eta]3])))/Sqrt[2]))*
+             (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/2 - 
+          4*(-(Sqrt[S]*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                    (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                 (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(
+                (kT3*(S + T24)*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/Sqrt[2] + 
+                (kT4*(MH^2 - U)*(Cos[\[Phi]4] - I*Sin[\[Phi]4]))/Sqrt[2]))/
+             4 + (Sqrt[S]*(MH^2 - U)*Sech[\[Eta]4]*
+              (-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                      (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/
+                2 + kT4*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                     (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                         kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                         kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                         4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                    Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                      (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+                 Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]4])))/(2*Sqrt[2]) + 
+            (kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*(((MH^2 - U)*Sech[\[Eta]4]*
+                 (-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]])/2 + kT4*(Conjugate[
+                      (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]4]))*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+                  Sinh[\[Eta]4 + I*\[Phi]4]))/2 + (Sech[\[Eta]4]*
+                 ((kT3*(S + T24)*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/Sqrt[2] + 
+                  (kT4*(MH^2 - U)*(Cos[\[Phi]4] - I*Sin[\[Phi]4]))/Sqrt[2])*
+                 (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                  I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                         Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+                  Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2]))/
+             Sqrt[2] + ((MH^2 - U)*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*((Sqrt[S]*Sech[\[Eta]4]*
+                 (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                    kT4*Sin[\[Phi]4])))/4 + (kT3*kT4*Sech[\[Eta]4]*
+                 (Cos[\[Phi]4] + I*Sin[\[Phi]4])*(Sinh[\[Eta]3] - 
+                  Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/2))/Sqrt[2] - 
+            Sqrt[2]*kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+             (-(kT3*Sqrt[S]*Sech[\[Eta]4]*(kT3*Cos[\[Phi]3] + 
+                  kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                 (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]3]))/4 - (kT3*Sqrt[S]*Sech[\[Eta]4]*
+                (Cos[\[Phi]3] + I*Sin[\[Phi]3])*(-(Sqrt[S]*Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/
+                  2 + kT4*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                       (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                          kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                          kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                          4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                        (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                         4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                    Cos[\[Phi]4] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                        (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                       (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                          kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                          kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                          4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                        (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                         4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                    Sin[\[Phi]4] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                         4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])))/4 + 
+              (kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*(-((kT3^2*Sech[\[Eta]4]*
+                    (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                       (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                       1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                          (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]]*Sinh[\[Eta]3])*(Sinh[\[Eta]3] - 
+                     Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]) + 
+                 (kT3*Sech[\[Eta]4]*(-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + 
+                          kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                          kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                          4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 + 
+                    kT4*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                          (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[
+                          kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                         Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                       Cos[\[Phi]4] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                          (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                         Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                       Sin[\[Phi]4] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                          \[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4]))*
+                   (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                  Sqrt[2]))/Sqrt[2]))) - 
+        4*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - U) - 
+          DiscB[U, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - U))*
+         (-(Sech[\[Eta]4]*(((S - S34 + T - T24)*(MH^2 - U)*
+                ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                    (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] - 
+              Sqrt[2]*kT4*Sqrt[S]*(MH^2 - U)*Conjugate[
+                1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                     Cos[\[Phi]3 - \[Phi]4])]]*(Cos[\[Phi]4] - 
+                I*Sin[\[Phi]4]) + (kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+                (-(Sqrt[S]*(7*MH^2 - 8*S34 - 2*T14 - 3*U)*Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/
+                  2 - 4*kT3*(-2*MH^2 + 2*S34 + T14 + 2*T24 + U)*
+                  (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                         Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                         2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                         4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                     (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                    Sinh[\[Eta]3]) - kT4*(7*MH^2 - 8*T - 2*T14 - 3*U)*
+                  (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                         Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                         2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                         4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                     (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                    Sinh[\[Eta]4])))/Sqrt[2])*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+              Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+          2*(-(Sqrt[S]*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                    (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                 (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(
+                (kT3*(-5*MH^2 + 4*S34 + 4*T + 2*T14 + U)*(Cos[\[Phi]3] - 
+                   I*Sin[\[Phi]3]))/Sqrt[2] + Sqrt[2]*(MH^2 - U)*
+                 (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                  I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))))/4 - 
+            (Sqrt[S]*(MH^2 - U)*Sech[\[Eta]4]*(-(Sqrt[S]*Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 + kT4*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]4])))/Sqrt[2] + (kT4*(Cos[\[Phi]4] + I*
+                Sin[\[Phi]4])*(-((MH^2 - U)*Sech[\[Eta]4]*
+                 (-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]])/2 + kT4*(Conjugate[
+                      (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]4]))*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+                  Sinh[\[Eta]4 + I*\[Phi]4])) + (Sech[\[Eta]4]*
+                 ((kT3*(-5*MH^2 + 4*S34 + 4*T + 2*T14 + U)*(Cos[\[Phi]3] - 
+                     I*Sin[\[Phi]3]))/Sqrt[2] + Sqrt[2]*(MH^2 - U)*
+                   (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                    I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))*
+                 (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                  I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                         Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+                  Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2]))/
+             Sqrt[2] - Sqrt[2]*(MH^2 - U)*((-I)*Conjugate[
+                (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+               (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                 kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*((Sqrt[S]*Sech[\[Eta]4]*
+                (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])))/4 + (kT3*kT4*Sech[\[Eta]4]*
+                (Cos[\[Phi]4] + I*Sin[\[Phi]4])*(Sinh[\[Eta]3] - 
+                 Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/2) + 
+            4*Sqrt[2]*kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+             (-(kT3*Sqrt[S]*Sech[\[Eta]4]*(kT3*Cos[\[Phi]3] + 
+                  kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                 (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]3]))/4 - (kT3*Sqrt[S]*Sech[\[Eta]4]*
+                (Cos[\[Phi]3] + I*Sin[\[Phi]3])*(-(Sqrt[S]*Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/
+                  2 + kT4*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                       (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                          kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                          kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                          4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                        (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                         4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                    Cos[\[Phi]4] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                        (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                       (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                          kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                          kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                          4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                        (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                         4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                    Sin[\[Phi]4] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                         4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])))/4 + 
+              (kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*(-((kT3^2*Sech[\[Eta]4]*
+                    (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                       (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                       1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                          (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]]*Sinh[\[Eta]3])*(Sinh[\[Eta]3] - 
+                     Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]) + 
+                 (kT3*Sech[\[Eta]4]*(-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + 
+                          kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                          kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                          4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 + 
+                    kT4*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                          (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[
+                          kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                         Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                       Cos[\[Phi]4] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                          (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                         Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                       Sin[\[Phi]4] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                          \[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4]))*
+                   (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                  Sqrt[2]))/Sqrt[2]))))/T14)/U))/(MW*SW) - 
+ (2*Alfas^2*c1*EL*MT^2*
+   (((4*(2 + Eps^(-1) + DiscB[T, Sqrt[MT^2], Sqrt[MT^2]] + Log[Mu^2/MT^2]) - 
+        16*(3/4 + (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/(4*(MH^2 - T)) - 
+          (T*DiscB[T, Sqrt[MT^2], Sqrt[MT^2]])/(4*(MH^2 - T)) + 
+          (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*
+                MT^2)]^2)/(4*(MH^2 - T)) + (Eps^(-1) + Log[Mu^2/MT^2])/4 - 
+          (MT^2*Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/(2*MT^2)]^2)/
+           (4*(MH^2 - T))))*
+       (((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]] + Conjugate[
+            (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+              kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+              (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+          (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+         (2*Sqrt[2]) + 
+        (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]] + Conjugate[
+            (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+              kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+              (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+          (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2] - 
+        (Sech[\[Eta]4]*(-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                  Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                 kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                  Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+           I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+           Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2]) - 
+      2*(Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+         (2*(MH^2 - T)) - Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/
+            (2*MT^2)]^2/(2*(MH^2 - T)))*
+       ((Sech[\[Eta]4]*(((-MH^2 + T)*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                     kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+               (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                 kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] - 
+           (kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                   Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                  kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                   Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                 (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+             (Cos[\[Phi]3] + I*Sin[\[Phi]3]))/Sqrt[2])*
+          (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+        ((MH^2 - T)*Sech[\[Eta]4]*
+          (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+           I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+           Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2] - 
+        Sqrt[2]*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+               Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+          Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+              Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[
+                kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*
+                kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+         (-(kT3*Sqrt[S]*Sech[\[Eta]4]*(Cos[\[Phi]3] + I*Sin[\[Phi]3]))/2 - 
+          ((-MH^2 + T)*Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+             Sinh[\[Eta]4 + I*\[Phi]4]))/2)) - 8*Sqrt[2]*kT3*
+       (Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+       ((-1/(2*(MH^2 - T)) - (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/
+           (2*(MH^2 - T)^2) + (MH^2*DiscB[T, Sqrt[MT^2], Sqrt[MT^2]])/
+           (2*(MH^2 - T)^2) - (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[
+                 -(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2)/(2*(MH^2 - T)^2) + 
+          (MT^2*Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/(2*MT^2)]^2)/
+           (2*(MH^2 - T)^2))*
+         ((Sqrt[S]*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                  Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                      \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+             Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*Sech[\[Eta]4])/2 - 
+          (Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+            (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/4) + 
+        (-DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - T)) + 
+          DiscB[T, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - T)))*
+         (-(kT3*Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+              Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+              Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                    2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])*
+             (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+          (kT3*Sech[\[Eta]4]*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+            (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+             I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                I*\[Phi]4]))/2 - 
+          kT3*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]] + Conjugate[
+             (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+               kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+               (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                   2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + 
+            Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))) - 
+      4*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - T) - 
+        DiscB[T, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - T))*
+       ((Sech[\[Eta]4]*(((-MH^2 + T)*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                     kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+               (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                 kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] + 
+           Sqrt[2]*kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+            (-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 - 
+             kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                      Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Cos[\[Phi]3] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+               Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])))*
+          (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+        (Sech[\[Eta]4]*(MH^2 - T + kT3^2*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+            (Cos[\[Phi]3] + I*Sin[\[Phi]3]))*
+          (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+           I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+           Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2] - 
+        Sqrt[2]*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+               Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+          Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+              Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[
+                kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*
+                kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+         (-((-MH^2 + T)*Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+              Sinh[\[Eta]4 + I*\[Phi]4]))/2 + Sqrt[2]*kT3*
+           (Cos[\[Phi]3] + I*Sin[\[Phi]3])*(-(Sqrt[S]*Sech[\[Eta]4])/
+             (2*Sqrt[2]) + (kT3*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[
+                \[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))))/T + 
+    ((4*(2 + Eps^(-1) + DiscB[S34, Sqrt[MT^2], Sqrt[MT^2]] + 
+          Log[Mu^2/MT^2]) - 16*(3/4 + (MH^2*DiscB[MH^2, Sqrt[MT^2], 
+             Sqrt[MT^2]])/(4*(MH^2 - S34)) - 
+          (S34*DiscB[S34, Sqrt[MT^2], Sqrt[MT^2]])/(4*(MH^2 - S34)) + 
+          (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*
+                MT^2)]^2)/(4*(MH^2 - S34)) + (Eps^(-1) + Log[Mu^2/MT^2])/4 - 
+          (MT^2*Log[(2*MT^2 - S34 + Sqrt[-((4*MT^2 - S34)*S34)])/(2*MT^2)]^2)/
+           (4*(MH^2 - S34))))*
+       (((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]] + Conjugate[
+            (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+              kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+              (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+          (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+         (2*Sqrt[2]) + 
+        (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]] + Conjugate[
+            (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+              kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+              (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+          (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2] - 
+        (Sech[\[Eta]4]*(-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                  Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                 kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                  Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+           I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+           Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2]) + 
+      (kT3*Sech[\[Eta]4]*(-16*(-DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/
+            (2*(MH^2 - S34)) + DiscB[S34, Sqrt[MT^2], Sqrt[MT^2]]/
+            (2*(MH^2 - S34)))*
+          ((kT3*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+              Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*(Cos[\[Phi]3] - 
+              I*Sin[\[Phi]3]))/2 - 
+           kT3*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*(Cos[\[Phi]3] + I*Sin[\[Phi]3]) + 
+           kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+             Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+             Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])) + 
+         16*(-1/(2*(MH^2 - S34)) - (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/
+            (2*(MH^2 - S34)^2) + (MH^2*DiscB[S34, Sqrt[MT^2], Sqrt[MT^2]])/
+            (2*(MH^2 - S34)^2) - (MT^2*Log[(-MH^2 + 2*MT^2 + 
+                 Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2)/
+            (2*(MH^2 - S34)^2) + (MT^2*Log[(2*MT^2 - S34 + Sqrt[
+                  -((4*MT^2 - S34)*S34)])/(2*MT^2)]^2)/(2*(MH^2 - S34)^2))*
+          ((kT4*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+              Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*(Cos[\[Phi]4] - 
+              I*Sin[\[Phi]4]))/2 - 
+           kT4*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*(Cos[\[Phi]4] + I*Sin[\[Phi]4]) + 
+           kT4*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+             Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+             Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])))*
+        (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2] + 
+      4*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - S34) - 
+        DiscB[S34, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - S34))*
+       (((-MH^2 + S34)*Sech[\[Eta]4]*
+          (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+           I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+           Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2] + 
+        Sqrt[2]*kT3*Sech[\[Eta]4]*
+         (-(kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+             Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+             Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])) + 
+          kT4*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+            Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4]))*
+         (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]) - 
+        ((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]] + Conjugate[
+            (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+              kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+              (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+          (((-MH^2 + S34)*Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+              Sinh[\[Eta]4 + I*\[Phi]4]))/2 + Sqrt[2]*kT3*Sech[\[Eta]4]*
+            ((kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/Sqrt[2] - 
+             (kT4*(Cos[\[Phi]4] - I*Sin[\[Phi]4]))/Sqrt[2])*
+            (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4])))/
+         Sqrt[2] + Sqrt[2]*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                 kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                   Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                  kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                   Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+               Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                   \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                 Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                 Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+          Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+              Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[
+                kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*
+                kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+         (-((-MH^2 + S34)*Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+              Sinh[\[Eta]4 + I*\[Phi]4]))/2 + Sqrt[2]*kT3*Sech[\[Eta]4]*
+           ((kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3]))/Sqrt[2] - 
+            (kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4]))/Sqrt[2])*
+           (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))) + 
+      2*(Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+         (2*(MH^2 - S34)) - Log[(2*MT^2 - S34 + Sqrt[-((4*MT^2 - S34)*S34)])/
+            (2*MT^2)]^2/(2*(MH^2 - S34)))*
+       (-(((MH^2 - S34)*Sech[\[Eta]4]*
+           (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+            I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2]) + 
+        Sqrt[2]*kT3*kT4*Sech[\[Eta]4]*
+         (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+               Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+          Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+               Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+          Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                 Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                 Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])*
+         (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]) + 
+        ((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]] + Conjugate[
+            (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+              kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+              (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+          (((MH^2 - S34)*Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+              Sinh[\[Eta]4 + I*\[Phi]4]))/2 + kT3*kT4*Sech[\[Eta]4]*
+            (Cos[\[Phi]4] - I*Sin[\[Phi]4])*(-Sinh[\[Eta]3] + 
+             Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4])))/Sqrt[2] - 
+        Sqrt[2]*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+               Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+          Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+              Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[
+                kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*
+                kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+         (-((MH^2 - S34)*Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+              Sinh[\[Eta]4 + I*\[Phi]4]))/2 + kT3*kT4*Sech[\[Eta]4]*
+           (Cos[\[Phi]4] + I*Sin[\[Phi]4])*(-Sinh[\[Eta]3] + 
+            Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))) + 
+      ((4*(2 + Eps^(-1) + DiscB[S34, Sqrt[MT^2], Sqrt[MT^2]] + 
+            Log[Mu^2/MT^2]) - 16*(3/4 + (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[
+                MT^2]])/(4*(MH^2 - S34)) - (S34*DiscB[S34, Sqrt[MT^2], Sqrt[
+                MT^2]])/(4*(MH^2 - S34)) + 
+            (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/
+                 (2*MT^2)]^2)/(4*(MH^2 - S34)) + (Eps^(-1) + Log[Mu^2/MT^2])/
+             4 - (MT^2*Log[(2*MT^2 - S34 + Sqrt[-((4*MT^2 - S34)*S34)])/
+                 (2*MT^2)]^2)/(4*(MH^2 - S34))))*
+         (-(((-T - T14 + T24 + U)*Sech[\[Eta]4]*
+             (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                    2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - I*Conjugate[
+                (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                 I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                 I*\[Phi]4]))/Sqrt[2]) - (kT3*Sqrt[S]*Conjugate[
+             1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                    \[Phi]4])]]*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + 
+             Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]) - 
+        4*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - S34) - 
+          DiscB[S34, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - S34))*
+         (-((S*(MH^2 - S34)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                   Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                  kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                   Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                 (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+             Sech[\[Eta]4])/Sqrt[2]) - (S*(-MH^2 + S34)*
+            Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4])/Sqrt[2] - 
+          ((MH^2 - S34)*(T + T14 - T24 - U)*Sech[\[Eta]4]*
+            (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+             I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                I*\[Phi]4]))/Sqrt[2] - (kT3*Sech[\[Eta]4]*
+            ((Sqrt[S]*(-7*MH^2 + 2*S + 3*S34 + 8*T)*Conjugate[
+                1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                     Cos[\[Phi]3 - \[Phi]4])]])/2 - (Sqrt[S]*(7*MH^2 - 2*S - 
+                3*S34 - 8*U)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                   (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 - 
+             4*kT3*(-2*MH^2 + S + S34 + 2*T24 + 2*U)*
+              (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                      Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Cos[\[Phi]3] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+               Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3]))*
+            (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+           Sqrt[2]) + 8*((kT3*(-DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/
+              (2*(MH^2 - S34)) + DiscB[S34, Sqrt[MT^2], Sqrt[MT^2]]/
+              (2*(MH^2 - S34)))*Sech[\[Eta]4]*(-(Sqrt[S]*(3*MH^2 - S34 - 4*T)*
+                Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 + 
+             (Sqrt[S]*(-3*MH^2 + S34 + 4*U)*Conjugate[
+                1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                     Cos[\[Phi]3 - \[Phi]4])]])/2 + 2*kT3*(T + T14 - T24 - U)*
+              (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                      Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Cos[\[Phi]3] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+               Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3]))*
+            (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+           Sqrt[2] + (kT3*(-1/(2*(MH^2 - S34)) - (MH^2*DiscB[MH^2, 
+                Sqrt[MT^2], Sqrt[MT^2]])/(2*(MH^2 - S34)^2) + 
+             (MH^2*DiscB[S34, Sqrt[MT^2], Sqrt[MT^2]])/(2*(MH^2 - S34)^2) - 
+             (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/
+                  (2*MT^2)]^2)/(2*(MH^2 - S34)^2) + 
+             (MT^2*Log[(2*MT^2 - S34 + Sqrt[-((4*MT^2 - S34)*S34)])/(2*MT^2)]^
+                2)/(2*(MH^2 - S34)^2))*Sech[\[Eta]4]*
+            ((Sqrt[S]*(MH^2 - S34 - 2*(T14 + T24))*Conjugate[
+                1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                     Cos[\[Phi]3 - \[Phi]4])]])/2 - (Sqrt[S]*(-MH^2 + S34 + 
+                2*(T14 + T24))*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                   (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 - 
+             2*kT3*(-T14 + T24)*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+               Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Sin[\[Phi]3] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                Sinh[\[Eta]3]) - 2*kT4*(T - U)*(Conjugate[
+                 (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+               Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Sin[\[Phi]4] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                Sinh[\[Eta]4]))*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+               I*\[Phi]4]))/Sqrt[2]) - 
+        2*(Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+           (2*(MH^2 - S34)) - Log[(2*MT^2 - S34 + Sqrt[-((4*MT^2 - S34)*
+                  S34)])/(2*MT^2)]^2/(2*(MH^2 - S34)))*
+         (-(((MH^2 - S34)*(T + T14 - T24 - U)*Sech[\[Eta]4]*
+             (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                    2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - I*Conjugate[
+                (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                 I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                 I*\[Phi]4]))/Sqrt[2]) - 
+          2*(-(S*(-MH^2 + S34)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                   (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[
+                \[Eta]4])/(2*Sqrt[2]) + (Sqrt[S]*(MH^2 - S34)*Sech[\[Eta]4]*
+              (-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                      (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/
+                2 + kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                     (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                         kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                         kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                         4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                    Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                      (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+                 Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3]) + kT4*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                      (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                     (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                         kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                         kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                         4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                    Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                      (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+                 Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]4])))/Sqrt[2] + (kT3*Sech[\[Eta]4]*
+              (-(Sqrt[S]*(T14 + T24)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                      4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                        2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                       Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                       Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                        \[Phi]3 - \[Phi]4])]]) + 2*kT3*T14*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3]) - kT4*(T - T14 - T24 - U)*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]4]))*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                 I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2])))/S + 
+      (-8*((kT3*(-1/(2*(MH^2 - S34)) - (MH^2*DiscB[MH^2, Sqrt[MT^2], 
+                Sqrt[MT^2]])/(2*(MH^2 - S34)^2) + (MH^2*DiscB[S34, 
+                Sqrt[MT^2], Sqrt[MT^2]])/(2*(MH^2 - S34)^2) - 
+             (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/
+                  (2*MT^2)]^2)/(2*(MH^2 - S34)^2) + 
+             (MT^2*Log[(2*MT^2 - S34 + Sqrt[-((4*MT^2 - S34)*S34)])/(2*MT^2)]^
+                2)/(2*(MH^2 - S34)^2))*Sech[\[Eta]4]*
+            (Sqrt[S]*(-MH^2 + S34 + 2*T24)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                      \[Phi]4])]] - ((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                       kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                    (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                 (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*((kT3*(-MH^2 + S34 + 
+                   4*T14)*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/Sqrt[2] + 
+                (kT4*(MH^2 + 2*S - S34 - 2*T + 2*T14)*(Cos[\[Phi]4] - 
+                   I*Sin[\[Phi]4]))/Sqrt[2]))/Sqrt[2] - (-MH^2 + S34 + 2*T24)*
+              ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                       \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*(kT3*Cos[\[Phi]3] + kT4*
+                Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])) + 
+             8*(-(kT3*kT4*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                      (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  (Cos[\[Phi]3] + I*Sin[\[Phi]3])*(Cos[\[Phi]4] - 
+                   I*Sin[\[Phi]4]))/4 + (kT3*kT4*Sqrt[S]*Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*(Cos[\[Phi]3] - 
+                  I*Sin[\[Phi]3])*(Cos[\[Phi]4] + I*Sin[\[Phi]4]))/4 - 
+               ((kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                    kT4*Sin[\[Phi]4]))*(-((kT3*kT4*(Cos[\[Phi]4] - 
+                      I*Sin[\[Phi]4])*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                          (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                          Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                         Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                       Cos[\[Phi]3] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                          (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                         Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                       Sin[\[Phi]3] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                          \[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3]))/Sqrt[2]) + 
+                  (kT3*kT4*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+                    (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                       (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                       1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                          (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]]*Sinh[\[Eta]4]))/Sqrt[2]))/Sqrt[2]))*
+            (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+           Sqrt[2] + (kT3*(-DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/
+              (2*(MH^2 - S34)) + DiscB[S34, Sqrt[MT^2], Sqrt[MT^2]]/
+              (2*(MH^2 - S34)))*Sech[\[Eta]4]*(Sqrt[S]*(MH^2 - S34 - 2*U)*
+              Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] + 
+             ((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                       Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*(
+                -((kT3*(MH^2 - 2*S + S34 - 2*T + 2*T14)*(Cos[\[Phi]3] - 
+                    I*Sin[\[Phi]3]))/Sqrt[2]) + (kT4*(-3*MH^2 + S34 + 4*T)*
+                  (Cos[\[Phi]4] - I*Sin[\[Phi]4]))/Sqrt[2]))/Sqrt[2] - 
+             (MH^2 - S34 - 2*U)*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*(kT3*Cos[\[Phi]3] + kT4*
+                Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])) + 
+             8*(-(kT3*kT4*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                      (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  (Cos[\[Phi]3] + I*Sin[\[Phi]3])*(Cos[\[Phi]4] - 
+                   I*Sin[\[Phi]4]))/4 + (kT3*kT4*Sqrt[S]*Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*(Cos[\[Phi]3] - 
+                  I*Sin[\[Phi]3])*(Cos[\[Phi]4] + I*Sin[\[Phi]4]))/4 - 
+               ((kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                    kT4*Sin[\[Phi]4]))*(-((kT3*kT4*(Cos[\[Phi]4] - 
+                      I*Sin[\[Phi]4])*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                          (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                          Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                         Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                       Cos[\[Phi]3] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                          (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                         Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                       Sin[\[Phi]3] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                          \[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3]))/Sqrt[2]) + 
+                  (kT3*kT4*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+                    (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                       (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                       1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                          (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]]*Sinh[\[Eta]4]))/Sqrt[2]))/Sqrt[2]))*
+            (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+           Sqrt[2]) + (4*(2 + Eps^(-1) + DiscB[S34, Sqrt[MT^2], Sqrt[MT^2]] + 
+            Log[Mu^2/MT^2]) - 16*(3/4 + (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[
+                MT^2]])/(4*(MH^2 - S34)) - (S34*DiscB[S34, Sqrt[MT^2], Sqrt[
+                MT^2]])/(4*(MH^2 - S34)) + 
+            (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/
+                 (2*MT^2)]^2)/(4*(MH^2 - S34)) + (Eps^(-1) + Log[Mu^2/MT^2])/
+             4 - (MT^2*Log[(2*MT^2 - S34 + Sqrt[-((4*MT^2 - S34)*S34)])/
+                 (2*MT^2)]^2)/(4*(MH^2 - S34))))*
+         ((Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+            (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*
+                Sin[\[Phi]4]))*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+             Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2] - 
+          (Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+            (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+             I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+            (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/
+           Sqrt[2] + Sqrt[2]*Sech[\[Eta]4]*(-(kT3*Cos[\[Phi]3]) - 
+            kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+           (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+              kT4*Sin[\[Phi]4]))*(-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                     \[Phi]4])]] - I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                  kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                   kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                 Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                     \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+             Cosh[\[Eta]4 + I*\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]) + 
+          Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                 Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                 Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+           ((Sqrt[S]*Sech[\[Eta]4])/Sqrt[2] - (kT3*Sech[\[Eta]4]*
+              (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+             Sqrt[2]) - ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                  kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                   kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                 Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                     \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + 
+            I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+           ((Sqrt[S]*Sech[\[Eta]4])/Sqrt[2] - (kT3*Sech[\[Eta]4]*
+              (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+             Sqrt[2]) + ((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                    kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                 (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*(((-MH^2 + 2*S + T24 + U)*Sech[\[Eta]4]*(
+                Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/2 - 
+             ((-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                  kT4*Sin[\[Phi]4]))*(Sqrt[2]*Sqrt[S]*Sech[\[Eta]4] + 
+                (kT3*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                     I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/Sqrt[2]))/Sqrt[2]) - 
+        2*(Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+           (2*(MH^2 - S34)) - Log[(2*MT^2 - S34 + Sqrt[-((4*MT^2 - S34)*
+                  S34)])/(2*MT^2)]^2/(2*(MH^2 - S34)))*
+         (((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*(((MH^2 - S34)*(MH^2 - 2*S - T24 - U)*
+               Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + 
+                  I*\[Phi]4]))/2 - 2*((kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+                 ((Sqrt[S]*(MH^2 - S34)*Sech[\[Eta]4])/Sqrt[2] + Sqrt[2]*kT3*
+                   T14*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                      I*\[Phi]3 + I*\[Phi]4])))/Sqrt[2] + (kT4*
+                 (Cos[\[Phi]4] - I*Sin[\[Phi]4])*((Sqrt[S]*(MH^2 - S34)*
+                    Sech[\[Eta]4])/Sqrt[2] + (kT3*(MH^2 + S - S34 - T + T14)*
+                    Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                       I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/Sqrt[2])))/
+           Sqrt[2] + 4*(-(Sqrt[S]*(MH^2 - S34)*Conjugate[
+                1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                     Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*(
+                kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                  kT4*Sin[\[Phi]4]))*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+                Sinh[\[Eta]4 + I*\[Phi]4]))/(4*Sqrt[2]) + 
+            (Sqrt[S]*(MH^2 - S34)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                      \[Phi]4])]]*Sech[\[Eta]4]*(-(kT3*Cos[\[Phi]3]) - kT4*
+                Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+              (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/
+             (4*Sqrt[2]) + Sqrt[2]*kT3*Sech[\[Eta]4]*
+             (-(kT3*kT4*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                 (Cos[\[Phi]3] + I*Sin[\[Phi]3])*(Cos[\[Phi]4] - 
+                  I*Sin[\[Phi]4]))/4 + (kT3*kT4*Sqrt[S]*Conjugate[
+                 1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                       \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                       2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*(Cos[\[Phi]3] - 
+                 I*Sin[\[Phi]3])*(Cos[\[Phi]4] + I*Sin[\[Phi]4]))/4 - 
+              ((kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4]))*(-((kT3*kT4*(Cos[\[Phi]4] - 
+                     I*Sin[\[Phi]4])*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                          (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                          Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                          Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                          \[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                       (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                       1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                          (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]]*Sinh[\[Eta]3]))/Sqrt[2]) + 
+                 (kT3*kT4*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+                   (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]4]))/Sqrt[2]))/Sqrt[2])*(-Sinh[\[Eta]3] + 
+              Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]) + 
+            (Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+              ((Sqrt[S]*(-MH^2 + S34)*Sech[\[Eta]4])/(2*Sqrt[2]) + 
+               (kT3*T24*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                    I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/2 - 
+            ((kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4]))*(((MH^2 - S34)*Sech[\[Eta]4]*
+                 (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                  I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                 (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                  I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                         Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+                  Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+               (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                         Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                      (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                     (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                         kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                         kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                         4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                    Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                      (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+                 ((Sqrt[S]*(-MH^2 + S34)*Sech[\[Eta]4])/(2*Sqrt[2]) + 
+                  (kT3*T24*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                       I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/Sqrt[2]))/
+             Sqrt[2])) - 4*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/
+           (MH^2 - S34) - DiscB[S34, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - S34))*
+         (-(((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+              Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+             (-((MH^2 - S34)*(MH^2 - 2*S - T24 - U)*Sech[\[Eta]4]*
+                 (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+              (kT4*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*(Sqrt[2]*Sqrt[S]*
+                  (MH^2 - S34)*Sech[\[Eta]4] + (kT3*(5*MH^2 + 2*S - 3*S34 - 
+                    6*T + 2*T14)*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + 
+                    Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/Sqrt[
+                2] + (kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*(Sqrt[2]*Sqrt[S]*
+                  (MH^2 - S34)*Sech[\[Eta]4] + (kT3*(MH^2 - 2*S + S34 - 2*T + 
+                    6*T14)*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                      I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/Sqrt[2]))/Sqrt[2]) + 
+          2*(-(Sqrt[S]*(MH^2 - S34)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])]]*Sech[\[Eta]4]*(kT3*Cos[\[Phi]3] + 
+                kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*(
+                Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+             (2*Sqrt[2]) + (Sqrt[S]*(MH^2 - S34)*Conjugate[1/
+                Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                    Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+              (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4]))*(Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[
+                \[Eta]4 + I*\[Phi]4]))/(2*Sqrt[2]) + 4*Sqrt[2]*kT3*
+             Sech[\[Eta]4]*(-(kT3*kT4*Sqrt[S]*Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*(Cos[\[Phi]3] + 
+                  I*Sin[\[Phi]3])*(Cos[\[Phi]4] - I*Sin[\[Phi]4]))/4 + 
+              (kT3*kT4*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                (Cos[\[Phi]3] - I*Sin[\[Phi]3])*(Cos[\[Phi]4] + 
+                 I*Sin[\[Phi]4]))/4 - ((kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + 
+                 I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                (-((kT3*kT4*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+                    (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                       (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                       1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                          (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]]*Sinh[\[Eta]3]))/Sqrt[2]) + 
+                 (kT3*kT4*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+                   (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]4]))/Sqrt[2]))/Sqrt[2])*(-Sinh[\[Eta]3] + 
+              Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]) + 
+            (Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+              (-((Sqrt[S]*(MH^2 - S34)*Sech[\[Eta]4])/Sqrt[2]) + 
+               (kT3*(MH^2 - S34 + 2*T24 - 2*U)*Sech[\[Eta]4]*
+                 (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                Sqrt[2]))/2 - ((kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*
+                (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*((MH^2 - S34)*
+                Sech[\[Eta]4]*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                 I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                        Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                        Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                         \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                      (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                 I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+                 Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]) + 
+               (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                         Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                      (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                     (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                         kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                         kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                         4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                    Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                      (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+                 (-((Sqrt[S]*(MH^2 - S34)*Sech[\[Eta]4])/Sqrt[2]) + 
+                  (kT3*(MH^2 - S34 + 2*T24 - 2*U)*Sech[\[Eta]4]*
+                    (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                   Sqrt[2]))/Sqrt[2]))/Sqrt[2])))/(MH^2 - S - T - T14))/S34 + 
+    ((4*(2 + Eps^(-1) + DiscB[2*MH^2 - S34 - T - U, Sqrt[MT^2], Sqrt[MT^2]] + 
+          Log[Mu^2/MT^2]) - 16*(3/4 - (MH^2*DiscB[MH^2, Sqrt[MT^2], 
+             Sqrt[MT^2]])/(4*(MH^2 - S34 - T - U)) + 
+          ((2*MH^2 - S34 - T - U)*DiscB[2*MH^2 - S34 - T - U, Sqrt[MT^2], 
+             Sqrt[MT^2]])/(4*(MH^2 - S34 - T - U)) - 
+          (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*
+                MT^2)]^2)/(4*(MH^2 - S34 - T - U)) + 
+          (Eps^(-1) + Log[Mu^2/MT^2])/4 + 
+          (MT^2*Log[(-2*MH^2 + 2*MT^2 + S34 + T + U + Sqrt[
+                 -((2*MH^2 - S34 - T - U)*(-2*MH^2 + 4*MT^2 + S34 + T + U))])/
+               (2*MT^2)]^2)/(4*(MH^2 - S34 - T - U))))*
+       (((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]] + Conjugate[
+            (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+              kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+              (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+          (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+         (2*Sqrt[2]) + 
+        (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]] + Conjugate[
+            (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+              kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+              (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+          (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2] - 
+        (Sech[\[Eta]4]*(-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                  Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                 kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                  Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+           I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+           Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2]) + 
+      2*(-Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+         (2*(MH^2 - S34 - T - U)) + 
+        Log[(-2*MH^2 + 2*MT^2 + S34 + T + U + Sqrt[-((2*MH^2 - S34 - T - U)*
+                (-2*MH^2 + 4*MT^2 + S34 + T + U))])/(2*MT^2)]^2/
+         (2*(MH^2 - S34 - T - U)))*
+       ((Sech[\[Eta]4]*(((-MH^2 + S34 + T + U)*(I*Conjugate[
+                (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+               (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                 kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] + 
+           Sqrt[2]*kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + 
+             I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+            (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+             Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+             Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3]))*
+          (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+        Sech[\[Eta]4]*(((-MH^2 + S34 + T + U)*
+            ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]))/Sqrt[2] - Sqrt[2]*kT3*
+           (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+            I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+           (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+            Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+            Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3]))*
+         (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]) - 
+        ((-MH^2 + S34 + T + U)*Sech[\[Eta]4]*
+          (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+           I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+           Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2] + 
+        Sqrt[2]*kT3^2*Sech[\[Eta]4]*
+         (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+               Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+          Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+               Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+          Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                 Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                 Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])*
+         (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4])) - 
+      kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+              Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+             Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+              Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                 Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                 Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+              2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+              4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+              kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+              4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+        Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+              Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+             Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+              Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                 Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                 Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+              2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+              4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+              kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+              4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+        Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+              4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+               Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                 \[Phi]4])]]*Sinh[\[Eta]3])*
+       (16*(1/(2*(MH^2 - S34 - T - U)) - (MH^2*DiscB[MH^2, Sqrt[MT^2], 
+             Sqrt[MT^2]])/(2*(MH^2 - S34 - T - U)^2) + 
+          (MH^2*DiscB[2*MH^2 - S34 - T - U, Sqrt[MT^2], Sqrt[MT^2]])/
+           (2*(MH^2 - S34 - T - U)^2) - 
+          (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*
+                MT^2)]^2)/(2*(MH^2 - S34 - T - U)^2) + 
+          (MT^2*Log[(-2*MH^2 + 2*MT^2 + S34 + T + U + Sqrt[
+                 -((2*MH^2 - S34 - T - U)*(-2*MH^2 + 4*MT^2 + S34 + T + U))])/
+               (2*MT^2)]^2)/(2*(MH^2 - S34 - T - U)^2))*
+         (-(Sech[\[Eta]4]*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + 
+              I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+             (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+           (2*Sqrt[2]) + (Sech[\[Eta]4]*(-(kT3*Cos[\[Phi]3]) - 
+             kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+            (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/
+           Sqrt[2] - (kT3*Sech[\[Eta]4]*(Sinh[\[Eta]3] - 
+             Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]) - 
+        16*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - S34 - T - U)) - 
+          DiscB[2*MH^2 - S34 - T - U, Sqrt[MT^2], Sqrt[MT^2]]/
+           (2*(MH^2 - S34 - T - U)))*((kT3*Sech[\[Eta]4]*(Cos[\[Phi]3] + 
+             I*Sin[\[Phi]3])*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+             Sinh[\[Eta]4 + I*\[Phi]4]))/(2*Sqrt[2]) + 
+          (kT3*Sech[\[Eta]4]*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+            (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/
+           Sqrt[2] - (kT3*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + 
+             Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2])) + 
+      4*(-(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - S34 - T - U)) + 
+        DiscB[2*MH^2 - S34 - T - U, Sqrt[MT^2], Sqrt[MT^2]]/
+         (MH^2 - S34 - T - U))*
+       ((Sech[\[Eta]4]*(((-MH^2 + S34 + T + U)*(I*Conjugate[
+                (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+               (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                 kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] + 
+           2*kT3*((kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3]))/Sqrt[2] + 
+             (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4]))/Sqrt[2])*
+            (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+             Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+             Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3]))*
+          (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+        Sech[\[Eta]4]*(((-MH^2 + S34 + T + U)*
+            ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]))/Sqrt[2] + 
+          2*kT3*((kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/Sqrt[2] - 
+            (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                kT4*Sin[\[Phi]4]))/Sqrt[2])*
+           (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+            Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+            Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3]))*
+         (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]) - 
+        ((-MH^2 + S34 + T + U)*Sech[\[Eta]4]*
+          (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+           I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+           Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2] - 
+        2*kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+               Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+          Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+               Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+          Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                 Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                 Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])*
+         (-((kT3*Sech[\[Eta]4]*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+                I*\[Phi]4]))/Sqrt[2]) + (kT3*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + 
+             Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2])) + 
+      ((4*(2 + Eps^(-1) + DiscB[2*MH^2 - S34 - T - U, Sqrt[MT^2], 
+             Sqrt[MT^2]] + Log[Mu^2/MT^2]) - 
+          16*(3/4 - (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/
+             (4*(MH^2 - S34 - T - U)) + ((2*MH^2 - S34 - T - U)*
+              DiscB[2*MH^2 - S34 - T - U, Sqrt[MT^2], Sqrt[MT^2]])/
+             (4*(MH^2 - S34 - T - U)) - (MT^2*Log[(-MH^2 + 2*MT^2 + 
+                  Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2)/
+             (4*(MH^2 - S34 - T - U)) + (Eps^(-1) + Log[Mu^2/MT^2])/4 + 
+            (MT^2*Log[(-2*MH^2 + 2*MT^2 + S34 + T + U + Sqrt[
+                   -((2*MH^2 - S34 - T - U)*(-2*MH^2 + 4*MT^2 + S34 + T + 
+                      U))])/(2*MT^2)]^2)/(4*(MH^2 - S34 - T - U))))*
+         ((Sqrt[S]*Sech[\[Eta]4]*(2*Sqrt[S]*Conjugate[1/Sqrt[
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                    Cos[\[Phi]3 - \[Phi]4])]] - 
+             kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                      Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Cos[\[Phi]3] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+               Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])))/
+           (2*Sqrt[2]) - (Sqrt[S]*Sech[\[Eta]4]*
+            (2*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                    Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                   kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                    Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                  (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] + 
+             kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                      Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Cos[\[Phi]3] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+               Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])))/
+           (2*Sqrt[2]) - ((-T14 + T24)*Sech[\[Eta]4]*
+            (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+             I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                I*\[Phi]4]))/Sqrt[2]) - 
+        4*(-(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - S34 - T - U)) + 
+          DiscB[2*MH^2 - S34 - T - U, Sqrt[MT^2], Sqrt[MT^2]]/
+           (MH^2 - S34 - T - U))*((Sqrt[S]*Sech[\[Eta]4]*
+            (-2*Sqrt[S]*(MH^2 - S - T14 - T24)*Conjugate[1/
+                Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                    Cos[\[Phi]3 - \[Phi]4])]] - kT3*(-7*MH^2 + 5*S + 8*T + 3*
+                T14 + 3*T24)*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+               Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Sin[\[Phi]3] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                Sinh[\[Eta]3])))/(2*Sqrt[2]) - (Sqrt[S]*Sech[\[Eta]4]*
+            (2*Sqrt[S]*(-MH^2 + S + T14 + T24)*Conjugate[1/
+                Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                    Cos[\[Phi]3 - \[Phi]4])]] - kT3*(7*MH^2 - 5*S - 3*T14 - 3*
+                T24 - 8*U)*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+               Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Sin[\[Phi]3] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                Sinh[\[Eta]3])))/(2*Sqrt[2]) - ((MH^2 - S - T14 - T24)*
+            (T14 - T24)*Sech[\[Eta]4]*(-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                      \[Phi]4])]] - I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                    kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                 (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                I*\[Phi]4]))/Sqrt[2] - 2*Sqrt[2]*kT3^2*(T14 - T24)*
+           Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                   kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + 
+                  kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                 Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                     \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+            Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+            Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])*
+           (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4])) - 
+        8*(-(kT3*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - S34 - T - 
+                U)) - DiscB[2*MH^2 - S34 - T - U, Sqrt[MT^2], Sqrt[MT^2]]/
+              (2*(MH^2 - S34 - T - U)))*
+            (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+             Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+             Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])*
+            (-(Sqrt[S]*(MH^2 + S34 + T - 3*U)*Sech[\[Eta]4])/(2*Sqrt[2]) - 
+             (Sqrt[S]*(MH^2 + S34 - 3*T + U)*Sech[\[Eta]4])/(2*Sqrt[2]) - 
+             Sqrt[2]*kT3*(-T14 + T24)*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[
+                \[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))) - 
+          kT3*(1/(2*(MH^2 - S34 - T - U)) - (MH^2*DiscB[MH^2, Sqrt[MT^2], 
+               Sqrt[MT^2]])/(2*(MH^2 - S34 - T - U)^2) + 
+            (MH^2*DiscB[2*MH^2 - S34 - T - U, Sqrt[MT^2], Sqrt[MT^2]])/
+             (2*(MH^2 - S34 - T - U)^2) - 
+            (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/
+                 (2*MT^2)]^2)/(2*(MH^2 - S34 - T - U)^2) + 
+            (MT^2*Log[(-2*MH^2 + 2*MT^2 + S34 + T + U + Sqrt[
+                   -((2*MH^2 - S34 - T - U)*(-2*MH^2 + 4*MT^2 + S34 + T + 
+                      U))])/(2*MT^2)]^2)/(2*(MH^2 - S34 - T - U)^2))*
+           (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+            Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+            Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])*
+           (-(Sqrt[S]*(3*MH^2 - 3*S - 4*T - T14 - T24)*Sech[\[Eta]4])/
+             (2*Sqrt[2]) + (Sqrt[S]*(-3*MH^2 + 3*S + T14 + T24 + 4*U)*
+              Sech[\[Eta]4])/(2*Sqrt[2]) - Sqrt[2]*kT3*(-T14 + T24)*
+             Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                I*\[Phi]4]))) - 
+        2*(-Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+           (2*(MH^2 - S34 - T - U)) + 
+          Log[(-2*MH^2 + 2*MT^2 + S34 + T + U + Sqrt[-((2*MH^2 - S34 - T - U)*
+                  (-2*MH^2 + 4*MT^2 + S34 + T + U))])/(2*MT^2)]^2/
+           (2*(MH^2 - S34 - T - U)))*(-(((MH^2 - S - T14 - T24)*(T14 - T24)*
+             Sech[\[Eta]4]*(-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                   (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+              I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[
+                \[Eta]4 + I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                 I*\[Phi]4]))/Sqrt[2]) - 
+          2*((Sqrt[S]*Sech[\[Eta]4]*(Sqrt[S]*(MH^2 - S34 - T - U)*
+                Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - kT3*(-2*MH^2 + 
+                 2*S34 + 2*T + T14 + T24)*(Conjugate[
+                   (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3])))/(2*Sqrt[2]) + (Sqrt[S]*Sech[\[Eta]4]*
+              (-(Sqrt[S]*(MH^2 - S34 - T - U)*Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]) - kT3*
+                (-2*MH^2 + 2*S34 + T14 + T24 + 2*U)*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3])))/(2*Sqrt[2]) - (kT3^2*(-T14 + T24)*
+              Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+               Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Sin[\[Phi]3] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                Sinh[\[Eta]3])*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                 I*\[Phi]4]))/Sqrt[2])))/S - 
+      ((4*(2 + Eps^(-1) + DiscB[2*MH^2 - S34 - T - U, Sqrt[MT^2], 
+             Sqrt[MT^2]] + Log[Mu^2/MT^2]) - 
+          16*(3/4 - (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/
+             (4*(MH^2 - S34 - T - U)) + ((2*MH^2 - S34 - T - U)*
+              DiscB[2*MH^2 - S34 - T - U, Sqrt[MT^2], Sqrt[MT^2]])/
+             (4*(MH^2 - S34 - T - U)) - (MT^2*Log[(-MH^2 + 2*MT^2 + 
+                  Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2)/
+             (4*(MH^2 - S34 - T - U)) + (Eps^(-1) + Log[Mu^2/MT^2])/4 + 
+            (MT^2*Log[(-2*MH^2 + 2*MT^2 + S34 + T + U + Sqrt[
+                   -((2*MH^2 - S34 - T - U)*(-2*MH^2 + 4*MT^2 + S34 + T + 
+                      U))])/(2*MT^2)]^2)/(4*(MH^2 - S34 - T - U))))*
+         (((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*(-(kT4*Sqrt[S]*Sech[\[Eta]4]*(
+                Cos[\[Phi]4] - I*Sin[\[Phi]4])) + ((-S + T14)*Sech[\[Eta]4]*(
+                Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/2))/
+           Sqrt[2] + (kT4*Sech[\[Eta]4]*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*
+            (-2*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                    Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                   kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                    Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                  (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+             kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                      Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Cos[\[Phi]3] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+               Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3]))*
+            (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+           (2*Sqrt[2]) - 2*((Sqrt[S]*Sech[\[Eta]4]*(Sqrt[S]*Conjugate[
+                 1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                       \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                       2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - kT4*
+                ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                    (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*(Cos[\[Phi]4] + 
+                 I*Sin[\[Phi]4]) - kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                      (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                     (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                         kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                         kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                         4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                    Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                      (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+                 Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3])))/(2*Sqrt[2]) - (kT4*Sech[\[Eta]4]*
+              (Cos[\[Phi]4] - I*Sin[\[Phi]4])*(-(Sqrt[S]*Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]) + kT3*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3]))*(Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[
+                \[Eta]4 + I*\[Phi]4]))/(2*Sqrt[2]) - 
+            (kT4^2*Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+              (Cos[\[Phi]4] + I*Sin[\[Phi]4])*(-Conjugate[
+                 1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                       \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                       2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - I*Conjugate[
+                 (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                  I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                  I*\[Phi]4]))/Sqrt[2])) - 
+        2*(-Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+           (2*(MH^2 - S34 - T - U)) + 
+          Log[(-2*MH^2 + 2*MT^2 + S34 + T + U + Sqrt[-((2*MH^2 - S34 - T - U)*
+                  (-2*MH^2 + 4*MT^2 + S34 + T + U))])/(2*MT^2)]^2/
+           (2*(MH^2 - S34 - T - U)))*((kT4*Sqrt[S]*(MH^2 - S34 - T - U)*
+            ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(Cos[\[Phi]4] + 
+             I*Sin[\[Phi]4]))/Sqrt[2] - Sqrt[2]*Sqrt[S]*Sech[\[Eta]4]*
+           (-(Sqrt[S]*(-MH^2 + S34 + T + U)*Conjugate[
+                1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                     Cos[\[Phi]3 - \[Phi]4])]])/2 - 
+            kT3*(MH^2 - S34 - T24 - U)*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+              Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+              Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                    2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])) + 
+          ((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*(-(kT4*Sqrt[S]*(MH^2 - S34 - T - U)*Sech[
+                \[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])) - 
+             ((S - T14)*(-MH^2 + S + T14 + T24)*Sech[\[Eta]4]*(
+                Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/2))/
+           Sqrt[2] - Sech[\[Eta]4]*(-((kT3^2*(S - T14)*(Cos[\[Phi]3] + 
+                I*Sin[\[Phi]3])*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                    (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+                Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                       Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3]))/
+              Sqrt[2]) + (kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*
+              (Sqrt[S]*(MH^2 - S34 - T - U)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                     4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                       2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                      Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                      Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                        \[Phi]4])]] - kT3*(S34 + T - T24 - U)*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3])))/Sqrt[2])*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+            Sinh[\[Eta]4 + I*\[Phi]4]) - Sqrt[2]*kT4*Sech[\[Eta]4]*
+           (Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+           (-(Sqrt[S]*(-MH^2 + S34 + T + U)*Conjugate[
+                1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                     Cos[\[Phi]3 - \[Phi]4])]])/2 - 
+            kT3*(MH^2 - S34 - T24 - U)*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+              Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+              Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                    2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3]))*
+           (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]) + 
+          Sqrt[2]*kT4^2*(MH^2 - S34 - T - U)*Sech[\[Eta]4]*
+           (Cos[\[Phi]4] - I*Sin[\[Phi]4])*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*
+           (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+            I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]) - 
+          8*kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+            Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+            Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])*
+           ((kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*((Sqrt[S]*Sech[\[Eta]4]*
+                 (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                  I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))/4 + (kT3*kT4*
+                 Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+                 (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/2))/
+             Sqrt[2] + ((kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*
+                (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*((kT3*Sqrt[S]*
+                 Sech[\[Eta]4]*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/4 + 
+               (kT3*kT4*Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+                 (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                2))/Sqrt[2])) - 
+        8*(-(kT3*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - S34 - T - 
+                U)) - DiscB[2*MH^2 - S34 - T - U, Sqrt[MT^2], Sqrt[MT^2]]/
+              (2*(MH^2 - S34 - T - U)))*
+            (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+             Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+             Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])*
+            (-((Sqrt[S]*(MH^2 - S34 + T - U)*Sech[\[Eta]4])/Sqrt[2]) - 
+             (Sech[\[Eta]4]*(Sqrt[2]*kT3*(S - T14)*(Cos[\[Phi]3] + 
+                  I*Sin[\[Phi]3]) + (kT4*(MH^2 + S34 + T - 3*U)*
+                  (Cos[\[Phi]4] + I*Sin[\[Phi]4]))/Sqrt[2])*(
+                Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/2 - 
+             (kT4*(MH^2 - S34 + T - U)*Sech[\[Eta]4]*(Cos[\[Phi]4] - 
+                I*Sin[\[Phi]4])*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+                Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2] + 
+             8*((kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*((Sqrt[S]*Sech[\[Eta]4]*
+                    (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                     I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))/4 + 
+                  (kT3*kT4*Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+                    (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                   2))/Sqrt[2] + ((kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + 
+                  I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                 ((kT3*Sqrt[S]*Sech[\[Eta]4]*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/
+                   4 + (kT3*kT4*Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+                    (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                   2))/Sqrt[2]))) - kT3*(1/(2*(MH^2 - S34 - T - U)) - 
+            (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/
+             (2*(MH^2 - S34 - T - U)^2) + (MH^2*DiscB[2*MH^2 - S34 - T - 
+                U, Sqrt[MT^2], Sqrt[MT^2]])/(2*(MH^2 - S34 - T - U)^2) - 
+            (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/
+                 (2*MT^2)]^2)/(2*(MH^2 - S34 - T - U)^2) + 
+            (MT^2*Log[(-2*MH^2 + 2*MT^2 + S34 + T + U + Sqrt[
+                   -((2*MH^2 - S34 - T - U)*(-2*MH^2 + 4*MT^2 + S34 + T + 
+                      U))])/(2*MT^2)]^2)/(2*(MH^2 - S34 - T - U)^2))*
+           (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+            Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+            Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])*
+           (-((Sqrt[S]*(MH^2 - S34 + T - 2*T24 - U)*Sech[\[Eta]4])/Sqrt[2]) - 
+            (Sech[\[Eta]4]*(Sqrt[2]*kT3*(S - T14)*(Cos[\[Phi]3] + 
+                 I*Sin[\[Phi]3]) + (kT4*(MH^2 + S34 + T - 2*T24 - 3*U)*
+                 (Cos[\[Phi]4] + I*Sin[\[Phi]4]))/Sqrt[2])*
+              (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/2 - 
+            (kT4*(MH^2 - S34 + T - 2*T24 - U)*Sech[\[Eta]4]*(Cos[\[Phi]4] - I*
+                Sin[\[Phi]4])*(Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + 
+                 I*\[Phi]4]))/Sqrt[2] + 8*((kT3*(Cos[\[Phi]3] + 
+                 I*Sin[\[Phi]3])*((Sqrt[S]*Sech[\[Eta]4]*
+                   (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                    I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))/4 + 
+                 (kT3*kT4*Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+                   (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                  2))/Sqrt[2] + ((kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + 
+                 I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                ((kT3*Sqrt[S]*Sech[\[Eta]4]*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/
+                  4 + (kT3*kT4*Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+                   (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                  2))/Sqrt[2]))) - 4*(-(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/
+            (MH^2 - S34 - T - U)) + DiscB[2*MH^2 - S34 - T - U, Sqrt[MT^2], 
+            Sqrt[MT^2]]/(MH^2 - S34 - T - U))*
+         (((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*(-(kT4*Sqrt[S]*(MH^2 - S34 - T - U)*Sech[
+                \[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])) - 
+             ((S - T14)*(-MH^2 + S + T14 + T24)*Sech[\[Eta]4]*(
+                Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/2))/
+           Sqrt[2] - (Sech[\[Eta]4]*(-2*Sqrt[2]*kT3^2*(S - T14)*
+              (Cos[\[Phi]3] + I*Sin[\[Phi]3])*(Conjugate[
+                 (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+               Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Sin[\[Phi]3] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                Sinh[\[Eta]3]) + (kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*(
+                2*Sqrt[S]*(MH^2 - S34 - T - U)*Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                kT3*(MH^2 + 3*S34 + 3*T - 2*T24 - 5*U)*
+                 (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]3])))/Sqrt[2])*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+             Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+          2*((kT4*Sqrt[S]*(MH^2 - S34 - T - U)*((-I)*Conjugate[
+                 (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+              (Cos[\[Phi]4] + I*Sin[\[Phi]4]))/(2*Sqrt[2]) - 
+            (Sqrt[S]*Sech[\[Eta]4]*(-(Sqrt[S]*(-MH^2 + S34 + T + U)*
+                 Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                       Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                       Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                        \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]) - 
+               kT3*(3*MH^2 - 3*S34 + T - 2*T24 - 3*U)*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3])))/(2*Sqrt[2]) - (kT4*Sech[\[Eta]4]*
+              (Cos[\[Phi]4] - I*Sin[\[Phi]4])*(-(Sqrt[S]*(-MH^2 + S34 + T + 
+                  U)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                       Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                       Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                        \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]) - 
+               kT3*(3*MH^2 - 3*S34 + T - 2*T24 - 3*U)*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3]))*(Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[
+                \[Eta]4 + I*\[Phi]4]))/(2*Sqrt[2]) + 
+            (kT4^2*(MH^2 - S34 - T - U)*Sech[\[Eta]4]*(Cos[\[Phi]4] - I*
+                Sin[\[Phi]4])*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*
+              (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - I*Conjugate[
+                 (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                  I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                  I*\[Phi]4]))/Sqrt[2] - 8*kT3*
+             (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                     Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                     kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+              Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+              Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                    2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])*
+             ((kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*((Sqrt[S]*Sech[\[Eta]4]*
+                   (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                    I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))/4 + 
+                 (kT3*kT4*Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+                   (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                  2))/Sqrt[2] + ((kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + 
+                 I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                ((kT3*Sqrt[S]*Sech[\[Eta]4]*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/
+                  4 + (kT3*kT4*Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+                   (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                  2))/Sqrt[2]))))/T24)/(2*MH^2 - S34 - T - U) + 
+    (4*(2 + Eps^(-1) + DiscB[U, Sqrt[MT^2], Sqrt[MT^2]] + Log[Mu^2/MT^2])*
+       (((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]] + Conjugate[
+            (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+              kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+              (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+          (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+         (2*Sqrt[2]) + 
+        (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]] + Conjugate[
+            (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+              kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+              (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+          (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2] - 
+        (Sech[\[Eta]4]*(-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                  Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                 kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                  Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+           I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+           Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2]) - 
+      2*(Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+         (2*(MH^2 - U)) - Log[(2*MT^2 - U + Sqrt[-((4*MT^2 - U)*U)])/
+            (2*MT^2)]^2/(2*(MH^2 - U)))*
+       (((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]] + Conjugate[
+            (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+              kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+              (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+          ((kT3*Sqrt[S]*Sech[\[Eta]4]*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/2 + 
+           ((-MH^2 + U)*Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+              Sinh[\[Eta]4 + I*\[Phi]4]))/2))/Sqrt[2] + 
+        Sech[\[Eta]4]*(((-MH^2 + U)*((-I)*Conjugate[
+               (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - 
+                 kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                 (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]))/Sqrt[2] + 
+          (kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                  Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                 kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                  Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+            (Cos[\[Phi]3] - I*Sin[\[Phi]3]))/Sqrt[2])*
+         (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]) + 
+        ((MH^2 - U)*Sech[\[Eta]4]*
+          (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+           I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+           Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2]) - 
+      (-4*Sqrt[2]*kT3*(-DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - U)) + 
+          DiscB[U, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - U)))*
+         (Cos[\[Phi]3] - I*Sin[\[Phi]3])*(kT4*(-MH^2 + 2*T + U)*Sech[\[Eta]4]*
+           (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+            Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])*
+           (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]) - 
+          (Sech[\[Eta]4]*((kT3*(MH^2 - 2*S34 - 2*T14 + 2*T24 + U)*(
+                Cos[\[Phi]3] + I*Sin[\[Phi]3]))/Sqrt[2] + Sqrt[2]*kT4*
+              (-MH^2 + 2*T + U)*(Cos[\[Phi]4] + I*Sin[\[Phi]4]))*
+            (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+             I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                I*\[Phi]4]))/Sqrt[2] + 4*Sqrt[2]*kT3*(Cos[\[Phi]3] + 
+            I*Sin[\[Phi]3])*((kT4*Sqrt[S]*Sech[\[Eta]4]*
+              (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                      Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Cos[\[Phi]4] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+               Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4]))/
+             (2*Sqrt[2]) + (kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                      \[Phi]4])]]*Sech[\[Eta]4]*(Sinh[\[Eta]3] - Sinh[
+                \[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/(2*Sqrt[2])) + 
+          kT3*(MH^2 - 2*T - U)*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                  kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                   kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                 Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                     \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(Sinh[\[Eta]3] - 
+            Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4])) - 
+        4*Sqrt[2]*kT3*(-1/(2*(MH^2 - U)) - (MH^2*DiscB[MH^2, Sqrt[MT^2], 
+             Sqrt[MT^2]])/(2*(MH^2 - U)^2) + 
+          (MH^2*DiscB[U, Sqrt[MT^2], Sqrt[MT^2]])/(2*(MH^2 - U)^2) - 
+          (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*
+                MT^2)]^2)/(2*(MH^2 - U)^2) + 
+          (MT^2*Log[(2*MT^2 - U + Sqrt[-((4*MT^2 - U)*U)])/(2*MT^2)]^2)/
+           (2*(MH^2 - U)^2))*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+         (kT4*(MH^2 - 2*S - U)*Sech[\[Eta]4]*
+           (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+            Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])*
+           (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]) - 
+          (Sech[\[Eta]4]*((kT3*(-MH^2 + 4*T24 + U)*(Cos[\[Phi]3] + 
+                I*Sin[\[Phi]3]))/Sqrt[2] + Sqrt[2]*kT4*(MH^2 - 2*S - U)*
+              (Cos[\[Phi]4] + I*Sin[\[Phi]4]))*
+            (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+             I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                I*\[Phi]4]))/Sqrt[2] + 4*Sqrt[2]*kT3*(Cos[\[Phi]3] + 
+            I*Sin[\[Phi]3])*((kT4*Sqrt[S]*Sech[\[Eta]4]*
+              (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                      Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Cos[\[Phi]4] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+               Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4]))/
+             (2*Sqrt[2]) + (kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                      \[Phi]4])]]*Sech[\[Eta]4]*(Sinh[\[Eta]3] - Sinh[
+                \[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/(2*Sqrt[2])) + 
+          kT3*(-MH^2 + 2*S + U)*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                  kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                   kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                 Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                     \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(Sinh[\[Eta]3] - 
+            Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4])) + 
+        4*(2 + Eps^(-1) + DiscB[U, Sqrt[MT^2], Sqrt[MT^2]] + Log[Mu^2/MT^2])*
+         (Sqrt[2]*kT3*kT4*Sech[\[Eta]4]*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+           (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+            Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])*
+           (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]) + 
+          (kT3*kT4*Sech[\[Eta]4]*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+            (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+             Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+             Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])*
+            (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/
+           Sqrt[2] - ((-MH^2 + S + T + 2*T14)*Sech[\[Eta]4]*
+            (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+             I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                I*\[Phi]4]))/Sqrt[2] + (Sech[\[Eta]4]*
+            ((kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*((kT3*(Cos[\[Phi]3] - 
+                   I*Sin[\[Phi]3]))/Sqrt[2] + 2*Sqrt[2]*
+                 (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                  I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))))/Sqrt[2] - 
+             ((kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                  kT4*Sin[\[Phi]4]))*((3*kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/
+                 Sqrt[2] + 2*Sqrt[2]*(-(kT3*Cos[\[Phi]3]) - 
+                  kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                      \[Phi]4]))))/Sqrt[2])*
+            (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+             I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                I*\[Phi]4]))/Sqrt[2] - 
+          4*((kT4*Sqrt[S]*Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+               Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Sin[\[Phi]4] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                Sinh[\[Eta]4]))/(2*Sqrt[2]) + (kT3*Sqrt[S]*Conjugate[1/
+                Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                    Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*(Sinh[\[Eta]3] - 
+               Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/(2*Sqrt[2])) - 
+          (kT3^2*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(Cos[\[Phi]3] - 
+             I*Sin[\[Phi]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*
+                \[Phi]4]))/Sqrt[2] + Sqrt[2]*kT3^2*
+           ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]] + Conjugate[
+             (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+               kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+               (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                   2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(Cos[\[Phi]3] + 
+            I*Sin[\[Phi]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+              I*\[Phi]4])) - 16*(3/4 + (MH^2*DiscB[MH^2, Sqrt[MT^2], 
+             Sqrt[MT^2]])/(4*(MH^2 - U)) - 
+          (U*DiscB[U, Sqrt[MT^2], Sqrt[MT^2]])/(4*(MH^2 - U)) + 
+          (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*
+                MT^2)]^2)/(4*(MH^2 - U)) + (Eps^(-1) + Log[Mu^2/MT^2])/4 - 
+          (MT^2*Log[(2*MT^2 - U + Sqrt[-((4*MT^2 - U)*U)])/(2*MT^2)]^2)/
+           (4*(MH^2 - U)))*(Sqrt[2]*kT3*kT4*Sech[\[Eta]4]*
+           (Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+           (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+            Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])*
+           (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]) + 
+          (kT3*kT4*Sech[\[Eta]4]*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+            (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+             Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+             Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])*
+            (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/
+           Sqrt[2] - ((-MH^2 + S + T + 2*T14)*Sech[\[Eta]4]*
+            (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+             I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                I*\[Phi]4]))/Sqrt[2] + (Sech[\[Eta]4]*
+            ((kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*((kT3*(Cos[\[Phi]3] - 
+                   I*Sin[\[Phi]3]))/Sqrt[2] + 2*Sqrt[2]*
+                 (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                  I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))))/Sqrt[2] - 
+             ((kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                  kT4*Sin[\[Phi]4]))*((3*kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/
+                 Sqrt[2] + 2*Sqrt[2]*(-(kT3*Cos[\[Phi]3]) - 
+                  kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                      \[Phi]4]))))/Sqrt[2])*
+            (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+             I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                I*\[Phi]4]))/Sqrt[2] - 
+          4*((kT4*Sqrt[S]*Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+               Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Sin[\[Phi]4] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                Sinh[\[Eta]4]))/(2*Sqrt[2]) + (kT3*Sqrt[S]*Conjugate[1/
+                Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                    Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*(Sinh[\[Eta]3] - 
+               Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/(2*Sqrt[2])) - 
+          (kT3^2*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(Cos[\[Phi]3] - 
+             I*Sin[\[Phi]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*
+                \[Phi]4]))/Sqrt[2] + Sqrt[2]*kT3^2*
+           ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]] + Conjugate[
+             (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+               kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+               (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                   2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(Cos[\[Phi]3] + 
+            I*Sin[\[Phi]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+              I*\[Phi]4])) - 
+        2*(Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+           (2*(MH^2 - U)) - Log[(2*MT^2 - U + Sqrt[-((4*MT^2 - U)*U)])/
+              (2*MT^2)]^2/(2*(MH^2 - U)))*
+         (-(Sqrt[2]*kT3*kT4*(MH^2 - U)*Sech[\[Eta]4]*(Cos[\[Phi]3] + 
+             I*Sin[\[Phi]3])*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+             Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+             Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])*
+            (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4])) - 
+          Sqrt[2]*kT3*kT4*S*Sech[\[Eta]4]*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+           (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+            Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])*
+           (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]) - 
+          ((MH^2 - S - T - 2*T14)*(MH^2 - U)*Sech[\[Eta]4]*
+            (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+             I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                I*\[Phi]4]))/Sqrt[2] - Sqrt[2]*Sech[\[Eta]4]*
+           (Sqrt[2]*kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+             ((kT3*T24*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/Sqrt[2] + 
+              (kT4*(MH^2 - U)*(Cos[\[Phi]4] - I*Sin[\[Phi]4]))/Sqrt[2]) - 
+            kT3*kT4*S*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*(Cos[\[Phi]4] + 
+              I*Sin[\[Phi]4]))*(-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                     \[Phi]4])]] - I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                  kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                   kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                 Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                     \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+             Cosh[\[Eta]4 + I*\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]) - 
+          4*(MH^2 - U)*(-(kT4*Sqrt[S]*Sech[\[Eta]4]*(Conjugate[
+                  (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                       \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                        4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+                Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                       Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4]))/
+             (2*Sqrt[2]) - (kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                      \[Phi]4])]]*Sech[\[Eta]4]*(Sinh[\[Eta]3] - Sinh[
+                \[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/(2*Sqrt[2])) + 
+          4*kT3^2*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*(Cos[\[Phi]3] + 
+            I*Sin[\[Phi]3])*((kT4*Sqrt[S]*Sech[\[Eta]4]*
+              (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                      Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Cos[\[Phi]4] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+               Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4]))/
+             (2*Sqrt[2]) + (kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                      \[Phi]4])]]*Sech[\[Eta]4]*(Sinh[\[Eta]3] - Sinh[
+                \[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/(2*Sqrt[2])) + 
+          Sqrt[2]*kT3^2*S*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                  kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                   kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                 Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                     \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(Cos[\[Phi]3] - 
+            I*Sin[\[Phi]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+              I*\[Phi]4]) - Sqrt[2]*kT3^2*(MH^2 - U)*
+           ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]] + Conjugate[
+             (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+               kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+               (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                   2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(Cos[\[Phi]3] + 
+            I*Sin[\[Phi]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+              I*\[Phi]4])) - 4*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/
+           (MH^2 - U) - DiscB[U, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - U))*
+         (-(Sqrt[2]*kT3*kT4*(MH^2 - U)*Sech[\[Eta]4]*(Cos[\[Phi]3] + 
+             I*Sin[\[Phi]3])*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+             Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+             Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])*
+            (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4])) - 
+          (kT3*kT4*(MH^2 + 2*S - 2*T - U)*Sech[\[Eta]4]*(Cos[\[Phi]3] - 
+             I*Sin[\[Phi]3])*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+             Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+             Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])*
+            (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/
+           Sqrt[2] - ((MH^2 - S - T - 2*T14)*(MH^2 - U)*Sech[\[Eta]4]*
+            (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+             I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                I*\[Phi]4]))/Sqrt[2] - (Sech[\[Eta]4]*
+            ((kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*((kT3*(MH^2 - 2*S34 - 
+                   2*T14 + 6*T24 + U)*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/
+                 Sqrt[2] + 2*Sqrt[2]*kT4*(MH^2 - U)*(Cos[\[Phi]4] - 
+                  I*Sin[\[Phi]4])))/Sqrt[2] + kT3*kT4*(-MH^2 - 2*S + 2*T + U)*
+              (Cos[\[Phi]3] - I*Sin[\[Phi]3])*(Cos[\[Phi]4] + I*
+                Sin[\[Phi]4]))*(-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                      \[Phi]4])]] - I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                    kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                 (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                I*\[Phi]4]))/Sqrt[2] - 4*(MH^2 - U)*
+           (-(kT4*Sqrt[S]*Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                    (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+                Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                       Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4]))/
+             (2*Sqrt[2]) - (kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                      \[Phi]4])]]*Sech[\[Eta]4]*(Sinh[\[Eta]3] - Sinh[
+                \[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/(2*Sqrt[2])) + 
+          8*kT3^2*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*(Cos[\[Phi]3] + 
+            I*Sin[\[Phi]3])*((kT4*Sqrt[S]*Sech[\[Eta]4]*
+              (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                      Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Cos[\[Phi]4] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+               Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4]))/
+             (2*Sqrt[2]) + (kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                      \[Phi]4])]]*Sech[\[Eta]4]*(Sinh[\[Eta]3] - Sinh[
+                \[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/(2*Sqrt[2])) + 
+          (kT3^2*(MH^2 + 2*S - 2*T - U)*
+            (I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(Cos[\[Phi]3] - 
+             I*Sin[\[Phi]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*
+                \[Phi]4]))/Sqrt[2] - Sqrt[2]*kT3^2*(MH^2 - U)*
+           ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]] + Conjugate[
+             (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+               kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+               (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                   2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(Cos[\[Phi]3] + 
+            I*Sin[\[Phi]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+              I*\[Phi]4])))/(MH^2 - S34 - T14 - T24) - 
+      16*((kT3*(-1/(2*(MH^2 - U)) - (MH^2*DiscB[MH^2, Sqrt[MT^2], 
+              Sqrt[MT^2]])/(2*(MH^2 - U)^2) + 
+           (MH^2*DiscB[U, Sqrt[MT^2], Sqrt[MT^2]])/(2*(MH^2 - U)^2) - 
+           (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/
+                (2*MT^2)]^2)/(2*(MH^2 - U)^2) + 
+           (MT^2*Log[(2*MT^2 - U + Sqrt[-((4*MT^2 - U)*U)])/(2*MT^2)]^2)/
+            (2*(MH^2 - U)^2))*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+          ((Sqrt[S]*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+              Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4])/4 + 
+           (Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+             (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/2))/
+         Sqrt[2] + (3/4 + (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/
+           (4*(MH^2 - U)) - (U*DiscB[U, Sqrt[MT^2], Sqrt[MT^2]])/
+           (4*(MH^2 - U)) + (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[
+                 -(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2)/(4*(MH^2 - U)) + 
+          (Eps^(-1) + Log[Mu^2/MT^2])/4 - 
+          (MT^2*Log[(2*MT^2 - U + Sqrt[-((4*MT^2 - U)*U)])/(2*MT^2)]^2)/
+           (4*(MH^2 - U)))*
+         (((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+            (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+           (2*Sqrt[2]) + (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                    kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                 (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+            (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/
+           Sqrt[2] - (Sech[\[Eta]4]*(-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                      \[Phi]4])]] - I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                    kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                 (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                I*\[Phi]4]))/Sqrt[2]) + 
+        (kT3*(-DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - U)) + 
+           DiscB[U, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - U)))*
+          (Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+          (-(kT3*Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+              Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+              Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                    2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])*
+             (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4])) + 
+           (kT3*Sech[\[Eta]4]*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+             (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                    2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - I*Conjugate[
+                (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                 I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                 I*\[Phi]4]))/2 + 
+           (kT3*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+              Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+             (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/2))/
+         Sqrt[2]) - 4*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - U) - 
+        DiscB[U, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - U))*
+       (Sech[\[Eta]4]*(((-MH^2 + U)*((-I)*Conjugate[
+               (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - 
+                 kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                 (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]))/Sqrt[2] + Sqrt[2]*kT3*
+           (Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+           ((Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 - 
+            kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                     Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                     kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+              Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+              Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                    2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])))*
+         (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]) + 
+        (Sech[\[Eta]4]*(MH^2 - U + kT3^2*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+            (Cos[\[Phi]3] + I*Sin[\[Phi]3]))*
+          (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+           I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+           Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2] + 
+        ((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]] + Conjugate[
+            (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+              kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+              (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+          (((-MH^2 + U)*Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+              Sinh[\[Eta]4 + I*\[Phi]4]))/2 + Sqrt[2]*kT3*(Cos[\[Phi]3] - 
+             I*Sin[\[Phi]3])*((Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) + 
+             (kT3*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                  I*\[Phi]4]))/Sqrt[2])))/Sqrt[2]) - 
+      (4*(2 + Eps^(-1) + DiscB[U, Sqrt[MT^2], Sqrt[MT^2]] + Log[Mu^2/MT^2])*
+         (2*Sech[\[Eta]4]*(-(kT4*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])]]*(Cos[\[Phi]4] + I*Sin[\[Phi]4]))/
+             (2*Sqrt[2]) + (kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*
+                (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+              (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                      Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Cos[\[Phi]4] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+               Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4]))/
+             Sqrt[2])*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+            Sinh[\[Eta]4 + I*\[Phi]4]) - 
+          (Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+            ((kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/Sqrt[2] + 
+             Sqrt[2]*kT4*(Cos[\[Phi]4] - I*Sin[\[Phi]4]))*
+            (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+          Sech[\[Eta]4]*((kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/Sqrt[2] + 
+            Sqrt[2]*kT4*(Cos[\[Phi]4] - I*Sin[\[Phi]4]))*(kT3*Cos[\[Phi]3] + 
+            kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+           (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+            I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]) + 
+          ((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*(Sqrt[S]*Sech[\[Eta]4]*
+              (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4])) + ((-MH^2 + S34 + 2*T14 + T24)*Sech[
+                \[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + 
+                  I*\[Phi]4]))/2 - (kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*(
+                -(Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) + (kT3*Sech[\[Eta]4]*
+                  (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                 Sqrt[2]))/Sqrt[2]))/Sqrt[2] + 2*Sqrt[S]*
+           Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                 Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                 Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+           (-(Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) - 
+            (kT3*Sech[\[Eta]4]*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+                 I*\[Phi]4]))/Sqrt[2]) - 
+          2*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]] + Conjugate[
+             (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+               kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+               (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                   2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + 
+            I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+           (-(Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) - 
+            (kT3*Sech[\[Eta]4]*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+                 I*\[Phi]4]))/Sqrt[2])) - 
+        16*(3/4 + (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/(4*(MH^2 - U)) - 
+          (U*DiscB[U, Sqrt[MT^2], Sqrt[MT^2]])/(4*(MH^2 - U)) + 
+          (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*
+                MT^2)]^2)/(4*(MH^2 - U)) + (Eps^(-1) + Log[Mu^2/MT^2])/4 - 
+          (MT^2*Log[(2*MT^2 - U + Sqrt[-((4*MT^2 - U)*U)])/(2*MT^2)]^2)/
+           (4*(MH^2 - U)))*(2*Sech[\[Eta]4]*
+           (-(kT4*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                   (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*(
+                Cos[\[Phi]4] + I*Sin[\[Phi]4]))/(2*Sqrt[2]) + 
+            (kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4]))*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+               Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Sin[\[Phi]4] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                Sinh[\[Eta]4]))/Sqrt[2])*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+            Sinh[\[Eta]4 + I*\[Phi]4]) - 
+          (Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+            ((kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/Sqrt[2] + 
+             Sqrt[2]*kT4*(Cos[\[Phi]4] - I*Sin[\[Phi]4]))*
+            (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+          Sech[\[Eta]4]*((kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/Sqrt[2] + 
+            Sqrt[2]*kT4*(Cos[\[Phi]4] - I*Sin[\[Phi]4]))*(kT3*Cos[\[Phi]3] + 
+            kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+           (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+            I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]) + 
+          ((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*(Sqrt[S]*Sech[\[Eta]4]*
+              (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4])) + ((-MH^2 + S34 + 2*T14 + T24)*Sech[
+                \[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + 
+                  I*\[Phi]4]))/2 - (kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*(
+                -(Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) + (kT3*Sech[\[Eta]4]*
+                  (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                 Sqrt[2]))/Sqrt[2]))/Sqrt[2] + 2*Sqrt[S]*
+           Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                 Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                 Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+           (-(Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) - 
+            (kT3*Sech[\[Eta]4]*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+                 I*\[Phi]4]))/Sqrt[2]) - 
+          2*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]] + Conjugate[
+             (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+               kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+               (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                   2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + 
+            I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+           (-(Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) - 
+            (kT3*Sech[\[Eta]4]*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+                 I*\[Phi]4]))/Sqrt[2])) - 4*Sqrt[2]*kT3*(-1/(2*(MH^2 - U)) - 
+          (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/(2*(MH^2 - U)^2) + 
+          (MH^2*DiscB[U, Sqrt[MT^2], Sqrt[MT^2]])/(2*(MH^2 - U)^2) - 
+          (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*
+                MT^2)]^2)/(2*(MH^2 - U)^2) + 
+          (MT^2*Log[(2*MT^2 - U + Sqrt[-((4*MT^2 - U)*U)])/(2*MT^2)]^2)/
+           (2*(MH^2 - U)^2))*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+         ((Sqrt[S]*(-MH^2 + 2*T24 + U)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                   2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                    \[Phi]4])]]*Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+             Sinh[\[Eta]4 + I*\[Phi]4]))/2 - (-MH^2 + 2*T24 + U)*
+           Sech[\[Eta]4]*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + 
+            I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+           (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+            I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]) - 
+          ((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*((Sqrt[S]*(-MH^2 - 2*S + 2*T - 2*T14 + 
+                U)*Sech[\[Eta]4])/(2*Sqrt[2]) - (Sqrt[S]*(-2*MH^2 + 4*T24 + 
+                2*U)*Sech[\[Eta]4])/(2*Sqrt[2]) + (kT3*(-MH^2 + 4*S + U)*Sech[
+                \[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                  I*\[Phi]4]))/Sqrt[2]))/Sqrt[2] + 
+          8*(-(kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                   (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*(
+                Cos[\[Phi]3] + I*Sin[\[Phi]3])*(-(Sqrt[S]*Sech[\[Eta]4])/
+                 (2*Sqrt[2]) - (kT3*Sech[\[Eta]4]*(Sinh[\[Eta]3] - 
+                   Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/
+             (2*Sqrt[2]) - (kT3*kT4*Sqrt[S]*Conjugate[1/Sqrt[
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                    Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*(Cos[\[Phi]4] + I*
+                Sin[\[Phi]4])*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                 I*\[Phi]4]))/4 - ((kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*
+                (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*((kT3*Sqrt[S]*
+                 Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                       (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                      (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                          kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                          kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                          4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                      (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                       (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+                  Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                         Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]3]))/(2*Sqrt[2]) + (kT3^2*Sech[\[Eta]4]*
+                 (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+                    I*\[Phi]4]))/Sqrt[2] - (kT3*kT4*Sech[\[Eta]4]*
+                 (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]4])*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                    I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/Sqrt[2])) - 
+        4*Sqrt[2]*kT3*(-DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - U)) + 
+          DiscB[U, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - U)))*
+         (Cos[\[Phi]3] - I*Sin[\[Phi]3])*((Sqrt[S]*(MH^2 - 2*S34 - U)*
+            Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+            (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/2 - 
+          (MH^2 - 2*S34 - U)*Sech[\[Eta]4]*(kT3*Cos[\[Phi]3] + 
+            kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+           (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+            I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]) + 
+          ((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*((Sqrt[S]*(3*MH^2 - 4*T - U)*Sech[
+                \[Eta]4])/(2*Sqrt[2]) - (Sqrt[S]*(-2*MH^2 + 4*S34 + 2*U)*Sech[
+                \[Eta]4])/(2*Sqrt[2]) - (kT3*(MH^2 + 2*S - 2*T - 2*T14 + 
+                U)*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                  I*\[Phi]4]))/Sqrt[2]))/Sqrt[2] + 
+          8*(-(kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                   (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*(
+                Cos[\[Phi]3] + I*Sin[\[Phi]3])*(-(Sqrt[S]*Sech[\[Eta]4])/
+                 (2*Sqrt[2]) - (kT3*Sech[\[Eta]4]*(Sinh[\[Eta]3] - 
+                   Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/
+             (2*Sqrt[2]) - (kT3*kT4*Sqrt[S]*Conjugate[1/Sqrt[
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                    Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*(Cos[\[Phi]4] + I*
+                Sin[\[Phi]4])*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                 I*\[Phi]4]))/4 - ((kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*
+                (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*((kT3*Sqrt[S]*
+                 Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                       (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                      (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                          kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                          kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                          4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                      (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                       (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+                  Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                         Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]3]))/(2*Sqrt[2]) + (kT3^2*Sech[\[Eta]4]*
+                 (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+                    I*\[Phi]4]))/Sqrt[2] - (kT3*kT4*Sech[\[Eta]4]*
+                 (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]4])*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                    I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/Sqrt[2])) - 
+        4*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - U) - 
+          DiscB[U, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - U))*
+         (((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*(kT4*Sqrt[S]*(MH^2 - U)*Sech[\[Eta]4]*
+              (Cos[\[Phi]4] - I*Sin[\[Phi]4]) + ((MH^2 - S34 - 2*T14 - T24)*(
+                MH^2 - U)*Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+                Sinh[\[Eta]4 + I*\[Phi]4]))/2 - (kT3*(Cos[\[Phi]3] - 
+                I*Sin[\[Phi]3])*(-((Sqrt[S]*(MH^2 - 2*S34 + 2*T24 - U)*
+                   Sech[\[Eta]4])/Sqrt[2]) + (Sqrt[S]*(-5*MH^2 - 2*S + 6*T - 
+                   2*T14 + 3*U)*Sech[\[Eta]4])/(2*Sqrt[2]) + 
+                (kT3*(MH^2 + 6*S - 2*T - 2*T14 + U)*Sech[\[Eta]4]*
+                  (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                 Sqrt[2]))/Sqrt[2]))/Sqrt[2] - 
+          2*((MH^2 - U)*Sech[\[Eta]4]*(-(kT4*Sqrt[S]*Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*(Cos[\[Phi]4] + 
+                  I*Sin[\[Phi]4]))/(2*Sqrt[2]) + (kT4*(kT3*Cos[\[Phi]3] + 
+                 kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]4]))/Sqrt[2])*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+              Sinh[\[Eta]4 + I*\[Phi]4]) + (Sqrt[S]*Conjugate[1/
+                Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                    Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+              ((kT3*(-MH^2 + 2*S34 - 2*T24 + U)*(Cos[\[Phi]3] - 
+                  I*Sin[\[Phi]3]))/Sqrt[2] + Sqrt[2]*kT4*(-MH^2 + U)*
+                (Cos[\[Phi]4] - I*Sin[\[Phi]4]))*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+               Sinh[\[Eta]4 + I*\[Phi]4]))/4 - 
+            ((kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4]))*((Sech[\[Eta]4]*((kT3*(-MH^2 + 2*S34 - 
+                     2*T24 + U)*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/Sqrt[2] + 
+                  Sqrt[2]*kT4*(-MH^2 + U)*(Cos[\[Phi]4] - I*Sin[\[Phi]4]))*
+                 (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                  I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                         Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+                  Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2] + 
+               Sqrt[2]*(MH^2 - U)*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                      (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                     (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                         kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                         kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                         4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                    Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                      (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                  (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                       \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                        4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+                (-(Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) - (kT3*Sech[\[Eta]4]*
+                   (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                  Sqrt[2])))/Sqrt[2] + Sqrt[S]*(MH^2 - U)*
+             Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+             (-(Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) - (kT3*Sech[\[Eta]4]*
+                (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[
+                2]) - 4*Sqrt[2]*kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+             (-(kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                 (Cos[\[Phi]3] + I*Sin[\[Phi]3])*(-(Sqrt[S]*Sech[\[Eta]4])/
+                   (2*Sqrt[2]) - (kT3*Sech[\[Eta]4]*(Sinh[\[Eta]3] - 
+                     Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/(2*
+                Sqrt[2]) - (kT3*kT4*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                     4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                       2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                      Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                      Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                        \[Phi]4])]]*Sech[\[Eta]4]*(Cos[\[Phi]4] + 
+                 I*Sin[\[Phi]4])*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                   I*\[Phi]4]))/4 - ((kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + 
+                 I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                ((kT3*Sqrt[S]*Sech[\[Eta]4]*(Conjugate[
+                      (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]3]))/(2*Sqrt[2]) + (kT3^2*Sech[\[Eta]4]*
+                   (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - 
+                      I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2] - (kT3*kT4*
+                   Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                         (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                          Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                         Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                          \[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]4])*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                      I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/Sqrt[2]))) - 
+        2*(Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+           (2*(MH^2 - U)) - Log[(2*MT^2 - U + Sqrt[-((4*MT^2 - U)*U)])/
+              (2*MT^2)]^2/(2*(MH^2 - U)))*
+         (((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*(((MH^2 - S34 - 2*T14 - T24)*(MH^2 - 
+                U)*Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+                Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 2*((kT4*Sqrt[S]*(MH^2 - U)*
+                 Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4]))/2 + 
+               (kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*((Sqrt[S]*T24*
+                    Sech[\[Eta]4])/Sqrt[2] + (Sqrt[S]*(MH^2 + S - T + T14 - 
+                     U)*Sech[\[Eta]4])/(2*Sqrt[2]) - Sqrt[2]*kT3*S*
+                   Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                      I*\[Phi]4])))/Sqrt[2])))/Sqrt[2] - 
+          4*(((MH^2 - U)*Sech[\[Eta]4]*(-(kT4*Sqrt[S]*Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  (Cos[\[Phi]4] + I*Sin[\[Phi]4]))/(2*Sqrt[2]) + 
+               (kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + 
+                  I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                 (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]4]))/Sqrt[2])*(Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[
+                \[Eta]4 + I*\[Phi]4]))/2 - (Sqrt[S]*Conjugate[1/
+                Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                    Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+              ((kT3*T24*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/Sqrt[2] + 
+               (kT4*(MH^2 - U)*(Cos[\[Phi]4] - I*Sin[\[Phi]4]))/Sqrt[2])*
+              (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/4 - 
+            ((kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4]))*(-((Sech[\[Eta]4]*((kT3*T24*
+                     (Cos[\[Phi]3] - I*Sin[\[Phi]3]))/Sqrt[2] + 
+                   (kT4*(MH^2 - U)*(Cos[\[Phi]4] - I*Sin[\[Phi]4]))/Sqrt[2])*
+                  (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]] - I*Conjugate[(-(kT3*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - 
+                       kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                         Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                        Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                          \[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+                   Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                         Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                         2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                         4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/
+                 Sqrt[2]) + ((MH^2 - U)*((-I)*Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                      (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                     (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                         kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                         kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                         4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                    Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                      (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+                 (-(Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) - (kT3*Sech[\[Eta]4]*
+                    (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                   Sqrt[2]))/Sqrt[2]))/Sqrt[2] + (Sqrt[S]*(MH^2 - U)*
+              Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+              (-(Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) - (kT3*Sech[\[Eta]4]*
+                 (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                Sqrt[2]))/2 - Sqrt[2]*kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+             (-(kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                 (Cos[\[Phi]3] + I*Sin[\[Phi]3])*(-(Sqrt[S]*Sech[\[Eta]4])/
+                   (2*Sqrt[2]) - (kT3*Sech[\[Eta]4]*(Sinh[\[Eta]3] - 
+                     Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/(2*
+                Sqrt[2]) - (kT3*kT4*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                     4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                       2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                      Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                      Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                        \[Phi]4])]]*Sech[\[Eta]4]*(Cos[\[Phi]4] + 
+                 I*Sin[\[Phi]4])*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                   I*\[Phi]4]))/4 - ((kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + 
+                 I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                ((kT3*Sqrt[S]*Sech[\[Eta]4]*(Conjugate[
+                      (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]3]))/(2*Sqrt[2]) + (kT3^2*Sech[\[Eta]4]*
+                   (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - 
+                      I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2] - (kT3*kT4*
+                   Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                         (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                          Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                         Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                          \[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]4])*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                      I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/Sqrt[2]))))/
+       (MH^2 - S - T - T14))/U + 
+    ((2*((2 + Eps^(-1) + DiscB[MH^2 - S34 - T14 - T24, Sqrt[MT^2], 
+             Sqrt[MT^2]] + Log[Mu^2/MT^2])*
+           (-(((-T - 2*T14 + 2*T24 + U)*Sech[\[Eta]4]*(-Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                       Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+                Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                       Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                       kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2]) + 
+            4*((kT4*Sqrt[S]*Sech[\[Eta]4]*(Conjugate[
+                   (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]4]))/Sqrt[2] + (kT3*Sqrt[S]*Conjugate[
+                 1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                       \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                       2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+                (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[
+                2])) + ScalarC0[MH^2, S, MH^2 - S34 - T14 - T24, Sqrt[MT^2], 
+            Sqrt[MT^2], Sqrt[MT^2]]*(-(((-2*MH^2*T14 + 2*MH^2*T24 - 2*T*T24 + 
+                2*T14*U + S*(-T + U))*Sech[\[Eta]4]*(-Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                       Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+                Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                       Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                       kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2]) - 
+            4*(-(kT4*((Sqrt[S]*(MH^2 - T)*Sech[\[Eta]4])/(2*Sqrt[2]) - 
+                 (Sqrt[S]*(-MH^2 + U)*Sech[\[Eta]4])/(2*Sqrt[2]))*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]4])) + (kT3*((Sqrt[S]*(-MH^2 + T)*Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/
+                  2 - (Sqrt[S]*(MH^2 - U)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                        4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                         Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                         Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])]])/2)*Sech[\[Eta]4]*
+                (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[
+                2]))) + 4*S*((-2*MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/
+           Kallen\[Lambda][MH^2, S, MH^2 - S34 - T14 - T24] + 
+          ((S + S34 + T14 + T24)*DiscB[S, Sqrt[MT^2], Sqrt[MT^2]])/
+           Kallen\[Lambda][MH^2, S, MH^2 - S34 - T14 - T24] + 
+          ((2*MH^2 - S - S34 - T14 - T24)*DiscB[MH^2 - S34 - T14 - T24, 
+             Sqrt[MT^2], Sqrt[MT^2]])/Kallen\[Lambda][MH^2, S, 
+            MH^2 - S34 - T14 - T24] + (MH^2*(S - S34 - T14 - T24)*
+            ScalarC0[MH^2, S, MH^2 - S34 - T14 - T24, Sqrt[MT^2], Sqrt[MT^2], 
+             Sqrt[MT^2]])/Kallen\[Lambda][MH^2, S, MH^2 - S34 - T14 - T24])*
+         (-(((-T - 2*T14 + 2*T24 + U)*Sech[\[Eta]4]*
+             (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                    2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - I*Conjugate[
+                (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                 I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                 I*\[Phi]4]))/Sqrt[2]) + 
+          4*((kT4*Sqrt[S]*Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+               Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Sin[\[Phi]4] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                Sinh[\[Eta]4]))/Sqrt[2] + (kT3*Sqrt[S]*Conjugate[1/
+                Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                    Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*(Sinh[\[Eta]3] - 
+               Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2])) - 
+        8*(3/4 - (MH^2*(S - S34 - T14 - T24)*DiscB[MH^2, Sqrt[MT^2], 
+             Sqrt[MT^2]])/(4*Kallen\[Lambda][MH^2, S, MH^2 - S34 - T14 - 
+              T24]) - (S*(2*MH^2 - S - S34 - T14 - T24)*DiscB[S, Sqrt[MT^2], 
+             Sqrt[MT^2]])/(4*Kallen\[Lambda][MH^2, S, MH^2 - S34 - T14 - 
+              T24]) - ((MH^2 - S34 - T14 - T24)*(S + S34 + T14 + T24)*
+            DiscB[MH^2 - S34 - T14 - T24, Sqrt[MT^2], Sqrt[MT^2]])/
+           (4*Kallen\[Lambda][MH^2, S, MH^2 - S34 - T14 - T24]) + 
+          (Eps^(-1) + Log[Mu^2/MT^2])/4 + ((MH^4*S - 4*MH^2*MT^2*S + 
+             MT^2*S^2 - MH^2*S*S34 + 2*MT^2*S*S34 + MT^2*S34^2 - MH^2*S*T14 + 
+             2*MT^2*S*T14 + 2*MT^2*S34*T14 + MT^2*T14^2 - MH^2*S*T24 + 
+             2*MT^2*S*T24 + 2*MT^2*S34*T24 + 2*MT^2*T14*T24 + MT^2*T24^2)*
+            ScalarC0[MH^2, S, MH^2 - S34 - T14 - T24, Sqrt[MT^2], Sqrt[MT^2], 
+             Sqrt[MT^2]])/(2*Kallen\[Lambda][MH^2, S, MH^2 - S34 - T14 - 
+              T24]))*(-(((-T - 2*T14 + 2*T24 + U)*Sech[\[Eta]4]*
+             (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                    2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - I*Conjugate[
+                (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                 I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                 I*\[Phi]4]))/Sqrt[2]) + 
+          4*((kT4*Sqrt[S]*Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+               Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Sin[\[Phi]4] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                Sinh[\[Eta]4]))/Sqrt[2] + (kT3*Sqrt[S]*Conjugate[1/
+                Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                    Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*(Sinh[\[Eta]3] - 
+               Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2])) - 
+        2*(((S + S34 + T14 + T24)*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/
+           Kallen\[Lambda][MH^2, S, MH^2 - S34 - T14 - T24] - 
+          (2*S*DiscB[S, Sqrt[MT^2], Sqrt[MT^2]])/Kallen\[Lambda][MH^2, S, 
+            MH^2 - S34 - T14 - T24] + ((S - S34 - T14 - T24)*
+            DiscB[MH^2 - S34 - T14 - T24, Sqrt[MT^2], Sqrt[MT^2]])/
+           Kallen\[Lambda][MH^2, S, MH^2 - S34 - T14 - T24] + 
+          (S*(2*MH^2 - S - S34 - T14 - T24)*ScalarC0[MH^2, S, 
+             MH^2 - S34 - T14 - T24, Sqrt[MT^2], Sqrt[MT^2], Sqrt[MT^2]])/
+           Kallen\[Lambda][MH^2, S, MH^2 - S34 - T14 - T24])*
+         (-(((-2*S34*T - T^2 + 4*T*T24 + 2*S*(T - U) + 2*MH^2*(T + 2*T14 - 
+                2*T24 - U) + 2*S34*U - 4*T14*U + U^2)*Sech[\[Eta]4]*
+             (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                    2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - I*Conjugate[
+                (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                 I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                 I*\[Phi]4]))/Sqrt[2]) + 
+          4*((kT3*Sech[\[Eta]4]*(-(Sqrt[S]*(MH^2 - T)*Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]) - Sqrt[S]*
+                (MH^2 - U)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+               kT3*(T - U)*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                      (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                     (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                         kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                         kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                         4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                    Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                      (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+                 Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3]))*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+                 I*\[Phi]4]))/Sqrt[2] - 
+            kT4*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                     Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                     kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+              Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+              Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                    2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])*
+             ((Sqrt[S]*(MH^2 - T)*Sech[\[Eta]4])/Sqrt[2] + 
+              (Sqrt[S]*(MH^2 - U)*Sech[\[Eta]4])/Sqrt[2] + (kT3*(-T + U)*
+                Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                   I*\[Phi]4]))/Sqrt[2]))) - 
+        4*((((6*MH^2*S^2 - 3*S^3 + 10*MH^2*S*S34 - 7*S^2*S34 - 5*S*S34^2 - 
+               S34^3 + 10*MH^2*S*T14 - 7*S^2*T14 - 10*S*S34*T14 - 3*S34^2*
+                T14 - 5*S*T14^2 - 3*S34*T14^2 - T14^3 + 10*MH^2*S*T24 - 7*S^2*
+                T24 - 10*S*S34*T24 - 3*S34^2*T24 - 10*S*T14*T24 - 6*S34*T14*
+                T24 - 3*T14^2*T24 - 5*S*T24^2 - 3*S34*T24^2 - 3*T14*T24^2 - 
+               T24^3)*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/
+             (2*Kallen\[Lambda][MH^2, S, MH^2 - S34 - T14 - T24]^2) - 
+            (3*S^2*(2*MH^2 - S - S34 - T14 - T24)*DiscB[S, Sqrt[MT^2], Sqrt[
+                MT^2]])/Kallen\[Lambda][MH^2, S, MH^2 - S34 - T14 - T24]^2 + 
+            ((6*MH^2*S^2 - 3*S^3 - 10*MH^2*S*S34 + S^2*S34 + 5*S*S34^2 + S34^
+                3 - 10*MH^2*S*T14 + S^2*T14 + 10*S*S34*T14 + 3*S34^2*T14 + 5*
+                S*T14^2 + 3*S34*T14^2 + T14^3 - 10*MH^2*S*T24 + S^2*T24 + 10*
+                S*S34*T24 + 3*S34^2*T24 + 10*S*T14*T24 + 6*S34*T14*T24 + 3*
+                T14^2*T24 + 5*S*T24^2 + 3*S34*T24^2 + 3*T14*T24^2 + T24^3)*
+              DiscB[MH^2 - S34 - T14 - T24, Sqrt[MT^2], Sqrt[MT^2]])/
+             (2*Kallen\[Lambda][MH^2, S, MH^2 - S34 - T14 - T24]^2) + 
+            S/Kallen\[Lambda][MH^2, S, MH^2 - S34 - T14 - T24] + 
+            (S*(6*MH^4*S - 8*MH^2*MT^2*S - 4*MH^2*S^2 + 2*MT^2*S^2 + S^3 - 6*
+                MH^2*S*S34 + 4*MT^2*S*S34 + 2*S^2*S34 + 2*MT^2*S34^2 + S*
+                S34^2 - 6*MH^2*S*T14 + 4*MT^2*S*T14 + 2*S^2*T14 + 4*MT^2*S34*
+                T14 + 2*S*S34*T14 + 2*MT^2*T14^2 + S*T14^2 - 6*MH^2*S*T24 + 4*
+                MT^2*S*T24 + 2*S^2*T24 + 4*MT^2*S34*T24 + 2*S*S34*T24 + 4*
+                MT^2*T14*T24 + 2*S*T14*T24 + 2*MT^2*T24^2 + S*T24^2)*
+              ScalarC0[MH^2, S, MH^2 - S34 - T14 - T24, Sqrt[MT^2], Sqrt[
+                MT^2], Sqrt[MT^2]])/Kallen\[Lambda][MH^2, S, MH^2 - S34 - 
+                T14 - T24]^2)*(-(((2*MH^2 - 2*S34 - T - U)*(T - U)*Sech[
+                \[Eta]4]*(-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                       Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+                Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                       Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                       kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2]) + 
+            4*(T - U)*(-((kT3^2*Sech[\[Eta]4]*(Conjugate[
+                    (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+                    I*\[Phi]4]))/Sqrt[2]) + (kT3*kT4*Sech[\[Eta]4]*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]4])*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                   I*\[Phi]4]))/Sqrt[2])) + 
+          (-(MH^2*(8*MH^2*S - 5*S^2 - 4*S*S34 + S34^2 - 4*S*T14 + 2*S34*T14 + 
+                T14^2 - 4*S*T24 + 2*S34*T24 + 2*T14*T24 + T24^2)*DiscB[MH^2, 
+                Sqrt[MT^2], Sqrt[MT^2]])/(2*Kallen\[Lambda][MH^2, S, 
+                MH^2 - S34 - T14 - T24]^2) - (S*(2*MH^2*S + S^2 - 6*MH^2*
+                S34 + 2*S*S34 + S34^2 - 6*MH^2*T14 + 2*S*T14 + 2*S34*T14 + 
+               T14^2 - 6*MH^2*T24 + 2*S*T24 + 2*S34*T24 + 2*T14*T24 + T24^2)*
+              DiscB[S, Sqrt[MT^2], Sqrt[MT^2]])/(2*Kallen\[Lambda][MH^2, S, 
+                MH^2 - S34 - T14 - T24]^2) + ((8*MH^4*S - 3*MH^2*S^2 + S^3 - 
+               10*MH^2*S*S34 + 2*S^2*S34 + MH^2*S34^2 + S*S34^2 - 10*MH^2*S*
+                T14 + 2*S^2*T14 + 2*MH^2*S34*T14 + 2*S*S34*T14 + MH^2*T14^2 + 
+               S*T14^2 - 10*MH^2*S*T24 + 2*S^2*T24 + 2*MH^2*S34*T24 + 2*S*S34*
+                T24 + 2*MH^2*T14*T24 + 2*S*T14*T24 + MH^2*T24^2 + S*T24^2)*
+              DiscB[MH^2 - S34 - T14 - T24, Sqrt[MT^2], Sqrt[MT^2]])/
+             (2*Kallen\[Lambda][MH^2, S, MH^2 - S34 - T14 - T24]^2) - 
+            (S + S34 + T14 + T24)/(2*Kallen\[Lambda][MH^2, S, MH^2 - S34 - 
+                T14 - T24]) + ((MH^4*S^2 + 4*MH^2*MT^2*S^2 - MH^2*S^3 - MT^2*
+                S^3 - 3*MH^4*S*S34 + 4*MH^2*MT^2*S*S34 + MH^2*S^2*S34 - 3*
+                MT^2*S^2*S34 + 2*MH^2*S*S34^2 - 3*MT^2*S*S34^2 - MT^2*S34^3 - 
+               3*MH^4*S*T14 + 4*MH^2*MT^2*S*T14 + MH^2*S^2*T14 - 3*MT^2*S^2*
+                T14 + 4*MH^2*S*S34*T14 - 6*MT^2*S*S34*T14 - 3*MT^2*S34^2*
+                T14 + 2*MH^2*S*T14^2 - 3*MT^2*S*T14^2 - 3*MT^2*S34*T14^2 - 
+               MT^2*T14^3 - 3*MH^4*S*T24 + 4*MH^2*MT^2*S*T24 + MH^2*S^2*T24 - 
+               3*MT^2*S^2*T24 + 4*MH^2*S*S34*T24 - 6*MT^2*S*S34*T24 - 3*MT^2*
+                S34^2*T24 + 4*MH^2*S*T14*T24 - 6*MT^2*S*T14*T24 - 6*MT^2*S34*
+                T14*T24 - 3*MT^2*T14^2*T24 + 2*MH^2*S*T24^2 - 3*MT^2*S*
+                T24^2 - 3*MT^2*S34*T24^2 - 3*MT^2*T14*T24^2 - MT^2*T24^3)*
+              ScalarC0[MH^2, S, MH^2 - S34 - T14 - T24, Sqrt[MT^2], Sqrt[
+                MT^2], Sqrt[MT^2]])/Kallen\[Lambda][MH^2, S, MH^2 - S34 - 
+                T14 - T24]^2)*(-(((2*MH^2 - 2*S34 - T - U)*(T - U)*Sech[
+                \[Eta]4]*(-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                       Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+                Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                       Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                       kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2]) + 
+            4*(T - U)*(-((kT3^2*Sech[\[Eta]4]*(Conjugate[
+                    (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+                    I*\[Phi]4]))/Sqrt[2]) + (kT3*kT4*Sech[\[Eta]4]*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]4])*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                   I*\[Phi]4]))/Sqrt[2]))))/S + 
+      ((4*(2 + Eps^(-1) + DiscB[T, Sqrt[MT^2], Sqrt[MT^2]] + 
+            Log[Mu^2/MT^2]) - 16*(3/4 + (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[
+                MT^2]])/(4*(MH^2 - T)) - (T*DiscB[T, Sqrt[MT^2], Sqrt[MT^2]])/
+             (4*(MH^2 - T)) + (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[
+                   -(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2)/(4*(MH^2 - T)) + 
+            (Eps^(-1) + Log[Mu^2/MT^2])/4 - 
+            (MT^2*Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/(2*MT^2)]^2)/
+             (4*(MH^2 - T))))*(-((kT3*kT4*Sech[\[Eta]4]*(Cos[\[Phi]3] + 
+              I*Sin[\[Phi]3])*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+              Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+              Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                    2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])*
+             (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+            Sqrt[2]) - Sqrt[2]*kT3*kT4*Sech[\[Eta]4]*(Cos[\[Phi]3] - 
+            I*Sin[\[Phi]3])*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                   kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + 
+                  kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                 Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                     \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+            Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])*
+           (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]) - 
+          ((-MH^2 + S + 2*T24 + U)*Sech[\[Eta]4]*
+            (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+             I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                I*\[Phi]4]))/Sqrt[2] + (Sech[\[Eta]4]*
+            (-2*kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*(-(kT3*Cos[\[Phi]3]) - 
+               kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])) - 
+             2*kT4*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*(kT3*Cos[\[Phi]3] + kT4*
+                Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])) + 
+             (kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*((kT4*(Cos[\[Phi]4] - 
+                   I*Sin[\[Phi]4]))/Sqrt[2] - (-(kT3*Cos[\[Phi]3]) - 
+                  kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))/
+                 Sqrt[2]))/Sqrt[2])*(-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                      \[Phi]4])]] - I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                    kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                 (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                I*\[Phi]4]))/Sqrt[2] - 
+          4*(-(kT4*Sqrt[S]*Sech[\[Eta]4]*(Conjugate[
+                  (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                       \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                        4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+                Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                       Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4]))/
+             (2*Sqrt[2]) - (kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                      \[Phi]4])]]*Sech[\[Eta]4]*(Sinh[\[Eta]3] - Sinh[
+                \[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/(2*Sqrt[2])) + 
+          Sqrt[2]*kT3^2*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                  kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                   kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                 Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                     \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(Cos[\[Phi]3] - 
+            I*Sin[\[Phi]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+              I*\[Phi]4]) - (kT3^2*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                    kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                 (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(Cos[\[Phi]3] + 
+             I*Sin[\[Phi]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*
+                \[Phi]4]))/Sqrt[2]) - 
+        2*(Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+           (2*(MH^2 - T)) - Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/
+              (2*MT^2)]^2/(2*(MH^2 - T)))*(Sqrt[2]*kT3*kT4*S*Sech[\[Eta]4]*
+           (Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+           (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+            Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])*
+           (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]) + 
+          Sqrt[2]*kT3*kT4*(MH^2 - T)*Sech[\[Eta]4]*(Cos[\[Phi]3] - 
+            I*Sin[\[Phi]3])*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                   kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + 
+                  kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                 Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                     \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+            Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])*
+           (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]) - 
+          ((MH^2 - T)*(MH^2 - S - 2*T24 - U)*Sech[\[Eta]4]*
+            (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+             I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                I*\[Phi]4]))/Sqrt[2] + Sqrt[2]*Sech[\[Eta]4]*
+           ((kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*(-(Sqrt[2]*kT3*T14*
+                 (Cos[\[Phi]3] - I*Sin[\[Phi]3])) + Sqrt[2]*kT4*S*
+                (Cos[\[Phi]4] - I*Sin[\[Phi]4])))/Sqrt[2] - 
+            kT3*kT4*(MH^2 - T)*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+             (Cos[\[Phi]4] + I*Sin[\[Phi]4]))*
+           (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+            I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]) + 
+          4*Sqrt[2]*kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+           ((kT4*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*((kT4*Sqrt[S]*Sech[\[Eta]4]*
+                 (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]4]))/(2*Sqrt[2]) + (kT3*Sqrt[S]*Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+                 (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                (2*Sqrt[2])))/Sqrt[2] + ((-(kT3*Cos[\[Phi]3]) - kT4*
+                Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+              ((kT4*Sqrt[S]*Sech[\[Eta]4]*(Conjugate[
+                    (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]4]))/(2*Sqrt[2]) + (kT3*Sqrt[S]*Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+                 (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                (2*Sqrt[2])))/Sqrt[2]) - 4*(MH^2 - T)*
+           ((kT4*Sqrt[S]*Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+               Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Sin[\[Phi]4] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                Sinh[\[Eta]4]))/(2*Sqrt[2]) + (kT3*Sqrt[S]*Conjugate[1/
+                Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                    Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*(Sinh[\[Eta]3] - 
+               Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/(2*Sqrt[2])) - 
+          Sqrt[2]*kT3^2*(MH^2 - T)*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                  kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                   kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                 Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                     \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(Cos[\[Phi]3] - 
+            I*Sin[\[Phi]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+              I*\[Phi]4]) + Sqrt[2]*kT3^2*S*
+           ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]] + Conjugate[
+             (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+               kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+               (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                   2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(Cos[\[Phi]3] + 
+            I*Sin[\[Phi]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+              I*\[Phi]4])) - 4*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/
+           (MH^2 - T) - DiscB[T, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - T))*
+         ((kT3*kT4*(MH^2 + 2*S - T - 2*U)*Sech[\[Eta]4]*(Cos[\[Phi]3] + 
+             I*Sin[\[Phi]3])*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+             Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+             Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])*
+            (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+           Sqrt[2] + Sqrt[2]*kT3*kT4*(MH^2 - T)*Sech[\[Eta]4]*
+           (Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+           (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+            Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])*
+           (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]) - 
+          ((MH^2 - T)*(MH^2 - S - 2*T24 - U)*Sech[\[Eta]4]*
+            (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+             I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                I*\[Phi]4]))/Sqrt[2] + (Sech[\[Eta]4]*
+            (-((kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*(2*Sqrt[2]*kT3*
+                  (MH^2 - S - 2*T24 - U)*(Cos[\[Phi]3] - I*Sin[\[Phi]3]) + 
+                 (kT4*(-7*MH^2 - 2*S + 8*S34 + 3*T + 6*U)*(Cos[\[Phi]4] - 
+                    I*Sin[\[Phi]4]))/Sqrt[2] + ((-9*MH^2 + 2*S + 8*S34 + 
+                    5*T + 2*U)*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                    I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))/Sqrt[2]))/Sqrt[
+                2]) - 4*(MH^2 - T)*(-(kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*
+                  (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                   I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))/2 - 
+               (kT4*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*(kT3*Cos[\[Phi]3] + 
+                  kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                      \[Phi]4])))/2))*(-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                      \[Phi]4])]] - I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                    kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                 (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                I*\[Phi]4]))/Sqrt[2] - 4*(MH^2 - T)*
+           ((kT4*Sqrt[S]*Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+               Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Sin[\[Phi]4] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                Sinh[\[Eta]4]))/(2*Sqrt[2]) + (kT3*Sqrt[S]*Conjugate[1/
+                Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                    Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*(Sinh[\[Eta]3] - 
+               Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/(2*Sqrt[2])) - 
+          Sqrt[2]*kT3^2*(MH^2 - T)*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                  kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                   kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                 Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                     \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(Cos[\[Phi]3] - 
+            I*Sin[\[Phi]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+              I*\[Phi]4]) + (kT3^2*(MH^2 + 2*S - T - 2*U)*
+            ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(Cos[\[Phi]3] + 
+             I*Sin[\[Phi]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*
+                \[Phi]4]))/Sqrt[2] + 8*Sqrt[2]*kT3*(Cos[\[Phi]3] + 
+            I*Sin[\[Phi]3])*((kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+              (-(kT4*Sqrt[S]*Sech[\[Eta]4]*(Conjugate[
+                     (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                     (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                    Sinh[\[Eta]4]))/(2*Sqrt[2]) - (kT3*Sqrt[S]*Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+                 (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                (2*Sqrt[2])))/Sqrt[2] - ((kT4*(Cos[\[Phi]4] - 
+                 I*Sin[\[Phi]4]))/Sqrt[2] + (-(kT3*Cos[\[Phi]3]) - 
+                kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))/
+               Sqrt[2])*(-((kT3^2*Sech[\[Eta]4]*(Conjugate[
+                    (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+                    I*\[Phi]4]))/Sqrt[2]) + (kT3*kT4*Sech[\[Eta]4]*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]4])*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                   I*\[Phi]4]))/Sqrt[2]))) - 
+        8*((kT3*(-1/(2*(MH^2 - T)) - (MH^2*DiscB[MH^2, Sqrt[MT^2], 
+                Sqrt[MT^2]])/(2*(MH^2 - T)^2) + (MH^2*DiscB[T, Sqrt[MT^2], 
+                Sqrt[MT^2]])/(2*(MH^2 - T)^2) - 
+             (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/
+                  (2*MT^2)]^2)/(2*(MH^2 - T)^2) + 
+             (MT^2*Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/(2*MT^2)]^2)/
+              (2*(MH^2 - T)^2))*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+            (-(kT4*(MH^2 - 2*S - T)*Sech[\[Eta]4]*(Conjugate[
+                  (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                       \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                        4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+                Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                       Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])*(
+                Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4])) + 
+             (Sech[\[Eta]4]*(Sqrt[2]*kT3*(-MH^2 + S + 2*T24 + U)*
+                 (Cos[\[Phi]3] - I*Sin[\[Phi]3]) + (kT4*(3*MH^2 + 2*S - 
+                   4*S34 - T - 2*U)*(Cos[\[Phi]4] - I*Sin[\[Phi]4]))/
+                 Sqrt[2] + ((5*MH^2 - 2*S - 4*S34 - 3*T - 2*U)*
+                  (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                   I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))/Sqrt[2])*(
+                -Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                       Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                       Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                        \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                       Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+                Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                       Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                       kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2] + 
+             kT3*(-MH^2 + 2*S + T)*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+              (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]) + 
+             8*((kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+                 (-(kT4*Sqrt[S]*Sech[\[Eta]4]*(Conjugate[
+                        (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                        (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[1/Sqrt[
+                          (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                          kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                       Sinh[\[Eta]4]))/(2*Sqrt[2]) - (kT3*Sqrt[S]*Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                    Sech[\[Eta]4]*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+                       I*\[Phi]4]))/(2*Sqrt[2])))/Sqrt[2] - 
+               ((kT4*(Cos[\[Phi]4] - I*Sin[\[Phi]4]))/Sqrt[2] + 
+                 (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                   I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))/Sqrt[2])*
+                (-((kT3^2*Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                          (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                          Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                          Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                          \[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                       (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                       1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                          (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]]*Sinh[\[Eta]3])*(Sinh[\[Eta]3] - 
+                     Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]) + 
+                 (kT3*kT4*Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                         (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                          Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                         Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                          \[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]4])*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                      I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))))/Sqrt[2] + 
+          (kT3*(-DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - T)) + 
+             DiscB[T, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - T)))*
+            (Cos[\[Phi]3] + I*Sin[\[Phi]3])*(-(kT4*(-MH^2 + T + 2*U)*Sech[
+                \[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                    (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+                Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                       Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])*(
+                Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4])) + 
+             (Sech[\[Eta]4]*(Sqrt[2]*kT3*(-MH^2 + S + 2*T24 + U)*
+                 (Cos[\[Phi]3] - I*Sin[\[Phi]3]) + (kT4*(5*MH^2 - 4*S34 - 
+                   3*T - 4*U)*(Cos[\[Phi]4] - I*Sin[\[Phi]4]))/Sqrt[2] + 
+                ((3*MH^2 - 4*S34 - T)*(-(kT3*Cos[\[Phi]3]) - 
+                   kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                       \[Phi]4])))/Sqrt[2])*(-Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                       Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+                Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                       Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                       kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2] + 
+             kT3*(MH^2 - T - 2*U)*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+              (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]) + 
+             8*((kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+                 (-(kT4*Sqrt[S]*Sech[\[Eta]4]*(Conjugate[
+                        (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                        (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[1/Sqrt[
+                          (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                          kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                       Sinh[\[Eta]4]))/(2*Sqrt[2]) - (kT3*Sqrt[S]*Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                    Sech[\[Eta]4]*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+                       I*\[Phi]4]))/(2*Sqrt[2])))/Sqrt[2] - 
+               ((kT4*(Cos[\[Phi]4] - I*Sin[\[Phi]4]))/Sqrt[2] + 
+                 (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                   I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))/Sqrt[2])*
+                (-((kT3^2*Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                          (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                          Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                          Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                          \[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                       (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                       1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                          (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]]*Sinh[\[Eta]3])*(Sinh[\[Eta]3] - 
+                     Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]) + 
+                 (kT3*kT4*Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                         (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                          Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                         Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                          \[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]4])*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                      I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))))/Sqrt[2]))/T)/
+     (MH^2 - S34 - T14 - T24) + 
+    (((2*(2 + Eps^(-1) + DiscB[T24, Sqrt[MT^2], Sqrt[MT^2]] + 
+            Log[Mu^2/MT^2]) - 8*(3/4 + (MH^2*(S + T + T14 - T24)*
+              DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/(4*Kallen\[Lambda][MH^
+                2, MH^2 - S - T - T14, T24]) - ((MH^2 - S - T - T14)*
+              (S + T + T14 + T24)*DiscB[MH^2 - S - T - T14, Sqrt[MT^2], Sqrt[
+                MT^2]])/(4*Kallen\[Lambda][MH^2, MH^2 - S - T - T14, T24]) - 
+            ((2*MH^2 - S - T - T14 - T24)*T24*DiscB[T24, Sqrt[MT^2], Sqrt[
+                MT^2]])/(4*Kallen\[Lambda][MH^2, MH^2 - S - T - T14, T24]) + 
+            (Eps^(-1) + Log[Mu^2/MT^2])/4 + ((MT^2*S^2 + 2*MT^2*S*T + MT^2*
+                T^2 + 2*MT^2*S*T14 + 2*MT^2*T*T14 + MT^2*T14^2 + MH^4*T24 - 4*
+                MH^2*MT^2*T24 - MH^2*S*T24 + 2*MT^2*S*T24 - MH^2*T*T24 + 2*
+                MT^2*T*T24 - MH^2*T14*T24 + 2*MT^2*T14*T24 + MT^2*T24^2)*
+              ScalarC0[MH^2, MH^2 - S - T - T14, T24, Sqrt[MT^2], Sqrt[MT^2], 
+               Sqrt[MT^2]])/(2*Kallen\[Lambda][MH^2, MH^2 - S - T - T14, 
+               T24])))*(-2*Sech[\[Eta]4]*
+           (-(kT4*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                   (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*(
+                Cos[\[Phi]4] + I*Sin[\[Phi]4]))/(2*Sqrt[2]) - 
+            ((kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4]))*((Sqrt[S]*Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 - kT4*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]4])))/Sqrt[2])*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+            Sinh[\[Eta]4 + I*\[Phi]4]) - 4*Sqrt[S]*Conjugate[
+            1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                 Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                 Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                   \[Phi]4])]]*(-(Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) - 
+            (kT4*Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+              (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/
+             (2*Sqrt[2])) - 4*Sqrt[2]*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + 
+            I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+           ((Sqrt[S]*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*
+                       Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                     kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                       \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4])/4 + 
+            (kT4*Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+              (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - I*Conjugate[
+                 (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                  I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                  I*\[Phi]4]))/2) + 
+          ((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*(((2*S - S34 - 2*T14 + U)*Sech[\[Eta]4]*(
+                Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/2 - 
+             4*((Sqrt[S]*Sech[\[Eta]4]*(-(kT3*Cos[\[Phi]3]) - 
+                  kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                      \[Phi]4])))/4 + (kT4*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+                 (-(Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) + (kT3*Sech[\[Eta]4]*
+                    (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                   Sqrt[2]))/Sqrt[2])))/Sqrt[2]) - 
+        4*((((6*MH^4*S - 10*MH^2*S^2 + 3*S^3 + 6*MH^4*T - 20*MH^2*S*T + 9*S^2*
+                T - 10*MH^2*T^2 + 9*S*T^2 + 3*T^3 + 6*MH^4*T14 - 20*MH^2*S*
+                T14 + 9*S^2*T14 - 20*MH^2*T*T14 + 18*S*T*T14 + 9*T^2*T14 - 10*
+                MH^2*T14^2 + 9*S*T14^2 + 9*T*T14^2 + 3*T14^3 + 10*MH^4*T24 - 
+               14*MH^2*S*T24 + 7*S^2*T24 - 14*MH^2*T*T24 + 14*S*T*T24 + 7*T^2*
+                T24 - 14*MH^2*T14*T24 + 14*S*T14*T24 + 14*T*T14*T24 + 7*T14^2*
+                T24 - 8*MH^2*T24^2 + 5*S*T24^2 + 5*T*T24^2 + 5*T14*T24^2 + 
+               T24^3)*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/
+             (2*Kallen\[Lambda][MH^2, MH^2 - S - T - T14, T24]^2) - 
+            (3*(MH^2 - S - T - T14)^2*(S + T + T14 + T24)*DiscB[MH^2 - S - 
+                T - T14, Sqrt[MT^2], Sqrt[MT^2]])/Kallen\[Lambda][MH^2, 
+               MH^2 - S - T - T14, T24]^2 - ((2*MH^2*S^2 - 3*S^3 + 4*MH^2*S*
+                T - 9*S^2*T + 2*MH^2*T^2 - 9*S*T^2 - 3*T^3 + 4*MH^2*S*T14 - 9*
+                S^2*T14 + 4*MH^2*T*T14 - 18*S*T*T14 - 9*T^2*T14 + 2*MH^2*
+                T14^2 - 9*S*T14^2 - 9*T*T14^2 - 3*T14^3 + 4*MH^4*T24 - 2*MH^2*
+                S*T24 + S^2*T24 - 2*MH^2*T*T24 + 2*S*T*T24 + T^2*T24 - 2*MH^2*
+                T14*T24 + 2*S*T14*T24 + 2*T*T14*T24 + T14^2*T24 - 8*MH^2*
+                T24^2 + 5*S*T24^2 + 5*T*T24^2 + 5*T14*T24^2 + T24^3)*
+              DiscB[T24, Sqrt[MT^2], Sqrt[MT^2]])/(2*Kallen\[Lambda][MH^2, 
+                MH^2 - S - T - T14, T24]^2) + (MH^2 - S - T - T14)/
+             Kallen\[Lambda][MH^2, MH^2 - S - T - T14, T24] + 
+            ((MH^2 - S - T - T14)*(MH^2*S^2 + 2*MT^2*S^2 - S^3 + 2*MH^2*S*
+                T + 4*MT^2*S*T - 3*S^2*T + MH^2*T^2 + 2*MT^2*T^2 - 3*S*T^2 - 
+               T^3 + 2*MH^2*S*T14 + 4*MT^2*S*T14 - 3*S^2*T14 + 2*MH^2*T*T14 + 
+               4*MT^2*T*T14 - 6*S*T*T14 - 3*T^2*T14 + MH^2*T14^2 + 2*MT^2*
+                T14^2 - 3*S*T14^2 - 3*T*T14^2 - T14^3 + 2*MH^4*T24 - 8*MH^2*
+                MT^2*T24 + 4*MT^2*S*T24 - 2*S^2*T24 + 4*MT^2*T*T24 - 4*S*T*
+                T24 - 2*T^2*T24 + 4*MT^2*T14*T24 - 4*S*T14*T24 - 4*T*T14*
+                T24 - 2*T14^2*T24 + MH^2*T24^2 + 2*MT^2*T24^2 - S*T24^2 - T*
+                T24^2 - T14*T24^2)*ScalarC0[MH^2, MH^2 - S - T - T14, T24, 
+               Sqrt[MT^2], Sqrt[MT^2], Sqrt[MT^2]])/Kallen\[Lambda][MH^2, 
+               MH^2 - S - T - T14, T24]^2)*
+           (-((S34 - U)*(-2*MH^2 + S34 + 2*T + U)*(I*Conjugate[
+                  (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                       \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                        4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                 (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(
+                Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+             (2*Sqrt[2]) - 2*(S34 - U)*Sech[\[Eta]4]*
+             (-(kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                 (Cos[\[Phi]3] + I*Sin[\[Phi]3]))/(2*Sqrt[2]) + 
+              (kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + 
+                 I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3]))/Sqrt[2])*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+              Sinh[\[Eta]4 + I*\[Phi]4]) - 2*Sqrt[2]*(2*MH^2 - S34 - 2*T - U)*
+             (I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+              Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+             ((kT3*Sqrt[S]*Sech[\[Eta]4]*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/4 + 
+              (kT3*kT4*Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+                (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+               2) + 16*(-(kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                      4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                        2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                       Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                       Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                        \[Phi]3 - \[Phi]4])]]*(Cos[\[Phi]3] + 
+                  I*Sin[\[Phi]3]))/(2*Sqrt[2]) + (kT3*(kT3*Cos[\[Phi]3] + 
+                 kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3]))/Sqrt[2])*((kT3*Sqrt[S]*Sech[\[Eta]4]*
+                (Cos[\[Phi]3] - I*Sin[\[Phi]3]))/4 + (kT3*kT4*Sech[\[Eta]4]*
+                (Cos[\[Phi]4] - I*Sin[\[Phi]4])*(-Sinh[\[Eta]3] + 
+                 Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/2)) + 
+          (-(MH^2*(6*MH^2*S - 5*S^2 + 6*MH^2*T - 10*S*T - 5*T^2 + 
+                6*MH^2*T14 - 10*S*T14 - 10*T*T14 - 5*T14^2 + 2*MH^2*T24 - 
+                4*S*T24 - 4*T*T24 - 4*T14*T24 + T24^2)*DiscB[MH^2, 
+                Sqrt[MT^2], Sqrt[MT^2]])/(2*Kallen\[Lambda][MH^2, 
+                MH^2 - S - T - T14, T24]^2) + ((6*MH^4*S - 7*MH^2*S^2 + S^
+                3 + 6*MH^4*T - 14*MH^2*S*T + 3*S^2*T - 7*MH^2*T^2 + 3*S*T^2 + 
+               T^3 + 6*MH^4*T14 - 14*MH^2*S*T14 + 3*S^2*T14 - 14*MH^2*T*T14 + 
+               6*S*T*T14 + 3*T^2*T14 - 7*MH^2*T14^2 + 3*S*T14^2 + 3*T*T14^2 + 
+               T14^3 - 2*MH^4*T24 + 2*S^2*T24 + 4*S*T*T24 + 2*T^2*T24 + 4*S*
+                T14*T24 + 4*T*T14*T24 + 2*T14^2*T24 - MH^2*T24^2 + S*T24^2 + 
+               T*T24^2 + T14*T24^2)*DiscB[MH^2 - S - T - T14, Sqrt[MT^2], 
+               Sqrt[MT^2]])/(2*Kallen\[Lambda][MH^2, MH^2 - S - T - T14, T24]^
+               2) + ((2*MH^2*S^2 - S^3 + 4*MH^2*S*T - 3*S^2*T + 2*MH^2*T^2 - 
+               3*S*T^2 - T^3 + 4*MH^2*S*T14 - 3*S^2*T14 + 4*MH^2*T*T14 - 6*S*
+                T*T14 - 3*T^2*T14 + 2*MH^2*T14^2 - 3*S*T14^2 - 3*T*T14^2 - 
+               T14^3 + 4*MH^4*T24 - 4*MH^2*S*T24 - 2*S^2*T24 - 4*MH^2*T*T24 - 
+               4*S*T*T24 - 2*T^2*T24 - 4*MH^2*T14*T24 - 4*S*T14*T24 - 4*T*T14*
+                T24 - 2*T14^2*T24 + 2*MH^2*T24^2 - S*T24^2 - T*T24^2 - T14*
+                T24^2)*DiscB[T24, Sqrt[MT^2], Sqrt[MT^2]])/
+             (2*Kallen\[Lambda][MH^2, MH^2 - S - T - T14, T24]^2) - 
+            (2*MH^2 - S - T - T14 - T24)/(2*Kallen\[Lambda][MH^2, MH^2 - S - 
+                T - T14, T24]) - ((MH^4*S^2 + 2*MH^2*MT^2*S^2 - MH^2*S^3 - 
+               MT^2*S^3 + 2*MH^4*S*T + 4*MH^2*MT^2*S*T - 3*MH^2*S^2*T - 3*
+                MT^2*S^2*T + MH^4*T^2 + 2*MH^2*MT^2*T^2 - 3*MH^2*S*T^2 - 3*
+                MT^2*S*T^2 - MH^2*T^3 - MT^2*T^3 + 2*MH^4*S*T14 + 4*MH^2*MT^2*
+                S*T14 - 3*MH^2*S^2*T14 - 3*MT^2*S^2*T14 + 2*MH^4*T*T14 + 4*
+                MH^2*MT^2*T*T14 - 6*MH^2*S*T*T14 - 6*MT^2*S*T*T14 - 3*MH^2*
+                T^2*T14 - 3*MT^2*T^2*T14 + MH^4*T14^2 + 2*MH^2*MT^2*T14^2 - 3*
+                MH^2*S*T14^2 - 3*MT^2*S*T14^2 - 3*MH^2*T*T14^2 - 3*MT^2*T*
+                T14^2 - MH^2*T14^3 - MT^2*T14^3 + 2*MH^6*T24 - 8*MH^4*MT^2*
+                T24 - 3*MH^4*S*T24 + 8*MH^2*MT^2*S*T24 + MH^2*S^2*T24 - 3*
+                MT^2*S^2*T24 - 3*MH^4*T*T24 + 8*MH^2*MT^2*T*T24 + 2*MH^2*S*T*
+                T24 - 6*MT^2*S*T*T24 + MH^2*T^2*T24 - 3*MT^2*T^2*T24 - 3*MH^4*
+                T14*T24 + 8*MH^2*MT^2*T14*T24 + 2*MH^2*S*T14*T24 - 6*MT^2*S*
+                T14*T24 + 2*MH^2*T*T14*T24 - 6*MT^2*T*T14*T24 + MH^2*T14^2*
+                T24 - 3*MT^2*T14^2*T24 - 2*MH^4*T24^2 + 6*MH^2*MT^2*T24^2 + 2*
+                MH^2*S*T24^2 - 3*MT^2*S*T24^2 + 2*MH^2*T*T24^2 - 3*MT^2*T*
+                T24^2 + 2*MH^2*T14*T24^2 - 3*MT^2*T14*T24^2 - MT^2*T24^3)*
+              ScalarC0[MH^2, MH^2 - S - T - T14, T24, Sqrt[MT^2], Sqrt[MT^2], 
+               Sqrt[MT^2]])/Kallen\[Lambda][MH^2, MH^2 - S - T - T14, T24]^2)*
+           (-((S34 - U)*(-2*MH^2 + S34 + 2*T + U)*(I*Conjugate[
+                  (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                       \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                        4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                 (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(
+                Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+             (2*Sqrt[2]) - 2*(S34 - U)*Sech[\[Eta]4]*
+             (-(kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                 (Cos[\[Phi]3] + I*Sin[\[Phi]3]))/(2*Sqrt[2]) + 
+              (kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + 
+                 I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3]))/Sqrt[2])*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+              Sinh[\[Eta]4 + I*\[Phi]4]) - 2*Sqrt[2]*(2*MH^2 - S34 - 2*T - U)*
+             (I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+              Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+             ((kT3*Sqrt[S]*Sech[\[Eta]4]*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/4 + 
+              (kT3*kT4*Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+                (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+               2) + 16*((kT3*kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3]))/Sqrt[2] + (kT3*(Cos[\[Phi]3] + 
+                 I*Sin[\[Phi]3])*(-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                         4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])]])/2 + 
+                 kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                         Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                         2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                         4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                     (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                    Sinh[\[Eta]3])))/Sqrt[2])*((kT3*Sqrt[S]*Sech[\[Eta]4]*
+                (Cos[\[Phi]3] - I*Sin[\[Phi]3]))/4 + (kT3*kT4*Sech[\[Eta]4]*
+                (Cos[\[Phi]4] - I*Sin[\[Phi]4])*(-Sinh[\[Eta]3] + 
+                 Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/2)) + 
+          ((-2*MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/Kallen\[Lambda][
+              MH^2, MH^2 - S - T - T14, T24] + ((2*MH^2 - S - T - T14 - T24)*
+              DiscB[MH^2 - S - T - T14, Sqrt[MT^2], Sqrt[MT^2]])/
+             Kallen\[Lambda][MH^2, MH^2 - S - T - T14, T24] + 
+            ((S + T + T14 + T24)*DiscB[T24, Sqrt[MT^2], Sqrt[MT^2]])/
+             Kallen\[Lambda][MH^2, MH^2 - S - T - T14, T24] - 
+            (MH^2*(S + T + T14 - T24)*ScalarC0[MH^2, MH^2 - S - T - T14, T24, 
+               Sqrt[MT^2], Sqrt[MT^2], Sqrt[MT^2]])/Kallen\[Lambda][MH^2, 
+              MH^2 - S - T - T14, T24])*(-(Sqrt[2]*S*(-MH^2 + S34 + T24 + U)*
+              Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]) + 
+            Sqrt[2]*Sqrt[S]*(-MH^2 + S34 + T24 + U)*
+             ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+              Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+             (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                kT4*Sin[\[Phi]4])) + ((-S34^2 - 2*S34*T - S34*T24 + 2*T14*
+                T24 - 2*S*(2*S34 + T24) + MH^2*(2*S + 3*S34 - 2*T14 - 3*U) + 
+               2*T*U + 4*T14*U + T24*U + U^2)*(I*Conjugate[
+                 (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+              (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+             (2*Sqrt[2]) + 2*Sech[\[Eta]4]*(-(kT3*Sqrt[S]*(-S34 + U)*
+                 Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                       Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                       Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                        \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                 (Cos[\[Phi]3] + I*Sin[\[Phi]3]))/(2*Sqrt[2]) + 
+              (kT4*MH^2*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                (Cos[\[Phi]4] + I*Sin[\[Phi]4]))/(2*Sqrt[2]) - 
+              (kT4*Sqrt[S]*T24*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                (Cos[\[Phi]4] + I*Sin[\[Phi]4]))/(2*Sqrt[2]) - 
+              (kT4*Sqrt[S]*U*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                (Cos[\[Phi]4] + I*Sin[\[Phi]4]))/Sqrt[2] + (MH^2*Sqrt[S]*
+                Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*(kT3*Cos[\[Phi]3] + 
+                 kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))/
+               (2*Sqrt[2]) - (Sqrt[S]*S34*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                     4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                       2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                      Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                      Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                        \[Phi]4])]]*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + 
+                 I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))/Sqrt[2] - 
+              (Sqrt[S]*T24*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])))/(2*Sqrt[2]) - (kT3*S34*
+                (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4]))*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                      (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                     (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                         kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                         kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                         4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                    Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                      (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+                 Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3]))/Sqrt[2] + (kT3*U*(kT3*Cos[\[Phi]3] + 
+                 kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3]))/Sqrt[2] - (kT4*MH^2*(kT3*Cos[\[Phi]3] + 
+                 kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]4]))/Sqrt[2] + (kT4*T24*(kT3*Cos[\[Phi]3] + 
+                 kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]4]))/Sqrt[2] + Sqrt[2]*kT4*U*(kT3*Cos[\[Phi]3] + 
+                kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*(
+                Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                       Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                       kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                  (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                       \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                        4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+                Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                       Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                       Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                        \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                 Sinh[\[Eta]4]))*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+              Sinh[\[Eta]4 + I*\[Phi]4]) - Sqrt[2]*kT4*Sqrt[S]*
+             (-MH^2 + S34 + T24 + U)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                     \[Phi]4])]]*Sech[\[Eta]4]*(Cos[\[Phi]4] - 
+              I*Sin[\[Phi]4])*(Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + 
+                I*\[Phi]4]) + 2*Sqrt[2]*kT4*(-MH^2 + S34 + T24 + U)*
+             Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+             (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                kT4*Sin[\[Phi]4]))*(-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])]] - I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                     kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                 I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                 I*\[Phi]4]) - 2*Sqrt[2]*(MH^2 - S34 - T24 - U)*
+             (I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+              Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+             (-(kT3*Sqrt[S]*Sech[\[Eta]4]*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/
+               4 + (kT4*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+                (-((Sqrt[S]*Sech[\[Eta]4])/Sqrt[2]) - (kT3*Sech[\[Eta]4]*
+                   (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                  Sqrt[2]))/Sqrt[2]))) - 
+        2*(ScalarC0[MH^2, MH^2 - S - T - T14, T24, Sqrt[MT^2], Sqrt[MT^2], 
+            Sqrt[MT^2]]*(-((S*(S34 + U)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])]]*Sech[\[Eta]4])/Sqrt[2]) + 
+            (Sqrt[S]*(S34 + U)*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+              (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4])))/Sqrt[2] + ((-(S34*T) + S34*T14 + MH^2*
+                (S34 - U) + T*U + T14*U - S*(S34 + U))*
+              (I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                       \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+              (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+             (2*Sqrt[2]) + 2*Sech[\[Eta]4]*(-(kT4*Sqrt[S]*S34*Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*(Cos[\[Phi]4] + 
+                  I*Sin[\[Phi]4]))/(2*Sqrt[2]) - ((kT3*Cos[\[Phi]3] + 
+                 kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                ((Sqrt[S]*U*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]])/2 - kT4*S34*(Conjugate[
+                     (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                     (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                    Sinh[\[Eta]4])))/Sqrt[2])*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+              Sinh[\[Eta]4 + I*\[Phi]4]) - (kT4*Sqrt[S]*(S34 + U)*
+              Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+              (Cos[\[Phi]4] - I*Sin[\[Phi]4])*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+               Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2] + Sqrt[2]*kT4*(S34 + U)*
+             Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+             (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                kT4*Sin[\[Phi]4]))*(-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])]] - I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                     kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                 I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                 I*\[Phi]4]) + 8*((kT3*kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3]))/Sqrt[2] + (kT3*(Cos[\[Phi]3] + 
+                 I*Sin[\[Phi]3])*(-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                         4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])]])/2 + 
+                 kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                         Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                         2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                         4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                     (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                    Sinh[\[Eta]3])))/Sqrt[2])*((kT3*Sqrt[S]*Sech[\[Eta]4]*
+                (Cos[\[Phi]3] - I*Sin[\[Phi]3]))/4 + (kT3*kT4*Sech[\[Eta]4]*
+                (Cos[\[Phi]4] - I*Sin[\[Phi]4])*(-Sinh[\[Eta]3] + 
+                 Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/2) + 
+            2*Sqrt[2]*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                    kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+              Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*((kT3*Sqrt[S]*(-MH^2 + T)*
+                Sech[\[Eta]4]*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/4 + 
+              (kT4*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*(-(Sqrt[S]*(S34 + U)*
+                    Sech[\[Eta]4])/(2*Sqrt[2]) + (kT3*(-MH^2 + T)*
+                   Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                      I*\[Phi]4]))/Sqrt[2]))/Sqrt[2])) + 
+          (((2*MH^2 - S - T - T14 - T24)*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/
+             Kallen\[Lambda][MH^2, MH^2 - S - T - T14, T24] - 
+            (2*(MH^2 - S - T - T14)*DiscB[MH^2 - S - T - T14, Sqrt[MT^2], 
+               Sqrt[MT^2]])/Kallen\[Lambda][MH^2, MH^2 - S - T - T14, T24] - 
+            ((S + T + T14 - T24)*DiscB[T24, Sqrt[MT^2], Sqrt[MT^2]])/
+             Kallen\[Lambda][MH^2, MH^2 - S - T - T14, T24] + 
+            ((MH^2 - S - T - T14)*(S + T + T14 + T24)*ScalarC0[MH^2, MH^2 - 
+                S - T - T14, T24, Sqrt[MT^2], Sqrt[MT^2], Sqrt[MT^2]])/
+             Kallen\[Lambda][MH^2, MH^2 - S - T - T14, T24])*
+           (-(Sqrt[2]*S*(S34 + U)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                      \[Phi]4])]]*Sech[\[Eta]4]) + Sqrt[2]*Sqrt[S]*(S34 + U)*
+             ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+              Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+             (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                kT4*Sin[\[Phi]4])) + ((-S34^2 - 4*S34*T + 2*S34*T14 + 4*MH^2*
+                (S34 - U) + 4*T*U + 2*T14*U + U^2 - 2*S*(S34 + U))*
+              (I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                       \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+              (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+             (2*Sqrt[2]) + 2*Sech[\[Eta]4]*(-(kT3*Sqrt[S]*(-3*S34 + U)*
+                 Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                       Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                       Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                        \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                 (Cos[\[Phi]3] + I*Sin[\[Phi]3]))/(2*Sqrt[2]) - 
+              ((kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4]))*(Sqrt[S]*(S34 + U)*Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                 kT3*(-3*S34 + U)*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                        (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                       (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                          kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                          kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                          4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                        (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                         4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                    Cos[\[Phi]3] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                        (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                       (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                          kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                          kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                          4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                        (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                         4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                    Sin[\[Phi]3] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                         4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])))/Sqrt[2])*
+             (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]) - 
+            Sqrt[2]*kT4*Sqrt[S]*(S34 + U)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                     \[Phi]4])]]*Sech[\[Eta]4]*(Cos[\[Phi]4] - 
+              I*Sin[\[Phi]4])*(Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + 
+                I*\[Phi]4]) + 2*Sqrt[2]*kT4*(S34 + U)*Sech[\[Eta]4]*
+             (Cos[\[Phi]4] - I*Sin[\[Phi]4])*(kT3*Cos[\[Phi]3] + 
+              kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+             (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                    2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - I*Conjugate[
+                (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                 I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                 I*\[Phi]4]) + 32*((kT3*kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3]))/Sqrt[2] + (kT3*(Cos[\[Phi]3] + 
+                 I*Sin[\[Phi]3])*(-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                         4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])]])/2 + 
+                 kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                         Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                         2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                         4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                     (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                    Sinh[\[Eta]3])))/Sqrt[2])*((kT3*Sqrt[S]*Sech[\[Eta]4]*
+                (Cos[\[Phi]3] - I*Sin[\[Phi]3]))/4 + (kT3*kT4*Sech[\[Eta]4]*
+                (Cos[\[Phi]4] - I*Sin[\[Phi]4])*(-Sinh[\[Eta]3] + 
+                 Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/2) + 
+            2*Sqrt[2]*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                    kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+              Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+             ((kT3*Sqrt[S]*(-4*MH^2 + S34 + 4*T + U)*Sech[\[Eta]4]*
+                (Cos[\[Phi]3] - I*Sin[\[Phi]3]))/4 + (kT4*(Cos[\[Phi]4] - 
+                 I*Sin[\[Phi]4])*(-((Sqrt[S]*(S34 + U)*Sech[\[Eta]4])/
+                   Sqrt[2]) + (kT3*(-4*MH^2 + S34 + 4*T + U)*Sech[\[Eta]4]*
+                   (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                  Sqrt[2]))/Sqrt[2]))))/(MH^2 - S - T - T14) + 
+      ((4*(2 + Eps^(-1) + DiscB[T, Sqrt[MT^2], Sqrt[MT^2]] + 
+            Log[Mu^2/MT^2]) - 16*(3/4 + (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[
+                MT^2]])/(4*(MH^2 - T)) - (T*DiscB[T, Sqrt[MT^2], Sqrt[MT^2]])/
+             (4*(MH^2 - T)) + (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[
+                   -(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2)/(4*(MH^2 - T)) + 
+            (Eps^(-1) + Log[Mu^2/MT^2])/4 - 
+            (MT^2*Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/(2*MT^2)]^2)/
+             (4*(MH^2 - T))))*
+         ((Sqrt[S]*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                  Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                      \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+             Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+            ((kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3]))/Sqrt[2] - 
+             Sqrt[2]*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*
+                (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))))/2 - 
+          Sqrt[2]*Sqrt[S]*Sech[\[Eta]4]*
+           (-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                   (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 + 
+            kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                     Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                     kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+              Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+              Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                    2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])) - 
+          (Sech[\[Eta]4]*(-(Sqrt[2]*kT4*Sqrt[S]*Conjugate[
+                1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                     Cos[\[Phi]3 - \[Phi]4])]]*(Cos[\[Phi]4] + 
+                I*Sin[\[Phi]4])) - (kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*(
+                (Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                      (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/
+                 2 - kT4*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                      (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                          kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                          kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                          4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                      (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                       (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+                  Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                         Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]4])))/Sqrt[2])*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+             Sinh[\[Eta]4 + I*\[Phi]4]))/2 - Sqrt[2]*kT4*Sech[\[Eta]4]*
+           (Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+           (-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                   (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 + 
+            kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                     Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                     kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+              Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+              Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                    2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3]))*
+           (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]) + 
+          kT4*Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+           ((kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3]))/Sqrt[2] - 
+            Sqrt[2]*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + 
+              I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))*
+           (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+            I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]) + 
+          ((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*(((S - S34 - T14 + U)*Sech[\[Eta]4]*(
+                Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/2 - 
+             4*((Sqrt[S]*Sech[\[Eta]4]*(-(kT3*Cos[\[Phi]3]) - 
+                  kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                      \[Phi]4])))/4 + (kT3*kT4*Sech[\[Eta]4]*(Cos[\[Phi]4] - 
+                  I*Sin[\[Phi]4])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+                    I*\[Phi]4]))/2)))/Sqrt[2]) - 
+        2*(Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+           (2*(MH^2 - T)) - Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/
+              (2*MT^2)]^2/(2*(MH^2 - T)))*
+         (-2*(-(Sqrt[S]*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                       kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                    (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                 (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(
+                (kT3*(S + T14)*(Cos[\[Phi]3] + I*Sin[\[Phi]3]))/Sqrt[2] + 
+                (kT4*(MH^2 - T)*(Cos[\[Phi]4] + I*Sin[\[Phi]4]))/Sqrt[2]))/
+             2 - (Sqrt[S]*(MH^2 - T)*Sech[\[Eta]4]*
+              (-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                      (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/
+                2 + kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                     (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                         kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                         kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                         4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                    Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                      (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+                 Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3])))/Sqrt[2] + (Sech[\[Eta]4]*
+              ((kT4*Sqrt[S]*(MH^2 - T)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                      4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                        2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                       Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                       Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                        \[Phi]3 - \[Phi]4])]]*(Cos[\[Phi]4] + 
+                  I*Sin[\[Phi]4]))/Sqrt[2] + (kT3*(Cos[\[Phi]3] + 
+                  I*Sin[\[Phi]3])*(Sqrt[S]*(S + T14)*Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                  (Sqrt[S]*(S + S34 + T14 - U)*Conjugate[1/Sqrt[(kT3^2 + 
+                         kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                         kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                         4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                         2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 + 
+                  2*kT3*S*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                        (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                          kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                          kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                          4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                         (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                     Cos[\[Phi]3] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                         (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                         Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                          \[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]3])))/Sqrt[2])*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+               Sinh[\[Eta]4 + I*\[Phi]4]))/2 - (kT4*(MH^2 - T)*Sech[\[Eta]4]*
+              (Cos[\[Phi]4] - I*Sin[\[Phi]4])*(-(Sqrt[S]*Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 + kT3*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3]))*(Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[
+                \[Eta]4 + I*\[Phi]4]))/Sqrt[2] - kT4*Sech[\[Eta]4]*
+             ((kT3*(S + T14)*(Cos[\[Phi]3] + I*Sin[\[Phi]3]))/Sqrt[2] + 
+              (kT4*(MH^2 - T)*(Cos[\[Phi]4] + I*Sin[\[Phi]4]))/Sqrt[2])*
+             (Cos[\[Phi]4] - I*Sin[\[Phi]4])*(-Conjugate[
+                1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                     Cos[\[Phi]3 - \[Phi]4])]] - I*Conjugate[
+                (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                 I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                 I*\[Phi]4]) + 2*Sqrt[2]*kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+             (-(S*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                       Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                       Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                        \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                 Sech[\[Eta]4]*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                  I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))/8 + 
+              (kT4*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*(-(Sqrt[S]*Sech[\[Eta]4]*
+                    ((Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]])/2 + kT4*(Conjugate[
+                         (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                         (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[1/Sqrt[
+                          (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                          kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                        Sinh[\[Eta]4])))/(2*Sqrt[2]) - (kT3*Sqrt[S]*
+                   Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sech[\[Eta]4]*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+                      I*\[Phi]4]))/(2*Sqrt[2])))/Sqrt[2])) + 
+          ((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*(-((MH^2 - T)*(S - S34 - T14 + U)*
+                Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + 
+                   I*\[Phi]4]))/2 + 4*(MH^2 - T)*((Sqrt[S]*Sech[\[Eta]4]*
+                 (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                  I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))/4 + (kT3*kT4*
+                 Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+                 (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                2)))/Sqrt[2]) - 4*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/
+           (MH^2 - T) - DiscB[T, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - T))*
+         (-(Sqrt[S]*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                    kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+              Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+             ((kT3*(-5*MH^2 + 4*S34 + T + 2*T24 + 4*U)*(Cos[\[Phi]3] + 
+                 I*Sin[\[Phi]3]))/Sqrt[2] - Sqrt[2]*(MH^2 - T)*(
+                kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                  kT4*Sin[\[Phi]4]))))/2 + Sqrt[2]*Sqrt[S]*(MH^2 - T)*
+           Sech[\[Eta]4]*(-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])]])/2 + 
+            kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                     Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                     kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+              Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+              Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                    2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])) - 
+          (Sech[\[Eta]4]*(Sqrt[2]*kT4*Sqrt[S]*(MH^2 - T)*Conjugate[1/
+                Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                    Cos[\[Phi]3 - \[Phi]4])]]*(Cos[\[Phi]4] + I*
+                Sin[\[Phi]4]) + (kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*(
+                (Sqrt[S]*(7*MH^2 - 8*S34 - 3*T - 2*T24)*Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 - 
+                4*kT3*(-2*MH^2 + 2*S34 + T + 2*T14 + T24)*
+                 (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]3]) - kT4*(7*MH^2 - 3*T - 2*T24 - 8*U)*
+                 (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]4])))/Sqrt[2])*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+             Sinh[\[Eta]4 + I*\[Phi]4]))/2 + Sqrt[2]*kT4*(MH^2 - T)*
+           Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+           (-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                   (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 + 
+            kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                     Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                     kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+              Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+              Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                    2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3]))*
+           (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]) - 
+          kT4*Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+           ((kT3*(-5*MH^2 + 4*S34 + T + 2*T24 + 4*U)*(Cos[\[Phi]3] + I*
+                Sin[\[Phi]3]))/Sqrt[2] - Sqrt[2]*(MH^2 - T)*
+             (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                kT4*Sin[\[Phi]4])))*(-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                     \[Phi]4])]] - I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                  kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                   kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                 Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                     \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+             Cosh[\[Eta]4 + I*\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]) + 
+          ((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*(-((MH^2 - T)*(S - S34 - T14 + U)*
+                Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + 
+                   I*\[Phi]4]))/2 + 4*(MH^2 - T)*((Sqrt[S]*Sech[\[Eta]4]*
+                 (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                  I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))/4 + (kT3*kT4*
+                 Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+                 (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                2)))/Sqrt[2] - 8*Sqrt[2]*kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+           (-(kT3*Sqrt[S]*Sech[\[Eta]4]*(-(kT3*Cos[\[Phi]3]) - 
+                kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*(
+                Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                       Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                       kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                  (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                       \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                        4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+                Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                       Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                       Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                        \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                 Sinh[\[Eta]3]))/4 + (kT3*Sqrt[S]*Sech[\[Eta]4]*
+              (Cos[\[Phi]3] - I*Sin[\[Phi]3])*((Sqrt[S]*Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 + kT4*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]4])))/4 + (kT4*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+              (-((kT3^2*Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                        (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                       (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                          kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                          kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                          4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                        (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                         4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                    Cos[\[Phi]3] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                        (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                       (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                          kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                          kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                          4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                        (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                         4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                    Sin[\[Phi]3] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                         4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])*
+                  (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                 Sqrt[2]) + (kT3*Sech[\[Eta]4]*((Sqrt[S]*Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/
+                   2 + kT4*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[
+                          \[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                        (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                          kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                          kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                          4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                         (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                     Cos[\[Phi]4] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                         (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                         Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                          \[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]4]))*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                    I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/Sqrt[2])) + 
+        8*((kT3*(-1/(2*(MH^2 - T)) - (MH^2*DiscB[MH^2, Sqrt[MT^2], 
+                Sqrt[MT^2]])/(2*(MH^2 - T)^2) + (MH^2*DiscB[T, Sqrt[MT^2], 
+                Sqrt[MT^2]])/(2*(MH^2 - T)^2) - 
+             (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/
+                  (2*MT^2)]^2)/(2*(MH^2 - T)^2) + 
+             (MT^2*Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/(2*MT^2)]^2)/
+              (2*(MH^2 - T)^2))*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+            (-(Sqrt[S]*(-MH^2 + 2*S + T + 2*T14)*((-I)*Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                    (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4])/2 - 
+             (Sech[\[Eta]4]*((Sqrt[S]*(-3*MH^2 + 4*S34 + T + 2*T24)*
+                  Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                        Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                        Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                         \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                      (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/
+                 2 - 2*kT3*(S - S34 - T14 + U)*(Conjugate[
+                    (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]3]) - kT4*(-3*MH^2 + T + 2*T24 + 4*U)*
+                 (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]4]))*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+                Sinh[\[Eta]4 + I*\[Phi]4]))/2 - kT4*(-MH^2 + 2*S + T + 2*T14)*
+              Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+              (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - I*Conjugate[
+                 (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                  I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                  I*\[Phi]4]) + 8*((kT3*S*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                      4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                        2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                       Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                       Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                        \[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*(Cos[\[Phi]3] - 
+                  I*Sin[\[Phi]3]))/8 + (kT4*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+                 ((kT3*Sqrt[S]*Sech[\[Eta]4]*(Conjugate[
+                       (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                       (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                       1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                          (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]]*Sinh[\[Eta]3]))/(2*Sqrt[2]) + 
+                  (kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]]*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + 
+                     Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/(2*Sqrt[2])))/
+                Sqrt[2])))/Sqrt[2] + 
+          (kT3*(-DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - T)) + 
+             DiscB[T, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - T)))*
+            (Cos[\[Phi]3] + I*Sin[\[Phi]3])*((Sqrt[S]*(-3*MH^2 + 2*S34 + T + 
+                2*U)*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                    (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                 (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4])/2 - 
+             (Sech[\[Eta]4]*((Sqrt[S]*(-3*MH^2 + 4*S34 + T)*Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 - 
+                2*kT3*(S - S34 - T14 + U)*(Conjugate[
+                    (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]3]) - kT4*(-3*MH^2 + T + 4*U)*
+                 (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]4]))*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+                Sinh[\[Eta]4 + I*\[Phi]4]))/2 + kT4*(-3*MH^2 + 2*S34 + T + 2*
+                U)*Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+              (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - I*Conjugate[
+                 (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                  I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                  I*\[Phi]4]) + 8*(-(kT3*Sqrt[S]*Sech[\[Eta]4]*
+                  (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                   I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                  (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                         Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                         2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                         4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                     (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                    Sinh[\[Eta]3]))/4 + (kT3*Sqrt[S]*Sech[\[Eta]4]*
+                 (Cos[\[Phi]3] - I*Sin[\[Phi]3])*((Sqrt[S]*Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/
+                   2 + kT4*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[
+                          \[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                        (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                          kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                          kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                          4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                         (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                     Cos[\[Phi]4] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                         (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                         Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                          \[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]4])))/4 + (kT4*(Cos[\[Phi]4] - 
+                  I*Sin[\[Phi]4])*(-((kT3^2*Sech[\[Eta]4]*(Conjugate[
+                        (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                        (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[1/Sqrt[
+                          (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                          kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                       Sinh[\[Eta]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - 
+                        I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]) + 
+                  (kT3*Sech[\[Eta]4]*((Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + 
+                          kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                          kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                          4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 + 
+                     kT4*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                         (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[1/Sqrt[
+                          (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                          kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                        Sinh[\[Eta]4]))*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                       I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/Sqrt[2])))/
+           Sqrt[2]))/T)/T24))/(MW*SW) + 
+ (2*Alfas^2*c3*EL*MT^2*
+   (((4*(2 + Eps^(-1) + DiscB[T, Sqrt[MT^2], Sqrt[MT^2]] + Log[Mu^2/MT^2]) - 
+        16*(3/4 + (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/(4*(MH^2 - T)) - 
+          (T*DiscB[T, Sqrt[MT^2], Sqrt[MT^2]])/(4*(MH^2 - T)) + 
+          (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*
+                MT^2)]^2)/(4*(MH^2 - T)) + (Eps^(-1) + Log[Mu^2/MT^2])/4 - 
+          (MT^2*Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/(2*MT^2)]^2)/
+           (4*(MH^2 - T))))*
+       (-((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]] + Conjugate[
+             (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+               kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+               (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                   2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+           (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+         (2*Sqrt[2]) + 
+        (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]] + Conjugate[
+            (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+              kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+              (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+          (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/
+         (2*Sqrt[2]) - Sqrt[2]*Sech[\[Eta]4]*
+         (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                 Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                 Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+          I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+               Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+           Cosh[\[Eta]4 + I*\[Phi]4] + 
+          Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+               Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+           Sinh[\[Eta]4 + I*\[Phi]4])) - 
+      2*(Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+         (2*(MH^2 - T)) - Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/
+            (2*MT^2)]^2/(2*(MH^2 - T)))*
+       (-(Sech[\[Eta]4]*(((-MH^2 + T)*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] - 
+            (kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                    Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                   kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                    Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                  (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+              (Cos[\[Phi]3] + I*Sin[\[Phi]3]))/Sqrt[2])*
+           (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+        Sqrt[2]*(MH^2 - T)*Sech[\[Eta]4]*
+         (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                 Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                 Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+          I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+               Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+           Cosh[\[Eta]4 + I*\[Phi]4] + 
+          Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+               Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+           Sinh[\[Eta]4 + I*\[Phi]4]) - 
+        (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]] + Conjugate[
+            (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+              kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+              (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+          (-(kT3*Sqrt[S]*Sech[\[Eta]4]*(Cos[\[Phi]3] + I*Sin[\[Phi]3]))/2 - 
+           ((-MH^2 + T)*Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+              Sinh[\[Eta]4 + I*\[Phi]4]))/2))/Sqrt[2]) - 
+      8*Sqrt[2]*kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+       ((-1/(2*(MH^2 - T)) - (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/
+           (2*(MH^2 - T)^2) + (MH^2*DiscB[T, Sqrt[MT^2], Sqrt[MT^2]])/
+           (2*(MH^2 - T)^2) - (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[
+                 -(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2)/(2*(MH^2 - T)^2) + 
+          (MT^2*Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/(2*MT^2)]^2)/
+           (2*(MH^2 - T)^2))*
+         ((Sqrt[S]*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                  Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                      \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+             Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*Sech[\[Eta]4])/4 + 
+          (Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+            (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/4) + 
+        (-DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - T)) + 
+          DiscB[T, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - T)))*
+         ((kT3*Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+             Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+             Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])*
+            (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+          kT3*Sech[\[Eta]4]*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+           (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+            I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]) - 
+          (kT3*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + 
+             Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/2)) - 
+      4*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - T) - 
+        DiscB[T, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - T))*
+       (-(Sech[\[Eta]4]*(((-MH^2 + T)*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] + 
+            Sqrt[2]*kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+             (-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/
+               2 - kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                         \[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                    (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+                Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                       Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])))*
+           (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+        Sqrt[2]*Sech[\[Eta]4]*(MH^2 - T + kT3^2*(Cos[\[Phi]3] - 
+            I*Sin[\[Phi]3])*(Cos[\[Phi]3] + I*Sin[\[Phi]3]))*
+         (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                 Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                 Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+          I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+               Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+           Cosh[\[Eta]4 + I*\[Phi]4] + 
+          Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+               Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+           Sinh[\[Eta]4 + I*\[Phi]4]) - 
+        (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]] + Conjugate[
+            (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+              kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+              (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+          (-((-MH^2 + T)*Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[
+                \[Eta]4 + I*\[Phi]4]))/2 + Sqrt[2]*kT3*(Cos[\[Phi]3] + 
+             I*Sin[\[Phi]3])*(-(Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) + 
+             (kT3*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                  I*\[Phi]4]))/Sqrt[2])))/Sqrt[2]))/T + 
+    ((4*(2 + Eps^(-1) + DiscB[S34, Sqrt[MT^2], Sqrt[MT^2]] + 
+          Log[Mu^2/MT^2]) - 16*(3/4 + (MH^2*DiscB[MH^2, Sqrt[MT^2], 
+             Sqrt[MT^2]])/(4*(MH^2 - S34)) - 
+          (S34*DiscB[S34, Sqrt[MT^2], Sqrt[MT^2]])/(4*(MH^2 - S34)) + 
+          (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*
+                MT^2)]^2)/(4*(MH^2 - S34)) + (Eps^(-1) + Log[Mu^2/MT^2])/4 - 
+          (MT^2*Log[(2*MT^2 - S34 + Sqrt[-((4*MT^2 - S34)*S34)])/(2*MT^2)]^2)/
+           (4*(MH^2 - S34))))*
+       (-((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]] + Conjugate[
+             (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+               kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+               (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                   2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+           (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+         (2*Sqrt[2]) + 
+        (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]] + Conjugate[
+            (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+              kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+              (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+          (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/
+         (2*Sqrt[2]) - Sqrt[2]*Sech[\[Eta]4]*
+         (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                 Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                 Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+          I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+               Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+           Cosh[\[Eta]4 + I*\[Phi]4] + 
+          Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+               Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+           Sinh[\[Eta]4 + I*\[Phi]4])) + 8*Sqrt[2]*kT3*Sech[\[Eta]4]*
+       ((-DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - S34)) + 
+          DiscB[S34, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - S34)))*
+         ((kT3*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/2 + 
+          (kT3*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*(Cos[\[Phi]3] + I*Sin[\[Phi]3]))/2 - 
+          2*kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+            Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+            Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])) + 
+        (-1/(2*(MH^2 - S34)) - (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/
+           (2*(MH^2 - S34)^2) + (MH^2*DiscB[S34, Sqrt[MT^2], Sqrt[MT^2]])/
+           (2*(MH^2 - S34)^2) - (MT^2*Log[(-MH^2 + 2*MT^2 + 
+                Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2)/
+           (2*(MH^2 - S34)^2) + 
+          (MT^2*Log[(2*MT^2 - S34 + Sqrt[-((4*MT^2 - S34)*S34)])/(2*MT^2)]^2)/
+           (2*(MH^2 - S34)^2))*
+         (-(kT4*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+              Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*(Cos[\[Phi]4] - 
+              I*Sin[\[Phi]4]))/2 - 
+          (kT4*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*(Cos[\[Phi]4] + I*Sin[\[Phi]4]))/2 + 
+          2*kT4*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+            Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])))*
+       (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]) - 
+      2*(Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+         (2*(MH^2 - S34)) - Log[(2*MT^2 - S34 + Sqrt[-((4*MT^2 - S34)*S34)])/
+            (2*MT^2)]^2/(2*(MH^2 - S34)))*
+       (((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]] + Conjugate[
+            (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+              kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+              (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+          (((MH^2 - S34)*Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+              Sinh[\[Eta]4 + I*\[Phi]4]))/2 + kT3*kT4*Sech[\[Eta]4]*
+            (Cos[\[Phi]4] - I*Sin[\[Phi]4])*(-Sinh[\[Eta]3] + 
+             Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4])))/Sqrt[2] + 
+        (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]] + Conjugate[
+            (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+              kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+              (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+          (-((MH^2 - S34)*Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[
+                \[Eta]4 + I*\[Phi]4]))/2 + kT3*kT4*Sech[\[Eta]4]*
+            (Cos[\[Phi]4] + I*Sin[\[Phi]4])*(-Sinh[\[Eta]3] + 
+             Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4])))/Sqrt[2] + 
+        2*(((MH^2 - S34)*Sech[\[Eta]4]*(-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                      \[Phi]4])]] - I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                    kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                 (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                I*\[Phi]4]))/Sqrt[2] - Sqrt[2]*kT3*kT4*Sech[\[Eta]4]*
+           (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+            Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])*
+           (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))) + 
+      4*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - S34) - 
+        DiscB[S34, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - S34))*
+       (((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]] + Conjugate[
+            (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+              kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+              (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+          (((-MH^2 + S34)*Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+              Sinh[\[Eta]4 + I*\[Phi]4]))/2 + Sqrt[2]*kT3*Sech[\[Eta]4]*
+            ((kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/Sqrt[2] - 
+             (kT4*(Cos[\[Phi]4] - I*Sin[\[Phi]4]))/Sqrt[2])*
+            (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4])))/
+         Sqrt[2] + (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                  kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                  kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                    Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                   kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                    Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                    \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+           Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+               Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+          (-((-MH^2 + S34)*Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[
+                \[Eta]4 + I*\[Phi]4]))/2 + Sqrt[2]*kT3*Sech[\[Eta]4]*
+            ((kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3]))/Sqrt[2] - 
+             (kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4]))/Sqrt[2])*
+            (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4])))/
+         Sqrt[2] + 2*(((-MH^2 + S34)*Sech[\[Eta]4]*
+            (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+             I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                I*\[Phi]4]))/Sqrt[2] + Sqrt[2]*kT3*Sech[\[Eta]4]*
+           (-(kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                      Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Cos[\[Phi]3] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+               Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])) + 
+            kT4*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                     Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                     kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+              Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+              Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                    2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4]))*
+           (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))) + 
+      (-8*((kT3*(-1/(2*(MH^2 - S34)) - (MH^2*DiscB[MH^2, Sqrt[MT^2], 
+                Sqrt[MT^2]])/(2*(MH^2 - S34)^2) + (MH^2*DiscB[S34, 
+                Sqrt[MT^2], Sqrt[MT^2]])/(2*(MH^2 - S34)^2) - 
+             (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/
+                  (2*MT^2)]^2)/(2*(MH^2 - S34)^2) + 
+             (MT^2*Log[(2*MT^2 - S34 + Sqrt[-((4*MT^2 - S34)*S34)])/(2*MT^2)]^
+                2)/(2*(MH^2 - S34)^2))*Sech[\[Eta]4]*
+            (Sqrt[S]*(-MH^2 + S34 + 2*T24)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                      \[Phi]4])]] - ((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                       kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                    (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                 (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*((kT3*(-MH^2 + S34 + 
+                   4*T14)*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/Sqrt[2] + 
+                (kT4*(MH^2 + 2*S - S34 - 2*T + 2*T14)*(Cos[\[Phi]4] - 
+                   I*Sin[\[Phi]4]))/Sqrt[2]))/Sqrt[2] - (-MH^2 + S34 + 2*T24)*
+              ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                       \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*(kT3*Cos[\[Phi]3] + kT4*
+                Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])) + 
+             8*(-(kT3*kT4*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                      (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  (Cos[\[Phi]3] + I*Sin[\[Phi]3])*(Cos[\[Phi]4] - 
+                   I*Sin[\[Phi]4]))/4 + (kT3*kT4*Sqrt[S]*Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*(Cos[\[Phi]3] - 
+                  I*Sin[\[Phi]3])*(Cos[\[Phi]4] + I*Sin[\[Phi]4]))/4 - 
+               ((kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                    kT4*Sin[\[Phi]4]))*(-((kT3*kT4*(Cos[\[Phi]4] - 
+                      I*Sin[\[Phi]4])*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                          (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                          Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                         Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                       Cos[\[Phi]3] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                          (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                         Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                       Sin[\[Phi]3] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                          \[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3]))/Sqrt[2]) + 
+                  (kT3*kT4*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+                    (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                       (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                       1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                          (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]]*Sinh[\[Eta]4]))/Sqrt[2]))/Sqrt[2]))*
+            (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+           Sqrt[2] + (kT3*(-DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/
+              (2*(MH^2 - S34)) + DiscB[S34, Sqrt[MT^2], Sqrt[MT^2]]/
+              (2*(MH^2 - S34)))*Sech[\[Eta]4]*(Sqrt[S]*(MH^2 - S34 - 2*U)*
+              Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] + 
+             ((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                       Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*(
+                -((kT3*(MH^2 - 2*S + S34 - 2*T + 2*T14)*(Cos[\[Phi]3] - 
+                    I*Sin[\[Phi]3]))/Sqrt[2]) + (kT4*(-3*MH^2 + S34 + 4*T)*
+                  (Cos[\[Phi]4] - I*Sin[\[Phi]4]))/Sqrt[2]))/Sqrt[2] - 
+             (MH^2 - S34 - 2*U)*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*(kT3*Cos[\[Phi]3] + kT4*
+                Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])) + 
+             8*(-(kT3*kT4*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                      (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  (Cos[\[Phi]3] + I*Sin[\[Phi]3])*(Cos[\[Phi]4] - 
+                   I*Sin[\[Phi]4]))/4 + (kT3*kT4*Sqrt[S]*Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*(Cos[\[Phi]3] - 
+                  I*Sin[\[Phi]3])*(Cos[\[Phi]4] + I*Sin[\[Phi]4]))/4 - 
+               ((kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                    kT4*Sin[\[Phi]4]))*(-((kT3*kT4*(Cos[\[Phi]4] - 
+                      I*Sin[\[Phi]4])*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                          (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                          Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                         Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                       Cos[\[Phi]3] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                          (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                         Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                       Sin[\[Phi]3] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                          \[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3]))/Sqrt[2]) + 
+                  (kT3*kT4*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+                    (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                       (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                       1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                          (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]]*Sinh[\[Eta]4]))/Sqrt[2]))/Sqrt[2]))*
+            (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+           Sqrt[2]) + (4*(2 + Eps^(-1) + DiscB[S34, Sqrt[MT^2], Sqrt[MT^2]] + 
+            Log[Mu^2/MT^2]) - 16*(3/4 + (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[
+                MT^2]])/(4*(MH^2 - S34)) - (S34*DiscB[S34, Sqrt[MT^2], Sqrt[
+                MT^2]])/(4*(MH^2 - S34)) + 
+            (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/
+                 (2*MT^2)]^2)/(4*(MH^2 - S34)) + (Eps^(-1) + Log[Mu^2/MT^2])/
+             4 - (MT^2*Log[(2*MT^2 - S34 + Sqrt[-((4*MT^2 - S34)*S34)])/
+                 (2*MT^2)]^2)/(4*(MH^2 - S34))))*
+         ((Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+            (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*
+                Sin[\[Phi]4]))*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+             Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2] - 
+          (Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+            (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+             I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+            (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/
+           Sqrt[2] + Sqrt[2]*Sech[\[Eta]4]*(-(kT3*Cos[\[Phi]3]) - 
+            kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+           (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+              kT4*Sin[\[Phi]4]))*(-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                     \[Phi]4])]] - I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                  kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                   kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                 Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                     \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+             Cosh[\[Eta]4 + I*\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]) + 
+          Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                 Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                 Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+           ((Sqrt[S]*Sech[\[Eta]4])/Sqrt[2] - (kT3*Sech[\[Eta]4]*
+              (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+             Sqrt[2]) - ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                  kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                   kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                 Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                     \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + 
+            I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+           ((Sqrt[S]*Sech[\[Eta]4])/Sqrt[2] - (kT3*Sech[\[Eta]4]*
+              (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+             Sqrt[2]) + ((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                    kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                 (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*(((-MH^2 + 2*S + T24 + U)*Sech[\[Eta]4]*(
+                Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/2 - 
+             ((-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                  kT4*Sin[\[Phi]4]))*(Sqrt[2]*Sqrt[S]*Sech[\[Eta]4] + 
+                (kT3*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                     I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/Sqrt[2]))/Sqrt[2]) - 
+        2*(Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+           (2*(MH^2 - S34)) - Log[(2*MT^2 - S34 + Sqrt[-((4*MT^2 - S34)*
+                  S34)])/(2*MT^2)]^2/(2*(MH^2 - S34)))*
+         (((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*(((MH^2 - S34)*(MH^2 - 2*S - T24 - U)*
+               Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + 
+                  I*\[Phi]4]))/2 - 2*((kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+                 ((Sqrt[S]*(MH^2 - S34)*Sech[\[Eta]4])/Sqrt[2] + Sqrt[2]*kT3*
+                   T14*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                      I*\[Phi]3 + I*\[Phi]4])))/Sqrt[2] + (kT4*
+                 (Cos[\[Phi]4] - I*Sin[\[Phi]4])*((Sqrt[S]*(MH^2 - S34)*
+                    Sech[\[Eta]4])/Sqrt[2] + (kT3*(MH^2 + S - S34 - T + T14)*
+                    Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                       I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/Sqrt[2])))/
+           Sqrt[2] + 4*(-(Sqrt[S]*(MH^2 - S34)*Conjugate[
+                1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                     Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*(
+                kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                  kT4*Sin[\[Phi]4]))*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+                Sinh[\[Eta]4 + I*\[Phi]4]))/(4*Sqrt[2]) + 
+            (Sqrt[S]*(MH^2 - S34)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                      \[Phi]4])]]*Sech[\[Eta]4]*(-(kT3*Cos[\[Phi]3]) - kT4*
+                Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+              (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/
+             (4*Sqrt[2]) + Sqrt[2]*kT3*Sech[\[Eta]4]*
+             (-(kT3*kT4*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                 (Cos[\[Phi]3] + I*Sin[\[Phi]3])*(Cos[\[Phi]4] - 
+                  I*Sin[\[Phi]4]))/4 + (kT3*kT4*Sqrt[S]*Conjugate[
+                 1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                       \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                       2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*(Cos[\[Phi]3] - 
+                 I*Sin[\[Phi]3])*(Cos[\[Phi]4] + I*Sin[\[Phi]4]))/4 - 
+              ((kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4]))*(-((kT3*kT4*(Cos[\[Phi]4] - 
+                     I*Sin[\[Phi]4])*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                          (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                          Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                          Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                          \[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                       (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                       1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                          (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]]*Sinh[\[Eta]3]))/Sqrt[2]) + 
+                 (kT3*kT4*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+                   (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]4]))/Sqrt[2]))/Sqrt[2])*(-Sinh[\[Eta]3] + 
+              Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]) + 
+            (Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+              ((Sqrt[S]*(-MH^2 + S34)*Sech[\[Eta]4])/(2*Sqrt[2]) + 
+               (kT3*T24*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                    I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/2 - 
+            ((kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4]))*(((MH^2 - S34)*Sech[\[Eta]4]*
+                 (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                  I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                 (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                  I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                         Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+                  Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+               (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                         Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                      (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                     (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                         kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                         kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                         4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                    Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                      (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+                 ((Sqrt[S]*(-MH^2 + S34)*Sech[\[Eta]4])/(2*Sqrt[2]) + 
+                  (kT3*T24*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                       I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/Sqrt[2]))/
+             Sqrt[2])) - 4*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/
+           (MH^2 - S34) - DiscB[S34, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - S34))*
+         (-(((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+              Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+             (-((MH^2 - S34)*(MH^2 - 2*S - T24 - U)*Sech[\[Eta]4]*
+                 (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+              (kT4*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*(Sqrt[2]*Sqrt[S]*
+                  (MH^2 - S34)*Sech[\[Eta]4] + (kT3*(5*MH^2 + 2*S - 3*S34 - 
+                    6*T + 2*T14)*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + 
+                    Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/Sqrt[
+                2] + (kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*(Sqrt[2]*Sqrt[S]*
+                  (MH^2 - S34)*Sech[\[Eta]4] + (kT3*(MH^2 - 2*S + S34 - 2*T + 
+                    6*T14)*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                      I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/Sqrt[2]))/Sqrt[2]) + 
+          2*(-(Sqrt[S]*(MH^2 - S34)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])]]*Sech[\[Eta]4]*(kT3*Cos[\[Phi]3] + 
+                kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*(
+                Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+             (2*Sqrt[2]) + (Sqrt[S]*(MH^2 - S34)*Conjugate[1/
+                Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                    Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+              (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4]))*(Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[
+                \[Eta]4 + I*\[Phi]4]))/(2*Sqrt[2]) + 4*Sqrt[2]*kT3*
+             Sech[\[Eta]4]*(-(kT3*kT4*Sqrt[S]*Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*(Cos[\[Phi]3] + 
+                  I*Sin[\[Phi]3])*(Cos[\[Phi]4] - I*Sin[\[Phi]4]))/4 + 
+              (kT3*kT4*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                (Cos[\[Phi]3] - I*Sin[\[Phi]3])*(Cos[\[Phi]4] + 
+                 I*Sin[\[Phi]4]))/4 - ((kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + 
+                 I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                (-((kT3*kT4*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+                    (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                       (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                       1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                          (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]]*Sinh[\[Eta]3]))/Sqrt[2]) + 
+                 (kT3*kT4*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+                   (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]4]))/Sqrt[2]))/Sqrt[2])*(-Sinh[\[Eta]3] + 
+              Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]) + 
+            (Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+              (-((Sqrt[S]*(MH^2 - S34)*Sech[\[Eta]4])/Sqrt[2]) + 
+               (kT3*(MH^2 - S34 + 2*T24 - 2*U)*Sech[\[Eta]4]*
+                 (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                Sqrt[2]))/2 - ((kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*
+                (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*((MH^2 - S34)*
+                Sech[\[Eta]4]*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                 I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                        Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                        Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                         \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                      (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                 I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+                 Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]) + 
+               (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                         Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                      (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                     (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                         kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                         kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                         4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                    Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                      (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+                 (-((Sqrt[S]*(MH^2 - S34)*Sech[\[Eta]4])/Sqrt[2]) + 
+                  (kT3*(MH^2 - S34 + 2*T24 - 2*U)*Sech[\[Eta]4]*
+                    (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                   Sqrt[2]))/Sqrt[2]))/Sqrt[2])))/(MH^2 - S - T - T14))/S34 + 
+    ((4*(2 + Eps^(-1) + DiscB[2*MH^2 - S34 - T - U, Sqrt[MT^2], Sqrt[MT^2]] + 
+          Log[Mu^2/MT^2]) - 16*(3/4 - (MH^2*DiscB[MH^2, Sqrt[MT^2], 
+             Sqrt[MT^2]])/(4*(MH^2 - S34 - T - U)) + 
+          ((2*MH^2 - S34 - T - U)*DiscB[2*MH^2 - S34 - T - U, Sqrt[MT^2], 
+             Sqrt[MT^2]])/(4*(MH^2 - S34 - T - U)) - 
+          (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*
+                MT^2)]^2)/(4*(MH^2 - S34 - T - U)) + 
+          (Eps^(-1) + Log[Mu^2/MT^2])/4 + 
+          (MT^2*Log[(-2*MH^2 + 2*MT^2 + S34 + T + U + Sqrt[
+                 -((2*MH^2 - S34 - T - U)*(-2*MH^2 + 4*MT^2 + S34 + T + U))])/
+               (2*MT^2)]^2)/(4*(MH^2 - S34 - T - U))))*
+       (-((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]] + Conjugate[
+             (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+               kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+               (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                   2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+           (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+         (2*Sqrt[2]) + 
+        (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]] + Conjugate[
+            (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+              kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+              (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+          (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/
+         (2*Sqrt[2]) - Sqrt[2]*Sech[\[Eta]4]*
+         (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                 Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                 Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+          I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+               Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+           Cosh[\[Eta]4 + I*\[Phi]4] + 
+          Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+               Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+           Sinh[\[Eta]4 + I*\[Phi]4])) - 
+      2*(-Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+         (2*(MH^2 - S34 - T - U)) + 
+        Log[(-2*MH^2 + 2*MT^2 + S34 + T + U + Sqrt[-((2*MH^2 - S34 - T - U)*
+                (-2*MH^2 + 4*MT^2 + S34 + T + U))])/(2*MT^2)]^2/
+         (2*(MH^2 - S34 - T - U)))*
+       ((Sech[\[Eta]4]*(((-MH^2 + S34 + T + U)*(I*Conjugate[
+                (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+               (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                 kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] + 
+           Sqrt[2]*kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + 
+             I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+            (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+             Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+             Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3]))*
+          (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/2 - 
+        (Sech[\[Eta]4]*(((-MH^2 + S34 + T + U)*((-I)*Conjugate[
+                (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+               (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                 kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] - 
+           Sqrt[2]*kT3*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+             I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+            (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+             Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+             Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3]))*
+          (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+        2*(((-MH^2 + S34 + T + U)*Sech[\[Eta]4]*
+            (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+             I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                I*\[Phi]4]))/Sqrt[2] - Sqrt[2]*kT3^2*Sech[\[Eta]4]*
+           (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+            Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+            Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])*
+           (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))) - 
+      kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+              Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+             Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+              Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                 Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                 Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+              2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+              4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+              kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+              4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+        Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+              Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+             Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+              Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                 Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                 Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+              2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+              4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+              kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+              4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+        Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+              4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+               Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                 \[Phi]4])]]*Sinh[\[Eta]3])*
+       (16*(1/(2*(MH^2 - S34 - T - U)) - (MH^2*DiscB[MH^2, Sqrt[MT^2], 
+             Sqrt[MT^2]])/(2*(MH^2 - S34 - T - U)^2) + 
+          (MH^2*DiscB[2*MH^2 - S34 - T - U, Sqrt[MT^2], Sqrt[MT^2]])/
+           (2*(MH^2 - S34 - T - U)^2) - 
+          (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*
+                MT^2)]^2)/(2*(MH^2 - S34 - T - U)^2) + 
+          (MT^2*Log[(-2*MH^2 + 2*MT^2 + S34 + T + U + Sqrt[
+                 -((2*MH^2 - S34 - T - U)*(-2*MH^2 + 4*MT^2 + S34 + T + U))])/
+               (2*MT^2)]^2)/(2*(MH^2 - S34 - T - U)^2))*
+         ((Sech[\[Eta]4]*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + 
+             I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+            (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+           (2*Sqrt[2]) + (Sech[\[Eta]4]*(-(kT3*Cos[\[Phi]3]) - 
+             kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+            (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/
+           (2*Sqrt[2]) - Sqrt[2]*kT3*Sech[\[Eta]4]*(Sinh[\[Eta]3] - 
+            Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4])) - 
+        16*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - S34 - T - U)) - 
+          DiscB[2*MH^2 - S34 - T - U, Sqrt[MT^2], Sqrt[MT^2]]/
+           (2*(MH^2 - S34 - T - U)))*
+         (-(kT3*Sech[\[Eta]4]*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+             (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+           (2*Sqrt[2]) + (kT3*Sech[\[Eta]4]*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+            (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/
+           (2*Sqrt[2]) - Sqrt[2]*kT3*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + 
+            Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))) - 
+      4*(-(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - S34 - T - U)) + 
+        DiscB[2*MH^2 - S34 - T - U, Sqrt[MT^2], Sqrt[MT^2]]/
+         (MH^2 - S34 - T - U))*
+       ((Sech[\[Eta]4]*(((-MH^2 + S34 + T + U)*(I*Conjugate[
+                (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+               (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                 kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] + 
+           2*kT3*((kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3]))/Sqrt[2] + 
+             (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4]))/Sqrt[2])*
+            (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+             Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+             Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3]))*
+          (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/2 - 
+        (Sech[\[Eta]4]*(((-MH^2 + S34 + T + U)*((-I)*Conjugate[
+                (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+               (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                 kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] + 
+           2*kT3*((kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/Sqrt[2] - 
+             (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4]))/Sqrt[2])*
+            (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+             Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+             Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3]))*
+          (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+        2*(((-MH^2 + S34 + T + U)*Sech[\[Eta]4]*
+            (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+             I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                I*\[Phi]4]))/Sqrt[2] + 2*kT3*
+           (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+            Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+            Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])*
+           (-((kT3*Sech[\[Eta]4]*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+                  I*\[Phi]4]))/Sqrt[2]) + (kT3*Sech[\[Eta]4]*
+              (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+             Sqrt[2]))) - (4*(2 + Eps^(-1) + DiscB[2*MH^2 - S34 - T - U, 
+           Sqrt[MT^2], Sqrt[MT^2]] + Log[Mu^2/MT^2])*
+         (((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*(-(kT4*Sqrt[S]*Sech[\[Eta]4]*(
+                Cos[\[Phi]4] - I*Sin[\[Phi]4])) + ((-S + T14)*Sech[\[Eta]4]*(
+                Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/2))/
+           Sqrt[2] + (kT4*Sech[\[Eta]4]*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*
+            (-2*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                    Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                   kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                    Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                  (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+             kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                      Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Cos[\[Phi]3] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+               Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3]))*
+            (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+           (2*Sqrt[2]) - 2*((Sqrt[S]*Sech[\[Eta]4]*(Sqrt[S]*Conjugate[
+                 1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                       \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                       2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - kT4*
+                ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                    (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*(Cos[\[Phi]4] + 
+                 I*Sin[\[Phi]4]) - kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                      (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                     (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                         kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                         kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                         4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                    Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                      (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+                 Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3])))/(2*Sqrt[2]) - (kT4*Sech[\[Eta]4]*
+              (Cos[\[Phi]4] - I*Sin[\[Phi]4])*(-(Sqrt[S]*Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]) + kT3*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3]))*(Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[
+                \[Eta]4 + I*\[Phi]4]))/(2*Sqrt[2]) - 
+            (kT4^2*Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+              (Cos[\[Phi]4] + I*Sin[\[Phi]4])*(-Conjugate[
+                 1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                       \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                       2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - I*Conjugate[
+                 (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                  I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                  I*\[Phi]4]))/Sqrt[2])) - 
+        16*(3/4 - (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/
+           (4*(MH^2 - S34 - T - U)) + ((2*MH^2 - S34 - T - U)*
+            DiscB[2*MH^2 - S34 - T - U, Sqrt[MT^2], Sqrt[MT^2]])/
+           (4*(MH^2 - S34 - T - U)) - 
+          (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*
+                MT^2)]^2)/(4*(MH^2 - S34 - T - U)) + 
+          (Eps^(-1) + Log[Mu^2/MT^2])/4 + 
+          (MT^2*Log[(-2*MH^2 + 2*MT^2 + S34 + T + U + Sqrt[
+                 -((2*MH^2 - S34 - T - U)*(-2*MH^2 + 4*MT^2 + S34 + T + U))])/
+               (2*MT^2)]^2)/(4*(MH^2 - S34 - T - U)))*
+         (((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*(-(kT4*Sqrt[S]*Sech[\[Eta]4]*(
+                Cos[\[Phi]4] - I*Sin[\[Phi]4])) + ((-S + T14)*Sech[\[Eta]4]*(
+                Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/2))/
+           Sqrt[2] + (kT4*Sech[\[Eta]4]*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*
+            (-2*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                    Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                   kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                    Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                  (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+             kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                      Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Cos[\[Phi]3] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+               Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3]))*
+            (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+           (2*Sqrt[2]) - 2*((Sqrt[S]*Sech[\[Eta]4]*(Sqrt[S]*Conjugate[
+                 1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                       \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                       2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - kT4*
+                ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                    (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*(Cos[\[Phi]4] + 
+                 I*Sin[\[Phi]4]) - kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                      (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                     (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                         kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                         kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                         4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                    Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                      (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+                 Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3])))/(2*Sqrt[2]) - (kT4*Sech[\[Eta]4]*
+              (Cos[\[Phi]4] - I*Sin[\[Phi]4])*(-(Sqrt[S]*Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]) + kT3*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3]))*(Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[
+                \[Eta]4 + I*\[Phi]4]))/(2*Sqrt[2]) - 
+            (kT4^2*Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+              (Cos[\[Phi]4] + I*Sin[\[Phi]4])*(-Conjugate[
+                 1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                       \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                       2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - I*Conjugate[
+                 (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                  I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                  I*\[Phi]4]))/Sqrt[2])) - 
+        2*(-Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+           (2*(MH^2 - S34 - T - U)) + 
+          Log[(-2*MH^2 + 2*MT^2 + S34 + T + U + Sqrt[-((2*MH^2 - S34 - T - U)*
+                  (-2*MH^2 + 4*MT^2 + S34 + T + U))])/(2*MT^2)]^2/
+           (2*(MH^2 - S34 - T - U)))*((kT4*Sqrt[S]*(MH^2 - S34 - T - U)*
+            ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(Cos[\[Phi]4] + 
+             I*Sin[\[Phi]4]))/Sqrt[2] - Sqrt[2]*Sqrt[S]*Sech[\[Eta]4]*
+           (-(Sqrt[S]*(-MH^2 + S34 + T + U)*Conjugate[
+                1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                     Cos[\[Phi]3 - \[Phi]4])]])/2 - 
+            kT3*(MH^2 - S34 - T24 - U)*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+              Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+              Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                    2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])) + 
+          ((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*(-(kT4*Sqrt[S]*(MH^2 - S34 - T - U)*Sech[
+                \[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])) - 
+             ((S - T14)*(-MH^2 + S + T14 + T24)*Sech[\[Eta]4]*(
+                Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/2))/
+           Sqrt[2] - Sech[\[Eta]4]*(-((kT3^2*(S - T14)*(Cos[\[Phi]3] + 
+                I*Sin[\[Phi]3])*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                    (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+                Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                       Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3]))/
+              Sqrt[2]) + (kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*
+              (Sqrt[S]*(MH^2 - S34 - T - U)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                     4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                       2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                      Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                      Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                        \[Phi]4])]] - kT3*(S34 + T - T24 - U)*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3])))/Sqrt[2])*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+            Sinh[\[Eta]4 + I*\[Phi]4]) - Sqrt[2]*kT4*Sech[\[Eta]4]*
+           (Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+           (-(Sqrt[S]*(-MH^2 + S34 + T + U)*Conjugate[
+                1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                     Cos[\[Phi]3 - \[Phi]4])]])/2 - 
+            kT3*(MH^2 - S34 - T24 - U)*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+              Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+              Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                    2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3]))*
+           (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]) + 
+          Sqrt[2]*kT4^2*(MH^2 - S34 - T - U)*Sech[\[Eta]4]*
+           (Cos[\[Phi]4] - I*Sin[\[Phi]4])*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*
+           (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+            I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]) - 
+          8*kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+            Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+            Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])*
+           ((kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*((Sqrt[S]*Sech[\[Eta]4]*
+                 (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                  I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))/4 + (kT3*kT4*
+                 Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+                 (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/2))/
+             Sqrt[2] + ((kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*
+                (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*((kT3*Sqrt[S]*
+                 Sech[\[Eta]4]*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/4 + 
+               (kT3*kT4*Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+                 (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                2))/Sqrt[2])) - 
+        8*(-(kT3*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - S34 - T - 
+                U)) - DiscB[2*MH^2 - S34 - T - U, Sqrt[MT^2], Sqrt[MT^2]]/
+              (2*(MH^2 - S34 - T - U)))*
+            (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+             Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+             Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])*
+            (-((Sqrt[S]*(MH^2 - S34 + T - U)*Sech[\[Eta]4])/Sqrt[2]) - 
+             (Sech[\[Eta]4]*(Sqrt[2]*kT3*(S - T14)*(Cos[\[Phi]3] + 
+                  I*Sin[\[Phi]3]) + (kT4*(MH^2 + S34 + T - 3*U)*
+                  (Cos[\[Phi]4] + I*Sin[\[Phi]4]))/Sqrt[2])*(
+                Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/2 - 
+             (kT4*(MH^2 - S34 + T - U)*Sech[\[Eta]4]*(Cos[\[Phi]4] - 
+                I*Sin[\[Phi]4])*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+                Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2] + 
+             8*((kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*((Sqrt[S]*Sech[\[Eta]4]*
+                    (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                     I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))/4 + 
+                  (kT3*kT4*Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+                    (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                   2))/Sqrt[2] + ((kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + 
+                  I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                 ((kT3*Sqrt[S]*Sech[\[Eta]4]*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/
+                   4 + (kT3*kT4*Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+                    (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                   2))/Sqrt[2]))) - kT3*(1/(2*(MH^2 - S34 - T - U)) - 
+            (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/
+             (2*(MH^2 - S34 - T - U)^2) + (MH^2*DiscB[2*MH^2 - S34 - T - 
+                U, Sqrt[MT^2], Sqrt[MT^2]])/(2*(MH^2 - S34 - T - U)^2) - 
+            (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/
+                 (2*MT^2)]^2)/(2*(MH^2 - S34 - T - U)^2) + 
+            (MT^2*Log[(-2*MH^2 + 2*MT^2 + S34 + T + U + Sqrt[
+                   -((2*MH^2 - S34 - T - U)*(-2*MH^2 + 4*MT^2 + S34 + T + 
+                      U))])/(2*MT^2)]^2)/(2*(MH^2 - S34 - T - U)^2))*
+           (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+            Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+            Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])*
+           (-((Sqrt[S]*(MH^2 - S34 + T - 2*T24 - U)*Sech[\[Eta]4])/Sqrt[2]) - 
+            (Sech[\[Eta]4]*(Sqrt[2]*kT3*(S - T14)*(Cos[\[Phi]3] + 
+                 I*Sin[\[Phi]3]) + (kT4*(MH^2 + S34 + T - 2*T24 - 3*U)*
+                 (Cos[\[Phi]4] + I*Sin[\[Phi]4]))/Sqrt[2])*
+              (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/2 - 
+            (kT4*(MH^2 - S34 + T - 2*T24 - U)*Sech[\[Eta]4]*(Cos[\[Phi]4] - I*
+                Sin[\[Phi]4])*(Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + 
+                 I*\[Phi]4]))/Sqrt[2] + 8*((kT3*(Cos[\[Phi]3] + 
+                 I*Sin[\[Phi]3])*((Sqrt[S]*Sech[\[Eta]4]*
+                   (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                    I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))/4 + 
+                 (kT3*kT4*Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+                   (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                  2))/Sqrt[2] + ((kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + 
+                 I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                ((kT3*Sqrt[S]*Sech[\[Eta]4]*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/
+                  4 + (kT3*kT4*Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+                   (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                  2))/Sqrt[2]))) - 4*(-(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/
+            (MH^2 - S34 - T - U)) + DiscB[2*MH^2 - S34 - T - U, Sqrt[MT^2], 
+            Sqrt[MT^2]]/(MH^2 - S34 - T - U))*
+         (((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*(-(kT4*Sqrt[S]*(MH^2 - S34 - T - U)*Sech[
+                \[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])) - 
+             ((S - T14)*(-MH^2 + S + T14 + T24)*Sech[\[Eta]4]*(
+                Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/2))/
+           Sqrt[2] - (Sech[\[Eta]4]*(-2*Sqrt[2]*kT3^2*(S - T14)*
+              (Cos[\[Phi]3] + I*Sin[\[Phi]3])*(Conjugate[
+                 (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+               Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Sin[\[Phi]3] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                Sinh[\[Eta]3]) + (kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*(
+                2*Sqrt[S]*(MH^2 - S34 - T - U)*Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                kT3*(MH^2 + 3*S34 + 3*T - 2*T24 - 5*U)*
+                 (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]3])))/Sqrt[2])*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+             Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+          2*((kT4*Sqrt[S]*(MH^2 - S34 - T - U)*((-I)*Conjugate[
+                 (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+              (Cos[\[Phi]4] + I*Sin[\[Phi]4]))/(2*Sqrt[2]) - 
+            (Sqrt[S]*Sech[\[Eta]4]*(-(Sqrt[S]*(-MH^2 + S34 + T + U)*
+                 Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                       Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                       Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                        \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]) - 
+               kT3*(3*MH^2 - 3*S34 + T - 2*T24 - 3*U)*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3])))/(2*Sqrt[2]) - (kT4*Sech[\[Eta]4]*
+              (Cos[\[Phi]4] - I*Sin[\[Phi]4])*(-(Sqrt[S]*(-MH^2 + S34 + T + 
+                  U)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                       Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                       Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                        \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]) - 
+               kT3*(3*MH^2 - 3*S34 + T - 2*T24 - 3*U)*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3]))*(Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[
+                \[Eta]4 + I*\[Phi]4]))/(2*Sqrt[2]) + 
+            (kT4^2*(MH^2 - S34 - T - U)*Sech[\[Eta]4]*(Cos[\[Phi]4] - I*
+                Sin[\[Phi]4])*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*
+              (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - I*Conjugate[
+                 (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                  I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                  I*\[Phi]4]))/Sqrt[2] - 8*kT3*
+             (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                     Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                     kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+              Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+              Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                    2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])*
+             ((kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*((Sqrt[S]*Sech[\[Eta]4]*
+                   (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                    I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))/4 + 
+                 (kT3*kT4*Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+                   (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                  2))/Sqrt[2] + ((kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + 
+                 I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                ((kT3*Sqrt[S]*Sech[\[Eta]4]*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/
+                  4 + (kT3*kT4*Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+                   (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                  2))/Sqrt[2]))))/T24 - 
+      (4*(2 + Eps^(-1) + DiscB[2*MH^2 - S34 - T - U, Sqrt[MT^2], 
+           Sqrt[MT^2]] + Log[Mu^2/MT^2])*
+         (-(Sech[\[Eta]4]*(((-S + T24)*((-I)*Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                    (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] + 
+              (kT4*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*(2*Sqrt[S]*Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                 kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                         Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                         2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                         4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                     (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                    Sinh[\[Eta]3])))/Sqrt[2])*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+              Sinh[\[Eta]4 + I*\[Phi]4]))/2 - 
+          2*(-(kT4*Sqrt[S]*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                       kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                    (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                 (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(
+                Cos[\[Phi]4] + I*Sin[\[Phi]4]))/(2*Sqrt[2]) - 
+            (Sqrt[S]*Sech[\[Eta]4]*(-(Sqrt[S]*Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]) - kT4*
+                (I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                    (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*(Cos[\[Phi]4] - 
+                 I*Sin[\[Phi]4]) - kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                      (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                     (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                         kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                         kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                         4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                    Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                      (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+                 Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3])))/(2*Sqrt[2]) + 
+            (kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*((Sech[\[Eta]4]*
+                 (Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]] + kT3*(Conjugate[
+                      (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]3]))*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+                  Sinh[\[Eta]4 + I*\[Phi]4]))/2 - kT4*Sech[\[Eta]4]*
+                (Cos[\[Phi]4] - I*Sin[\[Phi]4])*(-Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                 I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+                 Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4])))/Sqrt[2])) - 
+        16*(3/4 - (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/
+           (4*(MH^2 - S34 - T - U)) + ((2*MH^2 - S34 - T - U)*
+            DiscB[2*MH^2 - S34 - T - U, Sqrt[MT^2], Sqrt[MT^2]])/
+           (4*(MH^2 - S34 - T - U)) - 
+          (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*
+                MT^2)]^2)/(4*(MH^2 - S34 - T - U)) + 
+          (Eps^(-1) + Log[Mu^2/MT^2])/4 + 
+          (MT^2*Log[(-2*MH^2 + 2*MT^2 + S34 + T + U + Sqrt[
+                 -((2*MH^2 - S34 - T - U)*(-2*MH^2 + 4*MT^2 + S34 + T + U))])/
+               (2*MT^2)]^2)/(4*(MH^2 - S34 - T - U)))*
+         (-(Sech[\[Eta]4]*(((-S + T24)*((-I)*Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                    (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] + 
+              (kT4*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*(2*Sqrt[S]*Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                 kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                         Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                         2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                         4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                     (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                    Sinh[\[Eta]3])))/Sqrt[2])*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+              Sinh[\[Eta]4 + I*\[Phi]4]))/2 - 
+          2*(-(kT4*Sqrt[S]*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                       kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                    (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                 (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(
+                Cos[\[Phi]4] + I*Sin[\[Phi]4]))/(2*Sqrt[2]) - 
+            (Sqrt[S]*Sech[\[Eta]4]*(-(Sqrt[S]*Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]) - kT4*
+                (I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                    (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*(Cos[\[Phi]4] - 
+                 I*Sin[\[Phi]4]) - kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                      (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                     (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                         kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                         kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                         4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                    Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                      (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+                 Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3])))/(2*Sqrt[2]) + 
+            (kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*((Sech[\[Eta]4]*
+                 (Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]] + kT3*(Conjugate[
+                      (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]3]))*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+                  Sinh[\[Eta]4 + I*\[Phi]4]))/2 - kT4*Sech[\[Eta]4]*
+                (Cos[\[Phi]4] - I*Sin[\[Phi]4])*(-Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                 I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+                 Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4])))/Sqrt[2])) + 
+        8*(-(kT3*(1/(2*(MH^2 - S34 - T - U)) - (MH^2*DiscB[MH^2, Sqrt[MT^2], 
+                Sqrt[MT^2]])/(2*(MH^2 - S34 - T - U)^2) + 
+             (MH^2*DiscB[2*MH^2 - S34 - T - U, Sqrt[MT^2], Sqrt[MT^2]])/
+              (2*(MH^2 - S34 - T - U)^2) - (MT^2*Log[(-MH^2 + 2*MT^2 + 
+                   Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2)/
+              (2*(MH^2 - S34 - T - U)^2) + (MT^2*Log[(-2*MH^2 + 2*MT^2 + 
+                   S34 + T + U + Sqrt[-((2*MH^2 - S34 - T - U)*(-2*MH^2 + 
+                       4*MT^2 + S34 + T + U))])/(2*MT^2)]^2)/
+              (2*(MH^2 - S34 - T - U)^2))*
+            (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+             Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+             Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])*
+            (-((Sqrt[S]*(MH^2 - S34 - T - 2*T14 + U)*Sech[\[Eta]4])/Sqrt[
+                2]) - (kT4*(MH^2 - S34 - T - 2*T14 + U)*Sech[\[Eta]4]*(
+                Cos[\[Phi]4] + I*Sin[\[Phi]4])*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+                Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2] + 
+             (Sech[\[Eta]4]*(-(Sqrt[2]*kT3*(S - T24)*(Cos[\[Phi]3] - 
+                   I*Sin[\[Phi]3])) + (kT4*(-3*MH^2 + S + 4*T + 3*T14 + T24)*
+                  (Cos[\[Phi]4] - I*Sin[\[Phi]4]))/Sqrt[2])*(
+                Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+             8*(-(kT3*Sqrt[S]*Sech[\[Eta]4]*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+                  (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                   I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))/(4*Sqrt[2]) - 
+               (kT3*Sqrt[S]*Sech[\[Eta]4]*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+                 (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                    kT4*Sin[\[Phi]4])))/(4*Sqrt[2]) + (kT4*(Cos[\[Phi]4] + 
+                  I*Sin[\[Phi]4])*(-(kT3^2*Sech[\[Eta]4]*(Cos[\[Phi]3] - 
+                      I*Sin[\[Phi]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - 
+                        I*\[Phi]3 + I*\[Phi]4]))/2 + (kT3*Sech[\[Eta]4]*
+                    (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                     I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                    (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                   2))/Sqrt[2]))) - kT3*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/
+             (2*(MH^2 - S34 - T - U)) - DiscB[2*MH^2 - S34 - T - U, 
+              Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - S34 - T - U)))*
+           (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+            Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+            Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])*
+           (-((Sqrt[S]*(MH^2 - S34 - T + U)*Sech[\[Eta]4])/Sqrt[2]) - 
+            (kT4*(MH^2 - S34 - T + U)*Sech[\[Eta]4]*(Cos[\[Phi]4] + I*
+                Sin[\[Phi]4])*(Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + 
+                 I*\[Phi]4]))/Sqrt[2] - (Sech[\[Eta]4]*(Sqrt[2]*kT3*(S - T24)*
+                (Cos[\[Phi]3] - I*Sin[\[Phi]3]) + (kT4*(MH^2 + S34 - 3*T + U)*
+                 (Cos[\[Phi]4] - I*Sin[\[Phi]4]))/Sqrt[2])*
+              (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+            8*(-(kT3*Sqrt[S]*Sech[\[Eta]4]*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+                 (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                  I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))/(4*Sqrt[2]) - 
+              (kT3*Sqrt[S]*Sech[\[Eta]4]*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+                (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])))/(4*Sqrt[2]) + (kT4*(Cos[\[Phi]4] + 
+                 I*Sin[\[Phi]4])*(-(kT3^2*Sech[\[Eta]4]*(Cos[\[Phi]3] - 
+                     I*Sin[\[Phi]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - 
+                       I*\[Phi]3 + I*\[Phi]4]))/2 + (kT3*Sech[\[Eta]4]*
+                   (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                    I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                   (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                  2))/Sqrt[2]))) - 
+        2*(-Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+           (2*(MH^2 - S34 - T - U)) + 
+          Log[(-2*MH^2 + 2*MT^2 + S34 + T + U + Sqrt[-((2*MH^2 - S34 - T - U)*
+                  (-2*MH^2 + 4*MT^2 + S34 + T + U))])/(2*MT^2)]^2/
+           (2*(MH^2 - S34 - T - U)))*
+         (-(Sech[\[Eta]4]*(-(((S - T24)*(-MH^2 + S + T14 + T24)*
+                 ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                         Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                      (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                     (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                         kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                         kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                         4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                    Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                      (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2]) - 
+              2*(-((kT3^2*(S - T24)*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+                   (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]3]))/Sqrt[2]) + (kT4*(Cos[\[Phi]4] - 
+                   I*Sin[\[Phi]4])*(-(Sqrt[S]*(MH^2 - S34 - T - U)*Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]]) - kT3*(-2*MH^2 + S + 2*S34 + T24 + 
+                     2*U)*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                         (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[
+                          kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                        Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                      Cos[\[Phi]3] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                          (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                          Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                          \[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                       1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                          (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]]*Sinh[\[Eta]3])))/Sqrt[2]))*
+             (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+          4*(-(kT4*Sqrt[S]*(MH^2 - S34 - T - U)*(I*Conjugate[
+                  (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                       \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                        4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                 (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(
+                Cos[\[Phi]4] - I*Sin[\[Phi]4]))/(4*Sqrt[2]) + 
+            (kT4*Sqrt[S]*(MH^2 - S34 - T - U)*((-I)*Conjugate[
+                 (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+              (Cos[\[Phi]4] + I*Sin[\[Phi]4]))/(4*Sqrt[2]) + 
+            (Sqrt[S]*Sech[\[Eta]4]*((Sqrt[S]*(-MH^2 + S34 + T + U)*
+                 Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                       Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                       Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                        \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/
+                2 - kT3*(-MH^2 + S + T24 + U)*(Conjugate[
+                   (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3])))/(2*Sqrt[2]) + 
+            (kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*((Sech[\[Eta]4]*
+                 ((Sqrt[S]*(-MH^2 + S34 + T + U)*Conjugate[1/Sqrt[
+                       (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                         kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                         4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                         2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 - 
+                  kT3*(-MH^2 + S + T24 + U)*(Conjugate[
+                      (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]3]))*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+                  Sinh[\[Eta]4 + I*\[Phi]4]))/2 + (kT4*(MH^2 - S34 - T - U)*
+                 Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+                 (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                  I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                         Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+                  Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/2))/
+             Sqrt[2] + 2*kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+              Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+              Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                    2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])*
+             (-(kT3*Sqrt[S]*Sech[\[Eta]4]*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+                 (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                  I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))/(4*Sqrt[2]) - 
+              (kT3*Sqrt[S]*Sech[\[Eta]4]*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+                (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])))/(4*Sqrt[2]) + (kT4*(Cos[\[Phi]4] + 
+                 I*Sin[\[Phi]4])*(-(kT3^2*Sech[\[Eta]4]*(Cos[\[Phi]3] - 
+                     I*Sin[\[Phi]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - 
+                       I*\[Phi]3 + I*\[Phi]4]))/2 + (kT3*Sech[\[Eta]4]*
+                   (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                    I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                   (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                  2))/Sqrt[2]))) - 4*(-(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/
+            (MH^2 - S34 - T - U)) + DiscB[2*MH^2 - S34 - T - U, Sqrt[MT^2], 
+            Sqrt[MT^2]]/(MH^2 - S34 - T - U))*
+         (-(Sech[\[Eta]4]*(-(((S - T24)*(-MH^2 + S + T14 + T24)*
+                 ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                         Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                      (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                     (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                         kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                         kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                         4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                    Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                      (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2]) - 
+              2*Sqrt[2]*kT3^2*(-S + T24)*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*(
+                Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                       Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                       kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                  (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                       \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                        4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+                Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                       Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                       Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                        \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                 Sinh[\[Eta]3]) + (kT4*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+                (-2*Sqrt[S]*(MH^2 - S - T14 - T24)*Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                 kT3*(-7*MH^2 + 3*S + 8*T + 5*T14 + 3*T24)*
+                  (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                         Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                         2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                         4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                     (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                    Sinh[\[Eta]3])))/Sqrt[2])*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+              Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+          2*(-(kT4*Sqrt[S]*(MH^2 - S34 - T - U)*(I*Conjugate[
+                  (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                       \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                        4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                 (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(
+                Cos[\[Phi]4] - I*Sin[\[Phi]4]))/(2*Sqrt[2]) + 
+            (kT4*Sqrt[S]*(MH^2 - S34 - T - U)*((-I)*Conjugate[
+                 (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+              (Cos[\[Phi]4] + I*Sin[\[Phi]4]))/(2*Sqrt[2]) + 
+            (Sqrt[S]*Sech[\[Eta]4]*(Sqrt[S]*(-MH^2 + S34 + T + U)*
+                Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - kT3*(3*MH^2 - 
+                 3*S34 - 3*T - 2*T14 + U)*(Conjugate[
+                   (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3])))/(2*Sqrt[2]) + 
+            (kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*((Sech[\[Eta]4]*
+                 (Sqrt[S]*(-MH^2 + S34 + T + U)*Conjugate[1/Sqrt[
+                      (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                        2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                  kT3*(3*MH^2 - 3*S34 - 3*T - 2*T14 + U)*(Conjugate[
+                      (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]3]))*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+                  Sinh[\[Eta]4 + I*\[Phi]4]))/2 + kT4*(MH^2 - S34 - T - U)*
+                Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+                (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                        Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                        Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                         \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                      (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                 I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+                 Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4])))/Sqrt[2] + 
+            8*kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                     Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                     kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+              Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+              Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                    2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])*
+             (-(kT3*Sqrt[S]*Sech[\[Eta]4]*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+                 (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                  I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))/(4*Sqrt[2]) - 
+              (kT3*Sqrt[S]*Sech[\[Eta]4]*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+                (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])))/(4*Sqrt[2]) + (kT4*(Cos[\[Phi]4] + 
+                 I*Sin[\[Phi]4])*(-(kT3^2*Sech[\[Eta]4]*(Cos[\[Phi]3] - 
+                     I*Sin[\[Phi]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - 
+                       I*\[Phi]3 + I*\[Phi]4]))/2 + (kT3*Sech[\[Eta]4]*
+                   (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                    I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                   (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                  2))/Sqrt[2]))))/T14)/(2*MH^2 - S34 - T - U) + 
+    ((4*T14*((-2*MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/
+           Kallen\[Lambda][MH^2, T14, MH^2 - S - T24 - U] + 
+          ((S + T14 + T24 + U)*DiscB[T14, Sqrt[MT^2], Sqrt[MT^2]])/
+           Kallen\[Lambda][MH^2, T14, MH^2 - S - T24 - U] + 
+          ((2*MH^2 - S - T14 - T24 - U)*DiscB[MH^2 - S - T24 - U, Sqrt[MT^2], 
+             Sqrt[MT^2]])/Kallen\[Lambda][MH^2, T14, MH^2 - S - T24 - U] - 
+          (MH^2*(S - T14 + T24 + U)*ScalarC0[MH^2, T14, MH^2 - S - T24 - U, 
+             Sqrt[MT^2], Sqrt[MT^2], Sqrt[MT^2]])/Kallen\[Lambda][MH^2, T14, 
+            MH^2 - S - T24 - U])*(-2*Sqrt[2]*Sqrt[S]*Sech[\[Eta]4]*
+           (-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                   (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 + 
+            ((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                       \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*(-(kT3*Cos[\[Phi]3]) - 
+               kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))/
+             2) - (Sech[\[Eta]4]*(((2*S - S34 + T - 2*T24)*(
+                (-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                       Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] - 
+             4*((kT4*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                 (Cos[\[Phi]4] - I*Sin[\[Phi]4]))/(2*Sqrt[2]) + 
+               ((-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                  I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                 (-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]])/2 - kT4*(Conjugate[
+                      (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]4])))/Sqrt[2]))*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+             Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 4*Sqrt[2]*kT4*
+           (Cos[\[Phi]4] + I*Sin[\[Phi]4])*
+           ((Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+              (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/4 + 
+            (Sech[\[Eta]4]*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + I*
+                (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+              (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - I*Conjugate[
+                 (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                  I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                  I*\[Phi]4]))/2) - 2*Sqrt[2]*
+           ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]] + Conjugate[
+             (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+               kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+               (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                   2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*((Sqrt[S]*Sech[\[Eta]4]*
+              (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4])))/4 + (kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*
+              ((Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) + (kT3*Sech[\[Eta]4]*
+                 (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                Sqrt[2]))/Sqrt[2])) - 
+        8*(3/4 + (MH^2*(S - T14 + T24 + U)*DiscB[MH^2, Sqrt[MT^2], 
+             Sqrt[MT^2]])/(4*Kallen\[Lambda][MH^2, T14, MH^2 - S - T24 - 
+              U]) - (T14*(2*MH^2 - S - T14 - T24 - U)*DiscB[T14, Sqrt[MT^2], 
+             Sqrt[MT^2]])/(4*Kallen\[Lambda][MH^2, T14, MH^2 - S - T24 - 
+              U]) - ((MH^2 - S - T24 - U)*(S + T14 + T24 + U)*
+            DiscB[MH^2 - S - T24 - U, Sqrt[MT^2], Sqrt[MT^2]])/
+           (4*Kallen\[Lambda][MH^2, T14, MH^2 - S - T24 - U]) + 
+          (Eps^(-1) + Log[Mu^2/MT^2])/4 + 
+          ((MT^2*S^2 + MH^4*T14 - 4*MH^2*MT^2*T14 - MH^2*S*T14 + 
+             2*MT^2*S*T14 + MT^2*T14^2 + 2*MT^2*S*T24 - MH^2*T14*T24 + 
+             2*MT^2*T14*T24 + MT^2*T24^2 + 2*MT^2*S*U - MH^2*T14*U + 
+             2*MT^2*T14*U + 2*MT^2*T24*U + MT^2*U^2)*ScalarC0[MH^2, T14, 
+             MH^2 - S - T24 - U, Sqrt[MT^2], Sqrt[MT^2], Sqrt[MT^2]])/
+           (2*Kallen\[Lambda][MH^2, T14, MH^2 - S - T24 - U]))*
+         (-2*Sqrt[2]*Sqrt[S]*Sech[\[Eta]4]*
+           (-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                   (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 + 
+            ((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                       \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*(-(kT3*Cos[\[Phi]3]) - 
+               kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))/
+             2) - (Sech[\[Eta]4]*(((2*S - S34 + T - 2*T24)*(
+                (-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                       Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] - 
+             4*((kT4*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                 (Cos[\[Phi]4] - I*Sin[\[Phi]4]))/(2*Sqrt[2]) + 
+               ((-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                  I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                 (-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]])/2 - kT4*(Conjugate[
+                      (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]4])))/Sqrt[2]))*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+             Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 4*Sqrt[2]*kT4*
+           (Cos[\[Phi]4] + I*Sin[\[Phi]4])*
+           ((Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+              (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/4 + 
+            (Sech[\[Eta]4]*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + I*
+                (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+              (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - I*Conjugate[
+                 (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                  I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                  I*\[Phi]4]))/2) - 2*Sqrt[2]*
+           ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]] + Conjugate[
+             (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+               kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+               (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                   2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*((Sqrt[S]*Sech[\[Eta]4]*
+              (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4])))/4 + (kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*
+              ((Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) + (kT3*Sech[\[Eta]4]*
+                 (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                Sqrt[2]))/Sqrt[2])) - 
+        2*(((S + T14 + T24 + U)*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/
+           Kallen\[Lambda][MH^2, T14, MH^2 - S - T24 - U] - 
+          (2*T14*DiscB[T14, Sqrt[MT^2], Sqrt[MT^2]])/Kallen\[Lambda][MH^2, 
+            T14, MH^2 - S - T24 - U] - ((S - T14 + T24 + U)*
+            DiscB[MH^2 - S - T24 - U, Sqrt[MT^2], Sqrt[MT^2]])/
+           Kallen\[Lambda][MH^2, T14, MH^2 - S - T24 - U] + 
+          (T14*(2*MH^2 - S - T14 - T24 - U)*ScalarC0[MH^2, T14, 
+             MH^2 - S - T24 - U, Sqrt[MT^2], Sqrt[MT^2], Sqrt[MT^2]])/
+           Kallen\[Lambda][MH^2, T14, MH^2 - S - T24 - U])*
+         (Sqrt[2]*S*(-2*MH^2 + S34 + T)*Conjugate[
+            1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                 Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                 Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                   \[Phi]4])]]*Sech[\[Eta]4] - Sqrt[2]*Sqrt[S]*
+           (-2*MH^2 + S34 + T)*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                  kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                   kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                 Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                     \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(-(kT3*Cos[\[Phi]3]) - 
+            kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])) + 
+          Sqrt[2]*kT4*Sqrt[S]*(-2*MH^2 + S34 + T)*Conjugate[
+            1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                 Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                 Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                   \[Phi]4])]]*Sech[\[Eta]4]*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*
+           (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]) - 
+          ((4*S*S34 - S34^2 + T^2 + 2*S34*T14 - 2*T*T14 - 
+             2*MH^2*(2*S - S34 + T - 2*T24) - 4*T*T24 - 2*S34*U + 2*T*U)*
+            ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+            (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/
+           (2*Sqrt[2]) + 2*Sech[\[Eta]4]*
+           ((Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*((kT3*(S34 - T)*
+                 (Cos[\[Phi]3] - I*Sin[\[Phi]3]))/Sqrt[2] + Sqrt[2]*kT4*
+                (-MH^2 + T)*(Cos[\[Phi]4] - I*Sin[\[Phi]4])))/2 + 
+            ((-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4]))*(Sqrt[S]*(MH^2 - S34)*Conjugate[
+                 1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                       \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                       2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - kT3*(S34 - T)*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3]) - 2*kT4*(-MH^2 + T)*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]4])))/Sqrt[2])*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+            Sinh[\[Eta]4 + I*\[Phi]4]) + 2*Sqrt[2]*kT4*(-2*MH^2 + S34 + T)*
+           Sech[\[Eta]4]*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*
+           (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+            I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+           (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+            I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]) + 
+          32*((kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                    Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                   kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                    Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                  (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+              (Cos[\[Phi]3] - I*Sin[\[Phi]3]))/(2*Sqrt[2]) - 
+            (kT3*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + I*
+                (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+              (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                      Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Cos[\[Phi]3] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+               Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3]))/
+             Sqrt[2])*((kT3*Sech[\[Eta]4]*(kT3*Cos[\[Phi]3] + kT4*
+                Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+              (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/2 + 
+            (kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*(-(Sqrt[S]*Sech[\[Eta]4])/
+                (2*Sqrt[2]) - (kT3*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + 
+                  Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/
+             Sqrt[2]) - 2*Sqrt[2]*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                  kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                   kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                 Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                     \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*(-(kT3*Sqrt[S]*(6*MH^2 - 3*S34 - 3*T - 
+                4*U)*Sech[\[Eta]4]*(Cos[\[Phi]3] + I*Sin[\[Phi]3]))/4 + 
+            (kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*((Sqrt[S]*(-2*MH^2 + S34 + 
+                  T)*Sech[\[Eta]4])/Sqrt[2] + (kT3*(6*MH^2 - 3*S34 - 3*T - 
+                  4*U)*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                    I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/Sqrt[2])) - 
+        4*((-((S^3 - 10*MH^2*S*T14 + 5*S^2*T14 - 6*MH^2*T14^2 + 7*S*T14^2 + 
+                3*T14^3 + 3*S^2*T24 - 10*MH^2*T14*T24 + 10*S*T14*T24 + 
+                7*T14^2*T24 + 3*S*T24^2 + 5*T14*T24^2 + T24^3 + 3*S^2*U - 
+                10*MH^2*T14*U + 10*S*T14*U + 7*T14^2*U + 6*S*T24*U + 
+                10*T14*T24*U + 3*T24^2*U + 3*S*U^2 + 5*T14*U^2 + 3*T24*U^2 + 
+                U^3)*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/
+             (2*Kallen\[Lambda][MH^2, T14, MH^2 - S - T24 - U]^2) - 
+            (3*T14^2*(2*MH^2 - S - T14 - T24 - U)*DiscB[T14, Sqrt[MT^2], Sqrt[
+                MT^2]])/Kallen\[Lambda][MH^2, T14, MH^2 - S - T24 - U]^2 + 
+            ((S^3 - 10*MH^2*S*T14 + 5*S^2*T14 + 6*MH^2*T14^2 + S*T14^2 - 3*
+                T14^3 + 3*S^2*T24 - 10*MH^2*T14*T24 + 10*S*T14*T24 + T14^2*
+                T24 + 3*S*T24^2 + 5*T14*T24^2 + T24^3 + 3*S^2*U - 10*MH^2*T14*
+                U + 10*S*T14*U + T14^2*U + 6*S*T24*U + 10*T14*T24*U + 3*T24^2*
+                U + 3*S*U^2 + 5*T14*U^2 + 3*T24*U^2 + U^3)*DiscB[MH^2 - S - 
+                T24 - U, Sqrt[MT^2], Sqrt[MT^2]])/(2*Kallen\[Lambda][MH^2, 
+                T14, MH^2 - S - T24 - U]^2) + T14/Kallen\[Lambda][MH^2, T14, 
+              MH^2 - S - T24 - U] + (T14*(2*MT^2*S^2 + 6*MH^4*T14 - 8*MH^2*
+                MT^2*T14 - 6*MH^2*S*T14 + 4*MT^2*S*T14 + S^2*T14 - 4*MH^2*
+                T14^2 + 2*MT^2*T14^2 + 2*S*T14^2 + T14^3 + 4*MT^2*S*T24 - 6*
+                MH^2*T14*T24 + 4*MT^2*T14*T24 + 2*S*T14*T24 + 2*T14^2*T24 + 2*
+                MT^2*T24^2 + T14*T24^2 + 4*MT^2*S*U - 6*MH^2*T14*U + 4*MT^2*
+                T14*U + 2*S*T14*U + 2*T14^2*U + 4*MT^2*T24*U + 2*T14*T24*U + 
+               2*MT^2*U^2 + T14*U^2)*ScalarC0[MH^2, T14, MH^2 - S - T24 - 
+                U, Sqrt[MT^2], Sqrt[MT^2], Sqrt[MT^2]])/
+             Kallen\[Lambda][MH^2, T14, MH^2 - S - T24 - U]^2)*
+           (((S34 - T)*(-2*MH^2 + S34 + T + 2*U)*((-I)*Conjugate[
+                 (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+              (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/
+             (2*Sqrt[2]) + 2*(S34 - T)*Sech[\[Eta]4]*
+             ((kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                (Cos[\[Phi]3] - I*Sin[\[Phi]3]))/(2*Sqrt[2]) - 
+              (kT3*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                 I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3]))/Sqrt[2])*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+              Sinh[\[Eta]4 + I*\[Phi]4]) - 2*Sqrt[2]*(2*MH^2 - S34 - T - 2*U)*
+             ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+              Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+             (-(kT3*Sqrt[S]*Sech[\[Eta]4]*(Cos[\[Phi]3] + I*Sin[\[Phi]3]))/
+               4 + (kT3*kT4*Sech[\[Eta]4]*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*
+                (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+               2) + 16*((kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                     4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                       2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                      Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                      Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                        \[Phi]4])]]*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/(2*
+                Sqrt[2]) - (kT3*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                 I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3]))/Sqrt[2])*(-(kT3*Sqrt[S]*Sech[\[Eta]4]*
+                 (Cos[\[Phi]3] + I*Sin[\[Phi]3]))/4 + (kT3*kT4*Sech[\[Eta]4]*
+                (Cos[\[Phi]4] + I*Sin[\[Phi]4])*(-Sinh[\[Eta]3] + 
+                 Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/2)) + 
+          (-(MH^2*(S^2 + 8*MH^2*T14 - 4*S*T14 - 5*T14^2 + 2*S*T24 - 
+                4*T14*T24 + T24^2 + 2*S*U - 4*T14*U + 2*T24*U + U^2)*DiscB[
+                MH^2, Sqrt[MT^2], Sqrt[MT^2]])/(2*Kallen\[Lambda][MH^2, T14, 
+                MH^2 - S - T24 - U]^2) + (T14*(6*MH^2*S - S^2 - 2*MH^2*T14 - 
+               2*S*T14 - T14^2 + 6*MH^2*T24 - 2*S*T24 - 2*T14*T24 - T24^2 + 6*
+                MH^2*U - 2*S*U - 2*T14*U - 2*T24*U - U^2)*DiscB[T14, Sqrt[
+                MT^2], Sqrt[MT^2]])/(2*Kallen\[Lambda][MH^2, T14, 
+                MH^2 - S - T24 - U]^2) + ((MH^2*S^2 + 8*MH^4*T14 - 10*MH^2*S*
+                T14 + S^2*T14 - 3*MH^2*T14^2 + 2*S*T14^2 + T14^3 + 2*MH^2*S*
+                T24 - 10*MH^2*T14*T24 + 2*S*T14*T24 + 2*T14^2*T24 + MH^2*
+                T24^2 + T14*T24^2 + 2*MH^2*S*U - 10*MH^2*T14*U + 2*S*T14*U + 
+               2*T14^2*U + 2*MH^2*T24*U + 2*T14*T24*U + MH^2*U^2 + T14*U^2)*
+              DiscB[MH^2 - S - T24 - U, Sqrt[MT^2], Sqrt[MT^2]])/
+             (2*Kallen\[Lambda][MH^2, T14, MH^2 - S - T24 - U]^2) - 
+            (S + T14 + T24 + U)/(2*Kallen\[Lambda][MH^2, T14, MH^2 - S - 
+                T24 - U]) - ((MT^2*S^3 + 3*MH^4*S*T14 - 4*MH^2*MT^2*S*T14 - 2*
+                MH^2*S^2*T14 + 3*MT^2*S^2*T14 - MH^4*T14^2 - 4*MH^2*MT^2*
+                T14^2 - MH^2*S*T14^2 + 3*MT^2*S*T14^2 + MH^2*T14^3 + MT^2*
+                T14^3 + 3*MT^2*S^2*T24 + 3*MH^4*T14*T24 - 4*MH^2*MT^2*T14*
+                T24 - 4*MH^2*S*T14*T24 + 6*MT^2*S*T14*T24 - MH^2*T14^2*T24 + 
+               3*MT^2*T14^2*T24 + 3*MT^2*S*T24^2 - 2*MH^2*T14*T24^2 + 3*MT^2*
+                T14*T24^2 + MT^2*T24^3 + 3*MT^2*S^2*U + 3*MH^4*T14*U - 4*MH^2*
+                MT^2*T14*U - 4*MH^2*S*T14*U + 6*MT^2*S*T14*U - MH^2*T14^2*
+                U + 3*MT^2*T14^2*U + 6*MT^2*S*T24*U - 4*MH^2*T14*T24*U + 6*
+                MT^2*T14*T24*U + 3*MT^2*T24^2*U + 3*MT^2*S*U^2 - 2*MH^2*T14*
+                U^2 + 3*MT^2*T14*U^2 + 3*MT^2*T24*U^2 + MT^2*U^3)*
+              ScalarC0[MH^2, T14, MH^2 - S - T24 - U, Sqrt[MT^2], Sqrt[MT^2], 
+               Sqrt[MT^2]])/Kallen\[Lambda][MH^2, T14, MH^2 - S - T24 - U]^2)*
+           (((S34 - T)*(-2*MH^2 + S34 + T + 2*U)*((-I)*Conjugate[
+                 (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+              (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/
+             (2*Sqrt[2]) + 2*(S34 - T)*Sech[\[Eta]4]*
+             ((kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                (Cos[\[Phi]3] - I*Sin[\[Phi]3]))/(2*Sqrt[2]) - 
+              (kT3*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                 I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3]))/Sqrt[2])*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+              Sinh[\[Eta]4 + I*\[Phi]4]) - 2*Sqrt[2]*(2*MH^2 - S34 - T - 2*U)*
+             ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+              Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+             (-(kT3*Sqrt[S]*Sech[\[Eta]4]*(Cos[\[Phi]3] + I*Sin[\[Phi]3]))/
+               4 + (kT3*kT4*Sech[\[Eta]4]*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*
+                (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+               2) + 16*((kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                     4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                       2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                      Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                      Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                        \[Phi]4])]]*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/(2*
+                Sqrt[2]) - (kT3*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                 I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3]))/Sqrt[2])*((kT3*Sech[\[Eta]4]*
+                (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4]))*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                   I*\[Phi]3 + I*\[Phi]4]))/2 + (kT3*(Cos[\[Phi]3] + 
+                 I*Sin[\[Phi]3])*(-(Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) - 
+                 (kT3*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                      I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/Sqrt[2]))) + 
+        2*((2 + Eps^(-1) + DiscB[MH^2 - S - T24 - U, Sqrt[MT^2], 
+             Sqrt[MT^2]] + Log[Mu^2/MT^2])*(-2*Sqrt[2]*Sqrt[S]*Sech[\[Eta]4]*
+             (-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/
+               2 + ((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                    (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*(-(kT3*Cos[\[Phi]3]) - 
+                 kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))/
+               2) - (Sech[\[Eta]4]*(((2*S - S34 + T - 2*T24)*
+                 ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                         Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                      (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                     (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                         kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                         kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                         4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                    Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                      (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] - 4*
+                ((kT4*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]]*(Cos[\[Phi]4] - I*Sin[\[Phi]4]))/
+                  (2*Sqrt[2]) + ((-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                    I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                   (-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]])/2 - kT4*(Conjugate[
+                        (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                        (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[1/Sqrt[
+                          (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                          kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                       Sinh[\[Eta]4])))/Sqrt[2]))*(Cosh[\[Eta]4 + 
+                 I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+            4*Sqrt[2]*kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*
+             ((Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + 
+                   I*\[Phi]4]))/4 + (Sech[\[Eta]4]*(-(kT3*Cos[\[Phi]3]) - 
+                 kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                        Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                        Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                         \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                      (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                 I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+                 Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/2) - 
+            2*Sqrt[2]*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                     kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+               (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                 kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*((Sqrt[S]*Sech[\[Eta]4]*
+                (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])))/4 + (kT4*(Cos[\[Phi]4] + 
+                 I*Sin[\[Phi]4])*((Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) + 
+                 (kT3*Sech[\[Eta]4]*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - 
+                      I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/Sqrt[2])) + 
+          ScalarC0[MH^2, T14, MH^2 - S - T24 - U, Sqrt[MT^2], Sqrt[MT^2], 
+            Sqrt[MT^2]]*(-((S*(-2*MH^2 + S34 + T)*Conjugate[
+                1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                     Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4])/Sqrt[2]) + 
+            (Sqrt[S]*(-2*MH^2 + S34 + T)*(I*Conjugate[
+                 (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+              (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4])))/Sqrt[2] - 
+            (kT4*Sqrt[S]*(-2*MH^2 + S34 + T)*Conjugate[1/Sqrt[
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                    Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*(Cos[\[Phi]4] + I*
+                Sin[\[Phi]4])*(Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + 
+                 I*\[Phi]4]))/Sqrt[2] - ((-2*S*S34 - S34*T14 + T*T14 + 2*MH^2*
+                (S - T24) + 2*T*T24)*((-I)*Conjugate[
+                 (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+              (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/
+             (2*Sqrt[2]) - 2*Sech[\[Eta]4]*((kT4*Sqrt[S]*(-MH^2 + T)*
+                Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*(Cos[\[Phi]4] - 
+                 I*Sin[\[Phi]4]))/(2*Sqrt[2]) + ((-(kT3*Cos[\[Phi]3]) - 
+                 kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                (-(Sqrt[S]*(-MH^2 + S34)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                         4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])]])/2 - kT4*(-MH^2 + T)*
+                  (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                         Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                         2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                         4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                     (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                    Sinh[\[Eta]4])))/Sqrt[2])*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+              Sinh[\[Eta]4 + I*\[Phi]4]) - Sqrt[2]*kT4*(-2*MH^2 + S34 + T)*
+             Sech[\[Eta]4]*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*
+             (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                kT4*Sin[\[Phi]4]))*(-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])]] - I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                     kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                 I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                 I*\[Phi]4]) - 8*((kT3*Sqrt[S]*Conjugate[
+                 1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                       \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                       2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*(Cos[\[Phi]3] - 
+                 I*Sin[\[Phi]3]))/(2*Sqrt[2]) - (kT3*(-(kT3*Cos[\[Phi]3]) - 
+                 kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3]))/Sqrt[2])*((kT3*Sech[\[Eta]4]*
+                (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4]))*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                   I*\[Phi]3 + I*\[Phi]4]))/2 + (kT3*(Cos[\[Phi]3] + 
+                 I*Sin[\[Phi]3])*(-(Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) - 
+                 (kT3*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                      I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/Sqrt[2]) + 
+            2*Sqrt[2]*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                     kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+               (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                 kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+             (-(kT3*Sqrt[S]*(S + T14 + T24)*Sech[\[Eta]4]*(Cos[\[Phi]3] + 
+                  I*Sin[\[Phi]3]))/4 + (kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*
+                ((Sqrt[S]*(-2*MH^2 + S34 + T)*Sech[\[Eta]4])/(2*Sqrt[2]) + 
+                 (kT3*(S + T14 + T24)*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + 
+                    Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/Sqrt[
+                2]))))/T14 + 
+      (8*((kT3*(-DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - S34)) + 
+             DiscB[S34, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - S34)))*
+            Sech[\[Eta]4]*(-(Sqrt[S]*(-MH^2 + S34 + 2*T)*Conjugate[
+                1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                     Cos[\[Phi]3 - \[Phi]4])]]) - 
+             (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                       Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*(
+                -((kT3*(MH^2 - 2*S + S34 + 2*T24 - 2*U)*(Cos[\[Phi]3] + 
+                    I*Sin[\[Phi]3]))/Sqrt[2]) + (kT4*(-3*MH^2 + S34 + 4*U)*
+                  (Cos[\[Phi]4] + I*Sin[\[Phi]4]))/Sqrt[2]))/Sqrt[2] + 
+             (-MH^2 + S34 + 2*T)*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*(-(kT3*Cos[\[Phi]3]) - 
+               kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])) + 
+             8*(-((kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*((kT3*Sqrt[S]*
+                     Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     (Cos[\[Phi]3] - I*Sin[\[Phi]3]))/(2*Sqrt[2]) - 
+                   (kT3*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                      I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                     (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                        (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[1/Sqrt[
+                          (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                          kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                       Sinh[\[Eta]3]))/Sqrt[2]))/Sqrt[2]) + (kT3*
+                 (Cos[\[Phi]3] + I*Sin[\[Phi]3])*((kT4*Sqrt[S]*Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                    (Cos[\[Phi]4] - I*Sin[\[Phi]4]))/(2*Sqrt[2]) - 
+                  (kT4*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                     I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                    (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                       (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                       1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                          (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]]*Sinh[\[Eta]4]))/Sqrt[2]))/Sqrt[2]))*
+            (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+           Sqrt[2] + (kT3*(-1/(2*(MH^2 - S34)) - (MH^2*DiscB[MH^2, 
+                Sqrt[MT^2], Sqrt[MT^2]])/(2*(MH^2 - S34)^2) + 
+             (MH^2*DiscB[S34, Sqrt[MT^2], Sqrt[MT^2]])/(2*(MH^2 - S34)^2) - 
+             (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/
+                  (2*MT^2)]^2)/(2*(MH^2 - S34)^2) + 
+             (MT^2*Log[(2*MT^2 - S34 + Sqrt[-((4*MT^2 - S34)*S34)])/(2*MT^2)]^
+                2)/(2*(MH^2 - S34)^2))*Sech[\[Eta]4]*
+            (-(Sqrt[S]*(MH^2 - S34 - 2*T14)*Conjugate[
+                1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                     Cos[\[Phi]3 - \[Phi]4])]]) + 
+             (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                       Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*((kT3*(-MH^2 + S34 + 
+                   4*T24)*(Cos[\[Phi]3] + I*Sin[\[Phi]3]))/Sqrt[2] + 
+                (kT4*(MH^2 + 2*S - S34 + 2*T24 - 2*U)*(Cos[\[Phi]4] + 
+                   I*Sin[\[Phi]4]))/Sqrt[2]))/Sqrt[2] + (MH^2 - S34 - 2*T14)*
+              (I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                       \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*(-(kT3*Cos[\[Phi]3]) - 
+               kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])) + 
+             8*(-((kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*((kT3*Sqrt[S]*
+                     Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     (Cos[\[Phi]3] - I*Sin[\[Phi]3]))/(2*Sqrt[2]) - 
+                   (kT3*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                      I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                     (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                        (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[1/Sqrt[
+                          (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                          kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                       Sinh[\[Eta]3]))/Sqrt[2]))/Sqrt[2]) + (kT3*
+                 (Cos[\[Phi]3] + I*Sin[\[Phi]3])*((kT4*Sqrt[S]*Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                    (Cos[\[Phi]4] - I*Sin[\[Phi]4]))/(2*Sqrt[2]) - 
+                  (kT4*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                     I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                    (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                       (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                       1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                          (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]]*Sinh[\[Eta]4]))/Sqrt[2]))/Sqrt[2]))*
+            (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+           Sqrt[2]) + (4*(2 + Eps^(-1) + DiscB[S34, Sqrt[MT^2], Sqrt[MT^2]] + 
+            Log[Mu^2/MT^2]) - 16*(3/4 + (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[
+                MT^2]])/(4*(MH^2 - S34)) - (S34*DiscB[S34, Sqrt[MT^2], Sqrt[
+                MT^2]])/(4*(MH^2 - S34)) + 
+            (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/
+                 (2*MT^2)]^2)/(4*(MH^2 - S34)) + (Eps^(-1) + Log[Mu^2/MT^2])/
+             4 - (MT^2*Log[(2*MT^2 - S34 + Sqrt[-((4*MT^2 - S34)*S34)])/
+                 (2*MT^2)]^2)/(4*(MH^2 - S34))))*
+         ((Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+            (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*
+                Sin[\[Phi]4]))*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+             Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2] - 
+          (Sech[\[Eta]4]*(((-MH^2 + 2*S + T + T14)*((-I)*Conjugate[
+                  (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                       \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                        4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                 (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] + 
+             Sqrt[2]*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                    Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                   kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                    Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                  (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+              (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4])))*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+             Sinh[\[Eta]4 + I*\[Phi]4]))/2 + Sqrt[2]*Sech[\[Eta]4]*
+           (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+            I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*(kT3*Cos[\[Phi]3] + 
+            kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+           (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+            I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]) - 
+          Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                 Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                 Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+           (-((Sqrt[S]*Sech[\[Eta]4])/Sqrt[2]) - (kT3*Sech[\[Eta]4]*
+              (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+             Sqrt[2]) + (I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                  kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                   kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                 Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                     \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+            I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+           (-((Sqrt[S]*Sech[\[Eta]4])/Sqrt[2]) - (kT3*Sech[\[Eta]4]*
+              (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+             Sqrt[2]) + (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                    kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                 (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + 
+             I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+            (-(Sqrt[2]*Sqrt[S]*Sech[\[Eta]4]) + (kT3*Sech[\[Eta]4]*(
+                -Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+              Sqrt[2]))/2) - 4*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/
+           (MH^2 - S34) - DiscB[S34, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - S34))*
+         (-(Sech[\[Eta]4]*(((MH^2 - S34)*(MH^2 - 2*S - T - T14)*
+                ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                    (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] - 
+              Sqrt[2]*Sqrt[S]*(MH^2 - S34)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])]]*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))*
+             (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+          2*(-(Sqrt[S]*(MH^2 - S34)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])]]*Sech[\[Eta]4]*(kT3*Cos[\[Phi]3] + 
+                kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*(
+                Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+             (2*Sqrt[2]) - ((MH^2 - S34)*Sech[\[Eta]4]*(-(kT3*Cos[\[Phi]3]) - 
+               kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+              (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4]))*(-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                     4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                       2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                      Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                      Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                        \[Phi]4])]] - I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                  I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                  I*\[Phi]4]))/Sqrt[2] - 4*Sqrt[2]*kT3*Sech[\[Eta]4]*
+             (-((kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*((kT3*Sqrt[S]*Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                    (Cos[\[Phi]3] - I*Sin[\[Phi]3]))/(2*Sqrt[2]) - 
+                  (kT3*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                     I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                    (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                       (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                       1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                          (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]]*Sinh[\[Eta]3]))/Sqrt[2]))/Sqrt[2]) + 
+              (kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*((kT4*Sqrt[S]*Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   (Cos[\[Phi]4] - I*Sin[\[Phi]4]))/(2*Sqrt[2]) - 
+                 (kT4*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                    I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                   (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]4]))/Sqrt[2]))/Sqrt[2])*(-Sinh[\[Eta]3] + 
+              Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]) - 
+            (Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*((Sqrt[S]*(MH^2 - S34)*
+                 Sech[\[Eta]4])/Sqrt[2] + (kT3*(MH^2 - S34 - 2*T + 2*T14)*
+                 Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                    I*\[Phi]4]))/Sqrt[2]))/2 + 
+            ((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                       \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*(-(kT3*Cos[\[Phi]3]) - 
+               kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+              ((Sqrt[S]*(MH^2 - S34)*Sech[\[Eta]4])/Sqrt[2] + 
+               (kT3*(MH^2 - S34 - 2*T + 2*T14)*Sech[\[Eta]4]*
+                 (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                Sqrt[2]))/2) - 
+          (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*((kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*(
+                -(Sqrt[2]*Sqrt[S]*(MH^2 - S34)*Sech[\[Eta]4]) + 
+                (kT3*(5*MH^2 + 2*S - 3*S34 + 2*T24 - 6*U)*Sech[\[Eta]4]*
+                  (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                 Sqrt[2]))/Sqrt[2] + (kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*(
+                -(Sqrt[2]*Sqrt[S]*(MH^2 - S34)*Sech[\[Eta]4]) + 
+                (kT3*(MH^2 - 2*S + S34 + 6*T24 - 2*U)*Sech[\[Eta]4]*
+                  (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                 Sqrt[2]))/Sqrt[2]))/Sqrt[2]) - 
+        2*(Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+           (2*(MH^2 - S34)) - Log[(2*MT^2 - S34 + Sqrt[-((4*MT^2 - S34)*
+                  S34)])/(2*MT^2)]^2/(2*(MH^2 - S34)))*
+         (-(Sech[\[Eta]4]*(((MH^2 - S34)*(MH^2 - 2*S - T - T14)*
+                ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                    (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] - 
+              Sqrt[2]*Sqrt[S]*(MH^2 - S34)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])]]*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))*
+             (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/2 - 
+          2*((Sqrt[S]*(MH^2 - S34)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                      \[Phi]4])]]*Sech[\[Eta]4]*(kT3*Cos[\[Phi]3] + kT4*
+                Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+              (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+             (2*Sqrt[2]) + ((MH^2 - S34)*Sech[\[Eta]4]*(-(kT3*Cos[\[Phi]3]) - 
+               kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+              (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4]))*(-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                     4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                       2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                      Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                      Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                        \[Phi]4])]] - I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                  I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                  I*\[Phi]4]))/Sqrt[2] + 2*Sqrt[2]*kT3*Sech[\[Eta]4]*
+             (-((kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*((kT3*Sqrt[S]*Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                    (Cos[\[Phi]3] - I*Sin[\[Phi]3]))/(2*Sqrt[2]) - 
+                  (kT3*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                     I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                    (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                       (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                       1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                          (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]]*Sinh[\[Eta]3]))/Sqrt[2]))/Sqrt[2]) + 
+              (kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*((kT4*Sqrt[S]*Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   (Cos[\[Phi]4] - I*Sin[\[Phi]4]))/(2*Sqrt[2]) - 
+                 (kT4*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                    I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                   (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]4]))/Sqrt[2]))/Sqrt[2])*(-Sinh[\[Eta]3] + 
+              Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]) + 
+            Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+             (-(Sqrt[S]*(-MH^2 + S34)*Sech[\[Eta]4])/(2*Sqrt[2]) + 
+              (kT3*T14*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                   I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]) - 
+            (I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+              Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*(-(kT3*Cos[\[Phi]3]) - 
+              kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+             (-(Sqrt[S]*(-MH^2 + S34)*Sech[\[Eta]4])/(2*Sqrt[2]) + 
+              (kT3*T14*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                   I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]) + 
+            (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                       \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*((kT3*(Cos[\[Phi]3] + 
+                  I*Sin[\[Phi]3])*(-((Sqrt[S]*(MH^2 - S34)*Sech[\[Eta]4])/
+                    Sqrt[2]) + Sqrt[2]*kT3*T24*Sech[\[Eta]4]*
+                   (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4])))/
+                Sqrt[2] + (kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*
+                 (-((Sqrt[S]*(MH^2 - S34)*Sech[\[Eta]4])/Sqrt[2]) + 
+                  (kT3*(MH^2 + S - S34 + T24 - U)*Sech[\[Eta]4]*
+                    (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                   Sqrt[2]))/Sqrt[2]))/Sqrt[2])))/S34 - 
+      (-4*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - T) - 
+          DiscB[T, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - T))*
+         ((Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+            ((kT3*(MH^2 - 2*S34 - T + 2*T14)*(Cos[\[Phi]3] + I*Sin[\[Phi]3]))/
+              Sqrt[2] + Sqrt[2]*kT4*(MH^2 - T)*(Cos[\[Phi]4] + I*
+                Sin[\[Phi]4]))*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+             Sinh[\[Eta]4 + I*\[Phi]4]))/2 - 
+          (Sech[\[Eta]4]*(((MH^2 - T)*(MH^2 - S34 - T14 - 2*T24)*(
+                (-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                       Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] - 
+             4*(MH^2 - T)*((kT4*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                      4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                        2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                       Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                       Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                        \[Phi]3 - \[Phi]4])]]*(Cos[\[Phi]4] - 
+                  I*Sin[\[Phi]4]))/(2*Sqrt[2]) - (kT4*(-(kT3*Cos[\[Phi]3]) - 
+                  kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                 (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]4]))/Sqrt[2]))*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+             Sinh[\[Eta]4 + I*\[Phi]4]))/2 + Sech[\[Eta]4]*
+           ((kT3*(MH^2 - 2*S34 - T + 2*T14)*(Cos[\[Phi]3] + I*Sin[\[Phi]3]))/
+             Sqrt[2] + Sqrt[2]*kT4*(MH^2 - T)*(Cos[\[Phi]4] + 
+              I*Sin[\[Phi]4]))*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+            I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+           (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+            I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]) - 
+          2*Sqrt[S]*(MH^2 - T)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+           (-(Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) - 
+            (kT3*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                 I*\[Phi]4]))/Sqrt[2]) + 2*(MH^2 - T)*
+           (I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]] + Conjugate[
+             (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+               kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+               (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                   2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+            I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+           (-(Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) - 
+            (kT3*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                 I*\[Phi]4]))/Sqrt[2]) + 
+          (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*(kT4*Sqrt[S]*(-MH^2 + T)*Sech[\[Eta]4]*
+              (Cos[\[Phi]4] + I*Sin[\[Phi]4]) + (kT3*(Cos[\[Phi]3] + 
+                I*Sin[\[Phi]3])*(-((Sqrt[S]*(MH^2 - 2*S34 - T + 2*T14)*
+                   Sech[\[Eta]4])/Sqrt[2]) - (Sqrt[S]*(9*MH^2 - 2*S34 - 5*T - 
+                   2*T14 - 8*U)*Sech[\[Eta]4])/(2*Sqrt[2]) + 
+                (kT3*(3*MH^2 - 8*S - 2*S34 - 3*T - 2*T14)*Sech[\[Eta]4]*
+                  (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                 Sqrt[2]))/Sqrt[2]))/Sqrt[2] + 8*Sqrt[2]*kT3*
+           (Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+           ((kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                    Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                   kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                    Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                  (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+              (Cos[\[Phi]3] - I*Sin[\[Phi]3])*((Sqrt[S]*Sech[\[Eta]4])/
+                (2*Sqrt[2]) - (kT3*Sech[\[Eta]4]*(Sinh[\[Eta]3] - 
+                  Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/
+             (2*Sqrt[2]) + (kT3*kT4*Sqrt[S]*Conjugate[1/Sqrt[
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                    Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*(Cos[\[Phi]4] - I*
+                Sin[\[Phi]4])*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                 I*\[Phi]4]))/4 + ((-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+               I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+              (-(kT3*Sqrt[S]*Sech[\[Eta]4]*(Conjugate[
+                     (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                     (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                    Sinh[\[Eta]3]))/(2*Sqrt[2]) + (kT3^2*Sech[\[Eta]4]*
+                 (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+                    I*\[Phi]4]))/Sqrt[2] - (kT3*kT4*Sech[\[Eta]4]*
+                 (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]4])*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                    I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/Sqrt[2])) + 
+        (4*(2 + Eps^(-1) + DiscB[T, Sqrt[MT^2], Sqrt[MT^2]] + 
+            Log[Mu^2/MT^2]) - 16*(3/4 + (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[
+                MT^2]])/(4*(MH^2 - T)) - (T*DiscB[T, Sqrt[MT^2], Sqrt[MT^2]])/
+             (4*(MH^2 - T)) + (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[
+                   -(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2)/(4*(MH^2 - T)) + 
+            (Eps^(-1) + Log[Mu^2/MT^2])/4 - 
+            (MT^2*Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/(2*MT^2)]^2)/
+             (4*(MH^2 - T))))*(-(Sech[\[Eta]4]*(((-MH^2 + S34 + T14 + 2*T24)*
+                ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                    (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] + 
+              4*((kT4*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                      (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  (Cos[\[Phi]4] - I*Sin[\[Phi]4]))/(2*Sqrt[2]) - 
+                (kT4*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                   I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                  (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                         Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                         2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                         4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                     (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                    Sinh[\[Eta]4]))/Sqrt[2]))*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+              Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+          (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*(Sqrt[S]*Sech[\[Eta]4]*
+              (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4])) - (kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*(
+                (Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) + (kT3*Sech[\[Eta]4]*
+                  (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                 Sqrt[2]))/Sqrt[2]))/Sqrt[2] - 
+          2*((Sech[\[Eta]4]*((kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3]))/Sqrt[2] + 
+               Sqrt[2]*kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4]))*
+              (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4]))*(-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                     4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                       2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                      Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                      Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                        \[Phi]4])]] - I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                  I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                  I*\[Phi]4]))/2 + (I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                     kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+               (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                 kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*(-(kT3*Cos[\[Phi]3]) - 
+              kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+             (-(Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) - (kT3*Sech[\[Eta]4]*
+                (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+               Sqrt[2]) + (Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                      \[Phi]4])]]*((Sech[\[Eta]4]*((kT3*(Cos[\[Phi]3] + 
+                     I*Sin[\[Phi]3]))/Sqrt[2] + Sqrt[2]*kT4*(Cos[\[Phi]4] + 
+                    I*Sin[\[Phi]4]))*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+                  Sinh[\[Eta]4 + I*\[Phi]4]))/2 - 2*(-(Sqrt[S]*Sech[\[Eta]4])/
+                  (2*Sqrt[2]) - (kT3*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + 
+                    Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2])))/2)) - 
+        2*(Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+           (2*(MH^2 - T)) - Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/
+              (2*MT^2)]^2/(2*(MH^2 - T)))*
+         (Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                 Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                 Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+           ((kT3*T14*(Cos[\[Phi]3] + I*Sin[\[Phi]3]))/Sqrt[2] + 
+            (kT4*(MH^2 - T)*(Cos[\[Phi]4] + I*Sin[\[Phi]4]))/Sqrt[2])*
+           (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]) - 
+          (Sech[\[Eta]4]*(((MH^2 - T)*(MH^2 - S34 - T14 - 2*T24)*(
+                (-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                       Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] - 
+             4*(MH^2 - T)*((kT4*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                      4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                        2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                       Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                       Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                        \[Phi]3 - \[Phi]4])]]*(Cos[\[Phi]4] - 
+                  I*Sin[\[Phi]4]))/(2*Sqrt[2]) - (kT4*(-(kT3*Cos[\[Phi]3]) - 
+                  kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                 (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]4]))/Sqrt[2]))*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+             Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 2*Sech[\[Eta]4]*
+           ((kT3*T14*(Cos[\[Phi]3] + I*Sin[\[Phi]3]))/Sqrt[2] + 
+            (kT4*(MH^2 - T)*(Cos[\[Phi]4] + I*Sin[\[Phi]4]))/Sqrt[2])*
+           (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+            I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+           (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+            I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]) + 
+          4*Sqrt[2]*kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+           (-(kT4*S*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                    2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*(
+                Cos[\[Phi]4] - I*Sin[\[Phi]4]))/8 + 
+            ((-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4]))*(-(S*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                       4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                         2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                        Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                        Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                         \[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4])/(4*Sqrt[2]) + 
+               (kT4*Sqrt[S]*Sech[\[Eta]4]*(Conjugate[
+                    (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]4]))/(2*Sqrt[2]) + (kT3*Sqrt[S]*Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+                 (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                (2*Sqrt[2])))/Sqrt[2]) - 2*Sqrt[S]*(MH^2 - T)*
+           Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                 Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                 Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+           (-(Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) - 
+            (kT3*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                 I*\[Phi]4]))/Sqrt[2]) + 2*(MH^2 - T)*
+           (I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]] + Conjugate[
+             (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+               kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+               (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                   2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+            I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+           (-(Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) - 
+            (kT3*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                 I*\[Phi]4]))/Sqrt[2]) + Sqrt[2]*
+           ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]] + Conjugate[
+             (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+               kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+               (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                   2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*((kT4*Sqrt[S]*(-MH^2 + T)*Sech[\[Eta]4]*
+              (Cos[\[Phi]4] + I*Sin[\[Phi]4]))/2 + 
+            (kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*(-(Sqrt[S]*(-MH^2 + 2*S + 
+                   S34 + T14 + 2*T24)*Sech[\[Eta]4])/(2*Sqrt[2]) - 2*
+                ((Sqrt[S]*T14*Sech[\[Eta]4])/(2*Sqrt[2]) + 
+                 (kT3*S*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                      I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2])))/Sqrt[2])) - 
+        8*((kT3*(-1/(2*(MH^2 - T)) - (MH^2*DiscB[MH^2, Sqrt[MT^2], 
+                Sqrt[MT^2]])/(2*(MH^2 - T)^2) + (MH^2*DiscB[T, Sqrt[MT^2], 
+                Sqrt[MT^2]])/(2*(MH^2 - T)^2) - 
+             (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/
+                  (2*MT^2)]^2)/(2*(MH^2 - T)^2) + 
+             (MT^2*Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/(2*MT^2)]^2)/
+              (2*(MH^2 - T)^2))*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+            ((Sqrt[S]*(-MH^2 + T + 2*T14)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])]]*Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+                Sinh[\[Eta]4 + I*\[Phi]4]))/2 + (-MH^2 + T + 2*T14)*
+              Sech[\[Eta]4]*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + I*
+                (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+              (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - I*Conjugate[
+                 (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                  I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                  I*\[Phi]4]) + (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                       kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                    (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                 (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*((Sqrt[S]*(-3*MH^2 + 
+                   2*S34 + T - 2*T14 + 4*U)*Sech[\[Eta]4])/(2*Sqrt[2]) + 
+                (kT3*(5*MH^2 - 2*S34 - 3*T - 2*T14 - 4*U)*Sech[\[Eta]4]*
+                  (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                 Sqrt[2] + Sqrt[2]*kT3*(-MH^2 + S34 + T14 + 2*T24)*
+                 Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                    I*\[Phi]4])))/Sqrt[2] + 8*((kT3*S*Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+                 (Cos[\[Phi]3] - I*Sin[\[Phi]3]))/8 + ((-(kT3*Cos[\[Phi]3]) - 
+                  kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                 (-(kT3*Sqrt[S]*Sech[\[Eta]4]*(Conjugate[
+                        (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                        (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[1/Sqrt[
+                          (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                          kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                       Sinh[\[Eta]3]))/(2*Sqrt[2]) - (kT3*Sqrt[S]*Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                    Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                       I*\[Phi]3 + I*\[Phi]4]))/(2*Sqrt[2])))/Sqrt[2])))/
+           Sqrt[2] + (kT3*(-DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/
+              (2*(MH^2 - T)) + DiscB[T, Sqrt[MT^2], Sqrt[MT^2]]/
+              (2*(MH^2 - T)))*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+            ((Sqrt[S]*(MH^2 - 2*S34 - T)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])]]*Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+                Sinh[\[Eta]4 + I*\[Phi]4]))/2 + (MH^2 - 2*S34 - T)*
+              Sech[\[Eta]4]*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + I*
+                (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+              (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - I*Conjugate[
+                 (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                  I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                  I*\[Phi]4]) + (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                       kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                    (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                 (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*((Sqrt[S]*(-5*MH^2 + 
+                   4*S34 + 3*T + 4*U)*Sech[\[Eta]4])/(2*Sqrt[2]) + 
+                (kT3*(3*MH^2 - T - 4*U)*Sech[\[Eta]4]*(Sinh[\[Eta]3] - 
+                   Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2] + 
+                Sqrt[2]*kT3*(-MH^2 + S34 + T14 + 2*T24)*Sech[\[Eta]4]*
+                 (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4])))/
+              Sqrt[2] + 8*((kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                      4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                        2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                       Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                       Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                        \[Phi]3 - \[Phi]4])]]*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+                 ((Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) - (kT3*Sech[\[Eta]4]*
+                    (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                   Sqrt[2]))/(2*Sqrt[2]) + (kT3*kT4*Sqrt[S]*Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+                 (Cos[\[Phi]4] - I*Sin[\[Phi]4])*(-Sinh[\[Eta]3] + 
+                  Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/4 + 
+               ((-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                  I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                 (-(kT3*Sqrt[S]*Sech[\[Eta]4]*(Conjugate[
+                        (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                        (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[1/Sqrt[
+                          (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                          kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                       Sinh[\[Eta]3]))/(2*Sqrt[2]) + (kT3^2*Sech[\[Eta]4]*
+                    (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                       (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                       1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                          (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]]*Sinh[\[Eta]3])*(Sinh[\[Eta]3] - 
+                     Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2] - 
+                  (kT3*kT4*Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[
+                          \[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                         kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                          Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                          Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                          \[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                       (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                       1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                          (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]]*Sinh[\[Eta]4])*(-Sinh[\[Eta]3] + 
+                     Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/
+                Sqrt[2])))/Sqrt[2]))/T)/(MH^2 - S - T24 - U) + 
+    (4*(2 + Eps^(-1) + DiscB[U, Sqrt[MT^2], Sqrt[MT^2]] + Log[Mu^2/MT^2])*
+       (-((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]] + Conjugate[
+             (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+               kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+               (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                   2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+           (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+         (2*Sqrt[2]) + 
+        (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]] + Conjugate[
+            (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+              kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+              (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+          (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/
+         (2*Sqrt[2]) - Sqrt[2]*Sech[\[Eta]4]*
+         (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                 Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                 Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+          I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+               Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+           Cosh[\[Eta]4 + I*\[Phi]4] + 
+          Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+               Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+           Sinh[\[Eta]4 + I*\[Phi]4])) + 
+      2*(Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+         (2*(MH^2 - U)) - Log[(2*MT^2 - U + Sqrt[-((4*MT^2 - U)*U)])/
+            (2*MT^2)]^2/(2*(MH^2 - U)))*
+       (((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]] + Conjugate[
+            (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+              kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+              (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+          ((kT3*Sqrt[S]*Sech[\[Eta]4]*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/2 + 
+           ((-MH^2 + U)*Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+              Sinh[\[Eta]4 + I*\[Phi]4]))/2))/Sqrt[2] - 
+        (Sech[\[Eta]4]*(((-MH^2 + U)*((-I)*Conjugate[
+                (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+               (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                 kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] + 
+           (kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                   Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                  kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                   Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                 (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+             (Cos[\[Phi]3] - I*Sin[\[Phi]3]))/Sqrt[2])*
+          (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/2 - 
+        Sqrt[2]*(MH^2 - U)*Sech[\[Eta]4]*
+         (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                 Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                 Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+          I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+               Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+           Cosh[\[Eta]4 + I*\[Phi]4] + 
+          Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+               Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+           Sinh[\[Eta]4 + I*\[Phi]4])) - 
+      16*((kT3*(-1/(2*(MH^2 - U)) - (MH^2*DiscB[MH^2, Sqrt[MT^2], 
+              Sqrt[MT^2]])/(2*(MH^2 - U)^2) + 
+           (MH^2*DiscB[U, Sqrt[MT^2], Sqrt[MT^2]])/(2*(MH^2 - U)^2) - 
+           (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/
+                (2*MT^2)]^2)/(2*(MH^2 - U)^2) + 
+           (MT^2*Log[(2*MT^2 - U + Sqrt[-((4*MT^2 - U)*U)])/(2*MT^2)]^2)/
+            (2*(MH^2 - U)^2))*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+          (-(Sqrt[S]*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                        \[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                     kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                       \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4])/4 + 
+           (Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+             (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/4))/
+         Sqrt[2] + (3/4 + (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/
+           (4*(MH^2 - U)) - (U*DiscB[U, Sqrt[MT^2], Sqrt[MT^2]])/
+           (4*(MH^2 - U)) + (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[
+                 -(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2)/(4*(MH^2 - U)) + 
+          (Eps^(-1) + Log[Mu^2/MT^2])/4 - 
+          (MT^2*Log[(2*MT^2 - U + Sqrt[-((4*MT^2 - U)*U)])/(2*MT^2)]^2)/
+           (4*(MH^2 - U)))*
+         (-((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+              Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+             (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+           (2*Sqrt[2]) + (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                    kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                 (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+            (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/
+           (2*Sqrt[2]) - Sqrt[2]*Sech[\[Eta]4]*
+           (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+            I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4])) + 
+        (kT3*(-DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - U)) + 
+           DiscB[U, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - U)))*
+          (Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+          (-(kT3*Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+               Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Sin[\[Phi]3] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                Sinh[\[Eta]3])*(Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[
+                \[Eta]4 + I*\[Phi]4]))/2 + kT3*Sech[\[Eta]4]*
+            (Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+            (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+             I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                  (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                I*\[Phi]4]) - (kT3*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                     kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+               (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                 kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+             (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/2))/
+         Sqrt[2]) - 4*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - U) - 
+        DiscB[U, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - U))*
+       ((Sech[\[Eta]4]*(((-MH^2 + U)*((-I)*Conjugate[
+                (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+               (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                 kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] + 
+           Sqrt[2]*kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+            ((Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                   (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 - 
+             kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                      Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Cos[\[Phi]3] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+               Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])))*
+          (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+        Sqrt[2]*Sech[\[Eta]4]*(MH^2 - U + kT3^2*(Cos[\[Phi]3] - 
+            I*Sin[\[Phi]3])*(Cos[\[Phi]3] + I*Sin[\[Phi]3]))*
+         (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                 Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                 Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+          I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+               Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+           Cosh[\[Eta]4 + I*\[Phi]4] + 
+          Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+               Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+           Sinh[\[Eta]4 + I*\[Phi]4]) - 
+        ((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]] + Conjugate[
+            (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+              kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+              (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+          (((-MH^2 + U)*Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+              Sinh[\[Eta]4 + I*\[Phi]4]))/2 + Sqrt[2]*kT3*(Cos[\[Phi]3] - 
+             I*Sin[\[Phi]3])*((Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) + 
+             (kT3*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                  I*\[Phi]4]))/Sqrt[2])))/Sqrt[2]) - 
+      (4*(2 + Eps^(-1) + DiscB[U, Sqrt[MT^2], Sqrt[MT^2]] + Log[Mu^2/MT^2])*
+         (2*Sech[\[Eta]4]*(-(kT4*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])]]*(Cos[\[Phi]4] + I*Sin[\[Phi]4]))/
+             (2*Sqrt[2]) + (kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*
+                (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+              (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                      Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Cos[\[Phi]4] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+               Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4]))/
+             Sqrt[2])*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+            Sinh[\[Eta]4 + I*\[Phi]4]) - 
+          (Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+            ((kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/Sqrt[2] + 
+             Sqrt[2]*kT4*(Cos[\[Phi]4] - I*Sin[\[Phi]4]))*
+            (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+          Sech[\[Eta]4]*((kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/Sqrt[2] + 
+            Sqrt[2]*kT4*(Cos[\[Phi]4] - I*Sin[\[Phi]4]))*(kT3*Cos[\[Phi]3] + 
+            kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+           (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+            I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]) + 
+          ((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*(Sqrt[S]*Sech[\[Eta]4]*
+              (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4])) + ((-MH^2 + S34 + 2*T14 + T24)*Sech[
+                \[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + 
+                  I*\[Phi]4]))/2 - (kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*(
+                -(Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) + (kT3*Sech[\[Eta]4]*
+                  (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                 Sqrt[2]))/Sqrt[2]))/Sqrt[2] + 2*Sqrt[S]*
+           Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                 Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                 Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+           (-(Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) - 
+            (kT3*Sech[\[Eta]4]*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+                 I*\[Phi]4]))/Sqrt[2]) - 
+          2*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]] + Conjugate[
+             (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+               kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+               (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                   2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + 
+            I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+           (-(Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) - 
+            (kT3*Sech[\[Eta]4]*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+                 I*\[Phi]4]))/Sqrt[2])) - 
+        16*(3/4 + (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/(4*(MH^2 - U)) - 
+          (U*DiscB[U, Sqrt[MT^2], Sqrt[MT^2]])/(4*(MH^2 - U)) + 
+          (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*
+                MT^2)]^2)/(4*(MH^2 - U)) + (Eps^(-1) + Log[Mu^2/MT^2])/4 - 
+          (MT^2*Log[(2*MT^2 - U + Sqrt[-((4*MT^2 - U)*U)])/(2*MT^2)]^2)/
+           (4*(MH^2 - U)))*(2*Sech[\[Eta]4]*
+           (-(kT4*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                   (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*(
+                Cos[\[Phi]4] + I*Sin[\[Phi]4]))/(2*Sqrt[2]) + 
+            (kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4]))*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+               Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Sin[\[Phi]4] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                Sinh[\[Eta]4]))/Sqrt[2])*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+            Sinh[\[Eta]4 + I*\[Phi]4]) - 
+          (Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+            ((kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/Sqrt[2] + 
+             Sqrt[2]*kT4*(Cos[\[Phi]4] - I*Sin[\[Phi]4]))*
+            (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+          Sech[\[Eta]4]*((kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/Sqrt[2] + 
+            Sqrt[2]*kT4*(Cos[\[Phi]4] - I*Sin[\[Phi]4]))*(kT3*Cos[\[Phi]3] + 
+            kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+           (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+            I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]) + 
+          ((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*(Sqrt[S]*Sech[\[Eta]4]*
+              (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4])) + ((-MH^2 + S34 + 2*T14 + T24)*Sech[
+                \[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + 
+                  I*\[Phi]4]))/2 - (kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*(
+                -(Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) + (kT3*Sech[\[Eta]4]*
+                  (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                 Sqrt[2]))/Sqrt[2]))/Sqrt[2] + 2*Sqrt[S]*
+           Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                 Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                 Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+           (-(Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) - 
+            (kT3*Sech[\[Eta]4]*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+                 I*\[Phi]4]))/Sqrt[2]) - 
+          2*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]] + Conjugate[
+             (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+               kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+               (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                   2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + 
+            I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+           (-(Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) - 
+            (kT3*Sech[\[Eta]4]*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+                 I*\[Phi]4]))/Sqrt[2])) - 4*Sqrt[2]*kT3*(-1/(2*(MH^2 - U)) - 
+          (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/(2*(MH^2 - U)^2) + 
+          (MH^2*DiscB[U, Sqrt[MT^2], Sqrt[MT^2]])/(2*(MH^2 - U)^2) - 
+          (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*
+                MT^2)]^2)/(2*(MH^2 - U)^2) + 
+          (MT^2*Log[(2*MT^2 - U + Sqrt[-((4*MT^2 - U)*U)])/(2*MT^2)]^2)/
+           (2*(MH^2 - U)^2))*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+         ((Sqrt[S]*(-MH^2 + 2*T24 + U)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                   2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                    \[Phi]4])]]*Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+             Sinh[\[Eta]4 + I*\[Phi]4]))/2 - (-MH^2 + 2*T24 + U)*
+           Sech[\[Eta]4]*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + 
+            I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+           (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+            I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]) - 
+          ((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*((Sqrt[S]*(-MH^2 - 2*S + 2*T - 2*T14 + 
+                U)*Sech[\[Eta]4])/(2*Sqrt[2]) - (Sqrt[S]*(-2*MH^2 + 4*T24 + 
+                2*U)*Sech[\[Eta]4])/(2*Sqrt[2]) + (kT3*(-MH^2 + 4*S + U)*Sech[
+                \[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                  I*\[Phi]4]))/Sqrt[2]))/Sqrt[2] + 
+          8*(-(kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                   (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*(
+                Cos[\[Phi]3] + I*Sin[\[Phi]3])*(-(Sqrt[S]*Sech[\[Eta]4])/
+                 (2*Sqrt[2]) - (kT3*Sech[\[Eta]4]*(Sinh[\[Eta]3] - 
+                   Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/
+             (2*Sqrt[2]) - (kT3*kT4*Sqrt[S]*Conjugate[1/Sqrt[
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                    Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*(Cos[\[Phi]4] + I*
+                Sin[\[Phi]4])*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                 I*\[Phi]4]))/4 - ((kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*
+                (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*((kT3*Sqrt[S]*
+                 Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                       (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                      (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                          kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                          kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                          4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                      (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                       (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+                  Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                         Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]3]))/(2*Sqrt[2]) + (kT3^2*Sech[\[Eta]4]*
+                 (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+                    I*\[Phi]4]))/Sqrt[2] - (kT3*kT4*Sech[\[Eta]4]*
+                 (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]4])*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                    I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/Sqrt[2])) - 
+        4*Sqrt[2]*kT3*(-DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - U)) + 
+          DiscB[U, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - U)))*
+         (Cos[\[Phi]3] - I*Sin[\[Phi]3])*((Sqrt[S]*(MH^2 - 2*S34 - U)*
+            Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+            (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/2 - 
+          (MH^2 - 2*S34 - U)*Sech[\[Eta]4]*(kT3*Cos[\[Phi]3] + 
+            kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+           (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+            I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]) + 
+          ((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*((Sqrt[S]*(3*MH^2 - 4*T - U)*Sech[
+                \[Eta]4])/(2*Sqrt[2]) - (Sqrt[S]*(-2*MH^2 + 4*S34 + 2*U)*Sech[
+                \[Eta]4])/(2*Sqrt[2]) - (kT3*(MH^2 + 2*S - 2*T - 2*T14 + 
+                U)*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                  I*\[Phi]4]))/Sqrt[2]))/Sqrt[2] + 
+          8*(-(kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                   (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*(
+                Cos[\[Phi]3] + I*Sin[\[Phi]3])*(-(Sqrt[S]*Sech[\[Eta]4])/
+                 (2*Sqrt[2]) - (kT3*Sech[\[Eta]4]*(Sinh[\[Eta]3] - 
+                   Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/
+             (2*Sqrt[2]) - (kT3*kT4*Sqrt[S]*Conjugate[1/Sqrt[
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                    Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*(Cos[\[Phi]4] + I*
+                Sin[\[Phi]4])*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                 I*\[Phi]4]))/4 - ((kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*
+                (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*((kT3*Sqrt[S]*
+                 Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                       (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                      (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                          kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                          kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                          4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                      (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                       (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+                  Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                         Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]3]))/(2*Sqrt[2]) + (kT3^2*Sech[\[Eta]4]*
+                 (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+                    I*\[Phi]4]))/Sqrt[2] - (kT3*kT4*Sech[\[Eta]4]*
+                 (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]4])*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                    I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/Sqrt[2])) - 
+        4*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - U) - 
+          DiscB[U, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - U))*
+         (((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*(kT4*Sqrt[S]*(MH^2 - U)*Sech[\[Eta]4]*
+              (Cos[\[Phi]4] - I*Sin[\[Phi]4]) + ((MH^2 - S34 - 2*T14 - T24)*(
+                MH^2 - U)*Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+                Sinh[\[Eta]4 + I*\[Phi]4]))/2 - (kT3*(Cos[\[Phi]3] - 
+                I*Sin[\[Phi]3])*(-((Sqrt[S]*(MH^2 - 2*S34 + 2*T24 - U)*
+                   Sech[\[Eta]4])/Sqrt[2]) + (Sqrt[S]*(-5*MH^2 - 2*S + 6*T - 
+                   2*T14 + 3*U)*Sech[\[Eta]4])/(2*Sqrt[2]) + 
+                (kT3*(MH^2 + 6*S - 2*T - 2*T14 + U)*Sech[\[Eta]4]*
+                  (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                 Sqrt[2]))/Sqrt[2]))/Sqrt[2] - 
+          2*((MH^2 - U)*Sech[\[Eta]4]*(-(kT4*Sqrt[S]*Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*(Cos[\[Phi]4] + 
+                  I*Sin[\[Phi]4]))/(2*Sqrt[2]) + (kT4*(kT3*Cos[\[Phi]3] + 
+                 kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]4]))/Sqrt[2])*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+              Sinh[\[Eta]4 + I*\[Phi]4]) + (Sqrt[S]*Conjugate[1/
+                Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                    Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+              ((kT3*(-MH^2 + 2*S34 - 2*T24 + U)*(Cos[\[Phi]3] - 
+                  I*Sin[\[Phi]3]))/Sqrt[2] + Sqrt[2]*kT4*(-MH^2 + U)*
+                (Cos[\[Phi]4] - I*Sin[\[Phi]4]))*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+               Sinh[\[Eta]4 + I*\[Phi]4]))/4 - 
+            ((kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4]))*((Sech[\[Eta]4]*((kT3*(-MH^2 + 2*S34 - 
+                     2*T24 + U)*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/Sqrt[2] + 
+                  Sqrt[2]*kT4*(-MH^2 + U)*(Cos[\[Phi]4] - I*Sin[\[Phi]4]))*
+                 (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                  I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                         Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+                  Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2] + 
+               Sqrt[2]*(MH^2 - U)*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                      (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                     (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                         kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                         kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                         4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                    Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                      (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                  (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                       \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                        4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+                (-(Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) - (kT3*Sech[\[Eta]4]*
+                   (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                  Sqrt[2])))/Sqrt[2] + Sqrt[S]*(MH^2 - U)*
+             Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+             (-(Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) - (kT3*Sech[\[Eta]4]*
+                (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[
+                2]) - 4*Sqrt[2]*kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+             (-(kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                 (Cos[\[Phi]3] + I*Sin[\[Phi]3])*(-(Sqrt[S]*Sech[\[Eta]4])/
+                   (2*Sqrt[2]) - (kT3*Sech[\[Eta]4]*(Sinh[\[Eta]3] - 
+                     Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/(2*
+                Sqrt[2]) - (kT3*kT4*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                     4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                       2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                      Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                      Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                        \[Phi]4])]]*Sech[\[Eta]4]*(Cos[\[Phi]4] + 
+                 I*Sin[\[Phi]4])*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                   I*\[Phi]4]))/4 - ((kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + 
+                 I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                ((kT3*Sqrt[S]*Sech[\[Eta]4]*(Conjugate[
+                      (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]3]))/(2*Sqrt[2]) + (kT3^2*Sech[\[Eta]4]*
+                   (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - 
+                      I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2] - (kT3*kT4*
+                   Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                         (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                          Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                         Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                          \[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]4])*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                      I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/Sqrt[2]))) - 
+        2*(Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+           (2*(MH^2 - U)) - Log[(2*MT^2 - U + Sqrt[-((4*MT^2 - U)*U)])/
+              (2*MT^2)]^2/(2*(MH^2 - U)))*
+         (((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*(((MH^2 - S34 - 2*T14 - T24)*(MH^2 - 
+                U)*Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+                Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 2*((kT4*Sqrt[S]*(MH^2 - U)*
+                 Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4]))/2 + 
+               (kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*((Sqrt[S]*T24*
+                    Sech[\[Eta]4])/Sqrt[2] + (Sqrt[S]*(MH^2 + S - T + T14 - 
+                     U)*Sech[\[Eta]4])/(2*Sqrt[2]) - Sqrt[2]*kT3*S*
+                   Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                      I*\[Phi]4])))/Sqrt[2])))/Sqrt[2] - 
+          4*(((MH^2 - U)*Sech[\[Eta]4]*(-(kT4*Sqrt[S]*Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  (Cos[\[Phi]4] + I*Sin[\[Phi]4]))/(2*Sqrt[2]) + 
+               (kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + 
+                  I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                 (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]4]))/Sqrt[2])*(Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[
+                \[Eta]4 + I*\[Phi]4]))/2 - (Sqrt[S]*Conjugate[1/
+                Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                    Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+              ((kT3*T24*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/Sqrt[2] + 
+               (kT4*(MH^2 - U)*(Cos[\[Phi]4] - I*Sin[\[Phi]4]))/Sqrt[2])*
+              (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/4 - 
+            ((kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4]))*(-((Sech[\[Eta]4]*((kT3*T24*
+                     (Cos[\[Phi]3] - I*Sin[\[Phi]3]))/Sqrt[2] + 
+                   (kT4*(MH^2 - U)*(Cos[\[Phi]4] - I*Sin[\[Phi]4]))/Sqrt[2])*
+                  (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]] - I*Conjugate[(-(kT3*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - 
+                       kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                         Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                        Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                          \[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+                   Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                         Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                         2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                         4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/
+                 Sqrt[2]) + ((MH^2 - U)*((-I)*Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                      (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                     (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                         kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                         kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                         4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                    Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                      (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+                 (-(Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) - (kT3*Sech[\[Eta]4]*
+                    (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                   Sqrt[2]))/Sqrt[2]))/Sqrt[2] + (Sqrt[S]*(MH^2 - U)*
+              Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+              (-(Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) - (kT3*Sech[\[Eta]4]*
+                 (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                Sqrt[2]))/2 - Sqrt[2]*kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+             (-(kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                 (Cos[\[Phi]3] + I*Sin[\[Phi]3])*(-(Sqrt[S]*Sech[\[Eta]4])/
+                   (2*Sqrt[2]) - (kT3*Sech[\[Eta]4]*(Sinh[\[Eta]3] - 
+                     Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/(2*
+                Sqrt[2]) - (kT3*kT4*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                     4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                       2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                      Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                      Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                        \[Phi]4])]]*Sech[\[Eta]4]*(Cos[\[Phi]4] + 
+                 I*Sin[\[Phi]4])*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                   I*\[Phi]4]))/4 - ((kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + 
+                 I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                ((kT3*Sqrt[S]*Sech[\[Eta]4]*(Conjugate[
+                      (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]3]))/(2*Sqrt[2]) + (kT3^2*Sech[\[Eta]4]*
+                   (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - 
+                      I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2] - (kT3*kT4*
+                   Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                         (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                          Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                         Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                          \[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]4])*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                      I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/Sqrt[2]))))/
+       (MH^2 - S - T - T14) - 
+      (4*(2 + Eps^(-1) + DiscB[U, Sqrt[MT^2], Sqrt[MT^2]] + Log[Mu^2/MT^2])*
+         ((Sqrt[S]*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+            ((kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/Sqrt[2] + 
+             Sqrt[2]*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + I*
+                (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))))/2 + 
+          Sqrt[2]*Sqrt[S]*Sech[\[Eta]4]*
+           (-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                   (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 + 
+            kT4*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                     Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                     kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+              Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+              Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                    2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])) - 
+          (Sech[\[Eta]4]*(((-S + S34 - T + T24)*((-I)*Conjugate[
+                  (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                       \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                        4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                 (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] + 
+             Sqrt[2]*kT4*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                      \[Phi]4])]]*(Cos[\[Phi]4] - I*Sin[\[Phi]4]) - 
+             (kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*(-(Sqrt[S]*Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/
+                 2 - kT4*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                      (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                          kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                          kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                          4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                      (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                       (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+                  Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                         Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]4])))/Sqrt[2])*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+             Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+          (kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*(2*Sech[\[Eta]4]*
+              (-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                      (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/
+                2 + kT4*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                     (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                         kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                         kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                         4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                    Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                      (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+                 Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]4]))*(Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[
+                \[Eta]4 + I*\[Phi]4]) - Sqrt[2]*Sech[\[Eta]4]*
+              ((kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/Sqrt[2] + Sqrt[2]*
+                (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                 I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))*
+              (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - I*Conjugate[
+                 (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                  I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                  I*\[Phi]4])))/Sqrt[2] + 2*Sqrt[2]*
+           ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]] + Conjugate[
+             (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+               kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+               (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                   2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*((Sqrt[S]*Sech[\[Eta]4]*
+              (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4])))/4 + (kT3*kT4*Sech[\[Eta]4]*
+              (Cos[\[Phi]4] + I*Sin[\[Phi]4])*(Sinh[\[Eta]3] - Sinh[
+                \[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/2)) - 
+        16*(3/4 + (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/(4*(MH^2 - U)) - 
+          (U*DiscB[U, Sqrt[MT^2], Sqrt[MT^2]])/(4*(MH^2 - U)) + 
+          (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*
+                MT^2)]^2)/(4*(MH^2 - U)) + (Eps^(-1) + Log[Mu^2/MT^2])/4 - 
+          (MT^2*Log[(2*MT^2 - U + Sqrt[-((4*MT^2 - U)*U)])/(2*MT^2)]^2)/
+           (4*(MH^2 - U)))*
+         ((Sqrt[S]*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+            ((kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/Sqrt[2] + 
+             Sqrt[2]*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + I*
+                (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))))/2 + 
+          Sqrt[2]*Sqrt[S]*Sech[\[Eta]4]*
+           (-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                   (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 + 
+            kT4*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                     Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                     kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+              Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+              Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                    2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])) - 
+          (Sech[\[Eta]4]*(((-S + S34 - T + T24)*((-I)*Conjugate[
+                  (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                       \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                        4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                 (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] + 
+             Sqrt[2]*kT4*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                      \[Phi]4])]]*(Cos[\[Phi]4] - I*Sin[\[Phi]4]) - 
+             (kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*(-(Sqrt[S]*Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/
+                 2 - kT4*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                      (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                          kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                          kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                          4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                      (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                       (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+                  Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                         Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]4])))/Sqrt[2])*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+             Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+          (kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*(2*Sech[\[Eta]4]*
+              (-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                      (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/
+                2 + kT4*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                     (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                         kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                         kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                         4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                    Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                      (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+                 Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]4]))*(Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[
+                \[Eta]4 + I*\[Phi]4]) - Sqrt[2]*Sech[\[Eta]4]*
+              ((kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/Sqrt[2] + Sqrt[2]*
+                (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                 I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))*
+              (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - I*Conjugate[
+                 (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                  I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                  I*\[Phi]4])))/Sqrt[2] + 2*Sqrt[2]*
+           ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]] + Conjugate[
+             (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+               kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+               (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                   2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*((Sqrt[S]*Sech[\[Eta]4]*
+              (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4])))/4 + (kT3*kT4*Sech[\[Eta]4]*
+              (Cos[\[Phi]4] + I*Sin[\[Phi]4])*(Sinh[\[Eta]3] - Sinh[
+                \[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/2)) - 
+        4*Sqrt[2]*kT3*(-DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - U)) + 
+          DiscB[U, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - U)))*
+         (Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+         (-(Sqrt[S]*(-3*MH^2 + 2*S34 + 2*T + U)*(I*Conjugate[
+                (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+               (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                 kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4])/2 + 
+          (Sech[\[Eta]4]*(-(Sqrt[S]*(-3*MH^2 + 4*S34 + U)*Conjugate[
+                 1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                       \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                       2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 - 
+             2*kT3*(S - S34 + T - T24)*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+               Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Sin[\[Phi]3] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                Sinh[\[Eta]3]) - kT4*(-3*MH^2 + 4*T + U)*
+              (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                      Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Cos[\[Phi]4] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+               Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4]))*
+            (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+          kT4*(-3*MH^2 + 2*S34 + 2*T + U)*Sech[\[Eta]4]*(Cos[\[Phi]4] + 
+            I*Sin[\[Phi]4])*(-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                   Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                  kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                   Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                 (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+            I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]) + 
+          8*(-(kT3*Sqrt[S]*Sech[\[Eta]4]*(kT3*Cos[\[Phi]3] + 
+                kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*(
+                Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                       Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                       kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                  (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                       \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                        4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+                Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                       Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                       Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                        \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                 Sinh[\[Eta]3]))/4 - (kT3*Sqrt[S]*Sech[\[Eta]4]*
+              (Cos[\[Phi]3] + I*Sin[\[Phi]3])*(-(Sqrt[S]*Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 + kT4*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]4])))/4 + (kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*
+              (-((kT3^2*Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                        (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                       (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                          kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                          kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                          4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                        (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                         4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                    Cos[\[Phi]3] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                        (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                       (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                          kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                          kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                          4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                        (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                         4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                    Sin[\[Phi]3] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                         4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])*
+                  (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                 Sqrt[2]) + (kT3*Sech[\[Eta]4]*(-(Sqrt[S]*Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]])/2 + kT4*(Conjugate[
+                      (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]4]))*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                    I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/Sqrt[2])) - 
+        4*Sqrt[2]*kT3*(-1/(2*(MH^2 - U)) - (MH^2*DiscB[MH^2, Sqrt[MT^2], 
+             Sqrt[MT^2]])/(2*(MH^2 - U)^2) + 
+          (MH^2*DiscB[U, Sqrt[MT^2], Sqrt[MT^2]])/(2*(MH^2 - U)^2) - 
+          (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*
+                MT^2)]^2)/(2*(MH^2 - U)^2) + 
+          (MT^2*Log[(2*MT^2 - U + Sqrt[-((4*MT^2 - U)*U)])/(2*MT^2)]^2)/
+           (2*(MH^2 - U)^2))*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+         ((Sqrt[S]*(-MH^2 + 2*S + 2*T24 + U)*
+            (I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*Sech[\[Eta]4])/2 - 
+          (Sech[\[Eta]4]*(Sqrt[S]*(S34 - T)*Conjugate[1/Sqrt[
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                    Cos[\[Phi]3 - \[Phi]4])]] - (Sqrt[S]*(-MH^2 + 2*S + 
+                2*T24 + U)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                   (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 + 
+             2*kT3*S*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                      Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Cos[\[Phi]3] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+               Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3]) - 
+             2*kT3*T24*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                        \[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Cos[\[Phi]3] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+               Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3]) + 
+             kT4*MH^2*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                      Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Cos[\[Phi]4] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+               Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4]) - 
+             2*kT4*S*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                      Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Cos[\[Phi]4] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+               Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4]) - 
+             2*kT4*T24*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                        \[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Cos[\[Phi]4] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+               Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4]) - 
+             kT4*U*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                      Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Cos[\[Phi]4] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+               Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4]))*
+            (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/2 - 
+          kT4*(-MH^2 + 2*S + 2*T24 + U)*Sech[\[Eta]4]*(Cos[\[Phi]4] + 
+            I*Sin[\[Phi]4])*(-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                   Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                  kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                   Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                 (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+            I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]) + 
+          8*(-(kT3*Sqrt[S]*Sech[\[Eta]4]*(kT3*Cos[\[Phi]3] + 
+                kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*(
+                Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                       Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                       kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                  (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                       \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                        4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+                Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                       Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                       Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                        \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                 Sinh[\[Eta]3]))/4 - (kT3*Sqrt[S]*Sech[\[Eta]4]*
+              (Cos[\[Phi]3] + I*Sin[\[Phi]3])*(-(Sqrt[S]*Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 + kT4*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]4])))/4 + (kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*
+              (-((kT3^2*Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                        (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                       (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                          kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                          kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                          4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                        (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                         4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                    Cos[\[Phi]3] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                        (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                       (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                          kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                          kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                          4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                        (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                         4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                    Sin[\[Phi]3] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                         4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])*
+                  (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                 Sqrt[2]) + (kT3*Sech[\[Eta]4]*(-(Sqrt[S]*Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]])/2 + kT4*(Conjugate[
+                      (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]4]))*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                    I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/Sqrt[2])) - 
+        2*(Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+           (2*(MH^2 - U)) - Log[(2*MT^2 - U + Sqrt[-((4*MT^2 - U)*U)])/
+              (2*MT^2)]^2/(2*(MH^2 - U)))*
+         (-(Sech[\[Eta]4]*(((S - S34 + T - T24)*(MH^2 - U)*
+                ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                    (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] + 
+              2*(-((kT4*Sqrt[S]*(MH^2 - U)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                        4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                         Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                         Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])]]*(Cos[\[Phi]4] - 
+                    I*Sin[\[Phi]4]))/Sqrt[2]) + (kT3*(Cos[\[Phi]3] - 
+                   I*Sin[\[Phi]3])*(-(Sqrt[S]*(S + T24)*Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]]) + (Sqrt[S]*(S + S34 - T + T24)*
+                     Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]])/2 + 2*kT3*S*(Conjugate[
+                       (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                       (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                       1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                          (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]]*Sinh[\[Eta]3])))/Sqrt[2]))*
+             (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/2 - 
+          4*(-(Sqrt[S]*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                    (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                 (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(
+                (kT3*(S + T24)*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/Sqrt[2] + 
+                (kT4*(MH^2 - U)*(Cos[\[Phi]4] - I*Sin[\[Phi]4]))/Sqrt[2]))/
+             4 + (Sqrt[S]*(MH^2 - U)*Sech[\[Eta]4]*
+              (-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                      (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/
+                2 + kT4*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                     (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                         kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                         kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                         4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                    Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                      (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+                 Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]4])))/(2*Sqrt[2]) + 
+            (kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*(((MH^2 - U)*Sech[\[Eta]4]*
+                 (-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]])/2 + kT4*(Conjugate[
+                      (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]4]))*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+                  Sinh[\[Eta]4 + I*\[Phi]4]))/2 + (Sech[\[Eta]4]*
+                 ((kT3*(S + T24)*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/Sqrt[2] + 
+                  (kT4*(MH^2 - U)*(Cos[\[Phi]4] - I*Sin[\[Phi]4]))/Sqrt[2])*
+                 (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                  I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                         Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+                  Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2]))/
+             Sqrt[2] + ((MH^2 - U)*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*((Sqrt[S]*Sech[\[Eta]4]*
+                 (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                    kT4*Sin[\[Phi]4])))/4 + (kT3*kT4*Sech[\[Eta]4]*
+                 (Cos[\[Phi]4] + I*Sin[\[Phi]4])*(Sinh[\[Eta]3] - 
+                  Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/2))/Sqrt[2] - 
+            Sqrt[2]*kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+             (-(kT3*Sqrt[S]*Sech[\[Eta]4]*(kT3*Cos[\[Phi]3] + 
+                  kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                 (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]3]))/4 - (kT3*Sqrt[S]*Sech[\[Eta]4]*
+                (Cos[\[Phi]3] + I*Sin[\[Phi]3])*(-(Sqrt[S]*Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/
+                  2 + kT4*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                       (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                          kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                          kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                          4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                        (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                         4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                    Cos[\[Phi]4] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                        (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                       (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                          kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                          kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                          4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                        (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                         4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                    Sin[\[Phi]4] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                         4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])))/4 + 
+              (kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*(-((kT3^2*Sech[\[Eta]4]*
+                    (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                       (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                       1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                          (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]]*Sinh[\[Eta]3])*(Sinh[\[Eta]3] - 
+                     Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]) + 
+                 (kT3*Sech[\[Eta]4]*(-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + 
+                          kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                          kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                          4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 + 
+                    kT4*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                          (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[
+                          kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                         Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                       Cos[\[Phi]4] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                          (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                         Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                       Sin[\[Phi]4] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                          \[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4]))*
+                   (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                  Sqrt[2]))/Sqrt[2]))) - 
+        4*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - U) - 
+          DiscB[U, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - U))*
+         (-(Sech[\[Eta]4]*(((S - S34 + T - T24)*(MH^2 - U)*
+                ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                    (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] - 
+              Sqrt[2]*kT4*Sqrt[S]*(MH^2 - U)*Conjugate[
+                1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                     Cos[\[Phi]3 - \[Phi]4])]]*(Cos[\[Phi]4] - 
+                I*Sin[\[Phi]4]) + (kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+                (-(Sqrt[S]*(7*MH^2 - 8*S34 - 2*T14 - 3*U)*Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/
+                  2 - 4*kT3*(-2*MH^2 + 2*S34 + T14 + 2*T24 + U)*
+                  (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                         Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                         2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                         4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                     (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                    Sinh[\[Eta]3]) - kT4*(7*MH^2 - 8*T - 2*T14 - 3*U)*
+                  (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                         Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                         2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                         4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                     (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                    Sinh[\[Eta]4])))/Sqrt[2])*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+              Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+          2*(-(Sqrt[S]*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                    (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                 (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(
+                (kT3*(-5*MH^2 + 4*S34 + 4*T + 2*T14 + U)*(Cos[\[Phi]3] - 
+                   I*Sin[\[Phi]3]))/Sqrt[2] + Sqrt[2]*(MH^2 - U)*
+                 (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                  I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))))/4 - 
+            (Sqrt[S]*(MH^2 - U)*Sech[\[Eta]4]*(-(Sqrt[S]*Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 + kT4*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]4])))/Sqrt[2] + (kT4*(Cos[\[Phi]4] + I*
+                Sin[\[Phi]4])*(-((MH^2 - U)*Sech[\[Eta]4]*
+                 (-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]])/2 + kT4*(Conjugate[
+                      (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                      (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]4]))*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+                  Sinh[\[Eta]4 + I*\[Phi]4])) + (Sech[\[Eta]4]*
+                 ((kT3*(-5*MH^2 + 4*S34 + 4*T + 2*T14 + U)*(Cos[\[Phi]3] - 
+                     I*Sin[\[Phi]3]))/Sqrt[2] + Sqrt[2]*(MH^2 - U)*
+                   (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                    I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))*
+                 (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                  I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                         Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+                  Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2]))/
+             Sqrt[2] - Sqrt[2]*(MH^2 - U)*((-I)*Conjugate[
+                (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+               (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                 kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*((Sqrt[S]*Sech[\[Eta]4]*
+                (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])))/4 + (kT3*kT4*Sech[\[Eta]4]*
+                (Cos[\[Phi]4] + I*Sin[\[Phi]4])*(Sinh[\[Eta]3] - 
+                 Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/2) + 
+            4*Sqrt[2]*kT3*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+             (-(kT3*Sqrt[S]*Sech[\[Eta]4]*(kT3*Cos[\[Phi]3] + 
+                  kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                 (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]3]))/4 - (kT3*Sqrt[S]*Sech[\[Eta]4]*
+                (Cos[\[Phi]3] + I*Sin[\[Phi]3])*(-(Sqrt[S]*Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/
+                  2 + kT4*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                       (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                          kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                          kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                          4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                        (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                         4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                    Cos[\[Phi]4] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                        (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                       (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                          kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                          kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                          4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                        (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                         4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                    Sin[\[Phi]4] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                         4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4])))/4 + 
+              (kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*(-((kT3^2*Sech[\[Eta]4]*
+                    (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                       (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                       1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                          (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]]*Sinh[\[Eta]3])*(Sinh[\[Eta]3] - 
+                     Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]) + 
+                 (kT3*Sech[\[Eta]4]*(-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + 
+                          kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                          kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                          4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 + 
+                    kT4*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                          (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[
+                          kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                         Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                       Cos[\[Phi]4] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                          (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                         Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                       Sin[\[Phi]4] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                          \[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]4]))*
+                   (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                  Sqrt[2]))/Sqrt[2]))))/T14)/U + 
+    (((2*(2 + Eps^(-1) + DiscB[T24, Sqrt[MT^2], Sqrt[MT^2]] + 
+            Log[Mu^2/MT^2]) - 8*(3/4 + (MH^2*(S + T + T14 - T24)*
+              DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/(4*Kallen\[Lambda][MH^
+                2, MH^2 - S - T - T14, T24]) - ((MH^2 - S - T - T14)*
+              (S + T + T14 + T24)*DiscB[MH^2 - S - T - T14, Sqrt[MT^2], Sqrt[
+                MT^2]])/(4*Kallen\[Lambda][MH^2, MH^2 - S - T - T14, T24]) - 
+            ((2*MH^2 - S - T - T14 - T24)*T24*DiscB[T24, Sqrt[MT^2], Sqrt[
+                MT^2]])/(4*Kallen\[Lambda][MH^2, MH^2 - S - T - T14, T24]) + 
+            (Eps^(-1) + Log[Mu^2/MT^2])/4 + ((MT^2*S^2 + 2*MT^2*S*T + MT^2*
+                T^2 + 2*MT^2*S*T14 + 2*MT^2*T*T14 + MT^2*T14^2 + MH^4*T24 - 4*
+                MH^2*MT^2*T24 - MH^2*S*T24 + 2*MT^2*S*T24 - MH^2*T*T24 + 2*
+                MT^2*T*T24 - MH^2*T14*T24 + 2*MT^2*T14*T24 + MT^2*T24^2)*
+              ScalarC0[MH^2, MH^2 - S - T - T14, T24, Sqrt[MT^2], Sqrt[MT^2], 
+               Sqrt[MT^2]])/(2*Kallen\[Lambda][MH^2, MH^2 - S - T - T14, 
+               T24])))*(-2*Sech[\[Eta]4]*
+           (-(kT4*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                   (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*(
+                Cos[\[Phi]4] + I*Sin[\[Phi]4]))/(2*Sqrt[2]) - 
+            ((kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4]))*((Sqrt[S]*Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 - kT4*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]4])))/Sqrt[2])*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+            Sinh[\[Eta]4 + I*\[Phi]4]) - 4*Sqrt[S]*Conjugate[
+            1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                 Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                 Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                   \[Phi]4])]]*(-(Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) - 
+            (kT4*Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+              (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/
+             (2*Sqrt[2])) - 4*Sqrt[2]*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + 
+            I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+           ((Sqrt[S]*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*
+                       Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                     kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                       \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4])/4 + 
+            (kT4*Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+              (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - I*Conjugate[
+                 (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                  I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                  I*\[Phi]4]))/2) + 
+          ((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*(((2*S - S34 - 2*T14 + U)*Sech[\[Eta]4]*(
+                Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/2 - 
+             4*((Sqrt[S]*Sech[\[Eta]4]*(-(kT3*Cos[\[Phi]3]) - 
+                  kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                      \[Phi]4])))/4 + (kT4*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+                 (-(Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) + (kT3*Sech[\[Eta]4]*
+                    (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                   Sqrt[2]))/Sqrt[2])))/Sqrt[2]) - 
+        4*((((6*MH^4*S - 10*MH^2*S^2 + 3*S^3 + 6*MH^4*T - 20*MH^2*S*T + 9*S^2*
+                T - 10*MH^2*T^2 + 9*S*T^2 + 3*T^3 + 6*MH^4*T14 - 20*MH^2*S*
+                T14 + 9*S^2*T14 - 20*MH^2*T*T14 + 18*S*T*T14 + 9*T^2*T14 - 10*
+                MH^2*T14^2 + 9*S*T14^2 + 9*T*T14^2 + 3*T14^3 + 10*MH^4*T24 - 
+               14*MH^2*S*T24 + 7*S^2*T24 - 14*MH^2*T*T24 + 14*S*T*T24 + 7*T^2*
+                T24 - 14*MH^2*T14*T24 + 14*S*T14*T24 + 14*T*T14*T24 + 7*T14^2*
+                T24 - 8*MH^2*T24^2 + 5*S*T24^2 + 5*T*T24^2 + 5*T14*T24^2 + 
+               T24^3)*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/
+             (2*Kallen\[Lambda][MH^2, MH^2 - S - T - T14, T24]^2) - 
+            (3*(MH^2 - S - T - T14)^2*(S + T + T14 + T24)*DiscB[MH^2 - S - 
+                T - T14, Sqrt[MT^2], Sqrt[MT^2]])/Kallen\[Lambda][MH^2, 
+               MH^2 - S - T - T14, T24]^2 - ((2*MH^2*S^2 - 3*S^3 + 4*MH^2*S*
+                T - 9*S^2*T + 2*MH^2*T^2 - 9*S*T^2 - 3*T^3 + 4*MH^2*S*T14 - 9*
+                S^2*T14 + 4*MH^2*T*T14 - 18*S*T*T14 - 9*T^2*T14 + 2*MH^2*
+                T14^2 - 9*S*T14^2 - 9*T*T14^2 - 3*T14^3 + 4*MH^4*T24 - 2*MH^2*
+                S*T24 + S^2*T24 - 2*MH^2*T*T24 + 2*S*T*T24 + T^2*T24 - 2*MH^2*
+                T14*T24 + 2*S*T14*T24 + 2*T*T14*T24 + T14^2*T24 - 8*MH^2*
+                T24^2 + 5*S*T24^2 + 5*T*T24^2 + 5*T14*T24^2 + T24^3)*
+              DiscB[T24, Sqrt[MT^2], Sqrt[MT^2]])/(2*Kallen\[Lambda][MH^2, 
+                MH^2 - S - T - T14, T24]^2) + (MH^2 - S - T - T14)/
+             Kallen\[Lambda][MH^2, MH^2 - S - T - T14, T24] + 
+            ((MH^2 - S - T - T14)*(MH^2*S^2 + 2*MT^2*S^2 - S^3 + 2*MH^2*S*
+                T + 4*MT^2*S*T - 3*S^2*T + MH^2*T^2 + 2*MT^2*T^2 - 3*S*T^2 - 
+               T^3 + 2*MH^2*S*T14 + 4*MT^2*S*T14 - 3*S^2*T14 + 2*MH^2*T*T14 + 
+               4*MT^2*T*T14 - 6*S*T*T14 - 3*T^2*T14 + MH^2*T14^2 + 2*MT^2*
+                T14^2 - 3*S*T14^2 - 3*T*T14^2 - T14^3 + 2*MH^4*T24 - 8*MH^2*
+                MT^2*T24 + 4*MT^2*S*T24 - 2*S^2*T24 + 4*MT^2*T*T24 - 4*S*T*
+                T24 - 2*T^2*T24 + 4*MT^2*T14*T24 - 4*S*T14*T24 - 4*T*T14*
+                T24 - 2*T14^2*T24 + MH^2*T24^2 + 2*MT^2*T24^2 - S*T24^2 - T*
+                T24^2 - T14*T24^2)*ScalarC0[MH^2, MH^2 - S - T - T14, T24, 
+               Sqrt[MT^2], Sqrt[MT^2], Sqrt[MT^2]])/Kallen\[Lambda][MH^2, 
+               MH^2 - S - T - T14, T24]^2)*
+           (-((S34 - U)*(-2*MH^2 + S34 + 2*T + U)*(I*Conjugate[
+                  (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                       \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                        4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                 (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(
+                Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+             (2*Sqrt[2]) - 2*(S34 - U)*Sech[\[Eta]4]*
+             (-(kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                 (Cos[\[Phi]3] + I*Sin[\[Phi]3]))/(2*Sqrt[2]) + 
+              (kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + 
+                 I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3]))/Sqrt[2])*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+              Sinh[\[Eta]4 + I*\[Phi]4]) - 2*Sqrt[2]*(2*MH^2 - S34 - 2*T - U)*
+             (I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+              Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+             ((kT3*Sqrt[S]*Sech[\[Eta]4]*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/4 + 
+              (kT3*kT4*Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+                (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+               2) + 16*(-(kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                      4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                        2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                       Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                       Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                        \[Phi]3 - \[Phi]4])]]*(Cos[\[Phi]3] + 
+                  I*Sin[\[Phi]3]))/(2*Sqrt[2]) + (kT3*(kT3*Cos[\[Phi]3] + 
+                 kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3]))/Sqrt[2])*((kT3*Sqrt[S]*Sech[\[Eta]4]*
+                (Cos[\[Phi]3] - I*Sin[\[Phi]3]))/4 + (kT3*kT4*Sech[\[Eta]4]*
+                (Cos[\[Phi]4] - I*Sin[\[Phi]4])*(-Sinh[\[Eta]3] + 
+                 Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/2)) + 
+          (-(MH^2*(6*MH^2*S - 5*S^2 + 6*MH^2*T - 10*S*T - 5*T^2 + 
+                6*MH^2*T14 - 10*S*T14 - 10*T*T14 - 5*T14^2 + 2*MH^2*T24 - 
+                4*S*T24 - 4*T*T24 - 4*T14*T24 + T24^2)*DiscB[MH^2, 
+                Sqrt[MT^2], Sqrt[MT^2]])/(2*Kallen\[Lambda][MH^2, 
+                MH^2 - S - T - T14, T24]^2) + ((6*MH^4*S - 7*MH^2*S^2 + S^
+                3 + 6*MH^4*T - 14*MH^2*S*T + 3*S^2*T - 7*MH^2*T^2 + 3*S*T^2 + 
+               T^3 + 6*MH^4*T14 - 14*MH^2*S*T14 + 3*S^2*T14 - 14*MH^2*T*T14 + 
+               6*S*T*T14 + 3*T^2*T14 - 7*MH^2*T14^2 + 3*S*T14^2 + 3*T*T14^2 + 
+               T14^3 - 2*MH^4*T24 + 2*S^2*T24 + 4*S*T*T24 + 2*T^2*T24 + 4*S*
+                T14*T24 + 4*T*T14*T24 + 2*T14^2*T24 - MH^2*T24^2 + S*T24^2 + 
+               T*T24^2 + T14*T24^2)*DiscB[MH^2 - S - T - T14, Sqrt[MT^2], 
+               Sqrt[MT^2]])/(2*Kallen\[Lambda][MH^2, MH^2 - S - T - T14, T24]^
+               2) + ((2*MH^2*S^2 - S^3 + 4*MH^2*S*T - 3*S^2*T + 2*MH^2*T^2 - 
+               3*S*T^2 - T^3 + 4*MH^2*S*T14 - 3*S^2*T14 + 4*MH^2*T*T14 - 6*S*
+                T*T14 - 3*T^2*T14 + 2*MH^2*T14^2 - 3*S*T14^2 - 3*T*T14^2 - 
+               T14^3 + 4*MH^4*T24 - 4*MH^2*S*T24 - 2*S^2*T24 - 4*MH^2*T*T24 - 
+               4*S*T*T24 - 2*T^2*T24 - 4*MH^2*T14*T24 - 4*S*T14*T24 - 4*T*T14*
+                T24 - 2*T14^2*T24 + 2*MH^2*T24^2 - S*T24^2 - T*T24^2 - T14*
+                T24^2)*DiscB[T24, Sqrt[MT^2], Sqrt[MT^2]])/
+             (2*Kallen\[Lambda][MH^2, MH^2 - S - T - T14, T24]^2) - 
+            (2*MH^2 - S - T - T14 - T24)/(2*Kallen\[Lambda][MH^2, MH^2 - S - 
+                T - T14, T24]) - ((MH^4*S^2 + 2*MH^2*MT^2*S^2 - MH^2*S^3 - 
+               MT^2*S^3 + 2*MH^4*S*T + 4*MH^2*MT^2*S*T - 3*MH^2*S^2*T - 3*
+                MT^2*S^2*T + MH^4*T^2 + 2*MH^2*MT^2*T^2 - 3*MH^2*S*T^2 - 3*
+                MT^2*S*T^2 - MH^2*T^3 - MT^2*T^3 + 2*MH^4*S*T14 + 4*MH^2*MT^2*
+                S*T14 - 3*MH^2*S^2*T14 - 3*MT^2*S^2*T14 + 2*MH^4*T*T14 + 4*
+                MH^2*MT^2*T*T14 - 6*MH^2*S*T*T14 - 6*MT^2*S*T*T14 - 3*MH^2*
+                T^2*T14 - 3*MT^2*T^2*T14 + MH^4*T14^2 + 2*MH^2*MT^2*T14^2 - 3*
+                MH^2*S*T14^2 - 3*MT^2*S*T14^2 - 3*MH^2*T*T14^2 - 3*MT^2*T*
+                T14^2 - MH^2*T14^3 - MT^2*T14^3 + 2*MH^6*T24 - 8*MH^4*MT^2*
+                T24 - 3*MH^4*S*T24 + 8*MH^2*MT^2*S*T24 + MH^2*S^2*T24 - 3*
+                MT^2*S^2*T24 - 3*MH^4*T*T24 + 8*MH^2*MT^2*T*T24 + 2*MH^2*S*T*
+                T24 - 6*MT^2*S*T*T24 + MH^2*T^2*T24 - 3*MT^2*T^2*T24 - 3*MH^4*
+                T14*T24 + 8*MH^2*MT^2*T14*T24 + 2*MH^2*S*T14*T24 - 6*MT^2*S*
+                T14*T24 + 2*MH^2*T*T14*T24 - 6*MT^2*T*T14*T24 + MH^2*T14^2*
+                T24 - 3*MT^2*T14^2*T24 - 2*MH^4*T24^2 + 6*MH^2*MT^2*T24^2 + 2*
+                MH^2*S*T24^2 - 3*MT^2*S*T24^2 + 2*MH^2*T*T24^2 - 3*MT^2*T*
+                T24^2 + 2*MH^2*T14*T24^2 - 3*MT^2*T14*T24^2 - MT^2*T24^3)*
+              ScalarC0[MH^2, MH^2 - S - T - T14, T24, Sqrt[MT^2], Sqrt[MT^2], 
+               Sqrt[MT^2]])/Kallen\[Lambda][MH^2, MH^2 - S - T - T14, T24]^2)*
+           (-((S34 - U)*(-2*MH^2 + S34 + 2*T + U)*(I*Conjugate[
+                  (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                       \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                        4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                 (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(
+                Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+             (2*Sqrt[2]) - 2*(S34 - U)*Sech[\[Eta]4]*
+             (-(kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                 (Cos[\[Phi]3] + I*Sin[\[Phi]3]))/(2*Sqrt[2]) + 
+              (kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + 
+                 I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3]))/Sqrt[2])*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+              Sinh[\[Eta]4 + I*\[Phi]4]) - 2*Sqrt[2]*(2*MH^2 - S34 - 2*T - U)*
+             (I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+              Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+             ((kT3*Sqrt[S]*Sech[\[Eta]4]*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/4 + 
+              (kT3*kT4*Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+                (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+               2) + 16*((kT3*kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3]))/Sqrt[2] + (kT3*(Cos[\[Phi]3] + 
+                 I*Sin[\[Phi]3])*(-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                         4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])]])/2 + 
+                 kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                         Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                         2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                         4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                     (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                    Sinh[\[Eta]3])))/Sqrt[2])*((kT3*Sqrt[S]*Sech[\[Eta]4]*
+                (Cos[\[Phi]3] - I*Sin[\[Phi]3]))/4 + (kT3*kT4*Sech[\[Eta]4]*
+                (Cos[\[Phi]4] - I*Sin[\[Phi]4])*(-Sinh[\[Eta]3] + 
+                 Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/2)) + 
+          ((-2*MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/Kallen\[Lambda][
+              MH^2, MH^2 - S - T - T14, T24] + ((2*MH^2 - S - T - T14 - T24)*
+              DiscB[MH^2 - S - T - T14, Sqrt[MT^2], Sqrt[MT^2]])/
+             Kallen\[Lambda][MH^2, MH^2 - S - T - T14, T24] + 
+            ((S + T + T14 + T24)*DiscB[T24, Sqrt[MT^2], Sqrt[MT^2]])/
+             Kallen\[Lambda][MH^2, MH^2 - S - T - T14, T24] - 
+            (MH^2*(S + T + T14 - T24)*ScalarC0[MH^2, MH^2 - S - T - T14, T24, 
+               Sqrt[MT^2], Sqrt[MT^2], Sqrt[MT^2]])/Kallen\[Lambda][MH^2, 
+              MH^2 - S - T - T14, T24])*(-(Sqrt[2]*S*(-MH^2 + S34 + T24 + U)*
+              Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]) + 
+            Sqrt[2]*Sqrt[S]*(-MH^2 + S34 + T24 + U)*
+             ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+              Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+             (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                kT4*Sin[\[Phi]4])) + ((-S34^2 - 2*S34*T - S34*T24 + 2*T14*
+                T24 - 2*S*(2*S34 + T24) + MH^2*(2*S + 3*S34 - 2*T14 - 3*U) + 
+               2*T*U + 4*T14*U + T24*U + U^2)*(I*Conjugate[
+                 (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+              (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+             (2*Sqrt[2]) + 2*Sech[\[Eta]4]*(-(kT3*Sqrt[S]*(-S34 + U)*
+                 Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                       Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                       Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                        \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                 (Cos[\[Phi]3] + I*Sin[\[Phi]3]))/(2*Sqrt[2]) + 
+              (kT4*MH^2*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                (Cos[\[Phi]4] + I*Sin[\[Phi]4]))/(2*Sqrt[2]) - 
+              (kT4*Sqrt[S]*T24*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                (Cos[\[Phi]4] + I*Sin[\[Phi]4]))/(2*Sqrt[2]) - 
+              (kT4*Sqrt[S]*U*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                (Cos[\[Phi]4] + I*Sin[\[Phi]4]))/Sqrt[2] + (MH^2*Sqrt[S]*
+                Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*(kT3*Cos[\[Phi]3] + 
+                 kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))/
+               (2*Sqrt[2]) - (Sqrt[S]*S34*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                     4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                       2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                      Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                      Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                        \[Phi]4])]]*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + 
+                 I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))/Sqrt[2] - 
+              (Sqrt[S]*T24*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])))/(2*Sqrt[2]) - (kT3*S34*
+                (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4]))*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                      (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                     (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                         kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                         kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                         4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                    Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                      (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+                 Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3]))/Sqrt[2] + (kT3*U*(kT3*Cos[\[Phi]3] + 
+                 kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3]))/Sqrt[2] - (kT4*MH^2*(kT3*Cos[\[Phi]3] + 
+                 kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]4]))/Sqrt[2] + (kT4*T24*(kT3*Cos[\[Phi]3] + 
+                 kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]4]))/Sqrt[2] + Sqrt[2]*kT4*U*(kT3*Cos[\[Phi]3] + 
+                kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*(
+                Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                       Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                       kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                  (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                       \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                        4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]4] + 
+                Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                       Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                       Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                        \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                 Sinh[\[Eta]4]))*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+              Sinh[\[Eta]4 + I*\[Phi]4]) - Sqrt[2]*kT4*Sqrt[S]*
+             (-MH^2 + S34 + T24 + U)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                     \[Phi]4])]]*Sech[\[Eta]4]*(Cos[\[Phi]4] - 
+              I*Sin[\[Phi]4])*(Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + 
+                I*\[Phi]4]) + 2*Sqrt[2]*kT4*(-MH^2 + S34 + T24 + U)*
+             Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+             (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                kT4*Sin[\[Phi]4]))*(-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])]] - I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                     kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                 I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                 I*\[Phi]4]) - 2*Sqrt[2]*(MH^2 - S34 - T24 - U)*
+             (I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+              Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+             (-(kT3*Sqrt[S]*Sech[\[Eta]4]*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/
+               4 + (kT4*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+                (-((Sqrt[S]*Sech[\[Eta]4])/Sqrt[2]) - (kT3*Sech[\[Eta]4]*
+                   (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                  Sqrt[2]))/Sqrt[2]))) - 
+        2*(ScalarC0[MH^2, MH^2 - S - T - T14, T24, Sqrt[MT^2], Sqrt[MT^2], 
+            Sqrt[MT^2]]*(-((S*(S34 + U)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])]]*Sech[\[Eta]4])/Sqrt[2]) + 
+            (Sqrt[S]*(S34 + U)*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+              (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4])))/Sqrt[2] + ((-(S34*T) + S34*T14 + MH^2*
+                (S34 - U) + T*U + T14*U - S*(S34 + U))*
+              (I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                       \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+              (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+             (2*Sqrt[2]) + 2*Sech[\[Eta]4]*(-(kT4*Sqrt[S]*S34*Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*(Cos[\[Phi]4] + 
+                  I*Sin[\[Phi]4]))/(2*Sqrt[2]) - ((kT3*Cos[\[Phi]3] + 
+                 kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                ((Sqrt[S]*U*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]])/2 - kT4*S34*(Conjugate[
+                     (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                     (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                    Sinh[\[Eta]4])))/Sqrt[2])*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+              Sinh[\[Eta]4 + I*\[Phi]4]) - (kT4*Sqrt[S]*(S34 + U)*
+              Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                   2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+              (Cos[\[Phi]4] - I*Sin[\[Phi]4])*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+               Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2] + Sqrt[2]*kT4*(S34 + U)*
+             Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+             (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                kT4*Sin[\[Phi]4]))*(-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])]] - I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                     kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                 I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                 I*\[Phi]4]) + 8*((kT3*kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3]))/Sqrt[2] + (kT3*(Cos[\[Phi]3] + 
+                 I*Sin[\[Phi]3])*(-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                         4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])]])/2 + 
+                 kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                         Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                         2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                         4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                     (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                    Sinh[\[Eta]3])))/Sqrt[2])*((kT3*Sqrt[S]*Sech[\[Eta]4]*
+                (Cos[\[Phi]3] - I*Sin[\[Phi]3]))/4 + (kT3*kT4*Sech[\[Eta]4]*
+                (Cos[\[Phi]4] - I*Sin[\[Phi]4])*(-Sinh[\[Eta]3] + 
+                 Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/2) + 
+            2*Sqrt[2]*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                    kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+              Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*((kT3*Sqrt[S]*(-MH^2 + T)*
+                Sech[\[Eta]4]*(Cos[\[Phi]3] - I*Sin[\[Phi]3]))/4 + 
+              (kT4*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*(-(Sqrt[S]*(S34 + U)*
+                    Sech[\[Eta]4])/(2*Sqrt[2]) + (kT3*(-MH^2 + T)*
+                   Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                      I*\[Phi]4]))/Sqrt[2]))/Sqrt[2])) + 
+          (((2*MH^2 - S - T - T14 - T24)*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/
+             Kallen\[Lambda][MH^2, MH^2 - S - T - T14, T24] - 
+            (2*(MH^2 - S - T - T14)*DiscB[MH^2 - S - T - T14, Sqrt[MT^2], 
+               Sqrt[MT^2]])/Kallen\[Lambda][MH^2, MH^2 - S - T - T14, T24] - 
+            ((S + T + T14 - T24)*DiscB[T24, Sqrt[MT^2], Sqrt[MT^2]])/
+             Kallen\[Lambda][MH^2, MH^2 - S - T - T14, T24] + 
+            ((MH^2 - S - T - T14)*(S + T + T14 + T24)*ScalarC0[MH^2, MH^2 - 
+                S - T - T14, T24, Sqrt[MT^2], Sqrt[MT^2], Sqrt[MT^2]])/
+             Kallen\[Lambda][MH^2, MH^2 - S - T - T14, T24])*
+           (-(Sqrt[2]*S*(S34 + U)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                      \[Phi]4])]]*Sech[\[Eta]4]) + Sqrt[2]*Sqrt[S]*(S34 + U)*
+             ((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+              Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+             (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                kT4*Sin[\[Phi]4])) + ((-S34^2 - 4*S34*T + 2*S34*T14 + 4*MH^2*
+                (S34 - U) + 4*T*U + 2*T14*U + U^2 - 2*S*(S34 + U))*
+              (I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                       \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+              (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+             (2*Sqrt[2]) + 2*Sech[\[Eta]4]*(-(kT3*Sqrt[S]*(-3*S34 + U)*
+                 Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                       Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                       Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                        \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                 (Cos[\[Phi]3] + I*Sin[\[Phi]3]))/(2*Sqrt[2]) - 
+              ((kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4]))*(Sqrt[S]*(S34 + U)*Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                 kT3*(-3*S34 + U)*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                        (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                       (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                          kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                          kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                          4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                        (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                         4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                    Cos[\[Phi]3] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                        (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                       (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                          kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                          kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                          4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                        (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                         4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                    Sin[\[Phi]3] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                         4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])))/Sqrt[2])*
+             (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]) - 
+            Sqrt[2]*kT4*Sqrt[S]*(S34 + U)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                     \[Phi]4])]]*Sech[\[Eta]4]*(Cos[\[Phi]4] - 
+              I*Sin[\[Phi]4])*(Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + 
+                I*\[Phi]4]) + 2*Sqrt[2]*kT4*(S34 + U)*Sech[\[Eta]4]*
+             (Cos[\[Phi]4] - I*Sin[\[Phi]4])*(kT3*Cos[\[Phi]3] + 
+              kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+             (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                    2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - I*Conjugate[
+                (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                 I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                 I*\[Phi]4]) + 32*((kT3*kT4*(Cos[\[Phi]4] + I*Sin[\[Phi]4])*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3]))/Sqrt[2] + (kT3*(Cos[\[Phi]3] + 
+                 I*Sin[\[Phi]3])*(-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                         4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])]])/2 + 
+                 kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                         Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                         2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                         4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                     (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                    Sinh[\[Eta]3])))/Sqrt[2])*((kT3*Sqrt[S]*Sech[\[Eta]4]*
+                (Cos[\[Phi]3] - I*Sin[\[Phi]3]))/4 + (kT3*kT4*Sech[\[Eta]4]*
+                (Cos[\[Phi]4] - I*Sin[\[Phi]4])*(-Sinh[\[Eta]3] + 
+                 Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/2) + 
+            2*Sqrt[2]*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                    kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+              Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+             ((kT3*Sqrt[S]*(-4*MH^2 + S34 + 4*T + U)*Sech[\[Eta]4]*
+                (Cos[\[Phi]3] - I*Sin[\[Phi]3]))/4 + (kT4*(Cos[\[Phi]4] - 
+                 I*Sin[\[Phi]4])*(-((Sqrt[S]*(S34 + U)*Sech[\[Eta]4])/
+                   Sqrt[2]) + (kT3*(-4*MH^2 + S34 + 4*T + U)*Sech[\[Eta]4]*
+                   (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                  Sqrt[2]))/Sqrt[2]))))/(MH^2 - S - T - T14) + 
+      ((4*(2 + Eps^(-1) + DiscB[T, Sqrt[MT^2], Sqrt[MT^2]] + 
+            Log[Mu^2/MT^2]) - 16*(3/4 + (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[
+                MT^2]])/(4*(MH^2 - T)) - (T*DiscB[T, Sqrt[MT^2], Sqrt[MT^2]])/
+             (4*(MH^2 - T)) + (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[
+                   -(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2)/(4*(MH^2 - T)) + 
+            (Eps^(-1) + Log[Mu^2/MT^2])/4 - 
+            (MT^2*Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/(2*MT^2)]^2)/
+             (4*(MH^2 - T))))*
+         ((Sqrt[S]*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                    kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                  Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                      \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                    Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                    Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                   4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+             Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+            ((kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3]))/Sqrt[2] - 
+             Sqrt[2]*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*
+                (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))))/2 - 
+          Sqrt[2]*Sqrt[S]*Sech[\[Eta]4]*
+           (-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                   (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 + 
+            kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                     Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                     kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+              Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+              Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                    2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])) - 
+          (Sech[\[Eta]4]*(-(Sqrt[2]*kT4*Sqrt[S]*Conjugate[
+                1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                     Cos[\[Phi]3 - \[Phi]4])]]*(Cos[\[Phi]4] + 
+                I*Sin[\[Phi]4])) - (kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*(
+                (Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                      (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/
+                 2 - kT4*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                      (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                          kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                          kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                          4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                      (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                       (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]4] + 
+                  Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                         Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]4])))/Sqrt[2])*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+             Sinh[\[Eta]4 + I*\[Phi]4]))/2 - Sqrt[2]*kT4*Sech[\[Eta]4]*
+           (Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+           (-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                   (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 + 
+            kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                     Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                     kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+              Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+              Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                    2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3]))*
+           (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]) + 
+          kT4*Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+           ((kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3]))/Sqrt[2] - 
+            Sqrt[2]*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + 
+              I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))*
+           (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+            I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]) + 
+          ((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*(((S - S34 - T14 + U)*Sech[\[Eta]4]*(
+                Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/2 - 
+             4*((Sqrt[S]*Sech[\[Eta]4]*(-(kT3*Cos[\[Phi]3]) - 
+                  kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                      \[Phi]4])))/4 + (kT3*kT4*Sech[\[Eta]4]*(Cos[\[Phi]4] - 
+                  I*Sin[\[Phi]4])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+                    I*\[Phi]4]))/2)))/Sqrt[2]) - 
+        2*(Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+           (2*(MH^2 - T)) - Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/
+              (2*MT^2)]^2/(2*(MH^2 - T)))*
+         (-2*(-(Sqrt[S]*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                       kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                    (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                 (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*(
+                (kT3*(S + T14)*(Cos[\[Phi]3] + I*Sin[\[Phi]3]))/Sqrt[2] + 
+                (kT4*(MH^2 - T)*(Cos[\[Phi]4] + I*Sin[\[Phi]4]))/Sqrt[2]))/
+             2 - (Sqrt[S]*(MH^2 - T)*Sech[\[Eta]4]*
+              (-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                      (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/
+                2 + kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                     (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                         kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                         kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                         4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                    Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                      (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+                 Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                        kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3])))/Sqrt[2] + (Sech[\[Eta]4]*
+              ((kT4*Sqrt[S]*(MH^2 - T)*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                      4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                        2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                       Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                       Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                        \[Phi]3 - \[Phi]4])]]*(Cos[\[Phi]4] + 
+                  I*Sin[\[Phi]4]))/Sqrt[2] + (kT3*(Cos[\[Phi]3] + 
+                  I*Sin[\[Phi]3])*(Sqrt[S]*(S + T14)*Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+                  (Sqrt[S]*(S + S34 + T14 - U)*Conjugate[1/Sqrt[(kT3^2 + 
+                         kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                         kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                         4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                         2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 + 
+                  2*kT3*S*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                        (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                          kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                          kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                          4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                         (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                     Cos[\[Phi]3] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                         (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                         Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                          \[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]3])))/Sqrt[2])*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+               Sinh[\[Eta]4 + I*\[Phi]4]))/2 - (kT4*(MH^2 - T)*Sech[\[Eta]4]*
+              (Cos[\[Phi]4] - I*Sin[\[Phi]4])*(-(Sqrt[S]*Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 + kT3*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]3]))*(Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[
+                \[Eta]4 + I*\[Phi]4]))/Sqrt[2] - kT4*Sech[\[Eta]4]*
+             ((kT3*(S + T14)*(Cos[\[Phi]3] + I*Sin[\[Phi]3]))/Sqrt[2] + 
+              (kT4*(MH^2 - T)*(Cos[\[Phi]4] + I*Sin[\[Phi]4]))/Sqrt[2])*
+             (Cos[\[Phi]4] - I*Sin[\[Phi]4])*(-Conjugate[
+                1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                     Cos[\[Phi]3 - \[Phi]4])]] - I*Conjugate[
+                (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                 I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                 I*\[Phi]4]) + 2*Sqrt[2]*kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+             (-(S*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                       Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                       Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                        \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                 Sech[\[Eta]4]*(-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                  I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))/8 + 
+              (kT4*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*(-(Sqrt[S]*Sech[\[Eta]4]*
+                    ((Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]])/2 + kT4*(Conjugate[
+                         (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                         (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[1/Sqrt[
+                          (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                          kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                        Sinh[\[Eta]4])))/(2*Sqrt[2]) - (kT3*Sqrt[S]*
+                   Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sech[\[Eta]4]*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + 
+                      I*\[Phi]4]))/(2*Sqrt[2])))/Sqrt[2])) + 
+          ((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*(-((MH^2 - T)*(S - S34 - T14 + U)*
+                Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + 
+                   I*\[Phi]4]))/2 + 4*(MH^2 - T)*((Sqrt[S]*Sech[\[Eta]4]*
+                 (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                  I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))/4 + (kT3*kT4*
+                 Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+                 (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                2)))/Sqrt[2]) - 4*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/
+           (MH^2 - T) - DiscB[T, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - T))*
+         (-(Sqrt[S]*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*
+                      Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                    kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+              Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+             ((kT3*(-5*MH^2 + 4*S34 + T + 2*T24 + 4*U)*(Cos[\[Phi]3] + 
+                 I*Sin[\[Phi]3]))/Sqrt[2] - Sqrt[2]*(MH^2 - T)*(
+                kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                  kT4*Sin[\[Phi]4]))))/2 + Sqrt[2]*Sqrt[S]*(MH^2 - T)*
+           Sech[\[Eta]4]*(-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])]])/2 + 
+            kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                     Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                     kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+              Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+              Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                    2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])) - 
+          (Sech[\[Eta]4]*(Sqrt[2]*kT4*Sqrt[S]*(MH^2 - T)*Conjugate[1/
+                Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                    Cos[\[Phi]3 - \[Phi]4])]]*(Cos[\[Phi]4] + I*
+                Sin[\[Phi]4]) + (kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*(
+                (Sqrt[S]*(7*MH^2 - 8*S34 - 3*T - 2*T24)*Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 - 
+                4*kT3*(-2*MH^2 + 2*S34 + T + 2*T14 + T24)*
+                 (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]3]) - kT4*(7*MH^2 - 3*T - 2*T24 - 8*U)*
+                 (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]4])))/Sqrt[2])*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+             Sinh[\[Eta]4 + I*\[Phi]4]))/2 + Sqrt[2]*kT4*(MH^2 - T)*
+           Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+           (-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                   (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 + 
+            kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                     Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                     kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+              Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                     Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                     kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                   Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                       \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+              Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                     Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                     Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                    4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                    2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3]))*
+           (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]) - 
+          kT4*Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+           ((kT3*(-5*MH^2 + 4*S34 + T + 2*T24 + 4*U)*(Cos[\[Phi]3] + I*
+                Sin[\[Phi]3]))/Sqrt[2] - Sqrt[2]*(MH^2 - T)*
+             (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + 
+                kT4*Sin[\[Phi]4])))*(-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                     \[Phi]4])]] - I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                  kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                   kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                 Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                     \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+             Cosh[\[Eta]4 + I*\[Phi]4] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]) + 
+          ((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                   Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                   Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+              (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                    4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                      2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                     Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                     Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]])*(-((MH^2 - T)*(S - S34 - T14 + U)*
+                Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + 
+                   I*\[Phi]4]))/2 + 4*(MH^2 - T)*((Sqrt[S]*Sech[\[Eta]4]*
+                 (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                  I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])))/4 + (kT3*kT4*
+                 Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+                 (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                2)))/Sqrt[2] - 8*Sqrt[2]*kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+           (-(kT3*Sqrt[S]*Sech[\[Eta]4]*(-(kT3*Cos[\[Phi]3]) - 
+                kT4*Cos[\[Phi]4] + I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*(
+                Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                       Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                       kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                  (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                       \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                      Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                        4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+                Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                       Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                       Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                        \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                 Sinh[\[Eta]3]))/4 + (kT3*Sqrt[S]*Sech[\[Eta]4]*
+              (Cos[\[Phi]3] - I*Sin[\[Phi]3])*((Sqrt[S]*Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 + kT4*
+                (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                       Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                        Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                        kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                  Sinh[\[Eta]4])))/4 + (kT4*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+              (-((kT3^2*Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                        (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                       (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                          kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                          kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                          4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                        (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                         4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                    Cos[\[Phi]3] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                        (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                       (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                          kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                          kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                          4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                        (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                         4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                    Sin[\[Phi]3] + Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                         4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])*
+                  (Sinh[\[Eta]3] - Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/
+                 Sqrt[2]) + (kT3*Sech[\[Eta]4]*((Sqrt[S]*Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/
+                   2 + kT4*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[
+                          \[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                        (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                          kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                          kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                          4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                         (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                     Cos[\[Phi]4] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                         (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                         Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                          \[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]4]))*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                    I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/Sqrt[2])) + 
+        8*((kT3*(-1/(2*(MH^2 - T)) - (MH^2*DiscB[MH^2, Sqrt[MT^2], 
+                Sqrt[MT^2]])/(2*(MH^2 - T)^2) + (MH^2*DiscB[T, Sqrt[MT^2], 
+                Sqrt[MT^2]])/(2*(MH^2 - T)^2) - 
+             (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/
+                  (2*MT^2)]^2)/(2*(MH^2 - T)^2) + 
+             (MT^2*Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/(2*MT^2)]^2)/
+              (2*(MH^2 - T)^2))*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+            (-(Sqrt[S]*(-MH^2 + 2*S + T + 2*T14)*((-I)*Conjugate[
+                   (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                        \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[
+                          \[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                        Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4])]] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                    (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4])/2 - 
+             (Sech[\[Eta]4]*((Sqrt[S]*(-3*MH^2 + 4*S34 + T + 2*T24)*
+                  Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                        Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                        Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                         \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                      (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/
+                 2 - 2*kT3*(S - S34 - T14 + U)*(Conjugate[
+                    (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]3]) - kT4*(-3*MH^2 + T + 2*T24 + 4*U)*
+                 (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]4]))*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+                Sinh[\[Eta]4 + I*\[Phi]4]))/2 - kT4*(-MH^2 + 2*S + T + 2*T14)*
+              Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+              (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - I*Conjugate[
+                 (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                  I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                  I*\[Phi]4]) + 8*((kT3*S*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 
+                      4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                        2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                       Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                       Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                        \[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*(Cos[\[Phi]3] - 
+                  I*Sin[\[Phi]3]))/8 + (kT4*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+                 ((kT3*Sqrt[S]*Sech[\[Eta]4]*(Conjugate[
+                       (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                       (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                       1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                          (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]]*Sinh[\[Eta]3]))/(2*Sqrt[2]) + 
+                  (kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                          \[Phi]4])]]*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + 
+                     Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/(2*Sqrt[2])))/
+                Sqrt[2])))/Sqrt[2] + 
+          (kT3*(-DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - T)) + 
+             DiscB[T, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - T)))*
+            (Cos[\[Phi]3] + I*Sin[\[Phi]3])*((Sqrt[S]*(-3*MH^2 + 2*S34 + T + 
+                2*U)*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*
+                        Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                     (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                    (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                 (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                    Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4])/2 - 
+             (Sech[\[Eta]4]*((Sqrt[S]*(-3*MH^2 + 4*S34 + T)*Conjugate[
+                   1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                       kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 - 
+                2*kT3*(S - S34 - T14 + U)*(Conjugate[
+                    (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]3]) - kT4*(-3*MH^2 + T + 4*U)*
+                 (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                        Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                         Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                         kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                    (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                         \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                         kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                         Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                    1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                         Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                         Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                       (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                   Sinh[\[Eta]4]))*(Cosh[\[Eta]4 + I*\[Phi]4] - 
+                Sinh[\[Eta]4 + I*\[Phi]4]))/2 + kT4*(-3*MH^2 + 2*S34 + T + 2*
+                U)*Sech[\[Eta]4]*(Cos[\[Phi]4] - I*Sin[\[Phi]4])*
+              (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - I*Conjugate[
+                 (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                      \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                    Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                         \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                         2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                       4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + 
+                  I*\[Phi]4] + Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                   (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + 
+                  I*\[Phi]4]) + 8*(-(kT3*Sqrt[S]*Sech[\[Eta]4]*
+                  (-(kT3*Cos[\[Phi]3]) - kT4*Cos[\[Phi]4] + 
+                   I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4]))*
+                  (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                         Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                         2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                         4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*
+                          Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                     (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                         kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                    Sinh[\[Eta]3]))/4 + (kT3*Sqrt[S]*Sech[\[Eta]4]*
+                 (Cos[\[Phi]3] - I*Sin[\[Phi]3])*((Sqrt[S]*Conjugate[
+                     1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/
+                   2 + kT4*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*
+                          Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[
+                          \[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                        (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                          kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                          kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                          4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                        (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                         (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                     Cos[\[Phi]4] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                         (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                          Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                         Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[
+                          \[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[
+                      1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                          Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                          Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[
+                          \[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                         (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                     Sinh[\[Eta]4])))/4 + (kT4*(Cos[\[Phi]4] - 
+                  I*Sin[\[Phi]4])*(-((kT3^2*Sech[\[Eta]4]*(Conjugate[
+                        (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                          kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Cos[\[Phi]3] + Conjugate[
+                        (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[1/Sqrt[
+                          (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                          kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                       Sinh[\[Eta]3])*(Sinh[\[Eta]3] - Sinh[\[Eta]4 - 
+                        I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]) + 
+                  (kT3*Sech[\[Eta]4]*((Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + 
+                          kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                          kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                          4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                          Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 + 
+                     kT4*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                          \[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[
+                          \[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                          2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                          4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                          2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                          Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                          Sinh[\[Eta]4])]]*Cos[\[Phi]4] + Conjugate[
+                         (-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[
+                          \[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[
+                          \[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                          kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                          Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                          Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                          kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                          Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4])]]*Sin[\[Phi]4] + Conjugate[1/Sqrt[
+                          (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                          \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                          2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                          4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + 
+                          kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+                        Sinh[\[Eta]4]))*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - 
+                       I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))/Sqrt[2])))/
+           Sqrt[2]))/T)/T24))/(MW*SW)
diff --git a/tests/triangle_2diags++++.m b/tests/triangle_2diags++++.m
new file mode 100644
index 00000000..25e361a9
--- /dev/null
+++ b/tests/triangle_2diags++++.m
@@ -0,0 +1,1517 @@
+(* Created with the Wolfram Language for Students - Personal Use Only : www.wolfram.com *)
+Amp[{{V[5, {Glu1}], k[1], 0, {Sqrt[3]*ColorCharge}}, 
+    {V[5, {Glu2}], k[2], 0, {Sqrt[3]*ColorCharge}}} -> 
+   {{S[1], k[3], MH, {}}, {V[5, {Glu4}], k[4], 0, {Sqrt[3]*ColorCharge}}, 
+    {V[5, {Glu5}], k[5], 0, {Sqrt[3]*ColorCharge}}}][
+ (2*c3*((8*Sqrt[2]*Alfas^2*EL*kT3*MT^2*(-1/(2*(MH^2 - T)) - 
+        (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/(2*(MH^2 - T)^2) + 
+        (MH^2*DiscB[T, Sqrt[MT^2], Sqrt[MT^2]])/(2*(MH^2 - T)^2) - 
+        (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^
+           2)/(2*(MH^2 - T)^2) + 
+        (MT^2*Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/(2*MT^2)]^2)/
+         (2*(MH^2 - T)^2))*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+       (-(Sqrt[S]*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                  kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                   kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                 Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                     \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+            Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*Sech[\[Eta]4])/4 - 
+        (Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*
+                kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+          (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/4))/
+      (MW*SW) - (4*Alfas^2*EL*MT^2*(2 + Eps^(-1) + DiscB[T, Sqrt[MT^2], 
+         Sqrt[MT^2]] + Log[Mu^2/MT^2])*
+       (((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]] + Conjugate[
+            (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+              kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+              (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+          (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+         (2*Sqrt[2]) - 
+        (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]] + Conjugate[
+            (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+              kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+              (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+          (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/
+         (2*Sqrt[2]) + Sqrt[2]*Sech[\[Eta]4]*
+         (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                 Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                 Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+          I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+               Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+           Cosh[\[Eta]4 + I*\[Phi]4] + 
+          Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+               Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+           Sinh[\[Eta]4 + I*\[Phi]4])))/(MW*SW) + 
+     (16*Alfas^2*EL*MT^2*(3/4 + (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/
+         (4*(MH^2 - T)) - (T*DiscB[T, Sqrt[MT^2], Sqrt[MT^2]])/
+         (4*(MH^2 - T)) + 
+        (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^
+           2)/(4*(MH^2 - T)) + (Eps^(-1) + Log[Mu^2/MT^2])/4 - 
+        (MT^2*Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/(2*MT^2)]^2)/
+         (4*(MH^2 - T)))*
+       (((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]] + Conjugate[
+            (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+              kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+              (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+          (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+         (2*Sqrt[2]) - 
+        (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]] + Conjugate[
+            (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+              kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+              (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+          (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/
+         (2*Sqrt[2]) + Sqrt[2]*Sech[\[Eta]4]*
+         (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                 Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                 Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+          I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+               Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+           Cosh[\[Eta]4 + I*\[Phi]4] + 
+          Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+               Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+           Sinh[\[Eta]4 + I*\[Phi]4])))/(MW*SW) - 
+     (2*Alfas^2*EL*MT^2*
+       (Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+         (2*(MH^2 - T)) - Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/
+            (2*MT^2)]^2/(2*(MH^2 - T)))*
+       (-(Sech[\[Eta]4]*(((-MH^2 + T)*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] - 
+            (kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                    Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                   kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                    Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                  (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+              (Cos[\[Phi]3] + I*Sin[\[Phi]3]))/Sqrt[2])*
+           (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+        Sqrt[2]*(MH^2 - T)*Sech[\[Eta]4]*
+         (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                 Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                 Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+          I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+               Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+           Cosh[\[Eta]4 + I*\[Phi]4] + 
+          Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+               Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+           Sinh[\[Eta]4 + I*\[Phi]4]) - 
+        (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]] + Conjugate[
+            (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+              kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+              (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+          (-(kT3*Sqrt[S]*Sech[\[Eta]4]*(Cos[\[Phi]3] + I*Sin[\[Phi]3]))/2 - 
+           ((-MH^2 + T)*Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+              Sinh[\[Eta]4 + I*\[Phi]4]))/2))/Sqrt[2]))/(MW*SW) - 
+     (8*Sqrt[2]*Alfas^2*EL*kT3*MT^2*(-DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/
+         (2*(MH^2 - T)) + DiscB[T, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - T)))*
+       (Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+       ((kT3*Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                  kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + 
+                 kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                  kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                    Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                   kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                    Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                    \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+           Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+           Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])*
+          (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+        kT3*Sech[\[Eta]4]*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+         (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                 Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                 Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+          I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+               Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+           Cosh[\[Eta]4 + I*\[Phi]4] + 
+          Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+               Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+           Sinh[\[Eta]4 + I*\[Phi]4]) - 
+        (kT3*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]] + Conjugate[
+            (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+              kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+              (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+          (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/2))/
+      (MW*SW) - (4*Alfas^2*EL*MT^2*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/
+         (MH^2 - T) - DiscB[T, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - T))*
+       (-(Sech[\[Eta]4]*(((-MH^2 + T)*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+                (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                  kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                  (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] + 
+            Sqrt[2]*kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+             (-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                     (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/
+               2 - kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[
+                         \[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + 
+                      kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                    (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                        kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                        kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                        4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                         Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                   Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                     (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+                Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                      Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*
+                       Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                       kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                         Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                        kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                         Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                          \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                       Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                       Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                      kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                       Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                        \[Eta]4])]]*Sin[\[Phi]3] + Conjugate[
+                  1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[
+                        \[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[
+                        2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                      4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                      2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])))*
+           (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+        Sqrt[2]*Sech[\[Eta]4]*(MH^2 - T + kT3^2*(Cos[\[Phi]3] - 
+            I*Sin[\[Phi]3])*(Cos[\[Phi]3] + I*Sin[\[Phi]3]))*
+         (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                 Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                 Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+          I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+               Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+           Cosh[\[Eta]4 + I*\[Phi]4] + 
+          Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+               Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+           Sinh[\[Eta]4 + I*\[Phi]4]) - 
+        (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]] + Conjugate[
+            (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+              kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+              (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+          (-((-MH^2 + T)*Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[
+                \[Eta]4 + I*\[Phi]4]))/2 + Sqrt[2]*kT3*(Cos[\[Phi]3] + 
+             I*Sin[\[Phi]3])*(-(Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) + 
+             (kT3*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                  I*\[Phi]4]))/Sqrt[2])))/Sqrt[2]))/(MW*SW)))/T + 
+  (2*c2*((-8*Sqrt[2]*Alfas^2*EL*kT3*MT^2*(-1/(2*(MH^2 - T)) - 
+        (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/(2*(MH^2 - T)^2) + 
+        (MH^2*DiscB[T, Sqrt[MT^2], Sqrt[MT^2]])/(2*(MH^2 - T)^2) - 
+        (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^
+           2)/(2*(MH^2 - T)^2) + 
+        (MT^2*Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/(2*MT^2)]^2)/
+         (2*(MH^2 - T)^2))*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+       ((Sqrt[S]*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]] + Conjugate[
+            (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+              kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+              (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4])/4 - 
+        (Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*
+                kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+          (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/2))/
+      (MW*SW) - (4*Alfas^2*EL*MT^2*(2 + Eps^(-1) + DiscB[T, Sqrt[MT^2], 
+         Sqrt[MT^2]] + Log[Mu^2/MT^2])*
+       (-(((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]] + Conjugate[
+             (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+               kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+               (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                   2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+           (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+          Sqrt[2]) - (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                  kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                  kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                    Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                   kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                    Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                    \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+           Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+               Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+          (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/
+         (2*Sqrt[2]) - (Sech[\[Eta]4]*
+          (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+           I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+           Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2]))/
+      (MW*SW) + (16*Alfas^2*EL*MT^2*
+       (3/4 + (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/(4*(MH^2 - T)) - 
+        (T*DiscB[T, Sqrt[MT^2], Sqrt[MT^2]])/(4*(MH^2 - T)) + 
+        (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^
+           2)/(4*(MH^2 - T)) + (Eps^(-1) + Log[Mu^2/MT^2])/4 - 
+        (MT^2*Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/(2*MT^2)]^2)/
+         (4*(MH^2 - T)))*
+       (-(((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]] + Conjugate[
+             (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+               kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+               (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                   2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+           (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+          Sqrt[2]) - (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                  kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + 
+                 kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + 
+                  kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                    Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                   kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                    Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                    \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+           Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+               Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+          (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/
+         (2*Sqrt[2]) - (Sech[\[Eta]4]*
+          (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+           I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+           Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2]))/
+      (MW*SW) + (2*Alfas^2*EL*MT^2*
+       (Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+         (2*(MH^2 - T)) - Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/
+            (2*MT^2)]^2/(2*(MH^2 - T)))*
+       (-(Sech[\[Eta]4]*(((-MH^2 + T)*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                     kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+               (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                 kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] - 
+           (kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                   Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                  kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                   Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                 (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+             (Cos[\[Phi]3] + I*Sin[\[Phi]3]))/Sqrt[2])*
+          (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4])) + 
+        ((MH^2 - T)*Sech[\[Eta]4]*
+          (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+           I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+           Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2] + 
+        (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]] + Conjugate[
+            (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+              kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+              (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+          (-(kT3*Sqrt[S]*Sech[\[Eta]4]*(Cos[\[Phi]3] + I*Sin[\[Phi]3]))/2 - 
+           ((-MH^2 + T)*Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+              Sinh[\[Eta]4 + I*\[Phi]4]))/2))/Sqrt[2]))/(MW*SW) + 
+     (8*Sqrt[2]*Alfas^2*EL*kT3*MT^2*(-DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/
+         (2*(MH^2 - T)) + DiscB[T, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - T)))*
+       (Cos[\[Phi]3] + I*Sin[\[Phi]3])*(kT3*Sech[\[Eta]4]*
+         (Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+               Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+          Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+               Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+          Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                 Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                 Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])*
+         (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]) + 
+        (kT3*Sech[\[Eta]4]*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+          (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+           I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+           Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+        (kT3*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]] + Conjugate[
+            (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+              kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+              (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+          (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/2))/
+      (MW*SW) + (4*Alfas^2*EL*MT^2*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/
+         (MH^2 - T) - DiscB[T, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - T))*
+       (-(Sech[\[Eta]4]*(((-MH^2 + T)*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                     kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+               (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                 kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] + 
+           Sqrt[2]*kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+            (-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 - 
+             kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                      Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Cos[\[Phi]3] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+               Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])))*
+          (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4])) + 
+        (Sech[\[Eta]4]*(MH^2 - T + kT3^2*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+            (Cos[\[Phi]3] + I*Sin[\[Phi]3]))*
+          (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+           I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+           Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2] + 
+        (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]] + Conjugate[
+            (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+              kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+              (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+          (-((-MH^2 + T)*Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[
+                \[Eta]4 + I*\[Phi]4]))/2 + Sqrt[2]*kT3*(Cos[\[Phi]3] + 
+             I*Sin[\[Phi]3])*(-(Sqrt[S]*Sech[\[Eta]4])/(2*Sqrt[2]) + 
+             (kT3*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + 
+                  I*\[Phi]4]))/Sqrt[2])))/Sqrt[2]))/(MW*SW)))/T + 
+  (2*c1*((8*Sqrt[2]*Alfas^2*EL*kT3*MT^2*(-1/(2*(MH^2 - T)) - 
+        (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/(2*(MH^2 - T)^2) + 
+        (MH^2*DiscB[T, Sqrt[MT^2], Sqrt[MT^2]])/(2*(MH^2 - T)^2) - 
+        (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^
+           2)/(2*(MH^2 - T)^2) + 
+        (MT^2*Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/(2*MT^2)]^2)/
+         (2*(MH^2 - T)^2))*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+       ((Sqrt[S]*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]] + Conjugate[
+            (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+              kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+              (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4])/2 - 
+        (Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*
+                kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 2*kT3*kT4*
+                Cos[\[Phi]3 - \[Phi]4])]]*Sech[\[Eta]4]*
+          (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/4))/
+      (MW*SW) + (4*Alfas^2*EL*MT^2*(2 + Eps^(-1) + DiscB[T, Sqrt[MT^2], 
+         Sqrt[MT^2]] + Log[Mu^2/MT^2])*
+       (-((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]] + Conjugate[
+             (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+               kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+               (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                   2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+           (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+         (2*Sqrt[2]) - 
+        (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]] + Conjugate[
+            (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+              kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+              (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+          (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2] + 
+        (Sech[\[Eta]4]*(-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                  Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                 kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                  Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+           I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+           Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2]))/
+      (MW*SW) - (16*Alfas^2*EL*MT^2*
+       (3/4 + (MH^2*DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]])/(4*(MH^2 - T)) - 
+        (T*DiscB[T, Sqrt[MT^2], Sqrt[MT^2]])/(4*(MH^2 - T)) + 
+        (MT^2*Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^
+           2)/(4*(MH^2 - T)) + (Eps^(-1) + Log[Mu^2/MT^2])/4 - 
+        (MT^2*Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/(2*MT^2)]^2)/
+         (4*(MH^2 - T)))*
+       (-((I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]] + Conjugate[
+             (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+               kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+               (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                   4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                     2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                    Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                    Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                   2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+           (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/
+         (2*Sqrt[2]) - 
+        (((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]] + Conjugate[
+            (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+              kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+              (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 
+                  4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[
+                    2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+          (Cosh[\[Eta]4 + I*\[Phi]4] + Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2] + 
+        (Sech[\[Eta]4]*(-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                  Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                 kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                  Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+           I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+           Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2]))/
+      (MW*SW) + (2*Alfas^2*EL*MT^2*
+       (Log[(-MH^2 + 2*MT^2 + Sqrt[-(MH^2*(-MH^2 + 4*MT^2))])/(2*MT^2)]^2/
+         (2*(MH^2 - T)) - Log[(2*MT^2 - T + Sqrt[-((4*MT^2 - T)*T)])/
+            (2*MT^2)]^2/(2*(MH^2 - T)))*
+       ((Sech[\[Eta]4]*(((-MH^2 + T)*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                     kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+               (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                 kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] - 
+           (kT3*Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                   Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                  kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                   Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                 (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*
+             (Cos[\[Phi]3] + I*Sin[\[Phi]3]))/Sqrt[2])*
+          (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+        ((MH^2 - T)*Sech[\[Eta]4]*
+          (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+           I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+           Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2] - 
+        Sqrt[2]*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+               Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+          Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+              Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[
+                kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*
+                kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+         (-(kT3*Sqrt[S]*Sech[\[Eta]4]*(Cos[\[Phi]3] + I*Sin[\[Phi]3]))/2 - 
+          ((-MH^2 + T)*Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+             Sinh[\[Eta]4 + I*\[Phi]4]))/2)))/(MW*SW) + 
+     (8*Sqrt[2]*Alfas^2*EL*kT3*MT^2*(-DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/
+         (2*(MH^2 - T)) + DiscB[T, Sqrt[MT^2], Sqrt[MT^2]]/(2*(MH^2 - T)))*
+       (Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+       (-(kT3*Sech[\[Eta]4]*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + 
+                   kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + 
+                  kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                   kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                     Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                    kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                     Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4]])/
+                 Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - 
+                     \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Cos[\[Phi]3] + 
+            Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                  Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                  Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[
+                (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                 (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+            Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                   Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                   Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                  4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                  2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])*
+           (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+        (kT3*Sech[\[Eta]4]*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+          (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+           I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+           Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/2 - 
+        kT3*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+               Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+          Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+              Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[
+                kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*
+                kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*Sech[\[Eta]4]*
+         (-Sinh[\[Eta]3] + Sinh[\[Eta]4 - I*\[Phi]3 + I*\[Phi]4])))/(MW*SW) + 
+     (4*Alfas^2*EL*MT^2*(DiscB[MH^2, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - T) - 
+        DiscB[T, Sqrt[MT^2], Sqrt[MT^2]]/(MH^2 - T))*
+       ((Sech[\[Eta]4]*(((-MH^2 + T)*(I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                     kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                   (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                  (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                      kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                      kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                      4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                       Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                 Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                   (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                    kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                    4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                     Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + Conjugate[
+               (-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]3]) - 
+                 kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[\[Eta]4] - 
+                 (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + 
+                     kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                  (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4])]]))/Sqrt[2] + 
+           Sqrt[2]*kT3*(Cos[\[Phi]3] + I*Sin[\[Phi]3])*
+            (-(Sqrt[S]*Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/
+                    (kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]])/2 - 
+             kT3*(Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                     Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*
+                      Cos[\[Phi]4])*Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*
+                        Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                       kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                        Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[
+                         \[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                      Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                      Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                     kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*
+                      Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*
+                Cos[\[Phi]3] + Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + 
+                      kT4*Sin[\[Phi]4])*Sinh[\[Eta]3]) - kT4*
+                    (kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sinh[\[Eta]4] + 
+                   (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sqrt[kT3^2 + 
+                       kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                       kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                       4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                        Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+                  Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                    (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                     kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                     4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                      Sinh[\[Eta]3]*Sinh[\[Eta]4])]]*Sin[\[Phi]3] + 
+               Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                      Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                      Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                     4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                     2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]]*Sinh[\[Eta]3])))*
+          (Cosh[\[Eta]4 + I*\[Phi]4] - Sinh[\[Eta]4 + I*\[Phi]4]))/2 + 
+        (Sech[\[Eta]4]*(MH^2 - T + kT3^2*(Cos[\[Phi]3] - I*Sin[\[Phi]3])*
+            (Cos[\[Phi]3] + I*Sin[\[Phi]3]))*
+          (-Conjugate[1/Sqrt[(kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*
+                  Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                  Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                 4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])/(kT3^2 + kT4^2 + 
+                 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])]] - 
+           I*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Cosh[\[Eta]4 + I*\[Phi]4] + 
+           Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                 Sinh[\[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                 Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                   kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 
+                   4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*
+                    Sinh[\[Eta]3]*Sinh[\[Eta]4]])/Sqrt[2])/
+              Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*
+                (kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4])]]*Sinh[\[Eta]4 + I*\[Phi]4]))/Sqrt[2] - 
+        Sqrt[2]*((-I)*Conjugate[(-(kT3*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+                Sinh[\[Eta]3]) - kT4*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*
+               Sinh[\[Eta]4] + (I*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+                Sqrt[kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                  kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                   Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                   Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 
+                2*kT3*kT4*Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 
+                4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + 
+                kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 
+                4*kT3*kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]] + 
+          Conjugate[(-(kT3*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*Sinh[
+                \[Eta]3]) - kT4*(kT3*Cos[\[Phi]3] + kT4*Cos[\[Phi]4])*
+              Sinh[\[Eta]4] - (I*(kT3*Sin[\[Phi]3] + kT4*Sin[\[Phi]4])*Sqrt[
+                kT3^2 + kT4^2 + 4*kT3*kT4*Cos[\[Phi]3]*Cos[\[Phi]4] + 
+                 kT3^2*Cosh[2*\[Eta]3] + kT4^2*Cosh[2*\[Eta]4] + 4*kT3*kT4*
+                  Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*kT4*Sinh[\[Eta]3]*
+                  Sinh[\[Eta]4]])/Sqrt[2])/Sqrt[(kT3^2 + kT4^2 + 2*kT3*kT4*
+                Cos[\[Phi]3 - \[Phi]4])*(kT3^2 + kT4^2 + 4*kT3*kT4*
+                Cos[\[Phi]3]*Cos[\[Phi]4] + kT3^2*Cosh[2*\[Eta]3] + kT4^2*
+                Cosh[2*\[Eta]4] + 4*kT3*kT4*Sin[\[Phi]3]*Sin[\[Phi]4] + 4*kT3*
+                kT4*Sinh[\[Eta]3]*Sinh[\[Eta]4])]])*
+         (-((-MH^2 + T)*Sech[\[Eta]4]*(Cosh[\[Eta]4 + I*\[Phi]4] + 
+              Sinh[\[Eta]4 + I*\[Phi]4]))/2 + Sqrt[2]*kT3*
+           (Cos[\[Phi]3] + I*Sin[\[Phi]3])*(-(Sqrt[S]*Sech[\[Eta]4])/
+             (2*Sqrt[2]) + (kT3*Sech[\[Eta]4]*(-Sinh[\[Eta]3] + Sinh[
+                \[Eta]4 - I*\[Phi]3 + I*\[Phi]4]))/Sqrt[2]))))/(MW*SW)))/T]
-- 
GitLab